mirror of
https://github.com/php/php-src.git
synced 2024-10-05 00:36:17 +00:00
169 lines
6.4 KiB
PHP
169 lines
6.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> |
|
|
// | Tomas V.V.Cox <cox@idecnet.com> |
|
|
// | |
|
|
// +----------------------------------------------------------------------+
|
|
//
|
|
// $Id$
|
|
|
|
require_once "PEAR/Command/Common.php";
|
|
require_once "PEAR/Config.php";
|
|
|
|
/**
|
|
* PEAR commands for managing configuration data.
|
|
*
|
|
*/
|
|
class PEAR_Command_Config extends PEAR_Command_Common
|
|
{
|
|
var $commands = array(
|
|
'config-show' => array(
|
|
'summary' => 'Show All Settings',
|
|
'options' => array(),
|
|
'doc' => 'Displays all configuration values. An optional argument
|
|
may be used to tell which configuration layer to display. Valid
|
|
configuration layers are "user", "system" and "default".
|
|
',
|
|
),
|
|
'config-get' => array(
|
|
'summary' => 'Show One Setting',
|
|
'options' => array(),
|
|
'doc' => 'Displays the value of one configuration parameter. The
|
|
first argument is the name of the parameter, an optional second argument
|
|
may be used to tell which configuration layer to look in. Valid configuration
|
|
layers are "user", "system" and "default". If no layer is specified, a value
|
|
will be picked from the first layer that defines the parameter, in the order
|
|
just specified.
|
|
',
|
|
),
|
|
'config-set' => array(
|
|
'summary' => 'Change Setting',
|
|
'options' => array(),
|
|
'doc' => 'Sets the value of one configuration parameter. The first
|
|
argument is the name of the parameter, the second argument is the new value.
|
|
Some parameters are be subject to validation, and the command will fail with
|
|
an error message if the new value does not make sense. An optional third
|
|
argument may be used to specify which layer to set the configuration parameter
|
|
in. The default layer is "user".
|
|
',
|
|
),
|
|
);
|
|
|
|
/**
|
|
* PEAR_Command_Config constructor.
|
|
*
|
|
* @access public
|
|
*/
|
|
function PEAR_Command_Config(&$ui, &$config)
|
|
{
|
|
parent::PEAR_Command_Common($ui, $config);
|
|
}
|
|
|
|
function run($command, $options, $params)
|
|
{
|
|
$cf = &$this->config;
|
|
$failmsg = '';
|
|
switch ($command) {
|
|
case 'config-show': {
|
|
// $params[0] -> the layer
|
|
if ($error = $this->_checkLayer(@$params[0])) {
|
|
$failmsg .= $error;
|
|
break;
|
|
}
|
|
$keys = $cf->getKeys();
|
|
sort($keys);
|
|
$this->ui->startTable(array('caption' => 'Configuration:'));
|
|
foreach ($keys as $key) {
|
|
$type = $cf->getType($key);
|
|
$value = $cf->get($key, @$params[0]);
|
|
if ($type == 'password' && $value) {
|
|
$value = '********';
|
|
}
|
|
if (empty($value)) {
|
|
$value = '<not set>';
|
|
}
|
|
$this->ui->tableRow(array($key, $value));
|
|
}
|
|
$this->ui->endTable();
|
|
break;
|
|
}
|
|
case 'config-get': {
|
|
// $params[0] -> the parameter
|
|
// $params[1] -> the layer
|
|
if ($error = $this->_checkLayer(@$params[1])) {
|
|
$failmsg .= $error;
|
|
break;
|
|
}
|
|
if (sizeof($params) < 1 || sizeof($params) > 2) {
|
|
$failmsg .= "config-get expects 1 or 2 parameters. Try \"help config-get\" for help";
|
|
} elseif (sizeof($params) == 1) {
|
|
$this->ui->displayLine("$params[0] = " . $cf->get($params[0]));
|
|
} else {
|
|
$this->ui->displayLine("($params[1])$params[0] = " .
|
|
$cf->get($params[0], $params[1]));
|
|
}
|
|
break;
|
|
}
|
|
case 'config-set': {
|
|
// $param[0] -> a parameter to set
|
|
// $param[1] -> the value for the parameter
|
|
// $param[2] -> the layer
|
|
if (sizeof($params) < 2 || sizeof($params) > 3) {
|
|
$failmsg .= "config-set expects 2 or 3 parameters. Try \"help config-set\" for help";
|
|
break;
|
|
}
|
|
if ($error = $this->_checkLayer(@$params[2])) {
|
|
$failmsg .= $error;
|
|
break;
|
|
}
|
|
if (!call_user_func_array(array(&$cf, 'set'), $params))
|
|
{
|
|
$failmsg = "config-set (" . implode(", ", $params) . ") failed";
|
|
} else {
|
|
$cf->store();
|
|
}
|
|
break;
|
|
}
|
|
default: {
|
|
return false;
|
|
}
|
|
}
|
|
if ($failmsg) {
|
|
return $this->raiseError($failmsg);
|
|
}
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Checks if a layer is defined or not
|
|
*
|
|
* @param string $layer The layer to search for
|
|
* @return mixed False on no error or the error message
|
|
*/
|
|
function _checkLayer($layer = null)
|
|
{
|
|
if (!empty($layer)) {
|
|
$layers = $this->config->getLayers();
|
|
if (!in_array($layer, $layers)) {
|
|
return " only the layers: \"" . implode('" or "', $layers) . "\" are supported";
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
}
|
|
|
|
?>
|