twitter/twitter.php

   1 <?php
   2 /**
   3  * Name: Twitter Connector
   4  * Description: Bidirectional (posting, relaying and reading) connector for Twitter.
   5  * Version: 1.0.4
   6  * Author: Tobias Diekershoff <https://f.diekershoff.de/profile/tobias>
   7  * Author: Michael Vogel <https://pirati.ca/profile/heluecht>
   8  *
   9  * Copyright (c) 2011-2013 Tobias Diekershoff, Michael Vogel
  10  * All rights reserved.
  11  *
  12  * Redistribution and use in source and binary forms, with or without
  13  * modification, are permitted provided that the following conditions are met:
  14  *    * Redistributions of source code must retain the above copyright notice,
  15  *     this list of conditions and the following disclaimer.
  16  *    * Redistributions in binary form must reproduce the above
  17  *    * copyright notice, this list of conditions and the following disclaimer in
  18  *      the documentation and/or other materials provided with the distribution.
  19  *    * Neither the name of the <organization> nor the names of its contributors
  20  *      may be used to endorse or promote products derived from this software
  21  *      without specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
  24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  25  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  26  * DISCLAIMED. IN NO EVENT SHALL <COPYRIGHT HOLDER> BE LIABLE FOR ANY DIRECT,
  27  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
  28  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  29  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  30  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
  31  * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
  32  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  33  *
  34  */
  35
  36 /*   Twitter Plugin for Friendica
  37  *
  38  *   Author: Tobias Diekershoff
  39  *           tobias.diekershoff@gmx.net
  40  *
  41  *   License:3-clause BSD license
  42  *
  43  *   Configuration:
  44  *     To use this plugin you need a OAuth Consumer key pair (key & secret)
  45  *     you can get it from Twitter at https://twitter.com/apps
  46  *
  47  *     Register your Friendica site as "Client" application with "Read & Write" access
  48  *     we do not need "Twitter as login". When you've registered the app you get the
  49  *     OAuth Consumer key and secret pair for your application/site.
  50  *
  51  *     Add this key pair to your global .htconfig.php or use the admin panel.
  52  *
  53  *     $a->config['twitter']['consumerkey'] = 'your consumer_key here';
  54  *     $a->config['twitter']['consumersecret'] = 'your consumer_secret here';
  55  *
  56  *     To activate the plugin itself add it to the $a->config['system']['addon']
  57  *     setting. After this, your user can configure their Twitter account settings
  58  *     from "Settings -> Plugin Settings".
  59  *
  60  *     Requirements: PHP5, curl [Slinky library]
  61  */
  62
  63 require_once('include/enotify.php');
  64 require_once("include/socgraph.php");
  65
  66 define('TWITTER_DEFAULT_POLL_INTERVAL', 5); // given in minutes
  67
  68 function twitter_install() {
  69         //  we need some hooks, for the configuration and for sending tweets
  70         register_hook('connector_settings', 'addon/twitter/twitter.php', 'twitter_settings');
  71         register_hook('connector_settings_post', 'addon/twitter/twitter.php', 'twitter_settings_post');
  72         register_hook('post_local', 'addon/twitter/twitter.php', 'twitter_post_local');
  73         register_hook('notifier_normal', 'addon/twitter/twitter.php', 'twitter_post_hook');
  74         register_hook('jot_networks', 'addon/twitter/twitter.php', 'twitter_jot_nets');
  75         register_hook('cron', 'addon/twitter/twitter.php', 'twitter_cron');
  76         register_hook('queue_predeliver', 'addon/twitter/twitter.php', 'twitter_queue_hook');
  77         register_hook('follow', 'addon/twitter/twitter.php', 'twitter_follow');
  78         register_hook('expire', 'addon/twitter/twitter.php', 'twitter_expire');
  79         register_hook('prepare_body', 'addon/twitter/twitter.php', 'twitter_prepare_body');
  80         register_hook('check_item_notification','addon/twitter/twitter.php', 'twitter_check_item_notification');
  81         logger("installed twitter");
  82 }
  83
  84
  85 function twitter_uninstall() {
  86         unregister_hook('connector_settings', 'addon/twitter/twitter.php', 'twitter_settings');
  87         unregister_hook('connector_settings_post', 'addon/twitter/twitter.php', 'twitter_settings_post');
  88         unregister_hook('post_local', 'addon/twitter/twitter.php', 'twitter_post_local');
  89         unregister_hook('notifier_normal', 'addon/twitter/twitter.php', 'twitter_post_hook');
  90         unregister_hook('jot_networks', 'addon/twitter/twitter.php', 'twitter_jot_nets');
  91         unregister_hook('cron', 'addon/twitter/twitter.php', 'twitter_cron');
  92         unregister_hook('queue_predeliver', 'addon/twitter/twitter.php', 'twitter_queue_hook');
  93         unregister_hook('follow', 'addon/twitter/twitter.php', 'twitter_follow');
  94         unregister_hook('expire', 'addon/twitter/twitter.php', 'twitter_expire');
  95         unregister_hook('prepare_body', 'addon/twitter/twitter.php', 'twitter_prepare_body');
  96         unregister_hook('check_item_notification','addon/twitter/twitter.php', 'twitter_check_item_notification');
  97
  98         // old setting - remove only
  99         unregister_hook('post_local_end', 'addon/twitter/twitter.php', 'twitter_post_hook');
 100         unregister_hook('plugin_settings', 'addon/twitter/twitter.php', 'twitter_settings');
 101         unregister_hook('plugin_settings_post', 'addon/twitter/twitter.php', 'twitter_settings_post');
 102
 103 }
 104
 105 function twitter_check_item_notification($a, &$notification_data) {
 106         $own_id = get_pconfig($notification_data["uid"], 'twitter', 'own_id');
 107
 108         $own_user = q("SELECT `url` FROM `contact` WHERE `uid` = %d AND `alias` = '%s' LIMIT 1",
 109                         intval($notification_data["uid"]),
 110                         dbesc("twitter::".$own_id)
 111                 );
 112
 113         if ($own_user)
 114                 $notification_data["profiles"][] = $own_user[0]["url"];
 115 }
 116
 117 function twitter_follow($a, &$contact) {
 118
 119         logger("twitter_follow: Check if contact is twitter contact. ".$contact["url"], LOGGER_DEBUG);
 120
 121         if (!strstr($contact["url"], "://twitter.com") AND !strstr($contact["url"], "@twitter.com"))
 122                 return;
 123
 124         // contact seems to be a twitter contact, so continue
 125         $nickname = preg_replace("=https?://twitter.com/(.*)=ism", "$1", $contact["url"]);
 126         $nickname = str_replace("@twitter.com", "", $nickname);
 127
 128         $uid = $a->user["uid"];
 129
 130         $ckey    = get_config('twitter', 'consumerkey');
 131         $csecret = get_config('twitter', 'consumersecret');
 132         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
 133         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
 134
 135         require_once("addon/twitter/codebird.php");
 136
 137         $cb = \Codebird\Codebird::getInstance();
 138         $cb->setConsumerKey($ckey, $csecret);
 139         $cb->setToken($otoken, $osecret);
 140
 141         $parameters = array();
 142         $parameters["screen_name"] = $nickname;
 143
 144         $user = $cb->friendships_create($parameters);
 145
 146         twitter_fetchuser($a, $uid, $nickname);
 147
 148         $r = q("SELECT name,nick,url,addr,batch,notify,poll,request,confirm,poco,photo,priority,network,alias,pubkey
 149                 FROM `contact` WHERE `uid` = %d AND `nick` = '%s'",
 150                                 intval($uid),
 151                                 dbesc($nickname));
 152         if (count($r))
 153                 $contact["contact"] = $r[0];
 154 }
 155
 156 function twitter_jot_nets(&$a,&$b) {
 157         if(! local_user())
 158                 return;
 159
 160         $tw_post = get_pconfig(local_user(),'twitter','post');
 161         if(intval($tw_post) == 1) {
 162                 $tw_defpost = get_pconfig(local_user(),'twitter','post_by_default');
 163                 $selected = ((intval($tw_defpost) == 1) ? ' checked="checked" ' : '');
 164                 $b .= '<div class="profile-jot-net"><input type="checkbox" name="twitter_enable"' . $selected . ' value="1" /> '
 165                         . t('Post to Twitter') . '</div>';
 166         }
 167 }
 168
 169 function twitter_settings_post ($a,$post) {
 170         if(! local_user())
 171                 return;
 172         // don't check twitter settings if twitter submit button is not clicked
 173         if (!x($_POST,'twitter-submit'))
 174                 return;
 175
 176         if (isset($_POST['twitter-disconnect'])) {
 177                 /***
 178                  * if the twitter-disconnect checkbox is set, clear the OAuth key/secret pair
 179                  * from the user configuration
 180                  */
 181                 del_pconfig(local_user(), 'twitter', 'consumerkey');
 182                 del_pconfig(local_user(), 'twitter', 'consumersecret');
 183                 del_pconfig(local_user(), 'twitter', 'oauthtoken');
 184                 del_pconfig(local_user(), 'twitter', 'oauthsecret');
 185                 del_pconfig(local_user(), 'twitter', 'post');
 186                 del_pconfig(local_user(), 'twitter', 'post_by_default');
 187                 del_pconfig(local_user(), 'twitter', 'lastid');
 188                 del_pconfig(local_user(), 'twitter', 'mirror_posts');
 189                 del_pconfig(local_user(), 'twitter', 'import');
 190                 del_pconfig(local_user(), 'twitter', 'create_user');
 191                 del_pconfig(local_user(), 'twitter', 'own_id');
 192         } else {
 193         if (isset($_POST['twitter-pin'])) {
 194                 //  if the user supplied us with a PIN from Twitter, let the magic of OAuth happen
 195                 logger('got a Twitter PIN');
 196                 require_once('library/twitteroauth.php');
 197                 $ckey    = get_config('twitter', 'consumerkey');
 198                 $csecret = get_config('twitter', 'consumersecret');
 199                 //  the token and secret for which the PIN was generated were hidden in the settings
 200                 //  form as token and token2, we need a new connection to Twitter using these token
 201                 //  and secret to request a Access Token with the PIN
 202                 $connection = new TwitterOAuth($ckey, $csecret, $_POST['twitter-token'], $_POST['twitter-token2']);
 203                 $token   = $connection->getAccessToken( $_POST['twitter-pin'] );
 204                 //  ok, now that we have the Access Token, save them in the user config
 205                 set_pconfig(local_user(),'twitter', 'oauthtoken',  $token['oauth_token']);
 206                 set_pconfig(local_user(),'twitter', 'oauthsecret', $token['oauth_token_secret']);
 207                 set_pconfig(local_user(),'twitter', 'post', 1);
 208                 //  reload the Addon Settings page, if we don't do it see Bug #42
 209                 goaway($a->get_baseurl().'/settings/connectors');
 210         } else {
 211                 //  if no PIN is supplied in the POST variables, the user has changed the setting
 212                 //  to post a tweet for every new __public__ posting to the wall
 213                 set_pconfig(local_user(),'twitter','post',intval($_POST['twitter-enable']));
 214                 set_pconfig(local_user(),'twitter','post_by_default',intval($_POST['twitter-default']));
 215                 set_pconfig(local_user(), 'twitter', 'mirror_posts', intval($_POST['twitter-mirror']));
 216                 set_pconfig(local_user(), 'twitter', 'import', intval($_POST['twitter-import']));
 217                 set_pconfig(local_user(), 'twitter', 'create_user', intval($_POST['twitter-create_user']));
 218
 219                 if (!intval($_POST['twitter-mirror']))
 220                         del_pconfig(local_user(),'twitter','lastid');
 221
 222                 info(t('Twitter settings updated.') . EOL);
 223         }}
 224 }
 225 function twitter_settings(&$a,&$s) {
 226         if(! local_user())
 227                 return;
 228         $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/twitter/twitter.css' . '" media="all" />' . "\r\n";
 229         /***
 230          * 1) Check that we have global consumer key & secret
 231          * 2) If no OAuthtoken & stuff is present, generate button to get some
 232          * 3) Checkbox for "Send public notices (140 chars only)
 233          */
 234         $ckey    = get_config('twitter', 'consumerkey' );
 235         $csecret = get_config('twitter', 'consumersecret' );
 236         $otoken  = get_pconfig(local_user(), 'twitter', 'oauthtoken'  );
 237         $osecret = get_pconfig(local_user(), 'twitter', 'oauthsecret' );
 238         $enabled = get_pconfig(local_user(), 'twitter', 'post');
 239         $checked = (($enabled) ? ' checked="checked" ' : '');
 240         $defenabled = get_pconfig(local_user(),'twitter','post_by_default');
 241         $defchecked = (($defenabled) ? ' checked="checked" ' : '');
 242         $mirrorenabled = get_pconfig(local_user(),'twitter','mirror_posts');
 243         $mirrorchecked = (($mirrorenabled) ? ' checked="checked" ' : '');
 244         $importenabled = get_pconfig(local_user(),'twitter','import');
 245         $importchecked = (($importenabled) ? ' checked="checked" ' : '');
 246         $create_userenabled = get_pconfig(local_user(),'twitter','create_user');
 247         $create_userchecked = (($create_userenabled) ? ' checked="checked" ' : '');
 248
 249         $css = (($enabled) ? '' : '-disabled');
 250
 251         $s .= '<span id="settings_twitter_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_twitter_expanded\'); openClose(\'settings_twitter_inflated\');">';
 252         $s .= '<img class="connector'.$css.'" src="images/twitter.png" /><h3 class="connector">'. t('Twitter Import/Export/Mirror').'</h3>';
 253         $s .= '</span>';
 254         $s .= '<div id="settings_twitter_expanded" class="settings-block" style="display: none;">';
 255         $s .= '<span class="fakelink" onclick="openClose(\'settings_twitter_expanded\'); openClose(\'settings_twitter_inflated\');">';
 256         $s .= '<img class="connector'.$css.'" src="images/twitter.png" /><h3 class="connector">'. t('Twitter Import/Export/Mirror').'</h3>';
 257         $s .= '</span>';
 258
 259         if ( (!$ckey) && (!$csecret) ) {
 260                 /***
 261                  * no global consumer keys
 262                  * display warning and skip personal config
 263                  */
 264                 $s .= '<p>'. t('No consumer key pair for Twitter found. Please contact your site administrator.') .'</p>';
 265         } else {
 266                 /***
 267                  * ok we have a consumer key pair now look into the OAuth stuff
 268                  */
 269                 if ( (!$otoken) && (!$osecret) ) {
 270                         /***
 271                          * the user has not yet connected the account to twitter...
 272                          * get a temporary OAuth key/secret pair and display a button with
 273                          * which the user can request a PIN to connect the account to a
 274                          * account at Twitter.
 275                          */
 276                         require_once('library/twitteroauth.php');
 277                         $connection = new TwitterOAuth($ckey, $csecret);
 278                         $request_token = $connection->getRequestToken();
 279                         $token = $request_token['oauth_token'];
 280                         /***
 281                          *  make some nice form
 282                          */
 283                         $s .= '<p>'. t('At this Friendica instance the Twitter plugin was enabled but you have not yet connected your account to your Twitter account. To do so click the button below to get a PIN from Twitter which you have to copy into the input box below and submit the form. Only your <strong>public</strong> posts will be posted to Twitter.') .'</p>';
 284                         $s .= '<a href="'.$connection->getAuthorizeURL($token).'" target="_twitter"><img src="addon/twitter/lighter.png" alt="'.t('Log in with Twitter').'"></a>';
 285                         $s .= '<div id="twitter-pin-wrapper">';
 286                         $s .= '<label id="twitter-pin-label" for="twitter-pin">'. t('Copy the PIN from Twitter here') .'</label>';
 287                         $s .= '<input id="twitter-pin" type="text" name="twitter-pin" />';
 288                         $s .= '<input id="twitter-token" type="hidden" name="twitter-token" value="'.$token.'" />';
 289                         $s .= '<input id="twitter-token2" type="hidden" name="twitter-token2" value="'.$request_token['oauth_token_secret'].'" />';
 290             $s .= '</div><div class="clear"></div>';
 291             $s .= '<div class="settings-submit-wrapper" ><input type="submit" name="twitter-submit" class="settings-submit" value="' . t('Save Settings') . '" /></div>';
 292                 } else {
 293                         /***
 294                          *  we have an OAuth key / secret pair for the user
 295                          *  so let's give a chance to disable the postings to Twitter
 296                          */
 297                         require_once('library/twitteroauth.php');
 298                         $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
 299                         $details = $connection->get('account/verify_credentials');
 300                         $s .= '<div id="twitter-info" ><img id="twitter-avatar" src="'.$details->profile_image_url.'" /><p id="twitter-info-block">'. t('Currently connected to: ') .'<a href="https://twitter.com/'.$details->screen_name.'" target="_twitter">'.$details->screen_name.'</a><br /><em>'.$details->description.'</em></p></div>';
 301                         $s .= '<p>'. t('If enabled all your <strong>public</strong> postings can be posted to the associated Twitter account. You can choose to do so by default (here) or for every posting separately in the posting options when writing the entry.') .'</p>';
 302                         if ($a->user['hidewall']) {
 303                             $s .= '<p>'. t('<strong>Note</strong>: Due your privacy settings (<em>Hide your profile details from unknown viewers?</em>) the link potentially included in public postings relayed to Twitter will lead the visitor to a blank page informing the visitor that the access to your profile has been restricted.') .'</p>';
 304                         }
 305                         $s .= '<div id="twitter-enable-wrapper">';
 306                         $s .= '<label id="twitter-enable-label" for="twitter-checkbox">'. t('Allow posting to Twitter'). '</label>';
 307                         $s .= '<input id="twitter-checkbox" type="checkbox" name="twitter-enable" value="1" ' . $checked . '/>';
 308                         $s .= '<div class="clear"></div>';
 309                         $s .= '<label id="twitter-default-label" for="twitter-default">'. t('Send public postings to Twitter by default') .'</label>';
 310                         $s .= '<input id="twitter-default" type="checkbox" name="twitter-default" value="1" ' . $defchecked . '/>';
 311                         $s .= '<div class="clear"></div>';
 312
 313                         $s .= '<label id="twitter-mirror-label" for="twitter-mirror">'.t('Mirror all posts from twitter that are no replies').'</label>';
 314                         $s .= '<input id="twitter-mirror" type="checkbox" name="twitter-mirror" value="1" '. $mirrorchecked . '/>';
 315                         $s .= '<div class="clear"></div>';
 316                         $s .= '</div>';
 317
 318                         $s .= '<label id="twitter-import-label" for="twitter-import">'.t('Import the remote timeline').'</label>';
 319                         $s .= '<input id="twitter-import" type="checkbox" name="twitter-import" value="1" '. $importchecked . '/>';
 320                         $s .= '<div class="clear"></div>';
 321
 322                         $s .= '<label id="twitter-create_user-label" for="twitter-create_user">'.t('Automatically create contacts').'</label>';
 323                         $s .= '<input id="twitter-create_user" type="checkbox" name="twitter-create_user" value="1" '. $create_userchecked . '/>';
 324                         $s .= '<div class="clear"></div>';
 325
 326                         $s .= '<div id="twitter-disconnect-wrapper">';
 327                         $s .= '<label id="twitter-disconnect-label" for="twitter-disconnect">'. t('Clear OAuth configuration') .'</label>';
 328                         $s .= '<input id="twitter-disconnect" type="checkbox" name="twitter-disconnect" value="1" />';
 329                         $s .= '</div><div class="clear"></div>';
 330                         $s .= '<div class="settings-submit-wrapper" ><input type="submit" name="twitter-submit" class="settings-submit" value="' . t('Save Settings') . '" /></div>';
 331                 }
 332         }
 333         $s .= '</div><div class="clear"></div>';
 334 }
 335
 336
 337 function twitter_post_local(&$a,&$b) {
 338
 339         if($b['edit'])
 340                 return;
 341
 342         if((local_user()) && (local_user() == $b['uid']) && (! $b['private']) && (! $b['parent']) ) {
 343
 344                 $twitter_post = intval(get_pconfig(local_user(),'twitter','post'));
 345                 $twitter_enable = (($twitter_post && x($_REQUEST,'twitter_enable')) ? intval($_REQUEST['twitter_enable']) : 0);
 346
 347                 // if API is used, default to the chosen settings
 348                 if($_REQUEST['api_source'] && intval(get_pconfig(local_user(),'twitter','post_by_default')))
 349                         $twitter_enable = 1;
 350
 351         if(! $twitter_enable)
 352                 return;
 353
 354         if(strlen($b['postopts']))
 355                 $b['postopts'] .= ',';
 356                 $b['postopts'] .= 'twitter';
 357         }
 358 }
 359
 360 function twitter_action($a, $uid, $pid, $action) {
 361
 362         $ckey    = get_config('twitter', 'consumerkey');
 363         $csecret = get_config('twitter', 'consumersecret');
 364         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
 365         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
 366
 367         require_once("addon/twitter/codebird.php");
 368
 369         $cb = \Codebird\Codebird::getInstance();
 370         $cb->setConsumerKey($ckey, $csecret);
 371         $cb->setToken($otoken, $osecret);
 372
 373         $post = array('id' => $pid);
 374
 375         logger("twitter_action '".$action."' ID: ".$pid." data: " . print_r($post, true), LOGGER_DATA);
 376
 377         switch ($action) {
 378                 case "delete":
 379                         // To-Do: $result = $cb->statuses_destroy($post);
 380                         break;
 381                 case "like":
 382                         $result = $cb->favorites_create($post);
 383                         break;
 384                 case "unlike":
 385                         $result = $cb->favorites_destroy($post);
 386                         break;
 387         }
 388         logger("twitter_action '".$action."' send, result: " . print_r($result, true), LOGGER_DEBUG);
 389 }
 390
 391 function twitter_post_hook(&$a,&$b) {
 392
 393         /**
 394          * Post to Twitter
 395          */
 396
 397         require_once("include/network.php");
 398
 399         if (!get_pconfig($b["uid"],'twitter','import')) {
 400                 if($b['deleted'] || $b['private'] || ($b['created'] !== $b['edited']))
 401                         return;
 402         }
 403
 404         if($b['parent'] != $b['id']) {
 405                 logger("twitter_post_hook: parameter ".print_r($b, true), LOGGER_DATA);
 406
 407                 // Looking if its a reply to a twitter post
 408                 if ((substr($b["parent-uri"], 0, 9) != "twitter::") AND (substr($b["extid"], 0, 9) != "twitter::") AND (substr($b["thr-parent"], 0, 9) != "twitter::")) {
 409                         logger("twitter_post_hook: no twitter post ".$b["parent"]);
 410                         return;
 411                 }
 412
 413                 $r = q("SELECT * FROM item WHERE item.uri = '%s' AND item.uid = %d LIMIT 1",
 414                         dbesc($b["thr-parent"]),
 415                         intval($b["uid"]));
 416
 417                 if(!count($r)) {
 418                         logger("twitter_post_hook: no parent found ".$b["thr-parent"]);
 419                         return;
 420                 } else {
 421                         $iscomment = true;
 422                         $orig_post = $r[0];
 423                 }
 424
 425
 426                 $nicknameplain = preg_replace("=https?://twitter.com/(.*)=ism", "$1", $orig_post["author-link"]);
 427                 $nickname = "@[url=".$orig_post["author-link"]."]".$nicknameplain."[/url]";
 428                 $nicknameplain = "@".$nicknameplain;
 429
 430                 logger("twitter_post_hook: comparing ".$nickname." and ".$nicknameplain." with ".$b["body"], LOGGER_DEBUG);
 431                 if ((strpos($b["body"], $nickname) === false) AND (strpos($b["body"], $nicknameplain) === false))
 432                         $b["body"] = $nickname." ".$b["body"];
 433
 434                 logger("twitter_post_hook: parent found ".print_r($orig_post, true), LOGGER_DATA);
 435         } else {
 436                 $iscomment = false;
 437
 438                 if($b['private'] OR !strstr($b['postopts'],'twitter'))
 439                         return;
 440         }
 441
 442         if (($b['verb'] == ACTIVITY_POST) AND $b['deleted'])
 443                 twitter_action($a, $b["uid"], substr($orig_post["uri"], 9), "delete");
 444
 445         if($b['verb'] == ACTIVITY_LIKE) {
 446                 logger("twitter_post_hook: parameter 2 ".substr($b["thr-parent"], 9), LOGGER_DEBUG);
 447                 if ($b['deleted'])
 448                         twitter_action($a, $b["uid"], substr($b["thr-parent"], 9), "unlike");
 449                 else
 450                         twitter_action($a, $b["uid"], substr($b["thr-parent"], 9), "like");
 451                 return;
 452         }
 453
 454         if($b['deleted'] || ($b['created'] !== $b['edited']))
 455                 return;
 456
 457         // if post comes from twitter don't send it back
 458         if($b['extid'] == NETWORK_TWITTER)
 459                 return;
 460
 461         if($b['app'] == "Twitter")
 462                 return;
 463
 464         logger('twitter post invoked');
 465
 466
 467         load_pconfig($b['uid'], 'twitter');
 468
 469         $ckey    = get_config('twitter', 'consumerkey');
 470         $csecret = get_config('twitter', 'consumersecret');
 471         $otoken  = get_pconfig($b['uid'], 'twitter', 'oauthtoken');
 472         $osecret = get_pconfig($b['uid'], 'twitter', 'oauthsecret');
 473
 474         if($ckey && $csecret && $otoken && $osecret) {
 475                 logger('twitter: we have customer key and oauth stuff, going to send.', LOGGER_DEBUG);
 476
 477                 // If it's a repeated message from twitter then do a native retweet and exit
 478                 if (twitter_is_retweet($a, $b['uid'], $b['body']))
 479                         return;
 480
 481                 require_once('library/twitteroauth.php');
 482                 require_once('include/bbcode.php');
 483                 $tweet = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
 484
 485                 $max_char = 140;
 486                 require_once("include/plaintext.php");
 487                 $msgarr = plaintext($a, $b, $max_char, true, 8);
 488                 $msg = $msgarr["text"];
 489
 490                 if (($msg == "") AND isset($msgarr["title"]))
 491                         $msg = shortenmsg($msgarr["title"], $max_char - 50);
 492
 493                 $image = "";
 494
 495                 if (isset($msgarr["url"]) AND ($msgarr["type"] != "photo"))
 496                         $msg .= "\n".$msgarr["url"];
 497                 elseif (isset($msgarr["image"]) AND ($msgarr["type"] != "video"))
 498                         $image = $msgarr["image"];
 499
 500                 // and now tweet it :-)
 501                 if(strlen($msg) and ($image != "")) {
 502                         $img_str = fetch_url($image);
 503
 504                         $tempfile = tempnam(get_temppath(), "cache");
 505                         file_put_contents($tempfile, $img_str);
 506
 507                         // Twitter had changed something so that the old library doesn't work anymore
 508                         // so we are using a new library for twitter
 509                         // To-Do:
 510                         // Switching completely to this library with all functions
 511                         require_once("addon/twitter/codebird.php");
 512
 513                         $cb = \Codebird\Codebird::getInstance();
 514                         $cb->setConsumerKey($ckey, $csecret);
 515                         $cb->setToken($otoken, $osecret);
 516
 517                         $post = array('status' => $msg, 'media[]' => $tempfile);
 518
 519                         if ($iscomment)
 520                                 $post["in_reply_to_status_id"] = substr($orig_post["uri"], 9);
 521
 522                         $result = $cb->statuses_updateWithMedia($post);
 523                         unlink($tempfile);
 524
 525                         logger('twitter_post_with_media send, result: ' . print_r($result, true), LOGGER_DEBUG);
 526
 527                         if ($result->source)
 528                                 set_config("twitter", "application_name", strip_tags($result->source));
 529
 530                         if ($result->errors OR $result->error) {
 531                                 logger('Send to Twitter failed: "' . print_r($result->errors, true) . '"');
 532
 533                                 // Workaround: Remove the picture link so that the post can be reposted without it
 534                                 $msg .= " ".$image;
 535                                 $image = "";
 536                         } elseif ($iscomment) {
 537                                 logger('twitter_post: Update extid '.$result->id_str." for post id ".$b['id']);
 538                                 q("UPDATE `item` SET `extid` = '%s', `body` = '%s' WHERE `id` = %d",
 539                                         dbesc("twitter::".$result->id_str),
 540                                         dbesc($result->text),
 541                                         intval($b['id'])
 542                                 );
 543                         }
 544                 }
 545
 546                 if(strlen($msg) and ($image == "")) {
 547                         $url = 'statuses/update';
 548                         $post = array('status' => $msg);
 549
 550                         if ($iscomment)
 551                                 $post["in_reply_to_status_id"] = substr($orig_post["uri"], 9);
 552
 553                         $result = $tweet->post($url, $post);
 554                         logger('twitter_post send, result: ' . print_r($result, true), LOGGER_DEBUG);
 555
 556                         if ($result->source)
 557                                 set_config("twitter", "application_name", strip_tags($result->source));
 558
 559                         if ($result->errors) {
 560                                 logger('Send to Twitter failed: "' . print_r($result->errors, true) . '"');
 561
 562                                 $r = q("SELECT `id` FROM `contact` WHERE `uid` = %d AND `self`", intval($b['uid']));
 563                                 if (count($r))
 564                                         $a->contact = $r[0]["id"];
 565
 566                                 $s = serialize(array('url' => $url, 'item' => $b['id'], 'post' => $post));
 567                                 require_once('include/queue_fn.php');
 568                                 add_to_queue($a->contact,NETWORK_TWITTER,$s);
 569                                 notice(t('Twitter post failed. Queued for retry.').EOL);
 570                         } elseif ($iscomment) {
 571                                 logger('twitter_post: Update extid '.$result->id_str." for post id ".$b['id']);
 572                                 q("UPDATE `item` SET `extid` = '%s' WHERE `id` = %d",
 573                                         dbesc("twitter::".$result->id_str),
 574                                         intval($b['id'])
 575                                 );
 576                                 //q("UPDATE `item` SET `extid` = '%s', `body` = '%s' WHERE `id` = %d",
 577                                 //      dbesc("twitter::".$result->id_str),
 578                                 //      dbesc($result->text),
 579                                 //      intval($b['id'])
 580                                 //);
 581                         }
 582                 }
 583         }
 584 }
 585
 586 function twitter_plugin_admin_post(&$a){
 587         $consumerkey    =       ((x($_POST,'consumerkey'))              ? notags(trim($_POST['consumerkey']))   : '');
 588         $consumersecret =       ((x($_POST,'consumersecret'))   ? notags(trim($_POST['consumersecret'])): '');
 589         $applicationname = ((x($_POST, 'applicationname')) ? notags(trim($_POST['applicationname'])):'');
 590         set_config('twitter','consumerkey',$consumerkey);
 591         set_config('twitter','consumersecret',$consumersecret);
 592         //set_config('twitter','application_name',$applicationname);
 593         info( t('Settings updated.'). EOL );
 594 }
 595 function twitter_plugin_admin(&$a, &$o){
 596         $t = get_markup_template( "admin.tpl", "addon/twitter/" );
 597
 598         $o = replace_macros($t, array(
 599                 '$submit' => t('Save Settings'),
 600                                                                 // name, label, value, help, [extra values]
 601                 '$consumerkey' => array('consumerkey', t('Consumer key'),  get_config('twitter', 'consumerkey' ), ''),
 602                 '$consumersecret' => array('consumersecret', t('Consumer secret'),  get_config('twitter', 'consumersecret' ), ''),
 603                 //'$applicationname' => array('applicationname', t('Name of the Twitter Application'), get_config('twitter','application_name'),t('Set this to the exact name you gave the app on twitter.com/apps to avoid mirroring postings from ~friendica back to ~friendica'))
 604         ));
 605 }
 606
 607 function twitter_cron($a,$b) {
 608         $last = get_config('twitter','last_poll');
 609
 610         $poll_interval = intval(get_config('twitter','poll_interval'));
 611         if(! $poll_interval)
 612                 $poll_interval = TWITTER_DEFAULT_POLL_INTERVAL;
 613
 614         if($last) {
 615                 $next = $last + ($poll_interval * 60);
 616                 if($next > time()) {
 617                         logger('twitter: poll intervall not reached');
 618                         return;
 619                 }
 620         }
 621         logger('twitter: cron_start');
 622
 623         $r = q("SELECT * FROM `pconfig` WHERE `cat` = 'twitter' AND `k` = 'mirror_posts' AND `v` = '1' ORDER BY RAND()");
 624         if(count($r)) {
 625                 foreach($r as $rr) {
 626                         logger('twitter: fetching for user '.$rr['uid']);
 627                         twitter_fetchtimeline($a, $rr['uid']);
 628                 }
 629         }
 630
 631         $abandon_days = intval(get_config('system','account_abandon_days'));
 632         if ($abandon_days < 1)
 633                 $abandon_days = 0;
 634
 635         $abandon_limit = date("Y-m-d H:i:s", time() - $abandon_days * 86400);
 636
 637         $r = q("SELECT * FROM `pconfig` WHERE `cat` = 'twitter' AND `k` = 'import' AND `v` = '1' ORDER BY RAND()");
 638         if(count($r)) {
 639                 foreach($r as $rr) {
 640                         if ($abandon_days != 0) {
 641                                 $user = q("SELECT `login_date` FROM `user` WHERE uid=%d AND `login_date` >= '%s'", $rr['uid'], $abandon_limit);
 642                                 if (!count($user)) {
 643                                         logger('abandoned account: timeline from user '.$rr['uid'].' will not be imported');
 644                                         continue;
 645                                 }
 646                         }
 647
 648                         logger('twitter: importing timeline from user '.$rr['uid']);
 649                         twitter_fetchhometimeline($a, $rr["uid"]);
 650
 651 /*
 652                         // To-Do
 653                         // check for new contacts once a day
 654                         $last_contact_check = get_pconfig($rr['uid'],'pumpio','contact_check');
 655                         if($last_contact_check)
 656                                 $next_contact_check = $last_contact_check + 86400;
 657                         else
 658                                 $next_contact_check = 0;
 659
 660                         if($next_contact_check <= time()) {
 661                                 pumpio_getallusers($a, $rr["uid"]);
 662                                 set_pconfig($rr['uid'],'pumpio','contact_check',time());
 663                         }
 664 */
 665
 666                 }
 667         }
 668
 669         logger('twitter: cron_end');
 670
 671         set_config('twitter','last_poll', time());
 672 }
 673
 674 function twitter_expire($a,$b) {
 675
 676         $days = get_config('twitter', 'expire');
 677
 678         if ($days == 0)
 679                 return;
 680
 681         $r = q("DELETE FROM `item` WHERE `deleted` AND `network` = '%s'", dbesc(NETWORK_TWITTER));
 682
 683         require_once("include/items.php");
 684
 685         logger('twitter_expire: expire_start');
 686
 687         $r = q("SELECT * FROM `pconfig` WHERE `cat` = 'twitter' AND `k` = 'import' AND `v` = '1' ORDER BY RAND()");
 688         if(count($r)) {
 689                 foreach($r as $rr) {
 690                         logger('twitter_expire: user '.$rr['uid']);
 691                         item_expire($rr['uid'], $days, NETWORK_TWITTER, true);
 692                 }
 693         }
 694
 695         logger('twitter_expire: expire_end');
 696 }
 697
 698 function twitter_prepare_body(&$a,&$b) {
 699         if ($b["item"]["network"] != NETWORK_TWITTER)
 700                 return;
 701
 702         if ($b["preview"]) {
 703                 $max_char = 140;
 704                 require_once("include/plaintext.php");
 705                 $item = $b["item"];
 706                 $item["plink"] = $a->get_baseurl()."/display/".$a->user["nickname"]."/".$item["parent"];
 707
 708                 $r = q("SELECT `author-link` FROM item WHERE item.uri = '%s' AND item.uid = %d LIMIT 1",
 709                         dbesc($item["thr-parent"]),
 710                         intval(local_user()));
 711
 712                 if(count($r)) {
 713                         $orig_post = $r[0];
 714
 715                         $nicknameplain = preg_replace("=https?://twitter.com/(.*)=ism", "$1", $orig_post["author-link"]);
 716                         $nickname = "@[url=".$orig_post["author-link"]."]".$nicknameplain."[/url]";
 717                         $nicknameplain = "@".$nicknameplain;
 718
 719                         if ((strpos($item["body"], $nickname) === false) AND (strpos($item["body"], $nicknameplain) === false))
 720                                 $item["body"] = $nickname." ".$item["body"];
 721                 }
 722
 723
 724                 $msgarr = plaintext($a, $item, $max_char, true, 8);
 725                 $msg = $msgarr["text"];
 726
 727                 if (isset($msgarr["url"]) AND ($msgarr["type"] != "photo"))
 728                         $msg .= " ".$msgarr["url"];
 729
 730                 if (isset($msgarr["image"]))
 731                         $msg .= " ".$msgarr["image"];
 732
 733                 $b['html'] = nl2br(htmlspecialchars($msg));
 734         }
 735 }
 736
 737 /**
 738  * @brief Build the item array for the mirrored post
 739  *
 740  * @param object $a Application class
 741  * @param integer $uid User id
 742  * @param object $post Twitter object with the post
 743  *
 744  * @return array item data to be posted
 745  */
 746 function twitter_do_mirrorpost($a, $uid, $post) {
 747         $datarray["type"] = "wall";
 748         $datarray["api_source"] = true;
 749         $datarray["profile_uid"] = $uid;
 750         $datarray["extid"] = NETWORK_TWITTER;
 751         $datarray['message_id'] = item_new_uri($a->get_hostname(), $uid, NETWORK_TWITTER.":".$post->id);
 752         $datarray['object'] = json_encode($post);
 753         $datarray["title"] = "";
 754
 755         if (is_object($post->retweeted_status)) {
 756                 // We don't support nested shares, so we mustn't show quotes as shares on retweets
 757                 $item = twitter_createpost($a, $uid, $post->retweeted_status, array('id' => 0), false, false, true);
 758
 759                 $datarray['body'] = "\n".share_header($item['author-name'], $item['author-link'], $item['author-avatar'], "",
 760                                         $item['created'], $item['plink']);
 761
 762                 $datarray['body'] .= $item['body'].'[/share]';
 763         } else {
 764                 $item = twitter_createpost($a, $uid, $post, array('id' => 0), false, false, false);
 765
 766                 $datarray['body'] = $item['body'];
 767         }
 768
 769         $datarray["source"] = $item['app'];
 770         $datarray["verb"] = $item['verb'];
 771
 772         if (isset($item["location"])) {
 773                 $datarray["location"] = $item["location"];
 774         }
 775
 776         if (isset($item["coord"])) {
 777                 $datarray["coord"] = $item["coord"];
 778         }
 779
 780         return $datarray;
 781 }
 782
 783 function twitter_fetchtimeline($a, $uid) {
 784         $ckey    = get_config('twitter', 'consumerkey');
 785         $csecret = get_config('twitter', 'consumersecret');
 786         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
 787         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
 788         $lastid  = get_pconfig($uid, 'twitter', 'lastid');
 789
 790         $application_name  = get_config('twitter', 'application_name');
 791
 792         if ($application_name == "")
 793                 $application_name = $a->get_hostname();
 794
 795         $has_picture = false;
 796
 797         require_once('mod/item.php');
 798         require_once('include/items.php');
 799         require_once('mod/share.php');
 800
 801         require_once('library/twitteroauth.php');
 802         $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
 803
 804         $parameters = array("exclude_replies" => true, "trim_user" => false, "contributor_details" => true, "include_rts" => true, "tweet_mode" => "extended");
 805
 806         $first_time = ($lastid == "");
 807
 808         if ($lastid <> "")
 809                 $parameters["since_id"] = $lastid;
 810
 811         $items = $connection->get('statuses/user_timeline', $parameters);
 812
 813         if (!is_array($items))
 814                 return;
 815
 816         $posts = array_reverse($items);
 817
 818         if (count($posts)) {
 819             foreach ($posts as $post) {
 820                 if ($post->id_str > $lastid) {
 821                         $lastid = $post->id_str;
 822                         set_pconfig($uid, 'twitter', 'lastid', $lastid);
 823                 }
 824
 825                 if ($first_time)
 826                         continue;
 827
 828                 if (!stristr($post->source, $application_name)) {
 829
 830                         $_SESSION["authenticated"] = true;
 831                         $_SESSION["uid"] = $uid;
 832
 833                         $_REQUEST = twitter_do_mirrorpost($a, $uid, $post);
 834
 835                         logger('twitter: posting for user '.$uid);
 836
 837                         item_post($a);
 838                 }
 839             }
 840         }
 841         set_pconfig($uid, 'twitter', 'lastid', $lastid);
 842 }
 843
 844 function twitter_queue_hook(&$a,&$b) {
 845
 846         $qi = q("SELECT * FROM `queue` WHERE `network` = '%s'",
 847                 dbesc(NETWORK_TWITTER)
 848                 );
 849         if(! count($qi))
 850                 return;
 851
 852         require_once('include/queue_fn.php');
 853
 854         foreach($qi as $x) {
 855                 if($x['network'] !== NETWORK_TWITTER)
 856                         continue;
 857
 858                 logger('twitter_queue: run');
 859
 860                 $r = q("SELECT `user`.* FROM `user` LEFT JOIN `contact` on `contact`.`uid` = `user`.`uid`
 861                         WHERE `contact`.`self` = 1 AND `contact`.`id` = %d LIMIT 1",
 862                         intval($x['cid'])
 863                 );
 864                 if(! count($r))
 865                         continue;
 866
 867                 $user = $r[0];
 868
 869                 $ckey    = get_config('twitter', 'consumerkey');
 870                 $csecret = get_config('twitter', 'consumersecret');
 871                 $otoken  = get_pconfig($user['uid'], 'twitter', 'oauthtoken');
 872                 $osecret = get_pconfig($user['uid'], 'twitter', 'oauthsecret');
 873
 874                 $success = false;
 875
 876                 if ($ckey AND $csecret AND $otoken AND $osecret) {
 877
 878                         logger('twitter_queue: able to post');
 879
 880                         $z = unserialize($x['content']);
 881
 882                         require_once("addon/twitter/codebird.php");
 883
 884                         $cb = \Codebird\Codebird::getInstance();
 885                         $cb->setConsumerKey($ckey, $csecret);
 886                         $cb->setToken($otoken, $osecret);
 887
 888                         if ($z['url'] == "statuses/update")
 889                                 $result = $cb->statuses_update($z['post']);
 890
 891                         logger('twitter_queue: post result: ' . print_r($result, true), LOGGER_DEBUG);
 892
 893                         if ($result->errors)
 894                                 logger('twitter_queue: Send to Twitter failed: "' . print_r($result->errors, true) . '"');
 895                         else {
 896                                 $success = true;
 897                                 remove_queue_item($x['id']);
 898                         }
 899                 } else
 900                         logger("twitter_queue: Error getting tokens for user ".$user['uid']);
 901
 902                 if (!$success) {
 903                         logger('twitter_queue: delayed');
 904                         update_queue_time($x['id']);
 905                 }
 906         }
 907 }
 908
 909 function twitter_fix_avatar($avatar) {
 910         require_once("include/Photo.php");
 911
 912         $new_avatar = str_replace("_normal.", ".", $avatar);
 913
 914         $info = get_photo_info($new_avatar);
 915         if (!$info)
 916                 $new_avatar = $avatar;
 917
 918         return $new_avatar;
 919 }
 920
 921 function twitter_fetch_contact($uid, $contact, $create_user) {
 922
 923         if ($contact->id_str == "")
 924                 return(-1);
 925
 926         $avatar = twitter_fix_avatar($contact->profile_image_url_https);
 927
 928         if (function_exists("update_gcontact"))
 929                 update_gcontact(array("url" => "https://twitter.com/".$contact->screen_name,
 930                                 "network" => NETWORK_TWITTER, "photo" => $avatar,  "hide" => true,
 931                                 "name" => $contact->name, "nick" => $contact->screen_name,
 932                                 "location" => $contact->location, "about" => $contact->description,
 933                                 "addr" => $contact->screen_name."@twitter.com", "generation" => 2));
 934         else {
 935                 // Old Code
 936                 $r = q("SELECT id FROM unique_contacts WHERE url='%s' LIMIT 1",
 937                                 dbesc(normalise_link("https://twitter.com/".$contact->screen_name)));
 938
 939                 if (count($r) == 0)
 940                         q("INSERT INTO unique_contacts (url, name, nick, avatar) VALUES ('%s', '%s', '%s', '%s')",
 941                                 dbesc(normalise_link("https://twitter.com/".$contact->screen_name)),
 942                                 dbesc($contact->name),
 943                                 dbesc($contact->screen_name),
 944                                 dbesc($avatar));
 945                 else
 946                         q("UPDATE unique_contacts SET name = '%s', nick = '%s', avatar = '%s' WHERE url = '%s'",
 947                                 dbesc($contact->name),
 948                                 dbesc($contact->screen_name),
 949                                 dbesc($avatar),
 950                                 dbesc(normalise_link("https://twitter.com/".$contact->screen_name)));
 951
 952                 if (DB_UPDATE_VERSION >= "1177")
 953                         q("UPDATE `unique_contacts` SET `location` = '%s', `about` = '%s' WHERE url = '%s'",
 954                                 dbesc($contact->location),
 955                                 dbesc($contact->description),
 956                                 dbesc(normalise_link("https://twitter.com/".$contact->screen_name)));
 957         }
 958
 959         $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `alias` = '%s' LIMIT 1",
 960                 intval($uid), dbesc("twitter::".$contact->id_str));
 961
 962         if(!count($r) AND !$create_user)
 963                 return(0);
 964
 965         if (count($r) AND ($r[0]["readonly"] OR $r[0]["blocked"])) {
 966                 logger("twitter_fetch_contact: Contact '".$r[0]["nick"]."' is blocked or readonly.", LOGGER_DEBUG);
 967                 return(-1);
 968         }
 969
 970         if(!count($r)) {
 971                 // create contact record
 972                 q("INSERT INTO `contact` ( `uid`, `created`, `url`, `nurl`, `addr`, `alias`, `notify`, `poll`,
 973                                         `name`, `nick`, `photo`, `network`, `rel`, `priority`,
 974                                         `writable`, `blocked`, `readonly`, `pending` )
 975                                         VALUES ( %d, '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', %d, %d, %d, 0, 0, 0) ",
 976                         intval($uid),
 977                         dbesc(datetime_convert()),
 978                         dbesc("https://twitter.com/".$contact->screen_name),
 979                         dbesc(normalise_link("https://twitter.com/".$contact->screen_name)),
 980                         dbesc($contact->screen_name."@twitter.com"),
 981                         dbesc("twitter::".$contact->id_str),
 982                         dbesc(''),
 983                         dbesc("twitter::".$contact->id_str),
 984                         dbesc($contact->name),
 985                         dbesc($contact->screen_name),
 986                         dbesc($avatar),
 987                         dbesc(NETWORK_TWITTER),
 988                         intval(CONTACT_IS_FRIEND),
 989                         intval(1),
 990                         intval(1)
 991                 );
 992
 993                 $r = q("SELECT * FROM `contact` WHERE `alias` = '%s' AND `uid` = %d LIMIT 1",
 994                         dbesc("twitter::".$contact->id_str),
 995                         intval($uid)
 996                         );
 997
 998                 if(! count($r))
 999                         return(false);
1000
1001                 $contact_id  = $r[0]['id'];
1002
1003                 $g = q("SELECT def_gid FROM user WHERE uid = %d LIMIT 1",
1004                         intval($uid)
1005                 );
1006
1007                 if($g && intval($g[0]['def_gid'])) {
1008                         require_once('include/group.php');
1009                         group_add_member($uid,'',$contact_id,$g[0]['def_gid']);
1010                 }
1011
1012                 require_once("Photo.php");
1013
1014                 $photos = import_profile_photo($avatar,$uid,$contact_id);
1015
1016                 q("UPDATE `contact` SET `photo` = '%s',
1017                                         `thumb` = '%s',
1018                                         `micro` = '%s',
1019                                         `name-date` = '%s',
1020                                         `uri-date` = '%s',
1021                                         `avatar-date` = '%s'
1022                                 WHERE `id` = %d",
1023                         dbesc($photos[0]),
1024                         dbesc($photos[1]),
1025                         dbesc($photos[2]),
1026                         dbesc(datetime_convert()),
1027                         dbesc(datetime_convert()),
1028                         dbesc(datetime_convert()),
1029                         intval($contact_id)
1030                 );
1031
1032                 if (DB_UPDATE_VERSION >= "1177")
1033                         q("UPDATE `contact` SET `location` = '%s',
1034                                                 `about` = '%s'
1035                                         WHERE `id` = %d",
1036                                 dbesc($contact->location),
1037                                 dbesc($contact->description),
1038                                 intval($contact_id)
1039                         );
1040
1041         } else {
1042                 // update profile photos once every two weeks as we have no notification of when they change.
1043
1044                 //$update_photo = (($r[0]['avatar-date'] < datetime_convert('','','now -2 days')) ? true : false);
1045                 $update_photo = ($r[0]['avatar-date'] < datetime_convert('','','now -12 hours'));
1046
1047                 // check that we have all the photos, this has been known to fail on occasion
1048
1049                 if((! $r[0]['photo']) || (! $r[0]['thumb']) || (! $r[0]['micro']) || ($update_photo)) {
1050
1051                         logger("twitter_fetch_contact: Updating contact ".$contact->screen_name, LOGGER_DEBUG);
1052
1053                         require_once("Photo.php");
1054
1055                         $photos = import_profile_photo($avatar, $uid, $r[0]['id']);
1056
1057                         q("UPDATE `contact` SET `photo` = '%s',
1058                                                 `thumb` = '%s',
1059                                                 `micro` = '%s',
1060                                                 `name-date` = '%s',
1061                                                 `uri-date` = '%s',
1062                                                 `avatar-date` = '%s',
1063                                                 `url` = '%s',
1064                                                 `nurl` = '%s',
1065                                                 `addr` = '%s',
1066                                                 `name` = '%s',
1067                                                 `nick` = '%s'
1068                                         WHERE `id` = %d",
1069                                 dbesc($photos[0]),
1070                                 dbesc($photos[1]),
1071                                 dbesc($photos[2]),
1072                                 dbesc(datetime_convert()),
1073                                 dbesc(datetime_convert()),
1074                                 dbesc(datetime_convert()),
1075                                 dbesc("https://twitter.com/".$contact->screen_name),
1076                                 dbesc(normalise_link("https://twitter.com/".$contact->screen_name)),
1077                                 dbesc($contact->screen_name."@twitter.com"),
1078                                 dbesc($contact->name),
1079                                 dbesc($contact->screen_name),
1080                                 intval($r[0]['id'])
1081                         );
1082
1083                         if (DB_UPDATE_VERSION >= "1177")
1084                                 q("UPDATE `contact` SET `location` = '%s',
1085                                                         `about` = '%s'
1086                                                 WHERE `id` = %d",
1087                                         dbesc($contact->location),
1088                                         dbesc($contact->description),
1089                                         intval($r[0]['id'])
1090                                 );
1091                 }
1092         }
1093
1094         return($r[0]["id"]);
1095 }
1096
1097 function twitter_fetchuser($a, $uid, $screen_name = "", $user_id = "") {
1098         $ckey    = get_config('twitter', 'consumerkey');
1099         $csecret = get_config('twitter', 'consumersecret');
1100         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
1101         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
1102
1103         require_once("addon/twitter/codebird.php");
1104
1105         $cb = \Codebird\Codebird::getInstance();
1106         $cb->setConsumerKey($ckey, $csecret);
1107         $cb->setToken($otoken, $osecret);
1108
1109         $r = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
1110                 intval($uid));
1111
1112         if(count($r)) {
1113                 $self = $r[0];
1114         } else
1115                 return;
1116
1117         $parameters = array();
1118
1119         if ($screen_name != "")
1120                 $parameters["screen_name"] = $screen_name;
1121
1122         if ($user_id != "")
1123                 $parameters["user_id"] = $user_id;
1124
1125         // Fetching user data
1126         $user = $cb->users_show($parameters);
1127
1128         if (!is_object($user))
1129                 return;
1130
1131         $contact_id = twitter_fetch_contact($uid, $user, true);
1132
1133         return $contact_id;
1134 }
1135
1136 function twitter_expand_entities($a, $body, $item, $no_tags = false, $picture) {
1137         require_once("include/oembed.php");
1138         require_once("include/network.php");
1139
1140         $tags = "";
1141
1142         $plain = $body;
1143
1144         if (isset($item->entities->urls)) {
1145                 $type = "";
1146                 $footerurl = "";
1147                 $footerlink = "";
1148                 $footer = "";
1149
1150                 foreach ($item->entities->urls AS $url) {
1151
1152                         $plain = str_replace($url->url, '', $plain);
1153
1154                         if ($url->url AND $url->expanded_url AND $url->display_url) {
1155
1156                                 $expanded_url = original_url($url->expanded_url);
1157
1158                                 $oembed_data = oembed_fetch_url($expanded_url);
1159
1160                                 // Quickfix: Workaround for URL with "[" and "]" in it
1161                                 if (strpos($expanded_url, "[") OR strpos($expanded_url, "]"))
1162                                         $expanded_url = $url->url;
1163
1164                                 if ($type == "")
1165                                         $type = $oembed_data->type;
1166
1167                                 if ($oembed_data->type == "video") {
1168                                         //$body = str_replace($url->url,
1169                                         //              "[video]".$expanded_url."[/video]", $body);
1170                                         //$dontincludemedia = true;
1171                                         $type = $oembed_data->type;
1172                                         $footerurl = $expanded_url;
1173                                         $footerlink = "[url=".$expanded_url."]".$expanded_url."[/url]";
1174
1175                                         $body = str_replace($url->url, $footerlink, $body);
1176                                 //} elseif (($oembed_data->type == "photo") AND isset($oembed_data->url) AND !$dontincludemedia) {
1177                                 } elseif (($oembed_data->type == "photo") AND isset($oembed_data->url)) {
1178                                         $body = str_replace($url->url,
1179                                                         "[url=".$expanded_url."][img]".$oembed_data->url."[/img][/url]",
1180                                                         $body);
1181                                         //$dontincludemedia = true;
1182                                 } elseif ($oembed_data->type != "link")
1183                                         $body = str_replace($url->url,
1184                                                         "[url=".$expanded_url."]".$expanded_url."[/url]",
1185                                                         $body);
1186                                 else {
1187                                         $img_str = fetch_url($expanded_url, true, $redirects, 4);
1188
1189                                         $tempfile = tempnam(get_temppath(), "cache");
1190                                         file_put_contents($tempfile, $img_str);
1191                                         $mime = image_type_to_mime_type(exif_imagetype($tempfile));
1192                                         unlink($tempfile);
1193
1194                                         if (substr($mime, 0, 6) == "image/") {
1195                                                 $type = "photo";
1196                                                 $body = str_replace($url->url, "[img]".$expanded_url."[/img]", $body);
1197                                                 //$dontincludemedia = true;
1198                                         } else {
1199                                                 $type = $oembed_data->type;
1200                                                 $footerurl = $expanded_url;
1201                                                 $footerlink = "[url=".$expanded_url."]".$expanded_url."[/url]";
1202
1203                                                 $body = str_replace($url->url, $footerlink, $body);
1204                                         }
1205                                 }
1206                         }
1207                 }
1208
1209                 if ($footerurl != "")
1210                         $footer = add_page_info($footerurl, false, $picture);
1211
1212                 if (($footerlink != "") AND (trim($footer) != "")) {
1213                         $removedlink = trim(str_replace($footerlink, "", $body));
1214
1215                         if (($removedlink == "") OR strstr($body, $removedlink))
1216                                 $body = $removedlink;
1217
1218                         $body .= $footer;
1219                 }
1220
1221                 if (($footer == "") AND ($picture != ""))
1222                         $body .= "\n\n[img]".$picture."[/img]\n";
1223                 elseif (($footer == "") AND ($picture == ""))
1224                         $body = add_page_info_to_body($body);
1225
1226                 if ($no_tags)
1227                         return array("body" => $body, "tags" => "", "plain" => $plain);
1228
1229                 $tags_arr = array();
1230
1231                 foreach ($item->entities->hashtags AS $hashtag) {
1232                         $url = "#[url=".$a->get_baseurl()."/search?tag=".rawurlencode($hashtag->text)."]".$hashtag->text."[/url]";
1233                         $tags_arr["#".$hashtag->text] = $url;
1234                         $body = str_replace("#".$hashtag->text, $url, $body);
1235                 }
1236
1237                 foreach ($item->entities->user_mentions AS $mention) {
1238                         $url = "@[url=https://twitter.com/".rawurlencode($mention->screen_name)."]".$mention->screen_name."[/url]";
1239                         $tags_arr["@".$mention->screen_name] = $url;
1240                         $body = str_replace("@".$mention->screen_name, $url, $body);
1241                 }
1242
1243                 // it seems as if the entities aren't always covering all mentions. So the rest will be checked here
1244                 $tags = get_tags($body);
1245
1246                 if(count($tags)) {
1247                         foreach($tags as $tag) {
1248                                 if (strstr(trim($tag), " "))
1249                                         continue;
1250
1251                                 if(strpos($tag,'#') === 0) {
1252                                         if(strpos($tag,'[url='))
1253                                                 continue;
1254
1255                                         // don't link tags that are already embedded in links
1256
1257                                         if(preg_match('/\[(.*?)' . preg_quote($tag,'/') . '(.*?)\]/',$body))
1258                                                 continue;
1259                                         if(preg_match('/\[(.*?)\]\((.*?)' . preg_quote($tag,'/') . '(.*?)\)/',$body))
1260                                                 continue;
1261
1262                                         $basetag = str_replace('_',' ',substr($tag,1));
1263                                         $url = '#[url='.$a->get_baseurl().'/search?tag='.rawurlencode($basetag).']'.$basetag.'[/url]';
1264                                         $body = str_replace($tag,$url,$body);
1265                                         $tags_arr["#".$basetag] = $url;
1266                                         continue;
1267                                 } elseif(strpos($tag,'@') === 0) {
1268                                         if(strpos($tag,'[url='))
1269                                                 continue;
1270
1271                                         $basetag = substr($tag,1);
1272                                         $url = '@[url=https://twitter.com/'.rawurlencode($basetag).']'.$basetag.'[/url]';
1273                                         $body = str_replace($tag,$url,$body);
1274                                         $tags_arr["@".$basetag] = $url;
1275                                 }
1276                         }
1277                 }
1278
1279
1280                 $tags = implode($tags_arr, ",");
1281
1282         }
1283         return array("body" => $body, "tags" => $tags, "plain" => $plain);
1284 }
1285
1286 /**
1287  * @brief Fetch media entities and add media links to the body
1288  *
1289  * @param object $post Twitter object with the post
1290  * @param array $postarray Array of the item that is about to be posted
1291  *
1292  * @return $picture string Returns a a single picture string if it isn't a media post
1293  */
1294 function twitter_media_entities($post, &$postarray) {
1295
1296         // There are no media entities? So we quit.
1297         if (!is_array($post->extended_entities->media)) {
1298                 return "";
1299         }
1300
1301         // When the post links to an external page, we only take one picture.
1302         // We only do this when there is exactly one media.
1303         if ((count($post->entities->urls) > 0) AND (count($post->extended_entities->media) == 1)) {
1304                 $picture = "";
1305                 foreach($post->extended_entities->media AS $medium) {
1306                         if (isset($medium->media_url_https)) {
1307                                 $picture = $medium->media_url_https;
1308                                 $postarray['body'] = str_replace($medium->url, "", $postarray['body']);
1309                         }
1310                 }
1311                 return $picture;
1312         }
1313
1314         // This is a pure media post, first search for all media urls
1315         $media = array();
1316         foreach($post->extended_entities->media AS $medium) {
1317                 switch($medium->type) {
1318                         case 'photo':
1319                                 $media[$medium->url] .= "\n[img]".$medium->media_url_https."[/img]";
1320                                 $postarray['object-type'] = ACTIVITY_OBJ_IMAGE;
1321                                 break;
1322                         case 'video':
1323                         case 'animated_gif':
1324                                 $media[$medium->url] .= "\n[img]".$medium->media_url_https."[/img]";
1325                                 $postarray['object-type'] = ACTIVITY_OBJ_VIDEO;
1326                                 if (is_array($medium->video_info->variants)) {
1327                                         $bitrate = 0;
1328                                         // We take the video with the highest bitrate
1329                                         foreach ($medium->video_info->variants AS $variant) {
1330                                                 if (($variant->content_type == "video/mp4") AND ($variant->bitrate >= $bitrate)) {
1331                                                         $media[$medium->url] = "\n[video]".$variant->url."[/video]";
1332                                                         $bitrate = $variant->bitrate;
1333                                                 }
1334                                         }
1335                                 }
1336                                 break;
1337                         // The following code will only be activated for test reasons
1338                         //default:
1339                         //      $postarray['body'] .= print_r($medium, true);
1340                 }
1341         }
1342
1343         // Now we replace the media urls.
1344         foreach ($media AS $key => $value) {
1345                 $postarray['body'] = str_replace($key, "\n".$value."\n", $postarray['body']);
1346         }
1347         return "";
1348 }
1349
1350 function twitter_createpost($a, $uid, $post, $self, $create_user, $only_existing_contact, $noquote) {
1351
1352         $postarray = array();
1353         $postarray['network'] = NETWORK_TWITTER;
1354         $postarray['gravity'] = 0;
1355         $postarray['uid'] = $uid;
1356         $postarray['wall'] = 0;
1357         $postarray['uri'] = "twitter::".$post->id_str;
1358         $postarray['object'] = json_encode($post);
1359
1360         // Don't import our own comments
1361         $r = q("SELECT * FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
1362                         dbesc($postarray['uri']),
1363                         intval($uid)
1364                 );
1365
1366         if (count($r)) {
1367                 logger("Item with extid ".$postarray['uri']." found.", LOGGER_DEBUG);
1368                 return(array());
1369         }
1370
1371         $contactid = 0;
1372
1373         if ($post->in_reply_to_status_id_str != "") {
1374
1375                 $parent = "twitter::".$post->in_reply_to_status_id_str;
1376
1377                 $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
1378                                 dbesc($parent),
1379                                 intval($uid)
1380                         );
1381                 if (count($r)) {
1382                         $postarray['thr-parent'] = $r[0]["uri"];
1383                         $postarray['parent-uri'] = $r[0]["parent-uri"];
1384                         $postarray['parent'] = $r[0]["parent"];
1385                         $postarray['object-type'] = ACTIVITY_OBJ_COMMENT;
1386                 } else {
1387                         $r = q("SELECT * FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
1388                                         dbesc($parent),
1389                                         intval($uid)
1390                                 );
1391                         if (count($r)) {
1392                                 $postarray['thr-parent'] = $r[0]['uri'];
1393                                 $postarray['parent-uri'] = $r[0]['parent-uri'];
1394                                 $postarray['parent'] = $r[0]['parent'];
1395                                 $postarray['object-type'] = ACTIVITY_OBJ_COMMENT;
1396                         } else {
1397                                 $postarray['thr-parent'] = $postarray['uri'];
1398                                 $postarray['parent-uri'] = $postarray['uri'];
1399                                 $postarray['object-type'] = ACTIVITY_OBJ_NOTE;
1400                         }
1401                 }
1402
1403                 // Is it me?
1404                 $own_id = get_pconfig($uid, 'twitter', 'own_id');
1405
1406                 if ($post->user->id_str == $own_id) {
1407                         $r = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
1408                                 intval($uid));
1409
1410                         if(count($r)) {
1411                                 $contactid = $r[0]["id"];
1412
1413                                 $postarray['owner-name'] =  $r[0]["name"];
1414                                 $postarray['owner-link'] = $r[0]["url"];
1415                                 $postarray['owner-avatar'] =  $r[0]["photo"];
1416                         } else {
1417                                 logger("No self contact for user ".$uid, LOGGER_DEBUG);
1418                                 return(array());
1419                         }
1420                 }
1421                 // Don't create accounts of people who just comment something
1422                 $create_user = false;
1423         } else {
1424                 $postarray['parent-uri'] = $postarray['uri'];
1425                 $postarray['object-type'] = ACTIVITY_OBJ_NOTE;
1426         }
1427
1428         if ($contactid == 0) {
1429                 $contactid = twitter_fetch_contact($uid, $post->user, $create_user);
1430
1431                 $postarray['owner-name'] = $post->user->name;
1432                 $postarray['owner-link'] = "https://twitter.com/".$post->user->screen_name;
1433                 $postarray['owner-avatar'] = twitter_fix_avatar($post->user->profile_image_url_https);
1434         }
1435
1436         if(($contactid == 0) AND !$only_existing_contact) {
1437                 $contactid = $self['id'];
1438         } elseif ($contactid <= 0) {
1439                 logger("Contact ID is zero or less than zero.", LOGGER_DEBUG);
1440                 return(array());
1441         }
1442
1443         $postarray['contact-id'] = $contactid;
1444
1445         $postarray['verb'] = ACTIVITY_POST;
1446         $postarray['author-name'] = $postarray['owner-name'];
1447         $postarray['author-link'] = $postarray['owner-link'];
1448         $postarray['author-avatar'] = $postarray['owner-avatar'];
1449         $postarray['plink'] = "https://twitter.com/".$post->user->screen_name."/status/".$post->id_str;
1450         $postarray['app'] = strip_tags($post->source);
1451
1452         if ($post->user->protected) {
1453                 $postarray['private'] = 1;
1454                 $postarray['allow_cid'] = '<' . $self['id'] . '>';
1455         }
1456
1457         if (is_string($post->full_text)) {
1458                 $postarray['body'] = $post->full_text;
1459         } else {
1460                 $postarray['body'] = $post->text;
1461         }
1462
1463         // When the post contains links then use the correct object type
1464         if (count($post->entities->urls) > 0) {
1465                 $postarray['object-type'] = ACTIVITY_OBJ_BOOKMARK;
1466         }
1467
1468         // Search for media links
1469         $picture = twitter_media_entities($post, $postarray);
1470
1471         $converted = twitter_expand_entities($a, $postarray['body'], $post, false, $picture);
1472         $postarray['body'] = $converted["body"];
1473         $postarray['tag'] = $converted["tags"];
1474         $postarray['created'] = datetime_convert('UTC','UTC',$post->created_at);
1475         $postarray['edited'] = datetime_convert('UTC','UTC',$post->created_at);
1476
1477         $statustext = $converted["plain"];
1478
1479         if (is_string($post->place->name)) {
1480                 $postarray["location"] = $post->place->name;
1481         }
1482         if (is_string($post->place->full_name)) {
1483                 $postarray["location"] = $post->place->full_name;
1484         }
1485         if (is_array($post->geo->coordinates)) {
1486                 $postarray["coord"] = $post->geo->coordinates[0]." ".$post->geo->coordinates[1];
1487         }
1488         if (is_array($post->coordinates->coordinates)) {
1489                 $postarray["coord"] = $post->coordinates->coordinates[1]." ".$post->coordinates->coordinates[0];
1490         }
1491         if (is_object($post->retweeted_status)) {
1492                 $retweet = twitter_createpost($a, $uid, $post->retweeted_status, $self, false, false, $noquote);
1493
1494                 $retweet['object'] = $postarray['object'];
1495                 $retweet['private'] = $postarray['private'];
1496                 $retweet['allow_cid'] = $postarray['allow_cid'];
1497                 $retweet['contact-id'] = $postarray['contact-id'];
1498                 $retweet['owner-name'] = $postarray['owner-name'];
1499                 $retweet['owner-link'] = $postarray['owner-link'];
1500                 $retweet['owner-avatar'] = $postarray['owner-avatar'];
1501
1502                 $postarray = $retweet;
1503         }
1504
1505         if (is_object($post->quoted_status) AND !$noquote) {
1506                 $quoted = twitter_createpost($a, $uid, $post->quoted_status, $self, false, false, true);
1507
1508                 $postarray['body'] = $statustext;
1509
1510                 $postarray['body'] .= "\n".share_header($quoted['author-name'], $quoted['author-link'], $quoted['author-avatar'], "",
1511                                                         $quoted['created'], $quoted['plink']);
1512
1513                 $postarray['body'] .= $quoted['body'].'[/share]';
1514         }
1515
1516         return($postarray);
1517 }
1518
1519 function twitter_checknotification($a, $uid, $own_id, $top_item, $postarray) {
1520
1521         // this whole function doesn't seem to work. Needs complete check
1522
1523         $user = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` LIMIT 1",
1524                         intval($uid)
1525                 );
1526
1527         if(!count($user))
1528                 return;
1529
1530         // Is it me?
1531         if (link_compare($user[0]["url"], $postarray['author-link']))
1532                 return;
1533
1534         $own_user = q("SELECT * FROM `contact` WHERE `uid` = %d AND `alias` = '%s' LIMIT 1",
1535                         intval($uid),
1536                         dbesc("twitter::".$own_id)
1537                 );
1538
1539         if(!count($own_user))
1540                 return;
1541
1542         // Is it me from twitter?
1543         if (link_compare($own_user[0]["url"], $postarray['author-link']))
1544                 return;
1545
1546         $myconv = q("SELECT `author-link`, `author-avatar`, `parent` FROM `item` WHERE `parent-uri` = '%s' AND `uid` = %d AND `parent` != 0 AND `deleted` = 0",
1547                         dbesc($postarray['parent-uri']),
1548                         intval($uid)
1549                         );
1550
1551         if(count($myconv)) {
1552
1553                 foreach($myconv as $conv) {
1554                         // now if we find a match, it means we're in this conversation
1555
1556                         if(!link_compare($conv['author-link'],$user[0]["url"]) AND !link_compare($conv['author-link'],$own_user[0]["url"]))
1557                                 continue;
1558
1559                         require_once('include/enotify.php');
1560
1561                         $conv_parent = $conv['parent'];
1562
1563                         notification(array(
1564                                 'type'         => NOTIFY_COMMENT,
1565                                 'notify_flags' => $user[0]['notify-flags'],
1566                                 'language'     => $user[0]['language'],
1567                                 'to_name'      => $user[0]['username'],
1568                                 'to_email'     => $user[0]['email'],
1569                                 'uid'          => $user[0]['uid'],
1570                                 'item'         => $postarray,
1571                                 'link'         => $a->get_baseurl().'/display/'.urlencode(get_item_guid($top_item)),
1572                                 'source_name'  => $postarray['author-name'],
1573                                 'source_link'  => $postarray['author-link'],
1574                                 'source_photo' => $postarray['author-avatar'],
1575                                 'verb'         => ACTIVITY_POST,
1576                                 'otype'        => 'item',
1577                                 'parent'       => $conv_parent,
1578                         ));
1579
1580                         // only send one notification
1581                         break;
1582                 }
1583         }
1584 }
1585
1586 function twitter_fetchparentposts($a, $uid, $post, $connection, $self, $own_id) {
1587         logger("twitter_fetchparentposts: Fetching for user ".$uid." and post ".$post->id_str, LOGGER_DEBUG);
1588
1589         $posts = array();
1590
1591         while ($post->in_reply_to_status_id_str != "") {
1592                 $parameters = array("trim_user" => false, "tweet_mode" => "extended", "id" => $post->in_reply_to_status_id_str);
1593
1594                 $post = $connection->get('statuses/show', $parameters);
1595
1596                 if (!count($post)) {
1597                         logger("twitter_fetchparentposts: Can't fetch post ".$parameters->id, LOGGER_DEBUG);
1598                         break;
1599                 }
1600
1601                 $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
1602                                 dbesc("twitter::".$post->id_str),
1603                                 intval($uid)
1604                         );
1605
1606                 if (count($r))
1607                         break;
1608
1609                 $posts[] = $post;
1610         }
1611
1612         logger("twitter_fetchparentposts: Fetching ".count($posts)." parents", LOGGER_DEBUG);
1613
1614         $posts = array_reverse($posts);
1615
1616         if (count($posts)) {
1617                 foreach ($posts as $post) {
1618                         $postarray = twitter_createpost($a, $uid, $post, $self, false, false, false);
1619
1620                         if (trim($postarray['body']) == "")
1621                                 continue;
1622
1623                         $item = item_store($postarray);
1624                         $postarray["id"] = $item;
1625
1626                         logger('twitter_fetchparentpost: User '.$self["nick"].' posted parent timeline item '.$item);
1627
1628                         if ($item AND !function_exists("check_item_notification"))
1629                                 twitter_checknotification($a, $uid, $own_id, $item, $postarray);
1630                 }
1631         }
1632 }
1633
1634 function twitter_fetchhometimeline($a, $uid) {
1635         $ckey    = get_config('twitter', 'consumerkey');
1636         $csecret = get_config('twitter', 'consumersecret');
1637         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
1638         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
1639         $create_user = get_pconfig($uid, 'twitter', 'create_user');
1640         $mirror_posts = get_pconfig($uid, 'twitter', 'mirror_posts');
1641
1642         logger("twitter_fetchhometimeline: Fetching for user ".$uid, LOGGER_DEBUG);
1643
1644         $application_name  = get_config('twitter', 'application_name');
1645
1646         if ($application_name == "")
1647                 $application_name = $a->get_hostname();
1648
1649         require_once('library/twitteroauth.php');
1650         require_once('include/items.php');
1651
1652         $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
1653
1654         $own_contact = twitter_fetch_own_contact($a, $uid);
1655
1656         $r = q("SELECT * FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
1657                 intval($own_contact),
1658                 intval($uid));
1659
1660         if(count($r)) {
1661                 $own_id = $r[0]["nick"];
1662         } else {
1663                 logger("twitter_fetchhometimeline: Own twitter contact not found for user ".$uid, LOGGER_DEBUG);
1664                 return;
1665         }
1666
1667         $r = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
1668                 intval($uid));
1669
1670         if(count($r)) {
1671                 $self = $r[0];
1672         } else {
1673                 logger("twitter_fetchhometimeline: Own contact not found for user ".$uid, LOGGER_DEBUG);
1674                 return;
1675         }
1676
1677         $u = q("SELECT * FROM user WHERE uid = %d LIMIT 1",
1678                 intval($uid));
1679         if(!count($u)) {
1680                 logger("twitter_fetchhometimeline: Own user not found for user ".$uid, LOGGER_DEBUG);
1681                 return;
1682         }
1683
1684         $parameters = array("exclude_replies" => false, "trim_user" => false, "contributor_details" => true, "include_rts" => true, "tweet_mode" => "extended");
1685         //$parameters["count"] = 200;
1686
1687
1688         // Fetching timeline
1689         $lastid  = get_pconfig($uid, 'twitter', 'lasthometimelineid');
1690
1691         $first_time = ($lastid == "");
1692
1693         if ($lastid <> "")
1694                 $parameters["since_id"] = $lastid;
1695
1696         $items = $connection->get('statuses/home_timeline', $parameters);
1697
1698         if (!is_array($items)) {
1699                 logger("twitter_fetchhometimeline: Error fetching home timeline: ".print_r($items, true), LOGGER_DEBUG);
1700                 return;
1701         }
1702
1703         $posts = array_reverse($items);
1704
1705         logger("twitter_fetchhometimeline: Fetching timeline for user ".$uid." ".sizeof($posts)." items", LOGGER_DEBUG);
1706
1707         if (count($posts)) {
1708                 foreach ($posts as $post) {
1709                         if ($post->id_str > $lastid) {
1710                                 $lastid = $post->id_str;
1711                                 set_pconfig($uid, 'twitter', 'lasthometimelineid', $lastid);
1712                         }
1713
1714                         if ($first_time)
1715                                 continue;
1716
1717                         if (stristr($post->source, $application_name) && $post->user->screen_name == $own_id) {
1718                                 logger("twitter_fetchhometimeline: Skip previously sended post", LOGGER_DEBUG);
1719                                 continue;
1720                         }
1721
1722                         if ($mirror_posts && $post->user->screen_name == $own_id && $post->in_reply_to_status_id_str == "") {
1723                                 logger("twitter_fetchhometimeline: Skip post that will be mirrored", LOGGER_DEBUG);
1724                                 continue;
1725                         }
1726
1727                         if ($post->in_reply_to_status_id_str != "")
1728                                 twitter_fetchparentposts($a, $uid, $post, $connection, $self, $own_id);
1729
1730                         $postarray = twitter_createpost($a, $uid, $post, $self, $create_user, true, false);
1731
1732                         if (trim($postarray['body']) == "")
1733                                 continue;
1734
1735                         $item = item_store($postarray);
1736                         $postarray["id"] = $item;
1737
1738                         logger('twitter_fetchhometimeline: User '.$self["nick"].' posted home timeline item '.$item);
1739
1740                         if ($item AND !function_exists("check_item_notification"))
1741                                 twitter_checknotification($a, $uid, $own_id, $item, $postarray);
1742
1743                 }
1744         }
1745         set_pconfig($uid, 'twitter', 'lasthometimelineid', $lastid);
1746
1747         // Fetching mentions
1748         $lastid  = get_pconfig($uid, 'twitter', 'lastmentionid');
1749
1750         $first_time = ($lastid == "");
1751
1752         if ($lastid <> "")
1753                 $parameters["since_id"] = $lastid;
1754
1755         $items = $connection->get('statuses/mentions_timeline', $parameters);
1756
1757         if (!is_array($items)) {
1758                 logger("twitter_fetchhometimeline: Error fetching mentions: ".print_r($items, true), LOGGER_DEBUG);
1759                 return;
1760         }
1761
1762         $posts = array_reverse($items);
1763
1764         logger("twitter_fetchhometimeline: Fetching mentions for user ".$uid." ".sizeof($posts)." items", LOGGER_DEBUG);
1765
1766         if (count($posts)) {
1767                 foreach ($posts as $post) {
1768                         if ($post->id_str > $lastid)
1769                                 $lastid = $post->id_str;
1770
1771                         if ($first_time)
1772                                 continue;
1773
1774                         if ($post->in_reply_to_status_id_str != "")
1775                                 twitter_fetchparentposts($a, $uid, $post, $connection, $self, $own_id);
1776
1777                         $postarray = twitter_createpost($a, $uid, $post, $self, false, false, false);
1778
1779                         if (trim($postarray['body']) == "")
1780                                 continue;
1781
1782                         $item = item_store($postarray);
1783                         $postarray["id"] = $item;
1784
1785                         if ($item AND function_exists("check_item_notification"))
1786                                 check_item_notification($item, $uid, NOTIFY_TAGSELF);
1787
1788                         if (!isset($postarray["parent"]) OR ($postarray["parent"] == 0))
1789                                 $postarray["parent"] = $item;
1790
1791                         logger('twitter_fetchhometimeline: User '.$self["nick"].' posted mention timeline item '.$item);
1792
1793                         if ($item == 0) {
1794                                 $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
1795                                         dbesc($postarray['uri']),
1796                                         intval($uid)
1797                                 );
1798                                 if (count($r)) {
1799                                         $item = $r[0]['id'];
1800                                         $parent_id = $r[0]['parent'];
1801                                 }
1802                         } else
1803                                 $parent_id = $postarray['parent'];
1804
1805                         if (($item != 0) AND !function_exists("check_item_notification")) {
1806                                 require_once('include/enotify.php');
1807                                 notification(array(
1808                                         'type'         => NOTIFY_TAGSELF,
1809                                         'notify_flags' => $u[0]['notify-flags'],
1810                                         'language'     => $u[0]['language'],
1811                                         'to_name'      => $u[0]['username'],
1812                                         'to_email'     => $u[0]['email'],
1813                                         'uid'          => $u[0]['uid'],
1814                                         'item'         => $postarray,
1815                                         'link'         => $a->get_baseurl().'/display/'.urlencode(get_item_guid($item)),
1816                                         'source_name'  => $postarray['author-name'],
1817                                         'source_link'  => $postarray['author-link'],
1818                                         'source_photo' => $postarray['author-avatar'],
1819                                         'verb'         => ACTIVITY_TAG,
1820                                         'otype'        => 'item',
1821                                         'parent'       => $parent_id
1822                                 ));
1823                         }
1824                 }
1825         }
1826
1827         set_pconfig($uid, 'twitter', 'lastmentionid', $lastid);
1828 }
1829
1830 function twitter_fetch_own_contact($a, $uid) {
1831         $ckey    = get_config('twitter', 'consumerkey');
1832         $csecret = get_config('twitter', 'consumersecret');
1833         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
1834         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
1835
1836         $own_id = get_pconfig($uid, 'twitter', 'own_id');
1837
1838         $contact_id = 0;
1839
1840         if ($own_id == "") {
1841                 require_once('library/twitteroauth.php');
1842
1843                 $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
1844
1845                 // Fetching user data
1846                 $user = $connection->get('account/verify_credentials');
1847
1848                 set_pconfig($uid, 'twitter', 'own_id', $user->id_str);
1849
1850                 $contact_id = twitter_fetch_contact($uid, $user, true);
1851
1852         } else {
1853                 $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `alias` = '%s' LIMIT 1",
1854                         intval($uid), dbesc("twitter::".$own_id));
1855                 if(count($r))
1856                         $contact_id = $r[0]["id"];
1857                 else
1858                         del_pconfig($uid, 'twitter', 'own_id');
1859
1860         }
1861
1862         return($contact_id);
1863 }
1864
1865 function twitter_is_retweet($a, $uid, $body) {
1866         $body = trim($body);
1867
1868         // Skip if it isn't a pure repeated messages
1869         // Does it start with a share?
1870         if (strpos($body, "[share") > 0)
1871                 return(false);
1872
1873         // Does it end with a share?
1874         if (strlen($body) > (strrpos($body, "[/share]") + 8))
1875                 return(false);
1876
1877         $attributes = preg_replace("/\[share(.*?)\]\s?(.*?)\s?\[\/share\]\s?/ism","$1",$body);
1878         // Skip if there is no shared message in there
1879         if ($body == $attributes)
1880                 return(false);
1881
1882         $link = "";
1883         preg_match("/link='(.*?)'/ism", $attributes, $matches);
1884         if ($matches[1] != "")
1885                 $link = $matches[1];
1886
1887         preg_match('/link="(.*?)"/ism', $attributes, $matches);
1888         if ($matches[1] != "")
1889                 $link = $matches[1];
1890
1891         $id = preg_replace("=https?://twitter.com/(.*)/status/(.*)=ism", "$2", $link);
1892         if ($id == $link)
1893                 return(false);
1894
1895         logger('twitter_is_retweet: Retweeting id '.$id.' for user '.$uid, LOGGER_DEBUG);
1896
1897         $ckey    = get_config('twitter', 'consumerkey');
1898         $csecret = get_config('twitter', 'consumersecret');
1899         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
1900         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
1901
1902         require_once('library/twitteroauth.php');
1903         $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
1904
1905         $result = $connection->post('statuses/retweet/'.$id);
1906
1907         logger('twitter_is_retweet: result '.print_r($result, true), LOGGER_DEBUG);
1908
1909         return(!isset($result->errors));
1910 }
1911 ?>