mod/network.php

   1 <?php
   2 function network_init(&$a) {
   3         if(! local_user()) {
   4                 notice( t('Permission denied.') . EOL);
   5                 return;
   6         }
   7
   8         $is_a_date_query = false;
   9         if(x($_GET['cid']) && intval($_GET['cid']) != 0)
  10                 $cid = $_GET['cid'];
  11
  12         if($a->argc > 1) {
  13                 for($x = 1; $x < $a->argc; $x ++) {
  14                         if(is_a_date_arg($a->argv[$x])) {
  15                                 $is_a_date_query = true;
  16                                 break;
  17                         }
  18                 }
  19         }
  20
  21         // convert query string to array. remove friendica args
  22         $query_array = array();
  23         $query_string = str_replace($a->cmd."?", "", $a->query_string);
  24         parse_str($query_string, $query_array);
  25         array_shift($query_array);
  26
  27
  28         // fetch last used network view and redirect if needed
  29         if(! $is_a_date_query) {
  30                 $sel_tabs = network_query_get_sel_tab($a);
  31                 $sel_nets = network_query_get_sel_net();
  32                 $sel_groups = network_query_get_sel_group($a);
  33                 $last_sel_tabs = get_pconfig(local_user(), 'network.view','tab.selected');
  34                 $last_sel_nets = get_pconfig(local_user(), 'network.view', 'net.selected');
  35                 $last_sel_groups = get_pconfig(local_user(), 'network.view', 'group.selected');
  36
  37                 $remember_tab = ($sel_tabs[0] === 'active' && is_array($last_sel_tabs) && $last_sel_tabs[0] !== 'active');
  38                 $remember_net = ($sel_nets === false && $last_sel_nets && $last_sel_nets !== 'all');
  39                 $remember_group = ($sel_groups === false && $last_sel_groups && $last_sel_groups != 0);
  40
  41                 $net_baseurl = '/network';
  42                 $net_args = array();
  43
  44                 if($remember_group) {
  45                         $net_baseurl .= '/' . $last_sel_groups; // Note that the group number must come before the "/new" tab selection
  46                 }
  47                 else if($sel_groups !== false) {
  48                         $net_baseurl .= '/' . $sel_groups;
  49                 }
  50
  51                 if($remember_tab) {
  52                         // redirect if current selected tab is '/network' and
  53                         // last selected tab is _not_ '/network?f=&order=comment'.
  54                         // and this isn't a date query
  55
  56                         $tab_baseurls = array(
  57                                 '',             //all
  58                                 '',             //postord
  59                                 '',             //conv
  60                                 '/new',         //new
  61                                 '',             //starred
  62                                 '',             //bookmarked
  63                                 '',             //spam
  64                         );
  65                         $tab_args = array(
  66                                 'f=&order=comment',     //all
  67                                 'f=&order=post',        //postord
  68                                 'f=&conv=1',            //conv
  69                                 '',                     //new
  70                                 'f=&star=1',            //starred
  71                                 'f=&bmark=1',           //bookmarked
  72                                 'f=&spam=1',            //spam
  73                         );
  74
  75                         $k = array_search('active', $last_sel_tabs);
  76
  77                         $net_baseurl .= $tab_baseurls[$k];
  78
  79                         // parse out tab queries
  80                         $dest_qa = array();
  81                         $dest_qs = $tab_args[$k];
  82                         parse_str( $dest_qs, $dest_qa);
  83                         $net_args = array_merge($net_args, $dest_qa);
  84                 }
  85                 else if($sel_tabs[4] === 'active') {
  86                         // The '/new' tab is selected
  87                         $net_baseurl .= '/new';
  88                 }
  89
  90                 if($remember_net) {
  91                         $net_args['nets'] = $last_sel_nets;
  92                 }
  93                 else if($sel_nets!==false) {
  94                         $net_args['nets'] = $sel_nets;
  95                 }
  96
  97                 if($remember_tab || $remember_net || $remember_group) {
  98                         $net_args = array_merge($query_array, $net_args);
  99                         $net_queries = build_querystring($net_args);
 100
 101                         $redir_url = ($net_queries ? $net_baseurl."?".$net_queries : $net_baseurl);
 102
 103                         goaway($a->get_baseurl() . $redir_url);
 104                 }
 105         }
 106
 107         if(x($_GET['nets']) && $_GET['nets'] === 'all')
 108                 unset($_GET['nets']);
 109
 110         $group_id = (($a->argc > 1 && is_numeric($a->argv[1])) ? intval($a->argv[1]) : 0);
 111
 112         set_pconfig(local_user(), 'network.view', 'group.selected', $group_id);
 113
 114         require_once('include/group.php');
 115         require_once('include/contact_widgets.php');
 116         require_once('include/items.php');
 117         require_once('include/forums.php');
 118
 119         if(! x($a->page,'aside'))
 120                 $a->page['aside'] = '';
 121
 122         $search = ((x($_GET,'search')) ? escape_tags($_GET['search']) : '');
 123
 124         if(x($_GET,'save')) {
 125                 $r = q("SELECT * FROM `search` WHERE `uid` = %d AND `term` = '%s' LIMIT 1",
 126                         intval(local_user()),
 127                         dbesc($search)
 128                 );
 129                 if(! count($r)) {
 130                         q("INSERT INTO `search` ( `uid`,`term` ) VALUES ( %d, '%s') ",
 131                                 intval(local_user()),
 132                                 dbesc($search)
 133                         );
 134                 }
 135         }
 136         if(x($_GET,'remove')) {
 137                 q("DELETE FROM `search` WHERE `uid` = %d AND `term` = '%s'",
 138                         intval(local_user()),
 139                         dbesc($search)
 140                 );
 141         }
 142
 143         // search terms header
 144         if(x($_GET,'search')) {
 145                 $a->page['content'] .= replace_macros(get_markup_template("section_title.tpl"),array(
 146                         '$title' => sprintf( t('Search Results For: %s'), $search)
 147                 ));
 148         }
 149
 150         $a->page['aside'] .= (feature_enabled(local_user(),'groups') ? group_side('network/0','network','standard',$group_id) : '');
 151         $a->page['aside'] .= (feature_enabled(local_user(),'forumlist_widget') ? widget_forumlist(local_user(),$cid) : '');
 152         $a->page['aside'] .= posted_date_widget($a->get_baseurl() . '/network',local_user(),false);
 153         $a->page['aside'] .= networks_widget($a->get_baseurl(true) . '/network',(x($_GET, 'nets') ? $_GET['nets'] : ''));
 154         $a->page['aside'] .= saved_searches($search);
 155         $a->page['aside'] .= fileas_widget($a->get_baseurl(true) . '/network',(x($_GET, 'file') ? $_GET['file'] : ''));
 156
 157         if(x($_GET['cid']) && intval($_GET['cid']) != 0) {
 158                 $r = q("SELECT `url` FROM `contact` WHERE `id` = %d",
 159                         intval($_GET['cid']));
 160                 if ($r) {
 161                         $a->page['aside'] = "";
 162                         profile_load($a, "", 0, get_contact_details_by_url($r[0]["url"]));
 163                 }
 164         }
 165 }
 166
 167 function saved_searches($search) {
 168
 169         if(! feature_enabled(local_user(),'savedsearch'))
 170                 return '';
 171
 172         $a = get_app();
 173
 174         $srchurl = '/network?f='
 175                 . ((x($_GET,'cid'))   ? '&cid='   . $_GET['cid']   : '')
 176                 . ((x($_GET,'star'))  ? '&star='  . $_GET['star']  : '')
 177                 . ((x($_GET,'bmark')) ? '&bmark=' . $_GET['bmark'] : '')
 178                 . ((x($_GET,'conv'))  ? '&conv='  . $_GET['conv']  : '')
 179                 . ((x($_GET,'nets'))  ? '&nets='  . $_GET['nets']  : '')
 180                 . ((x($_GET,'cmin'))  ? '&cmin='  . $_GET['cmin']  : '')
 181                 . ((x($_GET,'cmax'))  ? '&cmax='  . $_GET['cmax']  : '')
 182                 . ((x($_GET,'file'))  ? '&file='  . $_GET['file']  : '');
 183         ;
 184
 185         $o = '';
 186
 187         $r = q("SELECT `id`,`term` FROM `search` WHERE `uid` = %d",
 188                 intval(local_user())
 189         );
 190
 191         $saved = array();
 192
 193         if(count($r)) {
 194                 foreach($r as $rr) {
 195                         $saved[] = array(
 196                                 'id'            => $rr['id'],
 197                                 'term'          => $rr['term'],
 198                                 'encodedterm'   => urlencode($rr['term']),
 199                                 'delete'        => t('Remove term'),
 200                                 'selected'      => ($search==$rr['term']),
 201                         );
 202                 }
 203         }
 204
 205
 206         $tpl = get_markup_template("saved_searches_aside.tpl");
 207         $o = replace_macros($tpl, array(
 208                 '$title'        => t('Saved Searches'),
 209                 '$add'          => t('add'),
 210                 '$searchbox'    => search($search,'netsearch-box',$srchurl,true),
 211                 '$saved'        => $saved,
 212         ));
 213
 214         return $o;
 215
 216 }
 217
 218 /**
 219  * Return selected tab from query
 220  *
 221  * urls -> returns
 222  *              '/network'                                      => $no_active = 'active'
 223  *              '/network?f=&order=comment'     => $comment_active = 'active'
 224  *              '/network?f=&order=post'        => $postord_active = 'active'
 225  *              '/network?f=&conv=1',           => $conv_active = 'active'
 226  *              '/network/new',                         => $new_active = 'active'
 227  *              '/network?f=&star=1',           => $starred_active = 'active'
 228  *              '/network?f=&bmark=1',          => $bookmarked_active = 'active'
 229  *              '/network?f=&spam=1',           => $spam_active = 'active'
 230  *
 231  * @return Array ( $no_active, $comment_active, $postord_active, $conv_active, $new_active, $starred_active, $bookmarked_active, $spam_active );
 232  */
 233 function network_query_get_sel_tab($a) {
 234         $no_active='';
 235         $starred_active = '';
 236         $new_active = '';
 237         $bookmarked_active = '';
 238         $all_active = '';
 239         $search_active = '';
 240         $conv_active = '';
 241         $spam_active = '';
 242         $postord_active = '';
 243
 244         if(($a->argc > 1 && $a->argv[1] === 'new')
 245                 || ($a->argc > 2 && $a->argv[2] === 'new')) {
 246                         $new_active = 'active';
 247         }
 248
 249         if(x($_GET,'search')) {
 250                 $search_active = 'active';
 251         }
 252
 253         if(x($_GET,'star')) {
 254                 $starred_active = 'active';
 255         }
 256
 257         if(x($_GET,'bmark')) {
 258                 $bookmarked_active = 'active';
 259         }
 260
 261         if(x($_GET,'conv')) {
 262                 $conv_active = 'active';
 263         }
 264
 265         if(x($_GET,'spam')) {
 266                 $spam_active = 'active';
 267         }
 268
 269
 270
 271         if (($new_active == '')
 272                 && ($starred_active == '')
 273                 && ($bookmarked_active == '')
 274                 && ($conv_active == '')
 275                 && ($search_active == '')
 276                 && ($spam_active == '')) {
 277                         $no_active = 'active';
 278         }
 279
 280         if ($no_active=='active' && x($_GET,'order')) {
 281                 switch($_GET['order']){
 282                  case 'post': $postord_active = 'active'; $no_active=''; break;
 283                  case 'comment' : $all_active = 'active'; $no_active=''; break;
 284                 }
 285         }
 286
 287         return array($no_active, $all_active, $postord_active, $conv_active, $new_active, $starred_active, $bookmarked_active, $spam_active);
 288 }
 289
 290 /**
 291  * Return selected network from query
 292  */
 293 function network_query_get_sel_net() {
 294         $network = false;
 295
 296         if(x($_GET,'nets')) {
 297                 $network = $_GET['nets'];
 298         }
 299
 300         return $network;
 301 }
 302
 303 function network_query_get_sel_group($a) {
 304         $group = false;
 305
 306         if($a->argc >= 2 && is_numeric($a->argv[1])) {
 307                 $group = $a->argv[1];
 308         }
 309
 310         return $group;
 311 }
 312
 313
 314 function network_content(&$a, $update = 0) {
 315
 316         require_once('include/conversation.php');
 317
 318         if(! local_user()) {
 319                 $_SESSION['return_url'] = $a->query_string;
 320                 return login(false);
 321         }
 322
 323         // TODO:is this really necessary? $a is already available to hooks
 324         $arr = array('query' => $a->query_string);
 325         call_hooks('network_content_init', $arr);
 326
 327
 328         $datequery = $datequery2 = '';
 329
 330         $group = 0;
 331
 332         $nouveau = false;
 333
 334         if($a->argc > 1) {
 335                 for($x = 1; $x < $a->argc; $x ++) {
 336                         if(is_a_date_arg($a->argv[$x])) {
 337                                 if($datequery)
 338                                         $datequery2 = escape_tags($a->argv[$x]);
 339                                 else {
 340                                         $datequery = escape_tags($a->argv[$x]);
 341                                         $_GET['order'] = 'post';
 342                                 }
 343                         }
 344                         elseif($a->argv[$x] === 'new') {
 345                                 $nouveau = true;
 346                         }
 347                         elseif(intval($a->argv[$x])) {
 348                                 $group = intval($a->argv[$x]);
 349                                 $def_acl = array('allow_gid' => '<' . $group . '>');
 350                         }
 351                 }
 352         }
 353
 354         $o = '';
 355
 356         // item filter tabs
 357         // TODO: fix this logic, reduce duplication
 358         //$a->page['content'] .= '<div class="tabs-wrapper">';
 359
 360         list($no_active, $all_active, $postord_active, $conv_active, $new_active, $starred_active, $bookmarked_active, $spam_active) = network_query_get_sel_tab($a);
 361         // if no tabs are selected, defaults to comments
 362         if ($no_active=='active') $all_active='active';
 363
 364         $cmd = (($datequery) ? '' : $a->cmd);
 365         $len_naked_cmd = strlen(str_replace('/new','',$cmd));
 366
 367         // tabs
 368         $tabs = array(
 369                 array(
 370                         'label' => t('Commented Order'),
 371                         'url'   => $a->get_baseurl(true) . '/' . str_replace('/new', '', $cmd) . '?f=&order=comment' . ((x($_GET,'cid')) ? '&cid=' . $_GET['cid'] : ''),
 372                         'sel'   => $all_active,
 373                         'title' => t('Sort by Comment Date'),
 374                         'id'    => 'commented-order-tab',
 375                         'accesskey' => "e",
 376                 ),
 377                 array(
 378                         'label' => t('Posted Order'),
 379                         'url'   => $a->get_baseurl(true) . '/' . str_replace('/new', '', $cmd) . '?f=&order=post' . ((x($_GET,'cid')) ? '&cid=' . $_GET['cid'] : ''),
 380                         'sel'   => $postord_active,
 381                         'title' => t('Sort by Post Date'),
 382                         'id'    => 'posted-order-tab',
 383                         'accesskey' => "t",
 384                 ),
 385         );
 386
 387         if(feature_enabled(local_user(),'personal_tab')) {
 388                 $tabs[] = array(
 389                         'label' => t('Personal'),
 390                         'url'   => $a->get_baseurl(true) . '/' . str_replace('/new', '', $cmd) . ((x($_GET,'cid')) ? '/?f=&cid=' . $_GET['cid'] : '/?f=') . '&conv=1',
 391                         'sel'   => $conv_active,
 392                         'title' => t('Posts that mention or involve you'),
 393                         'id'    => 'personal-tab',
 394                         'accesskey' => "r",
 395                 );
 396         }
 397
 398         if(feature_enabled(local_user(),'new_tab')) {
 399                 $tabs[] = array(
 400                         'label' => t('New'),
 401                         'url'   => $a->get_baseurl(true) . '/' . str_replace('/new', '', $cmd) . ($len_naked_cmd ? '/' : '') . 'new' . ((x($_GET,'cid')) ? '/?f=&cid=' . $_GET['cid'] : ''),
 402                         'sel'   => $new_active,
 403                         'title' => t('Activity Stream - by date'),
 404                         'id'    => 'activitiy-by-date-tab',
 405                         'accesskey' => "w",
 406                 );
 407         }
 408
 409         if(feature_enabled(local_user(),'link_tab')) {
 410                 $tabs[] = array(
 411                         'label' => t('Shared Links'),
 412                         'url'   => $a->get_baseurl(true) . '/' . str_replace('/new', '', $cmd) . ((x($_GET,'cid')) ? '/?f=&cid=' . $_GET['cid'] : '/?f=') . '&bmark=1',
 413                         'sel'   => $bookmarked_active,
 414                         'title' => t('Interesting Links'),
 415                         'id'    => 'shared-links-tab',
 416                         'accesskey' => "b",
 417                 );
 418         }
 419
 420         if(feature_enabled(local_user(),'star_posts')) {
 421                 $tabs[] = array(
 422                         'label' => t('Starred'),
 423                         'url'   => $a->get_baseurl(true) . '/' . str_replace('/new', '', $cmd) . ((x($_GET,'cid')) ? '/?f=&cid=' . $_GET['cid'] : '/?f=') . '&star=1',
 424                         'sel'   => $starred_active,
 425                         'title' => t('Favourite Posts'),
 426                         'id'    => 'starred-posts-tab',
 427                         'accesskey' => "m",
 428                 );
 429         }
 430
 431         // save selected tab, but only if not in search or file mode
 432         if(!x($_GET,'search') && !x($_GET,'file')) {
 433                 set_pconfig( local_user(), 'network.view','tab.selected',array($all_active, $postord_active, $conv_active, $new_active, $starred_active, $bookmarked_active, $spam_active) );
 434         }
 435
 436         $arr = array('tabs' => $tabs);
 437         call_hooks('network_tabs', $arr);
 438
 439         $o .= replace_macros(get_markup_template('common_tabs.tpl'), array('$tabs'=> $arr['tabs']));
 440
 441         // --- end item filter tabs
 442
 443         $contact_id = $a->cid;
 444
 445         require_once('include/acl_selectors.php');
 446
 447         $cid = ((x($_GET,'cid')) ? intval($_GET['cid']) : 0);
 448         $star = ((x($_GET,'star')) ? intval($_GET['star']) : 0);
 449         $bmark = ((x($_GET,'bmark')) ? intval($_GET['bmark']) : 0);
 450         $order = ((x($_GET,'order')) ? notags($_GET['order']) : 'comment');
 451         $liked = ((x($_GET,'liked')) ? intval($_GET['liked']) : 0);
 452         $conv = ((x($_GET,'conv')) ? intval($_GET['conv']) : 0);
 453         $spam = ((x($_GET,'spam')) ? intval($_GET['spam']) : 0);
 454         $nets = ((x($_GET,'nets')) ? $_GET['nets'] : '');
 455         $cmin = ((x($_GET,'cmin')) ? intval($_GET['cmin']) : 0);
 456         $cmax = ((x($_GET,'cmax')) ? intval($_GET['cmax']) : 99);
 457         $file = ((x($_GET,'file')) ? $_GET['file'] : '');
 458
 459
 460
 461         if(x($_GET,'search') || x($_GET,'file'))
 462                 $nouveau = true;
 463         if($cid)
 464                 $def_acl = array('allow_cid' => '<' . intval($cid) . '>');
 465
 466         if($nets) {
 467                 $r = q("SELECT `id` FROM `contact` WHERE `uid` = %d AND network = '%s' AND `self` = 0",
 468                         intval(local_user()),
 469                         dbesc($nets)
 470                 );
 471
 472                 $str = '';
 473                 if(count($r))
 474                         foreach($r as $rr)
 475                                 $str .= '<' . $rr['id'] . '>';
 476                 if(strlen($str))
 477                         $def_acl = array('allow_cid' => $str);
 478         }
 479         set_pconfig(local_user(), 'network.view', 'net.selected', ($nets ? $nets : 'all'));
 480
 481         if(! $update) {
 482                 if($group) {
 483                         if(($t = group_public_members($group)) && (! get_pconfig(local_user(),'system','nowarn_insecure'))) {
 484                                 notice( sprintf( tt('Warning: This group contains %s member from an insecure network.',
 485                                                                         'Warning: This group contains %s members from an insecure network.',
 486                                                                         $t), $t ) . EOL);
 487                                 notice( t('Private messages to this group are at risk of public disclosure.') . EOL);
 488                         }
 489                 }
 490
 491                 nav_set_selected('network');
 492
 493                 $content = "";
 494
 495                 if ($cid) {
 496                         // If $cid belongs to a communitity forum or a privat goup,.add a mention to the status editor
 497                         $contact = q("SELECT `nick` FROM `contact` WHERE `id` = %d AND `uid` = %d AND (`forum` OR `prv`) ",
 498                                 intval($cid),
 499                                 intval(local_user())
 500                         );
 501                         if ($contact)
 502                                 $content = "@".$contact[0]["nick"]."+".$cid;
 503                 }
 504
 505                 $x = array(
 506                         'is_owner' => true,
 507                         'allow_location' => $a->user['allow_location'],
 508                         'default_location' => $a->user['default-location'],
 509                         'nickname' => $a->user['nickname'],
 510                         'lockstate'=> ((($group) || ($cid) || ($nets) || (is_array($a->user) &&
 511                                         ((strlen($a->user['allow_cid'])) || (strlen($a->user['allow_gid'])) ||
 512                                         (strlen($a->user['deny_cid'])) || (strlen($a->user['deny_gid']))))) ? 'lock' : 'unlock'),
 513                         'default_perms' => get_acl_permissions($a->user),
 514                         'acl'   => populate_acl((($group || $cid || $nets) ? $def_acl : $a->user), true),
 515                         'bang'  => (($group || $cid || $nets) ? '!' : ''),
 516                         'visitor' => 'block',
 517                         'profile_uid' => local_user(),
 518                         'acl_data' => construct_acl_data($a, $a->user), // For non-Javascript ACL selector
 519                         'content' => $content,
 520                 );
 521
 522                 $o .= status_editor($a,$x);
 523
 524         }
 525
 526         // We don't have to deal with ACLs on this page. You're looking at everything
 527         // that belongs to you, hence you can see all of it. We will filter by group if
 528         // desired.
 529
 530         $sql_post_table = "";
 531         $sql_options  = (($star) ? " and starred = 1 " : '');
 532         $sql_options .= (($bmark) ? " and bookmark = 1 " : '');
 533         $sql_extra = $sql_options;
 534         $sql_extra2 = "";
 535         $sql_extra3 = "";
 536         $sql_table = "`thread`";
 537         $sql_parent = "`iid`";
 538
 539         if ($nouveau OR strlen($file) OR $update) {
 540                 $sql_table = "`item`";
 541                 $sql_parent = "`parent`";
 542         }
 543
 544         $sql_nets = (($nets) ? sprintf(" and $sql_table.`network` = '%s' ", dbesc($nets)) : '');
 545
 546         if($group) {
 547                 $r = q("SELECT `name`, `id` FROM `group` WHERE `id` = %d AND `uid` = %d LIMIT 1",
 548                         intval($group),
 549                         intval($_SESSION['uid'])
 550                 );
 551                 if(! count($r)) {
 552                         if($update)
 553                                 killme();
 554                         notice( t('No such group') . EOL );
 555                         goaway($a->get_baseurl(true) . '/network/0');
 556                         // NOTREACHED
 557                 }
 558
 559                 $contacts = expand_groups(array($group));
 560
 561                 $contact_str_self = "";
 562
 563                 if((is_array($contacts)) && count($contacts)) {
 564                         $contact_str = implode(',',$contacts);
 565                         $self = q("SELECT `id` FROM `contact` WHERE `uid` = %d AND `self`", intval($_SESSION['uid']));
 566                         if (count($self))
 567                                 $contact_str_self = ",".$self[0]["id"];
 568                 }
 569                 else {
 570                         $contact_str = ' 0 ';
 571                         info( t('Group is empty'));
 572                 }
 573
 574                 //$sql_post_table = " INNER JOIN (SELECT DISTINCT(`parent`) FROM `item` WHERE (`contact-id` IN ($contact_str) OR `allow_gid` like '".protect_sprintf('%<'.intval($group).'>%')."') and deleted = 0 ORDER BY `created` DESC) AS `temp1` ON $sql_table.$sql_parent = `temp1`.`parent` ";
 575
 576                 $sql_extra3 .= " AND `contact-id` IN ($contact_str$contact_str_self) ";
 577                 $sql_extra3 .= " AND EXISTS (SELECT `id` FROM `item` WHERE (`contact-id` IN ($contact_str)
 578                                 OR `allow_gid` LIKE '".protect_sprintf('%<'.intval($group).'>%')."') AND `deleted` = 0
 579                                 AND `parent` = $sql_table.$sql_parent) ";
 580
 581                 $o = replace_macros(get_markup_template("section_title.tpl"),array(
 582                         '$title' => sprintf( t('Group: %s'), $r[0]['name'])
 583                 )) . $o;
 584
 585         }
 586         elseif($cid) {
 587
 588                 $r = q("SELECT `id`,`name`,`network`,`writable`,`nurl` FROM `contact` WHERE `id` = %d
 589                                 AND `blocked` = 0 AND `pending` = 0 LIMIT 1",
 590                         intval($cid)
 591                 );
 592                 if(count($r)) {
 593                         $sql_post_table = " INNER JOIN (SELECT DISTINCT(`parent`) FROM `item`
 594                                             WHERE 1 $sql_options AND `contact-id` = ".intval($cid)." AND `deleted` = 0
 595                                             ORDER BY `item`.`received` DESC) AS `temp1`
 596                                             ON $sql_table.$sql_parent = `temp1`.`parent` ";
 597                         $sql_extra = "";
 598
 599                         $o = replace_macros(get_markup_template("section_title.tpl"),array(
 600                                 '$title' => sprintf( t('Contact: %s'), htmlentities($r[0]['name']))
 601                         )) . $o;
 602
 603                         if($r[0]['network'] === NETWORK_OSTATUS && $r[0]['writable'] && (! get_pconfig(local_user(),'system','nowarn_insecure'))) {
 604                                 notice( t('Private messages to this person are at risk of public disclosure.') . EOL);
 605                         }
 606
 607                 }
 608                 else {
 609                         notice( t('Invalid contact.') . EOL);
 610                         goaway($a->get_baseurl(true) . '/network');
 611                         // NOTREACHED
 612                 }
 613         }
 614
 615         if((! $group) && (! $cid) && (! $update) && (! get_config('theme','hide_eventlist'))) {
 616                 $o .= get_birthdays();
 617                 $o .= get_events();
 618         }
 619
 620         if($datequery) {
 621                 $sql_extra3 .= protect_sprintf(sprintf(" AND $sql_table.created <= '%s' ", dbesc(datetime_convert(date_default_timezone_get(),'',$datequery))));
 622         }
 623         if($datequery2) {
 624                 $sql_extra3 .= protect_sprintf(sprintf(" AND $sql_table.created >= '%s' ", dbesc(datetime_convert(date_default_timezone_get(),'',$datequery2))));
 625         }
 626
 627         //$sql_extra2 = (($nouveau) ? '' : " AND `item`.`parent` = `item`.`id` ");
 628         $sql_extra2 = (($nouveau) ? '' : $sql_extra2);
 629         $sql_extra3 = (($nouveau) ? '' : $sql_extra3);
 630         $sql_order = "";
 631         $order_mode = "received";
 632         $tag = false;
 633
 634         if(x($_GET,'search')) {
 635                 $search = escape_tags($_GET['search']);
 636
 637                 if(strpos($search,'#') === 0) {
 638                         $tag = true;
 639                         $search = substr($search,1);
 640                 }
 641
 642                 if (get_config('system','only_tag_search'))
 643                         $tag = true;
 644
 645                 if($tag) {
 646                         $sql_extra = "";
 647
 648                         $sql_post_table = sprintf("INNER JOIN (SELECT `oid` FROM `term` WHERE `term` = '%s' AND `otype` = %d AND `type` = %d AND `uid` = %d ORDER BY `tid` DESC) AS `term` ON `item`.`id` = `term`.`oid` ",
 649                                         dbesc(protect_sprintf($search)), intval(TERM_OBJ_POST), intval(TERM_HASHTAG), intval(local_user()));
 650                         $sql_order = "`item`.`id`";
 651                         $order_mode = "id";
 652                 } else {
 653                         if (get_config('system','use_fulltext_engine'))
 654                                 $sql_extra = sprintf(" AND MATCH (`item`.`body`, `item`.`title`) AGAINST ('%s' in boolean mode) ", dbesc(protect_sprintf($search)));
 655                         else
 656                                 $sql_extra = sprintf(" AND `item`.`body` REGEXP '%s' ", dbesc(protect_sprintf(preg_quote($search))));
 657                         $sql_order = "`item`.`received`";
 658                         $order_mode = "received";
 659                 }
 660         }
 661         if(strlen($file)) {
 662                 $sql_post_table = sprintf("INNER JOIN (SELECT `oid` FROM `term` WHERE `term` = '%s' AND `otype` = %d AND `type` = %d AND `uid` = %d ORDER BY `tid` DESC) AS `term` ON `item`.`id` = `term`.`oid` ",
 663                                 dbesc(protect_sprintf($file)), intval(TERM_OBJ_POST), intval(TERM_FILE), intval(local_user()));
 664                 $sql_order = "`item`.`id`";
 665                 $order_mode = "id";
 666         }
 667
 668         if($conv)
 669                 $sql_extra3 .= " AND `mention`";
 670
 671         if($update) {
 672
 673                 // only setup pagination on initial page view
 674                 $pager_sql = '';
 675
 676         }
 677         else {
 678                 if(get_config('system', 'old_pager')) {
 679                         $r = q("SELECT COUNT(*) AS `total`
 680                                 FROM $sql_table $sql_post_table INNER JOIN `contact` ON `contact`.`id` = $sql_table.`contact-id`
 681                                 AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
 682                                 WHERE $sql_table.`uid` = %d AND $sql_table.`visible` = 1 AND $sql_table.`deleted` = 0
 683                                 $sql_extra2 $sql_extra3
 684                                 $sql_extra $sql_nets ",
 685                                 intval($_SESSION['uid'])
 686                         );
 687
 688                         if(count($r)) {
 689                                 $a->set_pager_total($r[0]['total']);
 690                         }
 691                 }
 692
 693                 //  check if we serve a mobile device and get the user settings
 694                 //  accordingly
 695                 if ($a->is_mobile) {
 696                         $itemspage_network = get_pconfig(local_user(),'system','itemspage_mobile_network');
 697                         $itemspage_network = ((intval($itemspage_network)) ? $itemspage_network : 20);
 698                 } else {
 699                         $itemspage_network = get_pconfig(local_user(),'system','itemspage_network');
 700                         $itemspage_network = ((intval($itemspage_network)) ? $itemspage_network : 40);
 701                 }
 702
 703                 //  now that we have the user settings, see if the theme forces
 704                 //  a maximum item number which is lower then the user choice
 705                 if(($a->force_max_items > 0) && ($a->force_max_items < $itemspage_network))
 706                         $itemspage_network = $a->force_max_items;
 707
 708                 $a->set_pager_itemspage($itemspage_network);
 709                 $pager_sql = sprintf(" LIMIT %d, %d ",intval($a->pager['start']), intval($a->pager['itemspage']));
 710         }
 711
 712         if($nouveau) {
 713                 $simple_update = (($update) ? " AND `item`.`unseen` = 1 " : '');
 714
 715                 if ($sql_order == "")
 716                         $sql_order = "`item`.`received`";
 717
 718                 // "New Item View" - show all items unthreaded in reverse created date order
 719                 $items = q("SELECT `item`.*, `item`.`id` AS `item_id`, `item`.`network` AS `item_network`,
 720                         `contact`.`name`, `contact`.`photo`, `contact`.`url`, `contact`.`rel`, `contact`.`writable`,
 721                         `contact`.`network`, `contact`.`thumb`, `contact`.`dfrn-id`, `contact`.`self`,
 722                         `contact`.`id` AS `cid`, `contact`.`uid` AS `contact-uid`
 723                         FROM $sql_table $sql_post_table INNER JOIN `contact` ON `contact`.`id` = `item`.`contact-id`
 724                         AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
 725                         WHERE `item`.`uid` = %d AND `item`.`visible` = 1
 726                         AND `item`.`deleted` = 0 AND `item`.`moderated` = 0
 727                         $simple_update
 728                         $sql_extra $sql_nets
 729                         ORDER BY $sql_order DESC $pager_sql ",
 730                         intval($_SESSION['uid'])
 731                 );
 732
 733                 $update_unseen = ' WHERE uid = ' . intval($_SESSION['uid']) . " AND unseen = 1 $sql_extra $sql_nets";
 734         } else {
 735
 736                 // Normal conversation view
 737
 738
 739                 if($order === 'post') {
 740                         $ordering = "`created`";
 741                         if ($sql_order == "")
 742                                 $order_mode = "created";
 743                 } else {
 744                         $ordering = "`commented`";
 745                         if ($sql_order == "")
 746                                 $order_mode = "commented";
 747                 }
 748
 749                 if ($sql_order == "")
 750                         $sql_order = "$sql_table.$ordering";
 751
 752                 if (($_GET["offset"] != ""))
 753                         $sql_extra3 .= sprintf(" AND $sql_order <= '%s'", dbesc($_GET["offset"]));
 754
 755                 // Fetch a page full of parent items for this page
 756                 if($update) {
 757                         if (!get_config("system", "like_no_comment"))
 758                                 $sql_extra4 = "(`item`.`deleted` = 0
 759                                                 OR `item`.`verb` = '".ACTIVITY_LIKE."' OR `item`.`verb` = '".ACTIVITY_DISLIKE."'
 760                                                 OR `item`.`verb` = '".ACTIVITY_ATTEND."' OR `item`.`verb` = '".ACTIVITY_ATTENDNO."'
 761                                                 OR `item`.`verb` = '".ACTIVITY_ATTENDMAYBE."')";
 762                         else
 763                                 $sql_extra4 = "`item`.`deleted` = 0 AND `item`.`verb` = '".ACTIVITY_POST."'";
 764
 765                         $r = q("SELECT `item`.`parent` AS `item_id`, `item`.`network` AS `item_network`, `contact`.`uid` AS `contact_uid`
 766                                 FROM $sql_table $sql_post_table INNER JOIN `contact` ON `contact`.`id` = `item`.`contact-id`
 767                                 AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
 768                                 WHERE `item`.`uid` = %d AND `item`.`visible` = 1 AND $sql_extra4
 769                                 AND `item`.`moderated` = 0 AND `item`.`unseen` = 1
 770                                 $sql_extra3 $sql_extra $sql_nets ORDER BY `item_id` DESC LIMIT 100",
 771                                 intval(local_user())
 772                         );
 773                 } else {
 774                         $r = q("SELECT `thread`.`iid` AS `item_id`, `thread`.`network` AS `item_network`, `contact`.`uid` AS `contact_uid`
 775                                 FROM $sql_table $sql_post_table STRAIGHT_JOIN `contact` ON `contact`.`id` = `thread`.`contact-id`
 776                                 AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
 777                                 WHERE `thread`.`uid` = %d AND `thread`.`visible` = 1 AND `thread`.`deleted` = 0
 778                                 AND `thread`.`moderated` = 0
 779                                 $sql_extra2 $sql_extra3 $sql_extra $sql_nets
 780                                 ORDER BY $sql_order DESC $pager_sql ",
 781                                 intval(local_user())
 782                         );
 783                 }
 784
 785                 // Then fetch all the children of the parents that are on this page
 786
 787                 $parents_arr = array();
 788                 $parents_str = '';
 789                 $date_offset = "";
 790
 791                 if(count($r)) {
 792                         foreach($r as $rr)
 793                                 if(! in_array($rr['item_id'],$parents_arr))
 794                                         $parents_arr[] = $rr['item_id'];
 795
 796                         $parents_str = implode(", ", $parents_arr);
 797
 798                         // splitted into separate queries to avoid the problem with very long threads
 799                         // so always the last X comments are loaded
 800                         // This problem can occur expecially with imported facebook posts
 801                         $max_comments = get_config("system", "max_comments");
 802                         if ($max_comments == 0)
 803                                 $max_comments = 100;
 804
 805                         $items = array();
 806
 807                         foreach ($parents_arr AS $parents) {
 808 //                                      $sql_extra ORDER BY `item`.`commented` DESC LIMIT %d",
 809                                 $thread_items = q("SELECT `item`.*, `item`.`id` AS `item_id`, `item`.`network` AS `item_network`,
 810                                         `contact`.`name`, `contact`.`photo`, `contact`.`url`, `contact`.`alias`, `contact`.`rel`, `contact`.`writable`,
 811                                         `contact`.`network`, `contact`.`thumb`, `contact`.`dfrn-id`, `contact`.`self`,
 812                                         `contact`.`id` AS `cid`, `contact`.`uid` AS `contact-uid`
 813                                         FROM `item` INNER JOIN `contact` ON `contact`.`id` = `item`.`contact-id`
 814                                         AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
 815                                         WHERE `item`.`uid` = %d AND `item`.`visible` = 1 AND `item`.`deleted` = 0
 816                                         AND `item`.`moderated` = 0
 817                                         AND `item`.`parent` = %d
 818                                         ORDER BY `item`.`commented` DESC LIMIT %d",
 819                                         intval(local_user()),
 820                                         intval($parents),
 821                                         intval($max_comments + 1)
 822                                 );
 823                                 $items = array_merge($items, $thread_items);
 824                         }
 825                         $items = conv_sort($items,$ordering);
 826                 } else {
 827                         $items = array();
 828                 }
 829
 830                 if ($_GET["offset"] == "")
 831                         $date_offset = $items[0][$order_mode];
 832                 else
 833                         $date_offset = $_GET["offset"];
 834
 835                 $a->page_offset = $date_offset;
 836
 837                 if($parents_str)
 838                         $update_unseen = ' WHERE uid = ' . intval(local_user()) . ' AND unseen = 1 AND parent IN ( ' . dbesc($parents_str) . ' )';
 839         }
 840
 841         // We aren't going to try and figure out at the item, group, and page
 842         // level which items you've seen and which you haven't. If you're looking
 843         // at the top level network page just mark everything seen.
 844
 845
 846 // The $update_unseen is a bit unreliable if you have stuff coming into your stream from a new contact -
 847 // and other feeds that bring in stuff from the past. One can't find it all.
 848 // I'm reviving this block to mark everything seen on page 1 of the network as a temporary measure.
 849 // The correct solution is to implement a network notifications box just like the system notifications popup
 850 // with the ability in the popup to "mark all seen".
 851 // Several people are complaining because there are unseen messages they can't find and as time goes
 852 // on they just get buried deeper. It has happened to me a couple of times also.
 853
 854
 855         if((! $group) && (! $cid) && (! $star)) {
 856                 $r = q("UPDATE `item` SET `unseen` = 0
 857                         WHERE `unseen` = 1 AND `uid` = %d",
 858                         intval(local_user())
 859                 );
 860         }
 861         else {
 862                 if($update_unseen)
 863                         $r = q("UPDATE `item` SET `unseen` = 0 $update_unseen");
 864         }
 865
 866         // Set this so that the conversation function can find out contact info for our wall-wall items
 867         $a->page_contact = $a->contact;
 868
 869         $mode = (($nouveau) ? 'network-new' : 'network');
 870
 871         $o .= conversation($a,$items,$mode,$update);
 872
 873         if(!$update) {
 874                 if(get_pconfig(local_user(),'system','infinite_scroll')) {
 875                                 $o .= scroll_loader();
 876                 } elseif(!get_config('system', 'old_pager')) {
 877                         $o .= alt_pager($a,count($items));
 878                 } else {
 879                         $o .= paginate($a);
 880                 }
 881         }
 882
 883         return $o;
 884 }
 885