= '0.1.2') && (isset($GLOBALS['cache_array']['modules']['module'])) && (in_array($mod, $GLOBALS['cache_array']['modules']['module']))) {
// Load from cache
$name = $GLOBALS['cache_array']['modules']['title'][$mod];
// Update cache hits
incrementConfigEntry('cache_hits');
} elseif (!EXT_IS_ACTIVE('cache')) {
// Load from database
$result = SQL_QUERY_ESC("SELECT title FROM `{!_MYSQL_PREFIX!}_mod_reg` WHERE `module`='%s' LIMIT 1",
array($mod), __FUNCTION__, __LINE__);
list($name) = SQL_FETCHROW($result);
SQL_FREERESULT($result);
}
} // END - if
// Trim name
$name = trim($name);
// Still no luck or empty title?
if (empty($name)) {
// No name found
$name = sprintf("%s (%s)", getMessage('LANG_UNKNOWN_MODULE'), $mod);
if (SQL_NUMROWS($result) == 0) {
// Add module to database
$dummy = checkModulePermissions($mod);
} // END - if
} // END - if
// Return name
return $name;
}
// "Getter" for module description
function getModuleDescription ($mode, $wht, $column = 'what') {
// Fix empty 'what'
if (empty($wht)) {
$wht = 'welcome';
if (getConfig('index_home') != '') $wht = getConfig('index_home');
} // END - if
// Default is not found
$ret = '??? (' . $wht . ')';
// Look for title
$result = SQL_QUERY_ESC("SELECT title FROM `{!_MYSQL_PREFIX!}_%s_menu` WHERE %s='%s' LIMIT 1",
array($mode, $column, $wht), __FUNCTION__, __LINE__);
// Is there an entry?
if (SQL_NUMROWS($result) == 1) {
// Fetch the title
list($ret) = SQL_FETCHROW($result);
} // END - if
// Free result
SQL_FREERESULT($result);
return $ret;
}
// Check validity of a given module name (no file extension)
function checkModulePermissions ($mod) {
// Filter module name (names with low chars and underlines are fine!)
$mod = preg_replace("/[^a-z_]/", '', $mod);
// Check for prefix is a extension...
$modSplit = explode("_", $mod);
$extension = ''; $mod_chk = $mod;
//* DEBUG: */ echo __LINE__."*".count($modSplit)."*/".$mod."* ";
if (count($modSplit) == 2) {
// Okay, there is a seperator (_) in the name so is the first part a module?
//* DEBUG: */ echo __LINE__."*".$modSplit[0]."* ";
if (EXT_IS_ACTIVE($modSplit[0])) {
// The prefix is an extension's name, so let's set it
$extension = $modSplit[0]; $mod = $modSplit[1];
} // END - if
} // END - if
// Major error in module registry is the default
$ret = 'major';
// Check if script is installed if not return a 'done' to prevent some errors
if ((!isInstalled()) || (isInstalling()) || (!isAdminRegistered())) {
// Not installed or no admin registered or in installation phase
return 'done';
} // END - if
// Init variables
$locked = 'Y';
$hidden = 'N';
$admin = 'N';
$mem = 'N';
$found = false;
// Check if cache is latest version
if (GET_EXT_VERSION('cache') >= '0.1.2') {
// Is the cache there?
//* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'Using cache.');
if (!isset($GLOBALS['cache_array']['modules'])) {
// This happens when a new extension is registered while ext-cache is installed
$ret = 'cache_miss';
} // END - if
// Is the module cached?
if (isset($GLOBALS['cache_array']['modules']['locked'][$mod_chk])) {
// Check cache
//* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'Cache found.');
$locked = $GLOBALS['cache_array']['modules']['locked'][$mod_chk];
$hidden = $GLOBALS['cache_array']['modules']['hidden'][$mod_chk];
$admin = $GLOBALS['cache_array']['modules']['admin_only'][$mod_chk];
$mem = $GLOBALS['cache_array']['modules']['mem_only'][$mod_chk];
// Update cache hits
incrementConfigEntry('cache_hits');
$found = true;
} else {
// No, then we have to update it!
$ret = 'cache_miss';
}
} elseif (!EXT_IS_ACTIVE('cache')) {
// Check for module in database
//* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'Using database.');
$result = SQL_QUERY_ESC("SELECT `locked`, `hidden`, `admin_only`, `mem_only` FROM `{!_MYSQL_PREFIX!}_mod_reg` WHERE `module`='%s' LIMIT 1",
array($mod_chk), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Read data
//* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'Entry found.');
list($locked, $hidden, $admin, $mem) = SQL_FETCHROW($result);
$found = true;
} elseif (isDebugModeEnabled()) {
// Debug message only in debug-mode...
DEBUG_LOG(__FUNCTION__, __LINE__, 'Module ' . $mod_chk . ' not found!');
}
// Free result
SQL_FREERESULT($result);
}
//* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'ret=' . $ret);
// Is the module found?
if ($found === true) {
// Check returned values against current access permissions
//
// Admin access ----- Guest access ----- --- Guest or member? ---
if ((IS_ADMIN()) || (($locked == 'N') && ($admin == 'N') && (($mem == 'N') || (IS_MEMBER())))) {
// If you are admin you are welcome for everything!
$ret = 'done';
} elseif ($locked == 'Y') {
// Module is locked
$ret = 'locked';
} elseif (($mem == 'Y') && (!IS_MEMBER())) {
// You have to login first!
$ret = 'mem_only';
} elseif (($admin == 'Y') && (!IS_ADMIN())) {
// Only the Admin is allowed to enter this module!
$ret = 'admin_only';
} else {
// @TODO Nothing helped???
DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("ret=%s,locked=%s,admin=%s,mem=%s",
$ret,
$locked,
$admin,
$mem
));
}
} // END - if
// Still no luck or not found?
if (($found === false) && (!EXT_IS_ACTIVE('cache')) && ($ret != 'done')) {
// ----- Legacy module ----- ---- Module in base folder ---- --- Module with extension's name ---
if ((isFileReadable(sprintf("%sinc/modules/%s.php", constant('PATH'), $mod))) || (isFileReadable(sprintf("%s%s.php", constant('PATH'), $mod))) || (isFileReadable(sprintf("%s%s/%s.php", constant('PATH'), $extension, $mod)))) {
// Data is missing so we add it
if (GET_EXT_VERSION('sql_patches') >= '0.3.6') {
// Since 0.3.6 we have a has_menu column, this took me a half hour
// to find a loop here... *sigh*
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_mod_reg`
(`module`, `locked`, `hidden`, `mem_only`, `admin_only`, `has_menu`) VALUES
('%s','Y','N','N','N','N')", array($mod_chk), __FUNCTION__, __LINE__);
} else {
// Wrong/missing sql_patches!
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_mod_reg`
(`module`, `locked`, `hidden`, `mem_only`, `admin_only`) VALUES
('%s','Y','N','N','N')", array($mod_chk), __FUNCTION__, __LINE__);
}
// Everthing is fine?
if (SQL_AFFECTEDROWS() < 1) {
// Something bad happend!
return 'major';
} // END - if
// Destroy cache here
// @TODO Rewrite this to a filter
rebuildCacheFiles('modreg', 'modreg');
// And reload data
$ret = checkModulePermissions($mod_chk);
} else {
// Module not found we don't add it to the database
$ret = '404';
}
} elseif ($ret == 'cache_miss') {
// Rebuild the cache files
rebuildCacheFiles('modreg', 'modreg');
} elseif ($found === false) {
// Problem with module detected
DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Problem in module %s detected. ret=%s, locked=%s, hidden=%s, mem=%s, admin=%s",
$mod,
$ret,
$locked,
$hidden,
$mem,
$admin
));
}
// Return the value
//* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'ret=' . $ret);
return $ret;
}
// Add menu description pending on given file name (without path!)
function ADD_DESCR ($accessLevel, $FQFN, $return = false, $output = true) {
// Use only filename of the FQFN...
$file = basename($FQFN);
// Init variables
$LINK_ADD = '';
$OUT = '';
$AND = '';
// First we have to do some analysis...
if (substr($file, 0, 7) == 'action-') {
// This is an action file!
$type = 'action';
$search = substr($file, 7);
switch ($accessLevel) {
case 'admin':
$modCheck = 'admin';
break;
case 'sponsor':
case 'guest':
case 'member':
$modCheck = getModule();
break;
}
$AND = " AND (`what`='' OR `what` IS NULL)";
} elseif (substr($file, 0, 5) == 'what-') {
// This is an admin what file!
$type = 'what';
$search = substr($file, 5);
$AND = '';
switch ($accessLevel) {
case 'admin':
$modCheck = 'admin';
break;
case 'guest':
case 'member':
$modCheck = getModule();
if (!IS_ADMIN()) {
$AND = " AND `visible`='Y' AND `locked`='N'";
}
break;
}
$dummy = substr($search, 0, -4);
$AND .= " AND `action`='".getModeAction($accessLevel, $dummy)."'";
} elseif (($accessLevel == 'sponsor') || ($accessLevel == "engine")) {
// Sponsor / engine menu
$type = 'what';
$search = $file;
$modCheck = getModule();
$AND = '';
} else {
// Other
$type = 'menu';
$search = $file;
$modCheck = getModule();
$AND = '';
}
// Begin the navigation line
if ((!isset($GLOBALS['nav_depth'])) && (!$return)) {
$GLOBALS['nav_depth'] = 0;
$prefix = "
{--YOU_ARE_HERE--} Home";
} else {
if (!$return) $GLOBALS['nav_depth']++;
$prefix = '';
}
$prefix .= ' -> ';
// We need to remove .php and the end
if (substr($search, -4, 4) == '.php') {
// Remove the .php
$search = substr($search, 0, -4);
} // END - i
// Get the title from menu
$result = SQL_QUERY_ESC("SELECT title FROM `{!_MYSQL_PREFIX!}_%s_menu` WHERE %s='%s' ".$AND." LIMIT 1",
array($accessLevel, $type, $search), __FUNCTION__, __LINE__);
// Menu found?
if (SQL_NUMROWS($result) == 1) {
// Load title
list($ret) = SQL_FETCHROW($result);
// Shall we return it?
if ($return === true) {
// Return title
return $ret;
} elseif (((GET_EXT_VERSION('sql_patches') >= '0.2.3') && (getConfig('youre_here') == 'Y')) || ((IS_ADMIN()) && ($modCheck == 'admin'))) {
// Output HTML code
$OUT = $prefix . "" . $ret . "\n";
// Can we close the you-are-here navigation?
//* DEBUG: */ echo __LINE__."*".$type.'/'.getWhat()."* \n";
if (($type == 'what') || (($type == 'action') && ((!isWhatSet()) || (getWhat() == 'overview')))) {
//* DEBUG: */ echo __LINE__.'+'.$type."+ \n";
// Add closing div and br-tag
$OUT .= "
\n";
$GLOBALS['nav_depth'] = '0';
// Run the filter chain
$ret = runFilterChain('post_youhere_line', array('access_level' => $accessLevel, 'type' => $type, 'content' => ""));
$OUT .= $ret['content'];
} // END - if
}
} // END - if
// Free result
SQL_FREERESULT($result);
// Return or output HTML code?
if ($output) {
// Output HTML code here
OUTPUT_HTML($OUT);
} else {
// Return HTML code
return $OUT;
}
}
//
function ADD_MENU ($mode, $act, $wht) {
// Init some variables
$main_cnt = 0;
$AND = '';
$main_action = '';
$sub_what = '';
// is the menu action valid?
if (!isMenuActionValid($mode, $act, $wht, true)) {
return getCode('MENU_NOT_VALID');
} // END - if
// Non-admin shall not see all menus
if (!IS_ADMIN()) {
$AND = " AND `visible`='Y' AND `locked`='N'";
} // END - if
// Load SQL data and add the menu to the output stream...
$result_main = SQL_QUERY_ESC("SELECT `title`, `action` FROM `{!_MYSQL_PREFIX!}_%s_menu` WHERE (`what`='' OR `what` IS NULL)".$AND." ORDER BY `sort`",
array($mode), __FUNCTION__, __LINE__);
//* DEBUG: */ echo __LINE__.'/'.$main_cnt.'/'.$main_action.'/'.$sub_what.':'.getWhat()."* \n";
if (SQL_NUMROWS($result_main) > 0) {
OUTPUT_HTML("
");
// There are menus available, so we simply display them... :)
while ($content = SQL_FETCHARRAY($result_main)) {
//* DEBUG: */ echo __LINE__.'/'.$main_cnt.'/'.$content['action'].'/'.$sub_what.':'.getWhat()."* \n";
// Init variables
enableBlockMode(false);
$act = $content['action'];
// Load menu header template
LOAD_TEMPLATE($mode . '_menu_title', false, $content);
// Sub menu
$result_sub = SQL_QUERY_ESC("SELECT `title` AS sub_title, `what` AS sub_what FROM `{!_MYSQL_PREFIX!}_%s_menu` WHERE `action`='%s' AND `what` != '' AND `what` IS NOT NULL ".$AND." ORDER BY `sort`",
array($mode, $content['action']), __FUNCTION__, __LINE__);
// Get number of rows
$ctl = SQL_NUMROWS($result_sub);
// Do we have some entries?
if ($ctl > 0) {
// Init counter
$cnt = 0;
// Load all sub menus
while ($content2 = SQL_FETCHARRAY($result_sub)) {
// Merge both arrays in one
$content = merge_array($content, $content2);
// Init content
$OUT = '';
// Full file name for checking menu
//* DEBUG: */ echo __LINE__.":!!!!".$content['sub_what']."!!! \n";
$INC = sprintf("inc/modules/%s/what-%s.php", $mode, $content['sub_what']);
if (isIncludeReadable($INC)) {
if ((!empty($wht)) && (($wht == $content['sub_what']))) {
$OUT = "";
}
// Navigation link
$OUT .= "";
} else {
$OUT .= "";
}
// Menu title
$OUT .= getConfig('menu_blur_spacer') . $content['sub_title'];
if (isIncludeReadable($INC)) {
$OUT .= "";
} else {
$OUT .= "";
}
if ((!empty($wht)) && (($wht == $content['sub_what']))) {
$OUT .= "";
} // END - if
// Remember 'what' for next round and count it up
$wht = $content['sub_what']; $cnt++;
// Rewrite array
$content = array(
'menu' => $OUT,
'what' => $content['sub_what']
);
// Add regular menu row or bottom row?
if ($cnt < $ctl) {
LOAD_TEMPLATE($mode."_menu_row", false, $content);
} else {
LOAD_TEMPLATE($mode."_menu_bottom", false, $content);
}
}
} else {
// This is a menu block... ;-)
enableBlockMode();
// Load menu block
$INC_BLOCK = sprintf("inc/modules/%s/action-%s.php", $mode, $content['action']);
if (isFileReadable($INC_BLOCK)) {
// Load include file
if ((!EXT_IS_ACTIVE($content['action'])) || ($content['action'] == 'online')) OUTPUT_HTML("
");
} // END - if
}
// Free memory
SQL_FREERESULT($result_main);
// Close table
//* DEBUG: */ echo __LINE__.'/'.$main_cnt.'/'.$content['action'].'/'.$content['sub_what'].':'.getWhat()."* \n";
OUTPUT_HTML("
");
}
}
// Checks wether the current user is a member
function IS_MEMBER () {
// By default no member
$ret = false;
// Fix missing 'last' array, damn stupid code :(((
// @TODO Try to rewrite this to one or more functions
if ((!isset($GLOBALS['last'])) || (!is_array($GLOBALS['last']))) $GLOBALS['last'] = array();
// is the cache entry there?
if (isset($GLOBALS['is_member'])) {
// Then return it
return $GLOBALS['is_member'];
} // END - if
// Init global 'status'
$GLOBALS['status'] = false;
// Fix "deleted" cookies first
fixDeletedCookies(array('userid', 'u_hash'));
// Are cookies set?
if ((isUserIdSet()) && (isSessionVariableSet('u_hash'))) {
// Cookies are set with values, but are they valid?
$result = SQL_QUERY_ESC("SELECT password, status, last_module, last_online FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s LIMIT 1",
array(getUserId()), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Load data from cookies
list($password, $GLOBALS['status'], $mod, $onl) = SQL_FETCHROW($result);
// Validate password by created the difference of it and the secret key
$valPass = generatePassString($password);
// Transfer last module and online time
if ((!empty($mod)) && (empty($GLOBALS['last']['module']))) {
// @TODO Try to rewrite this to one or more functions
$GLOBALS['last']['module'] = $mod;
$GLOBALS['last']['online'] = $onl;
} // END - if
// So did we now have valid data and an unlocked user?
if (($GLOBALS['status'] == 'CONFIRMED') && ($valPass == getSession('u_hash'))) {
// Account is confirmed and all cookie data is valid so he is definely logged in! :-)
$ret = true;
} else {
// Maybe got locked etc.
//* DEBUG: */ echo __LINE__."!!! ";
destroyUserSession();
}
} else {
// Cookie data is invalid!
//* DEBUG: */ echo __LINE__."*** ";
destroyUserSession();
}
// Free memory
SQL_FREERESULT($result);
} else {
// Cookie data is invalid!
//* DEBUG: */ echo __LINE__."/// ";
destroyUserSession();
}
// Cache status
$GLOBALS['is_member'] = $ret;
// Return status
return $ret;
}
// This patched function will reduce many SELECT queries for the specified or current admin login
function IS_ADMIN ($admin = '') {
// Init variables
$ret = false; $passCookie = ''; $valPass = '';
//* DEBUG: */ echo __LINE__."ADMIN:".$admin." ";
// If admin login is not given take current from cookies...
if ((empty($admin)) && (isSessionVariableSet('admin_login')) && (isSessionVariableSet('admin_md5'))) {
// Get admin login and password from session/cookies
$admin = getSession('admin_login');
$passCookie = getSession('admin_md5');
}
//* DEBUG: */ echo __LINE__."ADMIN:".$admin.'/'.$passCookie." ";
// Search in array for entry
if (isset($GLOBALS['cache_array']['admin_hash'])) {
// Use cached string
$valPass = $GLOBALS['cache_array']['admin_hash'];
} elseif ((!empty($passCookie)) && (isset($GLOBALS['cache_array']['admins']['password'][$admin])) && (!empty($admin))) {
// Login data is valid or not?
$valPass = generatePassString($GLOBALS['cache_array']['admins']['password'][$admin]);
// Cache it away
$GLOBALS['cache_array']['admin_hash'] = $valPass;
// Count cache hits
incrementConfigEntry('cache_hits');
} elseif ((!empty($admin)) && ((!EXT_IS_ACTIVE('cache'))) || (!isset($GLOBALS['cache_array']['admins']['password'][$admin]))) {
// Search for admin
$result = SQL_QUERY_ESC("SELECT HIGH_PRIORITY password FROM `{!_MYSQL_PREFIX!}_admins` WHERE login='%s' LIMIT 1",
array($admin), __FUNCTION__, __LINE__);
// Is he admin?
$passDB = '';
if (SQL_NUMROWS($result) == 1) {
// Admin login was found so let's load password from DB
list($passDB) = SQL_FETCHROW($result);
// Temporary cache it
$GLOBALS['cache_array']['admins']['password'][$admin] = $passDB;
// Generate password hash
$valPass = generatePassString($passDB);
} // END - if
// Free memory
SQL_FREERESULT($result);
}
if (!empty($valPass)) {
// Check if password is valid
//* DEBUG: */ print __FUNCTION__."*".$valPass.'/'.$passCookie."* \n";
$ret = (($valPass == $passCookie) || ((strlen($valPass) == 32) && ($valPass == md5($passCookie))) || (($valPass == "*FAILED*") && (!EXT_IS_ACTIVE('cache'))));
} // END - if
// Return result of comparision
//* DEBUG: */ if (!$ret) echo __LINE__."OK! ";
return $ret;
}
// Generates a list of "max receiveable emails per day"
function addMaxReceiveList ($mode, $default = '', $return = false) {
$OUT = '';
$result = false;
switch ($mode) {
case 'guest':
// Guests (in the registration form) are not allowed to select 0 mails per day.
$result = SQL_QUERY("SELECT value, comment FROM `{!_MYSQL_PREFIX!}_max_receive` WHERE value > 0 ORDER BY value",
__FUNCTION__, __LINE__);
break;
case 'member':
// Members are allowed to set to zero mails per day (we will change this soon!)
$result = SQL_QUERY("SELECT value, comment FROM `{!_MYSQL_PREFIX!}_max_receive` ORDER BY value",
__FUNCTION__, __LINE__);
break;
default: // Invalid!
DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Invalid mode %s detected.", $mode));
break;
}
// Some entries are found?
if (SQL_NUMROWS($result) > 0) {
$OUT = '';
while ($content = SQL_FETCHARRAY($result)) {
$OUT .= " \n";
if (($mode != 'admin') && ($UPDATE === true)) {
// Update guest or member menu
$sql = SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_%s_menu` SET counter=counter+1 WHERE `action`='%s' AND `what`='%s'".$add." LIMIT 1",
array($mode, $act, $wht), __FUNCTION__, __LINE__, false);
} elseif (($wht != 'overview') && (!empty($wht))) {
// Other actions
$sql = SQL_QUERY_ESC("SELECT id, what FROM `{!_MYSQL_PREFIX!}_%s_menu` WHERE `action`='%s' AND `what`='%s'".$add." ORDER BY action DESC LIMIT 1",
array($mode, $act, $wht), __FUNCTION__, __LINE__, false);
} else {
// Admin login overview
$sql = SQL_QUERY_ESC("SELECT id, what FROM `{!_MYSQL_PREFIX!}_%s_menu` WHERE `action`='%s' AND (`what`='' OR `what` IS NULL)".$add." ORDER BY action DESC LIMIT 1",
array($mode, $act), __FUNCTION__, __LINE__, false);
}
// Run SQL command
$result = SQL_QUERY($sql, __FUNCTION__, __LINE__);
if ($UPDATE === true) {
// Check updated/affected rows
$ret = (SQL_AFFECTEDROWS() == 1);
} else {
// Check found rows
$ret = (SQL_NUMROWS($result) == 1);
}
// Free memory
SQL_FREERESULT($result);
// Set cache entry
$GLOBALS['cache_array']['action_valid'][$mode][$act][$wht] = $ret;
// Return result
return $ret;
}
//
function sendModeMails ($mod, $modes) {
global $DATA;
// Load hash
$result_main = SQL_QUERY_ESC("SELECT password FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s AND `status`='CONFIRMED' LIMIT 1",
array(getUserId()), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result_main) == 1) {
// Load hash from database
list($hashDB) = SQL_FETCHROW($result_main);
// Extract salt from cookie
$salt = substr(getSession('u_hash'), 0, -40);
// Now let's compare passwords
$hash = generatePassString($hashDB);
if (($hash == getSession('u_hash')) || (REQUEST_POST('pass1') == REQUEST_POST('pass2'))) {
// Load user's data
$result = SQL_QUERY_ESC("SELECT gender, surname, family, street_nr, country, zip, city, email FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s AND password='%s' LIMIT 1",
array(getUserId(), $hashDB), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Load the data
$DATA = SQL_FETCHROW($result);
// Free result
SQL_FREERESULT($result);
// Translate gender
$DATA[0] = translateGender($DATA[0]);
// Clear/init the content variable
$content = '';
$DATA['info'] = '';
switch ($mod)
{
case 'mydata':
foreach ($modes as $mode) {
switch ($mode)
{
case 'normal': break; // Do not add any special lines
case 'email': // Email was changed!
$content = getMessage('MEMBER_CHANGED_EMAIL').": ".REQUEST_POST('old_addy')."\n";
break;
case 'pass': // Password was changed
$content = getMessage('MEMBER_CHANGED_PASS')."\n";
break;
default:
DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Unknown mode %s detected.", $mode));
$content = getMessage('MEMBER_UNKNOWN_MODE').": ".$mode."\n\n";
break;
} // END - switch
} // END - if
if (EXT_IS_ACTIVE('country')) {
// Replace code with description
$DATA[4] = COUNTRY_GENERATE_INFO(REQUEST_POST('country_code'));
} // END - if
// Merge content with data from POST
$content = merge_array($content, REQUEST_POST_ARRAY());
// Load template
$msg = LOAD_EMAIL_TEMPLATE('member_mydata_notify', $content, getUserId());
if (getConfig('admin_notify') == 'Y') {
// The admin needs to be notified about a profile change
$msg_admin = 'admin_mydata_notify';
$sub_adm = getMessage('ADMIN_CHANGED_DATA');
} else {
// No mail to admin
$msg_admin = '';
$sub_adm = '';
}
// Set subject lines
$sub_mem = getMessage('MEMBER_CHANGED_DATA');
// Output success message
$content = "{--MYDATA_MAIL_SENT--}";
break;
default: // Unsupported module!
DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Unsupported module %s detected.", $mod));
$content = "{--UNKNOWN_MODULE--}";
break;
} // END - switch
} else {
// Could not load profile data
$content = "{--MEMBER_CANNOT_LOAD_PROFILE--}";
}
} else {
// Passwords mismatch
$content = "{--MEMBER_PASSWORD_ERROR--}";
}
} else {
// Could not load profile
$content = "{--MEMBER_CANNOT_LOAD_PROFILE--}";
}
// Send email to user if required
if ((!empty($sub_mem)) && (!empty($msg))) {
// Send member mail
sendEmail($DATA[7], $sub_mem, $msg);
} // END - if
// Send only if no other error has occured
if (empty($content)) {
if ((!empty($sub_adm)) && (!empty($msg_admin))) {
// Send admin mail
sendAdminNotification($sub_adm, $msg_admin, $content, getUserId());
} elseif (getConfig('admin_notify') == 'Y') {
// Cannot send mails to admin!
$content = getMessage('CANNOT_SEND_ADMIN_MAILS');
} else {
// No mail to admin
$content = "{--MYDATA_MAIL_SENT--}";
}
} // END - if
// Load template
LOAD_TEMPLATE('admin_settings_saved', false, $content);
}
// Update module counter
function countModuleHit($mod) {
if ($mod != "css") {
// Do count all other modules but not accesses on CSS file css.php!
SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_mod_reg` SET clicks=clicks+1 WHERE `module`='%s' LIMIT 1",
array($mod), __FUNCTION__, __LINE__);
} // END - if
}
// Get action value from mode (admin/guest/member) and what-value
function getModeAction ($mode, $wht) {
// Init status
$ret = '';
//* DEBUG: */ echo __LINE__.'='.$mode.'/'.$wht.'/'.getAction()."= ";
if ((empty($wht)) && ($mode != 'admin')) {
$wht = 'welcome';
if (getConfig('index_home') != '') $wht = getConfig('index_home');
} // END - if
if ($mode == 'admin') {
// Action value for admin area
if (REQUEST_ISSET_GET('action')) {
// Use from request!
return REQUEST_GET('action');
} elseif (isActionSet()) {
// Get it directly from URL
return getAction();
} elseif (($wht == 'overview') || (!isWhatSet())) {
// Default value for admin area
$ret = 'login';
}
} elseif (isActionSet()) {
// Get it directly from URL
return getAction();
}
//* DEBUG: */ echo __FUNCTION__."(".__LINE__."): ret=".$ret." \n";
// Does the module have a menu?
if (MODULE_HAS_MENU($mode)) {
// Rewriting modules to menu
switch ($mode) {
case 'index': $mode = 'guest'; break;
case 'login': $mode = 'member'; break;
} // END - switch
// Guest and member menu is 'main' as the default
if (empty($ret)) $ret = 'main';
// Load from database
$result = SQL_QUERY_ESC("SELECT action FROM `{!_MYSQL_PREFIX!}_%s_menu` WHERE `what`='%s' LIMIT 1",
array($mode, $wht), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Load action value and pray that this one is the right you want... ;-)
list($ret) = SQL_FETCHROW($result);
} // END - if
// Free memory
SQL_FREERESULT($result);
} elseif ((GET_EXT_VERSION('sql_patches') == '') && ($mode != 'admin')) {
// No sql_patches installed, but maybe we need to register an admin?
if (isAdminRegistered()) {
// Redirect
// @TODO Why does this lead into an endless loop but we still need it???
// @TODO Commented out redirectToUrl('admin.php');
} // END - if
}
// Return action value
return $ret;
}
// Get category name back
function getCategory ($cid) {
// Default is not found
$ret = getMessage('_CATEGORY_404');
// Is the category id set?
if ($cid == '0') {
// No category
$ret = getMessage('_CATEGORY_NONE');
} elseif ($cid > 0) {
// Lookup the category in database
$result = SQL_QUERY_ESC("SELECT cat FROM `{!_MYSQL_PREFIX!}_cats` WHERE `id`=%s LIMIT 1",
array(bigintval($cid)), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Category found... :-)
list($ret) = SQL_FETCHROW($result);
} // END - if
// Free result
SQL_FREERESULT($result);
} // END - if
// Return result
return $ret;
}
// Get a string of "mail title" and price back
function getPaymentTitlePrice ($pid, $full=false) {
// Default is not found
$ret = getMessage('_PAYMENT_404');
// Load payment data
$result = SQL_QUERY_ESC("SELECT mail_title, price FROM `{!_MYSQL_PREFIX!}_payments` WHERE `id`=%s LIMIT 1",
array(bigintval($pid)), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Payment type found... :-)
if (!$full) {
// Return only title
list($ret) = SQL_FETCHROW($result);
} else {
// Return title and price
list($t, $p) = SQL_FETCHROW($result);
$ret = $t.' / '.translateComma($p).' {!POINTS!}';
}
}
// Free result
SQL_FREERESULT($result);
// Return result
return $ret;
}
// Get (basicly) the price of given payment id
function getPaymentPoints ($pid, $lookFor = 'price') {
// Default value...
$ret = '-1';
// Search for it in database
$result = SQL_QUERY_ESC("SELECT %s FROM `{!_MYSQL_PREFIX!}_payments` WHERE `id`=%s LIMIT 1",
array($lookFor, $pid), __FUNCTION__, __LINE__);
// Is the entry there?
if (SQL_NUMROWS($result) == 1) {
// Payment type found... :-)
list($ret) = SQL_FETCHROW($result);
} // END - if
// Free result
SQL_FREERESULT($result);
// Return value
return $ret;
}
// Remove a receiver's ID from $receivers and add a link for him to confirm
function removeReceiver (&$receivers, $key, $uid, $pool_id, $stats_id='', $bonus=false) {
// Default is not removed
$ret = 'failed';
// Is the userid valid?
if ($uid > 0) {
// Remove entry from array
unset($receivers[$key]);
// Is there already a line for this user available?
if ($stats_id > 0) {
// Only when we got a real stats ID continue searching for the entry
$type = 'NORMAL'; $rowName = 'stats_id';
if ($bonus) { $type = 'BONUS'; $rowName = 'bonus_id'; }
// Try to look the entry up
$result = SQL_QUERY_ESC("SELECT `id` FROM `{!_MYSQL_PREFIX!}_user_links` WHERE %s='%s' AND `userid`=%s AND link_type='%s' LIMIT 1",
array($rowName, $stats_id, bigintval($uid), $type), __FUNCTION__, __LINE__);
// Was it *not* found?
if (SQL_NUMROWS($result) == 0) {
// So we add one!
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_links` (%s, userid, link_type) VALUES ('%s','%s','%s')",
array($rowName, $stats_id, bigintval($uid), $type), __FUNCTION__, __LINE__);
$ret = 'done';
} else {
// Already found
$ret = 'already';
}
// Free memory
SQL_FREERESULT($result);
}
}
// Return status for sending routine
return $ret;
}
// Calculate sum (default) or count records of given criteria
function GET_TOTAL_DATA ($search, $tableName, $lookFor = 'id', $whereStatement = 'userid', $countRows = false, $add = '') {
$ret = 0;
//* DEBUG: */ echo $search.'/'.$tableName.'/'.$lookFor.'/'.$whereStatement.'/'.$add.' \n';
if ((empty($search)) && ($search != '0')) {
// Count or sum whole table?
if ($countRows === true) {
// Count whole table
$result = SQL_QUERY_ESC("SELECT COUNT(`%s`) FROM `{!_MYSQL_PREFIX!}_%s`".$add,
array($lookFor, $tableName), __FUNCTION__, __LINE__);
} else {
// Sum whole table
$result = SQL_QUERY_ESC("SELECT SUM(`%s`) FROM `{!_MYSQL_PREFIX!}_%s`".$add,
array($lookFor, $tableName), __FUNCTION__, __LINE__);
}
} elseif (($countRows === true) || ($lookFor == 'userid')) {
// Count rows
//* DEBUG: */ echo "COUNT! \n";
$result = SQL_QUERY_ESC("SELECT COUNT(`%s`) FROM `{!_MYSQL_PREFIX!}_%s` WHERE `%s`='%s'".$add,
array($lookFor, $tableName, $whereStatement, $search), __FUNCTION__, __LINE__);
} else {
// Add all rows
//* DEBUG: */ echo "SUM! \n";
$result = SQL_QUERY_ESC("SELECT SUM(`%s`) FROM `{!_MYSQL_PREFIX!}_%s` WHERE `%s`='%s'".$add,
array($lookFor, $tableName, $whereStatement, $search), __FUNCTION__, __LINE__);
}
// Load row
list($ret) = SQL_FETCHROW($result);
// Free result
SQL_FREERESULT($result);
// Fix empty values
if ((empty($ret)) && ($lookFor != 'counter') && ($lookFor != 'id') && ($lookFor != 'userid')) {
// Float number
$ret = '0.00000';
} elseif (''.$ret.'' == '') {
// Fix empty result
$ret = '0';
}
// Return value
return $ret;
}
// Getter fro ref level percents
function getReferalLevelPercents ($level) {
// Default is zero
$per = 0;
// Do we have cache?
if ((isset($GLOBALS['cache_array']['ref_depths']['level'])) && (EXT_IS_ACTIVE('cache'))) {
// First look for level
$key = array_search($level, $GLOBALS['cache_array']['ref_depths']['level']);
if ($key !== false) {
// Entry found!
$per = $GLOBALS['cache_array']['ref_depths']['percents'][$key];
// Count cache hit
incrementConfigEntry('cache_hits');
}
} elseif (!EXT_IS_ACTIVE('cache')) {
// Get referal data
$result_lvl = SQL_QUERY_ESC("SELECT percents FROM `{!_MYSQL_PREFIX!}_refdepths` WHERE level='%s' LIMIT 1",
array(bigintval($level)), __FUNCTION__, __LINE__);
// Entry found?
if (SQL_NUMROWS($result_lvl) == 1) {
// Get percents
list($per) = SQL_FETCHROW($result_lvl);
} // END - if
// Free result
SQL_FREERESULT($result_lvl);
}
// Return percent
return $per;
}
/**
*
* Dynamic referal system, can also send mails!
*
* subject = Subject line, write in lower-case letters and underscore is allowed
* uid = Referal ID wich should receive...
* points = ... xxx points
* send_notify = shall I send the referal an email or not?
* rid = inc/modules/guest/what-confirm.php need this (DEPRECATED???)
* locked = Shall I pay it to normal (false) or locked (true) points ammount?
* add_mode = Add points only to $uid or also refs? (WARNING! Changing 'ref' to 'direct'
* for default value will cause no referal will get points ever!!!)
*/
function ADD_POINTS_REFSYSTEM ($subject, $uid, $points, $send_notify = false, $rid = '0', $locked = false, $add_mode = 'ref') {
//* DEBUG: */ print "----------------------- ".__FUNCTION__." - ENTRY ------------------------
\n";
global $DATA;
// Convert mode to lower-case
$add_mode = strtolower($add_mode);
// When $uid = 0 add points to jackpot
if ($uid == '0') {
// Add points to jackpot
ADD_JACKPOT($points);
return;
} // END - if
// Add booking record if extension is installed
if (EXT_IS_ACTIVE('booking')) {
// Add record
ADD_BOOKING_RECORD($subject, $uid, $points, 'add');
} // END - if
// Count up referal depth
if (!isset($GLOBALS['ref_level'])) {
// Initialialize referal system
//* DEBUG: */ print __FUNCTION__."(".__LINE__."): Referal system initialized! \n";
$GLOBALS['ref_level'] = 0;
} else {
// Increase referal level
$GLOBALS['ref_level']++;
//* DEBUG: */ print __FUNCTION__."(".__LINE__."): Referal level increased. DEPTH={$GLOBALS['ref_level']} \n";
}
// Default is 'normal' points
$data = 'points';
// Which points, locked or normal?
if ($locked) $data = 'locked_points';
// Check user account
$result_user = SQL_QUERY_ESC("SELECT refid, email FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s AND `status`='CONFIRMED' LIMIT 1",
array(bigintval($uid)), __FUNCTION__, __LINE__);
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):uid={$uid},numRows=".SQL_NUMROWS($result_user).",points={$points} \n";
if (SQL_NUMROWS($result_user) == 1) {
// This is the user and his ref
list($ref, $email) = SQL_FETCHROW($result_user);
$GLOBALS['cache_array']['add_uid'][$ref] = $uid;
// Get percents
$per = getReferalLevelPercents($GLOBALS['ref_level']);
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):uid={$uid},points={$points},depth={$GLOBALS['ref_level']},per={$per},mode={$add_mode} \n";
// Some percents found?
if ($per > 0) {
// Calculate new points
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):uid={$uid},points={$points},per={$per},depth={$GLOBALS['ref_level']} \n";
$ref_points = $points * $per / 100;
// Pay refback here if level > 0 and in ref-mode
if ((EXT_IS_ACTIVE('refback')) && ($GLOBALS['ref_level'] > 0) && ($per < 100) && ($add_mode == "ref") && (isset($GLOBALS['cache_array']['add_uid'][$uid]))) {
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):uid={$uid},data={$GLOBALS['cache_array']['add_uid'][$uid]},ref_points={$ref_points},depth={$GLOBALS['ref_level']} - BEFORE! \n";
$ref_points = ADD_REFBACK_POINTS($GLOBALS['cache_array']['add_uid'][$uid], $uid, $points, $ref_points);
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):uid={$uid},data={$GLOBALS['cache_array']['add_uid'][$uid]},ref_points={$ref_points},depth={$GLOBALS['ref_level']} - AFTER! \n";
} // END - if
// Update points...
SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_points` SET %s=%s+%s WHERE userid=%s AND ref_depth='%s' LIMIT 1",
array($data, $data, $ref_points, bigintval($uid), bigintval($GLOBALS['ref_level'])), __FUNCTION__, __LINE__);
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):data={$data},ref_points={$ref_points},uid={$uid},depth={$GLOBALS['ref_level']},mode={$add_mode} - UPDATE! (".SQL_AFFECTEDROWS().") \n";
// No entry updated?
if (SQL_AFFECTEDROWS() < 1) {
// First ref in this level! :-)
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_points` (userid,ref_depth,%s) VALUES (%s,'%s',%s)",
array($data, bigintval($uid), bigintval($GLOBALS['ref_level']), $ref_points), __FUNCTION__, __LINE__);
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):data={$data},ref_points={$ref_points},uid={$uid},depth={$GLOBALS['ref_level']},mode={$add_mode} - INSERTED! (".SQL_AFFECTEDROWS().") \n";
} // END - if
// Update mediadata as well
if (GET_EXT_VERSION('mediadata') >= '0.0.4') {
// Update database
MEDIA_UPDATE_ENTRY(array('total_points'), 'add', $ref_points);
} // END - if
// Points updated, maybe I shall send him an email?
if (($send_notify) && ($ref > 0) && (!$locked)) {
// Prepare content
$content = array(
'percent' => $per,
'level' => bigintval($GLOBALS['ref_level']),
'points' => $ref_points,
'refid' => bigintval($ref)
);
// Load email template
$msg = LOAD_EMAIL_TEMPLATE('confirm-referal', $content, bigintval($uid));
sendEmail($email, THANX_REFERRAL_ONE, $msg);
} elseif (($send_notify) && ($ref == 0) && (!$locked) && ($add_mode == 'direct') && (!defined('__POINTS_VALUE'))) {
// Direct payment shall be notified about
define('__POINTS_VALUE', $ref_points);
// Prepare content
$content = array(
'text' => getMessage('REASON_DIRECT_PAYMENT'),
'points' => translateComma($ref_points)
);
// Load message
$msg = LOAD_EMAIL_TEMPLATE('add-points', $content, $uid);
// And sent it away
sendEmail($email, getMessage('SUBJECT_DIRECT_PAYMENT'), $msg);
if (!REQUEST_ISSET_GET(('mid'))) LOAD_TEMPLATE('admin_settings_saved', false, getMessage('ADMIN_POINTS_ADDED'));
}
// Maybe there's another ref?
if (($ref > 0) && ($points > 0) && ($ref != $uid) && ($add_mode == 'ref')) {
// Then let's credit him here...
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):uid={$uid},ref={$ref},points={$points} - ADVANCE! \n";
ADD_POINTS_REFSYSTEM(sprintf("%s_ref:%s", $subject, $GLOBALS['ref_level']), $ref, $points, $send_notify, $ref, $locked);
} // END - if
} // END - if
} // END - if
// Free result
SQL_FREERESULT($result_user);
//* DEBUG: */ print "
----------------------- ".__FUNCTION__." - EXIT ------------------------ \n";
}
// Wrapper function for ADD_POINTS_REFSYSTEM()
function ADD_POINTS_REFSYSTEM_DIRECT ($subject, $uid, $points) {
return ADD_POINTS_REFSYSTEM($subject, $uid, $points, false, 0, false, 'direct');
}
// Updates the referal counter
function updateReferalCounter ($uid) {
// Make it sure referal level zero (member him-/herself) is at least selected
if (empty($GLOBALS['cache_array']['ref_level'][$uid])) $GLOBALS['cache_array']['ref_level'][$uid] = 1;
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):uid={$uid},level={$GLOBALS['cache_array']['ref_level'][$uid]} \n";
// Update counter
SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_refsystem` SET counter=counter+1 WHERE userid=%s AND level='%s' LIMIT 1",
array(bigintval($uid), $GLOBALS['cache_array']['ref_level'][$uid]), __FUNCTION__, __LINE__);
// When no entry was updated then we have to create it here
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):updated=".SQL_AFFECTEDROWS()." \n";
if (SQL_AFFECTEDROWS() < 1) {
// First count!
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_refsystem` (userid, level, counter) VALUES (%s,%s,1)",
array(bigintval($uid), $GLOBALS['cache_array']['ref_level'][$uid]), __FUNCTION__, __LINE__);
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):uid={$uid} \n";
} // END - if
// Check for his referal
$result = SQL_QUERY_ESC("SELECT refid FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s LIMIT 1",
array(bigintval($uid)), __FUNCTION__, __LINE__);
// Load refid
list($ref) = SQL_FETCHROW($result);
// Free memory
SQL_FREERESULT($result);
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):uid={$uid},ref={$ref} \n";
// When he has a referal...
if (($ref > 0) && ($ref != $uid)) {
// Move to next referal level and count his counter one up!
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):ref={$ref} - ADVANCE! \n";
$GLOBALS['cache_array']['ref_level'][$uid]++; updateReferalCounter($ref);
} elseif ((($ref == $uid) || ($ref == 0)) && (GET_EXT_VERSION('cache') >= '0.1.2')) {
// Remove cache here
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):ref={$ref} - CACHE! \n";
rebuildCacheFiles('refsystem', 'refsystem');
}
// "Walk" back here
$GLOBALS['cache_array']['ref_level'][$uid]--;
// Handle refback here if extension is installed
if (EXT_IS_ACTIVE('refback')) {
updateRefbackTable($uid);
} // END - if
}
// Sends out mail to all administrators. This function is no longer obsolete
// because we need it when there is no ext-admins installed
function SEND_ADMIN_EMAILS ($subj, $msg) {
// Load all admin email addresses
$result = SQL_QUERY("SELECT email FROM `{!_MYSQL_PREFIX!}_admins` ORDER BY `id` ASC", __FUNCTION__, __LINE__);
while ($content = SQL_FETCHARRAY($result)) {
// Send the email out
sendEmail($content['email'], $subj, $msg);
} // END - if
// Free result
SQL_FREERESULT($result);
// Really simple... ;-)
}
// Get ID number from administrator's login name
function GET_ADMIN_ID ($login) {
// By default no admin is found
$ret = '-1';
// Check cache
if (isset($GLOBALS['cache_array']['admins']['aid'][$login])) {
// Use it if found to save SQL queries
$ret = $GLOBALS['cache_array']['admins']['aid'][$login];
// Update cache hits
incrementConfigEntry('cache_hits');
} elseif (!EXT_IS_ACTIVE('cache')) {
// Load from database
$result = SQL_QUERY_ESC("SELECT `id` FROM `{!_MYSQL_PREFIX!}_admins` WHERE login='%s' LIMIT 1",
array($login), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
list($ret) = SQL_FETCHROW($result);
} // END - if
// Free result
SQL_FREERESULT($result);
}
return $ret;
}
// "Getter" for current admin id
function getCurrentAdminId () {
// Get the admin login from session
$adminLogin = getSession('admin_login');
// "Solve" it into an id
$adminId = GET_ADMIN_ID($adminLogin);
// Secure and return it
return bigintval($adminId);
}
// Get password hash from administrator's login name
function GET_ADMIN_HASH ($aid) {
// By default an invalid hash is returned
$ret = '-1';
if (isset($GLOBALS['cache_array']['admins']['password'][$aid])) {
// Check cache
$ret = $GLOBALS['cache_array']['admins']['password'][$aid];
// Update cache hits
incrementConfigEntry('cache_hits');
} elseif (!EXT_IS_ACTIVE('cache')) {
// Load from database
$result = SQL_QUERY_ESC("SELECT password FROM `{!_MYSQL_PREFIX!}_admins` WHERE `id`=%s LIMIT 1",
array($aid), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Fetch data
list($ret) = SQL_FETCHROW($result);
// Set cache
$GLOBALS['cache_array']['admins']['password'][$aid] = $ret;
} // END - if
// Free result
SQL_FREERESULT($result);
}
return $ret;
}
// "Getter" for admin login
function getAdminLogin ($aid) {
// By default a non-existent login is returned (other functions react on this!)
$ret = '***';
if (isset($GLOBALS['cache_array']['admins']['login'][$aid])) {
// Get cache
$ret = $GLOBALS['cache_array']['admins']['login'][$aid];
// Update cache hits
incrementConfigEntry('cache_hits');
} elseif (!EXT_IS_ACTIVE('cache')) {
// Load from database
$result = SQL_QUERY_ESC("SELECT login FROM `{!_MYSQL_PREFIX!}_admins` WHERE `id`=%s LIMIT 1",
array(bigintval($aid)), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Fetch data
list($ret) = SQL_FETCHROW($result);
// Set cache
$GLOBALS['cache_array']['admins']['login'][$aid] = $ret;
} // END - if
// Free memory
SQL_FREERESULT($result);
}
return $ret;
}
// Get email address of admin id
function getAdminEmail ($aid) {
// By default an invalid emails is returned
$ret = '***';
if (isset($GLOBALS['cache_array']['admins']['email'][$aid])) {
// Get cache
$ret = $GLOBALS['cache_array']['admins']['email'][$aid];
// Update cache hits
incrementConfigEntry('cache_hits');
} elseif (!EXT_IS_ACTIVE('cache')) {
// Load from database
$result_aid = SQL_QUERY_ESC("SELECT email FROM `{!_MYSQL_PREFIX!}_admins` WHERE `id`=%s LIMIT 1",
array(bigintval($aid)), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result_aid) == 1) {
// Get data
list($ret) = SQL_FETCHROW($result_aid);
// Set cache
$GLOBALS['cache_array']['admins']['email'][$aid] = $ret;
} // END - if
// Free result
SQL_FREERESULT($result_aid);
}
// Return email
return $ret;
}
// Get default ACL of admin id
function getAdminDefaultAcl ($aid) {
// By default an invalid ACL value is returned
$ret = '***';
// Is sql_patches there and was it found in cache?
if (!EXT_IS_ACTIVE('sql_patches')) {
// Not found, which is bad, so we need to allow all
$ret = 'allow';
} elseif (isset($GLOBALS['cache_array']['admins']['def_acl'][$aid])) {
// Use cache
$ret = $GLOBALS['cache_array']['admins']['def_acl'][$aid];
// Update cache hits
incrementConfigEntry('cache_hits');
} elseif (!EXT_IS_ACTIVE('cache')) {
// Load from database
$result_aid = SQL_QUERY_ESC("SELECT default_acl FROM `{!_MYSQL_PREFIX!}_admins` WHERE `id`=%s LIMIT 1",
array(bigintval($aid)), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result_aid) == 1) {
// Fetch data
list($ret) = SQL_FETCHROW($result_aid);
// Set cache
$GLOBALS['cache_array']['admins']['def_acl'][$aid] = $ret;
}
// Free result
SQL_FREERESULT($result_aid);
}
// Return email
return $ret;
}
// Generates an option list from various parameters
function generateOptionList ($table, $id, $name, $default='', $special='', $where='') {
$ret = '';
if ($table == '/ARRAY/') {
// Selection from array
if (is_array($id) && is_array($name) && count($id) == count($name)) {
// Both are arrays
foreach ($id as $idx => $value) {
$ret .= '';
}
}
// Return - hopefully - the requested data
return $ret;
}
// Activate exchange
function activateExchange () {
// Is the extension 'user' there?
if (!EXT_IS_ACTIVE('user')) {
// Silently abort here
return false;
} // END - if
// Check total amount of users
$totalUsers = GET_TOTAL_DATA('CONFIRMED', 'user_data', 'userid', 'status', true, ' AND max_mails > 0');
if ($totalUsers >= getConfig('activate_xchange')) {
// Activate System
SET_SQLS(array(
"UPDATE `{!_MYSQL_PREFIX!}_mod_reg` SET `locked`='N', `hidden`='N', `mem_only`='Y' WHERE `module`='order' LIMIT 1",
"UPDATE `{!_MYSQL_PREFIX!}_member_menu` SET `visible`='Y', `locked`='N' WHERE `what`='order' OR `what`='unconfirmed' LIMIT 2",
"UPDATE `{!_MYSQL_PREFIX!}_config` SET `activate_xchange`=0 WHERE `config`=0 LIMIT 1"
));
// Run SQLs
runFilterChain('run_sqls');
// Rebuild caches
// @TODO Rewrite this to a filter
rebuildCacheFiles('config', 'config');
rebuildCacheFiles('modreg', 'modreg');
} // END - if
}
// Deletes a user account with given reason
function deleteUserAccount ($uid, $reason) {
$points = 0;
$result = SQL_QUERY_ESC("SELECT (SUM(p.points) - d.used_points) AS points
FROM `{!_MYSQL_PREFIX!}_user_points` AS p
LEFT JOIN `{!_MYSQL_PREFIX!}_user_data` AS d
ON p.userid=d.userid
WHERE p.userid=%s", array(bigintval($uid)), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Save his points to add them to the jackpot
list($points) = SQL_FETCHROW($result);
// Delete points entries as well
SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{!_MYSQL_PREFIX!}_user_points` WHERE userid=%s", array(bigintval($uid)), __FUNCTION__, __LINE__);
// Update mediadata as well
if (GET_EXT_VERSION('mediadata') >= '0.0.4') {
// Update database
MEDIA_UPDATE_ENTRY(array('total_points'), 'sub', $points);
} // END - if
// Now, when we have all his points adds them do the jackpot!
ADD_JACKPOT($points);
} // END - if
// Free the result
SQL_FREERESULT($result);
// Delete category selections as well...
SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{!_MYSQL_PREFIX!}_user_cats` WHERE userid=%s",
array(bigintval($uid)), __FUNCTION__, __LINE__);
// Remove from rallye if found
if (EXT_IS_ACTIVE('rallye')) {
SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{!_MYSQL_PREFIX!}_rallye_users` WHERE userid=%s",
array(bigintval($uid)), __FUNCTION__, __LINE__);
} // END - if
// Now a mail to the user and that's all...
$msg = LOAD_EMAIL_TEMPLATE('del-user', array('text' => $reason), $uid);
sendEmail($uid, getMessage('ADMIN_DEL_ACCOUNT'), $msg);
// Ok, delete the account!
SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s LIMIT 1", array(bigintval($uid)), __FUNCTION__, __LINE__);
}
// Generates meta description for given module and 'what' value
function generateMetaDescriptionCode ($mod, $wht) {
// Exclude admin and member's area
if (($mod != 'admin') && ($mod != 'login')) {
// Construct dynamic description
$DESCR = '{!MAIN_TITLE!} '.trim(getConfig('title_middle')) . ' ' . ADD_DESCR('guest', 'what-'.$wht, true);
// Output it directly
OUTPUT_HTML('');
} // END - if
// Remove depth
unset($GLOBALS['ref_level']);
}
// Adds points to the jackpot
function ADD_JACKPOT ($points) {
$result = SQL_QUERY("SELECT points FROM `{!_MYSQL_PREFIX!}_jackpot` WHERE ok='ok' LIMIT 1", __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 0) {
// Create line
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_jackpot` (ok, points) VALUES ('ok','%s')", array($points), __FUNCTION__, __LINE__);
} else {
// Free memory
SQL_FREERESULT($result);
// Update points
SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_jackpot` SET points=points+%s WHERE ok='ok' LIMIT 1",
array($points), __FUNCTION__, __LINE__);
}
}
// Subtracts points from the jackpot
function SUB_JACKPOT ($points) {
// First failed
$ret = '-1';
// Get current points
$result = SQL_QUERY("SELECT points FROM `{!_MYSQL_PREFIX!}_jackpot` WHERE ok='ok' LIMIT 1", __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 0) {
// Create line
SQL_QUERY("INSERT INTO `{!_MYSQL_PREFIX!}_jackpot` (ok, points) VALUES ('ok', 0.00000)", __FUNCTION__, __LINE__);
} else {
// Read points
list($jackpot) = SQL_FETCHROW($result);
if ($jackpot >= $points) {
// Update points when there are enougth points in jackpot
SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_jackpot` SET points=points-%s WHERE ok='ok' LIMIT 1",
array($points), __FUNCTION__, __LINE__);
$ret = $jackpot - $points;
} // END - if
}
// Free memory
SQL_FREERESULT($result);
}
// Checks wether the extension demo is actuve and the admin login is demo (password needs to be demo, too!)
function IS_DEMO () {
return ((EXT_IS_ACTIVE('demo')) && (getSession('admin_login') == 'demo'));
}
// Gets the matching what name from module
function getWhatFromModule ($modCheck) {
// Is the request element set?
if (REQUEST_ISSET_GET('what')) {
// Then return this!
return REQUEST_GET('what');
} // END - if
// Default is empty
$wht = '';
//* DEBUG: */ echo __LINE__.'!'.$modCheck."! \n";
switch ($modCheck) {
case 'admin':
$wht = 'overview';
break;
case 'login':
case 'index':
$wht = 'welcome';
if (($modCheck == 'index') && (getConfig('index_home') != '')) $wht = getConfig('index_home');
break;
default:
$wht = '';
break;
} // END - switch
// Return what value
return $wht;
}
// Subtract points from database and mediadata cache
function SUB_POINTS ($subject, $uid, $points) {
// Add points to used points
SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_data` SET `used_points`=`used_points`+%s WHERE userid=%s LIMIT 1",
array($points, bigintval($uid)), __FUNCTION__, __LINE__);
// Insert booking record
// @TODO Rewrite this to a filter
if (EXT_IS_ACTIVE('booking')) {
// Add record
ADD_BOOKING_RECORD($subject, $uid, $points, 'sub');
} // END - if
// Update mediadata as well
if (GET_EXT_VERSION('mediadata') >= '0.0.4') {
// Update database
MEDIA_UPDATE_ENTRY(array('total_points'), 'sub', $points);
} // END - if
}
// Update config entries
function updateConfiguration ($entries, $values, $updateMode='') {
// Do not update config in CSS mode
if ((getOutputMode() == '1') || (getOutputMode() == -1)) {
return;
} // END - if
// Do we have multiple entries?
if (is_array($entries)) {
// Walk through all
$all = '';
foreach ($entries as $idx => $entry) {
// Update mode set?
if (!empty($updateMode)) {
// Update entry
// @TODO Find a way for updating $_CONFIG here
$all .= sprintf("%s=%s%s%s,", $entry, $entry, $updateMode, (float)$values[$idx]);
} else {
// Check if string or number
if (($values[$idx] + 0) === $values[$idx]) {
// Number detected
$all .= sprintf("%s=%s,", $entry, (float)$values[$idx]);
} elseif ($values[$idx] == 'UNIX_TIMESTAMP()') {
// Function UNIX_TIMESTAMP() detected
$all .= sprintf("%s=%s,", $entry, $values[$idx]);
} else {
// String detected
$all .= sprintf("%s='%s',", $entry, SQL_ESCAPE($values[$idx]));
}
}
// Set it in config as well
setConfigEntry($entry, $values[$idx]);
} // END - foreach
// Remove last comma
$entries = substr($all, 0, -1);
} elseif (!empty($updateMode)) {
// Update mode set
// @TODO Find a way for updating $_CONFIG here
$entries .= sprintf("=%s%s%s", $entries, $updateMode, (float)$values);
} else {
// Set it in config first
setConfigEntry($entries, $values);
// Regular entry to update
$entries .= sprintf("='%s'", SQL_ESCAPE($values));
}
// Run database update
//* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, "entries={$entries}");
SQL_QUERY("UPDATE `{!_MYSQL_PREFIX!}_config` SET ".$entries." WHERE config=0 LIMIT 1", __FUNCTION__, __LINE__);
// Get affected rows
$affectedRows = SQL_AFFECTEDROWS();
//* DEBUG: */ print __FUNCTION__."(".__LINE__."):entries={$entries},affectedRows={$affectedRows} \n";
// Rebuild cache
rebuildCacheFiles('config', 'config');
}
// Prepares an SQL statement part for HTML mail and/or holiday depency
// @TODO Can this be rewritten to a filter?
function PREPARE_SQL_HTML_HOLIDAY ($mode) {
// Exclude no users by default
$MORE = '';
// HTML mail?
if ($mode == 'html') $MORE = " AND `html`='Y'";
if (GET_EXT_VERSION('holiday') >= '0.1.3') {
// Add something for the holiday extension
$MORE .= " AND `holiday_active`='N'";
} // END - if
// Return result
return $MORE;
}
// "Getter" for total available receivers
function getTotalReceivers ($mode='normal') {
// Query database
$result_all = SQL_QUERY("SELECT userid
FROM `{!_MYSQL_PREFIX!}_user_data`
WHERE `status`='CONFIRMED' AND receive_mails > 0 ".PREPARE_SQL_HTML_HOLIDAY($mode),
__FUNCTION__, __LINE__);
// Get num rows
$numRows = SQL_NUMROWS($result_all);
// Free result
SQL_FREERESULT($result_all);
// Return value
return $numRows;
}
// Returns HTML code with an "';
} // END - foreach
} else {
// No cateogries are defined yet
$OUT = '';
}
// Return HTML code
return $OUT;
}
// Add bonus mail to queue
function addBonusMailToQueue ($subject, $text, $receiverList, $points, $seconds, $url, $cat, $mode='normal', $receiver=0) {
// Is admin or bonus extension there?
if (!IS_ADMIN()) {
// Abort here
return false;
} elseif (!EXT_IS_ACTIVE('bonus')) {
// Abort here
return false;
}
// Calculcate target sent
$target = countSelection(explode(';', $receiverList));
// Receiver is zero?
if ($receiver == 0) {
// Then auto-fix it
$receiver = $target;
} // END - if
// HTML extension active?
if (EXT_IS_ACTIVE('html_mail')) {
// No HTML by default
$HTML = 'N';
// HTML mode?
if ($mode == 'html') $HTML = 'Y';
// Add HTML mail
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_bonus`
(subject, text, receivers, points, time, data_type, timestamp, url, cat_id, target_send, mails_sent, html_msg)
VALUES ('%s','%s','%s','%s','%s','NEW', UNIX_TIMESTAMP(),'%s','%s','%s','%s','%s')",
array(
$subject,
$text,
$receiverList,
$points,
$seconds,
$url,
$cat,
$target,
bigintval($receiver),
$HTML
), __FUNCTION__, __LINE__);
} else {
// Add regular mail
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_bonus`
(subject, text, receivers, points, time, data_type, timestamp, url, cat_id, target_send, mails_sent)
VALUES ('%s','%s','%s','%s','%s','NEW', UNIX_TIMESTAMP(),'%s','%s','%s','%s')",
array(
$subject,
$text,
$receiverList,
$points,
$seconds,
$url,
$cat,
$target,
bigintval($receiver),
), __FUNCTION__, __LINE__);
}
}
// Generate a receiver list for given category and maximum receivers
function generateReceiverList ($cat, $receiver, $mode = '') {
// Init variables
$CAT_TABS = "%s";
$CAT_WHERE = '';
$receiverList = '';
$result = false;
// Secure data
$cat = bigintval($cat);
$receiver = bigintval($receiver);
// Is the receiver zero and mode set?
if (($receiver == 0) && (!empty($mode))) {
// Auto-fix receiver maximum
$receiver = getTotalReceivers($mode);
} // END - if
// Category given?
if ($cat > 0) {
// Select category
$CAT_TABS = "LEFT JOIN `{!_MYSQL_PREFIX!}_user_cats` AS c ON d.userid=c.userid";
$CAT_WHERE = " AND c.cat_id=%s";
} // END - if
// Exclude users in holiday?
if (GET_EXT_VERSION('holiday') >= '0.1.3') {
// Add something for the holiday extension
$CAT_WHERE .= " AND d.`holiday_active`='N'";
} // END - if
if ((EXT_IS_ACTIVE('html_mail')) && ($mode == 'html')) {
// Only include HTML receivers
$result = SQL_QUERY_ESC("SELECT d.userid FROM `{!_MYSQL_PREFIX!}_user_data` AS d ".$CAT_TABS." WHERE d.`status`='CONFIRMED' AND d.`html`='Y'".$CAT_WHERE." ORDER BY d.%s %s LIMIT %s",
array($cat, getConfig('order_select'), getConfig('order_mode'), $receiver), __FUNCTION__, __LINE__);
} else {
// Include all
$result = SQL_QUERY_ESC("SELECT d.userid FROM `{!_MYSQL_PREFIX!}_user_data` AS d ".$CAT_TABS." WHERE d.`status`='CONFIRMED'".$CAT_WHERE." ORDER BY d.%s %s LIMIT %s",
array($cat, getConfig('order_select'), getConfig('order_mode'), $receiver), __FUNCTION__, __LINE__);
}
// Entries found?
if ((SQL_NUMROWS($result) >= $receiver) && ($receiver > 0)) {
// Load all entries
while ($content = SQL_FETCHARRAY($result)) {
// Add receiver when not empty
if (!empty($content['userid'])) $receiverList .= $content['userid'] . ';';
} // END - while
// Free memory
SQL_FREERESULT($result);
// Remove trailing semicolon
$receiverList = substr($receiverList, 0, -1);
} // END - if
// Return list
return $receiverList;
}
// Get timestamp for given stats type and data
function getTimestampFromUserStats ($type, $data, $uid = 0) {
// Default timestamp is zero
$stamp = 0;
// User id set?
if ((isUserIdSet()) && ($uid == 0)) {
$uid = getUserId();
} // END - if
// Is the extension installed and updated?
if ((!EXT_IS_ACTIVE('sql_patches')) || (EXT_VERSION_IS_OLDER('sql_patches', '0.5.6'))) {
// Return zero here
return $stamp;
} // END - if
// Try to find the entry
$result = SQL_QUERY_ESC("SELECT UNIX_TIMESTAMP(`inserted`) AS `stamp`
FROM `{!_MYSQL_PREFIX!}_user_stats_data`
WHERE userid=%s AND stats_type='%s' AND stats_data='%s'
LIMIT 1",
array(bigintval($uid), $type, $data), __FUNCTION__, __LINE__);
// Is the entry there?
if (SQL_NUMROWS($result) == 1) {
// Get this stamp
list($stamp) = SQL_FETCHROW($result);
} // END - if
// Free result
SQL_FREERESULT($result);
// Return stamp
return $stamp;
}
// Inserts user stats
function insertUserStatsRecord ($uid, $type, $data) {
// Is the extension installed and updated?
if ((!EXT_IS_ACTIVE('sql_patches')) || (EXT_VERSION_IS_OLDER('sql_patches', '0.5.6'))) {
// Return zero here
return false;
} // END - if
// Does it exist?
if ((!getTimestampFromUserStats($type, $data, $uid)) && (!is_array($data))) {
// Then insert it!
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_stats_data` (`userid`,`stats_type`,`stats_data`) VALUES (%s,'%s','%s')",
array(bigintval($uid), $type, $data), __FUNCTION__, __LINE__);
} elseif (is_array($data)) {
// Invalid data!
DEBUG_LOG(__FUNCTION__, __LINE__, " uid={$uid},type={$type},data={".gettype($data).": Invalid statistics data type!");
}
}
// "Getter" for array for user refs and points in given level
function getUserReferalPoints ($uid, $level) {
//* DEBUG: */ print "----------------------- ".__FUNCTION__." - ENTRY ------------------------
\n";
// Default is no refs and no nickname
$add = '';
$refs = array();
// Do we have nickname extension installed?
if (EXT_IS_ACTIVE('nickname')) {
$add = ', ud.nickname';
} // END - if
// Get refs from database
$result = SQL_QUERY_ESC("SELECT ur.id, ur.refid, ud.status, ud.last_online, ud.mails_confirmed, ud.emails_received".$add."
FROM `{!_MYSQL_PREFIX!}_user_refs` AS ur
LEFT JOIN `{!_MYSQL_PREFIX!}_user_points` AS up
ON ur.refid=up.userid AND ur.level=0
LEFT JOIN `{!_MYSQL_PREFIX!}_user_data` AS ud
ON ur.refid=ud.userid
WHERE ur.userid=%s AND ur.level=%s
ORDER BY ur.refid ASC",
array(bigintval($uid), bigintval($level)), __FUNCTION__, __LINE__);
// Are there some entries?
if (SQL_NUMROWS($result) > 0) {
// Fetch all entries
while ($row = SQL_FETCHARRAY($result)) {
// Get total points of this user
$row['points'] = GET_TOTAL_DATA($row['refid'], 'user_points', 'points') - GET_TOTAL_DATA($row['refid'], 'user_data', 'used_points');
// Get unconfirmed mails
$row['unconfirmed'] = GET_TOTAL_DATA($row['refid'], 'user_links', 'id', 'userid', true);
// Init clickrate with zero
$row['clickrate'] = 0;
// Is at least one mail received?
if ($row['emails_received'] > 0) {
// Calculate clickrate
$row['clickrate'] = ($row['mails_confirmed'] / $row['emails_received'] * 100);
} // END - if
// Activity is 'active' by default because if autopurge is not installed
$row['activity'] = getMessage('MEMBER_ACTIVITY_ACTIVE');
// Is autopurge installed and the user inactive?
if ((EXT_IS_ACTIVE('autopurge')) && ((time() - getConfig('ap_inactive_since')) >= $row['last_online'])) {
// Inactive user!
$row['activity'] = getMessage('MEMBER_ACTIVITY_INACTIVE');
} // END - if
// Remove some entries
unset($row['mails_confirmed']);
unset($row['emails_received']);
unset($row['last_online']);
// Add row
$refs[$row['id']] = $row;
} // END - while
} // END - if
// Free result
SQL_FREERESULT($result);
// Return result
//* DEBUG: */ print "
----------------------- ".__FUNCTION__." - EXIT ------------------------ \n";
return $refs;
}
// Recuce the amount of received emails for the receipients for given email
function reduceRecipientReceivedMails ($column, $id, $count) {
// Search for mail in database
$result = SQL_QUERY_ESC("SELECT `userid` FROM `{!_MYSQL_PREFIX!}_user_links` WHERE `%s`=%s ORDER BY `userid` ASC LIMIT %s",
array($column, bigintval($id), $count), __FUNCTION__, __LINE__);
// Are there entries?
if (SQL_NUMROWS($result) > 0) {
// Now load all userids for one big query!
// @TODO This can be somehow rewritten
$UIDs = array();
while (list($uid) = SQL_FETCHROW($result)) {
$UIDs[$uid] = $uid;
} // END - while
// Now update all user accounts
SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_data` SET `emails_received`=`emails_received`-1 WHERE `userid` IN (%s) LIMIT %s",
array(implode(',', $UIDs), count($UIDs)), __FUNCTION__, __LINE__);
} // END - if
// Free result
SQL_FREERESULT($result);
}
// Init SQLs array
function INIT_SQLS () {
SET_SQLS(array());
}
// Checks wether the sqls array is initialized
function IS_SQLS_INITIALIZED () {
return ((isset($GLOBALS['sqls'])) && (is_array($GLOBALS['sqls'])));
}
// Setter for SQLs array
function SET_SQLS ($SQLs) {
$GLOBALS['sqls'] = (array) $SQLs;
}
// Remover for SQLs array
function UNSET_SQLS () {
unset($GLOBALS['sqls']);
}
// Getter for SQLs array
function GET_SQLS () {
return $GLOBALS['sqls'];
}
// Add an SQL to the list
function ADD_SQL ($sql) {
//* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("sql=%s, count=%d", $sql, COUNT_SQLS()));
$GLOBALS['sqls'][] = (string) $sql;
}
// Setter for SQLs key
function SET_SQL_KEY ($key, $value) {
$GLOBALS['sqls'][$key] = (string) $value;
}
// Merge SQLs together
function MERGE_SQLS ($SQLs) {
SET_SQLS(merge_array(GET_SQLS(), $SQLs));
}
// Counter for SQLs array
function COUNT_SQLS () {
// Default is false
$count = false;
// Is the array there?
if (IS_SQLS_INITIALIZED()) {
// Then count it
$count = count($GLOBALS['sqls']);
//* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("count=%d", $count));
} // END - if
// Return it
return $count;
}
// Checks wether the SQLs array is filled
function IS_SQLS_VALID () {
return (
(IS_SQLS_INITIALIZED()) &&
(COUNT_SQLS() > 0)
);
}
// [EOF]
?>