2 /************************************************************************
3 * MXChange v0.2.1 Start: 08/31/2003 *
4 * =============== Last change: 07/02/2004 *
6 * -------------------------------------------------------------------- *
8 * -------------------------------------------------------------------- *
9 * Short description : Administration module *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Administrationsmodul *
12 * -------------------------------------------------------------------- *
15 * $Tag:: 0.2.1-FINAL $ *
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 - 2008 by Roland Haeder *
21 * For more information visit: http://www.mxchange.org *
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. *
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. *
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, *
37 ************************************************************************/
39 // Some security stuff...
40 if (!defined('__SECURITY')) {
41 $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
46 LOAD_INC_ONCE("inc/modules/admin/admin-inc.php");
48 // Fix "deleted" cookies in PHP4 (PHP5 does remove them, PHP4 sets them to deleted!)
49 FIX_DELETED_COOKIES(array('admin_login', 'admin_md5', 'admin_last', 'admin_to'));
54 // Is no admin registered?
55 if (!isAdminRegistered()) {
56 // Admin is not registered so we have to inform the user
57 if ((IS_FORM_SENT()) && ((!REQUEST_ISSET_POST(('login'))) || (!REQUEST_ISSET_POST(('pass'))) || (strlen(REQUEST_POST('pass')) < 4))) {
58 REQUEST_SET_POST('ok', "***");
61 if ((IS_FORM_SENT()) && (REQUEST_POST('ok') != "***")) {
62 // Hash the password with the old function because we are here in install mode
63 $hashedPass = md5(REQUEST_POST('pass'));
65 // Kill maybe existing session variables
66 destroyAdminSession(false);
69 $ret = REGISTER_ADMIN(REQUEST_POST('login'), $hashedPass, constant('WEBMASTER'));
73 $done = changeDataInFile(constant('PATH')."inc/config.php", "ADMIN-SETUP", "define('admin_registered', ", ");", "true", 0);
75 // Registering is done
76 LOAD_URL("modules.php?module=admin&register=done");
78 $ret = getMessage('ADMIN_CANNOT_COMPLETE');
83 $ret = getMessage('ADMIN_REGISTER_FAILED');
88 if ($ret == "already") {
89 // Admin does already exists!
90 $ret = getMessage('ADMIN_LOGIN_ALREADY_REG');
92 // Any other kind will be logged and interpreted as 'done'
93 DEBUG_LOG(__FILE__, __LINE__, sprintf("Unknown return code %s from CHECK_ADMIN_LOGIN() and interpreted as 'done'!", $ret));
94 // @TODO Why is this set to 'done'?
98 // Admin still not registered?
99 if (!isAdminRegistered()) {
100 // Write to config that registration is done
101 changeDataInFile(constant('PATH')."inc/config.php", "ADMIN-SETUP", "define('admin_registered', ", ");", "true", 0);
103 // Load URL for login
104 LOAD_URL("modules.php?module=admin");
110 // Whas that action okay?
111 if ($ret != "done") {
112 // Fixes another "Notice"
113 if (REQUEST_ISSET_POST(('login'))) {
114 define('__LOGIN_VALUE', REQUEST_POST('login'));
116 define('__LOGIN_VALUE', "");
119 // Yet-another "Notice" fix
120 if ((IS_FORM_SENT()) && (REQUEST_POST('ok') == "***")) {
122 if (!REQUEST_ISSET_POST(('login'))) $MSG1 = getMessage('ADMIN_NO_LOGIN');
124 // An error comes back from registration?
125 if (!empty($ret)) $MSG1 = $ret;
127 // No password entered?
128 if (!REQUEST_ISSET_POST(('pass'))) $MSG2 = getMessage('ADMIN_NO_PASS');
130 // Or password too short?
131 if (strlen(REQUEST_POST('pass')) < 4) $MSG2 = getMessage('ADMIN_SHORT_PASS');
133 // Output error messages
134 define('__MSG_LOGIN', LOAD_TEMPLATE("admin_login_msg", true, $MSG1));
135 define('__MSG_PASS', LOAD_TEMPLATE("admin_login_msg", true, $MSG2));
138 $MSG1 = ""; $MSG2 = "";
140 // Reset values to nothing
141 define('__MSG_LOGIN', "");
142 define('__MSG_PASS' , "");
145 // Load register template
146 LOAD_TEMPLATE("admin_reg_form");
148 } elseif (REQUEST_ISSET_GET(('reset_pass'))) {
149 // Is the form submitted?
150 if ((REQUEST_ISSET_POST(('send_link'))) && (REQUEST_ISSET_POST(('email')))) {
151 // Try to send the link out
152 $OUT = ADMIN_SEND_PASSWORD_RESET_LINK(REQUEST_POST('email'));
155 LOAD_TEMPLATE("admin_settings_saved", false, $OUT);
156 } elseif (REQUEST_ISSET_GET(('hash'))) {
157 // Output form for hash validation
158 LOAD_TEMPLATE("admin_validate_reset_hash_form", false, REQUEST_GET('hash'));
159 } elseif ((REQUEST_ISSET_POST(('validate_hash'))) && (REQUEST_ISSET_POST(('login'))) && (REQUEST_ISSET_POST(('hash')))) {
160 // Validate the login data and hash
161 $valid = ADMIN_VALIDATE_RESET_LINK_HASH_LOGIN(REQUEST_POST('hash'), REQUEST_POST('login'));
164 if ($valid === true) {
165 // Prepare content first
167 'hash' => SQL_ESCAPE(REQUEST_POST('hash')),
168 'login' => SQL_ESCAPE(REQUEST_POST('login'))
171 // Validation okay so display form for final password change
172 LOAD_TEMPLATE("admin_reset_password_form", false, $content);
174 // Cannot validate the login data and hash
175 LOAD_TEMPLATE("admin_settings_saved", false, getMessage('ADMIN_VALIDATION_RESET_LOGIN_HASH_FAILED'));
177 } elseif ((REQUEST_ISSET_POST(('reset_pass'))) && (REQUEST_ISSET_POST(('hash'))) && (REQUEST_ISSET_POST(('login'))) && (REQUEST_ISSET_POST(('pass1'))) && (REQUEST_POST('pass1') == REQUEST_POST('pass2'))) {
178 // Okay, we shall the admin password here. So first revalidate the hash
179 if (ADMIN_VALIDATE_RESET_LINK_HASH_LOGIN(REQUEST_POST('hash'), REQUEST_POST('login'))) {
180 // Set the password now
181 $OUT = ADMIN_RESET_PASSWORD(REQUEST_POST('login'), REQUEST_POST('pass1'));
184 LOAD_TEMPLATE("admin_reset_pass_done", false, $OUT);
187 LOAD_TEMPLATE("admin_settings_saved", false, getMessage('ADMIN_VALIDATION_RESET_LOGIN_HASH_FAILED2'));
190 // Output reset password form
191 LOAD_TEMPLATE("admin_send_reset_link");
193 } elseif ((!isSessionVariableSet('admin_login')) || (!isSessionVariableSet('admin_md5')) || (!isSessionVariableSet('admin_last')) || (!isSessionVariableSet('admin_to')) || ((get_session('admin_last') + bigintval(get_session('admin_to')) * 3600 * 24) < time())) {
194 // At leat one administrator account was created
195 if ((isSessionVariableSet('admin_login')) && (isSessionVariableSet('admin_md5')) && (isSessionVariableSet('admin_last')) && (isSessionVariableSet('admin_to'))) {
196 // Timeout for last login, we have to logout first!
197 LOAD_URL("modules.php?module=admin&logout=1");
200 if (REQUEST_ISSET_GET(('register'))) {
201 // Registration of first admin is done
202 if (REQUEST_GET('register') == "done") LOAD_TEMPLATE("admin_settings_saved", false, getMessage('ADMIN_REGISTER_DONE'));
205 // Check if the admin has submitted data or not
206 if ((IS_FORM_SENT()) && ((!REQUEST_ISSET_POST(('login'))) || (!REQUEST_ISSET_POST(('pass'))) || (strlen(REQUEST_POST('pass')) < 4))) {
207 REQUEST_SET_POST('ok', "***");
210 if ((IS_FORM_SENT()) && (REQUEST_POST('ok') != "***")) {
211 // All required data was entered so we check his account
212 $ret = CHECK_ADMIN_LOGIN(REQUEST_POST('login'), REQUEST_POST('pass'));
214 // Which status do we have?
217 case "done": // Admin and password are okay, so we log in now
218 // Construct URL and redirect
219 $URL = "modules.php?module=admin&";
221 // Rewrite overview module
222 if ($GLOBALS['what'] == "overview") {
223 $GLOBALS['action'] = GET_ACTION($GLOBALS['module'], $GLOBALS['what']);
227 if (!empty($GLOBALS['what'])) $URL .= "what=".$GLOBALS['what'];
228 elseif (!empty($GLOBALS['action'])) $URL .= "action=".$GLOBALS['action'];
229 elseif (REQUEST_ISSET_GET(('area'))) $URL .= "area=".REQUEST_GET('area');
235 case "404": // Administrator login not found
236 REQUEST_SET_POST('ok', $ret);
237 $ret = getMessage('ADMIN_NOT_FOUND');
238 destroyAdminSession();
241 case "pass": // Wrong password
242 REQUEST_SET_POST('ok', $ret);
243 $ret = "{--WRONG_PASS--} [<a href=\"{!URL!}/modules.php?module=admin&reset_pass=1\">{--ADMIN_RESET_PASS--}</a>]\n";
244 destroyAdminSession();
247 default: // Others will be logged
248 DEBUG_LOG(__FILE__, __LINE__, sprintf("Unknown return code %s from CHECK_ADMIN_LOGIN()", $ret));
254 if ($ret != "done") {
255 if (REQUEST_ISSET_POST(('login'))) {
256 define('__LOGIN_VALUE', REQUEST_POST('login'));
258 define('__LOGIN_VALUE', "");
261 if (IS_FORM_SENT()) {
262 // Set messages to zero
263 $MSG1 = ""; $MSG2 = "";
266 if (!REQUEST_ISSET_POST(('login'))) $MSG1 = getMessage('ADMIN_NO_LOGIN');
268 // An error comes back from login?
269 if ((!empty($ret)) && (REQUEST_POST('ok') == "404")) $MSG1 = $ret;
271 // No password entered?
272 if (!REQUEST_ISSET_POST(('pass'))) $MSG2 = getMessage('ADMIN_NO_PASS');
274 // Or password too short?
275 if (strlen(REQUEST_POST('pass')) < 4) $MSG2 = getMessage('ADMIN_SHORT_PASS');
277 // An error comes back from login?
278 if ((!empty($ret)) && (REQUEST_POST('ok') == "pass")) $MSG2 = $ret;
280 // Load message template
281 define('__MSG_LOGIN', LOAD_TEMPLATE("admin_login_msg", true, $MSG1));
282 define('__MSG_PASS' , LOAD_TEMPLATE("admin_login_msg", true, $MSG2));
285 $MSG1 = ""; $MSG2 = "";
287 // Set constants to empty for hiding them
288 define('__MSG_LOGIN', "");
289 define('__MSG_PASS' , "");
293 if (!empty($GLOBALS['what'])) {
294 // Restore old what value
295 $content = array('target' => "what", 'value' => $GLOBALS['what']);
296 } elseif (!empty($GLOBALS['action'])) {
297 if ($GLOBALS['action'] != "logout") {
298 // Restore old action value
299 $content = array('target' => "action", 'value' => $GLOBALS['action']);
301 // Set default values
302 $content = array('target' => "action", 'value' => "login");
304 } elseif (REQUEST_ISSET_GET(('area'))) {
305 // Restore old area value
306 $content = array('target' => "area", 'value' => REQUEST_GET('area'));
308 // Set default values
309 $content = array('target' => "action", 'value' => "login");
312 // Load login form template
313 LOAD_TEMPLATE("admin_login_form", false, $content);
315 } elseif (REQUEST_ISSET_GET(('logout'))) {
316 // Only try to remove cookies
317 if (destroyAdminSession()) {
318 // Load logout template
319 if (REQUEST_ISSET_GET(('register'))) {
321 $register = REQUEST_GET(('register'));
323 // Special logout redirect for installation of given extension
324 LOAD_TEMPLATE(sprintf("admin_logout_%s_install", $register));
325 } elseif (REQUEST_ISSET_GET(('remove'))) {
327 $remove = REQUEST_GET(('remove'));
329 // Special logout redirect for removal of given extension
330 LOAD_TEMPLATE(sprintf("admin_logout_%s_remove", $remove));
332 // Logged out normally
333 LOAD_TEMPLATE("admin_logout");
336 // Something went wrong here...
337 LOAD_TEMPLATE("admin_settings_saved", false, "<div class=\"admin_fatal\">{--ADMIN_LOGOUT_FAILED--}</div>");
340 addFatalMessage(__FILE__, __LINE__, getMessage('CANNOT_UNREG_SESS'));
343 // Maybe an Admin want's to login?
344 $ret = CHECK_ADMIN_COOKIES(get_session('admin_login'), get_session('admin_md5'));
348 // Check for access control line of current menu entry
349 $GLOBALS['acl_allow'] = runFilterChain('check_admin_acl');
351 // When type of admin menu is not set fallback to old menu system
352 if (!isConfigEntrySet('admin_menu')) setConfigEntry('admin_menu', "OLD");
354 // Check for version and switch between old menu system and new "intelligent menu system"
355 if ((ADMIN_CHECK_MENU_MODE() == "NEW") && (INCLUDE_READABLE("inc/modules/admin/lasys-inc.php"))) {
356 // Default area is the entrance, of course
359 // Check for similar URL variable
360 if (REQUEST_ISSET_GET(('area'))) $area = REQUEST_GET(('area'));
362 // Load "logical-area menu-system" file
363 LOAD_INC_ONCE("inc/modules/admin/lasys-inc.php");
365 // Create new-style menu system will "logical areas"
366 ADMIN_LOGICAL_AREA_SYSTEM($area, $act, $GLOBALS['what']);
368 // This little call constructs the whole default old and lacky menu system
370 ADMIN_DO_ACTION($GLOBALS['what']);
374 case "404": // Administrator login not found
375 REQUEST_SET_POST('ok', $ret);
376 destroyAdminSession();
377 addFatalMessage(__FILE__, __LINE__, getMessage('ADMIN_NOT_FOUND'));
380 case "pass": // Wrong password
381 REQUEST_SET_POST('ok', $ret);
382 destroyAdminSession();
383 addFatalMessage(__FILE__, __LINE__, getMessage('WRONG_PASS'));
386 default: // Others will be logged
387 DEBUG_LOG(__FILE__, __LINE__, sprintf("Unknown return code %s from CHECK_ADMIN_COOKIES()", $ret));