<?php
namespace Zotlabs\Module;


class Manage extends \Zotlabs\Web\Controller {

	function get() {

		if((! get_account_id()) || (isset($_SESSION['delegate']) && $_SESSION['delegate'])) {
			notice( t('Permission denied.') . EOL);
			return;
		}

		nav_set_selected('Channel Manager', 'settings/manage');

		require_once('include/security.php');

		$change_channel = ((argc() > 1) ? intval(argv(1)) : 0);

		if((argc() > 2) && (argv(2) === 'default')) {
			$r = q("select channel_id from channel where channel_id = %d and channel_account_id = %d limit 1",
				intval($change_channel),
				intval(get_account_id())
			);
			if($r) {
				q("update account set account_default_channel = %d where account_id = %d",
					intval($change_channel),
					intval(get_account_id())
				);
			}
			goaway(z_root() . '/manage');
		}


		if($change_channel) {

			$r = change_channel($change_channel);

			if((argc() > 2) && !(argv(2) === 'default')) {
				goaway(z_root() . '/' . implode('/',array_slice(\App::$argv,2))); // Go to whatever is after /manage/, but with the new channel
			}
			else {
				if($r && $r['channel_startpage'])
					goaway(z_root() . '/' . $r['channel_startpage']); // If nothing extra is specified, go to the default page
			}
			goaway(z_root());
		}

		$channels = null;

		$r = q("select channel.*, xchan.* from channel left join xchan on channel.channel_hash = xchan.xchan_hash where channel.channel_account_id = %d and channel_removed = 0 order by channel_name ",
			intval(get_account_id())
		);

		$account = \App::get_account();

		if($r && count($r)) {
			$channels = $r;
			for($x = 0; $x < count($channels); $x ++) {
				$channels[$x]['link'] = 'manage/' . intval($channels[$x]['channel_id']);
				$channels[$x]['default'] = (($channels[$x]['channel_id'] == $account['account_default_channel']) ? "1" : '');
				$channels[$x]['default_links'] = '1';

				/* this is not currently implemented in the UI and probably should not (performance)
				$c = q("SELECT id, item_wall FROM item
					WHERE item_unseen = 1 and uid = %d " . item_normal(),
					intval($channels[$x]['channel_id'])
				);

				if($c) {
					foreach ($c as $it) {
						if(intval($it['item_wall']))
							$channels[$x]['home'] ++;
						else
							$channels[$x]['network'] ++;
					}
				}
				*/

				$intr = q("SELECT COUNT(abook.abook_id) AS total FROM abook left join xchan on abook.abook_xchan = xchan.xchan_hash where abook_channel = %d and abook_pending = 1 and abook_self = 0 and abook_ignored = 0 and xchan_deleted = 0 and xchan_orphan = 0 ",
					intval($channels[$x]['channel_id'])
				);

				if($intr)
					$channels[$x]['intros'] = intval($intr[0]['total']);

				/* this is not currently implemented in the UI and probably should not (performance)
				$events = q("SELECT etype, dtstart, adjust FROM event
					WHERE event.uid = %d AND dtstart < '%s' AND dtstart > '%s' and dismissed = 0
					ORDER BY dtstart ASC ",
					intval($channels[$x]['channel_id']),
					dbesc(datetime_convert('UTC', date_default_timezone_get(), 'now + 7 days')),
					dbesc(datetime_convert('UTC', date_default_timezone_get(), 'now - 1 days'))
				);

				if($events) {
					$channels[$x]['all_events'] = count($events);

					if($channels[$x]['all_events']) {
						$str_now = datetime_convert('UTC', date_default_timezone_get(), 'now', 'Y-m-d');
						foreach($events as $e) {
							$bd = false;
							if($e['etype'] === 'birthday') {
								$channels[$x]['birthdays'] ++;
								$bd = true;
							}
							else {
								$channels[$x]['events'] ++;
							}
							if(datetime_convert('UTC', ((intval($e['adjust'])) ? date_default_timezone_get() : 'UTC'), $e['dtstart'], 'Y-m-d') === $str_now) {
								$channels[$x]['all_events_today'] ++;
								if($bd)
									$channels[$x]['birthdays_today'] ++;
								else
									$channels[$x]['events_today'] ++;
							}
						}
					}
				}
				*/
			}

		}

		$r = q("select count(channel_id) as total from channel where channel_account_id = %d and channel_removed = 0",
			intval(get_account_id())
		);
		$limit = account_service_class_fetch(get_account_id(),'total_identities');
		if($limit !== false) {
			$channel_usage_message = sprintf( t("You have created %1$.0f of %2$.0f allowed channels."), $r[0]['total'], $limit);
		}
		else {
			$channel_usage_message = '';
	 	}


		$create = array( 'new_channel', t('Create a new channel'), t('Create New'));

		$delegates = null;

		if(local_channel()) {
			$delegates = q("select * from abook left join xchan on abook_xchan = xchan_hash where
				abook_channel = %d and abook_xchan in ( select xchan from abconfig where chan = %d and cat = 'their_perms' and k = 'delegate' and v = '1' )",
				intval(local_channel()),
				intval(local_channel())
			);
		}

		if($delegates) {
			for($x = 0; $x < count($delegates); $x ++) {
				$delegates[$x]['link'] = 'magic?f=&bdest=' . bin2hex($delegates[$x]['xchan_url'] . '?zid=' . get_my_address() . '&delegate=' . urlencode($delegates[$x]['xchan_addr']))
				. '&delegate=' . urlencode($delegates[$x]['xchan_addr']);
				$delegates[$x]['channel_name'] = $delegates[$x]['xchan_name'];
				$delegates[$x]['delegate'] = 1;
			}
		}
		else {
			$delegates = null;
		}

		$o = replace_macros(get_markup_template('channels.tpl'), array(
			'$header'           => t('Channels'),
			'$msg_selected'     => t('Current Channel'),
			'$selected'         => local_channel(),
			'$desc'             => ((count($channels) > 1 || $delegates) ? t('Switch to one of your channels by selecting it.') : ''),
			'$msg_default'      => t('Default Channel'),
			'$msg_make_default' => t('Make Default'),
			'$create'           => $create,
			'$all_channels'     => $channels,
			'$intros_format'    => t('%d new introductions'),
			'$channel_usage_message' => $channel_usage_message,
			'$delegated_desc'   => t('Delegated Channel'),
			'$delegates'        => $delegates
		));

		return $o;

	}

}