]> git.mxchange.org Git - friendica-addons.git/blob - pumpio/pumpio.php
Merge pull request #312 from annando/1509-pumpio-sync
[friendica-addons.git] / pumpio / pumpio.php
1 <?php
2 /**
3  * Name: pump.io Post Connector
4  * Description: Post to pump.io
5  * Version: 0.2
6  * Author: Michael Vogel <http://pirati.ca/profile/heluecht>
7  */
8 require('addon/pumpio/oauth/http.php');
9 require('addon/pumpio/oauth/oauth_client.php');
10
11 define('PUMPIO_DEFAULT_POLL_INTERVAL', 5); // given in minutes
12
13 function pumpio_install() {
14         register_hook('post_local',           'addon/pumpio/pumpio.php', 'pumpio_post_local');
15         register_hook('notifier_normal',      'addon/pumpio/pumpio.php', 'pumpio_send');
16         register_hook('jot_networks',         'addon/pumpio/pumpio.php', 'pumpio_jot_nets');
17         register_hook('connector_settings',      'addon/pumpio/pumpio.php', 'pumpio_settings');
18         register_hook('connector_settings_post', 'addon/pumpio/pumpio.php', 'pumpio_settings_post');
19         register_hook('cron', 'addon/pumpio/pumpio.php', 'pumpio_cron');
20         register_hook('queue_predeliver', 'addon/pumpio/pumpio.php', 'pumpio_queue_hook');
21 }
22
23 function pumpio_uninstall() {
24         unregister_hook('post_local',       'addon/pumpio/pumpio.php', 'pumpio_post_local');
25         unregister_hook('notifier_normal',  'addon/pumpio/pumpio.php', 'pumpio_send');
26         unregister_hook('jot_networks',     'addon/pumpio/pumpio.php', 'pumpio_jot_nets');
27         unregister_hook('connector_settings',      'addon/pumpio/pumpio.php', 'pumpio_settings');
28         unregister_hook('connector_settings_post', 'addon/pumpio/pumpio.php', 'pumpio_settings_post');
29         unregister_hook('cron', 'addon/pumpio/pumpio.php', 'pumpio_cron');
30         unregister_hook('queue_predeliver', 'addon/pumpio/pumpio.php', 'pumpio_queue_hook');
31 }
32
33 function pumpio_module() {}
34
35 function pumpio_content(&$a) {
36
37         if(! local_user()) {
38                 notice( t('Permission denied.') . EOL);
39                 return '';
40         }
41
42         require_once("mod/settings.php");
43         settings_init($a);
44
45         if (isset($a->argv[1]))
46                 switch ($a->argv[1]) {
47                         case "connect":
48                                 $o = pumpio_connect($a);
49                                 break;
50                         default:
51                                 $o = print_r($a->argv, true);
52                                 break;
53                 }
54         else
55                 $o = pumpio_connect($a);
56
57         return $o;
58 }
59
60 function pumpio_registerclient(&$a, $host) {
61
62         $url = "https://".$host."/api/client/register";
63
64         $params = array();
65
66         $application_name  = get_config('pumpio', 'application_name');
67
68         if ($application_name == "")
69                 $application_name = $a->get_hostname();
70
71         $adminlist = explode(",", str_replace(" ", "", $a->config['admin_email']));
72
73         $params["type"] = "client_associate";
74         $params["contacts"] = $adminlist[0];
75         $params["application_type"] = "native";
76         $params["application_name"] = $application_name;
77         $params["logo_url"] = $a->get_baseurl()."/images/friendica-256.png";
78         $params["redirect_uris"] = $a->get_baseurl()."/pumpio/connect";
79
80         logger("pumpio_registerclient: ".$url." parameters ".print_r($params, true), LOGGER_DEBUG);
81
82         $ch = curl_init($url);
83         curl_setopt($ch, CURLOPT_HEADER, false);
84         curl_setopt($ch, CURLOPT_RETURNTRANSFER,true);
85         curl_setopt($ch, CURLOPT_POST,1);
86         curl_setopt($ch, CURLOPT_POSTFIELDS,$params);
87         curl_setopt($ch, CURLOPT_USERAGENT, "Friendica");
88
89         $s = curl_exec($ch);
90         $curl_info = curl_getinfo($ch);
91
92         if ($curl_info["http_code"] == "200") {
93                 $values = json_decode($s);
94                 logger("pumpio_registerclient: success ".print_r($values, true), LOGGER_DEBUG);
95                 return($values);
96         }
97         logger("pumpio_registerclient: failed: ".print_r($curl_info, true), LOGGER_DEBUG);
98         return(false);
99
100 }
101
102 function pumpio_connect(&$a) {
103         // Start a session.  This is necessary to hold on to  a few keys the callback script will also need
104         session_start();
105
106         // Define the needed keys
107         $consumer_key = get_pconfig(local_user(), 'pumpio','consumer_key');
108         $consumer_secret = get_pconfig(local_user(), 'pumpio','consumer_secret');
109         $hostname = get_pconfig(local_user(), 'pumpio','host');
110
111         if ((($consumer_key == "") OR ($consumer_secret == "")) AND ($hostname != "")) {
112                 logger("pumpio_connect: register client");
113                 $clientdata = pumpio_registerclient($a, $hostname);
114                 set_pconfig(local_user(), 'pumpio','consumer_key', $clientdata->client_id);
115                 set_pconfig(local_user(), 'pumpio','consumer_secret', $clientdata->client_secret);
116
117                 $consumer_key = get_pconfig(local_user(), 'pumpio','consumer_key');
118                 $consumer_secret = get_pconfig(local_user(), 'pumpio','consumer_secret');
119
120                 logger("pumpio_connect: ckey: ".$consumer_key." csecrect: ".$consumer_secret, LOGGER_DEBUG);
121         }
122
123         if (($consumer_key == "") OR ($consumer_secret == "")) {
124                 logger("pumpio_connect: ".sprintf("Unable to register the client at the pump.io server '%s'.", $hostname));
125
126                 $o .= sprintf(t("Unable to register the client at the pump.io server '%s'."), $hostname);
127                 return($o);
128         }
129
130         // The callback URL is the script that gets called after the user authenticates with pumpio
131         $callback_url = $a->get_baseurl()."/pumpio/connect";
132
133         // Let's begin.  First we need a Request Token.  The request token is required to send the user
134         // to pumpio's login page.
135
136         // Create a new instance of the TumblrOAuth library.  For this step, all we need to give the library is our
137         // Consumer Key and Consumer Secret
138         $client = new oauth_client_class;
139         $client->debug = 1;
140         $client->server = '';
141         $client->oauth_version = '1.0a';
142         $client->request_token_url = 'https://'.$hostname.'/oauth/request_token';
143         $client->dialog_url = 'https://'.$hostname.'/oauth/authorize';
144         $client->access_token_url = 'https://'.$hostname.'/oauth/access_token';
145         $client->url_parameters = false;
146         $client->authorization_header = true;
147         $client->redirect_uri = $callback_url;
148         $client->client_id = $consumer_key;
149         $client->client_secret = $consumer_secret;
150
151         if (($success = $client->Initialize())) {
152                 if (($success = $client->Process())) {
153                         if (strlen($client->access_token)) {
154                                 logger("pumpio_connect: otoken: ".$client->access_token." osecrect: ".$client->access_token_secret, LOGGER_DEBUG);
155                                 set_pconfig(local_user(), "pumpio", "oauth_token", $client->access_token);
156                                 set_pconfig(local_user(), "pumpio", "oauth_token_secret", $client->access_token_secret);
157                         }
158                 }
159                 $success = $client->Finalize($success);
160         }
161         if($client->exit)
162                 $o = 'Could not connect to pumpio. Refresh the page or try again later.';
163
164         if($success) {
165                 logger("pumpio_connect: authenticated");
166                 $o .= t("You are now authenticated to pumpio.");
167                 $o .= '<br /><a href="'.$a->get_baseurl().'/settings/connectors">'.t("return to the connector page").'</a>';
168         } else {
169                 logger("pumpio_connect: could not connect");
170                 $o = 'Could not connect to pumpio. Refresh the page or try again later.';
171         }
172
173         return($o);
174 }
175
176 function pumpio_jot_nets(&$a,&$b) {
177         if(! local_user())
178                 return;
179
180         $pumpio_post = get_pconfig(local_user(),'pumpio','post');
181         if(intval($pumpio_post) == 1) {
182                 $pumpio_defpost = get_pconfig(local_user(),'pumpio','post_by_default');
183                 $selected = ((intval($pumpio_defpost) == 1) ? ' checked="checked" ' : '');
184                 $b .= '<div class="profile-jot-net"><input type="checkbox" name="pumpio_enable"' . $selected . ' value="1" /> '
185                         . t('Post to pumpio') . '</div>';
186         }
187 }
188
189
190 function pumpio_settings(&$a,&$s) {
191
192         if(! local_user())
193                 return;
194
195         /* Add our stylesheet to the page so we can make our settings look nice */
196
197         $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/pumpio/pumpio.css' . '" media="all" />' . "\r\n";
198
199         /* Get the current state of our config variables */
200
201         $import_enabled = get_pconfig(local_user(),'pumpio','import');
202         $import_checked = (($import_enabled) ? ' checked="checked" ' : '');
203
204         $enabled = get_pconfig(local_user(),'pumpio','post');
205         $checked = (($enabled) ? ' checked="checked" ' : '');
206         $css = (($enabled) ? '' : '-disabled');
207
208         $def_enabled = get_pconfig(local_user(),'pumpio','post_by_default');
209         $def_checked = (($def_enabled) ? ' checked="checked" ' : '');
210
211         $public_enabled = get_pconfig(local_user(),'pumpio','public');
212         $public_checked = (($public_enabled) ? ' checked="checked" ' : '');
213
214         $mirror_enabled = get_pconfig(local_user(),'pumpio','mirror');
215         $mirror_checked = (($mirror_enabled) ? ' checked="checked" ' : '');
216
217         $servername = get_pconfig(local_user(), "pumpio", "host");
218         $username = get_pconfig(local_user(), "pumpio", "user");
219
220         /* Add some HTML to the existing form */
221
222         $s .= '<span id="settings_pumpio_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_pumpio_expanded\'); openClose(\'settings_pumpio_inflated\');">';
223         $s .= '<img class="connector'.$css.'" src="images/pumpio.png" /><h3 class="connector">'. t('Pump.io Import/Export/Mirror').'</h3>';
224         $s .= '</span>';
225         $s .= '<div id="settings_pumpio_expanded" class="settings-block" style="display: none;">';
226         $s .= '<span class="fakelink" onclick="openClose(\'settings_pumpio_expanded\'); openClose(\'settings_pumpio_inflated\');">';
227         $s .= '<img class="connector'.$css.'" src="images/pumpio.png" /><h3 class="connector">'. t('Pump.io Import/Export/Mirror').'</h3>';
228         $s .= '</span>';
229
230         $s .= '<div id="pumpio-username-wrapper">';
231         $s .= '<label id="pumpio-username-label" for="pumpio-username">'.t('pump.io username (without the servername)').'</label>';
232         $s .= '<input id="pumpio-username" type="text" name="pumpio_user" value="'.$username.'" />';
233         $s .= '</div><div class="clear"></div>';
234
235         $s .= '<div id="pumpio-servername-wrapper">';
236         $s .= '<label id="pumpio-servername-label" for="pumpio-servername">'.t('pump.io servername (without "http://" or "https://" )').'</label>';
237         $s .= '<input id="pumpio-servername" type="text" name="pumpio_host" value="'.$servername.'" />';
238         $s .= '</div><div class="clear"></div>';
239
240         if (($username != '') AND ($servername != '')) {
241
242                 $oauth_token = get_pconfig(local_user(), "pumpio", "oauth_token");
243                 $oauth_token_secret = get_pconfig(local_user(), "pumpio", "oauth_token_secret");
244
245                 $s .= '<div id="pumpio-password-wrapper">';
246                 if (($oauth_token == "") OR ($oauth_token_secret == "")) {
247                         $s .= '<div id="pumpio-authenticate-wrapper">';
248                         $s .= '<a href="'.$a->get_baseurl().'/pumpio/connect">'.t("Authenticate your pump.io connection").'</a>';
249                         $s .= '</div><div class="clear"></div>';
250                 } else {
251                         $s .= '<div id="pumpio-import-wrapper">';
252                         $s .= '<label id="pumpio-import-label" for="pumpio-import">' . t('Import the remote timeline') . '</label>';
253                         $s .= '<input id="pumpio-import" type="checkbox" name="pumpio_import" value="1" ' . $import_checked . '/>';
254                         $s .= '</div><div class="clear"></div>';
255
256                         $s .= '<div id="pumpio-enable-wrapper">';
257                         $s .= '<label id="pumpio-enable-label" for="pumpio-checkbox">' . t('Enable pump.io Post Plugin') . '</label>';
258                         $s .= '<input id="pumpio-checkbox" type="checkbox" name="pumpio" value="1" ' . $checked . '/>';
259                         $s .= '</div><div class="clear"></div>';
260
261                         $s .= '<div id="pumpio-bydefault-wrapper">';
262                         $s .= '<label id="pumpio-bydefault-label" for="pumpio-bydefault">' . t('Post to pump.io by default') . '</label>';
263                         $s .= '<input id="pumpio-bydefault" type="checkbox" name="pumpio_bydefault" value="1" ' . $def_checked . '/>';
264                         $s .= '</div><div class="clear"></div>';
265
266                         $s .= '<div id="pumpio-public-wrapper">';
267                         $s .= '<label id="pumpio-public-label" for="pumpio-public">' . t('Should posts be public?') . '</label>';
268                         $s .= '<input id="pumpio-public" type="checkbox" name="pumpio_public" value="1" ' . $public_checked . '/>';
269                         $s .= '</div><div class="clear"></div>';
270
271                         $s .= '<div id="pumpio-mirror-wrapper">';
272                         $s .= '<label id="pumpio-mirror-label" for="pumpio-mirror">' . t('Mirror all public posts') . '</label>';
273                         $s .= '<input id="pumpio-mirror" type="checkbox" name="pumpio_mirror" value="1" ' . $mirror_checked . '/>';
274                         $s .= '</div><div class="clear"></div>';
275
276                         $s .= '<div id="pumpio-delete-wrapper">';
277                         $s .= '<label id="pumpio-delete-label" for="pumpio-delete">' . t('Check to delete this preset') . '</label>';
278                         $s .= '<input id="pumpio-delete" type="checkbox" name="pumpio_delete" value="1" />';
279                         $s .= '</div><div class="clear"></div>';
280                 }
281
282                 $s .= '</div><div class="clear"></div>';
283         }
284
285         /* provide a submit button */
286
287         $s .= '<div class="settings-submit-wrapper" ><input type="submit" id="pumpio-submit" name="pumpio-submit" class="settings-submit" value="' . t('Save Settings') . '" /></div></div>';
288 }
289
290
291 function pumpio_settings_post(&$a,&$b) {
292
293         if(x($_POST,'pumpio-submit')) {
294                 if(x($_POST,'pumpio_delete')) {
295                         set_pconfig(local_user(),'pumpio','consumer_key','');
296                         set_pconfig(local_user(),'pumpio','consumer_secret','');
297                         set_pconfig(local_user(),'pumpio','oauth_token','');
298                         set_pconfig(local_user(),'pumpio','oauth_token_secret','');
299                         set_pconfig(local_user(),'pumpio','post',false);
300                         set_pconfig(local_user(),'pumpio','import',false);
301                         set_pconfig(local_user(),'pumpio','host','');
302                         set_pconfig(local_user(),'pumpio','user','');
303                         set_pconfig(local_user(),'pumpio','public',false);
304                         set_pconfig(local_user(),'pumpio','mirror',false);
305                         set_pconfig(local_user(),'pumpio','post_by_default',false);
306                         set_pconfig(local_user(),'pumpio','lastdate', 0);
307                         set_pconfig(local_user(),'pumpio','last_id', '');
308                 } else {
309                         // filtering the username if it is filled wrong
310                         $user = $_POST['pumpio_user'];
311                         if (strstr($user, "@")) {
312                                 $pos = strpos($user, "@");
313                                 if ($pos > 0)
314                                         $user = substr($user, 0, $pos);
315                         }
316
317                         // Filtering the hostname if someone is entering it with "http"
318                         $host = $_POST['pumpio_host'];
319                         $host = trim($host);
320                         $host = str_replace(array("https://", "http://"), array("", ""), $host);
321
322                         set_pconfig(local_user(),'pumpio','post',intval($_POST['pumpio']));
323                         set_pconfig(local_user(),'pumpio','import',$_POST['pumpio_import']);
324                         set_pconfig(local_user(),'pumpio','host',$host);
325                         set_pconfig(local_user(),'pumpio','user',$user);
326                         set_pconfig(local_user(),'pumpio','public',$_POST['pumpio_public']);
327                         set_pconfig(local_user(),'pumpio','mirror',$_POST['pumpio_mirror']);
328                         set_pconfig(local_user(),'pumpio','post_by_default',intval($_POST['pumpio_bydefault']));
329
330                         if (!$_POST['pumpio_mirror'])
331                                 del_pconfig(local_user(),'pumpio','lastdate');
332
333                         //header("Location: ".$a->get_baseurl()."/pumpio/connect");
334                 }
335         }
336 }
337
338 function pumpio_post_local(&$a,&$b) {
339
340         if((! local_user()) || (local_user() != $b['uid']))
341                 return;
342
343         $pumpio_post   = intval(get_pconfig(local_user(),'pumpio','post'));
344
345         $pumpio_enable = (($pumpio_post && x($_REQUEST,'pumpio_enable')) ? intval($_REQUEST['pumpio_enable']) : 0);
346
347         if($_REQUEST['api_source'] && intval(get_pconfig(local_user(),'pumpio','post_by_default')))
348                 $pumpio_enable = 1;
349
350         if(! $pumpio_enable)
351                 return;
352
353         if(strlen($b['postopts']))
354                 $b['postopts'] .= ',';
355
356         $b['postopts'] .= 'pumpio';
357 }
358
359
360
361
362 function pumpio_send(&$a,&$b) {
363
364         if (!get_pconfig($b["uid"],'pumpio','import')) {
365                 if($b['deleted'] || $b['private'] || ($b['created'] !== $b['edited']))
366                         return;
367         }
368
369         logger("pumpio_send: parameter ".print_r($b, true), LOGGER_DATA);
370
371         if($b['parent'] != $b['id']) {
372                 // Looking if its a reply to a pumpio post
373                 $r = q("SELECT item.* FROM item, contact WHERE item.id = %d AND item.uid = %d AND contact.id = `contact-id` AND contact.network='%s'LIMIT 1",
374                         intval($b["parent"]),
375                         intval($b["uid"]),
376                         dbesc(NETWORK_PUMPIO));
377
378                 if(!count($r)) {
379                         logger("pumpio_send: no pumpio post ".$b["parent"]);
380                         return;
381                 } else {
382                         $iscomment = true;
383                         $orig_post = $r[0];
384                 }
385         } else {
386                 $iscomment = false;
387
388                 $receiver = pumpio_getreceiver($a, $b);
389
390                 logger("pumpio_send: receiver ".print_r($receiver, true));
391
392                 if (!count($receiver) AND ($b['private'] OR !strstr($b['postopts'],'pumpio')))
393                         return;
394         }
395
396         if($b['verb'] == ACTIVITY_LIKE) {
397                 if ($b['deleted'])
398                         pumpio_action($a, $b["uid"], $b["thr-parent"], "unlike");
399                 else
400                         pumpio_action($a, $b["uid"], $b["thr-parent"], "like");
401                 return;
402         }
403
404         if($b['verb'] == ACTIVITY_DISLIKE)
405                 return;
406
407         if (($b['verb'] == ACTIVITY_POST) AND ($b['created'] !== $b['edited']) AND !$b['deleted'])
408                         pumpio_action($a, $b["uid"], $b["uri"], "update", $b["body"]);
409
410         if (($b['verb'] == ACTIVITY_POST) AND $b['deleted'])
411                         pumpio_action($a, $b["uid"], $b["uri"], "delete");
412
413         if($b['deleted'] || ($b['created'] !== $b['edited']))
414                 return;
415
416         // if post comes from pump.io don't send it back
417         if($b['app'] == "pump.io")
418                 return;
419
420         // To-Do;
421         // Support for native shares
422         // http://<hostname>/api/<type>/shares?id=<the-object-id>
423
424         $oauth_token = get_pconfig($b['uid'], "pumpio", "oauth_token");
425         $oauth_token_secret = get_pconfig($b['uid'], "pumpio", "oauth_token_secret");
426         $consumer_key = get_pconfig($b['uid'], "pumpio","consumer_key");
427         $consumer_secret = get_pconfig($b['uid'], "pumpio","consumer_secret");
428
429         $host = get_pconfig($b['uid'], "pumpio", "host");
430         $user = get_pconfig($b['uid'], "pumpio", "user");
431         $public = get_pconfig($b['uid'], "pumpio", "public");
432
433         if($oauth_token && $oauth_token_secret) {
434
435                 require_once('include/bbcode.php');
436
437                 $title = trim($b['title']);
438
439                 $content = bbcode($b['body'], false, false, 4);
440
441                 // Enhance the way, videos are displayed
442                 $content = preg_replace('/<a href="(https?:\/\/www.youtube.com\/.*?)".*?>(.*?)<\/a>/ism',"\n[url]$1[/url]\n",$content);
443                 $content = preg_replace('/<a href="(https?:\/\/youtu.be\/.*?)".*?>(.*?)<\/a>/ism',"\n$1\n",$content);
444                 $content = preg_replace('/<a href="(https?:\/\/vimeo.com\/.*?)".*?>(.*?)<\/a>/ism',"\n$1\n",$content);
445                 $content = preg_replace('/<a href="(https?:\/\/player.vimeo.com\/.*?)".*?>(.*?)<\/a>/ism',"\n$1\n",$content);
446
447                 $URLSearchString = "^\[\]";
448                 $content = preg_replace_callback("/\[url\]([$URLSearchString]*)\[\/url\]/ism",'tryoembed',$content);
449
450                 $params = array();
451
452                 $params["verb"] = "post";
453
454                 if (!$iscomment) {
455                         $params["object"] = array(
456                                                 'objectType' => "note",
457                                                 'content' => $content);
458
459                         if ($title != "")
460                                 $params["object"]["displayName"] = $title;
461
462                         if (count($receiver["to"]))
463                                 $params["to"] = $receiver["to"];
464
465                         if (count($receiver["bto"]))
466                                 $params["bto"] = $receiver["bto"];
467
468                         if (count($receiver["cc"]))
469                                 $params["cc"] = $receiver["cc"];
470
471                         if (count($receiver["bcc"]))
472                                 $params["bcc"] = $receiver["bcc"];
473
474                  } else {
475                         $inReplyTo = array("id" => $orig_post["uri"],
476                                         "objectType" => "note");
477
478                         if (($orig_post["object-type"] != "") AND (strstr($orig_post["object-type"], NAMESPACE_ACTIVITY_SCHEMA)))
479                                 $inReplyTo["objectType"] = str_replace(NAMESPACE_ACTIVITY_SCHEMA, '', $orig_post["object-type"]);
480
481                         $params["object"] = array(
482                                                 'objectType' => "comment",
483                                                 'content' => $content,
484                                                 'inReplyTo' => $inReplyTo);
485
486                         if ($title != "")
487                                 $params["object"]["displayName"] = $title;
488                 }
489
490                 $client = new oauth_client_class;
491                 $client->oauth_version = '1.0a';
492                 $client->url_parameters = false;
493                 $client->authorization_header = true;
494                 $client->access_token = $oauth_token;
495                 $client->access_token_secret = $oauth_token_secret;
496                 $client->client_id = $consumer_key;
497                 $client->client_secret = $consumer_secret;
498
499                 $username = $user.'@'.$host;
500                 $url = 'https://'.$host.'/api/user/'.$user.'/feed';
501
502                 $success = $client->CallAPI($url, 'POST', $params, array('FailOnAccessError'=>true, 'RequestContentType'=>'application/json'), $user);
503
504                 if($success) {
505
506                         if ($user->generator->displayName)
507                                 set_pconfig($b["uid"], "pumpio", "application_name", $user->generator->displayName);
508
509                         $post_id = $user->object->id;
510                         logger('pumpio_send '.$username.': success '.$post_id);
511                         if($post_id AND $iscomment) {
512                                 logger('pumpio_send '.$username.': Update extid '.$post_id." for post id ".$b['id']);
513                                 q("UPDATE `item` SET `extid` = '%s' WHERE `id` = %d",
514                                         dbesc($post_id),
515                                         intval($b['id'])
516                                 );
517                         }
518                 } else {
519                         logger('pumpio_send '.$username.': '.$url.' general error: ' . print_r($user,true));
520
521                         $r = q("SELECT `id` FROM `contact` WHERE `uid` = %d AND `self`", $b['uid']);
522                         if (count($r))
523                                 $a->contact = $r[0]["id"];
524
525                         $s = serialize(array('url' => $url, 'item' => $b['id'], 'post' => $params));
526                         require_once('include/queue_fn.php');
527                         add_to_queue($a->contact,NETWORK_PUMPIO,$s);
528                         notice(t('Pump.io post failed. Queued for retry.').EOL);
529                 }
530
531         }
532 }
533
534 function pumpio_action(&$a, $uid, $uri, $action, $content = "") {
535
536         // Don't do likes and other stuff if you don't import the timeline
537         if (!get_pconfig($uid,'pumpio','import'))
538                 return;
539
540         $ckey    = get_pconfig($uid, 'pumpio', 'consumer_key');
541         $csecret = get_pconfig($uid, 'pumpio', 'consumer_secret');
542         $otoken  = get_pconfig($uid, 'pumpio', 'oauth_token');
543         $osecret = get_pconfig($uid, 'pumpio', 'oauth_token_secret');
544         $hostname = get_pconfig($uid, 'pumpio','host');
545         $username = get_pconfig($uid, "pumpio", "user");
546
547         $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
548                                 dbesc($uri),
549                                 intval($uid)
550         );
551
552         if (!count($r))
553                 return;
554
555         $orig_post = $r[0];
556
557         if ($orig_post["extid"] AND !strstr($orig_post["extid"], "/proxy/"))
558                 $uri = $orig_post["extid"];
559         else
560                 $uri = $orig_post["uri"];
561
562         if (($orig_post["object-type"] != "") AND (strstr($orig_post["object-type"], NAMESPACE_ACTIVITY_SCHEMA)))
563                 $objectType = str_replace(NAMESPACE_ACTIVITY_SCHEMA, '', $orig_post["object-type"]);
564         elseif (strstr($uri, "/api/comment/"))
565                 $objectType = "comment";
566         elseif (strstr($uri, "/api/note/"))
567                 $objectType = "note";
568         elseif (strstr($uri, "/api/image/"))
569                 $objectType = "image";
570
571         $params["verb"] = $action;
572         $params["object"] = array('id' => $uri,
573                                 "objectType" => $objectType,
574                                 "content" => $content);
575
576         $client = new oauth_client_class;
577         $client->oauth_version = '1.0a';
578         $client->authorization_header = true;
579         $client->url_parameters = false;
580
581         $client->client_id = $ckey;
582         $client->client_secret = $csecret;
583         $client->access_token = $otoken;
584         $client->access_token_secret = $osecret;
585
586         $url = 'https://'.$hostname.'/api/user/'.$username.'/feed';
587
588         $success = $client->CallAPI($url, 'POST', $params, array('FailOnAccessError'=>true, 'RequestContentType'=>'application/json'), $user);
589
590         if($success)
591                 logger('pumpio_action '.$username.' '.$action.': success '.$uri);
592         else {
593                 logger('pumpio_action '.$username.' '.$action.': general error: '.$uri.' '.print_r($user,true));
594
595                 $r = q("SELECT `id` FROM `contact` WHERE `uid` = %d AND `self`", $b['uid']);
596                 if (count($r))
597                         $a->contact = $r[0]["id"];
598
599                 $s = serialize(array('url' => $url, 'item' => $orig_post["id"], 'post' => $params));
600                 require_once('include/queue_fn.php');
601                 add_to_queue($a->contact,NETWORK_PUMPIO,$s);
602                 notice(t('Pump.io like failed. Queued for retry.').EOL);
603         }
604 }
605
606 function pumpio_sync(&$a) {
607         $r = q("SELECT * FROM `addon` WHERE `installed` = 1 AND `name` = 'pumpio'",
608                 $plugin);
609
610         if (!count($r))
611                 return;
612
613         $last = get_config('pumpio','last_poll');
614
615         $poll_interval = intval(get_config('pumpio','poll_interval'));
616         if(! $poll_interval)
617                 $poll_interval = PUMPIO_DEFAULT_POLL_INTERVAL;
618
619         if($last) {
620                 $next = $last + ($poll_interval * 60);
621                 if($next > time()) {
622                         logger('pumpio: poll intervall not reached');
623                         return;
624                 }
625         }
626         logger('pumpio: cron_start');
627
628         $r = q("SELECT * FROM `pconfig` WHERE `cat` = 'pumpio' AND `k` = 'mirror' AND `v` = '1' ORDER BY RAND() ");
629         if(count($r)) {
630                 foreach($r as $rr) {
631                         logger('pumpio: mirroring user '.$rr['uid']);
632                         pumpio_fetchtimeline($a, $rr['uid']);
633                 }
634         }
635
636         $abandon_days = intval(get_config('system','account_abandon_days'));
637         if ($abandon_days < 1)
638                 $abandon_days = 0;
639
640         $abandon_limit = date("Y-m-d H:i:s", time() - $abandon_days * 86400);
641
642         $r = q("SELECT * FROM `pconfig` WHERE `cat` = 'pumpio' AND `k` = 'import' AND `v` = '1' ORDER BY RAND() ");
643         if(count($r)) {
644                 foreach($r as $rr) {
645                         if ($abandon_days != 0) {
646                                 $user = q("SELECT `login_date` FROM `user` WHERE uid=%d AND `login_date` >= '%s'", $rr['uid'], $abandon_limit);
647                                 if (!count($user)) {
648                                         logger('abandoned account: timeline from user '.$rr['uid'].' will not be imported');
649                                         continue;
650                                 }
651                         }
652
653                         logger('pumpio: importing timeline from user '.$rr['uid']);
654                         pumpio_fetchinbox($a, $rr['uid']);
655
656                         // check for new contacts once a day
657                         $last_contact_check = get_pconfig($rr['uid'],'pumpio','contact_check');
658                         if($last_contact_check)
659                                 $next_contact_check = $last_contact_check + 86400;
660                         else
661                                 $next_contact_check = 0;
662
663                         if($next_contact_check <= time()) {
664                                 pumpio_getallusers($a, $rr["uid"]);
665                                 set_pconfig($rr['uid'],'pumpio','contact_check',time());
666                         }
667                 }
668         }
669
670         logger('pumpio: cron_end');
671
672         set_config('pumpio','last_poll', time());
673 }
674
675 function pumpio_cron(&$a,$b) {
676         //pumpio_sync($a);
677         proc_run("php","addon/pumpio/pumpio_sync.php");
678 }
679
680 function pumpio_fetchtimeline(&$a, $uid) {
681         $ckey    = get_pconfig($uid, 'pumpio', 'consumer_key');
682         $csecret = get_pconfig($uid, 'pumpio', 'consumer_secret');
683         $otoken  = get_pconfig($uid, 'pumpio', 'oauth_token');
684         $osecret = get_pconfig($uid, 'pumpio', 'oauth_token_secret');
685         $lastdate = get_pconfig($uid, 'pumpio', 'lastdate');
686         $hostname = get_pconfig($uid, 'pumpio','host');
687         $username = get_pconfig($uid, "pumpio", "user");
688
689         //  get the application name for the pump.io app
690         //  1st try personal config, then system config and fallback to the
691         //  hostname of the node if neither one is set.
692         $application_name  = get_pconfig( $uid, 'pumpio', 'application_name');
693         if ($application_name == "")
694                 $application_name  = get_config('pumpio', 'application_name');
695         if ($application_name == "")
696                 $application_name = $a->get_hostname();
697
698         $first_time = ($lastdate == "");
699
700         $client = new oauth_client_class;
701         $client->oauth_version = '1.0a';
702         $client->authorization_header = true;
703         $client->url_parameters = false;
704
705         $client->client_id = $ckey;
706         $client->client_secret = $csecret;
707         $client->access_token = $otoken;
708         $client->access_token_secret = $osecret;
709
710         $url = 'https://'.$hostname.'/api/user/'.$username.'/feed/major';
711
712         logger('pumpio: fetching for user '.$uid.' '.$url.' C:'.$client->client_id.' CS:'.$client->client_secret.' T:'.$client->access_token.' TS:'.$client->access_token_secret);
713
714         $username = $user.'@'.$host;
715
716         $success = $client->CallAPI($url, 'GET', array(), array('FailOnAccessError'=>true), $user);
717
718         if (!$success) {
719                 logger('pumpio: error fetching posts for user '.$uid." ".$username." ".print_r($user, true));
720                 return;
721         }
722
723         $posts = array_reverse($user->items);
724
725         $initiallastdate = $lastdate;
726         $lastdate = '';
727
728         if (count($posts)) {
729                 foreach ($posts as $post) {
730                         if ($post->published <= $initiallastdate)
731                                 continue;
732
733                         if ($lastdate < $post->published)
734                                 $lastdate = $post->published;
735
736                         if ($first_time)
737                                 continue;
738
739                         $receiptians = array();
740                         if (@is_array($post->cc))
741                                 $receiptians = array_merge($receiptians, $post->cc);
742
743                         if (@is_array($post->to))
744                                 $receiptians = array_merge($receiptians, $post->to);
745
746                         $public = false;
747                         foreach ($receiptians AS $receiver)
748                                 if (is_string($receiver->objectType))
749                                         if ($receiver->id == "http://activityschema.org/collection/public")
750                                                 $public = true;
751
752                         if ($public AND !stristr($post->generator->displayName, $application_name)) {
753                                 require_once('include/html2bbcode.php');
754
755                                 $_SESSION["authenticated"] = true;
756                                 $_SESSION["uid"] = $uid;
757
758                                 unset($_REQUEST);
759                                 $_REQUEST["type"] = "wall";
760                                 $_REQUEST["api_source"] = true;
761                                 $_REQUEST["profile_uid"] = $uid;
762                                 $_REQUEST["source"] = "pump.io";
763
764                                 if ($post->object->displayName != "")
765                                         $_REQUEST["title"] = html2bbcode($post->object->displayName);
766                                 else
767                                         $_REQUEST["title"] = "";
768
769                                 $_REQUEST["body"] = html2bbcode($post->object->content);
770
771                                 // To-Do: Picture has to be cached and stored locally
772                                 if ($post->object->fullImage->url != "") {
773                                         if ($post->object->fullImage->pump_io->proxyURL != "")
774                                                 $_REQUEST["body"] = "[url=".$post->object->fullImage->pump_io->proxyURL."][img]".$post->object->image->pump_io->proxyURL."[/img][/url]\n".$_REQUEST["body"];
775                                         else
776                                                 $_REQUEST["body"] = "[url=".$post->object->fullImage->url."][img]".$post->object->image->url."[/img][/url]\n".$_REQUEST["body"];
777                                 }
778
779                                 logger('pumpio: posting for user '.$uid);
780
781                                 require_once('mod/item.php');
782
783                                 item_post($a);
784                                 logger('pumpio: posting done - user '.$uid);
785                         }
786                 }
787         }
788
789         if ($lastdate != 0)
790                 set_pconfig($uid,'pumpio','lastdate', $lastdate);
791 }
792
793 function pumpio_dounlike(&$a, $uid, $self, $post, $own_id) {
794         // Searching for the unliked post
795         // Two queries for speed issues
796         $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
797                                 dbesc($post->object->id),
798                                 intval($uid)
799                 );
800
801         if (count($r))
802                 $orig_post = $r[0];
803         else {
804                 $r = q("SELECT * FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
805                                         dbesc($post->object->id),
806                                         intval($uid)
807                         );
808
809                 if (!count($r))
810                         return;
811                 else
812                         $orig_post = $r[0];
813         }
814
815         $contactid = 0;
816
817         if(link_compare($post->actor->url, $own_id)) {
818                 $contactid = $self[0]['id'];
819         } else {
820                 $r = q("SELECT * FROM `contact` WHERE `url` = '%s' AND `uid` = %d AND `blocked` = 0 AND `readonly` = 0 LIMIT 1",
821                         dbesc($post->actor->url),
822                         intval($uid)
823                 );
824
825                 if(count($r))
826                         $contactid = $r[0]['id'];
827
828                 if($contactid == 0)
829                         $contactid = $orig_post['contact-id'];
830         }
831
832         $r = q("UPDATE `item` SET `deleted` = 1, `unseen` = 1, `changed` = '%s' WHERE `verb` = '%s' AND `uid` = %d AND `contact-id` = %d AND `thr-parent` = '%s'",
833                 dbesc(datetime_convert()),
834                 dbesc(ACTIVITY_LIKE),
835                 intval($uid),
836                 intval($contactid),
837                 dbesc($orig_post['uri'])
838         );
839
840         if(count($r))
841                 logger("pumpio_dounlike: unliked existing like. User ".$own_id." ".$uid." Contact: ".$contactid." Url ".$orig_post['uri']);
842         else
843                 logger("pumpio_dounlike: not found. User ".$own_id." ".$uid." Contact: ".$contactid." Url ".$orig_post['uri']);
844 }
845
846 function pumpio_dolike(&$a, $uid, $self, $post, $own_id, $threadcompletion = true) {
847         require_once('include/items.php');
848
849         // Searching for the liked post
850         // Two queries for speed issues
851         $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
852                                 dbesc($post->object->id),
853                                 intval($uid)
854                 );
855
856         if (count($r))
857                 $orig_post = $r[0];
858         else {
859                 $r = q("SELECT * FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
860                                         dbesc($post->object->id),
861                                         intval($uid)
862                         );
863
864                 if (!count($r))
865                         return;
866                 else
867                         $orig_post = $r[0];
868         }
869
870         // thread completion
871         if ($threadcompletion)
872                 pumpio_fetchallcomments($a, $uid, $post->object->id);
873
874         $contactid = 0;
875
876         if(link_compare($post->actor->url, $own_id)) {
877                 $contactid = $self[0]['id'];
878                 $post->actor->displayName = $self[0]['name'];
879                 $post->actor->url = $self[0]['url'];
880                 $post->actor->image->url = $self[0]['photo'];
881         } else {
882                 $r = q("SELECT * FROM `contact` WHERE `url` = '%s' AND `uid` = %d AND `blocked` = 0 AND `readonly` = 0 LIMIT 1",
883                         dbesc($post->actor->url),
884                         intval($uid)
885                 );
886
887                 if(count($r))
888                         $contactid = $r[0]['id'];
889
890                 if($contactid == 0)
891                         $contactid = $orig_post['contact-id'];
892         }
893
894         $r = q("SELECT parent FROM `item` WHERE `verb` = '%s' AND `uid` = %d AND `contact-id` = %d AND `thr-parent` = '%s' LIMIT 1",
895                 dbesc(ACTIVITY_LIKE),
896                 intval($uid),
897                 intval($contactid),
898                 dbesc($orig_post['uri'])
899         );
900
901         if(count($r)) {
902                 logger("pumpio_dolike: found existing like. User ".$own_id." ".$uid." Contact: ".$contactid." Url ".$orig_post['uri']);
903                 return;
904         }
905
906         $likedata = array();
907         $likedata['parent'] = $orig_post['id'];
908         $likedata['verb'] = ACTIVITY_LIKE;
909         $likedata['gravity'] = 3;
910         $likedata['uid'] = $uid;
911         $likedata['wall'] = 0;
912         $likedata['uri'] = item_new_uri($a->get_baseurl(), $uid);
913         $likedata['parent-uri'] = $orig_post["uri"];
914         $likedata['contact-id'] = $contactid;
915         $likedata['app'] = $post->generator->displayName;
916         $likedata['author-name'] = $post->actor->displayName;
917         $likedata['author-link'] = $post->actor->url;
918         $likedata['author-avatar'] = $post->actor->image->url;
919
920         $author  = '[url=' . $likedata['author-link'] . ']' . $likedata['author-name'] . '[/url]';
921         $objauthor =  '[url=' . $orig_post['author-link'] . ']' . $orig_post['author-name'] . '[/url]';
922         $post_type = t('status');
923         $plink = '[url=' . $orig_post['plink'] . ']' . $post_type . '[/url]';
924         $likedata['object-type'] = ACTIVITY_OBJ_NOTE;
925
926         $likedata['body'] = sprintf( t('%1$s likes %2$s\'s %3$s'), $author, $objauthor, $plink);
927
928         $likedata['object'] = '<object><type>' . ACTIVITY_OBJ_NOTE . '</type><local>1</local>' .
929                 '<id>' . $orig_post['uri'] . '</id><link>' . xmlify('<link rel="alternate" type="text/html" href="' . xmlify($orig_post['plink']) . '" />') . '</link><title>' . $orig_post['title'] . '</title><content>' . $orig_post['body'] . '</content></object>';
930
931         $ret = item_store($likedata);
932
933         logger("pumpio_dolike: ".$ret." User ".$own_id." ".$uid." Contact: ".$contactid." Url ".$orig_post['uri']);
934 }
935
936 function pumpio_get_contact($uid, $contact) {
937
938         $r = q("SELECT id FROM unique_contacts WHERE url='%s' LIMIT 1",
939                 dbesc(normalise_link($contact->url)));
940
941         if (count($r) == 0)
942                 q("INSERT INTO unique_contacts (url, name, nick, avatar) VALUES ('%s', '%s', '%s', '%s')",
943                         dbesc(normalise_link($contact->url)),
944                         dbesc($contact->displayName),
945                         dbesc($contact->preferredUsername),
946                         dbesc($contact->image->url));
947         else
948                 q("UPDATE unique_contacts SET name = '%s', nick = '%s', avatar = '%s' WHERE url = '%s'",
949                         dbesc($contact->displayName),
950                         dbesc($contact->preferredUsername),
951                         dbesc($contact->image->url),
952                         dbesc(normalise_link($contact->url)));
953
954         if (DB_UPDATE_VERSION >= "1177")
955                 q("UPDATE `unique_contacts` SET `location` = '%s', `about` = '%s' WHERE url = '%s'",
956                         dbesc($contact->location->displayName),
957                         dbesc($contact->summary),
958                         dbesc(normalise_link($contact->url)));
959
960         $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `url` = '%s' LIMIT 1",
961                 intval($uid), dbesc($contact->url));
962
963         if(!count($r)) {
964                 // create contact record
965                 q("INSERT INTO `contact` ( `uid`, `created`, `url`, `nurl`, `addr`, `alias`, `notify`, `poll`,
966                                         `name`, `nick`, `photo`, `network`, `rel`, `priority`,
967                                         `writable`, `blocked`, `readonly`, `pending` )
968                                 VALUES ( %d, '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', %d, %d, %d, 0, 0, 0 ) ",
969                         intval($uid),
970                         dbesc(datetime_convert()),
971                         dbesc($contact->url),
972                         dbesc(normalise_link($contact->url)),
973                         dbesc(str_replace("acct:", "", $contact->id)),
974                         dbesc(''),
975                         dbesc($contact->id), // What is it for?
976                         dbesc('pump.io ' . $contact->id), // What is it for?
977                         dbesc($contact->displayName),
978                         dbesc($contact->preferredUsername),
979                         dbesc($contact->image->url),
980                         dbesc(NETWORK_PUMPIO),
981                         intval(CONTACT_IS_FRIEND),
982                         intval(1),
983                         intval(1)
984                 );
985
986                 $r = q("SELECT * FROM `contact` WHERE `url` = '%s' AND `uid` = %d LIMIT 1",
987                         dbesc($contact->url),
988                         intval($uid)
989                         );
990
991                 if(! count($r))
992                         return(false);
993
994                 $contact_id  = $r[0]['id'];
995
996                 $g = q("select def_gid from user where uid = %d limit 1",
997                         intval($uid)
998                 );
999
1000                 if($g && intval($g[0]['def_gid'])) {
1001                         require_once('include/group.php');
1002                         group_add_member($uid,'',$contact_id,$g[0]['def_gid']);
1003                 }
1004
1005                 require_once("Photo.php");
1006
1007                 $photos = import_profile_photo($contact->image->url,$uid,$contact_id);
1008
1009                 q("UPDATE `contact` SET `photo` = '%s',
1010                                         `thumb` = '%s',
1011                                         `micro` = '%s',
1012                                         `name-date` = '%s',
1013                                         `uri-date` = '%s',
1014                                         `avatar-date` = '%s'
1015                                 WHERE `id` = %d
1016                         ",
1017                 dbesc($photos[0]),
1018                 dbesc($photos[1]),
1019                 dbesc($photos[2]),
1020                 dbesc(datetime_convert()),
1021                 dbesc(datetime_convert()),
1022                 dbesc(datetime_convert()),
1023                 intval($contact_id)
1024                 );
1025
1026                 if (DB_UPDATE_VERSION >= "1177")
1027                         q("UPDATE `contact` SET `location` = '%s',
1028                                                 `about` = '%s'
1029                                         WHERE `id` = %d",
1030                                 dbesc($contact->location->displayName),
1031                                 dbesc($contact->summary),
1032                                 intval($contact_id)
1033                         );
1034         } else {
1035                 // update profile photos once every two weeks as we have no notification of when they change.
1036                 //$update_photo = (($r[0]['avatar-date'] < datetime_convert('','','now -14 days')) ? true : false);
1037                 $update_photo = ($r[0]['avatar-date'] < datetime_convert('','','now -12 hours'));
1038
1039                 // check that we have all the photos, this has been known to fail on occasion
1040
1041                 if((! $r[0]['photo']) || (! $r[0]['thumb']) || (! $r[0]['micro']) || ($update_photo)) {
1042                         require_once("Photo.php");
1043
1044                         $photos = import_profile_photo($contact->image->url, $uid, $r[0]['id']);
1045
1046                         q("UPDATE `contact` SET `photo` = '%s',
1047                                         `thumb` = '%s',
1048                                         `micro` = '%s',
1049                                         `name-date` = '%s',
1050                                         `uri-date` = '%s',
1051                                         `avatar-date` = '%s',
1052                                         `name` = '%s',
1053                                         `nick` = '%s'
1054                                         WHERE `id` = %d
1055                                 ",
1056                         dbesc($photos[0]),
1057                         dbesc($photos[1]),
1058                         dbesc($photos[2]),
1059                         dbesc(datetime_convert()),
1060                         dbesc(datetime_convert()),
1061                         dbesc(datetime_convert()),
1062                         dbesc($contact->displayName),
1063                         dbesc($contact->preferredUsername),
1064                         intval($r[0]['id'])
1065                         );
1066
1067                         if (DB_UPDATE_VERSION >= "1177")
1068                                 q("UPDATE `contact` SET `location` = '%s',
1069                                                         `about` = '%s'
1070                                                 WHERE `id` = %d",
1071                                         dbesc($contact->location->displayName),
1072                                         dbesc($contact->summary),
1073                                         intval($r[0]['id'])
1074                                 );
1075                 }
1076
1077         }
1078
1079         return($r[0]["id"]);
1080 }
1081
1082 function pumpio_dodelete(&$a, $uid, $self, $post, $own_id) {
1083
1084         // Two queries for speed issues
1085         $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
1086                                 dbesc($post->object->id),
1087                                 intval($uid)
1088                 );
1089
1090         if (count($r))
1091                 return drop_item($r[0]["id"], $false);
1092
1093         $r = q("SELECT * FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
1094                                 dbesc($post->object->id),
1095                                 intval($uid)
1096                 );
1097
1098         if (count($r))
1099                 return drop_item($r[0]["id"], $false);
1100 }
1101
1102 function pumpio_dopost(&$a, $client, $uid, $self, $post, $own_id, $threadcompletion = true) {
1103         require_once('include/items.php');
1104         require_once('include/html2bbcode.php');
1105
1106         if (($post->verb == "like") OR ($post->verb == "favorite"))
1107                 return pumpio_dolike($a, $uid, $self, $post, $own_id);
1108
1109         if (($post->verb == "unlike") OR ($post->verb == "unfavorite"))
1110                 return pumpio_dounlike($a, $uid, $self, $post, $own_id);
1111
1112         if ($post->verb == "delete")
1113                 return pumpio_dodelete($a, $uid, $self, $post, $own_id);
1114
1115         if ($post->verb != "update") {
1116                 // Two queries for speed issues
1117                 $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
1118                                         dbesc($post->object->id),
1119                                         intval($uid)
1120                         );
1121
1122                 if (count($r))
1123                         return false;
1124
1125                 $r = q("SELECT * FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
1126                                         dbesc($post->object->id),
1127                                         intval($uid)
1128                         );
1129
1130                 if (count($r))
1131                         return false;
1132         }
1133
1134         // Only handle these three types
1135         if (!strstr("post|share|update", $post->verb))
1136                 return false;
1137
1138         $receiptians = array();
1139         if (@is_array($post->cc))
1140                 $receiptians = array_merge($receiptians, $post->cc);
1141
1142         if (@is_array($post->to))
1143                 $receiptians = array_merge($receiptians, $post->to);
1144
1145         foreach ($receiptians AS $receiver)
1146                 if (is_string($receiver->objectType))
1147                         if ($receiver->id == "http://activityschema.org/collection/public")
1148                                 $public = true;
1149
1150         $postarray = array();
1151         $postarray['network'] = NETWORK_PUMPIO;
1152         $postarray['gravity'] = 0;
1153         $postarray['uid'] = $uid;
1154         $postarray['wall'] = 0;
1155         $postarray['uri'] = $post->object->id;
1156         $postarray['object-type'] = NAMESPACE_ACTIVITY_SCHEMA.strtolower($post->object->objectType);
1157
1158         if ($post->object->objectType != "comment") {
1159                 $contact_id = pumpio_get_contact($uid, $post->actor);
1160
1161                 if (!$contact_id)
1162                         $contact_id = $self[0]['id'];
1163
1164                 $postarray['parent-uri'] = $post->object->id;
1165
1166                 if (!$public) {
1167                         $postarray['private'] = 1;
1168                         $postarray['allow_cid'] = '<' . $self[0]['id'] . '>';
1169                 }
1170         } else {
1171                 $contact_id = 0;
1172
1173                 if(link_compare($post->actor->url, $own_id)) {
1174                         $contact_id = $self[0]['id'];
1175                         $post->actor->displayName = $self[0]['name'];
1176                         $post->actor->url = $self[0]['url'];
1177                         $post->actor->image->url = $self[0]['photo'];
1178                 } else {
1179                         // Take an existing contact, the contact of the note or - as a fallback - the id of the user
1180                         $r = q("SELECT * FROM `contact` WHERE `url` = '%s' AND `uid` = %d AND `blocked` = 0 AND `readonly` = 0 LIMIT 1",
1181                                 dbesc($post->actor->url),
1182                                 intval($uid)
1183                         );
1184
1185                         if(count($r))
1186                                 $contact_id = $r[0]['id'];
1187                         else {
1188                                 $r = q("SELECT * FROM `contact` WHERE `url` = '%s' AND `uid` = %d AND `blocked` = 0 AND `readonly` = 0 LIMIT 1",
1189                                         dbesc($post->actor->url),
1190                                         intval($uid)
1191                                 );
1192
1193                                 if(count($r))
1194                                         $contact_id = $r[0]['id'];
1195                                 else
1196                                         $contact_id = $self[0]['id'];
1197                         }
1198                 }
1199
1200                 $reply = new stdClass;
1201                 $reply->verb = "note";
1202                 $reply->cc = $post->cc;
1203                 $reply->to = $post->to;
1204                 $reply->object = new stdClass;
1205                 $reply->object->objectType = $post->object->inReplyTo->objectType;
1206                 $reply->object->content = $post->object->inReplyTo->content;
1207                 $reply->object->id = $post->object->inReplyTo->id;
1208                 $reply->actor = $post->object->inReplyTo->author;
1209                 $reply->url = $post->object->inReplyTo->url;
1210                 $reply->generator = new stdClass;
1211                 $reply->generator->displayName = "pumpio";
1212                 $reply->published = $post->object->inReplyTo->published;
1213                 $reply->received = $post->object->inReplyTo->updated;
1214                 $reply->url = $post->object->inReplyTo->url;
1215                 pumpio_dopost($a, $client, $uid, $self, $reply, $own_id, false);
1216
1217                 $postarray['parent-uri'] = $post->object->inReplyTo->id;
1218         }
1219
1220         if ($post->object->pump_io->proxyURL)
1221                 $postarray['extid'] = $post->object->pump_io->proxyURL;
1222
1223         $postarray['contact-id'] = $contact_id;
1224         $postarray['verb'] = ACTIVITY_POST;
1225         $postarray['owner-name'] = $post->actor->displayName;
1226         $postarray['owner-link'] = $post->actor->url;
1227         $postarray['owner-avatar'] = $post->actor->image->url;
1228         $postarray['author-name'] = $post->actor->displayName;
1229         $postarray['author-link'] = $post->actor->url;
1230         $postarray['author-avatar'] = $post->actor->image->url;
1231         $postarray['plink'] = $post->object->url;
1232         $postarray['app'] = $post->generator->displayName;
1233         $postarray['body'] = html2bbcode($post->object->content);
1234
1235         if ($post->object->fullImage->url != "")
1236                 $postarray["body"] = "[url=".$post->object->fullImage->url."][img]".$post->object->image->url."[/img][/url]\n".$postarray["body"];
1237
1238         if ($post->object->displayName != "")
1239                 $postarray['title'] = $post->object->displayName;
1240
1241         $postarray['created'] = datetime_convert('UTC','UTC',$post->published);
1242         $postarray['edited'] = datetime_convert('UTC','UTC',$post->received);
1243
1244         if ($post->verb == "share") {
1245                 if (!intval(get_config('system','wall-to-wall_share'))) {
1246                         $postarray['body'] = "[share author='".$post->object->author->displayName.
1247                                         "' profile='".$post->object->author->url.
1248                                         "' avatar='".$post->object->author->image->url.
1249                                         "' posted='".datetime_convert('UTC','UTC',$post->object->created).
1250                                         "' link='".$post->links->self->href."']".$postarray['body']."[/share]";
1251                 } else {
1252                         // Let shares look like wall-to-wall posts
1253                         $postarray['author-name'] = $post->object->author->displayName;
1254                         $postarray['author-link'] = $post->object->author->url;
1255                         $postarray['author-avatar'] = $post->object->author->image->url;
1256                 }
1257         }
1258
1259         if (trim($postarray['body']) == "")
1260                 return false;
1261
1262         $top_item = item_store($postarray);
1263         $postarray["id"] = $top_item;
1264
1265         if (($top_item == 0) AND ($post->verb == "update")) {
1266                 $r = q("UPDATE `item` SET `title` = '%s', `body` = '%s' , `changed` = '%s' WHERE `uri` = '%s' AND `uid` = %d",
1267                         dbesc($postarray["title"]),
1268                         dbesc($postarray["body"]),
1269                         dbesc($postarray["edited"]),
1270                         dbesc($postarray["uri"]),
1271                         intval($uid)
1272                         );
1273         }
1274
1275         if ($post->object->objectType == "comment") {
1276
1277                 if ($threadcompletion)
1278                         pumpio_fetchallcomments($a, $uid, $postarray['parent-uri']);
1279
1280                 $user = q("SELECT * FROM `user` WHERE `uid` = %d AND `account_expired` = 0 LIMIT 1",
1281                                 intval($uid)
1282                         );
1283
1284                 if(!count($user))
1285                         return $top_item;
1286
1287                 $importer_url = $a->get_baseurl() . '/profile/' . $user[0]['nickname'];
1288
1289                 if (link_compare($own_id, $postarray['author-link']))
1290                         return $top_item;
1291
1292                 $myconv = q("SELECT `author-link`, `author-avatar`, `parent` FROM `item` WHERE `parent-uri` = '%s' AND `uid` = %d AND `parent` != 0 AND `deleted` = 0",
1293                                 dbesc($postarray['parent-uri']),
1294                                 intval($uid)
1295                                 );
1296
1297                 if(count($myconv)) {
1298
1299                         foreach($myconv as $conv) {
1300                                 // now if we find a match, it means we're in this conversation
1301
1302                                 if(!link_compare($conv['author-link'],$importer_url) AND !link_compare($conv['author-link'],$own_id))
1303                                         continue;
1304
1305                                 require_once('include/enotify.php');
1306
1307                                 $conv_parent = $conv['parent'];
1308
1309                                 notification(array(
1310                                         'type'         => NOTIFY_COMMENT,
1311                                         'notify_flags' => $user[0]['notify-flags'],
1312                                         'language'     => $user[0]['language'],
1313                                         'to_name'      => $user[0]['username'],
1314                                         'to_email'     => $user[0]['email'],
1315                                         'uid'          => $user[0]['uid'],
1316                                         'item'         => $postarray,
1317                                         'link'         => $a->get_baseurl().'/display/'.urlencode(get_item_guid($top_item)),
1318                                         'source_name'  => $postarray['author-name'],
1319                                         'source_link'  => $postarray['author-link'],
1320                                         'source_photo' => $postarray['author-avatar'],
1321                                         'verb'         => ACTIVITY_POST,
1322                                         'otype'        => 'item',
1323                                         'parent'       => $conv_parent,
1324                                         ));
1325
1326                                 // only send one notification
1327                                 break;
1328                         }
1329                 }
1330         }
1331
1332         return $top_item;
1333 }
1334
1335 function pumpio_fetchinbox(&$a, $uid) {
1336
1337         $ckey    = get_pconfig($uid, 'pumpio', 'consumer_key');
1338         $csecret = get_pconfig($uid, 'pumpio', 'consumer_secret');
1339         $otoken  = get_pconfig($uid, 'pumpio', 'oauth_token');
1340         $osecret = get_pconfig($uid, 'pumpio', 'oauth_token_secret');
1341         $lastdate = get_pconfig($uid, 'pumpio', 'lastdate');
1342         $hostname = get_pconfig($uid, 'pumpio','host');
1343         $username = get_pconfig($uid, "pumpio", "user");
1344
1345         $own_id = "https://".$hostname."/".$username;
1346
1347         $self = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
1348                 intval($uid));
1349
1350         $lastitems = q("SELECT uri FROM `item` WHERE `network` = '%s' AND `uid` = %d AND
1351                         `extid` != '' AND `id` = `parent`
1352                         ORDER BY `commented` DESC LIMIT 10",
1353                                 dbesc(NETWORK_PUMPIO),
1354                                 intval($uid)
1355                         );
1356
1357         $client = new oauth_client_class;
1358         $client->oauth_version = '1.0a';
1359         $client->authorization_header = true;
1360         $client->url_parameters = false;
1361
1362         $client->client_id = $ckey;
1363         $client->client_secret = $csecret;
1364         $client->access_token = $otoken;
1365         $client->access_token_secret = $osecret;
1366
1367         $last_id = get_pconfig($uid,'pumpio','last_id');
1368
1369         $url = 'https://'.$hostname.'/api/user/'.$username.'/inbox';
1370
1371         if ($last_id != "")
1372                 $url .= '?since='.urlencode($last_id);
1373
1374         $success = $client->CallAPI($url, 'GET', array(), array('FailOnAccessError'=>true), $user);
1375
1376         if ($user->items) {
1377             $posts = array_reverse($user->items);
1378
1379             if (count($posts))
1380                     foreach ($posts as $post) {
1381                             $last_id = $post->id;
1382                             pumpio_dopost($a, $client, $uid, $self, $post, $own_id, true);
1383                     }
1384         }
1385
1386         foreach ($lastitems AS $item)
1387                 pumpio_fetchallcomments($a, $uid, $item["uri"]);
1388
1389         set_pconfig($uid,'pumpio','last_id', $last_id);
1390 }
1391
1392 function pumpio_getallusers(&$a, $uid) {
1393         $ckey    = get_pconfig($uid, 'pumpio', 'consumer_key');
1394         $csecret = get_pconfig($uid, 'pumpio', 'consumer_secret');
1395         $otoken  = get_pconfig($uid, 'pumpio', 'oauth_token');
1396         $osecret = get_pconfig($uid, 'pumpio', 'oauth_token_secret');
1397         $hostname = get_pconfig($uid, 'pumpio','host');
1398         $username = get_pconfig($uid, "pumpio", "user");
1399
1400         $client = new oauth_client_class;
1401         $client->oauth_version = '1.0a';
1402         $client->authorization_header = true;
1403         $client->url_parameters = false;
1404
1405         $client->client_id = $ckey;
1406         $client->client_secret = $csecret;
1407         $client->access_token = $otoken;
1408         $client->access_token_secret = $osecret;
1409
1410         $url = 'https://'.$hostname.'/api/user/'.$username.'/following';
1411
1412         $success = $client->CallAPI($url, 'GET', array(), array('FailOnAccessError'=>true), $users);
1413
1414         if ($users->totalItems > count($users->items)) {
1415                 $url = 'https://'.$hostname.'/api/user/'.$username.'/following?count='.$users->totalItems;
1416
1417                 $success = $client->CallAPI($url, 'GET', array(), array('FailOnAccessError'=>true), $users);
1418         }
1419
1420         foreach ($users->items AS $user)
1421                 pumpio_get_contact($uid, $user);
1422 }
1423
1424 function pumpio_queue_hook(&$a,&$b) {
1425
1426         $qi = q("SELECT * FROM `queue` WHERE `network` = '%s'",
1427                 dbesc(NETWORK_PUMPIO)
1428         );
1429         if(! count($qi))
1430                 return;
1431
1432         require_once('include/queue_fn.php');
1433
1434         foreach($qi as $x) {
1435                 if($x['network'] !== NETWORK_PUMPIO)
1436                         continue;
1437
1438                 logger('pumpio_queue: run');
1439
1440                 $r = q("SELECT `user`.* FROM `user` LEFT JOIN `contact` on `contact`.`uid` = `user`.`uid` 
1441                         WHERE `contact`.`self` = 1 AND `contact`.`id` = %d LIMIT 1",
1442                         intval($x['cid'])
1443                 );
1444                 if(! count($r))
1445                         continue;
1446
1447                 $userdata = $r[0];
1448
1449                 //logger('pumpio_queue: fetching userdata '.print_r($userdata, true));
1450
1451                 $oauth_token = get_pconfig($userdata['uid'], "pumpio", "oauth_token");
1452                 $oauth_token_secret = get_pconfig($userdata['uid'], "pumpio", "oauth_token_secret");
1453                 $consumer_key = get_pconfig($userdata['uid'], "pumpio","consumer_key");
1454                 $consumer_secret = get_pconfig($userdata['uid'], "pumpio","consumer_secret");
1455
1456                 $host = get_pconfig($userdata['uid'], "pumpio", "host");
1457                 $user = get_pconfig($userdata['uid'], "pumpio", "user");
1458
1459                 $success = false;
1460
1461                 if ($oauth_token AND $oauth_token_secret AND
1462                         $consumer_key AND $consumer_secret) {
1463                         $username = $user.'@'.$host;
1464
1465                         logger('pumpio_queue: able to post for user '.$username);
1466
1467                         $z = unserialize($x['content']);
1468
1469                         $client = new oauth_client_class;
1470                         $client->oauth_version = '1.0a';
1471                         $client->url_parameters = false;
1472                         $client->authorization_header = true;
1473                         $client->access_token = $oauth_token;
1474                         $client->access_token_secret = $oauth_token_secret;
1475                         $client->client_id = $consumer_key;
1476                         $client->client_secret = $consumer_secret;
1477
1478                         $success = $client->CallAPI($z['url'], 'POST', $z['post'], array('FailOnAccessError'=>true, 'RequestContentType'=>'application/json'), $user);
1479
1480                         if($success) {
1481                                 $post_id = $user->object->id;
1482                                 logger('pumpio_queue: send '.$username.': success '.$post_id);
1483                                 if($post_id AND $iscomment) {
1484                                         logger('pumpio_send '.$username.': Update extid '.$post_id." for post id ".$z['item']);
1485                                         q("UPDATE `item` SET `extid` = '%s' WHERE `id` = %d",
1486                                                 dbesc($post_id),
1487                                                 intval($z['item'])
1488                                         );
1489                                 }
1490                                 remove_queue_item($x['id']);
1491                         } else
1492                                 logger('pumpio_queue: send '.$username.': '.$url.' general error: ' . print_r($user,true));
1493                 } else
1494                         logger("pumpio_queue: Error getting tokens for user ".$userdata['uid']);
1495
1496                 if (!$success) {
1497                         logger('pumpio_queue: delayed');
1498                         update_queue_time($x['id']);
1499                 }
1500         }
1501 }
1502
1503 function pumpio_getreceiver(&$a, $b) {
1504
1505         $receiver = array();
1506
1507         if (!$b["private"]) {
1508
1509                 if(! strstr($b['postopts'],'pumpio'))
1510                         return $receiver;
1511
1512                 $public = get_pconfig($b['uid'], "pumpio", "public");
1513
1514                 if ($public)
1515                         $receiver["to"][] = Array(
1516                                                 "objectType" => "collection",
1517                                                 "id" => "http://activityschema.org/collection/public");
1518         } else {
1519                 $cids = explode("><", $b["allow_cid"]);
1520                 $gids = explode("><", $b["allow_gid"]);
1521
1522                 foreach ($cids AS $cid) {
1523                         $cid = trim($cid, " <>");
1524
1525                         $r = q("SELECT `name`, `nick`, `url` FROM `contact` WHERE `id` = %d AND `uid` = %d AND `network` = '%s' AND `blocked` = 0 AND `readonly` = 0 LIMIT 1",
1526                                 intval($cid),
1527                                 intval($b["uid"]),
1528                                 dbesc(NETWORK_PUMPIO)
1529                                 );
1530
1531                         if (count($r)) {
1532                                 $receiver["bcc"][] = Array(
1533                                                         "displayName" => $r[0]["name"],
1534                                                         "objectType" => "person",
1535                                                         "preferredUsername" => $r[0]["nick"],
1536                                                         "url" => $r[0]["url"]);
1537                         }
1538                 }
1539                 foreach ($gids AS $gid) {
1540                         $gid = trim($gid, " <>");
1541
1542                         $r = q("SELECT `contact`.`name`, `contact`.`nick`, `contact`.`url`, `contact`.`network` ".
1543                                 "FROM `group_member`, `contact` WHERE `group_member`.`gid` = %d AND `group_member`.`uid` = %d ".
1544                                 "AND `contact`.`id` = `group_member`.`contact-id` AND `contact`.`network` = '%s'",
1545                                         intval($gid),
1546                                         intval($b["uid"]),
1547                                         dbesc(NETWORK_PUMPIO)
1548                                 );
1549
1550                         foreach ($r AS $row)
1551                                 $receiver["bcc"][] = Array(
1552                                                         "displayName" => $row["name"],
1553                                                         "objectType" => "person",
1554                                                         "preferredUsername" => $row["nick"],
1555                                                         "url" => $row["url"]);
1556                 }
1557         }
1558
1559         if ($b["inform"] != "") {
1560
1561                 $inform = explode(",", $b["inform"]);
1562
1563                 foreach ($inform AS $cid) {
1564                         if (substr($cid, 0, 4) != "cid:")
1565                                 continue;
1566
1567                         $cid = str_replace("cid:", "", $cid);
1568
1569                         $r = q("SELECT `name`, `nick`, `url` FROM `contact` WHERE `id` = %d AND `uid` = %d AND `network` = '%s' AND `blocked` = 0 AND `readonly` = 0 LIMIT 1",
1570                                 intval($cid),
1571                                 intval($b["uid"]),
1572                                 dbesc(NETWORK_PUMPIO)
1573                                 );
1574
1575                         if (count($r)) {
1576                                         $receiver["to"][] = Array(
1577                                                                 "displayName" => $r[0]["name"],
1578                                                                 "objectType" => "person",
1579                                                                 "preferredUsername" => $r[0]["nick"],
1580                                                                 "url" => $r[0]["url"]);
1581                         }
1582                 }
1583         }
1584
1585         return $receiver;
1586 }
1587
1588 function pumpio_fetchallcomments(&$a, $uid, $id) {
1589         $ckey    = get_pconfig($uid, 'pumpio', 'consumer_key');
1590         $csecret = get_pconfig($uid, 'pumpio', 'consumer_secret');
1591         $otoken  = get_pconfig($uid, 'pumpio', 'oauth_token');
1592         $osecret = get_pconfig($uid, 'pumpio', 'oauth_token_secret');
1593         $hostname = get_pconfig($uid, 'pumpio','host');
1594         $username = get_pconfig($uid, "pumpio", "user");
1595
1596         logger("pumpio_fetchallcomments: completing comment for user ".$uid." post id ".$id);
1597
1598         $own_id = "https://".$hostname."/".$username;
1599
1600         $self = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
1601                 intval($uid));
1602
1603         // Fetching the original post
1604         $r = q("SELECT `extid` FROM `item` WHERE `uri` = '%s' AND `uid` = %d AND `extid` != '' LIMIT 1",
1605                         dbesc($id),
1606                         intval($uid)
1607                 );
1608
1609         if (!count($r))
1610                 return false;
1611
1612         $url = $r[0]["extid"];
1613
1614         $client = new oauth_client_class;
1615         $client->oauth_version = '1.0a';
1616         $client->authorization_header = true;
1617         $client->url_parameters = false;
1618
1619         $client->client_id = $ckey;
1620         $client->client_secret = $csecret;
1621         $client->access_token = $otoken;
1622         $client->access_token_secret = $osecret;
1623
1624         logger("pumpio_fetchallcomments: fetching comment for user ".$uid." url ".$url);
1625
1626         $success = $client->CallAPI($url, 'GET', array(), array('FailOnAccessError'=>true), $item);
1627
1628         if (!$success)
1629                 return;
1630
1631         if ($item->likes->totalItems != 0) {
1632                 foreach ($item->likes->items AS $post) {
1633                         $like = new stdClass;
1634                         $like->object = new stdClass;
1635                         $like->object->id = $item->id;
1636                         $like->actor = new stdClass;
1637                         $like->actor->displayName = $item->displayName;
1638                         $like->actor->preferredUsername = $item->preferredUsername;
1639                         $like->actor->url = $item->url;
1640                         $like->actor->image = $item->image;
1641                         $like->generator = new stdClass;
1642                         $like->generator->displayName = "pumpio";
1643                         pumpio_dolike($a, $uid, $self, $post, $own_id, false);
1644                 }
1645         }
1646
1647         if ($item->replies->totalItems == 0)
1648                 return;
1649
1650         foreach ($item->replies->items AS $item) {
1651                 if ($item->id == $id)
1652                         continue;
1653
1654                 // Checking if the comment already exists - Two queries for speed issues
1655                 $r = q("SELECT extid FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
1656                                 dbesc($item->id),
1657                                 intval($uid)
1658                         );
1659
1660                 if (count($r))
1661                         continue;
1662
1663                 $r = q("SELECT extid FROM `item` WHERE `extid` = '%s' AND `uid` = %d LIMIT 1",
1664                                 dbesc($item->id),
1665                                 intval($uid)
1666                         );
1667
1668                 if (count($r))
1669                         continue;
1670
1671                 $post = new stdClass;
1672                 $post->verb = "post";
1673                 $post->actor = $item->author;
1674                 $post->published = $item->published;
1675                 $post->received = $item->updated;
1676                 $post->generator = new stdClass;
1677                 $post->generator->displayName = "pumpio";
1678                 // To-Do: Check for public post
1679
1680                 unset($item->author);
1681                 unset($item->published);
1682                 unset($item->updated);
1683
1684                 $post->object = $item;
1685
1686                 logger("pumpio_fetchallcomments: posting comment ".$post->object->id." ".print_r($post, true));
1687                 pumpio_dopost($a, $client, $uid, $self, $post, $own_id, false);
1688         }
1689 }
1690
1691 /*
1692 To-Do:
1693  - edit own notes
1694  - delete own notes
1695 */