streams/Zotlabs/Module/Manage.php

<?php
namespace Zotlabs\Module;

use App;
use Zotlabs\Web\Controller;
use Zotlabs\Lib\PConfig;

require_once('include/security.php');

class Manage extends Controller {

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

		nav_set_selected('Manage');
	
	
		$change_channel = ((argc() > 1) ? intval(argv(1)) : 0);
	
		if (argc() > 2) {
			if (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');
			}
			elseif (argv(2) === 'menu') {
				$state = intval(PConfig::get($change_channel,'system','include_in_menu', 0));
				PConfig::set($change_channel,'system','include_in_menu',1 - $state);
				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
			}
			elseif ($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 = ((is_site_admin()) ? array_merge ([ get_sys_channel() ], $r) : $r);
			for ($x = 0; $x < count($channels); $x ++) {
				$channels[$x]['link'] = 'manage/' . intval($channels[$x]['channel_id']);
				$channels[$x]['include_in_menu'] = intval(PConfig::get($channels[$x]['channel_id'],'system','include_in_menu',0));
				$channels[$x]['default'] = (($channels[$x]['channel_id'] == $account['account_default_channel']) ? "1" : ''); 
				$channels[$x]['default_links'] = '1';
				$channels[$x]['collections_label'] = t('Collection');	
				$channels[$x]['forum_label'] = t('Group');	
	
				$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']);
				}
	
				$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 = [ '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 = 'system' and k = 'their_perms' and v like '%s' )",
				intval(local_channel()),
				intval(local_channel()),
				dbesc('%delegate%')
			);
		}
	
		if ($delegates) {
			for ($x = 0; $x < count($delegates); $x ++) {
				$delegates[$x]['link'] = 'magic?f=&bdest=' . bin2hex($delegates[$x]['xchan_url']) 
				. '&delegate=' . urlencode($delegates[$x]['xchan_addr']);
				$delegates[$x]['channel_name'] = $delegates[$x]['xchan_name'];
				$delegates[$x]['delegate'] = 1;
				$delegates[$x]['collections_label'] = t('Collection');	
				$delegates[$x]['forum_label'] = t('Group');	

			}
		}
		else {
			$delegates = null;
		}
	
		return replace_macros(get_markup_template('channels.tpl'), [
			'$header'           => t('Channels'),
			'$msg_selected'     => t('Current Channel'),
			'$selected'         => local_channel(),
			'$desc'             => t('Switch to one of your channels by selecting it.'),
			'$msg_default'      => t('Default Login Channel'),
			'$msg_make_default' => t('Make Default'),
			'$msg_include'      => t('Add to menu'),
			'$msg_no_include'    => t('Add to menu'),
			'$create'           => $create,
			'$all_channels'     => $channels,
			'$mail_format'      => t('%d new messages'),
			'$intros_format'    => t('%d new introductions'),
			'$channel_usage_message' => $channel_usage_message,
			'$delegated_desc'   => t('Delegated Channel'),
			'$delegates'        => $delegates
		]);	
	}
	
}