mod/admin.php

   1 <?php
   2
   3  /**
   4   * Friendica admin
   5   */
   6 require_once("include/remoteupdate.php");
   7
   8
   9 /**
  10  * @param App $a
  11  */
  12 function admin_post(&$a){
  13
  14
  15         if(!is_site_admin()) {
  16                 return;
  17         }
  18
  19         // do not allow a page manager to access the admin panel at all.
  20
  21         if(x($_SESSION,'submanage') && intval($_SESSION['submanage']))
  22                 return;
  23
  24
  25
  26         // urls
  27         if ($a->argc > 1){
  28                 switch ($a->argv[1]){
  29                         case 'site':
  30                                 admin_page_site_post($a);
  31                                 break;
  32                         case 'users':
  33                                 admin_page_users_post($a);
  34                                 break;
  35                         case 'plugins':
  36                                 if ($a->argc > 2 &&
  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';
  41                                                         $func($a);
  42                                                 }
  43                                 }
  44                                 goaway($a->get_baseurl(true) . '/admin/plugins/' . $a->argv[2] );
  45                                 return; // NOTREACHED
  46                                 break;
  47                         case 'themes':
  48                                 $theme = $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")){
  52                                                 theme_admin_post($a);
  53                                         }
  54                                 }
  55                                 info(t('Theme settings updated.'));
  56                                 if(is_ajax()) return;
  57
  58                                 goaway($a->get_baseurl(true) . '/admin/themes/' . $theme );
  59                                 return;
  60                                 break;
  61                         case 'logs':
  62                                 admin_page_logs_post($a);
  63                                 break;
  64                         case 'dbsync':
  65                                 admin_page_dbsync_post($a);
  66                                 break;
  67                         case 'update':
  68                                 admin_page_remoteupdate_post($a);
  69                                 break;
  70                 }
  71         }
  72
  73         goaway($a->get_baseurl(true) . '/admin' );
  74         return; // NOTREACHED
  75 }
  76
  77 /**
  78  * @param App $a
  79  * @return string
  80  */
  81 function admin_content(&$a) {
  82
  83         if(!is_site_admin()) {
  84                 return login(false);
  85         }
  86
  87         if(x($_SESSION,'submanage') && intval($_SESSION['submanage']))
  88                 return "";
  89
  90         /**
  91          * Side bar links
  92          */
  93
  94         // array( url, name, extra css classes )
  95         $aside = Array(
  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")
 102         );
 103
 104         /* get plugins admin page */
 105
 106         $r = q("SELECT * FROM `addon` WHERE `plugin_admin`=1");
 107         $aside['plugins_admin']=Array();
 108         foreach ($r as $h){
 109                 $plugin =$h['name'];
 110                 $aside['plugins_admin'][] = Array($a->get_baseurl(true)."/admin/plugins/".$plugin, $plugin, "plugin");
 111                 // temp plugins with admin
 112                 $a->plugins_admin[] = $plugin;
 113         }
 114
 115         $aside['logs'] = Array($a->get_baseurl(true)."/admin/logs/", t("Logs"), "logs");
 116
 117         $t = get_markup_template("admin_aside.tpl");
 118         $a->page['aside'] .= replace_macros( $t, array(
 119                         '$admin' => $aside,
 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/"
 125         ));
 126
 127
 128
 129         /**
 130          * Page content
 131          */
 132         $o = '';
 133         // urls
 134         if ($a->argc > 1){
 135                 switch ($a->argv[1]){
 136                         case 'site':
 137                                 $o = admin_page_site($a);
 138                                 break;
 139                         case 'users':
 140                                 $o = admin_page_users($a);
 141                                 break;
 142                         case 'plugins':
 143                                 $o = admin_page_plugins($a);
 144                                 break;
 145                         case 'themes':
 146                                 $o = admin_page_themes($a);
 147                                 break;
 148                         case 'logs':
 149                                 $o = admin_page_logs($a);
 150                                 break;
 151                         case 'dbsync':
 152                                 $o = admin_page_dbsync($a);
 153                                 break;
 154                         case 'update':
 155                                 $o = admin_page_remoteupdate($a);
 156                                 break;
 157                         default:
 158                                 notice( t("Item not found.") );
 159                 }
 160         } else {
 161                 $o = admin_page_summary($a);
 162         }
 163
 164         if(is_ajax()) {
 165                 echo $o;
 166                 killme();
 167                 return '';
 168         } else {
 169                 return $o;
 170         }
 171 }
 172
 173
 174 /**
 175  * Admin Summary Page
 176  * @param App $a
 177  * @return string
 178  */
 179 function admin_page_summary(&$a) {
 180         $r = q("SELECT `page-flags`, COUNT(uid) as `count` FROM `user` GROUP BY `page-flags`");
 181         $accounts = Array(
 182                 Array( t('Normal Account'), 0),
 183                 Array( t('Soapbox Account'), 0),
 184                 Array( t('Community/Celebrity Account'), 0),
 185                 Array( t('Automatic Friend Account'), 0),
 186                 Array( t('Blog Account'), 0),
 187                 Array( t('Private Forum'), 0)
 188         );
 189
 190         $users=0;
 191         foreach ($r as $u){ $accounts[$u['page-flags']][1] = $u['count']; $users+= $u['count']; }
 192
 193         logger('accounts: ' . print_r($accounts,true),LOGGER_DATA);
 194
 195         $r = q("SELECT COUNT(id) as `count` FROM `register`");
 196         $pending = $r[0]['count'];
 197
 198         $r = q("select count(*) as total from deliverq where 1");
 199         $deliverq = (($r) ? $r[0]['total'] : 0);
 200
 201         $r = q("select count(*) as total from queue where 1");
 202         $queue = (($r) ? $r[0]['total'] : 0);
 203
 204         // We can do better, but this is a quick queue status
 205
 206         $queues = array( 'label' => t('Message queues'), 'deliverq' => $deliverq, 'queue' => $queue );
 207
 208
 209         $t = get_markup_template("admin_summary.tpl");
 210         return replace_macros($t, array(
 211                 '$title' => t('Administration'),
 212                 '$page' => t('Summary'),
 213                 '$queues' => $queues,
 214                 '$users' => Array( t('Registered users'), $users),
 215                 '$accounts' => $accounts,
 216                 '$pending' => Array( t('Pending registrations'), $pending),
 217                 '$version' => Array( t('Version'), FRIENDICA_VERSION),
 218                 '$build' =>  get_config('system','build'),
 219                 '$plugins' => Array( t('Active plugins'), $a->plugins )
 220         ));
 221 }
 222
 223
 224 /**
 225  * Admin Site Page
 226  *  @param App $a
 227  */
 228 function admin_page_site_post(&$a){
 229         if (!x($_POST,"page_site")){
 230                 return;
 231         }
 232
 233         check_form_security_token_redirectOnErr('/admin/site', 'admin_site');
 234
 235         $sitename               =       ((x($_POST,'sitename'))                 ? notags(trim($_POST['sitename']))              : '');
 236         $banner                 =       ((x($_POST,'banner'))                   ? trim($_POST['banner'])                        : false);
 237         $language               =       ((x($_POST,'language'))                 ? notags(trim($_POST['language']))              : '');
 238         $theme                  =       ((x($_POST,'theme'))                    ? notags(trim($_POST['theme']))                 : '');
 239         $theme_mobile           =       ((x($_POST,'theme_mobile'))             ? notags(trim($_POST['theme_mobile']))          : '');
 240         $maximagesize           =       ((x($_POST,'maximagesize'))             ? intval(trim($_POST['maximagesize']))          :  0);
 241         $maximagelength         =       ((x($_POST,'maximagelength'))           ? intval(trim($_POST['maximagelength']))        :  MAX_IMAGE_LENGTH);
 242         $jpegimagequality       =       ((x($_POST,'jpegimagequality'))         ? intval(trim($_POST['jpegimagequality']))      :  JPEG_QUALITY);
 243
 244
 245         $register_policy        =       ((x($_POST,'register_policy'))          ? intval(trim($_POST['register_policy']))       :  0);
 246         $daily_registrations    =       ((x($_POST,'max_daily_registrations'))  ? intval(trim($_POST['max_daily_registrations']))       :0);
 247         $abandon_days           =       ((x($_POST,'abandon_days'))             ? intval(trim($_POST['abandon_days']))          :  0);
 248
 249         $register_text          =       ((x($_POST,'register_text'))            ? notags(trim($_POST['register_text']))         : '');
 250
 251         $allowed_sites          =       ((x($_POST,'allowed_sites'))            ? notags(trim($_POST['allowed_sites']))         : '');
 252         $allowed_email          =       ((x($_POST,'allowed_email'))            ? notags(trim($_POST['allowed_email']))         : '');
 253         $block_public           =       ((x($_POST,'block_public'))             ? True                                          : False);
 254         $force_publish          =       ((x($_POST,'publish_all'))              ? True                                          : False);
 255         $global_directory       =       ((x($_POST,'directory_submit_url'))     ? notags(trim($_POST['directory_submit_url']))  : '');
 256         $thread_allow           =       ((x($_POST,'thread_allow'))             ? True                                          : False);
 257         $newuser_private                =       ((x($_POST,'newuser_private'))          ? True                                          : False);
 258         $enotify_no_content             =       ((x($_POST,'enotify_no_content'))       ? True                                          : False);
 259
 260         $no_multi_reg           =       ((x($_POST,'no_multi_reg'))             ? True                                          : False);
 261         $no_openid              =       !((x($_POST,'no_openid'))               ? True                                          : False);
 262         $no_regfullname         =       !((x($_POST,'no_regfullname'))          ? True                                          : False);
 263         $no_utf                 =       !((x($_POST,'no_utf'))                  ? True                                          : False);
 264         $no_community_page      =       !((x($_POST,'no_community_page'))       ? True                                          : False);
 265
 266         $verifyssl              =       ((x($_POST,'verifyssl'))                ? True                                          : False);
 267         $proxyuser              =       ((x($_POST,'proxyuser'))                ? notags(trim($_POST['proxyuser']))             : '');
 268         $proxy                  =       ((x($_POST,'proxy'))                    ? notags(trim($_POST['proxy']))                 : '');
 269         $timeout                =       ((x($_POST,'timeout'))                  ? intval(trim($_POST['timeout']))               : 60);
 270         $delivery_interval      =       ((x($_POST,'delivery_interval'))        ? intval(trim($_POST['delivery_interval']))     : 0);
 271         $poll_interval          =       ((x($_POST,'poll_interval'))            ? intval(trim($_POST['poll_interval']))         : 0);
 272         $maxloadavg             =       ((x($_POST,'maxloadavg'))               ? intval(trim($_POST['maxloadavg']))            : 50);
 273         $dfrn_only              =       ((x($_POST,'dfrn_only'))                ? True                                          : False);
 274         $ostatus_disabled       =       !((x($_POST,'ostatus_disabled'))        ? True                                          : False);
 275         $diaspora_enabled       =       ((x($_POST,'diaspora_enabled'))         ? True                                          : False);
 276         $ssl_policy             =       ((x($_POST,'ssl_policy'))               ? intval($_POST['ssl_policy'])                  : 0);
 277         $new_share              =       ((x($_POST,'new_share'))                ? True                                          : False);
 278         $hide_help              =       ((x($_POST,'hide_help'))                ? True                                          : False);
 279         $use_fulltext_engine    =       ((x($_POST,'use_fulltext_engine'))      ? True                                          : False);
 280         $itemcache              =       ((x($_POST,'itemcache'))                ? notags(trim($_POST['itemcache']))             : '');
 281         $itemcache_duration     =       ((x($_POST,'itemcache_duration'))       ? intval($_POST['itemcache_duration'])          : 0);
 282         $lockpath               =       ((x($_POST,'lockpath'))                 ? notags(trim($_POST['lockpath']))              : '');
 283         $temppath               =       ((x($_POST,'temppath'))                 ? notags(trim($_POST['temppath']))              : '');
 284         $basepath               =       ((x($_POST,'basepath'))                 ? notags(trim($_POST['basepath']))              : '');
 285         $singleuser             =       ((x($_POST,'singleuser'))               ? notags(trim($_POST['singleuser']))            : '');
 286
 287         if($ssl_policy != intval(get_config('system','ssl_policy'))) {
 288                 if($ssl_policy == SSL_POLICY_FULL) {
 289                         q("update `contact` set
 290                                 `url`     = replace(`url`    , 'http:' , 'https:'),
 291                                 `photo`   = replace(`photo`  , 'http:' , 'https:'),
 292                                 `thumb`   = replace(`thumb`  , 'http:' , 'https:'),
 293                                 `micro`   = replace(`micro`  , 'http:' , 'https:'),
 294                                 `request` = replace(`request`, 'http:' , 'https:'),
 295                                 `notify`  = replace(`notify` , 'http:' , 'https:'),
 296                                 `poll`    = replace(`poll`   , 'http:' , 'https:'),
 297                                 `confirm` = replace(`confirm`, 'http:' , 'https:'),
 298                                 `poco`    = replace(`poco`   , 'http:' , 'https:')
 299                                 where `self` = 1"
 300                         );
 301                         q("update `profile` set
 302                                 `photo`   = replace(`photo`  , 'http:' , 'https:'),
 303                                 `thumb`   = replace(`thumb`  , 'http:' , 'https:')
 304                                 where 1 "
 305                         );
 306                 }
 307                 elseif($ssl_policy == SSL_POLICY_SELFSIGN) {
 308                         q("update `contact` set
 309                                 `url`     = replace(`url`    , 'https:' , 'http:'),
 310                                 `photo`   = replace(`photo`  , 'https:' , 'http:'),
 311                                 `thumb`   = replace(`thumb`  , 'https:' , 'http:'),
 312                                 `micro`   = replace(`micro`  , 'https:' , 'http:'),
 313                                 `request` = replace(`request`, 'https:' , 'http:'),
 314                                 `notify`  = replace(`notify` , 'https:' , 'http:'),
 315                                 `poll`    = replace(`poll`   , 'https:' , 'http:'),
 316                                 `confirm` = replace(`confirm`, 'https:' , 'http:'),
 317                                 `poco`    = replace(`poco`   , 'https:' , 'http:')
 318                                 where `self` = 1"
 319                         );
 320                         q("update `profile` set
 321                                 `photo`   = replace(`photo`  , 'https:' , 'http:'),
 322                                 `thumb`   = replace(`thumb`  , 'https:' , 'http:')
 323                                 where 1 "
 324                         );
 325                 }
 326         }
 327         set_config('system','ssl_policy',$ssl_policy);
 328         set_config('system','delivery_interval',$delivery_interval);
 329         set_config('system','poll_interval',$poll_interval);
 330         set_config('system','maxloadavg',$maxloadavg);
 331         set_config('config','sitename',$sitename);
 332         if ($banner==""){
 333                 // don't know why, but del_config doesn't work...
 334                 q("DELETE FROM `config` WHERE `cat` = '%s' AND `k` = '%s' LIMIT 1",
 335                         dbesc("system"),
 336                         dbesc("banner")
 337                 );
 338         } else {
 339                 set_config('system','banner', $banner);
 340         }
 341         set_config('system','language', $language);
 342         set_config('system','theme', $theme);
 343         if ( $theme_mobile === '---' ) {
 344                 del_config('system','mobile-theme');
 345         } else {
 346                 set_config('system','mobile-theme', $theme_mobile);
 347         }
 348         if ( $singleuser === '---' ) {
 349             del_config('system','singleuser');
 350         } else {
 351             set_config('system','singleuser', $singleuser);
 352         }
 353         set_config('system','maximagesize', $maximagesize);
 354         set_config('system','max_image_length', $maximagelength);
 355         set_config('system','jpeg_quality', $jpegimagequality);
 356
 357         set_config('config','register_policy', $register_policy);
 358         set_config('system','max_daily_registrations', $daily_registrations);
 359         set_config('system','account_abandon_days', $abandon_days);
 360         set_config('config','register_text', $register_text);
 361         set_config('system','allowed_sites', $allowed_sites);
 362         set_config('system','allowed_email', $allowed_email);
 363         set_config('system','block_public', $block_public);
 364         set_config('system','publish_all', $force_publish);
 365         if ($global_directory==""){
 366                 // don't know why, but del_config doesn't work...
 367                 q("DELETE FROM `config` WHERE `cat` = '%s' AND `k` = '%s' LIMIT 1",
 368                         dbesc("system"),
 369                         dbesc("directory_submit_url")
 370                 );
 371         } else {
 372                 set_config('system','directory_submit_url', $global_directory);
 373         }
 374         set_config('system','thread_allow', $thread_allow);
 375         set_config('system','newuser_private', $newuser_private);
 376         set_config('system','enotify_no_content', $enotify_no_content);
 377
 378         set_config('system','block_extended_register', $no_multi_reg);
 379         set_config('system','no_openid', $no_openid);
 380         set_config('system','no_regfullname', $no_regfullname);
 381         set_config('system','no_community_page', $no_community_page);
 382         set_config('system','no_utf', $no_utf);
 383         set_config('system','verifyssl', $verifyssl);
 384         set_config('system','proxyuser', $proxyuser);
 385         set_config('system','proxy', $proxy);
 386         set_config('system','curl_timeout', $timeout);
 387         set_config('system','dfrn_only', $dfrn_only);
 388         set_config('system','ostatus_disabled', $ostatus_disabled);
 389         set_config('system','diaspora_enabled', $diaspora_enabled);
 390
 391         set_config('system','new_share', $new_share);
 392         set_config('system','hide_help', $hide_help);
 393         set_config('system','use_fulltext_engine', $use_fulltext_engine);
 394         set_config('system','itemcache', $itemcache);
 395         set_config('system','itemcache_duration', $itemcache_duration);
 396         set_config('system','lockpath', $lockpath);
 397         set_config('system','temppath', $temppath);
 398         set_config('system','basepath', $basepath);
 399
 400
 401         info( t('Site settings updated.') . EOL);
 402         goaway($a->get_baseurl(true) . '/admin/site' );
 403         return; // NOTREACHED
 404
 405 }
 406
 407 /**
 408  * @param  App $a
 409  * @return string
 410  */
 411 function admin_page_site(&$a) {
 412
 413         /* Installed langs */
 414         $lang_choices = array();
 415         $langs = glob('view/*/strings.php');
 416
 417         if(is_array($langs) && count($langs)) {
 418                 if(! in_array('view/en/strings.php',$langs))
 419                         $langs[] = 'view/en/';
 420                 asort($langs);
 421                 foreach($langs as $l) {
 422                         $t = explode("/",$l);
 423                         $lang_choices[$t[1]] = $t[1];
 424                 }
 425         }
 426
 427         /* Installed themes */
 428         $theme_choices = array();
 429         $theme_choices_mobile = array();
 430         $theme_choices_mobile["---"] = t("No special theme for mobile devices");
 431         $files = glob('view/theme/*');
 432         if($files) {
 433                 foreach($files as $file) {
 434                         $f = basename($file);
 435                         $theme_name = ((file_exists($file . '/experimental')) ?  sprintf("%s - \x28Experimental\x29", $f) : $f);
 436             if (file_exists($file . '/mobile')) {
 437                 $theme_choices_mobile[$f] = $theme_name;
 438             }
 439                 else {
 440                 $theme_choices[$f] = $theme_name;
 441                         }
 442                 }
 443         }
 444
 445         /* get user names to make the install a personal install of X */
 446         $user_names = array();
 447         $user_names['---'] = t('Multi user instance');
 448         $users = q("SELECT username, nickname FROM `user`");
 449         foreach ($users as $user) {
 450             $user_names[$user['nickname']] = $user['username'];
 451         }
 452
 453         /* Banner */
 454         $banner = get_config('system','banner');
 455         if($banner == false)
 456                 $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>';
 457         $banner = htmlspecialchars($banner);
 458
 459         //echo "<pre>"; var_dump($lang_choices); die("</pre>");
 460
 461         /* Register policy */
 462         $register_choices = Array(
 463                 REGISTER_CLOSED => t("Closed"),
 464                 REGISTER_APPROVE => t("Requires approval"),
 465                 REGISTER_OPEN => t("Open")
 466         );
 467
 468         $ssl_choices = array(
 469                 SSL_POLICY_NONE => t("No SSL policy, links will track page SSL state"),
 470                 SSL_POLICY_FULL => t("Force all links to use SSL"),
 471                 SSL_POLICY_SELFSIGN => t("Self-signed certificate, use SSL for local links only (discouraged)")
 472         );
 473
 474         $t = get_markup_template("admin_site.tpl");
 475         return replace_macros($t, array(
 476                 '$title' => t('Administration'),
 477                 '$page' => t('Site'),
 478                 '$submit' => t('Submit'),
 479                 '$registration' => t('Registration'),
 480                 '$upload' => t('File upload'),
 481                 '$corporate' => t('Policies'),
 482                 '$advanced' => t('Advanced'),
 483                 '$performance' => t('Performance'),
 484
 485                 '$baseurl' => $a->get_baseurl(true),
 486                 // name, label, value, help string, extra data...
 487                 '$sitename'             => array('sitename', t("Site name"), htmlentities($a->config['sitename'], ENT_QUOTES), 'UTF-8'),
 488                 '$banner'               => array('banner', t("Banner/Logo"), $banner, ""),
 489                 '$language'             => array('language', t("System language"), get_config('system','language'), "", $lang_choices),
 490                 '$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),
 491                 '$theme_mobile'         => array('theme_mobile', t("Mobile system theme"), get_config('system','mobile-theme'), t("Theme for mobile devices"), $theme_choices_mobile),
 492                 '$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),
 493                 '$new_share'            => array('new_share', t("'Share' element"), get_config('system','new_share'), t("Activates the bbcode element 'share' for repeating items.")),
 494                 '$hide_help'            => array('hide_help', t("Hide help entry from navigation menu"), get_config('system','hide_help'), t("Hides the menu entry for the Help pages from the navigation menu. You can still access it calling /help directly.")),
 495                 '$singleuser'           => array('singleuser', t("Single user instance"), get_config('system','singleuser'), t("Make this instance multi-user or single-user for the named user"), $user_names),
 496                 '$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.")),
 497                 '$maximagelength'               => array('maximagelength', t("Maximum image length"), get_config('system','max_image_length'), t("Maximum length in pixels of the longest side of uploaded images. Default is -1, which means no limits.")),
 498                 '$jpegimagequality'             => array('jpegimagequality', t("JPEG image quality"), get_config('system','jpeg_quality'), t("Uploaded JPEGS will be saved at this quality setting [0-100]. Default is 100, which is full quality.")),
 499
 500                 '$register_policy'      => array('register_policy', t("Register policy"), $a->config['register_policy'], "", $register_choices),
 501                 '$daily_registrations'  => array('max_daily_registrations', t("Maximum Daily Registrations"), get_config('system', 'max_daily_registrations'), t("If registration is permitted above, this sets the maximum number of new user registrations to accept per day.  If register is set to closed, this setting has no effect.")),
 502                 '$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.")),
 503                 '$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.')),
 504                 '$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")),
 505                 '$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")),
 506                 '$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.")),
 507                 '$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.")),
 508                 '$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.")),
 509                 '$thread_allow'         => array('thread_allow', t("Allow threaded items"), get_config('system','thread_allow'), t("Allow infinite level threading for items on this site.")),
 510                 '$newuser_private'      => array('newuser_private', t("Private posts by default for new users"), get_config('system','newuser_private'), t("Set default post permissions for all new members to the default privacy group rather than public.")),
 511                 '$enotify_no_content'   => array('enotify_no_content', t("Don't include post content in email notifications"), get_config('system','enotify_no_content'), t("Don't include the content of a post/comment/private message/etc. in the email notifications that are sent out from this site, as a privacy measure.")),
 512
 513                 '$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.")),
 514                 '$no_openid'            => array('no_openid', t("OpenID support"), !get_config('system','no_openid'), t("OpenID support for registration and logins.")),
 515                 '$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")),
 516                 '$no_utf'               => array('no_utf', t("UTF-8 Regular expressions"), !get_config('system','no_utf'), t("Use PHP UTF8 regular expressions")),
 517                 '$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.")),
 518                 '$ostatus_disabled'     => array('ostatus_disabled', t("Enable OStatus support"), !get_config('system','ostatus_disabled'), 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.")),
 519                 '$diaspora_enabled'     => array('diaspora_enabled', t("Enable Diaspora support"), get_config('system','diaspora_enabled'), t("Provide built-in Diaspora network compatibility.")),
 520                 '$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.")),
 521                 '$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.")),
 522                 '$proxyuser'            => array('proxyuser', t("Proxy user"), get_config('system','proxyuser'), ""),
 523                 '$proxy'                => array('proxy', t("Proxy URL"), get_config('system','proxy'), ""),
 524                 '$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).")),
 525                 '$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.")),
 526                 '$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.")),
 527                 '$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.")),
 528
 529                 '$use_fulltext_engine'  => array('use_fulltext_engine', t("Use MySQL full text engine"), get_config('system','use_fulltext_engine'), t("Activates the full text engine. Speeds up search - but can only search for four and more characters.")),
 530                 '$itemcache'            => array('itemcache', t("Path to item cache"), get_config('system','itemcache'), "The item caches buffers generated bbcode and external images."),
 531                 '$itemcache_duration'   => array('itemcache_duration', t("Cache duration in seconds"), get_config('system','itemcache_duration'), t("How long should the cache files be hold? Default value is 86400 seconds (One day).")),
 532                 '$lockpath'             => array('lockpath', t("Path for lock file"), get_config('system','lockpath'), "The lock file is used to avoid multiple pollers at one time. Only define a folder here."),
 533                 '$temppath'             => array('temppath', t("Temp path"), get_config('system','temppath'), "If you have a restricted system where the webserver can't access the system temp path, enter another path here."),
 534                 '$basepath'             => array('basepath', t("Base path to installation"), get_config('system','basepath'), "If the system cannot detect the correct path to your installation, enter the correct path here. This setting should only be set if you are using a restricted system and symbolic links to your webroot."),
 535
 536         '$form_security_token' => get_form_security_token("admin_site"),
 537
 538         ));
 539
 540 }
 541
 542
 543 function admin_page_dbsync(&$a) {
 544
 545         $o = '';
 546
 547         if($a->argc > 3 && intval($a->argv[3]) && $a->argv[2] === 'mark') {
 548                 set_config('database', 'update_' . intval($a->argv[3]), 'success');
 549                 $curr = get_config('system','build');
 550                 if(intval($curr) == intval($a->argv[3]))
 551                         set_config('system','build',intval($curr) + 1);
 552                 info( t('Update has been marked successful') . EOL);
 553                 goaway($a->get_baseurl(true) . '/admin/dbsync');
 554         }
 555
 556         if($a->argc > 2 && intval($a->argv[2])) {
 557                 require_once('update.php');
 558                 $func = 'update_' . intval($a->argv[2]);
 559                 if(function_exists($func)) {
 560                         $retval = $func();
 561                         if($retval === UPDATE_FAILED) {
 562                                 $o .= sprintf( t('Executing %s failed. Check system logs.'), $func);
 563                         }
 564                         elseif($retval === UPDATE_SUCCESS) {
 565                                 $o .= sprintf( t('Update %s was successfully applied.', $func));
 566                                 set_config('database',$func, 'success');
 567                         }
 568                         else
 569                                 $o .= sprintf( t('Update %s did not return a status. Unknown if it succeeded.'), $func);
 570                 }
 571                 else
 572                         $o .= sprintf( t('Update function %s could not be found.'), $func);
 573                 return $o;
 574         }
 575
 576         $failed = array();
 577         $r = q("select * from config where `cat` = 'database' ");
 578         if(count($r)) {
 579                 foreach($r as $rr) {
 580                         $upd = intval(substr($rr['k'],7));
 581                         if($upd < 1139 || $rr['v'] === 'success')
 582                                 continue;
 583                         $failed[] = $upd;
 584                 }
 585         }
 586         if(! count($failed))
 587                 return '<h3>' . t('No failed updates.') . '</h3>';
 588
 589         $o = replace_macros(get_markup_template('failed_updates.tpl'),array(
 590                 '$base' => $a->get_baseurl(true),
 591                 '$banner' => t('Failed Updates'),
 592                 '$desc' => t('This does not include updates prior to 1139, which did not return a status.'),
 593                 '$mark' => t('Mark success (if update was manually applied)'),
 594                 '$apply' => t('Attempt to execute this update step automatically'),
 595                 '$failed' => $failed
 596         ));
 597
 598         return $o;
 599
 600 }
 601
 602 /**
 603  * Users admin page
 604  *
 605  * @param App $a
 606  */
 607 function admin_page_users_post(&$a){
 608         $pending = ( x($_POST, 'pending') ? $_POST['pending'] : Array() );
 609         $users = ( x($_POST, 'user') ? $_POST['user'] : Array() );
 610
 611     check_form_security_token_redirectOnErr('/admin/users', 'admin_users');
 612
 613         if (x($_POST,'page_users_block')){
 614                 foreach($users as $uid){
 615                         q("UPDATE `user` SET `blocked`=1-`blocked` WHERE `uid`=%s",
 616                                 intval( $uid )
 617                         );
 618                 }
 619                 notice( sprintf( tt("%s user blocked/unblocked", "%s users blocked/unblocked", count($users)), count($users)) );
 620         }
 621         if (x($_POST,'page_users_delete')){
 622                 require_once("include/Contact.php");
 623                 foreach($users as $uid){
 624                         user_remove($uid);
 625                 }
 626                 notice( sprintf( tt("%s user deleted", "%s users deleted", count($users)), count($users)) );
 627         }
 628
 629         if (x($_POST,'page_users_approve')){
 630                 require_once("mod/regmod.php");
 631                 foreach($pending as $hash){
 632                         user_allow($hash);
 633                 }
 634         }
 635         if (x($_POST,'page_users_deny')){
 636                 require_once("mod/regmod.php");
 637                 foreach($pending as $hash){
 638                         user_deny($hash);
 639                 }
 640         }
 641         goaway($a->get_baseurl(true) . '/admin/users' );
 642         return; // NOTREACHED
 643 }
 644
 645 /**
 646  * @param App $a
 647  * @return string
 648  */
 649 function admin_page_users(&$a){
 650         if ($a->argc>2) {
 651                 $uid = $a->argv[3];
 652                 $user = q("SELECT * FROM `user` WHERE `uid`=%d", intval($uid));
 653                 if (count($user)==0){
 654                         notice( 'User not found' . EOL);
 655                         goaway($a->get_baseurl(true) . '/admin/users' );
 656                         return ''; // NOTREACHED
 657                 }
 658                 switch($a->argv[2]){
 659                         case "delete":{
 660                 check_form_security_token_redirectOnErr('/admin/users', 'admin_users', 't');
 661                                 // delete user
 662                                 require_once("include/Contact.php");
 663                                 user_remove($uid);
 664
 665                                 notice( sprintf(t("User '%s' deleted"), $user[0]['username']) . EOL);
 666                         }; break;
 667                         case "block":{
 668                 check_form_security_token_redirectOnErr('/admin/users', 'admin_users', 't');
 669                                 q("UPDATE `user` SET `blocked`=%d WHERE `uid`=%s",
 670                                         intval( 1-$user[0]['blocked'] ),
 671                                         intval( $uid )
 672                                 );
 673                                 notice( sprintf( ($user[0]['blocked']?t("User '%s' unblocked"):t("User '%s' blocked")) , $user[0]['username']) . EOL);
 674                         }; break;
 675                 }
 676                 goaway($a->get_baseurl(true) . '/admin/users' );
 677                 return ''; // NOTREACHED
 678
 679         }
 680
 681         /* get pending */
 682         $pending = q("SELECT `register`.*, `contact`.`name`, `user`.`email`
 683                                  FROM `register`
 684                                  LEFT JOIN `contact` ON `register`.`uid` = `contact`.`uid`
 685                                  LEFT JOIN `user` ON `register`.`uid` = `user`.`uid`;");
 686
 687
 688         /* get users */
 689
 690         $total = q("SELECT count(*) as total FROM `user` where 1");
 691         if(count($total)) {
 692                 $a->set_pager_total($total[0]['total']);
 693                 $a->set_pager_itemspage(100);
 694         }
 695
 696
 697         $users = q("SELECT `user` . * , `contact`.`name` , `contact`.`url` , `contact`.`micro`, `lastitem`.`lastitem_date`, `user`.`account_expired`
 698                                 FROM
 699                                         (SELECT MAX(`item`.`changed`) as `lastitem_date`, `item`.`uid`
 700                                         FROM `item`
 701                                         WHERE `item`.`type` = 'wall'
 702                                         GROUP BY `item`.`uid`) AS `lastitem`
 703                                                  RIGHT OUTER JOIN `user` ON `user`.`uid` = `lastitem`.`uid`,
 704                                            `contact`
 705                                 WHERE
 706                                            `user`.`uid` = `contact`.`uid`
 707                                                 AND `user`.`verified` =1
 708                                         AND `contact`.`self` =1
 709                                 ORDER BY `contact`.`name` LIMIT %d, %d
 710                                 ",
 711                                 intval($a->pager['start']),
 712                                 intval($a->pager['itemspage'])
 713                                 );
 714
 715         function _setup_users($e){
 716         $a = get_app();
 717                 $accounts = Array(
 718                         t('Normal Account'),
 719                         t('Soapbox Account'),
 720                         t('Community/Celebrity Account'),
 721                         t('Automatic Friend Account')
 722                 );
 723                 $e['page-flags'] = $accounts[$e['page-flags']];
 724                 $e['register_date'] = relative_date($e['register_date']);
 725                 $e['login_date'] = relative_date($e['login_date']);
 726                 $e['lastitem_date'] = relative_date($e['lastitem_date']);
 727         $e['is_admin'] = ($e['email'] === $a->config['admin_email']);
 728                 return $e;
 729         }
 730         $users = array_map("_setup_users", $users);
 731
 732
 733         // Get rid of dashes in key names, Smarty3 can't handle them
 734         foreach($users as $key => $user) {
 735                 $new_user = array();
 736                 foreach($user as $k => $v) {
 737                         $k = str_replace('-','_',$k);
 738                         $new_user[$k] = $v;
 739                 }
 740                 $users[$key] = $new_user;
 741         }
 742
 743         $t = get_markup_template("admin_users.tpl");
 744         $o = replace_macros($t, array(
 745                 // strings //
 746                 '$title' => t('Administration'),
 747                 '$page' => t('Users'),
 748                 '$submit' => t('Submit'),
 749                 '$select_all' => t('select all'),
 750                 '$h_pending' => t('User registrations waiting for confirm'),
 751                 '$th_pending' => array( t('Request date'), t('Name'), t('Email') ),
 752                 '$no_pending' =>  t('No registrations.'),
 753                 '$approve' => t('Approve'),
 754                 '$deny' => t('Deny'),
 755                 '$delete' => t('Delete'),
 756                 '$block' => t('Block'),
 757                 '$unblock' => t('Unblock'),
 758         '$siteadmin' => t('Site admin'),
 759         '$accountexpired' => t('Account expired'),
 760
 761                 '$h_users' => t('Users'),
 762                 '$th_users' => array( t('Name'), t('Email'), t('Register date'), t('Last login'), t('Last item'),  t('Account') ),
 763
 764                 '$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?'),
 765                 '$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?'),
 766
 767         '$form_security_token' => get_form_security_token("admin_users"),
 768
 769                 // values //
 770                 '$baseurl' => $a->get_baseurl(true),
 771
 772                 '$pending' => $pending,
 773                 '$users' => $users,
 774         ));
 775         $o .= paginate($a);
 776         return $o;
 777 }
 778
 779
 780 /**
 781  * Plugins admin page
 782  *
 783  * @param App $a
 784  * @return string
 785  */
 786 function admin_page_plugins(&$a){
 787
 788         /**
 789          * Single plugin
 790          */
 791         if ($a->argc == 3){
 792                 $plugin = $a->argv[2];
 793                 if (!is_file("addon/$plugin/$plugin.php")){
 794                         notice( t("Item not found.") );
 795                         return '';
 796                 }
 797
 798                 if (x($_GET,"a") && $_GET['a']=="t"){
 799                         check_form_security_token_redirectOnErr('/admin/plugins', 'admin_themes', 't');
 800
 801                         // Toggle plugin status
 802                         $idx = array_search($plugin, $a->plugins);
 803                         if ($idx !== false){
 804                                 unset($a->plugins[$idx]);
 805                                 uninstall_plugin($plugin);
 806                                 info( sprintf( t("Plugin %s disabled."), $plugin ) );
 807                         } else {
 808                                 $a->plugins[] = $plugin;
 809                                 install_plugin($plugin);
 810                                 info( sprintf( t("Plugin %s enabled."), $plugin ) );
 811                         }
 812                         set_config("system","addon", implode(", ",$a->plugins));
 813                         goaway($a->get_baseurl(true) . '/admin/plugins' );
 814                         return ''; // NOTREACHED
 815                 }
 816                 // display plugin details
 817                 require_once('library/markdown.php');
 818
 819                 if (in_array($plugin, $a->plugins)){
 820                         $status="on"; $action= t("Disable");
 821                 } else {
 822                         $status="off"; $action= t("Enable");
 823                 }
 824
 825                 $readme=Null;
 826                 if (is_file("addon/$plugin/README.md")){
 827                         $readme = file_get_contents("addon/$plugin/README.md");
 828                         $readme = Markdown($readme);
 829                 } else if (is_file("addon/$plugin/README")){
 830                         $readme = "<pre>". file_get_contents("addon/$plugin/README") ."</pre>";
 831                 }
 832
 833                 $admin_form="";
 834                 if (is_array($a->plugins_admin) && in_array($plugin, $a->plugins_admin)){
 835                         @require_once("addon/$plugin/$plugin.php");
 836                         $func = $plugin.'_plugin_admin';
 837                         $func($a, $admin_form);
 838                 }
 839
 840                 $t = get_markup_template("admin_plugins_details.tpl");
 841
 842                 return replace_macros($t, array(
 843                         '$title' => t('Administration'),
 844                         '$page' => t('Plugins'),
 845                         '$toggle' => t('Toggle'),
 846                         '$settings' => t('Settings'),
 847                         '$baseurl' => $a->get_baseurl(true),
 848
 849                         '$plugin' => $plugin,
 850                         '$status' => $status,
 851                         '$action' => $action,
 852                         '$info' => get_plugin_info($plugin),
 853                         '$str_author' => t('Author: '),
 854                         '$str_maintainer' => t('Maintainer: '),
 855
 856                         '$admin_form' => $admin_form,
 857                         '$function' => 'plugins',
 858                         '$screenshot' => '',
 859                         '$readme' => $readme,
 860
 861                         '$form_security_token' => get_form_security_token("admin_themes"),
 862                 ));
 863         }
 864
 865
 866
 867         /**
 868          * List plugins
 869          */
 870
 871         $plugins = array();
 872         $files = glob("addon/*/");
 873         if($files) {
 874                 foreach($files as $file) {
 875                         if (is_dir($file)){
 876                                 list($tmp, $id)=array_map("trim", explode("/",$file));
 877                                 $info = get_plugin_info($id);
 878                                 $plugins[] = array( $id, (in_array($id,  $a->plugins)?"on":"off") , $info);
 879                         }
 880                 }
 881         }
 882
 883         $t = get_markup_template("admin_plugins.tpl");
 884         return replace_macros($t, array(
 885                 '$title' => t('Administration'),
 886                 '$page' => t('Plugins'),
 887                 '$submit' => t('Submit'),
 888                 '$baseurl' => $a->get_baseurl(true),
 889                 '$function' => 'plugins',
 890                 '$plugins' => $plugins,
 891         '$form_security_token' => get_form_security_token("admin_themes"),
 892         ));
 893 }
 894
 895 /**
 896  * @param array $themes
 897  * @param string $th
 898  * @param int $result
 899  */
 900 function toggle_theme(&$themes,$th,&$result) {
 901         for($x = 0; $x < count($themes); $x ++) {
 902                 if($themes[$x]['name'] === $th) {
 903                         if($themes[$x]['allowed']) {
 904                                 $themes[$x]['allowed'] = 0;
 905                                 $result = 0;
 906                         }
 907                         else {
 908                                 $themes[$x]['allowed'] = 1;
 909                                 $result = 1;
 910                         }
 911                 }
 912         }
 913 }
 914
 915 /**
 916  * @param array $themes
 917  * @param string $th
 918  * @return int
 919  */
 920 function theme_status($themes,$th) {
 921         for($x = 0; $x < count($themes); $x ++) {
 922                 if($themes[$x]['name'] === $th) {
 923                         if($themes[$x]['allowed']) {
 924                                 return 1;
 925                         }
 926                         else {
 927                                 return 0;
 928                         }
 929                 }
 930         }
 931         return 0;
 932 }
 933
 934
 935 /**
 936  * @param array $themes
 937  * @return string
 938  */
 939 function rebuild_theme_table($themes) {
 940         $o = '';
 941         if(count($themes)) {
 942                 foreach($themes as $th) {
 943                         if($th['allowed']) {
 944                                 if(strlen($o))
 945                                         $o .= ',';
 946                                 $o .= $th['name'];
 947                         }
 948                 }
 949         }
 950         return $o;
 951 }
 952
 953
 954 /**
 955  * Themes admin page
 956  *
 957  * @param App $a
 958  * @return string
 959  */
 960 function admin_page_themes(&$a){
 961
 962         $allowed_themes_str = get_config('system','allowed_themes');
 963         $allowed_themes_raw = explode(',',$allowed_themes_str);
 964         $allowed_themes = array();
 965         if(count($allowed_themes_raw))
 966                 foreach($allowed_themes_raw as $x)
 967                         if(strlen(trim($x)))
 968                                 $allowed_themes[] = trim($x);
 969
 970         $themes = array();
 971     $files = glob('view/theme/*');
 972     if($files) {
 973         foreach($files as $file) {
 974             $f = basename($file);
 975             $is_experimental = intval(file_exists($file . '/experimental'));
 976                         $is_supported = 1-(intval(file_exists($file . '/unsupported'))); // Is not used yet
 977                         $is_allowed = intval(in_array($f,$allowed_themes));
 978                         $themes[] = array('name' => $f, 'experimental' => $is_experimental, 'supported' => $is_supported, 'allowed' => $is_allowed);
 979         }
 980     }
 981
 982         if(! count($themes)) {
 983                 notice( t('No themes found.'));
 984                 return '';
 985         }
 986
 987         /**
 988          * Single theme
 989          */
 990
 991         if ($a->argc == 3){
 992                 $theme = $a->argv[2];
 993                 if(! is_dir("view/theme/$theme")){
 994                         notice( t("Item not found.") );
 995                         return '';
 996                 }
 997
 998                 if (x($_GET,"a") && $_GET['a']=="t"){
 999                         check_form_security_token_redirectOnErr('/admin/themes', 'admin_themes', 't');
1000
1001                         // Toggle theme status
1002
1003                         toggle_theme($themes,$theme,$result);
1004                         $s = rebuild_theme_table($themes);
1005                         if($result) {
1006                                 install_theme($theme);
1007                                 info( sprintf('Theme %s enabled.',$theme));
1008                         }
1009                         else {
1010                                 uninstall_theme($theme);
1011                                 info( sprintf('Theme %s disabled.',$theme));
1012                         }
1013
1014                         set_config('system','allowed_themes',$s);
1015                         goaway($a->get_baseurl(true) . '/admin/themes' );
1016                         return ''; // NOTREACHED
1017                 }
1018
1019                 // display theme details
1020                 require_once('library/markdown.php');
1021
1022                 if (theme_status($themes,$theme)) {
1023                         $status="on"; $action= t("Disable");
1024                 } else {
1025                         $status="off"; $action= t("Enable");
1026                 }
1027
1028                 $readme=Null;
1029                 if (is_file("view/theme/$theme/README.md")){
1030                         $readme = file_get_contents("view/theme/$theme/README.md");
1031                         $readme = Markdown($readme);
1032                 } else if (is_file("view/theme/$theme/README")){
1033                         $readme = "<pre>". file_get_contents("view/theme/$theme/README") ."</pre>";
1034                 }
1035
1036                 $admin_form="";
1037                 if (is_file("view/theme/$theme/config.php")){
1038                         require_once("view/theme/$theme/config.php");
1039                         if(function_exists("theme_admin")){
1040                                 $admin_form = theme_admin($a);
1041                         }
1042
1043                 }
1044
1045                 $screenshot = array( get_theme_screenshot($theme), t('Screenshot'));
1046                 if(! stristr($screenshot[0],$theme))
1047                         $screenshot = null;
1048
1049                 $t = get_markup_template("admin_plugins_details.tpl");
1050                 return replace_macros($t, array(
1051                         '$title' => t('Administration'),
1052                         '$page' => t('Themes'),
1053                         '$toggle' => t('Toggle'),
1054                         '$settings' => t('Settings'),
1055                         '$baseurl' => $a->get_baseurl(true),
1056
1057                         '$plugin' => $theme,
1058                         '$status' => $status,
1059                         '$action' => $action,
1060                         '$info' => get_theme_info($theme),
1061                         '$function' => 'themes',
1062                         '$admin_form' => $admin_form,
1063                         '$str_author' => t('Author: '),
1064                         '$str_maintainer' => t('Maintainer: '),
1065                         '$screenshot' => $screenshot,
1066                         '$readme' => $readme,
1067
1068                         '$form_security_token' => get_form_security_token("admin_themes"),
1069                 ));
1070         }
1071
1072         /**
1073          * List themes
1074          */
1075
1076         $xthemes = array();
1077         if($themes) {
1078                 foreach($themes as $th) {
1079                         $xthemes[] = array($th['name'],(($th['allowed']) ? "on" : "off"), get_theme_info($th['name']));
1080                 }
1081         }
1082
1083         $t = get_markup_template("admin_plugins.tpl");
1084         return replace_macros($t, array(
1085                 '$title' => t('Administration'),
1086                 '$page' => t('Themes'),
1087                 '$submit' => t('Submit'),
1088                 '$baseurl' => $a->get_baseurl(true),
1089                 '$function' => 'themes',
1090                 '$plugins' => $xthemes,
1091                 '$experimental' => t('[Experimental]'),
1092                 '$unsupported' => t('[Unsupported]'),
1093         '$form_security_token' => get_form_security_token("admin_themes"),
1094         ));
1095 }
1096
1097
1098 /**
1099  * Logs admin page
1100  *
1101  * @param App $a
1102  */
1103
1104 function admin_page_logs_post(&$a) {
1105         if (x($_POST,"page_logs")) {
1106         check_form_security_token_redirectOnErr('/admin/logs', 'admin_logs');
1107
1108                 $logfile                =       ((x($_POST,'logfile'))          ? notags(trim($_POST['logfile']))       : '');
1109                 $debugging              =       ((x($_POST,'debugging'))        ? true                                                          : false);
1110                 $loglevel               =       ((x($_POST,'loglevel'))         ? intval(trim($_POST['loglevel']))      : 0);
1111
1112                 set_config('system','logfile', $logfile);
1113                 set_config('system','debugging',  $debugging);
1114                 set_config('system','loglevel', $loglevel);
1115
1116
1117         }
1118
1119         info( t("Log settings updated.") );
1120         goaway($a->get_baseurl(true) . '/admin/logs' );
1121         return; // NOTREACHED
1122 }
1123
1124 /**
1125  * @param App $a
1126  * @return string
1127  */
1128 function admin_page_logs(&$a){
1129
1130         $log_choices = Array(
1131                 LOGGER_NORMAL => 'Normal',
1132                 LOGGER_TRACE => 'Trace',
1133                 LOGGER_DEBUG => 'Debug',
1134                 LOGGER_DATA => 'Data',
1135                 LOGGER_ALL => 'All'
1136         );
1137
1138         $t = get_markup_template("admin_logs.tpl");
1139
1140         $f = get_config('system','logfile');
1141
1142         $data = '';
1143
1144         if(!file_exists($f)) {
1145                 $data = t("Error trying to open <strong>$f</strong> log file.\r\n<br/>Check to see if file $f exist and is
1146 readable.");
1147         }
1148         else {
1149                 $fp = fopen($f, 'r');
1150                 if(!$fp) {
1151                         $data = t("Couldn't open <strong>$f</strong> log file.\r\n<br/>Check to see if file $f is readable.");
1152                 }
1153                 else {
1154                         $fstat = fstat($fp);
1155                         $size = $fstat['size'];
1156                         if($size != 0)
1157                         {
1158                                 if($size > 5000000 || $size < 0)
1159                                         $size = 5000000;
1160                                 $seek = fseek($fp,0-$size,SEEK_END);
1161                                 if($seek === 0) {
1162                                         $data = escape_tags(fread($fp,$size));
1163                                         while(! feof($fp))
1164                                                 $data .= escape_tags(fread($fp,4096));
1165                                 }
1166                         }
1167                         fclose($fp);
1168                 }
1169         }
1170
1171         return replace_macros($t, array(
1172                 '$title' => t('Administration'),
1173                 '$page' => t('Logs'),
1174                 '$submit' => t('Submit'),
1175                 '$clear' => t('Clear'),
1176                 '$data' => $data,
1177                 '$baseurl' => $a->get_baseurl(true),
1178                 '$logname' =>  get_config('system','logfile'),
1179
1180                                                                         // name, label, value, help string, extra data...
1181                 '$debugging'            => array('debugging', t("Debugging"),get_config('system','debugging'), ""),
1182                 '$logfile'                      => array('logfile', t("Log file"), get_config('system','logfile'), t("Must be writable by web server. Relative to your Friendica top-level directory.")),
1183                 '$loglevel'             => array('loglevel', t("Log level"), get_config('system','loglevel'), "", $log_choices),
1184
1185         '$form_security_token' => get_form_security_token("admin_logs"),
1186         ));
1187 }
1188
1189 /**
1190  * @param App $a
1191  */
1192 function admin_page_remoteupdate_post(&$a) {
1193         // this function should be called via ajax post
1194         if(!is_site_admin()) {
1195                 return;
1196         }
1197
1198
1199         if (x($_POST,'remotefile') && $_POST['remotefile']!=""){
1200                 $remotefile = $_POST['remotefile'];
1201                 $ftpdata = (x($_POST['ftphost'])?$_POST:false);
1202                 doUpdate($remotefile, $ftpdata);
1203         } else {
1204                 echo "No remote file to download. Abort!";
1205         }
1206
1207         killme();
1208 }
1209
1210 /**
1211  * @param App $a
1212  * @return string
1213  */
1214 function admin_page_remoteupdate(&$a) {
1215         if(!is_site_admin()) {
1216                 return login(false);
1217         }
1218
1219         $canwrite = canWeWrite();
1220         $canftp = function_exists('ftp_connect');
1221
1222         $needupdate = true;
1223         $u = checkUpdate();
1224         if (!is_array($u)){
1225                 $needupdate = false;
1226                 $u = array('','','');
1227         }
1228
1229         $tpl = get_markup_template("admin_remoteupdate.tpl");
1230         return replace_macros($tpl, array(
1231                 '$baseurl' => $a->get_baseurl(true),
1232                 '$submit' => t("Update now"),
1233                 '$close' => t("Close"),
1234                 '$localversion' => FRIENDICA_VERSION,
1235                 '$remoteversion' => $u[1],
1236                 '$needupdate' => $needupdate,
1237                 '$canwrite' => $canwrite,
1238                 '$canftp'       => $canftp,
1239                 '$ftphost'      => array('ftphost', t("FTP Host"), '',''),
1240                 '$ftppath'      => array('ftppath', t("FTP Path"), '/',''),
1241                 '$ftpuser'      => array('ftpuser', t("FTP User"), '',''),
1242                 '$ftppwd'       => array('ftppwd', t("FTP Password"), '',''),
1243                 '$remotefile'=>array('remotefile','', $u['2'],''),
1244         ));
1245
1246 }