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