include/ostatus.php

   1 <?php
   2 /**
   3  * @file include/ostatus.php
   4  */
   5
   6 require_once("include/Contact.php");
   7 require_once("include/threads.php");
   8 require_once("include/html2bbcode.php");
   9 require_once("include/bbcode.php");
  10 require_once("include/items.php");
  11 require_once("mod/share.php");
  12 require_once("include/enotify.php");
  13 require_once("include/socgraph.php");
  14 require_once("include/Photo.php");
  15 require_once("include/Scrape.php");
  16 require_once("include/follow.php");
  17 require_once("include/api.php");
  18 require_once("mod/proxy.php");
  19 require_once("include/xml.php");
  20
  21 /**
  22  * @brief This class contain functions for the OStatus protocol
  23  *
  24  */
  25 class ostatus {
  26         const OSTATUS_DEFAULT_POLL_INTERVAL = 30; // given in minutes
  27         const OSTATUS_DEFAULT_POLL_TIMEFRAME = 1440; // given in minutes
  28         const OSTATUS_DEFAULT_POLL_TIMEFRAME_MENTIONS = 14400; // given in minutes
  29
  30         /**
  31          * @brief Fetches author data
  32          *
  33          * @param object $xpath The xpath object
  34          * @param object $context The xml context of the author detals
  35          * @param array $importer user record of the importing user
  36          * @param array $contact Called by reference, will contain the fetched contact
  37          * @param bool $onlyfetch Only fetch the header without updating the contact entries
  38          *
  39          * @return array Array of author related entries for the item
  40          */
  41         private function fetchauthor($xpath, $context, $importer, &$contact, $onlyfetch) {
  42
  43                 $author = array();
  44                 $author["author-link"] = $xpath->evaluate('atom:author/atom:uri/text()', $context)->item(0)->nodeValue;
  45                 $author["author-name"] = $xpath->evaluate('atom:author/atom:name/text()', $context)->item(0)->nodeValue;
  46
  47                 $aliaslink = $author["author-link"];
  48
  49                 $alternate = $xpath->query("atom:author/atom:link[@rel='alternate']", $context)->item(0)->attributes;
  50                 if (is_object($alternate))
  51                         foreach($alternate AS $attributes)
  52                                 if ($attributes->name == "href")
  53                                         $author["author-link"] = $attributes->textContent;
  54
  55                 $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `nurl` IN ('%s', '%s') AND `network` != '%s'",
  56                         intval($importer["uid"]), dbesc(normalise_link($author["author-link"])),
  57                         dbesc(normalise_link($aliaslink)), dbesc(NETWORK_STATUSNET));
  58                 if ($r) {
  59                         $contact = $r[0];
  60                         $author["contact-id"] = $r[0]["id"];
  61                 } else
  62                         $author["contact-id"] = $contact["id"];
  63
  64                 $avatarlist = array();
  65                 $avatars = $xpath->query("atom:author/atom:link[@rel='avatar']", $context);
  66                 foreach($avatars AS $avatar) {
  67                         $href = "";
  68                         $width = 0;
  69                         foreach($avatar->attributes AS $attributes) {
  70                                 if ($attributes->name == "href")
  71                                         $href = $attributes->textContent;
  72                                 if ($attributes->name == "width")
  73                                         $width = $attributes->textContent;
  74                         }
  75                         if (($width > 0) AND ($href != ""))
  76                                 $avatarlist[$width] = $href;
  77                 }
  78                 if (count($avatarlist) > 0) {
  79                         krsort($avatarlist);
  80                         $author["author-avatar"] = current($avatarlist);
  81                 }
  82
  83                 $displayname = $xpath->evaluate('atom:author/poco:displayName/text()', $context)->item(0)->nodeValue;
  84                 if ($displayname != "")
  85                         $author["author-name"] = $displayname;
  86
  87                 $author["owner-name"] = $author["author-name"];
  88                 $author["owner-link"] = $author["author-link"];
  89                 $author["owner-avatar"] = $author["author-avatar"];
  90
  91                 // Only update the contacts if it is an OStatus contact
  92                 if ($r AND !$onlyfetch AND ($contact["network"] == NETWORK_OSTATUS)) {
  93
  94                         // Update contact data
  95
  96                         // This query doesn't seem to work
  97                         // $value = $xpath->query("atom:link[@rel='salmon']", $context)->item(0)->nodeValue;
  98                         // if ($value != "")
  99                         //      $contact["notify"] = $value;
 100
 101                         // This query doesn't seem to work as well - I hate these queries
 102                         // $value = $xpath->query("atom:link[@rel='self' and @type='application/atom+xml']", $context)->item(0)->nodeValue;
 103                         // if ($value != "")
 104                         //      $contact["poll"] = $value;
 105
 106                         $value = $xpath->evaluate('atom:author/atom:uri/text()', $context)->item(0)->nodeValue;
 107                         if ($value != "")
 108                                 $contact["alias"] = $value;
 109
 110                         $value = $xpath->evaluate('atom:author/poco:displayName/text()', $context)->item(0)->nodeValue;
 111                         if ($value != "")
 112                                 $contact["name"] = $value;
 113
 114                         $value = $xpath->evaluate('atom:author/poco:preferredUsername/text()', $context)->item(0)->nodeValue;
 115                         if ($value != "")
 116                                 $contact["nick"] = $value;
 117
 118                         $value = $xpath->evaluate('atom:author/poco:note/text()', $context)->item(0)->nodeValue;
 119                         if ($value != "")
 120                                 $contact["about"] = html2bbcode($value);
 121
 122                         $value = $xpath->evaluate('atom:author/poco:address/poco:formatted/text()', $context)->item(0)->nodeValue;
 123                         if ($value != "")
 124                                 $contact["location"] = $value;
 125
 126                         if (($contact["name"] != $r[0]["name"]) OR ($contact["nick"] != $r[0]["nick"]) OR ($contact["about"] != $r[0]["about"]) OR
 127                                 ($contact["alias"] != $r[0]["alias"]) OR ($contact["location"] != $r[0]["location"])) {
 128
 129                                 logger("Update contact data for contact ".$contact["id"], LOGGER_DEBUG);
 130
 131                                 q("UPDATE `contact` SET `name` = '%s', `nick` = '%s', `alias` = '%s', `about` = '%s', `location` = '%s', `name-date` = '%s' WHERE `id` = %d",
 132                                         dbesc($contact["name"]), dbesc($contact["nick"]), dbesc($contact["alias"]),
 133                                         dbesc($contact["about"]), dbesc($contact["location"]),
 134                                         dbesc(datetime_convert()), intval($contact["id"]));
 135                         }
 136
 137                         if (isset($author["author-avatar"]) AND ($author["author-avatar"] != $r[0]['avatar'])) {
 138                                 logger("Update profile picture for contact ".$contact["id"], LOGGER_DEBUG);
 139
 140                                 update_contact_avatar($author["author-avatar"], $importer["uid"], $contact["id"]);
 141                         }
 142
 143                         // Ensure that we are having this contact (with uid=0)
 144                         $cid = get_contact($author["author-link"], 0);
 145
 146                         if ($cid) {
 147                                 // Update it with the current values
 148                                 q("UPDATE `contact` SET `url` = '%s', `name` = '%s', `nick` = '%s', `alias` = '%s',
 149                                                 `about` = '%s', `location` = '%s',
 150                                                 `success_update` = '%s', `last-update` = '%s'
 151                                         WHERE `id` = %d",
 152                                         dbesc($author["author-link"]), dbesc($contact["name"]), dbesc($contact["nick"]),
 153                                         dbesc($contact["alias"]), dbesc($contact["about"]), dbesc($contact["location"]),
 154                                         dbesc(datetime_convert()), dbesc(datetime_convert()), intval($cid));
 155
 156                                 // Update the avatar
 157                                 update_contact_avatar($author["author-avatar"], 0, $cid);
 158                         }
 159
 160                         $contact["generation"] = 2;
 161                         $contact["hide"] = false; // OStatus contacts are never hidden
 162                         $contact["photo"] = $author["author-avatar"];
 163                         $gcid = update_gcontact($contact);
 164
 165                         link_gcontact($gcid, $contact["uid"], $contact["id"]);
 166                 }
 167
 168                 return($author);
 169         }
 170
 171         /**
 172          * @brief Fetches author data from a given XML string
 173          *
 174          * @param string $xml The XML
 175          * @param array $importer user record of the importing user
 176          *
 177          * @return array Array of author related entries for the item
 178          */
 179         public static function salmon_author($xml, $importer) {
 180
 181                 if ($xml == "")
 182                         return;
 183
 184                 $doc = new DOMDocument();
 185                 @$doc->loadXML($xml);
 186
 187                 $xpath = new DomXPath($doc);
 188                 $xpath->registerNamespace('atom', NAMESPACE_ATOM1);
 189                 $xpath->registerNamespace('thr', NAMESPACE_THREAD);
 190                 $xpath->registerNamespace('georss', NAMESPACE_GEORSS);
 191                 $xpath->registerNamespace('activity', NAMESPACE_ACTIVITY);
 192                 $xpath->registerNamespace('media', NAMESPACE_MEDIA);
 193                 $xpath->registerNamespace('poco', NAMESPACE_POCO);
 194                 $xpath->registerNamespace('ostatus', NAMESPACE_OSTATUS);
 195                 $xpath->registerNamespace('statusnet', NAMESPACE_STATUSNET);
 196
 197                 $entries = $xpath->query('/atom:entry');
 198
 199                 foreach ($entries AS $entry) {
 200                         // fetch the author
 201                         $author = self::fetchauthor($xpath, $entry, $importer, $contact, true);
 202                         return $author;
 203                 }
 204         }
 205
 206         /**
 207          * @brief Imports an XML string containing OStatus elements
 208          *
 209          * @param string $xml The XML
 210          * @param array $importer user record of the importing user
 211          * @param $contact
 212          * @param array $hub Called by reference, returns the fetched hub data
 213          */
 214         public static function import($xml,$importer,&$contact, &$hub) {
 215                 /// @todo this function is too long. It has to be split in many parts
 216
 217                 logger("Import OStatus message", LOGGER_DEBUG);
 218
 219                 if ($xml == "")
 220                         return;
 221
 222                 //$tempfile = tempnam(get_temppath(), "import");
 223                 //file_put_contents($tempfile, $xml);
 224
 225                 $doc = new DOMDocument();
 226                 @$doc->loadXML($xml);
 227
 228                 $xpath = new DomXPath($doc);
 229                 $xpath->registerNamespace('atom', NAMESPACE_ATOM1);
 230                 $xpath->registerNamespace('thr', NAMESPACE_THREAD);
 231                 $xpath->registerNamespace('georss', NAMESPACE_GEORSS);
 232                 $xpath->registerNamespace('activity', NAMESPACE_ACTIVITY);
 233                 $xpath->registerNamespace('media', NAMESPACE_MEDIA);
 234                 $xpath->registerNamespace('poco', NAMESPACE_POCO);
 235                 $xpath->registerNamespace('ostatus', NAMESPACE_OSTATUS);
 236                 $xpath->registerNamespace('statusnet', NAMESPACE_STATUSNET);
 237
 238                 $gub = "";
 239                 $hub_attributes = $xpath->query("/atom:feed/atom:link[@rel='hub']")->item(0)->attributes;
 240                 if (is_object($hub_attributes))
 241                         foreach($hub_attributes AS $hub_attribute)
 242                                 if ($hub_attribute->name == "href") {
 243                                         $hub = $hub_attribute->textContent;
 244                                         logger("Found hub ".$hub, LOGGER_DEBUG);
 245                                 }
 246
 247                 $header = array();
 248                 $header["uid"] = $importer["uid"];
 249                 $header["network"] = NETWORK_OSTATUS;
 250                 $header["type"] = "remote";
 251                 $header["wall"] = 0;
 252                 $header["origin"] = 0;
 253                 $header["gravity"] = GRAVITY_PARENT;
 254
 255                 // it could either be a received post or a post we fetched by ourselves
 256                 // depending on that, the first node is different
 257                 $first_child = $doc->firstChild->tagName;
 258
 259                 if ($first_child == "feed")
 260                         $entries = $xpath->query('/atom:feed/atom:entry');
 261                 else
 262                         $entries = $xpath->query('/atom:entry');
 263
 264                 $conversation = "";
 265                 $conversationlist = array();
 266                 $item_id = 0;
 267
 268                 // Reverse the order of the entries
 269                 $entrylist = array();
 270
 271                 foreach ($entries AS $entry)
 272                         $entrylist[] = $entry;
 273
 274                 foreach (array_reverse($entrylist) AS $entry) {
 275
 276                         $mention = false;
 277
 278                         // fetch the author
 279                         if ($first_child == "feed")
 280                                 $author = self::fetchauthor($xpath, $doc->firstChild, $importer, $contact, false);
 281                         else
 282                                 $author = self::fetchauthor($xpath, $entry, $importer, $contact, false);
 283
 284                         $value = $xpath->evaluate('atom:author/poco:preferredUsername/text()', $context)->item(0)->nodeValue;
 285                         if ($value != "")
 286                                 $nickname = $value;
 287                         else
 288                                 $nickname = $author["author-name"];
 289
 290                         $item = array_merge($header, $author);
 291
 292                         // Now get the item
 293                         $item["uri"] = $xpath->query('atom:id/text()', $entry)->item(0)->nodeValue;
 294
 295                         $r = q("SELECT `id` FROM `item` WHERE `uid` = %d AND `uri` = '%s'",
 296                                 intval($importer["uid"]), dbesc($item["uri"]));
 297                         if ($r) {
 298                                 logger("Item with uri ".$item["uri"]." for user ".$importer["uid"]." already existed under id ".$r[0]["id"], LOGGER_DEBUG);
 299                                 continue;
 300                         }
 301
 302                         $item["body"] = add_page_info_to_body(html2bbcode($xpath->query('atom:content/text()', $entry)->item(0)->nodeValue));
 303                         $item["object-type"] = $xpath->query('activity:object-type/text()', $entry)->item(0)->nodeValue;
 304
 305                         if (($item["object-type"] == ACTIVITY_OBJ_BOOKMARK) OR ($item["object-type"] == ACTIVITY_OBJ_EVENT)) {
 306                                 $item["title"] = $xpath->query('atom:title/text()', $entry)->item(0)->nodeValue;
 307                                 $item["body"] = $xpath->query('atom:summary/text()', $entry)->item(0)->nodeValue;
 308                         } elseif ($item["object-type"] == ACTIVITY_OBJ_QUESTION)
 309                                 $item["title"] = $xpath->query('atom:title/text()', $entry)->item(0)->nodeValue;
 310
 311                         $item["object"] = $xml;
 312                         $item["verb"] = $xpath->query('activity:verb/text()', $entry)->item(0)->nodeValue;
 313
 314                         /// @TODO
 315                         /// Delete a message
 316                         if ($item["verb"] == "qvitter-delete-notice") {
 317                                 // ignore "Delete" messages (by now)
 318                                 logger("Ignore delete message ".print_r($item, true));
 319                                 continue;
 320                         }
 321
 322                         if ($item["verb"] == ACTIVITY_JOIN) {
 323                                 // ignore "Join" messages
 324                                 logger("Ignore join message ".print_r($item, true));
 325                                 continue;
 326                         }
 327
 328                         if ($item["verb"] == ACTIVITY_FOLLOW) {
 329                                 new_follower($importer, $contact, $item, $nickname);
 330                                 continue;
 331                         }
 332
 333                         if ($item["verb"] == NAMESPACE_OSTATUS."/unfollow") {
 334                                 lose_follower($importer, $contact, $item, $dummy);
 335                                 continue;
 336                         }
 337
 338                         if ($item["verb"] == ACTIVITY_FAVORITE) {
 339                                 $orig_uri = $xpath->query("activity:object/atom:id", $entry)->item(0)->nodeValue;
 340                                 logger("Favorite ".$orig_uri." ".print_r($item, true));
 341
 342                                 $item["verb"] = ACTIVITY_LIKE;
 343                                 $item["parent-uri"] = $orig_uri;
 344                                 $item["gravity"] = GRAVITY_LIKE;
 345                         }
 346
 347                         if ($item["verb"] == NAMESPACE_OSTATUS."/unfavorite") {
 348                                 // Ignore "Unfavorite" message
 349                                 logger("Ignore unfavorite message ".print_r($item, true));
 350                                 continue;
 351                         }
 352
 353                         // http://activitystrea.ms/schema/1.0/rsvp-yes
 354                         if (!in_array($item["verb"], array(ACTIVITY_POST, ACTIVITY_LIKE, ACTIVITY_SHARE)))
 355                                 logger("Unhandled verb ".$item["verb"]." ".print_r($item, true));
 356
 357                         $item["created"] = $xpath->query('atom:published/text()', $entry)->item(0)->nodeValue;
 358                         $item["edited"] = $xpath->query('atom:updated/text()', $entry)->item(0)->nodeValue;
 359                         $conversation = $xpath->query('ostatus:conversation/text()', $entry)->item(0)->nodeValue;
 360
 361                         $related = "";
 362
 363                         $inreplyto = $xpath->query('thr:in-reply-to', $entry);
 364                         if (is_object($inreplyto->item(0))) {
 365                                 foreach($inreplyto->item(0)->attributes AS $attributes) {
 366                                         if ($attributes->name == "ref")
 367                                                 $item["parent-uri"] = $attributes->textContent;
 368                                         if ($attributes->name == "href")
 369                                                 $related = $attributes->textContent;
 370                                 }
 371                         }
 372
 373                         $georsspoint = $xpath->query('georss:point', $entry);
 374                         if ($georsspoint)
 375                                 $item["coord"] = $georsspoint->item(0)->nodeValue;
 376
 377                         $categories = $xpath->query('atom:category', $entry);
 378                         if ($categories) {
 379                                 foreach ($categories AS $category) {
 380                                         foreach($category->attributes AS $attributes)
 381                                                 if ($attributes->name == "term") {
 382                                                         $term = $attributes->textContent;
 383                                                         if(strlen($item["tag"]))
 384                                                                 $item["tag"] .= ',';
 385                                                         $item["tag"] .= "#[url=".App::get_baseurl()."/search?tag=".$term."]".$term."[/url]";
 386                                                 }
 387                                 }
 388                         }
 389
 390                         $self = "";
 391                         $enclosure = "";
 392
 393                         $links = $xpath->query('atom:link', $entry);
 394                         if ($links) {
 395                                 $rel = "";
 396                                 $href = "";
 397                                 $type = "";
 398                                 $length = "0";
 399                                 $title = "";
 400                                 foreach ($links AS $link) {
 401                                         foreach($link->attributes AS $attributes) {
 402                                                 if ($attributes->name == "href")
 403                                                         $href = $attributes->textContent;
 404                                                 if ($attributes->name == "rel")
 405                                                         $rel = $attributes->textContent;
 406                                                 if ($attributes->name == "type")
 407                                                         $type = $attributes->textContent;
 408                                                 if ($attributes->name == "length")
 409                                                         $length = $attributes->textContent;
 410                                                 if ($attributes->name == "title")
 411                                                         $title = $attributes->textContent;
 412                                         }
 413                                         if (($rel != "") AND ($href != "")) {
 414                                                 switch ($rel) {
 415                                                         case "alternate":
 416                                                                 $item["plink"] = $href;
 417                                                                 /// @TODO These multi-lines can confuse, let's avoid them
 418                                                                 if (($item["object-type"] == ACTIVITY_OBJ_QUESTION) OR
 419                                                                         ($item["object-type"] == ACTIVITY_OBJ_EVENT)) {
 420                                                                         $item["body"] .= add_page_info($href);
 421                                                                 }
 422                                                                 break;
 423                                                         case "ostatus:conversation":
 424                                                                 $conversation = $href;
 425                                                                 break;
 426                                                         case "enclosure":
 427                                                                 $enclosure = $href;
 428                                                                 if (strlen($item["attach"])) {
 429                                                                         $item["attach"] .= ',';
 430                                                                 }
 431
 432                                                                 $item["attach"] .= '[attach]href="' . $href . '" length="' . $length . '" type="' . $type . '" title="' . $title . '"[/attach]';
 433                                                                 break;
 434                                                         case "related":
 435                                                                 if ($item["object-type"] != ACTIVITY_OBJ_BOOKMARK) {
 436                                                                         if (!isset($item["parent-uri"])) {
 437                                                                                 $item["parent-uri"] = $href;
 438                                                                         }
 439
 440                                                                         if ($related == "") {
 441                                                                                 $related = $href;
 442                                                                         }
 443                                                                 } else {
 444                                                                         $item["body"] .= add_page_info($href);
 445                                                                 }
 446                                                                 break;
 447                                                         case "self":
 448                                                                 $self = $href;
 449                                                                 break;
 450                                                         case "mentioned":
 451                                                                 // Notification check
 452                                                                 if ($importer["nurl"] == normalise_link($href)) {
 453                                                                         $mention = true;
 454                                                                 }
 455                                                                 break;
 456                                                 }
 457                                         }
 458                                 }
 459                         }
 460
 461                         $local_id = "";
 462                         $repeat_of = "";
 463
 464                         $notice_info = $xpath->query('statusnet:notice_info', $entry);
 465                         if ($notice_info AND ($notice_info->length > 0)) {
 466                                 foreach($notice_info->item(0)->attributes AS $attributes) {
 467                                         if ($attributes->name == "source")
 468                                                 $item["app"] = strip_tags($attributes->textContent);
 469                                         if ($attributes->name == "local_id")
 470                                                 $local_id = $attributes->textContent;
 471                                         if ($attributes->name == "repeat_of")
 472                                                 $repeat_of = $attributes->textContent;
 473                                 }
 474                         }
 475
 476                         // Is it a repeated post?
 477                         if (($repeat_of != "") OR ($item["verb"] == ACTIVITY_SHARE)) {
 478                                 $activityobjects = $xpath->query('activity:object', $entry)->item(0);
 479
 480                                 if (is_object($activityobjects)) {
 481
 482                                         $orig_uri = $xpath->query("activity:object/atom:id", $activityobjects)->item(0)->nodeValue;
 483                                         if (!isset($orig_uri))
 484                                                 $orig_uri = $xpath->query('atom:id/text()', $activityobjects)->item(0)->nodeValue;
 485
 486                                         $orig_links = $xpath->query("activity:object/atom:link[@rel='alternate']", $activityobjects);
 487                                         if ($orig_links AND ($orig_links->length > 0))
 488                                                 foreach($orig_links->item(0)->attributes AS $attributes)
 489                                                         if ($attributes->name == "href")
 490                                                                 $orig_link = $attributes->textContent;
 491
 492                                         if (!isset($orig_link))
 493                                                 $orig_link = $xpath->query("atom:link[@rel='alternate']", $activityobjects)->item(0)->nodeValue;
 494
 495                                         if (!isset($orig_link))
 496                                                 $orig_link =  self::convert_href($orig_uri);
 497
 498                                         $orig_body = $xpath->query('activity:object/atom:content/text()', $activityobjects)->item(0)->nodeValue;
 499                                         if (!isset($orig_body))
 500                                                 $orig_body = $xpath->query('atom:content/text()', $activityobjects)->item(0)->nodeValue;
 501
 502                                         $orig_created = $xpath->query('atom:published/text()', $activityobjects)->item(0)->nodeValue;
 503                                         $orig_edited = $xpath->query('atom:updated/text()', $activityobjects)->item(0)->nodeValue;
 504
 505                                         $orig_contact = $contact;
 506                                         $orig_author = self::fetchauthor($xpath, $activityobjects, $importer, $orig_contact, false);
 507
 508                                         $item["author-name"] = $orig_author["author-name"];
 509                                         $item["author-link"] = $orig_author["author-link"];
 510                                         $item["author-avatar"] = $orig_author["author-avatar"];
 511                                         $item["body"] = add_page_info_to_body(html2bbcode($orig_body));
 512                                         $item["created"] = $orig_created;
 513                                         $item["edited"] = $orig_edited;
 514
 515                                         $item["uri"] = $orig_uri;
 516                                         $item["plink"] = $orig_link;
 517
 518                                         $item["verb"] = $xpath->query('activity:verb/text()', $activityobjects)->item(0)->nodeValue;
 519
 520                                         $item["object-type"] = $xpath->query('activity:object/activity:object-type/text()', $activityobjects)->item(0)->nodeValue;
 521                                         if (!isset($item["object-type"]))
 522                                                 $item["object-type"] = $xpath->query('activity:object-type/text()', $activityobjects)->item(0)->nodeValue;
 523                                 }
 524                         }
 525
 526                         //if ($enclosure != "")
 527                         //      $item["body"] .= add_page_info($enclosure);
 528
 529                         if (isset($item["parent-uri"])) {
 530                                 $r = q("SELECT `id` FROM `item` WHERE `uid` = %d AND `uri` = '%s'",
 531                                         intval($importer["uid"]), dbesc($item["parent-uri"]));
 532
 533                                 // Only fetch missing stuff if it is a comment or reshare.
 534                                 if (in_array($item["verb"], array(ACTIVITY_POST, ACTIVITY_SHARE)) AND
 535                                         !dbm::is_result($r) AND ($related != "")) {
 536                                         $reply_path = str_replace("/notice/", "/api/statuses/show/", $related).".atom";
 537
 538                                         if ($reply_path != $related) {
 539                                                 logger("Fetching related items for user ".$importer["uid"]." from ".$reply_path, LOGGER_DEBUG);
 540                                                 $reply_xml = fetch_url($reply_path);
 541
 542                                                 $reply_contact = $contact;
 543                                                 self::import($reply_xml,$importer,$reply_contact, $reply_hub);
 544
 545                                                 // After the import try to fetch the parent item again
 546                                                 $r = q("SELECT `id` FROM `item` WHERE `uid` = %d AND `uri` = '%s'",
 547                                                         intval($importer["uid"]), dbesc($item["parent-uri"]));
 548                                         }
 549                                 }
 550                                 if ($r) {
 551                                         $item["type"] = 'remote-comment';
 552                                         $item["gravity"] = GRAVITY_COMMENT;
 553                                 }
 554                         } else
 555                                 $item["parent-uri"] = $item["uri"];
 556
 557                         $item_id = self::completion($conversation, $importer["uid"], $item, $self);
 558
 559                         if (!$item_id) {
 560                                 logger("Error storing item", LOGGER_DEBUG);
 561                                 continue;
 562                         }
 563
 564                         logger("Item was stored with id ".$item_id, LOGGER_DEBUG);
 565                 }
 566         }
 567
 568         /**
 569          * @brief Create an url out of an uri
 570          *
 571          * @param string $href URI in the format "parameter1:parameter1:..."
 572          *
 573          * @return string URL in the format http(s)://....
 574          */
 575         public static function convert_href($href) {
 576                 $elements = explode(":",$href);
 577
 578                 if ((count($elements) <= 2) OR ($elements[0] != "tag"))
 579                         return $href;
 580
 581                 $server = explode(",", $elements[1]);
 582                 $conversation = explode("=", $elements[2]);
 583
 584                 if ((count($elements) == 4) AND ($elements[2] == "post"))
 585                         return "http://".$server[0]."/notice/".$elements[3];
 586
 587                 if ((count($conversation) != 2) OR ($conversation[1] ==""))
 588                         return $href;
 589
 590                 if ($elements[3] == "objectType=thread")
 591                         return "http://".$server[0]."/conversation/".$conversation[1];
 592                 else
 593                         return "http://".$server[0]."/notice/".$conversation[1];
 594
 595                 return $href;
 596         }
 597
 598         /**
 599          * @brief Checks if there are entries in conversations that aren't present on our side
 600          *
 601          * @param bool $mentions Fetch conversations where we are mentioned
 602          * @param bool $override Override the interval setting
 603          */
 604         public static function check_conversations($mentions = false, $override = false) {
 605                 $last = get_config('system','ostatus_last_poll');
 606
 607                 $poll_interval = intval(get_config('system','ostatus_poll_interval'));
 608                 if (!$poll_interval) {
 609                         $poll_interval = self::OSTATUS_DEFAULT_POLL_INTERVAL;
 610                 }
 611
 612                 // Don't poll if the interval is set negative
 613                 if (($poll_interval < 0) AND !$override) {
 614                         return;
 615                 }
 616
 617                 if (!$mentions) {
 618                         $poll_timeframe = intval(get_config('system','ostatus_poll_timeframe'));
 619                         if (!$poll_timeframe) {
 620                                 $poll_timeframe = self::OSTATUS_DEFAULT_POLL_TIMEFRAME;
 621                         }
 622                 } else {
 623                         $poll_timeframe = intval(get_config('system','ostatus_poll_timeframe'));
 624                         if (!$poll_timeframe) {
 625                                 $poll_timeframe = self::OSTATUS_DEFAULT_POLL_TIMEFRAME_MENTIONS;
 626                         }
 627                 }
 628
 629
 630                 if ($last AND !$override) {
 631                         $next = $last + ($poll_interval * 60);
 632                         if ($next > time()) {
 633                                 logger('poll interval not reached');
 634                                 return;
 635                         }
 636                 }
 637
 638                 logger('cron_start');
 639
 640                 $start = date("Y-m-d H:i:s", time() - ($poll_timeframe * 60));
 641
 642                 if ($mentions) {
 643                         $conversations = q("SELECT `term`.`oid`, `term`.`url`, `term`.`uid` FROM `term`
 644                                                 STRAIGHT_JOIN `thread` ON `thread`.`iid` = `term`.`oid` AND `thread`.`uid` = `term`.`uid`
 645                                                 WHERE `term`.`type` = 7 AND `term`.`term` > '%s' AND `thread`.`mention`
 646                                                 GROUP BY `term`.`url`, `term`.`uid` ORDER BY `term`.`term` DESC", dbesc($start));
 647                 } else {
 648                         $conversations = q("SELECT `oid`, `url`, `uid` FROM `term`
 649                                                 WHERE `type` = 7 AND `term` > '%s'
 650                                                 GROUP BY `url`, `uid` ORDER BY `term` DESC", dbesc($start));
 651                 }
 652
 653                 foreach ($conversations AS $conversation) {
 654                         self::completion($conversation['url'], $conversation['uid']);
 655                 }
 656
 657                 logger('cron_end');
 658
 659                 set_config('system','ostatus_last_poll', time());
 660         }
 661
 662         /**
 663          * @brief Updates the gcontact table with actor data from the conversation
 664          *
 665          * @param object $actor The actor object that contains the contact data
 666          */
 667         private function conv_fetch_actor($actor) {
 668
 669                 // We set the generation to "3" since the data here is not as reliable as the data we get on other occasions
 670                 $contact = array("network" => NETWORK_OSTATUS, "generation" => 3);
 671
 672                 if (isset($actor->url))
 673                         $contact["url"] = $actor->url;
 674
 675                 if (isset($actor->displayName))
 676                         $contact["name"] = $actor->displayName;
 677
 678                 if (isset($actor->portablecontacts_net->displayName))
 679                         $contact["name"] = $actor->portablecontacts_net->displayName;
 680
 681                 if (isset($actor->portablecontacts_net->preferredUsername))
 682                         $contact["nick"] = $actor->portablecontacts_net->preferredUsername;
 683
 684                 if (isset($actor->id))
 685                         $contact["alias"] = $actor->id;
 686
 687                 if (isset($actor->summary))
 688                         $contact["about"] = $actor->summary;
 689
 690                 if (isset($actor->portablecontacts_net->note))
 691                         $contact["about"] = $actor->portablecontacts_net->note;
 692
 693                 if (isset($actor->portablecontacts_net->addresses->formatted))
 694                         $contact["location"] = $actor->portablecontacts_net->addresses->formatted;
 695
 696
 697                 if (isset($actor->image->url))
 698                         $contact["photo"] = $actor->image->url;
 699
 700                 if (isset($actor->image->width))
 701                         $avatarwidth = $actor->image->width;
 702
 703                 if (is_array($actor->status_net->avatarLinks))
 704                         foreach ($actor->status_net->avatarLinks AS $avatar) {
 705                                 if ($avatarsize < $avatar->width) {
 706                                         $contact["photo"] = $avatar->url;
 707                                         $avatarsize = $avatar->width;
 708                                 }
 709                         }
 710
 711                 $contact["hide"] = false; // OStatus contacts are never hidden
 712                 update_gcontact($contact);
 713         }
 714
 715         /**
 716          * @brief Fetches the conversation url for a given item link or conversation id
 717          *
 718          * @param string $self The link to the posting
 719          * @param string $conversation_id The conversation id
 720          *
 721          * @return string The conversation url
 722          */
 723         private function fetch_conversation($self, $conversation_id = "") {
 724
 725                 if ($conversation_id != "") {
 726                         $elements = explode(":", $conversation_id);
 727
 728                         if ((count($elements) <= 2) OR ($elements[0] != "tag"))
 729                                 return $conversation_id;
 730                 }
 731
 732                 if ($self == "")
 733                         return "";
 734
 735                 $json = str_replace(".atom", ".json", $self);
 736
 737                 $raw = fetch_url($json);
 738                 if ($raw == "")
 739                         return "";
 740
 741                 $data = json_decode($raw);
 742                 if (!is_object($data))
 743                         return "";
 744
 745                 $conversation_id = $data->statusnet_conversation_id;
 746
 747                 $pos = strpos($self, "/api/statuses/show/");
 748                 $base_url = substr($self, 0, $pos);
 749
 750                 return $base_url."/conversation/".$conversation_id;
 751         }
 752
 753         /**
 754          * @brief Fetches actor details of a given actor and user id
 755          *
 756          * @param string $actor The actor url
 757          * @param int $uid The user id
 758          * @param int $contact_id The default contact-id
 759          *
 760          * @return array Array with actor details
 761          */
 762         private function get_actor_details($actor, $uid, $contact_id) {
 763
 764                 $details = array();
 765
 766                 $contact = q("SELECT `id`, `rel`, `network` FROM `contact` WHERE `uid` = %d AND `nurl` = '%s' AND `network` != '%s'",
 767                                         $uid, normalise_link($actor), NETWORK_STATUSNET);
 768
 769                 if (!$contact)
 770                         $contact = q("SELECT `id`, `rel`, `network` FROM `contact` WHERE `uid` = %d AND `alias` IN ('%s', '%s') AND `network` != '%s'",
 771                                         $uid, $actor, normalise_link($actor), NETWORK_STATUSNET);
 772
 773                 if ($contact) {
 774                         logger("Found contact for url ".$actor, LOGGER_DEBUG);
 775                         $details["contact_id"] = $contact[0]["id"];
 776                         $details["network"] = $contact[0]["network"];
 777
 778                         $details["not_following"] = !in_array($contact[0]["rel"], array(CONTACT_IS_SHARING, CONTACT_IS_FRIEND));
 779                 } else {
 780                         logger("No contact found for user ".$uid." and url ".$actor, LOGGER_DEBUG);
 781
 782                         // Adding a global contact
 783                         /// @TODO Use this data for the post
 784                         $details["global_contact_id"] = get_contact($actor, 0);
 785
 786                         logger("Global contact ".$global_contact_id." found for url ".$actor, LOGGER_DEBUG);
 787
 788                         $details["contact_id"] = $contact_id;
 789                         $details["network"] = NETWORK_OSTATUS;
 790
 791                         $details["not_following"] = true;
 792                 }
 793
 794                 return $details;
 795         }
 796
 797         /**
 798          * @brief Stores an item and completes the thread
 799          *
 800          * @param string $conversation_url The URI of the conversation
 801          * @param integer $uid The user id
 802          * @param array $item Data of the item that is to be posted
 803          *
 804          * @return integer The item id of the posted item array
 805          */
 806         private function completion($conversation_url, $uid, $item = array(), $self = "") {
 807
 808                 /// @todo This function is totally ugly and has to be rewritten totally
 809
 810                 // Import all threads or only threads that were started by our followers?
 811                 $all_threads = !get_config('system','ostatus_full_threads');
 812
 813                 $item_stored = -1;
 814
 815                 $conversation_url = self::fetch_conversation($self, $conversation_url);
 816
 817                 // If the thread shouldn't be completed then store the item and go away
 818                 // Don't do a completion on liked content
 819                 if (((intval(get_config('system','ostatus_poll_interval')) == -2) AND (count($item) > 0)) OR
 820                         ($item["verb"] == ACTIVITY_LIKE) OR ($conversation_url == "")) {
 821                         $item_stored = item_store($item, $all_threads);
 822                         return $item_stored;
 823                 }
 824
 825                 // Get the parent
 826                 $parents = q("SELECT `item`.`id`, `item`.`parent`, `item`.`uri`, `item`.`contact-id`, `item`.`type`,
 827                                 `item`.`verb`, `item`.`visible` FROM `term`
 828                                 STRAIGHT_JOIN `item` AS `thritem` ON `thritem`.`parent` = `term`.`oid`
 829                                 STRAIGHT_JOIN `item` ON `item`.`parent` = `thritem`.`parent`
 830                                 WHERE `term`.`uid` = %d AND `term`.`otype` = %d AND `term`.`type` = %d AND `term`.`url` = '%s'",
 831                                 intval($uid), intval(TERM_OBJ_POST), intval(TERM_CONVERSATION), dbesc($conversation_url));
 832
 833 /*              2016-10-23: The old query will be kept until we are sure that the query above is a good and fast replacement
 834
 835                 $parents = q("SELECT `id`, `parent`, `uri`, `contact-id`, `type`, `verb`, `visible` FROM `item` WHERE `id` IN
 836                                 (SELECT `parent` FROM `item` WHERE `id` IN
 837                                         (SELECT `oid` FROM `term` WHERE `uid` = %d AND `otype` = %d AND `type` = %d AND `url` = '%s'))",
 838                                 intval($uid), intval(TERM_OBJ_POST), intval(TERM_CONVERSATION), dbesc($conversation_url));
 839 */
 840                 if ($parents)
 841                         $parent = $parents[0];
 842                 elseif (count($item) > 0) {
 843                         $parent = $item;
 844                         $parent["type"] = "remote";
 845                         $parent["verb"] = ACTIVITY_POST;
 846                         $parent["visible"] = 1;
 847                 } else {
 848                         // Preset the parent
 849                         $r = q("SELECT `id` FROM `contact` WHERE `self` AND `uid`=%d", $uid);
 850                         if (!$r)
 851                                 return(-2);
 852
 853                         $parent = array();
 854                         $parent["id"] = 0;
 855                         $parent["parent"] = 0;
 856                         $parent["uri"] = "";
 857                         $parent["contact-id"] = $r[0]["id"];
 858                         $parent["type"] = "remote";
 859                         $parent["verb"] = ACTIVITY_POST;
 860                         $parent["visible"] = 1;
 861                 }
 862
 863                 $conv = str_replace("/conversation/", "/api/statusnet/conversation/", $conversation_url).".as";
 864                 $pageno = 1;
 865                 $items = array();
 866
 867                 logger('fetching conversation url '.$conv.' (Self: '.$self.') for user '.$uid);
 868
 869                 do {
 870                         $conv_arr = z_fetch_url($conv."?page=".$pageno);
 871
 872                         // If it is a non-ssl site and there is an error, then try ssl or vice versa
 873                         if (!$conv_arr["success"] AND (substr($conv, 0, 7) == "http://")) {
 874                                 $conv = str_replace("http://", "https://", $conv);
 875                                 $conv_as = fetch_url($conv."?page=".$pageno);
 876                         } elseif (!$conv_arr["success"] AND (substr($conv, 0, 8) == "https://")) {
 877                                 $conv = str_replace("https://", "http://", $conv);
 878                                 $conv_as = fetch_url($conv."?page=".$pageno);
 879                         } else
 880                                 $conv_as = $conv_arr["body"];
 881
 882                         $conv_as = str_replace(',"statusnet:notice_info":', ',"statusnet_notice_info":', $conv_as);
 883                         $conv_as = json_decode($conv_as);
 884
 885                         $no_of_items = sizeof($items);
 886
 887                         if (@is_array($conv_as->items))
 888                                 foreach ($conv_as->items AS $single_item)
 889                                         $items[$single_item->id] = $single_item;
 890
 891                         if ($no_of_items == sizeof($items))
 892                                 break;
 893
 894                         $pageno++;
 895
 896                 } while (true);
 897
 898                 logger('fetching conversation done. Found '.count($items).' items');
 899
 900                 if (!sizeof($items)) {
 901                         if (count($item) > 0) {
 902                                 $item_stored = item_store($item, $all_threads);
 903
 904                                 if ($item_stored) {
 905                                         logger("Conversation ".$conversation_url." couldn't be fetched. Item uri ".$item["uri"]." stored: ".$item_stored, LOGGER_DEBUG);
 906                                         self::store_conversation($item_id, $conversation_url);
 907                                 }
 908
 909                                 return($item_stored);
 910                         } else
 911                                 return(-3);
 912                 }
 913
 914                 $items = array_reverse($items);
 915
 916                 $r = q("SELECT `nurl` FROM `contact` WHERE `uid` = %d AND `self`", intval($uid));
 917                 $importer = $r[0];
 918
 919                 $new_parent = true;
 920
 921                 foreach ($items as $single_conv) {
 922
 923                         // Update the gcontact table
 924                         self::conv_fetch_actor($single_conv->actor);
 925
 926                         // Test - remove before flight
 927                         //$tempfile = tempnam(get_temppath(), "conversation");
 928                         //file_put_contents($tempfile, json_encode($single_conv));
 929
 930                         $mention = false;
 931
 932                         if (isset($single_conv->object->id))
 933                                 $single_conv->id = $single_conv->object->id;
 934
 935                         $plink = self::convert_href($single_conv->id);
 936                         if (isset($single_conv->object->url))
 937                                 $plink = self::convert_href($single_conv->object->url);
 938
 939                         if (@!$single_conv->id)
 940                                 continue;
 941
 942                         logger("Got id ".$single_conv->id, LOGGER_DEBUG);
 943
 944                         if ($first_id == "") {
 945                                 $first_id = $single_conv->id;
 946
 947                                 // The first post of the conversation isn't our first post. There are three options:
 948                                 // 1. Our conversation hasn't the "real" thread starter
 949                                 // 2. This first post is a post inside our thread
 950                                 // 3. This first post is a post inside another thread
 951                                 if (($first_id != $parent["uri"]) AND ($parent["uri"] != "")) {
 952
 953                                         $new_parent = true;
 954
 955                                         $new_parents = q("SELECT `id`, `parent`, `uri`, `contact-id`, `type`, `verb`, `visible` FROM `item` WHERE `id` IN
 956                                                                 (SELECT `parent` FROM `item`
 957                                                                         WHERE `uid` = %d AND `uri` = '%s' AND `network` IN ('%s','%s')) LIMIT 1",
 958                                                 intval($uid), dbesc($first_id), dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN));
 959                                         if ($new_parents) {
 960                                                 if ($new_parents[0]["parent"] == $parent["parent"]) {
 961                                                         // Option 2: This post is already present inside our thread - but not as thread starter
 962                                                         logger("Option 2: uri present in our thread: ".$first_id, LOGGER_DEBUG);
 963                                                         $first_id = $parent["uri"];
 964                                                 } else {
 965                                                         // Option 3: Not so good. We have mixed parents. We have to see how to clean this up.
 966                                                         // For now just take the new parent.
 967                                                         $parent = $new_parents[0];
 968                                                         $first_id = $parent["uri"];
 969                                                         logger("Option 3: mixed parents for uri ".$first_id, LOGGER_DEBUG);
 970                                                 }
 971                                         } else {
 972                                                 // Option 1: We hadn't got the real thread starter
 973                                                 // We have to clean up our existing messages.
 974                                                 $parent["id"] = 0;
 975                                                 $parent["uri"] = $first_id;
 976                                                 logger("Option 1: we have a new parent: ".$first_id, LOGGER_DEBUG);
 977                                         }
 978                                 } elseif ($parent["uri"] == "") {
 979                                         $parent["id"] = 0;
 980                                         $parent["uri"] = $first_id;
 981                                 }
 982                         }
 983
 984                         $parent_uri = $parent["uri"];
 985
 986                         // "context" only seems to exist on older servers
 987                         if (isset($single_conv->context->inReplyTo->id)) {
 988                                 $parent_exists = q("SELECT `id` FROM `item` WHERE `uid` = %d AND `uri` = '%s' AND `network` IN ('%s','%s') LIMIT 1",
 989                                                         intval($uid), dbesc($single_conv->context->inReplyTo->id), dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN));
 990                                 if ($parent_exists)
 991                                         $parent_uri = $single_conv->context->inReplyTo->id;
 992                         }
 993
 994                         // This is the current way
 995                         if (isset($single_conv->object->inReplyTo->id)) {
 996                                 $parent_exists = q("SELECT `id` FROM `item` WHERE `uid` = %d AND `uri` = '%s' AND `network` IN ('%s','%s') LIMIT 1",
 997                                                         intval($uid), dbesc($single_conv->object->inReplyTo->id), dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN));
 998                                 if ($parent_exists)
 999                                         $parent_uri = $single_conv->object->inReplyTo->id;
1000                         }
1001
1002                         $message_exists = q("SELECT `id`, `parent`, `uri` FROM `item` WHERE `uid` = %d AND `uri` = '%s' AND `network` IN ('%s','%s') LIMIT 1",
1003                                                         intval($uid), dbesc($single_conv->id),
1004                                                         dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN));
1005                         if ($message_exists) {
1006                                 logger("Message ".$single_conv->id." already existed on the system", LOGGER_DEBUG);
1007
1008                                 if ($parent["id"] != 0) {
1009                                         $existing_message = $message_exists[0];
1010
1011                                         // We improved the way we fetch OStatus messages, this shouldn't happen very often now
1012                                         /// @TODO We have to change the shadow copies as well. This way here is really ugly.
1013                                         if ($existing_message["parent"] != $parent["id"]) {
1014                                                 logger('updating id '.$existing_message["id"].' with parent '.$existing_message["parent"].' to parent '.$parent["id"].' uri '.$parent["uri"].' thread '.$parent_uri, LOGGER_DEBUG);
1015
1016                                                 // Update the parent id of the selected item
1017                                                 $r = q("UPDATE `item` SET `parent` = %d, `parent-uri` = '%s' WHERE `id` = %d",
1018                                                         intval($parent["id"]), dbesc($parent["uri"]), intval($existing_message["id"]));
1019
1020                                                 // Update the parent uri in the thread - but only if it points to itself
1021                                                 $r = q("UPDATE `item` SET `thr-parent` = '%s' WHERE `id` = %d AND `uri` = `thr-parent`",
1022                                                         dbesc($parent_uri), intval($existing_message["id"]));
1023
1024                                                 // try to change all items of the same parent
1025                                                 $r = q("UPDATE `item` SET `parent` = %d, `parent-uri` = '%s' WHERE `parent` = %d",
1026                                                         intval($parent["id"]), dbesc($parent["uri"]), intval($existing_message["parent"]));
1027
1028                                                 // Update the parent uri in the thread - but only if it points to itself
1029                                                 $r = q("UPDATE `item` SET `thr-parent` = '%s' WHERE (`parent` = %d) AND (`uri` = `thr-parent`)",
1030                                                         dbesc($parent["uri"]), intval($existing_message["parent"]));
1031
1032                                                 // Now delete the thread
1033                                                 delete_thread($existing_message["parent"]);
1034                                         }
1035                                 }
1036
1037                                 // The item we are having on the system is the one that we wanted to store via the item array
1038                                 if (isset($item["uri"]) AND ($item["uri"] == $existing_message["uri"])) {
1039                                         $item = array();
1040                                         $item_stored = 0;
1041                                 }
1042
1043                                 continue;
1044                         }
1045
1046                         if (is_array($single_conv->to))
1047                                 foreach($single_conv->to AS $to)
1048                                         if ($importer["nurl"] == normalise_link($to->id))
1049                                                 $mention = true;
1050
1051                         $actor = $single_conv->actor->id;
1052                         if (isset($single_conv->actor->url))
1053                                 $actor = $single_conv->actor->url;
1054
1055                         $details = self::get_actor_details($actor, $uid, $parent["contact-id"]);
1056
1057                         // Do we only want to import threads that were started by our contacts?
1058                         if ($details["not_following"] AND $new_parent AND get_config('system','ostatus_full_threads')) {
1059                                 logger("Don't import uri ".$first_id." because user ".$uid." doesn't follow the person ".$actor, LOGGER_DEBUG);
1060                                 continue;
1061                         }
1062
1063                         $arr = array();
1064                         $arr["network"] = $details["network"];
1065                         $arr["uri"] = $single_conv->id;
1066                         $arr["plink"] = $plink;
1067                         $arr["uid"] = $uid;
1068                         $arr["contact-id"] = $details["contact_id"];
1069                         $arr["parent-uri"] = $parent_uri;
1070                         $arr["created"] = $single_conv->published;
1071                         $arr["edited"] = $single_conv->published;
1072                         $arr["owner-name"] = $single_conv->actor->displayName;
1073                         if ($arr["owner-name"] == '')
1074                                 $arr["owner-name"] = $single_conv->actor->contact->displayName;
1075                         if ($arr["owner-name"] == '')
1076                                 $arr["owner-name"] = $single_conv->actor->portablecontacts_net->displayName;
1077
1078                         $arr["owner-link"] = $actor;
1079                         $arr["owner-avatar"] = $single_conv->actor->image->url;
1080                         $arr["author-name"] = $arr["owner-name"];
1081                         $arr["author-link"] = $actor;
1082                         $arr["author-avatar"] = $single_conv->actor->image->url;
1083                         $arr["body"] = add_page_info_to_body(html2bbcode($single_conv->content));
1084
1085                         if (isset($single_conv->status_net->notice_info->source))
1086                                 $arr["app"] = strip_tags($single_conv->status_net->notice_info->source);
1087                         elseif (isset($single_conv->statusnet->notice_info->source))
1088                                 $arr["app"] = strip_tags($single_conv->statusnet->notice_info->source);
1089                         elseif (isset($single_conv->statusnet_notice_info->source))
1090                                 $arr["app"] = strip_tags($single_conv->statusnet_notice_info->source);
1091                         elseif (isset($single_conv->provider->displayName))
1092                                 $arr["app"] = $single_conv->provider->displayName;
1093                         else
1094                                 $arr["app"] = "OStatus";
1095
1096
1097                         $arr["object"] = json_encode($single_conv);
1098                         $arr["verb"] = $parent["verb"];
1099                         $arr["visible"] = $parent["visible"];
1100                         $arr["location"] = $single_conv->location->displayName;
1101                         $arr["coord"] = trim($single_conv->location->lat." ".$single_conv->location->lon);
1102
1103                         // Is it a reshared item?
1104                         if (isset($single_conv->verb) AND ($single_conv->verb == "share") AND isset($single_conv->object)) {
1105                                 if (is_array($single_conv->object))
1106                                         $single_conv->object = $single_conv->object[0];
1107
1108                                 logger("Found reshared item ".$single_conv->object->id);
1109
1110                                 // $single_conv->object->context->conversation;
1111
1112                                 if (isset($single_conv->object->object->id))
1113                                         $arr["uri"] = $single_conv->object->object->id;
1114                                 else
1115                                         $arr["uri"] = $single_conv->object->id;
1116
1117                                 if (isset($single_conv->object->object->url))
1118                                         $plink = self::convert_href($single_conv->object->object->url);
1119                                 else
1120                                         $plink = self::convert_href($single_conv->object->url);
1121
1122                                 if (isset($single_conv->object->object->content))
1123                                         $arr["body"] = add_page_info_to_body(html2bbcode($single_conv->object->object->content));
1124                                 else
1125                                         $arr["body"] = add_page_info_to_body(html2bbcode($single_conv->object->content));
1126
1127                                 $arr["plink"] = $plink;
1128
1129                                 $arr["created"] = $single_conv->object->published;
1130                                 $arr["edited"] = $single_conv->object->published;
1131
1132                                 $arr["author-name"] = $single_conv->object->actor->displayName;
1133                                 if ($arr["owner-name"] == '')
1134                                         $arr["author-name"] = $single_conv->object->actor->contact->displayName;
1135
1136                                 $arr["author-link"] = $single_conv->object->actor->url;
1137                                 $arr["author-avatar"] = $single_conv->object->actor->image->url;
1138
1139                                 $arr["app"] = $single_conv->object->provider->displayName."#";
1140                                 //$arr["verb"] = $single_conv->object->verb;
1141
1142                                 $arr["location"] = $single_conv->object->location->displayName;
1143                                 $arr["coord"] = trim($single_conv->object->location->lat." ".$single_conv->object->location->lon);
1144                         }
1145
1146                         if ($arr["location"] == "")
1147                                 unset($arr["location"]);
1148
1149                         if ($arr["coord"] == "")
1150                                 unset($arr["coord"]);
1151
1152                         // Copy fields from given item array
1153                         if (isset($item["uri"]) AND (($item["uri"] == $arr["uri"]) OR ($item["uri"] ==  $single_conv->id))) {
1154                                 $copy_fields = array("owner-name", "owner-link", "owner-avatar", "author-name", "author-link", "author-avatar",
1155                                                         "gravity", "body", "object-type", "object", "verb", "created", "edited", "coord", "tag",
1156                                                         "title", "attach", "app", "type", "location", "contact-id", "uri");
1157                                 foreach ($copy_fields AS $field)
1158                                         if (isset($item[$field]))
1159                                                 $arr[$field] = $item[$field];
1160
1161                         }
1162
1163                         $newitem = item_store($arr);
1164                         if (!$newitem) {
1165                                 logger("Item wasn't stored ".print_r($arr, true), LOGGER_DEBUG);
1166                                 continue;
1167                         }
1168
1169                         if (isset($item["uri"]) AND ($item["uri"] == $arr["uri"])) {
1170                                 $item = array();
1171                                 $item_stored = $newitem;
1172                         }
1173
1174                         logger('Stored new item '.$plink.' for parent '.$arr["parent-uri"].' under id '.$newitem, LOGGER_DEBUG);
1175
1176                         // Add the conversation entry (but don't fetch the whole conversation)
1177                         self::store_conversation($newitem, $conversation_url);
1178
1179                         // If the newly created item is the top item then change the parent settings of the thread
1180                         // This shouldn't happen anymore. This is supposed to be absolote.
1181                         if ($arr["uri"] == $first_id) {
1182                                 logger('setting new parent to id '.$newitem);
1183                                 $new_parents = q("SELECT `id`, `uri`, `contact-id`, `type`, `verb`, `visible` FROM `item` WHERE `uid` = %d AND `id` = %d LIMIT 1",
1184                                         intval($uid), intval($newitem));
1185                                 if ($new_parents)
1186                                         $parent = $new_parents[0];
1187                         }
1188                 }
1189
1190                 if (($item_stored < 0) AND (count($item) > 0)) {
1191
1192                         if (get_config('system','ostatus_full_threads')) {
1193                                 $details = self::get_actor_details($item["owner-link"], $uid, $item["contact-id"]);
1194                                 if ($details["not_following"]) {
1195                                         logger("Don't import uri ".$item["uri"]." because user ".$uid." doesn't follow the person ".$item["owner-link"], LOGGER_DEBUG);
1196                                         return false;
1197                                 }
1198                         }
1199
1200                         $item_stored = item_store($item, $all_threads);
1201                         if ($item_stored) {
1202                                 logger("Uri ".$item["uri"]." wasn't found in conversation ".$conversation_url, LOGGER_DEBUG);
1203                                 self::store_conversation($item_stored, $conversation_url);
1204                         }
1205                 }
1206
1207                 return($item_stored);
1208         }
1209
1210         /**
1211          * @brief Stores conversation data into the database
1212          *
1213          * @param integer $itemid The id of the item
1214          * @param string $conversation_url The uri of the conversation
1215          */
1216         private function store_conversation($itemid, $conversation_url) {
1217
1218                 $conversation_url = self::convert_href($conversation_url);
1219
1220                 $messages = q("SELECT `uid`, `parent`, `created`, `received`, `guid` FROM `item` WHERE `id` = %d LIMIT 1", intval($itemid));
1221                 if (!$messages)
1222                         return;
1223                 $message = $messages[0];
1224
1225                 // Store conversation url if not done before
1226                 $conversation = q("SELECT `url` FROM `term` WHERE `uid` = %d AND `oid` = %d AND `otype` = %d AND `type` = %d",
1227                         intval($message["uid"]), intval($itemid), intval(TERM_OBJ_POST), intval(TERM_CONVERSATION));
1228
1229                 if (!$conversation) {
1230                         $r = q("INSERT INTO `term` (`uid`, `oid`, `otype`, `type`, `term`, `url`, `created`, `received`, `guid`) VALUES (%d, %d, %d, %d, '%s', '%s', '%s', '%s', '%s')",
1231                                 intval($message["uid"]), intval($itemid), intval(TERM_OBJ_POST), intval(TERM_CONVERSATION),
1232                                 dbesc($message["created"]), dbesc($conversation_url), dbesc($message["created"]), dbesc($message["received"]), dbesc($message["guid"]));
1233                         logger('Storing conversation url '.$conversation_url.' for id '.$itemid);
1234                 }
1235         }
1236
1237         /**
1238          * @brief Checks if the current post is a reshare
1239          *
1240          * @param array $item The item array of thw post
1241          *
1242          * @return string The guid if the post is a reshare
1243          */
1244         private function get_reshared_guid($item) {
1245                 $body = trim($item["body"]);
1246
1247                 // Skip if it isn't a pure repeated messages
1248                 // Does it start with a share?
1249                 if (strpos($body, "[share") > 0)
1250                         return("");
1251
1252                 // Does it end with a share?
1253                 if (strlen($body) > (strrpos($body, "[/share]") + 8))
1254                         return("");
1255
1256                 $attributes = preg_replace("/\[share(.*?)\]\s?(.*?)\s?\[\/share\]\s?/ism","$1",$body);
1257                 // Skip if there is no shared message in there
1258                 if ($body == $attributes)
1259                         return(false);
1260
1261                 $guid = "";
1262                 preg_match("/guid='(.*?)'/ism", $attributes, $matches);
1263                 if ($matches[1] != "")
1264                         $guid = $matches[1];
1265
1266                 preg_match('/guid="(.*?)"/ism', $attributes, $matches);
1267                 if ($matches[1] != "")
1268                         $guid = $matches[1];
1269
1270                 return $guid;
1271         }
1272
1273         /**
1274          * @brief Cleans the body of a post if it contains picture links
1275          *
1276          * @param string $body The body
1277          *
1278          * @return string The cleaned body
1279          */
1280         private function format_picture_post($body) {
1281                 $siteinfo = get_attached_data($body);
1282
1283                 if (($siteinfo["type"] == "photo")) {
1284                         if (isset($siteinfo["preview"]))
1285                                 $preview = $siteinfo["preview"];
1286                         else
1287                                 $preview = $siteinfo["image"];
1288
1289                         // Is it a remote picture? Then make a smaller preview here
1290                         $preview = proxy_url($preview, false, PROXY_SIZE_SMALL);
1291
1292                         // Is it a local picture? Then make it smaller here
1293                         $preview = str_replace(array("-0.jpg", "-0.png"), array("-2.jpg", "-2.png"), $preview);
1294                         $preview = str_replace(array("-1.jpg", "-1.png"), array("-2.jpg", "-2.png"), $preview);
1295
1296                         if (isset($siteinfo["url"]))
1297                                 $url = $siteinfo["url"];
1298                         else
1299                                 $url = $siteinfo["image"];
1300
1301                         $body = trim($siteinfo["text"])." [url]".$url."[/url]\n[img]".$preview."[/img]";
1302                 }
1303
1304                 return $body;
1305         }
1306
1307         /**
1308          * @brief Adds the header elements to the XML document
1309          *
1310          * @param object $doc XML document
1311          * @param array $owner Contact data of the poster
1312          *
1313          * @return object header root element
1314          */
1315         private function add_header($doc, $owner) {
1316
1317                 $a = get_app();
1318
1319                 $root = $doc->createElementNS(NAMESPACE_ATOM1, 'feed');
1320                 $doc->appendChild($root);
1321
1322                 $root->setAttribute("xmlns:thr", NAMESPACE_THREAD);
1323                 $root->setAttribute("xmlns:georss", NAMESPACE_GEORSS);
1324                 $root->setAttribute("xmlns:activity", NAMESPACE_ACTIVITY);
1325                 $root->setAttribute("xmlns:media", NAMESPACE_MEDIA);
1326                 $root->setAttribute("xmlns:poco", NAMESPACE_POCO);
1327                 $root->setAttribute("xmlns:ostatus", NAMESPACE_OSTATUS);
1328                 $root->setAttribute("xmlns:statusnet", NAMESPACE_STATUSNET);
1329
1330                 $attributes = array("uri" => "https://friendi.ca", "version" => FRIENDICA_VERSION."-".DB_UPDATE_VERSION);
1331                 xml::add_element($doc, $root, "generator", FRIENDICA_PLATFORM, $attributes);
1332                 xml::add_element($doc, $root, "id", App::get_baseurl()."/profile/".$owner["nick"]);
1333                 xml::add_element($doc, $root, "title", sprintf("%s timeline", $owner["name"]));
1334                 xml::add_element($doc, $root, "subtitle", sprintf("Updates from %s on %s", $owner["name"], $a->config["sitename"]));
1335                 xml::add_element($doc, $root, "logo", $owner["photo"]);
1336                 xml::add_element($doc, $root, "updated", datetime_convert("UTC", "UTC", "now", ATOM_TIME));
1337
1338                 $author = self::add_author($doc, $owner);
1339                 $root->appendChild($author);
1340
1341                 $attributes = array("href" => $owner["url"], "rel" => "alternate", "type" => "text/html");
1342                 xml::add_element($doc, $root, "link", "", $attributes);
1343
1344                 /// @TODO We have to find out what this is
1345                 /// $attributes = array("href" => App::get_baseurl()."/sup",
1346                 ///             "rel" => "http://api.friendfeed.com/2008/03#sup",
1347                 ///             "type" => "application/json");
1348                 /// xml::add_element($doc, $root, "link", "", $attributes);
1349
1350                 self::hublinks($doc, $root);
1351
1352                 $attributes = array("href" => App::get_baseurl()."/salmon/".$owner["nick"], "rel" => "salmon");
1353                 xml::add_element($doc, $root, "link", "", $attributes);
1354
1355                 $attributes = array("href" => App::get_baseurl()."/salmon/".$owner["nick"], "rel" => "http://salmon-protocol.org/ns/salmon-replies");
1356                 xml::add_element($doc, $root, "link", "", $attributes);
1357
1358                 $attributes = array("href" => App::get_baseurl()."/salmon/".$owner["nick"], "rel" => "http://salmon-protocol.org/ns/salmon-mention");
1359                 xml::add_element($doc, $root, "link", "", $attributes);
1360
1361                 $attributes = array("href" => App::get_baseurl()."/api/statuses/user_timeline/".$owner["nick"].".atom",
1362                                 "rel" => "self", "type" => "application/atom+xml");
1363                 xml::add_element($doc, $root, "link", "", $attributes);
1364
1365                 return $root;
1366         }
1367
1368         /**
1369          * @brief Add the link to the push hubs to the XML document
1370          *
1371          * @param object $doc XML document
1372          * @param object $root XML root element where the hub links are added
1373          */
1374         public static function hublinks($doc, $root) {
1375                 $hub = get_config('system','huburl');
1376
1377                 $hubxml = '';
1378                 if(strlen($hub)) {
1379                         $hubs = explode(',', $hub);
1380                         if(count($hubs)) {
1381                                 foreach($hubs as $h) {
1382                                         $h = trim($h);
1383                                         if(! strlen($h))
1384                                                 continue;
1385                                         if ($h === '[internal]')
1386                                                 $h = App::get_baseurl() . '/pubsubhubbub';
1387                                         xml::add_element($doc, $root, "link", "", array("href" => $h, "rel" => "hub"));
1388                                 }
1389                         }
1390                 }
1391         }
1392
1393         /**
1394          * @brief Adds attachement data to the XML document
1395          *
1396          * @param object $doc XML document
1397          * @param object $root XML root element where the hub links are added
1398          * @param array $item Data of the item that is to be posted
1399          */
1400         private function get_attachment($doc, $root, $item) {
1401                 $o = "";
1402                 $siteinfo = get_attached_data($item["body"]);
1403
1404                 switch($siteinfo["type"]) {
1405                         case 'link':
1406                                 $attributes = array("rel" => "enclosure",
1407                                                 "href" => $siteinfo["url"],
1408                                                 "type" => "text/html; charset=UTF-8",
1409                                                 "length" => "",
1410                                                 "title" => $siteinfo["title"]);
1411                                 xml::add_element($doc, $root, "link", "", $attributes);
1412                                 break;
1413                         case 'photo':
1414                                 $imgdata = get_photo_info($siteinfo["image"]);
1415                                 $attributes = array("rel" => "enclosure",
1416                                                 "href" => $siteinfo["image"],
1417                                                 "type" => $imgdata["mime"],
1418                                                 "length" => intval($imgdata["size"]));
1419                                 xml::add_element($doc, $root, "link", "", $attributes);
1420                                 break;
1421                         case 'video':
1422                                 $attributes = array("rel" => "enclosure",
1423                                                 "href" => $siteinfo["url"],
1424                                                 "type" => "text/html; charset=UTF-8",
1425                                                 "length" => "",
1426                                                 "title" => $siteinfo["title"]);
1427                                 xml::add_element($doc, $root, "link", "", $attributes);
1428                                 break;
1429                         default:
1430                                 break;
1431                 }
1432
1433                 if (($siteinfo["type"] != "photo") AND isset($siteinfo["image"])) {
1434                         $photodata = get_photo_info($siteinfo["image"]);
1435
1436                         $attributes = array("rel" => "preview", "href" => $siteinfo["image"], "media:width" => $photodata[0], "media:height" => $photodata[1]);
1437                         xml::add_element($doc, $root, "link", "", $attributes);
1438                 }
1439
1440
1441                 $arr = explode('[/attach],',$item['attach']);
1442                 if(count($arr)) {
1443                         foreach($arr as $r) {
1444                                 $matches = false;
1445                                 $cnt = preg_match('|\[attach\]href=\"(.*?)\" length=\"(.*?)\" type=\"(.*?)\" title=\"(.*?)\"|',$r,$matches);
1446                                 if($cnt) {
1447                                         $attributes = array("rel" => "enclosure",
1448                                                         "href" => $matches[1],
1449                                                         "type" => $matches[3]);
1450
1451                                         if(intval($matches[2]))
1452                                                 $attributes["length"] = intval($matches[2]);
1453
1454                                         if(trim($matches[4]) != "")
1455                                                 $attributes["title"] = trim($matches[4]);
1456
1457                                         xml::add_element($doc, $root, "link", "", $attributes);
1458                                 }
1459                         }
1460                 }
1461         }
1462
1463         /**
1464          * @brief Adds the author element to the XML document
1465          *
1466          * @param object $doc XML document
1467          * @param array $owner Contact data of the poster
1468          *
1469          * @return object author element
1470          */
1471         private function add_author($doc, $owner) {
1472
1473                 $r = q("SELECT `homepage` FROM `profile` WHERE `uid` = %d AND `is-default` LIMIT 1", intval($owner["uid"]));
1474                 if ($r)
1475                         $profile = $r[0];
1476
1477                 $author = $doc->createElement("author");
1478                 xml::add_element($doc, $author, "activity:object-type", ACTIVITY_OBJ_PERSON);
1479                 xml::add_element($doc, $author, "uri", $owner["url"]);
1480                 xml::add_element($doc, $author, "name", $owner["name"]);
1481                 xml::add_element($doc, $author, "summary", bbcode($owner["about"], false, false, 7));
1482
1483                 $attributes = array("rel" => "alternate", "type" => "text/html", "href" => $owner["url"]);
1484                 xml::add_element($doc, $author, "link", "", $attributes);
1485
1486                 $attributes = array(
1487                                 "rel" => "avatar",
1488                                 "type" => "image/jpeg", // To-Do?
1489                                 "media:width" => 175,
1490                                 "media:height" => 175,
1491                                 "href" => $owner["photo"]);
1492                 xml::add_element($doc, $author, "link", "", $attributes);
1493
1494                 if (isset($owner["thumb"])) {
1495                         $attributes = array(
1496                                         "rel" => "avatar",
1497                                         "type" => "image/jpeg", // To-Do?
1498                                         "media:width" => 80,
1499                                         "media:height" => 80,
1500                                         "href" => $owner["thumb"]);
1501                         xml::add_element($doc, $author, "link", "", $attributes);
1502                 }
1503
1504                 xml::add_element($doc, $author, "poco:preferredUsername", $owner["nick"]);
1505                 xml::add_element($doc, $author, "poco:displayName", $owner["name"]);
1506                 xml::add_element($doc, $author, "poco:note", bbcode($owner["about"], false, false, 7));
1507
1508                 if (trim($owner["location"]) != "") {
1509                         $element = $doc->createElement("poco:address");
1510                         xml::add_element($doc, $element, "poco:formatted", $owner["location"]);
1511                         $author->appendChild($element);
1512                 }
1513
1514                 if (trim($profile["homepage"]) != "") {
1515                         $urls = $doc->createElement("poco:urls");
1516                         xml::add_element($doc, $urls, "poco:type", "homepage");
1517                         xml::add_element($doc, $urls, "poco:value", $profile["homepage"]);
1518                         xml::add_element($doc, $urls, "poco:primary", "true");
1519                         $author->appendChild($urls);
1520                 }
1521
1522                 if (count($profile)) {
1523                         xml::add_element($doc, $author, "followers", "", array("url" => App::get_baseurl()."/viewcontacts/".$owner["nick"]));
1524                         xml::add_element($doc, $author, "statusnet:profile_info", "", array("local_id" => $owner["uid"]));
1525                 }
1526
1527                 return $author;
1528         }
1529
1530         /**
1531          * @TODO Picture attachments should look like this:
1532          *      <a href="https://status.pirati.ca/attachment/572819" title="https://status.pirati.ca/file/heluecht-20151202T222602-rd3u49p.gif"
1533          *      class="attachment thumbnail" id="attachment-572819" rel="nofollow external">https://status.pirati.ca/attachment/572819</a>
1534          *
1535         */
1536
1537         /**
1538          * @brief Returns the given activity if present - otherwise returns the "post" activity
1539          *
1540          * @param array $item Data of the item that is to be posted
1541          *
1542          * @return string activity
1543          */
1544         function construct_verb($item) {
1545                 if ($item['verb'])
1546                         return $item['verb'];
1547                 return ACTIVITY_POST;
1548         }
1549
1550         /**
1551          * @brief Returns the given object type if present - otherwise returns the "note" object type
1552          *
1553          * @param array $item Data of the item that is to be posted
1554          *
1555          * @return string Object type
1556          */
1557         function construct_objecttype($item) {
1558                 if (in_array($item['object-type'], array(ACTIVITY_OBJ_NOTE, ACTIVITY_OBJ_COMMENT)))
1559                         return $item['object-type'];
1560                 return ACTIVITY_OBJ_NOTE;
1561         }
1562
1563         /**
1564          * @brief Adds an entry element to the XML document
1565          *
1566          * @param object $doc XML document
1567          * @param array $item Data of the item that is to be posted
1568          * @param array $owner Contact data of the poster
1569          * @param bool $toplevel
1570          *
1571          * @return object Entry element
1572          */
1573         private function entry($doc, $item, $owner, $toplevel = false) {
1574                 $repeated_guid = self::get_reshared_guid($item);
1575                 if ($repeated_guid != "")
1576                         $xml = self::reshare_entry($doc, $item, $owner, $repeated_guid, $toplevel);
1577
1578                 if ($xml)
1579                         return $xml;
1580
1581                 if ($item["verb"] == ACTIVITY_LIKE) {
1582                         return self::like_entry($doc, $item, $owner, $toplevel);
1583                 } elseif (in_array($item["verb"], array(ACTIVITY_FOLLOW, NAMESPACE_OSTATUS."/unfollow"))) {
1584                         return self::follow_entry($doc, $item, $owner, $toplevel);
1585                 } else {
1586                         return self::note_entry($doc, $item, $owner, $toplevel);
1587                 }
1588         }
1589
1590         /**
1591          * @brief Adds a source entry to the XML document
1592          *
1593          * @param object $doc XML document
1594          * @param array $contact Array of the contact that is added
1595          *
1596          * @return object Source element
1597          */
1598         private function source_entry($doc, $contact) {
1599                 $source = $doc->createElement("source");
1600                 xml::add_element($doc, $source, "id", $contact["poll"]);
1601                 xml::add_element($doc, $source, "title", $contact["name"]);
1602                 xml::add_element($doc, $source, "link", "", array("rel" => "alternate",
1603                                                                 "type" => "text/html",
1604                                                                 "href" => $contact["alias"]));
1605                 xml::add_element($doc, $source, "link", "", array("rel" => "self",
1606                                                                 "type" => "application/atom+xml",
1607                                                                 "href" => $contact["poll"]));
1608                 xml::add_element($doc, $source, "icon", $contact["photo"]);
1609                 xml::add_element($doc, $source, "updated", datetime_convert("UTC","UTC",$contact["success_update"]."+00:00",ATOM_TIME));
1610
1611                 return $source;
1612         }
1613
1614         /**
1615          * @brief Fetches contact data from the contact or the gcontact table
1616          *
1617          * @param string $url URL of the contact
1618          * @param array $owner Contact data of the poster
1619          *
1620          * @return array Contact array
1621          */
1622         private function contact_entry($url, $owner) {
1623
1624                 $r = q("SELECT * FROM `contact` WHERE `nurl` = '%s' AND `uid` IN (0, %d) ORDER BY `uid` DESC LIMIT 1",
1625                         dbesc(normalise_link($url)), intval($owner["uid"]));
1626                 if ($r) {
1627                         $contact = $r[0];
1628                         $contact["uid"] = -1;
1629                 }
1630
1631                 if (!$r) {
1632                         $r = q("SELECT * FROM `gcontact` WHERE `nurl` = '%s' LIMIT 1",
1633                                 dbesc(normalise_link($url)));
1634                         if ($r) {
1635                                 $contact = $r[0];
1636                                 $contact["uid"] = -1;
1637                                 $contact["success_update"] = $contact["updated"];
1638                         }
1639                 }
1640
1641                 if (!$r)
1642                         $contact = owner;
1643
1644                 if (!isset($contact["poll"])) {
1645                         $data = probe_url($url);
1646                         $contact["poll"] = $data["poll"];
1647
1648                         if (!$contact["alias"])
1649                                 $contact["alias"] = $data["alias"];
1650                 }
1651
1652                 if (!isset($contact["alias"]))
1653                         $contact["alias"] = $contact["url"];
1654
1655                 return $contact;
1656         }
1657
1658         /**
1659          * @brief Adds an entry element with reshared content
1660          *
1661          * @param object $doc XML document
1662          * @param array $item Data of the item that is to be posted
1663          * @param array $owner Contact data of the poster
1664          * @param $repeated_guid
1665          * @param bool $toplevel Is it for en entry element (false) or a feed entry (true)?
1666          *
1667          * @return object Entry element
1668          */
1669         private function reshare_entry($doc, $item, $owner, $repeated_guid, $toplevel) {
1670
1671                 if (($item["id"] != $item["parent"]) AND (normalise_link($item["author-link"]) != normalise_link($owner["url"]))) {
1672                         logger("OStatus entry is from author ".$owner["url"]." - not from ".$item["author-link"].". Quitting.", LOGGER_DEBUG);
1673                 }
1674
1675                 $title = self::entry_header($doc, $entry, $owner, $toplevel);
1676
1677                 $r = q("SELECT * FROM `item` WHERE `uid` = %d AND `guid` = '%s' AND NOT `private` AND `network` IN ('%s', '%s', '%s') LIMIT 1",
1678                         intval($owner["uid"]), dbesc($repeated_guid),
1679                         dbesc(NETWORK_DFRN), dbesc(NETWORK_DIASPORA), dbesc(NETWORK_OSTATUS));
1680                 if ($r)
1681                         $repeated_item = $r[0];
1682                 else
1683                         return false;
1684
1685                 $contact = self::contact_entry($repeated_item['author-link'], $owner);
1686
1687                 $parent_item = (($item['thr-parent']) ? $item['thr-parent'] : $item['parent-uri']);
1688
1689                 $title = $owner["nick"]." repeated a notice by ".$contact["nick"];
1690
1691                 self::entry_content($doc, $entry, $item, $owner, $title, ACTIVITY_SHARE, false);
1692
1693                 $as_object = $doc->createElement("activity:object");
1694
1695                 xml::add_element($doc, $as_object, "activity:object-type", NAMESPACE_ACTIVITY_SCHEMA."activity");
1696
1697                 self::entry_content($doc, $as_object, $repeated_item, $owner, "", "", false);
1698
1699                 $author = self::add_author($doc, $contact);
1700                 $as_object->appendChild($author);
1701
1702                 $as_object2 = $doc->createElement("activity:object");
1703
1704                 xml::add_element($doc, $as_object2, "activity:object-type", self::construct_objecttype($repeated_item));
1705
1706                 $title = sprintf("New comment by %s", $contact["nick"]);
1707
1708                 self::entry_content($doc, $as_object2, $repeated_item, $owner, $title);
1709
1710                 $as_object->appendChild($as_object2);
1711
1712                 self::entry_footer($doc, $as_object, $item, $owner, false);
1713
1714                 $source = self::source_entry($doc, $contact);
1715
1716                 $as_object->appendChild($source);
1717
1718                 $entry->appendChild($as_object);
1719
1720                 self::entry_footer($doc, $entry, $item, $owner);
1721
1722                 return $entry;
1723         }
1724
1725         /**
1726          * @brief Adds an entry element with a "like"
1727          *
1728          * @param object $doc XML document
1729          * @param array $item Data of the item that is to be posted
1730          * @param array $owner Contact data of the poster
1731          * @param bool $toplevel Is it for en entry element (false) or a feed entry (true)?
1732          *
1733          * @return object Entry element with "like"
1734          */
1735         private function like_entry($doc, $item, $owner, $toplevel) {
1736
1737                 if (($item["id"] != $item["parent"]) AND (normalise_link($item["author-link"]) != normalise_link($owner["url"]))) {
1738                         logger("OStatus entry is from author ".$owner["url"]." - not from ".$item["author-link"].". Quitting.", LOGGER_DEBUG);
1739                 }
1740
1741                 $title = self::entry_header($doc, $entry, $owner, $toplevel);
1742
1743                 $verb = NAMESPACE_ACTIVITY_SCHEMA."favorite";
1744                 self::entry_content($doc, $entry, $item, $owner, "Favorite", $verb, false);
1745
1746                 $as_object = $doc->createElement("activity:object");
1747
1748                 $parent = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d",
1749                         dbesc($item["thr-parent"]), intval($item["uid"]));
1750                 $parent_item = (($item['thr-parent']) ? $item['thr-parent'] : $item['parent-uri']);
1751
1752                 xml::add_element($doc, $as_object, "activity:object-type", self::construct_objecttype($parent[0]));
1753
1754                 self::entry_content($doc, $as_object, $parent[0], $owner, "New entry");
1755
1756                 $entry->appendChild($as_object);
1757
1758                 self::entry_footer($doc, $entry, $item, $owner);
1759
1760                 return $entry;
1761         }
1762
1763         /**
1764          * @brief Adds the person object element to the XML document
1765          *
1766          * @param object $doc XML document
1767          * @param array $owner Contact data of the poster
1768          * @param array $contact Contact data of the target
1769          *
1770          * @return object author element
1771          */
1772         private function add_person_object($doc, $owner, $contact) {
1773
1774                 $object = $doc->createElement("activity:object");
1775                 xml::add_element($doc, $object, "activity:object-type", ACTIVITY_OBJ_PERSON);
1776
1777                 if ($contact['network'] == NETWORK_PHANTOM) {
1778                         xml::add_element($doc, $object, "id", $contact['url']);
1779                         return $object;
1780                 }
1781
1782                 xml::add_element($doc, $object, "id", $contact["alias"]);
1783                 xml::add_element($doc, $object, "title", $contact["nick"]);
1784
1785                 $attributes = array("rel" => "alternate", "type" => "text/html", "href" => $contact["url"]);
1786                 xml::add_element($doc, $object, "link", "", $attributes);
1787
1788                 $attributes = array(
1789                                 "rel" => "avatar",
1790                                 "type" => "image/jpeg", // To-Do?
1791                                 "media:width" => 175,
1792                                 "media:height" => 175,
1793                                 "href" => $contact["photo"]);
1794                 xml::add_element($doc, $object, "link", "", $attributes);
1795
1796                 xml::add_element($doc, $object, "poco:preferredUsername", $contact["nick"]);
1797                 xml::add_element($doc, $object, "poco:displayName", $contact["name"]);
1798
1799                 if (trim($contact["location"]) != "") {
1800                         $element = $doc->createElement("poco:address");
1801                         xml::add_element($doc, $element, "poco:formatted", $contact["location"]);
1802                         $object->appendChild($element);
1803                 }
1804
1805                 return $object;
1806         }
1807
1808         /**
1809          * @brief Adds a follow/unfollow entry element
1810          *
1811          * @param object $doc XML document
1812          * @param array $item Data of the follow/unfollow message
1813          * @param array $owner Contact data of the poster
1814          * @param bool $toplevel Is it for en entry element (false) or a feed entry (true)?
1815          *
1816          * @return object Entry element
1817          */
1818         private function follow_entry($doc, $item, $owner, $toplevel) {
1819
1820                 $item["id"] = $item["parent"] = 0;
1821                 $item["created"] = $item["edited"] = date("c");
1822                 $item["private"] = true;
1823
1824                 $contact = Probe::uri($item['follow']);
1825
1826                 if ($contact['alias'] == '') {
1827                         $contact['alias'] = $contact["url"];
1828                 } else {
1829                         $item['follow'] = $contact['alias'];
1830                 }
1831
1832                 $r = q("SELECT `id` FROM `contact` WHERE `uid` = %d AND `nurl` = '%s'",
1833                         intval($owner['uid']), dbesc(normalise_link($contact["url"])));
1834
1835                 if (dbm::is_result($r)) {
1836                         $connect_id = $r[0]['id'];
1837                 } else {
1838                         $connect_id = 0;
1839                 }
1840
1841                 if ($item['verb'] == ACTIVITY_FOLLOW) {
1842                         $message = t('%s is now following %s.');
1843                         $title = t('following');
1844                         $action = "subscription";
1845                 } else {
1846                         $message = t('%s stopped following %s.');
1847                         $title = t('stopped following');
1848                         $action = "unfollow";
1849                 }
1850
1851                 $item["uri"] = $item['parent-uri'] = $item['thr-parent'] =
1852                                 'tag:'.get_app()->get_hostname().
1853                                 ','.date('Y-m-d').':'.$action.':'.$owner['uid'].
1854                                 ':person:'.$connect_id.':'.$item['created'];
1855
1856                 $item["body"] = sprintf($message, $owner["nick"], $contact["nick"]);
1857
1858                 self::entry_header($doc, $entry, $owner, $toplevel);
1859
1860                 self::entry_content($doc, $entry, $item, $owner, $title);
1861
1862                 $object = self::add_person_object($doc, $owner, $contact);
1863                 $entry->appendChild($object);
1864
1865                 self::entry_footer($doc, $entry, $item, $owner);
1866
1867                 return $entry;
1868         }
1869
1870         /**
1871          * @brief Adds a regular entry element
1872          *
1873          * @param object $doc XML document
1874          * @param array $item Data of the item that is to be posted
1875          * @param array $owner Contact data of the poster
1876          * @param bool $toplevel Is it for en entry element (false) or a feed entry (true)?
1877          *
1878          * @return object Entry element
1879          */
1880         private function note_entry($doc, $item, $owner, $toplevel) {
1881
1882                 if (($item["id"] != $item["parent"]) AND (normalise_link($item["author-link"]) != normalise_link($owner["url"]))) {
1883                         logger("OStatus entry is from author ".$owner["url"]." - not from ".$item["author-link"].". Quitting.", LOGGER_DEBUG);
1884                 }
1885
1886                 $title = self::entry_header($doc, $entry, $owner, $toplevel);
1887
1888                 xml::add_element($doc, $entry, "activity:object-type", ACTIVITY_OBJ_NOTE);
1889
1890                 self::entry_content($doc, $entry, $item, $owner, $title);
1891
1892                 self::entry_footer($doc, $entry, $item, $owner);
1893
1894                 return $entry;
1895         }
1896
1897         /**
1898          * @brief Adds a header element to the XML document
1899          *
1900          * @param object $doc XML document
1901          * @param object $entry The entry element where the elements are added
1902          * @param array $owner Contact data of the poster
1903          * @param bool $toplevel Is it for en entry element (false) or a feed entry (true)?
1904          *
1905          * @return string The title for the element
1906          */
1907         private function entry_header($doc, &$entry, $owner, $toplevel) {
1908                 /// @todo Check if this title stuff is really needed (I guess not)
1909                 if (!$toplevel) {
1910                         $entry = $doc->createElement("entry");
1911                         $title = sprintf("New note by %s", $owner["nick"]);
1912                 } else {
1913                         $entry = $doc->createElementNS(NAMESPACE_ATOM1, "entry");
1914
1915                         $entry->setAttribute("xmlns:thr", NAMESPACE_THREAD);
1916                         $entry->setAttribute("xmlns:georss", NAMESPACE_GEORSS);
1917                         $entry->setAttribute("xmlns:activity", NAMESPACE_ACTIVITY);
1918                         $entry->setAttribute("xmlns:media", NAMESPACE_MEDIA);
1919                         $entry->setAttribute("xmlns:poco", NAMESPACE_POCO);
1920                         $entry->setAttribute("xmlns:ostatus", NAMESPACE_OSTATUS);
1921                         $entry->setAttribute("xmlns:statusnet", NAMESPACE_STATUSNET);
1922
1923                         $author = self::add_author($doc, $owner);
1924                         $entry->appendChild($author);
1925
1926                         $title = sprintf("New comment by %s", $owner["nick"]);
1927                 }
1928                 return $title;
1929         }
1930
1931         /**
1932          * @brief Adds elements to the XML document
1933          *
1934          * @param object $doc XML document
1935          * @param object $entry Entry element where the content is added
1936          * @param array $item Data of the item that is to be posted
1937          * @param array $owner Contact data of the poster
1938          * @param string $title Title for the post
1939          * @param string $verb The activity verb
1940          * @param bool $complete Add the "status_net" element?
1941          */
1942         private function entry_content($doc, $entry, $item, $owner, $title, $verb = "", $complete = true) {
1943
1944                 if ($verb == "")
1945                         $verb = self::construct_verb($item);
1946
1947                 xml::add_element($doc, $entry, "id", $item["uri"]);
1948                 xml::add_element($doc, $entry, "title", $title);
1949
1950                 $body = self::format_picture_post($item['body']);
1951
1952                 if ($item['title'] != "")
1953                         $body = "[b]".$item['title']."[/b]\n\n".$body;
1954
1955                 $body = bbcode($body, false, false, 7);
1956
1957                 xml::add_element($doc, $entry, "content", $body, array("type" => "html"));
1958
1959                 xml::add_element($doc, $entry, "link", "", array("rel" => "alternate", "type" => "text/html",
1960                                                                 "href" => App::get_baseurl()."/display/".$item["guid"]));
1961
1962                 if ($complete AND ($item["id"] > 0))
1963                         xml::add_element($doc, $entry, "status_net", "", array("notice_id" => $item["id"]));
1964
1965                 xml::add_element($doc, $entry, "activity:verb", $verb);
1966
1967                 xml::add_element($doc, $entry, "published", datetime_convert("UTC","UTC",$item["created"]."+00:00",ATOM_TIME));
1968                 xml::add_element($doc, $entry, "updated", datetime_convert("UTC","UTC",$item["edited"]."+00:00",ATOM_TIME));
1969         }
1970
1971         /**
1972          * @brief Adds the elements at the foot of an entry to the XML document
1973          *
1974          * @param object $doc XML document
1975          * @param object $entry The entry element where the elements are added
1976          * @param array $item Data of the item that is to be posted
1977          * @param array $owner Contact data of the poster
1978          * @param $complete
1979          */
1980         private function entry_footer($doc, $entry, $item, $owner, $complete = true) {
1981
1982                 $mentioned = array();
1983
1984                 if (($item['parent'] != $item['id']) || ($item['parent-uri'] !== $item['uri']) || (($item['thr-parent'] !== '') && ($item['thr-parent'] !== $item['uri']))) {
1985                         $parent = q("SELECT `guid`, `author-link`, `owner-link` FROM `item` WHERE `id` = %d", intval($item["parent"]));
1986                         $parent_item = (($item['thr-parent']) ? $item['thr-parent'] : $item['parent-uri']);
1987
1988                         $attributes = array(
1989                                         "ref" => $parent_item,
1990                                         "type" => "text/html",
1991                                         "href" => App::get_baseurl()."/display/".$parent[0]["guid"]);
1992                         xml::add_element($doc, $entry, "thr:in-reply-to", "", $attributes);
1993
1994                         $attributes = array(
1995                                         "rel" => "related",
1996                                         "href" => App::get_baseurl()."/display/".$parent[0]["guid"]);
1997                         xml::add_element($doc, $entry, "link", "", $attributes);
1998
1999                         $mentioned[$parent[0]["author-link"]] = $parent[0]["author-link"];
2000                         $mentioned[$parent[0]["owner-link"]] = $parent[0]["owner-link"];
2001
2002                         $thrparent = q("SELECT `guid`, `author-link`, `owner-link` FROM `item` WHERE `uid` = %d AND `uri` = '%s'",
2003                                         intval($owner["uid"]),
2004                                         dbesc($parent_item));
2005                         if ($thrparent) {
2006                                 $mentioned[$thrparent[0]["author-link"]] = $thrparent[0]["author-link"];
2007                                 $mentioned[$thrparent[0]["owner-link"]] = $thrparent[0]["owner-link"];
2008                         }
2009                 }
2010
2011                 if (intval($item["parent"]) > 0) {
2012                         $conversation = App::get_baseurl()."/display/".$owner["nick"]."/".$item["parent"];
2013                         xml::add_element($doc, $entry, "link", "", array("rel" => "ostatus:conversation", "href" => $conversation));
2014                         xml::add_element($doc, $entry, "ostatus:conversation", $conversation);
2015                 }
2016
2017                 $tags = item_getfeedtags($item);
2018
2019                 if(count($tags))
2020                         foreach($tags as $t)
2021                                 if ($t[0] == "@")
2022                                         $mentioned[$t[1]] = $t[1];
2023
2024                 // Make sure that mentions are accepted (GNU Social has problems with mixing HTTP and HTTPS)
2025                 $newmentions = array();
2026                 foreach ($mentioned AS $mention) {
2027                         $newmentions[str_replace("http://", "https://", $mention)] = str_replace("http://", "https://", $mention);
2028                         $newmentions[str_replace("https://", "http://", $mention)] = str_replace("https://", "http://", $mention);
2029                 }
2030                 $mentioned = $newmentions;
2031
2032                 foreach ($mentioned AS $mention) {
2033                         $r = q("SELECT `forum`, `prv` FROM `contact` WHERE `uid` = %d AND `nurl` = '%s'",
2034                                 intval($owner["uid"]),
2035                                 dbesc(normalise_link($mention)));
2036                         if ($r[0]["forum"] OR $r[0]["prv"])
2037                                 xml::add_element($doc, $entry, "link", "", array("rel" => "mentioned",
2038                                                                                         "ostatus:object-type" => ACTIVITY_OBJ_GROUP,
2039                                                                                         "href" => $mention));
2040                         else
2041                                 xml::add_element($doc, $entry, "link", "", array("rel" => "mentioned",
2042                                                                                         "ostatus:object-type" => ACTIVITY_OBJ_PERSON,
2043                                                                                         "href" => $mention));
2044                 }
2045
2046                 if (!$item["private"]) {
2047                         xml::add_element($doc, $entry, "link", "", array("rel" => "ostatus:attention",
2048                                                                         "href" => "http://activityschema.org/collection/public"));
2049                         xml::add_element($doc, $entry, "link", "", array("rel" => "mentioned",
2050                                                                         "ostatus:object-type" => "http://activitystrea.ms/schema/1.0/collection",
2051                                                                         "href" => "http://activityschema.org/collection/public"));
2052                 }
2053
2054                 if(count($tags))
2055                         foreach($tags as $t)
2056                                 if ($t[0] != "@")
2057                                         xml::add_element($doc, $entry, "category", "", array("term" => $t[2]));
2058
2059                 self::get_attachment($doc, $entry, $item);
2060
2061                 if ($complete AND ($item["id"] > 0)) {
2062                         $app = $item["app"];
2063                         if ($app == "")
2064                                 $app = "web";
2065
2066                         $attributes = array("local_id" => $item["id"], "source" => $app);
2067
2068                         if (isset($parent["id"]))
2069                                 $attributes["repeat_of"] = $parent["id"];
2070
2071                         if ($item["coord"] != "")
2072                                 xml::add_element($doc, $entry, "georss:point", $item["coord"]);
2073
2074                         xml::add_element($doc, $entry, "statusnet:notice_info", "", $attributes);
2075                 }
2076         }
2077
2078         /**
2079          * @brief Creates the XML feed for a given nickname
2080          *
2081          * @param app $a The application class
2082          * @param string $owner_nick Nickname of the feed owner
2083          * @param string $last_update Date of the last update
2084          *
2085          * @return string XML feed
2086          */
2087         public static function feed(App $a, $owner_nick, $last_update) {
2088
2089                 $r = q("SELECT `contact`.*, `user`.`nickname`, `user`.`timezone`, `user`.`page-flags`
2090                                 FROM `contact` INNER JOIN `user` ON `user`.`uid` = `contact`.`uid`
2091                                 WHERE `contact`.`self` AND `user`.`nickname` = '%s' LIMIT 1",
2092                                 dbesc($owner_nick));
2093                 if (!$r)
2094                         return;
2095
2096                 $owner = $r[0];
2097
2098                 if(!strlen($last_update))
2099                         $last_update = 'now -30 days';
2100
2101                 $check_date = datetime_convert('UTC','UTC',$last_update,'Y-m-d H:i:s');
2102                 $authorid = get_contact($owner["url"], 0);
2103
2104                 $items = q("SELECT `item`.*, `item`.`id` AS `item_id` FROM `item` USE INDEX (`uid_contactid_created`)
2105                                 STRAIGHT_JOIN `thread` ON `thread`.`iid` = `item`.`parent`
2106                                 WHERE `item`.`uid` = %d AND `item`.`contact-id` = %d AND
2107                                         `item`.`author-id` = %d AND `item`.`created` > '%s' AND
2108                                         NOT `item`.`deleted` AND NOT `item`.`private` AND
2109                                         `thread`.`network` IN ('%s', '%s')
2110                                 ORDER BY `item`.`created` DESC LIMIT 300",
2111                                 intval($owner["uid"]), intval($owner["id"]),
2112                                 intval($authorid), dbesc($check_date),
2113                                 dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN));
2114
2115 /*              2016-10-23: The old query will be kept until we are sure that the query above is a good and fast replacement
2116
2117                 $items = q("SELECT `item`.*, `item`.`id` AS `item_id` FROM `item`
2118                                 STRAIGHT_JOIN `thread` ON `thread`.`iid` = `item`.`parent`
2119                                 LEFT JOIN `item` AS `thritem` ON `thritem`.`uri`=`item`.`thr-parent` AND `thritem`.`uid`=`item`.`uid`
2120                                 WHERE `item`.`uid` = %d AND `item`.`received` > '%s' AND NOT `item`.`private` AND NOT `item`.`deleted`
2121                                         AND `item`.`allow_cid` = '' AND `item`.`allow_gid` = '' AND `item`.`deny_cid`  = '' AND `item`.`deny_gid`  = ''
2122                                         AND ((`item`.`wall` AND (`item`.`parent` = `item`.`id`))
2123                                                 OR (`item`.`network` = '%s' AND ((`thread`.`network` IN ('%s', '%s')) OR (`thritem`.`network` IN ('%s', '%s')))) AND `thread`.`mention`)
2124                                         AND ((`item`.`owner-link` IN ('%s', '%s') AND (`item`.`parent` = `item`.`id`))
2125                                                 OR (`item`.`author-link` IN ('%s', '%s')))
2126                                 ORDER BY `item`.`id` DESC
2127                                 LIMIT 0, 300",
2128                                 intval($owner["uid"]), dbesc($check_date), dbesc(NETWORK_DFRN),
2129                                 //dbesc(NETWORK_OSTATUS), dbesc(NETWORK_OSTATUS),
2130                                 //dbesc(NETWORK_OSTATUS), dbesc(NETWORK_OSTATUS),
2131                                 dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN),
2132                                 dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DFRN),
2133                                 dbesc($owner["nurl"]), dbesc(str_replace("http://", "https://", $owner["nurl"])),
2134                                 dbesc($owner["nurl"]), dbesc(str_replace("http://", "https://", $owner["nurl"]))
2135                         );
2136 */
2137                 $doc = new DOMDocument('1.0', 'utf-8');
2138                 $doc->formatOutput = true;
2139
2140                 $root = self::add_header($doc, $owner);
2141
2142                 foreach ($items AS $item) {
2143                         $entry = self::entry($doc, $item, $owner);
2144                         $root->appendChild($entry);
2145                 }
2146
2147                 return(trim($doc->saveXML()));
2148         }
2149
2150         /**
2151          * @brief Creates the XML for a salmon message
2152          *
2153          * @param array $item Data of the item that is to be posted
2154          * @param array $owner Contact data of the poster
2155          *
2156          * @return string XML for the salmon
2157          */
2158         public static function salmon($item,$owner) {
2159
2160                 $doc = new DOMDocument('1.0', 'utf-8');
2161                 $doc->formatOutput = true;
2162
2163                 $entry = self::entry($doc, $item, $owner, true);
2164
2165                 $doc->appendChild($entry);
2166
2167                 return(trim($doc->saveXML()));
2168         }
2169 }
2170 ?>