");
if (count($modSplit) == 2) {
// Okay, there is a seperator (_) in the name so is the first part a module?
//* DEBUG: */ print(__LINE__."*".$modSplit[0]."* ");
if (isExtensionActive($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 ((isInstallationPhase()) || (!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 (isExtensionInstalledAndNewer('cache', '0.1.2')) {
// Is the cache there?
//* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'Using cache.');
if (isset($GLOBALS['cache_array']['modules']['locked'][$mod_chk])) {
// Check cache
//* DEBUG: */ logDebugMessage(__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
incrementStatsEntry('cache_hits');
$found = true;
} else {
// No, then we have to update it!
$ret = 'cache_miss';
}
} elseif (!isExtensionActive('cache')) {
// Check for module in database
//* DEBUG: */ logDebugMessage(__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: */ logDebugMessage(__FUNCTION__, __LINE__, 'Entry found.');
list($locked, $hidden, $admin, $mem) = SQL_FETCHROW($result);
$found = true;
} elseif (isDebugModeEnabled()) {
// Debug message only in debug-mode...
logDebugMessage(__FUNCTION__, __LINE__, 'Module ' . $mod_chk . ' not found!');
}
// Free result
SQL_FREERESULT($result);
}
//* DEBUG: */ logDebugMessage(__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 ((isAdmin()) || (($locked != 'Y') && ($admin != 'Y') && (($mem != 'Y') || (isMember())))) {
// If you are admin you are welcome for everything!
$ret = 'done';
} elseif ($locked == 'Y') {
// Module is locked
$ret = 'locked';
} elseif (($mem == 'Y') && (!isMember())) {
// You have to login first!
$ret = 'mem_only';
} elseif (($admin == 'Y') && (!isAdmin())) {
// Only the Admin is allowed to enter this module!
$ret = 'admin_only';
} else {
// @TODO Nothing helped???
logDebugMessage(__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) && (!isExtensionActive('cache')) && ($ret != 'done')) {
// ----- Legacy module ----- ---- Module in base folder ---- --- Module with extension's name ---
if ((isIncludeReadable(sprintf("inc/modules/%s.php", $mod))) || (isIncludeReadable(sprintf("%s.php", $mod))) || (isIncludeReadable(sprintf("%s/%s.php", $extension, $mod)))) {
// Data is missing so we add it
if (isExtensionInstalledAndNewer('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
if ((getOutputMode() == '0') || (getOutputMode() == -1)) rebuildCacheFile('modules', 'modules');
// And reload data
unset($GLOBALS['module_status'][$mod]);
$ret = checkModulePermissions($mod_chk);
} else {
// Module not found we don't add it to the database
$ret = '404';
}
} elseif (($ret == 'cache_miss') && (getOutputMode() == '0')) {
// Rebuild the cache files
rebuildCacheFile('modules', 'modules');
} elseif ($found === false) {
// Problem with module detected
logDebugMessage(__FUNCTION__, __LINE__, sprintf("Problem in module %s detected. ret=%s, locked=%s, hidden=%s, mem=%s, admin=%s, output_mode=%s",
$mod,
$ret,
$locked,
$hidden,
$mem,
$admin,
getOutputMode()
));
}
// Return the value
//* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'ret=' . $ret);
$GLOBALS['module_status'][$mod] = $ret;
return $ret;
}
// Add menu description pending on given file name (without path!)
function addMenuDescription ($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 (!isAdmin()) {
$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 === false)) {
$GLOBALS['nav_depth'] = '0';
$prefix = "
{--YOU_ARE_HERE--} Home";
} else {
if ($return === false) $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 (((isExtensionInstalledAndNewer('sql_patches', '0.2.3')) && (getConfig('youre_here') == 'Y')) || ((isAdmin()) && ($modCheck == 'admin'))) {
// Output HTML code
$OUT = $prefix . "" . $ret . "\n";
// Can we close the you-are-here navigation?
//* DEBUG: */ print(__LINE__."*".$type.'/'.getWhat()."* ");
if (($type == 'what') || (($type == 'action') && ((!isWhatSet()) || (getWhat() == 'overview')))) {
//* DEBUG: */ print(__LINE__.'+'.$type."+ ");
// 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
outputHtml($OUT);
} else {
// Return HTML code
return $OUT;
}
}
// Adds a menu (mode = guest/member/admin/sponsor) to output
function addMenu ($mode, $action, $what) {
// Init some variables
$main_cnt = '0';
$AND = '';
// is the menu action valid?
if (!isMenuActionValid($mode, $action, $what, true)) {
return getCode('MENU_NOT_VALID');
} // END - if
// Non-admin shall not see all menus
if (!isAdmin()) {
$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` ASC",
array($mode), __FUNCTION__, __LINE__);
//* DEBUG: */ print(__LINE__.'/'.$main_cnt.':'.getWhat()."* ");
if (SQL_NUMROWS($result_main) > 0) {
// There are menus available, so we simply display them... :)
$GLOBALS['rows'] = '';
while ($content = SQL_FETCHARRAY($result_main)) {
//* DEBUG: */ print(__LINE__.'/'.$main_cnt.'/'.$content['action'].':'.getWhat()."* ");
// Init variables
enableBlockMode(false);
$action = $content['action'];
// Load menu header template
$GLOBALS['rows'] .= loadTemplate($mode . '_menu_title', true, $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
$totalWhats = SQL_NUMROWS($result_sub);
// Do we have some entries?
if ($totalWhats > 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: */ print(__LINE__.":!!!!".$content['sub_what']."!!! ");
$inc = sprintf("inc/modules/%s/what-%s.php", $mode, $content['sub_what']);
if (isIncludeReadable($inc)) {
// Mark currently selected menu - open
if ((!empty($what)) && (($what == $content['sub_what']))) {
$OUT = "";
} // END - if
// Navigation link
$OUT .= "";
} else {
// Not found! - open
$OUT .= "";
}
// Menu title
$OUT .= getConfig('menu_blur_spacer') . $content['sub_title'];
if (isIncludeReadable($inc)) {
$OUT .= "";
// Mark currently selected menu - close
if ((!empty($what)) && (($what == $content['sub_what']))) {
$OUT .= "";
} // END - if
} else {
// Not found! - close
$OUT .= "";
}
// Cunt it up
$cnt++;
// Rewrite array
$content = array(
'menu' => $OUT,
'what' => $content['sub_what']
);
// Add regular menu row or bottom row?
if ($cnt < $totalWhats) {
$GLOBALS['rows'] .= loadTemplate($mode . '_menu_row', true, $content);
} else {
$GLOBALS['rows'] .= loadTemplate($mode . '_menu_bottom', true, $content);
}
}
} else {
// This is a menu block... ;-)
enableBlockMode();
// Load menu block
$INC = sprintf("inc/modules/%s/action-%s.php", $mode, $content['action']);
if (isFileReadable($INC)) {
// Load include file
if ((!isExtensionActive($content['action'])) || ($content['action'] == 'online')) $GLOBALS['rows'] .= loadTemplate('menu_what_begin', true, $mode);
//* DEBUG: */ print(__LINE__.'/'.$main_cnt.'/'.$content['action'].'/'.getWhat()."* ");
loadInclude($INC);
//* DEBUG: */ print(__LINE__.'/'.$main_cnt.'/'.$content['action'].'/'.getWhat()."* ");
if ((!isExtensionActive($content['action'])) || ($content['action'] == 'online')) $GLOBALS['rows'] .= loadTemplate('menu_what_end', true, $mode);
}
//* DEBUG: */ print(__LINE__.'/'.$main_cnt.'/'.$content['action'].'/'.$content['sub_what'].':'.getWhat()."* ");
}
$main_cnt++;
//* DEBUG: */ print(__LINE__.'/'.$main_cnt.':'.getWhat()."* ");
if (SQL_NUMROWS($result_main) > $main_cnt) {
// Add seperator
$GLOBALS['rows'] .= loadTemplate('menu_seperator', true, $mode);
// Should we display adverts in this menu?
if ((isExtensionInstalledAndNewer('menu', '0.0.1')) && (getConfig($mode . '_menu_advert_enabled') == 'Y') && ($action != 'admin')) {
// Display advert template
$GLOBALS['rows'] .= loadTemplate('menu_' . $mode . '_advert_' . $action, true);
// Add seperator again
$GLOBALS['rows'] .= loadTemplate('menu_seperator', true, $mode);
} // END - if
} // END - if
} // END - while
// Free memory
SQL_FREERESULT($result_main);
// Should we display adverts in this menu?
if ((isExtensionInstalledAndNewer('menu', '0.0.1')) && (getConfig($mode . '_menu_advert_enabled') == 'Y')) {
// Add seperator again
$GLOBALS['rows'] .= loadTemplate('menu_seperator', true, $mode);
// Display advert template
$GLOBALS['rows'] .= loadTemplate('menu_' . $mode . '_advert_end', true);
} // END - if
// Prepare data
$content = array(
'rows' => $GLOBALS['rows'],
'mode' => $mode
);
// Load main template
//* DEBUG: */ print(__LINE__.'/'.$main_cnt.'/'.$content['action'].'/'.$content['sub_what'].':'.getWhat()."* ");
loadTemplate('menu_table', false, $content);
} // END - if
}
// Checks wether the current user is a member
function isMember () {
// By default no member
$ret = false;
// Fix missing 'last_online' array, damn stupid code :(((
// @TODO Try to rewrite this to one or more functions
if ((!isset($GLOBALS['last_online'])) || (!is_array($GLOBALS['last_online']))) $GLOBALS['last_online'] = array();
// is the cache entry there?
if (isset($GLOBALS['is_member'])) {
// Then return it
return $GLOBALS['is_member'];
} elseif (getMemberId() == '0') {
// No member
return false;
} else {
// Transfer userid=>current
setCurrentUserid(getMemberId());
}
// Init global user data array
initUserData();
// Fix "deleted" cookies first
fixDeletedCookies(array('userid', 'u_hash'));
// Are cookies set?
if ((isMemberIdSet()) && (isSessionVariableSet('u_hash'))) {
// Cookies are set with values, but are they valid?
if (fetchUserData(getMemberId()) === true) {
// Validate password by created the difference of it and the secret key
$valPass = generatePassString(getUserData('password'));
// Transfer last module and online time
$GLOBALS['last_online']['module'] = getUserData('last_module');
$GLOBALS['last_online']['online'] = getUserData('last_online');
// So did we now have valid data and an unlocked user?
if ((getUserData('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.
logDebugMessage(__FUNCTION__, __LINE__, 'status=' . getUserData('status'));
destroyMemberSession();
}
} else {
// Cookie data is invalid!
destroyMemberSession();
}
} else {
// Cookie data is invalid!
destroyMemberSession();
}
// Cache status
$GLOBALS['is_member'] = $ret;
// Return status
return $ret;
}
// Fetch user data for given user id
function fetchUserData ($userid, $column='userid') {
// If we should look for userid secure&set it here
if (substr($column, -2, 2) == 'id') {
// Secure userid
$userid = bigintval($userid);
// Set it here
setCurrentUserId($userid);
// Don't look for invalid userids...
if ($userid < 1) {
// Invalid, so abort here
debug_report_bug('User id ' . $userid . ' is invalid.');
} elseif (isUserDataValid()) {
// Use cache, so it is fine
return true;
}
} elseif (isUserDataValid()) {
// Use cache, so it is fine
return true;
}
// By default none was found
$found = false;
// Query for the user
$result = SQL_QUERY_ESC("SELECT * FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `%s`='%s' LIMIT 1",
array($column, $userid), __FUNCTION__, __LINE__);
// Do we have a record?
if (SQL_NUMROWS($result) == 1) {
// Load data from cookies
$data = SQL_FETCHARRAY($result);
// Set the userid for later use
setCurrentUserId($data['userid']);
$GLOBALS['user_data'][getCurrentUserId()] = $data;
// Rewrite 'last_failure' if found
if (isset($GLOBALS['user_data'][getCurrentUserId()]['last_failure'])) {
// Backup the raw one and zero it
$GLOBALS['user_data'][getCurrentUserId()]['last_failure_raw'] = $GLOBALS['user_data'][getCurrentUserId()]['last_failure'];
$GLOBALS['user_data'][getCurrentUserId()]['last_failure'] = '0';
// Is it not zero?
if ($GLOBALS['user_data'][getCurrentUserId()]['last_failure_raw'] != '0000-00-00 00:00:00') {
// Seperate data/time
$array = explode(' ', $GLOBALS['user_data'][getCurrentUserId()]['last_failure_raw']);
// Seperate data and time again
$array['date'] = explode('-', $array[0]);
$array['time'] = explode(':', $array[1]);
// Now pass it to mktime()
$GLOBALS['user_data'][getCurrentUserId()]['last_failure'] = mktime(
$array['time'][0],
$array['time'][1],
$array['time'][2],
$array['date'][1],
$array['date'][2],
$array['date'][0]
);
} // END - if
} // END - if
// Found, but valid?
$found = isUserDataValid();
} // END - if
// Free memory
SQL_FREERESULT($result);
// Return result
return $found;
}
// This patched function will reduce many SELECT queries for the specified or current admin login
function isAdmin ($admin = '') {
// Init variables
$ret = false; $passCookie = ''; $valPass = '';
//* DEBUG: */ print(__FUNCTION__.':'.$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');
} // END - if
//* DEBUG: */ print(__FUNCTION__.':'.$admin.'/'.$passCookie.' ');
// Do we have cache?
if (!isset($GLOBALS['is_admin'][$admin])) {
// Init it with failed
$GLOBALS['is_admin'][$admin] = false;
// Search in array for entry
if (isset($GLOBALS['admin_hash'])) {
// Use cached string
$valPass = $GLOBALS['admin_hash'];
} elseif ((!empty($passCookie)) && (isAdminHashSet($admin) === true) && (!empty($admin))) {
// Login data is valid or not?
$valPass = generatePassString(getAdminHash($admin));
// Cache it away
$GLOBALS['admin_hash'] = $valPass;
// Count cache hits
incrementStatsEntry('cache_hits');
} elseif ((!empty($admin)) && ((!isExtensionActive('cache'))) || (isAdminHashSet($admin) === false)) {
// 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
setAdminHash($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 . ')='.intval($valPass == $passCookie).' ');
$GLOBALS['is_admin'][$admin] = (($valPass == $passCookie) || ((strlen($valPass) == 32) && ($valPass == md5($passCookie))) || (($valPass == '*FAILED*') && (!isExtensionActive('cache'))));
} // END - if
} // END - if
// Return result of comparision
return $GLOBALS['is_admin'][$admin];
}
// 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!
logDebugMessage(__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 .= " ");
if (($mode != 'admin') && ($updateEntry === 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, $action, $what), __FUNCTION__, __LINE__, false);
} elseif (($what != 'overview') && (!empty($what))) {
// 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, $action, $what), __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, $action), __FUNCTION__, __LINE__, false);
}
// Run SQL command
$result = SQL_QUERY($sql, __FUNCTION__, __LINE__);
// Should we look for affected rows (only update) or found rows?
if ($updateEntry === 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['action_valid'][$mode][$action][$what] = $ret;
// Return result
return $ret;
}
// Send out mails depending on the 'mod/modes' combination
// @TODO Lame description for this function
function sendModeMails ($mod, $modes) {
// Load hash
if (fetchUserData(getMemberId())) {
// Extract salt from cookie
$salt = substr(getSession('u_hash'), 0, -40);
// Now let's compare passwords
$hash = generatePassString(getUserData('password'));
// Does the hash match or should we change it?
if (($hash == getSession('u_hash')) || (postRequestElement('pass1') == postRequestElement('pass2'))) {
// Load user's data 0 1 2 3 4 5 6 7
$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(getMemberId(), getUserData('password')), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Load the data
$content = SQL_FETCHARRAY($result, 0, false);
// Free result
SQL_FREERESULT($result);
// Translate gender
$content['gender'] = translateGender($content['gender']);
// Clear/init the content variable
$content['message'] = '';
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['message'] = getMessage('MEMBER_CHANGED_EMAIL').": ".postRequestElement('old_email')."\n";
break;
case 'pass': // Password was changed
$content['message'] = getMessage('MEMBER_CHANGED_PASS')."\n";
break;
default:
logDebugMessage(__FUNCTION__, __LINE__, sprintf("Unknown mode %s detected.", $mode));
$content['message'] = getMessage('MEMBER_UNKNOWN_MODE') . ': ' . $mode . "\n\n";
break;
} // END - switch
} // END - foreach
if (isExtensionActive('country')) {
// Replace code with description
$content['country'] = generateCountryInfo(postRequestElement('country_code'));
} // END - if
// Merge content with data from POST
$content = merge_array($content, postRequestArray());
// Load template
$message = loadEmailTemplate('member_mydata_notify', $content, getMemberId());
if (getConfig('admin_notify') == 'Y') {
// The admin needs to be notified about a profile change
$message_admin = 'admin_mydata_notify';
$sub_adm = getMessage('ADMIN_CHANGED_DATA');
} else {
// No mail to admin
$message_admin = '';
$sub_adm = '';
}
// Set subject lines
$sub_mem = getMessage('MEMBER_CHANGED_DATA');
// Output success message
$content = "{--MYDATA_MAIL_SENT--}";
break;
default: // Unsupported module!
logDebugMessage(__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($message))) {
// Send member mail
sendEmail($content['email'], $sub_mem, $message);
} // END - if
// Send only if no other error has occured
if (empty($content)) {
if ((!empty($sub_adm)) && (!empty($message_admin))) {
// Send admin mail
sendAdminNotification($sub_adm, $message_admin, $content, getMemberId());
} 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
loadTemplate('admin_settings_saved', false, $content);
}
// Get action value from mode (admin/guest/member) and what-value
function getModeAction ($mode, $what) {
// Init status
$ret = '';
//* DEBUG: */ print(__LINE__.'='.$mode.'/'.$what.'/'.getAction()."= ");
if ((empty($what)) && ($mode != 'admin')) {
$what = getConfig('index_home');
} // END - if
if ($mode == 'admin') {
// Action value for admin area
if (isGetRequestElementSet('action')) {
// Use from request!
return getRequestElement('action');
} elseif (isActionSet()) {
// Get it directly from URL
return getAction();
} elseif (($what == 'overview') || (!isWhatSet())) {
// Default value for admin area
$ret = 'login';
}
} elseif (isActionSet()) {
// Get it directly from URL
return getAction();
}
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."): ret=".$ret.' ');
// Does the module have a menu?
if (ifModuleHasMenu($mode)) {
// Rewriting modules to menu
$mode = mapModuleToTable($mode);
// 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, $what), __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 ((!isExtensionInstalled('sql_patches')) && ($mode != 'admin')) {
// No sql_patches installed, but maybe we need to register an admin?
if (isAdminRegistered()) {
// Redirect to admin area
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 === false) {
// 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, $userid, $pool_id, $stats_id = '', $bonus = false) {
// Default is not removed
$ret = 'failed';
// Is the userid valid?
if ($userid > 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($userid), $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($userid), $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 countSumTotalData ($search, $tableName, $lookFor = 'id', $whereStatement = 'userid', $countRows = false, $add = '') {
$ret = '0';
//* DEBUG: */ print($search.'/'.$tableName.'/'.$lookFor.'/'.$whereStatement.'/'.$add.' ');
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: */ print("COUNT! ");
$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: */ print("SUM! ");
$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
//* DEBUG: */ print 'ret='.$ret.' ';
return $ret;
}
// Getter fro ref level percents
function getReferalLevelPercents ($level) {
// Default is zero
$per = '0';
// Do we have cache?
if ((isset($GLOBALS['cache_array']['refdepths']['level'])) && (isExtensionActive('cache'))) {
// First look for level
$key = array_search($level, $GLOBALS['cache_array']['refdepths']['level']);
if ($key !== false) {
// Entry found!
$per = $GLOBALS['cache_array']['refdepths']['percents'][$key];
// Count cache hit
incrementStatsEntry('cache_hits');
} // END - if
} elseif (!isExtensionActive('cache')) {
// Get referal data
$result_level = 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_level) == 1) {
// Get percents
list($per) = SQL_FETCHROW($result_level);
} // END - if
// Free result
SQL_FREERESULT($result_level);
}
// Return percent
return $per;
}
/**
*
* Dynamic referal system, can also send mails!
*
* subject = Subject line, write in lower-case letters and underscore is allowed
* userid = Referal id wich should receive...
* points = ... xxx points
* sendNotify = shall I send the referal an email or not?
* rid = inc/modules/guest/what-confirm.php need this
* locked = Shall I pay it to normal (false) or locked (true) points ammount?
* add_mode = Add points only to $userid or also refs? (WARNING! Changing 'ref' to 'direct'
* for default value will cause no referal will get points ever!!!)
*/
function addPointsThroughReferalSystem ($subject, $userid, $points, $sendNotify = false, $rid = '0', $locked = false, $add_mode = 'ref') {
//* DEBUG: */ print("----------------------- ".__FUNCTION__." - ENTRY ------------------------
\n");
// Convert mode to lower-case
$add_mode = strtolower($add_mode);
// When $userid = '0' add points to jackpot
if (($userid == '0') && (isExtensionActive('jackpot'))) {
// Add points to jackpot
addPointsToJackpot($points);
return;
} // END - if
// Prepare data for the filter
$filterData = array(
'subject' => $subject,
'userid' => $userid,
'points' => $points,
'notify' => $sendNotify,
'rid' => $rid,
'locked' => $locked,
'mode' => 'add',
'sub_mode' => $add_mode,
);
// Filter it now
runFilterChain('add_points', $filterData);
// Count up referal depth
if (!isset($GLOBALS['ref_level'])) {
// Initialialize referal system
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."): Referal system initialized! ");
$GLOBALS['ref_level'] = '0';
} else {
// Increase referal level
$GLOBALS['ref_level']++;
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."): Referal level increased. DEPTH={$GLOBALS['ref_level']} ");
}
// Default is 'normal' points
$data = 'points';
// Which points, locked or normal?
if ($locked === true) $data = 'locked_points';
// Check user account
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):userid={$userid},points={$points} ");
if (fetchUserData($userid)) {
// This is the user and his ref
$GLOBALS['cache_array']['add_userid'][getUserData('refid')] = $userid;
// Get percents
$per = getReferalLevelPercents($GLOBALS['ref_level']);
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):userid={$userid},points={$points},depth={$GLOBALS['ref_level']},per={$per},mode={$add_mode} ");
// Some percents found?
if ($per > 0) {
// Calculate new points
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):userid={$userid},points={$points},per={$per},depth={$GLOBALS['ref_level']} ");
$ref_points = $points * $per / 100;
// Pay refback here if level > 0 and in ref-mode
if ((isExtensionActive('refback')) && ($GLOBALS['ref_level'] > 0) && ($per < 100) && ($add_mode == "ref") && (isset($GLOBALS['cache_array']['add_userid'][$userid]))) {
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):userid={$userid},data={$GLOBALS['cache_array']['add_userid'][$userid]},ref_points={$ref_points},depth={$GLOBALS['ref_level']} - BEFORE! ");
$ref_points = addRefbackPoints($GLOBALS['cache_array']['add_userid'][$userid], $userid, $points, $ref_points);
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):userid={$userid},data={$GLOBALS['cache_array']['add_userid'][$userid]},ref_points={$ref_points},depth={$GLOBALS['ref_level']} - AFTER! ");
} // 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($userid), bigintval($GLOBALS['ref_level'])), __FUNCTION__, __LINE__);
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):data={$data},ref_points={$ref_points},userid={$userid},depth={$GLOBALS['ref_level']},mode={$add_mode} - UPDATE! (".SQL_AFFECTEDROWS().") ");
// 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($userid), bigintval($GLOBALS['ref_level']), $ref_points), __FUNCTION__, __LINE__);
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):data={$data},ref_points={$ref_points},userid={$userid},depth={$GLOBALS['ref_level']},mode={$add_mode} - INSERTED! (".SQL_AFFECTEDROWS().") ");
} // END - if
// Points updated, maybe I shall send him an email?
if (($sendNotify === true) && (getUserData('refid') > 0) && ($locked === false)) {
// Prepare content
$content = array(
'percents' => $per,
'level' => bigintval($GLOBALS['ref_level']),
'points' => $ref_points,
'refid' => getUserData('refid')
);
// Load email template
$message = loadEmailTemplate('confirm-referal', $content, bigintval($userid));
sendEmail(getUserData('email'), THANX_REFERAL_ONE, $message);
} elseif (($sendNotify) && (getUserData('refid') == '0') && ($locked === false) && ($add_mode == 'direct')) {
// Prepare content
$content = array(
'text' => getMessage('REASON_DIRECT_PAYMENT'),
'points' => translateComma($ref_points)
);
// Load message
$message = loadEmailTemplate('add-points', $content, $userid);
// And sent it away
sendEmail(getUserData('email'), getMessage('SUBJECT_DIRECT_PAYMENT'), $message);
if (!isGetRequestElementSet('mid')) loadTemplate('admin_settings_saved', false, getMessage('ADMIN_POINTS_ADDED'));
}
// Maybe there's another ref?
if ((getUserData('refid') > 0) && ($points > 0) && (getUserData('refid') != $userid) && ($add_mode == 'ref')) {
// Then let's credit him here...
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):userid={$userid},ref=".getUserData('refid').",points={$points} - ADVANCE! ");
addPointsThroughReferalSystem(sprintf("%s_ref:%s", $subject, $GLOBALS['ref_level']), getUserData('refid'), $points, $sendNotify, getUserData('refid'), $locked);
} // END - if
} // END - if
} // END - if
//* DEBUG: */ print("
----------------------- ".__FUNCTION__." - EXIT ------------------------ ");
}
// Updates the referal counter
function updateReferalCounter ($userid) {
// Make it sure referal level zero (member him-/herself) is at least selected
if (empty($GLOBALS['cache_array']['ref_level'][$userid])) $GLOBALS['cache_array']['ref_level'][$userid] = 1;
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):userid={$userid},level={$GLOBALS['cache_array']['ref_level'][$userid]} ");
// Update counter
SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_refsystem` SET `counter`=`counter`+1 WHERE `userid`=%s AND `level`='%s' LIMIT 1",
array(bigintval($userid), $GLOBALS['cache_array']['ref_level'][$userid]), __FUNCTION__, __LINE__);
// When no entry was updated then we have to create it here
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):updated=".SQL_AFFECTEDROWS().' ');
if (SQL_AFFECTEDROWS() < 1) {
// First count!
SQL_QUERY_ESC("INSERT INTO `{?_MYSQL_PREFIX?}_refsystem` (`userid`, `level`, `counter`) VALUES (%s,%s,1)",
array(bigintval($userid), $GLOBALS['cache_array']['ref_level'][$userid]), __FUNCTION__, __LINE__);
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):userid={$userid} ");
} // END - if
// Init referal id
$ref = '0';
// Check for his referal
if (fetchUserData($userid)) {
// Get it
$ref = getUserData('refid');
} // END - if
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):userid={$userid},ref={$ref} ");
// When he has a referal...
if (($ref > 0) && ($ref != $userid)) {
// Move to next referal level and count his counter one up!
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):ref={$ref} - ADVANCE! ");
$GLOBALS['cache_array']['ref_level'][$userid]++;
updateReferalCounter($ref);
} elseif ((($ref == $userid) || ($ref == '0')) && (isExtensionInstalledAndNewer('cache', '0.1.2'))) {
// Remove cache here
//* DEBUG: */ print(__FUNCTION__."(".__LINE__."):ref={$ref} - CACHE! ");
rebuildCacheFile('refsystem', 'refsystem');
}
// "Walk" back here
$GLOBALS['cache_array']['ref_level'][$userid]--;
// Handle refback here if extension is installed
if (isExtensionActive('refback')) {
updateRefbackTable($userid);
} // 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 sendAdminEmails ($subj, $message) {
// 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, $message);
} // END - if
// Free result
SQL_FREERESULT($result);
// Really simple... ;-)
}
// Get id number from administrator's login name
function getAdminId ($login) {
// By default no admin is found
$ret = '-1';
// Check cache
if (isset($GLOBALS['cache_array']['admin']['admin_id'][$login])) {
// Use it if found to save SQL queries
$ret = $GLOBALS['cache_array']['admin']['admin_id'][$login];
// Update cache hits
incrementStatsEntry('cache_hits');
} elseif (!isExtensionActive('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 () {
// Do we have cache?
if (!isset($GLOBALS['current_admin_id'])) {
// Get the admin login from session
$adminLogin = getSession('admin_login');
// "Solve" it into an id
$adminId = getAdminId($adminLogin);
// Remember in cache securely
$GLOBALS['current_admin_id'] = bigintval($adminId);
} // END - if
// Return it
return $GLOBALS['current_admin_id'];
}
// Get password hash from administrator's login name
function getAdminHash ($admin) {
// By default an invalid hash is returned
$ret = '-1';
if (isAdminHashSet($admin)) {
// Check cache
$ret = $GLOBALS['cache_array']['admin']['password'][$admin];
// Update cache hits
incrementStatsEntry('cache_hits');
} elseif (!isExtensionActive('cache')) {
// Load from database
$result = SQL_QUERY_ESC("SELECT password FROM `{?_MYSQL_PREFIX?}_admins` WHERE `id`=%s LIMIT 1",
array($admin), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Fetch data
list($ret) = SQL_FETCHROW($result);
// Set cache
setAdminHash($admin, $ret);
} // END - if
// Free result
SQL_FREERESULT($result);
}
return $ret;
}
// "Getter" for admin login
function getAdminLogin ($adminId) {
// By default a non-existent login is returned (other functions react on this!)
$ret = '***';
if (isset($GLOBALS['cache_array']['admin']['login'][$adminId])) {
// Get cache
$ret = $GLOBALS['cache_array']['admin']['login'][$adminId];
// Update cache hits
incrementStatsEntry('cache_hits');
} elseif (!isExtensionActive('cache')) {
// Load from database
$result = SQL_QUERY_ESC("SELECT login FROM `{?_MYSQL_PREFIX?}_admins` WHERE `id`=%s LIMIT 1",
array(bigintval($adminId)), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Fetch data
list($ret) = SQL_FETCHROW($result);
// Set cache
$GLOBALS['cache_array']['admin']['login'][$adminId] = $ret;
} // END - if
// Free memory
SQL_FREERESULT($result);
}
return $ret;
}
// Get email address of admin id
function getAdminEmail ($adminId) {
// By default an invalid emails is returned
$ret = '***';
if (isset($GLOBALS['cache_array']['admin']['email'][$adminId])) {
// Get cache
$ret = $GLOBALS['cache_array']['admin']['email'][$adminId];
// Update cache hits
incrementStatsEntry('cache_hits');
} elseif (!isExtensionActive('cache')) {
// Load from database
$result_admin_id = SQL_QUERY_ESC("SELECT email FROM `{?_MYSQL_PREFIX?}_admins` WHERE `id`=%s LIMIT 1",
array(bigintval($adminId)), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result_admin_id) == 1) {
// Get data
list($ret) = SQL_FETCHROW($result_admin_id);
// Set cache
$GLOBALS['cache_array']['admin']['email'][$adminId] = $ret;
} // END - if
// Free result
SQL_FREERESULT($result_admin_id);
}
// Return email
return $ret;
}
// Get default ACL of admin id
function getAdminDefaultAcl ($adminId) {
// By default an invalid ACL value is returned
$ret = '***';
// Is sql_patches there and was it found in cache?
if (!isExtensionActive('sql_patches')) {
// Not found, which is bad, so we need to allow all
$ret = 'allow';
} elseif (isset($GLOBALS['cache_array']['admin']['def_acl'][$adminId])) {
// Use cache
$ret = $GLOBALS['cache_array']['admin']['def_acl'][$adminId];
// Update cache hits
incrementStatsEntry('cache_hits');
} elseif (!isExtensionActive('cache')) {
// Load from database
$result_admin_id = SQL_QUERY_ESC("SELECT `default_acl` FROM `{?_MYSQL_PREFIX?}_admins` WHERE `id`=%s LIMIT 1",
array(bigintval($adminId)), __FUNCTION__, __LINE__);
if (SQL_NUMROWS($result_admin_id) == 1) {
// Fetch data
list($ret) = SQL_FETCHROW($result_admin_id);
// Set cache
$GLOBALS['cache_array']['admin']['def_acl'][$adminId] = $ret;
}
// Free result
SQL_FREERESULT($result_admin_id);
}
// 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 FILTER_ACTIVATE_EXCHANGE () {
// Is the extension 'user' there?
if ((!isExtensionActive('user')) || (getConfig('activate_xchange') == '0')) {
// Silently abort here
return false;
} // END - if
// Check total amount of users
$totalUsers = countSumTotalData('CONFIRMED', 'user_data', 'userid', 'status', true, ' AND max_mails > 0');
if ($totalUsers >= getConfig('activate_xchange')) {
// Activate System
setSqlsArray(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",
));
// Run SQLs
runFilterChain('run_sqls');
// Update configuration
updateConfiguration('activate_xchange' ,0);
// Rebuild cache
rebuildCacheFile('modules', 'modules');
} // END - if
}
// Deletes a user account with given reason
function deleteUserAccount ($userid, $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($userid)), __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($userid)), __FUNCTION__, __LINE__);
// Update mediadata as well
if (getExtensionVersion('mediadata') >= '0.0.4') {
// Update database
updateMediadataEntry(array('total_points'), 'sub', $points);
} // END - if
// Now, when we have all his points adds them do the jackpot!
if (isExtensionActive('jackpot')) addPointsToJackpot($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($userid)), __FUNCTION__, __LINE__);
// Remove from rallye if found
if (isExtensionActive('rallye')) {
SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_rallye_users` WHERE `userid`=%s",
array(bigintval($userid)), __FUNCTION__, __LINE__);
} // END - if
// Now a mail to the user and that's all...
$message = loadEmailTemplate('del-user', array('text' => $reason), $userid);
sendEmail($userid, getMessage('ADMIN_DEL_ACCOUNT'), $message);
// Ok, delete the account!
SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `userid`=%s LIMIT 1", array(bigintval($userid)), __FUNCTION__, __LINE__);
}
// Generates meta description for given module and 'what' value
function generateMetaDescriptionCode ($mod, $what) {
// Exclude admin and member's area
if (($mod != 'admin') && ($mod != 'login')) {
// Construct dynamic description
$DESCR = '{?MAIN_TITLE?} '.trim(getConfig('title_middle')) . ' ' . addMenuDescription('guest', 'what-'.$what, true);
// Output it directly
outputHtml('');
} // END - if
// Remove depth
unset($GLOBALS['ref_level']);
}
// Gets the matching what name from module
function getWhatFromModule ($modCheck) {
// Is the request element set?
if (isGetRequestElementSet('what')) {
// Then return this!
return getRequestElement('what');
} // END - if
// Default is empty
$what = '';
//* DEBUG: */ print(__LINE__.'!'.$modCheck."! ");
switch ($modCheck) {
case 'admin':
$what = 'overview';
break;
case 'login':
case 'index':
// Is ext-sql_patches installed and newer than 0.0.5?
if (isExtensionInstalledAndNewer('sql_patches', '0.0.5')) {
// Use it from config
$what = getConfig('index_home');
} else {
// Use default 'welcome'
$what = 'welcome';
}
break;
default:
$what = '';
break;
} // END - switch
// Return what value
return $what;
}
// Subtract points from database and mediadata cache
function subtractPoints ($subject, $userid, $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($userid)), __FUNCTION__, __LINE__);
// Prepare filter data
$filterData = array(
'subject' => $subject,
'userid' => $userid,
'points' => $points,
'mode' => 'sub'
);
// Insert booking record
runFilterChain('sub_points', $filterData);
}
// "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 ".runFilterChain('exclude_users', $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 (!isAdmin()) {
// Abort here
return false;
} elseif (!isExtensionActive('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 (isExtensionActive('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 = '';
$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 = sprintf(" AND c.cat_id=%s", $cat);
} // END - if
// Exclude users in holiday?
if (getExtensionVersion('holiday') >= '0.1.3') {
// Add something for the holiday extension
$CAT_WHERE .= " AND d.`holiday_active`='N'";
} // END - if
if ((isExtensionActive('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.{?order_select?} {?order_mode?} LIMIT %s",
array(
$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.{?order_select?} {?order_mode?} LIMIT %s",
array(
$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, $userid = '0') {
// Default timestamp is zero
$stamp = '0';
// User id set?
if ((isMemberIdSet()) && ($userid == '0')) {
$userid = getMemberId();
} // END - if
// Is the extension installed and updated?
if ((!isExtensionActive('sql_patches')) || (isExtensionOlder('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($userid),
$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 ($userid, $type, $data) {
// Is the extension installed and updated?
if ((!isExtensionActive('sql_patches')) || (isExtensionOlder('sql_patches', '0.5.6'))) {
// Return zero here
return false;
} // END - if
// Does it exist?
if ((!getTimestampFromUserStats($type, $data, $userid)) && (!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($userid), $type, $data), __FUNCTION__, __LINE__);
} elseif (is_array($data)) {
// Invalid data!
logDebugMessage(__FUNCTION__, __LINE__, "userid={$userid},type={$type},data={".gettype($data).": Invalid statistics data type!");
}
}
// "Getter" for array for user refs and points in given level
function getUserReferalPoints ($userid, $level) {
//* DEBUG: */ print("----------------------- ".__FUNCTION__." - ENTRY ------------------------
\n");
// Default is no refs and no nickname
$add = '';
$refs = array();
// Do we have nickname extension installed?
if (isExtensionActive('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($userid),
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'] = countSumTotalData($row['refid'], 'user_points', 'points') - countSumTotalData($row['refid'], 'user_data', 'used_points');
// Get unconfirmed mails
$row['unconfirmed'] = countSumTotalData($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 ((isExtensionActive('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 ------------------------ ");
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($userid) = SQL_FETCHROW($result)) {
$UIDs[$userid] = $userid;
} // 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);
}
// Creates a new task
function createNewTask ($subject, $notes, $taskType, $userid = '0', $adminId = '0', $strip = true) {
// Insert the task data into the database
SQL_QUERY_ESC("INSERT INTO `{?_MYSQL_PREFIX?}_task_system` (`assigned_admin`, `userid`, `status`, `task_type`, `subject`, `text`, `task_created`) VALUES (%s,%s,'NEW','%s','%s','%s', UNIX_TIMESTAMP())",
array($adminId, $userid, $taskType, $subject, escapeQuotes($notes)), __FUNCTION__, __LINE__, true, $strip);
}
// Updates last module / online time
// @TODO Fix inconsistency between last_module and getWhat()
function updateLastActivity($userid) {
// Run the update query
SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `last_module`='%s', `last_online`=UNIX_TIMESTAMP(), `REMOTE_ADDR`='%s' WHERE `userid`=%s LIMIT 1",
array(
getWhat(),
detectRemoteAddr(),
bigintval($userid)
), __FUNCTION__, __LINE__);
}
// [EOF]
?>