]> git.mxchange.org Git - friendica-addons.git/blob - twitter/twitter.php
0202a30b6cc3ebad97657f7a6e166e2fe041fb0a
[friendica-addons.git] / 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["title"] = "";
753
754         if (is_object($post->retweeted_status)) {
755                 // We don't support nested shares, so we mustn't show quotes as shares on retweets
756                 $item = twitter_createpost($a, $uid, $post, array('id' => 0), false, false, true);
757
758                 $datarray['body'] = "\n".share_header($item['author-name'], $item['author-link'], $item['author-avatar'], "",
759                                         $item['created'], $item['plink']);
760
761                 $datarray['body'] .= $item['body'].'[/share]';
762         } else {
763                 $item = twitter_createpost($a, $uid, $post, array('id' => 0), false, false, false);
764
765                 $datarray['body'] = $item['body'];
766         }
767
768         $datarray["source"] = $item['app'];
769         $datarray["verb"] = $item['verb'];
770
771         if (isset($item["location"])) {
772                 $datarray["location"] = $item["location"];
773         }
774
775         if (isset($item["coord"])) {
776                 $datarray["coord"] = $item["coord"];
777         }
778
779         return $datarray;
780 }
781
782 function twitter_fetchtimeline($a, $uid) {
783         $ckey    = get_config('twitter', 'consumerkey');
784         $csecret = get_config('twitter', 'consumersecret');
785         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
786         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
787         $lastid  = get_pconfig($uid, 'twitter', 'lastid');
788
789         $application_name  = get_config('twitter', 'application_name');
790
791         if ($application_name == "")
792                 $application_name = $a->get_hostname();
793
794         $has_picture = false;
795
796         require_once('mod/item.php');
797         require_once('include/items.php');
798         require_once('mod/share.php');
799
800         require_once('library/twitteroauth.php');
801         $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
802
803         //$parameters = array("exclude_replies" => true, "trim_user" => false, "contributor_details" => true, "include_rts" => true);
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         $r = q("SELECT * FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
1361                         dbesc($postarray['uri']),
1362                         intval($uid)
1363                 );
1364
1365         if (count($r)) {
1366                 return(array());
1367         }
1368
1369         $contactid = 0;
1370
1371         if ($post->in_reply_to_status_id_str != "") {
1372
1373                 $parent = "twitter::".$post->in_reply_to_status_id_str;
1374
1375                 $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
1376                                 dbesc($parent),
1377                                 intval($uid)
1378                         );
1379                 if (count($r)) {
1380                         $postarray['thr-parent'] = $r[0]["uri"];
1381                         $postarray['parent-uri'] = $r[0]["parent-uri"];
1382                         $postarray['parent'] = $r[0]["parent"];
1383                         $postarray['object-type'] = ACTIVITY_OBJ_COMMENT;
1384                 } else {
1385                         $r = q("SELECT * FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
1386                                         dbesc($parent),
1387                                         intval($uid)
1388                                 );
1389                         if (count($r)) {
1390                                 $postarray['thr-parent'] = $r[0]['uri'];
1391                                 $postarray['parent-uri'] = $r[0]['parent-uri'];
1392                                 $postarray['parent'] = $r[0]['parent'];
1393                                 $postarray['object-type'] = ACTIVITY_OBJ_COMMENT;
1394                         } else {
1395                                 $postarray['thr-parent'] = $postarray['uri'];
1396                                 $postarray['parent-uri'] = $postarray['uri'];
1397                                 $postarray['object-type'] = ACTIVITY_OBJ_NOTE;
1398                         }
1399                 }
1400
1401                 // Is it me?
1402                 $own_id = get_pconfig($uid, 'twitter', 'own_id');
1403
1404                 if ($post->user->id_str == $own_id) {
1405                         $r = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
1406                                 intval($uid));
1407
1408                         if(count($r)) {
1409                                 $contactid = $r[0]["id"];
1410
1411                                 $postarray['owner-name'] =  $r[0]["name"];
1412                                 $postarray['owner-link'] = $r[0]["url"];
1413                                 $postarray['owner-avatar'] =  $r[0]["photo"];
1414                         } else {
1415                                 return(array());
1416                         }
1417                 }
1418                 // Don't create accounts of people who just comment something
1419                 $create_user = false;
1420         } else {
1421                 $postarray['parent-uri'] = $postarray['uri'];
1422                 $postarray['object-type'] = ACTIVITY_OBJ_NOTE;
1423         }
1424
1425         if ($contactid == 0) {
1426                 $contactid = twitter_fetch_contact($uid, $post->user, $create_user);
1427
1428                 $postarray['owner-name'] = $post->user->name;
1429                 $postarray['owner-link'] = "https://twitter.com/".$post->user->screen_name;
1430                 $postarray['owner-avatar'] = twitter_fix_avatar($post->user->profile_image_url_https);
1431         }
1432
1433         if(($contactid == 0) AND !$only_existing_contact) {
1434                 $contactid = $self['id'];
1435         } elseif ($contactid <= 0) {
1436                 return(array());
1437         }
1438
1439         $postarray['contact-id'] = $contactid;
1440
1441         $postarray['verb'] = ACTIVITY_POST;
1442         $postarray['author-name'] = $postarray['owner-name'];
1443         $postarray['author-link'] = $postarray['owner-link'];
1444         $postarray['author-avatar'] = $postarray['owner-avatar'];
1445         $postarray['plink'] = "https://twitter.com/".$post->user->screen_name."/status/".$post->id_str;
1446         $postarray['app'] = strip_tags($post->source);
1447
1448         if ($post->user->protected) {
1449                 $postarray['private'] = 1;
1450                 $postarray['allow_cid'] = '<' . $self['id'] . '>';
1451         }
1452
1453         if (is_string($post->full_text)) {
1454                 $postarray['body'] = $post->full_text;
1455         } else {
1456                 $postarray['body'] = $post->text;
1457         }
1458
1459         // When the post contains links then use the correct object type
1460         if (count($post->entities->urls) > 0) {
1461                 $postarray['object-type'] = ACTIVITY_OBJ_BOOKMARK;
1462         }
1463
1464         // Search for media links
1465         $picture = twitter_media_entities($post, $postarray);
1466
1467         $converted = twitter_expand_entities($a, $postarray['body'], $post, false, $picture);
1468         $postarray['body'] = $converted["body"];
1469         $postarray['tag'] = $converted["tags"];
1470         $postarray['created'] = datetime_convert('UTC','UTC',$post->created_at);
1471         $postarray['edited'] = datetime_convert('UTC','UTC',$post->created_at);
1472
1473         $statustext = $converted["plain"];
1474
1475         if (is_string($post->place->name)) {
1476                 $postarray["location"] = $post->place->name;
1477         }
1478         if (is_string($post->place->full_name)) {
1479                 $postarray["location"] = $post->place->full_name;
1480         }
1481         if (is_array($post->geo->coordinates)) {
1482                 $postarray["coord"] = $post->geo->coordinates[0]." ".$post->geo->coordinates[1];
1483         }
1484         if (is_array($post->coordinates->coordinates)) {
1485                 $postarray["coord"] = $post->coordinates->coordinates[1]." ".$post->coordinates->coordinates[0];
1486         }
1487         if (is_object($post->retweeted_status)) {
1488                 $retweet = twitter_createpost($a, $uid, $post->retweeted_status, $self, false, false, $noquote);
1489
1490                 $retweet['object'] = $postarray['object'];
1491                 $retweet['contact-id'] = $postarray['contact-id'];
1492                 $retweet['owner-name'] = $postarray['owner-name'];
1493                 $retweet['owner-link'] = $postarray['owner-link'];
1494                 $retweet['owner-avatar'] = $postarray['owner-avatar'];
1495
1496                 $postarray = $retweet;
1497         }
1498
1499         if (is_object($post->quoted_status) AND !$noquote) {
1500                 $quoted = twitter_createpost($a, $uid, $post->quoted_status, $self, false, false, true);
1501
1502                 $postarray['body'] = $statustext;
1503
1504                 $postarray['body'] .= "\n".share_header($quoted['author-name'], $quoted['author-link'], $quoted['author-avatar'], "",
1505                                                         $quoted['created'], $quoted['plink']);
1506
1507                 $postarray['body'] .= $quoted['body'].'[/share]';
1508         }
1509
1510         return($postarray);
1511 }
1512
1513 function twitter_checknotification($a, $uid, $own_id, $top_item, $postarray) {
1514
1515         // this whole function doesn't seem to work. Needs complete check
1516
1517         $user = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` LIMIT 1",
1518                         intval($uid)
1519                 );
1520
1521         if(!count($user))
1522                 return;
1523
1524         // Is it me?
1525         if (link_compare($user[0]["url"], $postarray['author-link']))
1526                 return;
1527
1528         $own_user = q("SELECT * FROM `contact` WHERE `uid` = %d AND `alias` = '%s' LIMIT 1",
1529                         intval($uid),
1530                         dbesc("twitter::".$own_id)
1531                 );
1532
1533         if(!count($own_user))
1534                 return;
1535
1536         // Is it me from twitter?
1537         if (link_compare($own_user[0]["url"], $postarray['author-link']))
1538                 return;
1539
1540         $myconv = q("SELECT `author-link`, `author-avatar`, `parent` FROM `item` WHERE `parent-uri` = '%s' AND `uid` = %d AND `parent` != 0 AND `deleted` = 0",
1541                         dbesc($postarray['parent-uri']),
1542                         intval($uid)
1543                         );
1544
1545         if(count($myconv)) {
1546
1547                 foreach($myconv as $conv) {
1548                         // now if we find a match, it means we're in this conversation
1549
1550                         if(!link_compare($conv['author-link'],$user[0]["url"]) AND !link_compare($conv['author-link'],$own_user[0]["url"]))
1551                                 continue;
1552
1553                         require_once('include/enotify.php');
1554
1555                         $conv_parent = $conv['parent'];
1556
1557                         notification(array(
1558                                 'type'         => NOTIFY_COMMENT,
1559                                 'notify_flags' => $user[0]['notify-flags'],
1560                                 'language'     => $user[0]['language'],
1561                                 'to_name'      => $user[0]['username'],
1562                                 'to_email'     => $user[0]['email'],
1563                                 'uid'          => $user[0]['uid'],
1564                                 'item'         => $postarray,
1565                                 'link'         => $a->get_baseurl().'/display/'.urlencode(get_item_guid($top_item)),
1566                                 'source_name'  => $postarray['author-name'],
1567                                 'source_link'  => $postarray['author-link'],
1568                                 'source_photo' => $postarray['author-avatar'],
1569                                 'verb'         => ACTIVITY_POST,
1570                                 'otype'        => 'item',
1571                                 'parent'       => $conv_parent,
1572                         ));
1573
1574                         // only send one notification
1575                         break;
1576                 }
1577         }
1578 }
1579
1580 function twitter_fetchparentposts($a, $uid, $post, $connection, $self, $own_id) {
1581         logger("twitter_fetchparentposts: Fetching for user ".$uid." and post ".$post->id_str, LOGGER_DEBUG);
1582
1583         $posts = array();
1584
1585         while ($post->in_reply_to_status_id_str != "") {
1586                 $parameters = array("trim_user" => false, "tweet_mode" => "extended", "id" => $post->in_reply_to_status_id_str);
1587
1588                 $post = $connection->get('statuses/show', $parameters);
1589
1590                 if (!count($post)) {
1591                         logger("twitter_fetchparentposts: Can't fetch post ".$parameters->id, LOGGER_DEBUG);
1592                         break;
1593                 }
1594
1595                 $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
1596                                 dbesc("twitter::".$post->id_str),
1597                                 intval($uid)
1598                         );
1599
1600                 if (count($r))
1601                         break;
1602
1603                 $posts[] = $post;
1604         }
1605
1606         logger("twitter_fetchparentposts: Fetching ".count($posts)." parents", LOGGER_DEBUG);
1607
1608         $posts = array_reverse($posts);
1609
1610         if (count($posts)) {
1611                 foreach ($posts as $post) {
1612                         $postarray = twitter_createpost($a, $uid, $post, $self, false, false, false);
1613
1614                         if (trim($postarray['body']) == "")
1615                                 continue;
1616
1617                         $item = item_store($postarray);
1618                         $postarray["id"] = $item;
1619
1620                         logger('twitter_fetchparentpost: User '.$self["nick"].' posted parent timeline item '.$item);
1621
1622                         if ($item AND !function_exists("check_item_notification"))
1623                                 twitter_checknotification($a, $uid, $own_id, $item, $postarray);
1624                 }
1625         }
1626 }
1627
1628 function twitter_fetchhometimeline($a, $uid) {
1629         $ckey    = get_config('twitter', 'consumerkey');
1630         $csecret = get_config('twitter', 'consumersecret');
1631         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
1632         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
1633         $create_user = get_pconfig($uid, 'twitter', 'create_user');
1634         $mirror_posts = get_pconfig($uid, 'twitter', 'mirror_posts');
1635
1636         logger("twitter_fetchhometimeline: Fetching for user ".$uid, LOGGER_DEBUG);
1637
1638         $application_name  = get_config('twitter', 'application_name');
1639
1640         if ($application_name == "")
1641                 $application_name = $a->get_hostname();
1642
1643         require_once('library/twitteroauth.php');
1644         require_once('include/items.php');
1645
1646         $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
1647
1648         $own_contact = twitter_fetch_own_contact($a, $uid);
1649
1650         $r = q("SELECT * FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
1651                 intval($own_contact),
1652                 intval($uid));
1653
1654         if(count($r)) {
1655                 $own_id = $r[0]["nick"];
1656         } else {
1657                 logger("twitter_fetchhometimeline: Own twitter contact not found for user ".$uid, LOGGER_DEBUG);
1658                 return;
1659         }
1660
1661         $r = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
1662                 intval($uid));
1663
1664         if(count($r)) {
1665                 $self = $r[0];
1666         } else {
1667                 logger("twitter_fetchhometimeline: Own contact not found for user ".$uid, LOGGER_DEBUG);
1668                 return;
1669         }
1670
1671         $u = q("SELECT * FROM user WHERE uid = %d LIMIT 1",
1672                 intval($uid));
1673         if(!count($u)) {
1674                 logger("twitter_fetchhometimeline: Own user not found for user ".$uid, LOGGER_DEBUG);
1675                 return;
1676         }
1677
1678         $parameters = array("exclude_replies" => false, "trim_user" => false, "contributor_details" => true, "include_rts" => true, "tweet_mode" => "extended");
1679         //$parameters["count"] = 200;
1680
1681
1682         // Fetching timeline
1683         $lastid  = get_pconfig($uid, 'twitter', 'lasthometimelineid');
1684
1685         $first_time = ($lastid == "");
1686
1687         if ($lastid <> "")
1688                 $parameters["since_id"] = $lastid;
1689
1690         $items = $connection->get('statuses/home_timeline', $parameters);
1691
1692         if (!is_array($items)) {
1693                 logger("twitter_fetchhometimeline: Error fetching home timeline: ".print_r($items, true), LOGGER_DEBUG);
1694                 return;
1695         }
1696
1697         $posts = array_reverse($items);
1698
1699         logger("twitter_fetchhometimeline: Fetching timeline for user ".$uid." ".sizeof($posts)." items", LOGGER_DEBUG);
1700
1701         if (count($posts)) {
1702                 foreach ($posts as $post) {
1703                         if ($post->id_str > $lastid) {
1704                                 $lastid = $post->id_str;
1705                                 set_pconfig($uid, 'twitter', 'lasthometimelineid', $lastid);
1706                         }
1707
1708                         if ($first_time)
1709                                 continue;
1710
1711                         if (stristr($post->source, $application_name) && $post->user->screen_name == $own_id) {
1712                                 logger("twitter_fetchhometimeline: Skip previously sended post", LOGGER_DEBUG);
1713                                 continue;
1714                         }
1715
1716                         if ($mirror_posts && $post->user->screen_name == $own_id && $post->in_reply_to_status_id_str == "") {
1717                                 logger("twitter_fetchhometimeline: Skip post that will be mirrored", LOGGER_DEBUG);
1718                                 continue;
1719                         }
1720
1721                         if ($post->in_reply_to_status_id_str != "")
1722                                 twitter_fetchparentposts($a, $uid, $post, $connection, $self, $own_id);
1723
1724                         $postarray = twitter_createpost($a, $uid, $post, $self, $create_user, true, false);
1725
1726                         if (trim($postarray['body']) == "")
1727                                 continue;
1728
1729                         $item = item_store($postarray);
1730                         $postarray["id"] = $item;
1731
1732                         logger('twitter_fetchhometimeline: User '.$self["nick"].' posted home timeline item '.$item);
1733
1734                         if ($item AND !function_exists("check_item_notification"))
1735                                 twitter_checknotification($a, $uid, $own_id, $item, $postarray);
1736
1737                 }
1738         }
1739         set_pconfig($uid, 'twitter', 'lasthometimelineid', $lastid);
1740
1741         // Fetching mentions
1742         $lastid  = get_pconfig($uid, 'twitter', 'lastmentionid');
1743
1744         $first_time = ($lastid == "");
1745
1746         if ($lastid <> "")
1747                 $parameters["since_id"] = $lastid;
1748
1749         $items = $connection->get('statuses/mentions_timeline', $parameters);
1750
1751         if (!is_array($items)) {
1752                 logger("twitter_fetchhometimeline: Error fetching mentions: ".print_r($items, true), LOGGER_DEBUG);
1753                 return;
1754         }
1755
1756         $posts = array_reverse($items);
1757
1758         logger("twitter_fetchhometimeline: Fetching mentions for user ".$uid." ".sizeof($posts)." items", LOGGER_DEBUG);
1759
1760         if (count($posts)) {
1761                 foreach ($posts as $post) {
1762                         if ($post->id_str > $lastid)
1763                                 $lastid = $post->id_str;
1764
1765                         if ($first_time)
1766                                 continue;
1767
1768                         if ($post->in_reply_to_status_id_str != "")
1769                                 twitter_fetchparentposts($a, $uid, $post, $connection, $self, $own_id);
1770
1771                         $postarray = twitter_createpost($a, $uid, $post, $self, false, false, false);
1772
1773                         if (trim($postarray['body']) == "")
1774                                 continue;
1775
1776                         $item = item_store($postarray);
1777                         $postarray["id"] = $item;
1778
1779                         if ($item AND function_exists("check_item_notification"))
1780                                 check_item_notification($item, $uid, NOTIFY_TAGSELF);
1781
1782                         if (!isset($postarray["parent"]) OR ($postarray["parent"] == 0))
1783                                 $postarray["parent"] = $item;
1784
1785                         logger('twitter_fetchhometimeline: User '.$self["nick"].' posted mention timeline item '.$item);
1786
1787                         if ($item == 0) {
1788                                 $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
1789                                         dbesc($postarray['uri']),
1790                                         intval($uid)
1791                                 );
1792                                 if (count($r)) {
1793                                         $item = $r[0]['id'];
1794                                         $parent_id = $r[0]['parent'];
1795                                 }
1796                         } else
1797                                 $parent_id = $postarray['parent'];
1798
1799                         if (($item != 0) AND !function_exists("check_item_notification")) {
1800                                 require_once('include/enotify.php');
1801                                 notification(array(
1802                                         'type'         => NOTIFY_TAGSELF,
1803                                         'notify_flags' => $u[0]['notify-flags'],
1804                                         'language'     => $u[0]['language'],
1805                                         'to_name'      => $u[0]['username'],
1806                                         'to_email'     => $u[0]['email'],
1807                                         'uid'          => $u[0]['uid'],
1808                                         'item'         => $postarray,
1809                                         'link'         => $a->get_baseurl().'/display/'.urlencode(get_item_guid($item)),
1810                                         'source_name'  => $postarray['author-name'],
1811                                         'source_link'  => $postarray['author-link'],
1812                                         'source_photo' => $postarray['author-avatar'],
1813                                         'verb'         => ACTIVITY_TAG,
1814                                         'otype'        => 'item',
1815                                         'parent'       => $parent_id
1816                                 ));
1817                         }
1818                 }
1819         }
1820
1821         set_pconfig($uid, 'twitter', 'lastmentionid', $lastid);
1822 }
1823
1824 function twitter_fetch_own_contact($a, $uid) {
1825         $ckey    = get_config('twitter', 'consumerkey');
1826         $csecret = get_config('twitter', 'consumersecret');
1827         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
1828         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
1829
1830         $own_id = get_pconfig($uid, 'twitter', 'own_id');
1831
1832         $contact_id = 0;
1833
1834         if ($own_id == "") {
1835                 require_once('library/twitteroauth.php');
1836
1837                 $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
1838
1839                 // Fetching user data
1840                 $user = $connection->get('account/verify_credentials');
1841
1842                 set_pconfig($uid, 'twitter', 'own_id', $user->id_str);
1843
1844                 $contact_id = twitter_fetch_contact($uid, $user, true);
1845
1846         } else {
1847                 $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `alias` = '%s' LIMIT 1",
1848                         intval($uid), dbesc("twitter::".$own_id));
1849                 if(count($r))
1850                         $contact_id = $r[0]["id"];
1851                 else
1852                         del_pconfig($uid, 'twitter', 'own_id');
1853
1854         }
1855
1856         return($contact_id);
1857 }
1858
1859 function twitter_is_retweet($a, $uid, $body) {
1860         $body = trim($body);
1861
1862         // Skip if it isn't a pure repeated messages
1863         // Does it start with a share?
1864         if (strpos($body, "[share") > 0)
1865                 return(false);
1866
1867         // Does it end with a share?
1868         if (strlen($body) > (strrpos($body, "[/share]") + 8))
1869                 return(false);
1870
1871         $attributes = preg_replace("/\[share(.*?)\]\s?(.*?)\s?\[\/share\]\s?/ism","$1",$body);
1872         // Skip if there is no shared message in there
1873         if ($body == $attributes)
1874                 return(false);
1875
1876         $link = "";
1877         preg_match("/link='(.*?)'/ism", $attributes, $matches);
1878         if ($matches[1] != "")
1879                 $link = $matches[1];
1880
1881         preg_match('/link="(.*?)"/ism', $attributes, $matches);
1882         if ($matches[1] != "")
1883                 $link = $matches[1];
1884
1885         $id = preg_replace("=https?://twitter.com/(.*)/status/(.*)=ism", "$2", $link);
1886         if ($id == $link)
1887                 return(false);
1888
1889         logger('twitter_is_retweet: Retweeting id '.$id.' for user '.$uid, LOGGER_DEBUG);
1890
1891         $ckey    = get_config('twitter', 'consumerkey');
1892         $csecret = get_config('twitter', 'consumersecret');
1893         $otoken  = get_pconfig($uid, 'twitter', 'oauthtoken');
1894         $osecret = get_pconfig($uid, 'twitter', 'oauthsecret');
1895
1896         require_once('library/twitteroauth.php');
1897         $connection = new TwitterOAuth($ckey,$csecret,$otoken,$osecret);
1898
1899         $result = $connection->post('statuses/retweet/'.$id);
1900
1901         logger('twitter_is_retweet: result '.print_r($result, true), LOGGER_DEBUG);
1902
1903         return(!isset($result->errors));
1904 }
1905 ?>