include/conversation.php

   1 <?php
   2 /**
   3  * @file include/conversation.php
   4  */
   5
   6 use Friendica\App;
   7 use Friendica\Content\ContactSelector;
   8 use Friendica\Content\Feature;
   9 use Friendica\Content\Text\BBCode;
  10 use Friendica\Core\Addon;
  11 use Friendica\Core\Config;
  12 use Friendica\Core\L10n;
  13 use Friendica\Core\PConfig;
  14 use Friendica\Core\System;
  15 use Friendica\Database\DBM;
  16 use Friendica\Model\Contact;
  17 use Friendica\Model\Profile;
  18 use Friendica\Object\Post;
  19 use Friendica\Object\Thread;
  20 use Friendica\Util\DateTimeFormat;
  21 use Friendica\Util\Temporal;
  22 use Friendica\Util\XML;
  23
  24 require_once "include/acl_selectors.php";
  25
  26 function item_extract_images($body) {
  27
  28         $saved_image = [];
  29         $orig_body = $body;
  30         $new_body = '';
  31
  32         $cnt = 0;
  33         $img_start = strpos($orig_body, '[img');
  34         $img_st_close = ($img_start !== false ? strpos(substr($orig_body, $img_start), ']') : false);
  35         $img_end = ($img_start !== false ? strpos(substr($orig_body, $img_start), '[/img]') : false);
  36         while (($img_st_close !== false) && ($img_end !== false)) {
  37
  38                 $img_st_close++; // make it point to AFTER the closing bracket
  39                 $img_end += $img_start;
  40
  41                 if (! strcmp(substr($orig_body, $img_start + $img_st_close, 5), 'data:')) {
  42                         // This is an embedded image
  43
  44                         $saved_image[$cnt] = substr($orig_body, $img_start + $img_st_close, $img_end - ($img_start + $img_st_close));
  45                         $new_body = $new_body . substr($orig_body, 0, $img_start) . '[!#saved_image' . $cnt . '#!]';
  46
  47                         $cnt++;
  48                 } else {
  49                         $new_body = $new_body . substr($orig_body, 0, $img_end + strlen('[/img]'));
  50                 }
  51
  52                 $orig_body = substr($orig_body, $img_end + strlen('[/img]'));
  53
  54                 if ($orig_body === false) {
  55                         // in case the body ends on a closing image tag
  56                         $orig_body = '';
  57                 }
  58
  59                 $img_start = strpos($orig_body, '[img');
  60                 $img_st_close = ($img_start !== false ? strpos(substr($orig_body, $img_start), ']') : false);
  61                 $img_end = ($img_start !== false ? strpos(substr($orig_body, $img_start), '[/img]') : false);
  62         }
  63
  64         $new_body = $new_body . $orig_body;
  65
  66         return ['body' => $new_body, 'images' => $saved_image];
  67 }
  68
  69 function item_redir_and_replace_images($body, $images, $cid) {
  70
  71         $origbody = $body;
  72         $newbody = '';
  73
  74         $cnt = 1;
  75         $pos = BBCode::getTagPosition($origbody, 'url', 0);
  76         while ($pos !== false && $cnt < 1000) {
  77
  78                 $search = '/\[url\=(.*?)\]\[!#saved_image([0-9]*)#!\]\[\/url\]' . '/is';
  79                 $replace = '[url=' . System::baseUrl() . '/redir/' . $cid
  80                                    . '?f=1&url=' . '$1' . '][!#saved_image' . '$2' .'#!][/url]';
  81
  82                 $newbody .= substr($origbody, 0, $pos['start']['open']);
  83                 $subject = substr($origbody, $pos['start']['open'], $pos['end']['close'] - $pos['start']['open']);
  84                 $origbody = substr($origbody, $pos['end']['close']);
  85                 if ($origbody === false) {
  86                         $origbody = '';
  87                 }
  88
  89                 $subject = preg_replace($search, $replace, $subject);
  90                 $newbody .= $subject;
  91
  92                 $cnt++;
  93                 // Isn't this supposed to use $cnt value for $occurrences? - @MrPetovan
  94                 $pos = BBCode::getTagPosition($origbody, 'url', 0);
  95         }
  96         $newbody .= $origbody;
  97
  98         $cnt = 0;
  99         foreach ($images as $image) {
 100                 /*
 101                  * We're depending on the property of 'foreach' (specified on the PHP website) that
 102                  * it loops over the array starting from the first element and going sequentially
 103                  * to the last element.
 104                  */
 105                 $newbody = str_replace('[!#saved_image' . $cnt . '#!]', '[img]' . $image . '[/img]', $newbody);
 106                 $cnt++;
 107         }
 108         return $newbody;
 109 }
 110
 111 /**
 112  * Render actions localized
 113  */
 114 function localize_item(&$item) {
 115
 116         $extracted = item_extract_images($item['body']);
 117         if ($extracted['images']) {
 118                 $item['body'] = item_redir_and_replace_images($extracted['body'], $extracted['images'], $item['contact-id']);
 119         }
 120
 121         /// @Separted ???
 122         $xmlhead = "<" . "?xml version='1.0' encoding='UTF-8' ?" . ">";
 123         if (activity_match($item['verb'], ACTIVITY_LIKE)
 124                 || activity_match($item['verb'], ACTIVITY_DISLIKE)
 125                 || activity_match($item['verb'], ACTIVITY_ATTEND)
 126                 || activity_match($item['verb'], ACTIVITY_ATTENDNO)
 127                 || activity_match($item['verb'], ACTIVITY_ATTENDMAYBE)) {
 128
 129                 /// @TODO may hurt performance
 130                 $r = q("SELECT * FROM `item`, `contact`
 131                         WHERE `item`.`contact-id`=`contact`.`id`
 132                         AND `item`.`uri`='%s'",
 133                         dbesc($item['parent-uri']));
 134                 if (!DBM::is_result($r)) {
 135                         return;
 136                 }
 137                 $obj = $r[0];
 138
 139                 $author  = '[url=' . $item['author-link'] . ']' . $item['author-name'] . '[/url]';
 140                 $objauthor =  '[url=' . $obj['author-link'] . ']' . $obj['author-name'] . '[/url]';
 141
 142                 switch ($obj['verb']) {
 143                         case ACTIVITY_POST:
 144                                 switch ($obj['object-type']) {
 145                                         case ACTIVITY_OBJ_EVENT:
 146                                                 $post_type = L10n::t('event');
 147                                                 break;
 148                                         default:
 149                                                 $post_type = L10n::t('status');
 150                                 }
 151                                 break;
 152                         default:
 153                                 if ($obj['resource-id']) {
 154                                         $post_type = L10n::t('photo');
 155                                         $m = [];
 156                                         preg_match("/\[url=([^]]*)\]/", $obj['body'], $m);
 157                                         $rr['plink'] = $m[1];
 158                                 } else {
 159                                         $post_type = L10n::t('status');
 160                                 }
 161                 }
 162
 163                 $plink = '[url=' . $obj['plink'] . ']' . $post_type . '[/url]';
 164
 165                 if (activity_match($item['verb'], ACTIVITY_LIKE)) {
 166                         $bodyverb = L10n::t('%1$s likes %2$s\'s %3$s');
 167                 }
 168                 elseif (activity_match($item['verb'], ACTIVITY_DISLIKE)) {
 169                         $bodyverb = L10n::t('%1$s doesn\'t like %2$s\'s %3$s');
 170                 }
 171                 elseif (activity_match($item['verb'], ACTIVITY_ATTEND)) {
 172                         $bodyverb = L10n::t('%1$s attends %2$s\'s %3$s');
 173                 }
 174                 elseif (activity_match($item['verb'], ACTIVITY_ATTENDNO)) {
 175                         $bodyverb = L10n::t('%1$s doesn\'t attend %2$s\'s %3$s');
 176                 }
 177                 elseif (activity_match($item['verb'], ACTIVITY_ATTENDMAYBE)) {
 178                         $bodyverb = L10n::t('%1$s attends maybe %2$s\'s %3$s');
 179                 }
 180                 $item['body'] = sprintf($bodyverb, $author, $objauthor, $plink);
 181
 182         }
 183         if (activity_match($item['verb'], ACTIVITY_FRIEND)) {
 184
 185                 if ($item['object-type']=="" || $item['object-type']!== ACTIVITY_OBJ_PERSON) return;
 186
 187                 $Aname = $item['author-name'];
 188                 $Alink = $item['author-link'];
 189
 190                 $xmlhead="<"."?xml version='1.0' encoding='UTF-8' ?".">";
 191
 192                 $obj = XML::parseString($xmlhead.$item['object']);
 193                 $links = XML::parseString($xmlhead."<links>".unxmlify($obj->link)."</links>");
 194
 195                 $Bname = $obj->title;
 196                 $Blink = ""; $Bphoto = "";
 197                 foreach ($links->link as $l) {
 198                         $atts = $l->attributes();
 199                         switch ($atts['rel']) {
 200                                 case "alternate": $Blink = $atts['href'];
 201                                 case "photo": $Bphoto = $atts['href'];
 202                         }
 203                 }
 204
 205                 $A = '[url=' . Profile::zrl($Alink) . ']' . $Aname . '[/url]';
 206                 $B = '[url=' . Profile::zrl($Blink) . ']' . $Bname . '[/url]';
 207                 if ($Bphoto != "") {
 208                         $Bphoto = '[url=' . Profile::zrl($Blink) . '][img]' . $Bphoto . '[/img][/url]';
 209                 }
 210
 211                 $item['body'] = L10n::t('%1$s is now friends with %2$s', $A, $B)."\n\n\n".$Bphoto;
 212
 213         }
 214         if (stristr($item['verb'], ACTIVITY_POKE)) {
 215                 $verb = urldecode(substr($item['verb'],strpos($item['verb'],'#')+1));
 216                 if (! $verb) {
 217                         return;
 218                 }
 219                 if ($item['object-type']=="" || $item['object-type']!== ACTIVITY_OBJ_PERSON) {
 220                         return;
 221                 }
 222
 223                 $Aname = $item['author-name'];
 224                 $Alink = $item['author-link'];
 225
 226                 $xmlhead = "<" . "?xml version='1.0' encoding='UTF-8' ?" . ">";
 227
 228                 $obj = XML::parseString($xmlhead.$item['object']);
 229                 $links = XML::parseString($xmlhead."<links>".unxmlify($obj->link)."</links>");
 230
 231                 $Bname = $obj->title;
 232                 $Blink = "";
 233                 $Bphoto = "";
 234                 foreach ($links->link as $l) {
 235                         $atts = $l->attributes();
 236                         switch ($atts['rel']) {
 237                                 case "alternate": $Blink = $atts['href'];
 238                                 case "photo": $Bphoto = $atts['href'];
 239                         }
 240                 }
 241
 242                 $A = '[url=' . Profile::zrl($Alink) . ']' . $Aname . '[/url]';
 243                 $B = '[url=' . Profile::zrl($Blink) . ']' . $Bname . '[/url]';
 244                 if ($Bphoto != "") {
 245                         $Bphoto = '[url=' . Profile::zrl($Blink) . '][img=80x80]' . $Bphoto . '[/img][/url]';
 246                 }
 247
 248                 /*
 249                  * we can't have a translation string with three positions but no distinguishable text
 250                  * So here is the translate string.
 251                  */
 252                 $txt = L10n::t('%1$s poked %2$s');
 253
 254                 // now translate the verb
 255                 $poked_t = trim(sprintf($txt, "", ""));
 256                 $txt = str_replace( $poked_t, L10n::t($verb), $txt);
 257
 258                 // then do the sprintf on the translation string
 259
 260                 $item['body'] = sprintf($txt, $A, $B). "\n\n\n" . $Bphoto;
 261
 262         }
 263
 264         if (activity_match($item['verb'], ACTIVITY_TAG)) {
 265                 /// @TODO may hurt performance "joining" two tables + asterisk
 266                 $r = q("SELECT * FROM `item`, `contact`
 267                         WHERE `item`.`contact-id`=`contact`.`id`
 268                         AND `item`.`uri`='%s'",
 269                         dbesc($item['parent-uri']));
 270
 271                 if (!DBM::is_result($r)) {
 272                         return;
 273                 }
 274
 275                 $obj = $r[0];
 276
 277                 $author  = '[url=' . Profile::zrl($item['author-link']) . ']' . $item['author-name'] . '[/url]';
 278                 $objauthor =  '[url=' . Profile::zrl($obj['author-link']) . ']' . $obj['author-name'] . '[/url]';
 279
 280                 switch ($obj['verb']) {
 281                         case ACTIVITY_POST:
 282                                 switch ($obj['object-type']) {
 283                                         case ACTIVITY_OBJ_EVENT:
 284                                                 $post_type = L10n::t('event');
 285                                                 break;
 286                                         default:
 287                                                 $post_type = L10n::t('status');
 288                                 }
 289                                 break;
 290                         default:
 291                                 if ($obj['resource-id']) {
 292                                         $post_type = L10n::t('photo');
 293                                         $m=[]; preg_match("/\[url=([^]]*)\]/", $obj['body'], $m);
 294                                         $rr['plink'] = $m[1];
 295                                 } else {
 296                                         $post_type = L10n::t('status');
 297                                 }
 298                                 // Let's break everthing ... ;-)
 299                                 break;
 300                 }
 301                 $plink = '[url=' . $obj['plink'] . ']' . $post_type . '[/url]';
 302
 303                 $parsedobj = XML::parseString($xmlhead.$item['object']);
 304
 305                 $tag = sprintf('#[url=%s]%s[/url]', $parsedobj->id, $parsedobj->content);
 306                 $item['body'] = L10n::t('%1$s tagged %2$s\'s %3$s with %4$s', $author, $objauthor, $plink, $tag );
 307
 308         }
 309         if (activity_match($item['verb'], ACTIVITY_FAVORITE)) {
 310
 311                 if ($item['object-type'] == "") {
 312                         return;
 313                 }
 314
 315                 $Aname = $item['author-name'];
 316                 $Alink = $item['author-link'];
 317
 318                 $xmlhead = "<" . "?xml version='1.0' encoding='UTF-8' ?" . ">";
 319
 320                 $obj = XML::parseString($xmlhead.$item['object']);
 321                 if (strlen($obj->id)) {
 322                         $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
 323                                         dbesc($obj->id),
 324                                         intval($item['uid'])
 325                         );
 326
 327                         if (DBM::is_result($r) && $r[0]['plink']) {
 328                                 $target = $r[0];
 329                                 $Bname = $target['author-name'];
 330                                 $Blink = $target['author-link'];
 331                                 $A = '[url=' . Profile::zrl($Alink) . ']' . $Aname . '[/url]';
 332                                 $B = '[url=' . Profile::zrl($Blink) . ']' . $Bname . '[/url]';
 333                                 $P = '[url=' . $target['plink'] . ']' . L10n::t('post/item') . '[/url]';
 334                                 $item['body'] = L10n::t('%1$s marked %2$s\'s %3$s as favorite', $A, $B, $P)."\n";
 335                         }
 336                 }
 337         }
 338         $matches = null;
 339         if (preg_match_all('/@\[url=(.*?)\]/is', $item['body'], $matches, PREG_SET_ORDER)) {
 340                 foreach ($matches as $mtch) {
 341                         if (! strpos($mtch[1], 'zrl=')) {
 342                                 $item['body'] = str_replace($mtch[0], '@[url=' . Profile::zrl($mtch[1]) . ']', $item['body']);
 343                         }
 344                 }
 345         }
 346
 347         // add zrl's to public images
 348         $photo_pattern = "/\[url=(.*?)\/photos\/(.*?)\/image\/(.*?)\]\[img(.*?)\]h(.*?)\[\/img\]\[\/url\]/is";
 349         if (preg_match($photo_pattern, $item['body'])) {
 350                 $photo_replace = '[url=' . Profile::zrl('$1' . '/photos/' . '$2' . '/image/' . '$3' ,true) . '][img' . '$4' . ']h' . '$5'  . '[/img][/url]';
 351                 $item['body'] = BBCode::pregReplaceInTag($photo_pattern, $photo_replace, 'url', $item['body']);
 352         }
 353
 354         // add sparkle links to appropriate permalinks
 355
 356         $x = stristr($item['plink'],'/display/');
 357         if ($x) {
 358                 $sparkle = false;
 359                 $y = best_link_url($item, $sparkle);
 360
 361                 if (strstr($y, '/redir/')) {
 362                         $item['plink'] = $y . '?f=&url=' . $item['plink'];
 363                 }
 364         }
 365 }
 366
 367 /**
 368  * Count the total of comments on this item and its desendants
 369  * @TODO proper type-hint + doc-tag
 370  */
 371 function count_descendants($item) {
 372         $total = count($item['children']);
 373
 374         if ($total > 0) {
 375                 foreach ($item['children'] as $child) {
 376                         if (! visible_activity($child)) {
 377                                 $total --;
 378                         }
 379                         $total += count_descendants($child);
 380                 }
 381         }
 382
 383         return $total;
 384 }
 385
 386 function visible_activity($item) {
 387
 388         /*
 389          * likes (etc.) can apply to other things besides posts. Check if they are post children,
 390          * in which case we handle them specially
 391          */
 392         $hidden_activities = [ACTIVITY_LIKE, ACTIVITY_DISLIKE, ACTIVITY_ATTEND, ACTIVITY_ATTENDNO, ACTIVITY_ATTENDMAYBE];
 393         foreach ($hidden_activities as $act) {
 394                 if (activity_match($item['verb'], $act)) {
 395                         return false;
 396                 }
 397         }
 398
 399         if (activity_match($item['verb'], ACTIVITY_FOLLOW) && $item['object-type'] === ACTIVITY_OBJ_NOTE) {
 400                 if (! (($item['self']) && ($item['uid'] == local_user()))) {
 401                         return false;
 402                 }
 403         }
 404
 405         return true;
 406 }
 407
 408 /**
 409  * @brief SQL query for items
 410  */
 411 function item_query() {
 412         return "SELECT " . item_fieldlists() . " FROM `item` " .
 413                 item_joins() . " WHERE " . item_condition();
 414 }
 415
 416 /**
 417  * @brief List of all data fields that are needed for displaying items
 418  */
 419 function item_fieldlists() {
 420
 421 /*
 422 These Fields are not added below (yet). They are here to for bug search.
 423 `item`.`type`,
 424 `item`.`extid`,
 425 `item`.`changed`,
 426 `item`.`moderated`,
 427 `item`.`target-type`,
 428 `item`.`target`,
 429 `item`.`resource-id`,
 430 `item`.`tag`,
 431 `item`.`inform`,
 432 `item`.`pubmail`,
 433 `item`.`visible`,
 434 `item`.`spam`,
 435 `item`.`bookmark`,
 436 `item`.`unseen`,
 437 `item`.`deleted`,
 438 `item`.`origin`,
 439 `item`.`forum_mode`,
 440 `item`.`mention`,
 441 `item`.`global`,
 442 `item`.`shadow`,
 443 */
 444
 445         return "`item`.`author-id`, `item`.`author-link`, `item`.`author-name`, `item`.`author-avatar`,
 446                 `item`.`owner-id`, `item`.`owner-link`, `item`.`owner-name`, `item`.`owner-avatar`,
 447                 `item`.`contact-id`, `item`.`uid`, `item`.`id`, `item`.`parent`,
 448                 `item`.`uri`, `item`.`thr-parent`, `item`.`parent-uri`,
 449                 `item`.`commented`, `item`.`created`, `item`.`edited`, `item`.`received`,
 450                 `item`.`verb`, `item`.`object-type`, `item`.`postopts`, `item`.`plink`,
 451                 `item`.`guid`, `item`.`wall`, `item`.`private`, `item`.`starred`,
 452                 `item`.`title`, `item`.`body`, `item`.`file`, `item`.`event-id`,
 453                 `item`.`location`, `item`.`coord`, `item`.`app`, `item`.`attach`,
 454                 `item`.`rendered-hash`, `item`.`rendered-html`, `item`.`object`,
 455                 `item`.`allow_cid`, `item`.`allow_gid`, `item`.`deny_cid`, `item`.`deny_gid`,
 456                 `item`.`id` AS `item_id`, `item`.`network` AS `item_network`,
 457
 458                 `author`.`thumb` AS `author-thumb`, `owner`.`thumb` AS `owner-thumb`,
 459
 460                 `contact`.`network`, `contact`.`url`, `contact`.`name`, `contact`.`writable`,
 461                 `contact`.`self`, `contact`.`id` AS `cid`, `contact`.`alias`,
 462
 463                 `event`.`created` AS `event-created`, `event`.`edited` AS `event-edited`,
 464                 `event`.`start` AS `event-start`,`event`.`finish` AS `event-finish`,
 465                 `event`.`summary` AS `event-summary`,`event`.`desc` AS `event-desc`,
 466                 `event`.`location` AS `event-location`, `event`.`type` AS `event-type`,
 467                 `event`.`nofinish` AS `event-nofinish`,`event`.`adjust` AS `event-adjust`,
 468                 `event`.`ignore` AS `event-ignore`, `event`.`id` AS `event-id`";
 469 }
 470
 471 /**
 472  * @brief SQL join for contacts that are needed for displaying items
 473  */
 474 function item_joins() {
 475         return "STRAIGHT_JOIN `contact` ON `contact`.`id` = `item`.`contact-id` AND
 476                 (NOT `contact`.`blocked` OR `contact`.`pending`)
 477                 LEFT JOIN `contact` AS `author` ON `author`.`id`=`item`.`author-id`
 478                 LEFT JOIN `contact` AS `owner` ON `owner`.`id`=`item`.`owner-id`
 479                 LEFT JOIN `event` ON `event-id` = `event`.`id`";
 480 }
 481
 482 /**
 483  * @brief SQL condition for items that are needed for displaying items
 484  */
 485 function item_condition() {
 486         return "`item`.`visible` AND NOT `item`.`deleted` AND NOT `item`.`moderated`";
 487 }
 488
 489 /**
 490  * "Render" a conversation or list of items for HTML display.
 491  * There are two major forms of display:
 492  *      - Sequential or unthreaded ("New Item View" or search results)
 493  *      - conversation view
 494  * The $mode parameter decides between the various renderings and also
 495  * figures out how to determine page owner and other contextual items
 496  * that are based on unique features of the calling module.
 497  *
 498  */
 499 function conversation(App $a, $items, $mode, $update, $preview = false, $order = 'commented') {
 500         require_once 'mod/proxy.php';
 501
 502         $ssl_state = ((local_user()) ? true : false);
 503
 504         $profile_owner = 0;
 505         $live_update_div = '';
 506
 507         $arr_blocked = null;
 508
 509         if (local_user()) {
 510                 $str_blocked = PConfig::get(local_user(), 'system', 'blocked');
 511                 if ($str_blocked) {
 512                         $arr_blocked = explode(',', $str_blocked);
 513                         for ($x = 0; $x < count($arr_blocked); $x ++) {
 514                                 $arr_blocked[$x] = trim($arr_blocked[$x]);
 515                         }
 516                 }
 517
 518         }
 519
 520         $previewing = (($preview) ? ' preview ' : '');
 521
 522         if ($mode === 'network') {
 523                 $items = conversation_add_children($items, false, $order);
 524                 $profile_owner = local_user();
 525                 if (!$update) {
 526                         /*
 527                          * The special div is needed for liveUpdate to kick in for this page.
 528                          * We only launch liveUpdate if you aren't filtering in some incompatible
 529                          * way and also you aren't writing a comment (discovered in javascript).
 530                          */
 531                         $live_update_div = '<div id="live-network"></div>' . "\r\n"
 532                                 . "<script> var profile_uid = " . $_SESSION['uid']
 533                                 . "; var netargs = '" . substr($a->cmd, 8)
 534                                 . '?f='
 535                                 . ((x($_GET, 'cid'))    ? '&cid='    . $_GET['cid']    : '')
 536                                 . ((x($_GET, 'search')) ? '&search=' . $_GET['search'] : '')
 537                                 . ((x($_GET, 'star'))   ? '&star='   . $_GET['star']   : '')
 538                                 . ((x($_GET, 'order'))  ? '&order='  . $_GET['order']  : '')
 539                                 . ((x($_GET, 'bmark'))  ? '&bmark='  . $_GET['bmark']  : '')
 540                                 . ((x($_GET, 'liked'))  ? '&liked='  . $_GET['liked']  : '')
 541                                 . ((x($_GET, 'conv'))   ? '&conv='   . $_GET['conv']   : '')
 542                                 . ((x($_GET, 'spam'))   ? '&spam='   . $_GET['spam']   : '')
 543                                 . ((x($_GET, 'nets'))   ? '&nets='   . $_GET['nets']   : '')
 544                                 . ((x($_GET, 'cmin'))   ? '&cmin='   . $_GET['cmin']   : '')
 545                                 . ((x($_GET, 'cmax'))   ? '&cmax='   . $_GET['cmax']   : '')
 546                                 . ((x($_GET, 'file'))   ? '&file='   . $_GET['file']   : '')
 547
 548                                 . "'; var profile_page = " . $a->pager['page'] . "; </script>\r\n";
 549                 }
 550         } elseif ($mode === 'profile') {
 551                 $profile_owner = $a->profile['profile_uid'];
 552
 553                 if (!$update) {
 554                         $tab = 'posts';
 555                         if (x($_GET, 'tab')) {
 556                                 $tab = notags(trim($_GET['tab']));
 557                         }
 558                         if ($tab === 'posts') {
 559                                 /*
 560                                  * This is ugly, but we can't pass the profile_uid through the session to the ajax updater,
 561                                  * because browser prefetching might change it on us. We have to deliver it with the page.
 562                                  */
 563
 564                                 $live_update_div = '<div id="live-profile"></div>' . "\r\n"
 565                                         . "<script> var profile_uid = " . $a->profile['profile_uid']
 566                                         . "; var netargs = '?f='; var profile_page = " . $a->pager['page'] . "; </script>\r\n";
 567                         }
 568                 }
 569         } elseif ($mode === 'notes') {
 570                 $profile_owner = local_user();
 571                 if (!$update) {
 572                         $live_update_div = '<div id="live-notes"></div>' . "\r\n"
 573                                 . "<script> var profile_uid = " . local_user()
 574                                 . "; var netargs = '/?f='; var profile_page = " . $a->pager['page'] . "; </script>\r\n";
 575                 }
 576         } elseif ($mode === 'display') {
 577                 $profile_owner = $a->profile['uid'];
 578                 if (!$update) {
 579                         $live_update_div = '<div id="live-display"></div>' . "\r\n"
 580                                 . "<script> var profile_uid = " . $_SESSION['uid'] . ";"
 581                                 . " var profile_page = 1; </script>";
 582                 }
 583         } elseif ($mode === 'community') {
 584                 $items = conversation_add_children($items, true, $order);
 585                 $profile_owner = 0;
 586                 if (!$update) {
 587                         $live_update_div = '<div id="live-community"></div>' . "\r\n"
 588                                 . "<script> var profile_uid = -1; var netargs = '" . substr($a->cmd, 10)
 589                                 ."/?f='; var profile_page = " . $a->pager['page'] . "; </script>\r\n";
 590                 }
 591         } elseif ($mode === 'search') {
 592                 $live_update_div = '<div id="live-search"></div>' . "\r\n";
 593         }
 594
 595         $page_dropping = ((local_user() && local_user() == $profile_owner) ? true : false);
 596
 597         if (!$update) {
 598                 $_SESSION['return_url'] = $a->query_string;
 599         }
 600
 601         $cb = ['items' => $items, 'mode' => $mode, 'update' => $update, 'preview' => $preview];
 602         Addon::callHooks('conversation_start',$cb);
 603
 604         $items = $cb['items'];
 605
 606         $conv_responses = [
 607                 'like' => ['title' => L10n::t('Likes','title')], 'dislike' => ['title' => L10n::t('Dislikes','title')],
 608                 'attendyes' => ['title' => L10n::t('Attending','title')], 'attendno' => ['title' => L10n::t('Not attending','title')], 'attendmaybe' => ['title' => L10n::t('Might attend','title')]
 609         ];
 610
 611         // array with html for each thread (parent+comments)
 612         $threads = [];
 613         $threadsid = -1;
 614
 615         $page_template = get_markup_template("conversation.tpl");
 616
 617         if ($items && count($items)) {
 618                 if ($mode === 'community') {
 619                         $writable = true;
 620                 } else {
 621                         $writable = ($items[0]['uid'] == 0) && in_array($items[0]['network'], [NETWORK_OSTATUS, NETWORK_DIASPORA, NETWORK_DFRN]);
 622                 }
 623
 624                 if (!local_user()) {
 625                         $writable = false;
 626                 }
 627
 628                 if (in_array($mode, ['network-new', 'search', 'contact-posts'])) {
 629
 630                         /*
 631                          * "New Item View" on network page or search page results
 632                          * - just loop through the items and format them minimally for display
 633                          */
 634
 635                         $tpl = 'search_item.tpl';
 636
 637                         foreach ($items as $item) {
 638
 639                                 if ($arr_blocked) {
 640                                         $blocked = false;
 641                                         foreach ($arr_blocked as $b) {
 642                                                 if ($b && link_compare($item['author-link'], $b)) {
 643                                                         $blocked = true;
 644                                                         break;
 645                                                 }
 646                                         }
 647                                         if ($blocked) {
 648                                                 continue;
 649                                         }
 650                                 }
 651
 652
 653                                 $threadsid++;
 654
 655                                 $owner_url   = '';
 656                                 $owner_name  = '';
 657                                 $sparkle     = '';
 658
 659                                 // prevent private email from leaking.
 660                                 if ($item['network'] === NETWORK_MAIL && local_user() != $item['uid']) {
 661                                         continue;
 662                                 }
 663
 664                                 $profile_name = ((strlen($item['author-name'])) ? $item['author-name'] : $item['name']);
 665                                 if ($item['author-link'] && (! $item['author-name'])) {
 666                                         $profile_name = $item['author-link'];
 667                                 }
 668
 669                                 $tags = [];
 670                                 $hashtags = [];
 671                                 $mentions = [];
 672
 673                                 $searchpath = System::baseUrl()."/search?tag=";
 674
 675                                 $taglist = dba::select('term', ['type', 'term', 'url'],
 676                                                         ["`otype` = ? AND `oid` = ? AND `type` IN (?, ?)", TERM_OBJ_POST, $item['id'], TERM_HASHTAG, TERM_MENTION],
 677                                                         ['order' => ['tid']]);
 678
 679                                 while ($tag = dba::fetch($taglist)) {
 680                                         if ($tag["url"] == "") {
 681                                                 $tag["url"] = $searchpath . strtolower($tag["term"]);
 682                                         }
 683
 684                                         $tag["url"] = best_link_url($item, $sp, $tag["url"]);
 685
 686                                         if ($tag["type"] == TERM_HASHTAG) {
 687                                                 $hashtags[] = "#<a href=\"" . $tag["url"] . "\" target=\"_blank\">" . $tag["term"] . "</a>";
 688                                                 $prefix = "#";
 689                                         } elseif ($tag["type"] == TERM_MENTION) {
 690                                                 $mentions[] = "@<a href=\"" . $tag["url"] . "\" target=\"_blank\">" . $tag["term"] . "</a>";
 691                                                 $prefix = "@";
 692                                         }
 693                                         $tags[] = $prefix."<a href=\"" . $tag["url"] . "\" target=\"_blank\">" . $tag["term"] . "</a>";
 694                                 }
 695                                 dba::close($taglist);
 696
 697                                 $sp = false;
 698                                 $profile_link = best_link_url($item, $sp);
 699                                 if ($profile_link === 'mailbox') {
 700                                         $profile_link = '';
 701                                 }
 702
 703                                 if ($sp) {
 704                                         $sparkle = ' sparkle';
 705                                 } else {
 706                                         $profile_link = Profile::zrl($profile_link);
 707                                 }
 708
 709                                 if (!x($item, 'author-thumb') || ($item['author-thumb'] == "")) {
 710                                         $author_contact = Contact::getDetailsByURL($item['author-link'], $profile_owner);
 711                                         if ($author_contact["thumb"]) {
 712                                                 $item['author-thumb'] = $author_contact["thumb"];
 713                                         } else {
 714                                                 $item['author-thumb'] = $item['author-avatar'];
 715                                         }
 716                                 }
 717
 718                                 if (!isset($item['owner-thumb']) || ($item['owner-thumb'] == "")) {
 719                                         $owner_contact = Contact::getDetailsByURL($item['owner-link'], $profile_owner);
 720                                         if ($owner_contact["thumb"]) {
 721                                                 $item['owner-thumb'] = $owner_contact["thumb"];
 722                                         } else {
 723                                                 $item['owner-thumb'] = $item['owner-avatar'];
 724                                         }
 725                                 }
 726
 727                                 $locate = ['location' => $item['location'], 'coord' => $item['coord'], 'html' => ''];
 728                                 Addon::callHooks('render_location',$locate);
 729
 730                                 $location = ((strlen($locate['html'])) ? $locate['html'] : render_location_dummy($locate));
 731
 732                                 localize_item($item);
 733                                 if ($mode === 'network-new') {
 734                                         $dropping = true;
 735                                 } else {
 736                                         $dropping = false;
 737                                 }
 738
 739                                 $drop = [
 740                                         'dropping' => $dropping,
 741                                         'pagedrop' => $page_dropping,
 742                                         'select' => L10n::t('Select'),
 743                                         'delete' => L10n::t('Delete'),
 744                                 ];
 745
 746                                 $star = false;
 747                                 $isstarred = "unstarred";
 748
 749                                 $lock = false;
 750                                 $likebuttons = false;
 751
 752                                 $body = prepare_body($item, true, $preview);
 753
 754                                 list($categories, $folders) = get_cats_and_terms($item);
 755
 756                                 $profile_name_e = $profile_name;
 757                                 $item['title_e'] = $item['title'];
 758                                 $body_e = $body;
 759                                 $tags_e = $tags;
 760                                 $hashtags_e = $hashtags;
 761                                 $mentions_e = $mentions;
 762                                 $location_e = $location;
 763                                 $owner_name_e = $owner_name;
 764
 765                                 if ($item['item_network'] == "") {
 766                                         $item['item_network'] = $item['network'];
 767                                 }
 768
 769                                 $tmp_item = [
 770                                         'template' => $tpl,
 771                                         'id' => (($preview) ? 'P0' : $item['item_id']),
 772                                         'guid' => (($preview) ? 'Q0' : $item['guid']),
 773                                         'network' => $item['item_network'],
 774                                         'network_name' => ContactSelector::networkToName($item['item_network'], $profile_link),
 775                                         'linktitle' => L10n::t('View %s\'s profile @ %s', $profile_name, ((strlen($item['author-link'])) ? $item['author-link'] : $item['url'])),
 776                                         'profile_url' => $profile_link,
 777                                         'item_photo_menu' => item_photo_menu($item),
 778                                         'name' => $profile_name_e,
 779                                         'sparkle' => $sparkle,
 780                                         'lock' => $lock,
 781                                         'thumb' => System::removedBaseUrl(proxy_url($item['author-thumb'], false, PROXY_SIZE_THUMB)),
 782                                         'title' => $item['title_e'],
 783                                         'body' => $body_e,
 784                                         'tags' => $tags_e,
 785                                         'hashtags' => $hashtags_e,
 786                                         'mentions' => $mentions_e,
 787                                         'txt_cats' => L10n::t('Categories:'),
 788                                         'txt_folders' => L10n::t('Filed under:'),
 789                                         'has_cats' => ((count($categories)) ? 'true' : ''),
 790                                         'has_folders' => ((count($folders)) ? 'true' : ''),
 791                                         'categories' => $categories,
 792                                         'folders' => $folders,
 793                                         'text' => strip_tags($body_e),
 794                                         'localtime' => DateTimeFormat::local($item['created'], 'r'),
 795                                         'ago' => (($item['app']) ? L10n::t('%s from %s', Temporal::getRelativeDate($item['created']),$item['app']) : Temporal::getRelativeDate($item['created'])),
 796                                         'location' => $location_e,
 797                                         'indent' => '',
 798                                         'owner_name' => $owner_name_e,
 799                                         'owner_url' => $owner_url,
 800                                         'owner_photo' => System::removedBaseUrl(proxy_url($item['owner-thumb'], false, PROXY_SIZE_THUMB)),
 801                                         'plink' => get_plink($item),
 802                                         'edpost' => false,
 803                                         'isstarred' => $isstarred,
 804                                         'star' => $star,
 805                                         'drop' => $drop,
 806                                         'vote' => $likebuttons,
 807                                         'like' => '',
 808                                         'dislike' => '',
 809                                         'comment' => '',
 810                                         'conv' => (($preview) ? '' : ['href'=> 'display/'.$item['guid'], 'title'=> L10n::t('View in context')]),
 811                                         'previewing' => $previewing,
 812                                         'wait' => L10n::t('Please wait'),
 813                                         'thread_level' => 1,
 814                                 ];
 815
 816                                 $arr = ['item' => $item, 'output' => $tmp_item];
 817                                 Addon::callHooks('display_item', $arr);
 818
 819                                 $threads[$threadsid]['id'] = $item['item_id'];
 820                                 $threads[$threadsid]['network'] = $item['item_network'];
 821                                 $threads[$threadsid]['items'] = [$arr['output']];
 822
 823                         }
 824                 } else {
 825                         // Normal View
 826                         $page_template = get_markup_template("threaded_conversation.tpl");
 827
 828                         $conv = new Thread($mode, $preview, $writable);
 829
 830                         /*
 831                          * get all the topmost parents
 832                          * this shouldn't be needed, as we should have only them in our array
 833                          * But for now, this array respects the old style, just in case
 834                          */
 835                         foreach ($items as $item) {
 836                                 if ($arr_blocked) {
 837                                         $blocked = false;
 838                                         foreach ($arr_blocked as $b) {
 839                                                 if ($b && link_compare($item['author-link'], $b)) {
 840                                                         $blocked = true;
 841                                                         break;
 842                                                 }
 843                                         }
 844                                         if ($blocked) {
 845                                                 continue;
 846                                         }
 847                                 }
 848
 849                                 // Can we put this after the visibility check?
 850                                 builtin_activity_puller($item, $conv_responses);
 851
 852                                 // Only add what is visible
 853                                 if ($item['network'] === NETWORK_MAIL && local_user() != $item['uid']) {
 854                                         continue;
 855                                 }
 856
 857                                 if (! visible_activity($item)) {
 858                                         continue;
 859                                 }
 860
 861                                 Addon::callHooks('display_item', $arr);
 862
 863                                 $item['pagedrop'] = $page_dropping;
 864
 865                                 if ($item['id'] == $item['parent']) {
 866                                         $item_object = new Post($item);
 867                                         $conv->addParent($item_object);
 868                                 }
 869                         }
 870
 871                         $threads = $conv->getTemplateData($conv_responses);
 872                         if (!$threads) {
 873                                 logger('[ERROR] conversation : Failed to get template data.', LOGGER_DEBUG);
 874                                 $threads = [];
 875                         }
 876                 }
 877         }
 878
 879         $o = replace_macros($page_template, [
 880                 '$baseurl' => System::baseUrl($ssl_state),
 881                 '$return_path' => $a->query_string,
 882                 '$live_update' => $live_update_div,
 883                 '$remove' => L10n::t('remove'),
 884                 '$mode' => $mode,
 885                 '$user' => $a->user,
 886                 '$threads' => $threads,
 887                 '$dropping' => ($page_dropping && Feature::isEnabled(local_user(), 'multi_delete') ? L10n::t('Delete Selected Items') : False),
 888         ]);
 889
 890         return $o;
 891 }
 892
 893 /**
 894  * @brief Add comments to top level entries that had been fetched before
 895  *
 896  * The system will fetch the comments for the local user whenever possible.
 897  * This behaviour is currently needed to allow commenting on Friendica posts.
 898  *
 899  * @param array $parents Parent items
 900  *
 901  * @return array items with parents and comments
 902  */
 903 function conversation_add_children($parents, $block_authors, $order) {
 904         $max_comments = Config::get("system", "max_comments", 100);
 905
 906         $items = [];
 907
 908         $block_sql = $block_authors ? "AND NOT `author`.`hidden` AND NOT `author`.`blocked`" : "";
 909
 910         foreach ($parents AS $parent) {
 911                 $thread_items = dba::p(item_query()." AND `item`.`uid` = ?
 912                         AND `item`.`parent-uri` = ? $block_sql
 913                         ORDER BY `item`.`commented` DESC LIMIT ".intval($max_comments + 1),
 914                         local_user(),
 915                         $parent['uri']
 916                 );
 917                 $comments = dba::inArray($thread_items);
 918
 919                 // Check if the original item is in the result.
 920                 // When commenting from the community page there can be incomplete threads
 921                 if (count($comments) > 0) {
 922                         $parent_found = false;
 923                         foreach ($comments as $comment) {
 924                                 if ($comment['uri'] == $comment['parent-uri']) {
 925                                         $parent_found = true;
 926                                         break;
 927                                 }
 928                         }
 929                         if (!$parent_found) {
 930                                 $comments = [];
 931                         }
 932                 }
 933
 934                 if (count($comments) == 0) {
 935                         $thread_items = dba::p(item_query()." AND `item`.`uid` = 0
 936                                 AND `item`.`parent-uri` = ?
 937                                 ORDER BY `item`.`commented` DESC LIMIT ".intval($max_comments + 1),
 938                                 $parent['uri']
 939                         );
 940                         $comments = dba::inArray($thread_items);
 941                 }
 942
 943                 if (count($comments) != 0) {
 944                         $items = array_merge($items, $comments);
 945                 }
 946         }
 947
 948         foreach ($items as $index => $item) {
 949                 if ($item['uid'] == 0) {
 950                         $items[$index]['writable'] = in_array($item['network'], [NETWORK_OSTATUS, NETWORK_DIASPORA, NETWORK_DFRN]);
 951                 }
 952         }
 953
 954         $items = conv_sort($items, $order);
 955
 956         return $items;
 957 }
 958
 959 function best_link_url($item, &$sparkle, $url = '') {
 960
 961         $best_url = '';
 962         $sparkle  = false;
 963
 964         $clean_url = normalise_link($item['author-link']);
 965
 966         if (local_user()) {
 967                 $condition = [
 968                         'network' => NETWORK_DFRN,
 969                         'uid' => local_user(),
 970                         'nurl' => normalise_link($clean_url),
 971                         'pending' => false
 972                 ];
 973                 $contact = dba::selectFirst('contact', ['id'], $condition);
 974                 if (DBM::is_result($contact)) {
 975                         $best_url = 'redir/' . $contact['id'];
 976                         $sparkle = true;
 977                         if ($url != '') {
 978                                 $hostname = get_app()->get_hostname();
 979                                 if (!strstr($url, $hostname)) {
 980                                         $best_url .= "?url=".$url;
 981                                 } else {
 982                                         $best_url = $url;
 983                                 }
 984                         }
 985                 }
 986         }
 987         if (! $best_url) {
 988                 if ($url != '') {
 989                         $best_url = $url;
 990                 } elseif (strlen($item['author-link'])) {
 991                         $best_url = $item['author-link'];
 992                 } else {
 993                         $best_url = $item['url'];
 994                 }
 995         }
 996
 997         return $best_url;
 998 }
 999
1000
1001 function item_photo_menu($item) {
1002         $sub_link = '';
1003         $poke_link = '';
1004         $contact_url = '';
1005         $pm_url = '';
1006         $status_link = '';
1007         $photos_link = '';
1008         $posts_link = '';
1009
1010         if ((local_user()) && local_user() == $item['uid'] && $item['parent'] == $item['id'] && (! $item['self'])) {
1011                 $sub_link = 'javascript:dosubthread(' . $item['id'] . '); return false;';
1012         }
1013
1014         $sparkle = false;
1015         $profile_link = best_link_url($item, $sparkle);
1016         if ($profile_link === 'mailbox') {
1017                 $profile_link = '';
1018         }
1019
1020         $cid = 0;
1021         $network = '';
1022         $rel = 0;
1023         $condition = ['uid' => local_user(), 'nurl' => normalise_link($item['author-link'])];
1024         $contact = dba::selectFirst('contact', ['id', 'network', 'rel'], $condition);
1025         if (DBM::is_result($contact)) {
1026                 $cid = $contact['id'];
1027                 $network = $contact['network'];
1028                 $rel = $contact['rel'];
1029         }
1030
1031         if ($sparkle) {
1032                 $status_link = $profile_link . '?url=status';
1033                 $photos_link = $profile_link . '?url=photos';
1034                 $profile_link = $profile_link . '?url=profile';
1035         } else {
1036                 $profile_link = Profile::zrl($profile_link);
1037         }
1038
1039         if ($cid && !$item['self']) {
1040                 $poke_link = 'poke/?f=&c=' . $cid;
1041                 $contact_url = 'contacts/' . $cid;
1042                 $posts_link = 'contacts/' . $cid . '/posts';
1043
1044                 if (in_array($network, [NETWORK_DFRN, NETWORK_DIASPORA])) {
1045                         $pm_url = 'message/new/' . $cid;
1046                 }
1047         }
1048
1049         if (local_user()) {
1050                 $menu = [
1051                         L10n::t('Follow Thread') => $sub_link,
1052                         L10n::t('View Status') => $status_link,
1053                         L10n::t('View Profile') => $profile_link,
1054                         L10n::t('View Photos') => $photos_link,
1055                         L10n::t('Network Posts') => $posts_link,
1056                         L10n::t('View Contact') => $contact_url,
1057                         L10n::t('Send PM') => $pm_url
1058                 ];
1059
1060                 if ($network == NETWORK_DFRN) {
1061                         $menu[L10n::t("Poke")] = $poke_link;
1062                 }
1063
1064                 if ((($cid == 0) || ($rel == CONTACT_IS_FOLLOWER)) &&
1065                         in_array($item['network'], [NETWORK_DFRN, NETWORK_OSTATUS, NETWORK_DIASPORA])) {
1066                         $menu[L10n::t('Connect/Follow')] = 'follow?url=' . urlencode($item['author-link']);
1067                 }
1068         } else {
1069                 $menu = [L10n::t('View Profile') => $item['author-link']];
1070         }
1071
1072         $args = ['item' => $item, 'menu' => $menu];
1073
1074         Addon::callHooks('item_photo_menu', $args);
1075
1076         $menu = $args['menu'];
1077
1078         $o = '';
1079         foreach ($menu as $k => $v) {
1080                 if (strpos($v, 'javascript:') === 0) {
1081                         $v = substr($v, 11);
1082                         $o .= '<li role="menuitem"><a onclick="' . $v . '">' . $k . '</a></li>' . PHP_EOL;
1083                 } elseif ($v!='') {
1084                         $o .= '<li role="menuitem"><a href="' . $v . '">' . $k . '</a></li>' . PHP_EOL;
1085                 }
1086         }
1087         return $o;
1088 }
1089
1090 /**
1091  * @brief Checks item to see if it is one of the builtin activities (like/dislike, event attendance, consensus items, etc.)
1092  * Increments the count of each matching activity and adds a link to the author as needed.
1093  *
1094  * @param array $item
1095  * @param array &$conv_responses (already created with builtin activity structure)
1096  * @return void
1097  */
1098 function builtin_activity_puller($item, &$conv_responses) {
1099         foreach ($conv_responses as $mode => $v) {
1100                 $url = '';
1101                 $sparkle = '';
1102
1103                 switch ($mode) {
1104                         case 'like':
1105                                 $verb = ACTIVITY_LIKE;
1106                                 break;
1107                         case 'dislike':
1108                                 $verb = ACTIVITY_DISLIKE;
1109                                 break;
1110                         case 'attendyes':
1111                                 $verb = ACTIVITY_ATTEND;
1112                                 break;
1113                         case 'attendno':
1114                                 $verb = ACTIVITY_ATTENDNO;
1115                                 break;
1116                         case 'attendmaybe':
1117                                 $verb = ACTIVITY_ATTENDMAYBE;
1118                                 break;
1119                         default:
1120                                 return;
1121                 }
1122
1123                 if ((activity_match($item['verb'], $verb)) && ($item['id'] != $item['parent'])) {
1124                         $url = $item['author-link'];
1125                         if ((local_user()) && (local_user() == $item['uid']) && ($item['network'] === NETWORK_DFRN) && (! $item['self']) && (link_compare($item['author-link'], $item['url']))) {
1126                                 $url = 'redir/' . $item['contact-id'];
1127                                 $sparkle = ' class="sparkle" ';
1128                         } else {
1129                                 $url = Profile::zrl($url);
1130                         }
1131
1132                         $url = '<a href="'. $url . '"'. $sparkle .'>' . htmlentities($item['author-name']) . '</a>';
1133
1134                         if (! $item['thr-parent']) {
1135                                 $item['thr-parent'] = $item['parent-uri'];
1136                         }
1137
1138                         if (! ((isset($conv_responses[$mode][$item['thr-parent'] . '-l']))
1139                                 && (is_array($conv_responses[$mode][$item['thr-parent'] . '-l'])))) {
1140                                 $conv_responses[$mode][$item['thr-parent'] . '-l'] = [];
1141                         }
1142
1143                         // only list each unique author once
1144                         if (in_array($url,$conv_responses[$mode][$item['thr-parent'] . '-l'])) {
1145                                 continue;
1146                         }
1147
1148                         if (! isset($conv_responses[$mode][$item['thr-parent']])) {
1149                                 $conv_responses[$mode][$item['thr-parent']] = 1;
1150                         } else {
1151                                 $conv_responses[$mode][$item['thr-parent']] ++;
1152                         }
1153
1154                         if (public_contact() == $item['author-id']) {
1155                                 $conv_responses[$mode][$item['thr-parent'] . '-self'] = 1;
1156                         }
1157
1158                         $conv_responses[$mode][$item['thr-parent'] . '-l'][] = $url;
1159
1160                         // there can only be one activity verb per item so if we found anything, we can stop looking
1161                         return;
1162                 }
1163         }
1164 }
1165
1166 /**
1167  * Format the vote text for a profile item
1168  * @param int $cnt = number of people who vote the item
1169  * @param array $arr = array of pre-linked names of likers/dislikers
1170  * @param string $type = one of 'like, 'dislike', 'attendyes', 'attendno', 'attendmaybe'
1171  * @param int $id  = item id
1172  * @return string formatted text
1173  */
1174 function format_like($cnt, array $arr, $type, $id) {
1175         $o = '';
1176         $expanded = '';
1177
1178         if ($cnt == 1) {
1179                 $likers = $arr[0];
1180
1181                 // Phrase if there is only one liker. In other cases it will be uses for the expanded
1182                 // list which show all likers
1183                 switch ($type) {
1184                         case 'like' :
1185                                 $phrase = L10n::t('%s likes this.', $likers);
1186                                 break;
1187                         case 'dislike' :
1188                                 $phrase = L10n::t('%s doesn\'t like this.', $likers);
1189                                 break;
1190                         case 'attendyes' :
1191                                 $phrase = L10n::t('%s attends.', $likers);
1192                                 break;
1193                         case 'attendno' :
1194                                 $phrase = L10n::t('%s doesn\'t attend.', $likers);
1195                                 break;
1196                         case 'attendmaybe' :
1197                                 $phrase = L10n::t('%s attends maybe.', $likers);
1198                                 break;
1199                 }
1200         }
1201
1202         if ($cnt > 1) {
1203                 $total = count($arr);
1204                 if ($total >= MAX_LIKERS) {
1205                         $arr = array_slice($arr, 0, MAX_LIKERS - 1);
1206                 }
1207                 if ($total < MAX_LIKERS) {
1208                         $last = L10n::t('and') . ' ' . $arr[count($arr)-1];
1209                         $arr2 = array_slice($arr, 0, -1);
1210                         $str = implode(', ', $arr2) . ' ' . $last;
1211                 }
1212                 if ($total >= MAX_LIKERS) {
1213                         $str = implode(', ', $arr);
1214                         $str .= L10n::t('and %d other people', $total - MAX_LIKERS );
1215                 }
1216
1217                 $likers = $str;
1218
1219                 $spanatts = "class=\"fakelink\" onclick=\"openClose('{$type}list-$id');\"";
1220
1221                 switch ($type) {
1222                         case 'like':
1223                                 $phrase = L10n::t('<span  %1$s>%2$d people</span> like this', $spanatts, $cnt);
1224                                 $explikers = L10n::t('%s like this.', $likers);
1225                                 break;
1226                         case 'dislike':
1227                                 $phrase = L10n::t('<span  %1$s>%2$d people</span> don\'t like this', $spanatts, $cnt);
1228                                 $explikers = L10n::t('%s don\'t like this.', $likers);
1229                                 break;
1230                         case 'attendyes':
1231                                 $phrase = L10n::t('<span  %1$s>%2$d people</span> attend', $spanatts, $cnt);
1232                                 $explikers = L10n::t('%s attend.', $likers);
1233                                 break;
1234                         case 'attendno':
1235                                 $phrase = L10n::t('<span  %1$s>%2$d people</span> don\'t attend', $spanatts, $cnt);
1236                                 $explikers = L10n::t('%s don\'t attend.', $likers);
1237                                 break;
1238                         case 'attendmaybe':
1239                                 $phrase = L10n::t('<span  %1$s>%2$d people</span> attend maybe', $spanatts, $cnt);
1240                                 $explikers = L10n::t('%s anttend maybe.', $likers);
1241                                 break;
1242                 }
1243
1244                 $expanded .= "\t" . '<div class="wall-item-' . $type . '-expanded" id="' . $type . 'list-' . $id . '" style="display: none;" >' . $explikers . EOL . '</div>';
1245         }
1246
1247         $phrase .= EOL ;
1248         $o .= replace_macros(get_markup_template('voting_fakelink.tpl'), [
1249                 '$phrase' => $phrase,
1250                 '$type' => $type,
1251                 '$id' => $id
1252         ]);
1253         $o .= $expanded;
1254
1255         return $o;
1256 }
1257
1258 function status_editor(App $a, $x, $notes_cid = 0, $popup = false)
1259 {
1260         $o = '';
1261
1262         $geotag = x($x, 'allow_location') ? replace_macros(get_markup_template('jot_geotag.tpl'), []) : '';
1263
1264         $tpl = get_markup_template('jot-header.tpl');
1265         $a->page['htmlhead'] .= replace_macros($tpl, [
1266                 '$newpost'   => 'true',
1267                 '$baseurl'   => System::baseUrl(true),
1268                 '$geotag'    => $geotag,
1269                 '$nickname'  => $x['nickname'],
1270                 '$ispublic'  => L10n::t('Visible to <strong>everybody</strong>'),
1271                 '$linkurl'   => L10n::t('Please enter a link URL:'),
1272                 '$vidurl'    => L10n::t("Please enter a video link/URL:"),
1273                 '$audurl'    => L10n::t("Please enter an audio link/URL:"),
1274                 '$term'      => L10n::t('Tag term:'),
1275                 '$fileas'    => L10n::t('Save to Folder:'),
1276                 '$whereareu' => L10n::t('Where are you right now?'),
1277                 '$delitems'  => L10n::t("Delete item\x28s\x29?")
1278         ]);
1279
1280         $tpl = get_markup_template('jot-end.tpl');
1281         $a->page['end'] .= replace_macros($tpl, [
1282                 '$newpost'   => 'true',
1283                 '$baseurl'   => System::baseUrl(true),
1284                 '$geotag'    => $geotag,
1285                 '$nickname'  => $x['nickname'],
1286                 '$ispublic'  => L10n::t('Visible to <strong>everybody</strong>'),
1287                 '$linkurl'   => L10n::t('Please enter a link URL:'),
1288                 '$vidurl'    => L10n::t("Please enter a video link/URL:"),
1289                 '$audurl'    => L10n::t("Please enter an audio link/URL:"),
1290                 '$term'      => L10n::t('Tag term:'),
1291                 '$fileas'    => L10n::t('Save to Folder:'),
1292                 '$whereareu' => L10n::t('Where are you right now?')
1293         ]);
1294
1295         $jotplugins = '';
1296         Addon::callHooks('jot_tool', $jotplugins);
1297
1298         // Private/public post links for the non-JS ACL form
1299         $private_post = 1;
1300         if (x($_REQUEST, 'public')) {
1301                 $private_post = 0;
1302         }
1303
1304         $query_str = $a->query_string;
1305         if (strpos($query_str, 'public=1') !== false) {
1306                 $query_str = str_replace(['?public=1', '&public=1'], ['', ''], $query_str);
1307         }
1308
1309         /*
1310          * I think $a->query_string may never have ? in it, but I could be wrong
1311          * It looks like it's from the index.php?q=[etc] rewrite that the web
1312          * server does, which converts any ? to &, e.g. suggest&ignore=61 for suggest?ignore=61
1313          */
1314         if (strpos($query_str, '?') === false) {
1315                 $public_post_link = '?public=1';
1316         } else {
1317                 $public_post_link = '&public=1';
1318         }
1319
1320         // $tpl = replace_macros($tpl,array('$jotplugins' => $jotplugins));
1321         $tpl = get_markup_template("jot.tpl");
1322
1323         $o .= replace_macros($tpl,[
1324                 '$return_path'  => $query_str,
1325                 '$action'       => 'item',
1326                 '$share'        => defaults($x, 'button', L10n::t('Share')),
1327                 '$upload'       => L10n::t('Upload photo'),
1328                 '$shortupload'  => L10n::t('upload photo'),
1329                 '$attach'       => L10n::t('Attach file'),
1330                 '$shortattach'  => L10n::t('attach file'),
1331                 '$weblink'      => L10n::t('Insert web link'),
1332                 '$shortweblink' => L10n::t('web link'),
1333                 '$video'        => L10n::t('Insert video link'),
1334                 '$shortvideo'   => L10n::t('video link'),
1335                 '$audio'        => L10n::t('Insert audio link'),
1336                 '$shortaudio'   => L10n::t('audio link'),
1337                 '$setloc'       => L10n::t('Set your location'),
1338                 '$shortsetloc'  => L10n::t('set location'),
1339                 '$noloc'        => L10n::t('Clear browser location'),
1340                 '$shortnoloc'   => L10n::t('clear location'),
1341                 '$title'        => defaults($x, 'title', ''),
1342                 '$placeholdertitle' => L10n::t('Set title'),
1343                 '$category'     => defaults($x, 'category', ''),
1344                 '$placeholdercategory' => Feature::isEnabled(local_user(), 'categories') ? L10n::t("Categories \x28comma-separated list\x29") : '',
1345                 '$wait'         => L10n::t('Please wait'),
1346                 '$permset'      => L10n::t('Permission settings'),
1347                 '$shortpermset' => L10n::t('permissions'),
1348                 '$ptyp'         => $notes_cid ? 'note' : 'wall',
1349                 '$content'      => defaults($x, 'content', ''),
1350                 '$post_id'      => defaults($x, 'post_id', ''),
1351                 '$baseurl'      => System::baseUrl(true),
1352                 '$defloc'       => $x['default_location'],
1353                 '$visitor'      => $x['visitor'],
1354                 '$pvisit'       => $notes_cid ? 'none' : $x['visitor'],
1355                 '$public'       => L10n::t('Public post'),
1356                 '$lockstate'    => $x['lockstate'],
1357                 '$bang'         => $x['bang'],
1358                 '$profile_uid'  => $x['profile_uid'],
1359                 '$preview'      => Feature::isEnabled($x['profile_uid'], 'preview') ? L10n::t('Preview') : '',
1360                 '$jotplugins'   => $jotplugins,
1361                 '$notes_cid'    => $notes_cid,
1362                 '$sourceapp'    => L10n::t($a->sourcename),
1363                 '$cancel'       => L10n::t('Cancel'),
1364                 '$rand_num'     => random_digits(12),
1365
1366                 // ACL permissions box
1367                 '$acl'           => $x['acl'],
1368                 '$group_perms'   => L10n::t('Post to Groups'),
1369                 '$contact_perms' => L10n::t('Post to Contacts'),
1370                 '$private'       => L10n::t('Private post'),
1371                 '$is_private'    => $private_post,
1372                 '$public_link'   => $public_post_link,
1373
1374                 //jot nav tab (used in some themes)
1375                 '$message' => L10n::t('Message'),
1376                 '$browser' => L10n::t('Browser'),
1377         ]);
1378
1379
1380         if ($popup == true) {
1381                 $o = '<div id="jot-popup" style="display: none;">' . $o . '</div>';
1382         }
1383
1384         return $o;
1385 }
1386
1387 /**
1388  * Plucks the children of the given parent from a given item list.
1389  *
1390  * @brief Plucks all the children in the given item list of the given parent
1391  *
1392  * @param array $item_list
1393  * @param array $parent
1394  * @param bool $recursive
1395  * @return type
1396  */
1397 function get_item_children(array &$item_list, array $parent, $recursive = true)
1398 {
1399         $children = [];
1400         foreach ($item_list as $i => $item) {
1401                 if ($item['id'] != $item['parent']) {
1402                         if ($recursive) {
1403                                 // Fallback to parent-uri if thr-parent is not set
1404                                 $thr_parent = $item['thr-parent'];
1405                                 if ($thr_parent == '') {
1406                                         $thr_parent = $item['parent-uri'];
1407                                 }
1408
1409                                 if ($thr_parent == $parent['uri']) {
1410                                         $item['children'] = get_item_children($item_list, $item);
1411                                         $children[] = $item;
1412                                         unset($item_list[$i]);
1413                                 }
1414                         } elseif ($item['parent'] == $parent['id']) {
1415                                 $children[] = $item;
1416                                 unset($item_list[$i]);
1417                         }
1418                 }
1419         }
1420         return $children;
1421 }
1422
1423 /**
1424  * @brief Recursively sorts a tree-like item array
1425  *
1426  * @param array $items
1427  * @return array
1428  */
1429 function sort_item_children(array $items)
1430 {
1431         $result = $items;
1432         usort($result, 'sort_thr_created_rev');
1433         foreach ($result as $k => $i) {
1434                 if (isset($result[$k]['children'])) {
1435                         $result[$k]['children'] = sort_item_children($result[$k]['children']);
1436                 }
1437         }
1438         return $result;
1439 }
1440
1441 /**
1442  * @brief Recursively add all children items at the top level of a list
1443  *
1444  * @param array $children List of items to append
1445  * @param array $item_list
1446  */
1447 function add_children_to_list(array $children, array &$item_list)
1448 {
1449         foreach ($children as $child) {
1450                 $item_list[] = $child;
1451                 if (isset($child['children'])) {
1452                         add_children_to_list($child['children'], $item_list);
1453                 }
1454         }
1455 }
1456
1457 /**
1458  * This recursive function takes the item tree structure created by conv_sort() and
1459  * flatten the extraneous depth levels when people reply sequentially, removing the
1460  * stairs effect in threaded conversations limiting the available content width.
1461  *
1462  * The basic principle is the following: if a post item has only one reply and is
1463  * the last reply of its parent, then the reply is moved to the parent.
1464  *
1465  * This process is rendered somewhat more complicated because items can be either
1466  * replies or likes, and these don't factor at all in the reply count/last reply.
1467  *
1468  * @brief Selectively flattens a tree-like item structure to prevent threading stairs
1469  *
1470  * @param array $parent A tree-like array of items
1471  * @return array
1472  */
1473 function smart_flatten_conversation(array $parent)
1474 {
1475         if (! isset($parent['children']) || count($parent['children']) == 0) {
1476                 return $parent;
1477         }
1478
1479         // We use a for loop to ensure we process the newly-moved items
1480         for ($i = 0; $i < count($parent['children']); $i++) {
1481                 $child = $parent['children'][$i];
1482
1483                 if (isset($child['children']) && count($child['children'])) {
1484                         // This helps counting only the regular posts
1485                         $count_post_closure = function($var) {
1486                                 return $var['verb'] === ACTIVITY_POST;
1487                         };
1488
1489                         $child_post_count = count(array_filter($child['children'], $count_post_closure));
1490
1491                         $remaining_post_count = count(array_filter(array_slice($parent['children'], $i), $count_post_closure));
1492
1493                         // If there's only one child's children post and this is the last child post
1494                         if ($child_post_count == 1 && $remaining_post_count == 1) {
1495
1496                                 // Searches the post item in the children
1497                                 $j = 0;
1498                                 while($child['children'][$j]['verb'] !== ACTIVITY_POST && $j < count($child['children'])) {
1499                                         $j ++;
1500                                 }
1501
1502                                 $moved_item = $child['children'][$j];
1503                                 unset($parent['children'][$i]['children'][$j]);
1504                                 $parent['children'][] = $moved_item;
1505                         } else {
1506                                 $parent['children'][$i] = smart_flatten_conversation($child);
1507                         }
1508                 }
1509         }
1510
1511         return $parent;
1512 }
1513
1514
1515 /**
1516  * Expands a flat list of items into corresponding tree-like conversation structures,
1517  * sort the top-level posts either on "created" or "commented", and finally
1518  * append all the items at the top level (???)
1519  *
1520  * @brief Expands a flat item list into a conversation array for display
1521  *
1522  * @param array  $item_list A list of items belonging to one or more conversations
1523  * @param string $order     Either on "created" or "commented"
1524  * @return array
1525  */
1526 function conv_sort(array $item_list, $order)
1527 {
1528         $parents = [];
1529
1530         if (!(is_array($item_list) && count($item_list))) {
1531                 return $parents;
1532         }
1533
1534         $item_array = [];
1535
1536         // Dedupes the item list on the uri to prevent infinite loops
1537         foreach ($item_list as $item) {
1538                 $item_array[$item['uri']] = $item;
1539         }
1540
1541         // Extract the top level items
1542         foreach ($item_array as $item) {
1543                 if ($item['id'] == $item['parent']) {
1544                         $parents[] = $item;
1545                 }
1546         }
1547
1548         if (stristr($order, 'created')) {
1549                 usort($parents, 'sort_thr_created');
1550         } elseif (stristr($order, 'commented')) {
1551                 usort($parents, 'sort_thr_commented');
1552         }
1553
1554         /*
1555          * Plucks children from the item_array, second pass collects eventual orphan
1556          * items and add them as children of their top-level post.
1557          */
1558         foreach ($parents as $i => $parent) {
1559                 $parents[$i]['children'] =
1560                         array_merge(get_item_children($item_array, $parent, true),
1561                                 get_item_children($item_array, $parent, false));
1562         }
1563
1564         foreach ($parents as $i => $parent) {
1565                 $parents[$i]['children'] = sort_item_children($parents[$i]['children']);
1566         }
1567
1568         if (PConfig::get(local_user(), 'system', 'smart_threading', 0)) {
1569                 foreach ($parents as $i => $parent) {
1570                         $parents[$i] = smart_flatten_conversation($parent);
1571                 }
1572         }
1573
1574         /// @TODO: Stop recusrsively adding all children back to the top level (!!!)
1575         /// However, this apparently ensures responses (likes, attendance) display (?!)
1576         foreach ($parents as $parent) {
1577                 if (count($parent['children'])) {
1578                         add_children_to_list($parent['children'], $parents);
1579                 }
1580         }
1581
1582         return $parents;
1583 }
1584
1585 /**
1586  * @brief usort() callback to sort item arrays by the created key
1587  *
1588  * @param array $a
1589  * @param array $b
1590  * @return int
1591  */
1592 function sort_thr_created(array $a, array $b)
1593 {
1594         return strcmp($b['created'], $a['created']);
1595 }
1596
1597 /**
1598  * @brief usort() callback to reverse sort item arrays by the created key
1599  *
1600  * @param array $a
1601  * @param array $b
1602  * @return int
1603  */
1604 function sort_thr_created_rev(array $a, array $b)
1605 {
1606         return strcmp($a['created'], $b['created']);
1607 }
1608
1609 /**
1610  * @brief usort() callback to sort item arrays by the commented key
1611  *
1612  * @param array $a
1613  * @param array $b
1614  * @return type
1615  */
1616 function sort_thr_commented(array $a, array $b)
1617 {
1618         return strcmp($b['commented'], $a['commented']);
1619 }
1620
1621 /// @TODO Add type-hint
1622 function render_location_dummy($item) {
1623         if ($item['location'] != "") {
1624                 return $item['location'];
1625         }
1626
1627         if ($item['coord'] != "") {
1628                 return $item['coord'];
1629         }
1630 }
1631
1632 /// @TODO Add type-hint
1633 function get_responses($conv_responses, $response_verbs, $ob, $item) {
1634         $ret = [];
1635         foreach ($response_verbs as $v) {
1636                 $ret[$v] = [];
1637                 $ret[$v]['count'] = defaults($conv_responses[$v], $item['uri'], '');
1638                 $ret[$v]['list']  = defaults($conv_responses[$v], $item['uri'] . '-l', '');
1639                 $ret[$v]['self']  = defaults($conv_responses[$v], $item['uri'] . '-self', '0');
1640                 if (count($ret[$v]['list']) > MAX_LIKERS) {
1641                         $ret[$v]['list_part'] = array_slice($ret[$v]['list'], 0, MAX_LIKERS);
1642                         array_push($ret[$v]['list_part'], '<a href="#" data-toggle="modal" data-target="#' . $v . 'Modal-'
1643                                 . (($ob) ? $ob->getId() : $item['id']) . '"><b>' . L10n::t('View all') . '</b></a>');
1644                 } else {
1645                         $ret[$v]['list_part'] = '';
1646                 }
1647                 $ret[$v]['button'] = get_response_button_text($v, $ret[$v]['count']);
1648                 $ret[$v]['title'] = $conv_responses[$v]['title'];
1649         }
1650
1651         $count = 0;
1652         foreach ($ret as $key) {
1653                 if ($key['count'] == true) {
1654                         $count++;
1655                 }
1656         }
1657         $ret['count'] = $count;
1658
1659         return $ret;
1660 }
1661
1662 function get_response_button_text($v, $count)
1663 {
1664         switch ($v) {
1665                 case 'like':
1666                         $return = L10n::tt('Like', 'Likes', $count);
1667                         break;
1668                 case 'dislike':
1669                         $return = L10n::tt('Dislike', 'Dislikes', $count);
1670                         break;
1671                 case 'attendyes':
1672                         $return = L10n::tt('Attending', 'Attending', $count);
1673                         break;
1674                 case 'attendno':
1675                         $return = L10n::tt('Not Attending', 'Not Attending', $count);
1676                         break;
1677                 case 'attendmaybe':
1678                         $return = L10n::tt('Undecided', 'Undecided', $count);
1679                         break;
1680         }
1681
1682         return $return;
1683 }