6 require_once("include/remoteupdate.php");
12 function admin_post(&$a){
15 if(!is_site_admin()) {
19 // do not allow a page manager to access the admin panel at all.
21 if(x($_SESSION,'submanage') && intval($_SESSION['submanage']))
30 admin_page_site_post($a);
33 admin_page_users_post($a);
37 is_file("addon/".$a->argv[2]."/".$a->argv[2].".php")){
38 @include_once("addon/".$a->argv[2]."/".$a->argv[2].".php");
39 if(function_exists($a->argv[2].'_plugin_admin_post')) {
40 $func = $a->argv[2].'_plugin_admin_post';
44 goaway($a->get_baseurl(true) . '/admin/plugins/' . $a->argv[2] );
49 if (is_file("view/theme/$theme/config.php")){
50 require_once("view/theme/$theme/config.php");
51 if (function_exists("theme_admin_post")){
55 info(t('Theme settings updated.'));
58 goaway($a->get_baseurl(true) . '/admin/themes/' . $theme );
62 admin_page_logs_post($a);
65 admin_page_dbsync_post($a);
68 admin_page_remoteupdate_post($a);
73 goaway($a->get_baseurl(true) . '/admin' );
81 function admin_content(&$a) {
83 if(!is_site_admin()) {
87 if(x($_SESSION,'submanage') && intval($_SESSION['submanage']))
94 // array( url, name, extra css classes )
96 'site' => Array($a->get_baseurl(true)."/admin/site/", t("Site") , "site"),
97 'users' => Array($a->get_baseurl(true)."/admin/users/", t("Users") , "users"),
98 'plugins'=> Array($a->get_baseurl(true)."/admin/plugins/", t("Plugins") , "plugins"),
99 'themes' => Array($a->get_baseurl(true)."/admin/themes/", t("Themes") , "themes"),
100 'dbsync' => Array($a->get_baseurl(true)."/admin/dbsync/", t('DB updates'), "dbsync"),
101 //'update' => Array($a->get_baseurl(true)."/admin/update/", t("Software Update") , "update")
104 /* get plugins admin page */
106 $r = q("SELECT * FROM `addon` WHERE `plugin_admin`=1");
107 $aside['plugins_admin']=Array();
110 $aside['plugins_admin'][] = Array($a->get_baseurl(true)."/admin/plugins/".$plugin, $plugin, "plugin");
111 // temp plugins with admin
112 $a->plugins_admin[] = $plugin;
115 $aside['logs'] = Array($a->get_baseurl(true)."/admin/logs/", t("Logs"), "logs");
117 $t = get_markup_template("admin_aside.tpl");
118 $a->page['aside'] .= replace_macros( $t, array(
120 '$admtxt' => t('Admin'),
121 '$plugadmtxt' => t('Plugin Features'),
122 '$logtxt' => t('Logs'),
123 '$h_pending' => t('User registrations waiting for confirmation'),
124 '$admurl'=> $a->get_baseurl(true)."/admin/"
136 switch ($a->argv[1]){
138 $o = admin_page_site($a);
141 $o = admin_page_users($a);
144 $o = admin_page_plugins($a);
147 $o = admin_page_themes($a);
150 $o = admin_page_logs($a);
153 $o = admin_page_dbsync($a);
156 $o = admin_page_remoteupdate($a);
159 notice( t("Item not found.") );
162 $o = admin_page_summary($a);
180 function admin_page_summary(&$a) {
181 $r = q("SELECT `page-flags`, COUNT(uid) as `count` FROM `user` GROUP BY `page-flags`");
183 Array( t('Normal Account'), 0),
184 Array( t('Soapbox Account'), 0),
185 Array( t('Community/Celebrity Account'), 0),
186 Array( t('Automatic Friend Account'), 0)
190 foreach ($r as $u){ $accounts[$u['page-flags']][1] = $u['count']; $users+= $u['count']; }
192 logger('accounts: ' . print_r($accounts,true));
194 $r = q("SELECT COUNT(id) as `count` FROM `register`");
195 $pending = $r[0]['count'];
197 $r = q("select count(*) as total from deliverq where 1");
198 $deliverq = (($r) ? $r[0]['total'] : 0);
200 $r = q("select count(*) as total from queue where 1");
201 $queue = (($r) ? $r[0]['total'] : 0);
203 // We can do better, but this is a quick queue status
205 $queues = array( 'label' => t('Message queues'), 'deliverq' => $deliverq, 'queue' => $queue );
208 $t = get_markup_template("admin_summary.tpl");
209 return replace_macros($t, array(
210 '$title' => t('Administration'),
211 '$page' => t('Summary'),
212 '$queues' => $queues,
213 '$users' => Array( t('Registered users'), $users),
214 '$accounts' => $accounts,
215 '$pending' => Array( t('Pending registrations'), $pending),
216 '$version' => Array( t('Version'), FRIENDICA_VERSION),
217 '$build' => get_config('system','build'),
218 '$plugins' => Array( t('Active plugins'), $a->plugins )
227 function admin_page_site_post(&$a){
228 if (!x($_POST,"page_site")){
232 check_form_security_token_redirectOnErr('/admin/site', 'admin_site');
234 $sitename = ((x($_POST,'sitename')) ? notags(trim($_POST['sitename'])) : '');
235 $banner = ((x($_POST,'banner')) ? trim($_POST['banner']) : false);
236 $language = ((x($_POST,'language')) ? notags(trim($_POST['language'])) : '');
237 $theme = ((x($_POST,'theme')) ? notags(trim($_POST['theme'])) : '');
238 $maximagesize = ((x($_POST,'maximagesize')) ? intval(trim($_POST['maximagesize'])) : 0);
241 $register_policy = ((x($_POST,'register_policy')) ? intval(trim($_POST['register_policy'])) : 0);
242 $abandon_days = ((x($_POST,'abandon_days')) ? intval(trim($_POST['abandon_days'])) : 0);
244 $register_text = ((x($_POST,'register_text')) ? notags(trim($_POST['register_text'])) : '');
246 $allowed_sites = ((x($_POST,'allowed_sites')) ? notags(trim($_POST['allowed_sites'])) : '');
247 $allowed_email = ((x($_POST,'allowed_email')) ? notags(trim($_POST['allowed_email'])) : '');
248 $block_public = ((x($_POST,'block_public')) ? True : False);
249 $force_publish = ((x($_POST,'publish_all')) ? True : False);
250 $global_directory = ((x($_POST,'directory_submit_url')) ? notags(trim($_POST['directory_submit_url'])) : '');
251 $no_multi_reg = ((x($_POST,'no_multi_reg')) ? True : False);
252 $no_openid = !((x($_POST,'no_openid')) ? True : False);
253 $no_regfullname = !((x($_POST,'no_regfullname')) ? True : False);
254 $no_utf = !((x($_POST,'no_utf')) ? True : False);
255 $no_community_page = !((x($_POST,'no_community_page')) ? True : False);
257 $verifyssl = ((x($_POST,'verifyssl')) ? True : False);
258 $proxyuser = ((x($_POST,'proxyuser')) ? notags(trim($_POST['proxyuser'])) : '');
259 $proxy = ((x($_POST,'proxy')) ? notags(trim($_POST['proxy'])) : '');
260 $timeout = ((x($_POST,'timeout')) ? intval(trim($_POST['timeout'])) : 60);
261 $delivery_interval = ((x($_POST,'delivery_interval'))? intval(trim($_POST['delivery_interval'])) : 0);
262 $poll_interval = ((x($_POST,'poll_interval'))? intval(trim($_POST['poll_interval'])) : 0);
263 $maxloadavg = ((x($_POST,'maxloadavg')) ? intval(trim($_POST['maxloadavg'])) : 50);
264 $dfrn_only = ((x($_POST,'dfrn_only')) ? True : False);
265 $ostatus_disabled = !((x($_POST,'ostatus_disabled')) ? True : False);
266 $diaspora_enabled = ((x($_POST,'diaspora_enabled')) ? True : False);
267 $ssl_policy = ((x($_POST,'ssl_policy')) ? intval($_POST['ssl_policy']) : 0);
269 if($ssl_policy != intval(get_config('system','ssl_policy'))) {
270 if($ssl_policy == SSL_POLICY_FULL) {
271 q("update `contact` set
272 `url` = replace(`url` , 'http:' , 'https:'),
273 `photo` = replace(`photo` , 'http:' , 'https:'),
274 `thumb` = replace(`thumb` , 'http:' , 'https:'),
275 `micro` = replace(`micro` , 'http:' , 'https:'),
276 `request` = replace(`request`, 'http:' , 'https:'),
277 `notify` = replace(`notify` , 'http:' , 'https:'),
278 `poll` = replace(`poll` , 'http:' , 'https:'),
279 `confirm` = replace(`confirm`, 'http:' , 'https:'),
280 `poco` = replace(`poco` , 'http:' , 'https:')
283 q("update `profile` set
284 `photo` = replace(`photo` , 'http:' , 'https:'),
285 `thumb` = replace(`thumb` , 'http:' , 'https:')
289 elseif($ssl_policy == SSL_POLICY_SELFSIGN) {
290 q("update `contact` set
291 `url` = replace(`url` , 'https:' , 'http:'),
292 `photo` = replace(`photo` , 'https:' , 'http:'),
293 `thumb` = replace(`thumb` , 'https:' , 'http:'),
294 `micro` = replace(`micro` , 'https:' , 'http:'),
295 `request` = replace(`request`, 'https:' , 'http:'),
296 `notify` = replace(`notify` , 'https:' , 'http:'),
297 `poll` = replace(`poll` , 'https:' , 'http:'),
298 `confirm` = replace(`confirm`, 'https:' , 'http:'),
299 `poco` = replace(`poco` , 'https:' , 'http:')
302 q("update `profile` set
303 `photo` = replace(`photo` , 'https:' , 'http:'),
304 `thumb` = replace(`thumb` , 'https:' , 'http:')
309 set_config('system','ssl_policy',$ssl_policy);
310 set_config('system','delivery_interval',$delivery_interval);
311 set_config('system','poll_interval',$poll_interval);
312 set_config('system','maxloadavg',$maxloadavg);
313 set_config('config','sitename',$sitename);
315 // don't know why, but del_config doesn't work...
316 q("DELETE FROM `config` WHERE `cat` = '%s' AND `k` = '%s' LIMIT 1",
321 set_config('system','banner', $banner);
323 set_config('system','language', $language);
324 set_config('system','theme', $theme);
325 set_config('system','maximagesize', $maximagesize);
327 set_config('config','register_policy', $register_policy);
328 set_config('system','account_abandon_days', $abandon_days);
329 set_config('config','register_text', $register_text);
330 set_config('system','allowed_sites', $allowed_sites);
331 set_config('system','allowed_email', $allowed_email);
332 set_config('system','block_public', $block_public);
333 set_config('system','publish_all', $force_publish);
334 if ($global_directory==""){
335 // don't know why, but del_config doesn't work...
336 q("DELETE FROM `config` WHERE `cat` = '%s' AND `k` = '%s' LIMIT 1",
338 dbesc("directory_submit_url")
341 set_config('system','directory_submit_url', $global_directory);
344 set_config('system','block_extended_register', $no_multi_reg);
345 set_config('system','no_openid', $no_openid);
346 set_config('system','no_regfullname', $no_regfullname);
347 set_config('system','no_community_page', $no_community_page);
348 set_config('system','no_utf', $no_utf);
349 set_config('system','verifyssl', $verifyssl);
350 set_config('system','proxyuser', $proxyuser);
351 set_config('system','proxy', $proxy);
352 set_config('system','curl_timeout', $timeout);
353 set_config('system','dfrn_only', $dfrn_only);
354 set_config('system','ostatus_disabled', $ostatus_disabled);
355 set_config('system','diaspora_enabled', $diaspora_enabled);
357 info( t('Site settings updated.') . EOL);
358 goaway($a->get_baseurl(true) . '/admin/site' );
359 return; // NOTREACHED
367 function admin_page_site(&$a) {
369 /* Installed langs */
370 $lang_choices = array();
371 $langs = glob('view/*/strings.php');
373 if(is_array($langs) && count($langs)) {
374 if(! in_array('view/en/strings.php',$langs))
375 $langs[] = 'view/en/';
377 foreach($langs as $l) {
378 $t = explode("/",$l);
379 $lang_choices[$t[1]] = $t[1];
383 /* Installed themes */
384 $theme_choices = array();
385 $files = glob('view/theme/*');
387 foreach($files as $file) {
388 $f = basename($file);
389 $theme_name = ((file_exists($file . '/experimental')) ? sprintf("%s - \x28Experimental\x29", $f) : $f);
390 $theme_choices[$f] = $theme_name;
396 $banner = get_config('system','banner');
398 $banner = '<a href="http://friendica.com"><img id="logo-img" src="images/friendica-32.png" alt="logo" /></a><span id="logo-text"><a href="http://friendica.com">Friendica</a></span>';
399 $banner = htmlspecialchars($banner);
401 //echo "<pre>"; var_dump($lang_choices); die("</pre>");
403 /* Register policy */
404 $register_choices = Array(
405 REGISTER_CLOSED => t("Closed"),
406 REGISTER_APPROVE => t("Requires approval"),
407 REGISTER_OPEN => t("Open")
410 $ssl_choices = array(
411 SSL_POLICY_NONE => t("No SSL policy, links will track page SSL state"),
412 SSL_POLICY_FULL => t("Force all links to use SSL"),
413 SSL_POLICY_SELFSIGN => t("Self-signed certificate, use SSL for local links only (discouraged)")
416 $t = get_markup_template("admin_site.tpl");
417 return replace_macros($t, array(
418 '$title' => t('Administration'),
419 '$page' => t('Site'),
420 '$submit' => t('Submit'),
421 '$registration' => t('Registration'),
422 '$upload' => t('File upload'),
423 '$corporate' => t('Policies'),
424 '$advanced' => t('Advanced'),
426 '$baseurl' => $a->get_baseurl(true),
427 // name, label, value, help string, extra data...
428 '$sitename' => array('sitename', t("Site name"), htmlentities($a->config['sitename'], ENT_QUOTES), ""),
429 '$banner' => array('banner', t("Banner/Logo"), $banner, ""),
430 '$language' => array('language', t("System language"), get_config('system','language'), "", $lang_choices),
431 '$theme' => array('theme', t("System theme"), get_config('system','theme'), t("Default system theme - may be over-ridden by user profiles - <a href='#' id='cnftheme'>change theme settings</a>"), $theme_choices),
432 '$ssl_policy' => array('ssl_policy', t("SSL link policy"), (string) intval(get_config('system','ssl_policy')), t("Determines whether generated links should be forced to use SSL"), $ssl_choices),
433 '$maximagesize' => array('maximagesize', t("Maximum image size"), get_config('system','maximagesize'), t("Maximum size in bytes of uploaded images. Default is 0, which means no limits.")),
435 '$register_policy' => array('register_policy', t("Register policy"), $a->config['register_policy'], "", $register_choices),
436 '$register_text' => array('register_text', t("Register text"), htmlentities($a->config['register_text'], ENT_QUOTES, 'UTF-8'), t("Will be displayed prominently on the registration page.")),
437 '$abandon_days' => array('abandon_days', t('Accounts abandoned after x days'), get_config('system','account_abandon_days'), t('Will not waste system resources polling external sites for abandonded accounts. Enter 0 for no time limit.')),
438 '$allowed_sites' => array('allowed_sites', t("Allowed friend domains"), get_config('system','allowed_sites'), t("Comma separated list of domains which are allowed to establish friendships with this site. Wildcards are accepted. Empty to allow any domains")),
439 '$allowed_email' => array('allowed_email', t("Allowed email domains"), get_config('system','allowed_email'), t("Comma separated list of domains which are allowed in email addresses for registrations to this site. Wildcards are accepted. Empty to allow any domains")),
440 '$block_public' => array('block_public', t("Block public"), get_config('system','block_public'), t("Check to block public access to all otherwise public personal pages on this site unless you are currently logged in.")),
441 '$force_publish' => array('publish_all', t("Force publish"), get_config('system','publish_all'), t("Check to force all profiles on this site to be listed in the site directory.")),
442 '$global_directory' => array('directory_submit_url', t("Global directory update URL"), get_config('system','directory_submit_url'), t("URL to update the global directory. If this is not set, the global directory is completely unavailable to the application.")),
444 '$no_multi_reg' => array('no_multi_reg', t("Block multiple registrations"), get_config('system','block_extended_register'), t("Disallow users to register additional accounts for use as pages.")),
445 '$no_openid' => array('no_openid', t("OpenID support"), !get_config('system','no_openid'), t("OpenID support for registration and logins.")),
446 '$no_regfullname' => array('no_regfullname', t("Fullname check"), !get_config('system','no_regfullname'), t("Force users to register with a space between firstname and lastname in Full name, as an antispam measure")),
447 '$no_utf' => array('no_utf', t("UTF-8 Regular expressions"), !get_config('system','no_utf'), t("Use PHP UTF8 regular expressions")),
448 '$no_community_page' => array('no_community_page', t("Show Community Page"), !get_config('system','no_community_page'), t("Display a Community page showing all recent public postings on this site.")),
449 '$ostatus_disabled' => array('ostatus_disabled', t("Enable OStatus support"), !get_config('system','ostatus_disable'), t("Provide built-in OStatus \x28identi.ca, status.net, etc.\x29 compatibility. All communications in OStatus are public, so privacy warnings will be occasionally displayed.")),
450 '$diaspora_enabled' => array('diaspora_enabled', t("Enable Diaspora support"), get_config('system','diaspora_enabled'), t("Provide built-in Diaspora network compatibility.")),
451 '$dfrn_only' => array('dfrn_only', t('Only allow Friendica contacts'), get_config('system','dfrn_only'), t("All contacts must use Friendica protocols. All other built-in communication protocols disabled.")),
452 '$verifyssl' => array('verifyssl', t("Verify SSL"), get_config('system','verifyssl'), t("If you wish, you can turn on strict certificate checking. This will mean you cannot connect (at all) to self-signed SSL sites.")),
453 '$proxyuser' => array('proxyuser', t("Proxy user"), get_config('system','proxyuser'), ""),
454 '$proxy' => array('proxy', t("Proxy URL"), get_config('system','proxy'), ""),
455 '$timeout' => array('timeout', t("Network timeout"), (x(get_config('system','curl_timeout'))?get_config('system','curl_timeout'):60), t("Value is in seconds. Set to 0 for unlimited (not recommended).")),
456 '$delivery_interval' => array('delivery_interval', t("Delivery interval"), (x(get_config('system','delivery_interval'))?get_config('system','delivery_interval'):2), t("Delay background delivery processes by this many seconds to reduce system load. Recommend: 4-5 for shared hosts, 2-3 for virtual private servers. 0-1 for large dedicated servers.")),
457 '$poll_interval' => array('poll_interval', t("Poll interval"), (x(get_config('system','poll_interval'))?get_config('system','poll_interval'):2), t("Delay background polling processes by this many seconds to reduce system load. If 0, use delivery interval.")),
458 '$maxloadavg' => array('maxloadavg', t("Maximum Load Average"), ((intval(get_config('system','maxloadavg')) > 0)?get_config('system','maxloadavg'):50), t("Maximum system load before delivery and poll processes are deferred - default 50.")),
459 '$form_security_token' => get_form_security_token("admin_site"),
466 function admin_page_dbsync(&$a) {
470 if($a->argc > 3 && intval($a->argv[3]) && $a->argv[2] === 'mark') {
471 set_config('database', 'update_' . intval($a->argv[3]), 'success');
472 info( t('Update has been marked successful') . EOL);
473 goaway($a->get_baseurl(true) . '/admin/dbsync');
476 if($a->argc > 2 && intval($a->argv[2])) {
477 require_once('update.php');
478 $func = 'update_' . intval($a->argv[2]);
479 if(function_exists($func)) {
481 if($retval === UPDATE_FAILED) {
482 $o .= sprintf( t('Executing %s failed. Check system logs.'), $func);
484 elseif($retval === UPDATE_SUCCESS) {
485 $o .= sprintf( t('Update %s was successfully applied.', $func));
486 set_config('database',$func, 'success');
489 $o .= sprintf( t('Update %s did not return a status. Unknown if it succeeded.'), $func);
492 $o .= sprintf( t('Update function %s could not be found.'), $func);
497 $r = q("select * from config where `cat` = 'database' ");
500 $upd = intval(substr($rr['k'],7));
501 if($upd < 1139 || $rr['v'] === 'success')
507 return '<h3>' . t('No failed updates.') . '</h3>';
509 $o = replace_macros(get_markup_template('failed_updates.tpl'),array(
510 '$base' => $a->get_baseurl(true),
511 '$banner' => t('Failed Updates'),
512 '$desc' => t('This does not include updates prior to 1139, which did not return a status.'),
513 '$mark' => t('Mark success (if update was manually applied)'),
514 '$apply' => t('Attempt to execute this update step automatically'),
527 function admin_page_users_post(&$a){
528 $pending = ( x($_POST, 'pending') ? $_POST['pending'] : Array() );
529 $users = ( x($_POST, 'user') ? $_POST['user'] : Array() );
531 check_form_security_token_redirectOnErr('/admin/users', 'admin_users');
533 if (x($_POST,'page_users_block')){
534 foreach($users as $uid){
535 q("UPDATE `user` SET `blocked`=1-`blocked` WHERE `uid`=%s",
539 notice( sprintf( tt("%s user blocked/unblocked", "%s users blocked/unblocked", count($users)), count($users)) );
541 if (x($_POST,'page_users_delete')){
542 require_once("include/Contact.php");
543 foreach($users as $uid){
546 notice( sprintf( tt("%s user deleted", "%s users deleted", count($users)), count($users)) );
549 if (x($_POST,'page_users_approve')){
550 require_once("mod/regmod.php");
551 foreach($pending as $hash){
555 if (x($_POST,'page_users_deny')){
556 require_once("mod/regmod.php");
557 foreach($pending as $hash){
561 goaway($a->get_baseurl(true) . '/admin/users' );
562 return; // NOTREACHED
569 function admin_page_users(&$a){
572 $user = q("SELECT * FROM `user` WHERE `uid`=%d", intval($uid));
573 if (count($user)==0){
574 notice( 'User not found' . EOL);
575 goaway($a->get_baseurl(true) . '/admin/users' );
576 return ''; // NOTREACHED
580 check_form_security_token_redirectOnErr('/admin/users', 'admin_users', 't');
582 require_once("include/Contact.php");
585 notice( sprintf(t("User '%s' deleted"), $user[0]['username']) . EOL);
588 check_form_security_token_redirectOnErr('/admin/users', 'admin_users', 't');
589 q("UPDATE `user` SET `blocked`=%d WHERE `uid`=%s",
590 intval( 1-$user[0]['blocked'] ),
593 notice( sprintf( ($user[0]['blocked']?t("User '%s' unblocked"):t("User '%s' blocked")) , $user[0]['username']) . EOL);
596 goaway($a->get_baseurl(true) . '/admin/users' );
597 return ''; // NOTREACHED
602 $pending = q("SELECT `register`.*, `contact`.`name`, `user`.`email`
604 LEFT JOIN `contact` ON `register`.`uid` = `contact`.`uid`
605 LEFT JOIN `user` ON `register`.`uid` = `user`.`uid`;");
610 $total = q("SELECT count(*) as total FROM `user` where 1");
612 $a->set_pager_total($total[0]['total']);
613 $a->set_pager_itemspage(100);
617 $users = q("SELECT `user` . * , `contact`.`name` , `contact`.`url` , `contact`.`micro`, `lastitem`.`lastitem_date`
619 (SELECT MAX(`item`.`changed`) as `lastitem_date`, `item`.`uid`
621 WHERE `item`.`type` = 'wall'
622 GROUP BY `item`.`uid`) AS `lastitem`
623 RIGHT OUTER JOIN `user` ON `user`.`uid` = `lastitem`.`uid`,
626 `user`.`uid` = `contact`.`uid`
627 AND `user`.`verified` =1
628 AND `contact`.`self` =1
629 ORDER BY `contact`.`name` LIMIT %d, %d
631 intval($a->pager['start']),
632 intval($a->pager['itemspage'])
635 function _setup_users($e){
638 t('Soapbox Account'),
639 t('Community/Celebrity Account'),
640 t('Automatic Friend Account')
642 $e['page-flags'] = $accounts[$e['page-flags']];
643 $e['register_date'] = relative_date($e['register_date']);
644 $e['login_date'] = relative_date($e['login_date']);
645 $e['lastitem_date'] = relative_date($e['lastitem_date']);
648 $users = array_map("_setup_users", $users);
651 $t = get_markup_template("admin_users.tpl");
652 $o = replace_macros($t, array(
654 '$title' => t('Administration'),
655 '$page' => t('Users'),
656 '$submit' => t('Submit'),
657 '$select_all' => t('select all'),
658 '$h_pending' => t('User registrations waiting for confirm'),
659 '$th_pending' => array( t('Request date'), t('Name'), t('Email') ),
660 '$no_pending' => t('No registrations.'),
661 '$approve' => t('Approve'),
662 '$deny' => t('Deny'),
663 '$delete' => t('Delete'),
664 '$block' => t('Block'),
665 '$unblock' => t('Unblock'),
667 '$h_users' => t('Users'),
668 '$th_users' => array( t('Name'), t('Email'), t('Register date'), t('Last login'), t('Last item'), t('Account') ),
670 '$confirm_delete_multi' => t('Selected users will be deleted!\n\nEverything these users had posted on this site will be permanently deleted!\n\nAre you sure?'),
671 '$confirm_delete' => t('The user {0} will be deleted!\n\nEverything this user has posted on this site will be permanently deleted!\n\nAre you sure?'),
673 '$form_security_token' => get_form_security_token("admin_users"),
676 '$baseurl' => $a->get_baseurl(true),
678 '$pending' => $pending,
692 function admin_page_plugins(&$a){
698 $plugin = $a->argv[2];
699 if (!is_file("addon/$plugin/$plugin.php")){
700 notice( t("Item not found.") );
704 if (x($_GET,"a") && $_GET['a']=="t"){
705 check_form_security_token_redirectOnErr('/admin/plugins', 'admin_themes', 't');
707 // Toggle plugin status
708 $idx = array_search($plugin, $a->plugins);
710 unset($a->plugins[$idx]);
711 uninstall_plugin($plugin);
712 info( sprintf( t("Plugin %s disabled."), $plugin ) );
714 $a->plugins[] = $plugin;
715 install_plugin($plugin);
716 info( sprintf( t("Plugin %s enabled."), $plugin ) );
718 set_config("system","addon", implode(", ",$a->plugins));
719 goaway($a->get_baseurl(true) . '/admin/plugins' );
720 return ''; // NOTREACHED
722 // display plugin details
723 require_once('library/markdown.php');
725 if (in_array($plugin, $a->plugins)){
726 $status="on"; $action= t("Disable");
728 $status="off"; $action= t("Enable");
732 if (is_file("addon/$plugin/README.md")){
733 $readme = file_get_contents("addon/$plugin/README.md");
734 $readme = Markdown($readme);
735 } else if (is_file("addon/$plugin/README")){
736 $readme = "<pre>". file_get_contents("addon/$plugin/README") ."</pre>";
740 if (is_array($a->plugins_admin) && in_array($plugin, $a->plugins_admin)){
741 @require_once("addon/$plugin/$plugin.php");
742 $func = $plugin.'_plugin_admin';
743 $func($a, $admin_form);
746 $t = get_markup_template("admin_plugins_details.tpl");
747 return replace_macros($t, array(
748 '$title' => t('Administration'),
749 '$page' => t('Plugins'),
750 '$toggle' => t('Toggle'),
751 '$settings' => t('Settings'),
752 '$baseurl' => $a->get_baseurl(true),
754 '$plugin' => $plugin,
755 '$status' => $status,
756 '$action' => $action,
757 '$info' => get_plugin_info($plugin),
758 '$str_author' => t('Author: '),
759 '$str_maintainer' => t('Maintainer: '),
761 '$admin_form' => $admin_form,
762 '$function' => 'plugins',
764 '$readme' => $readme,
766 '$form_security_token' => get_form_security_token("admin_themes"),
777 $files = glob("addon/*/");
779 foreach($files as $file) {
781 list($tmp, $id)=array_map("trim", explode("/",$file));
782 $info = get_plugin_info($id);
783 $plugins[] = array( $id, (in_array($id, $a->plugins)?"on":"off") , $info);
788 $t = get_markup_template("admin_plugins.tpl");
789 return replace_macros($t, array(
790 '$title' => t('Administration'),
791 '$page' => t('Plugins'),
792 '$submit' => t('Submit'),
793 '$baseurl' => $a->get_baseurl(true),
794 '$function' => 'plugins',
795 '$plugins' => $plugins,
796 '$form_security_token' => get_form_security_token("admin_themes"),
801 * @param array $themes
805 function toggle_theme(&$themes,$th,&$result) {
806 for($x = 0; $x < count($themes); $x ++) {
807 if($themes[$x]['name'] === $th) {
808 if($themes[$x]['allowed']) {
809 $themes[$x]['allowed'] = 0;
813 $themes[$x]['allowed'] = 1;
821 * @param array $themes
825 function theme_status($themes,$th) {
826 for($x = 0; $x < count($themes); $x ++) {
827 if($themes[$x]['name'] === $th) {
828 if($themes[$x]['allowed']) {
841 * @param array $themes
844 function rebuild_theme_table($themes) {
847 foreach($themes as $th) {
865 function admin_page_themes(&$a){
867 $allowed_themes_str = get_config('system','allowed_themes');
868 $allowed_themes_raw = explode(',',$allowed_themes_str);
869 $allowed_themes = array();
870 if(count($allowed_themes_raw))
871 foreach($allowed_themes_raw as $x)
873 $allowed_themes[] = trim($x);
876 $files = glob('view/theme/*');
878 foreach($files as $file) {
879 $f = basename($file);
880 $is_experimental = intval(file_exists($file . '/experimental'));
881 $is_supported = 1-(intval(file_exists($file . '/unsupported'))); // Is not used yet
882 $is_allowed = intval(in_array($f,$allowed_themes));
883 $themes[] = array('name' => $f, 'experimental' => $is_experimental, 'supported' => $is_supported, 'allowed' => $is_allowed);
887 if(! count($themes)) {
888 notice( t('No themes found.'));
897 $theme = $a->argv[2];
898 if(! is_dir("view/theme/$theme")){
899 notice( t("Item not found.") );
903 if (x($_GET,"a") && $_GET['a']=="t"){
904 check_form_security_token_redirectOnErr('/admin/themes', 'admin_themes', 't');
906 // Toggle theme status
908 toggle_theme($themes,$theme,$result);
909 $s = rebuild_theme_table($themes);
911 info( sprintf('Theme %s enabled.',$theme));
913 info( sprintf('Theme %s disabled.',$theme));
915 set_config('system','allowed_themes',$s);
916 goaway($a->get_baseurl(true) . '/admin/themes' );
917 return ''; // NOTREACHED
920 // display theme details
921 require_once('library/markdown.php');
923 if (theme_status($themes,$theme)) {
924 $status="on"; $action= t("Disable");
926 $status="off"; $action= t("Enable");
930 if (is_file("view/theme/$theme/README.md")){
931 $readme = file_get_contents("view/theme/$theme/README.md");
932 $readme = Markdown($readme);
933 } else if (is_file("view/theme/$theme/README")){
934 $readme = "<pre>". file_get_contents("view/theme/$theme/README") ."</pre>";
938 if (is_file("view/theme/$theme/config.php")){
939 require_once("view/theme/$theme/config.php");
940 if(function_exists("theme_admin")){
941 $admin_form = theme_admin($a);
947 $screenshot = array( get_theme_screenshot($theme), t('Screenshot'));
948 if(! stristr($screenshot[0],$theme))
951 $t = get_markup_template("admin_plugins_details.tpl");
952 return replace_macros($t, array(
953 '$title' => t('Administration'),
954 '$page' => t('Themes'),
955 '$toggle' => t('Toggle'),
956 '$settings' => t('Settings'),
957 '$baseurl' => $a->get_baseurl(true),
960 '$status' => $status,
961 '$action' => $action,
962 '$info' => get_theme_info($theme),
963 '$function' => 'themes',
964 '$admin_form' => $admin_form,
965 '$str_author' => t('Author: '),
966 '$str_maintainer' => t('Maintainer: '),
967 '$screenshot' => $screenshot,
968 '$readme' => $readme,
970 '$form_security_token' => get_form_security_token("admin_themes"),
982 foreach($themes as $th) {
983 $xthemes[] = array($th['name'],(($th['allowed']) ? "on" : "off"), get_theme_info($th['name']));
987 $t = get_markup_template("admin_plugins.tpl");
988 return replace_macros($t, array(
989 '$title' => t('Administration'),
990 '$page' => t('Themes'),
991 '$submit' => t('Submit'),
992 '$baseurl' => $a->get_baseurl(true),
993 '$function' => 'themes',
994 '$plugins' => $xthemes,
995 '$experimental' => t('[Experimental]'),
996 '$unsupported' => t('[Unsupported]'),
997 '$form_security_token' => get_form_security_token("admin_themes"),
1008 function admin_page_logs_post(&$a) {
1009 if (x($_POST,"page_logs")) {
1010 check_form_security_token_redirectOnErr('/admin/logs', 'admin_logs');
1012 $logfile = ((x($_POST,'logfile')) ? notags(trim($_POST['logfile'])) : '');
1013 $debugging = ((x($_POST,'debugging')) ? true : false);
1014 $loglevel = ((x($_POST,'loglevel')) ? intval(trim($_POST['loglevel'])) : 0);
1016 set_config('system','logfile', $logfile);
1017 set_config('system','debugging', $debugging);
1018 set_config('system','loglevel', $loglevel);
1023 info( t("Log settings updated.") );
1024 goaway($a->get_baseurl(true) . '/admin/logs' );
1025 return; // NOTREACHED
1032 function admin_page_logs(&$a){
1034 $log_choices = Array(
1035 LOGGER_NORMAL => 'Normal',
1036 LOGGER_TRACE => 'Trace',
1037 LOGGER_DEBUG => 'Debug',
1038 LOGGER_DATA => 'Data',
1042 $t = get_markup_template("admin_logs.tpl");
1044 $f = get_config('system','logfile');
1048 if(!file_exists($f)) {
1049 $data = t("Error trying to open <strong>$f</strong> log file.\r\n<br/>Check to see if file $f exist and is
1053 $fp = fopen($f, 'r');
1055 $data = t("Couldn't open <strong>$f</strong> log file.\r\n<br/>Check to see if file $f is readable.");
1058 $fstat = fstat($fp);
1059 $size = $fstat['size'];
1062 if($size > 5000000 || $size < 0)
1064 $seek = fseek($fp,0-$size,SEEK_END);
1066 $data = escape_tags(fread($fp,$size));
1068 $data .= escape_tags(fread($fp,4096));
1075 return replace_macros($t, array(
1076 '$title' => t('Administration'),
1077 '$page' => t('Logs'),
1078 '$submit' => t('Submit'),
1079 '$clear' => t('Clear'),
1081 '$baseurl' => $a->get_baseurl(true),
1082 '$logname' => get_config('system','logfile'),
1084 // name, label, value, help string, extra data...
1085 '$debugging' => array('debugging', t("Debugging"),get_config('system','debugging'), ""),
1086 '$logfile' => array('logfile', t("Log file"), get_config('system','logfile'), t("Must be writable by web server. Relative to your Friendica top-level directory.")),
1087 '$loglevel' => array('loglevel', t("Log level"), get_config('system','loglevel'), "", $log_choices),
1089 '$form_security_token' => get_form_security_token("admin_logs"),
1096 function admin_page_remoteupdate_post(&$a) {
1097 // this function should be called via ajax post
1098 if(!is_site_admin()) {
1103 if (x($_POST,'remotefile') && $_POST['remotefile']!=""){
1104 $remotefile = $_POST['remotefile'];
1105 $ftpdata = (x($_POST['ftphost'])?$_POST:false);
1106 doUpdate($remotefile, $ftpdata);
1108 echo "No remote file to download. Abort!";
1118 function admin_page_remoteupdate(&$a) {
1119 if(!is_site_admin()) {
1120 return login(false);
1123 $canwrite = canWeWrite();
1124 $canftp = function_exists('ftp_connect');
1129 $needupdate = false;
1130 $u = array('','','');
1133 $tpl = get_markup_template("admin_remoteupdate.tpl");
1134 return replace_macros($tpl, array(
1135 '$baseurl' => $a->get_baseurl(true),
1136 '$submit' => t("Update now"),
1137 '$close' => t("Close"),
1138 '$localversion' => FRIENDICA_VERSION,
1139 '$remoteversion' => $u[1],
1140 '$needupdate' => $needupdate,
1141 '$canwrite' => $canwrite,
1142 '$canftp' => $canftp,
1143 '$ftphost' => array('ftphost', t("FTP Host"), '',''),
1144 '$ftppath' => array('ftppath', t("FTP Path"), '/',''),
1145 '$ftpuser' => array('ftpuser', t("FTP User"), '',''),
1146 '$ftppwd' => array('ftppwd', t("FTP Password"), '',''),
1147 '$remotefile'=>array('remotefile','', $u['2'],'')