37af59ab4ce66ec8ea2bcc26a5b54e470d5b29d9
[mailer.git] / inc / modules / admin / admin-inc.php
1 <?php
2 /************************************************************************
3  * MXChange v0.2.1                                    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  * Needs to be in all Files and every File needs "svn propset           *
18  * svn:keywords Date Revision" (autoprobset!) at least!!!!!!            *
19  * -------------------------------------------------------------------- *
20  * Copyright (c) 2003 - 2009 by Roland Haeder                           *
21  * For more information visit: http://www.mxchange.org                  *
22  *                                                                      *
23  * This program is free software; you can redistribute it and/or modify *
24  * it under the terms of the GNU General Public License as published by *
25  * the Free Software Foundation; either version 2 of the License, or    *
26  * (at your option) any later version.                                  *
27  *                                                                      *
28  * This program is distributed in the hope that it will be useful,      *
29  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
30  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
31  * GNU General Public License for more details.                         *
32  *                                                                      *
33  * You should have received a copy of the GNU General Public License    *
34  * along with this program; if not, write to the Free Software          *
35  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
36  * MA  02110-1301  USA                                                  *
37  ************************************************************************/
38
39 // Some security stuff...
40 if (!defined('__SECURITY')) {
41         die();
42 } // END - if
43
44 // Register an administrator account
45 function addAdminAccount ($user, $md5, $email) {
46         // Login does already exist
47         $ret = 'already';
48
49         // Lookup the admin
50         $result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_admins` WHERE `login`='%s' LIMIT 1",
51                 array($user), __FUNCTION__, __LINE__);
52
53         // Is the entry there?
54         if (SQL_NUMROWS($result) == 0) {
55                 // Ok, let's create the admin login
56                 SQL_QUERY_ESC("INSERT INTO `{?_MYSQL_PREFIX?}_admins` (`login`, `password`, `email`) VALUES ('%s', '%s', '%s')",
57                         array(
58                                 $user,
59                                 $md5,
60                                 $email
61                         ), __FUNCTION__, __LINE__);
62                 $ret = 'done';
63         } // END - if
64
65         // Free memory
66         SQL_FREERESULT($result);
67
68         // Return result
69         return $ret;
70 }
71
72 // Only be executed on login procedure!
73 function ifAdminLoginDataIsValid ($admin, $password) {
74         // By default no admin is found
75         $ret = '404';
76
77         // Get admin id
78         $adminId = getAdminId($admin);
79
80         // Init array with admin id by default
81         $data = array('admin_id' => $adminId);
82
83         // Is the cache valid?
84         if (isAdminHashSet($admin)) {
85                 // Get password from cache
86                 $data['password'] = getAdminHash($admin);
87                 $ret = 'pass';
88                 incrementStatsEntry('cache_hits');
89
90                 // Include more admins data?
91                 if ((isExtensionInstalledAndNewer('admins', '0.7.2')) && (isset($GLOBALS['cache_array']['admin']['login_failures'][$adminId]))) {
92                         // Load them here
93                         $data['login_failures'] = $GLOBALS['cache_array']['admin']['login_failures'][$adminId];
94                         $data['last_failure']   = $GLOBALS['cache_array']['admin']['last_failure'][$adminId];
95                 } // END - if
96         } elseif (!isExtensionActive('cache')) {
97                 // Add extra data via filter now
98                 $add = runFilterChain('sql_admin_extra_data');
99
100                 // Get password from DB
101                 $result = SQL_QUERY_ESC("SELECT `password`" . $add . " FROM `{?_MYSQL_PREFIX?}_admins` WHERE `id`=%s LIMIT 1",
102                         array($adminId), __FUNCTION__, __LINE__);
103
104                 // Entry found?
105                 if (SQL_NUMROWS($result) == 1) {
106                         // Login password found
107                         $ret = 'pass';
108
109                         // Fetch data
110                         $data = SQL_FETCHARRAY($result);
111                 } // END - if
112
113                 // Free result
114                 SQL_FREERESULT($result);
115         }
116
117         //* DEBUG: */ outputHtml("*".$data['password'].'/'.md5($password).'/'.$ret."<br />");
118         if ((isset($data['password'])) && (strlen($data['password']) == 32) && ($data['password'] == md5($password))) {
119                 // Generate new hash
120                 $data['password'] = generateHash($password);
121
122                 // Is the sql_patches not installed, than we cannot have a valid hashed password here!
123                 if (($ret == 'pass') && ((isExtensionInstalledAndOlder('sql_patches', '0.3.6')) || (!isExtensionInstalled('sql_patches')))) $ret = 'done';
124         } elseif ((isExtensionInstalledAndOlder('sql_patches', '0.3.6')) || (!isExtensionInstalled('sql_patches'))) {
125                 // Old hashing way
126                 return $ret;
127         } elseif (!isset($data['password'])) {
128                 // Password not found, so no valid login!
129                 return $ret;
130         }
131
132         // Generate salt of password
133         $salt = substr($data['password'], 0, -40);
134
135         // Check if password is same
136         //* DEBUG: */ outputHtml("*".$ret.','.$data['password'].','.$password.','.$salt."*<br />");
137         if (($ret == 'pass') && ($data['password'] == generateHash($password, $salt)) && ((!empty($salt))) || ($data['password'] == $password)) {
138                 // Re-hash the plain passord with new random salt
139                 $data['password'] = generateHash($password);
140
141                 // Do we have 0.7.0 of admins or later?
142                 // Remmeber login failures if available
143                 if ((isExtensionInstalledAndNewer('admins', '0.7.2')) && (isset($data['login_failures']))) {
144                         // Store it in session
145                         setSession('mxchange_admin_failures', $data['login_failures']);
146                         setSession('mxchange_admin_last_fail', $data['last_failure']);
147
148                         // Update password and reset login failures
149                         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_admins` SET `password`='%s',`login_failures`=0,`last_failure`='0000-00-00 00:00:00' WHERE `id`=%s LIMIT 1",
150                                 array($data['password'], $adminId), __FUNCTION__, __LINE__);
151                 } else {
152                         // Update password
153                         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_admins` SET `password`='%s' WHERE `id`=%s LIMIT 1",
154                                 array($data['password'], $adminId), __FUNCTION__, __LINE__);
155                 }
156
157                 // Rebuild cache
158                 rebuildCacheFile('admin', 'admin');
159
160                 // Login has failed by default... ;-)
161                 $ret = 'failed1';
162
163                 // Password matches so login here
164                 if (doAdminLogin($admin, $data['password'])) {
165                         // All done now
166                         $ret = 'done';
167                 } // END - if
168         } elseif ((empty($salt)) && ($ret == 'pass')) {
169                 // Something bad went wrong
170                 $ret = 'failed_salt';
171         } elseif ($ret == 'done') {
172                 // Try to login here if we have the old hashing way (sql_patches not installed?)
173                 if (!doAdminLogin($admin, $data['password'])) {
174                         // Something went wrong
175                         $ret = 'failed2';
176                 } // END - if
177         }
178
179         // Count login failure if admins extension version is 0.7.0+
180         if (($ret == 'pass') && (getExtensionVersion('admins') >= '0.7.0')) {
181                 // Update counter
182                 SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_admins` SET login_failures`=`login_failures`+1,`last_failure`=NOW() WHERE `id`=%s LIMIT 1",
183                         array($adminId), __FUNCTION__, __LINE__);
184
185                 // Rebuild cache
186                 rebuildCacheFile('admin', 'admin');
187         } // END - if
188
189         // Return the result
190         //* DEBUG: */ die('RETURN=' . $ret);
191         return $ret;
192 }
193
194 // Try to login the admin by setting some session/cookie variables
195 function doAdminLogin ($adminLogin, $passHash) {
196         // Reset failure counter on matching admins version
197         if ((isExtensionInstalledAndNewer('admins', '0.7.0')) && ((isExtensionOlder('sql_patches', '0.3.6')) || (!isExtensionInstalled('sql_patches')))) {
198                 // Reset counter on out-dated sql_patches version
199                 SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_admins` SET `login_failures`=0, `last_failure`='0000-00-00 00:00:00' WHERE `login`='%s' LIMIT 1",
200                         array($adminLogin), __FUNCTION__, __LINE__);
201
202                 // Rebuild cache
203                 rebuildCacheFile('admin', 'admin');
204         } // END - if
205
206         // Now set all session variables and return the result
207         return ((
208                 setSession('admin_md5', generatePassString($passHash))
209         ) && (
210                 setSession('admin_login', $adminLogin)
211         ) && (
212                 setSession('admin_last', time())
213         ) && (
214                 setSession('admin_to', bigintval(postRequestElement('timeout')))
215         ));
216 }
217
218 // Only be executed on cookie checking
219 function ifAdminCookiesAreValid ($admin, $password) {
220         // By default no admin cookies are found
221         $ret  = '404';
222         $pass = '';
223
224         // Get hash
225         $pass = getAdminHash($admin);
226         if ($pass != '-1') $ret = 'pass';
227
228         //* DEBUG: */ outputHtml(__FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):".generatePassString($pass).'('.strlen($pass).")/".$password.'('.strlen($password).")<br />");
229
230         // Check if password matches
231         if (($ret == 'pass') && ((generatePassString($pass) == $password) || ($pass == $password) || ((strlen($pass) == 32) && (md5($password) == $pass)))) {
232                 // Passwords matches!
233                 $ret = 'done';
234         } // END - if
235
236         // Return result
237         return $ret;
238 }
239
240 // Do an admin action
241 function doAdminAction () {
242         // Get default what
243         $what = getWhat();
244
245         //* DEBUG: */ outputHtml(__LINE__."*".$what.'/'.getModule().'/'.getAction().'/'.getWhat()."*<br />");
246
247         // Remove any spaces from variable
248         if (empty($what)) {
249                 // Default admin action is the overview page
250                 $what = 'overview';
251         } else {
252                 // Compile out some chars
253                 $what = compileCode($what, false, false, false);
254         }
255
256         // Get action value
257         $action = getModeAction(getModule(), $what);
258
259         // Define admin login name and ID number
260         $content['login'] = getSession('admin_login');
261         $content['id']    = getCurrentAdminId();
262
263         // Preload templates
264         if (isExtensionActive('admins')) {
265                 $content['welcome'] = loadTemplate('admin_welcome_admins', true, $content);
266         } else {
267                 $content['welcome'] = loadTemplate('admin_welcome', true, $content);
268         }
269         $content['footer'] = loadTemplate('admin_footer' , true, $content);
270         $content['menu']   = addAdminMenu($action, $what, true);
271
272         // Tableset header
273         loadTemplate('admin_main_header', false, $content);
274
275         // Is sql_patches not yet installed?
276         if (!isExtensionInstalled('sql_patches')) {
277                 // Output warning
278                 loadTemplate('admin_settings_saved', false, getMessage('ADMIN_WARNING_SQL_PATCHES_MISSING'));
279         } // END - if
280
281         // Check if action/what pair is valid
282         $result_action = SQL_QUERY_ESC("SELECT
283         `id`
284 FROM
285         `{?_MYSQL_PREFIX?}_admin_menu`
286 WHERE
287         `action`='%s' AND
288         (
289                 (
290                         `what`='%s' AND `what` != 'overview'
291                 ) OR (
292                         (
293                                 `what`='' OR `what` IS NULL
294                         ) AND (
295                                 '%s'='overview'
296                         )
297                 )
298         )
299 LIMIT 1",
300                 array($action, $what, $what), __FUNCTION__, __LINE__);
301         if (SQL_NUMROWS($result_action) == 1) {
302                 // Is valid but does the inlcude file exists?
303                 $inc = sprintf("inc/modules/admin/action-%s.php", $action);
304                 if ((isIncludeReadable($inc)) && (isMenuActionValid('admin', $action, $what)) && ($GLOBALS['acl_allow'] === true)) {
305                         // Ok, we finally load the admin action module
306                         loadInclude($inc);
307                 } elseif ($GLOBALS['acl_allow'] === false) {
308                         // Access denied
309                         loadTemplate('admin_menu_failed', false, sprintf(getMessage('ADMIN_ACCESS_DENIED'), $what));
310                 } else {
311                         // Include file not found! :-(
312                         loadTemplate('admin_menu_failed', false, sprintf(getMessage('ADMIN_ACTION_404'), $action));
313                 }
314         } else {
315                 // Invalid action/what pair found!
316                 loadTemplate('admin_menu_failed', false, sprintf(getMessage('ADMIN_ACTION_INVALID'), $action.'/'.$what));
317         }
318
319         // Free memory
320         SQL_FREERESULT($result_action);
321
322         // Tableset footer
323         loadTemplate('admin_main_footer', false, $content);
324 }
325
326 // Adds an admin menu
327 function addAdminMenu ($action, $what, $return=false) {
328         // Init variables
329         $SUB = false;
330         $OUT = '';
331
332         // Menu descriptions
333         $GLOBALS['menu']['description'] = array();
334         $GLOBALS['menu']['title'] = array();
335
336         // Build main menu
337         $result_main = SQL_QUERY("SELECT
338         `action`, `title`, `descr`
339 FROM
340         `{?_MYSQL_PREFIX?}_admin_menu`
341 WHERE
342         (`what`='' OR `what` IS NULL)
343 ORDER BY
344         `sort` ASC,
345         `id` DESC", __FUNCTION__, __LINE__);
346         if (SQL_NUMROWS($result_main) > 0) {
347                 $OUT = "<div style=\"height:7px\" class=\"seperator\">&nbsp;</div>\n";
348                 $OUT .= "<ul class=\"admin_menu_main\">\n";
349                 // @TODO Rewrite this to $content = SQL_FETCHARRAY()
350                 while (list($menu, $title, $descr) = SQL_FETCHROW($result_main)) {
351                         if ((isExtensionActive('admins')) && (getExtensionVersion('admins') > '0.2.0')) {
352                                 $ACL = adminsCheckAdminAcl($menu, '');
353                         } else {
354                                 // @TODO ACL is 'allow'... hmmm
355                                 $ACL = true;
356                         }
357
358                         if ($ACL === true) {
359                                 if ($SUB === false) {
360                                         // Insert compiled menu title and description
361                                         $GLOBALS['menu']['title'][$menu]      = $title;
362                                         $GLOBALS['menu']['description'][$menu] = $descr;
363                                 }
364                                 $OUT .= "<li class=\"admin_menu\">
365 <div class=\"nobr\"><strong>&middot;</strong>&nbsp;";
366
367                                 if (($menu == $action) && (empty($what))) {
368                                         $OUT .= "<strong>";
369                                 } else {
370                                         $OUT .= "[<a href=\"{?URL?}/modules.php?module=admin&amp;action=".$menu."\">";
371                                 }
372
373                                 $OUT .= $title;
374
375                                 if (($menu == $action) && (empty($what))) {
376                                         $OUT .= "</strong>";
377                                 } else {
378                                         $OUT .= "</a>]";
379                                 }
380
381                                 $OUT .= "</div>
382 </li>\n";
383
384                                 // Check for menu entries
385                                 $result_what = SQL_QUERY_ESC("SELECT
386         `what`, `title`, `descr`
387 FROM
388         `{?_MYSQL_PREFIX?}_admin_menu`
389 WHERE
390         `action`='%s' AND
391         `what` != '' AND
392         `what` IS NOT NULL
393 ORDER BY
394         `sort` ASC,
395         `id` DESC",
396                                         array($menu), __FUNCTION__, __LINE__);
397
398                                 // Remember the count for later checks
399                                 setAdminMenuHasEntries($menu, ((SQL_NUMROWS($result_what) > 0) && ($action == $menu)));
400
401                                 // Do we have entries?
402                                 if ((ifAdminMenuHasEntries($menu)) && (SQL_NUMROWS($result_what) > 0)) {
403                                         $GLOBALS['menu']['description'] = array();
404                                         $GLOBALS['menu']['title'] = array(); $SUB = true;
405                                         $OUT .= "<li class=\"admin_menu_sub\"><ul class=\"admin_menu_sub\">\n";
406                                         // @TODO Rewrite this to $content = SQL_FETCHARRAY()
407                                         while (list($what_sub, $title_what, $desc_what) = SQL_FETCHROW($result_what)) {
408                                                 // Check for access level
409                                                 if ((isExtensionActive('admins')) && (getExtensionVersion('admins') > '0.2.0')) {
410                                                         $ACL = adminsCheckAdminAcl('', $what_sub);
411                                                 } else {
412                                                         // @TODO ACL is 'allow'... hmmm
413                                                         $ACL = true;
414                                                 }
415
416                                                 // Filename
417                                                 $inc = sprintf("inc/modules/admin/what-%s.php", $what_sub);
418
419                                                 // Is the file readable?
420                                                 $readable = isIncludeReadable($inc);
421
422                                                 // Access allowed?
423                                                 if ($ACL === true) {
424                                                         // Insert compiled title and description
425                                                         $GLOBALS['menu']['title'][$what_sub]      = $title_what;
426                                                         $GLOBALS['menu']['description'][$what_sub] = $desc_what;
427                                                         $OUT .= "<li class=\"admin_menu\">
428                 <div class=\"nobr\"><strong>--&gt;</strong>&nbsp;";
429                                                         if ($readable === true) {
430                                                                 if ($what == $what_sub) {
431                                                                         $OUT .= "<strong>";
432                                                                 } else {
433                                                                         $OUT .= "[<a href=\"{?URL?}/modules.php?module=admin&amp;what=".$what_sub."\">";
434                                                                 }
435                                                         } else {
436                                                                 $OUT .= "<em style=\"cursor:help\" class=\"admin_note\" title=\"{--MENU_WHAT_404--}\">";
437                                                         }
438
439                                                         $OUT .= $title_what;
440
441                                                         if ($readable === true) {
442                                                                 if ($what == $what_sub) {
443                                                                         $OUT .= "</strong>";
444                                                                 } else {
445                                                                         $OUT .= "</a>]";
446                                                                 }
447                                                         } else {
448                                                                 $OUT .= "</em>";
449                                                         }
450                                                         $OUT .= "</div>
451 </li>\n";
452                                                 } // END - if
453                                         } // END - while
454
455                                         // Free memory
456                                         SQL_FREERESULT($result_what);
457                                         $OUT .= "</ul>
458 </li>\n";
459                                 } // END - if
460
461                                 $OUT .= "<li style=\"height:7px\" class=\"seperator\">&nbsp;</li>\n";
462                         } // END - if
463                 } // END - while
464
465                 // Free memory
466                 SQL_FREERESULT($result_main);
467                 $OUT .= "</ul>\n";
468         }
469
470         // Is there a cache instance again?
471         // Return or output content?
472         if ($return === true) {
473                 return $OUT;
474         } else {
475                 outputHtml($OUT);
476         }
477 }
478
479 // Create member selection box
480 function addMemberSelectionBox ($def=0, $add_all=false, $return=false, $none=false, $field='userid') {
481         // Output selection form with all confirmed user accounts listed
482         $result = SQL_QUERY("SELECT `userid`, `surname`, `family` FROM `{?_MYSQL_PREFIX?}_user_data` ORDER BY `userid` ASC", __FUNCTION__, __LINE__);
483
484         // Default output
485         $OUT = '';
486
487         // USe this only for adding points (e.g. adding refs really makes no sence ;-) )
488         if ($add_all === true)   $OUT = "      <option value=\"all\">{--ALL_MEMBERS--}</option>\n";
489          elseif ($none === true) $OUT = "      <option value=\"0\">{--SELECT_NONE--}</option>\n";
490
491         while ($content = SQL_FETCHARRAY($result)) {
492                 $OUT .= "      <option value=\"".bigintval($content['userid'])."\"";
493                 if ($def == $content['userid']) $OUT .= ' selected="selected"';
494                 $OUT .= ">".$content['surname']." ".$content['family']." (".bigintval($content['userid']).")</option>\n";
495         } // END - while
496
497         // Free memory
498         SQL_FREERESULT($result);
499
500         if ($return === false) {
501                 // Remeber options in constant
502                 $content['member_selection'] = $OUT;
503                 $content['what']             = getWhat();
504
505                 // Load template
506                 loadTemplate('admin_member_selection_box', false, $content);
507         } else {
508                 // Return content in selection frame
509                 return "<select class=\"admin_select\" name=\"".$field."\" size=\"1\">\n".$OUT."</select>\n";
510         }
511 }
512
513 // Create a menu selection box for given menu system
514 // @TODO Try to rewrite this to adminAddMenuSelectionBox()
515 // @DEPRECATED
516 function adminMenuSelectionBox_DEPRECATED ($mode, $default = '', $defid = '') {
517         $what = "`what` != ''";
518         if ($mode == 'action') $what = "(`what`='' OR `what` IS NULL) AND action !='login'";
519         $result = SQL_QUERY_ESC("SELECT %s, title FROM `{?_MYSQL_PREFIX?}_admin_menu` WHERE ".$what." ORDER BY `sort`",
520                 array($mode), __FUNCTION__, __LINE__);
521         if (SQL_NUMROWS($result) > 0) {
522                 // Load menu as selection
523                 $OUT = "<select name=\"".$mode."_menu";
524                 if ((!empty($defid)) || ($defid == 0)) $OUT .= "[".$defid."]";
525                 $OUT .= "\" size=\"1\" class=\"admin_select\">
526         <option value=\"\">{--SELECT_NONE--}</option>\n";
527                 // @TODO Try to rewrite this to $content = SQL_FETCHARRAY(). Please look some lines above for the dynamic query
528                 while (list($menu, $title) = SQL_FETCHROW($result)) {
529                         $OUT .= "  <option value=\"".$menu."\"";
530                         if ((!empty($default)) && ($default == $menu)) $OUT .= ' selected="selected"';
531                         $OUT .= ">".$title."</option>\n";
532                 } // END - while
533
534                 // Free memory
535                 SQL_FREERESULT($result);
536                 $OUT .= "</select>\n";
537         } else {
538                 // No menus???
539                 $OUT = getMessage('ADMIN_PROBLEM_NO_MENU');
540         }
541
542         // Return output
543         return $OUT;
544 }
545
546 // Wrapper for $_POST and adminSaveSettings
547 function adminSaveSettingsFromPostData ($tableName = '_config', $whereStatement = 'config=0', $translateComma = array(), $alwaysAdd = false) {
548         // Get the array
549         $postData = postRequestArray();
550
551         // Call the lower function
552         adminSaveSettings($postData, $tableName, $whereStatement, $translateComma, $alwaysAdd);
553 }
554
555 // Save settings to the database
556 function adminSaveSettings (&$postData, $tableName = '_config', $whereStatement = 'config=0', $translateComma = array(), $alwaysAdd = false) {
557         // Prepare all arrays, variables
558         $DATA = array();
559         $skip = false;
560
561         // Now, walk through all entries and prepare them for saving
562         foreach ($postData as $id => $val) {
563                 // Process only formular field but not submit buttons ;)
564                 if ($id != 'ok') {
565                         // Do not save the ok value
566                         convertSelectionsToTimestamp($postData, $DATA, $id, $skip);
567
568                         // Shall we process this ID? It muss not be empty, of course
569                         if (($skip === false) && (!empty($id))) {
570                                 // Save this entry
571                                 $val = compileCode($val);
572
573                                 // Translate the value? (comma to dot!)
574                                 if ((is_array($translateComma)) && (in_array($id, $translateComma))) {
575                                         // Then do it here... :)
576                                         $val = convertCommaToDot($val);
577                                 } // END - if
578
579                                 // Shall we add numbers or strings?
580                                 $test = (float)$val;
581                                 if ("".$val."" == ''.$test."") {
582                                         // Add numbers
583                                         $DATA[] = sprintf("`%s`=%s", $id, $test);
584                                 } else {
585                                         // Add strings
586                                         $DATA[] = sprintf("`%s`='%s'", $id, trim($val));
587                                 }
588
589                                 // Update current configuration
590                                 setConfigEntry($id, $val);
591                         } // END - if
592                 } // END - if
593         } // END - foreach
594
595         // Check if entry does exist
596         $result = false;
597         if ($alwaysAdd === false) {
598                 if (!empty($whereStatement)) {
599                         $result = SQL_QUERY("SELECT * FROM `{?_MYSQL_PREFIX?}".$tableName."` WHERE ".$whereStatement." LIMIT 1", __FUNCTION__, __LINE__);
600                 } else {
601                         $result = SQL_QUERY("SELECT * FROM `{?_MYSQL_PREFIX?}".$tableName."` LIMIT 1", __FUNCTION__, __LINE__);
602                 }
603         } // END - if
604
605         if (SQL_NUMROWS($result) == 1) {
606                 // "Implode" all data to single string
607                 $DATA_UPDATE = implode(', ', $DATA);
608
609                 // Generate SQL string
610                 $sql = sprintf("UPDATE `{?_MYSQL_PREFIX?}%s` SET %s WHERE %s LIMIT 1",
611                 $tableName,
612                 $DATA_UPDATE,
613                 $whereStatement
614                 );
615         } else {
616                 // Add Line (does only work with auto_increment!
617                 $KEYs = array(); $values = array();
618                 foreach ($DATA as $entry) {
619                         // Split up
620                         $line = explode('=', $entry);
621                         $KEYs[] = $line[0]; $values[] = $line[1];
622                 } // END - foreach
623
624                 // Add both in one line
625                 $KEYs = implode(', ', $KEYs);
626                 $values = implode(', ', $values);
627
628                 // Generate SQL string
629                 $sql = sprintf("INSERT INTO {?_MYSQL_PREFIX?}%s (%s) VALUES (%s)",
630                 $tableName,
631                 $KEYs,
632                 $values
633                 );
634         }
635
636         // Free memory
637         SQL_FREERESULT($result);
638
639         // Simply run generated SQL string
640         SQL_QUERY($sql, __FUNCTION__, __LINE__);
641
642         // Rebuild cache
643         rebuildCacheFile('config', 'config');
644
645         // Settings saved
646         loadTemplate('admin_settings_saved', false, getMessage('SETTINGS_SAVED'));
647 }
648
649 // Generate a selection box
650 function adminAddMenuSelectionBox ($menu, $type, $name, $default = '') {
651         // Open the requested menu directory
652         $menuArray = getArrayFromDirectory(sprintf("inc/modules/%s/", $menu), '', false, false);
653
654         // Init the selection box
655         $OUT = "<select name=\"".$name."\" class=\"admin_select\" size=\"1\">
656         <option value=\"\">{--IS_TOP_MENU--}</option>\n";
657
658         // Walk through all files
659         foreach ($menuArray as $file) {
660                 // Is this a PHP script?
661                 if ((!isDirectory($file)) && (strpos($file, "".$type.'-') > -1) && (strpos($file, '.php') > 0)) {
662                         // Then test if the file is readable
663                         $test = sprintf("inc/modules/%s/%s", $menu, $file);
664
665                         // Is the file there?
666                         if (isIncludeReadable($test)) {
667                                 // Extract the value for what=xxx
668                                 $part = substr($file, (strlen($type) + 1));
669                                 $part = substr($part, 0, -4);
670
671                                 // Is that part different from the overview?
672                                 if ($part != 'overview') {
673                                         $OUT .= "       <option value=\"".$part."\"";
674                                         if ($part == $default) $OUT .= ' selected="selected"';
675                                         $OUT .= ">".$part."</option>\n";
676                                 } // END - if
677                         } // END - if
678                 } // END - if
679         } // END - foreach
680
681         // Close selection box
682         $OUT .= "</select>\n";
683
684         // Return contents
685         return $OUT;
686 }
687
688 // Creates a user-profile link for the admin. This function can also be used for many other purposes
689 function generateUserProfileLink ($userid, $title = '', $what = 'list_user') {
690         if (($title == '') && ($userid > 0)) {
691                 // Set userid as title
692                 $title = $userid;
693         } // END - if
694
695         if (($title == 0) && ($what == 'list_refs')) {
696                 // Return title again
697                 return $title;
698         } elseif (isExtensionActive('nickname')) {
699                 // Get nickname
700                 $nick = getNickname($userid);
701
702                 // Is it not empty, use it as title else the userid
703                 if (!empty($nick)) $title = $nick . '(' . $userid . ')'; else $title = $userid;
704         }
705
706         // Return link
707         return '[<a href="{?URL?}/modules.php?module=admin&amp;what=' . $what . '&amp;userid=' . $userid . '" title="{--ADMIN_USER_PROFILE_TITLE--}">' . $title . '</a>]';
708 }
709
710 // Check "logical-area-mode"
711 function adminGetMenuMode () {
712         // Set the global mode as the mode for all admins
713         $mode = getConfig('admin_menu');
714         $ADMIN = $mode;
715
716         // Get admin id
717         $adminId = getCurrentAdminId();
718
719         // Check individual settings of current admin
720         if (isset($GLOBALS['cache_array']['admin']['la_mode'][$adminId])) {
721                 // Load from cache
722                 $ADMIN = $GLOBALS['cache_array']['admin']['la_mode'][$adminId];
723                 incrementStatsEntry('cache_hits');
724         } elseif (isExtensionInstalledAndNewer('admins', '0.6.7')) {
725                 // Load from database when version of 'admins' is enough
726                 $result = SQL_QUERY_ESC("SELECT la_mode FROM `{?_MYSQL_PREFIX?}_admins` WHERE `id`=%s LIMIT 1",
727                         array($adminId), __FUNCTION__, __LINE__);
728                 if (SQL_NUMROWS($result) == 1) {
729                         // Load data
730                         list($ADMIN) = SQL_FETCHROW($result);
731                 }
732
733                 // Free memory
734                 SQL_FREERESULT($result);
735         }
736
737         // Check what the admin wants and set it when it's not the global mode
738         if ($ADMIN != 'global') $mode = $ADMIN;
739
740         // Return admin-menu's mode
741         return $mode;
742 }
743
744 // Change activation status
745 function adminChangeActivationStatus ($IDs, $table, $row, $idRow = 'id') {
746         $cnt = 0; $newStatus = 'Y';
747         if ((is_array($IDs)) && (count($IDs) > 0)) {
748                 // "Walk" all through and count them
749                 foreach ($IDs as $id => $selected) {
750                         // Secure the ID number
751                         $id = bigintval($id);
752
753                         // Should always be set... ;-)
754                         if (!empty($selected)) {
755                                 // Determine new status
756                                 $result = SQL_QUERY_ESC("SELECT %s FROM `{?_MYSQL_PREFIX?}_%s` WHERE %s=%s LIMIT 1",
757                                 array($row, $table, $idRow, $id), __FUNCTION__, __LINE__);
758
759                                 // Row found?
760                                 if (SQL_NUMROWS($result) == 1) {
761                                         // Load the status
762                                         list($currStatus) = SQL_FETCHROW($result);
763
764                                         // And switch it N<->Y
765                                         if ($currStatus == 'Y') $newStatus = 'N'; else $newStatus = 'Y';
766
767                                         // Change this status
768                                         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_%s` SET %s='%s' WHERE %s=%s LIMIT 1",
769                                         array($table, $row, $newStatus, $idRow, $id), __FUNCTION__, __LINE__);
770
771                                         // Count up affected rows
772                                         $cnt += SQL_AFFECTEDROWS();
773                                 } // END - if
774
775                                 // Free the result
776                                 SQL_FREERESULT($result);
777                         } // END - if
778                 } // END - foreach
779
780                 // Output status
781                 loadTemplate('admin_settings_saved', false, sprintf(getMessage('ADMIN_STATUS_CHANGED'), $cnt, count($IDs)));
782         } else {
783                 // Nothing selected!
784                 loadTemplate('admin_settings_saved', false, getMessage('ADMIN_NOTHING_SELECTED_CHANGE'));
785         }
786 }
787
788 // Send mails for del/edit/lock build modes
789 function sendAdminBuildMails ($mode, $table, $content, $id, $subjectPart = '') {
790         // Default subject is the subject part
791         $subject = $subjectPart;
792
793         // Is the subject part not set?
794         if (empty($subjectPart)) {
795                 // Then use it from the mode
796                 $subject = strtoupper($mode);
797         } // END - if
798
799         // Is the raw userid set?
800         if (postRequestElement('userid_raw', $id) > 0) {
801                 // Generate subject
802                 $subjectLine = getMessage('MEMBER_'.strtoupper($subject).'_'.strtoupper($table).'_SUBJECT');
803
804                 // Load email template
805                 if (!empty($subjectPart)) {
806                         $mail = loadEmailTemplate('member_' . $mode . '_' . strtolower($subjectPart) . '_' . $table, $content);
807                 } else {
808                         $mail = loadEmailTemplate('member_' . $mode . '_' . $table, $content);
809                 }
810
811                 // Send email out
812                 sendEmail(postRequestElement('userid_raw', $id), $subjectLine, $mail);
813         } // END - if
814
815         // Generate subject
816         $subjectLine = getMessage('ADMIN_'.strtoupper($subject).'_'.strtoupper($table).'_SUBJECT');
817
818         // Send admin notification out
819         if (!empty($subjectPart)) {
820                 sendAdminNotification($subjectLine, 'admin_' . $mode . '_' . strtolower($subjectPart) . '_' . $table, $content, postRequestElement('userid_raw', $id));
821         } else {
822                 sendAdminNotification($subjectLine, 'admin_' . $mode . '_' . $table, $content, postRequestElement('userid_raw', $id));
823         }
824 }
825
826 // Build a special template list
827 function adminListBuilder ($listType, $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn) {
828         $OUT = ''; $SW = 2;
829
830         // "Walk" through all entries
831         foreach ($IDs as $id => $selected) {
832                 // Secure ID number
833                 $id = bigintval($id);
834
835                 // Get result from a given column array and table name
836                 $result = SQL_RESULT_FROM_ARRAY($table, $columns, $idColumn, $id, __FUNCTION__, __LINE__);
837
838                 // Is there one entry?
839                 if (SQL_NUMROWS($result) == 1) {
840                         // Load all data
841                         $content = SQL_FETCHARRAY($result);
842
843                         // Filter all data
844                         foreach ($content as $key => $value) {
845                                 // Search index
846                                 $idx = array_search($key, $columns, true);
847
848                                 // Do we have a userid?
849                                 if ($key == 'userid') {
850                                         // Add it again as raw id
851                                         $content['userid'] = bigintval($value);
852                                 } // END - if
853
854                                 // Handle the call in external function
855                                 $content[$key] = handleExtraValues($filterFunctions[$idx], $value, $extraValues[$idx]);
856                         } // END - foreach
857
858                         // Add color switching
859                         $content['sw'] = $SW;
860
861                         // Then list it
862                         $OUT .= loadTemplate(sprintf("admin_%s_%s_row",
863                         $listType,
864                         $table
865                         ), true, $content
866                         );
867
868                         // Switch color
869                         $SW = 3 - $SW;
870                 } // END - if
871
872                 // Free the result
873                 SQL_FREERESULT($result);
874         } // END - foreach
875
876         // Load master template
877         loadTemplate(sprintf("admin_%s_%s",
878         $listType,
879         $table
880         ), false, $OUT
881         );
882 }
883
884 // Change status of "build" list
885 function adminBuilderStatusHandler ($mode, $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn, $statusArray) {
886         // All valid entries? (We hope so here!)
887         if ((is_array($IDs)) && (count($IDs) > 0) && (count($columns) == count($filterFunctions)) && (count($columns) == count($extraValues)) && (count($statusArray) > 0)) {
888                 // "Walk" through all entries
889                 foreach ($IDs as $id => $sel) {
890                         // Construct SQL query
891                         $sql = sprintf("UPDATE `{?_MYSQL_PREFIX?}_%s` SET", SQL_ESCAPE($table));
892
893                         // Load data of entry
894                         $result = SQL_QUERY_ESC("SELECT * FROM `{?_MYSQL_PREFIX?}_%s` WHERE %s=%s LIMIT 1",
895                                 array($table, $idColumn, $id), __FUNCTION__, __LINE__);
896
897                         // Fetch the data
898                         $content = SQL_FETCHARRAY($result);
899
900                         // Free the result
901                         SQL_FREERESULT($result);
902
903                         // Add all status entries (e.g. status column last_updated or so)
904                         $newStatus = 'UNKNOWN';
905                         $oldStatus = 'UNKNOWN';
906                         $statusColumn = 'unknown';
907                         foreach ($statusArray as $column => $statusInfo) {
908                                 // Does the entry exist?
909                                 if ((isset($content[$column])) && (isset($statusInfo[$content[$column]]))) {
910                                         // Add these entries for update
911                                         $sql .= sprintf(" %s='%s',", SQL_ESCAPE($column), SQL_ESCAPE($statusInfo[$content[$column]]));
912
913                                         // Remember status
914                                         if ($statusColumn == 'unknown') {
915                                                 // Always (!!!) change status column first!
916                                                 $oldStatus = $content[$column];
917                                                 $newStatus = $statusInfo[$oldStatus];
918                                                 $statusColumn = $column;
919                                         } // END - if
920                                 } elseif (isset($content[$column])) {
921                                         // Unfinished!
922                                         app_die(__FUNCTION__, __LINE__, ":UNFINISHED: id={$id}/{$column}[".gettype($statusInfo)."] = {$content[$column]}");
923                                 }
924                         } // END - foreach
925
926                         // Add other columns as well
927                         foreach (postRequestArray() as $key => $entries) {
928                                 // Skip id, raw userid and 'do_$mode'
929                                 if (!in_array($key, array($idColumn, 'userid_raw', ('do_'.$mode)))) {
930                                         // Are there brackets () at the end?
931                                         if (substr($entries[$id], -2, 2) == "()") {
932                                                 // Direct SQL command found
933                                                 $sql .= sprintf(" %s=%s,", SQL_ESCAPE($key), SQL_ESCAPE($entries[$id]));
934                                         } else {
935                                                 // Add regular entry
936                                                 $sql .= sprintf(" %s='%s',", SQL_ESCAPE($key), SQL_ESCAPE($entries[$id]));
937
938                                                 // Add entry
939                                                 $content[$key] = $entries[$id];
940                                         }
941                                 } // END - if
942                         } // END - foreach
943
944                         // Finish SQL statement
945                         $sql = substr($sql, 0, -1) . sprintf(" WHERE `%s`=%s AND `%s`='%s' LIMIT 1",
946                                 $idColumn,
947                                 bigintval($id),
948                                 $statusColumn,
949                                 $oldStatus
950                         );
951
952                         // Run the SQL
953                         SQL_QUERY($sql, __FUNCTION__, __LINE__);
954
955                         // Do we have an URL?
956                         if (isset($content['url'])) {
957                                 // Then add a framekiller test as well
958                                 $content['frametester'] = generateFrametesterUrl($content['url']);
959                         } // END - if
960
961                         // Send "build mails" out
962                         sendAdminBuildMails($mode, $table, $content, $id, $statusInfo[$content[$column]]);
963                 } // END - foreach
964         } // END - if
965 }
966
967 // Delete rows by given ID numbers
968 function adminDeleteEntriesConfirm ($IDs, $table, $columns=array(), $filterFunctions=array(), $extraValues=array(), $deleteNow=false, $idColumn='id', $userIdColumn='userid') {
969         // All valid entries? (We hope so here!)
970         if ((is_array($IDs)) && (count($IDs) > 0) && (count($columns) == count($filterFunctions)) && (count($columns) == count($extraValues))) {
971                 // Shall we delete here or list for deletion?
972                 if ($deleteNow === true) {
973                         // The base SQL command:
974                         $sql = "DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_%s` WHERE %s IN (%s)";
975
976                         // Delete them all
977                         $idList = '';
978                         foreach ($IDs as $id => $sel) {
979                                 // Is there a userid?
980                                 if (isPostRequestElementSet('userid_raw', $id)) {
981                                         // Load all data from that id
982                                         $result = SQL_QUERY_ESC("SELECT * FROM `{?_MYSQL_PREFIX?}_%s` WHERE %s=%s LIMIT 1",
983                                         array($table, $idColumn, $id), __FUNCTION__, __LINE__);
984
985                                         // Fetch the data
986                                         $content = SQL_FETCHARRAY($result);
987
988                                         // Free the result
989                                         SQL_FREERESULT($result);
990
991                                         // Send "build mails" out
992                                         sendAdminBuildMails('del', $table, $content, $id);
993                                 } // END - if
994
995                                 // Add id number
996                                 $idList .= $id . ',';
997                         } // END - foreach
998
999                         // Run the query
1000                         SQL_QUERY($sql, array($table, $idColumn, substr($idList, 0, -1)), __FUNCTION__, __LINE__);
1001
1002                         // Was this fine?
1003                         if (SQL_AFFECTEDROWS() == count($IDs)) {
1004                                 // All deleted
1005                                 loadTemplate('admin_settings_saved', false, getMessage('ADMIN_ALL_ENTRIES_REMOVED'));
1006                         } else {
1007                                 // Some are still there :(
1008                                 loadTemplate('admin_settings_saved', false, sprintf(getMessage('ADMIN_SOME_ENTRIES_NOT_DELETED'), SQL_AFFECTEDROWS(), count($IDs)));
1009                         }
1010                 } else {
1011                         // List for deletion confirmation
1012                         adminListBuilder('del', $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn);
1013                 }
1014         } // END - if
1015 }
1016
1017 // Edit rows by given ID numbers
1018 function adminEditEntriesConfirm ($IDs, $table, $columns=array(), $filterFunctions=array(), $extraValues=array(), $editNow=false, $idColumn='id', $userIdColumn='userid') {
1019         // All valid entries? (We hope so here!)
1020         if ((is_array($IDs)) && (count($IDs) > 0) && (count($columns) == count($filterFunctions)) && (count($columns) == count($extraValues))) {
1021                 // Shall we change here or list for editing?
1022                 if ($editNow === true) {
1023                         // Change them all
1024                         $affected = 0;
1025                         foreach ($IDs as $id => $sel) {
1026                                 // Prepare content array (new values)
1027                                 $content = array();
1028
1029                                 // Prepare SQL for this row
1030                                 $sql = sprintf("UPDATE `{?_MYSQL_PREFIX?}_%s` SET",
1031                                         SQL_ESCAPE($table)
1032                                 );
1033                                 foreach (postRequestArray() as $key => $entries) {
1034                                         // Skip raw userid which is always invalid
1035                                         if ($key == 'userid_raw') {
1036                                                 // Continue with next field
1037                                                 continue;
1038                                         } // END - if
1039
1040                                         // Is entries an array?
1041                                         if (($key != $idColumn) && (is_array($entries)) && (isset($entries[$id]))) {
1042                                                 // Add this entry to content
1043                                                 $content[$key] = $entries[$id];
1044
1045                                                 // Send data through the filter function if found
1046                                                 if ((isset($filterFunctions[$key])) && (isset($extraValues[$key]))) {
1047                                                         // Filter function set!
1048                                                         $entries[$id] = handleExtraValues($filterFunctions[$key], $entries[$id], $extraValues[$key]);
1049                                                 } // END - if
1050
1051                                                 // Then add this value
1052                                                 $sql .= sprintf(" `%s`='%s',",
1053                                                 SQL_ESCAPE($key),
1054                                                 SQL_ESCAPE($entries[$id])
1055                                                 );
1056                                         } elseif (($key != $idColumn) && (!is_array($entries))) {
1057                                                 // Add normal entries as well!
1058                                                 $content[$key] =  $entries;
1059                                         }
1060
1061                                         // Do we have an URL?
1062                                         if ($key == 'url') {
1063                                                 // Then add a framekiller test as well
1064                                                 $content['frametester'] = generateFrametesterUrl($content[$key]);
1065                                         } // END - if
1066                                 } // END - foreach
1067
1068                                 // Finish SQL command
1069                                 $sql = substr($sql, 0, -1) . " WHERE `".$idColumn."`=".bigintval($id)." LIMIT 1";
1070
1071                                 // Run this query
1072                                 SQL_QUERY($sql, __FUNCTION__, __LINE__);
1073
1074                                 // Add affected rows
1075                                 $affected += SQL_AFFECTEDROWS();
1076
1077                                 // Load all data from that id
1078                                 $result = SQL_QUERY_ESC("SELECT * FROM `{?_MYSQL_PREFIX?}_%s` WHERE `%s`=%s LIMIT 1",
1079                                         array($table, $idColumn, $id), __FUNCTION__, __LINE__);
1080
1081                                 // Fetch the data and merge it into $content
1082                                 $content = merge_array($content, SQL_FETCHARRAY($result));
1083
1084                                 // Free the result
1085                                 SQL_FREERESULT($result);
1086
1087                                 // Send "build mails" out
1088                                 sendAdminBuildMails('edit', $table, $content, $id);
1089                         } // END - foreach
1090
1091                         // Was this fine?
1092                         if ($affected == count($IDs)) {
1093                                 // All deleted
1094                                 loadTemplate('admin_settings_saved', false, getMessage('ADMIN_ALL_ENTRIES_EDITED'));
1095                         } else {
1096                                 // Some are still there :(
1097                                 loadTemplate('admin_settings_saved', false, sprintf(getMessage('ADMIN_SOME_ENTRIES_NOT_EDITED'), $affected, count($IDs)));
1098                         }
1099                 } else {
1100                         // List for editing
1101                         adminListBuilder('edit', $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn);
1102                 }
1103         } // END - if
1104 }
1105
1106 // Un-/lock rows by given ID numbers
1107 function adminLockEntriesConfirm ($IDs, $table, $columns=array(), $filterFunctions=array(), $extraValues=array(), $statusArray=array(), $lockNow=false, $idColumn='id', $userIdColumn='userid') {
1108         // All valid entries? (We hope so here!)
1109         if ((is_array($IDs)) && (count($IDs) > 0) && (count($columns) == count($filterFunctions)) && (count($columns) == count($extraValues)) && (($lockNow === false) || (count($statusArray) == 1))) {
1110                 // Shall we un-/lock here or list for locking?
1111                 if ($lockNow === true) {
1112                         // Un-/lock entries
1113                         adminBuilderStatusHandler("lock", $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn, $statusArray);
1114                 } else {
1115                         // List for editing
1116                         adminListBuilder("lock", $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn);
1117                 }
1118         } // END - if
1119 }
1120
1121 // Undelete rows by given ID numbers
1122 function adminUndeleteEntriesConfirm ($IDs, $table, $columns=array(), $filterFunctions=array(), $extraValues=array(), $statusArray=array(), $undeleteNow=false, $idColumn='id', $userIdColumn='userid') {
1123         // All valid entries? (We hope so here!)
1124         if ((is_array($IDs)) && (count($IDs) > 0) && (count($columns) == count($filterFunctions)) && (count($columns) == count($extraValues)) && (($undeleteNow === false) || (count($statusArray) == 1))) {
1125                 // Shall we un-/lock here or list for locking?
1126                 if ($undeleteNow === true) {
1127                         // Undelete entries
1128                         adminBuilderStatusHandler("undelete", $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn, $statusArray);
1129                 } else {
1130                         // List for editing
1131                         adminListBuilder("undelete", $IDs, $table, $columns, $filterFunctions, $extraValues, $idColumn, $userIdColumn);
1132                 }
1133         } // END - if
1134 }
1135
1136 // Checks proxy settins by fetching check-updates3.php from www.mxchange.org
1137 function adminTestProxySettings ($settingsArray) {
1138         // Set temporary the new settings
1139         mergeConfig($settingsArray);
1140
1141         // Now get the test URL
1142         $content = sendGetRequest('check-updates3.php');
1143
1144         // Is the first line with "200 OK"?
1145         $valid = (strpos($content[0], '200 OK') !== false);
1146
1147         // Return result
1148         return $valid;
1149 }
1150
1151 // Sends out a link to the given email adress so the admin can reset his/her password
1152 function sendAdminPasswordResetLink ($email) {
1153         // Init output
1154         $OUT = '';
1155
1156         // Compile out security characters (must be for looking up!)
1157         $email = compileCode($email);
1158
1159         // Look up administator login
1160         $result = SQL_QUERY_ESC("SELECT `id`, `login`, `password` FROM `{?_MYSQL_PREFIX?}_admins` WHERE `email`='%s' LIMIT 1",
1161                 array($email), __FUNCTION__, __LINE__);
1162
1163         // Is there an account?
1164         if (SQL_NUMROWS($result) == 0) {
1165                 // No account found!
1166                 return getMessage('ADMIN_NO_LOGIN_WITH_EMAIL');
1167         } // END - if
1168
1169         // Load all data
1170         $content = SQL_FETCHARRAY($result);
1171
1172         // Free result
1173         SQL_FREERESULT($result);
1174
1175         // Generate hash for reset link
1176         $content['hash'] = generateHash(getConfig('URL').':'.$content['id'].':'.$content['login'].':'.$content['password'], substr($content['password'], 10));
1177
1178         // Remove some data
1179         unset($content['id']);
1180         unset($content['password']);
1181
1182         // Prepare email
1183         $mailText = loadEmailTemplate('admin_reset_password', $content);
1184
1185         // Send it out
1186         sendEmail($email, getMessage('ADMIN_RESET_PASS_LINK_SUBJ'), $mailText);
1187
1188         // Prepare output
1189         return getMessage('ADMIN_RESET_LINK_SENT');
1190 }
1191
1192 // Validate hash and login for password reset
1193 function adminResetValidateHashLogin ($hash, $login) {
1194         // By default nothing validates... ;)
1195         $valid = false;
1196
1197         // Compile the login for lookup
1198         $login = compileCode($login);
1199
1200         // Then try to find that user
1201         $result = SQL_QUERY_ESC("SELECT `id`, `password`, `email` FROM `{?_MYSQL_PREFIX?}_admins` WHERE `login`='%s' LIMIT 1",
1202         array($login), __FUNCTION__, __LINE__);
1203
1204         // Is an account here?
1205         if (SQL_NUMROWS($result) == 1) {
1206                 // Load all data
1207                 $content = SQL_FETCHARRAY($result);
1208
1209                 // Generate hash again
1210                 $hashFromData = generateHash(getConfig('URL').':'.$content['id'].':'.$login.':'.$content['password'], substr($content['password'], 10));
1211
1212                 // Does both match?
1213                 $valid = ($hash == $hashFromData);
1214         } // END - if
1215
1216         // Free result
1217         SQL_FREERESULT($result);
1218
1219         // Return result
1220         return $valid;
1221 }
1222
1223 // Reset the password for the login. Do NOT call this function without calling above function first!
1224 function doResetAdminPassword ($login, $password) {
1225         // Init hash
1226         $passHash = '';
1227
1228         // Now check if we have sql_patches installed
1229         if (isExtensionInstalledAndNewer('sql_patches', '0.3.6')) {
1230                 // Use new way of hashing
1231                 $passHash = generateHash($password);
1232         } else {
1233                 // Old MD5 method
1234                 $passHash = md5($password);
1235         }
1236
1237         // Update database
1238         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_admins` SET `password`='%s' WHERE `login`='%s' LIMIT 1",
1239                 array($passHash, $login), __FUNCTION__, __LINE__);
1240
1241         // Run filters
1242         runFilterChain('post_admin_reset_pass', array('login' => $login, 'hash' => $passHash));
1243
1244         // Return output
1245         return getMessage('ADMIN_PASSWORD_RESET_DONE');
1246 }
1247
1248 // Solves a task by given id number
1249 function adminSolveTask ($id) {
1250         // Update the task data
1251         adminUpdateTaskData($id, 'status', 'SOLVED');
1252 }
1253
1254 // Marks a given task as deleted
1255 function adminDeleteTask ($id) {
1256         // Update the task data
1257         adminUpdateTaskData($id, 'status', 'DELETED');
1258 }
1259
1260 // Function to update task data
1261 function adminUpdateTaskData ($id, $row, $data) {
1262         // Should be admin!
1263         if (!isAdmin()) {
1264                 // Not an admin so redirect better
1265                 redirectToUrl('index.php');
1266         } // END - if
1267
1268         // Is the id not set, then we need a backtrace here... :(
1269         if ($id <= 0) {
1270                 // Initiate backtrace
1271                 debug_report_bug(sprintf("id is invalid: %s. row=%s, data=%s",
1272                         $id,
1273                         $row,
1274                         $data
1275                 ));
1276         } // END - if
1277
1278         // Update the task
1279         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_task_system` SET `%s`='%s' WHERE `id`=%s LIMIT 1",
1280                 array($row, $data, bigintval($id)), __FUNCTION__, __LINE__);
1281 }
1282
1283 // Checks wether if the admin menu has entries
1284 function ifAdminMenuHasEntries ($action) {
1285         return (
1286                 ((
1287                         isset($GLOBALS['admin_menu_has_entries'][$action])
1288                 ) && (
1289                         $GLOBALS['admin_menu_has_entries'][$action] === true
1290                 )) || (
1291                         $action == 'login'
1292                 )
1293         );
1294 }
1295
1296 // Setter for 'admin_menu_has_entries'
1297 function setAdminMenuHasEntries ($action, $hasEntries) {
1298         $GLOBALS['admin_menu_has_entries'][$action] = (bool) $hasEntries;
1299 }
1300
1301 // Creates a link to the user's admin-profile
1302 function adminCreateUserLink ($userid) {
1303         // Is the userid set correctly?
1304         if ($userid > 0) {
1305                 // Create a link to that profile
1306                 return '{?URL?}/modules.php?module=admin&amp;what=list_user&amp;userid='.bigintval($userid);
1307         } // END - if
1308
1309         // Return a link to the user list
1310         return '{?URL?}/modules.php?module=admin&amp;what=list_user';
1311 }
1312
1313 // [EOF]
1314 ?>