Modular Extensions - Version 4.3

[eluser]Avatar[/eluser]
I'm bored. So I've decided to post my version of the modules_helper.php and modular_extensions.php Hope this is helpful., please see below:
modules_helper.php

Code:

<?php if (!defined('BASEPATH')) exit('No direct script access allowed');
/**
* Modular Extensions - (HMVC)
*
* Adapted from the CodeIgniter Core Classes
* @copyright    Copyright (c) 2006, EllisLab, Inc.
* @license        http://ellislab.com/codeigniter/user-guide/license.html
*
* Description:
* This helper provides static functions to load and instantiate modules
* from the modular_extensions library which can operate as HMVC controllers.
*  
* Modules have access to the currently loaded core classes in the same
* manner as a normal controller.
*
* Install this file as application/helpers/modules_helper.php
*
* Load manually or autoload as needed.
*
* Version: 4.0.6 (c) Wiredesignz 2008-03-04
**/

define('MODBASE', APPPATH.'modules/');

class Modules
{
    function & load($modules, $base = 'controllers/')
    {        
        if(!is_array($modules))
        {
            $modules = array($modules => '');
        }
        
        foreach ($modules as $module => $config)
        {            
            list($path, $module) = modules::path_to($module, $module, $base);
            
            if (isset($this->$module))
            {
               return $this->$module;
             }
        
            modules::_load_file($module, $path);
            
            $_module = strtolower($module);    
            $this->$_module =& new $module($config);
            
            $this->$_module->_modules[$_module] = get_class($this);
            
            return $this->$_module;  
        }
    }

    function _load_file($file, $path)
    {
        if (!class_exists($file))
        {
            include_once $path.$file.EXT;
            log_message('debug', $path.$file.EXT.' file loaded');
        }
        return TRUE;
    }
    
    function _load_config($file, $path)
    {
        include $path.$file.EXT;
        
        if (!isset($config) OR !is_array($config))
        {        
            show_error($file.' does not contain a valid configuration array');
        }

        log_message('debug', $path.$file.EXT.' configuration file loaded');
        return $config;
    }
    
    function path_to($file, $path = '', $base = '',$prep='')
    {
        $file = str_replace(EXT, '', strtolower($file));
        
        if (($pos = strrpos($file, '/')) !== FALSE)
        {
            $path  = substr($file, 0, $pos + 1);
            $file  = substr($file, $pos + 1);
        }
        else $path .= '/';
        
        foreach (array(MODBASE.$path.$base, MODBASE.$base, MODBASE.$path, MODBASE, APPPATH.$base, APPPATH.$base.$path, BASEPATH.$base) as $path2)
        {        
        
            foreach (array($file, ucfirst($file)) as $name)
            {
                if (is_file($path2.$name.$prep.EXT))
                {
                    return array($path2, $name.$prep);
                }
            }
        }

        if (class_exists('CI_'.$name))
        {
            return array(FALSE, $name);
        }    
        
        show_error("Unable to find the requested file: ".strtolower($path.$base.$file.EXT));
    }
    
    function run($module, $data = '', $method = 'index')
    {
        $class =& modules::load($module);
        return (method_exists($class, $method)) ? $class->$method($data) : $class->_error($method);
    }
    
    function debug($_this)
    {
        if (is_object($_this))
        {
            echo '<pre>',get_class($_this),' Object: ',
            print_r(array_keys(get_object_vars($_this)), TRUE),'</pre>';
            echo '<br />';
        }
    }
    
    function debug_in($_this)
    {
        if (is_object($_this))
        {
            echo '<pre>',get_class($_this),' Object: ',
            print_r(get_object_vars($_this), TRUE),'</pre>';
            echo '<br />';
        }
        
        if (is_array($_this))
        {
            echo '<pre>',
            print_r($_this, TRUE),'</pre>';
            echo '<br />';
        }
    }
    function to_string($module, $mod_str = '')
    {      
        $_mods = explode('/',$module);
            
        $pos = strrpos($module, '/');
        $fm  = substr($module, $pos + 1);
      
        foreach($_mods as $mod => $m)
        {
            $mod_str .= ($fm != $m) ? $m.'/modules/' : $fm.'/'.$fm;
        }
            
        return $mod_str;
    }
}

include_once APPPATH.'libraries/modular_extensions.php';