- return $ret;
-}
-
-// Check validity of a given module name (no file extension)
-function checkModulePermissions ($mod) {
- // Filter module name (names with low chars and underlines are fine!)
- $mod = preg_replace('/[^a-z_]/', '', $mod);
-
- // Check for prefix is a extension...
- $modSplit = explode("_", $mod);
- $extension = ''; $mod_chk = $mod;
- //* DEBUG: */ echo __LINE__."*".count($modSplit)."*/".$mod."*<br />";
- if (count($modSplit) == 2) {
- // Okay, there is a seperator (_) in the name so is the first part a module?
- //* DEBUG: */ echo __LINE__."*".$modSplit[0]."*<br />";
- if (EXT_IS_ACTIVE($modSplit[0])) {
- // The prefix is an extension's name, so let's set it
- $extension = $modSplit[0]; $mod = $modSplit[1];
- } // END - if
- } // END - if
-
- // Major error in module registry is the default
- $ret = 'major';
-
- // Check if script is installed if not return a 'done' to prevent some errors
- if ((!isInstalled()) || (isInstalling()) || (!isAdminRegistered())) {
- // Not installed or no admin registered or in installation phase
- return 'done';
- } // END - if
-
- // Init variables
- $locked = 'Y';
- $hidden = 'N';
- $admin = 'N';
- $mem = 'N';
- $found = false;
-
- // Check if cache is latest version
- if (GET_EXT_VERSION('cache') >= '0.1.2') {
- // Is the cache there?
- //* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'Using cache.');
- if (!isset($GLOBALS['cache_array']['modules'])) {
- // This happens when a new extension is registered while ext-cache is installed
- $ret = 'cache_miss';
- } // END - if
-
- // Is the module cached?
- if (isset($GLOBALS['cache_array']['modules']['locked'][$mod_chk])) {
- // Check cache
- //* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'Cache found.');
- $locked = $GLOBALS['cache_array']['modules']['locked'][$mod_chk];
- $hidden = $GLOBALS['cache_array']['modules']['hidden'][$mod_chk];
- $admin = $GLOBALS['cache_array']['modules']['admin_only'][$mod_chk];
- $mem = $GLOBALS['cache_array']['modules']['mem_only'][$mod_chk];
-
- // Update cache hits
- incrementConfigEntry('cache_hits');
- $found = true;
- } else {
- // No, then we have to update it!
- $ret = 'cache_miss';
- }
- } elseif (!EXT_IS_ACTIVE('cache')) {
- // Check for module in database
- //* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'Using database.');
- $result = SQL_QUERY_ESC("SELECT `locked`, `hidden`, `admin_only`, `mem_only` FROM `{!_MYSQL_PREFIX!}_mod_reg` WHERE `module`='%s' LIMIT 1",
- array($mod_chk), __FUNCTION__, __LINE__);
- if (SQL_NUMROWS($result) == 1) {
- // Read data
- //* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'Entry found.');
- list($locked, $hidden, $admin, $mem) = SQL_FETCHROW($result);
- $found = true;
- } elseif (isDebugModeEnabled()) {
- // Debug message only in debug-mode...
- DEBUG_LOG(__FUNCTION__, __LINE__, 'Module ' . $mod_chk . ' not found!');
- }
-
- // Free result
- SQL_FREERESULT($result);
- }
- //* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, 'ret=' . $ret);
-
- // Is the module found?
- if ($found === true) {
- // Check returned values against current access permissions
- //
- // Admin access ----- Guest access ----- --- Guest or member? ---
- if ((IS_ADMIN()) || (($locked == 'N') && ($admin == 'N') && (($mem == 'N') || (IS_MEMBER())))) {
- // Count module
- countModuleHit($mod_chk);
-
- // If you are admin you are welcome for everything!
- $ret = 'done';
- } elseif ($locked == 'Y') {
- // Module is locked
- $ret = 'locked';
- } elseif (($mem == 'Y') && (!IS_MEMBER())) {
- // You have to login first!
- $ret = 'mem_only';
- } elseif (($admin == 'Y') && (!IS_ADMIN())) {
- // Only the Admin is allowed to enter this module!
- $ret = 'admin_only';
- } else {
- // @TODO Nothing helped???
- DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("ret=%s,locked=%s,admin=%s,mem=%s",
- $ret,
- $locked,
- $admin,
- $mem
- ));
- }
- } // END - if
-
- // Still no luck or not found?
- if (($found === false) && (!EXT_IS_ACTIVE('cache')) && ($ret != 'done')) {
- // ----- Legacy module ----- ---- Module in base folder ---- --- Module with extension's name ---
- if ((isFileReadable(sprintf("%sinc/modules/%s.php", constant('PATH'), $mod))) || (isFileReadable(sprintf("%s%s.php", constant('PATH'), $mod))) || (isFileReadable(sprintf("%s%s/%s.php", constant('PATH'), $extension, $mod)))) {
- // Data is missing so we add it
- if (GET_EXT_VERSION('sql_patches') >= '0.3.6') {
- // Since 0.3.6 we have a has_menu column, this took me a half hour
- // to find a loop here... *sigh*
- SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_mod_reg`
-(`module`, `locked`, `hidden`, `mem_only`, `admin_only`, `has_menu`) VALUES
-('%s','Y','N','N','N','N')", array($mod_chk), __FUNCTION__, __LINE__);
- } else {
- // Wrong/missing sql_patches!
- SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_mod_reg`
-(`module`, `locked`, `hidden`, `mem_only`, `admin_only`) VALUES
-('%s','Y','N','N','N')", array($mod_chk), __FUNCTION__, __LINE__);
- }
-
- // Everthing is fine?
- if (SQL_AFFECTEDROWS() < 1) {
- // Something bad happend!
- return 'major';
- } // END - if
-
- // Destroy cache here
- // @TODO Rewrite this to a filter
- rebuildCacheFiles('modreg', 'modreg');
-
- // And reload data
- $ret = checkModulePermissions($mod_chk);
- } else {
- // Module not found we don't add it to the database
- $ret = '404';
- }
- } elseif ($ret == 'cache_miss') {
- // Rebuild the cache files
- rebuildCacheFiles('modreg', 'modreg');
- } elseif ($found === false) {
- // Problem with module detected
- DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Problem in module %s detected. ret=%s, locked=%s, hidden=%s, mem=%s, admin=%s",
- $mod,
- $ret,
- $locked,
- $hidden,
- $mem,
- $admin
- ));
- }