mod/admin.php

   1 <?php
   2  /**
   3   * Friendika admin
   4   */
   5
   6
   7 function admin_init(&$a) {
   8         if(!is_site_admin()) {
   9                 notice( t('Permission denied.') . EOL);
  10                 return;
  11         }
  12 }
  13
  14 function admin_post(&$a){
  15         if(!is_site_admin()) {
  16                 return login(false);
  17         }
  18
  19         // urls
  20         if ($a->argc > 1){
  21                 switch ($a->argv[1]){
  22                         case 'site': {
  23                                 admin_page_site_post($a);
  24                                 break;
  25                         }
  26                 }
  27         }
  28
  29         goaway($a->get_baseurl() . '/admin' );
  30         return; // NOTREACHED
  31 }
  32
  33 function admin_content(&$a) {
  34
  35         if(!is_site_admin()) {
  36                 return login(false);
  37         }
  38
  39         /**
  40          * Side bar links
  41          */
  42
  43         // array( url, name, extra css classes )
  44         $aside = Array(
  45                 'site'   =>     Array($a->get_baseurl()."/admin/site/", t("Site") , "site"),
  46                 'users'  =>     Array($a->get_baseurl()."/admin/users/", t("Users") , "users"),
  47                 'plugins'=>     Array($a->get_baseurl()."/admin/plugins/", t("Plugins") , "plugins")
  48         );
  49
  50         /* get plugins admin page */
  51
  52         $r = q("SELECT * FROM `hook` WHERE `hook`='plugin_admin'");
  53         $aside['plugins_admin']=Array();
  54         foreach ($r as $h){
  55                 $plugin = explode("/",$h['file']); $plugin = $plugin[1];
  56                 $aside['plugins_admin'][] = Array($a->get_baseurl()."/admin/plugins/".$plugin, $plugin, "plugin");
  57         }
  58
  59         $aside['logs'] = Array($a->get_baseurl()."/admin/logs/", t("Logs"), "logs");
  60
  61         $t = get_markup_template("admin_aside.tpl");
  62         $a->page['aside'] = replace_macros( $t, array(
  63                         '$admin' => $aside,
  64                         '$admurl'=> $a->get_baseurl()."/admin/"
  65         ));
  66
  67
  68
  69         /**
  70          * Page content
  71          */
  72         $o = '';
  73
  74         // urls
  75         if ($a->argc > 1){
  76                 switch ($a->argv[1]){
  77                         case 'site':
  78                                 $o = admin_page_site($a);
  79                                 break;
  80                         case 'users':
  81                                 $o = admin_page_users($a);
  82                                 break;
  83                         case 'plugins':
  84                                 $o = admin_page_plugins($a);
  85                                 break;
  86                         default:
  87                                 notice( t("Item not found.") );
  88                 }
  89         } else {
  90                 $o = admin_page_summary($a);
  91         }
  92         return $o;
  93 }
  94
  95
  96 /**
  97  * Admin Summary Page
  98  */
  99 function admin_page_summary(&$a) {
 100         $r = q("SELECT `page-flags`, COUNT(uid) as `count` FROM `user` GROUP BY `page-flags`");
 101         $accounts = Array(
 102                 Array( t('Normal Account'), 0),
 103                 Array( t('Soapbox Account'), 0),
 104                 Array( t('Community/Celebrity Account'), 0),
 105                 Array( t('Automatic Friend Account'), 0)
 106         );
 107         $users=0;
 108         foreach ($r as $u){ $accounts[$u['page-flags']][1] = $u['count']; $users+=$u['count']; }
 109
 110
 111         $r = q("SELECT COUNT(id) as `count` FROM `register`");
 112         $pending = $r[0]['count'];
 113
 114
 115
 116
 117
 118         $t = get_markup_template("admin_summary.tpl");
 119         return replace_macros($t, array(
 120                 '$title' => t('Administration'),
 121                 '$page' => t('Summary'),
 122                 '$users' => Array( t('Registered users'), $users),
 123                 '$accounts' => $accounts,
 124                 '$pending' => Array( t('Pending registrations'), $pending),
 125                 '$version' => Array( t('Version'), FRIENDIKA_VERSION),
 126                 '$build' =>  get_config('system','build'),
 127                 '$plugins' => Array( t('Active plugins'), $a->plugins )
 128         ));
 129 }
 130
 131
 132 /**
 133  * Admin Site Page
 134  */
 135 function admin_page_site_post(&$a){
 136         if (!x($_POST,"page_site")){
 137                 return;
 138         }
 139
 140
 141         $sitename                       =       ((x($_POST,'sitename'))                 ? notags(trim($_POST['sitename']))                      : '');
 142         $banner                         =       ((x($_POST,'banner'))                   ? trim($_POST['banner'])                                        : false);
 143         $language                       =       ((x($_POST,'language'))                 ? notags(trim($_POST['language']))                      : '');
 144         $theme                          =       ((x($_POST,'theme'))                    ? notags(trim($_POST['theme']))                         : '');
 145         $maximagesize           =       ((x($_POST,'maximagesize'))             ? intval(trim($_POST['maximagesize']))          :  0);
 146         $allowed_sites          =       ((x($_POST,'allowed_sites'))    ? notags(trim($_POST['allowed_sites']))         : '');
 147         $allowed_email          =       ((x($_POST,'allowed_email'))    ? notags(trim($_POST['allowed_email']))         : '');
 148         $block_public           =       ((x($_POST,'block_public'))             ? True  :       False);
 149         $force_publish          =       ((x($_POST,'publish_all'))              ? True  :       False);
 150         $global_directory       =       ((x($_POST,'directory_submit_url'))     ? notags(trim($_POST['directory_submit_url']))  : '');
 151         $global_search_url      =       ((x($_POST,'directory_search_url'))? notags(trim($_POST['directory_search_url']))       : '');
 152         $no_multi_reg           =       ((x($_POST,'no_multi_reg'))             ? True  :       False);
 153         $no_openid                      =       ((x($_POST,'no_openid'))                ? True  :       False);
 154         $no_gravatar            =       ((x($_POST,'no_gravatar'))              ? True  :       False);
 155         $no_regfullname         =       ((x($_POST,'no_regfullname'))   ? True  :       False);
 156         $no_utf                         =       ((x($_POST,'no_utf'))                   ? True  :       False);
 157         $rino_enc                       =       ((x($_POST,'rino_enc'))                 ? True  :       False);
 158         $verifyssl                      =       ((x($_POST,'verifyssl'))                ? True  :       False);
 159         $proxyuser                      =       ((x($_POST,'proxyuser'))                ? notags(trim($_POST['global_search_url']))     : '');
 160         $proxy                          =       ((x($_POST,'proxy'))                    ? notags(trim($_POST['global_search_url']))     : '');
 161         $timeout                        =       ((x($_POST,'timeout'))                  ? intval(trim($_POST['timeout']))               : 60);
 162
 163
 164         $a->config['sitename'] = $sitename;
 165         if ($banner==""){
 166                 // don't know why, but del_config doesn't work...
 167                 q("DELETE FROM `config` WHERE `cat` = '%s' AND `k` = '%s' LIMIT 1",
 168                         dbesc("system"),
 169                         dbesc("banner")
 170                 );
 171         } else {
 172                 set_config('system','banner', $banner);
 173         }
 174         set_config('system','language', $language);
 175         set_config('system','theme', $theme);
 176         set_config('system','maximagesize', $maximagesize);
 177         set_config('system','allowed_sites', $allowed_sites);
 178         set_config('system','allowed_email', $allowed_email);
 179         set_config('system','block_public', $block_public);
 180         set_config('system','publish_all', $force_publish);
 181         if ($global_directory==""){
 182                 // don't know why, but del_config doesn't work...
 183                 q("DELETE FROM `config` WHERE `cat` = '%s' AND `k` = '%s' LIMIT 1",
 184                         dbesc("system"),
 185                         dbesc("directory_submit_url")
 186                 );
 187         } else {
 188                 set_config('system','directory_submit_url', $global_directory);
 189         }
 190         set_config('system','directory_search_url', $global_search_url);
 191         set_config('system','block_extended_register', $no_multi_reg);
 192         set_config('system','no_openid', $no_openid);
 193         set_config('system','no_gravatar', $no_gravatar);
 194         set_config('system','no_regfullname', $no_regfullname);
 195         set_config('system','proxy', $no_utf);
 196         set_config('system','rino_encrypt', $rino_enc);
 197         set_config('system','verifyssl', $verifyssl);
 198         set_config('system','proxyuser', $proxyuser);
 199         set_config('system','proxy', $proxy);
 200         set_config('system','curl_timeout', $timeout);
 201
 202         $r = q("SELECT * FROM `config` WHERE `cat`='config' AND `k`='sitename'");
 203         if (count($r)>0){
 204                 q("UPDATE `config` SET `v`='%s' WHERE `cat`='config' AND `k`='sitename'",
 205                         dbesc($a->config['sitename'])
 206                 );
 207         } else {
 208                 q("INSERT INTO `config`  ( `cat`, `k`, `v` ) VALUES ( 'config', 'sitename', '%s' )",
 209                         dbesc($a->config['sitename'])
 210                 );
 211         }
 212
 213
 214
 215         goaway($a->get_baseurl() . '/admin/site' );
 216         return; // NOTREACHED
 217
 218 }
 219
 220 function admin_page_site(&$a) {
 221
 222         /* Installed langs */
 223         $lang_choices = array();
 224         $langs = glob('view/*/strings.php');
 225
 226         if(is_array($langs) && count($langs)) {
 227                 if(! in_array('view/en/strings.php',$langs))
 228                         $langs[] = 'view/en/';
 229                 asort($langs);
 230                 foreach($langs as $l) {
 231                         $t = explode("/",$l);
 232                         $lang_choices[$t[1]] = $t[1];
 233                 }
 234         }
 235
 236         /* Installed themes */
 237         $theme_choices = array();
 238         $files = glob('view/theme/*');
 239         if($files) {
 240                 foreach($files as $file) {
 241                         $f = basename($file);
 242                         $theme_name = ((file_exists($file . '/experimental')) ?  sprintf("%s - \x28Experimental\x29", $f) : $f);
 243                         $theme_choices[$f] = $theme_name;
 244                 }
 245         }
 246
 247
 248         /* Banner */
 249         $banner = get_config('system','banner');
 250         if($banner == false)
 251                 $banner = htmlspecialchars('<a href="http://project.friendika.com"><img id="logo-img" src="images/friendika-32.png" alt="logo" /></a><span id="logo-text"><a href="http://project.friendika.com">Friendika</a></span>');
 252
 253         //echo "<pre>"; var_dump($lang_choices); die("</pre>");
 254
 255
 256
 257         $t = get_markup_template("admin_site.tpl");
 258         return replace_macros($t, array(
 259                 '$title' => t('Administration'),
 260                 '$page' => t('Site'),
 261                 '$submit' => t('Submit'),
 262                 '$baseurl' => $a->get_baseurl(),
 263
 264                                                                         // name, label, value, help string, extra data...
 265                 '$sitename'             => array('sitename', t("Site name"), $a->config['sitename'], ""),
 266                 '$banner'                       => array('banner', t("Banner/Logo"), $banner, ""),
 267                 '$language'             => array('language', t("System language"), get_config('system','language'), "", $lang_choices),
 268                 '$theme'                        => array('theme', t("System theme"), get_config('system','theme'), "Default system theme (which may be over-ridden by user profiles)", $theme_choices),
 269
 270                 '$maximagesize'         => array('maximagesize', t("Maximum image size"), get_config('system','maximagesize'), "Maximum size in bytes of uploaded images. Default is 0, which means no limits."),
 271
 272                 '$allowed_sites'        => array('allowed_sites', t("Allowed friend domains"), get_config('system','allowed_sites'), "Comma separated list of domains which are allowed to establish friendships with this site. Wildcards are accepted. Empty to allow any domains"),
 273                 '$allowed_email'        => array('allowed_email', t("Allowed email domains"), get_config('system','allowed_email'), "Comma separated list of domains which are allowed in email addresses for registrations to this site. Wildcards are accepted. Empty to allow any domains"),
 274                 '$block_public'         => array('block_public', t("Block public"), get_config('system','block_public'), "Check to block public access to all otherwise public personal pages on this site unless you are currently logged in."),
 275                 '$force_publish'        => array('publish_all', t("Force publish"), get_config('system','publish_all'), "Check to force all profiles on this site to be listed in the site directory."),
 276                 '$global_directory'     => array('directory_submit_url', t("Global directory update URL"), get_config('system','directory_submit_url'), "URL to update the global directory. If this is not set, the global directory is completely unavailable to the application."),
 277                 '$global_search_url'=> array('directory_search_url', t("Global directory search URL"), get_config('system','directory_search_url'), ""),
 278
 279
 280                 '$no_multi_reg'         => array('no_multi_reg', t("Block multiple registrations"),  get_config('system','block_extended_register'), "Disallow users to register additional accounts for use as pages."),
 281                 '$no_openid'            => array('no_openid', t("No OpenID support"), get_config('system','no_openid'), "Disable OpenID support for registration and logins."),
 282                 '$no_gravatar'          => array('no_gravatar', t("No Gravatar support"), get_config('system','no_gravatar'), ""),
 283                 '$no_regfullname'       => array('no_regfullname', t("No fullname check"), get_config('system','no_regfullname'), "If unchecked, force users to registrate with a space between his firsname and lastname in Full name, as an antispam measure"),
 284                 '$no_utf'                       => array('no_utf', t("No UTF-8 Regular expressions"), get_config('system','proxy'), "Default is false (meaning UTF8 regular expressions are supported and working)"),
 285
 286                 '$rino_enc'                     => array('rino_enc', t("Enable Rino encrypt"), get_config('system','rino_encrypt'),""),
 287                 '$verifyssl'            => array('verifyssl', t("Verify SSL"), get_config('system','verifyssl'), "If you wish, you can turn on strict certificate checking. This will mean you cannot connect (at all) to self-signed SSL sites."),
 288                 '$proxyuser'            => array('proxyuser', t("Proxy user"), get_config('system','proxyuser'), ""),
 289                 '$proxy'                        => array('proxy', t("Proxy URL"), get_config('system','proxy'), ""),
 290                 '$timeout'                      => array('timeout', t("Network timeout"), (x(get_config('system','curl_timeout'))?get_config('system','curl_timeout'):60), "Value is in seconds. Set to 0 for unlimited (not recommended)."),
 291
 292
 293         ));
 294
 295 }
 296
 297
 298 /**
 299  * Users admin page
 300  */
 301
 302 function admin_page_users(&$a){
 303         return ":)";
 304 }
 305
 306
 307 /*
 308  * Plugins admin page
 309  */
 310
 311 function admin_page_plugins(&$a){
 312
 313         /* all plugins */
 314         $plugins = array();
 315         $files = glob("addon/*/");
 316         if($files) {
 317                 foreach($files as $file) {
 318                         if (is_dir($file)){
 319                                 list($tmp, $id)=array_map("trim", explode("/",$file));
 320                                 // TODO: plugins info
 321                                 $name=$author=$description=$homepage="";
 322                                 $plugins[] = array( $id, (in_array($id,  $a->plugins)?"on":"off") , $name, $author, $description, $homepage);
 323                         }
 324                 }
 325         }
 326
 327         $t = get_markup_template("admin_plugins.tpl");
 328         return replace_macros($t, array(
 329                 '$title' => t('Administration'),
 330                 '$page' => t('Plugins'),
 331                 '$submit' => t('Submit'),
 332                 '$baseurl' => $a->get_baseurl(),
 333
 334                 '$plugins' => $plugins
 335         ));
 336 }
 337