".print_r($_CONFIG, true).""); if (($type == "what") || (($type == "action") && ((!isset($GLOBALS['what'])) || ($GLOBALS['what'] == "overview")))) { //* DEBUG: */ echo __LINE__."+".$type."+
| ");
//* DEBUG: */ echo __LINE__."/".$main_cnt."/".$main_action."/".$sub_what.":".$GLOBALS['what']."* \n"; include ($INC_BLOCK); //* DEBUG: */ echo __LINE__."/".$main_cnt."/".$main_action."/".$sub_what.":".$GLOBALS['what']."* \n"; if ((!EXT_IS_ACTIVE($main_action)) || ($main_action == "online")) OUTPUT_HTML(" |
";
debug_print_backtrace();
die("");
} // END - if
// Initialize variables
$uid = 0; $rid = 0; $MEM = "N"; $ADMIN = "N";
// Valid userid?
if ((!empty($GLOBALS['userid'])) && ($GLOBALS['userid'] > 0) && (IS_MEMBER())) {
// Is valid user
$uid = bigintval($GLOBALS['userid']);
$MEM = "Y";
} // END - if
if (IS_ADMIN()) {
// Is administrator
$ADMIN = "Y";
} // END - if
if (isSessionVariableSet('up_refid')) {
// Check cookie
if (get_session('refid') > 0) $rid = bigintval($GLOBALS['refid']);
} // END - if
// Now search for the user
$result = SQL_QUERY_ESC("SELECT timestamp FROM "._MYSQL_PREFIX."_online
WHERE sid='%s' LIMIT 1",
array($SID), __FILE__, __LINE__);
// Entry found?
if (SQL_NUMROWS($result) == 1) {
// Then update it
SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_online SET
module='%s',
action='%s',
what='%s',
userid=%s,
refid=%s,
is_member='%s',
is_admin='%s',
timestamp=UNIX_TIMESTAMP()
WHERE sid='%s' LIMIT 1",
array($mod, $act, $wht, $uid, $rid, $MEM, $ADMIN, $SID), __FILE__, __LINE__
);
} else {
// No entry does exists so we simply add it!
SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_online (module, action, what, userid, refid, is_member, is_admin, timestamp, sid, ip) VALUES ('%s','%s','%s', %s, %s, '%s','%s', UNIX_TIMESTAMP(), '%s','%s')",
array($mod, $act, $wht, $uid, $rid, $MEM, $ADMIN, $SID, GET_REMOTE_ADDR()), __FILE__, __LINE__
);
}
// Free result
SQL_FREERESULT($result);
// Purge old entries
$result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_online WHERE timestamp <= (UNIX_TIMESTAMP() - %s)",
array($_CONFIG['online_timeout']), __FILE__, __LINE__);
}
// OBSULETE: Sends out mail to all administrators
function SEND_ADMIN_EMAILS($subj, $msg) {
// Load all admin email addresses
$result = SQL_QUERY("SELECT email FROM "._MYSQL_PREFIX."_admins ORDER BY id ASC", __FILE__, __LINE__);
while (list($email) = SQL_FETCHROW($result)) {
// Send the email out
SEND_EMAIL($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) {
global $cacheArray, $_CONFIG;
$ret = "-1";
if (!empty($cacheArray['admins']['aid'][$login])) {
// Check cache
$ret = $cacheArray['admins']['aid'][$login];
// Update cache hits
$_CONFIG['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), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
list($ret) = SQL_FETCHROW($result);
} // END - if
// Free result
SQL_FREERESULT($result);
}
return $ret;
}
//
// Get password hash from administrator's login name
function GET_ADMIN_HASH($login)
{
global $cacheArray, $_CONFIG;
$ret = "-1";
if (!empty($cacheArray['admins']['password'][$login])) {
// Check cache
$ret = $cacheArray['admins']['password'][$login];
// Update cache hits
$_CONFIG['cache_hits']++;
} elseif (!EXT_IS_ACTIVE("cache")) {
// Load from database
$result = SQL_QUERY_ESC("SELECT password FROM "._MYSQL_PREFIX."_admins WHERE login='%s' LIMIT 1",
array($login), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Fetch data
list($ret) = SQL_FETCHROW($result);
// Set cache
$cacheArray['admins']['password'][$login] = $ret;
}
// Free result
SQL_FREERESULT($result);
}
return $ret;
}
//
function GET_ADMIN_LOGIN ($aid) {
global $cacheArray, $_CONFIG;
$ret = "***";
if (!empty($cacheArray['admins']['login'][$aid])) {
// Get cache
$ret = $cacheArray['admins']['login'][$aid];
// Update cache hits
$_CONFIG['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)), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Fetch data
list($ret) = SQL_FETCHROW($result);
// Set cache
$cacheArray['admins']['login'][$aid] = $ret;
} // END - if
// Free memory
SQL_FREERESULT($result);
}
return $ret;
}
// Get email address of admin id
function GET_ADMIN_EMAIL ($aid) {
global $cacheArray, $_CONFIG;
$ret = "***";
if (!empty($cacheArray['admins']['email'])) {
// Get cache
$ret = $cacheArray['admins']['email'][$aid];
// Update cache hits
$_CONFIG['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($ret)), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Get data
list($ret) = SQL_FETCHROW($result_aid);
// Set cache
$cacheArray['admins']['email'][$aid] = $ret;
} // END - if
// Free result
SQL_FREERESULT($result_aid);
}
// Return email
return $ret;
}
// Get default ACL of admin id
function GET_ADMIN_DEFAULT_ACL ($aid) {
global $cacheArray, $_CONFIG;
$ret = "***";
if (!empty($cacheArray['admins']['def_acl'])) {
// Use cache
$ret = $cacheArray['admins']['def_acl'][$aid];
// Update cache hits
$_CONFIG['cache_hits']++;
} else {
// Load from database
$result_aid = SQL_QUERY_ESC("SELECT default_acl FROM "._MYSQL_PREFIX."_admins WHERE id=%s LIMIT 1",
array(bigintval($ret)), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Fetch data
list($ret) = SQL_FETCHROW($result_aid);
// Set cache
$cacheArray['admins']['def_acl'][$aid] = $ret;
}
// Free result
SQL_FREERESULT($result_aid);
}
// Return email
return $ret;
}
//
function ADD_OPTION_LINES($table, $id, $name, $default="",$special="",$where="") {
$ret = "";
if ($table == "/ARRAY/") {
// Selection from array
if (is_array($id) && is_array($name) && sizeof($id) == sizeof($name)) {
// Both are arrays
foreach ($id as $idx => $value) {
$ret .= "\n";
}
}
// Return - hopefully - the requested data
return $ret;
}
// Activate exchange (DEPERECATED???)
function activateExchange() {
global $_CONFIG;
$result = SQL_QUERY("SELECT userid FROM "._MYSQL_PREFIX."_user_data WHERE status='CONFIRMED' AND max_mails > 0", __FILE__, __LINE__);
if (SQL_NUMROWS($result) >= $_CONFIG['activate_xchange'])
{
// Free memory
SQL_FREERESULT($result);
// Activate System
$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
foreach ($SQLs as $sql) {
$result = SQL_QUERY($sql, __FILE__, __LINE__);
}
// @TODO Destroy cache
}
}
//
function DELETE_USER_ACCOUNT($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)), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Save his points to add them to the jackpot
list($points) = SQL_FETCHROW($result);
SQL_FREERESULT($result);
// Delete points entries as well
$result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_user_points WHERE userid=%s", array(bigintval($uid)), __FILE__, __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);
}
// Delete category selections as well...
$result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_user_cats WHERE userid=%s",
array(bigintval($uid)), __FILE__, __LINE__);
// Remove from rallye if found
if (EXT_IS_ACTIVE("rallye")) {
$result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_rallye_users WHERE userid=%s",
array(bigintval($uid)), __FILE__, __LINE__);
}
// Now a mail to the user and that's all...
$msg = LOAD_EMAIL_TEMPLATE("del-user", array('text' => $reason), $uid);
SEND_EMAIL($uid, ADMIN_DEL_ACCOUNT, $msg);
// Ok, delete the account!
$result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s LIMIT 1", array(bigintval($uid)), __FILE__, __LINE__);
}
//
function META_DESCRIPTION($mod, $wht)
{
global $_CONFIG, $DEPTH;
if (($mod != "admin") && ($mod != "login"))
{
// Exclude admin and member's area
$DESCR = MAIN_TITLE." ".trim($_CONFIG['title_middle'])." ".ADD_DESCR("guest", "what-".$wht, true);
unset($DEPTH);
OUTPUT_HTML("");
}
}
//
function ADD_JACKPOT($points)
{
$result = SQL_QUERY("SELECT points FROM "._MYSQL_PREFIX."_jackpot WHERE ok='ok' LIMIT 1", __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 0)
{
// Create line
$result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_jackpot (ok, points) VALUES ('ok','%s')", array($points), __FILE__, __LINE__);
}
else
{
// Free memory
SQL_FREERESULT($result);
// Update points
$result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_jackpot SET points=points+%s WHERE ok='ok' LIMIT 1",
array($points), __FILE__, __LINE__);
}
}
//
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", __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 0)
{
// Create line
$result = SQL_QUERY("INSERT INTO "._MYSQL_PREFIX."_jackpot (ok, points) VALUES ('ok', 0.00000)", __FILE__, __LINE__);
}
else
{
// Free memory
SQL_FREERESULT($result);
// Read points
list($jackpot) = SQL_FETCHROW($result);
if ($jackpot >= $points)
{
// Update points when there are enougth points in jackpot
$result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_jackpot SET points=points-%s WHERE ok='ok' LIMIT 1",
array($points), __FILE__, __LINE__);
$ret = $jackpot - $points;
}
}
}
//
function IS_DEMO() {
return ((EXT_IS_ACTIVE("demo")) && (get_session('admin_login') == "demo"));
}
//
function LOAD_CONFIG($no="0") {
global $cacheArray;
$CFG_DUMMY = array();
// Check for cache extension, cache-array and if the requested configuration is in cache
if ((is_array($cacheArray)) && (isset($cacheArray['config'][$no])) && (is_array($cacheArray['config'][$no]))) {
// Load config from cache
//* DEBUG: */ echo gettype($cacheArray['config'][$no])."