mod/admin.php

   1 <?php
   2
   3  /**
   4   * Friendica admin
   5   */
   6 require_once("include/remoteupdate.php");
   7 require_once("include/enotify.php");
   8 require_once("include/text.php");
   9
  10
  11 /**
  12  * @param App $a
  13  */
  14 function admin_post(&$a){
  15
  16
  17         if(!is_site_admin()) {
  18                 return;
  19         }
  20
  21         // do not allow a page manager to access the admin panel at all.
  22
  23         if(x($_SESSION,'submanage') && intval($_SESSION['submanage']))
  24                 return;
  25
  26
  27
  28         // urls
  29         if ($a->argc > 1){
  30                 switch ($a->argv[1]){
  31                         case 'site':
  32                                 admin_page_site_post($a);
  33                                 break;
  34                         case 'users':
  35                                 admin_page_users_post($a);
  36                                 break;
  37                         case 'plugins':
  38                                 if ($a->argc > 2 &&
  39                                         is_file("addon/".$a->argv[2]."/".$a->argv[2].".php")){
  40                                                 @include_once("addon/".$a->argv[2]."/".$a->argv[2].".php");
  41                                                 if(function_exists($a->argv[2].'_plugin_admin_post')) {
  42                                                         $func = $a->argv[2].'_plugin_admin_post';
  43                                                         $func($a);
  44                                                 }
  45                                 }
  46                                 goaway($a->get_baseurl(true) . '/admin/plugins/' . $a->argv[2] );
  47                                 return; // NOTREACHED
  48                                 break;
  49                         case 'themes':
  50                                 $theme = $a->argv[2];
  51                                 if (is_file("view/theme/$theme/config.php")){
  52                                         require_once("view/theme/$theme/config.php");
  53                                         if (function_exists("theme_admin_post")){
  54                                                 theme_admin_post($a);
  55                                         }
  56                                 }
  57                                 info(t('Theme settings updated.'));
  58                                 if(is_ajax()) return;
  59
  60                                 goaway($a->get_baseurl(true) . '/admin/themes/' . $theme );
  61                                 return;
  62                                 break;
  63                         case 'logs':
  64                                 admin_page_logs_post($a);
  65                                 break;
  66                         case 'dbsync':
  67                                 admin_page_dbsync_post($a);
  68                                 break;
  69                         case 'update':
  70                                 admin_page_remoteupdate_post($a);
  71                                 break;
  72                 }
  73         }
  74
  75         goaway($a->get_baseurl(true) . '/admin' );
  76         return; // NOTREACHED
  77 }
  78
  79 /**
  80  * @param App $a
  81  * @return string
  82  */
  83 function admin_content(&$a) {
  84
  85         if(!is_site_admin()) {
  86                 return login(false);
  87         }
  88
  89         if(x($_SESSION,'submanage') && intval($_SESSION['submanage']))
  90                 return "";
  91
  92         // APC deactivated, since there are problems with PHP 5.5
  93         //if (function_exists("apc_delete")) {
  94         //      $toDelete = new APCIterator('user', APC_ITER_VALUE);
  95         //      apc_delete($toDelete);
  96         //}
  97
  98         /**
  99          * Side bar links
 100          */
 101
 102         // array( url, name, extra css classes )
 103         $aside = Array(
 104                 'site'   =>     Array($a->get_baseurl(true)."/admin/site/", t("Site") , "site"),
 105                 'users'  =>     Array($a->get_baseurl(true)."/admin/users/", t("Users") , "users"),
 106                 'plugins'=>     Array($a->get_baseurl(true)."/admin/plugins/", t("Plugins") , "plugins"),
 107                 'themes' =>     Array($a->get_baseurl(true)."/admin/themes/", t("Themes") , "themes"),
 108                 'dbsync' => Array($a->get_baseurl(true)."/admin/dbsync/", t('DB updates'), "dbsync"),
 109                 //'update' =>   Array($a->get_baseurl(true)."/admin/update/", t("Software Update") , "update")
 110         );
 111
 112         /* get plugins admin page */
 113
 114         $r = q("SELECT name FROM `addon` WHERE `plugin_admin`=1");
 115         $aside['plugins_admin']=Array();
 116         foreach ($r as $h){
 117                 $plugin =$h['name'];
 118                 $aside['plugins_admin'][] = Array($a->get_baseurl(true)."/admin/plugins/".$plugin, $plugin, "plugin");
 119                 // temp plugins with admin
 120                 $a->plugins_admin[] = $plugin;
 121         }
 122
 123         $aside['logs'] = Array($a->get_baseurl(true)."/admin/logs/", t("Logs"), "logs");
 124         $aside['diagnostics_probe'] = Array($a->get_baseurl(true).'/probe/', t('probe address'), 'probe');
 125         $aside['diagnostics_webfinger'] = Array($a->get_baseurl(true).'/webfinger/', t('check webfinger'), 'webfinger');
 126
 127         $t = get_markup_template("admin_aside.tpl");
 128         $a->page['aside'] .= replace_macros( $t, array(
 129                         '$admin' => $aside,
 130                         '$admtxt' => t('Admin'),
 131                         '$plugadmtxt' => t('Plugin Features'),
 132                         '$logtxt' => t('Logs'),
 133                         '$diagnosticstxt' => t('diagnostics'),
 134                         '$h_pending' => t('User registrations waiting for confirmation'),
 135                         '$admurl'=> $a->get_baseurl(true)."/admin/"
 136         ));
 137
 138
 139
 140         /**
 141          * Page content
 142          */
 143         $o = '';
 144         // urls
 145         if ($a->argc > 1){
 146                 switch ($a->argv[1]){
 147                         case 'site':
 148                                 $o = admin_page_site($a);
 149                                 break;
 150                         case 'users':
 151                                 $o = admin_page_users($a);
 152                                 break;
 153                         case 'plugins':
 154                                 $o = admin_page_plugins($a);
 155                                 break;
 156                         case 'themes':
 157                                 $o = admin_page_themes($a);
 158                                 break;
 159                         case 'logs':
 160                                 $o = admin_page_logs($a);
 161                                 break;
 162                         case 'dbsync':
 163                                 $o = admin_page_dbsync($a);
 164                                 break;
 165                         case 'update':
 166                                 $o = admin_page_remoteupdate($a);
 167                                 break;
 168                         default:
 169                                 notice( t("Item not found.") );
 170                 }
 171         } else {
 172                 $o = admin_page_summary($a);
 173         }
 174
 175         if(is_ajax()) {
 176                 echo $o;
 177                 killme();
 178                 return '';
 179         } else {
 180                 return $o;
 181         }
 182 }
 183
 184
 185 /**
 186  * Admin Summary Page
 187  * @param App $a
 188  * @return string
 189  */
 190 function admin_page_summary(&$a) {
 191         $r = q("SELECT `page-flags`, COUNT(uid) as `count` FROM `user` GROUP BY `page-flags`");
 192         $accounts = Array(
 193                 Array( t('Normal Account'), 0),
 194                 Array( t('Soapbox Account'), 0),
 195                 Array( t('Community/Celebrity Account'), 0),
 196                 Array( t('Automatic Friend Account'), 0),
 197                 Array( t('Blog Account'), 0),
 198                 Array( t('Private Forum'), 0)
 199         );
 200
 201         $users=0;
 202         foreach ($r as $u){ $accounts[$u['page-flags']][1] = $u['count']; $users+= $u['count']; }
 203
 204         logger('accounts: ' . print_r($accounts,true),LOGGER_DATA);
 205
 206         $r = q("SELECT COUNT(id) as `count` FROM `register`");
 207         $pending = $r[0]['count'];
 208
 209         $r = q("select count(*) as total from deliverq where 1");
 210         $deliverq = (($r) ? $r[0]['total'] : 0);
 211
 212         $r = q("select count(*) as total from queue where 1");
 213         $queue = (($r) ? $r[0]['total'] : 0);
 214
 215         // We can do better, but this is a quick queue status
 216
 217         $queues = array( 'label' => t('Message queues'), 'deliverq' => $deliverq, 'queue' => $queue );
 218
 219
 220         $t = get_markup_template("admin_summary.tpl");
 221         return replace_macros($t, array(
 222                 '$title' => t('Administration'),
 223                 '$page' => t('Summary'),
 224                 '$queues' => $queues,
 225                 '$users' => Array( t('Registered users'), $users),
 226                 '$accounts' => $accounts,
 227                 '$pending' => Array( t('Pending registrations'), $pending),
 228                 '$version' => Array( t('Version'), FRIENDICA_VERSION),
 229                 '$platform' => FRIENDICA_PLATFORM,
 230                 '$codename' => FRIENDICA_CODENAME,
 231                 '$build' =>  get_config('system','build'),
 232                 '$plugins' => Array( t('Active plugins'), $a->plugins )
 233         ));
 234 }
 235
 236
 237 /**
 238  * Admin Site Page
 239  *  @param App $a
 240  */
 241 function admin_page_site_post(&$a){
 242         if (!x($_POST,"page_site")){
 243                 return;
 244         }
 245
 246         check_form_security_token_redirectOnErr('/admin/site', 'admin_site');
 247
 248         // relocate
 249         if (x($_POST,'relocate') && x($_POST,'relocate_url') && $_POST['relocate_url']!=""){
 250                 $new_url = $_POST['relocate_url'];
 251                 $new_url = rtrim($new_url,"/");
 252
 253                 $parsed = @parse_url($new_url);
 254                 if (!$parsed || (!x($parsed,'host') || !x($parsed,'scheme'))) {
 255                         notice(t("Can not parse base url. Must have at least <scheme>://<domain>"));
 256                         goaway($a->get_baseurl(true) . '/admin/site' );
 257                 }
 258
 259                 /* steps:
 260                  * replace all "baseurl" to "new_url" in config, profile, term, items and contacts
 261                  * send relocate for every local user
 262                  * */
 263
 264                 $old_url = $a->get_baseurl(true);
 265
 266                 function update_table($table_name, $fields, $old_url, $new_url) {
 267                         global $db, $a;
 268
 269                         $dbold = dbesc($old_url);
 270                         $dbnew = dbesc($new_url);
 271
 272                         $upd = array();
 273                         foreach ($fields as $f) {
 274                                 $upd[] = "`$f` = REPLACE(`$f`, '$dbold', '$dbnew')";
 275                         }
 276
 277                         $upds = implode(", ", $upd);
 278
 279
 280
 281                         $q = sprintf("UPDATE %s SET %s;", $table_name, $upds);
 282                         $r = q($q);
 283                         if (!$r) {
 284                                 notice( "Failed updating '$table_name': " . $db->error );
 285                                 goaway($a->get_baseurl(true) . '/admin/site' );
 286                         }
 287                 }
 288
 289                 // update tables
 290                 update_table("profile", array('photo', 'thumb'), $old_url, $new_url);
 291                 update_table("term", array('url'), $old_url, $new_url);
 292                 update_table("contact", array('photo','thumb','micro','url','nurl','request','notify','poll','confirm','poco'), $old_url, $new_url);
 293                 update_table("unique_contacts", array('url'), $old_url, $new_url);
 294                 update_table("item", array('owner-link','owner-avatar','author-name','author-link','author-avatar','body','plink','tag'), $old_url, $new_url);
 295
 296                 // update config
 297                 $a->set_baseurl($new_url);
 298                 set_config('system','url',$new_url);
 299
 300                 // send relocate
 301                 $users = q("SELECT uid FROM user WHERE account_removed = 0 AND account_expired = 0");
 302
 303                 foreach ($users as $user) {
 304                         proc_run('php', 'include/notifier.php', 'relocate', $user['uid']);
 305                 }
 306
 307                 info("Relocation started. Could take a while to complete.");
 308
 309                 goaway($a->get_baseurl(true) . '/admin/site' );
 310         }
 311         // end relocate
 312
 313         $sitename               =       ((x($_POST,'sitename'))                 ? notags(trim($_POST['sitename']))              : '');
 314         $hostname               =       ((x($_POST,'hostname'))                 ? notags(trim($_POST['hostname']))              : '');
 315         $sender_email           =       ((x($_POST,'sender_email'))             ? notags(trim($_POST['sender_email']))          : '');
 316         $banner                 =       ((x($_POST,'banner'))                   ? trim($_POST['banner'])                        : false);
 317         $shortcut_icon          =       ((x($_POST,'shortcut_icon'))            ? notags(trim($_POST['shortcut_icon']))         : '');
 318         $touch_icon             =       ((x($_POST,'touch_icon'))               ? notags(trim($_POST['touch_icon']))            : '');
 319         $info                   =       ((x($_POST,'info'))                     ? trim($_POST['info'])                  : false);
 320         $language               =       ((x($_POST,'language'))                 ? notags(trim($_POST['language']))              : '');
 321         $theme                  =       ((x($_POST,'theme'))                    ? notags(trim($_POST['theme']))                 : '');
 322         $theme_mobile           =       ((x($_POST,'theme_mobile'))             ? notags(trim($_POST['theme_mobile']))          : '');
 323         $maximagesize           =       ((x($_POST,'maximagesize'))             ? intval(trim($_POST['maximagesize']))          :  0);
 324         $maximagelength         =       ((x($_POST,'maximagelength'))           ? intval(trim($_POST['maximagelength']))        :  MAX_IMAGE_LENGTH);
 325         $jpegimagequality       =       ((x($_POST,'jpegimagequality'))         ? intval(trim($_POST['jpegimagequality']))      :  JPEG_QUALITY);
 326
 327
 328         $register_policy        =       ((x($_POST,'register_policy'))          ? intval(trim($_POST['register_policy']))       :  0);
 329         $daily_registrations    =       ((x($_POST,'max_daily_registrations'))  ? intval(trim($_POST['max_daily_registrations']))       :0);
 330         $abandon_days           =       ((x($_POST,'abandon_days'))             ? intval(trim($_POST['abandon_days']))          :  0);
 331
 332         $register_text          =       ((x($_POST,'register_text'))            ? notags(trim($_POST['register_text']))         : '');
 333
 334         $allowed_sites          =       ((x($_POST,'allowed_sites'))            ? notags(trim($_POST['allowed_sites']))         : '');
 335         $allowed_email          =       ((x($_POST,'allowed_email'))            ? notags(trim($_POST['allowed_email']))         : '');
 336         $block_public           =       ((x($_POST,'block_public'))             ? True                                          : False);
 337         $force_publish          =       ((x($_POST,'publish_all'))              ? True                                          : False);
 338         $global_directory       =       ((x($_POST,'directory_submit_url'))     ? notags(trim($_POST['directory_submit_url']))  : '');
 339         $thread_allow           =       ((x($_POST,'thread_allow'))             ? True                                          : False);
 340         $newuser_private                =       ((x($_POST,'newuser_private'))          ? True                                          : False);
 341         $enotify_no_content             =       ((x($_POST,'enotify_no_content'))       ? True                                          : False);
 342         $private_addons                 =       ((x($_POST,'private_addons'))           ? True                                          : False);
 343         $disable_embedded               =       ((x($_POST,'disable_embedded'))         ? True                                          : False);
 344         $allow_users_remote_self        =       ((x($_POST,'allow_users_remote_self'))          ? True                                          : False);
 345
 346         $no_multi_reg           =       ((x($_POST,'no_multi_reg'))             ? True                                          : False);
 347         $no_openid              =       !((x($_POST,'no_openid'))               ? True                                          : False);
 348         $no_regfullname         =       !((x($_POST,'no_regfullname'))          ? True                                          : False);
 349         $no_utf                 =       !((x($_POST,'no_utf'))                  ? True                                          : False);
 350         $community_page_style   =       ((x($_POST,'community_page_style'))     ? intval(trim($_POST['community_page_style']))  : 0);
 351         $max_author_posts_community_page        =       ((x($_POST,'max_author_posts_community_page'))  ? intval(trim($_POST['max_author_posts_community_page']))       : 0);
 352
 353         $verifyssl              =       ((x($_POST,'verifyssl'))                ? True                                          : False);
 354         $proxyuser              =       ((x($_POST,'proxyuser'))                ? notags(trim($_POST['proxyuser']))             : '');
 355         $proxy                  =       ((x($_POST,'proxy'))                    ? notags(trim($_POST['proxy']))                 : '');
 356         $timeout                =       ((x($_POST,'timeout'))                  ? intval(trim($_POST['timeout']))               : 60);
 357         $delivery_interval      =       ((x($_POST,'delivery_interval'))        ? intval(trim($_POST['delivery_interval']))     : 0);
 358         $poll_interval          =       ((x($_POST,'poll_interval'))            ? intval(trim($_POST['poll_interval']))         : 0);
 359         $maxloadavg             =       ((x($_POST,'maxloadavg'))               ? intval(trim($_POST['maxloadavg']))            : 50);
 360         $maxloadavg_frontend    =       ((x($_POST,'maxloadavg_frontend'))      ? intval(trim($_POST['maxloadavg_frontend']))   : 50);
 361         $poco_completion        =       ((x($_POST,'poco_completion'))          ? intval(trim($_POST['poco_completion']))       : false);
 362         $poco_discovery         =       ((x($_POST,'poco_discovery'))           ? intval(trim($_POST['poco_discovery']))        : 0);
 363         $poco_discovery_since   =       ((x($_POST,'poco_discovery_since'))     ? intval(trim($_POST['poco_discovery_since']))  : 30);
 364         $poco_local_search      =       ((x($_POST,'poco_local_search'))        ? intval(trim($_POST['poco_local_search']))     : false);
 365         $dfrn_only              =       ((x($_POST,'dfrn_only'))                ? True                                          : False);
 366         $ostatus_disabled       =       !((x($_POST,'ostatus_disabled'))        ? True                                          : False);
 367         $ostatus_poll_interval  =       ((x($_POST,'ostatus_poll_interval'))    ? intval(trim($_POST['ostatus_poll_interval'])) :  0);
 368         $diaspora_enabled       =       ((x($_POST,'diaspora_enabled'))         ? True                                          : False);
 369         $ssl_policy             =       ((x($_POST,'ssl_policy'))               ? intval($_POST['ssl_policy'])                  : 0);
 370         $force_ssl              =       ((x($_POST,'force_ssl'))                ? True                                          : False);
 371         $old_share              =       ((x($_POST,'old_share'))                ? True                                          : False);
 372         $hide_help              =       ((x($_POST,'hide_help'))                ? True                                          : False);
 373         $suppress_language      =       ((x($_POST,'suppress_language'))        ? True                                          : False);
 374         $suppress_tags          =       ((x($_POST,'suppress_tags'))            ? True                                          : False);
 375         $use_fulltext_engine    =       ((x($_POST,'use_fulltext_engine'))      ? True                                          : False);
 376         $itemcache              =       ((x($_POST,'itemcache'))                ? notags(trim($_POST['itemcache']))             : '');
 377         $itemcache_duration     =       ((x($_POST,'itemcache_duration'))       ? intval($_POST['itemcache_duration'])          : 0);
 378         $max_comments           =       ((x($_POST,'max_comments'))             ? intval($_POST['max_comments'])                : 0);
 379         $lockpath               =       ((x($_POST,'lockpath'))                 ? notags(trim($_POST['lockpath']))              : '');
 380         $temppath               =       ((x($_POST,'temppath'))                 ? notags(trim($_POST['temppath']))              : '');
 381         $basepath               =       ((x($_POST,'basepath'))                 ? notags(trim($_POST['basepath']))              : '');
 382         $singleuser             =       ((x($_POST,'singleuser'))               ? notags(trim($_POST['singleuser']))            : '');
 383         $proxy_disabled         =       ((x($_POST,'proxy_disabled'))           ? True                                          : False);
 384         $old_pager              =       ((x($_POST,'old_pager'))                ? True                                          : False);
 385         $only_tag_search        =       ((x($_POST,'only_tag_search'))          ? True                                          : False);
 386         $rino                   =       ((x($_POST,'rino'))                             ? intval($_POST['rino'])                                : 0);
 387
 388
 389         if($ssl_policy != intval(get_config('system','ssl_policy'))) {
 390                 if($ssl_policy == SSL_POLICY_FULL) {
 391                         q("update `contact` set
 392                                 `url`     = replace(`url`    , 'http:' , 'https:'),
 393                                 `photo`   = replace(`photo`  , 'http:' , 'https:'),
 394                                 `thumb`   = replace(`thumb`  , 'http:' , 'https:'),
 395                                 `micro`   = replace(`micro`  , 'http:' , 'https:'),
 396                                 `request` = replace(`request`, 'http:' , 'https:'),
 397                                 `notify`  = replace(`notify` , 'http:' , 'https:'),
 398                                 `poll`    = replace(`poll`   , 'http:' , 'https:'),
 399                                 `confirm` = replace(`confirm`, 'http:' , 'https:'),
 400                                 `poco`    = replace(`poco`   , 'http:' , 'https:')
 401                                 where `self` = 1"
 402                         );
 403                         q("update `profile` set
 404                                 `photo`   = replace(`photo`  , 'http:' , 'https:'),
 405                                 `thumb`   = replace(`thumb`  , 'http:' , 'https:')
 406                                 where 1 "
 407                         );
 408                 }
 409                 elseif($ssl_policy == SSL_POLICY_SELFSIGN) {
 410                         q("update `contact` set
 411                                 `url`     = replace(`url`    , 'https:' , 'http:'),
 412                                 `photo`   = replace(`photo`  , 'https:' , 'http:'),
 413                                 `thumb`   = replace(`thumb`  , 'https:' , 'http:'),
 414                                 `micro`   = replace(`micro`  , 'https:' , 'http:'),
 415                                 `request` = replace(`request`, 'https:' , 'http:'),
 416                                 `notify`  = replace(`notify` , 'https:' , 'http:'),
 417                                 `poll`    = replace(`poll`   , 'https:' , 'http:'),
 418                                 `confirm` = replace(`confirm`, 'https:' , 'http:'),
 419                                 `poco`    = replace(`poco`   , 'https:' , 'http:')
 420                                 where `self` = 1"
 421                         );
 422                         q("update `profile` set
 423                                 `photo`   = replace(`photo`  , 'https:' , 'http:'),
 424                                 `thumb`   = replace(`thumb`  , 'https:' , 'http:')
 425                                 where 1 "
 426                         );
 427                 }
 428         }
 429         set_config('system','ssl_policy',$ssl_policy);
 430         set_config('system','delivery_interval',$delivery_interval);
 431         set_config('system','poll_interval',$poll_interval);
 432         set_config('system','maxloadavg',$maxloadavg);
 433         set_config('system','maxloadavg_frontend',$maxloadavg_frontend);
 434         set_config('system','poco_completion',$poco_completion);
 435         set_config('system','poco_discovery',$poco_discovery);
 436         set_config('system','poco_discovery_since',$poco_discovery_since);
 437         set_config('system','poco_local_search',$poco_local_search);
 438         set_config('config','sitename',$sitename);
 439         set_config('config','hostname',$hostname);
 440         set_config('config','sender_email', $sender_email);
 441         set_config('system','suppress_language',$suppress_language);
 442         set_config('system','suppress_tags',$suppress_tags);
 443         set_config('system','shortcut_icon',$shortcut_icon);
 444         set_config('system','touch_icon',$touch_icon);
 445
 446         if ($banner==""){
 447                 // don't know why, but del_config doesn't work...
 448                 q("DELETE FROM `config` WHERE `cat` = '%s' AND `k` = '%s' LIMIT 1",
 449                         dbesc("system"),
 450                         dbesc("banner")
 451                 );
 452         } else {
 453                 set_config('system','banner', $banner);
 454         }
 455         if ($info=="") {
 456                 del_config('config','info');
 457         } else {
 458                 set_config('config','info',$info);
 459         }
 460         set_config('system','language', $language);
 461         set_config('system','theme', $theme);
 462         if ( $theme_mobile === '---' ) {
 463                 del_config('system','mobile-theme');
 464         } else {
 465                 set_config('system','mobile-theme', $theme_mobile);
 466                 }
 467                 if ( $singleuser === '---' ) {
 468                         del_config('system','singleuser');
 469                 } else {
 470                         set_config('system','singleuser', $singleuser);
 471                 }
 472         set_config('system','maximagesize', $maximagesize);
 473         set_config('system','max_image_length', $maximagelength);
 474         set_config('system','jpeg_quality', $jpegimagequality);
 475
 476         set_config('config','register_policy', $register_policy);
 477         set_config('system','max_daily_registrations', $daily_registrations);
 478         set_config('system','account_abandon_days', $abandon_days);
 479         set_config('config','register_text', $register_text);
 480         set_config('system','allowed_sites', $allowed_sites);
 481         set_config('system','allowed_email', $allowed_email);
 482         set_config('system','block_public', $block_public);
 483         set_config('system','publish_all', $force_publish);
 484         if ($global_directory==""){
 485                 // don't know why, but del_config doesn't work...
 486                 q("DELETE FROM `config` WHERE `cat` = '%s' AND `k` = '%s' LIMIT 1",
 487                         dbesc("system"),
 488                         dbesc("directory_submit_url")
 489                 );
 490         } else {
 491                 set_config('system','directory_submit_url', $global_directory);
 492         }
 493         set_config('system','thread_allow', $thread_allow);
 494         set_config('system','newuser_private', $newuser_private);
 495         set_config('system','enotify_no_content', $enotify_no_content);
 496         set_config('system','disable_embedded', $disable_embedded);
 497         set_config('system','allow_users_remote_self', $allow_users_remote_self);
 498
 499         set_config('system','block_extended_register', $no_multi_reg);
 500         set_config('system','no_openid', $no_openid);
 501         set_config('system','no_regfullname', $no_regfullname);
 502         set_config('system','community_page_style', $community_page_style);
 503         set_config('system','max_author_posts_community_page', $max_author_posts_community_page);
 504         set_config('system','no_utf', $no_utf);
 505         set_config('system','verifyssl', $verifyssl);
 506         set_config('system','proxyuser', $proxyuser);
 507         set_config('system','proxy', $proxy);
 508         set_config('system','curl_timeout', $timeout);
 509         set_config('system','dfrn_only', $dfrn_only);
 510         set_config('system','ostatus_disabled', $ostatus_disabled);
 511         set_config('system','ostatus_poll_interval', $ostatus_poll_interval);
 512         set_config('system','diaspora_enabled', $diaspora_enabled);
 513         set_config('config','private_addons', $private_addons);
 514
 515         set_config('system','force_ssl', $force_ssl);
 516         set_config('system','old_share', $old_share);
 517         set_config('system','hide_help', $hide_help);
 518         set_config('system','use_fulltext_engine', $use_fulltext_engine);
 519         set_config('system','itemcache', $itemcache);
 520         set_config('system','itemcache_duration', $itemcache_duration);
 521         set_config('system','max_comments', $max_comments);
 522         set_config('system','lockpath', $lockpath);
 523         set_config('system','temppath', $temppath);
 524         set_config('system','basepath', $basepath);
 525         set_config('system','proxy_disabled', $proxy_disabled);
 526         set_config('system','old_pager', $old_pager);
 527         set_config('system','only_tag_search', $only_tag_search);
 528
 529         set_config('system','rino_encrypt', $rino);
 530
 531
 532         info( t('Site settings updated.') . EOL);
 533         goaway($a->get_baseurl(true) . '/admin/site' );
 534         return; // NOTREACHED
 535
 536 }
 537
 538 /**
 539  * @param  App $a
 540  * @return string
 541  */
 542 function admin_page_site(&$a) {
 543
 544         /* Installed langs */
 545         $lang_choices = array();
 546         $langs = glob('view/*/strings.php');
 547
 548         if(is_array($langs) && count($langs)) {
 549                 if(! in_array('view/en/strings.php',$langs))
 550                         $langs[] = 'view/en/';
 551                 asort($langs);
 552                 foreach($langs as $l) {
 553                         $t = explode("/",$l);
 554                         $lang_choices[$t[1]] = $t[1];
 555                 }
 556         }
 557
 558         /* Installed themes */
 559         $theme_choices = array();
 560         $theme_choices_mobile = array();
 561         $theme_choices_mobile["---"] = t("No special theme for mobile devices");
 562         $files = glob('view/theme/*');
 563         if($files) {
 564                 foreach($files as $file) {
 565                         $f = basename($file);
 566                         $theme_name = ((file_exists($file . '/experimental')) ?  sprintf("%s - \x28Experimental\x29", $f) : $f);
 567                         if (file_exists($file . '/mobile')) {
 568                                 $theme_choices_mobile[$f] = $theme_name;
 569                         }
 570                 else {
 571                                 $theme_choices[$f] = $theme_name;
 572                         }
 573                 }
 574                 }
 575
 576                 /* Community page style */
 577                 $community_page_style_choices = array(
 578                         CP_NO_COMMUNITY_PAGE => t("No community page"),
 579                         CP_USERS_ON_SERVER => t("Public postings from users of this site"),
 580                         CP_GLOBAL_COMMUNITY => t("Global community page")
 581                         );
 582
 583                 /* OStatus conversation poll choices */
 584                 $ostatus_poll_choices = array(
 585                         "-2" => t("Never"),
 586                         "-1" => t("At post arrival"),
 587                         "0" => t("Frequently"),
 588                         "60" => t("Hourly"),
 589                         "720" => t("Twice daily"),
 590                         "1440" => t("Daily")
 591                         );
 592
 593                 $poco_discovery_choices = array(
 594                         "0" => t("Disabled"),
 595                         "1" => t("Users"),
 596                         "2" => t("Users, Global Contacts"),
 597                         "3" => t("Users, Global Contacts/fallback"),
 598                         );
 599
 600                 $poco_discovery_since_choices = array(
 601                         "30" => t("One month"),
 602                         "91" => t("Three months"),
 603                         "182" => t("Half a year"),
 604                         "365" => t("One year"),
 605                         );
 606
 607                 /* get user names to make the install a personal install of X */
 608                 $user_names = array();
 609                 $user_names['---'] = t('Multi user instance');
 610                 $users = q("SELECT username, nickname FROM `user`");
 611                 foreach ($users as $user) {
 612                         $user_names[$user['nickname']] = $user['username'];
 613                 }
 614
 615         /* Banner */
 616         $banner = get_config('system','banner');
 617         if($banner == false)
 618                 $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>';
 619         $banner = htmlspecialchars($banner);
 620         $info = get_config('config','info');
 621         $info = htmlspecialchars($info);
 622
 623         // Automatically create temporary paths
 624         get_temppath();
 625         get_lockpath();
 626         get_itemcachepath();
 627
 628         //echo "<pre>"; var_dump($lang_choices); die("</pre>");
 629
 630         /* Register policy */
 631         $register_choices = Array(
 632                 REGISTER_CLOSED => t("Closed"),
 633                 REGISTER_APPROVE => t("Requires approval"),
 634                 REGISTER_OPEN => t("Open")
 635         );
 636
 637         $ssl_choices = array(
 638                 SSL_POLICY_NONE => t("No SSL policy, links will track page SSL state"),
 639                 SSL_POLICY_FULL => t("Force all links to use SSL"),
 640                 SSL_POLICY_SELFSIGN => t("Self-signed certificate, use SSL for local links only (discouraged)")
 641         );
 642
 643         if ($a->config['hostname'] == "")
 644                 $a->config['hostname'] = $a->get_hostname();
 645
 646         $t = get_markup_template("admin_site.tpl");
 647         return replace_macros($t, array(
 648                 '$title' => t('Administration'),
 649                 '$page' => t('Site'),
 650                 '$submit' => t('Save Settings'),
 651                 '$registration' => t('Registration'),
 652                 '$upload' => t('File upload'),
 653                 '$corporate' => t('Policies'),
 654                 '$advanced' => t('Advanced'),
 655                 '$portable_contacts' => t('Auto Discovered Contact Directory'),
 656                 '$performance' => t('Performance'),
 657                 '$relocate'=> t('Relocate - WARNING: advanced function. Could make this server unreachable.'),
 658                 '$baseurl' => $a->get_baseurl(true),
 659                 // name, label, value, help string, extra data...
 660                 '$sitename'             => array('sitename', t("Site name"), $a->config['sitename'],'UTF-8'),
 661                 '$hostname'             => array('hostname', t("Host name"), $a->config['hostname'], ""),
 662                 '$sender_email'         => array('sender_email', t("Sender Email"), $a->config['sender_email'], "The email address your server shall use to send notification emails from.", "", "", "email"),
 663                 '$banner'               => array('banner', t("Banner/Logo"), $banner, ""),
 664                 '$shortcut_icon'        => array('shortcut_icon', t("Shortcut icon"), get_config('system','shortcut_icon'),  "Link to an icon that will be used for browsers."),
 665                 '$touch_icon'           => array('touch_icon', t("Touch icon"), get_config('system','touch_icon'),  "Link to an icon that will be used for tablets and mobiles."),
 666                 '$info' => array('info',t('Additional Info'), $info, t('For public servers: you can add additional information here that will be listed at dir.friendica.com/siteinfo.')),
 667                 '$language'             => array('language', t("System language"), get_config('system','language'), "", $lang_choices),
 668                 '$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),
 669                 '$theme_mobile'         => array('theme_mobile', t("Mobile system theme"), get_config('system','mobile-theme'), t("Theme for mobile devices"), $theme_choices_mobile),
 670                 '$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),
 671                 '$force_ssl'            => array('force_ssl', t("Force SSL"), get_config('system','force_ssl'), t("Force all Non-SSL requests to SSL - Attention: on some systems it could lead to endless loops.")),
 672                 '$old_share'            => array('old_share', t("Old style 'Share'"), get_config('system','old_share'), t("Deactivates the bbcode element 'share' for repeating items.")),
 673                 '$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.")),
 674                 '$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),
 675                 '$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.")),
 676                 '$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.")),
 677                 '$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.")),
 678
 679                 '$register_policy'      => array('register_policy', t("Register policy"), $a->config['register_policy'], "", $register_choices),
 680                 '$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.")),
 681                 '$register_text'        => array('register_text', t("Register text"), $a->config['register_text'], t("Will be displayed prominently on the registration page.")),
 682                 '$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.')),
 683                 '$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")),
 684                 '$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")),
 685                 '$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.")),
 686                 '$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.")),
 687                 '$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.")),
 688                 '$thread_allow'         => array('thread_allow', t("Allow threaded items"), get_config('system','thread_allow'), t("Allow infinite level threading for items on this site.")),
 689                 '$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.")),
 690                 '$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.")),
 691                 '$private_addons'       => array('private_addons', t("Disallow public access to addons listed in the apps menu."), get_config('config','private_addons'), t("Checking this box will restrict addons listed in the apps menu to members only.")),
 692                 '$disable_embedded'     => array('disable_embedded', t("Don't embed private images in posts"), get_config('system','disable_embedded'), t("Don't replace locally-hosted private photos in posts with an embedded copy of the image. This means that contacts who receive posts containing private photos will have to authenticate and load each image, which may take a while.")),
 693                 '$allow_users_remote_self'      => array('allow_users_remote_self', t('Allow Users to set remote_self'), get_config('system','allow_users_remote_self'), t('With checking this, every user is allowed to mark every contact as a remote_self in the repair contact dialog. Setting this flag on a contact causes mirroring every posting of that contact in the users stream.')),
 694                 '$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.")),
 695                 '$no_openid'            => array('no_openid', t("OpenID support"), !get_config('system','no_openid'), t("OpenID support for registration and logins.")),
 696                 '$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")),
 697                 '$no_utf'               => array('no_utf', t("UTF-8 Regular expressions"), !get_config('system','no_utf'), t("Use PHP UTF8 regular expressions")),
 698                 '$community_page_style' => array('community_page_style', t("Community Page Style"), get_config('system','community_page_style'), t("Type of community page to show. 'Global community' shows every public posting from an open distributed network that arrived on this server."), $community_page_style_choices),
 699                 '$max_author_posts_community_page' => array('max_author_posts_community_page', t("Posts per user on community page"), get_config('system','max_author_posts_community_page'), t("The maximum number of posts per user on the community page. (Not valid for 'Global Community')")),
 700                 '$ostatus_disabled'     => array('ostatus_disabled', t("Enable OStatus support"), !get_config('system','ostatus_disabled'), t("Provide built-in OStatus \x28StatusNet, GNU Social etc.\x29 compatibility. All communications in OStatus are public, so privacy warnings will be occasionally displayed.")),
 701                 '$ostatus_poll_interval'        => array('ostatus_poll_interval', t("OStatus conversation completion interval"), (string) intval(get_config('system','ostatus_poll_interval')), t("How often shall the poller check for new entries in OStatus conversations? This can be a very ressource task."), $ostatus_poll_choices),
 702                 '$diaspora_enabled'     => array('diaspora_enabled', t("Enable Diaspora support"), get_config('system','diaspora_enabled'), t("Provide built-in Diaspora network compatibility.")),
 703                 '$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.")),
 704                 '$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.")),
 705                 '$proxyuser'            => array('proxyuser', t("Proxy user"), get_config('system','proxyuser'), ""),
 706                 '$proxy'                => array('proxy', t("Proxy URL"), get_config('system','proxy'), ""),
 707                 '$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).")),
 708                 '$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.")),
 709                 '$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.")),
 710                 '$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.")),
 711                 '$maxloadavg_frontend'  => array('maxloadavg_frontend', t("Maximum Load Average (Frontend)"), ((intval(get_config('system','maxloadavg_frontend')) > 0)?get_config('system','maxloadavg_frontend'):50), t("Maximum system load before the frontend quits service - default 50.")),
 712
 713                 '$poco_completion'      => array('poco_completion', t("Periodical check of global contacts"), get_config('system','poco_completion'), t("If enabled, the global contacts are checked periodically for missing or outdated data and the vitality of the contacts and servers.")),
 714                 '$poco_discovery'       => array('poco_discovery', t("Discover contacts from other servers"), (string) intval(get_config('system','poco_discovery')), t("Periodically query other servers for contacts. You can choose between 'users': the users on the remote system, 'Global Contacts': active contacts that are known on the system. The fallback is meant for Redmatrix servers and older friendica servers, where global contacts weren't available. The fallback increases the server load, so the recommened setting is 'Users, Global Contacts'."), $poco_discovery_choices),
 715                 '$poco_discovery_since' => array('poco_discovery_since', t("Timeframe for fetching global contacts"), (string) intval(get_config('system','poco_discovery_since')), t("When the discovery is activated, this value defines the timeframe for the activity of the global contacts that are fetched from other servers."), $poco_discovery_since_choices),
 716                 '$poco_local_search'    => array('poco_local_search', t("Search the local directory"), get_config('system','poco_local_search'), t("Search the local directory instead of the global directory. When searching locally, every search will be executed on the global directory in the background. This improves the search results when the search is repeated.")),
 717
 718                 '$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.")),
 719                 '$suppress_language'    => array('suppress_language', t("Suppress Language"), get_config('system','suppress_language'), t("Suppress language information in meta information about a posting.")),
 720                 '$suppress_tags'        => array('suppress_tags', t("Suppress Tags"), get_config('system','suppress_tags'), t("Suppress showing a list of hashtags at the end of the posting.")),
 721                 '$itemcache'            => array('itemcache', t("Path to item cache"), get_config('system','itemcache'), "The item caches buffers generated bbcode and external images."),
 722                 '$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). To disable the item cache, set the value to -1.")),
 723                 '$max_comments'         => array('max_comments', t("Maximum numbers of comments per post"), get_config('system','max_comments'), t("How much comments should be shown for each post? Default value is 100.")),
 724                 '$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."),
 725                 '$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."),
 726                 '$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."),
 727                 '$proxy_disabled'       => array('proxy_disabled', t("Disable picture proxy"), get_config('system','proxy_disabled'), t("The picture proxy increases performance and privacy. It shouldn't be used on systems with very low bandwith.")),
 728                 '$old_pager'            => array('old_pager', t("Enable old style pager"), get_config('system','old_pager'), t("The old style pager has page numbers but slows down massively the page speed.")),
 729                 '$only_tag_search'      => array('only_tag_search', t("Only search in tags"), get_config('system','only_tag_search'), t("On large systems the text search can slow down the system extremely.")),
 730
 731                 '$relocate_url'     => array('relocate_url', t("New base url"), $a->get_baseurl(), "Change base url for this server. Sends relocate message to all DFRN contacts of all users."),
 732
 733                 '$rino'                 => array('rino', t("RINO Encryption"), intval(get_config('system','rino_encrypt')), t("Encryption layer between nodes."), array("Disabled", "RINO1 (deprecated)", "RINO2")),
 734
 735                 '$form_security_token' => get_form_security_token("admin_site")
 736
 737         ));
 738
 739 }
 740
 741
 742 function admin_page_dbsync(&$a) {
 743
 744         $o = '';
 745
 746         if($a->argc > 3 && intval($a->argv[3]) && $a->argv[2] === 'mark') {
 747                 set_config('database', 'update_' . intval($a->argv[3]), 'success');
 748                 $curr = get_config('system','build');
 749                 if(intval($curr) == intval($a->argv[3]))
 750                         set_config('system','build',intval($curr) + 1);
 751                 info( t('Update has been marked successful') . EOL);
 752                 goaway($a->get_baseurl(true) . '/admin/dbsync');
 753         }
 754
 755         if(($a->argc > 2) AND (intval($a->argv[2]) OR ($a->argv[2] === 'check'))) {
 756                 require_once("include/dbstructure.php");
 757                 $retval = update_structure(false, true);
 758                 if (!$retval) {
 759                         $o .= sprintf(t("Database structure update %s was successfully applied."), DB_UPDATE_VERSION)."<br />";
 760                         set_config('database', 'dbupdate_'.DB_UPDATE_VERSION, 'success');
 761                 } else
 762                         $o .= sprintf(t("Executing of database structure update %s failed with error: %s"),
 763                                         DB_UPDATE_VERSION, $retval)."<br />";
 764                 if ($a->argv[2] === 'check')
 765                         return $o;
 766         }
 767
 768         if ($a->argc > 2 && intval($a->argv[2])) {
 769                 require_once('update.php');
 770                 $func = 'update_' . intval($a->argv[2]);
 771                 if(function_exists($func)) {
 772                         $retval = $func();
 773                         if($retval === UPDATE_FAILED) {
 774                                 $o .= sprintf(t("Executing %s failed with error: %s"), $func, $retval);
 775                         }
 776                         elseif($retval === UPDATE_SUCCESS) {
 777                                 $o .= sprintf(t('Update %s was successfully applied.', $func));
 778                                 set_config('database',$func, 'success');
 779                         }
 780                         else
 781                                 $o .= sprintf(t('Update %s did not return a status. Unknown if it succeeded.'), $func);
 782                 } else {
 783                         $o .= sprintf(t('There was no additional update function %s that needed to be called.'), $func)."<br />";
 784                         set_config('database',$func, 'success');
 785                 }
 786                 return $o;
 787         }
 788
 789         $failed = array();
 790         $r = q("select k, v from config where `cat` = 'database' ");
 791         if(count($r)) {
 792                 foreach($r as $rr) {
 793                         $upd = intval(substr($rr['k'],7));
 794                         if($upd < 1139 || $rr['v'] === 'success')
 795                                 continue;
 796                         $failed[] = $upd;
 797                 }
 798         }
 799         if(! count($failed)) {
 800                 $o = replace_macros(get_markup_template('structure_check.tpl'),array(
 801                         '$base' => $a->get_baseurl(true),
 802                         '$banner' => t('No failed updates.'),
 803                         '$check' => t('Check database structure'),
 804                 ));
 805         } else {
 806                 $o = replace_macros(get_markup_template('failed_updates.tpl'),array(
 807                         '$base' => $a->get_baseurl(true),
 808                         '$banner' => t('Failed Updates'),
 809                         '$desc' => t('This does not include updates prior to 1139, which did not return a status.'),
 810                         '$mark' => t('Mark success (if update was manually applied)'),
 811                         '$apply' => t('Attempt to execute this update step automatically'),
 812                         '$failed' => $failed
 813                 ));
 814         }
 815
 816         return $o;
 817
 818 }
 819
 820 /**
 821  * Users admin page
 822  *
 823  * @param App $a
 824  */
 825 function admin_page_users_post(&$a){
 826         $pending = ( x($_POST, 'pending') ? $_POST['pending'] : Array() );
 827         $users = ( x($_POST, 'user') ? $_POST['user'] : Array() );
 828         $nu_name = ( x($_POST, 'new_user_name') ? $_POST['new_user_name'] : '');
 829         $nu_nickname = ( x($_POST, 'new_user_nickname') ? $_POST['new_user_nickname'] : '');
 830         $nu_email = ( x($_POST, 'new_user_email') ? $_POST['new_user_email'] : '');
 831
 832         check_form_security_token_redirectOnErr($a->get_baseurl().'/admin/users', 'admin_users');
 833
 834         if (!($nu_name==="") && !($nu_email==="") && !($nu_nickname==="")) {
 835                 require_once('include/user.php');
 836
 837                 $result = create_user( array('username'=>$nu_name, 'email'=>$nu_email, 'nickname'=>$nu_nickname, 'verified'=>1)  );
 838                 if(! $result['success']) {
 839                         notice($result['message']);
 840                         return;
 841                 }
 842                 $nu = $result['user'];
 843                 $preamble = deindent(t('
 844                         Dear %1$s,
 845                                 the administrator of %2$s has set up an account for you.'));
 846                 $body = deindent(t('
 847                         The login details are as follows:
 848
 849                         Site Location:  %1$s
 850                         Login Name:             %2$s
 851                         Password:               %3$s
 852
 853                         You may change your password from your account "Settings" page after logging
 854                         in.
 855
 856                         Please take a few moments to review the other account settings on that page.
 857
 858                         You may also wish to add some basic information to your default profile
 859                         (on the "Profiles" page) so that other people can easily find you.
 860
 861                         We recommend setting your full name, adding a profile photo,
 862                         adding some profile "keywords" (very useful in making new friends) - and
 863                         perhaps what country you live in; if you do not wish to be more specific
 864                         than that.
 865
 866                         We fully respect your right to privacy, and none of these items are necessary.
 867                         If you are new and do not know anybody here, they may help
 868                         you to make some new and interesting friends.
 869
 870                         Thank you and welcome to %4$s.'));
 871
 872                 $preamble = sprintf($preamble, $nu['username'], $a->config['sitename']);
 873                 $body = sprintf($body, $a->get_baseurl(), $nu['email'], $result['password'], $a->config['sitename']);
 874
 875                 notification(array(
 876                         'type' => "SYSTEM_EMAIL",
 877                         'to_email' => $nu['email'],
 878                         'subject'=> sprintf( t('Registration details for %s'), $a->config['sitename']),
 879                         'preamble'=> $preamble,
 880                         'body' => $body));
 881
 882         }
 883
 884         if (x($_POST,'page_users_block')){
 885                 foreach($users as $uid){
 886                         q("UPDATE `user` SET `blocked`=1-`blocked` WHERE `uid`=%s",
 887                                 intval( $uid )
 888                         );
 889                 }
 890                 notice( sprintf( tt("%s user blocked/unblocked", "%s users blocked/unblocked", count($users)), count($users)) );
 891         }
 892         if (x($_POST,'page_users_delete')){
 893                 require_once("include/Contact.php");
 894                 foreach($users as $uid){
 895                         user_remove($uid);
 896                 }
 897                 notice( sprintf( tt("%s user deleted", "%s users deleted", count($users)), count($users)) );
 898         }
 899
 900         if (x($_POST,'page_users_approve')){
 901                 require_once("mod/regmod.php");
 902                 foreach($pending as $hash){
 903                         user_allow($hash);
 904                 }
 905         }
 906         if (x($_POST,'page_users_deny')){
 907                 require_once("mod/regmod.php");
 908                 foreach($pending as $hash){
 909                         user_deny($hash);
 910                 }
 911         }
 912         goaway($a->get_baseurl(true) . '/admin/users' );
 913         return; // NOTREACHED
 914 }
 915
 916 /**
 917  * @param App $a
 918  * @return string
 919  */
 920 function admin_page_users(&$a){
 921         if ($a->argc>2) {
 922                 $uid = $a->argv[3];
 923                 $user = q("SELECT username, blocked FROM `user` WHERE `uid`=%d", intval($uid));
 924                 if (count($user)==0){
 925                         notice( 'User not found' . EOL);
 926                         goaway($a->get_baseurl(true) . '/admin/users' );
 927                         return ''; // NOTREACHED
 928                 }
 929                 switch($a->argv[2]){
 930                         case "delete":{
 931                                 check_form_security_token_redirectOnErr('/admin/users', 'admin_users', 't');
 932                                 // delete user
 933                                 require_once("include/Contact.php");
 934                                 user_remove($uid);
 935
 936                                 notice( sprintf(t("User '%s' deleted"), $user[0]['username']) . EOL);
 937                         }; break;
 938                         case "block":{
 939                                 check_form_security_token_redirectOnErr('/admin/users', 'admin_users', 't');
 940                                 q("UPDATE `user` SET `blocked`=%d WHERE `uid`=%s",
 941                                         intval( 1-$user[0]['blocked'] ),
 942                                         intval( $uid )
 943                                 );
 944                                 notice( sprintf( ($user[0]['blocked']?t("User '%s' unblocked"):t("User '%s' blocked")) , $user[0]['username']) . EOL);
 945                         }; break;
 946                 }
 947                 goaway($a->get_baseurl(true) . '/admin/users' );
 948                 return ''; // NOTREACHED
 949
 950         }
 951
 952         /* get pending */
 953         $pending = q("SELECT `register`.*, `contact`.`name`, `user`.`email`
 954                                  FROM `register`
 955                                  LEFT JOIN `contact` ON `register`.`uid` = `contact`.`uid`
 956                                  LEFT JOIN `user` ON `register`.`uid` = `user`.`uid`;");
 957
 958
 959         /* get users */
 960
 961         $total = q("SELECT count(*) as total FROM `user` where 1");
 962         if(count($total)) {
 963                 $a->set_pager_total($total[0]['total']);
 964                 $a->set_pager_itemspage(100);
 965         }
 966
 967
 968         $users = q("SELECT `user` . * , `contact`.`name` , `contact`.`url` , `contact`.`micro`, `lastitem`.`lastitem_date`, `user`.`account_expired`
 969                                 FROM
 970                                         (SELECT MAX(`item`.`changed`) as `lastitem_date`, `item`.`uid`
 971                                         FROM `item`
 972                                         WHERE `item`.`type` = 'wall'
 973                                         GROUP BY `item`.`uid`) AS `lastitem`
 974                                                  RIGHT OUTER JOIN `user` ON `user`.`uid` = `lastitem`.`uid`,
 975                                            `contact`
 976                                 WHERE
 977                                            `user`.`uid` = `contact`.`uid`
 978                                                 AND `user`.`verified` =1
 979                                         AND `contact`.`self` =1
 980                                 ORDER BY `contact`.`name` LIMIT %d, %d
 981                                 ",
 982                                 intval($a->pager['start']),
 983                                 intval($a->pager['itemspage'])
 984                                 );
 985
 986         $adminlist = explode(",", str_replace(" ", "", $a->config['admin_email']));
 987         $_setup_users = function ($e) use ($adminlist){
 988                 $accounts = Array(
 989                         t('Normal Account'),
 990                         t('Soapbox Account'),
 991                         t('Community/Celebrity Account'),
 992                                                 t('Automatic Friend Account')
 993                 );
 994                 $e['page-flags'] = $accounts[$e['page-flags']];
 995                 $e['register_date'] = relative_date($e['register_date']);
 996                 $e['login_date'] = relative_date($e['login_date']);
 997                 $e['lastitem_date'] = relative_date($e['lastitem_date']);
 998                 //$e['is_admin'] = ($e['email'] === $a->config['admin_email']);
 999                 $e['is_admin'] = in_array($e['email'], $adminlist);
1000                 $e['is_deletable'] = (intval($e['uid']) != local_user());
1001                 $e['deleted'] = ($e['account_removed']?relative_date($e['account_expires_on']):False);
1002                 return $e;
1003         };
1004         $users = array_map($_setup_users, $users);
1005
1006
1007         // Get rid of dashes in key names, Smarty3 can't handle them
1008         // and extracting deleted users
1009
1010         $tmp_users = Array();
1011         $deleted = Array();
1012
1013         while(count($users)) {
1014                 $new_user = Array();
1015                 foreach( array_pop($users) as $k => $v) {
1016                         $k = str_replace('-','_',$k);
1017                         $new_user[$k] = $v;
1018                 }
1019                 if($new_user['deleted']) {
1020                         array_push($deleted, $new_user);
1021                 }
1022                 else {
1023                         array_push($tmp_users, $new_user);
1024                 }
1025         }
1026         //Reversing the two array, and moving $tmp_users to $users
1027         array_reverse($deleted);
1028         while(count($tmp_users)) {
1029                 array_push($users, array_pop($tmp_users));
1030         }
1031
1032         $t = get_markup_template("admin_users.tpl");
1033         $o = replace_macros($t, array(
1034                 // strings //
1035                 '$title' => t('Administration'),
1036                 '$page' => t('Users'),
1037                 '$submit' => t('Add User'),
1038                 '$select_all' => t('select all'),
1039                 '$h_pending' => t('User registrations waiting for confirm'),
1040                 '$h_deleted' => t('User waiting for permanent deletion'),
1041                 '$th_pending' => array( t('Request date'), t('Name'), t('Email') ),
1042                 '$no_pending' =>  t('No registrations.'),
1043                 '$approve' => t('Approve'),
1044                 '$deny' => t('Deny'),
1045                 '$delete' => t('Delete'),
1046                 '$block' => t('Block'),
1047                 '$unblock' => t('Unblock'),
1048                 '$siteadmin' => t('Site admin'),
1049                 '$accountexpired' => t('Account expired'),
1050
1051                 '$h_users' => t('Users'),
1052                 '$h_newuser' => t('New User'),
1053                 '$th_deleted' => array( t('Name'), t('Email'), t('Register date'), t('Last login'), t('Last item'), t('Deleted since') ),
1054                 '$th_users' => array( t('Name'), t('Email'), t('Register date'), t('Last login'), t('Last item'),  t('Account') ),
1055
1056                 '$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?'),
1057                 '$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?'),
1058
1059                 '$form_security_token' => get_form_security_token("admin_users"),
1060
1061                 // values //
1062                 '$baseurl' => $a->get_baseurl(true),
1063
1064                 '$pending' => $pending,
1065                 'deleted' => $deleted,
1066                 '$users' => $users,
1067                 '$newusername'  => array('new_user_name', t("Name"), '', t("Name of the new user.")),
1068                 '$newusernickname'  => array('new_user_nickname', t("Nickname"), '', t("Nickname of the new user.")),
1069                 '$newuseremail'  => array('new_user_email', t("Email"), '', t("Email address of the new user."), '', '', 'email'),
1070         ));
1071         $o .= paginate($a);
1072         return $o;
1073 }
1074
1075
1076 /**
1077  * Plugins admin page
1078  *
1079  * @param App $a
1080  * @return string
1081  */
1082 function admin_page_plugins(&$a){
1083
1084         /**
1085          * Single plugin
1086          */
1087         if ($a->argc == 3){
1088                 $plugin = $a->argv[2];
1089                 if (!is_file("addon/$plugin/$plugin.php")){
1090                         notice( t("Item not found.") );
1091                         return '';
1092                 }
1093
1094                 if (x($_GET,"a") && $_GET['a']=="t"){
1095                         check_form_security_token_redirectOnErr('/admin/plugins', 'admin_themes', 't');
1096
1097                         // Toggle plugin status
1098                         $idx = array_search($plugin, $a->plugins);
1099                         if ($idx !== false){
1100                                 unset($a->plugins[$idx]);
1101                                 uninstall_plugin($plugin);
1102                                 info( sprintf( t("Plugin %s disabled."), $plugin ) );
1103                         } else {
1104                                 $a->plugins[] = $plugin;
1105                                 install_plugin($plugin);
1106                                 info( sprintf( t("Plugin %s enabled."), $plugin ) );
1107                         }
1108                         set_config("system","addon", implode(", ",$a->plugins));
1109                         goaway($a->get_baseurl(true) . '/admin/plugins' );
1110                         return ''; // NOTREACHED
1111                 }
1112                 // display plugin details
1113                 require_once('library/markdown.php');
1114
1115                 if (in_array($plugin, $a->plugins)){
1116                         $status="on"; $action= t("Disable");
1117                 } else {
1118                         $status="off"; $action= t("Enable");
1119                 }
1120
1121                 $readme=Null;
1122                 if (is_file("addon/$plugin/README.md")){
1123                         $readme = file_get_contents("addon/$plugin/README.md");
1124                         $readme = Markdown($readme);
1125                 } else if (is_file("addon/$plugin/README")){
1126                         $readme = "<pre>". file_get_contents("addon/$plugin/README") ."</pre>";
1127                 }
1128
1129                 $admin_form="";
1130                 if (is_array($a->plugins_admin) && in_array($plugin, $a->plugins_admin)){
1131                         @require_once("addon/$plugin/$plugin.php");
1132                         $func = $plugin.'_plugin_admin';
1133                         $func($a, $admin_form);
1134                 }
1135
1136                 $t = get_markup_template("admin_plugins_details.tpl");
1137
1138                 return replace_macros($t, array(
1139                         '$title' => t('Administration'),
1140                         '$page' => t('Plugins'),
1141                         '$toggle' => t('Toggle'),
1142                         '$settings' => t('Settings'),
1143                         '$baseurl' => $a->get_baseurl(true),
1144
1145                         '$plugin' => $plugin,
1146                         '$status' => $status,
1147                         '$action' => $action,
1148                         '$info' => get_plugin_info($plugin),
1149                         '$str_author' => t('Author: '),
1150                         '$str_maintainer' => t('Maintainer: '),
1151
1152                         '$admin_form' => $admin_form,
1153                         '$function' => 'plugins',
1154                         '$screenshot' => '',
1155                         '$readme' => $readme,
1156
1157                         '$form_security_token' => get_form_security_token("admin_themes"),
1158                 ));
1159         }
1160
1161
1162
1163         /**
1164          * List plugins
1165          */
1166
1167         $plugins = array();
1168         $files = glob("addon/*/"); /* */
1169         if($files) {
1170                 foreach($files as $file) {
1171                         if (is_dir($file)){
1172                                 list($tmp, $id)=array_map("trim", explode("/",$file));
1173                                 $info = get_plugin_info($id);
1174                                 $show_plugin = true;
1175
1176                                 // If the addon is unsupported, then only show it, when it is enabled
1177                                 if ((strtolower($info["status"]) == "unsupported") AND !in_array($id,  $a->plugins))
1178                                         $show_plugin = false;
1179
1180                                 // Override the above szenario, when the admin really wants to see outdated stuff
1181                                 if (get_config("system", "show_unsupported_addons"))
1182                                         $show_plugin = true;
1183
1184                                 if ($show_plugin)
1185                                         $plugins[] = array($id, (in_array($id,  $a->plugins)?"on":"off") , $info);
1186                         }
1187                 }
1188         }
1189
1190         $t = get_markup_template("admin_plugins.tpl");
1191         return replace_macros($t, array(
1192                 '$title' => t('Administration'),
1193                 '$page' => t('Plugins'),
1194                 '$submit' => t('Save Settings'),
1195                 '$baseurl' => $a->get_baseurl(true),
1196                 '$function' => 'plugins',
1197                 '$plugins' => $plugins,
1198                 '$form_security_token' => get_form_security_token("admin_themes"),
1199         ));
1200 }
1201
1202 /**
1203  * @param array $themes
1204  * @param string $th
1205  * @param int $result
1206  */
1207 function toggle_theme(&$themes,$th,&$result) {
1208         for($x = 0; $x < count($themes); $x ++) {
1209                 if($themes[$x]['name'] === $th) {
1210                         if($themes[$x]['allowed']) {
1211                                 $themes[$x]['allowed'] = 0;
1212                                 $result = 0;
1213                         }
1214                         else {
1215                                 $themes[$x]['allowed'] = 1;
1216                                 $result = 1;
1217                         }
1218                 }
1219         }
1220 }
1221
1222 /**
1223  * @param array $themes
1224  * @param string $th
1225  * @return int
1226  */
1227 function theme_status($themes,$th) {
1228         for($x = 0; $x < count($themes); $x ++) {
1229                 if($themes[$x]['name'] === $th) {
1230                         if($themes[$x]['allowed']) {
1231                                 return 1;
1232                         }
1233                         else {
1234                                 return 0;
1235                         }
1236                 }
1237         }
1238         return 0;
1239 }
1240
1241
1242 /**
1243  * @param array $themes
1244  * @return string
1245  */
1246 function rebuild_theme_table($themes) {
1247         $o = '';
1248         if(count($themes)) {
1249                 foreach($themes as $th) {
1250                         if($th['allowed']) {
1251                                 if(strlen($o))
1252                                         $o .= ',';
1253                                 $o .= $th['name'];
1254                         }
1255                 }
1256         }
1257         return $o;
1258 }
1259
1260
1261 /**
1262  * Themes admin page
1263  *
1264  * @param App $a
1265  * @return string
1266  */
1267 function admin_page_themes(&$a){
1268
1269         $allowed_themes_str = get_config('system','allowed_themes');
1270         $allowed_themes_raw = explode(',',$allowed_themes_str);
1271         $allowed_themes = array();
1272         if(count($allowed_themes_raw))
1273                 foreach($allowed_themes_raw as $x)
1274                         if(strlen(trim($x)))
1275                                 $allowed_themes[] = trim($x);
1276
1277         $themes = array();
1278         $files = glob('view/theme/*'); /* */
1279         if($files) {
1280                 foreach($files as $file) {
1281                         $f = basename($file);
1282                         $is_experimental = intval(file_exists($file . '/experimental'));
1283                         $is_supported = 1-(intval(file_exists($file . '/unsupported')));
1284                         $is_allowed = intval(in_array($f,$allowed_themes));
1285
1286                         if ($is_allowed OR $is_supported OR get_config("system", "show_unsupported_themes"))
1287                                 $themes[] = array('name' => $f, 'experimental' => $is_experimental, 'supported' => $is_supported, 'allowed' => $is_allowed);
1288                 }
1289         }
1290
1291         if(! count($themes)) {
1292                 notice( t('No themes found.'));
1293                 return '';
1294         }
1295
1296         /**
1297          * Single theme
1298          */
1299
1300         if ($a->argc == 3){
1301                 $theme = $a->argv[2];
1302                 if(! is_dir("view/theme/$theme")){
1303                         notice( t("Item not found.") );
1304                         return '';
1305                 }
1306
1307                 if (x($_GET,"a") && $_GET['a']=="t"){
1308                         check_form_security_token_redirectOnErr('/admin/themes', 'admin_themes', 't');
1309
1310                         // Toggle theme status
1311
1312                         toggle_theme($themes,$theme,$result);
1313                         $s = rebuild_theme_table($themes);
1314                         if($result) {
1315                                 install_theme($theme);
1316                                 info( sprintf('Theme %s enabled.',$theme));
1317                         }
1318                         else {
1319                                 uninstall_theme($theme);
1320                                 info( sprintf('Theme %s disabled.',$theme));
1321                         }
1322
1323                         set_config('system','allowed_themes',$s);
1324                         goaway($a->get_baseurl(true) . '/admin/themes' );
1325                         return ''; // NOTREACHED
1326                 }
1327
1328                 // display theme details
1329                 require_once('library/markdown.php');
1330
1331                 if (theme_status($themes,$theme)) {
1332                         $status="on"; $action= t("Disable");
1333                 } else {
1334                         $status="off"; $action= t("Enable");
1335                 }
1336
1337                 $readme=Null;
1338                 if (is_file("view/theme/$theme/README.md")){
1339                         $readme = file_get_contents("view/theme/$theme/README.md");
1340                         $readme = Markdown($readme);
1341                 } else if (is_file("view/theme/$theme/README")){
1342                         $readme = "<pre>". file_get_contents("view/theme/$theme/README") ."</pre>";
1343                 }
1344
1345                 $admin_form="";
1346                 if (is_file("view/theme/$theme/config.php")){
1347                         require_once("view/theme/$theme/config.php");
1348                         if(function_exists("theme_admin")){
1349                                 $admin_form = theme_admin($a);
1350                         }
1351
1352                 }
1353
1354                 $screenshot = array( get_theme_screenshot($theme), t('Screenshot'));
1355                 if(! stristr($screenshot[0],$theme))
1356                         $screenshot = null;
1357
1358                 $t = get_markup_template("admin_plugins_details.tpl");
1359                 return replace_macros($t, array(
1360                         '$title' => t('Administration'),
1361                         '$page' => t('Themes'),
1362                         '$toggle' => t('Toggle'),
1363                         '$settings' => t('Settings'),
1364                         '$baseurl' => $a->get_baseurl(true),
1365
1366                         '$plugin' => $theme,
1367                         '$status' => $status,
1368                         '$action' => $action,
1369                         '$info' => get_theme_info($theme),
1370                         '$function' => 'themes',
1371                         '$admin_form' => $admin_form,
1372                         '$str_author' => t('Author: '),
1373                         '$str_maintainer' => t('Maintainer: '),
1374                         '$screenshot' => $screenshot,
1375                         '$readme' => $readme,
1376
1377                         '$form_security_token' => get_form_security_token("admin_themes"),
1378                 ));
1379         }
1380
1381         /**
1382          * List themes
1383          */
1384
1385         $xthemes = array();
1386         if($themes) {
1387                 foreach($themes as $th) {
1388                         $xthemes[] = array($th['name'],(($th['allowed']) ? "on" : "off"), get_theme_info($th['name']));
1389                 }
1390         }
1391
1392         $t = get_markup_template("admin_plugins.tpl");
1393         return replace_macros($t, array(
1394                 '$title' => t('Administration'),
1395                 '$page' => t('Themes'),
1396                 '$submit' => t('Save Settings'),
1397                 '$baseurl' => $a->get_baseurl(true),
1398                 '$function' => 'themes',
1399                 '$plugins' => $xthemes,
1400                 '$experimental' => t('[Experimental]'),
1401                 '$unsupported' => t('[Unsupported]'),
1402                 '$form_security_token' => get_form_security_token("admin_themes"),
1403         ));
1404 }
1405
1406
1407 /**
1408  * Logs admin page
1409  *
1410  * @param App $a
1411  */
1412
1413 function admin_page_logs_post(&$a) {
1414         if (x($_POST,"page_logs")) {
1415                 check_form_security_token_redirectOnErr('/admin/logs', 'admin_logs');
1416
1417                 $logfile                =       ((x($_POST,'logfile'))          ? notags(trim($_POST['logfile']))       : '');
1418                 $debugging              =       ((x($_POST,'debugging'))        ? true                                                          : false);
1419                 $loglevel               =       ((x($_POST,'loglevel'))         ? intval(trim($_POST['loglevel']))      : 0);
1420
1421                 set_config('system','logfile', $logfile);
1422                 set_config('system','debugging',  $debugging);
1423                 set_config('system','loglevel', $loglevel);
1424
1425
1426         }
1427
1428         info( t("Log settings updated.") );
1429         goaway($a->get_baseurl(true) . '/admin/logs' );
1430         return; // NOTREACHED
1431 }
1432
1433 /**
1434  * @param App $a
1435  * @return string
1436  */
1437 function admin_page_logs(&$a){
1438
1439         $log_choices = Array(
1440                 LOGGER_NORMAL => 'Normal',
1441                 LOGGER_TRACE => 'Trace',
1442                 LOGGER_DEBUG => 'Debug',
1443                 LOGGER_DATA => 'Data',
1444                 LOGGER_ALL => 'All'
1445         );
1446
1447         $t = get_markup_template("admin_logs.tpl");
1448
1449         $f = get_config('system','logfile');
1450
1451         $data = '';
1452
1453         if(!file_exists($f)) {
1454                 $data = t("Error trying to open <strong>$f</strong> log file.\r\n<br/>Check to see if file $f exist and is
1455 readable.");
1456         }
1457         else {
1458                 $fp = fopen($f, 'r');
1459                 if(!$fp) {
1460                         $data = t("Couldn't open <strong>$f</strong> log file.\r\n<br/>Check to see if file $f is readable.");
1461                 }
1462                 else {
1463                         $fstat = fstat($fp);
1464                         $size = $fstat['size'];
1465                         if($size != 0)
1466                         {
1467                                 if($size > 5000000 || $size < 0)
1468                                         $size = 5000000;
1469                                 $seek = fseek($fp,0-$size,SEEK_END);
1470                                 if($seek === 0) {
1471                                         $data = escape_tags(fread($fp,$size));
1472                                         while(! feof($fp))
1473                                                 $data .= escape_tags(fread($fp,4096));
1474                                 }
1475                         }
1476                         fclose($fp);
1477                 }
1478         }
1479
1480         return replace_macros($t, array(
1481                 '$title' => t('Administration'),
1482                 '$page' => t('Logs'),
1483                 '$submit' => t('Save Settings'),
1484                 '$clear' => t('Clear'),
1485                 '$data' => $data,
1486                 '$baseurl' => $a->get_baseurl(true),
1487                 '$logname' =>  get_config('system','logfile'),
1488
1489                                                                         // name, label, value, help string, extra data...
1490                 '$debugging'            => array('debugging', t("Enable Debugging"),get_config('system','debugging'), ""),
1491                 '$logfile'                      => array('logfile', t("Log file"), get_config('system','logfile'), t("Must be writable by web server. Relative to your Friendica top-level directory.")),
1492                 '$loglevel'             => array('loglevel', t("Log level"), get_config('system','loglevel'), "", $log_choices),
1493
1494                 '$form_security_token' => get_form_security_token("admin_logs"),
1495         ));
1496 }
1497
1498 /**
1499  * @param App $a
1500  */
1501 function admin_page_remoteupdate_post(&$a) {
1502         // this function should be called via ajax post
1503         if(!is_site_admin()) {
1504                 return;
1505         }
1506
1507
1508         if (x($_POST,'remotefile') && $_POST['remotefile']!=""){
1509                 $remotefile = $_POST['remotefile'];
1510                 $ftpdata = (x($_POST['ftphost'])?$_POST:false);
1511                 doUpdate($remotefile, $ftpdata);
1512         } else {
1513                 echo "No remote file to download. Abort!";
1514         }
1515
1516         killme();
1517 }
1518
1519 /**
1520  * @param App $a
1521  * @return string
1522  */
1523 function admin_page_remoteupdate(&$a) {
1524         if(!is_site_admin()) {
1525                 return login(false);
1526         }
1527
1528         $canwrite = canWeWrite();
1529         $canftp = function_exists('ftp_connect');
1530
1531         $needupdate = true;
1532         $u = checkUpdate();
1533         if (!is_array($u)){
1534                 $needupdate = false;
1535                 $u = array('','','');
1536         }
1537
1538         $tpl = get_markup_template("admin_remoteupdate.tpl");
1539         return replace_macros($tpl, array(
1540                 '$baseurl' => $a->get_baseurl(true),
1541                 '$submit' => t("Update now"),
1542                 '$close' => t("Close"),
1543                 '$localversion' => FRIENDICA_VERSION,
1544                 '$remoteversion' => $u[1],
1545                 '$needupdate' => $needupdate,
1546                 '$canwrite' => $canwrite,
1547                 '$canftp'       => $canftp,
1548                 '$ftphost'      => array('ftphost', t("FTP Host"), '',''),
1549                 '$ftppath'      => array('ftppath', t("FTP Path"), '/',''),
1550                 '$ftpuser'      => array('ftpuser', t("FTP User"), '',''),
1551                 '$ftppwd'       => array('ftppwd', t("FTP Password"), '',''),
1552                 '$remotefile'=>array('remotefile','', $u['2'],''),
1553         ));
1554
1555 }