186 lines
5.9 KiB
PHP
186 lines
5.9 KiB
PHP
|
<?php
|
||
|
/**
|
||
|
* PEAR_Frontend, the singleton-based frontend for user input/output
|
||
|
*
|
||
|
* PHP versions 4 and 5
|
||
|
*
|
||
|
* LICENSE: This source file is subject to version 3.0 of the PHP license
|
||
|
* that is available through the world-wide-web at the following URI:
|
||
|
* 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 web, please
|
||
|
* send a note to license@php.net so we can mail you a copy immediately.
|
||
|
*
|
||
|
* @category pear
|
||
|
* @package PEAR
|
||
|
* @author Greg Beaver <cellog@php.net>
|
||
|
* @copyright 1997-2006 The PHP Group
|
||
|
* @license http://www.php.net/license/3_0.txt PHP License 3.0
|
||
|
* @version CVS: $Id: Frontend.php,v 1.9 2006/03/03 13:13:07 pajoye Exp $
|
||
|
* @link http://pear.php.net/package/PEAR
|
||
|
* @since File available since Release 1.4.0a1
|
||
|
*/
|
||
|
|
||
|
/**
|
||
|
* Which user interface class is being used.
|
||
|
* @var string class name
|
||
|
*/
|
||
|
$GLOBALS['_PEAR_FRONTEND_CLASS'] = 'PEAR_Frontend_CLI';
|
||
|
|
||
|
/**
|
||
|
* Instance of $_PEAR_Command_uiclass.
|
||
|
* @var object
|
||
|
*/
|
||
|
$GLOBALS['_PEAR_FRONTEND_SINGLETON'] = null;
|
||
|
|
||
|
/**
|
||
|
* Singleton-based frontend for PEAR user input/output
|
||
|
*
|
||
|
* Note that frontend classes must implement userConfirm(), and shoul implement
|
||
|
* displayFatalError() and outputData()
|
||
|
* @category pear
|
||
|
* @package PEAR
|
||
|
* @author Greg Beaver <cellog@php.net>
|
||
|
* @copyright 1997-2006 The PHP Group
|
||
|
* @license http://www.php.net/license/3_0.txt PHP License 3.0
|
||
|
* @version Release: 1.4.11
|
||
|
* @link http://pear.php.net/package/PEAR
|
||
|
* @since Class available since Release 1.4.0a1
|
||
|
*/
|
||
|
class PEAR_Frontend extends PEAR
|
||
|
{
|
||
|
/**
|
||
|
* Retrieve the frontend object
|
||
|
* @return PEAR_Frontend_CLI|PEAR_Frontend_Web|PEAR_Frontend_Gtk
|
||
|
* @static
|
||
|
*/
|
||
|
function &singleton($type = null)
|
||
|
{
|
||
|
if ($type === null) {
|
||
|
if (!isset($GLOBALS['_PEAR_FRONTEND_SINGLETON'])) {
|
||
|
$a = false;
|
||
|
return $a;
|
||
|
}
|
||
|
return $GLOBALS['_PEAR_FRONTEND_SINGLETON'];
|
||
|
} else {
|
||
|
$a = PEAR_Frontend::setFrontendClass($type);
|
||
|
return $a;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Set the frontend class that will be used by calls to {@link singleton()}
|
||
|
*
|
||
|
* Frontends are expected to conform to the PEAR naming standard of
|
||
|
* _ => DIRECTORY_SEPARATOR (PEAR_Frontend_CLI is in PEAR/Frontend/CLI.php)
|
||
|
* @param string $uiclass full class name
|
||
|
* @return PEAR_Frontend
|
||
|
* @static
|
||
|
*/
|
||
|
function &setFrontendClass($uiclass)
|
||
|
{
|
||
|
if (is_object($GLOBALS['_PEAR_FRONTEND_SINGLETON']) &&
|
||
|
is_a($GLOBALS['_PEAR_FRONTEND_SINGLETON'], $uiclass)) {
|
||
|
return $GLOBALS['_PEAR_FRONTEND_SINGLETON'];
|
||
|
}
|
||
|
if (!class_exists($uiclass)) {
|
||
|
$file = str_replace('_', '/', $uiclass) . '.php';
|
||
|
if (PEAR_Frontend::isIncludeable($file)) {
|
||
|
include_once $file;
|
||
|
}
|
||
|
}
|
||
|
if (class_exists($uiclass)) {
|
||
|
$obj = &new $uiclass;
|
||
|
// quick test to see if this class implements a few of the most
|
||
|
// important frontend methods
|
||
|
if (method_exists($obj, 'userConfirm')) {
|
||
|
$GLOBALS['_PEAR_FRONTEND_SINGLETON'] = &$obj;
|
||
|
$GLOBALS['_PEAR_FRONTEND_CLASS'] = $uiclass;
|
||
|
return $obj;
|
||
|
} else {
|
||
|
$err = PEAR::raiseError("not a frontend class: $uiclass");
|
||
|
return $err;
|
||
|
}
|
||
|
}
|
||
|
$err = PEAR::raiseError("no such class: $uiclass");
|
||
|
return $err;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Set the frontend class that will be used by calls to {@link singleton()}
|
||
|
*
|
||
|
* Frontends are expected to be a descendant of PEAR_Frontend
|
||
|
* @param PEAR_Frontend
|
||
|
* @return PEAR_Frontend
|
||
|
* @static
|
||
|
*/
|
||
|
function &setFrontendObject($uiobject)
|
||
|
{
|
||
|
if (is_object($GLOBALS['_PEAR_FRONTEND_SINGLETON']) &&
|
||
|
is_a($GLOBALS['_PEAR_FRONTEND_SINGLETON'], get_class($uiobject))) {
|
||
|
return $GLOBALS['_PEAR_FRONTEND_SINGLETON'];
|
||
|
}
|
||
|
if (!is_a($uiobject, 'PEAR_Frontend')) {
|
||
|
$err = PEAR::raiseError('not a valid frontend class: (' .
|
||
|
get_class($uiobject) . ')');
|
||
|
return $err;
|
||
|
}
|
||
|
// quick test to see if this class implements a few of the most
|
||
|
// important frontend methods
|
||
|
if (method_exists($uiobject, 'userConfirm')) {
|
||
|
$GLOBALS['_PEAR_FRONTEND_SINGLETON'] = &$uiobject;
|
||
|
$GLOBALS['_PEAR_FRONTEND_CLASS'] = get_class($uiobject);
|
||
|
return $uiobject;
|
||
|
} else {
|
||
|
$err = PEAR::raiseError("not a value frontend class: (" . get_class($uiobject)
|
||
|
. ')');
|
||
|
return $err;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* @param string $path relative or absolute include path
|
||
|
* @return boolean
|
||
|
* @static
|
||
|
*/
|
||
|
function isIncludeable($path)
|
||
|
{
|
||
|
if (file_exists($path) && is_readable($path)) {
|
||
|
return true;
|
||
|
}
|
||
|
$ipath = explode(PATH_SEPARATOR, ini_get('include_path'));
|
||
|
foreach ($ipath as $include) {
|
||
|
$test = realpath($include . DIRECTORY_SEPARATOR . $path);
|
||
|
if (!$test) { // support wrappers like phar (realpath just don't work with them)
|
||
|
$test = $include . DIRECTORY_SEPARATOR . $path;
|
||
|
}
|
||
|
if (file_exists($test) && is_readable($test)) {
|
||
|
return true;
|
||
|
}
|
||
|
}
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* @param PEAR_Config
|
||
|
*/
|
||
|
function setConfig(&$config)
|
||
|
{
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* This can be overridden to allow session-based temporary file management
|
||
|
*
|
||
|
* By default, all files are deleted at the end of a session. The web installer
|
||
|
* needs to be able to sustain a list over many sessions in order to support
|
||
|
* user interaction with install scripts
|
||
|
*/
|
||
|
function addTempFile($file)
|
||
|
{
|
||
|
$GLOBALS['_PEAR_Common_tempfiles'][] = $file;
|
||
|
}
|
||
|
|
||
|
function log($msg, $append_crlf = true)
|
||
|
{
|
||
|
}
|
||
|
}
|
||
|
?>
|