New function isDirectory() introduced, fixed GET_DIR_AS_ARRAY() (replaces scandir())
[mailer.git] / inc / functions.php
index 7d3046be596c4891d1aa95c5900c0904d5925379..815e6f72dd98e4dcc7f44929ebad98b02e167bdd 100644 (file)
  * -------------------------------------------------------------------- *
  * Kurzbeschreibung  : Viele Nicht-MySQL-Funktionen (auch Dateizugriff) *
  * -------------------------------------------------------------------- *
- *                                                                      *
+ * $Revision:: 856                                                    $ *
+ * $Date::                                                            $ *
+ * $Tag:: 0.2.1-FINAL                                                 $ *
+ * $Author::                                                          $ *
+ * Needs to be in all Files and every File needs "svn propset           *
+ * svn:keywords Date Revision" (autoprobset!) at least!!!!!!            *
  * -------------------------------------------------------------------- *
  * Copyright (c) 2003 - 2008 by Roland Haeder                           *
  * For more information visit: http://www.mxchange.org                  *
@@ -30,7 +35,6 @@
  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
  * MA  02110-1301  USA                                                  *
  ************************************************************************/
-
 // Some security stuff...
 if (!defined('__SECURITY')) {
        $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4)."/security.php";
@@ -241,7 +245,7 @@ function LOAD_TEMPLATE ($template, $return=false, $content=array()) {
        if ($template == "member_support_form") {
                // Support request of a member
                $result = SQL_QUERY_ESC("SELECT userid, gender, surname, family, email FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s LIMIT 1",
-                       array($GLOBALS['userid']), __FUNCTION__, __LINE__);
+                       array(getUserId()), __FUNCTION__, __LINE__);
 
                // Is content an array?
                if (is_array($content)) {
@@ -946,7 +950,7 @@ function LOAD_URL ($URL, $addUrlData=true) {
                LOAD_TEMPLATE("redirect_url", false, str_replace("&", "&", $URL));
                LOAD_INC("inc/footer.php");
        }
-       exit;
+       shutdown();
 }
 
 // Wrapper for LOAD_URL but URL comes from a configuration entry
@@ -1253,7 +1257,7 @@ function generateRandomCodde ($length, $code, $uid, $DATA="") {
 
        // Add more additional data
        if (isSessionVariableSet('u_hash'))                     $data .= ":".get_session('u_hash');
-       if (isset($GLOBALS['userid']))                          $data .= ":".$GLOBALS['userid'];
+       if (isUserIdSet())                                                      $data .= ":".getUserId();
        if (isSessionVariableSet('mxchange_theme'))             $data .= ":".get_session('mxchange_theme');
        if (isSessionVariableSet('mx_lang'))                    $data .= ":".GET_LANGUAGE();
        if (isset($GLOBALS['refid']))                                   $data .= ":".$GLOBALS['refid'];
@@ -1773,7 +1777,11 @@ function GET_URL ($script) {
        $request  = "GET /" . trim($script) . " HTTP/1.1\r\n";
        $request .= "Host: " . $host . "\r\n";
        $request .= "Referer: " . constant('URL') . "/admin.php\r\n";
-       $request .= "User-Agent: " . constant('TITLE') . "/" . constant('FULL_VERSION') . "\r\n";
+       if (defined('FULL_VERSION')) {
+               $request .= "User-Agent: " . constant('TITLE') . "/" . constant('FULL_VERSION') . "\r\n";
+       } else {
+               $request .= "User-Agent: " . constant('TITLE') . "/?.?.?\r\n";
+       }
        $request .= "Content-Type: text/plain\r\n";
        $request .= "Cache-Control: no-cache\r\n";
        $request .= "Connection: Close\r\n\r\n";
@@ -2251,7 +2259,7 @@ function mxchange_die ($msg) {
        LOAD_INC_ONCE("inc/footer.php");
 
        // Exit explicitly
-       exit;
+       shutdown();
 }
 
 // Display parsing time and number of SQL queries in footer
@@ -2490,15 +2498,15 @@ 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 = constant('CODE_UNKNOWN_STATUS');
+       $ERROR = getCode('UNKNOWN_STATUS');
 
        // Generate constant name
-       $constantName = sprintf("CODE_ID_%s", $status);
+       $constantName = sprintf("ID_%s", $status);
 
        // Is the constant there?
-       if (defined($constantName)) {
+       if (isCodeSet($constantName)) {
                // Then get it!
-               $ERROR = constant($constantName);
+               $ERROR = getCode($constantName);
        } else {
                // Unknown status
                DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Unknown error status %s detected.", $status));
@@ -2517,50 +2525,169 @@ function clearOutputBuffer () {
        } // END - if
 }
 
+// Function to search for the last modifified file
+function searchDirsRecursive ($dir, &$last_changed) {
+       // Get dir as array
+       //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):dir=".$dir."<br />\n";
+       $ds = GET_DIR_AS_ARRAY($dir, "", true, false);
+       //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):ds[]=".count($ds)."<br />\n";
+
+       // Walk through all entries
+       foreach ($ds as $d) {
+               // Generate proper FQFN
+               $FQFN = str_replace("//", "/", constant('PATH') . $dir. "/". $d);
+
+               // Does it match what we are looking for? (We skip a lot files already!)
+               if (!preg_match('@(\.|\.\.|\.revision|\.svn|debug\.log|\.cache)$@', $d)) {      // no . or  ..  or .revision or .svn in the filename
+                       // Is it a file and readable?
+                       //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):FQFN={$FQFN}<br />\n";
+                       if (isDirectory($FQFN)) {
+                                // $FQFN is a directory so also crawl into this directory
+                               $newDir = $d;
+                               if (!empty($dir)) $newDir = $dir . "/". $d;
+                               //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):DESCENT: ".$newDir."<br />\n";
+                               searchDirsRecursive($newDir, $last_changed);
+                       } elseif (FILE_READABLE($FQFN)) {
+                               // $FQFN is a filename and no directory
+                               $time = filemtime($FQFN);
+                               //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):File: ".$d." found. (".($last_changed['time'] - $time).")<br />\n";
+                               if ($last_changed['time'] < $time) {
+                                       // This file is newer as the file before
+                                       //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>) - NEWER!<br />\n";
+                                       $last_changed['path_name'] = $FQFN;
+                                       $last_changed['time'] = $time;
+                               } // END - if
+                       }
+               } // END - if
+       } // END - foreach
+}
+
 // "Getter" for revision/version data
-function getActualVersion ($type = 0) {
+function getActualVersion ($type = 'Revision') {
        // By default nothing is new... ;-)
        $new = false;
 
-       // FQFN of revision file
-       $FQFN = sprintf("%sinc/cache/.revision", constant('PATH'));
+       if (EXT_IS_ACTIVE("cache")) {
+               // Check if $_GET['check_revision_data'] is setted (switch for manually rewrite the .revision-File)
+               if (isset($_GET['check_revision_data']) && $_GET['check_revision_data'] == 'yes') $new = true;
+               if (!isset($GLOBALS['cache_array']['revision'][$type])
+                       || count($GLOBALS['cache_array']['revision']) < 3
+                       || !$GLOBALS['cache_instance']->loadCacheFile("revision")) $new = true;
+
+               // Is the cache file outdated/invalid?
+               if ($new === true){
+                       $GLOBALS['cache_instance']->destroyCacheFile(); // @TODO isn't it better to do $GLOBALS['cache_instance']->destroyCacheFile('revision')?
+
+                       // @TODO shouldn't do the unset and the reloading $GLOBALS['cache_instance']->destroyCacheFile() Or a new methode like forceCacheReload('revision')?
+                       unset($GLOBALS['cache_array']['revision']);
+
+                       // Reload load_cach-revison.php
+                       LOAD_INC("inc/loader/load_cache-revision.php");
+               } // END - if
+
+               // Return found value
+               return $GLOBALS['cache_array']['revision'][$type][0];
 
-       // Check for revision file
-       if (!FILE_READABLE($FQFN)) {
-               // Not found, so we need to create it
-               $new = true;
        } else {
-               // Revision file found
-               $ins_vers = explode("\n", READ_FILE($FQFN));
+               // Old Version without ext-cache active (deprecated ?)
 
-               // Is the content valid?
-               if ((!is_array($ins_vers)) || (count($ins_vers) <= 0) || (!isset($ins_vers[$type])) || ($ins_vers[0]) == "new") {
-                       // File needs update!
+               // FQFN of revision file
+               $FQFN = sprintf("%sinc/cache/.revision", constant('PATH'));
+
+               // Check if $_GET['check_revision_data'] is setted (switch for manually rewrite the .revision-File)
+               if ((isset($_GET['check_revision_data'])) && ($_GET['check_revision_data'] == 'yes')) {
+                       // Has changed!
                        $new = true;
                } else {
-                       // Revision-File has valid Data and isn't 'new' so return the Rev-Number
-                       return trim($ins_vers[$type]);
+                       // Check for revision file
+                       if (!FILE_READABLE($FQFN)) {
+                               // Not found, so we need to create it
+                               $new = true;
+                       } else {
+                               // Revision file found
+                               $ins_vers = explode("\n", READ_FILE($FQFN));
+
+                               // Get array for mapping information
+                               $mapper = array_flip(getSearchFor());
+                               //* DEBUG: */ print("<pre>".print_r($mapper, true).print_r($ins_vers, true)."</pre>");
+
+                               // Is the content valid?
+                               if ((!is_array($ins_vers)) || (count($ins_vers) <= 0) || (!isset($ins_vers[$mapper[$type]])) || (trim($ins_vers[$mapper[$type]]) == "") || ($ins_vers[0]) == "new") {
+                                       // File needs update!
+                                       $new = true;
+                               } else {
+                                       // Return found value
+                                       return trim($ins_vers[$mapper[$type]]);
+                               }
+                       }
                }
+
+               // Has it been updated?
+               if ($new === true)  {
+                       WRITE_FILE($FQFN, implode("\n", getAkt_vers()));
+               } // END - if
        }
+}
 
-       // 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");
+// Repares an array we are looking for
+function getSearchFor () {
+       // Add Revision, Date, Tag and Author
+       $searchFor = array('Revision', 'Date', 'Tag', 'Author');
+
+       // Return the created array
+       return $searchFor;
+}
+
+function getAkt_vers () {
+       // Init variables
+       $next_dir = "";
+       $last_changed = array(
+               'path_name' => "",
+               'time'      => 0
+       );
+       $akt_vers = array();
+       $res = 0;
+
+       // Searches all Files and there date of the last modifikation and puts the newest File in $last_changed.
+       searchDirsRecursive($next_dir, $last_changed);
+
+       // Get file
+       $last_file = READ_FILE($last_changed['path_name']);
+       $searchFor = getSearchFor();
 
+       // @TODO What does this loop/regex do? Document it, please.
+       foreach ($searchFor as $search) {
+               $res += preg_match('@\$'.$search.'(:|::) (.*) \$@U', $last_file, $t);
+               if (isset($t[2])) $akt_vers[$search] = trim($t[2]);
+       } // END - foreach
+
+       if ($res && $res >= 3) {
                // Prepare content
-               $akt_vers[] = trim($version[10]);
-               $akt_vers[] = trim($version[9]);
-               $akt_vers[] = trim($version[8]);
+               preg_match('@(....)-(..)-(..) (..):(..):(..)@', $akt_vers['Date'], $match_d);
 
-               // Write file
-               WRITE_FILE($FQFN, implode("\n", $akt_vers));
+               // Prepare timestamp for date
+               $akt_vers['Date'] = mktime($match_d[4], $match_d[5], $match_d[6], $match_d[2], $match_d[3], $match_d[1]);
+
+               // Add Tag if the author is set and is not quix0r (lead coder)
+               if ((isset($akt_vers['Author'])) && ($akt_vers['Author'] != "quix0r")) {
+                       $akt_vers['Tag'] .= '-'.strtoupper($akt_vers['Author']);
+               } // END - if
+       } else {
+               // No valid Data from the last modificated file so read the Revision from the Server. Fallback-solution!! Could be removed I think.
+               $version = GET_URL("check-updates3.php");
 
-               // Return requested content
-               return trim($akt_vers[$type]);
+               // Prepare content
+               $akt_vers['Revision'] = trim($version[10]);
+               $akt_vers['Date']     = trim($version[9]);
+               $akt_vers['Tag']      = trim($version[8]);
+               $akt_vers['Author']   = "quix0r";
        }
+
+       // Return prepared array
+       return $akt_vers;
 }
 
+
 // Loads an include file and logs any missing files for debug purposes
 function LOAD_INC ($INC) {
        // Add the path. This is why we need a trailing slash in config.php
@@ -2626,11 +2753,12 @@ function debug_report_bug ($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.");
+       $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 finding bugs.";
 
        // And abort here
+       // @TODO This cannot be rewritten to mxchange_die(), try to find a solution for this.
        die($debug);
 }
 
@@ -2644,16 +2772,16 @@ function generateSeed () {
 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'):
+               case getCode('LOGOUT_DONE')      : $msg = getMessage('LOGOUT_DONE'); break;
+               case getCode('LOGOUT_FAILED')    : $msg = "<span class=\"guest_failed\">{--LOGOUT_FAILED--}</span>"; break;
+               case getCode('DATA_INVALID')     : $msg = getMessage('MAIL_DATA_INVALID'); break;
+               case getCode('POSSIBLE_INVALID') : $msg = getMessage('MAIL_POSSIBLE_INVALID'); break;
+               case getCode('ACCOUNT_LOCKED')   : $msg = getMessage('MEMBER_ACCOUNT_LOCKED_UNC'); break;
+               case getCode('USER_404')         : $msg = getMessage('USER_NOT_FOUND'); break;
+               case getCode('STATS_404')        : $msg = getMessage('MAIL_STATS_404'); break;
+               case getCode('ALREADY_CONFIRMED'): $msg = getMessage('MAIL_ALREADY_CONFIRMED'); break;
+
+               case getCode('ERROR_MAILID'):
                        if (EXT_IS_ACTIVE($ext, true)) {
                                $msg = getMessage('ERROR_CONFIRMING_MAIL');
                        } else {
@@ -2661,7 +2789,7 @@ function convertCodeToMessage ($code) {
                        }
                        break;
 
-               case constant('CODE_EXTENSION_PROBLEM'):
+               case getCode('EXTENSION_PROBLEM'):
                        if (REQUEST_ISSET_GET(('ext'))) {
                                $msg = sprintf(getMessage('EXTENSION_PROBLEM_EXT_INACTIVE'), REQUEST_GET(('ext')));
                        } else {
@@ -2669,9 +2797,9 @@ function convertCodeToMessage ($code) {
                        }
                        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;
+               case getCode('COOKIES_DISABLED') : $msg = getMessage('LOGIN_NO_COOKIES'); break;
+               case getCode('BEG_SAME_AS_OWN')  : $msg = getMessage('BEG_SAME_UID_AS_OWN'); break;
+               case getCode('LOGIN_FAILED')     : $msg = getMessage('LOGIN_FAILED_GENERAL'); break;
                default                                : $msg = sprintf(getMessage('UNKNOWN_MAILID_CODE'), $code); break;
        } // END - switch
 
@@ -2685,7 +2813,7 @@ 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);
+               LOAD_URL("modules.php?module=index&amp;msg=".getCode('EXTENSION_PROBLEM')."&amp;ext=".$ext_name);
        } // END - if
 }
 
@@ -2959,7 +3087,8 @@ function DEBUG_LOG ($funcFile, $line, $message, $force=true) {
 }
 
 // Reads a directory with PHP files in and gets only files back
-function GET_DIR_AS_ARRAY ($baseDir, $prefix) {
+function GET_DIR_AS_ARRAY ($baseDir, $prefix, $includeDirs = false, $addBaseDir = true) {
+       // Init includes
        $INCs = array();
 
        // Open directory
@@ -2967,13 +3096,13 @@ function GET_DIR_AS_ARRAY ($baseDir, $prefix) {
 
        // Read all entries
        while ($baseFile = readdir($dirPointer)) {
-               // Load file only if extension is active
-               $INC = $baseDir.$baseFile;
+               // Construct include filename and FQFN
+               $INC = $baseDir . "/" . $baseFile;
                $FQFN = constant('PATH') . $INC;
 
                // Is this a valid reset file?
                //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):baseDir={$baseDir},prefix={$prefix},baseFile={$baseFile}<br />\n";
-               if ((FILE_READABLE($FQFN)) && (substr($baseFile, 0, strlen($prefix)) == $prefix) && (substr($baseFile, -4, 4) == ".php")) {
+               if (((FILE_READABLE($FQFN)) && (substr($baseFile, 0, strlen($prefix)) == $prefix) && (substr($baseFile, -4, 4) == ".php")) || (($includeDirs) && (isDirectory($FQFN)))) {
                        // Remove both for extension name
                        $extName = substr($baseFile, strlen($prefix), -4);
 
@@ -2983,10 +3112,16 @@ function GET_DIR_AS_ARRAY ($baseDir, $prefix) {
                        // Is the extension valid and active?
                        if (($extId > 0) && (EXT_IS_ACTIVE($extName))) {
                                // Then add this file
+                               //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>): Extension entry ".$baseFile." added.<br />\n";
                                $INCs[] = $INC;
                        } elseif ($extId == 0) {
                                // Add non-extension files as well
-                               $INCs[] = $INC;
+                               //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>): Regular entry ".$baseFile." added.<br />\n";
+                               if ($addBaseDir) {
+                                       $INCs[] = $INC;
+                               } else {
+                                       $INCs[] = $baseFile;
+                               }
                        }
                } // END - if
        } // END - while
@@ -3374,7 +3509,9 @@ function DETERMINE_REFID () {
 
 // Check wether we are installing
 function isInstalling () {
-       return (isset($GLOBALS['mxchange_installing']));
+       $installing = ((isset($GLOBALS['mxchange_installing'])) || (REQUEST_ISSET_GET('installing')));
+       //* DEBUG: */ var_dump($installing);
+       return $installing;
 }
 
 // Check wether this script is installed
@@ -3414,6 +3551,60 @@ function isCacheInstanceValid () {
        return ((isset($GLOBALS['cache_instance'])) && (is_object($GLOBALS['cache_instance'])));
 }
 
+// Our shutdown-function
+function shutdown () {
+       // Call the filter chain 'shutdown'
+       runFilterChain('shutdown', null, false);
+
+       if (SQL_IS_LINK_UP()) {
+               // Close link
+               SQL_CLOSE(__FILE__, __LINE__);
+       } elseif (!isInstalling()) {
+               // No database link
+               addFatalMessage(__FILE__, __LINE__, getMessage('NO_DB_LINK_SHUTDOWN'));
+       }
+
+       // Stop executing here
+       exit;
+}
+
+// Setter for userid
+function setUserId ($userid) {
+       $GLOBALS['userid'] = bigintval($userid);
+}
+
+// Getter for userid or returns zero
+function getUserId () {
+       // Default userid
+       $userid = 0;
+
+       // Is the userid set?
+       if (isUserIdSet()) {
+               // Then use it
+               $userid = $GLOBALS['userid'];
+       } // END - if
+
+       // Return it
+       return $userid;
+}
+
+// Checks ether the userid is set
+function isUserIdSet () {
+       return (isset($GLOBALS['userid']));
+}
+
+// Checks wether the given FQFN is a directory and not .,.. or .svn
+function isDirectory ($FQFN) {
+       // Generate baseName
+       $baseName = basename($FQFN);
+
+       // Check it
+       $isDirectory = ((is_dir($FQFN)) && ($baseName != ".") && ($baseName != "..") && ($baseName != ".svn"));
+
+       // Return the result
+       return $isDirectory;
+}
+
 //////////////////////////////////////////////////
 // AUTOMATICALLY RE-GENERATED MISSING FUNCTIONS //
 //////////////////////////////////////////////////