+
+function twitter_queue_hook(&$a,&$b) {
+
+ $qi = q("SELECT * FROM `queue` WHERE `network` = '%s'",
+ dbesc(NETWORK_TWITTER)
+ );
+ if(! count($qi))
+ return;
+
+ require_once('include/queue_fn.php');
+
+ foreach($qi as $x) {
+ if($x['network'] !== NETWORK_TWITTER)
+ continue;
+
+ logger('twitter_queue: run');
+
+ $r = q("SELECT `user`.* FROM `user` LEFT JOIN `contact` on `contact`.`uid` = `user`.`uid`
+ WHERE `contact`.`self` = 1 AND `contact`.`id` = %d LIMIT 1",
+ intval($x['cid'])
+ );
+ if(! count($r))
+ continue;
+
+ $user = $r[0];
+
+ $ckey = get_config('twitter', 'consumerkey');
+ $csecret = get_config('twitter', 'consumersecret');
+ $otoken = get_pconfig($user['uid'], 'twitter', 'oauthtoken');
+ $osecret = get_pconfig($user['uid'], 'twitter', 'oauthsecret');
+
+ $success = false;
+
+ if ($ckey AND $csecret AND $otoken AND $osecret) {
+
+ logger('twitter_queue: able to post');
+
+ $z = unserialize($x['content']);
+
+ require_once("addon/twitter/codebird.php");
+
+ $cb = \Codebird\Codebird::getInstance();
+ $cb->setConsumerKey($ckey, $csecret);
+ $cb->setToken($otoken, $osecret);
+
+ if ($z['url'] == "statuses/update")
+ $result = $cb->statuses_update($z['post']);
+
+ logger('twitter_queue: post result: ' . print_r($result, true), LOGGER_DEBUG);
+
+ if ($result->errors)
+ logger('twitter_queue: Send to Twitter failed: "' . print_r($result->errors, true) . '"');
+ else {
+ $success = true;
+ remove_queue_item($x['id']);
+ }
+ } else
+ logger("twitter_queue: Error getting tokens for user ".$user['uid']);
+
+ if (!$success) {
+ logger('twitter_queue: delayed');
+ update_queue_time($x['id']);
+ }
+ }
+}
+
+function twitter_fetch_contact($uid, $contact, $create_user) {
+
+ $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `alias` = '%s' LIMIT 1",
+ intval($uid), dbesc("twitter::".$contact->id_str));
+
+ if(!count($r) AND !$create_user)
+ return(0);
+
+ if (count($r) AND ($r[0]["readonly"] OR $r[0]["blocked"])) {
+ logger("twitter_fetch_contact: Contact '".$r[0]["nick"]."' is blocked or readonly.", LOGGER_DEBUG);
+ return(-1);
+ }
+
+ if(!count($r)) {
+ // create contact record
+ q("INSERT INTO `contact` ( `uid`, `created`, `url`, `nurl`, `addr`, `alias`, `notify`, `poll`,
+ `name`, `nick`, `photo`, `network`, `rel`, `priority`,
+ `writable`, `blocked`, `readonly`, `pending` )
+ VALUES ( %d, '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', %d, %d, %d, 0, 0, 0 ) ",
+ intval($uid),
+ dbesc(datetime_convert()),
+ dbesc("https://twitter.com/".$contact->screen_name),
+ dbesc(normalise_link("https://twitter.com/".$contact->screen_name)),
+ dbesc($contact->screen_name."@twitter.com"),
+ dbesc("twitter::".$contact->id_str),
+ dbesc(''),
+ dbesc("twitter::".$contact->id_str),
+ dbesc($contact->name),
+ dbesc($contact->screen_name),
+ dbesc($contact->profile_image_url_https),
+ dbesc(NETWORK_TWITTER),
+ intval(CONTACT_IS_FRIEND),
+ intval(1),
+ intval(1)
+ );
+
+ $r = q("SELECT * FROM `contact` WHERE `alias` = '%s' AND `uid` = %d LIMIT 1",
+ dbesc("twitter::".$contact->id_str),
+ intval($uid)
+ );
+
+ if(! count($r))
+ return(false);
+
+ $contact_id = $r[0]['id'];
+
+ $g = q("SELECT def_gid FROM user WHERE uid = %d LIMIT 1",
+ intval($uid)
+ );
+
+ if($g && intval($g[0]['def_gid'])) {
+ require_once('include/group.php');
+ group_add_member($uid,'',$contact_id,$g[0]['def_gid']);
+ }
+
+ require_once("Photo.php");
+
+ $photos = import_profile_photo($contact->profile_image_url_https,$uid,$contact_id);
+
+ q("UPDATE `contact` SET `photo` = '%s',
+ `thumb` = '%s',
+ `micro` = '%s',
+ `name-date` = '%s',
+ `uri-date` = '%s',
+ `avatar-date` = '%s'
+ WHERE `id` = %d",
+ dbesc($photos[0]),
+ dbesc($photos[1]),
+ dbesc($photos[2]),
+ dbesc(datetime_convert()),
+ dbesc(datetime_convert()),
+ dbesc(datetime_convert()),
+ intval($contact_id)
+ );
+ } else {
+ // update profile photos once every two weeks as we have no notification of when they change.
+
+ //$update_photo = (($r[0]['avatar-date'] < datetime_convert('','','now -2 days')) ? true : false);
+ $update_photo = ($r[0]['avatar-date'] < datetime_convert('','','now -12 hours'));
+
+ // check that we have all the photos, this has been known to fail on occasion
+
+ if((! $r[0]['photo']) || (! $r[0]['thumb']) || (! $r[0]['micro']) || ($update_photo)) {
+
+ logger("twitter_fetch_contact: Updating contact ".$contact->screen_name, LOGGER_DEBUG);
+
+ require_once("Photo.php");
+
+ $photos = import_profile_photo($contact->profile_image_url_https, $uid, $r[0]['id']);
+
+ q("UPDATE `contact` SET `photo` = '%s',
+ `thumb` = '%s',
+ `micro` = '%s',
+ `name-date` = '%s',
+ `uri-date` = '%s',
+ `avatar-date` = '%s',
+ `url` = '%s',
+ `nurl` = '%s',
+ `addr` = '%s',
+ `name` = '%s',
+ `nick` = '%s'
+ WHERE `id` = %d",
+ dbesc($photos[0]),
+ dbesc($photos[1]),
+ dbesc($photos[2]),
+ dbesc(datetime_convert()),
+ dbesc(datetime_convert()),
+ dbesc(datetime_convert()),
+ dbesc("https://twitter.com/".$contact->screen_name),
+ dbesc(normalise_link("https://twitter.com/".$contact->screen_name)),
+ dbesc($contact->screen_name."@twitter.com"),
+ dbesc($contact->name),
+ dbesc($contact->screen_name),
+ intval($r[0]['id'])
+ );
+ }
+ }
+
+ return($r[0]["id"]);
+}
+
+function twitter_fetchuser($a, $uid, $screen_name = "", $user_id = "") {
+ $ckey = get_config('twitter', 'consumerkey');
+ $csecret = get_config('twitter', 'consumersecret');
+ $otoken = get_pconfig($uid, 'twitter', 'oauthtoken');
+ $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
+
+ require_once("addon/twitter/codebird.php");
+
+ $cb = \Codebird\Codebird::getInstance();
+ $cb->setConsumerKey($ckey, $csecret);
+ $cb->setToken($otoken, $osecret);
+
+ $r = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
+ intval($uid));
+
+ if(count($r)) {
+ $self = $r[0];
+ } else
+ return;
+
+ $parameters = array();
+
+ if ($screen_name != "")
+ $parameters["screen_name"] = $screen_name;
+
+ if ($user_id != "")
+ $parameters["user_id"] = $user_id;
+
+ // Fetching user data
+ $user = $cb->users_show($parameters);
+
+ if (!is_object($user))
+ return;
+
+ $contact_id = twitter_fetch_contact($uid, $user, true);
+
+ return $contact_id;
+}
+
+function twitter_createpost($a, $uid, $post, $self, $create_user, $only_existing_contact) {
+
+ $has_picture = false;
+
+ $postarray = array();
+ $postarray['gravity'] = 0;
+ $postarray['uid'] = $uid;
+ $postarray['wall'] = 0;
+ $postarray['uri'] = "twitter::".$post->id_str;
+
+ $r = q("SELECT * FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
+ dbesc($postarray['uri']),
+ intval($uid)
+ );
+
+ if (count($r))
+ return(array());
+
+ $contactid = 0;
+
+ if ($post->in_reply_to_status_id_str != "") {
+
+ $parent = "twitter::".$post->in_reply_to_status_id_str;
+
+ $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
+ dbesc($parent),
+ intval($uid)
+ );
+ if (count($r)) {
+ $postarray['thr-parent'] = $r[0]["uri"];
+ $postarray['parent-uri'] = $r[0]["parent-uri"];
+ } else {
+ $r = q("SELECT * FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
+ dbesc($parent),
+ intval($uid)
+ );
+ if (count($r)) {
+ $postarray['thr-parent'] = $r[0]['uri'];
+ $postarray['parent-uri'] = $r[0]['parent-uri'];
+ } else {
+ $postarray['thr-parent'] = $postarray['uri'];
+ $postarray['parent-uri'] = $postarray['uri'];
+ }
+ }
+
+ // Is it me?
+ $own_id = get_pconfig($uid, 'twitter', 'own_id');
+
+ if ($post->user->id_str == $own_id) {
+ $r = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
+ intval($uid));
+
+ if(count($r)) {
+ $contactid = $r[0]["id"];
+
+ $postarray['owner-name'] = $r[0]["name"];
+ $postarray['owner-link'] = $r[0]["url"];
+ $postarray['owner-avatar'] = $r[0]["photo"];
+ } else
+ return(array());
+ }
+ } else
+ $postarray['parent-uri'] = $postarray['uri'];
+
+ if ($contactid == 0) {
+ $contactid = twitter_fetch_contact($uid, $post->user, $create_user);
+
+ $postarray['owner-name'] = $post->user->name;
+ $postarray['owner-link'] = "https://twitter.com/".$post->user->screen_name;
+ $postarray['owner-avatar'] = $post->user->profile_image_url_https;
+ }
+
+ if(($contactid == 0) AND !$only_existing_contact)
+ $contactid = $self['id'];
+ elseif ($contactid <= 0)
+ return(array());
+
+ $postarray['contact-id'] = $contactid;
+
+ $postarray['verb'] = ACTIVITY_POST;
+ $postarray['author-name'] = $postarray['owner-name'];
+ $postarray['author-link'] = $postarray['owner-link'];
+ $postarray['author-avatar'] = $postarray['owner-avatar'];
+ $postarray['plink'] = "https://twitter.com/".$post->user->screen_name."/status/".$post->id_str;
+ $postarray['app'] = strip_tags($post->source);
+
+ if ($post->user->protected) {
+ $postarray['private'] = 1;
+ $postarray['allow_cid'] = '<' . $self['id'] . '>';
+ }
+
+ $postarray['body'] = $post->text;
+
+ // media
+ if (is_array($post->entities->media)) {
+ foreach($post->entities->media AS $media) {
+ switch($media->type) {
+ case 'photo':
+ $postarray['body'] = str_replace($media->url, "\n\n[img]".$media->media_url_https."[/img]\n", $postarray['body']);
+ $has_picture = true;
+ break;
+ default:
+ $postarray['body'] .= print_r($media, true);
+ }
+ }
+ }
+
+ $converted = twitter_convertmsg($a, $postarray['body'], false, $has_picture);
+ $postarray['body'] = $converted["body"];
+ $postarray['tag'] = $converted["tags"];
+
+ $postarray['created'] = datetime_convert('UTC','UTC',$post->created_at);
+ $postarray['edited'] = datetime_convert('UTC','UTC',$post->created_at);
+
+ if (is_string($post->place->name))
+ $postarray["location"] = $post->place->name;
+
+ if (is_string($post->place->full_name))
+ $postarray["location"] = $post->place->full_name;
+
+ if (is_array($post->geo->coordinates))
+ $postarray["coord"] = $post->geo->coordinates[0]." ".$post->geo->coordinates[1];
+
+ if (is_array($post->coordinates->coordinates))
+ $postarray["coord"] = $post->coordinates->coordinates[1]." ".$post->coordinates->coordinates[0];
+
+ if (is_object($post->retweeted_status)) {
+
+ $postarray['body'] = $post->retweeted_status->text;
+
+ // media
+ if (is_array($post->retweeted_status->entities->media)) {
+ foreach($post->retweeted_status->entities->media AS $media) {
+ switch($media->type) {
+ case 'photo':
+ $postarray['body'] = str_replace($media->url, "\n\n[img]".$media->media_url_https."[/img]\n", $postarray['body']);
+ $has_picture = true;
+ break;
+ default:
+ $postarray['body'] .= print_r($media, true);
+ }
+ }
+ }
+
+ $converted = twitter_convertmsg($a, $postarray['body'], false, $has_picture);
+ $postarray['body'] = $converted["body"];
+ $postarray['tag'] = $converted["tags"];
+
+
+ // Deactivated at the moment, since there are problems with answers to retweets
+ if (false AND !intval(get_config('system','wall-to-wall_share'))) {
+ $postarray['body'] = "[share author='".$post->retweeted_status->user->name.
+ "' profile='https://twitter.com/".$post->retweeted_status->user->screen_name.
+ "' avatar='".$post->retweeted_status->user->profile_image_url_https.
+ "' link='https://twitter.com/".$post->retweeted_status->user->screen_name."/status/".$post->retweeted_status->id_str."']".
+ $postarray['body'];
+ $postarray['body'] .= "[/share]";
+ } else {
+ // Let retweets look like wall-to-wall posts
+ $postarray['author-name'] = $post->retweeted_status->user->name;
+ $postarray['author-link'] = "https://twitter.com/".$post->retweeted_status->user->screen_name;
+ $postarray['author-avatar'] = $post->retweeted_status->user->profile_image_url_https;
+ }
+
+ }
+ return($postarray);
+}
+
+function twitter_checknotification($a, $uid, $own_id, $top_item, $postarray) {
+
+ $user = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` LIMIT 1",
+ intval($uid)
+ );
+
+ if(!count($user))
+ return;
+
+ // Is it me?
+ if (link_compare($user[0]["url"], $postarray['author-link']))
+ return;
+
+ $own_user = q("SELECT * FROM `contact` WHERE `uid` = %d AND `alias` = '%s' LIMIT 1",
+ intval($uid),
+ dbesc("twitter::".$own_id)
+ );
+
+ if(!count($own_user))
+ return;
+
+ // Is it me from twitter?
+ if (link_compare($own_user[0]["url"], $postarray['author-link']))
+ return;
+
+ $myconv = q("SELECT `author-link`, `author-avatar`, `parent` FROM `item` WHERE `parent-uri` = '%s' AND `uid` = %d AND `parent` != 0 AND `deleted` = 0",
+ dbesc($postarray['parent-uri']),
+ intval($uid)
+ );
+
+ if(count($myconv)) {
+
+ foreach($myconv as $conv) {
+ // now if we find a match, it means we're in this conversation
+
+ if(!link_compare($conv['author-link'],$user[0]["url"]) AND !link_compare($conv['author-link'],$own_user[0]["url"]))
+ continue;
+
+ require_once('include/enotify.php');
+
+ $conv_parent = $conv['parent'];
+
+ notification(array(
+ 'type' => NOTIFY_COMMENT,
+ 'notify_flags' => $user[0]['notify-flags'],
+ 'language' => $user[0]['language'],
+ 'to_name' => $user[0]['username'],
+ 'to_email' => $user[0]['email'],
+ 'uid' => $user[0]['uid'],
+ 'item' => $postarray,
+ 'link' => $a->get_baseurl() . '/display/' . $user[0]['nickname'] . '/' . $top_item,
+ 'source_name' => $postarray['author-name'],
+ 'source_link' => $postarray['author-link'],
+ 'source_photo' => $postarray['author-avatar'],
+ 'verb' => ACTIVITY_POST,
+ 'otype' => 'item',
+ 'parent' => $conv_parent,
+ ));
+
+ // only send one notification
+ break;
+ }
+ }
+}
+
+function twitter_fetchhometimeline($a, $uid) {
+ $ckey = get_config('twitter', 'consumerkey');
+ $csecret = get_config('twitter', 'consumersecret');
+ $otoken = get_pconfig($uid, 'twitter', 'oauthtoken');
+ $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
+ $create_user = get_pconfig($uid, 'twitter', 'create_user');
+
+ logger("twitter_fetchhometimeline: Fetching for user ".$uid, LOGGER_DEBUG);
+
+ require_once('library/twitteroauth.php');
+ require_once('include/items.php');
+
+ $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
+
+ $own_contact = twitter_fetch_own_contact($a, $uid);
+
+ $r = q("SELECT * FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
+ intval($own_contact),
+ intval($uid));
+
+ if(count($r)) {
+ $own_id = $r[0]["nick"];
+ } else {
+ logger("twitter_fetchhometimeline: Own twitter contact not found for user ".$uid, LOGGER_DEBUG);
+ return;
+ }
+
+ $r = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
+ intval($uid));
+
+ if(count($r)) {
+ $self = $r[0];
+ } else {
+ logger("twitter_fetchhometimeline: Own contact not found for user ".$uid, LOGGER_DEBUG);
+ return;
+ }
+
+ $u = q("SELECT * FROM user WHERE uid = %d LIMIT 1",
+ intval($uid));
+ if(!count($u)) {
+ logger("twitter_fetchhometimeline: Own user not found for user ".$uid, LOGGER_DEBUG);
+ return;
+ }
+
+ $parameters = array("exclude_replies" => false, "trim_user" => false, "contributor_details" => true, "include_rts" => true);
+ //$parameters["count"] = 200;
+
+
+ // Fetching timeline
+ $lastid = get_pconfig($uid, 'twitter', 'lasthometimelineid');
+
+ $first_time = ($lastid == "");
+
+ if ($lastid <> "")
+ $parameters["since_id"] = $lastid;
+
+ $items = $connection->get('statuses/home_timeline', $parameters);
+
+ if (!is_array($items)) {
+ logger("twitter_fetchhometimeline: Error fetching home timeline: ".print_r($items, true), LOGGER_DEBUG);
+ return;
+ }
+
+ $posts = array_reverse($items);
+
+ logger("twitter_fetchhometimeline: Fetching timeline for user ".$uid." ".sizeof($posts)." items", LOGGER_DEBUG);
+
+ if (count($posts)) {
+ foreach ($posts as $post) {
+ if ($post->id_str > $lastid)
+ $lastid = $post->id_str;
+
+ if ($first_time)
+ continue;
+
+ $postarray = twitter_createpost($a, $uid, $post, $self, $create_user, true);
+
+ if (trim($postarray['body']) == "")
+ continue;
+
+ $item = item_store($postarray);
+
+ logger('twitter_fetchhometimeline: User '.$self["nick"].' posted home timeline item '.$item);
+
+ if ($item != 0)
+ twitter_checknotification($a, $uid, $own_id, $item, $postarray);
+
+ }
+ }
+ set_pconfig($uid, 'twitter', 'lasthometimelineid', $lastid);
+
+ // Fetching mentions
+ $lastid = get_pconfig($uid, 'twitter', 'lastmentionid');
+
+ $first_time = ($lastid == "");
+
+ if ($lastid <> "")
+ $parameters["since_id"] = $lastid;
+
+ $items = $connection->get('statuses/mentions_timeline', $parameters);
+
+ if (!is_array($items)) {
+ logger("twitter_fetchhometimeline: Error fetching mentions: ".print_r($items, true), LOGGER_DEBUG);
+ return;
+ }
+
+ $posts = array_reverse($items);
+
+ logger("twitter_fetchhometimeline: Fetching mentions for user ".$uid." ".sizeof($posts)." items", LOGGER_DEBUG);
+
+ if (count($posts)) {
+ foreach ($posts as $post) {
+ if ($post->id_str > $lastid)
+ $lastid = $post->id_str;
+
+ if ($first_time)
+ continue;
+
+ $postarray = twitter_createpost($a, $uid, $post, $self, false, false);
+
+ if (trim($postarray['body']) == "")
+ continue;
+
+ $item = item_store($postarray);
+
+ logger('twitter_fetchhometimeline: User '.$self["nick"].' posted mention timeline item '.$item);
+
+ if ($item == 0) {
+ $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
+ dbesc($postarray['uri']),
+ intval($uid)
+ );
+ if (count($r))
+ $item = $r[0]['id'];
+ }
+
+ if ($item != 0) {
+ require_once('include/enotify.php');
+ notification(array(
+ 'type' => NOTIFY_TAGSELF,
+ 'notify_flags' => $u[0]['notify-flags'],
+ 'language' => $u[0]['language'],
+ 'to_name' => $u[0]['username'],
+ 'to_email' => $u[0]['email'],
+ 'uid' => $u[0]['uid'],
+ 'item' => $postarray,
+ 'link' => $a->get_baseurl() . '/display/' . $u[0]['nickname'] . '/' . $item,
+ 'source_name' => $postarray['author-name'],
+ 'source_link' => $postarray['author-link'],
+ 'source_photo' => $postarray['author-avatar'],
+ 'verb' => ACTIVITY_TAG,
+ 'otype' => 'item'
+ ));
+ }
+ }
+ }
+
+ set_pconfig($uid, 'twitter', 'lastmentionid', $lastid);
+}
+
+function twitter_original_url($url, $depth=1, $fetchbody = false) {
+ if ($depth > 10)
+ return($url);
+
+ $siteinfo = array();
+ $ch = curl_init();
+ curl_setopt($ch, CURLOPT_URL, $url);
+ curl_setopt($ch, CURLOPT_HEADER, 1);
+
+ if ($fetchbody)
+ curl_setopt($ch, CURLOPT_NOBODY, 0);
+ else
+ curl_setopt($ch, CURLOPT_NOBODY, 1);
+
+ curl_setopt($ch, CURLOPT_TIMEOUT, 10);
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+ curl_setopt($ch,CURLOPT_USERAGENT,'Mozilla/5.0 (Macintosh; Intel Mac OS X 10.8; rv:24.0) Gecko/20100101 Firefox/24.0');
+
+ $header = curl_exec($ch);
+ $curl_info = @curl_getinfo($ch);
+ $http_code = $curl_info['http_code'];
+ curl_close($ch);
+
+ if ((($curl_info['http_code'] == "301") OR ($curl_info['http_code'] == "302"))
+ AND (($curl_info['redirect_url'] != "") OR ($curl_info['location'] != ""))) {
+ if ($curl_info['redirect_url'] != "")
+ return(twitter_original_url($curl_info['redirect_url'], ++$depth, $fetchbody));
+ else
+ return(twitter_original_url($curl_info['location'], ++$depth, $fetchbody));
+ }
+
+ $pos = strpos($header, "\r\n\r\n");
+
+ if ($pos)
+ $body = trim(substr($header, $pos));
+ else
+ $body = $header;
+
+ if (trim($body) == "")
+ return(twitter_original_url($url, ++$depth, true));
+
+ $doc = new DOMDocument();
+ @$doc->loadHTML($body);
+
+ $xpath = new DomXPath($doc);
+
+ $list = $xpath->query("//meta[@content]");
+ foreach ($list as $node) {
+ $attr = array();
+ if ($node->attributes->length)
+ foreach ($node->attributes as $attribute)
+ $attr[$attribute->name] = $attribute->value;
+
+ if (@$attr["http-equiv"] == 'refresh') {
+ $path = $attr["content"];
+ $pathinfo = explode(";", $path);
+ $content = "";
+ foreach ($pathinfo AS $value)
+ if (substr(strtolower($value), 0, 4) == "url=")
+ return(twitter_original_url(substr($value, 4), ++$depth));
+ }
+ }
+
+ return($url);
+}
+
+function twitter_siteinfo($url, $dontincludemedia) {
+ require_once("mod/parse_url.php");
+
+ // Fetch site infos - but only from the meta data
+ $data = parseurl_getsiteinfo($url, true);
+
+ if ($dontincludemedia)
+ unset($data["images"]);
+
+ if (!is_string($data["text"]) AND (sizeof($data["images"]) == 0) AND ($data["title"] == $url))
+ return("");
+
+ if (is_string($data["title"]))
+ $text .= "[bookmark=".$url."]".trim($data["title"])."[/bookmark]\n";
+
+ // Add a spoiler to the extra information
+ //if ((sizeof($data["images"]) > 0) OR is_string($data["text"]))
+ // $text .= "[spoiler]";
+
+ if (sizeof($data["images"]) > 0) {
+ $imagedata = $data["images"][0];
+ $text .= '[img='.$imagedata["width"].'x'.$imagedata["height"].']'.$imagedata["src"].'[/img]' . "\n";
+ }
+
+ if (is_string($data["text"]))
+ $text .= "[quote]".$data["text"]."[/quote]";
+
+ //if ((sizeof($data["images"]) > 0) OR is_string($data["text"]))
+ // $text .= "[/spoiler]";
+
+ return($text);
+
+}
+
+function twitter_convertmsg($a, $body, $no_tags = false, $dontincludemedia) {
+
+ $links = preg_match_all("/([^\]\='".'"'."]|^)(https?\:\/\/[a-zA-Z0-9\:\/\-\?\&\;\.\=\_\~\#\%\$\!\+\,]+)/ism", $body,$matches,PREG_SET_ORDER);
+
+ $footer = "";
+ $footerurl = "";
+
+ if ($links) {
+ foreach ($matches AS $match) {
+ $expanded_url = twitter_original_url($match[2]);
+
+ // To-Do:
+ // Twitlonger
+
+ if (strstr($expanded_url, "//www.youtube.com/"))
+ $body = str_replace($match[2], "\n[youtube]".$expanded_url."[/youtube]\n", $body);
+ elseif (strstr($expanded_url, "//player.vimeo.com/"))
+ $body = str_replace($match[2], "\n[vimeo]".$expanded_url."[/vimeo]\n", $body);
+ elseif (strstr($expanded_url, "//twitpic.com/")) // Test
+ $body = str_replace($match[2], "\n[url]".$expanded_url."[/url]\n", $body);
+ elseif (strstr($expanded_url, "//instagram.com/"))
+ $body = str_replace($match[2], "\n[url]".$expanded_url."[/url]\n", $body);
+ else {
+ $img_str = fetch_url($expanded_url, true, $redirects, 4);
+
+ $tempfile = tempnam(get_config("system","temppath"), "cache");
+ file_put_contents($tempfile, $img_str);
+ $mime = image_type_to_mime_type(exif_imagetype($tempfile));
+ unlink($tempfile);
+
+ if (substr($mime, 0, 6) == "image/") {
+ $body = str_replace($match[2], "[img]".$expanded_url."[/img]", $body);
+ $dontincludemedia = true;
+ } else {
+ $footerurl = $expanded_url;
+ $footerlink = "[url=".$expanded_url."]".$expanded_url."[/url]";
+
+ $body = str_replace($match[2], $footerlink, $body);
+ }
+ }
+ }
+
+ if ($footerurl != "")
+ $footer = "\n\n".twitter_siteinfo($footerurl, $dontincludemedia);
+
+ if (($footerlink != "") AND (trim($footer) != "")) {
+ $removedlink = trim(str_replace($footerlink, "", $body));
+
+ if (strstr($body, $removedlink))
+ $body = $removedlink;
+
+ $body .= $footer;
+ }
+ }
+
+ if ($no_tags)
+ return(array("body" => $body, $tags => ""));
+
+ $str_tags = '';
+
+ $tags = get_tags($body);
+
+ if(count($tags)) {
+ foreach($tags as $tag) {
+ if (strstr(trim($tag), " "))
+ continue;
+
+ if(strpos($tag,'#') === 0) {
+ if(strpos($tag,'[url='))
+ continue;
+
+ // don't link tags that are already embedded in links
+
+ if(preg_match('/\[(.*?)' . preg_quote($tag,'/') . '(.*?)\]/',$body))
+ continue;
+ if(preg_match('/\[(.*?)\]\((.*?)' . preg_quote($tag,'/') . '(.*?)\)/',$body))
+ continue;
+
+ $basetag = str_replace('_',' ',substr($tag,1));
+ $body = str_replace($tag,'#[url=' . $a->get_baseurl() . '/search?tag=' . rawurlencode($basetag) . ']' . $basetag . '[/url]',$body);
+ if(strlen($str_tags))
+ $str_tags .= ',';
+ $str_tags .= '#[url=' . $a->get_baseurl() . '/search?tag=' . rawurlencode($basetag) . ']' . $basetag . '[/url]';
+ continue;
+ } elseif(strpos($tag,'@') === 0) {
+ $basetag = substr($tag,1);
+ $body = str_replace($tag,'@[url=https://twitter.com/' . rawurlencode($basetag) . ']' . $basetag . '[/url]',$body);
+ }
+
+ }
+ }
+
+ $cnt = preg_match_all('/@\[url=(.*?)\[\/url\]/ism',$body,$matches,PREG_SET_ORDER);
+ if($cnt) {
+ foreach($matches as $mtch) {
+ if(strlen($str_tags))
+ $str_tags .= ',';
+ $str_tags .= '@[url=' . $mtch[1] . '[/url]';
+ }
+ }
+
+ return(array("body"=>$body, "tags"=>$str_tags));
+
+}
+
+function twitter_fetch_own_contact($a, $uid) {
+ $ckey = get_config('twitter', 'consumerkey');
+ $csecret = get_config('twitter', 'consumersecret');
+ $otoken = get_pconfig($uid, 'twitter', 'oauthtoken');
+ $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
+
+ $own_id = get_pconfig($uid, 'twitter', 'own_id');
+
+ $contact_id = 0;
+
+ if ($own_id == "") {
+ require_once('library/twitteroauth.php');
+
+ $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
+
+ // Fetching user data
+ $user = $connection->get('account/verify_credentials');
+
+ set_pconfig($uid, 'twitter', 'own_id', $user->id_str);
+
+ $contact_id = twitter_fetch_contact($uid, $user, true);
+
+ } else {
+ $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `alias` = '%s' LIMIT 1",
+ intval($uid), dbesc("twitter::".$own_id));
+ if(count($r))
+ $contact_id = $r[0]["id"];
+ }
+
+ return($contact_id);
+}
+?>