Source for file PEAR.php
Documentation is available at PEAR.php
* PEAR, the PHP Extension and Application Repository
* PEAR class and PEAR_Error class
* @author Sterling Hughes <sterling@php.net>
* @author Stig Bakken <ssb@php.net>
* @author Tomas V.V.Cox <cox@idecnet.com>
* @author Greg Beaver <cellog@php.net>
* @copyright 1997-2009 The Authors
* @license http://opensource.org/licenses/bsd-license.php New BSD License
* @version CVS: $Id: PEAR.php 286670 2009-08-02 14:16:06Z dufuz $
* @link http://pear.php.net/package/PEAR
* @since File available since Release 0.1
define('PEAR_ERROR_RETURN', 1);
define('PEAR_ERROR_PRINT', 2);
define('PEAR_ERROR_TRIGGER', 4);
define('PEAR_ERROR_CALLBACK', 16);
define('PEAR_ERROR_EXCEPTION', 32);
define('PEAR_ZE2', (function_exists('version_compare') &&
version_compare(zend_version(), "2-dev", "ge")));
if (substr(PHP_OS, 0, 3) ==
'WIN') {
define('PEAR_OS', 'Unix'); // blatant assumption
$GLOBALS['_PEAR_default_error_options'] =
E_USER_NOTICE;
$GLOBALS['_PEAR_destructor_object_list'] =
array();
$GLOBALS['_PEAR_shutdown_funcs'] =
array();
$GLOBALS['_PEAR_error_handler_stack'] =
array();
* Base class for other PEAR classes. Provides rudimentary
* emulation of destructors.
* If you want a destructor in your class, inherit PEAR and make a
* destructor method called _yourclassname (same name as the
* constructor, but with a "_" prefix). Also, in your constructor you
* have to call the PEAR constructor: $this->PEAR();.
* The destructor method will be called without parameters. Note that
* at in some SAPI implementations (such as Apache), any output during
* the request shutdown (in which destructors are called) seems to be
* discarded. If you need to get any debug information from your
* destructor, use error_log(), syslog() or something similar.
* IMPORTANT! To use the emulated destructors you need to create the
* objects by reference: $obj =& new PEAR_child;
* @author Stig Bakken <ssb@php.net>
* @author Tomas V.V. Cox <cox@idecnet.com>
* @author Greg Beaver <cellog@php.net>
* @copyright 1997-2006 The PHP Group
* @license http://opensource.org/licenses/bsd-license.php New BSD License
* @version Release: 1.9.0
* @link http://pear.php.net/package/PEAR
* @since Class available since PHP 4.0.2
* @link http://pear.php.net/manual/en/core.pear.php#core.pear.pear
* Whether to enable internal debug messages.
* Default error mode for this object.
var $_default_error_mode =
null;
* Default error options used for this object when error mode
var $_default_error_options =
null;
* Default error handler (callback) for this object, if error mode is
var $_default_error_handler =
'';
* Which class to use for error objects.
var $_error_class =
'PEAR_Error';
* An array of expected errors.
var $_expected_errors =
array();
* Constructor. Registers this object in
* $_PEAR_destructor_object_list for destructor emulation if a
* destructor object exists.
* @param string $error_class (optional) which class to use for
* error objects, defaults to PEAR_Error.
function PEAR($error_class =
null)
print
"PEAR constructor called, class=$classname\n";
if ($error_class !==
null) {
$this->_error_class =
$error_class;
while ($classname &&
strcasecmp($classname, "pear")) {
$destructor =
"_$classname";
global $_PEAR_destructor_object_list;
$_PEAR_destructor_object_list[] =
&$this;
if (!isset
($GLOBALS['_PEAR_SHUTDOWN_REGISTERED'])) {
$GLOBALS['_PEAR_SHUTDOWN_REGISTERED'] =
true;
* Destructor (the emulated type of...). Does nothing right now,
* but is included for forward compatibility, so subclass
* destructors should always call it.
* See the note in the class desciption about output from
// {{{ getStaticProperty()
* If you have a class that's mostly/entirely static, and you need static
* properties, you can use this method to simulate them. Eg. in your method(s)
* do this: $myVar = &PEAR::getStaticProperty('myclass', 'myVar');
* You MUST use a reference, or they will not persist!
* @param string $class The calling classname, to prevent clashes
* @param string $var The variable to retrieve.
* @return mixed A reference to the variable. If not set it will be
* auto initialised to NULL.
if (!isset
($properties[$class])) {
$properties[$class] =
array();
$properties[$class][$var] =
null;
return $properties[$class][$var];
// {{{ registerShutdownFunc()
* Use this function to register a shutdown method for static
* @param mixed $func The function name (or array of class/method) to call
* @param mixed $args The arguments to pass to the function
// if we are called statically, there is a potential
// that no shutdown func is registered. Bug #6445
if (!isset
($GLOBALS['_PEAR_SHUTDOWN_REGISTERED'])) {
$GLOBALS['_PEAR_SHUTDOWN_REGISTERED'] =
true;
$GLOBALS['_PEAR_shutdown_funcs'][] =
array($func, $args);
* Tell whether a value is a PEAR error.
* @param mixed $data the value to test
* @param int $code if $data is an error object, return true
* only if $code is a string and
* $obj->getMessage() == $code or
* $code is an integer and $obj->getCode() == $code
* @return bool true if parameter is an error
function isError($data, $code =
null)
if (!is_a($data, 'PEAR_Error')) {
return $data->getMessage() ==
$code;
return $data->getCode() ==
$code;
// {{{ setErrorHandling()
* Sets how errors generated by this object should be handled.
* Can be invoked both in objects and statically. If called
* statically, setErrorHandling sets the default behaviour for all
* PEAR objects. If called in an object, setErrorHandling sets
* the default behaviour for that object.
* One of PEAR_ERROR_RETURN, PEAR_ERROR_PRINT,
* PEAR_ERROR_TRIGGER, PEAR_ERROR_DIE,
* PEAR_ERROR_CALLBACK or PEAR_ERROR_EXCEPTION.
* When $mode is PEAR_ERROR_TRIGGER, this is the error level (one
* of E_USER_NOTICE, E_USER_WARNING or E_USER_ERROR).
* When $mode is PEAR_ERROR_CALLBACK, this parameter is expected
* to be the callback function or method. A callback
* function is a string with the name of the function, a
* callback method is an array of two elements: the element
* at index 0 is the object, and the element at index 1 is
* the name of the method to call in the object.
* When $mode is PEAR_ERROR_PRINT or PEAR_ERROR_DIE, this is
* a printf format string used when printing the error
* @see PEAR_ERROR_TRIGGER
* @see PEAR_ERROR_CALLBACK
* @see PEAR_ERROR_EXCEPTION
if (isset
($this) &&
is_a($this, 'PEAR')) {
$setmode =
&$this->_default_error_mode;
$setoptions =
&$this->_default_error_options;
$setmode =
&$GLOBALS['_PEAR_default_error_mode'];
$setoptions =
&$GLOBALS['_PEAR_default_error_options'];
// class/object method callback
* This method is used to tell which errors you expect to get.
* Expected errors are always returned with error mode
* PEAR_ERROR_RETURN. Expected error codes are stored in a stack,
* and this method pushes a new element onto it. The list of
* expected errors are in effect until they are popped off the
* stack with the popExpect() method.
* Note that this method can not be called statically
* @param mixed $code a single error code or an array of error codes to expect
* @return int the new depth of the "expected errors" stack
array_push($this->_expected_errors, array($code));
return sizeof($this->_expected_errors);
* This method pops one element off the expected error codes
* @return array the list of error codes that were popped
* This method checks unsets an error code if available
* @param mixed error code
* @return bool true if the error code was unset, false otherwise
function _checkDelExpect($error_code)
foreach ($this->_expected_errors AS $key =>
$error_array) {
if (in_array($error_code, $error_array)) {
unset
($this->_expected_errors[$key][array_search($error_code, $error_array)]);
if (0 ==
count($this->_expected_errors[$key])) {
unset
($this->_expected_errors[$key]);
* This method deletes all occurences of the specified element from
* the expected error codes stack.
* @param mixed $error_code error code that should be deleted
* @return mixed list of error codes that were deleted or error
// $error_code is a non-empty array here;
// we walk through it trying to unset all
foreach($error_code as $key =>
$error) {
if ($this->_checkDelExpect($error)) {
return $deleted ?
true :
PEAR::raiseError("The expected error you submitted does not exist"); // IMPROVE ME
} elseif (!empty($error_code)) {
// $error_code comes alone, trying to unset it
if ($this->_checkDelExpect($error_code)) {
return PEAR::raiseError("The expected error you submitted does not exist"); // IMPROVE ME
return PEAR::raiseError("The expected error you submitted is empty"); // IMPROVE ME
* This method is a wrapper that returns an instance of the
* configured error class with this object's default error
* handling applied. If the $mode and $options parameters are not
* specified, the object's defaults are used.
* @param mixed $message a text error message or a PEAR error object
* @param int $code a numeric error code (it is up to your class
* to define these if you want to use codes)
* @param int $mode One of PEAR_ERROR_RETURN, PEAR_ERROR_PRINT,
* PEAR_ERROR_TRIGGER, PEAR_ERROR_DIE,
* PEAR_ERROR_CALLBACK, PEAR_ERROR_EXCEPTION.
* @param mixed $options If $mode is PEAR_ERROR_TRIGGER, this parameter
* specifies the PHP-internal error level (one of
* E_USER_NOTICE, E_USER_WARNING or E_USER_ERROR).
* If $mode is PEAR_ERROR_CALLBACK, this
* parameter specifies the callback function or
* method. In other error modes this parameter
* @param string $userinfo If you need to pass along for example debug
* information, this parameter is meant for that.
* @param string $error_class The returned error object will be
* instantiated from this class, if specified.
* @param bool $skipmsg If true, raiseError will only pass error codes,
* the error message parameter will be dropped.
* @return object a PEAR error object
* @see PEAR::setErrorHandling
// The error is yet a PEAR error object
$code =
$message->getCode();
$userinfo =
$message->getUserInfo();
$error_class =
$message->getType();
$message->error_message_prefix =
'';
$message =
$message->getMessage();
if (isset
($this) && isset
($this->_expected_errors) &&
sizeof($this->_expected_errors) >
0 &&
sizeof($exp =
end($this->_expected_errors))) {
// No mode given, try global ones
if (isset
($this) && isset
($this->_default_error_mode)) {
$mode =
$this->_default_error_mode;
$options =
$this->_default_error_options;
} elseif (isset
($GLOBALS['_PEAR_default_error_mode'])) {
$mode =
$GLOBALS['_PEAR_default_error_mode'];
$options =
$GLOBALS['_PEAR_default_error_options'];
if ($error_class !==
null) {
} elseif (isset
($this) && isset
($this->_error_class)) {
$ec =
$this->_error_class;
if (intval(PHP_VERSION) <
5) {
// little non-eval hack to fix bug #12147
$a =
new $ec($code, $mode, $options, $userinfo);
$a =
new $ec($message, $code, $mode, $options, $userinfo);
* Simpler form of raiseError with fewer options. In most cases
* message, code and userinfo are enough.
if (isset
($this) &&
is_a($this, 'PEAR')) {
$a =
&$this->raiseError($message, $code, null, null, $userinfo);
$stack =
&$GLOBALS['_PEAR_error_handler_stack'];
$def_mode =
&$GLOBALS['_PEAR_default_error_mode'];
$def_options =
&$GLOBALS['_PEAR_default_error_options'];
$stack[] =
array($def_mode, $def_options);
// class/object method callback
$stack[] =
array($mode, $options);
$stack =
&$GLOBALS['_PEAR_error_handler_stack'];
$setmode =
&$GLOBALS['_PEAR_default_error_mode'];
$setoptions =
&$GLOBALS['_PEAR_default_error_options'];
list
($mode, $options) =
$stack[sizeof($stack) -
1];
// class/object method callback
// {{{ pushErrorHandling()
* Push a new error handler on top of the error handler options stack. With this
* you can easily override the actual error handler for some code and restore
* it later with popErrorHandling.
* @param mixed $mode (same as setErrorHandling)
* @param mixed $options (same as setErrorHandling)
* @return bool Always true
* @see PEAR::setErrorHandling
$stack =
&$GLOBALS['_PEAR_error_handler_stack'];
if (isset
($this) &&
is_a($this, 'PEAR')) {
$def_mode =
&$this->_default_error_mode;
$def_options =
&$this->_default_error_options;
$def_mode =
&$GLOBALS['_PEAR_default_error_mode'];
$def_options =
&$GLOBALS['_PEAR_default_error_options'];
$stack[] =
array($def_mode, $def_options);
if (isset
($this) &&
is_a($this, 'PEAR')) {
$stack[] =
array($mode, $options);
// {{{ popErrorHandling()
* Pop the last error handler used
* @return bool Always true
* @see PEAR::pushErrorHandling
$stack =
&$GLOBALS['_PEAR_error_handler_stack'];
list
($mode, $options) =
$stack[sizeof($stack) -
1];
if (isset
($this) &&
is_a($this, 'PEAR')) {
* OS independant PHP extension load. Remember to take care
* on the correct extension name for case sensitive OSes.
* @param string $ext The extension name
* @return bool Success or not on the dl() call
// if either returns true dl() will produce a FATAL error, stop that
} elseif (PHP_OS ==
'HP-UX') {
} elseif (PHP_OS ==
'AIX') {
} elseif (PHP_OS ==
'OSX') {
return @dl('php_'.
$ext.
$suffix) ||
@dl($ext.
$suffix);
include_once DB_PEAR_PATH.
'PEAR5.php';
// {{{ _PEAR_call_destructors()
global $_PEAR_destructor_object_list;
if (is_array($_PEAR_destructor_object_list) &&
sizeof($_PEAR_destructor_object_list))
reset($_PEAR_destructor_object_list);
if ($destructLifoExists) {
$_PEAR_destructor_object_list =
array_reverse($_PEAR_destructor_object_list);
while (list
($k, $objref) =
each($_PEAR_destructor_object_list)) {
$destructor =
"_$classname";
// Empty the object list to ensure that destructors are
// not called more than once.
$_PEAR_destructor_object_list =
array();
// Now call the shutdown functions
if (isset
($GLOBALS['_PEAR_shutdown_funcs']) AND is_array($GLOBALS['_PEAR_shutdown_funcs']) AND !empty($GLOBALS['_PEAR_shutdown_funcs'])) {
foreach ($GLOBALS['_PEAR_shutdown_funcs'] as $value) {
* Standard PEAR error class for PHP 4
* This class is supserseded by {@link PEAR_Exception} in PHP 5
* @author Stig Bakken <ssb@php.net>
* @author Tomas V.V. Cox <cox@idecnet.com>
* @author Gregory Beaver <cellog@php.net>
* @copyright 1997-2006 The PHP Group
* @license http://opensource.org/licenses/bsd-license.php New BSD License
* @version Release: 1.9.0
* @link http://pear.php.net/manual/en/core.pear.pear-error.php
* @see PEAR::raiseError(), PEAR::throwError()
* @since Class available since PHP 4.0.2
var $mode =
PEAR_ERROR_RETURN;
* @param string $message message
* @param int $code (optional) error code
* @param int $mode (optional) error mode, one of: PEAR_ERROR_RETURN,
* PEAR_ERROR_PRINT, PEAR_ERROR_DIE, PEAR_ERROR_TRIGGER,
* PEAR_ERROR_CALLBACK or PEAR_ERROR_EXCEPTION
* @param mixed $options (optional) error level, _OR_ in the case of
* PEAR_ERROR_CALLBACK, the callback function or object/method
* @param string $userinfo (optional) additional user/debug info
function PEAR_Error($message =
'unknown error', $code =
null,
$mode =
null, $options =
null, $userinfo =
null)
$this->level =
E_USER_NOTICE;
$this->callback =
$options;
$options =
E_USER_NOTICE;
if (substr($msg, -
1) !=
"\n") {
trigger_error("PEAR_ERROR_EXCEPTION is obsolete, use class PEAR_Exception for exceptions", E_USER_WARNING);
eval
('$e = new Exception($this->message, $this->code);throw($e);');
* Get the error mode from an error object.
* Get the callback function/method from an error object.
* @return mixed callback function or object/method array
* Get the error message from an error object.
* @return string full error message
* Get error code from an error object
* Get the name of this error/exception.
* @return string error/exception name (type)
* Get additional user-supplied information.
* @return string user-supplied information
* Get additional debug information supplied by the application.
* @return string debug information
* Get the call backtrace from where the error was generated.
* Supported with PHP 4.3.0 or newer.
* @param int $frame (optional) what frame to fetch
* @return array Backtrace, or NULL if not available.
if (defined('PEAR_IGNORE_BACKTRACE')) {
* Make a string representation of this object.
* @return string a string with an object summary
$levels =
array(E_USER_NOTICE =>
'notice',
E_USER_WARNING =>
'warning',
E_USER_ERROR =>
'error');
$this->callback[0]) .
'::' .
$callback =
$this->callback;
return sprintf('[%s: message="%s" code=%d mode=callback '.
'callback=%s prefix="%s" info="%s"]',
return sprintf('[%s: message="%s" code=%d mode=%s level=%s '.
'prefix="%s" info="%s"]',
Documentation generated on Wed, 09 Feb 2011 09:03:10 +0700 by phpDocumentor 1.4.2