Fixes for referal system, shell scripts overworked:
[mailer.git] / inc / modules / admin / admin-inc.php
1 <?php
2 /************************************************************************
3  * Mailer v0.2.1-FINAL                                Start: 08/31/2003 *
4  * ===================                          Last change: 11/23/2004 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : admin-inc.php                                    *
8  * -------------------------------------------------------------------- *
9  * Short description : Administrative related functions                 *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Fuer die Administration benoetigte Funktionen    *
12  * -------------------------------------------------------------------- *
13  * $Revision::                                                        $ *
14  * $Date::                                                            $ *
15  * $Tag:: 0.2.1-FINAL                                                 $ *
16  * $Author::                                                          $ *
17  * -------------------------------------------------------------------- *
18  * Copyright (c) 2003 - 2009 by Roland Haeder                           *
19  * Copyright (c) 2009 - 2011 by Mailer Developer Team                   *
20  * For more information visit: http://www.mxchange.org                  *
21  *                                                                      *
22  * This program is free software; you can redistribute it and/or modify *
23  * it under the terms of the GNU General Public License as published by *
24  * the Free Software Foundation; either version 2 of the License, or    *
25  * (at your option) any later version.                                  *
26  *                                                                      *
27  * This program is distributed in the hope that it will be useful,      *
28  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
29  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
30  * GNU General Public License for more details.                         *
31  *                                                                      *
32  * You should have received a copy of the GNU General Public License    *
33  * along with this program; if not, write to the Free Software          *
34  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
35  * MA  02110-1301  USA                                                  *
36  ************************************************************************/
37
38 // Some security stuff...
39 if (!defined('__SECURITY')) {
40         die();
41 } // END - if
42
43 // Register an administrator account
44 function addAdminAccount ($adminLogin, $passHash, $adminEmail) {
45         // Login does already exist
46         $ret = 'already';
47
48         // Lookup the admin
49         $result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_admins` WHERE `login`='%s' LIMIT 1",
50                 array($adminLogin), __FUNCTION__, __LINE__);
51
52         // Is the entry there?
53         if (SQL_HASZERONUMS($result)) {
54                 // Ok, let's create the admin login
55                 SQL_QUERY_ESC("INSERT INTO `{?_MYSQL_PREFIX?}_admins` (`login`, `password`, `email`) VALUES ('%s', '%s', '%s')",
56                         array(
57                                 $adminLogin,
58                                 $passHash,
59                                 $adminEmail
60                         ), __FUNCTION__, __LINE__);
61
62                 // All done
63                 $ret = 'done';
64         } // END - if
65
66         // Free memory
67         SQL_FREERESULT($result);
68
69         // Return result
70         return $ret;
71 }
72
73 // This function will be executed when the admin is not logged in and has submitted his login data
74 function ifAdminLoginDataIsValid ($adminLogin, $adminPassword) {
75         // First of all, no admin login is found, so the admin hash is null
76         $ret = '404';
77         $adminHash = null;
78
79         // Get admin id from login
80         $adminId = getAdminId($adminLogin);
81
82         // Continue only with found admin ids
83         if ($adminId > 0) {
84                 // Then we need to lookup the login name by getting the admin hash
85                 $adminHash = getAdminHash($adminId);
86
87                 // If this is fine, we can continue
88                 if ($adminHash != '-1') {
89                         // Get admin id and set it as current
90                         setCurrentAdminId($adminId);
91
92                         // Now, we need to encode the password in the same way the one is encoded in database
93                         $testHash = generateHash($adminPassword, $adminHash);
94
95                         // If they both match, the login data is valid
96                         if ($testHash == $adminHash) {
97                                 // All fine
98                                 $ret = 'done';
99                         } else {
100                                 // Set status
101                                 $ret = 'password';
102                         }
103                 } // END - if
104         } // END - if
105
106         // Prepare data array
107         $data = array(
108                 'id'         => $adminId,
109                 'login'      => $adminLogin,
110                 'plain_pass' => $adminPassword,
111                 'pass_hash'  => $adminHash
112         );
113
114         // Run a special filter
115         runFilterChain('do_admin_login_' . $ret, $data);
116
117         // Return status
118         return $ret;
119 }
120
121 // Only be executed on cookie checking
122 function ifAdminCookiesAreValid ($adminLogin, $passHash) {
123         // First of all, no admin login is found
124         $ret = '404';
125
126         // Then we need to lookup the login name by getting the admin hash
127         $adminHash = getAdminHash($adminLogin);
128
129         // If this is fine, we can continue
130         if ($adminHash != '-1') {
131                 // Now, we need to encode the password in the same way the one is encoded in database
132                 $testHash = encodeHashForCookie($adminHash);
133                 //* DEBUG: */ debugOutput('adminLogin=' . $adminLogin . ',passHash='.$passHash.',adminHash='.$adminHash.',testHash='.$testHash);
134
135                 // If they both match, the login data is valid
136                 if ($testHash == $passHash) {
137                         // All fine
138                         $ret = 'done';
139                 } else {
140                         // Set status
141                         $ret = 'password';
142                 }
143         } // END - if
144
145         // Return status
146         //* DEBUG: */ debugOutput('ret='.$ret);
147         return $ret;
148 }
149
150 // Do an admin action
151 function doAdminAction () {
152         // Get default what
153         $what = getWhat();
154
155         //* DEBUG: */ debugOutput(__LINE__.'*'.$what.'/'.getModule().'/'.getAction().'/'.getWhat().'*');
156
157         // Remove any spaces from variable
158         if (empty($what)) {
159                 // Default admin action is the overview page
160                 $what = 'overview';
161         } else {
162                 // Secure it
163                 $what = secureString($what);
164         }
165
166         // Get action value
167         $action = getActionFromModuleWhat(getModule(), $what);
168
169         // Load welcome template
170         if (isExtensionActive('admins')) {
171                 // @TODO This and the next getCurrentAdminId() call might be moved into the templates?
172                 $content['welcome'] = loadTemplate('admin_welcome_admins', true, getCurrentAdminId());
173         } else {
174                 $content['welcome'] = loadTemplate('admin_welcome', true, getCurrentAdminId());
175         }
176
177         // Load header, footer, render menu
178         $content['header'] = loadTemplate('admin_header' , true, $content);
179         $content['footer'] = loadTemplate('admin_footer' , true, $content);
180         $content['menu']   = addAdminMenu($action, $what, true);
181
182         // Tableset header
183         loadTemplate('admin_main_header', false, $content);
184
185         // Check if action/what pair is valid
186         $result_action = SQL_QUERY_ESC("SELECT
187         `id`
188 FROM
189         `{?_MYSQL_PREFIX?}_admin_menu`
190 WHERE
191         `action`='%s' AND
192         (
193                 (
194                         `what`='%s' AND `what` != 'overview'
195                 ) OR (
196                         (
197                                 `what`='' OR `what` IS NULL
198                         ) AND (
199                                 '%s'='overview'
200                         )
201                 )
202         )
203 LIMIT 1",
204                 array(
205                         $action,
206                         $what,
207                         $what
208                 ), __FUNCTION__, __LINE__);
209
210         // Do we have an entry?
211         if (SQL_NUMROWS($result_action) == 1) {
212                 // Is valid but does the inlcude file exists?
213                 $inc = sprintf("inc/modules/admin/action-%s.php", $action);
214                 if ((isIncludeReadable($inc)) && (isMenuActionValid('admin', $action, $what)) && ($GLOBALS['acl_allow'] === true)) {
215                         // Ok, we finally load the admin action module
216                         loadInclude($inc);
217                 } elseif ($GLOBALS['acl_allow'] === false) {
218                         // Access denied
219                         loadTemplate('admin_menu_failed', false, '{%message,ADMIN_ACCESS_DENIED=' . $what . '%}');
220                 } else {
221                         // Include file not found :-(
222                         loadTemplate('admin_menu_failed', false, '{%message,ADMIN_ACTION_404=' . $action . '%}');
223                 }
224         } else {
225                 // Invalid action/what pair found
226                 loadTemplate('admin_menu_failed', false, '{%message,ADMIN_ACTION_INVALID=' . $action . '/' . $what . '%}');
227         }
228
229         // Free memory
230         SQL_FREERESULT($result_action);
231
232         // Tableset footer
233         loadTemplate('admin_main_footer', false, $content);
234 }
235
236 // Checks wether current admin is allowed to access given action/what combination
237 // (only one is allowed to be null!)
238 function isAdminAllowedAccessMenu ($action, $what = null) {
239         // Do we have cache?
240         if (!isset($GLOBALS[__FUNCTION__][$action][$what])) {
241                 // ACL is always 'allow' when no ext-admins is installed
242                 // @TODO This can be rewritten into a filter
243                 $GLOBALS[__FUNCTION__][$action][$what] = ((!isExtensionInstalledAndNewer('admins', '0.2.0')) || (isAdminsAllowedByAcl($action, $what)));
244         } // END - if
245
246         // Return the cached value
247         return $GLOBALS[__FUNCTION__][$action][$what];
248 }
249
250 // Adds an admin menu
251 function addAdminMenu ($action, $what, $return = false) {
252         // Init variables
253         $SUB = false;
254         $OUT = '';
255
256         // Menu descriptions
257         $GLOBALS['menu']['description'] = array();
258         $GLOBALS['menu']['title'] = array();
259
260         // Build main menu
261         $result_main = SQL_QUERY("SELECT
262         `action`, `title`, `descr`
263 FROM
264         `{?_MYSQL_PREFIX?}_admin_menu`
265 WHERE
266         (`what`='' OR `what` IS NULL)
267 ORDER BY
268         `sort` ASC,
269         `id` DESC", __FUNCTION__, __LINE__);
270
271         // Do we have entries?
272         if (!SQL_HASZERONUMS($result_main)) {
273                 $OUT .= '<ul class="admin_menu_main">';
274                 // @TODO Rewrite this to $content = SQL_FETCHARRAY()
275                 while (list($menu, $title, $descr) = SQL_FETCHROW($result_main)) {
276                         // Filename
277                         $inc = sprintf("inc/modules/admin/action-%s.php", $menu);
278
279                         // Is the file readable?
280                         $readable = isIncludeReadable($inc);
281
282                         // Is the current admin allowed to access this 'action' menu?
283                         if (isAdminAllowedAccessMenu($menu)) {
284                                 if ($SUB === false) {
285                                         // Insert compiled menu title and description
286                                         $GLOBALS['menu']['title'][$menu]      = $title;
287                                         $GLOBALS['menu']['description'][$menu] = $descr;
288                                 } // END - if
289                                 $OUT .= '<li class="admin_menu">
290 <div class="nobr"><strong>&middot;</strong>&nbsp;';
291
292                                 if ($readable === true) {
293                                         if (($menu == $action) && (empty($what))) {
294                                                 $OUT .= '<strong>';
295                                         } else {
296                                                 $OUT .= '[<a href="{%url=modules.php?module=admin&amp;action=' . $menu . '%}">';
297                                         }
298                                 } else {
299                                         $OUT .= '<em style="cursor:help" class="notice" title="{%message,ADMIN_MENU_ACTION_404_TITLE=' . $menu . '%}">';
300                                 }
301
302                                 $OUT .= $title;
303
304                                 if ($readable === true) {
305                                         if (($menu == $action) && (empty($what))) {
306                                                 $OUT .= '</strong>';
307                                         } else {
308                                                 $OUT .= '</a>]';
309                                         }
310                                 } else {
311                                         $OUT .= '</em>';
312                                 }
313
314                                 $OUT .= '</div>
315 </li>';
316
317                                 // Check for menu entries
318                                 $result_what = SQL_QUERY_ESC("SELECT
319         `what`, `title`, `descr`
320 FROM
321         `{?_MYSQL_PREFIX?}_admin_menu`
322 WHERE
323         `action`='%s' AND
324         `what` != '' AND
325         `what` IS NOT NULL
326 ORDER BY
327         `sort` ASC,
328         `id` DESC",
329                                         array($menu), __FUNCTION__, __LINE__);
330
331                                 // Remember the count for later checks
332                                 setAdminMenuHasEntries($menu, ((!SQL_HASZERONUMS($result_what)) && ($action == $menu)));
333
334                                 // Do we have entries?
335                                 if ((ifAdminMenuHasEntries($menu)) && (!SQL_HASZERONUMS($result_what))) {
336                                         $GLOBALS['menu']['description'] = array();
337                                         $GLOBALS['menu']['title'] = array();
338                                         $SUB = true;
339                                         $OUT .= '<li class="admin_menu_sub"><ul class="admin_menu_sub">';
340                                         // @TODO Rewrite this to $content = SQL_FETCHARRAY()
341                                         while (list($what_sub, $title_what, $desc_what) = SQL_FETCHROW($result_what)) {
342                                                 // Filename
343                                                 $inc = sprintf("inc/modules/admin/what-%s.php", $what_sub);
344
345                                                 // Is the file readable?
346                                                 $readable = isIncludeReadable($inc);
347
348                                                 // Is the current admin allowed to access this 'what' menu?
349                                                 if (isAdminAllowedAccessMenu(null, $what_sub)) {
350                                                         // Insert compiled title and description
351                                                         $GLOBALS['menu']['title'][$what_sub]      = $title_what;
352                                                         $GLOBALS['menu']['description'][$what_sub] = $desc_what;
353                                                         $OUT .= '<li class="admin_menu">
354 <div class="nobr"><strong>--&gt;</strong>&nbsp;';
355                                                         if ($readable === true) {
356                                                                 if ($what == $what_sub) {
357                                                                         $OUT .= '<strong>';
358                                                                 } else {
359                                                                         $OUT .= '[<a href="{%url=modules.php?module=admin&amp;what=' . $what_sub . '%}">';
360                                                                 }
361                                                         } else {
362                                                                 $OUT .= '<em style="cursor:help" class="notice" title="{%message,ADMIN_MENU_WHAT_404_TITLE=' . $what_sub . '%}">';
363                                                         }
364
365                                                         $OUT .= $title_what;
366
367                                                         if ($readable === true) {
368                                                                 if ($what == $what_sub) {
369                                                                         $OUT .= '</strong>';
370                                                                 } else {
371                                                                         $OUT .= '</a>]';
372                                                                 }
373                                                         } else {
374                                                                 $OUT .= '</em>';
375                                                         }
376                                                         $OUT .= '</div>
377 </li>';
378                                                 } // END - if
379                                         } // END - while
380
381                                         // Free memory
382                                         SQL_FREERESULT($result_what);
383                                         $OUT .= '</ul>
384 </li>';
385                                 } // END - if
386                         } // END - if
387                 } // END - while
388
389                 // Free memory
390                 SQL_FREERESULT($result_main);
391                 $OUT .= '</ul>';
392         }
393
394         // Is there a cache instance again?
395         // Return or output content?
396         if ($return === true) {
397                 return $OUT;
398         } else {
399                 outputHtml($OUT);
400         }
401 }
402
403 // Create member selection box
404 function addMemberSelectionBox ($def = 0, $add_all = false, $return = false, $none = false, $field = 'userid') {
405         // Output selection form with all confirmed user accounts listed
406         $result = SQL_QUERY("SELECT `userid`, `surname`, `family` FROM `{?_MYSQL_PREFIX?}_user_data` ORDER BY `userid` ASC", __FUNCTION__, __LINE__);
407
408         // Default output
409         $OUT = '';
410
411         // USe this only for adding points (e.g. adding refs really makes no sence ;-) )
412         if ($add_all === true)   $OUT = '      <option value="all">{--ALL_MEMBERS--}</option>';
413          elseif ($none === true) $OUT = '      <option value="0">{--SELECT_NONE--}</option>';
414
415         while ($content = SQL_FETCHARRAY($result)) {
416                 $OUT .= '<option value="' . bigintval($content['userid']) . '"';
417                 if ($def == $content['userid']) $OUT .= ' selected="selected"';
418                 $OUT .= '>' . $content['surname'] . ' ' . $content['family'] . ' (' . bigintval($content['userid']) . ')</option>';
419         } // END - while
420
421         // Free memory
422         SQL_FREERESULT($result);
423
424         if ($return === false) {
425                 // Remeber options in constant
426                 $content['form_selection'] = $OUT;
427                 $content['what']             = getWhat();
428
429                 // Load template
430                 loadTemplate('admin_form_selection_box', false, $content);
431         } else {
432                 // Return content in selection frame
433                 return '<select class="form_select" name="' . handleFieldWithBraces($field) . '" size="1">' . $OUT . '</select>';
434         }
435 }
436
437 // Create a menu selection box for given menu system
438 // @TODO Try to rewrite this to adminAddMenuSelectionBox()
439 // @DEPRECATED
440 function adminMenuSelectionBox_DEPRECATED ($mode, $default = '', $defid = '') {
441         $what = "`what` != '' AND `what` IS NOT NULL";
442         if ($mode == 'action') $what = "(`what`='' OR `what` IS NULL) AND `action` != 'login'";
443
444         $result = SQL_QUERY_ESC("SELECT `%s` AS `menu`, `title` FROM `{?_MYSQL_PREFIX?}_admin_menu` WHERE ".$what." ORDER BY `sort` ASC",
445                 array($mode), __FUNCTION__, __LINE__);
446         if (!SQL_HASZERONUMS($result)) {
447                 // Load menu as selection
448                 $OUT = '<select name="' . $mode . '_menu';
449                 if ((!empty($defid)) || ($defid == '0')) $OUT .= '[' . $defid . ']';
450                 $OUT .= '" size="1" class="form_select">
451         <option value="">{--SELECT_NONE--}</option>';
452                 // Load all entries
453                 while ($content = SQL_FETCHARRAY($result)) {
454                         $OUT .= '<option value="' . $content['menu'] . '"';
455                         if ((!empty($default)) && ($default == $content['menu'])) $OUT .= ' selected="selected"';
456                         $OUT .= '>' . $content['title'] . '</option>';
457                 } // END - while
458
459                 // Free memory
460                 SQL_FREERESULT($result);
461
462                 // Add closing select-tag
463                 $OUT .= '</select>';
464         } else {
465                 // No menus???
466                 $OUT = '{--ADMIN_PROBLEM_NO_MENU--}';
467         }
468
469         // Return output
470         return $OUT;
471 }
472
473 // Wrapper for $_POST and adminSaveSettings
474 function adminSaveSettingsFromPostData ($tableName = '_config', $whereStatement = '`config`=0', $translateComma = array(), $alwaysAdd = false, $displayMessage = true) {
475         // Get the array
476         $postData = postRequestArray();
477
478         // Call the lower function
479         adminSaveSettings($postData, $tableName, $whereStatement, $translateComma, $alwaysAdd, $displayMessage);
480 }
481
482 // Save settings to the database
483 function adminSaveSettings (&$postData, $tableName = '_config', $whereStatement = '`config`=0', $translateComma = array(), $alwaysAdd = false, $displayMessage = true) {
484         // Prepare all arrays, variables
485         $tableData = array();
486         $skip = false;
487
488         // Now, walk through all entries and prepare them for saving
489         foreach ($postData as $id => $val) {
490                 // Process only formular field but not submit buttons ;)
491                 if ($id != 'ok') {
492                         // Do not save the ok value
493                         convertSelectionsToEpocheTime($postData, $tableData, $id, $skip);
494
495                         // Shall we process this id? It muss not be empty, of course
496                         if (($skip === false) && (!empty($id)) && ((!isset($GLOBALS['skip_config'][$id]))) || ($tableName != '_config')) {
497                                 // Translate the value? (comma to dot!)
498                                 if ((is_array($translateComma)) && (in_array($id, $translateComma))) {
499                                         // Then do it here... :)
500                                         $val = convertCommaToDot($val);
501                                 } // END - if
502
503                                 // Shall we add numbers or strings?
504                                 $test = (float) $val;
505                                 if ('' . $val . '' == '' . $test . '') {
506                                         // Add numbers
507                                         $tableData[] = sprintf("`%s`=%s", $id, $test);
508                                 } elseif (is_null($val)) {
509                                         // Add NULL
510                                         $tableData[] = sprintf("`%s`=NULL", $id);
511                                 } else {
512                                         // Add strings
513                                         $tableData[] = sprintf("`%s`='%s'", $id, trim($val));
514                                 }
515
516                                 // Do not add a config entry twice
517                                 $GLOBALS['skip_config'][$id] = true;
518
519                                 // Update current configuration
520                                 setConfigEntry($id, $val);
521                         } // END - if
522                 } // END - if
523         } // END - foreach
524
525         // Check if entry does exist
526         $result = false;
527         if ($alwaysAdd === false) {
528                 if (!empty($whereStatement)) {
529                         $result = SQL_QUERY("SELECT * FROM `{?_MYSQL_PREFIX?}" . $tableName . "` WHERE " . $whereStatement . " LIMIT 1", __FUNCTION__, __LINE__);
530                 } else {
531                         $result = SQL_QUERY("SELECT * FROM `{?_MYSQL_PREFIX?}" . $tableName . "` LIMIT 1", __FUNCTION__, __LINE__);
532                 }
533         } // END - if
534
535         if (SQL_NUMROWS($result) == 1) {
536                 // "Implode" all data to single string
537                 $updatedData = implode(', ', $tableData);
538
539                 // Generate SQL string
540                 $sql = sprintf("UPDATE `{?_MYSQL_PREFIX?}%s` SET %s WHERE %s LIMIT 1",
541                         $tableName,
542                         $updatedData,
543                         $whereStatement
544                 );
545         } else {
546                 // Add Line (does only work with AUTO_INCREMENT!
547                 $keys = array(); $values = array();
548                 foreach ($tableData as $entry) {
549                         // Split up
550                         $line = explode('=', $entry);
551                         $keys[] = $line[0];
552                         $values[] = $line[1];
553                 } // END - foreach
554
555                 // Add both in one line
556                 $keys = implode('`, `', $keys);
557                 $values = implode(', ', $values);
558
559                 // Generate SQL string
560                 $sql = sprintf("INSERT INTO `{?_MYSQL_PREFIX?}%s` (%s) VALUES (%s)",
561                         $tableName,
562                         $keys,
563                         $values
564                 );
565         }
566
567         // Free memory
568         SQL_FREERESULT($result);
569
570         // Simply run generated SQL string
571         SQL_QUERY($sql, __FUNCTION__, __LINE__);
572
573         // Remember affected rows
574         $affected = SQL_AFFECTEDROWS();
575
576         // Rebuild cache
577         rebuildCache('config', 'config');
578
579         // Settings saved, so display message?
580         if ($displayMessage === true) displayMessage('{--SETTINGS_SAVED--}');
581
582         // Return affected rows
583         return $affected;
584 }
585
586 // Generate a selection box
587 function adminAddMenuSelectionBox ($menu, $type, $name, $default = '') {
588         // Open the requested menu directory
589         $menuArray = getArrayFromDirectory(sprintf("inc/modules/%s/", $menu), $type . '-', false, false);
590
591         // Init the selection box
592         $OUT = '<select name="' . $name . '" class="form_select" size="1"><option value="">{--ADMIN_IS_TOP_MENU--}</option>';
593
594         // Walk through all files
595         foreach ($menuArray as $file) {
596                 // Is this a PHP script?
597                 if ((!isDirectory($file)) && (strpos($file, '' . $type . '-') > -1) && (strpos($file, '.php') > 0)) {
598                         // Then test if the file is readable
599                         $test = sprintf("inc/modules/%s/%s", $menu, $file);
600
601                         // Is the file there?
602                         if (isIncludeReadable($test)) {
603                                 // Extract the value for what=xxx
604                                 $part = substr($file, (strlen($type) + 1));
605                                 $part = substr($part, 0, -4);
606
607                                 // Is that part different from the overview?
608                                 if ($part != 'overview') {
609                                         $OUT .= '<option value="' . $part . '"';
610                                         if ($part == $default) $OUT .= ' selected="selected"';
611                                         $OUT .= '>' . $part . '</option>';
612                                 } // END - if
613                         } // END - if
614                 } // END - if
615         } // END - foreach
616
617         // Close selection box
618         $OUT .= '</select>';
619
620         // Return contents
621         return $OUT;
622 }
623
624 // Creates a user-profile link for the admin. This function can also be used for many other purposes
625 function generateUserProfileLink ($userid, $title = '', $what = 'list_user') {
626         if (($title == '') && (isValidUserId($userid))) {
627                 // Set userid as title
628                 $title = $userid;
629         } elseif ($userid == 0) {
630                 // User id zero is invalid
631                 return '<strong>' . $userid . '</strong>';
632         }
633
634         if (($title == '0') && ($what == 'list_refs')) {
635                 // Return title again
636                 return $title;
637         } elseif (isExtensionActive('nickname')) {
638                 // Get nickname
639                 $nick = getNickname($userid);
640
641                 // Is it not empty, use it as title else the userid
642                 if (!empty($nick)) {
643                         $title = $nick . '(' . $userid . ')';
644                 } else {
645                         $title = $userid;
646                 }
647         }
648
649         // Return link
650         return '[<a href="{%url=modules.php?module=admin&amp;what=' . $what . '&amp;userid=' . $userid . '%}" title="{--ADMIN_USER_PROFILE_TITLE--}">' . $title . '</a>]';
651 }
652
653 // Check "logical-area-mode"
654 function adminGetMenuMode () {
655         // Set the default menu mode as the mode for all admins
656         $mode = 'global';
657
658         // If sql_patches is up-to-date enough, use the configuration
659         if (isExtensionInstalledAndNewer('sql_patches', '0.3.2')) {
660                 $mode = getAdminMenu();
661         } // END - if
662
663         // Backup it
664         $adminMode = $mode;
665
666         // Get admin id
667         $adminId = getCurrentAdminId();
668
669         // Check individual settings of current admin
670         if (isset($GLOBALS['cache_array']['admin']['la_mode'][$adminId])) {
671                 // Load from cache
672                 $adminMode = $GLOBALS['cache_array']['admin']['la_mode'][$adminId];
673                 incrementStatsEntry('cache_hits');
674         } elseif (isExtensionInstalledAndNewer('admins', '0.6.7')) {
675                 // Load from database when version of 'admins' is enough
676                 $result = SQL_QUERY_ESC("SELECT `la_mode` FROM `{?_MYSQL_PREFIX?}_admins` WHERE `id`=%s LIMIT 1",
677                         array($adminId), __FUNCTION__, __LINE__);
678
679                 // Do we have an entry?
680                 if (SQL_NUMROWS($result) == 1) {
681                         // Load data
682                         list($adminMode) = SQL_FETCHROW($result);
683                 } // END - if
684
685                 // Free memory
686                 SQL_FREERESULT($result);
687         }
688
689         // Check what the admin wants and set it when it's not the default mode
690         if ($adminMode != 'global') {
691                 $mode = $adminMode;
692         } // END - if
693
694         // Return admin-menu's mode
695         return $mode;
696 }
697
698 // Change activation status
699 function adminChangeActivationStatus ($IDs, $table, $row, $idRow = 'id') {
700         $count = '0';
701         if ((is_array($IDs)) && (count($IDs) > 0)) {
702                 // "Walk" all through and count them
703                 foreach ($IDs as $id => $selected) {
704                         // Secure the id number
705                         $id = bigintval($id);
706
707                         // Should always be set... ;-)
708                         if (!empty($selected)) {
709                                 // Determine new status
710                                 $result = SQL_QUERY_ESC("SELECT %s FROM `{?_MYSQL_PREFIX?}_%s` WHERE %s=%s LIMIT 1",
711                                         array(
712                                                 $row,
713                                                 $table,
714                                                 $idRow,
715                                                 $id
716                                         ), __FUNCTION__, __LINE__);
717
718                                 // Row found?
719                                 if (SQL_NUMROWS($result) == 1) {
720                                         // Load the status
721                                         list($currStatus) = SQL_FETCHROW($result);
722
723                                         // And switch it N<->Y
724                                         $newStatus = convertBooleanToYesNo(!($currStatus == 'Y'));
725
726                                         // Change this status
727                                         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_%s` SET %s='%s' WHERE %s=%s LIMIT 1",
728                                                 array(
729                                                         $table,
730                                                         $row,
731                                                         $newStatus,
732                                                         $idRow,
733                                                         $id
734                                                 ), __FUNCTION__, __LINE__);
735
736                                         // Count up affected rows
737                                         $count += SQL_AFFECTEDROWS();
738                                 } // END - if
739
740                                 // Free the result
741                                 SQL_FREERESULT($result);
742                         } // END - if
743                 } // END - foreach
744
745                 // Output status
746                 displayMessage(sprintf(getMessage('ADMIN_STATUS_CHANGED'), $count, count($IDs)));
747         } else {
748                 // Nothing selected!
749                 displayMessage('{--ADMIN_NOTHING_SELECTED_CHANGE--}');
750         }
751 }
752
753 // Send mails for del/edit/lock build modes
754 function sendAdminBuildMails ($mode, $table, $content, $id, $subjectPart = '', $userIdColumn = 'userid') {
755         // Default subject is the subject part
756         $subject = $subjectPart;
757
758         // Is the subject part not set?
759         if (empty($subjectPart)) {
760                 // Then use it from the mode
761                 $subject = strtoupper($mode);
762         } // END - if
763
764         // Is the raw userid set?
765         if (postRequestParameter($userIdColumn, $id) > 0) {
766                 // Load email template
767                 if (!empty($subjectPart)) {
768                         $mail = loadEmailTemplate('member_' . $mode . '_' . strtolower($subjectPart) . '_' . $table, $content);
769                 } else {
770                         $mail = loadEmailTemplate('member_' . $mode . '_' . $table, $content);
771                 }
772
773                 // Send email out
774                 sendEmail(postRequestParameter($userIdColumn, $id), strtoupper('{--MEMBER_' . $subject . '_' . $table . '_SUBJECT--}'), $mail);
775         } // END - if
776
777         // Generate subject
778         $subject = strtoupper('{--ADMIN_' . $subject . '_' . $table . '_SUBJECT--}');
779
780         // Send admin notification out
781         if (!empty($subjectPart)) {
782                 sendAdminNotification($subject, 'admin_' . $mode . '_' . strtolower($subjectPart) . '_' . $table, $content, postRequestParameter($userIdColumn, $id));
783         } else {
784                 sendAdminNotification($subject, 'admin_' . $mode . '_' . $table, $content, postRequestParameter($userIdColumn, $id));
785         }
786 }
787
788 // Build a special template list
789 function adminListBuilder ($listType, $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn, $userid = 'userid') {
790         // $table and $idColumn must bove be arrays!
791         if (!is_array($table)) {
792                 // $table is no array
793                 debug_report_bug(__FUNCTION__, __LINE__, 'table[]=' . gettype($table) . '!=array');
794         } elseif (!is_array($idColumn)) {
795                 // $idColumn is no array
796                 debug_report_bug(__FUNCTION__, __LINE__, 'idColumn[]=' . gettype($idColumn) . '!=array');
797         }
798
799         $OUT = '';
800
801         // "Walk" through all entries
802         foreach ($IDs as $id => $selected) {
803                 // Secure id number
804                 $id = bigintval($id);
805
806                 // Get result from a given column array and table name
807                 $result = SQL_RESULT_FROM_ARRAY($table[0], $columns, $idColumn[0], $id, __FUNCTION__, __LINE__);
808
809                 // Is there one entry?
810                 if (SQL_NUMROWS($result) == 1) {
811                         // Load all data
812                         $content = SQL_FETCHARRAY($result);
813
814                         // Filter all data
815                         foreach ($content as $key => $value) {
816                                 // Search index
817                                 $idx = array_search($key, $columns, true);
818
819                                 // Do we have a userid?
820                                 if ($key == $userIdColumn) {
821                                         // Add it again as raw id
822                                         $content[$userIdColumn] = bigintval($value);
823                                         $content[$userIdColumn . '_raw'] = $content[$userIdColumn];
824                                 } // END - if
825
826                                 // If the key matches the idColumn variable, we need to temporary remember it
827                                 //* DEBUG: */ debugOutput('key=' . $key . ',idColumn=' . $idColumn . ',value=' . $value);
828                                 if ($key == $idColumn) {
829                                         // Found, so remember it
830                                         $GLOBALS['admin_list_builder_id_value'] = $value;
831                                 } // END - if
832
833                                 // Handle the call in external function
834                                 //* DEBUG: */ debugOutput('key=' . $key . ',fucntion=' . $filterFunctions[$idx] . ',value=' . $value);
835                                 $content[$key] = handleExtraValues(
836                                         $filterFunctions[$idx],
837                                         $value,
838                                         $extraValues[$idx]
839                                 );
840                         } // END - foreach
841
842                         // Then list it
843                         $OUT .= loadTemplate(sprintf("admin_%s_%s_row",
844                                 $listType,
845                                 $table[0]
846                                 ), true, $content
847                         );
848                 } // END - if
849
850                 // Free the result
851                 SQL_FREERESULT($result);
852         } // END - foreach
853
854         // Load master template
855         loadTemplate(sprintf("admin_%s_%s",
856                 $listType,
857                 $table[0]
858                 ), false, $OUT
859         );
860 }
861
862 // Change status of "build" list
863 function adminBuilderStatusHandler ($mode, $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn, $statusArray, $userid = 'userid') {
864         // All valid entries? (We hope so here!)
865         if ((is_array($IDs)) && (count($IDs) > 0) && (count($columns) == count($filterFunctions)) && (count($columns) == count($extraValues)) && (count($statusArray) > 0)) {
866                 // "Walk" through all entries
867                 foreach ($IDs as $id => $sel) {
868                         // Construct SQL query
869                         $sql = sprintf("UPDATE `{?_MYSQL_PREFIX?}_%s` SET", SQL_ESCAPE($table));
870
871                         // Load data of entry
872                         $result = SQL_QUERY_ESC("SELECT * FROM `{?_MYSQL_PREFIX?}_%s` WHERE `%s`=%s LIMIT 1",
873                                 array($table, $idColumn, $id), __FUNCTION__, __LINE__);
874
875                         // Fetch the data
876                         $content = SQL_FETCHARRAY($result);
877
878                         // Free the result
879                         SQL_FREERESULT($result);
880
881                         // Add all status entries (e.g. status column last_updated or so)
882                         $newStatus = 'UNKNOWN';
883                         $oldStatus = 'UNKNOWN';
884                         $statusColumn = 'unknown';
885                         foreach ($statusArray as $column => $statusInfo) {
886                                 // Does the entry exist?
887                                 if ((isset($content[$column])) && (isset($statusInfo[$content[$column]]))) {
888                                         // Add these entries for update
889                                         $sql .= sprintf(" `%s`='%s',", SQL_ESCAPE($column), SQL_ESCAPE($statusInfo[$content[$column]]));
890
891                                         // Remember status
892                                         if ($statusColumn == 'unknown') {
893                                                 // Always (!!!) change status column first!
894                                                 $oldStatus = $content[$column];
895                                                 $newStatus = $statusInfo[$oldStatus];
896                                                 $statusColumn = $column;
897                                         } // END - if
898                                 } elseif (isset($content[$column])) {
899                                         // Unfinished!
900                                         debug_report_bug(__FUNCTION__, __LINE__, ':UNFINISHED: id=' . $id . ',column=' . $column . '[' . gettype($statusInfo) . '] = ' . $content[$column]);
901                                 }
902                         } // END - foreach
903
904                         // Add other columns as well
905                         foreach (postRequestArray() as $key => $entries) {
906                                 // Debug message
907                                 logDebugMessage(__FUNCTION__, __LINE__, 'Found entry: ' . $key);
908
909                                 // Skip id, raw userid and 'do_$mode'
910                                 if (!in_array($key, array($idColumn, $userid, ('do_' . $mode)))) {
911                                         // Are there brackets () at the end?
912                                         if (substr($entries[$id], -2, 2) == '()') {
913                                                 // Direct SQL command found
914                                                 $sql .= sprintf(" `%s`=%s,", SQL_ESCAPE($key), SQL_ESCAPE($entries[$id]));
915                                         } else {
916                                                 // Add regular entry
917                                                 $sql .= sprintf(" `%s`='%s',", SQL_ESCAPE($key), SQL_ESCAPE($entries[$id]));
918
919                                                 // Add entry
920                                                 $content[$key] = $entries[$id];
921                                         }
922                                 } else {
923                                         // Skipped entry
924                                         logDebugMessage(__FUNCTION__, __LINE__, 'Skipped: ' . $key);
925                                 }
926                         } // END - foreach
927
928                         // Finish SQL statement
929                         $sql = substr($sql, 0, -1) . sprintf(" WHERE `%s`=%s AND `%s`='%s' LIMIT 1",
930                                 $idColumn,
931                                 bigintval($id),
932                                 $statusColumn,
933                                 $oldStatus
934                         );
935
936                         // Run the SQL
937                         SQL_QUERY($sql, __FUNCTION__, __LINE__);
938
939                         // Do we have an URL?
940                         if (isset($content['url'])) {
941                                 // Then add a framekiller test as well
942                                 $content['frametester'] = generateFrametesterUrl($content['url']);
943                         } // END - if
944
945                         // Send "build mails" out
946                         sendAdminBuildMails($mode, $table, $content, $id, $statusInfo[$content[$column]], $userIdColumn);
947                 } // END - foreach
948         } // END - if
949 }
950
951 // Delete rows by given id numbers
952 function adminDeleteEntriesConfirm ($IDs, $table, $columns = array(), $filterFunctions = array(), $extraValues = array(), $deleteNow = false, $idColumn = 'id', $userIdColumn = 'userid', $userid = 'userid') {
953         // All valid entries? (We hope so here!)
954         if ((is_array($IDs)) && (count($IDs) > 0) && (count($columns) == count($filterFunctions)) && (count($columns) == count($extraValues))) {
955                 // Shall we delete here or list for deletion?
956                 if ($deleteNow === true) {
957                         // The base SQL command:
958                         $sql = "DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_%s` WHERE `%s` IN (%s)";
959
960                         // Delete them all
961                         $idList = '';
962                         foreach ($IDs as $id => $sel) {
963                                 // Is there a userid?
964                                 if (isPostRequestParameterSet($userid, $id)) {
965                                         // Load all data from that id
966                                         $result = SQL_QUERY_ESC("SELECT * FROM `{?_MYSQL_PREFIX?}_%s` WHERE `%s`=%s LIMIT 1",
967                                                 array(
968                                                         $table,
969                                                         $idColumn,
970                                                         $id
971                                                 ), __FUNCTION__, __LINE__);
972
973                                         // Fetch the data
974                                         $content = SQL_FETCHARRAY($result);
975
976                                         // Free the result
977                                         SQL_FREERESULT($result);
978
979                                         // Send "build mails" out
980                                         sendAdminBuildMails('delete', $table, $content, $id, '', $userIdColumn);
981                                 } // END - if
982
983                                 // Add id number
984                                 $idList .= $id . ',';
985                         } // END - foreach
986
987                         // Run the query
988                         SQL_QUERY_ESC($sql, array($table, $idColumn, substr($idList, 0, -1)), __FUNCTION__, __LINE__);
989
990                         // Was this fine?
991                         if (SQL_AFFECTEDROWS() == count($IDs)) {
992                                 // All deleted
993                                 displayMessage('{--ADMIN_ALL_ENTRIES_REMOVED--}');
994                         } else {
995                                 // Some are still there :(
996                                 displayMessage(sprintf(getMessage('ADMIN_SOME_ENTRIES_NOT_DELETED'), SQL_AFFECTEDROWS(), count($IDs)));
997                         }
998                 } else {
999                         // List for deletion confirmation
1000                         adminListBuilder('delete', $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn);
1001                 }
1002         } // END - if
1003 }
1004
1005 // Edit rows by given id numbers
1006 function adminEditEntriesConfirm ($IDs, $table, $columns = array(), $filterFunctions = array(), $extraValues = array(), $editNow = false, $idColumn = 'id', $userIdColumn = 'userid', $userid = 'userid') {
1007         // All valid entries? (We hope so here!)
1008         if ((is_array($IDs)) && (count($IDs) > 0) && (count($columns) == count($filterFunctions)) && (count($columns) == count($extraValues))) {
1009                 // Shall we change here or list for editing?
1010                 if ($editNow === true) {
1011                         // Change them all
1012                         $affected = '0';
1013                         foreach ($IDs as $id => $sel) {
1014                                 // Prepare content array (new values)
1015                                 $content = array();
1016
1017                                 // Prepare SQL for this row
1018                                 $sql = sprintf("UPDATE `{?_MYSQL_PREFIX?}_%s` SET",
1019                                         SQL_ESCAPE($table)
1020                                 );
1021                                 foreach (postRequestArray() as $key => $entries) {
1022                                         // Skip raw userid which is always invalid
1023                                         if ($key == $userid) {
1024                                                 // Continue with next field
1025                                                 continue;
1026                                         } // END - if
1027
1028                                         // Is entries an array?
1029                                         if (($key != $idColumn) && (is_array($entries)) && (isset($entries[$id]))) {
1030                                                 // Add this entry to content
1031                                                 $content[$key] = $entries[$id];
1032
1033                                                 // Send data through the filter function if found
1034                                                 if ((isset($filterFunctions[$key])) && (isset($extraValues[$key]))) {
1035                                                         // Filter function set!
1036                                                         $entries[$id] = handleExtraValues($filterFunctions[$key], $entries[$id], $extraValues[$key]);
1037                                                 } // END - if
1038
1039                                                 // Then add this value
1040                                                 $sql .= sprintf(" `%s`='%s',",
1041                                                         SQL_ESCAPE($key),
1042                                                         SQL_ESCAPE($entries[$id])
1043                                                 );
1044                                         } elseif (($key != $idColumn) && (!is_array($entries))) {
1045                                                 // Add normal entries as well!
1046                                                 $content[$key] =  $entries;
1047                                         }
1048
1049                                         // Do we have an URL?
1050                                         if ($key == 'url') {
1051                                                 // Then add a framekiller test as well
1052                                                 $content['frametester'] = generateFrametesterUrl($content[$key]);
1053                                         } // END - if
1054                                 } // END - foreach
1055
1056                                 // Finish SQL command
1057                                 $sql = substr($sql, 0, -1) . " WHERE `" . $idColumn . "`=" . bigintval($id) . " LIMIT 1";
1058
1059                                 // Run this query
1060                                 SQL_QUERY($sql, __FUNCTION__, __LINE__);
1061
1062                                 // Add affected rows
1063                                 $affected += SQL_AFFECTEDROWS();
1064
1065                                 // Load all data from that id
1066                                 $result = SQL_QUERY_ESC("SELECT * FROM `{?_MYSQL_PREFIX?}_%s` WHERE `%s`=%s LIMIT 1",
1067                                         array($table, $idColumn, $id), __FUNCTION__, __LINE__);
1068
1069                                 // Fetch the data and merge it into $content
1070                                 $content = merge_array($content, SQL_FETCHARRAY($result));
1071
1072                                 // Free the result
1073                                 SQL_FREERESULT($result);
1074
1075                                 // Send "build mails" out
1076                                 sendAdminBuildMails('edit', $table, $content, $id, '', $userIdColumn);
1077                         } // END - foreach
1078
1079                         // Was this fine?
1080                         if ($affected == count($IDs)) {
1081                                 // All deleted
1082                                 displayMessage('{--ADMIN_ALL_ENTRIES_EDITED--}');
1083                         } else {
1084                                 // Some are still there :(
1085                                 displayMessage(sprintf(getMessage('ADMIN_SOME_ENTRIES_NOT_EDITED'), $affected, count($IDs)));
1086                         }
1087                 } else {
1088                         // List for editing
1089                         adminListBuilder('edit', $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn);
1090                 }
1091         } else {
1092                 // Maybe some invalid parameters
1093                 debug_report_bug(__FUNCTION__, __LINE__, 'IDs[]=' . gettype($IDs) . ',table=' . $table . ',columns[]=' . gettype($columns) . ',filterFunctions[]=' . gettype($filterFunctions) . ',extraValues[]=' . gettype($extraValues) . ',idColumn=' . $idColumn . ',userIdColumn=' . $userIdColumn . ' - INVALID!');
1094         }
1095 }
1096
1097 // Un-/lock rows by given id numbers
1098 function adminLockEntriesConfirm ($IDs, $table, $columns=array(), $filterFunctions=array(), $extraValues=array(), $statusArray=array(), $lockNow=false, $idColumn='id', $userIdColumn='userid') {
1099         // All valid entries? (We hope so here!)
1100         if ((is_array($IDs)) && (count($IDs) > 0) && (count($columns) == count($filterFunctions)) && (count($columns) == count($extraValues)) && (($lockNow === false) || (count($statusArray) == 1))) {
1101                 // Shall we un-/lock here or list for locking?
1102                 if ($lockNow === true) {
1103                         // Un-/lock entries
1104                         adminBuilderStatusHandler('lock', $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn, $statusArray);
1105                 } else {
1106                         // List for editing
1107                         adminListBuilder('lock', $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn);
1108                 }
1109         } // END - if
1110 }
1111
1112 // Undelete rows by given id numbers
1113 function adminUndeleteEntriesConfirm ($IDs, $table, $columns=array(), $filterFunctions=array(), $extraValues=array(), $statusArray=array(), $undeleteNow=false, $idColumn='id', $userIdColumn='userid') {
1114         // All valid entries? (We hope so here!)
1115         if ((is_array($IDs)) && (count($IDs) > 0) && (count($columns) == count($filterFunctions)) && (count($columns) == count($extraValues)) && (($undeleteNow === false) || (count($statusArray) == 1))) {
1116                 // Shall we un-/lock here or list for locking?
1117                 if ($undeleteNow === true) {
1118                         // Undelete entries
1119                         adminBuilderStatusHandler('undelete', $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn, $statusArray);
1120                 } else {
1121                         // List for editing
1122                         adminListBuilder('undelete', $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn);
1123                 }
1124         } // END - if
1125 }
1126
1127 // List all given rows (callback function from XML)
1128 function adminListEntries ($tableTemplate, $rowTemplate, $noEntryMessageId, $tableName, $columns, $whereColumns, $orderByColumns, $callbackColumns, $extraParameters = array()) {
1129         // Verify that tableName and columns are not empty
1130         if (count($tableName) != 1) {
1131                 // No tableName specified
1132                 debug_report_bug(__FUNCTION__, __LINE__, 'tableName is not given. Please fix your XML. tableTemplate=' . $tableTemplate . ',rowTemplate=' . $rowTemplate);
1133         } elseif (count($columns) == 0) {
1134                 // No columns specified
1135                 debug_report_bug(__FUNCTION__, __LINE__, 'columns is not given. Please fix your XML. tableTemplate=' . $tableTemplate . ',rowTemplate=' . $rowTemplate . ',tableName[0]=' . $tableName[0]);
1136         }
1137
1138         // This is the minimum query, so at least columns and tableName must have entries
1139         $SQL = 'SELECT ';
1140         foreach ($columns as $columnArray) {
1141                 // Init SQL part
1142                 $sqlPart = '';
1143                 // Do we have a table/alias
1144                 if (!empty($columnArray['table'])) {
1145                         // Pre-add it
1146                         $sqlPart .= $columnArray['table'] . '.';
1147                 } // END - if
1148
1149                 // Add column
1150                 $sqlPart .= '`' . $columnArray['column'] . '`';
1151
1152                 // Is a function and alias set?
1153                 if ((!empty($columnArray['function'])) && (!empty($columnArray['alias']))) {
1154                         // Add both
1155                         $sqlPart = $columnArray['function'] . '(' . $sqlPart . ') AS `' . $columnArray['alias'] . '`';
1156                 } // END - if
1157
1158                 // Add finished SQL part to the query
1159                 $SQL .= $sqlPart . ',';
1160         } // END - foreach
1161
1162         // Remove last commata and add FROM statement
1163         $SQL = substr($SQL, 0, -1) . ' FROM `{?_MYSQL_PREFIX?}_' . $tableName[0] . '`';
1164
1165         // Do we have entries from whereColumns to add?
1166         if (count($whereColumns) > 0) {
1167                 // Then add these as well
1168                 if (count($whereColumns) == 1) {
1169                         // One entry found
1170                         $SQL .= ' WHERE ';
1171
1172                         // Table/alias included?
1173                         if (!empty($whereColumns[0]['table'])) {
1174                                 // Add it as well
1175                                 $SQL .= $whereColumns[0]['table'] . '.';
1176                         } // END - if
1177
1178                         // Add the rest
1179                         $SQL .= '`' . $whereColumns[0]['column'] . '`' . $whereColumns[0]['condition'] . "'" . $whereColumns[0]['look_for'] . "'";
1180                 } else {
1181                         // More than one entry -> Unsupported
1182                         debug_report_bug(__FUNCTION__, __LINE__, 'More than one WHERE statement found. This is currently not supported.');
1183                 }
1184         } // END - if
1185
1186         // Do we have entries from orderByColumns to add?
1187         if (count($orderByColumns) > 0) {
1188                 // Add them as well
1189                 $SQL .= ' ORDER BY ';
1190                 foreach ($orderByColumns as $orderByColumn=>$array) {
1191                         // Get keys (table/alias) and values (sorting itself)
1192                         $table   = trim(implode('', array_keys($array)));
1193                         $sorting = trim(implode('', array_keys($array)));
1194
1195                         // table/alias can be omitted
1196                         if (!empty($table)) {
1197                                 // table/alias is given
1198                                 $SQL .= $table . '.';
1199                         } // END - if
1200
1201                         // Add order-by column
1202                         $SQL .= '`' . $orderByColumn . '` ' . $sorting . ',';
1203                 } // END - foreach
1204
1205                 // Remove last column
1206                 $SQL = substr($SQL, 0, -1);
1207         } // END - if
1208
1209         // Now handle all over to the inner function which will execute the listing
1210         doAdminListEntries($SQL, $tableTemplate, $noEntryMessageId, $rowTemplate, $callbackColumns, $extraParameters = array());
1211 }
1212
1213 // Do the listing of entries
1214 function doAdminListEntries ($SQL, $tableTemplate, $noEntryMessageId, $rowTemplate, $callbackColumns, $extraParameters = array()) {
1215         // Run the SQL query
1216         $result = SQL_QUERY($SQL, __FUNCTION__, __LINE__);
1217
1218         // Do we have some URLs left?
1219         if (!SQL_HASZERONUMS($result)) {
1220                 // List all URLs
1221                 $OUT = '';
1222                 while ($content = SQL_FETCHARRAY($result)) {
1223                         // "Translate" content
1224                         foreach ($callbackColumns as $column=>$callbackFunction) {
1225                                 // Fill the callback arguments
1226                                 $args = array($content[$column]);
1227
1228                                 // Do we have more to add?
1229                                 if (isset($extraParameters[$column])) {
1230                                         // Add them as well
1231                                         merge_array($args, $extraParameters[$column]);
1232                                 } // END - if
1233
1234                                 // Call the callback-function
1235                                 //* NOISY-DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'callbackFunction=' . $callbackFunction . ',args=<pre>'.print_r($args, true).'</pre>');
1236                                 // @TODO If we can rewrite the EL sub-system to support more than one parameter, this call_user_func_array() can be avoided
1237                                 $content[$column] = call_user_func_array($callbackFunction, $args);
1238                         } // END - foreach
1239
1240                         // Load row template
1241                         $OUT .= loadTemplate(trim($rowTemplate[0]), true, $content);
1242                 } // END - while
1243
1244                 // Load main template
1245                 loadTemplate(trim($tableTemplate[0]), false, $OUT);
1246         } else {
1247                 // No URLs in surfbar
1248                 displayMessage('{--' .$noEntryMessageId . '--}');
1249         }
1250
1251         // Free result
1252         SQL_FREERESULT($result);
1253 }
1254
1255 // Checks proxy settins by fetching check-updates3.php from www.mxchange.org
1256 function adminTestProxySettings ($settingsArray) {
1257         // Set temporary the new settings
1258         mergeConfig($settingsArray);
1259
1260         // Now get the test URL
1261         $content = sendGetRequest('check-updates3.php');
1262
1263         // Is the first line with "200 OK"?
1264         $valid = (strpos($content[0], '200 OK') !== false);
1265
1266         // Return result
1267         return $valid;
1268 }
1269
1270 // Sends out a link to the given email adress so the admin can reset his/her password
1271 function sendAdminPasswordResetLink ($email) {
1272         // Init output
1273         $OUT = '';
1274
1275         // Look up administator login
1276         $result = SQL_QUERY_ESC("SELECT `id`, `login`, `password` FROM `{?_MYSQL_PREFIX?}_admins` WHERE `email`='%s' LIMIT 1",
1277                 array($email), __FUNCTION__, __LINE__);
1278
1279         // Is there an account?
1280         if (SQL_HASZERONUMS($result)) {
1281                 // No account found
1282                 return '{--ADMIN_NO_LOGIN_WITH_EMAIL--}';
1283         } // END - if
1284
1285         // Load all data
1286         $content = SQL_FETCHARRAY($result);
1287
1288         // Free result
1289         SQL_FREERESULT($result);
1290
1291         // Generate hash for reset link
1292         $content['hash'] = generateHash(getUrl() . getEncryptSeperator() . $content['id'] . getEncryptSeperator() . $content['login'] . getEncryptSeperator() . $content['password'], substr($content['password'], getSaltLength()));
1293
1294         // Remove some data
1295         unset($content['id']);
1296         unset($content['password']);
1297
1298         // Prepare email
1299         $mailText = loadEmailTemplate('admin_reset_password', $content);
1300
1301         // Send it out
1302         sendEmail($email, '{--ADMIN_RESET_PASSWORD_LINK_SUBJECT--}', $mailText);
1303
1304         // Prepare output
1305         return '{--ADMIN_RESET_PASSWORD_LINK_SENT--}';
1306 }
1307
1308 // Validate hash and login for password reset
1309 function adminResetValidateHashLogin ($hash, $login) {
1310         // By default nothing validates... ;)
1311         $valid = false;
1312
1313         // Then try to find that user
1314         $result = SQL_QUERY_ESC("SELECT `id`, `password`, `email` FROM `{?_MYSQL_PREFIX?}_admins` WHERE `login`='%s' LIMIT 1",
1315                 array($login), __FUNCTION__, __LINE__);
1316
1317         // Is an account here?
1318         if (SQL_NUMROWS($result) == 1) {
1319                 // Load all data
1320                 $content = SQL_FETCHARRAY($result);
1321
1322                 // Generate hash again
1323                 $hashFromData = generateHash(getUrl() . getEncryptSeperator() . $content['id'] . getEncryptSeperator() . $login . getEncryptSeperator() . $content['password'], substr($content['password'], getSaltLength()));
1324
1325                 // Does both match?
1326                 $valid = ($hash == $hashFromData);
1327         } // END - if
1328
1329         // Free result
1330         SQL_FREERESULT($result);
1331
1332         // Return result
1333         return $valid;
1334 }
1335
1336 // Reset the password for the login. Do NOT call this function without calling above function first!
1337 function doResetAdminPassword ($login, $password) {
1338         // Generate hash (we already check for sql_patches in generateHash())
1339         $passHash = generateHash($password);
1340
1341         // Update database
1342         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_admins` SET `password`='%s' WHERE `login`='%s' LIMIT 1",
1343                 array($passHash, $login), __FUNCTION__, __LINE__);
1344
1345         // Run filters
1346         runFilterChain('post_form_reset_pass', array('login' => $login, 'hash' => $passHash));
1347
1348         // Return output
1349         return '{--ADMIN_PASSWORD_RESET_DONE--}';
1350 }
1351
1352 // Solves a task by given id number
1353 function adminSolveTask ($id) {
1354         // Update the task data
1355         adminUpdateTaskData($id, 'status', 'SOLVED');
1356 }
1357
1358 // Marks a given task as deleted
1359 function adminDeleteTask ($id) {
1360         // Update the task data
1361         adminUpdateTaskData($id, 'status', 'DELETED');
1362 }
1363
1364 // Function to update task data
1365 function adminUpdateTaskData ($id, $row, $data) {
1366         // Should be admin!
1367         if (!isAdmin()) {
1368                 // Not an admin so redirect better
1369                 redirectToUrl('modules.php?module=index');
1370         } // END - if
1371
1372         // Is the id not set, then we need a backtrace here... :(
1373         if ($id <= 0) {
1374                 // Initiate backtrace
1375                 debug_report_bug(__FUNCTION__, __LINE__, sprintf("id is invalid: %s. row=%s, data=%s",
1376                         $id,
1377                         $row,
1378                         $data
1379                 ));
1380         } // END - if
1381
1382         // Update the task
1383         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_task_system` SET `%s`='%s' WHERE `id`=%s LIMIT 1",
1384                 array(
1385                         $row,
1386                         $data,
1387                         bigintval($id)
1388                 ), __FUNCTION__, __LINE__);
1389 }
1390
1391 // Checks wether if the admin menu has entries
1392 function ifAdminMenuHasEntries ($action) {
1393         return (
1394                 ((
1395                         // Is the entry set?
1396                         isset($GLOBALS['admin_menu_has_entries'][$action])
1397                 ) && (
1398                         // And do we have a menu for this action?
1399                         $GLOBALS['admin_menu_has_entries'][$action] === true
1400                 )) || (
1401                         // Login has always a menu
1402                         $action == 'login'
1403                 )
1404         );
1405 }
1406
1407 // Setter for 'admin_menu_has_entries'
1408 function setAdminMenuHasEntries ($action, $hasEntries) {
1409         $GLOBALS['admin_menu_has_entries'][$action] = (bool) $hasEntries;
1410 }
1411
1412 // Creates a link to the user's admin-profile
1413 function adminCreateUserLink ($userid) {
1414         // Is the userid set correctly?
1415         if (isValidUserId($userid)) {
1416                 // Create a link to that profile
1417                 return '{%url=modules.php?module=admin&amp;what=list_user&amp;userid=' . bigintval($userid) . '%}';
1418         } // END - if
1419
1420         // Return a link to the user list
1421         return '{%url=modules.php?module=admin&amp;what=list_user%}';
1422 }
1423
1424 // Generate a "link" for the given admin id (admin_id)
1425 function generateAdminLink ($adminId) {
1426         // No assigned admin is default
1427         $adminLink = '<span class="notice">{--ADMIN_NO_ADMIN_ASSIGNED--}</span>';
1428
1429         // Zero? = Not assigned
1430         if (bigintval($adminId) > 0) {
1431                 // Load admin's login
1432                 $login = getAdminLogin($adminId);
1433
1434                 // Is the login valid?
1435                 if ($login != '***') {
1436                         // Is the extension there?
1437                         if (isExtensionActive('admins')) {
1438                                 // Admin found
1439                                 $adminLink = '<a href="' . generateEmailLink(getAdminEmail($adminId), 'admins') . '" title="{--ADMIN_CONTACT_LINK_TITLE--}">' . $login . '</a>';
1440                         } else {
1441                                 // Extension not found
1442                                 $adminLink = '{%message,ADMIN_TASK_ROW_EXTENSION_NOT_INSTALLED=admins%}';
1443                         }
1444                 } else {
1445                         // Maybe deleted?
1446                         $adminLink = '<div class="notice">{%message,ADMIN_ID_404=' . $adminId . '%}</div>';
1447                 }
1448         } // END - if
1449
1450         // Return result
1451         return $adminLink;
1452 }
1453
1454 // Verifies if the current admin has confirmed to alter expert settings
1455 //
1456 // Return values:
1457 // 'failed'    = Something goes wrong (default)
1458 // 'agreed'    = Has verified and and confirmed it to see them
1459 // 'forbidden' = Has not the proper right to alter them
1460 // 'update'    = Need to update extension 'admins'
1461 // 'ask'       = A form was send to the admin
1462 function doVerifyExpertSettings () {
1463         // Default return status is failed
1464         $return = 'failed';
1465
1466         // Is the extension installed and recent?
1467         if (isExtensionInstalledAndNewer('admins', '0.7.3')) {
1468                 // Okay, load the status
1469                 $expertSettings = getAminsExpertSettings();
1470
1471                 // Is he allowed?
1472                 if ($expertSettings == 'Y') {
1473                         // Okay, does he want to see them?
1474                         if (isAdminsExpertWarningEnabled()) {
1475                                 // Ask for them
1476                                 if (isFormSent()) {
1477                                         // Is the element set, then we need to change the admin
1478                                         if (isPostRequestParameterSet('expert_settings')) {
1479                                                 // Get it and prepare final post data array
1480                                                 $postData['login'][getCurrentAdminId()] = getCurrentAdminLogin();
1481                                                 $postData['expert_warning'][getCurrentAdminId()] = 'N';
1482
1483                                                 // Change it in the admin
1484                                                 adminsChangeAdminAccount($postData, 'expert_warning');
1485
1486                                                 // Clear form
1487                                                 unsetPostRequestParameter('ok');
1488                                         } // END - if
1489
1490                                         // All fine!
1491                                         $return = 'agreed';
1492                                 } else {
1493                                         // Send form
1494                                         loadTemplate('admin_expert_settings_form');
1495
1496                                         // Asked for it
1497                                         $return = 'ask';
1498                                 }
1499                         } else {
1500                                 // Do not display
1501                                 $return = 'agreed';
1502                         }
1503                 } else {
1504                         // Forbidden
1505                         $return = 'forbidden';
1506                 }
1507         } else {
1508                 // Out-dated extension or not installed
1509                 $return = 'update';
1510         }
1511
1512         // Output message for other status than ask/agreed
1513         if (($return != 'ask') && ($return != 'agreed')) {
1514                 // Output message
1515                 displayMessage('{--ADMIN_EXPERT_SETTINGS_STATUS_' . strtoupper($return) . '--}');
1516         } // END - if
1517
1518         // Return status
1519         return $return;
1520 }
1521
1522 // Generate link to unconfirmed mails for admin
1523 function generateUnconfirmedAdminLink ($id, $unconfirmed, $type = 'bid') {
1524         // Init output
1525         $OUT = $unconfirmed;
1526
1527         // Do we have unconfirmed mails?
1528         if ($unconfirmed > 0) {
1529                 // Add link to list_unconfirmed what-file
1530                 $OUT = '<a href="{%url=modules.php?module=admin&amp;what=list_unconfirmed&amp;' . $type . '=' . $id . '%}">{%pipe,translateComma=' . $unconfirmed . '%}</a>';
1531         } // END - if
1532
1533         // Return it
1534         return $OUT;
1535 }
1536
1537 // Generates a navigation row for listing emails
1538 function addEmailNavigation ($numPages, $offset, $show_form, $colspan, $return=false) {
1539         // Don't do anything if $numPages is 1
1540         if ($numPages == 1) {
1541                 // Abort here with empty content
1542                 return '';
1543         } // END - if
1544
1545         $TOP = '';
1546         if ($show_form === false) {
1547                 $TOP = ' top';
1548         } // END - if
1549
1550         $NAV = '';
1551         for ($page = 1; $page <= $numPages; $page++) {
1552                 // Is the page currently selected or shall we generate a link to it?
1553                 if (($page == getRequestParameter('page')) || ((!isGetRequestParameterSet('page')) && ($page == 1))) {
1554                         // Is currently selected, so only highlight it
1555                         $NAV .= '<strong>-';
1556                 } else {
1557                         // Open anchor tag and add base URL
1558                         $NAV .= '<a href="{%url=modules.php?module=admin&amp;what=' . getWhat() . '&amp;page=' . $page . '&amp;offset=' . $offset;
1559
1560                         // Add userid when we shall show all mails from a single member
1561                         if ((isGetRequestParameterSet('userid')) && (isValidUserId(getRequestParameter('userid')))) $NAV .= '&amp;userid=' . bigintval(getRequestParameter('userid'));
1562
1563                         // Close open anchor tag
1564                         $NAV .= '%}">';
1565                 }
1566                 $NAV .= $page;
1567                 if (($page == getRequestParameter('page')) || ((!isGetRequestParameterSet('page')) && ($page == 1))) {
1568                         // Is currently selected, so only highlight it
1569                         $NAV .= '-</strong>';
1570                 } else {
1571                         // Close anchor tag
1572                         $NAV .= '</a>';
1573                 }
1574
1575                 // Add seperator if we have not yet reached total pages
1576                 if ($page < $numPages) {
1577                         // Add it
1578                         $NAV .= '|';
1579                 } // END - if
1580         } // END - for
1581
1582         // Define constants only once
1583         $content['nav']  = $NAV;
1584         $content['span'] = $colspan;
1585         $content['top']  = $TOP;
1586
1587         // Load navigation template
1588         $OUT = loadTemplate('admin_email_nav_row', true, $content);
1589
1590         if ($return === true) {
1591                 // Return generated HTML-Code
1592                 return $OUT;
1593         } else {
1594                 // Output HTML-Code
1595                 outputHtml($OUT);
1596         }
1597 }
1598
1599 // Process menu editing form
1600 function adminProcessMenuEditForm ($type, $subMenu) {
1601         // An action is done...
1602         foreach (postRequestParameter('sel') as $sel => $menu) {
1603                 $AND = "(`what` = '' OR `what` IS NULL)";
1604
1605                 $sel = bigintval($sel);
1606
1607                 if (!empty($subMenu)) {
1608                         $AND = "`action`='" . $subMenu . "'";
1609                 } // END - if
1610
1611                 switch (postRequestParameter('ok')) {
1612                         case 'edit': // Edit menu
1613                                 if (postRequestParameter('sel_what', $sel) == '') {
1614                                         // Update with 'what'=null
1615                                         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_%s_menu` SET `title`='%s', `action`='%s', `what`=NULL WHERE ".$AND." AND `id`=%s LIMIT 1",
1616                                                 array(
1617                                                         $type,
1618                                                         $menu,
1619                                                         postRequestParameter('sel_action', $sel),
1620                                                         $sel
1621                                                 ), __FILE__, __LINE__);
1622                                 } else {
1623                                         // Update with selected 'what'
1624                                         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_%s_menu` SET `title`='%s', `action`='%s', `what`='%s' WHERE ".$AND." AND `id`=%s LIMIT 1",
1625                                                 array(
1626                                                         $type,
1627                                                         $menu,
1628                                                         postRequestParameter('sel_action', $sel),
1629                                                         postRequestParameter('sel_what', $sel),
1630                                                         $sel
1631                                                 ), __FILE__, __LINE__);
1632                                 }
1633                                 break;
1634
1635                         case 'delete': // Delete menu
1636                                 SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_%s_menu` WHERE ".$AND." AND `id`=%s LIMIT 1",
1637                                         array($type, $sel), __FILE__, __LINE__);
1638                                 break;
1639
1640                         case 'status': // Change status of menus
1641                                 SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_%s_menu` SET `visible`='%s', `locked`='%s' WHERE ".$AND." AND `id`=%s LIMIT 1",
1642                                         array($type, postRequestParameter('visible', $sel), postRequestParameter('locked', $sel), $sel), __FILE__, __LINE__);
1643                                 break;
1644
1645                         default: // Unexpected action
1646                                 logDebugMessage(__FILE__, __LINE__, sprintf("Unsupported action %s detected.", postRequestParameter('ok')));
1647                                 displayMessage('{%message,ADMIN_UNKNOWN_OKAY=' . postRequestParameter('ok') . '%}');
1648                                 break;
1649                 } // END - switch
1650         } // END - foreach
1651
1652         // Load template
1653         displayMessage('{--SETTINGS_SAVED--}');
1654 }
1655
1656 // Handle weightning
1657 function doAdminProcessMenuWeightning ($type, $AND) {
1658         // Are there all required (generalized) GET parameter?
1659         if ((isGetRequestParameterSet('act')) && (isGetRequestParameterSet('tid')) && (isGetRequestParameterSet('fid'))) {
1660                 // Init variables
1661                 $tid = ''; $fid = '';
1662
1663                 // Get ids
1664                 if (isGetRequestParameterSet('w')) {
1665                         // Sub menus selected
1666                         $result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_%s_menu` WHERE `action`='%s' AND `sort`=%s LIMIT 1",
1667                                 array(
1668                                         $type,
1669                                         getRequestParameter('act'),
1670                                         bigintval(getRequestParameter('tid'))
1671                                 ), __FILE__, __LINE__);
1672                         list($tid) = SQL_FETCHROW($result);
1673                         SQL_FREERESULT($result);
1674                         $result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_%s_menu` WHERE `action`='%s' AND `sort`=%s LIMIT 1",
1675                                 array(
1676                                         $type,
1677                                         getRequestParameter('act'),
1678                                         bigintval(getRequestParameter('fid'))
1679                                 ), __FILE__, __LINE__);
1680                         list($fid) = SQL_FETCHROW($result);
1681                         SQL_FREERESULT($result);
1682                 } else {
1683                         // Main menu selected
1684                         $result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_%s_menu` WHERE (`what`='' OR `what` IS NULL) AND `sort`=%s LIMIT 1",
1685                                 array(
1686                                         $type,
1687                                         bigintval(getRequestParameter('tid'))
1688                                 ), __FILE__, __LINE__);
1689                         list($tid) = SQL_FETCHROW($result);
1690                         SQL_FREERESULT($result);
1691                         $result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_%s_menu` WHERE (`what`='' OR `what` IS NULL) AND `sort`=%s LIMIT 1",
1692                                 array(
1693                                         $type,
1694                                         bigintval(getRequestParameter('fid'))
1695                                 ), __FILE__, __LINE__);
1696                         list($fid) = SQL_FETCHROW($result);
1697                         SQL_FREERESULT($result);
1698                 }
1699
1700                 if ((!empty($tid)) && (!empty($fid))) {
1701                         // Sort menu
1702                         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_%s_menu` SET `sort`=%s WHERE ".$AND." AND `id`=%s LIMIT 1",
1703                                 array(
1704                                         $type,
1705                                         bigintval(getRequestParameter('tid')),
1706                                         bigintval($fid)
1707                                 ), __FILE__, __LINE__);
1708                         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_%s_menu` SET `sort`=%s WHERE ".$AND." AND `id`=%s LIMIT 1",
1709                                 array(
1710                                         $type,
1711                                         bigintval(getRequestParameter('fid')),
1712                                         bigintval($tid)
1713                                 ), __FILE__, __LINE__);
1714                 } // END - if
1715         } // END - if
1716 }
1717
1718 // [EOF]
1719 ?>