mirror of
https://github.com/php/php-src.git
synced 2024-10-05 00:36:17 +00:00
a036fe5b72
- user interface abstraction, making a Gtk installer should only be a matter of implementing PEAR_CommandUI_Gtk plus a "pear-gtk" executable - separated code into command classes, able to specify one or more commands - no more "pear-get" :-) * fixed use of PEAR_Config::singleton to avoid object copying
115 lines
3.4 KiB
PHP
115 lines
3.4 KiB
PHP
<?php
|
|
//
|
|
// +----------------------------------------------------------------------+
|
|
// | PHP Version 4 |
|
|
// +----------------------------------------------------------------------+
|
|
// | Copyright (c) 1997-2002 The PHP Group |
|
|
// +----------------------------------------------------------------------+
|
|
// | This source file is subject to version 2.02 of the PHP license, |
|
|
// | that is bundled with this package in the file LICENSE, and is |
|
|
// | available at through the world-wide-web at |
|
|
// | http://www.php.net/license/2_02.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@fast.no> |
|
|
// +----------------------------------------------------------------------+
|
|
//
|
|
// $Id$
|
|
|
|
require_once "PEAR/Command/Common.php";
|
|
require_once "PEAR/Installer.php";
|
|
|
|
/**
|
|
* PEAR commands for installation or deinstallation/upgrading of
|
|
* packages.
|
|
*
|
|
*/
|
|
class PEAR_Command_Install extends PEAR_Command_Common
|
|
{
|
|
// {{{ properties
|
|
|
|
/** Stack of executing commands, to make run() re-entrant
|
|
* @var array
|
|
*/
|
|
var $command_stack; // XXX UNUSED to make run() re-entrant
|
|
|
|
/** Currently executing command.
|
|
* @var string
|
|
*/
|
|
var $command; // XXX UNUSED
|
|
|
|
// }}}
|
|
|
|
// {{{ constructor
|
|
|
|
/**
|
|
* PEAR_Command_Install constructor.
|
|
*
|
|
* @access public
|
|
*/
|
|
function PEAR_Command_Install($ui)
|
|
{
|
|
parent::PEAR_Command_Common($ui);
|
|
}
|
|
|
|
// }}}
|
|
|
|
// {{{ getCommands()
|
|
|
|
/**
|
|
* Return a list of all the commands defined by this class.
|
|
* @return array list of commands
|
|
* @access public
|
|
*/
|
|
function getCommands()
|
|
{
|
|
return array('install', 'uninstall', 'upgrade');
|
|
}
|
|
|
|
// }}}
|
|
// {{{ run()
|
|
|
|
function run($command, $options, $params)
|
|
{
|
|
$installer =& new PEAR_Installer($options['php_dir'],
|
|
$options['ext_dir'],
|
|
$options['doc_dir']);
|
|
$installer->debug = @$options['verbose'];
|
|
$failmsg = '';
|
|
switch ($command) {
|
|
case 'install':
|
|
case 'upgrade': {
|
|
if ($command == 'upgrade') {
|
|
$options['upgrade'] = true;
|
|
}
|
|
if ($installer->install($params[0], $options, $this->config)) {
|
|
$this->ui->displayLine("install ok");
|
|
} else {
|
|
$failmsg = "install failed";
|
|
}
|
|
break;
|
|
}
|
|
case 'uninstall': {
|
|
if ($installer->uninstall($params[0], $uninstall_options)) {
|
|
$this->ui->displayLine("uninstall ok");
|
|
} else {
|
|
$failmsg = "uninstall failed";
|
|
}
|
|
break;
|
|
}
|
|
default: {
|
|
return false;
|
|
}
|
|
}
|
|
if ($failmsg) {
|
|
return $this->raiseError($failmsg);
|
|
}
|
|
return true;
|
|
}
|
|
|
|
// }}}
|
|
}
|
|
|
|
?>
|