]> git.mxchange.org Git - mailer.git/blobdiff - inc/functions.php
HTTP status codes added for missing/locked modules, fixed double-logging of debug...
[mailer.git] / inc / functions.php
index 2e67489387c9eb29c91594652dc164a7153f278a..864e26f9678eda20f32524877b8129e96053070e 100644 (file)
@@ -45,7 +45,9 @@ if (!defined('__SECURITY')) {
 // Output HTML code directly or 'render' it. You addionally switch the new-line character off
 function outputHtml ($htmlCode, $newLine = true) {
        // Init output
-       if (!isset($GLOBALS['output'])) $GLOBALS['output'] = '';
+       if (!isset($GLOBALS['output'])) {
+               $GLOBALS['output'] = '';
+       } // END - if
 
        // Transfer username
        $username = getMessage('USERNAME_UNKNOWN');
@@ -83,7 +85,7 @@ function outputHtml ($htmlCode, $newLine = true) {
 
                        default:
                                // Huh, something goes wrong or maybe you have edited config.php ???
-                               app_die(__FUNCTION__, __LINE__, '<strong>{--FATAL_ERROR--}:</strong> {--LANG_NO_RENDER_DIRECT--}');
+                               debug_report_bug(__FUNCTION__, __LINE__, '<strong>{--FATAL_ERROR--}:</strong> {--LANG_NO_RENDER_DIRECT--}');
                                break;
                } // END - switch
        } elseif ((getPhpCaching() == 'on') && ((!isset($GLOBALS['header'])) || (count($GLOBALS['header']) == 0))) {
@@ -95,11 +97,6 @@ function outputHtml ($htmlCode, $newLine = true) {
                        clearOutputBuffer();
                } // END - if
 
-               // Extension 'rewrite' installed?
-               if ((isExtensionActive('rewrite')) && (getOutputMode() != 1)) {
-                       $GLOBALS['output'] = rewriteLinksInCode($GLOBALS['output']);
-               } // END - if
-
                // Send all HTTP headers
                sendHttpHeaders();
 
@@ -109,11 +106,6 @@ function outputHtml ($htmlCode, $newLine = true) {
                // Output code here, DO NOT REMOVE! ;-)
                outputRawCode($GLOBALS['output']);
        } elseif ((getConfig('OUTPUT_MODE') == 'render') && (!empty($GLOBALS['output']))) {
-               // Rewrite links when rewrite extension is active
-               if ((isExtensionActive('rewrite')) && (getOutputMode() != 1)) {
-                       $GLOBALS['output'] = rewriteLinksInCode($GLOBALS['output']);
-               } // END - if
-
                // Send all HTTP headers
                sendHttpHeaders();
 
@@ -134,7 +126,7 @@ function sendHttpHeaders () {
        $now = gmdate('D, d M Y H:i:s') . ' GMT';
 
        // Send HTTP header
-       sendHeader('HTTP/1.1 200');
+       sendHeader('HTTP/1.1 ' . getHttpStatus());
 
        // General headers for no caching
        sendHeader('Expires: ' . $now); // RFC2616 - Section 14.21
@@ -149,32 +141,42 @@ function sendHttpHeaders () {
 // Compiles the final output
 function compileFinalOutput () {
        // Init counter
-       $cnt = '0';
+       $cnt = 0;
 
        // Add page header and footer
        addPageHeaderFooter();
 
        // Compile all out
-       while (((strpos($GLOBALS['output'], '{--') > 0) || (strpos($GLOBALS['output'], '{!') > 0) || (strpos($GLOBALS['output'], '{?') > 0)) && ($cnt < 3)) {
+       while (((strpos($GLOBALS['output'], '{--') !== false) || (strpos($GLOBALS['output'], '{DQUOTE}') !== false) || (strpos($GLOBALS['output'], '{!') !== false) || (strpos($GLOBALS['output'], '{?') !== false) || (strpos($GLOBALS['output'], '{%') !== false)) && ($cnt < 3)) {
                // Init common variables
                $content = array();
                $newContent = '';
 
                // Compile it
-               $eval = "\$newContent = \"".compileCode(escapeQuotes($GLOBALS['output']))."\";";
+               //* DEBUG: */ print '<pre>'.htmlentities($GLOBALS['output']).'</pre>';
+               $eval = '$newContent = "' . str_replace('{DQUOTE}', '"', compileCode(escapeQuotes($GLOBALS['output']))) . '";';
+               //* DEBUG: */ die('<pre>'.htmlentities($eval).'</pre>');
                eval($eval);
+               //* DEBUG: */ die('<pre>'.htmlentities($newContent).'</pre>');
 
                // Was that eval okay?
                if (empty($newContent)) {
                        // Something went wrong!
-                       debug_report_bug('Evaluation error:<pre>' . linenumberCode($eval) . '</pre>', false);
+                       debug_report_bug(__FUNCTION__, __LINE__, 'Evaluation error:<pre>' . linenumberCode($eval) . '</pre>', false);
                } // END - if
+
+               // Use it again
                $GLOBALS['output'] = $newContent;
 
                // Count round
                $cnt++;
        } // END - while
 
+       // Extension 'rewrite' installed?
+       if ((isExtensionActive('rewrite')) && (getOutputMode() != 1)) {
+               $GLOBALS['output'] = rewriteLinksInCode($GLOBALS['output']);
+       } // END - if
+
        // Compress it?
        if (!empty($_SERVER['HTTP_ACCEPT_ENCODING']) && (strpos('gzip', $_SERVER['HTTP_ACCEPT_ENCODING']) !== null)) {
                // Compress it for HTTP gzip
@@ -254,7 +256,7 @@ function getTotalFatalErrors () {
 // Load a template file and return it's content (only it's name; do not use ' or ")
 function loadTemplate ($template, $return = false, $content = array()) {
        // @TODO Remove this sanity-check if all is fine
-       if (!is_bool($return)) debug_report_bug('return is not bool (' . gettype($return) . ')');
+       if (!is_bool($return)) debug_report_bug(__FUNCTION__, __LINE__, 'return is not bool (' . gettype($return) . ')');
 
        // @TODO Try to rewrite all $DATA to $content
        global $DATA;
@@ -322,9 +324,6 @@ function loadTemplate ($template, $return = false, $content = array()) {
 
                        // Cache the eval() command here
                        $GLOBALS['template_eval'][$template] = $eval;
-
-                       // Eval the code
-                       eval($GLOBALS['template_eval'][$template]);
                } elseif ((isAdmin()) || ((isInstalling()) && (!isInstalled()))) {
                        // Only admins shall see this warning or when installation mode is active
                        $ret = '<br /><span class="guest_failed">{--TEMPLATE_404--}</span><br />
@@ -339,10 +338,13 @@ function loadTemplate ($template, $return = false, $content = array()) {
                        // No file!
                        $GLOBALS['template_eval'][$template] = '404';
                }
-       } else {
+       }
+
+       // Code set?
+       if ((isset($GLOBALS['template_eval'][$template])) && ($GLOBALS['template_eval'][$template] != '404')) {
                // Eval the code
                eval($GLOBALS['template_eval'][$template]);
-       }
+       } // END - if
 
        // Do we have some content to output or return?
        if (!empty($ret)) {
@@ -496,7 +498,7 @@ function loadEmailTemplate ($template, $content = array(), $userid = '0') {
                $GLOBALS['tpl_content'] = readFromFile($FQFN);
 
                // Run code
-               $GLOBALS['tpl_content'] = "\$newContent = decodeEntities(\"".compileRawCode(escapeQuotes($GLOBALS['tpl_content']))."\");";
+               $GLOBALS['tpl_content'] = '$newContent = decodeEntities("' . compileRawCode(escapeQuotes($GLOBALS['tpl_content'])) . '");';
                eval($GLOBALS['tpl_content']);
        } elseif (!empty($template)) {
                // Template file not found!
@@ -536,10 +538,10 @@ function sendEmail ($toEmail, $subject, $message, $isHtml = 'N', $mailHeader = '
        //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, "TO={$toEmail},SUBJECT={$subject}<br />");
 
        // Compile subject line (for POINTS constant etc.)
-       eval("\$subject = decodeEntities(\"".compileRawCode(escapeQuotes($subject))."\");");
+       eval('$subject = decodeEntities("' . compileRawCode(escapeQuotes($subject)) . '");');
 
        // Set from header
-       if ((!eregi('@', $toEmail)) && ($toEmail > 0)) {
+       if ((!isInStringIgnoreCase('@', $toEmail)) && ($toEmail > 0)) {
                // Value detected, is the message extension installed?
                // @TODO Extension 'msg' does not exist
                if (isExtensionActive('msg')) {
@@ -582,10 +584,10 @@ function sendEmail ($toEmail, $subject, $message, $isHtml = 'N', $mailHeader = '
        }
 
        // Compile "TO"
-       eval("\$toEmail = \"".compileRawCode(escapeQuotes($toEmail))."\";");
+       eval('$toEmail = "' . compileRawCode(escapeQuotes($toEmail)) . '";');
 
        // Compile "MSG"
-       eval("\$message = \"".str_replace('$', '&#36;', compileRawCode(escapeQuotes($message)))."\";");
+       eval('$message = "' . str_replace('$', '&#36;', compileRawCode(escapeQuotes($message))) . '";');
 
        // Fix HTML parameter (default is no!)
        if (empty($isHtml)) $isHtml = 'N';
@@ -599,13 +601,13 @@ Message : ' . htmlentities(utf8_decode($message)) . '
 </pre>');
        } elseif (($isHtml == 'Y') && (isExtensionActive('html_mail'))) {
                // Send mail as HTML away
-               sendHtmlEmail($toEmail, $subject, $message, $mailHeader);
+               return sendHtmlEmail($toEmail, $subject, $message, $mailHeader);
        } elseif (!empty($toEmail)) {
                // Send Mail away
-               sendRawEmail($toEmail, $subject, $message, $mailHeader);
+               return sendRawEmail($toEmail, $subject, $message, $mailHeader);
        } elseif ($isHtml != 'Y') {
                // Problem found!
-               sendRawEmail(getConfig('WEBMASTER'), '[PROBLEM:]' . $subject, $message, $mailHeader);
+               return sendRawEmail(getConfig('WEBMASTER'), '[PROBLEM:]' . $subject, $message, $mailHeader);
        }
 }
 
@@ -634,7 +636,7 @@ function sendRawEmail ($toEmail, $subject, $message, $from) {
                $mail = new PHPMailer();
 
                // Set charset to UTF-8
-               $mail->CharSet('UTF-8');
+               $mail->CharSet = 'UTF-8';
 
                // Path for PHPMailer
                $mail->PluginDir  = sprintf("%sinc/phpmailer/", getConfig('PATH'));
@@ -665,9 +667,21 @@ function sendRawEmail ($toEmail, $subject, $message, $from) {
                $mail->AddCustomHeader('Errors-To:' . getConfig('WEBMASTER'));
                $mail->AddCustomHeader('X-Loop:' . getConfig('WEBMASTER'));
                $mail->Send();
+
+               // Has an error occured?
+               if (!empty($mail->ErrorInfo)) {
+                       // Log message
+                       logDebugMessage(__FUNCTION__, __LINE__, 'Error while sending mail: ' . $mail->ErrorInfo);
+
+                       // Raise an error
+                       return false;
+               } else {
+                       // All fine!
+                       return true;
+               }
        } else {
                // Use legacy mail() command
-               mail($toEmail, $subject, decodeEntities($message), $from);
+               return mail($toEmail, $subject, decodeEntities($message), $from);
        }
 }
 
@@ -773,6 +787,9 @@ function translatePoolType ($type) {
 
 // Translates the american decimal dot into a german comma
 function translateComma ($dotted, $cut = true, $max = '0') {
+       // First, cast all to double, due to PHP changes
+       $dotted = (double) $dotted;
+
        // Default is 3 you can change this in admin area "Misc -> Misc Options"
        if (!isConfigEntrySet('max_comma')) setConfigEntry('max_comma', 3);
 
@@ -822,7 +839,7 @@ function translateGender ($gender) {
                case 'C': $ret = getMessage('GENDER_C'); break;
                default:
                        // Please report bugs on unknown genders
-                       debug_report_bug(sprintf("Unknown gender %s detected.", $gender));
+                       debug_report_bug(__FUNCTION__, __LINE__, sprintf("Unknown gender %s detected.", $gender));
                        break;
        } // END - switch
 
@@ -847,7 +864,7 @@ function translateUserStatus ($status) {
 
                default:
                        // Please report all unknown status
-                       debug_report_bug(sprintf("Unknown status %s detected.", $status));
+                       debug_report_bug(__FUNCTION__, __LINE__, sprintf("Unknown status %s detected.", $status));
                        break;
        } // END - switch
 
@@ -937,7 +954,7 @@ function redirectToUrl ($URL, $allowSpider = true) {
        } // END - if
 
        // Three different ways to debug...
-       //* DEBUG: */ debug_report_bug(sprintf("%s[%s:] URL=%s", __FUNCTION__, __LINE__, $URL));
+       //* DEBUG: */ debug_report_bug(__FUNCTION__, __LINE__, sprintf("%s[%s:] URL=%s", __FUNCTION__, __LINE__, $URL));
        //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'URL=' . $URL);
        //* DEBUG: */ die($URL);
 
@@ -976,7 +993,7 @@ function redirectToConfiguredUrl ($configEntry) {
        // Is this URL set?
        if (is_null($URL)) {
                // Then abort here
-               debug_report_bug(sprintf("Configuration entry %s is not set!", $configEntry));
+               debug_report_bug(__FUNCTION__, __LINE__, sprintf("Configuration entry %s is not set!", $configEntry));
        } // END - if
 
        // Load the URL
@@ -1150,30 +1167,30 @@ function addSelectionBox ($type, $default, $prefix = '', $id = '0', $class = 're
 
        if ($type == 'yn') {
                // This is a yes/no selection only!
-               if ($id > 0) $prefix .= "[" . $id."]";
-               $OUT .= "    <select name=\"" . $prefix."\" class=\"" . $class . "\" size=\"1\">\n";
+               if ($id > 0) $prefix .= '[' . $id . ']';
+               $OUT .= '<select name="' . $prefix . '" class="' . $class . '" size="1">';
        } else {
                // Begin with regular selection box here
                if (!empty($prefix)) $prefix .= "_";
                $type2 = $type;
-               if ($id > 0) $type2 .= "[" . $id."]";
-               $OUT .= "    <select name=\"".strtolower($prefix . $type2)."\" class=\"" . $class . "\" size=\"1\">\n";
+               if ($id > 0) $type2 .= '[' . $id . ']';
+               $OUT .= '<select name="' . strtolower($prefix . $type2) . '" class="' . $class . '" size="1">';
        }
 
        switch ($type) {
                case 'day': // Day
                        for ($idx = 1; $idx < 32; $idx++) {
-                               $OUT .= "<option value=\"" . $idx."\"";
+                               $OUT .= '<option value="' . $idx . '"';
                                if ($default == $idx) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $idx."</option>\n";
+                               $OUT .= '>' . $idx . '</option>';
                        } // END - for
                        break;
 
                case 'month': // Month
-                       foreach ($GLOBALS['month_descr'] as $month => $descr) {
-                               $OUT .= "<option value=\"" . $month."\"";
-                               if ($default == $month) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $descr."</option>\n";
+                       foreach ($GLOBALS['month_descr'] as $idx => $descr) {
+                               $OUT .= '<option value="' . $idx . '"';
+                               if ($default == $idx) $OUT .= ' selected="selected"';
+                               $OUT .= '>' . $descr . '</option>';
                        } // END - for
                        break;
 
@@ -1182,7 +1199,7 @@ function addSelectionBox ($type, $default, $prefix = '', $id = '0', $class = 're
                        $year = date('Y', time());
 
                        // Use configured min age or fixed?
-                       if ((isExtensionActive('other')) && (getExtensionVersion('other') >= '0.2.1')) {
+                       if (isExtensionInstalledAndNewer('order', '0.2.1')) {
                                // Configured
                                $startYear = $year - getConfig('min_age');
                        } else {
@@ -1196,21 +1213,20 @@ function addSelectionBox ($type, $default, $prefix = '', $id = '0', $class = 're
                        // Check if the default value is larger than minimum and bigger than actual year
                        if (($default > $minYear) && ($default >= $year)) {
                                for ($idx = $year; $idx < ($year + 11); $idx++) {
-                                       $OUT .= "<option value=\"" . $idx."\"";
+                                       $OUT .= '<option value="' . $idx . '"';
                                        if ($default == $idx) $OUT .= ' selected="selected"';
-                                       $OUT .= ">" . $idx."</option>\n";
+                                       $OUT .= '>' . $idx . '</option>';
                                } // END - for
                        } elseif ($default == -1) {
                                // Current year minus 1
-                               for ($idx = $startYear; $idx <= ($year + 1); $idx++)
-                               {
-                                       $OUT .= "<option value=\"" . $idx."\">" . $idx."</option>\n";
-                               }
+                               for ($idx = $startYear; $idx <= ($year + 1); $idx++) {
+                                       $OUT .= '<option value="' . $idx . '">' . $idx . '</option>';
+                               } // END - for
                        } else {
                                // Get current year and subtract the configured minimum age
-                               $OUT .= "<option value=\"".($minYear - 1)."\">&lt;" . $minYear."</option>\n";
+                               $OUT .= '<option value="' . ($minYear - 1) . '">&lt;' . $minYear . '</option>';
                                // Calculate earliest year depending on extension version
-                               if ((isExtensionActive('other')) && (getExtensionVersion('other') >= '0.2.1')) {
+                               if (isExtensionInstalledAndNewer('order', '0.2.1')) {
                                        // Use configured minimum age
                                        $year = date('Y', time()) - getConfig('min_age');
                                } else {
@@ -1220,41 +1236,41 @@ function addSelectionBox ($type, $default, $prefix = '', $id = '0', $class = 're
 
                                // Construct year selection list
                                for ($idx = $minYear; $idx <= $year; $idx++) {
-                                       $OUT .= "<option value=\"" . $idx."\"";
+                                       $OUT .= '<option value="' . $idx . '"';
                                        if ($default == $idx) $OUT .= ' selected="selected"';
-                                       $OUT .= ">" . $idx."</option>\n";
+                                       $OUT .= '>' . $idx . '</option>';
                                } // END - for
                        }
                        break;
 
                case 'sec':
                case 'min':
-                       for ($idx = '0'; $idx < 60; $idx+=5) {
+                       for ($idx = 0; $idx < 60; $idx+=5) {
                                if (strlen($idx) == 1) $idx = '0' . $idx;
-                               $OUT .= "<option value=\"" . $idx."\"";
+                               $OUT .= '<option value="' . $idx . '"';
                                if ($default == $idx) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $idx."</option>\n";
+                               $OUT .= '>' . $idx . '</option>';
                        } // END - for
                        break;
 
                case 'hour':
-                       for ($idx = '0'; $idx < 24; $idx++) {
+                       for ($idx = 0; $idx < 24; $idx++) {
                                if (strlen($idx) == 1) $idx = '0' . $idx;
-                               $OUT .= "<option value=\"" . $idx."\"";
+                               $OUT .= '<option value="' . $idx . '"';
                                if ($default == $idx) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $idx."</option>\n";
+                               $OUT .= '>' . $idx . '</option>';
                        } // END - for
                        break;
 
                case 'yn':
-                       $OUT .= "<option value=\"Y\"";
+                       $OUT .= '<option value="Y"';
                        if ($default == 'Y') $OUT .= ' selected="selected"';
-                       $OUT .= ">{--YES--}</option>\n<option value=\"N\"";
+                       $OUT .= '>{--YES--}</option><option value="N"';
                        if ($default != 'Y') $OUT .= ' selected="selected"';
-                       $OUT .= ">{--NO--}</option>\n";
+                       $OUT .= '>{--NO--}</option>';
                        break;
        }
-       $OUT .= "    </select>\n";
+       $OUT .= '</select>';
        return $OUT;
 }
 
@@ -1325,7 +1341,7 @@ function bigintval ($num, $castValue = true, $abortOnMismatch = true) {
        // Has the whole value changed?
        if (('' . $ret . '' != '' . $num . '') && ($abortOnMismatch === true)) {
                // Log the values
-               debug_report_bug('Problem with number found. ret=' . $ret . ', num='. $num);
+               debug_report_bug(__FUNCTION__, __LINE__, 'Problem with number found. ret=' . $ret . ', num='. $num);
        } // END - if
 
        // Return result
@@ -1337,10 +1353,10 @@ function generateImageOrCode ($img_code, $headerSent = true) {
        // Is the code size oversized or shouldn't we display it?
        if ((strlen($img_code) > 6) || (empty($img_code)) || (getConfig('code_length') == '0')) {
                // Stop execution of function here because of over-sized code length
-               debug_report_bug('img_code ' . $img_code .' has invalid length. img_code()=' . strlen($img_code) . ' code_length=' . getConfig('code_length'));
+               debug_report_bug(__FUNCTION__, __LINE__, 'img_code ' . $img_code .' has invalid length. img_code()=' . strlen($img_code) . ' code_length=' . getConfig('code_length'));
        } elseif ($headerSent === false) {
                // Return an HTML code here
-               return "<img src=\"{%url=img.php?code=" . $img_code."%}\" alt=\"Image\" />\n";
+               return '<img src="{%url=img.php?code=' . $img_code . '%}" alt="Image" />';
        }
 
        // Load image
@@ -1353,8 +1369,7 @@ function generateImageOrCode ($img_code, $headerSent = true) {
        // Is it readable?
        if (isFileReadable($img)) {
                // Switch image type
-               switch (getConfig('img_type'))
-               {
+               switch (getConfig('img_type')) {
                        case 'jpg':
                                // Okay, load image and hide all errors
                                $image = imagecreatefromjpeg($img);
@@ -1364,7 +1379,7 @@ function generateImageOrCode ($img_code, $headerSent = true) {
                                // Okay, load image and hide all errors
                                $image = imagecreatefrompng($img);
                                break;
-               }
+               } // END - switch
        } else {
                // Exit function here
                logDebugMessage(__FUNCTION__, __LINE__, sprintf("File for image type %s not found.", getConfig('img_type')));
@@ -1384,7 +1399,7 @@ function generateImageOrCode ($img_code, $headerSent = true) {
        switch (getConfig('img_type')) {
                case 'jpg': imagejpeg($image); break;
                case 'png': imagepng($image);  break;
-       }
+       } // END - switch
 
        // Remove image from memory
        imagedestroy($image);
@@ -1458,137 +1473,137 @@ function createTimeSelections ($timestamp, $prefix = '', $display = '', $align =
                );
        } else {
                // Generate table
-               $OUT  = "<div align=\"" . $align."\">\n";
-               $OUT .= "<table border=\"0\" cellspacing=\"0\" cellpadding=\"0\" class=\"timebox_table dashed\">\n";
-               $OUT .= "<tr>\n";
+               $OUT  = '<div align="' . $align . '">';
+               $OUT .= '<table border="0" cellspacing="0" cellpadding="0" class="timebox_table dashed">';
+               $OUT .= '<tr>';
 
-               if (ereg('Y', $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"timebox_column bottom\"><div class=\"tiny\">{--_YEARS--}</strong></td>\n";
-               }
+               if (isInString('Y', $display) || (empty($display))) {
+                       $OUT .= '<td align="center" class="timebox_column bottom"><div class="tiny">{--_YEARS--}</strong></td>';
+               } // END - if
 
-               if (ereg('M', $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"timebox_column bottom\"><div class=\"tiny\">{--_MONTHS--}</strong></td>\n";
-               }
+               if (isInString('M', $display) || (empty($display))) {
+                       $OUT .= '<td align="center" class="timebox_column bottom"><div class="tiny">{--_MONTHS--}</strong></td>';
+               } // END - if
 
-               if (ereg('W', $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"timebox_column bottom\"><div class=\"tiny\">{--_WEEKS--}</strong></td>\n";
-               }
+               if (isInString('W', $display) || (empty($display))) {
+                       $OUT .= '<td align="center" class="timebox_column bottom"><div class="tiny">{--_WEEKS--}</strong></td>';
+               } // END - if
 
-               if (ereg('D', $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"timebox_column bottom\"><div class=\"tiny\">{--_DAYS--}</strong></td>\n";
-               }
+               if (isInString('D', $display) || (empty($display))) {
+                       $OUT .= '<td align="center" class="timebox_column bottom"><div class="tiny">{--_DAYS--}</strong></td>';
+               } // END - if
 
-               if (ereg('h', $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"timebox_column bottom\"><div class=\"tiny\">{--_HOURS--}</strong></td>\n";
-               }
+               if (isInString('h', $display) || (empty($display))) {
+                       $OUT .= '<td align="center" class="timebox_column bottom"><div class="tiny">{--_HOURS--}</strong></td>';
+               } // END - if
 
-               if (ereg('m', $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"timebox_column bottom\"><div class=\"tiny\">{--_MINUTES--}</strong></td>\n";
-               }
+               if (isInString('m', $display) || (empty($display))) {
+                       $OUT .= '<td align="center" class="timebox_column bottom"><div class="tiny">{--_MINUTES--}</strong></td>';
+               } // END - if
 
-               if (ereg('s', $display) || (empty($display))) {
-                       $OUT .= "  <td align=\"center\" class=\"timebox_column bottom\"><div class=\"tiny\">{--_SECONDS--}</strong></td>\n";
-               }
+               if (isInString('s', $display) || (empty($display))) {
+                       $OUT .= '<td align="center" class="timebox_column bottom"><div class="tiny">{--_SECONDS--}</strong></td>';
+               } // END - if
 
-               $OUT .= "</tr>\n";
-               $OUT .= "<tr>\n";
+               $OUT .= '</tr>';
+               $OUT .= '<tr>';
 
-               if (ereg('Y', $display) || (empty($display))) {
+               if (isInString('Y', $display) || (empty($display))) {
                        // Generate year selection
-                       $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."\"";
+                       $OUT .= '<td align="center"><select class="mini_select" name="' . $prefix . '_ye" size="1">';
+                       for ($idx = 0; $idx <= 10; $idx++) {
+                               $OUT .= '<option class="mini_select" value="' . $idx . '"';
                                if ($idx == $Y) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $idx."</option>\n";
-                       }
-                       $OUT .= "  </select></td>\n";
+                               $OUT .= '>' . $idx . '</option>';
+                       } // END - for
+                       $OUT .= '</select></td>';
                } else {
                        $OUT .= '<input type="hidden" name="' . $prefix . '_ye" value="0" />';
                }
 
-               if (ereg('M', $display) || (empty($display))) {
+               if (isInString('M', $display) || (empty($display))) {
                        // Generate month selection
-                       $OUT .= "  <td align=\"center\"><select class=\"mini_select\" name=\"" . $prefix . "_mo\" size=\"1\">\n";
-                       for ($idx = '0'; $idx <= 11; $idx++)
-                       {
-                               $OUT .= "  <option class=\"mini_select\" value=\"" . $idx."\"";
+                       $OUT .= '<td align="center"><select class="mini_select" name="' . $prefix . '_mo" size="1">';
+                       for ($idx = 0; $idx <= 11; $idx++) {
+                               $OUT .= '  <option class="mini_select" value="' . $idx . '"';
                                if ($idx == $M) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $idx."</option>\n";
-                       }
-                       $OUT .= "  </select></td>\n";
+                               $OUT .= '>' . $idx . '</option>';
+                       } // END - for
+                       $OUT .= '</select></td>';
                } else {
                        $OUT .= '<input type="hidden" name="' . $prefix . '_mo" value="0" />';
                }
 
-               if (ereg('W', $display) || (empty($display))) {
+               if (isInString('W', $display) || (empty($display))) {
                        // Generate week selection
-                       $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."\"";
+                       $OUT .= '<td align="center"><select class="mini_select" name="' . $prefix . '_we" size="1">';
+                       for ($idx = 0; $idx <= 4; $idx++) {
+                               $OUT .= '  <option class="mini_select" value="' . $idx . '"';
                                if ($idx == $W) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $idx."</option>\n";
-                       }
-                       $OUT .= "  </select></td>\n";
+                               $OUT .= '>' . $idx . '</option>';
+                       } // END - for
+                       $OUT .= '</select></td>';
                } else {
                        $OUT .= '<input type="hidden" name="' . $prefix . '_we" value="0" />';
                }
 
-               if (ereg('D', $display) || (empty($display))) {
+               if (isInString('D', $display) || (empty($display))) {
                        // Generate day selection
-                       $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."\"";
+                       $OUT .= '<td align="center"><select class="mini_select" name="' . $prefix . '_da" size="1">';
+                       for ($idx = 0; $idx <= 31; $idx++) {
+                               $OUT .= '  <option class="mini_select" value="' . $idx . '"';
                                if ($idx == $D) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $idx."</option>\n";
-                       }
-                       $OUT .= "  </select></td>\n";
+                               $OUT .= '>' . $idx . '</option>';
+                       } // END - for
+                       $OUT .= '</select></td>';
                } else {
                        $OUT .= '<input type="hidden" name="' . $prefix . '_da" value="0" />';
                }
 
-               if (ereg('h', $display) || (empty($display))) {
+               if (isInString('h', $display) || (empty($display))) {
                        // Generate hour selection
-                       $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."\"";
+                       $OUT .= '<td align="center"><select class="mini_select" name="' . $prefix . '_ho" size="1">';
+                       for ($idx = 0; $idx <= 23; $idx++) {
+                               $OUT .= '  <option class="mini_select" value="' . $idx . '"';
                                if ($idx == $h) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $idx."</option>\n";
-                       }
-                       $OUT .= "  </select></td>\n";
+                               $OUT .= '>' . $idx . '</option>';
+                       } // END - for
+                       $OUT .= '</select></td>';
                } else {
                        $OUT .= '<input type="hidden" name="' . $prefix . '_ho" value="0" />';
                }
 
-               if (ereg('m', $display) || (empty($display))) {
+               if (isInString('m', $display) || (empty($display))) {
                        // Generate minute selection
-                       $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."\"";
+                       $OUT .= '<td align="center"><select class="mini_select" name="' . $prefix . '_mi" size="1">';
+                       for ($idx = 0; $idx <= 59; $idx++) {
+                               $OUT .= '  <option class="mini_select" value="' . $idx . '"';
                                if ($idx == $m) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $idx."</option>\n";
-                       }
-                       $OUT .= "  </select></td>\n";
+                               $OUT .= '>' . $idx . '</option>';
+                       } // END - for
+                       $OUT .= '</select></td>';
                } else {
                        $OUT .= '<input type="hidden" name="' . $prefix . '_mi" value="0" />';
                }
 
-               if (ereg('s', $display) || (empty($display))) {
+               if (isInString('s', $display) || (empty($display))) {
                        // Generate second selection
-                       $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."\"";
+                       $OUT .= '<td align="center"><select class="mini_select" name="' . $prefix . '_se" size="1">';
+                       for ($idx = 0; $idx <= 59; $idx++) {
+                               $OUT .= '  <option class="mini_select" value="' . $idx . '"';
                                if ($idx == $s) $OUT .= ' selected="selected"';
-                               $OUT .= ">" . $idx."</option>\n";
-                       }
-                       $OUT .= "  </select></td>\n";
+                               $OUT .= '>' . $idx . '</option>';
+                       } // END - for
+                       $OUT .= '</select></td>';
                } else {
                        $OUT .= '<input type="hidden" name="' . $prefix . '_se" value="0" />';
                }
-               $OUT .= "</tr>\n";
-               $OUT .= "</table>\n";
-               $OUT .= "</div>\n";
-               // Return generated HTML code
+               $OUT .= '</tr>';
+               $OUT .= '</table>';
+               $OUT .= '</div>';
        }
+
+       // Return generated HTML code
        return $OUT;
 }
 
@@ -1601,22 +1616,31 @@ function createTimestampFromSelections ($prefix, $postData) {
        $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') && ($postData[$prefix . '_mo'] > '02'))  $SWITCH = getConfig('ONE_DAY');
+
        // First add years...
        $ret += $postData[$prefix . '_ye'] * (31536000 + $SWITCH);
+
        // Next months...
        $ret += $postData[$prefix . '_mo'] * 2628000;
+
        // Next weeks
        $ret += $postData[$prefix . '_we'] * 604800;
+
        // Next days...
        $ret += $postData[$prefix . '_da'] * 86400;
+
        // Next hours...
        $ret += $postData[$prefix . '_ho'] * 3600;
+
        // Next minutes..
        $ret += $postData[$prefix . '_mi'] * 60;
+
        // And at last seconds...
        $ret += $postData[$prefix . '_se'];
+
        // Return calculated value
        return $ret;
 }
@@ -1629,7 +1653,7 @@ function createFancyTime ($stamp) {
        foreach($data as $k => $v) {
                if ($v > 0) {
                        // Value is greater than 0 "eval" data to return string
-                       eval("\$ret .= \", \".\$v.\" {--_".strtoupper($k)."--}\";");
+                       eval('$ret .= ", ".$v." {--_' . strtoupper($k) . '--}";');
                        break;
                } // END - if
        } // END - foreach
@@ -1640,7 +1664,7 @@ function createFancyTime ($stamp) {
                $ret = substr($ret, 2);
        } else {
                // Zero seconds
-               $ret = "0 {--_SECONDS--}";
+               $ret = '0 {--_SECONDS--}';
        }
 
        // Return fancy time string
@@ -1651,8 +1675,8 @@ function createFancyTime ($stamp) {
 function addEmailNavigation ($PAGES, $offset, $show_form, $colspan, $return=false) {
        $TOP = '';
        if ($show_form === false) {
-               $TOP = " top";
-       }
+               $TOP = ' top';
+       } // END - if
 
        $NAV = '';
        for ($page = 1; $page <= $PAGES; $page++) {
@@ -1680,7 +1704,10 @@ function addEmailNavigation ($PAGES, $offset, $show_form, $colspan, $return=fals
                }
 
                // Add seperator if we have not yet reached total pages
-               if ($page < $PAGES) $NAV .= '&nbsp;|&nbsp;';
+               if ($page < $PAGES) {
+                       // Add it
+                       $NAV .= '|';
+               } // END - if
        } // END - for
 
        // Define constants only once
@@ -1716,10 +1743,10 @@ function extractHostnameFromUrl (&$script) {
 
        // Extract host name
        $host = str_replace('http://', '', $url);
-       if (ereg('/', $host)) $host = substr($host, 0, strpos($host, '/'));
+       if (isInString('/', $host)) $host = substr($host, 0, strpos($host, '/'));
 
        // Generate relative URL
-       //* DEBUG: */ print("SCRIPT=" . $script.'<br />');
+       //* DEBUG: */ print('SCRIPT=' . $script.'<br />');
        if (substr(strtolower($script), 0, 7) == 'http://') {
                // But only if http:// is in front!
                $script = substr($script, (strlen($url) + 7));
@@ -1728,7 +1755,7 @@ function extractHostnameFromUrl (&$script) {
                $script = substr($script, (strlen($url) + 8));
        }
 
-       //* DEBUG: */ print("SCRIPT=" . $script.'<br />');
+       //* DEBUG: */ print('SCRIPT=' . $script.'<br />');
        if (substr($script, 0, 1) == '/') $script = substr($script, 1);
 
        // Return host name
@@ -1767,11 +1794,9 @@ function sendGetRequest ($script, $data = array()) {
        } else {
                $request .= 'User-Agent: ' . getConfig('TITLE') . '/' . getConfig('VERSION') . getConfig('HTTP_EOL');
        }
-       $request .= 'Accept: text/plain;q=0.8' . getConfig('HTTP_EOL');
+       $request .= 'Accept: image/png,image/*;q=0.8,text/plain,text/html,*/*;q=0.5' . getConfig('HTTP_EOL');
        $request .= 'Accept-Charset: UTF-8,*' . getConfig('HTTP_EOL');
-       $request .= 'Cache-Control: no-cache' . getConfig('HTTP_EOL');
-       $request .= 'Content-Type: text/plain' . getConfig('HTTP_EOL');
-       $request .= 'Content-Length: 0' . getConfig('HTTP_EOL');
+       $request .= 'Cache-Control: no-store, no-cache, must-revalidate, post-check=0, pre-check=0' . getConfig('HTTP_EOL');
        $request .= 'Connection: close' . getConfig('HTTP_EOL');
        $request .= getConfig('HTTP_EOL');
 
@@ -1798,7 +1823,7 @@ function sendPostRequest ($script, $postData) {
        $body = http_build_query($postData, '', '&');
 
        // Generate POST request header
-       $request  = 'POST /' . trim($script) . ' HTTP/1.1' . getConfig('HTTP_EOL');
+       $request  = 'POST /' . trim($script) . ' HTTP/1.0' . getConfig('HTTP_EOL');
        $request .= 'Host: ' . $host . getConfig('HTTP_EOL');
        $request .= 'Referer: ' . getConfig('URL') . '/admin.php' . getConfig('HTTP_EOL');
        $request .= 'User-Agent: ' . getConfig('TITLE') . '/' . getConfig('FULL_VERSION') . getConfig('HTTP_EOL');
@@ -1837,14 +1862,26 @@ function sendRawRequest ($host, $request) {
                $useProxy = true;
        } // END - if
 
+       // Load include
+       loadIncludeOnce('inc/classes/resolver.class.php');
+
+       // Get resolver instance
+       $resolver = new HostnameResolver();
+
        // Open connection
-       //* DEBUG: */ die("SCRIPT=" . $script.'<br />');
+       //* DEBUG: */ die('SCRIPT=' . $script.'<br />');
        if ($useProxy === true) {
+               // Resolve hostname into IP address
+               $ip = $resolver->resolveHostname(compileRawCode(getConfig('proxy_host')));
+
                // Connect to host through proxy connection
-               $fp = fsockopen(compileRawCode(getConfig('proxy_host')), bigintval(getConfig('proxy_port')), $errno, $errdesc, 30);
+               $fp = fsockopen($ip, bigintval(getConfig('proxy_port')), $errno, $errdesc, 30);
        } else {
+               // Resolve hostname into IP address
+               $ip = $resolver->resolveHostname($host);
+
                // Connect to host directly
-               $fp = fsockopen($host, 80, $errno, $errdesc, 30);
+               $fp = fsockopen($ip, 80, $errno, $errdesc, 30);
        }
 
        // Is there a link?
@@ -1860,35 +1897,13 @@ function sendRawRequest ($host, $request) {
 
        // Do we use proxy?
        if ($useProxy === true) {
-               // Generate CONNECT request header
-               $proxyTunnel  = 'CONNECT ' . $host . ':80 HTTP/1.1' . getConfig('HTTP_EOL');
-               $proxyTunnel .= 'Host: ' . $host . getConfig('HTTP_EOL');
-
-               // Use login data to proxy? (username at least!)
-               if (getConfig('proxy_username') != '') {
-                       // Add it as well
-                       $encodedAuth = base64_encode(compileRawCode(getConfig('proxy_username')) . getConfig('ENCRYPT_SEPERATOR') . compileRawCode(getConfig('proxy_password')));
-                       $proxyTunnel .= 'Proxy-Authorization: Basic ' . $encodedAuth . getConfig('HTTP_EOL');
-               } // END - if
+               // Setup proxy tunnel
+               $response = setupProxyTunnel($host, $fp);
 
-               // Add last new-line
-               $proxyTunnel .= getConfig('HTTP_EOL');
-               //* DEBUG: */ print('<strong>proxyTunnel=</strong><pre>' . $proxyTunnel.'</pre>');
-
-               // Write request
-               fwrite($fp, $proxyTunnel);
-
-               // Got response?
-               if (feof($fp)) {
-                       // No response received
-                       return $response;
-               } // END - if
-
-               // Read the first line
-               $resp = trim(fgets($fp, 10240));
-               $respArray = explode(' ', $resp);
-               if ((strtolower($respArray[0]) !== 'http/1.0') || ($respArray[1] != '200')) {
+               // If the response is invalid, abort
+               if ((count($response) == 3) && (empty($response[0])) && (empty($response[1])) && (empty($response[2]))) {
                        // Invalid response!
+                       logDebugMessage(__FUNCTION__, __LINE__, 'Proxy tunnel not working?');
                        return $response;
                } // END - if
        } // END - if
@@ -1935,7 +1950,7 @@ function sendRawRequest ($host, $request) {
        // Time request if debug-mode is enabled
        if (isDebugModeEnabled()) {
                // Add debug message...
-               logDebugMessage(__FUNCTION__, __LINE__, 'Request took ' . (microtime(true) - $start) . ' seconds.');
+               logDebugMessage(__FUNCTION__, __LINE__, 'Request took ' . (microtime(true) - $start) . ' seconds and returned ' . count($response) . ' line(s).');
        } // END - if
 
        // Skip first empty lines
@@ -1961,6 +1976,7 @@ function sendRawRequest ($host, $request) {
        if (!isset($response[0])) {
                // No response, maybe timeout
                $response = array('', '', '');
+               logDebugMessage(__FUNCTION__, __LINE__, 'Invalid empty response array, maybe timed out?');
        } elseif ((substr(strtolower($response[0]), 0, 11) == 'proxy-agent') && ($useProxy === true)) {
                // Proxy header detected, so remove two lines
                array_shift($response);
@@ -1968,8 +1984,9 @@ function sendRawRequest ($host, $request) {
        } // END - if
 
        // Was the request successfull?
-       if ((!eregi('200 OK', $response[0])) || (empty($response[0]))) {
+       if ((!isInStringIgnoreCase('200 OK', $response[0])) || (empty($response[0]))) {
                // Not found / access forbidden
+               logDebugMessage(__FUNCTION__, __LINE__, 'Unexpected status code ' . $response[0] . ' detected. "200 OK" was expected.');
                $response = array('', '', '');
        } // END - if
 
@@ -1977,7 +1994,48 @@ function sendRawRequest ($host, $request) {
        return $response;
 }
 
-// Taken from www.php.net eregi() user comments
+// Sets up a proxy tunnel for given hostname and through resource
+function setupProxyTunnel ($host, $resource) {
+       // Initialize array
+       $response = array('', '', '');
+
+       // Generate CONNECT request header
+       $proxyTunnel  = 'CONNECT ' . $host . ':80 HTTP/1.0' . getConfig('HTTP_EOL');
+       $proxyTunnel .= 'Host: ' . $host . getConfig('HTTP_EOL');
+
+       // Use login data to proxy? (username at least!)
+       if (getConfig('proxy_username') != '') {
+               // Add it as well
+               $encodedAuth = base64_encode(compileRawCode(getConfig('proxy_username')) . ':' . compileRawCode(getConfig('proxy_password')));
+               $proxyTunnel .= 'Proxy-Authorization: Basic ' . $encodedAuth . getConfig('HTTP_EOL');
+       } // END - if
+
+       // Add last new-line
+       $proxyTunnel .= getConfig('HTTP_EOL');
+       //* DEBUG: */ print('<strong>proxyTunnel=</strong><pre>' . $proxyTunnel.'</pre>');
+
+       // Write request
+       fwrite($fp, $proxyTunnel);
+
+       // Got response?
+       if (feof($fp)) {
+               // No response received
+               return $response;
+       } // END - if
+
+       // Read the first line
+       $resp = trim(fgets($fp, 10240));
+       $respArray = explode(' ', $resp);
+       if ((strtolower($respArray[0]) !== 'http/1.0') || ($respArray[1] != '200')) {
+               // Invalid response!
+               return $response;
+       } // END - if
+
+       // All fine!
+       return $respArray;
+}
+
+// Taken from www.php.net isInStringIgnoreCase() user comments
 function isEmailValid ($email) {
        // Check first part of email address
        $first = '[-a-z0-9!#$%&\'*+/=?^_<{|}~]+(\.[-a-zA-Z0-9!#$%&\'*+/=?^_<{|}~]+)*';
@@ -1992,7 +2050,7 @@ function isEmailValid ($email) {
        return preg_match($regex, $email);
 }
 
-// Function taken from user comments on www.php.net / function eregi()
+// Function taken from user comments on www.php.net / function isInStringIgnoreCase()
 function isUrlValid ($URL, $compile=true) {
        // Trim URL a little
        $URL = trim(urldecode($URL));
@@ -2016,13 +2074,13 @@ function isUrlValid ($URL, $compile=true) {
 // Generate a list of administrative links to a given userid
 function generateMemberAdminActionLinks ($userid, $status = '') {
        // Make sure userid is a number
-       if ($userid != bigintval($userid)) debug_report_bug('userid is not a number!');
+       if ($userid != bigintval($userid)) debug_report_bug(__FUNCTION__, __LINE__, 'userid is not a number!');
 
        // Define all main targets
        $targetArray = array('del_user', 'edit_user', 'lock_user', 'add_points', 'sub_points');
 
        // Begin of navigation links
-       $OUT = '[&nbsp;';
+       $OUT = '[';
 
        foreach ($targetArray as $tar) {
                $OUT .= '<span class="admin_user_link"><a href="{%url=modules.php?module=admin&amp;what=' . $tar . '&amp;userid=' . $userid . '%}" title="{--ADMIN_LINK_';
@@ -2042,7 +2100,7 @@ function generateMemberAdminActionLinks ($userid, $status = '') {
                        // All other status is fine
                        $OUT .= strtoupper($tar);
                }
-               $OUT .= '--}</a></span>&nbsp;|&nbsp;';
+               $OUT .= '--}</a></span>|';
        }
 
        // Finish navigation link
@@ -2061,7 +2119,7 @@ function generateEmailLink ($email, $table = 'admins') {
        if ((isExtensionActive('admins')) && ($table == 'admins')) {
                // Create email link for contacting admin in guest area
                $EMAIL = generateAdminEmailLink($email);
-       } elseif ((isExtensionActive('user')) && (getExtensionVersion('user') >= '0.3.3') && ($table == 'user_data')) {
+       } elseif ((isExtensionInstalledAndNewer('user', '0.3.3')) && ($table == 'user_data')) {
                // Create email link for contacting a member within admin area (or later in other areas, too?)
                $EMAIL = generateUserEmailLink($email, 'admin');
        } elseif ((isExtensionActive('sponsor')) && ($table == 'sponsor_data')) {
@@ -2097,7 +2155,7 @@ function generateHash ($plainText, $salt = '', $hash = true) {
        // Do we miss an arry element here?
        if (!isConfigEntrySet('file_hash')) {
                // Stop here
-               debug_report_bug('Missing file_hash in ' . __FUNCTION__ . '.');
+               debug_report_bug(__FUNCTION__, __LINE__, '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
@@ -2170,7 +2228,7 @@ function scrambleString($str) {
 
        // Scramble string here
        //* DEBUG: */ outputHtml('***Original=' . $str.'***<br />');
-       for ($idx = '0'; $idx < strlen($str); $idx++) {
+       for ($idx = 0; $idx < strlen($str); $idx++) {
                // Get char on scrambled position
                $char = substr($str, $scrambleNums[$idx], 1);
 
@@ -2197,7 +2255,7 @@ function descrambleString($str) {
        // Begin descrambling
        $orig = str_repeat(' ', 40);
        //* DEBUG: */ outputHtml('+++Scrambled=' . $str.'+++<br />');
-       for ($idx = '0'; $idx < 40; $idx++) {
+       for ($idx = 0; $idx < 40; $idx++) {
                $char = substr($str, $idx, 1);
                $orig = substr_replace($orig, $char, $scrambleNums[$idx], 1);
        } // END - for
@@ -2213,7 +2271,7 @@ function genScrambleString ($len) {
        $scrambleNumbers = array();
 
        // First we need to setup randomized numbers from 0 to 31
-       for ($idx = '0'; $idx < $len; $idx++) {
+       for ($idx = 0; $idx < $len; $idx++) {
                // Generate number
                $rand = mt_rand(0, ($len -1));
 
@@ -2304,10 +2362,7 @@ function app_die ($F, $L, $message) {
                loadIncludeOnce('inc/header.php');
 
                // Rewrite message for output
-               $message = sprintf(getMessage('MXCHANGE_HAS_DIED'), basename($F), $L, $message);
-
-               // Better log this message away
-               if ($F != 'debug_report_bug') logDebugMessage($F, $L, $message);
+               $message = sprintf(getMessage('MAILER_HAS_DIED'), basename($F), $L, $message);
 
                // Load the message template
                loadTemplate('app_die_message', false, $message);
@@ -2316,12 +2371,12 @@ function app_die ($F, $L, $message) {
                loadIncludeOnce('inc/footer.php');
        } else {
                // Script tried to kill itself twice
-               debug_report_bug('Script wanted to kill itself more than once! Raw message=' . $message . ', file/function=' . $F . ', line=' . $L);
+               die('['.__FUNCTION__.':'.__LINE__.']: Script wanted to kill itself more than once! Raw message=' . $message . ', file/function=' . $F . ', line=' . $L);
        }
 }
 
 // Display parsing time and number of SQL queries in footer
-function displayParsingTime() {
+function displayParsingTime () {
        // Is the timer started?
        if (!isset($GLOBALS['startTime'])) {
                // Abort here
@@ -2338,9 +2393,10 @@ function displayParsingTime() {
        if ($runTime < 0) $runTime = '0';
 
        // Prepare output
+       // @TODO This can be easily moved out after the merge from EL branch to this is complete
        $content = array(
-               'runtime'  => translateComma($runTime),
-               'timeSQLs' => translateComma(getConfig('sql_time') * 1000),
+               'run_time' => translateComma($runTime),
+               'sql_time' => translateComma(getConfig('sql_time') * 1000),
        );
 
        // Load the template
@@ -2464,7 +2520,7 @@ function debug_get_mailable_backtrace () {
 }
 
 // Output a debug backtrace to the user
-function debug_report_bug ($message = '', $sendEmail = true) {
+function debug_report_bug ($F, $L, $message = '', $sendEmail = true) {
        // Is this already called?
        if (isset($GLOBALS[__FUNCTION__])) {
                // Other backtrace
@@ -2487,7 +2543,7 @@ function debug_report_bug ($message = '', $sendEmail = true) {
                );
 
                // @TODO Add a little more infos here
-               logDebugMessage(__FUNCTION__, __LINE__, strip_tags($message));
+               logDebugMessage($F, $L, strip_tags($message));
        } // END - if
 
        // Add output
@@ -2509,7 +2565,7 @@ function debug_report_bug ($message = '', $sendEmail = true) {
        } // END - if
 
        // And abort here
-       app_die(__FUNCTION__, __LINE__, $debug);
+       app_die($F, $L, $debug);
 }
 
 // Generates a ***weak*** seed
@@ -2548,6 +2604,7 @@ function getMessageFromErrorCode ($code) {
                case getCode('MORE_RECEIVERS2')    : $message = getMessage('MEMBER_NO_MORE_RECEIVERS_FOUND'); break;
                case getCode('MORE_RECEIVERS3')    : $message = getMessage('MEMBER_ENTER_MORE_MIN_RECEIVERS'); break;
                case getCode('INVALID_URL')        : $message = getMessage('MEMBER_ENTER_INVALID_URL'); break;
+               case getCode('NO_MAIL_TYPE')       : $message = getMessage('MEMBER_NO_MAIL_TYPE_SELECTED'); break;
                case getCode('UNKNOWN_ERROR')      : $message = getMessage('LOGIN_UNKNOWN_ERROR'); break;
                case getCode('UNKNOWN_STATUS')     : $message = getMessage('LOGIN_UNKNOWN_STATUS'); break;
 
@@ -2570,7 +2627,7 @@ function getMessageFromErrorCode ($code) {
                case getCode('URL_TLOCK'):
                        // @TODO Move this SQL code into a function, let's say 'getTimestampFromPoolId($id) ?
                        $result = SQL_QUERY_ESC("SELECT `timestamp` FROM `{?_MYSQL_PREFIX?}_pool` WHERE `id`=%s LIMIT 1",
-                               array(bigintval(getRequestParameter('id'))), __FILE__, __LINE__);
+                               array(bigintval(getRequestParameter('id'))), __FUNCTION__, __LINE__);
 
                        // Load timestamp from last order
                        list($timestamp) = SQL_FETCHROW($result);
@@ -2632,7 +2689,7 @@ function compileUriCode ($code, $simple = true) {
        return $code;
 }
 
-// Function taken from user comments on www.php.net / function eregi()
+// Function taken from user comments on www.php.net / function isInStringIgnoreCase()
 function isUrlValidSimple ($url) {
        // Prepare URL
        $url = secureString(str_replace("\\", '', compileRawCode(urldecode($url))));
@@ -2675,11 +2732,12 @@ function isUrlValidSimple ($url) {
        $pattern['d1g12']  = $http . $domain1 . $getstring1;
        $pattern['d2g12']  = $http . $domain2 . $getstring1;
        $pattern['ipg12']  = $http . $ip . $getstring1;
+
        // Test all patterns
        $reg = false;
        foreach ($pattern as $key => $pat) {
                // Debug regex?
-               if (isDebugRegExpressionEnabled()) {
+               if (isDebugRegularExpressionEnabled()) {
                        // @TODO Are these convertions still required?
                        $pat = str_replace('.', "&#92;&#46;", $pat);
                        $pat = str_replace('@', "&#92;&#64;", $pat);
@@ -2687,7 +2745,7 @@ function isUrlValidSimple ($url) {
                } // END - if
 
                // Check if expression matches
-               $reg = ($reg || preg_match(('^' . $pat.'^'), $url));
+               $reg = ($reg || preg_match(('^' . $pat . '^'), $url));
 
                // Does it match?
                if ($reg === true) break;
@@ -2791,8 +2849,8 @@ function logDebugMessage ($funcFile, $line, $message, $force=true) {
                // Remove CRLF
                $message = str_replace("\r", '', str_replace("\n", '', $message));
 
-               // Log this message away, we better don't call app_die() here to prevent an endless loop
-               $fp = fopen(getConfig('CACHE_PATH') . 'debug.log', 'a') or die(__FUNCTION__.'['.__LINE__.']: Cannot write logfile debug.log!');
+               // Log this message away
+               $fp = fopen(getConfig('CACHE_PATH') . 'debug.log', 'a') or debug_report_bug(__FUNCTION__, __LINE__, 'Cannot write logfile debug.log!');
                fwrite($fp, date('d.m.Y|H:i:s', time()) . '|' . getModule(false) . '|' . basename($funcFile) . '|' . $line . '|' . $message . "\n");
                fclose($fp);
        } // END - if
@@ -2894,14 +2952,14 @@ function handleLoginFailures ($accessLevel) {
        $OUT = '';
 
        // Is the session data set?
-       if ((isSessionVariableSet('mxchange_' . $accessLevel . '_failures')) && (isSessionVariableSet('mxchange_' . $accessLevel . '_last_failure'))) {
+       if ((isSessionVariableSet('mailer_' . $accessLevel . '_failures')) && (isSessionVariableSet('mailer_' . $accessLevel . '_last_failure'))) {
                // Ignore zero values
-               if (getSession('mxchange_' . $accessLevel . '_failures') > 0) {
+               if (getSession('mailer_' . $accessLevel . '_failures') > 0) {
                        // Non-guest has login failures found, get both data and prepare it for template
                        //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, "accessLevel={$accessLevel}<br />");
                        $content = array(
-                               'login_failures' => getSession('mxchange_' . $accessLevel . '_failures'),
-                               'last_failure'   => generateDateTime(getSession('mxchange_' . $accessLevel . '_last_failure'), 2)
+                               'login_failures' => getSession('mailer_' . $accessLevel . '_failures'),
+                               'last_failure'   => generateDateTime(getSession('mailer_' . $accessLevel . '_last_failure'), 2)
                        );
 
                        // Load template
@@ -2909,8 +2967,8 @@ function handleLoginFailures ($accessLevel) {
                } // END - if
 
                // Reset session data
-               setSession('mxchange_' . $accessLevel . '_failures', '');
-               setSession('mxchange_' . $accessLevel . '_last_failure', '');
+               setSession('mailer_' . $accessLevel . '_failures', '');
+               setSession('mailer_' . $accessLevel . '_last_failure', '');
        } // END - if
 
        // Return rendered content
@@ -3033,7 +3091,7 @@ function determineReferalId () {
        } elseif ((isExtensionInstalledAndNewer('user', '0.3.4')) && (getConfig('select_user_zero_refid') == 'Y')) {
                // Select a random user which has confirmed enougth mails
                $GLOBALS['refid'] = determineRandomReferalId();
-       } elseif ((isExtensionInstalled('sql_patches')) && (getConfig('def_refid') > 0)) {
+       } elseif ((isExtensionInstalledAndNewer('sql_patches', '0.1.2')) && (getConfig('def_refid') > 0)) {
                // Set default refid as refid in URL
                $GLOBALS['refid'] = getConfig('def_refid');
        } else {
@@ -3086,10 +3144,10 @@ function shutdown () {
        // Check if not in installation phase and the link is up
        if ((!isInstallationPhase()) && (SQL_IS_LINK_UP())) {
                // Close link
-               SQL_CLOSE(__FILE__, __LINE__);
+               SQL_CLOSE(__FUNCTION__, __LINE__);
        } elseif (!isInstallationPhase()) {
                // No database link
-               addFatalMessage(__FILE__, __LINE__, getMessage('NO_DB_LINK_SHUTDOWN'));
+               addFatalMessage(__FUNCTION__, __LINE__, getMessage('NO_DB_LINK_SHUTDOWN'));
        }
 
        // Stop executing here
@@ -3104,7 +3162,7 @@ function initMemberId () {
 // Setter for member id
 function setMemberId ($memberid) {
        // We should not set member id to zero
-       if ($memberid == '0') debug_report_bug('Userid should not be set zero.');
+       if ($memberid == '0') debug_report_bug(__FUNCTION__, __LINE__, 'Userid should not be set zero.');
 
        // Set it secured
        $GLOBALS['member_id'] = bigintval($memberid);
@@ -3157,7 +3215,7 @@ function getExtraTitle () {
        // Is the extra title set?
        if (!isExtraTitleSet()) {
                // No, then abort here
-               debug_report_bug('extra_title is not set!');
+               debug_report_bug(__FUNCTION__, __LINE__, 'extra_title is not set!');
        } // END - if
 
        // Return it
@@ -3199,12 +3257,12 @@ function generateExtensionNotInstalledMessage ($ext_name) {
        } // END - if
 
        // Default message
-       $message = getMaskedMessage('EXTENSION_PROBLEM_EXT_NOT_INSTALLED', $ext_name);
+       $message = getMaskedMessage('EXTENSION_PROBLEM_EXTENSION_NOT_INSTALLED', $ext_name);
 
        // Is an admin logged in?
        if (isAdmin()) {
                // Then output admin message
-               $message = getMaskedMessage('ADMIN_EXTENSION_PROBLEM_EXT_NOT_INSTALLED', $ext_name);
+               $message = getMaskedMessage('ADMIN_EXTENSION_PROBLEM_EXTENSION_NOT_INSTALLED', $ext_name);
        } // END - if
 
        // Return prepared message
@@ -3252,7 +3310,7 @@ function getArrayFromDirectory ($baseDir, $prefix, $fileIncludeDirs = false, $ad
        $files = array();
 
        // Open directory
-       $dirPointer = opendir(getConfig('PATH') . $baseDir) or app_die(__FUNCTION__, __LINE__, 'Cannot read directory ' . basename($baseDir) . '.');
+       $dirPointer = opendir(getConfig('PATH') . $baseDir) or debug_report_bug(__FUNCTION__, __LINE__, 'Cannot read directory ' . basename($baseDir) . '.');
 
        // Read all entries
        while ($baseFile = readdir($dirPointer)) {
@@ -3326,7 +3384,7 @@ function getArrayFromDirectory ($baseDir, $prefix, $fileIncludeDirs = false, $ad
                                }
                        } else {
                                // We found .php file but should not search for them, why?
-                               debug_report_bug('We should find files with extension=' . $extension . ', but we found a PHP script.');
+                               debug_report_bug(__FUNCTION__, __LINE__, 'We should find files with extension=' . $extension . ', but we found a PHP script.');
                        }
                } elseif (substr($baseFile, -4, 4) == $extension) {
                        // Other, generic file found
@@ -3405,7 +3463,7 @@ function initCacheInstance () {
        $GLOBALS['cache_instance'] = new CacheSystem();
        if ($GLOBALS['cache_instance']->getStatus() != 'done') {
                // Failed to initialize cache sustem
-               addFatalMessage(__FILE__, __LINE__, '(<font color="#0000aa">' . __LINE__ . '</font>): ' . getMessage('CACHE_CANNOT_INITIALIZE'));
+               addFatalMessage(__FUNCTION__, __LINE__, '(<font color="#0000aa">' . __LINE__ . '</font>): ' . getMessage('CACHE_CANNOT_INITIALIZE'));
        } // END - if
 }
 
@@ -3500,7 +3558,7 @@ function determinePageTitle () {
                $pageTitle = getMessage('NO_CONFIG_FOUND_TITLE');
 
                // Do not add the fatal message in installation mode
-               if ((!isInstalling()) && (!isConfigurationLoaded())) addFatalMessage(__FILE__, __LINE__, getMessage('NO_CONFIG_FOUND'));
+               if ((!isInstalling()) && (!isConfigurationLoaded())) addFatalMessage(__FUNCTION__, __LINE__, getMessage('NO_CONFIG_FOUND'));
        }
 
        // Return title
@@ -3687,7 +3745,7 @@ function sendModeMails ($mod, $modes) {
 }
 
 // Generates a 'selection box' from given array
-function generateSelectionBoxFromArray ($options, $name, $optionValue, $optionContent='') {
+function generateSelectionBoxFromArray ($options, $name, $optionValue, $optionContent = '', $extraName = '') {
        // Start the output
        $OUT = '<select name="' . $name . '" size="1" class="admin_select">
 <option value="X" disabled="disabled">{--PLEASE_SELECT--}</option>';
@@ -3697,7 +3755,7 @@ function generateSelectionBoxFromArray ($options, $name, $optionValue, $optionCo
                // Add the <option> entry
                if (empty($optionContent)) {
                        // ... from template
-                       $OUT .= loadTemplate('select_' . $name . '_option', true, $option);
+                       $OUT .= loadTemplate('select_' . $name . $extraName . '_option', true, $option);
                } else {
                        // Direct HTML code
                        $OUT .= '<option value="' . $option[$optionValue] . '">' . $option[$optionContent] . '</option>';
@@ -3715,7 +3773,7 @@ function generateSelectionBoxFromArray ($options, $name, $optionValue, $optionCo
        );
 
        // Load template and return it
-       return loadTemplate('select_' . $name . '_box', true, $content);
+       return loadTemplate('select_' . $name . $extraName . '_box', true, $content);
 }
 
 // Get a module from filename and access level
@@ -3736,7 +3794,7 @@ function getModuleFromFileName ($file, $accessLevel) {
                        break;
 
                default: // Unsupported file name / access level
-                       debug_report_bug('Unsupported file name=' . basename($file) . '/access level=' . $accessLevel);
+                       debug_report_bug(__FUNCTION__, __LINE__, 'Unsupported file name=' . basename($file) . '/access level=' . $accessLevel);
                        break;
        }
 
@@ -3787,37 +3845,23 @@ function isSpider () {
        if (empty($userAgent)) return true;
 
        // Is it a spider?
-       return ((strpos($userAgent, 'spider') !== false) || (strpos($userAgent, 'slurp') !== false) || (strpos($userAgent, 'bot') !== false));
+       return ((strpos($userAgent, 'spider') !== false) || (strpos($userAgent, 'slurp') !== false) || (strpos($userAgent, 'bot') !== false) || (strpos($userAgent, 'archiver') !== false));
 }
 
 // Prepares the header for HTML output
 function loadHtmlHeader () {
-       // Determine the page title
-       $content['header_title'] = determinePageTitle();
-
-       // Output page header code
-       $GLOBALS['page_header'] = loadTemplate('page_header', true, $content);
+       // Run two filters:
+       // 1.) pre_page_header (mainly loads the page_header template and includes
+       //     meta description)
+       runFilterChain('pre_page_header');
 
-       // Include meta data in 'guest' module
-       if (getModule() == 'index') {
-               // Load meta data template
-               $GLOBALS['page_header'] .= loadTemplate('metadata', true);
-
-               // Add meta description to header
-               if ((isInstalled()) && (isAdminRegistered()) && (SQL_IS_LINK_UP())) {
-                       // Add meta description not in admin and login module and when the script is installed
-                       generateMetaDescriptionCode();
-               } // END - if
-       } // END - if
+       // Here can be something be added, but normally one of the two filters
+       // around this line should do the job for you.
 
+       // 2.) post_page_header (mainly to load stylesheet, extra JavaScripts and
+       //     to close the head-tag)
        // Include more header data here
-       $GLOBALS['page_header'] .= loadTemplate('header', true);
-
-       // Include stylesheet
-       loadIncludeOnce('inc/stylesheet.php');
-
-       // Closing HEAD tag
-       $GLOBALS['page_header'] .= '</head>';
+       runFilterChain('post_page_header');
 }
 
 // Adds page header and footer to output array element
@@ -3837,10 +3881,10 @@ function addPageHeaderFooter () {
 
 // Generates meta description for current module and 'what' value
 function generateMetaDescriptionCode () {
-       // Only include from guest area
-       if (getModule() == 'index') {
+       // Only include from guest area and if sql_patches has correct version
+       if ((getModule() == 'index') && (isExtensionInstalledAndNewer('sql_patches', '0.1.6'))) {
                // Construct dynamic description
-               $DESCR = '{?MAIN_TITLE?} '.trim(getConfig('title_middle')) . ' ' . getTitleFromMenu('guest', getWhat());
+               $DESCR = '{?MAIN_TITLE?} ' . trim(getConfig('title_middle')) . ' ' . getTitleFromMenu('guest', getWhat());
 
                // Output it directly
                $GLOBALS['page_header'] .= '<meta name="description" content="' . $DESCR . '" />';
@@ -3899,6 +3943,43 @@ function searchDirsRecursive ($dir, &$last_changed, $lookFor = 'Date') {
        } // END - foreach
 }
 
+// "Fixes" null or empty string to count of dashes
+function fixNullEmptyToDashes ($str, $num) {
+       // Use str as default
+       $return = $str;
+
+       // Is it empty?
+       if ((is_null($str)) || (trim($str) == '')) {
+               // Set it
+               $return = str_repeat('-', $num);
+       } // END - if
+
+       // Return final string
+       return $return;
+}
+
+// Handles the braces [] of a field (e.g. value of 'name' attribute)
+function handleFieldWithBraces ($field) {
+       // Are there braces [] at the end?
+       if (substr($field, -2, 2) == '[]') {
+               // Try to find one and replace it. I do it this way to allow easy
+               // extending of this code.
+               foreach (array('admin_list_builder_id_value') as $key) {
+                       // Is the cache entry set?
+                       if (isset($GLOBALS[$key])) {
+                               // Insert it
+                               $field = str_replace('[]', '[' . $GLOBALS[$key] . ']', $field);
+
+                               // And abort
+                               break;
+                       } // END - if
+               } // END - foreach
+       } // END - if
+
+       // Return it
+       return $field;
+}
+
 //////////////////////////////////////////////////
 // AUTOMATICALLY RE-GENERATED MISSING FUNCTIONS //
 //////////////////////////////////////////////////