<?php
namespace Zotlabs\Module; /** @file */

require_once('include/zot.php');
require_once('include/security.php');

class Settings extends \Zotlabs\Web\Controller {

	function init() {
		if(! local_channel())
			return;
	
		if($_SESSION['delegate'])
			return;
	
		\App::$profile_uid = local_channel();
	
		// default is channel settings in the absence of other arguments
	
		if(argc() == 1) {
			// We are setting these values - don't use the argc(), argv() functions here
			\App::$argc = 2;
			\App::$argv[] = 'channel';
		}	
	}
	
	
	function post() {
	
		if(! local_channel())
			return;
	
		if($_SESSION['delegate'])
			return;
	
		$channel = \App::get_channel();
	
		// logger('mod_settings: ' . print_r($_REQUEST,true));
	
	
		if((argc() > 1) && (argv(1) === 'oauth') && x($_POST,'remove')){
			check_form_security_token_redirectOnErr('/settings/oauth', 'settings_oauth');
			
			$key = $_POST['remove'];
			q("DELETE FROM tokens WHERE id='%s' AND uid=%d",
				dbesc($key),
				local_channel());
			goaway(z_root()."/settings/oauth/");
			return;			
		}
	
		if((argc() > 2) && (argv(1) === 'oauth')  && (argv(2) === 'edit'||(argv(2) === 'add')) && x($_POST,'submit')) {
			
			check_form_security_token_redirectOnErr('/settings/oauth', 'settings_oauth');
			
			$name   	= ((x($_POST,'name')) ? $_POST['name'] : '');
			$key		= ((x($_POST,'key')) ? $_POST['key'] : '');
			$secret		= ((x($_POST,'secret')) ? $_POST['secret'] : '');
			$redirect	= ((x($_POST,'redirect')) ? $_POST['redirect'] : '');
			$icon		= ((x($_POST,'icon')) ? $_POST['icon'] : '');
			$ok = true;
			if($name == '') {
				$ok = false;
				notice( t('Name is required') . EOL);
			}
			if($key == '' || $secret == '') {
				$ok = false;
				notice( t('Key and Secret are required') . EOL);
			}
		
			if($ok) {
				if ($_POST['submit']==t("Update")){
					$r = q("UPDATE clients SET
								client_id='%s',
								pw='%s',
								clname='%s',
								redirect_uri='%s',
								icon='%s',
								uid=%d
							WHERE client_id='%s'",
							dbesc($key),
							dbesc($secret),
							dbesc($name),
							dbesc($redirect),
							dbesc($icon),
							intval(local_channel()),
							dbesc($key));
				} else {
					$r = q("INSERT INTO clients (client_id, pw, clname, redirect_uri, icon, uid)
						VALUES ('%s','%s','%s','%s','%s',%d)",
						dbesc($key),
						dbesc($secret),
						dbesc($name),
						dbesc($redirect),
						dbesc($icon),
						intval(local_channel())
					);
					$r = q("INSERT INTO xperm (xp_client, xp_channel, xp_perm) VALUES ('%s', %d, '%s') ",
						dbesc($key),
						intval(local_channel()),
						dbesc('all')
					);
				}
			}
			goaway(z_root()."/settings/oauth/");
			return;
		}
	
		if((argc() > 1) && (argv(1) == 'featured')) {
			check_form_security_token_redirectOnErr('/settings/featured', 'settings_featured');
	
			call_hooks('feature_settings_post', $_POST);
	
			build_sync_packet();
			return;
		}


		if((argc() > 1) && (argv(1) == 'tokens')) {
			check_form_security_token_redirectOnErr('/settings/tokens', 'settings_tokens');
			$token_errs = 0;
			if(array_key_exists('token',$_POST)) {
				$atoken_id = (($_POST['atoken_id']) ? intval($_POST['atoken_id']) : 0);
				$name = trim(escape_tags($_POST['name']));
				$token = trim($_POST['token']);
				if((! $name) || (! $token))
						$token_errs ++;
				if(trim($_POST['expires']))
					$expires = datetime_convert(date_default_timezone_get(),'UTC',$_POST['expires']);
				else
					$expires = NULL_DATE;
				$max_atokens = service_class_fetch(local_channel(),'access_tokens');
				if($max_atokens) {
					$r = q("select count(atoken_id) as total where atoken_uid = %d",
						intval(local_channel())
					);
					if($r && intval($r[0]['total']) >= $max_tokens) {
						notice( sprintf( t('This channel is limited to %d tokens'), $max_tokens) . EOL);
						return;
					}
				}
			}
			if($token_errs) {
				notice( t('Name and Password are required.') . EOL);
				return;
			}
			if($atoken_id) {
				$r = q("update atoken set atoken_name = '%s', atoken_token = '%s', atoken_expires = '%s' 
					where atoken_id = %d and atoken_uid = %d",
					dbesc($name),
					dbesc($token),
					dbesc($expires),
					intval($atoken_id),
					intval($channel['channel_id'])
				);
			}
			else {
				$r = q("insert into atoken ( atoken_aid, atoken_uid, atoken_name, atoken_token, atoken_expires )
					values ( %d, %d, '%s', '%s', '%s' ) ",
					intval($channel['channel_account_id']),
					intval($channel['channel_id']),
					dbesc($name),
					dbesc($token),
					dbesc($expires)
				);
			}

			$atoken_xchan = substr($channel['channel_hash'],0,16) . '.' . $name;

			$all_perms = \Zotlabs\Access\Permissions::Perms();

			if($all_perms) {
				foreach($all_perms as $perm => $desc) {
					if(array_key_exists('perms_' . $perm, $_POST)) {
						set_abconfig($channel['channel_id'],$atoken_xchan,'my_perms',$perm,intval($_POST['perms_' . $perm]));
					}
					else {
						set_abconfig($channel['channel_id'],$atoken_xchan,'my_perms',$perm,0);
					}
				}
			}
		

			info( t('Token saved.') . EOL);
			return;
		}
	
	
		if((argc() > 1) && (argv(1) === 'features')) {
			check_form_security_token_redirectOnErr('/settings/features', 'settings_features');
	
			// Build list of features and check which are set
			// We will not create any settings for features that are above our techlevel

			$features = get_features();
			$all_features = array();
			foreach($features as $k => $v) {
				foreach($v as $f) 
					$all_features[] = $f[0];
			}
			foreach($all_features as $k) {
				if(x($_POST,"feature_$k"))
					set_pconfig(local_channel(),'feature',$k, 1);
				else
					set_pconfig(local_channel(),'feature',$k, 0);
			}
			build_sync_packet();
			return;
		}
	
		if((argc() > 1) && (argv(1) == 'display')) {
			
			check_form_security_token_redirectOnErr('/settings/display', 'settings_display');

			$themespec = explode(':', \App::$channel['channel_theme']);
			$existing_theme  = $themespec[0];
			$existing_schema = $themespec[1];

			$theme             = ((x($_POST,'theme')) ? notags(trim($_POST['theme']))  : $existing_theme);

			if(! $theme)
				$theme = 'redbasic';

			$mobile_theme      = ((x($_POST,'mobile_theme')) ? notags(trim($_POST['mobile_theme']))  : '');
			$preload_images    = ((x($_POST,'preload_images')) ? intval($_POST['preload_images'])  : 0);
			$user_scalable     = ((x($_POST,'user_scalable')) ? intval($_POST['user_scalable'])  : 0);
			$nosmile           = ((x($_POST,'nosmile')) ? intval($_POST['nosmile'])  : 0); 
			$title_tosource    = ((x($_POST,'title_tosource')) ? intval($_POST['title_tosource'])  : 0);		 
			$channel_list_mode = ((x($_POST,'channel_list_mode')) ? intval($_POST['channel_list_mode']) : 0);
			$network_list_mode = ((x($_POST,'network_list_mode')) ? intval($_POST['network_list_mode']) : 0);
	
			$channel_divmore_height = ((x($_POST,'channel_divmore_height')) ? intval($_POST['channel_divmore_height']) : 400);
			if($channel_divmore_height < 50)
				$channel_divmore_height = 50;
			$network_divmore_height = ((x($_POST,'network_divmore_height')) ? intval($_POST['network_divmore_height']) : 400);
			if($network_divmore_height < 50)
				$network_divmore_height = 50;
	
			$browser_update   = ((x($_POST,'browser_update')) ? intval($_POST['browser_update']) : 0);
			$browser_update   = $browser_update * 1000;
			if($browser_update < 10000)
				$browser_update = 10000;
	
			$itemspage   = ((x($_POST,'itemspage')) ? intval($_POST['itemspage']) : 20);
			if($itemspage > 100)
				$itemspage = 100;
		
			if ($mobile_theme == "---") 
				del_pconfig(local_channel(),'system','mobile_theme');
			else {
				set_pconfig(local_channel(),'system','mobile_theme',$mobile_theme);
			}
	
			set_pconfig(local_channel(),'system','preload_images',$preload_images);
			set_pconfig(local_channel(),'system','user_scalable',$user_scalable);
			set_pconfig(local_channel(),'system','update_interval', $browser_update);
			set_pconfig(local_channel(),'system','itemspage', $itemspage);
			set_pconfig(local_channel(),'system','no_smilies',1-intval($nosmile));
			set_pconfig(local_channel(),'system','title_tosource',$title_tosource);
			set_pconfig(local_channel(),'system','channel_list_mode', $channel_list_mode);
			set_pconfig(local_channel(),'system','network_list_mode', $network_list_mode);
			set_pconfig(local_channel(),'system','channel_divmore_height', $channel_divmore_height);
			set_pconfig(local_channel(),'system','network_divmore_height', $network_divmore_height);
	
			$newschema = '';
			if($theme == $existing_theme){
				// call theme_post only if theme has not been changed
				if( ($themeconfigfile = $this->get_theme_config_file($theme)) != null){
					require_once($themeconfigfile);
					if(class_exists(ucfirst($theme) . 'Config')) {
						$clsname = ucfirst($theme) . 'Config';
						$theme_config = new $clsname();
						$schemas = $theme_config->get_schemas();
						if(array_key_exists($_POST['schema'],$schemas))
							$newschema = $_POST['schema'];
						if($newschema === '---')
							$newschema = '';	
					}

					theme_post($a);
				}
			}

			logger('theme: ' . $theme . (($newschema) ? ':' . $newschema : ''));

			$_SESSION['theme'] = $theme . (($newschema) ? ':' . $newschema : '');
	
			$r = q("UPDATE channel SET channel_theme = '%s' WHERE channel_id = %d",
					dbesc($theme . (($newschema) ? ':' . $newschema : '')),
					intval(local_channel())
			);
		
			call_hooks('display_settings_post', $_POST);
			build_sync_packet();
			goaway(z_root() . '/settings/display' );
			return; // NOTREACHED
		}
	
	
		if(argc() > 1 && argv(1) === 'account') {
	
			check_form_security_token_redirectOnErr('/settings/account', 'settings_account');
		
			call_hooks('account_settings_post', $_POST);
	//		call_hooks('settings_account', $_POST);
	
			$errs = array();
	
			$email = ((x($_POST,'email')) ? trim(notags($_POST['email'])) : '');
			$techlevel = ((array_key_exists('techlevel',$_POST)) ? intval($_POST['techlevel']) : 0);

			$account = \App::get_account();
			if($email != $account['account_email']) {
				if(! valid_email($email))
					$errs[] = t('Not valid email.');
				$adm = trim(get_config('system','admin_email'));
				if(($adm) && (strcasecmp($email,$adm) == 0)) {
					$errs[] = t('Protected email address. Cannot change to that email.');
					$email = \App::$user['email'];
				}
				if(! $errs) {
					$r = q("update account set account_email = '%s' where account_id = %d",
						dbesc($email),
						intval($account['account_id'])
					);
					if(! $r)
						$errs[] = t('System failure storing new email. Please try again.');
				}
			}
			if($techlevel != $account['account_level']) {
				$r = q("update account set account_level = %d where account_id = %d",
					intval($techlevel),
					intval($account['account_id'])
				);
				info( t('Technical skill level updated') . EOL);
			}
	
			if($errs) {
				foreach($errs as $err)
					notice($err . EOL);
				$errs = array();
			}
	
	
			if((x($_POST,'npassword')) || (x($_POST,'confirm'))) {
	
				$origpass = trim($_POST['origpass']);
	
				require_once('include/auth.php');
				if(! account_verify_password($email,$origpass)) {
					$errs[] = t('Password verification failed.');
				}
	
				$newpass = trim($_POST['npassword']);
				$confirm = trim($_POST['confirm']);
	
				if($newpass != $confirm ) {
					$errs[] = t('Passwords do not match. Password unchanged.');
				}
	
				if((! x($newpass)) || (! x($confirm))) {
					$errs[] = t('Empty passwords are not allowed. Password unchanged.');
				}
	
				if(! $errs) {
					$salt = random_string(32);
					$password_encoded = hash('whirlpool', $salt . $newpass);
					$r = q("update account set account_salt = '%s', account_password = '%s', account_password_changed = '%s' 
						where account_id = %d",
						dbesc($salt),
						dbesc($password_encoded),
						dbesc(datetime_convert()),
						intval(get_account_id())
					);
					if($r)
						info( t('Password changed.') . EOL);
					else
						$errs[] = t('Password update failed. Please try again.');
				}
			}
	
	
			if($errs) {
				foreach($errs as $err)
					notice($err . EOL);
			}
			goaway(z_root() . '/settings/account' );
		}
	
	
		check_form_security_token_redirectOnErr('/settings', 'settings');
		
		call_hooks('settings_post', $_POST);
	
		$set_perms = '';
	
		$role = ((x($_POST,'permissions_role')) ? notags(trim($_POST['permissions_role'])) : '');
		$oldrole = get_pconfig(local_channel(),'system','permissions_role');
	
		if(($role != $oldrole) || ($role === 'custom')) {
	
			if($role === 'custom') {
				$hide_presence    = (((x($_POST,'hide_presence')) && (intval($_POST['hide_presence']) == 1)) ? 1: 0);
				$publish          = (((x($_POST,'profile_in_directory')) && (intval($_POST['profile_in_directory']) == 1)) ? 1: 0);
				$def_group        = ((x($_POST,'group-selection')) ? notags(trim($_POST['group-selection'])) : '');
				$r = q("update channel set channel_default_group = '%s' where channel_id = %d",
					dbesc($def_group),
					intval(local_channel())
				);	
	
				$global_perms = \Zotlabs\Access\Permissions::Perms();
	
				foreach($global_perms as $k => $v) {
					\Zotlabs\Access\PermissionLimits::Set(local_channel(),$k,intval($_POST[$k]));
				}
				$acl = new \Zotlabs\Access\AccessList($channel);
				$acl->set_from_array($_POST);
				$x = $acl->get();
	
				$r = q("update channel set channel_allow_cid = '%s', channel_allow_gid = '%s', 
					channel_deny_cid = '%s', channel_deny_gid = '%s' where channel_id = %d",
					dbesc($x['allow_cid']),
					dbesc($x['allow_gid']),
					dbesc($x['deny_cid']),
					dbesc($x['deny_gid']),
					intval(local_channel())
				);
			}
			else {
			   	$role_permissions = \Zotlabs\Access\PermissionRoles::role_perms($_POST['permissions_role']);
				if(! $role_permissions) {
					notice('Permissions category could not be found.');
					return;
				}
				$hide_presence    = 1 - (intval($role_permissions['online']));
				if($role_permissions['default_collection']) {
					$r = q("select hash from groups where uid = %d and gname = '%s' limit 1",
						intval(local_channel()),
						dbesc( t('Friends') )
					);
					if(! $r) {
						require_once('include/group.php');
						group_add(local_channel(), t('Friends'));
						group_add_member(local_channel(),t('Friends'),$channel['channel_hash']);
						$r = q("select hash from groups where uid = %d and gname = '%s' limit 1",
							intval(local_channel()),
							dbesc( t('Friends') )
						);
					}
					if($r) {
						q("update channel set channel_default_group = '%s', channel_allow_gid = '%s', channel_allow_cid = '', channel_deny_gid = '', channel_deny_cid = '' where channel_id = %d",
							dbesc($r[0]['hash']),
							dbesc('<' . $r[0]['hash'] . '>'),
							intval(local_channel())
						);
					}
					else {
						notice( sprintf('Default privacy group \'%s\' not found. Please create and re-submit permission change.', t('Friends')) . EOL);
						return;
					}
				}
				// no default collection
				else {
					q("update channel set channel_default_group = '', channel_allow_gid = '', channel_allow_cid = '', channel_deny_gid = '', 
						channel_deny_cid = '' where channel_id = %d",
							intval(local_channel())
					);
				}
	
				$x = \Zotlabs\Access\Permissions::FilledPerms($role_permissions['perms_connect']);
				foreach($x as $k => $v) {
					set_abconfig(local_channel(),$channel['channel_hash'],'my_perms',$k, $v);
					if($role_permissions['perms_auto']) {
						set_pconfig(local_channel(),'autoperms',$k,$v);
					}
					else {
						del_pconfig(local_channel(),'autoperms',$k);
					}
				}	

				if($role_permissions['limits']) {
					foreach($role_permissions['limits'] as $k => $v) {
						\Zotlabs\Access\PermissionLimits::Set(local_channel(),$k,$v);
					}
				}
				if(array_key_exists('directory_publish',$role_permissions)) {
					$publish = intval($role_permissions['directory_publish']);
				}
			}
	
			set_pconfig(local_channel(),'system','hide_online_status',$hide_presence);
			set_pconfig(local_channel(),'system','permissions_role',$role);
		}
	
		$username         = ((x($_POST,'username'))   ? notags(trim($_POST['username']))     : '');
		$timezone         = ((x($_POST,'timezone_select'))   ? notags(trim($_POST['timezone_select']))     : '');
		$defloc           = ((x($_POST,'defloc'))     ? notags(trim($_POST['defloc']))       : '');
		$openid           = ((x($_POST,'openid_url')) ? notags(trim($_POST['openid_url']))   : '');
		$maxreq           = ((x($_POST,'maxreq'))     ? intval($_POST['maxreq'])             : 0);
		$expire           = ((x($_POST,'expire'))     ? intval($_POST['expire'])             : 0);
		$evdays           = ((x($_POST,'evdays'))     ? intval($_POST['evdays'])             : 3);
		$photo_path       = ((x($_POST,'photo_path')) ? escape_tags(trim($_POST['photo_path'])) : '');
		$attach_path      = ((x($_POST,'attach_path')) ? escape_tags(trim($_POST['attach_path'])) : '');
	
		$channel_menu     = ((x($_POST['channel_menu'])) ? htmlspecialchars_decode(trim($_POST['channel_menu']),ENT_QUOTES) : '');
	
		$expire_items     = ((x($_POST,'expire_items')) ? intval($_POST['expire_items'])	 : 0);
		$expire_starred   = ((x($_POST,'expire_starred')) ? intval($_POST['expire_starred']) : 0);
		$expire_photos    = ((x($_POST,'expire_photos'))? intval($_POST['expire_photos'])	 : 0);
		$expire_network_only    = ((x($_POST,'expire_network_only'))? intval($_POST['expire_network_only'])	 : 0);
	
		$allow_location   = (((x($_POST,'allow_location')) && (intval($_POST['allow_location']) == 1)) ? 1: 0);
	
		$blocktags        = (((x($_POST,'blocktags')) && (intval($_POST['blocktags']) == 1)) ? 0: 1); // this setting is inverted!
		$unkmail          = (((x($_POST,'unkmail')) && (intval($_POST['unkmail']) == 1)) ? 1: 0);
		$cntunkmail       = ((x($_POST,'cntunkmail')) ? intval($_POST['cntunkmail']) : 0);
		$suggestme        = ((x($_POST,'suggestme')) ? intval($_POST['suggestme'])  : 0);  
	
		$post_newfriend   = (($_POST['post_newfriend'] == 1) ? 1: 0);
		$post_joingroup   = (($_POST['post_joingroup'] == 1) ? 1: 0);
		$post_profilechange   = (($_POST['post_profilechange'] == 1) ? 1: 0);
		$adult            = (($_POST['adult'] == 1) ? 1 : 0);
	
		$cal_first_day   = (((x($_POST,'first_day')) && (intval($_POST['first_day']) == 1)) ? 1: 0);
	
		$channel = \App::get_channel();
		$pageflags = $channel['channel_pageflags'];
		$existing_adult = (($pageflags & PAGE_ADULT) ? 1 : 0);
		if($adult != $existing_adult)
			$pageflags = ($pageflags ^ PAGE_ADULT);
	
	
		$notify = 0;
	
		if(x($_POST,'notify1'))
			$notify += intval($_POST['notify1']);
		if(x($_POST,'notify2'))
			$notify += intval($_POST['notify2']);
		if(x($_POST,'notify3'))
			$notify += intval($_POST['notify3']);
		if(x($_POST,'notify4'))
			$notify += intval($_POST['notify4']);
		if(x($_POST,'notify5'))
			$notify += intval($_POST['notify5']);
		if(x($_POST,'notify6'))
			$notify += intval($_POST['notify6']);
		if(x($_POST,'notify7'))
			$notify += intval($_POST['notify7']);
		if(x($_POST,'notify8'))
			$notify += intval($_POST['notify8']);
	
	
		$vnotify = 0;
	
		if(x($_POST,'vnotify1'))
			$vnotify += intval($_POST['vnotify1']);
		if(x($_POST,'vnotify2'))
			$vnotify += intval($_POST['vnotify2']);
		if(x($_POST,'vnotify3'))
			$vnotify += intval($_POST['vnotify3']);
		if(x($_POST,'vnotify4'))
			$vnotify += intval($_POST['vnotify4']);
		if(x($_POST,'vnotify5'))
			$vnotify += intval($_POST['vnotify5']);
		if(x($_POST,'vnotify6'))
			$vnotify += intval($_POST['vnotify6']);
		if(x($_POST,'vnotify7'))
			$vnotify += intval($_POST['vnotify7']);
		if(x($_POST,'vnotify8'))
			$vnotify += intval($_POST['vnotify8']);
		if(x($_POST,'vnotify9'))
			$vnotify += intval($_POST['vnotify9']);
		if(x($_POST,'vnotify10'))
			$vnotify += intval($_POST['vnotify10']);
		if(x($_POST,'vnotify11'))
			$vnotify += intval($_POST['vnotify11']);
	
		$always_show_in_notices = x($_POST,'always_show_in_notices') ? 1 : 0;
	
		$channel = \App::get_channel();
	
		$err = '';
	
		$name_change = false;
	
		if($username != $channel['channel_name']) {
			$name_change = true;
			require_once('include/channel.php');
			$err = validate_channelname($username);
			if($err) {
				notice($err);
				return;
			}
		}
	
		if($timezone != $channel['channel_timezone']) {
			if(strlen($timezone))
				date_default_timezone_set($timezone);
		}
	
		set_pconfig(local_channel(),'system','use_browser_location',$allow_location);
		set_pconfig(local_channel(),'system','suggestme', $suggestme);
		set_pconfig(local_channel(),'system','post_newfriend', $post_newfriend);
		set_pconfig(local_channel(),'system','post_joingroup', $post_joingroup);
		set_pconfig(local_channel(),'system','post_profilechange', $post_profilechange);
		set_pconfig(local_channel(),'system','blocktags',$blocktags);
		set_pconfig(local_channel(),'system','channel_menu',$channel_menu);
		set_pconfig(local_channel(),'system','vnotify',$vnotify);
		set_pconfig(local_channel(),'system','always_show_in_notices',$always_show_in_notices);
		set_pconfig(local_channel(),'system','evdays',$evdays);
		set_pconfig(local_channel(),'system','photo_path',$photo_path);
		set_pconfig(local_channel(),'system','attach_path',$attach_path);
		set_pconfig(local_channel(),'system','cal_first_day',$cal_first_day);
	
		$r = q("update channel set channel_name = '%s', channel_pageflags = %d, channel_timezone = '%s', channel_location = '%s', channel_notifyflags = %d, channel_max_anon_mail = %d, channel_max_friend_req = %d, channel_expire_days = %d $set_perms where channel_id = %d",
			dbesc($username),
			intval($pageflags),
			dbesc($timezone),
			dbesc($defloc),
			intval($notify),
			intval($unkmail),
			intval($maxreq),
			intval($expire),
			intval(local_channel())
		);   
		if($r)
			info( t('Settings updated.') . EOL);
	
		if(! is_null($publish)) {
			$r = q("UPDATE profile SET publish = %d WHERE is_default = 1 AND uid = %d",
				intval($publish),
				intval(local_channel())
			);
		}
	
		if($name_change) {
			$r = q("update xchan set xchan_name = '%s', xchan_name_date = '%s' where xchan_hash = '%s'",
				dbesc($username),
				dbesc(datetime_convert()),
				dbesc($channel['channel_hash'])
			);
			$r = q("update profile set fullname = '%s' where uid = %d and is_default = 1",
				dbesc($username),
				intval($channel['channel_id'])
			);
		}
	
		\Zotlabs\Daemon\Master::Summon(array('Directory',local_channel()));
	
		build_sync_packet();
	
	
		if($email_changed && \App::$config['system']['register_policy'] == REGISTER_VERIFY) {
	
			// FIXME - set to un-verified, blocked and redirect to logout
			// Why? Are we verifying people or email addresses?
	
		}
	
		goaway(z_root() . '/settings' );
		return; // NOTREACHED
	}
			
	
	function get() {
	
		$o = '';
		nav_set_selected('settings');
	
	
		if((! local_channel()) || ($_SESSION['delegate'])) {
			notice( t('Permission denied.') . EOL );
			return login();
		}
	
	
		$channel = \App::get_channel();
		if($channel)
			head_set_icon($channel['xchan_photo_s']);
	
		$yes_no = array(t('No'),t('Yes'));
			
		if((argc() > 1) && (argv(1) === 'oauth')) {
			
			if((argc() > 2) && (argv(2) === 'add')) {
				$tpl = get_markup_template("settings_oauth_edit.tpl");
				$o .= replace_macros($tpl, array(
					'$form_security_token' => get_form_security_token("settings_oauth"),
					'$title'	=> t('Add application'),
					'$submit'	=> t('Submit'),
					'$cancel'	=> t('Cancel'),
					'$name'		=> array('name', t('Name'), '', t('Name of application')),
					'$key'		=> array('key', t('Consumer Key'), random_string(16), t('Automatically generated - change if desired. Max length 20')),
					'$secret'	=> array('secret', t('Consumer Secret'), random_string(16), t('Automatically generated - change if desired. Max length 20')),
					'$redirect'	=> array('redirect', t('Redirect'), '', t('Redirect URI - leave blank unless your application specifically requires this')),
					'$icon'		=> array('icon', t('Icon url'), '', t('Optional')),
				));
				return $o;
			}
			
			if((argc() > 3) && (argv(2) === 'edit')) {
				$r = q("SELECT * FROM clients WHERE client_id='%s' AND uid=%d",
						dbesc(argv(3)),
						local_channel());
				
				if (!count($r)){
					notice(t('Application not found.'));
					return;
				}
				$app = $r[0];
				
				$tpl = get_markup_template("settings_oauth_edit.tpl");
				$o .= replace_macros($tpl, array(
					'$form_security_token' => get_form_security_token("settings_oauth"),
					'$title'	=> t('Add application'),
					'$submit'	=> t('Update'),
					'$cancel'	=> t('Cancel'),
					'$name'		=> array('name', t('Name'), $app['clname'] , ''),
					'$key'		=> array('key', t('Consumer Key'), $app['client_id'], ''),
					'$secret'	=> array('secret', t('Consumer Secret'), $app['pw'], ''),
					'$redirect'	=> array('redirect', t('Redirect'), $app['redirect_uri'], ''),
					'$icon'		=> array('icon', t('Icon url'), $app['icon'], ''),
				));
				return $o;
			}
			
			if((argc() > 3) && (argv(2) === 'delete')) {
				check_form_security_token_redirectOnErr('/settings/oauth', 'settings_oauth', 't');
			
				$r = q("DELETE FROM clients WHERE client_id='%s' AND uid=%d",
						dbesc(argv(3)),
						local_channel());
				goaway(z_root()."/settings/oauth/");
				return;			
			}
			
			
			$r = q("SELECT clients.*, tokens.id as oauth_token, (clients.uid=%d) AS my 
					FROM clients
					LEFT JOIN tokens ON clients.client_id=tokens.client_id
					WHERE clients.uid IN (%d,0)",
					local_channel(),
					local_channel());
			
			
			$tpl = get_markup_template("settings_oauth.tpl");
			$o .= replace_macros($tpl, array(
				'$form_security_token' => get_form_security_token("settings_oauth"),
				'$baseurl'	=> z_root(),
				'$title'	=> t('Connected Apps'),
				'$add'		=> t('Add application'),
				'$edit'		=> t('Edit'),
				'$delete'		=> t('Delete'),
				'$consumerkey' => t('Client key starts with'),
				'$noname'	=> t('No name'),
				'$remove'	=> t('Remove authorization'),
				'$apps'		=> $r,
			));
			return $o;
			
		}
		if((argc() > 1) && (argv(1) === 'featured')) {
			$settings_addons = "";
	
			$o = '';
			
			$r = q("SELECT * FROM `hook` WHERE `hook` = 'feature_settings' ");
			if(! $r)
				$settings_addons = t('No feature settings configured');
	
			call_hooks('feature_settings', $settings_addons);
					
			$tpl = get_markup_template("settings_addons.tpl");
			$o .= replace_macros($tpl, array(
				'$form_security_token' => get_form_security_token("settings_featured"),
				'$title'	=> t('Feature/Addon Settings'),
				'$settings_addons' => $settings_addons
			));
			return $o;
		}
	
	
		/*
		 * ACCOUNT SETTINGS
		 */
	
	
		if((argc() > 1) && (argv(1) === 'account')) {
			$account_settings = "";
			
			call_hooks('account_settings', $account_settings);
	
			$email      = \App::$account['account_email'];

			$techlevels = [
				'0' => t('Beginner/Basic'),
				'1' => t('Novice - not skilled but willing to learn'),
				'2' => t('Intermediate - somewhat comfortable'),
				'3' => t('Advanced - very comfortable'),
				'4' => t('Expert - I can write computer code'),			
				'5' => t('Wizard - I probably know more than you do')
			];


			$tpl = get_markup_template("settings_account.tpl");
			$o .= replace_macros($tpl, array(
				'$form_security_token' => get_form_security_token("settings_account"),
				'$title'	=> t('Account Settings'),
				'$origpass' => array('origpass', t('Current Password'), ' ',''),
				'$password1'=> array('npassword', t('Enter New Password'), '', ''),
				'$password2'=> array('confirm', t('Confirm New Password'), '', t('Leave password fields blank unless changing')),
				'$techlevel' => [ 'techlevel', t('Your technical skill level'), \App::$account['account_level'], t('Used to provide a member experience matched to your comfort level'), $techlevels ],
				'$submit' 	=> t('Submit'),
				'$email' 	=> array('email', t('Email Address:'), $email, ''),
				'$removeme' => t('Remove Account'),
				'$removeaccount' => t('Remove this account including all its channels'),
				'$account_settings' => $account_settings
			));
			return $o;
		}

		if((argc() > 1) && (argv(1) === 'tokens')) {
			$atoken = null;
			$atoken_xchan = '';

			if(argc() > 2) {
				$id = argv(2);			

				$atoken = q("select * from atoken where atoken_id = %d and atoken_uid = %d",
					intval($id),
					intval(local_channel())
				);

				if($atoken) {
					$atoken = $atoken[0];
					$atoken_xchan = substr($channel['channel_hash'],0,16) . '.' . $atoken['atoken_name'];
				}

				if($atoken && argc() > 3 && argv(3) === 'drop') {
					atoken_delete($id);
					$atoken = null;
					$atoken_xchan = '';
				}
			}

			$t = q("select * from atoken where atoken_uid = %d",
				intval(local_channel())
			);			

			$desc = t('Use this form to create temporary access identifiers to share things with non-members. These identities may be used in Access Control Lists and visitors may login using these credentials to access private content.');

			$desc2 = t('You may also provide <em>dropbox</em> style access links to friends and associates by adding the Login Password to any specific site URL as shown. Examples:');

			$global_perms = \Zotlabs\Access\Permissions::Perms();

			$existing = get_all_perms(local_channel(),(($atoken_xchan) ? $atoken_xchan : ''));

			if($atoken_xchan) {
				$theirs = q("select * from abconfig where chan = %d and xchan = '%s' and cat = 'their_perms'",
					intval(local_channel()),
					dbesc($atoken_xchan)
				);
				$their_perms = array();
				if($theirs) {
					foreach($theirs as $t) {
						$their_perms[$t['k']] = $t['v'];
					}
				}
			}
			foreach($global_perms as $k => $v) {
				$thisperm = get_abconfig(local_channel(),$contact['abook_xchan'],'my_perms',$k);
//fixme

				$checkinherited = \Zotlabs\Access\PermissionLimits::Get(local_channel(),$k);

				if($existing[$k])
					$thisperm = "1";

				$perms[] = array('perms_' . $k, $v, ((array_key_exists($k,$their_perms)) ? intval($their_perms[$k]) : ''),$thisperm, 1, (($checkinherited & PERMS_SPECIFIC) ? '' : '1'), '', $checkinherited);
			}


			$tpl = get_markup_template("settings_tokens.tpl");
			$o .= replace_macros($tpl, array(
				'$form_security_token' => get_form_security_token("settings_tokens"),
				'$title'	=> t('Guest Access Tokens'),
				'$desc'     => $desc,
				'$desc2' => $desc2,
				'$tokens' => $t,
				'$atoken' => $atoken,
				'$url1' => z_root() . '/channel/' . $channel['channel_address'],
				'$url2' => z_root() . '/photos/' . $channel['channel_address'],
				'$name' => array('name', t('Login Name') . ' <span class="required">*</span>', (($atoken) ? $atoken['atoken_name'] : ''),''),
				'$token'=> array('token', t('Login Password') . ' <span class="required">*</span>',(($atoken) ? $atoken['atoken_token'] : autoname(8)), ''),
				'$expires'=> array('expires', t('Expires (yyyy-mm-dd)'), (($atoken['atoken_expires'] && $atoken['atoken_expires'] != NULL_DATE) ? datetime_convert('UTC',date_default_timezone_get(),$atoken['atoken_expires']) : ''), ''),
				'$them' => t('Their Settings'),
				'$me' => t('My Settings'),
				'$perms' => $perms,
				'$inherited' => t('inherited'),
				'$notself' => '1',
				'$permlbl' => t('Individual Permissions'),
				'$permnote'       => t('Some permissions may be inherited from your channel\'s <a href="settings"><strong>privacy settings</strong></a>, which have higher priority than individual settings. You can <strong>not</strong> change those settings here.'),
				'$submit' 	=> t('Submit')
			));
			return $o;
		}


		if((argc() > 1) && (argv(1) === 'features')) {
			$arr = array();
			$features = get_features();
	
			foreach($features as $fname => $fdata) {
				$arr[$fname] = array();
				$arr[$fname][0] = $fdata[0];
				foreach(array_slice($fdata,1) as $f) {
					$arr[$fname][1][] = array('feature_' .$f[0],$f[1],((intval(feature_enabled(local_channel(),$f[0]))) ? "1" : ''),$f[2],array(t('Off'),t('On')));
				}
			}
			
			$tpl = get_markup_template("settings_features.tpl");
			$o .= replace_macros($tpl, array(
				'$form_security_token' => get_form_security_token("settings_features"),
				'$title'	=> t('Additional Features'),
				'$features' => $arr,
				'$submit'   => t('Submit'),
			));
	
			return $o;
		}
	
	
		if((argc() > 1) && (argv(1) === 'connectors')) {
	
			$settings_connectors = "";
			
			call_hooks('connector_settings', $settings_connectors);
	
			$r = null;
	
			$tpl = get_markup_template("settings_connectors.tpl");
	
			$o .= replace_macros($tpl, array(
				'$form_security_token' => get_form_security_token("settings_connectors"),
				'$title'	=> t('Connector Settings'),
				'$submit' => t('Submit'),
				'$settings_connectors' => $settings_connectors
			));
	
			return $o;
		}
	
		/*
		 * DISPLAY SETTINGS
		 */
	
		if((argc() > 1) && (argv(1) === 'display')) {


			$default_theme = get_config('system','theme');
			if(! $default_theme)
				$default_theme = 'redbasic';

			$themespec = explode(':', \App::$channel['channel_theme']);
			$existing_theme  = $themespec[0];
			$existing_schema = $themespec[1];

			$theme = (($existing_theme) ? $existing_theme : $default_theme);

			$default_mobile_theme = get_config('system','mobile_theme');
			if(! $mobile_default_theme)
				$mobile_default_theme = 'none';
	
			$allowed_themes_str = get_config('system','allowed_themes');
			$allowed_themes_raw = explode(',',$allowed_themes_str);
			$allowed_themes = array();
			if(count($allowed_themes_raw))
				foreach($allowed_themes_raw as $x) 
					if(strlen(trim($x)) && is_dir("view/theme/$x"))
						$allowed_themes[] = trim($x);
	
			
			$themes = array();
			$files = glob('view/theme/*');
			if($allowed_themes) {
				foreach($allowed_themes as $th) {
					$f = $th;
					$is_experimental = file_exists('view/theme/' . $th . '/experimental');
					$unsupported = file_exists('view/theme/' . $th . '/unsupported');
					$is_mobile = file_exists('view/theme/' . $th . '/mobile');
					$is_library = file_exists('view/theme/'. $th . '/library');
					$mobile_themes["---"] = t("No special theme for mobile devices");
	
					if (!$is_experimental or ($is_experimental && (get_config('experimentals','exp_themes')==1 or get_config('experimentals','exp_themes')===false))){ 
						$theme_name = (($is_experimental) ?  sprintf(t('%s - (Experimental)'), $f) : $f);
						if (! $is_library) {
							if($is_mobile) {
								$mobile_themes[$f] = $themes[$f] = $theme_name . ' (' . t('mobile') . ')';
							}
							else {
								$mobile_themes[$f] = $themes[$f] = $theme_name;
							}
						}
					}
	
				}
			}

			$theme_selected = ((array_key_exists('theme',$_SESSION) && $_SESSION['theme']) ? $_SESSION['theme'] : $theme);

			$mobile_theme_selected = (!x($_SESSION,'mobile_theme')? $default_mobile_theme : $_SESSION['mobile_theme']);
	
			$preload_images = get_pconfig(local_channel(),'system','preload_images');
			$preload_images = (($preload_images===false)? '0': $preload_images); // default if not set: 0
	
			$user_scalable = get_pconfig(local_channel(),'system','user_scalable');
			$user_scalable = (($user_scalable===false)? '1': $user_scalable); // default if not set: 1
			
			$browser_update = intval(get_pconfig(local_channel(), 'system','update_interval'));
			$browser_update = (($browser_update == 0) ? 80 : $browser_update / 1000); // default if not set: 40 seconds
	
			$itemspage = intval(get_pconfig(local_channel(), 'system','itemspage'));
			$itemspage = (($itemspage > 0 && $itemspage < 101) ? $itemspage : 20); // default if not set: 20 items
			
			$nosmile = get_pconfig(local_channel(),'system','no_smilies');
			$nosmile = (($nosmile===false)? '0': $nosmile); // default if not set: 0
	
			$title_tosource = get_pconfig(local_channel(),'system','title_tosource');
			$title_tosource = (($title_tosource===false)? '0': $title_tosource); // default if not set: 0
	
			$theme_config = "";
			if(($themeconfigfile = $this->get_theme_config_file($theme)) != null){
				require_once($themeconfigfile);
				if(class_exists(ucfirst($theme) . 'Config')) {
					$clsname = ucfirst($theme) . 'Config';
					$theme_config = new $clsname();
					$schemas = $theme_config->get_schemas();
				}
				$theme_config = theme_content($a);
			}

			// logger('schemas: ' . print_r($schemas,true));
			
			$tpl = get_markup_template("settings_display.tpl");
			$o = replace_macros($tpl, array(
				'$ptitle' 	=> t('Display Settings'),
				'$d_tset'       => t('Theme Settings'), 
				'$d_ctset'      => t('Custom Theme Settings'), 
				'$d_cset'       => t('Content Settings'),
				'$form_security_token' => get_form_security_token("settings_display"),
				'$submit' 	=> t('Submit'),
				'$baseurl' => z_root(),
				'$uid' => local_channel(),
			
				'$theme'	=> (($themes) ? array('theme', t('Display Theme:'), $theme_selected, '', $themes, 'preview') : false),
				'$schema'   => (($schemas) ? array('schema', t('Select scheme'), $existing_schema, '' , $schemas) : ''),

				'$mobile_theme' => (($mobile_themes) ? array('mobile_theme', t('Mobile Theme:'), $mobile_theme_selected, '', $mobile_themes, '') : false),
				'$preload_images' => array('preload_images', t("Preload images before rendering the page"), $preload_images, t("The subjective page load time will be longer but the page will be ready when displayed"), $yes_no),
				'$user_scalable' => array('user_scalable', t("Enable user zoom on mobile devices"), $user_scalable, '', $yes_no),
				'$ajaxint'   => array('browser_update',  t("Update browser every xx seconds"), $browser_update, t('Minimum of 10 seconds, no maximum')),
				'$itemspage'   => array('itemspage',  t("Maximum number of conversations to load at any time:"), $itemspage, t('Maximum of 100 items')),
				'$nosmile'	=> array('nosmile', t("Show emoticons (smilies) as images"), 1-intval($nosmile), '', $yes_no),
				'$title_tosource'	=> array('title_tosource', t("Link post titles to source"), $title_tosource, '', $yes_no),
				'$layout_editor' => t('System Page Layout Editor - (advanced)'),
				'$theme_config' => $theme_config,
				'$expert' => feature_enabled(local_channel(),'advanced_theming'),
				'$channel_list_mode' => array('channel_list_mode', t('Use blog/list mode on channel page'), get_pconfig(local_channel(),'system','channel_list_mode'), t('(comments displayed separately)'), $yes_no),
				'$network_list_mode' => array('network_list_mode', t('Use blog/list mode on grid page'), get_pconfig(local_channel(),'system','network_list_mode'), t('(comments displayed separately)'), $yes_no),
				'$channel_divmore_height' => array('channel_divmore_height', t('Channel page max height of content (in pixels)'), ((get_pconfig(local_channel(),'system','channel_divmore_height')) ? get_pconfig(local_channel(),'system','channel_divmore_height') : 400), t('click to expand content exceeding this height')),
				'$network_divmore_height' => array('network_divmore_height', t('Grid page max height of content (in pixels)'), ((get_pconfig(local_channel(),'system','network_divmore_height')) ? get_pconfig(local_channel(),'system','network_divmore_height') : 400) , t('click to expand content exceeding this height')),
	
	
			));

			call_hooks('display_settings',$o);			
			return $o;
		}
			
		if(argv(1) === 'channel') {
	
			require_once('include/acl_selectors.php');
			require_once('include/permissions.php');
	
	
			$p = q("SELECT * FROM `profile` WHERE `is_default` = 1 AND `uid` = %d LIMIT 1",
				intval(local_channel())
			);
			if(count($p))
				$profile = $p[0];
	
			load_pconfig(local_channel(),'expire');
	
			$channel = \App::get_channel();
	
			$global_perms = \Zotlabs\Access\Permissions::Perms();

			$permiss = array();
	
			$perm_opts = array(
				array( t('Nobody except yourself'), 0),
				array( t('Only those you specifically allow'), PERMS_SPECIFIC), 
				array( t('Approved connections'), PERMS_CONTACTS),
				array( t('Any connections'), PERMS_PENDING),
				array( t('Anybody on this website'), PERMS_SITE),
				array( t('Anybody in this network'), PERMS_NETWORK),
				array( t('Anybody authenticated'), PERMS_AUTHED),
				array( t('Anybody on the internet'), PERMS_PUBLIC)
			);
	
			$limits = \Zotlabs\Access\PermissionLimits::Get(local_channel());
	
			foreach($global_perms as $k => $perm) {
				$options = array();
				foreach($perm_opts as $opt) {
					if((! strstr($perm,'view')) && $opt[1] == PERMS_PUBLIC)
						continue;
					$options[$opt[1]] = $opt[0];
				}
				$permiss[] = array($k,$perm,$limits[$k],'',$options);			
			}
	
	
			//logger('permiss: ' . print_r($permiss,true));
	
	
			$username   = $channel['channel_name'];
			$nickname   = $channel['channel_address'];
			$timezone   = $channel['channel_timezone'];
			$notify     = $channel['channel_notifyflags'];
			$defloc     = $channel['channel_location'];
	
			$maxreq     = $channel['channel_max_friend_req'];
			$expire     = $channel['channel_expire_days'];
			$adult_flag = intval($channel['channel_pageflags'] & PAGE_ADULT);
			$sys_expire = get_config('system','default_expire_days');
	
	//		$unkmail    = \App::$user['unkmail'];
	//		$cntunkmail = \App::$user['cntunkmail'];
	
			$hide_presence = intval(get_pconfig(local_channel(), 'system','hide_online_status'));
	
	
			$expire_items = get_pconfig(local_channel(), 'expire','items');
			$expire_items = (($expire_items===false)? '1' : $expire_items); // default if not set: 1
		
			$expire_notes = get_pconfig(local_channel(), 'expire','notes');
			$expire_notes = (($expire_notes===false)? '1' : $expire_notes); // default if not set: 1
	
			$expire_starred = get_pconfig(local_channel(), 'expire','starred');
			$expire_starred = (($expire_starred===false)? '1' : $expire_starred); // default if not set: 1
		
			$expire_photos = get_pconfig(local_channel(), 'expire','photos');
			$expire_photos = (($expire_photos===false)? '0' : $expire_photos); // default if not set: 0
	
			$expire_network_only = get_pconfig(local_channel(), 'expire','network_only');
			$expire_network_only = (($expire_network_only===false)? '0' : $expire_network_only); // default if not set: 0
	
	
			$suggestme = get_pconfig(local_channel(), 'system','suggestme');
			$suggestme = (($suggestme===false)? '0': $suggestme); // default if not set: 0
	
			$post_newfriend = get_pconfig(local_channel(), 'system','post_newfriend');
			$post_newfriend = (($post_newfriend===false)? '0': $post_newfriend); // default if not set: 0
	
			$post_joingroup = get_pconfig(local_channel(), 'system','post_joingroup');
			$post_joingroup = (($post_joingroup===false)? '0': $post_joingroup); // default if not set: 0
	
			$post_profilechange = get_pconfig(local_channel(), 'system','post_profilechange');
			$post_profilechange = (($post_profilechange===false)? '0': $post_profilechange); // default if not set: 0
	
			$blocktags  = get_pconfig(local_channel(),'system','blocktags');
			$blocktags = (($blocktags===false) ? '0' : $blocktags);
		
			$timezone = date_default_timezone_get();
	
			$opt_tpl = get_markup_template("field_checkbox.tpl");
			if(get_config('system','publish_all')) {
				$profile_in_dir = '<input type="hidden" name="profile_in_directory" value="1" />';
			}
			else {
				$profile_in_dir = replace_macros($opt_tpl,array(
					'$field' 	=> array('profile_in_directory', t('Publish your default profile in the network directory'), $profile['publish'], '', $yes_no),
				));
			}
	
			$suggestme = replace_macros($opt_tpl,array(
					'$field' 	=> array('suggestme',  t('Allow us to suggest you as a potential friend to new members?'), $suggestme, '', $yes_no),
	
			));
	
			$subdir = ((strlen(\App::get_path())) ? '<br />' . t('or') . ' ' . z_root() . '/channel/' . $nickname : '');
	
			$tpl_addr = get_markup_template("settings_nick_set.tpl");
	
			$prof_addr = replace_macros($tpl_addr,array(
				'$desc' => t('Your channel address is'),
				'$nickname' => $nickname,
				'$subdir' => $subdir,
				'$basepath' => \App::get_hostname()
			));
	
			$stpl = get_markup_template('settings.tpl');
	
			$acl = new \Zotlabs\Access\AccessList($channel);
			$perm_defaults = $acl->get();
	
			require_once('include/group.php');
			$group_select = mini_group_select(local_channel(),$channel['channel_default_group']);
	
			require_once('include/menu.php');
			$m1 = menu_list(local_channel());
			$menu = false;
			if($m1) {
				$menu = array();
				$current = get_pconfig(local_channel(),'system','channel_menu');
				$menu[] = array('name' => '', 'selected' => ((! $current) ? true : false));
				foreach($m1 as $m) {
					$menu[] = array('name' => htmlspecialchars($m['menu_name'],ENT_COMPAT,'UTF-8'), 'selected' => (($m['menu_name'] === $current) ? ' selected="selected" ' : false));
				}
			}
	
			$evdays = get_pconfig(local_channel(),'system','evdays');
			if(! $evdays)
				$evdays = 3;
	
			$permissions_role = get_pconfig(local_channel(),'system','permissions_role');
			if(! $permissions_role)
				$permissions_role = 'custom';
	
			$permissions_set = (($permissions_role != 'custom') ? true : false);

			$perm_roles = \Zotlabs\Access\PermissionRoles::roles();
			if((get_account_techlevel() < 4) && $permissions_role !== 'custom')
				unset($perm_roles[t('Other')]);

			$vnotify = get_pconfig(local_channel(),'system','vnotify');
			$always_show_in_notices = get_pconfig(local_channel(),'system','always_show_in_notices');
			if($vnotify === false)
				$vnotify = (-1);
	
			$o .= replace_macros($stpl,array(
				'$ptitle' 	=> t('Channel Settings'),
	
				'$submit' 	=> t('Submit'),
				'$baseurl' => z_root(),
				'$uid' => local_channel(),
				'$form_security_token' => get_form_security_token("settings"),
				'$nickname_block' => $prof_addr,
				'$h_basic' 	=> t('Basic Settings'),
				'$username' => array('username',  t('Full Name:'), $username,''),
				'$email' 	=> array('email', t('Email Address:'), $email, ''),
				'$timezone' => array('timezone_select' , t('Your Timezone:'), $timezone, '', get_timezones()),
				'$defloc'	=> array('defloc', t('Default Post Location:'), $defloc, t('Geographical location to display on your posts')),
				'$allowloc' => array('allow_location', t('Use Browser Location:'), ((get_pconfig(local_channel(),'system','use_browser_location')) ? 1 : ''), '', $yes_no),
			
				'$adult'    => array('adult', t('Adult Content'), $adult_flag, t('This channel frequently or regularly publishes adult content. (Please tag any adult material and/or nudity with #NSFW)'), $yes_no),
	
				'$h_prv' 	=> t('Security and Privacy Settings'),
				'$permissions_set' => $permissions_set,
				'$server_role' => \Zotlabs\Lib\System::get_server_role(),
				'$perms_set_msg' => t('Your permissions are already configured. Click to view/adjust'),
	
				'$hide_presence' => array('hide_presence', t('Hide my online presence'),$hide_presence, t('Prevents displaying in your profile that you are online'), $yes_no),
	
				'$lbl_pmacro' => t('Simple Privacy Settings:'),
				'$pmacro3'    => t('Very Public - <em>extremely permissive (should be used with caution)</em>'),
				'$pmacro2'    => t('Typical - <em>default public, privacy when desired (similar to social network permissions but with improved privacy)</em>'),
				'$pmacro1'    => t('Private - <em>default private, never open or public</em>'),
				'$pmacro0'    => t('Blocked - <em>default blocked to/from everybody</em>'),
				'$permiss_arr' => $permiss,
				'$blocktags' => array('blocktags',t('Allow others to tag your posts'), 1-$blocktags, t('Often used by the community to retro-actively flag inappropriate content'), $yes_no),
	
				'$lbl_p2macro' => t('Channel Permission Limits'),
	
				'$expire' => array('expire',t('Expire other channel content after this many days'),$expire, t('0 or blank to use the website limit.') . ' ' . ((intval($sys_expire)) ? sprintf( t('This website expires after %d days.'),intval($sys_expire)) : t('This website does not expire imported content.')) . ' ' . t('The website limit takes precedence if lower than your limit.')),
				'$maxreq' 	=> array('maxreq', t('Maximum Friend Requests/Day:'), intval($channel['channel_max_friend_req']) , t('May reduce spam activity')),
				'$permissions' => t('Default Access Control List (ACL)'),
				'$permdesc' => t("\x28click to open/close\x29"),
				'$aclselect' => populate_acl($perm_defaults, false, \Zotlabs\Lib\PermissionDescription::fromDescription(t('Use my default audience setting for the type of object published'))),
				'$allow_cid' => acl2json($perm_defaults['allow_cid']),
				'$allow_gid' => acl2json($perm_defaults['allow_gid']),
				'$deny_cid' => acl2json($perm_defaults['deny_cid']),
				'$deny_gid' => acl2json($perm_defaults['deny_gid']),
				'$suggestme' => $suggestme,
				'$group_select' => $group_select,
				'$role' => array('permissions_role' , t('Channel permissions category:'), $permissions_role, '', $perm_roles),
	
				'$profile_in_dir' => $profile_in_dir,
				'$hide_friends' => $hide_friends,
				'$hide_wall' => $hide_wall,
				'$unkmail' => $unkmail,		
				'$cntunkmail' 	=> array('cntunkmail', t('Maximum private messages per day from unknown people:'), intval($channel['channel_max_anon_mail']) ,t("Useful to reduce spamming")),
			
			
				'$h_not' 	=> t('Notification Settings'),
				'$activity_options' => t('By default post a status message when:'),
				'$post_newfriend' => array('post_newfriend',  t('accepting a friend request'), $post_newfriend, '', $yes_no),
				'$post_joingroup' => array('post_joingroup',  t('joining a forum/community'), $post_joingroup, '', $yes_no),
				'$post_profilechange' => array('post_profilechange',  t('making an <em>interesting</em> profile change'), $post_profilechange, '', $yes_no),
				'$lbl_not' 	=> t('Send a notification email when:'),
				'$notify1'	=> array('notify1', t('You receive a connection request'), ($notify & NOTIFY_INTRO), NOTIFY_INTRO, '', $yes_no),
				'$notify2'	=> array('notify2', t('Your connections are confirmed'), ($notify & NOTIFY_CONFIRM), NOTIFY_CONFIRM, '', $yes_no),
				'$notify3'	=> array('notify3', t('Someone writes on your profile wall'), ($notify & NOTIFY_WALL), NOTIFY_WALL, '', $yes_no),
				'$notify4'	=> array('notify4', t('Someone writes a followup comment'), ($notify & NOTIFY_COMMENT), NOTIFY_COMMENT, '', $yes_no),
				'$notify5'	=> array('notify5', t('You receive a private message'), ($notify & NOTIFY_MAIL), NOTIFY_MAIL, '', $yes_no),
				'$notify6'  => array('notify6', t('You receive a friend suggestion'), ($notify & NOTIFY_SUGGEST), NOTIFY_SUGGEST, '', $yes_no),
				'$notify7'  => array('notify7', t('You are tagged in a post'), ($notify & NOTIFY_TAGSELF), NOTIFY_TAGSELF, '', $yes_no),
				'$notify8'  => array('notify8', t('You are poked/prodded/etc. in a post'), ($notify & NOTIFY_POKE), NOTIFY_POKE, '', $yes_no),
			
	
				'$lbl_vnot' 	=> t('Show visual notifications including:'),
	
				'$vnotify1'	=> array('vnotify1', t('Unseen grid activity'), ($vnotify & VNOTIFY_NETWORK), VNOTIFY_NETWORK, '', $yes_no),
				'$vnotify2'	=> array('vnotify2', t('Unseen channel activity'), ($vnotify & VNOTIFY_CHANNEL), VNOTIFY_CHANNEL, '', $yes_no),
				'$vnotify3'	=> array('vnotify3', t('Unseen private messages'), ($vnotify & VNOTIFY_MAIL), VNOTIFY_MAIL, t('Recommended'), $yes_no),
				'$vnotify4'	=> array('vnotify4', t('Upcoming events'), ($vnotify & VNOTIFY_EVENT), VNOTIFY_EVENT, '', $yes_no),
				'$vnotify5'	=> array('vnotify5', t('Events today'), ($vnotify & VNOTIFY_EVENTTODAY), VNOTIFY_EVENTTODAY, '', $yes_no),
				'$vnotify6'  => array('vnotify6', t('Upcoming birthdays'), ($vnotify & VNOTIFY_BIRTHDAY), VNOTIFY_BIRTHDAY, t('Not available in all themes'), $yes_no),
				'$vnotify7'  => array('vnotify7', t('System (personal) notifications'), ($vnotify & VNOTIFY_SYSTEM), VNOTIFY_SYSTEM, '', $yes_no),
				'$vnotify8'  => array('vnotify8', t('System info messages'), ($vnotify & VNOTIFY_INFO), VNOTIFY_INFO, t('Recommended'), $yes_no),
				'$vnotify9'  => array('vnotify9', t('System critical alerts'), ($vnotify & VNOTIFY_ALERT), VNOTIFY_ALERT, t('Recommended'), $yes_no),
				'$vnotify10'  => array('vnotify10', t('New connections'), ($vnotify & VNOTIFY_INTRO), VNOTIFY_INTRO, t('Recommended'), $yes_no),
				'$vnotify11'  => array('vnotify11', t('System Registrations'), ($vnotify & VNOTIFY_REGISTER), VNOTIFY_REGISTER, '', $yes_no),
				'$always_show_in_notices'  => array('always_show_in_notices', t('Also show new wall posts, private messages and connections under Notices'), $always_show_in_notices, 1, '', $yes_no),
	
				'$evdays' => array('evdays', t('Notify me of events this many days in advance'), $evdays, t('Must be greater than 0')),			
	
				'$h_advn' => t('Advanced Account/Page Type Settings'),
				'$h_descadvn' => t('Change the behaviour of this account for special situations'),
				'$pagetype' => $pagetype,
				'$lbl_misc' => t('Miscellaneous Settings'),
				'$photo_path' => array('photo_path', t('Default photo upload folder'), get_pconfig(local_channel(),'system','photo_path'), t('%Y - current year, %m -  current month')),
				'$attach_path' => array('attach_path', t('Default file upload folder'), get_pconfig(local_channel(),'system','attach_path'), t('%Y - current year, %m -  current month')),
				'$menus' => $menu,			
				'$menu_desc' => t('Personal menu to display in your channel pages'),
				'$removeme' => t('Remove Channel'),
				'$removechannel' => t('Remove this channel.'),
				'$firefoxshare' => t('Firefox Share $Projectname provider'),
				'$cal_first_day' => array('first_day', t('Start calendar week on monday'), ((get_pconfig(local_channel(),'system','cal_first_day')) ? 1 : ''), '', $yes_no),
			));
	
			call_hooks('settings_form',$o);
	
			//$o .= '</form>' . "\r\n";
	
			return $o;
		}
	}
	
	function get_theme_config_file($theme){

		$base_theme = \App::$theme_info['extends'];
	
		if (file_exists("view/theme/$theme/php/config.php")){
			return "view/theme/$theme/php/config.php";
		} 
		if (file_exists("view/theme/$base_theme/php/config.php")){
			return "view/theme/$base_theme/php/config.php";
		}
		return null;
	}

	
}