<?php
/************************************************************************
 * MXChange v0.2.1                                    Start: 06/30/2003 *
 * ===============                              Last change: 11/27/2004 *
 *                                                                      *
 * -------------------------------------------------------------------- *
 * File              : admins_functions.php                             *
 * -------------------------------------------------------------------- *
 * Short description : Functions for the admins extension               *
 * -------------------------------------------------------------------- *
 * Kurzbeschreibung  : Funktionen fuer die admins-Erweiterung           *
 * -------------------------------------------------------------------- *
 *                                                                      *
 * -------------------------------------------------------------------- *
 * Copyright (c) 2003 - 2008 by Roland Haeder                           *
 * For more information visit: http://www.mxchange.org                  *
 *                                                                      *
 * This program is free software; you can redistribute it and/or modify *
 * it under the terms of the GNU General Public License as published by *
 * the Free Software Foundation; either version 2 of the License, or    *
 * (at your option) any later version.                                  *
 *                                                                      *
 * This program is distributed in the hope that it will be useful,      *
 * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
 * GNU General Public License for more details.                         *
 *                                                                      *
 * You should have received a copy of the GNU General Public License    *
 * along with this program; if not, write to the Free Software          *
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
 * MA  02110-1301  USA                                                  *
 ************************************************************************/

// Some security stuff...
if (!defined('__SECURITY')) {
	$INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
	require($INC);
}

// Check ACL for menu combination
function ADMINS_CHECK_ACL($act, $wht) {
	// If action is login or logout allow allways!
	$default = "allow";
	if (($act == "login") || ($act == "logout")) return true;

	// Default is deny
	$ret = false;

	// Get admin's ID
	$aid = GET_CURRENT_ADMIN_ID();

	// Get admin's defult access right
	$default = GET_ADMIN_DEFAULT_ACL($aid);

	if (!empty($wht)) {
		// Check for parent menu:
		// First get it's action value
		$parent_action = GET_ACTION("admin", $wht);

		// Check with this function...
		$parent = ADMINS_CHECK_ACL($parent_action, "");
	} else {
		// Anything else is true!
		$parent = false;
	}

	// Shall I test for a main or sub menu? (action or what?)
	$lines = 0; $acl_mode = "failed";
	if (GET_EXT_VERSION("cache") >= "0.1.2") {
		// Load only from array when there are lines!
		if ((isset($GLOBALS['cache_array']['admin_acls'])) && (is_array($GLOBALS['cache_array']['admin_acls'])) && (count($GLOBALS['cache_array']['admin_acls']) > 0)) {
			// Load ACL from array
			foreach ($GLOBALS['cache_array']['admin_acls']['admin_id'] as $id => $aid_acls) {
				if ($aid == $aid_acls) {
					// Okay, one line was found!
					if ((!empty($act)) && ($GLOBALS['cache_array']['admin_acls']['action_menu'][$id] == $act)) {
						// Main menu line found
						$acl_mode = $GLOBALS['cache_array']['admin_acls']['access_mode'][$id];
						$lines = 1;
					}
					 elseif ((!empty($wht)) && ($GLOBALS['cache_array']['admin_acls']['what_menu'][$id] == $wht)) {
						// Check sub menu
						$acl_mode = $GLOBALS['cache_array']['admin_acls']['access_mode'][$id];
						$lines = 1;
					}
					if ($lines == 1) {
						// Count cache hits
						incrementConfigEntry('cache_hits');
						break;
					}
				}
			}

			// No ACL found?
			if ($acl_mode == "failed") {
				$acl_mode = "";
				$lines = 0;
			}
		} else {
			// No lines here
			$lines = 0;
		}
	} else {
		// Old version, so load it from database
		if (!empty($act))
		{
			// Main menu
			$result = SQL_QUERY_ESC("SELECT access_mode FROM `{!_MYSQL_PREFIX!}_admins_acls` WHERE admin_id=%s AND action_menu='%s' LIMIT 1",
			 array(bigintval($aid), $act), __FILE__, __LINE__);
		} elseif (!empty($wht)) {
			// Sub menu
			$result = SQL_QUERY_ESC("SELECT access_mode FROM `{!_MYSQL_PREFIX!}_admins_acls` WHERE admin_id=%s AND what_menu='%s' LIMIT 1",
			 array(bigintval($aid), $wht), __FILE__, __LINE__);
		}

		// Get number of lines
		$lines = SQL_NUMROWS($result);

		// Load ACL
		list($acl_mode) = SQL_FETCHROW($result);
		SQL_FREERESULT($result);
	}

	// Check ACL and (maybe) allow
	if ((($default == "allow") && ($lines == 0)) || (($default == "deny") && ($lines == "1") && ($acl_mode == "allow")) || (($lines == 0) && ($parent))) $ret = true;

	// Return value
	return $ret;
}

// Create email link to admins's account
function ADMINS_CREATE_EMAIL_LINK ($email, $mod="admin") {
	$locked = " AND `status`='CONFIRMED'";
	if (IS_ADMIN()) $locked = "";
	if (strpos("@", $email) > 0) {
		// Create email link
		$result = SQL_QUERY_ESC("SELECT id
FROM `{!_MYSQL_PREFIX!}_admins`
WHERE email='%s'".$locked." LIMIT 1",
 array($email), __FILE__, __LINE__);

 		// Is there an entry?
		if (SQL_NUMROWS($result) == 1) {
			// Load userid
			list($uid) = SQL_FETCHROW($result);

			// Rewrite email address to contact link
			$email = "{!URL!}/modules.php?module=".$mod."&amp;what=user_contct&amp;u_id=".bigintval($uid);
		}

		// Free memory
		SQL_FREERESULT($result);
	} elseif (bigintval($email) > 0) {
		// Direct ID given
		$email = "{!URL!}/modules.php?module=".$mod."&amp;what=admins_contct&amp;admin=".bigintval($email);
	}

	// Return rewritten (?) email address
	return $email;
}

// Change a lot admin account
function ADMINS_CHANGE_ADMIN_ACCOUNT($POST) {
	// Begin the update
	$cache_update = 0;
	foreach ($POST['login'] as $id => $login) {
		// Secure ID number
		$id = bigintval($id);

		// When both passwords match update admin account
		if ($POST['pass1'][$id] == $POST['pass2'][$id]) {
			// Save only when both passwords are the same (also when they are empty)
			$ADD = ""; $cache_update = "1";

			// Generate hash
			$hash = generateHash($POST['pass1'][$id]);

			// Save password when set
			if (!empty($POST['pass1'][$id])) $ADD = sprintf(", password='%s'", SQL_ESCAPE($hash));

			// Get admin's ID
			$aid = GET_CURRENT_ADMIN_ID();
			$salt = substr(GET_ADMIN_HASH($aid), 0, -40);

			// Rewrite cookie when it's own account
			if ($aid == $id) {
				// Set timeout cookie
				set_session('admin_last', time());

				if ($login != get_session('admin_login')) {
					// Update login cookie
					set_session('admin_login', $login);

					// Update password cookie as well?
					if (!empty($ADD)) set_session('admin_md5', $hash);
				} elseif (generateHash($POST['pass1'][$id], $salt) != get_session('admin_md5')) {
					// Update password cookie
					set_session('admin_md5', $hash);
				}
			} // END - if

			// Get default ACL from admin to check if we can allow him to change the default ACL
			$default = GET_ADMIN_DEFAULT_ACL(GET_CURRENT_ADMIN_ID());

			// Update admin account
			if ($default == "allow") {
				// Allow changing default ACL
				SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_admins` SET
login='%s'".$ADD.",
email='%s',
default_acl='%s',
la_mode='%s'
WHERE id=%s LIMIT 1",
					array(
						$login,
						$POST['email'][$id],
						$POST['mode'][$id],
						$POST['la_mode'][$id],
						$id
					), __FILE__, __LINE__);
			} else {
				// Do not allow it here
				SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_admins` SET
login='%s'".$ADD.",
email='%s',
la_mode='%s'
WHERE id=%s LIMIT 1",
					array(
						$login,
						$POST['email'][$id],
						$POST['la_mode'][$id],
						$id
					), __FILE__, __LINE__);
			}

			// Purge cache
			CACHE_PURGE_ADMIN_MENU($id);

			// Admin account saved
			$MSG = ADMIN_ACCOUNT_SAVED;
		} else {
			// Passwords did not match
			$MSG = ADMINS_ERROR_PASS_MISMATCH;
		}

		// Display message
		if (!empty($MSG)) {
			LOAD_TEMPLATE("admin_settings_saved", false, $MSG);
		}
	}

	// Remove cache file
	RUN_FILTER('post_admin_edited', $_POST);
}

// Make admin accounts editable
function ADMINS_EDIT_ADMIN_ACCOUNTS ($POST) {
	// "Resolve" current's admin access mode
	$currMode = GET_ADMIN_DEFAULT_ACL(GET_CURRENT_ADMIN_ID());

	// Begin the edit loop
	$SW = 2; $OUT = "";
	foreach ($POST['sel'] as $id => $sel) {
		// Secure ID number
		$id = bigintval($id);

		// Get the admin's data
		$result = SQL_QUERY_ESC("SELECT login, email, default_acl AS mode, la_mode FROM `{!_MYSQL_PREFIX!}_admins` WHERE id=%s LIMIT 1",
			array($id), __FILE__, __LINE__);
		if ((SQL_NUMROWS($result) == 1) && ($sel == 1)) {
			// Entry found
			$content = SQL_FETCHARRAY($result);
			SQL_FREERESULT($result);

			// Prepare some more data for the template
			$content['sw'] = $SW;
			$content['id'] = $id;

			// Shall we allow changing default ACL?
			if ($currMode == "allow") {
				// Allow chaning it
				$content['mode']    = ADD_OPTION_LINES("/ARRAY/", array("allow", "deny"), array(constant('ADMINS_ALLOW_MODE'), constant('ADMINS_DENY_MODE')), $content['mode']);
			} else {
				// Don't allow it
				$content['mode'] = "&nbsp;";
			}
			$content['la_mode'] = ADD_OPTION_LINES("/ARRAY/", array("global", "OLD", "NEW"), array(ADMINS_GLOBAL_LA_SETTING, ADMINS_OLD_LA_SETTING, ADMINS_NEW_LA_SETTING), $content['la_mode']);

			// Load row template and switch color
			$OUT .= LOAD_TEMPLATE("admin_edit_admins_row", true, $content);
			$SW = 3 - $SW;
		}
	}
	define('__ADMINS_ROWS', $OUT);

	// Load template
	LOAD_TEMPLATE("admin_edit_admins");
}

// Delete given admin accounts
function ADMINS_DELETE_ADMIN_ACCOUNTS ($POST) {
	// Check if this account is the last one which cannot be deleted...
	$result_main = SQL_QUERY("SELECT id FROM `{!_MYSQL_PREFIX!}_admins`", __FILE__, __LINE__);
	$accounts = SQL_NUMROWS($result_main);
	SQL_FREERESULT($result_main);
	if ($accounts > 1) {
		// Delete accounts
		$SW = 2; $OUT = "";
		foreach ($POST['sel'] as $id => $sel) {
			// Secure ID number
			$id = bigintval($id);

			// Get the admin's data
			$result = SQL_QUERY_ESC("SELECT login, email, default_acl AS mode, la_mode FROM `{!_MYSQL_PREFIX!}_admins` WHERE id=%s LIMIT 1",
			 array($id), __FILE__, __LINE__);
			if (SQL_NUMROWS($result) == 1) {
				// Entry found
				$content = SQL_FETCHARRAY($result);
				SQL_FREERESULT($result);
				$content['mode'] = constant('ADMINS_'.strtoupper($content['mode']).'_MODE');
				$content['la_mode'] = constant('ADMINS_'.strtoupper($content['la_mode']).'_LA_SETTING');

				// Prepare some more data
				$content['sw'] = $SW;
				$content['id'] = $id;

				// Load row template and switch color
				$OUT .= LOAD_TEMPLATE("admin_del_admins_row", true, $content);
				$SW = 3 - $SW;
			}
		}
		define('__ADMINS_ROWS', $OUT);

		// Load template
		LOAD_TEMPLATE("admin_del_admins");
	} else {
		// Cannot delete last account!
		LOAD_TEMPLATE("admin_settings_saved", false, getMessage('ADMIN_ADMINS_CANNOT_DELETE_LAST'));
	}
}

// Remove the given accounts
function ADMINS_REMOVE_ADMIN_ACCOUNTS ($POST) {
	// Begin removal
	$cache_update = 0;
	foreach ($POST['sel'] as $id => $del) {
		// Secure ID number
		$id = bigintval($id);

		// Delete only when it's not your own account!
		if (($del == 1) && (GET_CURRENT_ADMIN_ID() != $id)) {
			// Rewrite his tasks to all admins
			SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_task_system` SET assigned_admin=0 WHERE assigned_admin=%s",
			 array($id), __FILE__, __LINE__);

			// Remove account
			SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{!_MYSQL_PREFIX!}_admins` WHERE id=%s LIMIT 1",
				array($id), __FILE__, __LINE__);

			// Purge cache
			CACHE_PURGE_ADMIN_MENU($id);
			$cache_update = "1";
		}
	}

	// Remove cache if cache system is activated
	RUN_FILTER('post_admin_deleted', $_POST);
}

// List all admin accounts
function ADMINS_LIST_ADMIN_ACCOUNTS() {
	// Select all admin accounts
	$result = SQL_QUERY("SELECT id, login, email, default_acl AS mode, la_mode FROM `{!_MYSQL_PREFIX!}_admins` ORDER BY login ASC", __FILE__, __LINE__);
	$SW = 2; $OUT = "";
	while ($content = SQL_FETCHARRAY($result)) {
		// Compile some variables
		$content['mode'] = constant('ADMINS_'.strtoupper($content['mode']).'_MODE');
		$content['la_mode'] = constant('ADMINS_'.strtoupper($content['la_mode']).'_LA_SETTING');

		// Prepare some more data
		$content['sw']         = $SW;
		$content['email_link'] = CREATE_EMAIL_LINK($content['id']);

		// Load row template and switch color
		$OUT .= LOAD_TEMPLATE("admin_list_admins_row", true, $content);
		$SW = 3 - $SW;
	}

	// Free memory
	SQL_FREERESULT($result);
	define('__ADMINS_ROWS', $OUT);

	// Load template
	LOAD_TEMPLATE("admin_list_admins");
}

// Filter for adding extra data to the query
function FILTER_ADD_EXTRA_SQL_DATA ($ADD = "") {
	// Is the admins extension updated? (should be!)
	if (GET_EXT_VERSION("admins") >= "0.3")   $ADD .= ", default_acl AS def_acl";
	if (GET_EXT_VERSION("admins") >= "0.6.7") $ADD .= ", la_mode";
	if (GET_EXT_VERSION("admins") >= "0.7.2") $ADD .= ", login_failures, UNIX_TIMESTAMP(last_failure) AS last_failure";

	// Return it
	return $ADD;
}

//
?>