\n";
$OUT .= "\n";
- if (ereg('Y', $display) || (empty($display)))
- {
+
+ if (ereg('Y', $display) || (empty($display))) {
$OUT .= " "._YEARS." | \n";
}
- if (ereg("M", $display) || (empty($display)))
- {
+
+ if (ereg("M", $display) || (empty($display))) {
$OUT .= " "._MONTHS." | \n";
}
- if (ereg("W", $display) || (empty($display)))
- {
+
+ if (ereg("W", $display) || (empty($display))) {
$OUT .= " "._WEEKS." | \n";
}
- if (ereg("D", $display) || (empty($display)))
- {
+
+ if (ereg("D", $display) || (empty($display))) {
$OUT .= " "._DAYS." | \n";
}
- if (ereg("h", $display) || (empty($display)))
- {
+
+ if (ereg("h", $display) || (empty($display))) {
$OUT .= " "._HOURS." | \n";
}
- if (ereg("m", $display) || (empty($display)))
- {
+
+ if (ereg("m", $display) || (empty($display))) {
$OUT .= " "._MINUTES." | \n";
}
- if (ereg("s", $display) || (empty($display)))
- {
+
+ if (ereg("s", $display) || (empty($display))) {
$OUT .= " "._SECONDS." | \n";
}
+
$OUT .= "
\n";
$OUT .= "\n";
- if (ereg('Y', $display) || (empty($display)))
- {
+
+ if (ereg('Y', $display) || (empty($display))) {
// Generate year selection
$OUT .= " | \n";
- }
- else
- {
+ } else {
$OUT .= "\n";
}
- if (ereg("M", $display) || (empty($display)))
- {
+
+ if (ereg("M", $display) || (empty($display))) {
// Generate month selection
$OUT .= " | \n";
- }
- else
- {
+ } else {
$OUT .= "\n";
}
- if (ereg("W", $display) || (empty($display)))
- {
+
+ if (ereg("W", $display) || (empty($display))) {
// Generate week selection
$OUT .= " | \n";
- }
- else
- {
+ } else {
$OUT .= "\n";
}
- if (ereg("D", $display) || (empty($display)))
- {
+
+ if (ereg("D", $display) || (empty($display))) {
// Generate day selection
$OUT .= " | \n";
- }
- else
- {
+ } else {
$OUT .= "\n";
}
- if (ereg("h", $display) || (empty($display)))
- {
+
+ if (ereg("h", $display) || (empty($display))) {
// Generate hour selection
$OUT .= " | \n";
- }
- else
- {
+ } else {
$OUT .= "\n";
}
- if (ereg("m", $display) || (empty($display)))
- {
+
+ if (ereg("m", $display) || (empty($display))) {
// Generate minute selection
$OUT .= " | \n";
- }
- else
- {
+ } else {
$OUT .= "\n";
}
- if (ereg("s", $display) || (empty($display)))
- {
+
+ if (ereg("s", $display) || (empty($display))) {
// Generate second selection
$OUT .= " | \n";
- }
- else
- {
+ } else {
$OUT .= "\n";
}
$OUT .= "
\n";
@@ -1494,14 +1541,16 @@ function CREATE_TIME_SELECTIONS($timestamp, $prefix="", $display="", $align="cen
return $OUT;
}
//
-function CREATE_TIMESTAMP_FROM_SELECTIONS($prefix, $POST) {
- $ret = "0";
+function CREATE_TIMESTAMP_FROM_SELECTIONS ($prefix, $POST) {
+ // Initial return value
+ $ret = 0;
+
// Do we have a leap year?
$SWITCH = 0;
$TEST = date('Y', time()) / 4;
$M1 = date("m", time());
// If so and if current time is before 02/29 and estimated time is after 02/29 then add 86400 seconds (one day)
- if ((floor($TEST) == $TEST) && ($M1 == "02") && ($POST[$prefix."_mo"] > "02")) $SWITCH = ONE_DAY;
+ if ((floor($TEST) == $TEST) && ($M1 == "02") && ($POST[$prefix."_mo"] > "02")) $SWITCH = getConfig('one_day');
// First add years...
$ret += $POST[$prefix."_ye"] * (31536000 + $SWITCH);
// Next months...
@@ -1528,18 +1577,18 @@ function SEND_ADMIN_EMAILS_PRO($subj, $template, $content, $UID) {
// Load email template
$msg = LOAD_EMAIL_TEMPLATE($template, $content, $UID);
- if (GET_EXT_VERSION("admins") < "0.4.0") {
+ if (EXT_VERSION_IS_OLDER("admins", "0.4.0")) {
// Older version detected!
return SEND_ADMIN_EMAILS($subj, $msg);
- }
+ } // END - if
// Check which admin shall receive this mail
$result = SQL_QUERY_ESC("SELECT DISTINCT admin_id FROM "._MYSQL_PREFIX."_admins_mails WHERE mail_template='%s' ORDER BY admin_id",
- array($template), __FILE__, __LINE__);
+ array($template), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 0) {
// Create new entry (to all admins)
- $result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_admins_mails (admin_id, mail_template) VALUES (0, '%s')",
- array($template), __FILE__, __LINE__);
+ SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_admins_mails (admin_id, mail_template) VALUES (0, '%s')",
+ array($template), __FILE__, __LINE__);
} else {
// Load admin IDs...
$aids = array();
@@ -1574,21 +1623,29 @@ function SEND_ADMIN_EMAILS_PRO($subj, $template, $content, $UID) {
SQL_FREERESULT($result);
}
//
-function CREATE_FANCY_TIME($stamp) {
+function CREATE_FANCY_TIME ($stamp) {
// Get data array with years/months/weeks/days/...
$data = CREATE_TIME_SELECTIONS($stamp, "", "", "", true);
$ret = "";
- foreach($data as $k=>$v) {
+ foreach($data as $k => $v) {
if ($v > 0) {
// Value is greater than 0 "eval" data to return string
$eval = "\$ret .= \", \".\$v.\" \"._".strtoupper($k).";";
eval($eval);
break;
- }
+ } // END - if
+ } // END - foreach
+
+ // Do we have something there?
+ if (strlen($ret) > 0) {
+ // Remove leading commata and space
+ $ret = substr($ret, 2);
+ } else {
+ // Zero seconds
+ $ret = "0 "._SECONDS;
}
- // Remove first "comma,null" string
- $ret = substr($ret, 2);
+ // Return fancy time string
return $ret;
}
//
@@ -1667,7 +1724,7 @@ function EXTRACT_HOST (&$script) {
if (ereg("/", $host)) $host = substr($host, 0, strpos($host, "/"));
// Generate relative URL
- //* DEBUG */ print("SCRIPT=".$script."
\n");
+ //* DEBUG: */ print("SCRIPT=".$script."
\n");
if (substr(strtolower($script), 0, 7) == "http://") {
// But only if http:// is in front!
$script = substr($script, (strlen($url) + 7));
@@ -1676,7 +1733,7 @@ function EXTRACT_HOST (&$script) {
$script = substr($script, (strlen($url) + 8));
}
- //* DEBUG */ print("SCRIPT=".$script."
\n");
+ //* DEBUG: */ print("SCRIPT=".$script."
\n");
if (substr($script, 0, 1) == "/") $script = substr($script, 1);
// Return host name
@@ -1712,6 +1769,7 @@ function POST_URL ($script, $postData) {
// Is postData an array?
if (!is_array($postData)) {
// Abort here
+ DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("postData is not an array. Type: %s", gettype($postData)));
return array("", "", "");
} // END - if
@@ -1722,7 +1780,7 @@ function POST_URL ($script, $postData) {
$host = EXTRACT_HOST($script);
// Construct request
- $data = http_build_query($postData, '', '&');
+ $data = http_build_query($postData, '','&');
// Generate POST request header
$request = "POST /" . trim($script) . " HTTP/1.1\r\n";
@@ -1744,8 +1802,6 @@ function POST_URL ($script, $postData) {
// Sends a raw request to another host
function SEND_RAW_REQUEST ($host, $request) {
- global $_CONFIG;
-
// Initialize array
$response = array("", "", "");
@@ -1753,15 +1809,15 @@ function SEND_RAW_REQUEST ($host, $request) {
$useProxy = false;
// Are proxy settins set?
- if ((!empty($_CONFIG['proxy_host'])) && ($_CONFIG['proxy_port'] > 0)) {
+ if ((getConfig('proxy_host') != "") && (getConfig('proxy_port') > 0)) {
// Then use it
$useProxy = true;
} // END - if
// Open connection
- //* DEBUG */ die("SCRIPT=".$script."
\n");
+ //* DEBUG: */ die("SCRIPT=".$script."
\n");
if ($useProxy) {
- $fp = @fsockopen(COMPILE_CODE($_CONFIG['proxy_host']), $_CONFIG['proxy_port'], $errno, $errdesc, 30);
+ $fp = @fsockopen(COMPILE_CODE(getConfig('proxy_host')), getConfig('proxy_port'), $errno, $errdesc, 30);
} else {
$fp = @fsockopen($host, 80, $errno, $errdesc, 30);
}
@@ -1779,9 +1835,9 @@ function SEND_RAW_REQUEST ($host, $request) {
$proxyTunnel .= "Host: ".$host."\r\n";
// Use login data to proxy? (username at least!)
- if (!empty($_CONFIG['proxy_username'])) {
+ if (getConfig('proxy_username') != "") {
// Add it as well
- $encodedAuth = base64_encode(COMPILE_CODE($_CONFIG['proxy_username']).":".COMPILE_CODE($_CONFIG['proxy_password']));
+ $encodedAuth = base64_encode(COMPILE_CODE(getConfig('proxy_username')).":".COMPILE_CODE(getConfig('proxy_password')));
$proxyTunnel .= "Proxy-Authorization: Basic ".$encodedAuth."\r\n";
} // END - if
@@ -1931,7 +1987,7 @@ function ADD_CATEGORY_TABLE ($MODE, $return=false) {
return REGISTER_ADD_CATEGORY_TABLE ($MODE, $return);
}
// Generate an email link
-function CREATE_EMAIL_LINK($email, $table="admins") {
+function CREATE_EMAIL_LINK ($email, $table = "admins") {
// Default email link (INSECURE! Spammer can read this by harvester programs)
$EMAIL = "mailto:".$email;
@@ -1939,7 +1995,7 @@ function CREATE_EMAIL_LINK($email, $table="admins") {
if ((EXT_IS_ACTIVE("admins")) && ($table == "admins")) {
// Create email link for contacting admin in guest area
$EMAIL = ADMINS_CREATE_EMAIL_LINK($email);
- } elseif ((EXT_IS_ACTIVE("user", true)) && (GET_EXT_VERSION("user") >= "0.3.3") && ($table == "user_data")) {
+ } elseif ((EXT_IS_ACTIVE("user")) && (GET_EXT_VERSION("user") >= "0.3.3") && ($table == "user_data")) {
// Create email link for contacting a member within admin area (or later in other areas, too?)
$EMAIL = USER_CREATE_EMAIL_LINK($email);
} elseif ((EXT_IS_ACTIVE("sponsor")) && ($table == "sponsor_data")) {
@@ -1955,50 +2011,50 @@ function CREATE_EMAIL_LINK($email, $table="admins") {
}
// Generate a hash for extra-security for all passwords
function generateHash ($plainText, $salt = "") {
- global $_CONFIG, $_SERVER;
+ global $_SERVER;
// Is the required extension "sql_patches" there and a salt is not given?
- if (((GET_EXT_VERSION("sql_patches") < "0.3.6") || (GET_EXT_VERSION("sql_patches") == "")) && (empty($salt))) {
- // Extension sql_patches is missing/outdated so we return the plain text
- return $plainText;
+ if (((EXT_VERSION_IS_OLDER("sql_patches", "0.3.6")) || (!EXT_IS_ACTIVE("sql_patches"))) && (empty($salt))) {
+ // Extension sql_patches is missing/outdated so we hash the plain text with MD5
+ return md5($plainText);
} // END - if
// Do we miss an arry element here?
- if (!isset($_CONFIG['file_hash'])) {
+ if (getConfig('file_hash') == null) {
// Stop here
- print(__FUNCTION__.":");
+ print("Missing file_hash in ".__FUNCTION__.". Backtrace:");
debug_print_backtrace();
die("
");
} // END - if
// When the salt is empty build a new one, else use the first x configured characters as the salt
- if ($salt == "") {
+ if (empty($salt)) {
// Build server string
- $server = $_SERVER['PHP_SELF'].":".getenv('HTTP_USER_AGENT').":".getenv('SERVER_SOFTWARE').":".getenv('REMOTE_ADDR').":".":".filemtime(PATH."inc/databases.php");
+ $server = $_SERVER['PHP_SELF'].":".GET_USER_AGENT().":".getenv('SERVER_SOFTWARE').":".GET_REMOTE_ADDR().":".":".filemtime(PATH."inc/databases.php");
// Build key string
- $keys = SITE_KEY.":".DATE_KEY.":".$_CONFIG['secret_key'].":".$_CONFIG['file_hash'].":".date("d-m-Y (l-F-T)", $_CONFIG['patch_ctime']).":".$_CONFIG['master_salt'];
+ $keys = SITE_KEY.":".DATE_KEY.":".getConfig('secret_key').":".getConfig('file_hash').":".date("d-m-Y (l-F-T)", bigintval(getConfig('patch_ctime'))).":".getConfig('master_salt');
// Additional data
- $data = $plainText.":".uniqid(rand(), true).":".time();
+ $data = $plainText.":".uniqid(mt_rand(), true).":".time();
// Calculate number for generating the code
$a = time() + _ADD - 1;
// Generate SHA1 sum from modula of number and the prime number
$sha1 = sha1(($a % _PRIME).$server.":".$keys.":".$data.":".date("d-m-Y (l-F-T)", time()).":".$a);
- //* DEBUG: */ echo "SHA1=".$sha1." (".strlen($sha1).")
";
+ //* DEBUG: */ echo "SHA1=".$sha1." (".strlen($sha1).")
";
$sha1 = scrambleString($sha1);
- //* DEBUG: */ echo "Scrambled=".$sha1." (".strlen($sha1).")
";
+ //* DEBUG: */ echo "Scrambled=".$sha1." (".strlen($sha1).")
";
//* DEBUG: */ $sha1b = descrambleString($sha1);
- //* DEBUG: */ echo "Descrambled=".$sha1b." (".strlen($sha1b).")
";
+ //* DEBUG: */ echo "Descrambled=".$sha1b." (".strlen($sha1b).")
";
// Generate the password salt string
- $salt = substr($sha1, 0, $_CONFIG['salt_length']);
+ $salt = substr($sha1, 0, getConfig('salt_length'));
//* DEBUG: */ echo $salt." (".strlen($salt).")
";
} else {
// Use given salt
- $salt = substr($salt, 0, $_CONFIG['salt_length']);
+ $salt = substr($salt, 0, getConfig('salt_length'));
//* DEBUG: */ echo "GIVEN={$salt}
\n";
}
@@ -2007,8 +2063,6 @@ function generateHash ($plainText, $salt = "") {
}
//
function scrambleString($str) {
- global $_CONFIG;
-
// Init
$scrambled = "";
@@ -2018,7 +2072,7 @@ function scrambleString($str) {
return $str;
} elseif (strlen($str) == 40) {
// From database
- $scrambleNums = explode(":", $_CONFIG['pass_scramble']);
+ $scrambleNums = explode(":", getConfig('pass_scramble'));
} else {
// Generate new numbers
$scrambleNums = explode(":", genScrambleString(strlen($str)));
@@ -2040,12 +2094,11 @@ function scrambleString($str) {
}
//
function descrambleString($str) {
- global $_CONFIG;
// Scramble only 40 chars long strings
if (strlen($str) != 40) return $str;
// Load numbers from config
- $scrambleNums = explode(":", $_CONFIG['pass_scramble']);
+ $scrambleNums = explode(":", getConfig('pass_scramble'));
// Validate numbers
if (count($scrambleNums) != 40) return $str;
@@ -2086,10 +2139,10 @@ function genScrambleString($len) {
$scrambleString = implode(":", $scrambleNumbers);
return $scrambleString;
}
-// Append data like session ID referral ID to the given URL which would
+// Append data like session ID or referal ID to the given URL which would
// normally be stored in cookies
-function ADD_URL_DATA($URL) {
- global $_CONFIG;
+function ADD_URL_DATA ($URL) {
+ // Init add
$ADD = "";
// Determine URL binder
@@ -2101,9 +2154,9 @@ function ADD_URL_DATA($URL) {
if ((!empty($_GET['refid'])) && (strpos($URL, "refid=") == 0)) {
// Cookie found in URL
$ADD .= $BIND."refid=".bigintval($_GET['refid']);
- } elseif ((GET_EXT_VERSION("sql_patches") != '') && ($_CONFIG['def_refid'] > 0)) {
+ } elseif ((GET_EXT_VERSION("sql_patches") != '') && (getConfig('def_refid') > 0)) {
// Not found! So let's set default here
- $ADD .= $BIND."refid=".$_CONFIG['def_refid'];
+ $ADD .= $BIND."refid=".getConfig('def_refid');
}
// Is there already added data? Then change the binder
@@ -2124,18 +2177,16 @@ function ADD_URL_DATA($URL) {
}
// Generate an PGP-like encrypted hash of given hash for e.g. cookies
function generatePassString($passHash) {
- global $_CONFIG;
-
// Return vanilla password hash
$ret = $passHash;
// Is a secret key and master salt already initialized?
- if ((!empty($_CONFIG['secret_key'])) && (!empty($_CONFIG['master_salt']))) {
+ if ((getConfig('secret_key') != "") && (getConfig('master_salt') != "")) {
// Only calculate when the secret key is generated
$newHash = ""; $start = 9;
for ($idx = 0; $idx < 10; $idx++) {
$part1 = hexdec(substr($passHash, $start, 4));
- $part2 = hexdec(substr($_CONFIG['secret_key'], $start, 4));
+ $part2 = hexdec(substr(getConfig('secret_key'), $start, 4));
$mod = dechex($idx);
if ($part1 > $part2) {
$mod = dechex(sqrt(($part1 - $part2) * _PRIME / pi()));
@@ -2144,13 +2195,13 @@ function generatePassString($passHash) {
}
$mod = substr(round($mod), 0, 4);
$mod = str_repeat('0', 4-strlen($mod)).$mod;
- //* DEBUG: */ echo "*".$start."=".$mod."*
";
+ //* DEBUG: */ echo "*".$start."=".$mod."*
";
$start += 4;
$newHash .= $mod;
} // END - for
- //* DEBUG: */ print($passHash."
".$newHash." (".strlen($newHash).")");
- $ret = generateHash($newHash, $_CONFIG['master_salt']);
+ //* DEBUG: */ print($passHash."
".$newHash." (".strlen($newHash).")");
+ $ret = generateHash($newHash, getConfig('master_salt'));
//* DEBUG: */ print($ret."
\n");
} else {
// Hash it simple
@@ -2193,14 +2244,14 @@ function mxchange_die ($msg) {
// Display parsing time and number of SQL queries in footer
function DISPLAY_PARSING_TIME_FOOTER() {
- global $startTime, $_CONFIG;
- $endTime = microtime(true);
-
// Is the timer started?
if (!isset($GLOBALS['startTime'])) {
// Abort here
return false;
- }
+ } // END - if
+
+ // Get end time
+ $endTime = microtime(true);
// "Explode" both times
$start = explode(" ", $GLOBALS['startTime']);
@@ -2212,8 +2263,8 @@ function DISPLAY_PARSING_TIME_FOOTER() {
// Prepare output
$content = array(
'runtime' => $runTime,
- 'numSQLs' => ($_CONFIG['sql_count'] + 1),
- 'numTemplates' => ($_CONFIG['num_templates'] + 1)
+ 'numSQLs' => (getConfig('sql_count') + 1),
+ 'numTemplates' => (getConfig('num_templates') + 1)
);
// Load the template
@@ -2243,46 +2294,74 @@ function set_session ($var, $value) {
return session_register($var);
} elseif (!empty($value)) {
// Update session
+ //* DEBUG: */ echo "UPDATE:".$var."=".$value."
\n";
$_SESSION[$var] = $value;
- } else {
- // Something bad happens!
- return false; // Hope this doesn't make so much trouble???
+ return true;
}
- // Return always true if the session variable is already set.
- // Keept me busy for a longer while...
+ // Ignored (but valid)
//* DEBUG: */ echo "IGNORED:".$var."=".$value."
\n";
return true;
}
// Check wether a boolean constant is set
// Taken from user comments in PHP documentation for function constant()
-function isBooleanConstantAndTrue($constname) { // : Boolean
+function isBooleanConstantAndTrue($constName) { // : Boolean
+ global $cacheArray;
+
+ // Failed by default
$res = false;
- if (defined($constname)) $res = (constant($constname) === true);
- return($res);
+
+ // In cache?
+ if (isset($cacheArray['const'][$constName])) {
+ // Use cache
+ //* DEBUG: */ print __FUNCTION__."(".__LINE__."): ".$constName."-CACHE!
\n";
+ $res = $cacheArray['const'][$constName];
+ } else {
+ // Check constant
+ //* DEBUG: */ print __FUNCTION__."(".__LINE__."): ".$constName."-RESOLVE!
\n";
+ if (defined($constName)) $res = (constant($constName) === true);
+
+ // Set cache
+ $cacheArray['const'][$constName] = $res;
+ }
+ //* DEBUG: */ var_dump($res);
+
+ // Return value
+ return $res;
}
// Check wether a session variable is set
-function isSessionVariableSet($var) {
+function isSessionVariableSet ($var) {
+ //* DEBUG: */ print __FUNCTION__."(".__LINE__."):var={$var}
\n";
return (isset($_SESSION[$var]));
}
// Returns wether the value of the session variable or NULL if not set
-function get_session($var) {
+function get_session ($var) {
+ global $cacheArray;
+
// Default is not found! ;-)
$value = null;
- // Is the variable there?
- if (isSessionVariableSet($var)) {
+ // Is the variable there or cached values?
+ if (isset($cacheArray['session'][$var])) {
+ // Get cached value (skips a lot SQL_ESCAPE() calles!
+ //* DEBUG: */ print __FUNCTION__."(".__LINE__."): ".$var."-CACHE!
\n";
+ $value = $cacheArray['session'][$var];
+ } elseif (isSessionVariableSet($var)) {
// Then get it secured!
+ //* DEBUG: */ print __FUNCTION__."(".__LINE__."): ".$var."-RESOLVE!
\n";
$value = SQL_ESCAPE($_SESSION[$var]);
+
+ // Cache the value
+ $cacheArray['session'][$var] = $value;
} // END - if
// Return the value
return $value;
}
// Send notification to admin
-function SEND_ADMIN_NOTIFICATION($subject, $templateName, $content="", $uid="0") {
+function SEND_ADMIN_NOTIFICATION($subject, $templateName, $content=array(), $uid="0") {
if (GET_EXT_VERSION("admins") >= "0.4.1") {
// Send new way
SEND_ADMIN_EMAILS_PRO($subject, $templateName, $content, $uid);
@@ -2314,12 +2393,12 @@ function merge_array ($array1, $array2) {
die("
");
}
// Debug message logger
-function DEBUG_LOG ($message) {
+function DEBUG_LOG ($file, $line, $message, $force=true) {
// Is debug mode enabled?
- if (isBooleanConstantAndTrue('DEBUG_MODE')) {
+ if ((isBooleanConstantAndTrue('DEBUG_MODE')) || ($force)) {
// Log this message away
$fp = fopen(PATH."inc/cache/debug.log", 'a') or mxchange_die("Cannot write logfile debug.log!");
- fwrite($fp, date("d.m.Y|H:i:s", time())."|{$message}\n");
+ fwrite($fp, date("d.m.Y|H:i:s", time())."|".basename($file)."|".$line."|".strip_tags($message)."\n");
fclose($fp);
} // END - if
}
@@ -2337,7 +2416,8 @@ function GET_DIR_AS_ARRAY ($baseDir, $prefix) {
$file = $baseDir.$baseFile;
// Is this a valid reset file?
- if ((is_file($file)) && (is_readable($file)) && (substr($baseFile, 0, strlen($prefix)) == $prefix) && (substr($baseFile, -4, 4) == ".php")) {
+ //* DEBUG: */ print __FUNCTION__."(".__LINE__."):baseDir={$baseDir},prefix={$prefix},baseFile={$baseFile}
\n";
+ if ((FILE_READABLE($file)) && (substr($baseFile, 0, strlen($prefix)) == $prefix) && (substr($baseFile, -4, 4) == ".php")) {
// Remove both for extension name
$extName = substr($baseFile, strlen($prefix), -4);
@@ -2348,6 +2428,9 @@ function GET_DIR_AS_ARRAY ($baseDir, $prefix) {
if (($extId > 0) && (EXT_IS_ACTIVE($extName))) {
// Then add this file
$INCs[] = $file;
+ } elseif ($extId == 0) {
+ // Add non-extension files as well
+ $INCs[] = $file;
}
} // END - if
} // END - while
@@ -2355,45 +2438,52 @@ function GET_DIR_AS_ARRAY ($baseDir, $prefix) {
// Close directory
closedir($dirPointer);
+ // Sort array
+ asort($INCs);
+
// Return array with include files
return $INCs;
}
// Load more reset scripts
function RESET_ADD_INCLUDES () {
- global $_CONFIG, $INC_POOL;
-
// Is the reset set or old sql_patches?
- if ((!isBooleanConstantAndTrue('__DAILY_RESET')) || (GET_EXT_VERSION("sql_patches") < "0.4.5")) {
+ if ((!defined('__DAILY_RESET')) || (EXT_VERSION_IS_OLDER("sql_patches", "0.4.5"))) {
// Then abort here
- return;
+ return array();
} // END - if
// Get more daily reset scripts
- $INC_POOL = array_merge($INC_POOL, GET_DIR_AS_ARRAY(PATH."inc/reset/", "reset_"));
+ $INC_POOL = GET_DIR_AS_ARRAY(PATH."inc/reset/", "reset_");
+
+ // Update database
+ if (!defined('DEBUG_RESET')) UPDATE_CONFIG("last_update", time());
// Create current week mark
$currWeek = date("W", time());
// Has it changed?
- if ($_CONFIG['last_week'] != $currWeek) {
+ if (getConfig('last_week') != $currWeek) {
// Include weekly reset scripts
- $INC_POOL = array_merge($INC_POOL, GET_DIR_AS_ARRAY(PATH."inc/weekly/", "weekly_"));
+ $INC_POOL = merge_array($INC_POOL, GET_DIR_AS_ARRAY(PATH."inc/weekly/", "weekly_"));
// Update config
- UPDATE_CONFIG("last_week", $currWeek);
+ if (!defined('DEBUG_WEEKLY')) UPDATE_CONFIG("last_week", $currWeek);
} // END - if
// Create current month mark
$currMonth = date("m", time());
// Has it changed?
- if ($_CONFIG['last_month'] != $currMonth) {
+ if (getConfig('last_month') != $currMonth) {
// Include monthly reset scripts
- $INC_POOL = array_merge($INC_POOL, GET_DIR_AS_ARRAY(PATH."inc/monthly/", "monthly_"));
+ $INC_POOL = merge_array($INC_POOL, GET_DIR_AS_ARRAY(PATH."inc/monthly/", "monthly_"));
// Update config
- UPDATE_CONFIG("last_month", $currMonth);
+ if (!defined('DEBUG_MONTHLY')) UPDATE_CONFIG("last_month", $currMonth);
} // END - if
+
+ // Return array
+ return $INC_POOL;
}
// Handle extra values
function HANDLE_EXTRA_VALUES ($filterFunction, $value, $extraValue) {
@@ -2402,23 +2492,26 @@ function HANDLE_EXTRA_VALUES ($filterFunction, $value, $extraValue) {
// Do we have a special filter function?
if (!empty($filterFunction)) {
- // Do we have extra parameters here?
- if (!empty($extraValue)) {
- // Put both parameters in one new array by default
- $args = array($value, $extraValue);
-
- // If we have an array simply use it and pre-extend it with our value
- if (is_array($extraValue)) {
- // Make the new args array
- $args = array_merge(array($vaue), $extraValue);
- } // END - if
-
- // Call the multi-parameter call-back
- $ret = call_user_func_array($filterFunction, $args);
- } else {
- // One parameter call
- $ret = call_user_func($filterFunction, $value);
- }
+ // Does the filter function exist?
+ if (function_exists($filterFunction)) {
+ // Do we have extra parameters here?
+ if (!empty($extraValue)) {
+ // Put both parameters in one new array by default
+ $args = array($value, $extraValue);
+
+ // If we have an array simply use it and pre-extend it with our value
+ if (is_array($extraValue)) {
+ // Make the new args array
+ $args = merge_array(array($value), $extraValue);
+ } // END - if
+
+ // Call the multi-parameter call-back
+ $ret = call_user_func_array($filterFunction, $args);
+ } else {
+ // One parameter call
+ $ret = call_user_func($filterFunction, $value);
+ }
+ } // END - if
} // END - if
// Return the value
@@ -2432,34 +2525,445 @@ function FILE_READABLE($fqfn) {
// Converts timestamp selections into a timestamp
function CONVERT_SELECTIONS_TO_TIMESTAMP(&$POST, &$DATA, &$id, &$skip) {
// Init test variable
- $TEST2 = "";
+ $test2 = "";
// Get last three chars
- $TEST = substr($id, -3);
+ $test = substr($id, -3);
// Improved way of checking! :-)
- if (in_array($TEST, array("_ye", "_mo", "_we", "_da", "_ho", "_mi", "_se"))) {
+ if (in_array($test, array("_ye", "_mo", "_we", "_da", "_ho", "_mi", "_se"))) {
// Found a multi-selection for timings?
- $TEST = substr($id, 0, -3);
- if ((isset($POST[$TEST."_ye"])) && (isset($POST[$TEST."_mo"])) && (isset($POST[$TEST."_we"])) && (isset($POST[$TEST."_da"])) && (isset($POST[$TEST."_ho"])) && (isset($POST[$TEST."_mi"])) && (isset($POST[$TEST."_se"])) && ($TEST != $TEST2)) {
+ $test = substr($id, 0, -3);
+ if ((isset($POST[$test."_ye"])) && (isset($POST[$test."_mo"])) && (isset($POST[$test."_we"])) && (isset($POST[$test."_da"])) && (isset($POST[$test."_ho"])) && (isset($POST[$test."_mi"])) && (isset($POST[$test."_se"])) && ($test != $test2)) {
// Generate timestamp
- $POST[$TEST] = CREATE_TIMESTAMP_FROM_SELECTIONS($TEST, $POST);
- $DATA[] = "$TEST='".$POST[$TEST]."'";
+ $POST[$test] = CREATE_TIMESTAMP_FROM_SELECTIONS($test, $POST);
+ $DATA[] = sprintf("%s='%s'", $test, $POST[$test]);
// Remove data from array
foreach (array("ye", "mo", "we", "da", "ho", "mi", "se") as $rem) {
- unset($POST[$TEST."_".$rem]);
+ unset($POST[$test."_".$rem]);
} // END - foreach
// Skip adding
- unset($id); $skip = true; $TEST2 = $TEST;
+ unset($id); $skip = true; $test2 = $test;
} // END - if
} else {
// Process this entry
- $skip = false; $TEST2 = "";
+ $skip = false; $test2 = "";
}
}
-//
+// Reverts the german decimal comma into Computer decimal dot
+function REVERT_COMMA ($str) {
+ // Default float is not a float... ;-)
+ $float = false;
+
+ // Which language is selected?
+ switch (GET_LANGUAGE()) {
+ case "de": // German language
+ // Remove german thousand dots first
+ $str = str_replace(".", "", $str);
+
+ // Replace german commata with decimal dot and cast it
+ $float = (float)str_replace(",", ".", $str);
+ break;
+
+ default: // US and so on
+ // Remove thousand dots first and cast
+ $float = (float)str_replace(",", "", $str);
+ break;
+ }
+
+ // Return float
+ return $float;
+}
+// Handle menu-depending failed logins and return the rendered content
+function HANDLE_LOGIN_FAILTURES ($accessLevel) {
+ // Default output is empty ;-)
+ $OUT = "";
+
+ // Is the session data set?
+ if ((isSessionVariableSet('mxchange_'.$accessLevel.'_failtures')) && (isSessionVariableSet('mxchange_'.$accessLevel.'_last_fail'))) {
+ // Ignore zero values
+ if (get_session('mxchange_'.$accessLevel.'_failtures') > 0) {
+ // Non-guest has login failtures found, get both data and prepare it for template
+ //* DEBUG: */ print __FUNCTION__."(".__LINE__."):accessLevel={$accessLevel}
\n";
+ $content = array(
+ 'login_failtures' => get_session('mxchange_'.$accessLevel.'_failtures'),
+ 'last_failture' => MAKE_DATETIME(get_session('mxchange_'.$accessLevel.'_last_fail'), "2")
+ );
+
+ // Load template
+ $OUT = LOAD_TEMPLATE("login_failtures", true, $content);
+ } // END - if
+
+ // Reset session data
+ set_session('mxchange_'.$accessLevel.'_failtures', "");
+ set_session('mxchange_'.$accessLevel.'_last_fail', "");
+ } // END - if
+
+ // Return rendered content
+ return $OUT;
+}
+// Rebuild cache
+function REBUILD_CACHE ($cache, $inc="") {
+ global $cacheInstance, $CSS;
+
+ // Shall I remove the cache file?
+ if ((EXT_IS_ACTIVE("cache")) && (is_object($cacheInstance))) {
+ // Rebuild cache
+ if ($cacheInstance->loadCacheFile($cache)) {
+ // Destroy it
+ $cacheInstance->destroyCacheFile();
+ } // END - if
+
+ // Include file given?
+ if (!empty($inc)) {
+ // Construct FQFN
+ $fqfn = sprintf("%sinc/loader/load_cache-%s.php", PATH, $inc);
+
+ // Is the include there?
+ if (FILE_READABLE($fqfn)) {
+ // And rebuild it from scratch
+ //* DEBUG: */ print __FUNCTION__."(".__LINE__."): inc={$inc} - LOADED!
\n";
+ require($fqfn);
+ } else {
+ // Include not found!
+ DEBUG_LOG(__FUNCTION__, __LINE__, "Include {$inc} not found. cache={$cache}");
+ }
+ } // END - if
+ } // END - if
+}
+// Purge admin menu cache
+function CACHE_PURGE_ADMIN_MENU ($id=0, $action="", $what="", $str="") {
+ global $cacheInstance;
+
+ // Is the cache extension enabled or no cache instance or admin menu cache disabled?
+ if (!EXT_IS_ACTIVE("cache")) {
+ // Cache extension not active
+ return false;
+ } elseif (!is_object($cacheInstance)) {
+ // No cache instance!
+ DEBUG_LOG(__FUNCTION__, __LINE__, " No cache instance found.");
+ return false;
+ } elseif ((getConfig('cache_admin_menu') == null) || (getConfig('cache_admin_menu') == "N")) {
+ // Caching disabled (currently experiemental!)
+ return false;
+ }
+
+ // Experiemental feature!
+ trigger_error("You have to delete the admin_*.cache files by yourself at this point.");
+}
+// Translates the "pool type" into human-readable
+function TRANSLATE_POOL_TYPE ($type) {
+ // Default type is unknown
+ $translated = sprintf(POOL_TYPE_UNKNOWN, $type);
+
+ // Generate constant
+ $constName = sprintf("POOL_TYPE_%s", $type);
+
+ // Does it exist?
+ if (defined($constName)) {
+ // Then use it
+ $translated = constant($constName);
+ } // END - if
+
+ // Return "translation"
+ return $translated;
+}
+// "Getter" for remote IP number
+function GET_REMOTE_ADDR () {
+ // Get remote ip from environment
+ $remoteAddr = getenv('REMOTE_ADDR');
+
+ // Is removeip installed?
+ if (EXT_IS_ACTIVE("removeip")) {
+ // Then anonymize it
+ $remoteAddr = GET_ANONYMOUS_REMOTE_ADDR($remoteAddr);
+ } // END - if
+
+ // Return it
+ return $remoteAddr;
+}
+// "Getter" for remote hostname
+function GET_REMOTE_HOST () {
+ // Get remote ip from environment
+ $remoteHost = getenv('REMOTE_HOST');
+
+ // Is removeip installed?
+ if (EXT_IS_ACTIVE("removeip")) {
+ // Then anonymize it
+ $remoteHost = GET_ANONYMOUS_REMOTE_HOST($remoteHost);
+ } // END - if
+
+ // Return it
+ return $remoteHost;
+}
+// "Getter" for user agent
+function GET_USER_AGENT () {
+ // Get remote ip from environment
+ $userAgent = getenv('HTTP_USER_AGENT');
+
+ // Is removeip installed?
+ if (EXT_IS_ACTIVE("removeip")) {
+ // Then anonymize it
+ $userAgent = GET_ANONYMOUS_USER_AGENT($userAgent);
+ } // END - if
+
+ // Return it
+ return $userAgent;
+}
+// "Getter" for referer
+function GET_REFERER () {
+ // Get remote ip from environment
+ $referer = getenv('HTTP_REFERER');
+
+ // Is removeip installed?
+ if (EXT_IS_ACTIVE("removeip")) {
+ // Then anonymize it
+ $referer = GET_ANONYMOUS_REFERER($referer);
+ } // END - if
+
+ // Return it
+ return $referer;
+}
+
+// Adds a bonus mail to the queue
+// This is a high-level function!
+function ADD_NEW_BONUS_MAIL ($data, $mode="", $output=true) {
+ // Use mode from data if not set and availble ;-)
+ if ((empty($mode)) && (isset($data['mode']))) $mode = $data['mode'];
+
+ // Generate receiver list
+ $RECEIVER = GENERATE_RECEIVER_LIST($data['cat'], $data['receiver'], $mode);
+
+ // Receivers added?
+ if (!empty($RECEIVER)) {
+ // Add bonus mail to queue
+ ADD_BONUS_MAIL_TO_QUEUE(
+ $data['subject'],
+ $data['text'],
+ $RECEIVER,
+ $data['points'],
+ $data['seconds'],
+ $data['url'],
+ $data['cat'],
+ $mode,
+ $data['receiver']
+ );
+
+ // Mail inserted into bonus pool
+ if ($output) LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_BONUS_SEND);
+ } elseif ($output) {
+ // More entered than can be reached!
+ LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_MORE_SELECTED);
+ } else {
+ // Debug log
+ DEBUG_LOG(__FUNCTION__, __LINE__, " cat={$data['cat']},receiver={$data['receiver']},data=".base64_encode(serialize($data))." More selected, than available!");
+ }
+}
+// Determines referal id and sets it
+function DETERMINE_REFID () {
+ global $CLICK, $_SERVER;
+
+ // Check if refid is set
+ if ((!empty($_GET['user'])) && ($CLICK == 1) && (basename($_SERVER['PHP_SELF']) == "click.php")) {
+ // The variable user comes from the click-counter script click.php and we only accept this here
+ $GLOBALS['refid'] = bigintval($_GET['user']);
+ } elseif (!empty($_POST['refid'])) {
+ // Get referal id from variable refid (so I hope this makes my script more compatible to other scripts)
+ $GLOBALS['refid'] = SQL_ESCAPE(strip_tags($_POST['refid']));
+ } elseif (!empty($_GET['refid'])) {
+ // Get referal id from variable refid (so I hope this makes my script more compatible to other scripts)
+ $GLOBALS['refid'] = SQL_ESCAPE(strip_tags($_GET['refid']));
+ } elseif (!empty($_GET['ref'])) {
+ // Set refid=ref (the referal link uses such variable)
+ $GLOBALS['refid'] = SQL_ESCAPE(strip_tags($_GET['ref']));
+ } elseif ((isSessionVariableSet('refid')) && (get_session('refid') != 0)) {
+ // Set session refid als global
+ $GLOBALS['refid'] = bigintval(get_session('refid'));
+ } elseif ((GET_EXT_VERSION("sql_patches") != "") && (getConfig('def_refid') > 0)) {
+ // Set default refid as refid in URL
+ $GLOBALS['refid'] = bigintval(getConfig('def_refid'));
+ } elseif ((GET_EXT_VERSION("user") >= "0.3.4") && (getConfig('select_user_zero_refid')) == "Y") {
+ // Select a random user which has confirmed enougth mails
+ $GLOBALS['refid'] = SELECT_RANDOM_REFID();
+ } else {
+ // No default ID when sql_patches is not installed or none set
+ $GLOBALS['refid'] = 0;
+ }
+
+ // Set cookie when default refid > 0
+ if (!isSessionVariableSet('refid') || (!empty($GLOBALS['refid'])) || ((get_session('refid') == "0") && (getConfig('def_refid') > 0))) {
+ // Set cookie
+ set_session('refid', $GLOBALS['refid']);
+ } // END - if
+
+ // Return determined refid
+ return $GLOBALS['refid'];
+}
+
+// Destroys the admin session
+function DESTROY_ADMIN_SESSION ($destroy = true) {
+ // Kill maybe existing session variables including array elements
+ set_session('admin_login', "");
+ set_session('admin_md5' , "");
+ set_session('admin_last' , "");
+ set_session('admin_to' , "");
+
+ // Destroy session and return status
+ if ($destroy) {
+ return @session_destroy();
+ } // END - if
+
+ // All fine if we shall not really destroy the session
+ return true;
+}
+
+// Checks if a given apache module is loaded
+function IF_APACHE_MODULE_LOADED ($apacheModule) {
+ // Check it and return result
+ return (((function_exists('apache_get_modules')) && (in_array($apacheModule, apache_get_modules()))) || (!function_exists('apache_get_modules')));
+}
+
+// Getter for $_CONFIG entries
+function getConfig ($entry) {
+ global $_CONFIG;
+
+ // Default value
+ $value = null;
+
+ // Is the entry there?
+ if (isset($_CONFIG[$entry])) {
+ // Then use it
+ $value = $_CONFIG[$entry];
+ } // END - if
+
+ // Return it
+ return $value;
+}
+
+// @TODO Rewrite all language constants to the function getLanguage().
+// "Getter" for language strings
+function getMessage ($messageId) {
+ // Default is not found!
+ $return = "!".$messageId."!";
+
+ // Is the language string found?
+ if (isset($GLOBALS['msg'][$messageId])) {
+ // Language array element found
+ $return = $GLOBALS['msg'][$messageId];
+ } elseif (defined($messageId)) {
+ // @DEPRECATED Deprecated constant found
+ $return = constant($messageId);
+ } else {
+ // Missing language constant
+ DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Missing message string %s detected.", $messageId));
+ }
+
+ // Return the string
+ return $return;
+}
+
+// Get current theme name
+function GET_CURR_THEME() {
+ global $INC_POOL, $CSS, $cacheArray;
+
+ // The default theme is 'default'... ;-)
+ $ret = "default";
+
+ // Load default theme if not empty from configuration
+ if (getConfig('default_theme') != "") $ret = getConfig('default_theme');
+
+ if (!isSessionVariableSet('mxchange_theme')) {
+ // Set default theme
+ set_session("mxchange_theme", $ret);
+ } elseif ((isSessionVariableSet('mxchange_theme')) && (GET_EXT_VERSION("sql_patches") >= "0.1.4")) {
+ //die("".print_r($cacheArray['themes'], true)."
");
+ // Get theme from cookie
+ $ret = get_session('mxchange_theme');
+
+ // Is it valid?
+ if (THEME_GET_ID($ret) == 0) {
+ // Fix it to default
+ $ret = "default";
+ } // END - if
+ } elseif ((!isBooleanConstantAndTrue('mxchange_installed')) && ((isBooleanConstantAndTrue('mxchange_installing')) || ($CSS == true)) && ((!empty($_GET['theme'])) || (!empty($_POST['theme'])))) {
+ // Prepare FQFN for checking
+ $theme = sprintf("%stheme/%s/theme.php", PATH, SQL_ESCAPE($_GET['theme']));
+
+ // Installation mode active
+ if ((!empty($_GET['theme'])) && (FILE_READABLE($theme))) {
+ // Set cookie from URL data
+ set_session("mxchange_theme", SQL_ESCAPE($_GET['theme']));
+ } elseif (FILE_READABLE(sprintf("%stheme/%s/theme.php", PATH, SQL_ESCAPE($_POST['theme'])))) {
+ // Set cookie from posted data
+ set_session("mxchange_theme", SQL_ESCAPE($_POST['theme']));
+ }
+
+ // Set return value
+ $ret = get_session('mxchange_theme');
+ } else {
+ // Invalid design, reset cookie
+ set_session("mxchange_theme", $ret);
+ }
+
+ // Add (maybe) found theme.php file to inclusion list
+ $theme = sprintf("%stheme/%s/theme.php", PATH, SQL_ESCAPE($ret));
+
+ // Try to load the requested include file
+ if (FILE_READABLE($theme)) $INC_POOL[] = $theme;
+
+ // Return theme value
+ return $ret;
+}
+
+// Get id from theme
+function THEME_GET_ID ($name) {
+ global $cacheArray;
+
+ // Is the extension "theme" installed?
+ if (!EXT_IS_ACTIVE("theme")) {
+ // Then abort here
+ return 0;
+ } // END - if
+
+ // Default id
+ $id = 0;
+
+ // Is the cache entry there?
+ if (isset($cacheArray['themes']['id'][$name])) {
+ // Get the version from cache
+ $id = $cacheArray['themes']['id'][$name];
+
+ // Count up
+ incrementConfigEntry('cache_hits');
+ } elseif (GET_EXT_VERSION("cache") != "0.1.8") {
+ // Check if current theme is already imported or not
+ $result = SQL_QUERY_ESC("SELECT id FROM `"._MYSQL_PREFIX."_themes` WHERE theme_path='%s' LIMIT 1",
+ array($name), __FILE__, __LINE__);
+
+ // Entry found?
+ if (SQL_NUMROWS($result) == 1) {
+ // Fetch data
+ list($id) = SQL_FETCHROW($result);
+ } // END - if
+
+ // Free result
+ SQL_FREERESULT($result);
+ }
+
+ // Return id
+ return $id;
+}
+
+// Increment or init with 1 the given config entry
+function incrementConfigEntry ($configEntry) {
+ global $_CONFIG;
+
+ // Increment it if set or init it with 1
+ if (getConfig($configEntry) > 0) { $_CONFIG[$configEntry]++; } else { $_CONFIG[$configEntry] = 1; }
+}
+
//////////////////////////////////////////////////
// //
// AUTOMATICALLY RE-GENERATED MISSING FUNCTIONS //
@@ -2468,7 +2972,7 @@ function CONVERT_SELECTIONS_TO_TIMESTAMP(&$POST, &$DATA, &$id, &$skip) {
//
if (!function_exists('html_entity_decode')) {
// Taken from documentation on www.php.net
- function html_entity_decode($string) {
+ function html_entity_decode ($string) {
$trans_tbl = get_html_translation_table(HTML_ENTITIES);
$trans_tbl = array_flip($trans_tbl);
return strtr($string, $trans_tbl);