<?php
/**
 * CodeIgniter
 *
 * An open source application development framework for PHP
 *
 * This content is released under the MIT License (MIT)
 *
 * Copyright (c) 2014 - 2016, British Columbia Institute of Technology
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 *
 * @package	CodeIgniter
 * @author	EllisLab Dev Team
 * @copyright	Copyright (c) 2008 - 2014, EllisLab, Inc. (https://ellislab.com/)
 * @copyright	Copyright (c) 2014 - 2016, British Columbia Institute of Technology (http://bcit.ca/)
 * @license	http://opensource.org/licenses/MIT	MIT License
 * @link	https://codeigniter.com
 * @since	Version 1.0.0
 * @filesource
 */
defined('BASEPATH') or exit('No direct script access allowed');

/**
 * Loader Class
 *
 * Loads framework components.
 *
 * @package		CodeIgniter
 * @subpackage	Libraries
 * @category	Loader
 * @author		EllisLab Dev Team
 * @link		https://codeigniter.com/user_guide/libraries/loader.html
 */
class Tendoo_Loader
{

    // All these are set automatically. Don't mess with them.
    /**
     * Nesting level of the output buffering mechanism
     *
     * @var	int
     */
    protected $_ci_ob_level;

    /**
     * List of paths to load views from
     *
     * @var	array
     */
    protected $_ci_view_paths =    array(VIEWPATH    => true);

    /**
     * List of paths to load libraries from
     *
     * @var	array
     */
    protected $_ci_library_paths =    array(APPPATH, BASEPATH);

    /**
     * List of paths to load models from
     *
     * @var	array
     */
    protected $_ci_model_paths =    array(APPPATH);

    /**
     * List of paths to load helpers from
     *
     * @var	array
     */
    protected $_ci_helper_paths =    array(APPPATH, BASEPATH);

    /**
     * List of cached variables
     *
     * @var	array
     */
    protected $_ci_cached_vars =    array();

    /**
     * List of loaded classes
     *
     * @var	array
     */
    protected $_ci_classes =    array();

    /**
     * List of loaded models
     *
     * @var	array
     */
    protected $_ci_models =    array();

    /**
     * List of loaded helpers
     *
     * @var	array
     */
    protected $_ci_helpers =    array();

    /**
     * List of class name mappings
     *
     * @var	array
     */
    protected $_ci_varmap =    array(
        'unit_test' => 'unit',
        'user_agent' => 'agent'
    );

    // --------------------------------------------------------------------

    /**
     * Class constructor
     *
     * Sets component load paths, gets the initial output buffering level.
     *
     * @return	void
     */
    public function __construct()
    {
        $this->_ci_ob_level = ob_get_level();
        $this->_ci_classes =& is_loaded();

        log_message('info', 'Loader Class Initialized');
    }

    // --------------------------------------------------------------------

    /**
     * Initializer
     *
     * @todo	Figure out a way to move this to the constructor
     *		without breaking *package_path*() methods.
     * @uses	CI_Loader::_ci_autoloader()
     * @used-by	CI_Controller::__construct()
     * @return	void
     */
    public function initialize()
    {
        $this->_ci_autoloader();
    }

    // --------------------------------------------------------------------

    /**
     * Is Loaded
     *
     * A utility method to test if a class is in the self::$_ci_classes array.
     *
     * @used-by	Mainly used by Form Helper function _get_validation_object().
     *
     * @param 	string		$class	Class name to check for
     * @return 	string|bool	Class object name if loaded or FALSE
     */
    public function is_loaded($class)
    {
        return array_search(ucfirst($class), $this->_ci_classes, true);
    }

    // --------------------------------------------------------------------

    /**
     * Library Loader
     *
     * Loads and instantiates libraries.
     * Designed to be called from application controllers.
     *
     * @param	string	$library	Library name
     * @param	array	$params		Optional parameters to pass to the library class constructor
     * @param	string	$object_name	An optional object name to assign to
     * @return	object
     */
    public function library($library, $params = null, $object_name = null)
    {
        if (empty($library)) {
            return $this;
        } elseif (is_array($library)) {
            foreach ($library as $key => $value) {
                if (is_int($key)) {
                    $this->library($value, $params);
                } else {
                    $this->library($key, $params, $value);
                }
            }

            return $this;
        }

        if ($params !== null && ! is_array($params)) {
            $params = null;
        }

        $this->_ci_load_library($library, $params, $object_name);
        return $this;
    }

    /**
     *  Module Library
     *  @param string module namespace
     *  @param	string	$library	Library name
     *  @param	array	$params		Optional parameters to pass to the library class constructor
     *  @param	string	$object_name	An optional object name to assign to
     *  @return this
    **/

    public function module_library( $module_namespace, $library, $params = null, $object_name = null)
    {
        if (empty($library)) {
            return $this;
        } elseif (is_array($library)) {
            foreach ($library as $key => $value) {
                if (is_int($key)) {
                    $this->module_library( $module_namespace, $value, $params);
                } else {
                    $this->module_library( $module_namespace, $key, $params, $value);
                }
            }

            return $this;
        }

        if ($params !== null && ! is_array($params)) {
            $params = null;
        }

        $this->_ci_load_library( '../modules/' . $module_namespace . '/inc/libraries/' . $library, $params, $object_name);

        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Model Loader
     *
     * Loads and instantiates models.
     *
     * @param	string	$model		Model name
     * @param	string	$name		An optional object name to assign to
     * @param	bool	$db_conn	An optional database connection configuration to initialize
     * @return	object
     */
    public function model($model, $name = '', $db_conn = false)
    {
        if (empty($model)) {
            return $this;
        } elseif (is_array($model)) {
            foreach ($model as $key => $value) {
                is_int($key) ? $this->model($value, '', $db_conn) : $this->model($key, $value, $db_conn);
            }

            return $this;
        }

        $path = '';

        // Is the model in a sub-folder? If so, parse out the filename and path.
        if (($last_slash = strrpos($model, '/')) !== false) {
            // The path is in front of the last slash
            $path = substr($model, 0, ++$last_slash);

            // And the model name behind it
            $model = substr($model, $last_slash);
        }

        if (empty($name)) {
            $name = $model;
        }

        if (in_array($name, $this->_ci_models, true)) {
            return $this;
        }

        $CI =& get_instance();
        if (isset($CI->$name)) {
            throw new RuntimeException('The model name you are loading is the name of a resource that is already being used: '.$name);
        }

        if ($db_conn !== false && ! class_exists('CI_DB', false)) {
            if ($db_conn === true) {
                $db_conn = '';
            }

            $this->database($db_conn, false, true);
        }

        // Note: All of the code under this condition used to be just:
        //
        //       load_class('Model', 'core');
        //
        //       However, load_class() instantiates classes
        //       to cache them for later use and that prevents
        //       MY_Model from being an abstract class and is
        //       sub-optimal otherwise anyway.
        if (! class_exists('CI_Model', false)) {
            $app_path = APPPATH.'core'.DIRECTORY_SEPARATOR;
            if (file_exists($app_path.'Model.php')) {
                require_once($app_path.'Model.php');
                if (! class_exists('CI_Model', false)) {
                    throw new RuntimeException($app_path."Model.php exists, but doesn't declare class CI_Model");
                }
            } elseif (! class_exists('CI_Model', false)) {
                require_once(BASEPATH.'core'.DIRECTORY_SEPARATOR.'Model.php');
            }

            $class = config_item('subclass_prefix').'Model';
            if (file_exists($app_path.$class.'.php')) {
                require_once($app_path.$class.'.php');
                if (! class_exists($class, false)) {
                    throw new RuntimeException($app_path.$class.".php exists, but doesn't declare class ".$class);
                }
            }
        }

        $model = ucfirst($model);
        if (! class_exists($model, false)) {
            foreach ($this->_ci_model_paths as $mod_path) {
                if (! file_exists($mod_path.'models/'.$path.$model.'.php')) {
                    continue;
                }

                require_once($mod_path.'models/'.$path.$model.'.php');
                if (! class_exists($model, false)) {
                    throw new RuntimeException($mod_path."models/".$path.$model.".php exists, but doesn't declare class ".$model);
                }

                break;
            }

            if (! class_exists($model, false)) {
                throw new RuntimeException('Unable to locate the model you have specified: '.$model);
            }
        } elseif (! is_subclass_of($model, 'CI_Model')) {
            throw new RuntimeException("Class ".$model." already exists and doesn't extend CI_Model");
        }

        $this->_ci_models[] = $name;
        $CI->$name = new $model();
        return $this;
    }

    /**
     *  Module Model
     *  @param string module namespace
     *  @return
    **/

    public function module_model( $module_namespace, $model, $name = '', $db_conn = false)
    {
        if (empty($model)) {
            return $this;
        } elseif (is_array($model)) {
            foreach ($model as $key => $value) {
                is_int($key) ? $this->module_model( $module_namespace, $value, '', $db_conn) : $this->model( $module_namespace, $key, $value, $db_conn);
            }

            return $this;
        }

        $path = '';

        // Is the model in a sub-folder? If so, parse out the filename and path.
        if (($last_slash = strrpos($model, '/')) !== false) {
            // The path is in front of the last slash
            $path = substr($model, 0, ++$last_slash);

            // And the model name behind it
            $model = substr($model, $last_slash);
        }

        if (empty($name)) {
            $name = $model;
        }

        if (in_array($name, $this->_ci_models, true)) {
            return $this;
        }

        $CI =& get_instance();
        if (isset($CI->$name)) {
            throw new RuntimeException('The model name you are loading is the name of a resource that is already being used: '.$name);
        }

        if ($db_conn !== false && ! class_exists('CI_DB', false)) {
            if ($db_conn === true) {
                $db_conn = '';
            }

            $this->database($db_conn, false, true);
        }

        // Note: All of the code under this condition used to be just:
        //
        //       load_class('Model', 'core');
        //
        //       However, load_class() instantiates classes
        //       to cache them for later use and that prevents
        //       MY_Model from being an abstract class and is
        //       sub-optimal otherwise anyway.

        if (! class_exists('CI_Model', false)) {
            $app_path = APPPATH.'core'.DIRECTORY_SEPARATOR;
            if (file_exists($app_path.'Model.php')) {
                require_once($app_path.'Model.php');
                if (! class_exists('CI_Model', false)) {
                    throw new RuntimeException($app_path."Model.php exists, but doesn't declare class CI_Model");
                }
            } elseif (! class_exists('CI_Model', false)) {
                require_once(BASEPATH.'core'.DIRECTORY_SEPARATOR.'Model.php');
            }

            $class = config_item('subclass_prefix').'Model';
            if (file_exists($app_path.$class.'.php')) {
                require_once($app_path.$class.'.php');
                if (! class_exists($class, false)) {
                    throw new RuntimeException($app_path.$class.".php exists, but doesn't declare class ".$class);
                }
            }
        }

        $model = ucfirst($model);

        if (! class_exists($model, false)) {

            foreach ($this->_ci_model_paths as $mod_path) {

                if (! file_exists($mod_path.'/modules/' . $module_namespace . '/inc/models/'.$path.$model.'.php')) {
                    continue;
                }

                require_once($mod_path.'modules/' . $module_namespace . '/inc/models/'.$path.$model.'.php');

                if (! class_exists($model, false)) {
                    throw new RuntimeException($mod_path."modules/' . $module_namespace . '/inc/models/".$path.$model.".php exists, but doesn't declare class ".$model);
                }

                break;
            }

            if (! class_exists($model, false)) {
                throw new RuntimeException('Unable to locate the model for the module : ' . $module_namespace . ' you have specified: '.$model);
            }

        } elseif (! is_subclass_of($model, 'CI_Model')) {
            throw new RuntimeException("Class ".$model." already exists and doesn't extend CI_Model");
        }

        $this->_ci_models[] = $name;
        $CI->$name = new $model();
        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Database Loader
     *
     * @param	mixed	$params		Database configuration options
     * @param	bool	$return 	Whether to return the database object
     * @param	bool	$query_builder	Whether to enable Query Builder
     *					(overrides the configuration setting)
     *
     * @return	object|bool	Database object if $return is set to TRUE,
     *					FALSE on failure, CI_Loader instance in any other case
     */
    public function database($params = '', $return = false, $query_builder = null)
    {
        // Grab the super object
        $CI =& get_instance();

        // Do we even need to load the database class?
        if ($return === false && $query_builder === null && isset($CI->db) && is_object($CI->db) && ! empty($CI->db->conn_id)) {
            return false;
        }

        require_once(BASEPATH.'database/DB.php');

        if ($return === true) {
            return DB($params, $query_builder);
        }

        // Initialize the db variable. Needed to prevent
        // reference errors with some configurations
        $CI->db = '';

        // Load the DB class
        $CI->db =& DB($params, $query_builder);
        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Load the Database Utilities Class
     *
     * @param	object	$db	Database object
     * @param	bool	$return	Whether to return the DB Utilities class object or not
     * @return	object
     */
    public function dbutil($db = null, $return = false)
    {
        $CI =& get_instance();

        if (! is_object($db) or ! ($db instanceof CI_DB)) {
            class_exists('CI_DB', false) or $this->database();
            $db =& $CI->db;
        }

        require_once(BASEPATH.'database/DB_utility.php');
        require_once(BASEPATH.'database/drivers/'.$db->dbdriver.'/'.$db->dbdriver.'_utility.php');
        $class = 'CI_DB_'.$db->dbdriver.'_utility';

        if ($return === true) {
            return new $class($db);
        }

        $CI->dbutil = new $class($db);
        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Load the Database Forge Class
     *
     * @param	object	$db	Database object
     * @param	bool	$return	Whether to return the DB Forge class object or not
     * @return	object
     */
    public function dbforge($db = null, $return = false)
    {
        $CI =& get_instance();
        if (! is_object($db) or ! ($db instanceof CI_DB)) {
            class_exists('CI_DB', false) or $this->database();
            $db =& $CI->db;
        }

        require_once(BASEPATH.'database/DB_forge.php');
        require_once(BASEPATH.'database/drivers/'.$db->dbdriver.'/'.$db->dbdriver.'_forge.php');

        if (! empty($db->subdriver)) {
            $driver_path = BASEPATH.'database/drivers/'.$db->dbdriver.'/subdrivers/'.$db->dbdriver.'_'.$db->subdriver.'_forge.php';
            if (file_exists($driver_path)) {
                require_once($driver_path);
                $class = 'CI_DB_'.$db->dbdriver.'_'.$db->subdriver.'_forge';
            }
        } else {
            $class = 'CI_DB_'.$db->dbdriver.'_forge';
        }

        if ($return === true) {
            return new $class($db);
        }

        $CI->dbforge = new $class($db);
        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * View Loader
     *
     * Loads "view" files.
     *
     * @param	string	$view	View name
     * @param	array	$vars	An associative array of data
     *				to be extracted for use in the view
     * @param	bool	$return	Whether to return the view output
     *				or leave it to the Output class
     * @return	object|string
     */
    public function view($view, $vars = array(), $return = false)
    {
        return $this->_ci_load(array('_ci_view' => $view, '_ci_vars' => $this->_ci_object_to_array($vars), '_ci_return' => $return));
    }

    /**
     *  Module Include
     *  @param
     *  @return
    **/

    public function module_include($module_namespace, $view, $vars = array(), $return = false)
    {
        $view       =   str_replace( '.', '/', $view );
        return $this->_ci_load(array( '_ci_view' => '../modules/' . $module_namespace . '/inc/' . $view, '_ci_vars' => $this->_ci_object_to_array($vars), '_ci_return' => $return));
    }

    /**
     * Module View
     *
     * @param string module namespace
     * @param string path
     * @param array var
     * @param bool return of no
     * @return string/object
    **/

    public function module_view($module_namespace, $view, $vars = array(), $return = false)
    {
        $view       =   str_replace( '.', '/', $view );
        return $this->_ci_load(array( '_ci_view' => '../modules/' . $module_namespace . '/views/' . $view, '_ci_vars' => $this->_ci_object_to_array($vars), '_ci_return' => $return));
    }

	/**
     * Must Use Module View
     *
     * @param string module namespace
     * @param string path
     * @param array var
     * @param bool return of no
     * @return string/object
    **/

    public function mu_module_view($module_namespace, $view, $vars = array(), $return = false)
    {
        return $this->_ci_load(array( '_ci_view' => '../mu-modules/' . $module_namespace . '/views/' . $view, '_ci_vars' => $this->_ci_object_to_array($vars), '_ci_return' => $return));
    }

    // --------------------------------------------------------------------

    /**
     * Generic File Loader
     *
     * @param	string	$path	File path
     * @param	bool	$return	Whether to return the file output
     * @return	object|string
     */
    public function file($path, $return = false)
    {
        return $this->_ci_load(array('_ci_path' => $path, '_ci_return' => $return));
    }

    // --------------------------------------------------------------------

    /**
     * Set Variables
     *
     * Once variables are set they become available within
     * the controller class and its "view" files.
     *
     * @param	array|object|string	$vars
     *					An associative array or object containing values
     *					to be set, or a value's name if string
     * @param 	string	$val	Value to set, only used if $vars is a string
     * @return	object
     */
    public function vars($vars, $val = '')
    {
        if (is_string($vars)) {
            $vars = array($vars => $val);
        }

        $vars = $this->_ci_object_to_array($vars);

        if (is_array($vars) && count($vars) > 0) {
            foreach ($vars as $key => $val) {
                $this->_ci_cached_vars[$key] = $val;
            }
        }

        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Clear Cached Variables
     *
     * Clears the cached variables.
     *
     * @return	CI_Loader
     */
    public function clear_vars()
    {
        $this->_ci_cached_vars = array();
        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Get Variable
     *
     * Check if a variable is set and retrieve it.
     *
     * @param	string	$key	Variable name
     * @return	mixed	The variable or NULL if not found
     */
    public function get_var($key)
    {
        return isset($this->_ci_cached_vars[$key]) ? $this->_ci_cached_vars[$key] : null;
    }

    // --------------------------------------------------------------------

    /**
     * Get Variables
     *
     * Retrieves all loaded variables.
     *
     * @return	array
     */
    public function get_vars()
    {
        return $this->_ci_cached_vars;
    }

    // --------------------------------------------------------------------

    /**
     * Helper Loader
     *
     * @param	string|string[]	$helpers	Helper name(s)
     * @return	object
     */
    public function helper($helpers = array())
    {
        foreach ($this->_ci_prep_filename($helpers, '_helper') as $helper) {
            if (isset($this->_ci_helpers[$helper])) {
                continue;
            }

            // Is this a helper extension request?
            $ext_helper = config_item('subclass_prefix').$helper;
            $ext_loaded = false;
            foreach ($this->_ci_helper_paths as $path) {
                if (file_exists($path.'helpers/'.$ext_helper.'.php')) {
                    include_once($path.'helpers/'.$ext_helper.'.php');
                    $ext_loaded = true;
                }
            }

            // If we have loaded extensions - check if the base one is here
            if ($ext_loaded === true) {
                $base_helper = BASEPATH.'helpers/'.$helper.'.php';
                if (! file_exists($base_helper)) {
                    show_error('Unable to load the requested file: helpers/'.$helper.'.php');
                }

                include_once($base_helper);
                $this->_ci_helpers[$helper] = true;
                log_message('info', 'Helper loaded: '.$helper);
                continue;
            }

            // No extensions found ... try loading regular helpers and/or overrides
            foreach ($this->_ci_helper_paths as $path) {
                if (file_exists($path.'helpers/'.$helper.'.php')) {
                    include_once($path.'helpers/'.$helper.'.php');

                    $this->_ci_helpers[$helper] = true;
                    log_message('info', 'Helper loaded: '.$helper);
                    break;
                }
            }

            // unable to load the helper
            if (! isset($this->_ci_helpers[$helper])) {
                show_error('Unable to load the requested file: helpers/'.$helper.'.php');
            }
        }

        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Load Helpers
     *
     * An alias for the helper() method in case the developer has
     * written the plural form of it.
     *
     * @uses	CI_Loader::helper()
     * @param	string|string[]	$helpers	Helper name(s)
     * @return	object
     */
    public function helpers($helpers = array())
    {
        return $this->helper($helpers);
    }

    // --------------------------------------------------------------------

    /**
     * Language Loader
     *
     * Loads language files.
     *
     * @param	string|string[]	$files	List of language file names to load
     * @param	string		Language name
     * @return	object
     */
    public function language($files, $lang = '')
    {
        get_instance()->lang->load($files, $lang);
        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Config Loader
     *
     * Loads a config file (an alias for CI_Config::load()).
     *
     * @uses	CI_Config::load()
     * @param	string	$file			Configuration file name
     * @param	bool	$use_sections		Whether configuration values should be loaded into their own section
     * @param	bool	$fail_gracefully	Whether to just return FALSE or display an error message
     * @return	bool	TRUE if the file was loaded correctly or FALSE on failure
     */
    public function config($file, $use_sections = false, $fail_gracefully = false)
    {
        return get_instance()->config->load($file, $use_sections, $fail_gracefully);
    }

    /**
     *  Load Module Config
     *  @param void
     *  @return void
    **/

    public function module_config( $module_namespace, $file = '', $use_sections = false, $fail_gracefully = false)
    {
        if( $file == '' ) {
            return get_instance()->config->load( '../modules/' . $module_namespace . '/inc/config/' . $module_namespace, $use_sections, $fail_gracefully);
        }
        return get_instance()->config->load( '../modules/' . $module_namespace . '/inc/config/' . $file, $use_sections, $fail_gracefully);
    }

    // --------------------------------------------------------------------

    /**
     * Driver Loader
     *
     * Loads a driver library.
     *
     * @param	string|string[]	$library	Driver name(s)
     * @param	array		$params		Optional parameters to pass to the driver
     * @param	string		$object_name	An optional object name to assign to
     *
     * @return	object|bool	Object or FALSE on failure if $library is a string
     *				and $object_name is set. CI_Loader instance otherwise.
     */
    public function driver($library, $params = null, $object_name = null)
    {
        if (is_array($library)) {
            foreach ($library as $key => $value) {
                if (is_int($key)) {
                    $this->driver($value, $params);
                } else {
                    $this->driver($key, $params, $value);
                }
            }

            return $this;
        } elseif (empty($library)) {
            return false;
        }

        if (! class_exists('CI_Driver_Library', false)) {
            // We aren't instantiating an object here, just making the base class available
            require BASEPATH.'libraries/Driver.php';
        }

        // We can save the loader some time since Drivers will *always* be in a subfolder,
        // and typically identically named to the library
        if (! strpos($library, '/')) {
            $library = ucfirst($library).'/'.$library;
        }

        return $this->library($library, $params, $object_name);
    }

    // --------------------------------------------------------------------

    /**
     * Add Package Path
     *
     * Prepends a parent path to the library, model, helper and config
     * path arrays.
     *
     * @see	CI_Loader::$_ci_library_paths
     * @see	CI_Loader::$_ci_model_paths
     * @see CI_Loader::$_ci_helper_paths
     * @see CI_Config::$_config_paths
     *
     * @param	string	$path		Path to add
     * @param 	bool	$view_cascade	(default: TRUE)
     * @return	object
     */
    public function add_package_path($path, $view_cascade = true)
    {
        $path = rtrim($path, '/').'/';

        array_unshift($this->_ci_library_paths, $path);
        array_unshift($this->_ci_model_paths, $path);
        array_unshift($this->_ci_helper_paths, $path);

        $this->_ci_view_paths = array($path.'views/' => $view_cascade) + $this->_ci_view_paths;

        // Add config file path
        $config =& $this->_ci_get_component('config');
        $config->_config_paths[] = $path;

        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Get Package Paths
     *
     * Return a list of all package paths.
     *
     * @param	bool	$include_base	Whether to include BASEPATH (default: FALSE)
     * @return	array
     */
    public function get_package_paths($include_base = false)
    {
        return ($include_base === true) ? $this->_ci_library_paths : $this->_ci_model_paths;
    }

    // --------------------------------------------------------------------

    /**
     * Remove Package Path
     *
     * Remove a path from the library, model, helper and/or config
     * path arrays if it exists. If no path is provided, the most recently
     * added path will be removed removed.
     *
     * @param	string	$path	Path to remove
     * @return	object
     */
    public function remove_package_path($path = '')
    {
        $config =& $this->_ci_get_component('config');

        if ($path === '') {
            array_shift($this->_ci_library_paths);
            array_shift($this->_ci_model_paths);
            array_shift($this->_ci_helper_paths);
            array_shift($this->_ci_view_paths);
            array_pop($config->_config_paths);
        } else {
            $path = rtrim($path, '/').'/';
            foreach (array('_ci_library_paths', '_ci_model_paths', '_ci_helper_paths') as $var) {
                if (($key = array_search($path, $this->{$var})) !== false) {
                    unset($this->{$var}[$key]);
                }
            }

            if (isset($this->_ci_view_paths[$path.'views/'])) {
                unset($this->_ci_view_paths[$path.'views/']);
            }

            if (($key = array_search($path, $config->_config_paths)) !== false) {
                unset($config->_config_paths[$key]);
            }
        }

        // make sure the application default paths are still in the array
        $this->_ci_library_paths = array_unique(array_merge($this->_ci_library_paths, array(APPPATH, BASEPATH)));
        $this->_ci_helper_paths = array_unique(array_merge($this->_ci_helper_paths, array(APPPATH, BASEPATH)));
        $this->_ci_model_paths = array_unique(array_merge($this->_ci_model_paths, array(APPPATH)));
        $this->_ci_view_paths = array_merge($this->_ci_view_paths, array(APPPATH.'views/' => true));
        $config->_config_paths = array_unique(array_merge($config->_config_paths, array(APPPATH)));

        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Internal CI Data Loader
     *
     * Used to load views and files.
     *
     * Variables are prefixed with _ci_ to avoid symbol collision with
     * variables made available to view files.
     *
     * @used-by	CI_Loader::view()
     * @used-by	CI_Loader::file()
     * @param	array	$_ci_data	Data to load
     * @return	object
     */
    protected function _ci_load($_ci_data)
    {
        // Set the default data variables
        foreach (array('_ci_view', '_ci_vars', '_ci_path', '_ci_return') as $_ci_val) {
            $$_ci_val = isset($_ci_data[$_ci_val]) ? $_ci_data[$_ci_val] : false;
        }

        $file_exists = false;

        // Set the path to the requested file
        if (is_string($_ci_path) && $_ci_path !== '') {
            $_ci_x = explode('/', $_ci_path);
            $_ci_file = end($_ci_x);
        } else {
            $_ci_ext = pathinfo($_ci_view, PATHINFO_EXTENSION);
            $_ci_file = ($_ci_ext === '') ? $_ci_view.'.php' : $_ci_view;

            foreach ($this->_ci_view_paths as $_ci_view_file => $cascade) {
                if (file_exists($_ci_view_file.$_ci_file)) {
                    $_ci_path = $_ci_view_file.$_ci_file;
                    $file_exists = true;
                    break;
                }

                if (! $cascade) {
                    break;
                }
            }
        }

        if (! $file_exists && ! file_exists($_ci_path)) {
            show_error('Unable to load the requested file: '.$_ci_file);
        }

        // This allows anything loaded using $this->load (views, files, etc.)
        // to become accessible from within the Controller and Model functions.
        $_ci_CI =& get_instance();
        foreach (get_object_vars($_ci_CI) as $_ci_key => $_ci_var) {
            if (! isset($this->$_ci_key)) {
                $this->$_ci_key =& $_ci_CI->$_ci_key;
            }
        }

        /*
         * Extract and cache variables
         *
         * You can either set variables using the dedicated $this->load->vars()
         * function or via the second parameter of this function. We'll merge
         * the two types and cache them so that views that are embedded within
         * other views can have access to these variables.
         */
        if (is_array($_ci_vars)) {
            foreach (array_keys($_ci_vars) as $key) {
                if (strncmp($key, '_ci_', 4) === 0) {
                    unset($_ci_vars[$key]);
                }
            }

            $this->_ci_cached_vars = array_merge($this->_ci_cached_vars, $_ci_vars);
        }
        extract($this->_ci_cached_vars);

        /*
         * Buffer the output
         *
         * We buffer the output for two reasons:
         * 1. Speed. You get a significant speed boost.
         * 2. So that the final rendered template can be post-processed by
         *	the output class. Why do we need post processing? For one thing,
         *	in order to show the elapsed page load time. Unless we can
         *	intercept the content right before it's sent to the browser and
         *	then stop the timer it won't be accurate.
         */
        ob_start();

        // If the PHP installation does not support short tags we'll
        // do a little string replacement, changing the short tags
        // to standard PHP echo statements.
        if (! is_php('5.4') && ! ini_get('short_open_tag') && config_item('rewrite_short_tags') === true) {
            echo eval('?>'.preg_replace('/;*\s*\?>/', '; ?>', str_replace('<?=', '<?php echo ', file_get_contents($_ci_path))));
        } else {
            include($_ci_path); // include() vs include_once() allows for multiple views with the same name
        }

        log_message('info', 'File loaded: '.$_ci_path);

        // Return the file data if requested
        if ($_ci_return === true) {
            $buffer = ob_get_contents();
            @ob_end_clean();
            return $buffer;
        }

        /*
         * Flush the buffer... or buff the flusher?
         *
         * In order to permit views to be nested within
         * other views, we need to flush the content back out whenever
         * we are beyond the first level of output buffering so that
         * it can be seen and included properly by the first included
         * template and any subsequent ones. Oy!
         */
        if (ob_get_level() > $this->_ci_ob_level + 1) {
            ob_end_flush();
        } else {
            $_ci_CI->output->append_output(ob_get_contents());
            @ob_end_clean();
        }

        return $this;
    }

    // --------------------------------------------------------------------

    /**
     * Internal CI Library Loader
     *
     * @used-by	CI_Loader::library()
     * @uses	CI_Loader::_ci_init_library()
     *
     * @param	string	$class		Class name to load
     * @param	mixed	$params		Optional parameters to pass to the class constructor
     * @param	string	$object_name	Optional object name to assign to
     * @return	void
     */
    protected function _ci_load_library($class, $params = null, $object_name = null)
    {
        // Get the class name, and while we're at it trim any slashes.
        // The directory path can be included as part of the class name,
        // but we don't want a leading slash
        $class = str_replace('.php', '', trim($class, '/'));

        // Was the path included with the class name?
        // We look for a slash to determine this
        if (($last_slash = strrpos($class, '/')) !== false) {
            // Extract the path
            $subdir = substr($class, 0, ++$last_slash);

            // Get the filename from the path
            $class = substr($class, $last_slash);
        } else {
            $subdir = '';
        }

        $class = ucfirst($class);

        // Is this a stock library? There are a few special conditions if so ...
        if (file_exists(BASEPATH.'libraries/'.$subdir.$class.'.php')) {
            return $this->_ci_load_stock_library($class, $subdir, $params, $object_name);
        }

        // Let's search for the requested library file and load it.
        foreach ($this->_ci_library_paths as $path) {
            // BASEPATH has already been checked for
            if ($path === BASEPATH) {
                continue;
            }

            $filepath = $path.'libraries/'.$subdir.$class.'.php';

            // Safety: Was the class already loaded by a previous call?
            if (class_exists($class, false)) {
                // Before we deem this to be a duplicate request, let's see
                // if a custom object name is being supplied. If so, we'll
                // return a new instance of the object
                if ($object_name !== null) {
                    $CI =& get_instance();
                    if (! isset($CI->$object_name)) {
                        return $this->_ci_init_library($class, '', $params, $object_name);
                    }
                }

                log_message('debug', $class.' class already loaded. Second attempt ignored.');
                return;
            }
            // Does the file exist? No? Bummer...
            elseif (! file_exists($filepath)) {
                continue;
            }

            include_once($filepath);
            return $this->_ci_init_library($class, '', $params, $object_name);
        }

        // One last attempt. Maybe the library is in a subdirectory, but it wasn't specified?
        if ($subdir === '') {
            return $this->_ci_load_library($class.'/'.$class, $params, $object_name);
        }

        // If we got this far we were unable to find the requested class.
        log_message('error', 'Unable to load the requested class: '.$class);
        show_error('Unable to load the requested class: '.$class);
    }

    // --------------------------------------------------------------------

    /**
     * Internal CI Stock Library Loader
     *
     * @used-by	CI_Loader::_ci_load_library()
     * @uses	CI_Loader::_ci_init_library()
     *
     * @param	string	$library	Library name to load
     * @param	string	$file_path	Path to the library filename, relative to libraries/
     * @param	mixed	$params		Optional parameters to pass to the class constructor
     * @param	string	$object_name	Optional object name to assign to
     * @return	void
     */
    protected function _ci_load_stock_library($library_name, $file_path, $params, $object_name)
    {
        $prefix = 'CI_';

        if (class_exists($prefix.$library_name, false)) {
            if (class_exists(config_item('subclass_prefix').$library_name, false)) {
                $prefix = config_item('subclass_prefix');
            }

            // Before we deem this to be a duplicate request, let's see
            // if a custom object name is being supplied. If so, we'll
            // return a new instance of the object
            if ($object_name !== null) {
                $CI =& get_instance();
                if (! isset($CI->$object_name)) {
                    return $this->_ci_init_library($library_name, $prefix, $params, $object_name);
                }
            }

            log_message('debug', $library_name.' class already loaded. Second attempt ignored.');
            return;
        }

        $paths = $this->_ci_library_paths;
        array_pop($paths); // BASEPATH
        array_pop($paths); // APPPATH (needs to be the first path checked)
        array_unshift($paths, APPPATH);

        foreach ($paths as $path) {
            if (file_exists($path = $path.'libraries/'.$file_path.$library_name.'.php')) {
                // Override
                include_once($path);
                if (class_exists($prefix.$library_name, false)) {
                    return $this->_ci_init_library($library_name, $prefix, $params, $object_name);
                } else {
                    log_message('debug', $path.' exists, but does not declare '.$prefix.$library_name);
                }
            }
        }

        include_once(BASEPATH.'libraries/'.$file_path.$library_name.'.php');

        // Check for extensions
        $subclass = config_item('subclass_prefix').$library_name;
        foreach ($paths as $path) {
            if (file_exists($path = $path.'libraries/'.$file_path.$subclass.'.php')) {
                include_once($path);
                if (class_exists($subclass, false)) {
                    $prefix = config_item('subclass_prefix');
                    break;
                } else {
                    log_message('debug', $path.' exists, but does not declare '.$subclass);
                }
            }
        }

        return $this->_ci_init_library($library_name, $prefix, $params, $object_name);
    }

    // --------------------------------------------------------------------

    /**
     * Internal CI Library Instantiator
     *
     * @used-by	CI_Loader::_ci_load_stock_library()
     * @used-by	CI_Loader::_ci_load_library()
     *
     * @param	string		$class		Class name
     * @param	string		$prefix		Class name prefix
     * @param	array|null|bool	$config		Optional configuration to pass to the class constructor:
     *						FALSE to skip;
     *						NULL to search in config paths;
     *						array containing configuration data
     * @param	string		$object_name	Optional object name to assign to
     * @return	void
     */
    protected function _ci_init_library($class, $prefix, $config = false, $object_name = null)
    {
        // Is there an associated config file for this class? Note: these should always be lowercase
        if ($config === null) {
            // Fetch the config paths containing any package paths
            $config_component = $this->_ci_get_component('config');

            if (is_array($config_component->_config_paths)) {
                $found = false;
                foreach ($config_component->_config_paths as $path) {
                    // We test for both uppercase and lowercase, for servers that
                    // are case-sensitive with regard to file names. Load global first,
                    // override with environment next
                    if (file_exists($path.'config/'.strtolower($class).'.php')) {
                        include($path.'config/'.strtolower($class).'.php');
                        $found = true;
                    } elseif (file_exists($path.'config/'.ucfirst(strtolower($class)).'.php')) {
                        include($path.'config/'.ucfirst(strtolower($class)).'.php');
                        $found = true;
                    }

                    if (file_exists($path.'config/'.ENVIRONMENT.'/'.strtolower($class).'.php')) {
                        include($path.'config/'.ENVIRONMENT.'/'.strtolower($class).'.php');
                        $found = true;
                    } elseif (file_exists($path.'config/'.ENVIRONMENT.'/'.ucfirst(strtolower($class)).'.php')) {
                        include($path.'config/'.ENVIRONMENT.'/'.ucfirst(strtolower($class)).'.php');
                        $found = true;
                    }

                    // Break on the first found configuration, thus package
                    // files are not overridden by default paths
                    if ($found === true) {
                        break;
                    }
                }
            }
        }

        $class_name = $prefix.$class;

        // Is the class name valid?
        if (! class_exists($class_name, false)) {
            log_message('error', 'Non-existent class: '.$class_name);
            show_error('Non-existent class: '.$class_name);
        }

        // Set the variable name we will assign the class to
        // Was a custom class name supplied? If so we'll use it
        if (empty($object_name)) {
            $object_name = strtolower($class);
            if (isset($this->_ci_varmap[$object_name])) {
                $object_name = $this->_ci_varmap[$object_name];
            }
        }

        // Don't overwrite existing properties
        $CI =& get_instance();
        if (isset($CI->$object_name)) {
            if ($CI->$object_name instanceof $class_name) {
                log_message('debug', $class_name." has already been instantiated as '".$object_name."'. Second attempt aborted.");
                return;
            }

            show_error("Resource '".$object_name."' already exists and is not a ".$class_name." instance.");
        }

        // Save the class name and object name
        $this->_ci_classes[$object_name] = $class;

        // Instantiate the class
        $CI->$object_name = isset($config)
            ? new $class_name($config)
            : new $class_name();
    }

    // --------------------------------------------------------------------

    /**
     * CI Autoloader
     *
     * Loads component listed in the config/autoload.php file.
     *
     * @used-by	CI_Loader::initialize()
     * @return	void
     */
    protected function _ci_autoloader()
    {
        if (file_exists(APPPATH.'config/autoload.php')) {
            include(APPPATH.'config/autoload.php');
        }

        if (file_exists(APPPATH.'config/'.ENVIRONMENT.'/autoload.php')) {
            include(APPPATH.'config/'.ENVIRONMENT.'/autoload.php');
        }

        if (! isset($autoload)) {
            return;
        }

        // Autoload packages
        if (isset($autoload['packages'])) {
            foreach ($autoload['packages'] as $package_path) {
                $this->add_package_path($package_path);
            }
        }

        // Load any custom config file
        if (count($autoload['config']) > 0) {
            foreach ($autoload['config'] as $val) {
                $this->config($val);
            }
        }

        // Autoload helpers and languages
        foreach (array('helper', 'language') as $type) {
            if (isset($autoload[$type]) && count($autoload[$type]) > 0) {
                $this->$type($autoload[$type]);
            }
        }

        // Autoload drivers
        if (isset($autoload['drivers'])) {
            $this->driver($autoload['drivers']);
        }

        // Load libraries
        if (isset($autoload['libraries']) && count($autoload['libraries']) > 0) {
            // Load the database driver.
            if (in_array('database', $autoload['libraries'])) {
                $this->database();
                $autoload['libraries'] = array_diff($autoload['libraries'], array('database'));
            }

            // Load all other libraries
            $this->library($autoload['libraries']);
        }

        // Autoload models
        if (isset($autoload['model'])) {
            $this->model($autoload['model']);
        }
    }

    // --------------------------------------------------------------------

    /**
     * CI Object to Array translator
     *
     * Takes an object as input and converts the class variables to
     * an associative array with key/value pairs.
     *
     * @param	object	$object	Object data to translate
     * @return	array
     */
    protected function _ci_object_to_array($object)
    {
        return is_object($object) ? get_object_vars($object) : $object;
    }

    // --------------------------------------------------------------------

    /**
     * CI Component getter
     *
     * Get a reference to a specific library or model.
     *
     * @param 	string	$component	Component name
     * @return	bool
     */
    protected function &_ci_get_component($component)
    {
        $CI =& get_instance();
        return $CI->$component;
    }

    // --------------------------------------------------------------------

    /**
     * Prep filename
     *
     * This function prepares filenames of various items to
     * make their loading more reliable.
     *
     * @param	string|string[]	$filename	Filename(s)
     * @param 	string		$extension	Filename extension
     * @return	array
     */
    protected function _ci_prep_filename($filename, $extension)
    {
        if (! is_array($filename)) {
            return array(strtolower(str_replace(array($extension, '.php'), '', $filename).$extension));
        } else {
            foreach ($filename as $key => $val) {
                $filename[$key] = strtolower(str_replace(array($extension, '.php'), '', $val).$extension);
            }

            return $filename;
        }
    }
}
