2010-07-17 00:16:50 +00:00
< ? php
function network_init ( & $a ) {
2011-01-20 22:25:44 +00:00
if ( ! local_user ()) {
2011-01-20 23:30:45 +00:00
notice ( t ( 'Permission denied.' ) . EOL );
2011-01-20 22:25:44 +00:00
return ;
}
2011-01-20 19:19:20 +00:00
2011-07-01 13:14:15 +00:00
$group_id = (( $a -> argc > 1 && intval ( $a -> argv [ 1 ])) ? intval ( $a -> argv [ 1 ]) : 0 );
2010-07-25 23:27:22 +00:00
require_once ( 'include/group.php' );
2010-10-31 23:38:22 +00:00
if ( ! x ( $a -> page , 'aside' ))
$a -> page [ 'aside' ] = '' ;
2011-01-20 01:56:36 +00:00
2011-05-27 00:47:33 +00:00
$search = (( x ( $_GET , 'search' )) ? escape_tags ( $_GET [ 'search' ]) : '' );
2011-07-04 02:41:04 +00:00
$srchurl = '/network' . (( x ( $_GET , 'cid' )) ? '?cid=' . $_GET [ 'cid' ] : '' ) . (( x ( $_GET , 'star' )) ? '?star=' . $_GET [ 'star' ] : '' );
2011-05-27 00:47:33 +00:00
$a -> page [ 'aside' ] .= search ( $search , 'netsearch-box' , $srchurl );
2011-01-20 01:56:36 +00:00
$a -> page [ 'aside' ] .= '<div id="network-new-link">' ;
2011-05-27 00:47:33 +00:00
2011-07-04 02:41:04 +00:00
$a -> page [ 'aside' ] .= '<div id="network-view-link">' ;
2011-05-27 00:47:33 +00:00
if (( $a -> argc > 1 && $a -> argv [ 1 ] === 'new' ) || ( $a -> argc > 2 && $a -> argv [ 2 ] === 'new' ) || x ( $_GET , 'search' ))
2011-07-04 03:18:20 +00:00
$a -> page [ 'aside' ] .= '<a href="' . $a -> get_baseurl () . '/' . str_replace ( '/new' , '' , $a -> cmd ) . (( x ( $_GET , 'cid' )) ? '?cid=' . $_GET [ 'cid' ] : '' ) . '">' . t ( 'View Conversations' ) . '</a></div>' ;
2011-07-04 02:41:04 +00:00
else {
2011-07-04 03:18:20 +00:00
$a -> page [ 'aside' ] .= '<a href="' . $a -> get_baseurl () . '/' . $a -> cmd . '/new' . (( x ( $_GET , 'cid' )) ? '/?cid=' . $_GET [ 'cid' ] : '' ) . '">' . t ( 'View New Items' ) . '</a></div>' ;
2011-07-04 02:41:04 +00:00
if ( x ( $_GET , 'star' ))
$a -> page [ 'aside' ] .= '<div id="network-star-link">'
. '<a class="network-star" href="' . $a -> get_baseurl () . '/' . $a -> cmd
. (( x ( $_GET , 'cid' )) ? '/?cid=' . $_GET [ 'cid' ] : '' ) . '">'
. t ( 'View Any Items' ) . '</a>'
. '<span class="network-star icon starred"></span>'
. '<span class="network-star icon unstarred"></span>'
. '<div class="clear"></div></div>' ;
else
$a -> page [ 'aside' ] .= '<div id="network-star-link">'
. '<a class="network-star" href="' . $a -> get_baseurl () . '/' . $a -> cmd
. (( x ( $_GET , 'cid' )) ? '/?cid=' . $_GET [ 'cid' ] : '' ) . '&star=1" >'
. t ( 'View Starred Items' ) . '</a>'
. '<span class="network-star icon starred"></span>'
. '<div class="clear"></div></div>' ;
}
2011-01-20 01:56:36 +00:00
$a -> page [ 'aside' ] .= '</div>' ;
2011-07-01 13:14:15 +00:00
$a -> page [ 'aside' ] .= group_side ( 'network' , 'network' , true , $group_id );
2010-07-17 00:16:50 +00:00
}
2010-09-21 02:34:44 +00:00
function network_content ( & $a , $update = 0 ) {
2010-07-17 00:16:50 +00:00
2011-04-13 00:58:16 +00:00
require_once ( 'include/conversation.php' );
2010-07-17 00:16:50 +00:00
if ( ! local_user ())
2011-01-20 22:25:44 +00:00
return login ( false );
2010-10-31 23:38:22 +00:00
$o = '' ;
2010-07-17 00:16:50 +00:00
$contact_id = $a -> cid ;
2010-07-25 23:27:22 +00:00
$group = 0 ;
2010-07-20 12:21:19 +00:00
2011-02-02 04:23:58 +00:00
$nouveau = false ;
2011-02-17 08:52:26 +00:00
require_once ( 'include/acl_selectors.php' );
2011-02-02 04:23:58 +00:00
2011-04-20 03:50:02 +00:00
$cid = (( x ( $_GET [ 'cid' ])) ? intval ( $_GET [ 'cid' ]) : 0 );
2011-07-04 02:41:04 +00:00
$star = (( x ( $_GET [ 'star' ])) ? intval ( $_GET [ 'star' ]) : 0 );
2011-04-20 03:50:02 +00:00
2011-02-17 08:40:35 +00:00
if (( $a -> argc > 2 ) && $a -> argv [ 2 ] === 'new' )
$nouveau = true ;
if ( $a -> argc > 1 ) {
if ( $a -> argv [ 1 ] === 'new' )
$nouveau = true ;
else {
$group = intval ( $a -> argv [ 1 ]);
2011-04-20 03:50:02 +00:00
$def_acl = array ( 'allow_gid' => '<' . $group . '>' );
2011-02-17 08:40:35 +00:00
}
2011-02-17 07:05:48 +00:00
}
2011-05-27 00:47:33 +00:00
if ( x ( $_GET , 'search' ))
$nouveau = true ;
2011-04-20 03:50:02 +00:00
if ( $cid )
$def_acl = array ( 'allow_cid' => '<' . intval ( $cid ) . '>' );
2010-07-24 22:21:33 +00:00
if ( ! $update ) {
2011-04-04 03:41:40 +00:00
if ( group ) {
if (( $t = group_public_members ( $group )) && ( ! get_pconfig ( local_user (), 'system' , 'nowarn_insecure' ))) {
2011-05-23 09:39:57 +00:00
notice ( sprintf ( tt ( 'Warning: This group contains %s member from an insecure network.' ,
'Warning: This group contains %s members from an insecure network.' ,
$t ), $t ) . EOL );
2011-04-04 03:41:40 +00:00
notice ( t ( 'Private messages to this group are at risk of public disclosure.' ) . EOL );
}
}
2010-09-19 04:11:18 +00:00
$o .= '<script> $(document).ready(function() { $(\'#nav-network-link\').addClass(\'nav-selected\'); });</script>' ;
2010-07-26 11:22:19 +00:00
$_SESSION [ 'return_url' ] = $a -> cmd ;
2010-10-18 07:43:49 +00:00
$celeb = ((( $a -> user [ 'page-flags' ] == PAGE_SOAPBOX ) || ( $a -> user [ 'page-flags' ] == PAGE_COMMUNITY )) ? true : false );
2011-04-20 12:48:12 +00:00
$x = array (
'is_owner' => true ,
'allow_location' => $a -> user [ 'allow_location' ],
'default_location' => $a -> user [ 'default_location' ],
'nickname' => $a -> user [ 'nickname' ],
'lockstate' => ((( $group ) || ( is_array ( $a -> user ) && (( strlen ( $a -> user [ 'allow_cid' ])) || ( strlen ( $a -> user [ 'allow_gid' ])) || ( strlen ( $a -> user [ 'deny_cid' ])) || ( strlen ( $a -> user [ 'deny_gid' ]))))) ? 'lock' : 'unlock' ),
'acl' => populate_acl ((( $group || $cid ) ? $def_acl : $a -> user ), $celeb ),
'bang' => (( $group || $cid ) ? '!' : '' ),
'visitor' => 'block' ,
'profile_uid' => local_user ()
);
$o .= status_editor ( $a , $x );
2010-07-17 00:16:50 +00:00
2010-07-25 23:27:22 +00:00
// The special div is needed for liveUpdate to kick in for this page.
// We only launch liveUpdate if you are on the front page, you aren't
// filtering by group and also you aren't writing a comment (the last
// criteria is discovered in javascript).
2010-09-21 05:27:33 +00:00
$o .= '<div id="live-network"></div>' . " \r \n " ;
2011-02-17 08:40:35 +00:00
$o .= " <script> var profile_uid = " . $_SESSION [ 'uid' ]
2011-07-22 00:55:15 +00:00
. " ; var netargs = ' " . substr ( $a -> cmd , 8 )
2011-07-22 03:19:55 +00:00
. '?f=' ;
2011-07-22 00:55:15 +00:00
. (( x ( $_GET , 'cid' )) ? '&cid=' . $_GET [ 'cid' ] : '' )
. (( x ( $_GET , 'search' )) ? '&search=' . $_GET [ 'search' ] : '' )
. (( x ( $_GET , 'star' )) ? '&star=' . $_GET [ 'star' ] : '' )
2011-02-17 08:40:35 +00:00
. " '; var profile_page = " . $a -> pager [ 'page' ] . " ; </script> \r \n " ;
2010-09-21 05:27:33 +00:00
2010-07-24 22:21:33 +00:00
}
2010-07-17 00:16:50 +00:00
2011-05-21 02:28:48 +00:00
// We aren't going to try and figure out at the item, group, and page
// level which items you've seen and which you haven't. If you're looking
// at the top level network page just mark everything seen.
2010-07-25 23:27:22 +00:00
2011-07-04 02:41:04 +00:00
if (( ! $group ) && ( ! $cid ) && ( ! $star )) {
2011-05-21 02:28:48 +00:00
$r = q ( " UPDATE `item` SET `unseen` = 0
WHERE `unseen` = 1 AND `uid` = % d " ,
intval ( $_SESSION [ 'uid' ])
);
}
2010-07-17 00:16:50 +00:00
2010-07-25 23:27:22 +00:00
// We don't have to deal with ACL's on this page. You're looking at everything
// that belongs to you, hence you can see all of it. We will filter by group if
// desired.
2010-07-24 13:56:02 +00:00
2011-07-04 02:41:04 +00:00
$star_sql = (( $star ) ? " AND `starred` = 1 " : '' );
$sql_extra = " AND `item`.`parent` IN ( SELECT `parent` FROM `item` WHERE `id` = `parent` $star_sql ) " ;
2010-07-17 00:16:50 +00:00
2010-07-25 23:27:22 +00:00
if ( $group ) {
2010-08-11 08:48:43 +00:00
$r = q ( " SELECT `name`, `id` FROM `group` WHERE `id` = %d AND `uid` = %d LIMIT 1 " ,
2010-07-25 23:27:22 +00:00
intval ( $group ),
intval ( $_SESSION [ 'uid' ])
);
if ( ! count ( $r )) {
2011-02-17 07:10:18 +00:00
if ( $update )
killme ();
2010-08-11 22:40:18 +00:00
notice ( t ( 'No such group' ) . EOL );
2010-07-25 23:27:22 +00:00
goaway ( $a -> get_baseurl () . '/network' );
2011-04-20 03:50:02 +00:00
// NOTREACHED
2010-07-25 23:27:22 +00:00
}
$contacts = expand_groups ( array ( $group ));
2011-01-03 21:53:26 +00:00
if (( is_array ( $contacts )) && count ( $contacts )) {
$contact_str = implode ( ',' , $contacts );
}
else {
$contact_str = ' 0 ' ;
2011-05-23 09:39:57 +00:00
info ( t ( 'Group is empty' ));
2011-01-03 21:53:26 +00:00
}
2011-01-20 01:56:36 +00:00
2011-07-04 02:41:04 +00:00
$sql_extra = " AND `item`.`parent` IN ( SELECT `parent` FROM `item` WHERE `id` = `parent` $star_sql AND ( `contact-id` IN ( $contact_str ) OR `allow_gid` REGEXP '< " . intval ( $group ) . " >' )) " ;
2011-02-28 10:56:46 +00:00
$o = '<h2>' . t ( 'Group: ' ) . $r [ 0 ][ 'name' ] . '</h2>' . $o ;
2010-07-25 23:27:22 +00:00
}
2011-04-20 03:50:02 +00:00
elseif ( $cid ) {
2011-04-20 04:09:25 +00:00
$r = q ( " SELECT `id`,`name`,`network`,`writable` FROM `contact` WHERE `id` = %d
2011-04-20 03:50:02 +00:00
AND `blocked` = 0 AND `pending` = 0 LIMIT 1 " ,
intval ( $cid )
);
if ( count ( $r )) {
2011-07-04 02:41:04 +00:00
$sql_extra = " AND `item`.`parent` IN ( SELECT `parent` FROM `item` WHERE `id` = `parent` $star_sql AND `contact-id` IN ( " . intval ( $cid ) . " )) " ;
2011-04-20 03:50:02 +00:00
$o = '<h2>' . t ( 'Contact: ' ) . $r [ 0 ][ 'name' ] . '</h2>' . $o ;
2011-04-26 12:45:53 +00:00
if ( $r [ 0 ][ 'network' ] !== NETWORK_MAIL && $r [ 0 ][ 'network' ] !== NETWORK_DFRN && $r [ 0 ][ 'network' ] !== NETWORK_FACEBOOK && $r [ 0 ][ 'writable' ] && ( ! get_pconfig ( local_user (), 'system' , 'nowarn_insecure' ))) {
2011-04-20 04:09:25 +00:00
notice ( t ( 'Private messages to this person are at risk of public disclosure.' ) . EOL );
}
2011-04-20 03:50:02 +00:00
}
else {
notice ( t ( 'Invalid contact.' ) . EOL );
goaway ( $a -> get_baseurl () . '/network' );
// NOTREACHED
}
}
2010-07-17 00:16:50 +00:00
2011-04-20 03:50:02 +00:00
if (( ! $group ) && ( ! $cid ) && ( ! $update ))
2011-01-17 00:40:09 +00:00
$o .= get_birthdays ();
2011-05-05 03:49:11 +00:00
$sql_extra2 = (( $nouveau ) ? '' : " AND `item`.`parent` = `item`.`id` " );
2011-01-17 00:40:09 +00:00
2011-05-27 00:47:33 +00:00
if ( x ( $_GET , 'search' ))
$sql_extra .= " AND `item`.`body` REGEXP ' " . dbesc ( escape_tags ( $_GET [ 'search' ])) . " ' " ;
2011-07-04 02:41:04 +00:00
2010-07-17 00:16:50 +00:00
$r = q ( " SELECT COUNT(*) AS `total`
FROM `item` LEFT JOIN `contact` ON `contact` . `id` = `item` . `contact-id`
WHERE `item` . `uid` = % d AND `item` . `visible` = 1 AND `item` . `deleted` = 0
2010-07-19 13:58:03 +00:00
AND `contact` . `blocked` = 0 AND `contact` . `pending` = 0
2011-05-05 03:49:11 +00:00
$sql_extra2
2010-07-17 00:16:50 +00:00
$sql_extra " ,
intval ( $_SESSION [ 'uid' ])
);
2011-03-28 02:53:36 +00:00
if ( count ( $r )) {
2010-07-17 00:16:50 +00:00
$a -> set_pager_total ( $r [ 0 ][ 'total' ]);
2011-03-28 02:53:36 +00:00
$a -> set_pager_itemspage ( 40 );
}
2010-07-17 00:16:50 +00:00
2011-01-20 01:56:36 +00:00
if ( $nouveau ) {
2011-03-29 00:24:11 +00:00
// "New Item View" - show all items unthreaded in reverse created date order
2011-01-20 01:56:36 +00:00
$r = q ( " SELECT `item`.*, `item`.`id` AS `item_id`,
2011-04-11 10:22:09 +00:00
`contact` . `name` , `contact` . `photo` , `contact` . `url` , `contact` . `rel` , `contact` . `writable` ,
2011-01-20 02:31:04 +00:00
`contact` . `network` , `contact` . `thumb` , `contact` . `dfrn-id` , `contact` . `self` ,
2011-01-20 01:56:36 +00:00
`contact` . `id` AS `cid` , `contact` . `uid` AS `contact-uid`
FROM `item` , `contact`
WHERE `item` . `uid` = % d AND `item` . `visible` = 1 AND `item` . `deleted` = 0
AND `contact` . `id` = `item` . `contact-id`
AND `contact` . `blocked` = 0 AND `contact` . `pending` = 0
$sql_extra
2011-06-24 00:56:59 +00:00
ORDER BY `item` . `received` DESC LIMIT % d , % d " ,
2011-01-20 01:56:36 +00:00
intval ( $_SESSION [ 'uid' ]),
intval ( $a -> pager [ 'start' ]),
intval ( $a -> pager [ 'itemspage' ])
);
2011-03-31 14:52:51 +00:00
2011-01-20 01:56:36 +00:00
}
else {
2011-03-29 00:24:11 +00:00
// Normal conversation view
// First fetch a known number of parent items
2011-03-28 02:53:36 +00:00
$r = q ( " SELECT `item`.`id` AS `item_id`, `contact`.`uid` AS `contact_uid`
FROM `item` LEFT JOIN `contact` ON `contact` . `id` = `item` . `contact-id`
2011-01-20 01:56:36 +00:00
WHERE `item` . `uid` = % d AND `item` . `visible` = 1 AND `item` . `deleted` = 0
AND `contact` . `blocked` = 0 AND `contact` . `pending` = 0
2011-03-28 02:53:36 +00:00
AND `item` . `parent` = `item` . `id`
2011-01-20 01:56:36 +00:00
$sql_extra
2011-03-28 02:53:36 +00:00
ORDER BY `item` . `created` DESC LIMIT % d , % d " ,
2011-03-07 03:24:01 +00:00
intval ( local_user ()),
2011-01-20 01:56:36 +00:00
intval ( $a -> pager [ 'start' ]),
intval ( $a -> pager [ 'itemspage' ])
);
2011-03-28 02:53:36 +00:00
2011-03-29 00:24:11 +00:00
// Then fetch all the children of the parents that are on this page
2011-03-28 02:53:36 +00:00
$parents_arr = array ();
$parents_str = '' ;
if ( count ( $r )) {
foreach ( $r as $rr )
$parents_arr [] = $rr [ 'item_id' ];
$parents_str = implode ( ', ' , $parents_arr );
$r = q ( " SELECT `item`.*, `item`.`id` AS `item_id`,
2011-04-11 10:22:09 +00:00
`contact` . `name` , `contact` . `photo` , `contact` . `url` , `contact` . `rel` , `contact` . `writable` ,
2011-03-28 02:53:36 +00:00
`contact` . `network` , `contact` . `thumb` , `contact` . `dfrn-id` , `contact` . `self` ,
`contact` . `id` AS `cid` , `contact` . `uid` AS `contact-uid`
FROM `item` , ( SELECT `p` . `id` , `p` . `created` FROM `item` AS `p` WHERE `p` . `parent` = `p` . `id` ) as `parentitem` , `contact`
WHERE `item` . `uid` = % d AND `item` . `visible` = 1 AND `item` . `deleted` = 0
AND `contact` . `id` = `item` . `contact-id`
AND `contact` . `blocked` = 0 AND `contact` . `pending` = 0
AND `item` . `parent` = `parentitem` . `id` AND `item` . `parent` IN ( % s )
$sql_extra
ORDER BY `parentitem` . `created` DESC , `item` . `gravity` ASC , `item` . `created` ASC " ,
intval ( local_user ()),
dbesc ( $parents_str )
);
}
2011-01-20 01:56:36 +00:00
}
2010-07-17 00:16:50 +00:00
2011-04-11 23:15:38 +00:00
// Set this so that the conversation function can find out contact info for our wall-wall items
$a -> page_contact = $a -> contact ;
2011-04-11 04:21:16 +00:00
$mode = (( $nouveau ) ? 'network-new' : 'network' );
2011-03-29 00:24:11 +00:00
2011-04-11 04:21:16 +00:00
$o .= conversation ( $a , $r , $mode , $update );
2010-07-24 22:21:33 +00:00
2011-01-23 22:56:14 +00:00
if ( ! $update ) {
2011-03-29 00:24:11 +00:00
2010-07-24 22:21:33 +00:00
$o .= paginate ( $a );
2011-01-23 22:56:14 +00:00
$o .= '<div class="cc-license">' . t ( 'Shared content is covered by the <a href="http://creativecommons.org/licenses/by/3.0/">Creative Commons Attribution 3.0</a> license.' ) . '</div>' ;
}
2010-07-24 22:21:33 +00:00
2010-07-17 00:16:50 +00:00
return $o ;
2011-03-30 15:10:14 +00:00
}