<?php

require_once('include/contact_widgets.php');
require_once('include/items.php');
require_once("include/bbcode.php");
require_once('include/security.php');
require_once('include/conversation.php');
require_once('include/acl_selectors.php');
require_once('include/permissions.php');


function channel_init(&$a) {

	$which = null;
	if(argc() > 1)
		$which = argv(1);
	if(! $which) {
		if(local_channel()) {
			$channel = $a->get_channel();
			if($channel && $channel['channel_address'])
			$which = $channel['channel_address'];
		}
	}
	if(! $which) {
		notice( t('You must be logged in to see this page.') . EOL );
		return;
	}

	$profile = 0;
	$channel = $a->get_channel();

	if((local_channel()) && (argc() > 2) && (argv(2) === 'view')) {
		$which = $channel['channel_address'];
		$profile = argv(1);		
	}

	$a->page['htmlhead'] .= '<link rel="alternate" type="application/atom+xml" href="' . $a->get_baseurl() . '/feed/' . $which .'" />' . "\r\n" ;


// Not yet ready for prime time
//	$a->page['htmlhead'] .= '<link rel="openid.server" href="' . $a->get_baseurl() . '/id/' . $which .'?f=" />' . "\r\n" ;
//	$a->page['htmlhead'] .= '<link rel="openid.delegate" href="' . $a->get_baseurl() . '/channel/' . $which .'" />' . "\r\n" ;

	// Run profile_load() here to make sure the theme is set before
	// we start loading content

	profile_load($a,$which,$profile);

}

function channel_content(&$a, $update = 0, $load = false) {


	if($load)
		$_SESSION['loadtime'] = datetime_convert();


	$category = $datequery = $datequery2 = '';

	$mid = ((x($_REQUEST,'mid')) ? $_REQUEST['mid'] : '');

	$datequery = ((x($_GET,'dend') && is_a_date_arg($_GET['dend'])) ? notags($_GET['dend']) : '');
	$datequery2 = ((x($_GET,'dbegin') && is_a_date_arg($_GET['dbegin'])) ? notags($_GET['dbegin']) : '');

	if(get_config('system','block_public') && (! get_account_id()) && (! remote_channel())) {
			return login();
	}

	$category = ((x($_REQUEST,'cat')) ? $_REQUEST['cat'] : '');
	$hashtags = ((x($_REQUEST,'tag')) ? $_REQUEST['tag'] : '');

	$groups = array();

	$o = '';

	if($update) {
		// Ensure we've got a profile owner if updating.
		$a->profile['profile_uid'] = $a->profile_uid = $update;
	}
	else {
		if($a->profile['profile_uid'] == local_channel()) {
			nav_set_selected('home');
		}
	}

	$is_owner = (((local_channel()) && ($a->profile['profile_uid'] == local_channel())) ? true : false);

	$channel = $a->get_channel();
	$observer = $a->get_observer();
	$ob_hash = (($observer) ? $observer['xchan_hash'] : '');

	$perms = get_all_perms($a->profile['profile_uid'],$ob_hash);

	if(! $perms['view_stream']) {
			// We may want to make the target of this redirect configurable
			if($perms['view_profile']) {
				notice( t('Insufficient permissions.  Request redirected to profile page.') . EOL);
				goaway (z_root() . "/profile/" . $a->profile['channel_address']);
			}
		notice( t('Permission denied.') . EOL);
		return;
	}


	if(! $update) {

		$o .= profile_tabs($a, $is_owner, $a->profile['channel_address']);

		$o .= common_friends_visitor_widget($a->profile['profile_uid']);

		if($channel && $is_owner) {
			$channel_acl = array(
				'allow_cid' => $channel['channel_allow_cid'], 
				'allow_gid' => $channel['channel_allow_gid'], 
				'deny_cid' => $channel['channel_deny_cid'], 
				'deny_gid' => $channel['channel_deny_gid']
			);
		}
		else
			$channel_acl = array(); 


		if($perms['post_wall']) {

			$x = array(
				'is_owner' => $is_owner,
            	'allow_location' => ((($is_owner || $observer) && (intval(get_pconfig($a->profile['profile_uid'],'system','use_browser_location')))) ? true : false),
	            'default_location' => (($is_owner) ? $a->profile['channel_location'] : ''),
    	        'nickname' => $a->profile['channel_address'],
        	    'lockstate' => (((strlen($a->profile['channel_allow_cid'])) || (strlen($a->profile['channel_allow_gid'])) || (strlen($a->profile['channel_deny_cid'])) || (strlen($a->profile['channel_deny_gid']))) ? 'lock' : 'unlock'),
            	'acl' => (($is_owner) ? populate_acl($channel_acl) : ''),
				'showacl' => (($is_owner) ? 'yes' : ''),
	            'bang' => '',
				'visitor' => (($is_owner || $observer) ? true : false),
        	    'profile_uid' => $a->profile['profile_uid']
        	);

        	$o .= status_editor($a,$x);
		}

	}


	/**
	 * Get permissions SQL - if $remote_contact is true, our remote user has been pre-verified and we already have fetched his/her groups
	 */


	$sql_extra = item_permissions_sql($a->profile['profile_uid'],$remote_contact,$groups);

	if(get_pconfig($a->profile['profile_uid'],'system','channel_list_mode') && (! $mid))
		$page_mode = 'list';
	else
		$page_mode = 'client';


	$abook_uids = " and abook.abook_channel = " . intval($a->profile['profile_uid']) . " ";

	$simple_update = (($update) ? " AND item_unseen = 1 " : '');
		
	if($update && $_SESSION['loadtime'])
		$simple_update = " AND (( item_unseen = 1 AND item.changed > '" . datetime_convert('UTC','UTC',$_SESSION['loadtime']) . "' )  OR item.changed > '" . datetime_convert('UTC','UTC',$_SESSION['loadtime']) . "' ) ";
	if($load)
		$simple_update = '';

	if(($update) && (! $load)) {
		if ($mid) {
			$r = q("SELECT parent AS item_id from item where mid like '%s' and uid = %d AND item_restrict = 0
				AND item_wall = 1 $simple_update $sql_extra limit 1",
				dbesc($mid . '%'),
				intval($a->profile['profile_uid'])
			);
		} else {
			$r = q("SELECT distinct parent AS `item_id`, created from item
				left join abook on ( item.owner_xchan = abook.abook_xchan $abook_uids )
				WHERE uid = %d AND item_restrict = 0
				AND item_wall = 1 $simple_update
				AND ((abook.abook_flags & %d) = 0 or abook.abook_flags is null)
				$sql_extra
				ORDER BY created DESC",
				intval($a->profile['profile_uid']),
				intval(ABOOK_FLAG_BLOCKED)
			);
			$_SESSION['loadtime'] = datetime_convert();
		}

	}
	else {

		if(x($category)) {
		        $sql_extra .= protect_sprintf(term_query('item', $category, TERM_CATEGORY));
		}
		if(x($hashtags)) {
		        $sql_extra .= protect_sprintf(term_query('item', $hashtags, TERM_HASHTAG));
		}

		if($datequery) {
			$sql_extra2 .= protect_sprintf(sprintf(" AND item.created <= '%s' ", dbesc(datetime_convert(date_default_timezone_get(),'',$datequery))));
		}
		if($datequery2) {
			$sql_extra2 .= protect_sprintf(sprintf(" AND item.created >= '%s' ", dbesc(datetime_convert(date_default_timezone_get(),'',$datequery2))));
		}

		$itemspage = get_pconfig(local_channel(),'system','itemspage');
		$a->set_pager_itemspage(((intval($itemspage)) ? $itemspage : 20));
		$pager_sql = sprintf(" LIMIT %d OFFSET %d ", intval($a->pager['itemspage']), intval($a->pager['start']));

		if($load || ($_COOKIE['jsAvailable'] != 1)) {
			if ($mid) {
				$r = q("SELECT parent AS item_id from item where mid = '%s' and uid = %d AND item_restrict = 0
					AND item_wall = 1 $sql_extra limit 1",
					dbesc($mid),
					intval($a->profile['profile_uid'])
				);
				if (! $r) {
					notice( t('Permission denied.') . EOL);
				}

			} else {
				$r = q("SELECT distinct id AS item_id, created FROM item 
					left join abook on item.author_xchan = abook.abook_xchan
					WHERE uid = %d AND item_restrict = 0
					AND item_wall = 1 and (item_flags & %d)>0
					AND ((abook.abook_flags & %d) = 0 or abook.abook_flags is null)
					$sql_extra $sql_extra2
					ORDER BY created DESC $pager_sql ",
					intval($a->profile['profile_uid']),
					intval(ITEM_THREAD_TOP),
					intval(ABOOK_FLAG_BLOCKED)
				);
			}
		}
		else {
			$r = array();
		}
	}

	if($r) {

		$parents_str = ids_to_querystr($r,'item_id');
 
		$items = q("SELECT `item`.*, `item`.`id` AS `item_id` 
			FROM `item`
			WHERE `item`.`uid` = %d AND `item`.`item_restrict` = 0
			AND `item`.`parent` IN ( %s )
			$sql_extra ",
			intval($a->profile['profile_uid']),
			dbesc($parents_str)
		);

		xchan_query($items);
		$items = fetch_post_tags($items, true);
		$items = conv_sort($items,'created');

		if ($load && $mid && (! count($items))) {
			// This will happen if we don't have sufficient permissions
			// to view the parent item (or the item itself if it is toplevel)
			notice( t('Permission denied.') . EOL);
		}

	} else {
		$items = array();
	}


	if((! $update) && (! $load)) {

		// This is ugly, but we can't pass the profile_uid through the session to the ajax updater,
		// because browser prefetching might change it on us. We have to deliver it with the page.

		$maxheight = get_pconfig($a->profile['profile_uid'],'system','channel_divmore_height');
		if(! $maxheight)
			$maxheight = 400;

		$o .= '<div id="live-channel"></div>' . "\r\n";
		$o .= "<script> var profile_uid = " . $a->profile['profile_uid'] 
			. "; var netargs = '?f='; var profile_page = " . $a->pager['page']
			. "; divmore_height = " . intval($maxheight) . "; </script>\r\n";

		$a->page['htmlhead'] .= replace_macros(get_markup_template("build_query.tpl"),array(
			'$baseurl' => z_root(),
			'$pgtype' => 'channel',
			'$uid' => (($a->profile['profile_uid']) ? $a->profile['profile_uid'] : '0'),
			'$gid' => '0',
			'$cid' => '0',
			'$cmin' => '0',
			'$cmax' => '0',
			'$star' => '0',
			'$liked' => '0',
			'$conv' => '0',
			'$spam' => '0',
			'$nouveau' => '0',
			'$wall' => '1',
			'$fh' => '0',
			'$page' => (($a->pager['page'] != 1) ? $a->pager['page'] : 1),
			'$search' => '',
			'$order' => '',
			'$list' => ((x($_REQUEST,'list')) ? intval($_REQUEST['list']) : 0),
			'$file' => '',
			'$cats' => (($category) ? $category : ''),
			'$tags' => (($hashtags) ? $hashtags : ''),
			'$mid' => $mid,
			'$verb' => '',
			'$dend' => $datequery,
			'$dbegin' => $datequery2
		));


	}

	$update_unseen = '';

	if($page_mode === 'list') {

		/**
		 * in "list mode", only mark the parent item and any like activities as "seen". 
		 * We won't distinguish between comment likes and post likes. The important thing
		 * is that the number of unseen comments will be accurate. The SQL to separate the
		 * comment likes could also get somewhat hairy. 
		 */

		if($parents_str) {
			$update_unseen = " AND ( id IN ( " . dbesc($parents_str) . " )";
			$update_unseen .= " OR ( parent IN ( " . dbesc($parents_str) . " ) AND verb in ( '" . dbesc(ACTIVITY_LIKE) . "','" . dbesc(ACTIVITY_DISLIKE) . "' ))) ";
		}
	}
	else {
		if($parents_str) {
			$update_unseen = " AND parent IN ( " . dbesc($parents_str) . " )";
		}
	}

	if($is_owner && $update_unseen) {
		$r = q("UPDATE item SET item_unseen = 0 WHERE item_unseen = 1
			AND item_wall = 1 AND uid = %d $update_unseen",
			intval(local_channel())
		);
	}


	if($_COOKIE['jsAvailable'] == 1) {
		$o .= conversation($a,$items,'channel',$update,$page_mode);
	} else {
		$o .= conversation($a,$items,'channel',$update,'traditional');
	}

	if((! $update) || ($_COOKIE['jsAvailable'] != 1)) {
		$o .= alt_pager($a,count($items));
		if ($mid && $items[0]['title'])
			$a->page['title'] = $items[0]['title'] . " - " . $a->page['title'];
	}

	if($mid) 
		$o .= '<div id="content-complete"></div>';

	return $o;
}