208 lines
6.8 KiB
PHP
208 lines
6.8 KiB
PHP
<?php
|
||
// /* vim: set expandtab tabstop=4 shiftwidth=4: */
|
||
// +----------------------------------------------------------------------+
|
||
// | PHP Version 5 |
|
||
// +----------------------------------------------------------------------+
|
||
// | Copyright (c) 1997-2004 The PHP Group |
|
||
// +----------------------------------------------------------------------+
|
||
// | This source file is subject to version 3.0 of the PHP license, |
|
||
// | that is bundled with this package in the file LICENSE, and is |
|
||
// | available through the world-wide-web at the following url: |
|
||
// | http://www.php.net/license/3_0.txt. |
|
||
// | If you did not receive a copy of the PHP license and are unable to |
|
||
// | obtain it through the world-wide-web, please send a note to |
|
||
// | license@php.net so we can mail you a copy immediately. |
|
||
// +----------------------------------------------------------------------+
|
||
// | Author: Stig Bakken <ssb@php.net> |
|
||
// | |
|
||
// +----------------------------------------------------------------------+
|
||
//
|
||
// $Id: Autoloader.php,v 1.11 2004/02/27 02:21:29 cellog Exp $
|
||
|
||
if (!extension_loaded("overload")) {
|
||
// die hard without ext/overload
|
||
die("Rebuild PHP with the `overload' extension to use PEAR_Autoloader");
|
||
}
|
||
|
||
require_once "PEAR.php";
|
||
|
||
/**
|
||
* This class is for objects where you want to separate the code for
|
||
* some methods into separate classes. This is useful if you have a
|
||
* class with not-frequently-used methods that contain lots of code
|
||
* that you would like to avoid always parsing.
|
||
*
|
||
* The PEAR_Autoloader class provides autoloading and aggregation.
|
||
* The autoloading lets you set up in which classes the separated
|
||
* methods are found. Aggregation is the technique used to import new
|
||
* methods, an instance of each class providing separated methods is
|
||
* stored and called every time the aggregated method is called.
|
||
*
|
||
* @author Stig S<>ther Bakken <ssb@php.net>
|
||
*/
|
||
class PEAR_Autoloader extends PEAR
|
||
{
|
||
// {{{ properties
|
||
|
||
/**
|
||
* Map of methods and classes where they are defined
|
||
*
|
||
* @var array
|
||
*
|
||
* @access private
|
||
*/
|
||
var $_autoload_map = array();
|
||
|
||
/**
|
||
* Map of methods and aggregate objects
|
||
*
|
||
* @var array
|
||
*
|
||
* @access private
|
||
*/
|
||
var $_method_map = array();
|
||
|
||
// }}}
|
||
// {{{ addAutoload()
|
||
|
||
/**
|
||
* Add one or more autoload entries.
|
||
*
|
||
* @param string $method which method to autoload
|
||
*
|
||
* @param string $classname (optional) which class to find the method in.
|
||
* If the $method parameter is an array, this
|
||
* parameter may be omitted (and will be ignored
|
||
* if not), and the $method parameter will be
|
||
* treated as an associative array with method
|
||
* names as keys and class names as values.
|
||
*
|
||
* @return void
|
||
*
|
||
* @access public
|
||
*/
|
||
function addAutoload($method, $classname = null)
|
||
{
|
||
if (is_array($method)) {
|
||
array_walk($method, create_function('$a,&$b', '$b = strtolower($b);'));
|
||
$this->_autoload_map = array_merge($this->_autoload_map, $method);
|
||
} else {
|
||
$this->_autoload_map[strtolower($method)] = $classname;
|
||
}
|
||
}
|
||
|
||
// }}}
|
||
// {{{ removeAutoload()
|
||
|
||
/**
|
||
* Remove an autoload entry.
|
||
*
|
||
* @param string $method which method to remove the autoload entry for
|
||
*
|
||
* @return bool TRUE if an entry was removed, FALSE if not
|
||
*
|
||
* @access public
|
||
*/
|
||
function removeAutoload($method)
|
||
{
|
||
$method = strtolower($method);
|
||
$ok = isset($this->_autoload_map[$method]);
|
||
unset($this->_autoload_map[$method]);
|
||
return $ok;
|
||
}
|
||
|
||
// }}}
|
||
// {{{ addAggregateObject()
|
||
|
||
/**
|
||
* Add an aggregate object to this object. If the specified class
|
||
* is not defined, loading it will be attempted following PEAR's
|
||
* file naming scheme. All the methods in the class will be
|
||
* aggregated, except private ones (name starting with an
|
||
* underscore) and constructors.
|
||
*
|
||
* @param string $classname what class to instantiate for the object.
|
||
*
|
||
* @return void
|
||
*
|
||
* @access public
|
||
*/
|
||
function addAggregateObject($classname)
|
||
{
|
||
$classname = strtolower($classname);
|
||
if (!class_exists($classname)) {
|
||
$include_file = preg_replace('/[^a-z0-9]/i', '_', $classname);
|
||
include_once $include_file;
|
||
}
|
||
$obj =& new $classname;
|
||
$methods = get_class_methods($classname);
|
||
foreach ($methods as $method) {
|
||
// don't import priviate methods and constructors
|
||
if ($method{0} != '_' && $method != $classname) {
|
||
$this->_method_map[$method] = $obj;
|
||
}
|
||
}
|
||
}
|
||
|
||
// }}}
|
||
// {{{ removeAggregateObject()
|
||
|
||
/**
|
||
* Remove an aggregate object.
|
||
*
|
||
* @param string $classname the class of the object to remove
|
||
*
|
||
* @return bool TRUE if an object was removed, FALSE if not
|
||
*
|
||
* @access public
|
||
*/
|
||
function removeAggregateObject($classname)
|
||
{
|
||
$ok = false;
|
||
$classname = strtolower($classname);
|
||
reset($this->_method_map);
|
||
while (list($method, $obj) = each($this->_method_map)) {
|
||
if (is_a($obj, $classname)) {
|
||
unset($this->_method_map[$method]);
|
||
$ok = true;
|
||
}
|
||
}
|
||
return $ok;
|
||
}
|
||
|
||
// }}}
|
||
// {{{ __call()
|
||
|
||
/**
|
||
* Overloaded object call handler, called each time an
|
||
* undefined/aggregated method is invoked. This method repeats
|
||
* the call in the right aggregate object and passes on the return
|
||
* value.
|
||
*
|
||
* @param string $method which method that was called
|
||
*
|
||
* @param string $args An array of the parameters passed in the
|
||
* original call
|
||
*
|
||
* @return mixed The return value from the aggregated method, or a PEAR
|
||
* error if the called method was unknown.
|
||
*/
|
||
function __call($method, $args, &$retval)
|
||
{
|
||
$method = strtolower($method);
|
||
if (empty($this->_method_map[$method]) && isset($this->_autoload_map[$method])) {
|
||
$this->addAggregateObject($this->_autoload_map[$method]);
|
||
}
|
||
if (isset($this->_method_map[$method])) {
|
||
$retval = call_user_func_array(array($this->_method_map[$method], $method), $args);
|
||
return true;
|
||
}
|
||
return false;
|
||
}
|
||
|
||
// }}}
|
||
}
|
||
|
||
overload("PEAR_Autoloader");
|
||
|
||
?>
|