Last references to now replaced with mergeConfig()
[mailer.git] / inc / functions.php
index 32abd70af766c67176f6e56762b871a2a751f634..591a56c702a432cd908f76714cba97d5b76506a2 100644 (file)
@@ -60,7 +60,7 @@ function IS_INC_WRITEABLE($inc) {
 }
 
 // Output HTML code directly or "render" it. You addionally switch the new-line character off
-function OUTPUT_HTML ($HTML, $NEW_LINE = true) {
+function OUTPUT_HTML ($HTML, $newLine = true) {
        // Some global variables
        global $OUTPUT, $footer, $CSS;
 
@@ -71,44 +71,44 @@ function OUTPUT_HTML ($HTML, $NEW_LINE = true) {
                {
                case "render":
                        // That's why you don't need any \n at the end of your HTML code... :-)
-                       if (_OB_CACHING == "on") {
+                       if (constant('_OB_CACHING') == "on") {
                                // Output into PHP's internal buffer
                                OUTPUT_RAW($HTML);
 
                                // That's why you don't need any \n at the end of your HTML code... :-)
-                               if ($NEW_LINE) echo "\n";
+                               if ($newLine) echo "\n";
                        } else {
                                // Render mode for old or lame servers...
                                $OUTPUT .= $HTML;
 
                                // That's why you don't need any \n at the end of your HTML code... :-)
-                               if ($NEW_LINE) $OUTPUT .= "\n";
+                               if ($newLine) $OUTPUT .= "\n";
                        }
                        break;
 
                case "direct":
                        // If we are switching from render to direct output rendered code
-                       if ((!empty($OUTPUT)) && (_OB_CACHING != "on")) { OUTPUT_RAW($OUTPUT); $OUTPUT = ""; }
+                       if ((!empty($OUTPUT)) && (constant('_OB_CACHING') != "on")) { OUTPUT_RAW($OUTPUT); $OUTPUT = ""; }
 
                        // The same as above... ^
                        OUTPUT_RAW($HTML);
-                       if ($NEW_LINE) echo "\n";
+                       if ($newLine) echo "\n";
                        break;
 
                default:
                        // Huh, something goes wrong or maybe you have edited config.php ???
                        DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Invalid renderer %s detected.", constant('OUTPUT_MODE')));
-                       mxchange_die("<strong>{!FATAL_ERROR!}:</strong> {!LANG_NO_RENDER_DIRECT!}");
+                       mxchange_die("<strong>{--FATAL_ERROR--}:</strong> {--LANG_NO_RENDER_DIRECT--}");
                        break;
                }
-       } elseif ((_OB_CACHING == "on") && ($footer == 1)) {
+       } elseif ((constant('_OB_CACHING') == "on") && ($footer == 1)) {
                // Headers already sent?
                if (headers_sent()) {
                        // Log this error
                        DEBUG_LOG(__FUNCTION__, __LINE__, "Headers already sent! We need debug backtrace here.");
 
                        // Trigger an user error
-                       trigger_error("Headers are already sent!");
+                       debug_report_bug("Headers are already sent!");
                } // END - if
 
                // Output cached HTML code
@@ -145,7 +145,7 @@ function OUTPUT_HTML ($HTML, $NEW_LINE = true) {
                        // Was that eval okay?
                        if (empty($newContent)) {
                                // Something went wrong!
-                               die("Evaluation error:<pre>".htmlentities($eval)."</pre>");
+                               mxchange_die("Evaluation error:<pre>".htmlentities($eval)."</pre>");
                        } // END - if
                        $OUTPUT = $newContent;
                } // END - while
@@ -174,8 +174,8 @@ function OUTPUT_RAW ($HTML) {
        // Output stripped HTML code to avoid broken JavaScript code, etc.
        echo stripslashes(stripslashes($HTML));
 
-       // Flush the output if only _OB_CACHING is not "on"
-       if (_OB_CACHING != "on") {
+       // Flush the output if only constant('_OB_CACHING') is not "on"
+       if (constant('_OB_CACHING') != "on") {
                // Flush it
                flush();
        } // END - if
@@ -185,15 +185,17 @@ function OUTPUT_RAW ($HTML) {
 function addFatalMessage ($message, $extra="") {
        global $FATAL;
 
-       if (empty($extra)) {
-               // Regular text message to add to $FATAL
-               $FATAL[] = $message;
-       } else {
+       if (is_array($extra)) {
+               // Multiple extras for a message with masks
+               $message = call_user_func_array('sprintf', $extra);
+       } elseif (!empty($extra)) {
                // $message is text with a mask plus extras to insert into the text
                $message = sprintf($message, $extra);
-               $FATAL[] = $message;
        }
 
+       // Add message to $FATAL
+       $FATAL[] = $message;
+
        // Log fatal messages away
        DEBUG_LOG(__FUNCTION__, __LINE__, " message={$message}");
 }
@@ -459,7 +461,7 @@ Message : ".$MSG."
                SEND_RAW_EMAIL($TO, $SUBJECT, $MSG, $FROM);
        } elseif ($HTML == "N") {
                // Problem found!
-               SEND_RAW_EMAIL(WEBMASTER, "[PROBLEM:]".$SUBJECT, $MSG, $FROM);
+               SEND_RAW_EMAIL(constant('WEBMASTER'), "[PROBLEM:]".$SUBJECT, $MSG, $FROM);
        }
 }
 
@@ -485,16 +487,16 @@ function SEND_RAW_EMAIL ($to, $subject, $msg, $from) {
 
                $mail->IsSMTP();
                $mail->SMTPAuth   = true;
-               $mail->Host       = SMTP_HOSTNAME;
+               $mail->Host       = constant('SMTP_HOSTNAME');
                $mail->Port       = 25;
-               $mail->Username   = SMTP_USER;
-               $mail->Password   = SMTP_PASSWORD;
+               $mail->Username   = constant('SMTP_USER');
+               $mail->Password   = constant('SMTP_PASSWORD');
                if (empty($from)) {
                        $mail->From = constant('WEBMASTER');
                } else {
                        $mail->From = $from;
                }
-               $mail->FromName   = MAIN_TITLE;
+               $mail->FromName   = constant('MAIN_TITLE');
                $mail->Subject    = $subject;
                if ((EXT_IS_ACTIVE("html_mail")) && (strip_tags($msg) != $msg)) {
                        $mail->Body       = $msg;
@@ -505,9 +507,9 @@ function SEND_RAW_EMAIL ($to, $subject, $msg, $from) {
                        $mail->Body       = html_entity_decode($msg);
                }
                $mail->AddAddress($to, "");
-               $mail->AddReplyTo(WEBMASTER,MAIN_TITLE);
-               $mail->AddCustomHeader("Errors-To:".WEBMASTER);
-               $mail->AddCustomHeader("X-Loop:".WEBMASTER);
+               $mail->AddReplyTo(constant('WEBMASTER'), constant('MAIN_TITLE'));
+               $mail->AddCustomHeader("Errors-To:".constant('WEBMASTER'));
+               $mail->AddCustomHeader("X-Loop:".constant('WEBMASTER'));
                $mail->Send();
        } else {
                // Use legacy mail() command
@@ -524,9 +526,6 @@ function GEN_PASS ($LEN = 0) {
        // Initialize array with all allowed chars
        $ABC = explode(",", "a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z,0,1,2,3,4,5,6,7,8,9,-,+,_,/");
 
-       // Initialize randomizer
-       mt_srand((double) microtime() * 1000000);
-
        // Start creating password
        $PASS = "";
        for ($i = 0; $i < $LEN; $i++) {
@@ -583,10 +582,8 @@ function MAKE_DATETIME ($time, $mode="0")
 
 // Translates the american decimal dot into a german comma
 function TRANSLATE_COMMA ($dotted, $cut=true, $max=0) {
-       global $_CONFIG;
-
        // Default is 3 you can change this in admin area "Misc -> Misc Options"
-       if (getConfig('max_comma') == null) $_CONFIG['max_comma'] = "3";
+       if (!isConfigEntrySet('max_comma')) setConfigEntry('max_comma', "3");
 
        // Use from config is default
        $maxComma = getConfig('max_comma');
@@ -751,15 +748,12 @@ function LOAD_EMAIL_TEMPLATE($template, $content=array(), $UID="0") {
        // Default "nickname" if extension is not installed
        $nick = "---";
 
-       // Keept for backward-compatiblity (please replace these variables against our new {!CONST!} syntax!)
-       // No longer used: $MAIN_TITLE = MAIN_TITLE; $URL = constant('URL'); $WEBMASTER = constant('WEBMASTER');
-
        // Prepare IP number and User Agent
        $REMOTE_ADDR     = GET_REMOTE_ADDR();
        $HTTP_USER_AGENT = GET_USER_AGENT();
 
        // Default admin
-       $ADMIN = MAIN_TITLE;
+       $ADMIN = constant('MAIN_TITLE');
 
        // Is the admin logged in?
        if (IS_ADMIN()) {
@@ -861,22 +855,22 @@ function LOAD_EMAIL_TEMPLATE($template, $content=array(), $UID="0") {
                $tmpl_file = addslashes($tmpl_file);
 
                // Run code
-               $tmpl_file = "\$newContent=html_entity_decode(\"".COMPILE_CODE($tmpl_file)."\");";
+               $tmpl_file = "\$newContent = html_entity_decode(\"".COMPILE_CODE($tmpl_file)."\");";
                @eval($tmpl_file);
        } elseif (!empty($template)) {
                // Template file not found!
-               $newContent = TEMPLATE_404.": ".$template."<br />
-".TEMPLATE_CONTENT."
+               $newContent = "{--TEMPLATE_404--}: ".$template."<br />
+{--TEMPLATE_CONTENT--}
 <pre>".print_r($content, true)."</pre>
-".TEMPLATE_DATA."
+{--TEMPLATE_DATA--}
 <pre>".print_r($DATA, true)."</pre>
 <br /><br />";
 
                // Debug mode not active? Then remove the HTML tags
-               if (!DEBUG_MODE) $newContent = strip_tags($newContent);
+               if (!isBooleanConstantAndTrue('DEBUG_MODE')) $newContent = strip_tags($newContent);
        } else {
                // No template name supplied!
-               $newContent = NO_TEMPLATE_SUPPLIED;
+               $newContent = getMessage('NO_TEMPLATE_SUPPLIED');
        }
 
        // Is there some content?
@@ -918,11 +912,7 @@ function LOAD_URL($URL, $addUrlData=true) {
        }
 
        // Get output buffer
-       /*
-       print "<pre>";
-       debug_print_backtrace();
-       die("</pre>");
-       */
+       //* DEBUG: */ debug_report_bug();
        $OUTPUT = ob_get_contents();
 
        // Clear it only if there is content
@@ -942,11 +932,7 @@ function LOAD_URL($URL, $addUrlData=true) {
                OUTPUT_HTML("<a href=\"".$URL."\">".$URL."</a>");
        } elseif (!headers_sent()) {
                // Load URL when headers are not sent
-               /*
-               print("<pre>");
-               debug_print_backtrace();
-               die("</pre>URL={$URL}");
-               */
+               //* DEBUG: */ debug_report_bug("URL={$URL}");
                header ("Location: ".str_replace("&amp;", "&", $URL));
        } else {
                // Output error message
@@ -1213,9 +1199,9 @@ function ADD_SELECTION($type, $DEFAULT, $prefix="", $id="0") {
        case "yn":
                $OUT .= "<option value=\"Y\"";
                if ($DEFAULT == "Y") $OUT .= " selected=\"selected\"";
-               $OUT .= ">{!YES!}</option>\n<option value=\"N\"";
+               $OUT .= ">{--YES--}</option>\n<option value=\"N\"";
                if ($DEFAULT == "N") $OUT .= " selected=\"selected\"";
-               $OUT .= ">{!NO!}</option>\n";
+               $OUT .= ">{--NO--}</option>\n";
                break;
        }
        $OUT .= "    </select>\n";
@@ -1261,17 +1247,17 @@ function GEN_RANDOM_CODE($length, $code, $uid, $DATA="") {
        if (isset($GLOBALS['refid']))                           $data .= ":".$GLOBALS['refid'];
 
        // Calculate number for generating the code
-       $a = $code + _ADD - 1;
+       $a = $code + constant('_ADD') - 1;
 
        if (getConfig('master_hash') != null) {
                // Generate hash with master salt from modula of number with the prime number and other data
-               $saltedHash = generateHash(($a % _PRIME).":".$server.":".$keys.":".$data.":".date("d-m-Y (l-F-T)", time()).":".$a, getConfig('master_salt'));
+               $saltedHash = generateHash(($a % constant('_PRIME')).":".$server.":".$keys.":".$data.":".date("d-m-Y (l-F-T)", time()).":".$a, getConfig('master_salt'));
 
                // Create number from hash
                $rcode = hexdec(substr($saltedHash, strlen(getConfig('master_salt')), 9)) / abs(_MAX - $a + sqrt(_ADD)) / pi();
        } else {
                // Generate hash with "hash of site key" from modula of number with the prime number and other data
-               $saltedHash = generateHash(($a % _PRIME).":".$server.":".$keys.":".$data.":".date("d-m-Y (l-F-T)", time()).":".$a, substr(sha1(SITE_KEY), 0, 8));
+               $saltedHash = generateHash(($a % constant('_PRIME')).":".$server.":".$keys.":".$data.":".date("d-m-Y (l-F-T)", time()).":".$a, substr(sha1(SITE_KEY), 0, 8));
 
                // Create number from hash
                $rcode = hexdec(substr($saltedHash, 8, 9)) / abs(_MAX - $a + sqrt(_ADD)) / pi();
@@ -1297,12 +1283,10 @@ function bigintval($num, $castValue = true) {
        if ($castValue) $ret = (double)$ret;
 
        // Has the whole value changed?
+       // @TODO Remove this if() block if all is working fine
        if ("".$ret."" != "".$num."") {
                // Log the values
-               print("<pre>");
-               debug_print_backtrace();
-               die("</pre>");
-               DEBUG_LOG(__FUNCTION__, __LINE__, " num={$num},ret={$ret}");
+               debug_report_bug();
        } // END - if
 
        // Return result
@@ -1421,31 +1405,31 @@ function CREATE_TIME_SELECTIONS ($timestamp, $prefix="", $display="", $align="ce
                $OUT .= "<tr>\n";
 
                if (ereg('Y', $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">"._YEARS."</strong></td>\n";
+                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">{--_YEARS--}</strong></td>\n";
                }
 
                if (ereg("M", $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">"._MONTHS."</strong></td>\n";
+                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">{--_MONTHS--}</strong></td>\n";
                }
 
                if (ereg("W", $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">"._WEEKS."</strong></td>\n";
+                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">{--_WEEKS--}</strong></td>\n";
                }
 
                if (ereg("D", $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">"._DAYS."</strong></td>\n";
+                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">{--_DAYS--}</strong></td>\n";
                }
 
                if (ereg("h", $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">"._HOURS."</strong></td>\n";
+                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">{--_HOURS--}</strong></td>\n";
                }
 
                if (ereg("m", $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">"._MINUTES."</strong></td>\n";
+                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">{--_MINUTES--}</strong></td>\n";
                }
 
                if (ereg("s", $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">"._SECONDS."</strong></td>\n";
+                       $OUT .= "  <td align=\"center\" class=\"admin_title bottom\"><div class=\"tiny\">{--_SECONDS--}</strong></td>\n";
                }
 
                $OUT .= "</tr>\n";
@@ -1456,7 +1440,7 @@ function CREATE_TIME_SELECTIONS ($timestamp, $prefix="", $display="", $align="ce
                        $OUT .= "  <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_ye\" size=\"1\">\n";
                        for ($idx = 0; $idx <= 10; $idx++) {
                                $OUT .= "    <option class=\"mini_select\" value=\"".$idx."\"";
-                               if ($idx == $Y) $OUT .= " selected default";
+                               if ($idx == $Y) $OUT .= " selected=\"selected\"";
                                $OUT .= ">".$idx."</option>\n";
                        }
                        $OUT .= "  </select></td>\n";
@@ -1470,7 +1454,7 @@ function CREATE_TIME_SELECTIONS ($timestamp, $prefix="", $display="", $align="ce
                        for ($idx = 0; $idx <= 11; $idx++)
                        {
                                        $OUT .= "  <option class=\"mini_select\" value=\"".$idx."\"";
-                               if ($idx == $M) $OUT .= " selected default";
+                               if ($idx == $M) $OUT .= " selected=\"selected\"";
                                $OUT .= ">".$idx."</option>\n";
                        }
                        $OUT .= "  </select></td>\n";
@@ -1483,7 +1467,7 @@ function CREATE_TIME_SELECTIONS ($timestamp, $prefix="", $display="", $align="ce
                        $OUT .= "  <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_we\" size=\"1\">\n";
                        for ($idx = 0; $idx <= 4; $idx++) {
                                $OUT .= "  <option class=\"mini_select\" value=\"".$idx."\"";
-                               if ($idx == $W) $OUT .= " selected default";
+                               if ($idx == $W) $OUT .= " selected=\"selected\"";
                                $OUT .= ">".$idx."</option>\n";
                        }
                        $OUT .= "  </select></td>\n";
@@ -1496,7 +1480,7 @@ function CREATE_TIME_SELECTIONS ($timestamp, $prefix="", $display="", $align="ce
                        $OUT .= "  <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_da\" size=\"1\">\n";
                        for ($idx = 0; $idx <= 31; $idx++) {
                                $OUT .= "  <option class=\"mini_select\" value=\"".$idx."\"";
-                               if ($idx == $D) $OUT .= " selected default";
+                               if ($idx == $D) $OUT .= " selected=\"selected\"";
                                $OUT .= ">".$idx."</option>\n";
                        }
                        $OUT .= "  </select></td>\n";
@@ -1509,7 +1493,7 @@ function CREATE_TIME_SELECTIONS ($timestamp, $prefix="", $display="", $align="ce
                        $OUT .= "  <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_ho\" size=\"1\">\n";
                        for ($idx = 0; $idx <= 23; $idx++)      {
                                $OUT .= "  <option class=\"mini_select\" value=\"".$idx."\"";
-                               if ($idx == $h) $OUT .= " selected default";
+                               if ($idx == $h) $OUT .= " selected=\"selected\"";
                                $OUT .= ">".$idx."</option>\n";
                        }
                        $OUT .= "  </select></td>\n";
@@ -1522,7 +1506,7 @@ function CREATE_TIME_SELECTIONS ($timestamp, $prefix="", $display="", $align="ce
                        $OUT .= "  <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_mi\" size=\"1\">\n";
                        for ($idx = 0; $idx <= 59; $idx++) {
                                $OUT .= "  <option class=\"mini_select\" value=\"".$idx."\"";
-                               if ($idx == $m) $OUT .= " selected default";
+                               if ($idx == $m) $OUT .= " selected=\"selected\"";
                                $OUT .= ">".$idx."</option>\n";
                        }
                        $OUT .= "  </select></td>\n";
@@ -1535,7 +1519,7 @@ function CREATE_TIME_SELECTIONS ($timestamp, $prefix="", $display="", $align="ce
                        $OUT .= "  <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_se\" size=\"1\">\n";
                        for ($idx = 0; $idx <= 59; $idx++) {
                                $OUT .= "  <option class=\"mini_select\" value=\"".$idx."\"";
-                               if ($idx == $s) $OUT .= " selected default";
+                               if ($idx == $s) $OUT .= " selected=\"selected\"";
                                $OUT .= ">".$idx."</option>\n";
                        }
                        $OUT .= "  </select></td>\n";
@@ -1577,9 +1561,10 @@ function CREATE_TIMESTAMP_FROM_SELECTIONS ($prefix, $POST) {
        // Return calculated value
        return $ret;
 }
+
 // Sends out mail to all administrators
 // IMPORTANT: Please use SEND_ADMIN_NOTIFCATION() for now!
-function SEND_ADMIN_EMAILS_PRO($subj, $template, $content, $UID) {
+function SEND_ADMIN_EMAILS_PRO ($subj, $template, $content, $UID) {
        // Trim template name
        $template = trim($template);
 
@@ -1603,17 +1588,28 @@ function SEND_ADMIN_EMAILS_PRO($subj, $template, $content, $UID) {
                $aids = array();
                while (list($aid) = SQL_FETCHROW($result)) {
                        $aids[] = $aid;
-               }
+               } // END - while
 
                // Free memory
                SQL_FREERESULT($result);
 
+               // Init result
+               $result = false;
+
                // "implode" IDs and query string
                $aid = implode(",", $aids);
                if ($aid == "-1") {
-                       // Add line to userlog
-                       USERLOG_ADD_LINE($subj, $msg, $UID);
-                       return;
+                       if (EXT_IS_ACTIVE("events")) {
+                               // Add line to user events
+                               EVENTS_ADD_LINE($subj, $msg, $UID);
+                       } else {
+                               // Log error for debug
+                               DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Extension 'events' missing: tpl=%s,subj=%s,UID=%s",
+                                       $template,
+                                       $subj,
+                                       $UID
+                               ));
+                       }
                } elseif ($aid == "0") {
                        // Select all email adresses
                        $result = SQL_QUERY("SELECT email FROM `{!_MYSQL_PREFIX!}_admins` ORDER BY `id`", __FILE__, __LINE__);
@@ -1626,7 +1622,7 @@ function SEND_ADMIN_EMAILS_PRO($subj, $template, $content, $UID) {
        // Load email addresses and send away
        while (list($email) = SQL_FETCHROW($result)) {
                SEND_EMAIL($email, $subj, $msg);
-       }
+       } // END - while
 
        // Free memory
        SQL_FREERESULT($result);
@@ -1963,7 +1959,7 @@ function MEMBER_ACTION_LINKS ($uid, $status = "") {
        $eval = "\$OUT = \"[&nbsp;";
 
        foreach ($TARGETS as $tar) {
-               $eval .= "<span class=\\\"admin_user_link\\\"><a href=\\\"{!URL!}/modules.php?module=admin&amp;what=".$tar."&amp;u_id=".$uid."\\\" title=\\\"{!ADMIN_LINK_";
+               $eval .= "<span class=\\\"admin_user_link\\\"><a href=\\\"{!URL!}/modules.php?module=admin&amp;what=".$tar."&amp;u_id=".$uid."\\\" title=\\\"{--ADMIN_LINK_";
                //* DEBUG: */ echo "*".$tar."/".$status."*<br />\n";
                if (($tar == "lock_user") && ($status == "LOCKED")) {
                        // Locked accounts shall be unlocked
@@ -1972,7 +1968,7 @@ function MEMBER_ACTION_LINKS ($uid, $status = "") {
                        // All other status is fine
                        $eval .= strtoupper($tar);
                }
-               $eval .= "_TITLE!}\\\">{!ADMIN_";
+               $eval .= "_TITLE--}\\\">{--ADMIN_";
                if (($tar == "lock_user") && ($status == "LOCKED")) {
                        // Locked accounts shall be unlocked
                        $eval .= "UNLOCK_USER";
@@ -1980,7 +1976,7 @@ function MEMBER_ACTION_LINKS ($uid, $status = "") {
                        // All other status is fine
                        $eval .= strtoupper($tar);
                }
-               $eval .= "!}</a></span>&nbsp;|&nbsp;";
+               $eval .= "--}</a></span>&nbsp;|&nbsp;";
        }
 
        // Finish navigation link
@@ -2029,11 +2025,9 @@ function generateHash ($plainText, $salt = "") {
        } // END - if
 
        // Do we miss an arry element here?
-       if (getConfig('file_hash') == null) {
+       if (!isConfigEntrySet('file_hash')) {
                // Stop here
-               print("Missing file_hash in ".__FUNCTION__.". Backtrace:<pre>");
-               debug_print_backtrace();
-               die("</pre>");
+               debug_report_bug("Missing file_hash in ".__FUNCTION__.".");
        } // END - if
 
        // When the salt is empty build a new one, else use the first x configured characters as the salt
@@ -2042,16 +2036,16 @@ function generateHash ($plainText, $salt = "") {
                $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.":".getConfig('secret_key').":".getConfig('file_hash').":".date("d-m-Y (l-F-T)", bigintval(getConfig('patch_ctime'))).":".getConfig('master_salt');
+               $keys   = constant('SITE_KEY').":".constant('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(mt_rand(), true).":".time();
 
                // Calculate number for generating the code
-               $a = time() + _ADD - 1;
+               $a = time() + constant('_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);
+               $sha1 = sha1(($a % constant('_PRIME')).$server.":".$keys.":".$data.":".date("d-m-Y (l-F-T)", time()).":".$a);
                //* DEBUG: */ echo "SHA1=".$sha1." (".strlen($sha1).")<br />";
                $sha1 = scrambleString($sha1);
                //* DEBUG: */ echo "Scrambled=".$sha1." (".strlen($sha1).")<br />";
@@ -2125,9 +2119,8 @@ function descrambleString($str) {
        return $orig;
 }
 //
-function genScrambleString($len) {
-       // Prepare randomizer and array for the numbers
-       mt_srand((double) microtime() * 1000000);
+function genScrambleString ($len) {
+       // Prepare array for the numbers
        $scrambleNumbers = array();
 
        // First we need to setup randomized numbers from 0 to 31
@@ -2148,6 +2141,7 @@ function genScrambleString($len) {
        $scrambleString = implode(":", $scrambleNumbers);
        return $scrambleString;
 }
+
 // Append data like session ID or referal ID to the given URL which would
 // normally be stored in cookies
 function ADD_URL_DATA ($URL) {
@@ -2156,7 +2150,7 @@ function ADD_URL_DATA ($URL) {
 
        // Determine URL binder
        $BIND = "?";
-       if (strpos($URL, "?") !== false) $BIND = "&";
+       if (strpos($URL, "?") !== false) $BIND = "&amp;";
 
        if ((!defined('__COOKIES')) || ((!__COOKIES))) {
                // Cookies are not accepted
@@ -2167,25 +2161,14 @@ function ADD_URL_DATA ($URL) {
                        // Not found! So let's set default here
                        $ADD .= $BIND."refid=".getConfig('def_refid');
                }
-
-               // Is there already added data? Then change the binder
-               if (!empty($ADD)) $BIND = "&";
-
-               // Add session ID
-               if ((!empty($_GET['PHPSESSID'])) && (strpos($URL, "PHPSESSID=") == 0)) {
-                       // Add session from URL
-                       $ADD .= $BIND."PHPSESSID=".SQL_ESCAPE(strip_tags($_GET['PHPSESSID']));
-               } else {
-                       // Add current session
-                       $ADD .= $BIND."PHPSESSID=".session_id();
-               }
        } // END - if
 
        // Add all together and return it
-       return $URL.$ADD;
+       return $URL . $ADD;
 }
+
 // Generate an PGP-like encrypted hash of given hash for e.g. cookies
-function generatePassString($passHash) {
+function generatePassString ($passHash) {
        // Return vanilla password hash
        $ret = $passHash;
 
@@ -2198,9 +2181,9 @@ function generatePassString($passHash) {
                        $part2 = hexdec(substr(getConfig('secret_key'), $start, 4));
                        $mod = dechex($idx);
                        if ($part1 > $part2) {
-                               $mod = dechex(sqrt(($part1 - $part2) * _PRIME / pi()));
+                               $mod = dechex(sqrt(($part1 - $part2) * constant('_PRIME') / pi()));
                        } elseif ($part2 > $part1) {
-                               $mod = dechex(sqrt(($part2 - $part1) * _PRIME / pi()));
+                               $mod = dechex(sqrt(($part2 - $part1) * constant('_PRIME') / pi()));
                        }
                        $mod = substr(round($mod), 0, 4);
                        $mod = str_repeat('0', 4-strlen($mod)).$mod;
@@ -2246,7 +2229,7 @@ function mxchange_die ($msg) {
        LOAD_TEMPLATE("admin_settings_saved", false, $msg);
 
        // Load footer
-       LOAD_INC("inc/footer.php");
+       LOAD_INC_ONCE("inc/footer.php");
 
        // Exit explicitly
        exit;
@@ -2400,13 +2383,16 @@ function merge_array ($array1, $array2) {
                return array_merge($array1, $array2);
        } elseif (is_array($array1)) {
                // Return left array
+               DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("array2 is not an array. array != %s", gettype($array2)));
                return $array1;
+       } elseif (is_array($array2)) {
+               // Return right array
+               DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("array1 is not an array. array != %s", gettype($array1)));
+               return $array2;
        }
 
-       // Something wired happened here...
-       print(__FUNCTION__.":<pre>");
-       debug_print_backtrace();
-       die("</pre>");
+       // Both are not arrays
+       debug_report_bug(__FUNCTION__.":");
 }
 
 // Debug message logger
@@ -2666,19 +2652,19 @@ function CACHE_PURGE_ADMIN_MENU ($id=0, $action="", $what="", $str="") {
                // No cache instance!
                DEBUG_LOG(__FUNCTION__, __LINE__, " No cache instance found.");
                return false;
-       } elseif ((getConfig('cache_admin_menu') == null) || (getConfig('cache_admin_menu') == "N")) {
+       } elseif ((!isConfigEntrySet('cache_admin_menu')) || (getConfig('cache_admin_menu') != "Y")) {
                // Caching disabled (currently experiemental!)
                return false;
        }
 
        // Experiemental feature!
-       trigger_error("<strong>Experimental feature:</strong> You have to delete the admin_*.cache files by yourself at this point.");
+       debug_report_bug("<strong>Experimental feature:</strong> 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);
+       // Default type is unknown
+       $translated = sprintf(getMessage('POOL_TYPE_UNKNOWN'), $type);
 
        // Generate constant
        $constName = sprintf("POOL_TYPE_%s", $type);
@@ -2784,6 +2770,7 @@ function ADD_NEW_BONUS_MAIL ($data, $mode="", $output=true) {
                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;
@@ -2826,7 +2813,7 @@ function DETERMINE_REFID () {
 }
 
 // Destroys the admin session
-function DESTROY_ADMIN_SESSION ($destroy = true) {
+function destroyAdminSession ($destroy = true) {
        // Kill maybe existing session variables including array elements
        set_session('admin_login', "");
        set_session('admin_md5'  , "");
@@ -2835,7 +2822,7 @@ function DESTROY_ADMIN_SESSION ($destroy = true) {
 
        // Destroy session and return status
        if ($destroy) {
-               return @session_destroy();
+               return session_destroy();
        } // END - if
 
        // All fine if we shall not really destroy the session
@@ -2848,6 +2835,12 @@ function IF_APACHE_MODULE_LOADED ($apacheModule) {
        return (((function_exists('apache_get_modules')) && (in_array($apacheModule, apache_get_modules()))) || (!function_exists('apache_get_modules')));
 }
 
+// Merges $_CONFIG with data in given array
+function mergeConfig ($newConfig) {
+       global $_CONFIG;
+       $_CONFIG = merge_array($_CONFIG, $newConfig);
+}
+
 // Getter for $_CONFIG entries
 function getConfig ($entry) {
        global $_CONFIG;
@@ -2856,7 +2849,7 @@ function getConfig ($entry) {
        $value = null;
 
        // Is the entry there?
-       if (isset($_CONFIG[$entry])) {
+       if (isConfigEntrySet($entry)) {
                // Then use it
                $value = $_CONFIG[$entry];
        } // END - if
@@ -2865,8 +2858,37 @@ function getConfig ($entry) {
        return $value;
 }
 
-// @TODO Rewrite all language constants to this function.
+// Setter for $_CONFIG entries
+function setConfigEntry ($entry, $value) {
+       global $_CONFIG;
+
+       // Secure the entry name
+       $entry = SQL_ESCAPE($entry);
+
+       // And set it
+       $_CONFIG[$entry] = $value;
+}
+
+// Checks wether the given config entry is set
+function isConfigEntrySet ($entry) {
+       global $_CONFIG;
+       return (isset($_CONFIG[$entry]));
+}
+
+// Increment or init with given value or 1 as default the given config entry
+function incrementConfigEntry ($configEntry, $value=1) {
+       global $_CONFIG;
+
+       // Increment it if set or init it with 1
+       if (getConfig($configEntry) > 0) {
+               $_CONFIG[$configEntry] += $value;
+       } else {
+               $_CONFIG[$configEntry] = $value;
+       }
+}
+
 // "Getter" for language strings
+// @TODO Rewrite all language constants to this function.
 function getMessage ($messageId) {
        // Default is not found!
        $return = "!".$messageId."!";
@@ -2878,7 +2900,7 @@ function getMessage ($messageId) {
        } elseif (isset($GLOBALS['msg'][strtoupper($messageId)])) {
                // @DEPRECATED Language array element found in BIG_LETTERS
                $return = $GLOBALS['msg'][$messageId];
-       } elseif (defined(strtoupper($messageId))) {
+       } elseif (defined($messageId)) {
                // @DEPRECATED Deprecated constant found
                $return = constant($messageId);
        } else {
@@ -2982,18 +3004,6 @@ function THEME_GET_ID ($name) {
        return $id;
 }
 
-// Increment or init with given value or 1 as default the given config entry
-function incrementConfigEntry ($configEntry, $value=1) {
-       global $_CONFIG;
-
-       // Increment it if set or init it with 1
-       if (getConfig($configEntry) > 0) {
-               $_CONFIG[$configEntry] += $value;
-       } else {
-               $_CONFIG[$configEntry] = $value;
-       }
-}
-
 // Read a given file
 function READ_FILE ($FQFN, $sqlPrepare = false) {
        // Load the file
@@ -3036,7 +3046,7 @@ function WRITE_FILE ($FQFN, $content) {
 // Generates an error code from given account status
 function GEN_ERROR_CODE_FROM_ACCOUNT_STATUS ($status) {
        // Default error code if unknown account status
-       $ERROR = CODE_UNKNOWN_STATUS;
+       $ERROR = constant('CODE_UNKNOWN_STATUS');
 
        // Generate constant name
        $constantName = sprintf("CODE_ID_%s", $status);
@@ -3059,7 +3069,7 @@ function clearOutputBuffer () {
        // Trigger an error on failure
        if (!ob_end_clean()) {
                // Failed!
-               trigger_error(__FUNCTION__.": Failed to clean output buffer.");
+               debug_report_bug(__FUNCTION__.": Failed to clean output buffer.");
        } // END - if
 }
 
@@ -3089,8 +3099,9 @@ function getActualVersion ($type = 0) {
                }
        }
 
-       if ($new)  {
-               // no Revision-File or has no valid Data so read the Revision from the Server.
+       // Has it been updated?
+       if ($new === true)  {
+               // No Revision-File or has no valid Data so read the Revision from the Server.
                $version = GET_URL("check-updates3.php");
 
                // Prepare content
@@ -3147,6 +3158,134 @@ function LOAD_INC_ONCE ($INC) {
        } // END - if
 }
 
+// Back-ported from the new ship-simu engine. :-)
+function debug_get_printable_backtrace () {
+       // Init variable
+       $backtrace = "<ol>\n";
+
+       // Get and prepare backtrace for output
+       $backtraceArray = debug_backtrace();
+       foreach ($backtraceArray as $key => $trace) {
+               if (!isset($trace['file'])) $trace['file'] = __FILE__;
+               if (!isset($trace['line'])) $trace['line'] = __LINE__;
+               if (!isset($trace['args'])) $trace['args'] = array();
+               $backtrace .= "<li class=\"debug_list\"><span class=\"backtrace_file\">".basename($trace['file'])."</span>:".$trace['line'].", <span class=\"backtrace_function\">".$trace['function']."(".count($trace['args']).")</span></li>\n";
+       } // END - foreach
+
+       // Close it
+       $backtrace .= "</ol>\n";
+
+       // Return the backtrace
+       return $backtrace;
+}
+
+// Output a debug backtrace to the user
+function debug_report_bug ($message = "") {
+       // Init message
+       $debug = "";
+       // Is the optional message set?
+       if (!empty($message)) {
+               // Use and log it
+               $debug = sprintf("Note: %s<br />\n",
+                       $message
+               );
+
+               // @TODO Add a little more infos here
+               DEBUG_LOG(__FUNCTION__, __LINE__, $message);
+       } // END - if
+
+       // Add output
+       $debug .= ("Please report this error at <a href=\"http://bugs.mxchange.org\" rel=\"external\" target=\"_blank\">bugs.mxchange.org</a>:<pre>");
+       $debug .= (debug_get_printable_backtrace());
+       $debug .= ("</pre>Thank you for your help finding bugs.");
+
+       // And abort here
+       die($debug);
+}
+
+// Generates a ***weak*** seed (taken from de.php.net/mt_srand)
+function generateSeed () {
+       list($usec, $sec) = explode(" ", microtime());
+       return ((float)$sec + (float)$usec);
+}
+
+// Converts a message code to a human-readable message
+function convertCodeToMessage ($code) {
+       $msg = "";
+       switch ($code) {
+               case constant('CODE_LOGOUT_DONE')      : $msg = getMessage('LOGOUT_DONE'); break;
+               case constant('CODE_LOGOUT_FAILED')    : $msg = "<span class=\"guest_failed\">{--LOGOUT_FAILED--}</span>"; break;
+               case constant('CODE_DATA_INVALID')     : $msg = getMessage('MAIL_DATA_INVALID'); break;
+               case constant('CODE_POSSIBLE_INVALID') : $msg = getMessage('MAIL_POSSIBLE_INVALID'); break;
+               case constant('CODE_ACCOUNT_LOCKED')   : $msg = getMessage('MEMBER_ACCOUNT_LOCKED_UNC'); break;
+               case constant('CODE_USER_404')         : $msg = getMessage('USER_NOT_FOUND'); break;
+               case constant('CODE_STATS_404')        : $msg = getMessage('MAIL_STATS_404'); break;
+               case constant('CODE_ALREADY_CONFIRMED'): $msg = getMessage('MAIL_ALREADY_CONFIRMED'); break;
+
+               case constant('CODE_ERROR_MAILID'):
+                       if (EXT_IS_ACTIVE($ext, true)) {
+                               $msg = getMessage('ERROR_CONFIRMING_MAIL');
+                       } else {
+                               $msg = sprintf(getMessage('EXTENSION_PROBLEM_NOT_INSTALLED'), "mailid");
+                       }
+                       break;
+
+               case constant('CODE_EXTENSION_PROBLEM'):
+                       if (isset($_GET['ext'])) {
+                               $msg = sprintf(getMessage('EXTENSION_PROBLEM_EXT_INACTIVE'), SQL_ESCAPE($_GET['ext']));
+                       } else {
+                               $msg = getMessage('EXTENSION_PROBLEM_UNSET_EXT');
+                       }
+                       break;
+
+               case constant('CODE_COOKIES_DISABLED') : $msg = getMessage('LOGIN_NO_COOKIES'); break;
+               case constant('CODE_BEG_SAME_AS_OWN')  : $msg = getMessage('BEG_SAME_UID_AS_OWN'); break;
+               case constant('CODE_LOGIN_FAILED')     : $msg = getMessage('LOGIN_FAILED_GENERAL'); break;
+               default                                : $msg = UNKNOWN_MAILID_CODE_1.$code.UNKNOWN_MAILID_CODE_2; break;
+       } // END - switch
+
+       // Return the message
+       return $msg;
+}
+
+// Checks wether the given extension is currently not installed
+// and redirects if so.
+function REDIRCT_ON_UNINSTALLED_EXTENSION ($ext_name) {
+       // Is the extension uninstalled/inactive?
+       if (!EXT_IS_ACTIVE($ext_name)) {
+               // Redirect to index
+               LOAD_URL("modules.php?module=index&amp;msg=".constant('CODE_EXTENSION_PROBLEM')."&amp;ext=".$ext_name);
+       } // END - if
+}
+
+// Generate a "link" for the given admin id (aid)
+function GENERATE_AID_LINK ($aid) {
+       // No assigned admin is default
+       $admin = "<div class=\"admin_note\">{--ADMIN_NO_ADMIN_ASSIGNED--}</div>";
+
+       // Zero? = Not assigned
+       if ($aid == "0") {
+               // Load admin's login
+               $login = GET_ADMIN_LOGIN($aid);
+               if ($login != "***") {
+                       // Is the extension there?
+                       if (EXT_IS_ACTIVE("admins")) {
+                               // Admin found
+                               $admin = "<a href=\"".ADMINS_CREATE_EMAIL_LINK(GET_ADMIN_EMAIL($aid))."\">".$login."</a>";
+                       } else {
+                               // Extension not found
+                               $admin = sprintf(getMessage('EXTENSION_PROBLEM_NOT_INSTALLED'), "admins");
+                       }
+               } else {
+                       // Maybe deleted?
+                       $admin = "<div class=\"admin_note\">".sprintf(getMessage('ADMIN_ID_404'), $aid)."</div>";
+               }
+       } // END - if
+
+       // Return result
+       return $admin;
+}
+
 //////////////////////////////////////////////////
 // AUTOMATICALLY RE-GENERATED MISSING FUNCTIONS //
 //////////////////////////////////////////////////