]> git.mxchange.org Git - friendica.git/blob - include/ostatus.php
Merge pull request #2099 from rabuzarus/2611_new_user_addr
[friendica.git] / include / ostatus.php
1 <?php
2 require_once("include/Contact.php");
3 require_once("include/threads.php");
4 require_once("include/html2bbcode.php");
5 require_once("include/items.php");
6 require_once("mod/share.php");
7 require_once("include/enotify.php");
8 require_once("include/socgraph.php");
9 require_once("include/Photo.php");
10 require_once("include/Scrape.php");
11 require_once("include/follow.php");
12
13 define('OSTATUS_DEFAULT_POLL_INTERVAL', 30); // given in minutes
14 define('OSTATUS_DEFAULT_POLL_TIMEFRAME', 1440); // given in minutes
15 define('OSTATUS_DEFAULT_POLL_TIMEFRAME_MENTIONS', 14400); // given in minutes
16
17 define("NS_ATOM", "http://www.w3.org/2005/Atom");
18 define("NS_THR", "http://purl.org/syndication/thread/1.0");
19 define("NS_GEORSS", "http://www.georss.org/georss");
20 define("NS_ACTIVITY", "http://activitystrea.ms/spec/1.0/");
21 define("NS_MEDIA", "http://purl.org/syndication/atommedia");
22 define("NS_POCO", "http://portablecontacts.net/spec/1.0");
23 define("NS_OSTATUS", "http://ostatus.org/schema/1.0");
24 define("NS_STATUSNET", "http://status.net/schema/api/1/");
25
26 function ostatus_check_follow_friends() {
27         $r = q("SELECT `uid`,`v` FROM `pconfig` WHERE `cat`='system' AND `k`='ostatus_legacy_contact' AND `v` != ''");
28
29         if (!$r)
30                 return;
31
32         foreach ($r AS $contact) {
33                 ostatus_follow_friends($contact["uid"], $contact["v"]);
34                 set_pconfig($contact["uid"], "system", "ostatus_legacy_contact", "");
35         }
36 }
37
38 // This function doesn't work reliable by now.
39 function ostatus_follow_friends($uid, $url) {
40         $contact = probe_url($url);
41
42         if (!$contact)
43                 return;
44
45         $api = $contact["baseurl"]."/api/";
46
47         // Fetching friends
48         $data = z_fetch_url($api."statuses/friends.json?screen_name=".$contact["nick"]);
49
50         if (!$data["success"])
51                 return;
52
53         $friends = json_decode($data["body"]);
54
55         foreach ($friends AS $friend) {
56                 $url = $friend->statusnet_profile_url;
57                 $r = q("SELECT `url` FROM `contact` WHERE `uid` = %d AND
58                         (`nurl` = '%s' OR `alias` = '%s' OR `alias` = '%s') AND
59                         `network` != '%s' LIMIT 1",
60                         intval($uid), dbesc(normalise_link($url)),
61                         dbesc(normalise_link($url)), dbesc($url), dbesc(NETWORK_STATUSNET));
62                 if (!$r) {
63                         $data = probe_url($friend->statusnet_profile_url);
64                         if ($data["network"] == NETWORK_OSTATUS) {
65                                 $result = new_contact($uid,$friend->statusnet_profile_url);
66                                 if ($result["success"])
67                                         logger($friend->name." ".$url." - success", LOGGER_DEBUG);
68                                 else
69                                         logger($friend->name." ".$url." - failed", LOGGER_DEBUG);
70                         } else
71                                 logger($friend->name." ".$url." - not OStatus", LOGGER_DEBUG);
72                 }
73         }
74 }
75
76 function ostatus_fetchauthor($xpath, $context, $importer, &$contact, $onlyfetch) {
77
78         $author = array();
79         $author["author-link"] = $xpath->evaluate('atom:author/atom:uri/text()', $context)->item(0)->nodeValue;
80         $author["author-name"] = $xpath->evaluate('atom:author/atom:name/text()', $context)->item(0)->nodeValue;
81
82         // Preserve the value
83         $authorlink = $author["author-link"];
84
85         $alternate = $xpath->query("atom:author/atom:link[@rel='alternate']", $context)->item(0)->attributes;
86         if (is_object($alternate))
87                 foreach($alternate AS $attributes)
88                         if ($attributes->name == "href")
89                                 $author["author-link"] = $attributes->textContent;
90
91         $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `nurl` IN ('%s', '%s') AND `network` != '%s'",
92                 intval($importer["uid"]), dbesc(normalise_link($author["author-link"])),
93                 dbesc(normalise_link($authorlink)), dbesc(NETWORK_STATUSNET));
94         if ($r) {
95                 $contact = $r[0];
96                 $author["contact-id"] = $r[0]["id"];
97         } else
98                 $author["contact-id"] = $contact["id"];
99
100         $avatarlist = array();
101         $avatars = $xpath->query("atom:author/atom:link[@rel='avatar']", $context);
102         foreach($avatars AS $avatar) {
103                 $href = "";
104                 $width = 0;
105                 foreach($avatar->attributes AS $attributes) {
106                         if ($attributes->name == "href")
107                                 $href = $attributes->textContent;
108                         if ($attributes->name == "width")
109                                 $width = $attributes->textContent;
110                 }
111                 if (($width > 0) AND ($href != ""))
112                         $avatarlist[$width] = $href;
113         }
114         if (count($avatarlist) > 0) {
115                 krsort($avatarlist);
116                 $author["author-avatar"] = current($avatarlist);
117         }
118
119         $displayname = $xpath->evaluate('atom:author/poco:displayName/text()', $context)->item(0)->nodeValue;
120         if ($displayname != "")
121                 $author["author-name"] = $displayname;
122
123         $author["owner-name"] = $author["author-name"];
124         $author["owner-link"] = $author["author-link"];
125         $author["owner-avatar"] = $author["author-avatar"];
126
127         if ($r AND !$onlyfetch) {
128                 // Update contact data
129                 $update_contact = ($r[0]['name-date'] < datetime_convert('','','now -12 hours'));
130                 if ($update_contact) {
131                         logger("Update contact data for contact ".$contact["id"], LOGGER_DEBUG);
132
133                         $value = $xpath->evaluate('atom:author/poco:displayName/text()', $context)->item(0)->nodeValue;
134                         if ($value != "")
135                                 $contact["name"] = $value;
136
137                         $value = $xpath->evaluate('atom:author/poco:preferredUsername/text()', $context)->item(0)->nodeValue;
138                         if ($value != "")
139                                 $contact["nick"] = $value;
140
141                         $value = $xpath->evaluate('atom:author/poco:note/text()', $context)->item(0)->nodeValue;
142                         if ($value != "")
143                                 $contact["about"] = $value;
144
145                         $value = $xpath->evaluate('atom:author/poco:address/poco:formatted/text()', $context)->item(0)->nodeValue;
146                         if ($value != "")
147                                 $contact["location"] = $value;
148
149                         q("UPDATE `contact` SET `name` = '%s', `nick` = '%s', `about` = '%s', `location` = '%s', `name-date` = '%s' WHERE `id` = %d AND `network` = '%s'",
150                                 dbesc($contact["name"]), dbesc($contact["nick"]), dbesc($contact["about"]), dbesc($contact["location"]),
151                                 dbesc(datetime_convert()), intval($contact["id"]), dbesc(NETWORK_OSTATUS));
152
153                         poco_check($contact["url"], $contact["name"], $contact["network"], $author["author-avatar"], $contact["about"], $contact["location"],
154                                         "", "", "", datetime_convert(), 2, $contact["id"], $contact["uid"]);
155                 }
156
157                 $update_photo = ($r[0]['avatar-date'] < datetime_convert('','','now -12 hours'));
158
159                 if ($update_photo AND isset($author["author-avatar"])) {
160                         logger("Update profile picture for contact ".$contact["id"], LOGGER_DEBUG);
161
162                         $photos = import_profile_photo($author["author-avatar"], $importer["uid"], $contact["id"]);
163
164                         q("UPDATE `contact` SET `photo` = '%s', `thumb` = '%s', `micro` = '%s', `avatar-date` = '%s' WHERE `id` = %d AND `network` = '%s'",
165                                 dbesc($photos[0]), dbesc($photos[1]), dbesc($photos[2]),
166                                 dbesc(datetime_convert()), intval($contact["id"]), dbesc(NETWORK_OSTATUS));
167                 }
168         }
169
170         return($author);
171 }
172
173 function ostatus_salmon_author($xml, $importer) {
174         $a = get_app();
175
176         if ($xml == "")
177                 return;
178
179         $doc = new DOMDocument();
180         @$doc->loadXML($xml);
181
182         $xpath = new DomXPath($doc);
183         $xpath->registerNamespace('atom', "http://www.w3.org/2005/Atom");
184         $xpath->registerNamespace('thr', "http://purl.org/syndication/thread/1.0");
185         $xpath->registerNamespace('georss', "http://www.georss.org/georss");
186         $xpath->registerNamespace('activity', "http://activitystrea.ms/spec/1.0/");
187         $xpath->registerNamespace('media', "http://purl.org/syndication/atommedia");
188         $xpath->registerNamespace('poco', "http://portablecontacts.net/spec/1.0");
189         $xpath->registerNamespace('ostatus', "http://ostatus.org/schema/1.0");
190         $xpath->registerNamespace('statusnet', "http://status.net/schema/api/1/");
191
192         $entries = $xpath->query('/atom:entry');
193
194         foreach ($entries AS $entry) {
195                 // fetch the author
196                 $author = ostatus_fetchauthor($xpath, $entry, $importer, $contact, true);
197                 return $author;
198         }
199 }
200
201 function ostatus_import($xml,$importer,&$contact, &$hub) {
202
203         $a = get_app();
204
205         logger("Import OStatus message", LOGGER_DEBUG);
206
207         if ($xml == "")
208                 return;
209
210         $doc = new DOMDocument();
211         @$doc->loadXML($xml);
212
213         $xpath = new DomXPath($doc);
214         $xpath->registerNamespace('atom', "http://www.w3.org/2005/Atom");
215         $xpath->registerNamespace('thr', "http://purl.org/syndication/thread/1.0");
216         $xpath->registerNamespace('georss', "http://www.georss.org/georss");
217         $xpath->registerNamespace('activity', "http://activitystrea.ms/spec/1.0/");
218         $xpath->registerNamespace('media', "http://purl.org/syndication/atommedia");
219         $xpath->registerNamespace('poco', "http://portablecontacts.net/spec/1.0");
220         $xpath->registerNamespace('ostatus', "http://ostatus.org/schema/1.0");
221         $xpath->registerNamespace('statusnet', "http://status.net/schema/api/1/");
222
223         $gub = "";
224         $hub_attributes = $xpath->query("/atom:feed/atom:link[@rel='hub']")->item(0)->attributes;
225         if (is_object($hub_attributes))
226                 foreach($hub_attributes AS $hub_attribute)
227                         if ($hub_attribute->name == "href") {
228                                 $hub = $hub_attribute->textContent;
229                                 logger("Found hub ".$hub, LOGGER_DEBUG);
230                         }
231
232         $header = array();
233         $header["uid"] = $importer["uid"];
234         $header["network"] = NETWORK_OSTATUS;
235         $header["type"] = "remote";
236         $header["wall"] = 0;
237         $header["origin"] = 0;
238         $header["gravity"] = GRAVITY_PARENT;
239
240         // it could either be a received post or a post we fetched by ourselves
241         // depending on that, the first node is different
242         $first_child = $doc->firstChild->tagName;
243
244         if ($first_child == "feed")
245                 $entries = $xpath->query('/atom:feed/atom:entry');
246         else
247                 $entries = $xpath->query('/atom:entry');
248
249         $conversation = "";
250         $conversationlist = array();
251         $item_id = 0;
252
253         // Reverse the order of the entries
254         $entrylist = array();
255
256         foreach ($entries AS $entry)
257                 $entrylist[] = $entry;
258
259         foreach (array_reverse($entrylist) AS $entry) {
260
261                 $mention = false;
262
263                 // fetch the author
264                 if ($first_child == "feed")
265                         $author = ostatus_fetchauthor($xpath, $doc->firstChild, $importer, $contact, false);
266                 else
267                         $author = ostatus_fetchauthor($xpath, $entry, $importer, $contact, false);
268
269                 $value = $xpath->evaluate('atom:author/poco:preferredUsername/text()', $context)->item(0)->nodeValue;
270                 if ($value != "")
271                         $nickname = $value;
272                 else
273                         $nickname = $author["author-name"];
274
275                 $item = array_merge($header, $author);
276
277                 // Now get the item
278                 $item["uri"] = $xpath->query('atom:id/text()', $entry)->item(0)->nodeValue;
279
280                 $r = q("SELECT `id` FROM `item` WHERE `uid` = %d AND `uri` = '%s'",
281                         intval($importer["uid"]), dbesc($item["uri"]));
282                 if ($r) {
283                         logger("Item with uri ".$item["uri"]." for user ".$importer["uid"]." already existed under id ".$r[0]["id"], LOGGER_DEBUG);
284                         continue;
285                 }
286
287                 $item["body"] = add_page_info_to_body(html2bbcode($xpath->query('atom:content/text()', $entry)->item(0)->nodeValue));
288                 $item["object-type"] = $xpath->query('activity:object-type/text()', $entry)->item(0)->nodeValue;
289
290                 if (($item["object-type"] == ACTIVITY_OBJ_BOOKMARK) OR ($item["object-type"] == ACTIVITY_OBJ_EVENT)) {
291                         $item["title"] = $xpath->query('atom:title/text()', $entry)->item(0)->nodeValue;
292                         $item["body"] = $xpath->query('atom:summary/text()', $entry)->item(0)->nodeValue;
293                 } elseif ($item["object-type"] == ACTIVITY_OBJ_QUESTION)
294                         $item["title"] = $xpath->query('atom:title/text()', $entry)->item(0)->nodeValue;
295
296                 $item["object"] = $xml;
297                 $item["verb"] = $xpath->query('activity:verb/text()', $entry)->item(0)->nodeValue;
298
299                 // To-Do:
300                 // Delete a message
301                 if ($item["verb"] == "qvitter-delete-notice") {
302                         // ignore "Delete" messages (by now)
303                         logger("Ignore delete message ".print_r($item, true));
304                         continue;
305                 }
306
307                 if ($item["verb"] == ACTIVITY_JOIN) {
308                         // ignore "Join" messages
309                         logger("Ignore join message ".print_r($item, true));
310                         continue;
311                 }
312
313                 if ($item["verb"] == ACTIVITY_FOLLOW) {
314                         new_follower($importer, $contact, $item, $nickname);
315                         continue;
316                 }
317
318                 if ($item["verb"] == NAMESPACE_OSTATUS."/unfollow") {
319                         lose_follower($importer, $contact, $item, $dummy);
320                         continue;
321                 }
322
323                 if ($item["verb"] == ACTIVITY_FAVORITE) {
324                         $orig_uri = $xpath->query("activity:object/atom:id", $entry)->item(0)->nodeValue;
325                         logger("Favorite ".$orig_uri." ".print_r($item, true));
326
327                         $item["verb"] = ACTIVITY_LIKE;
328                         $item["parent-uri"] = $orig_uri;
329                         $item["gravity"] = GRAVITY_LIKE;
330                 }
331
332                 if ($item["verb"] == NAMESPACE_OSTATUS."/unfavorite") {
333                         // Ignore "Unfavorite" message
334                         logger("Ignore unfavorite message ".print_r($item, true));
335                         continue;
336                 }
337
338                 // http://activitystrea.ms/schema/1.0/rsvp-yes
339                 if (!in_array($item["verb"], array(ACTIVITY_POST, ACTIVITY_LIKE, ACTIVITY_SHARE)))
340                         logger("Unhandled verb ".$item["verb"]." ".print_r($item, true));
341
342                 $item["created"] = $xpath->query('atom:published/text()', $entry)->item(0)->nodeValue;
343                 $item["edited"] = $xpath->query('atom:updated/text()', $entry)->item(0)->nodeValue;
344                 $conversation = $xpath->query('ostatus:conversation/text()', $entry)->item(0)->nodeValue;
345
346                 $related = "";
347
348                 $inreplyto = $xpath->query('thr:in-reply-to', $entry);
349                 if (is_object($inreplyto->item(0))) {
350                         foreach($inreplyto->item(0)->attributes AS $attributes) {
351                                 if ($attributes->name == "ref")
352                                         $item["parent-uri"] = $attributes->textContent;
353                                 if ($attributes->name == "href")
354                                         $related = $attributes->textContent;
355                         }
356                 }
357
358                 $georsspoint = $xpath->query('georss:point', $entry);
359                 if ($georsspoint)
360                         $item["coord"] = $georsspoint->item(0)->nodeValue;
361
362                 // To-Do
363                 // $item["location"] =
364
365                 $categories = $xpath->query('atom:category', $entry);
366                 if ($categories) {
367                         foreach ($categories AS $category) {
368                                 foreach($category->attributes AS $attributes)
369                                         if ($attributes->name == "term") {
370                                                 $term = $attributes->textContent;
371                                                 if(strlen($item["tag"]))
372                                                         $item["tag"] .= ',';
373                                                 $item["tag"] .= "#[url=".$a->get_baseurl()."/search?tag=".$term."]".$term."[/url]";
374                                         }
375                         }
376                 }
377
378                 $self = "";
379                 $enclosure = "";
380
381                 $links = $xpath->query('atom:link', $entry);
382                 if ($links) {
383                         $rel = "";
384                         $href = "";
385                         $type = "";
386                         $length = "0";
387                         $title = "";
388                         foreach ($links AS $link) {
389                                 foreach($link->attributes AS $attributes) {
390                                         if ($attributes->name == "href")
391                                                 $href = $attributes->textContent;
392                                         if ($attributes->name == "rel")
393                                                 $rel = $attributes->textContent;
394                                         if ($attributes->name == "type")
395                                                 $type = $attributes->textContent;
396                                         if ($attributes->name == "length")
397                                                 $length = $attributes->textContent;
398                                         if ($attributes->name == "title")
399                                                 $title = $attributes->textContent;
400                                 }
401                                 if (($rel != "") AND ($href != ""))
402                                         switch($rel) {
403                                                 case "alternate":
404                                                         $item["plink"] = $href;
405                                                         if (($item["object-type"] == ACTIVITY_OBJ_QUESTION) OR
406                                                                 ($item["object-type"] == ACTIVITY_OBJ_EVENT))
407                                                                 $item["body"] .= add_page_info($href);
408                                                         break;
409                                                 case "ostatus:conversation":
410                                                         $conversation = $href;
411                                                         break;
412                                                 case "enclosure":
413                                                         $enclosure = $href;
414                                                         if(strlen($item["attach"]))
415                                                                 $item["attach"] .= ',';
416
417                                                         $item["attach"] .= '[attach]href="'.$href.'" length="'.$length.'" type="'.$type.'" title="'.$title.'"[/attach]';
418                                                         break;
419                                                 case "related":
420                                                         if ($item["object-type"] != ACTIVITY_OBJ_BOOKMARK) {
421                                                                 if (!isset($item["parent-uri"]))
422                                                                         $item["parent-uri"] = $href;
423
424                                                                 if ($related == "")
425                                                                         $related = $href;
426                                                         } else
427                                                                 $item["body"] .= add_page_info($href);
428                                                         break;
429                                                 case "self":
430                                                         $self = $href;
431                                                         break;
432                                                 case "mentioned":
433                                                         // Notification check
434                                                         if ($importer["nurl"] == normalise_link($href))
435                                                                 $mention = true;
436                                                         break;
437                                         }
438                         }
439                 }
440
441                 $local_id = "";
442                 $repeat_of = "";
443
444                 $notice_info = $xpath->query('statusnet:notice_info', $entry);
445                 if ($notice_info AND ($notice_info->length > 0)) {
446                         foreach($notice_info->item(0)->attributes AS $attributes) {
447                                 if ($attributes->name == "source")
448                                         $item["app"] = strip_tags($attributes->textContent);
449                                 if ($attributes->name == "local_id")
450                                         $local_id = $attributes->textContent;
451                                 if ($attributes->name == "repeat_of")
452                                         $repeat_of = $attributes->textContent;
453                         }
454                 }
455
456                 // Is it a repeated post?
457                 if ($repeat_of != "") {
458                         $activityobjects = $xpath->query('activity:object', $entry)->item(0);
459
460                         if (is_object($activityobjects)) {
461
462                                 $orig_uri = $xpath->query("activity:object/atom:id", $activityobjects)->item(0)->nodeValue;
463                                 if (!isset($orig_uri))
464                                         $orig_uri = $xpath->query('atom:id/text()', $activityobjects)->item(0)->nodeValue;
465
466                                 $orig_links = $xpath->query("activity:object/atom:link[@rel='alternate']", $activityobjects);
467                                 if ($orig_links AND ($orig_links->length > 0))
468                                         foreach($orig_links->item(0)->attributes AS $attributes)
469                                                 if ($attributes->name == "href")
470                                                         $orig_link = $attributes->textContent;
471
472                                 if (!isset($orig_link))
473                                         $orig_link = $xpath->query("atom:link[@rel='alternate']", $activityobjects)->item(0)->nodeValue;
474
475                                 if (!isset($orig_link))
476                                         $orig_link =  ostatus_convert_href($orig_uri);
477
478                                 $orig_body = $xpath->query('activity:object/atom:content/text()', $activityobjects)->item(0)->nodeValue;
479                                 if (!isset($orig_body))
480                                         $orig_body = $xpath->query('atom:content/text()', $activityobjects)->item(0)->nodeValue;
481
482                                 $orig_created = $xpath->query('atom:published/text()', $activityobjects)->item(0)->nodeValue;
483
484                                 $orig_contact = $contact;
485                                 $orig_author = ostatus_fetchauthor($xpath, $activityobjects, $importer, $orig_contact, false);
486
487                                 //if (!intval(get_config('system','wall-to-wall_share'))) {
488                                 //      $prefix = share_header($orig_author['author-name'], $orig_author['author-link'], $orig_author['author-avatar'], "", $orig_created, $orig_link);
489                                 //      $item["body"] = $prefix.add_page_info_to_body(html2bbcode($orig_body))."[/share]";
490                                 //} else {
491                                         $item["author-name"] = $orig_author["author-name"];
492                                         $item["author-link"] = $orig_author["author-link"];
493                                         $item["author-avatar"] = $orig_author["author-avatar"];
494                                         $item["body"] = add_page_info_to_body(html2bbcode($orig_body));
495                                         $item["created"] = $orig_created;
496
497                                         $item["uri"] = $orig_uri;
498                                         $item["plink"] = $orig_link;
499                                 //}
500
501                                 $item["verb"] = $xpath->query('activity:verb/text()', $activityobjects)->item(0)->nodeValue;
502
503                                 $item["object-type"] = $xpath->query('activity:object/activity:object-type/text()', $activityobjects)->item(0)->nodeValue;
504                                 if (!isset($item["object-type"]))
505                                         $item["object-type"] = $xpath->query('activity:object-type/text()', $activityobjects)->item(0)->nodeValue;
506                         }
507                 }
508
509                 //if ($enclosure != "")
510                 //      $item["body"] .= add_page_info($enclosure);
511
512                 if (isset($item["parent-uri"])) {
513                         $r = q("SELECT `id` FROM `item` WHERE `uid` = %d AND `uri` = '%s'",
514                                 intval($importer["uid"]), dbesc($item["parent-uri"]));
515
516                         if (!$r AND ($related != "")) {
517                                 $reply_path = str_replace("/notice/", "/api/statuses/show/", $related).".atom";
518
519                                 if ($reply_path != $related) {
520                                         logger("Fetching related items for user ".$importer["uid"]." from ".$reply_path, LOGGER_DEBUG);
521                                         $reply_xml = fetch_url($reply_path);
522
523                                         $reply_contact = $contact;
524                                         ostatus_import($reply_xml,$importer,$reply_contact, $reply_hub);
525
526                                         // After the import try to fetch the parent item again
527                                         $r = q("SELECT `id` FROM `item` WHERE `uid` = %d AND `uri` = '%s'",
528                                                 intval($importer["uid"]), dbesc($item["parent-uri"]));
529                                 }
530                         }
531                         if ($r) {
532                                 $item["type"] = 'remote-comment';
533                                 $item["gravity"] = GRAVITY_COMMENT;
534                         }
535                 } else
536                         $item["parent-uri"] = $item["uri"];
537
538                 $item_id = ostatus_completion($conversation, $importer["uid"], $item);
539
540                 if (!$item_id) {
541                         logger("Error storing item", LOGGER_DEBUG);
542                         continue;
543                 }
544
545                 logger("Item was stored with id ".$item_id, LOGGER_DEBUG);
546                 $item["id"] = $item_id;
547
548                 if ($mention) {
549                         $u = q("SELECT `notify-flags`, `language`, `username`, `email` FROM user WHERE uid = %d LIMIT 1", intval($item['uid']));
550                         $r = q("SELECT `parent` FROM `item` WHERE `id` = %d", intval($item_id));
551
552                         notification(array(
553                                 'type'         => NOTIFY_TAGSELF,
554                                 'notify_flags' => $u[0]["notify-flags"],
555                                 'language'     => $u[0]["language"],
556                                 'to_name'      => $u[0]["username"],
557                                 'to_email'     => $u[0]["email"],
558                                 'uid'          => $item["uid"],
559                                 'item'         => $item,
560                                 'link'         => $a->get_baseurl().'/display/'.urlencode(get_item_guid($item_id)),
561                                 'source_name'  => $item["author-name"],
562                                 'source_link'  => $item["author-link"],
563                                 'source_photo' => $item["author-avatar"],
564                                 'verb'         => ACTIVITY_TAG,
565                                 'otype'        => 'item',
566                                 'parent'       => $r[0]["parent"]
567                         ));
568                 }
569         }
570 }
571
572 function ostatus_convert_href($href) {
573         $elements = explode(":",$href);
574
575         if ((count($elements) <= 2) OR ($elements[0] != "tag"))
576                 return $href;
577
578         $server = explode(",", $elements[1]);
579         $conversation = explode("=", $elements[2]);
580
581         if ((count($elements) == 4) AND ($elements[2] == "post"))
582                 return "http://".$server[0]."/notice/".$elements[3];
583
584         if ((count($conversation) != 2) OR ($conversation[1] ==""))
585                 return $href;
586
587         if ($elements[3] == "objectType=thread")
588                 return "http://".$server[0]."/conversation/".$conversation[1];
589         else
590                 return "http://".$server[0]."/notice/".$conversation[1];
591
592         return $href;
593 }
594
595 function check_conversations($mentions = false, $override = false) {
596         $last = get_config('system','ostatus_last_poll');
597
598         $poll_interval = intval(get_config('system','ostatus_poll_interval'));
599         if(! $poll_interval)
600                 $poll_interval = OSTATUS_DEFAULT_POLL_INTERVAL;
601
602         // Don't poll if the interval is set negative
603         if (($poll_interval < 0) AND !$override)
604                 return;
605
606         if (!$mentions) {
607                 $poll_timeframe = intval(get_config('system','ostatus_poll_timeframe'));
608                 if (!$poll_timeframe)
609                         $poll_timeframe = OSTATUS_DEFAULT_POLL_TIMEFRAME;
610         } else {
611                 $poll_timeframe = intval(get_config('system','ostatus_poll_timeframe'));
612                 if (!$poll_timeframe)
613                         $poll_timeframe = OSTATUS_DEFAULT_POLL_TIMEFRAME_MENTIONS;
614         }
615
616
617         if ($last AND !$override) {
618                 $next = $last + ($poll_interval * 60);
619                 if ($next > time()) {
620                         logger('poll interval not reached');
621                         return;
622                 }
623         }
624
625         logger('cron_start');
626
627         $start = date("Y-m-d H:i:s", time() - ($poll_timeframe * 60));
628
629         if ($mentions)
630                 $conversations = q("SELECT `term`.`oid`, `term`.`url`, `term`.`uid` FROM `term`
631                                         STRAIGHT_JOIN `thread` ON `thread`.`iid` = `term`.`oid` AND `thread`.`uid` = `term`.`uid`
632                                         WHERE `term`.`type` = 7 AND `term`.`term` > '%s' AND `thread`.`mention`
633                                         GROUP BY `term`.`url`, `term`.`uid` ORDER BY `term`.`term` DESC", dbesc($start));
634         else
635                 $conversations = q("SELECT `oid`, `url`, `uid` FROM `term`
636                                         WHERE `type` = 7 AND `term` > '%s'
637                                         GROUP BY `url`, `uid` ORDER BY `term` DESC", dbesc($start));
638
639         foreach ($conversations AS $conversation) {
640                 ostatus_completion($conversation['url'], $conversation['uid']);
641         }
642
643         logger('cron_end');
644
645         set_config('system','ostatus_last_poll', time());
646 }
647
648 function ostatus_completion($conversation_url, $uid, $item = array()) {
649
650         $a = get_app();
651
652         $item_stored = -1;
653
654         $conversation_url = ostatus_convert_href($conversation_url);
655
656         // If the thread shouldn't be completed then store the item and go away
657         if ((intval(get_config('system','ostatus_poll_interval')) == -2) AND (count($item) > 0)) {
658                 //$arr["app"] .= " (OStatus-NoCompletion)";
659                 $item_stored = item_store($item, true);
660                 return($item_stored);
661         }
662
663         // Get the parent
664         $parents = q("SELECT `id`, `parent`, `uri`, `contact-id`, `type`, `verb`, `visible` FROM `item` WHERE `id` IN
665                         (SELECT `parent` FROM `item` WHERE `id` IN
666                                 (SELECT `oid` FROM `term` WHERE `uid` = %d AND `otype` = %d AND `type` = %d AND `url` = '%s'))",
667                         intval($uid), intval(TERM_OBJ_POST), intval(TERM_CONVERSATION), dbesc($conversation_url));
668
669         if ($parents)
670                 $parent = $parents[0];
671         elseif (count($item) > 0) {
672                 $parent = $item;
673                 $parent["type"] = "remote";
674                 $parent["verb"] = ACTIVITY_POST;
675                 $parent["visible"] = 1;
676         } else {
677                 // Preset the parent
678                 $r = q("SELECT `id` FROM `contact` WHERE `self` AND `uid`=%d", $uid);
679                 if (!$r)
680                         return(-2);
681
682                 $parent = array();
683                 $parent["id"] = 0;
684                 $parent["parent"] = 0;
685                 $parent["uri"] = "";
686                 $parent["contact-id"] = $r[0]["id"];
687                 $parent["type"] = "remote";
688                 $parent["verb"] = ACTIVITY_POST;
689                 $parent["visible"] = 1;
690         }
691
692         $conv = str_replace("/conversation/", "/api/statusnet/conversation/", $conversation_url).".as";
693         $pageno = 1;
694         $items = array();
695
696         logger('fetching conversation url '.$conv.' for user '.$uid);
697
698         do {
699                 $conv_arr = z_fetch_url($conv."?page=".$pageno);
700
701                 // If it is a non-ssl site and there is an error, then try ssl or vice versa
702                 if (!$conv_arr["success"] AND (substr($conv, 0, 7) == "http://")) {
703                         $conv = str_replace("http://", "https://", $conv);
704                         $conv_as = fetch_url($conv."?page=".$pageno);
705                 } elseif (!$conv_arr["success"] AND (substr($conv, 0, 8) == "https://")) {
706                         $conv = str_replace("https://", "http://", $conv);
707                         $conv_as = fetch_url($conv."?page=".$pageno);
708                 } else
709                         $conv_as = $conv_arr["body"];
710
711                 $conv_as = str_replace(',"statusnet:notice_info":', ',"statusnet_notice_info":', $conv_as);
712                 $conv_as = json_decode($conv_as);
713
714                 $no_of_items = sizeof($items);
715
716                 if (@is_array($conv_as->items))
717                         foreach ($conv_as->items AS $single_item)
718                                 $items[$single_item->id] = $single_item;
719
720                 if ($no_of_items == sizeof($items))
721                         break;
722
723                 $pageno++;
724
725         } while (true);
726
727         logger('fetching conversation done. Found '.count($items).' items');
728
729         if (!sizeof($items)) {
730                 if (count($item) > 0) {
731                         //$arr["app"] .= " (OStatus-NoConvFetched)";
732                         $item_stored = item_store($item, true);
733
734                         if ($item_stored) {
735                                 logger("Conversation ".$conversation_url." couldn't be fetched. Item uri ".$item["uri"]." stored: ".$item_stored, LOGGER_DEBUG);
736                                 ostatus_store_conversation($item_id, $conversation_url);
737                         }
738
739                         return($item_stored);
740                 } else
741                         return(-3);
742         }
743
744         $items = array_reverse($items);
745
746         $r = q("SELECT `nurl` FROM `contact` WHERE `uid` = %d AND `self`", intval($uid));
747         $importer = $r[0];
748
749         foreach ($items as $single_conv) {
750
751                 // Test - remove before flight
752                 //$tempfile = tempnam(get_temppath(), "conversation");
753                 //file_put_contents($tempfile, json_encode($single_conv));
754
755                 $mention = false;
756
757                 if (isset($single_conv->object->id))
758                         $single_conv->id = $single_conv->object->id;
759
760                 $plink = ostatus_convert_href($single_conv->id);
761                 if (isset($single_conv->object->url))
762                         $plink = ostatus_convert_href($single_conv->object->url);
763
764                 if (@!$single_conv->id)
765                         continue;
766
767                 logger("Got id ".$single_conv->id, LOGGER_DEBUG);
768
769                 if ($first_id == "") {
770                         $first_id = $single_conv->id;
771
772                         // The first post of the conversation isn't our first post. There are three options:
773                         // 1. Our conversation hasn't the "real" thread starter
774                         // 2. This first post is a post inside our thread
775                         // 3. This first post is a post inside another thread
776                         if (($first_id != $parent["uri"]) AND ($parent["uri"] != "")) {
777                                 $new_parents = q("SELECT `id`, `parent`, `uri`, `contact-id`, `type`, `verb`, `visible` FROM `item` WHERE `id` IN
778                                                         (SELECT `parent` FROM `item`
779                                                                 WHERE `uid` = %d AND `uri` = '%s' AND `network` IN ('%s','%s')) LIMIT 1",
780                                         intval($uid), dbesc($first_id), dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN));
781                                 if ($new_parents) {
782                                         if ($new_parents[0]["parent"] == $parent["parent"]) {
783                                                 // Option 2: This post is already present inside our thread - but not as thread starter
784                                                 logger("Option 2: uri present in our thread: ".$first_id, LOGGER_DEBUG);
785                                                 $first_id = $parent["uri"];
786                                         } else {
787                                                 // Option 3: Not so good. We have mixed parents. We have to see how to clean this up.
788                                                 // For now just take the new parent.
789                                                 $parent = $new_parents[0];
790                                                 $first_id = $parent["uri"];
791                                                 logger("Option 3: mixed parents for uri ".$first_id, LOGGER_DEBUG);
792                                         }
793                                 } else {
794                                         // Option 1: We hadn't got the real thread starter
795                                         // We have to clean up our existing messages.
796                                         $parent["id"] = 0;
797                                         $parent["uri"] = $first_id;
798                                         logger("Option 1: we have a new parent: ".$first_id, LOGGER_DEBUG);
799                                 }
800                         } elseif ($parent["uri"] == "") {
801                                 $parent["id"] = 0;
802                                 $parent["uri"] = $first_id;
803                         }
804                 }
805
806                 $parent_uri = $parent["uri"];
807
808                 // "context" only seems to exist on older servers
809                 if (isset($single_conv->context->inReplyTo->id)) {
810                         $parent_exists = q("SELECT `id` FROM `item` WHERE `uid` = %d AND `uri` = '%s' AND `network` IN ('%s','%s') LIMIT 1",
811                                                 intval($uid), dbesc($single_conv->context->inReplyTo->id), dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN));
812                         if ($parent_exists)
813                                 $parent_uri = $single_conv->context->inReplyTo->id;
814                 }
815
816                 // This is the current way
817                 if (isset($single_conv->object->inReplyTo->id)) {
818                         $parent_exists = q("SELECT `id` FROM `item` WHERE `uid` = %d AND `uri` = '%s' AND `network` IN ('%s','%s') LIMIT 1",
819                                                 intval($uid), dbesc($single_conv->object->inReplyTo->id), dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN));
820                         if ($parent_exists)
821                                 $parent_uri = $single_conv->object->inReplyTo->id;
822                 }
823
824                 $message_exists = q("SELECT `id`, `parent`, `uri` FROM `item` WHERE `uid` = %d AND `uri` = '%s' AND `network` IN ('%s','%s') LIMIT 1",
825                                                 intval($uid), dbesc($single_conv->id),
826                                                 dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN));
827                 if ($message_exists) {
828                         logger("Message ".$single_conv->id." already existed on the system", LOGGER_DEBUG);
829
830                         if ($parent["id"] != 0) {
831                                 $existing_message = $message_exists[0];
832
833                                 // We improved the way we fetch OStatus messages, this shouldn't happen very often now
834                                 // To-Do: we have to change the shadow copies as well. This way here is really ugly.
835                                 if ($existing_message["parent"] != $parent["id"]) {
836                                         logger('updating id '.$existing_message["id"].' with parent '.$existing_message["parent"].' to parent '.$parent["id"].' uri '.$parent["uri"].' thread '.$parent_uri, LOGGER_DEBUG);
837
838                                         // Update the parent id of the selected item
839                                         $r = q("UPDATE `item` SET `parent` = %d, `parent-uri` = '%s' WHERE `id` = %d",
840                                                 intval($parent["id"]), dbesc($parent["uri"]), intval($existing_message["id"]));
841
842                                         // Update the parent uri in the thread - but only if it points to itself
843                                         $r = q("UPDATE `item` SET `thr-parent` = '%s' WHERE `id` = %d AND `uri` = `thr-parent`",
844                                                 dbesc($parent_uri), intval($existing_message["id"]));
845
846                                         // try to change all items of the same parent
847                                         $r = q("UPDATE `item` SET `parent` = %d, `parent-uri` = '%s' WHERE `parent` = %d",
848                                                 intval($parent["id"]), dbesc($parent["uri"]), intval($existing_message["parent"]));
849
850                                         // Update the parent uri in the thread - but only if it points to itself
851                                         $r = q("UPDATE `item` SET `thr-parent` = '%s' WHERE (`parent` = %d) AND (`uri` = `thr-parent`)",
852                                                 dbesc($parent["uri"]), intval($existing_message["parent"]));
853
854                                         // Now delete the thread
855                                         delete_thread($existing_message["parent"]);
856                                 }
857                         }
858
859                         // The item we are having on the system is the one that we wanted to store via the item array
860                         if (isset($item["uri"]) AND ($item["uri"] == $existing_message["uri"])) {
861                                 $item = array();
862                                 $item_stored = 0;
863                         }
864
865                         continue;
866                 }
867
868                 if (is_array($single_conv->to))
869                         foreach($single_conv->to AS $to)
870                                 if ($importer["nurl"] == normalise_link($to->id))
871                                         $mention = true;
872
873                 $actor = $single_conv->actor->id;
874                 if (isset($single_conv->actor->url))
875                         $actor = $single_conv->actor->url;
876
877                 $contact = q("SELECT `id` FROM `contact` WHERE `uid` = %d AND `nurl` = '%s' AND `network` != '%s'",
878                                 $uid, normalise_link($actor), NETWORK_STATUSNET);
879
880                 if (count($contact)) {
881                         logger("Found contact for url ".$actor, LOGGER_DEBUG);
882                         $contact_id = $contact[0]["id"];
883                 } else {
884                         logger("No contact found for url ".$actor, LOGGER_DEBUG);
885
886                         // Adding a global contact
887                         // To-Do: Use this data for the post
888                         $global_contact_id = get_contact($actor, 0);
889
890                         logger("Global contact ".$global_contact_id." found for url ".$actor, LOGGER_DEBUG);
891
892                         $contact_id = $parent["contact-id"];
893                 }
894
895                 $arr = array();
896                 $arr["network"] = NETWORK_OSTATUS;
897                 $arr["uri"] = $single_conv->id;
898                 $arr["plink"] = $plink;
899                 $arr["uid"] = $uid;
900                 $arr["contact-id"] = $contact_id;
901                 $arr["parent-uri"] = $parent_uri;
902                 $arr["created"] = $single_conv->published;
903                 $arr["edited"] = $single_conv->published;
904                 $arr["owner-name"] = $single_conv->actor->displayName;
905                 if ($arr["owner-name"] == '')
906                         $arr["owner-name"] = $single_conv->actor->contact->displayName;
907                 if ($arr["owner-name"] == '')
908                         $arr["owner-name"] = $single_conv->actor->portablecontacts_net->displayName;
909
910                 $arr["owner-link"] = $actor;
911                 $arr["owner-avatar"] = $single_conv->actor->image->url;
912                 $arr["author-name"] = $arr["owner-name"];
913                 $arr["author-link"] = $actor;
914                 $arr["author-avatar"] = $single_conv->actor->image->url;
915                 $arr["body"] = add_page_info_to_body(html2bbcode($single_conv->content));
916
917                 if (isset($single_conv->status_net->notice_info->source))
918                         $arr["app"] = strip_tags($single_conv->status_net->notice_info->source);
919                 elseif (isset($single_conv->statusnet->notice_info->source))
920                         $arr["app"] = strip_tags($single_conv->statusnet->notice_info->source);
921                 elseif (isset($single_conv->statusnet_notice_info->source))
922                         $arr["app"] = strip_tags($single_conv->statusnet_notice_info->source);
923                 elseif (isset($single_conv->provider->displayName))
924                         $arr["app"] = $single_conv->provider->displayName;
925                 else
926                         $arr["app"] = "OStatus";
927
928                 //$arr["app"] .= " (Conversation)";
929
930                 $arr["object"] = json_encode($single_conv);
931                 $arr["verb"] = $parent["verb"];
932                 $arr["visible"] = $parent["visible"];
933                 $arr["location"] = $single_conv->location->displayName;
934                 $arr["coord"] = trim($single_conv->location->lat." ".$single_conv->location->lon);
935
936                 // Is it a reshared item?
937                 if (isset($single_conv->verb) AND ($single_conv->verb == "share") AND isset($single_conv->object)) {
938                         if (is_array($single_conv->object))
939                                 $single_conv->object = $single_conv->object[0];
940
941                         logger("Found reshared item ".$single_conv->object->id);
942
943                         // $single_conv->object->context->conversation;
944
945                         if (isset($single_conv->object->object->id))
946                                 $arr["uri"] = $single_conv->object->object->id;
947                         else
948                                 $arr["uri"] = $single_conv->object->id;
949
950                         if (isset($single_conv->object->object->url))
951                                 $plink = ostatus_convert_href($single_conv->object->object->url);
952                         else
953                                 $plink = ostatus_convert_href($single_conv->object->url);
954
955                         if (isset($single_conv->object->object->content))
956                                 $arr["body"] = add_page_info_to_body(html2bbcode($single_conv->object->object->content));
957                         else
958                                 $arr["body"] = add_page_info_to_body(html2bbcode($single_conv->object->content));
959
960                         $arr["plink"] = $plink;
961
962                         $arr["created"] = $single_conv->object->published;
963                         $arr["edited"] = $single_conv->object->published;
964
965                         $arr["author-name"] = $single_conv->object->actor->displayName;
966                         if ($arr["owner-name"] == '')
967                                 $arr["author-name"] = $single_conv->object->actor->contact->displayName;
968
969                         $arr["author-link"] = $single_conv->object->actor->url;
970                         $arr["author-avatar"] = $single_conv->object->actor->image->url;
971
972                         $arr["app"] = $single_conv->object->provider->displayName."#";
973                         //$arr["verb"] = $single_conv->object->verb;
974
975                         $arr["location"] = $single_conv->object->location->displayName;
976                         $arr["coord"] = trim($single_conv->object->location->lat." ".$single_conv->object->location->lon);
977                 }
978
979                 if ($arr["location"] == "")
980                         unset($arr["location"]);
981
982                 if ($arr["coord"] == "")
983                         unset($arr["coord"]);
984
985                 // Copy fields from given item array
986                 if (isset($item["uri"]) AND (($item["uri"] == $arr["uri"]) OR ($item["uri"] ==  $single_conv->id))) {
987                         $copy_fields = array("owner-name", "owner-link", "owner-avatar", "author-name", "author-link", "author-avatar",
988                                                 "gravity", "body", "object-type", "object", "verb", "created", "edited", "coord", "tag",
989                                                 "title", "attach", "app", "type", "location", "contact-id", "uri");
990                         foreach ($copy_fields AS $field)
991                                 if (isset($item[$field]))
992                                         $arr[$field] = $item[$field];
993
994                         //$arr["app"] .= " (OStatus)";
995                 }
996
997                 $newitem = item_store($arr);
998                 if (!$newitem) {
999                         logger("Item wasn't stored ".print_r($arr, true), LOGGER_DEBUG);
1000                         continue;
1001                 }
1002
1003                 if (isset($item["uri"]) AND ($item["uri"] == $arr["uri"])) {
1004                         $item = array();
1005                         $item_stored = $newitem;
1006                 }
1007
1008                 logger('Stored new item '.$plink.' for parent '.$arr["parent-uri"].' under id '.$newitem, LOGGER_DEBUG);
1009
1010                 // Add the conversation entry (but don't fetch the whole conversation)
1011                 ostatus_store_conversation($newitem, $conversation_url);
1012
1013                 if ($mention) {
1014                         $u = q("SELECT `notify-flags`, `language`, `username`, `email` FROM user WHERE uid = %d LIMIT 1", intval($uid));
1015                         $r = q("SELECT `parent` FROM `item` WHERE `id` = %d", intval($newitem));
1016
1017                         notification(array(
1018                                 'type'         => NOTIFY_TAGSELF,
1019                                 'notify_flags' => $u[0]["notify-flags"],
1020                                 'language'     => $u[0]["language"],
1021                                 'to_name'      => $u[0]["username"],
1022                                 'to_email'     => $u[0]["email"],
1023                                 'uid'          => $uid,
1024                                 'item'         => $arr,
1025                                 'link'         => $a->get_baseurl().'/display/'.urlencode(get_item_guid($newitem)),
1026                                 'source_name'  => $arr["author-name"],
1027                                 'source_link'  => $arr["author-link"],
1028                                 'source_photo' => $arr["author-avatar"],
1029                                 'verb'         => ACTIVITY_TAG,
1030                                 'otype'        => 'item',
1031                                 'parent'       => $r[0]["parent"]
1032                         ));
1033                 }
1034
1035                 // If the newly created item is the top item then change the parent settings of the thread
1036                 // This shouldn't happen anymore. This is supposed to be absolote.
1037                 if ($arr["uri"] == $first_id) {
1038                         logger('setting new parent to id '.$newitem);
1039                         $new_parents = q("SELECT `id`, `uri`, `contact-id`, `type`, `verb`, `visible` FROM `item` WHERE `uid` = %d AND `id` = %d LIMIT 1",
1040                                 intval($uid), intval($newitem));
1041                         if ($new_parents)
1042                                 $parent = $new_parents[0];
1043                 }
1044         }
1045
1046         if (($item_stored < 0) AND (count($item) > 0)) {
1047                 //$arr["app"] .= " (OStatus-NoConvFound)";
1048                 $item_stored = item_store($item, true);
1049                 if ($item_stored) {
1050                         logger("Uri ".$item["uri"]." wasn't found in conversation ".$conversation_url, LOGGER_DEBUG);
1051                         ostatus_store_conversation($item_stored, $conversation_url);
1052                 }
1053         }
1054
1055         return($item_stored);
1056 }
1057
1058 function ostatus_store_conversation($itemid, $conversation_url) {
1059         global $a;
1060
1061         $conversation_url = ostatus_convert_href($conversation_url);
1062
1063         $messages = q("SELECT `uid`, `parent`, `created`, `received`, `guid` FROM `item` WHERE `id` = %d LIMIT 1", intval($itemid));
1064         if (!$messages)
1065                 return;
1066         $message = $messages[0];
1067
1068         // Store conversation url if not done before
1069         $conversation = q("SELECT `url` FROM `term` WHERE `uid` = %d AND `oid` = %d AND `otype` = %d AND `type` = %d",
1070                 intval($message["uid"]), intval($itemid), intval(TERM_OBJ_POST), intval(TERM_CONVERSATION));
1071
1072         if (!$conversation) {
1073                 $r = q("INSERT INTO `term` (`uid`, `oid`, `otype`, `type`, `term`, `url`, `created`, `received`, `guid`) VALUES (%d, %d, %d, %d, '%s', '%s', '%s', '%s', '%s')",
1074                         intval($message["uid"]), intval($itemid), intval(TERM_OBJ_POST), intval(TERM_CONVERSATION),
1075                         dbesc($message["created"]), dbesc($conversation_url), dbesc($message["created"]), dbesc($message["received"]), dbesc($message["guid"]));
1076                 logger('Storing conversation url '.$conversation_url.' for id '.$itemid);
1077         }
1078 }
1079
1080 function xml_add_element($doc, $parent, $element, $value = "", $attributes = array()) {
1081         $element = $doc->createElement($element, xmlify($value));
1082
1083         foreach ($attributes AS $key => $value) {
1084                 $attribute = $doc->createAttribute($key);
1085                 $attribute->value = xmlify($value);
1086                 $element->appendChild($attribute);
1087         }
1088
1089         $parent->appendChild($element);
1090 }
1091
1092 function ostatus_add_header($doc, $owner) {
1093         $a = get_app();
1094
1095         $r = q("SELECT * FROM `profile` WHERE `uid` = %d AND `is-default`",
1096                 intval($owner["uid"]));
1097         if (!$r)
1098                 return;
1099
1100         $profile = $r[0];
1101
1102         $root = $doc->createElementNS(NS_ATOM, 'feed');
1103         $doc->appendChild($root);
1104
1105         $root->setAttribute("xmlns:thr", NS_THR);
1106         $root->setAttribute("xmlns:georss", NS_GEORSS);
1107         $root->setAttribute("xmlns:activity", NS_ACTIVITY);
1108         $root->setAttribute("xmlns:media", NS_MEDIA);
1109         $root->setAttribute("xmlns:poco", NS_POCO);
1110         $root->setAttribute("xmlns:ostatus", NS_OSTATUS);
1111         $root->setAttribute("xmlns:statusnet", NS_STATUSNET);
1112
1113         $attributes = array("uri" => "https://friendi.ca", "version" => FRIENDICA_VERSION."-".DB_UPDATE_VERSION);
1114         xml_add_element($doc, $root, "generator", FRIENDICA_PLATFORM, $attributes);
1115         xml_add_element($doc, $root, "id", $a->get_baseurl()."/profile/".$owner["nick"]);
1116         xml_add_element($doc, $root, "title", sprintf("%s timeline", $profile["name"]));
1117         xml_add_element($doc, $root, "subtitle", sprintf("Updates from %s on %s", $profile["name"], $a->config["sitename"]));
1118         xml_add_element($doc, $root, "logo", $profile["photo"]);
1119         xml_add_element($doc, $root, "updated", datetime_convert("UTC", "UTC", "now", ATOM_TIME));
1120
1121         $author = ostatus_add_author($doc, $owner, $profile);
1122         $root->appendChild($author);
1123
1124         $attributes = array("href" => $owner["url"], "rel" => "alternate", "type" => "text/html");
1125         xml_add_element($doc, $root, "link", "", $attributes);
1126
1127         // To-Do: We have to find out what this is
1128         //$attributes = array("href" => $a->get_baseurl()."/sup",
1129         //              "rel" => "http://api.friendfeed.com/2008/03#sup",
1130         //              "type" => "application/json");
1131         //xml_add_element($doc, $root, "link", "", $attributes);
1132
1133         ostatus_hublinks($doc, $root);
1134
1135         $attributes = array("href" => $a->get_baseurl()."/salmon/".$owner["nick"], "rel" => "salmon");
1136         xml_add_element($doc, $root, "link", "", $attributes);
1137
1138         $attributes = array("href" => $a->get_baseurl()."/salmon/".$owner["nick"], "rel" => "http://salmon-protocol.org/ns/salmon-replies");
1139         xml_add_element($doc, $root, "link", "", $attributes);
1140
1141         $attributes = array("href" => $a->get_baseurl()."/salmon/".$owner["nick"], "rel" => "http://salmon-protocol.org/ns/salmon-mention");
1142         xml_add_element($doc, $root, "link", "", $attributes);
1143
1144         $attributes = array("href" => $a->get_baseurl()."/api/statuses/user_timeline/".$owner["nick"].".atom",
1145                         "rel" => "self", "type" => "application/atom+xml");
1146         xml_add_element($doc, $root, "link", "", $attributes);
1147
1148         return $root;
1149 }
1150
1151 function ostatus_hublinks($doc, $root) {
1152         $a = get_app();
1153         $hub = get_config('system','huburl');
1154
1155         $hubxml = '';
1156         if(strlen($hub)) {
1157                 $hubs = explode(',', $hub);
1158                 if(count($hubs)) {
1159                         foreach($hubs as $h) {
1160                                 $h = trim($h);
1161                                 if(! strlen($h))
1162                                         continue;
1163                                 if ($h === '[internal]')
1164                                         $h = $a->get_baseurl() . '/pubsubhubbub';
1165                                 xml_add_element($doc, $root, "link", "", array("href" => $h, "rel" => "hub"));
1166                         }
1167                 }
1168         }
1169 }
1170
1171 function ostatus_get_attachment($doc, $root, $item) {
1172         $o = "";
1173         $siteinfo = get_attached_data($item["body"]);
1174
1175         switch($siteinfo["type"]) {
1176                 case 'link':
1177                         $attributes = array("rel" => "enclosure",
1178                                         "href" => $siteinfo["url"],
1179                                         "type" => "text/html; charset=UTF-8",
1180                                         "length" => "",
1181                                         "title" => $siteinfo["title"]);
1182                         xml_add_element($doc, $root, "link", "", $attributes);
1183                         break;
1184                 case 'photo':
1185                         $imgdata = get_photo_info($siteinfo["image"]);
1186                         $attributes = array("rel" => "enclosure",
1187                                         "href" => $siteinfo["image"],
1188                                         "type" => $imgdata["mime"],
1189                                         "length" => intval($imgdata["size"]));
1190                         xml_add_element($doc, $root, "link", "", $attributes);
1191                         break;
1192                 case 'video':
1193                         $attributes = array("rel" => "enclosure",
1194                                         "href" => $siteinfo["url"],
1195                                         "type" => "text/html; charset=UTF-8",
1196                                         "length" => "",
1197                                         "title" => $siteinfo["title"]);
1198                         xml_add_element($doc, $root, "link", "", $attributes);
1199                         break;
1200                 default:
1201                         break;
1202         }
1203
1204         $arr = explode('[/attach],',$item['attach']);
1205         if(count($arr)) {
1206                 foreach($arr as $r) {
1207                         $matches = false;
1208                         $cnt = preg_match('|\[attach\]href=\"(.*?)\" length=\"(.*?)\" type=\"(.*?)\" title=\"(.*?)\"|',$r,$matches);
1209                         if($cnt) {
1210                                 $attributes = array("rel" => "enclosure",
1211                                                 "href" => $matches[1],
1212                                                 "type" => $matches[3]);
1213
1214                                 if(intval($matches[2]))
1215                                         $attributes["length"] = intval($matches[2]);
1216
1217                                 if(trim($matches[4]) != "")
1218                                         $attributes["title"] = trim($matches[4]);
1219
1220                                 xml_add_element($doc, $root, "link", "", $attributes);
1221                         }
1222                 }
1223         }
1224 }
1225
1226 function ostatus_add_author($doc, $owner, $profile) {
1227         $a = get_app();
1228
1229         $author = $doc->createElement("author");
1230         xml_add_element($doc, $author, "activity:object-type", ACTIVITY_OBJ_PERSON);
1231         xml_add_element($doc, $author, "uri", $owner["url"]);
1232         xml_add_element($doc, $author, "name", $owner["nick"]);
1233
1234         $attributes = array("rel" => "alternate", "type" => "text/html", "href" => $owner["url"]);
1235         xml_add_element($doc, $author, "link", "", $attributes);
1236
1237         $attributes = array(
1238                         "rel" => "avatar",
1239                         "type" => "image/jpeg", // To-Do?
1240                         "media:width" => 175,
1241                         "media:height" => 175,
1242                         "href" => $profile["photo"]);
1243         xml_add_element($doc, $author, "link", "", $attributes);
1244
1245         $attributes = array(
1246                         "rel" => "avatar",
1247                         "type" => "image/jpeg", // To-Do?
1248                         "media:width" => 80,
1249                         "media:height" => 80,
1250                         "href" => $profile["thumb"]);
1251         xml_add_element($doc, $author, "link", "", $attributes);
1252
1253         xml_add_element($doc, $author, "poco:preferredUsername", $owner["nick"]);
1254         xml_add_element($doc, $author, "poco:displayName", $profile["name"]);
1255         xml_add_element($doc, $author, "poco:note", $profile["about"]);
1256
1257         if (trim($owner["location"]) != "") {
1258                 $element = $doc->createElement("poco:address");
1259                 xml_add_element($doc, $element, "poco:formatted", $owner["location"]);
1260                 $author->appendChild($element);
1261         }
1262
1263         if (trim($profile["homepage"]) != "") {
1264                 $urls = $doc->createElement("poco:urls");
1265                 xml_add_element($doc, $urls, "poco:type", "homepage");
1266                 xml_add_element($doc, $urls, "poco:value", $profile["homepage"]);
1267                 xml_add_element($doc, $urls, "poco:primary", "true");
1268                 $author->appendChild($urls);
1269         }
1270
1271         xml_add_element($doc, $author, "followers", "", array("url" => $a->get_baseurl()."/viewcontacts/".$owner["nick"]));
1272         xml_add_element($doc, $author, "statusnet:profile_info", "", array("local_id" => $owner["uid"]));
1273
1274         return $author;
1275 }
1276
1277 function ostatus_entry($doc, $item, $owner, $toplevel = false) {
1278         $a = get_app();
1279
1280         if (!$toplevel) {
1281                 $entry = $doc->createElement("entry");
1282                 $title = sprintf("New note by %s", $owner["nick"]);
1283         } else {
1284                 $entry = $doc->createElementNS(NS_ATOM, "entry");
1285
1286                 $entry->setAttribute("xmlns:thr", NS_THR);
1287                 $entry->setAttribute("xmlns:georss", NS_GEORSS);
1288                 $entry->setAttribute("xmlns:activity", NS_ACTIVITY);
1289                 $entry->setAttribute("xmlns:media", NS_MEDIA);
1290                 $entry->setAttribute("xmlns:poco", NS_POCO);
1291                 $entry->setAttribute("xmlns:ostatus", NS_OSTATUS);
1292                 $entry->setAttribute("xmlns:statusnet", NS_STATUSNET);
1293
1294                 $r = q("SELECT * FROM `profile` WHERE `uid` = %d AND `is-default`",
1295                         intval($owner["uid"]));
1296                 if (!$r)
1297                         return;
1298
1299                 $profile = $r[0];
1300
1301                 $author = ostatus_add_author($doc, $owner, $profile);
1302                 $entry->appendChild($author);
1303
1304                 $title = sprintf("New comment by %s", $owner["nick"]);
1305         }
1306
1307         // To use the object-type "bookmark" we have to implement these elements:
1308         //
1309         // <activity:object-type>http://activitystrea.ms/schema/1.0/bookmark</activity:object-type>
1310         // <title>Historic Rocket Landing</title>
1311         // <summary>Nur ein Testbeitrag.</summary>
1312         // <link rel="related" href="https://www.youtube.com/watch?v=9pillaOxGCo"/>
1313         // <link rel="preview" href="https://pirati.cc/file/thumb-4526-450x338-b48c8055f0c2fed0c3f67adc234c4b99484a90c42ed3cac73dc1081a4d0a7bc1.jpg.jpg" media:width="450" media:height="338"/>
1314         //
1315         // But: it seems as if it doesn't federate well between the GS servers
1316         // So we just set it to "note" to be sure that it reaches their target systems
1317
1318         xml_add_element($doc, $entry, "activity:object-type", ACTIVITY_OBJ_NOTE);
1319         xml_add_element($doc, $entry, "id", $item["uri"]);
1320         xml_add_element($doc, $entry, "title", $title);
1321
1322         if($item['allow_cid'] || $item['allow_gid'] || $item['deny_cid'] || $item['deny_gid'])
1323                 $body = fix_private_photos($item['body'],$owner['uid'],$item, 0);
1324         else
1325                 $body = $item['body'];
1326
1327         if ($item['title'] != "")
1328                 $body = "[b]".$item['title']."[/b]\n\n".$body;
1329
1330         $body = bbcode($body, false, false, 7);
1331
1332         xml_add_element($doc, $entry, "content", $body, array("type" => "html"));
1333
1334         xml_add_element($doc, $entry, "link", "", array("rel" => "alternate", "type" => "text/html",
1335                                                         "href" => $a->get_baseurl()."/display/".$item["guid"]));
1336
1337         xml_add_element($doc, $entry, "status_net", "", array("notice_id" => $item["id"]));
1338         xml_add_element($doc, $entry, "activity:verb", construct_verb($item));
1339         xml_add_element($doc, $entry, "published", datetime_convert("UTC","UTC",$item["created"]."+00:00",ATOM_TIME));
1340         xml_add_element($doc, $entry, "updated", datetime_convert("UTC","UTC",$item["edited"]."+00:00",ATOM_TIME));
1341
1342         if (($item['parent'] != $item['id']) || ($item['parent-uri'] !== $item['uri']) || (($item['thr-parent'] !== '') && ($item['thr-parent'] !== $item['uri']))) {
1343                 $parent = q("SELECT `guid` FROM `item` WHERE `id` = %d", intval($item["parent"]));
1344                 $parent_item = (($item['thr-parent']) ? $item['thr-parent'] : $item['parent-uri']);
1345
1346                 $attributes = array(
1347                                 "ref" => $parent_item,
1348                                 "type" => "text/html",
1349                                 "href" => $a->get_baseurl()."/display/".$parent[0]["guid"]);
1350                 xml_add_element($doc, $entry, "thr:in-reply-to", "", $attributes);
1351
1352                 $attributes = array(
1353                                 "rel" => "related",
1354                                 "href" => $a->get_baseurl()."/display/".$parent[0]["guid"]);
1355                 xml_add_element($doc, $entry, "link", "", $attributes);
1356         }
1357
1358         xml_add_element($doc, $entry, "link", "", array("rel" => "ostatus:conversation",
1359                                                         "href" => $a->get_baseurl()."/display/".$owner["nick"]."/".$item["parent"]));
1360         xml_add_element($doc, $entry, "ostatus:conversation", $a->get_baseurl()."/display/".$owner["nick"]."/".$item["parent"]);
1361
1362         $tags = item_getfeedtags($item);
1363
1364         if(count($tags))
1365                 foreach($tags as $t)
1366                         if ($t[0] == "@")
1367                                 xml_add_element($doc, $entry, "link", "", array("rel" => "mentioned",
1368                                                                                 "ostatus:object-type" => ACTIVITY_OBJ_PERSON,
1369                                                                                 "href" => $t[1]));
1370
1371         if (!$item["private"])
1372                 xml_add_element($doc, $entry, "link", "", array("rel" => "mentioned",
1373                                                                 "ostatus:object-type" => "http://activitystrea.ms/schema/1.0/collection",
1374                                                                 "href" => "http://activityschema.org/collection/public"));
1375
1376         if(count($tags))
1377                 foreach($tags as $t)
1378                         if ($t[0] != "@")
1379                                 xml_add_element($doc, $entry, "category", "", array("term" => $t[2]));
1380
1381         ostatus_get_attachment($doc, $entry, $item);
1382
1383         // To-Do:
1384         // The API call has yet to be implemented
1385         //$attributes = array("href" => $a->get_baseurl()."/api/statuses/show/".$item["id"].".atom",
1386         //              "rel" => "self", "type" => "application/atom+xml");
1387         //xml_add_element($doc, $entry, "link", "", $attributes);
1388
1389         //$attributes = array("href" => $a->get_baseurl()."/api/statuses/show/".$item["id"].".atom",
1390         //              "rel" => "edit", "type" => "application/atom+xml");
1391         //xml_add_element($doc, $entry, "link", "", $attributes);
1392
1393         $app = $item["app"];
1394         if ($app == "")
1395                 $app = "web";
1396
1397         xml_add_element($doc, $entry, "statusnet:notice_info", "", array("local_id" => $item["id"], "source" => $app));
1398
1399         return $entry;
1400 }
1401
1402 function ostatus_feed(&$a, $owner_nick, $last_update) {
1403
1404         $r = q("SELECT `contact`.*, `user`.`nickname`, `user`.`timezone`, `user`.`page-flags`
1405                         FROM `contact` INNER JOIN `user` ON `user`.`uid` = `contact`.`uid`
1406                         WHERE `contact`.`self` AND `user`.`nickname` = '%s' LIMIT 1",
1407                         dbesc($owner_nick));
1408         if (!$r)
1409                 return;
1410
1411         $owner = $r[0];
1412
1413         if(!strlen($last_update))
1414                 $last_update = 'now -30 days';
1415
1416         $check_date = datetime_convert('UTC','UTC',$last_update,'Y-m-d H:i:s');
1417
1418         $items = q("SELECT STRAIGHT_JOIN `item`.*, `item`.`id` AS `item_id` FROM `item`
1419                         INNER JOIN `thread` ON `thread`.`iid` = `item`.`parent`
1420                         LEFT JOIN `item` AS `thritem` ON `thritem`.`uri`=`item`.`thr-parent` AND `thritem`.`uid`=`item`.`uid`
1421                         WHERE `item`.`uid` = %d AND `item`.`received` > '%s' AND NOT `item`.`private` AND NOT `item`.`deleted`
1422                                 AND `item`.`allow_cid` = '' AND `item`.`allow_gid` = '' AND `item`.`deny_cid`  = '' AND `item`.`deny_gid`  = ''
1423                                 AND ((`item`.`wall` AND (`item`.`parent` = `item`.`id`))
1424                                         OR (`item`.`network` = '%s' AND ((`thread`.`network`='%s') OR (`thritem`.`network` = '%s'))) AND `thread`.`mention`)
1425                                 AND (`item`.`owner-link` IN ('%s', '%s'))
1426                         ORDER BY `item`.`received` DESC
1427                         LIMIT 0, 300",
1428                         intval($owner["uid"]), dbesc($check_date),
1429                         dbesc(NETWORK_DFRN), dbesc(NETWORK_OSTATUS), dbesc(NETWORK_OSTATUS),
1430                         dbesc($owner["nurl"]), dbesc(str_replace("http://", "https://", $owner["nurl"]))
1431                 );
1432
1433         $doc = new DOMDocument('1.0', 'utf-8');
1434         $doc->formatOutput = true;
1435
1436         $root = ostatus_add_header($doc, $owner);
1437
1438         foreach ($items AS $item) {
1439                 $entry = ostatus_entry($doc, $item, $owner);
1440                 $root->appendChild($entry);
1441         }
1442
1443         return($doc->saveXML());
1444 }
1445
1446 function ostatus_salmon($item,$owner) {
1447
1448         $doc = new DOMDocument('1.0', 'utf-8');
1449         $doc->formatOutput = true;
1450
1451         $entry = ostatus_entry($doc, $item, $owner, true);
1452
1453         $doc->appendChild($entry);
1454
1455         return($doc->saveXML());
1456 }
1457 ?>