!C99Shell v. 1.0 pre-release build #13!

Software: Apache. PHP/5.5.15 

uname -a: Windows NT SVR-DMZ 6.1 build 7600 (Windows Server 2008 R2 Enterprise Edition) i586 

SYSTEM 

Safe-mode: OFF (not secure)

E:\nuevo\php\pear\PEAR\Command\   drwxrwxrwx
Free 1.16 GB of 239.26 GB (0.49%)
Detected drives: [ a ] [ c ] [ d ] [ e ] [ f ]
Home    Back    Forward    UPDIR    Refresh    Search    Buffer    Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    


Viewing file:     Config.php (15.11 KB)      -rw-rw-rw-
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
<?php
/**
 * PEAR_Command_Config (config-show, config-get, config-set, config-help, config-create commands)
 *
 * PHP versions 4 and 5
 *
 * @category   pear
 * @package    PEAR
 * @author     Stig Bakken <ssb@php.net>
 * @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: Config.php 313024 2011-07-06 19:51:24Z dufuz $
 * @link       http://pear.php.net/package/PEAR
 * @since      File available since Release 0.1
 */

/**
 * base class
 */
require_once 'PEAR/Command/Common.php';

/**
 * PEAR commands for managing configuration data.
 *
 * @category   pear
 * @package    PEAR
 * @author     Stig Bakken <ssb@php.net>
 * @author     Greg Beaver <cellog@php.net>
 * @copyright  1997-2009 The Authors
 * @license    http://opensource.org/licenses/bsd-license.php New BSD License
 * @version    Release: 1.9.4
 * @link       http://pear.php.net/package/PEAR
 * @since      Class available since Release 0.1
 */
class PEAR_Command_Config extends PEAR_Command_Common
{
    var 
$commands = array(
        
'config-show' => array(
            
'summary' => 'Show All Settings',
            
'function' => 'doConfigShow',
            
'shortcut' => 'csh',
            
'options' => array(
                
'channel' => array(
                    
'shortopt' => 'c',
                    
'doc' => 'show configuration variables for another channel',
                    
'arg' => 'CHAN',
                    ),
),
            
'doc' => '[layer]
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". To display
configurations for different channels, set the default_channel
configuration variable and run config-show again.
'
,
            ),
        
'config-get' => array(
            
'summary' => 'Show One Setting',
            
'function' => 'doConfigGet',
            
'shortcut' => 'cg',
            
'options' => array(
                
'channel' => array(
                    
'shortopt' => 'c',
                    
'doc' => 'show configuration variables for another channel',
                    
'arg' => 'CHAN',
                    ),
),
            
'doc' => '<parameter> [layer]
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.  The configuration value will be retrieved for the channel
specified by the default_channel configuration variable.
'
,
            ),
        
'config-set' => array(
            
'summary' => 'Change Setting',
            
'function' => 'doConfigSet',
            
'shortcut' => 'cs',
            
'options' => array(
                
'channel' => array(
                    
'shortopt' => 'c',
                    
'doc' => 'show configuration variables for another channel',
                    
'arg' => 'CHAN',
                    ),
),
            
'doc' => '<parameter> <value> [layer]
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 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 in which layer to set the
configuration parameter.  The default layer is "user".  The
configuration value will be set for the current channel, which
is controlled by the default_channel configuration variable.
'
,
            ),
        
'config-help' => array(
            
'summary' => 'Show Information About Setting',
            
'function' => 'doConfigHelp',
            
'shortcut' => 'ch',
            
'options' => array(),
            
'doc' => '[parameter]
Displays help for a configuration parameter.  Without arguments it
displays help for all configuration parameters.
'
,
           ),
        
'config-create' => array(
            
'summary' => 'Create a Default configuration file',
            
'function' => 'doConfigCreate',
            
'shortcut' => 'coc',
            
'options' => array(
                
'windows' => array(
                    
'shortopt' => 'w',
                    
'doc' => 'create a config file for a windows install',
                    ),
            ),
            
'doc' => '<root path> <filename>
Create a default configuration file with all directory configuration
variables set to subdirectories of <root path>, and save it as <filename>.
This is useful especially for creating a configuration file for a remote
PEAR installation (using the --remoteconfig option of install, upgrade,
and uninstall).
'
,
            ),
        );

    
/**
     * PEAR_Command_Config constructor.
     *
     * @access public
     */
    
function PEAR_Command_Config(&$ui, &$config)
    {
        
parent::PEAR_Command_Common($ui$config);
    }

    function 
doConfigShow($command$options$params)
    {
        
$layer null;
        if (
is_array($params)) {
            
$layer = isset($params[0]) ? $params[0] : null;
        }

        
// $params[0] -> the layer
        
if ($error $this->_checkLayer($layer)) {
            return 
$this->raiseError("config-show:$error");
        }

        
$keys $this->config->getKeys();
        
sort($keys);
        
$channel = isset($options['channel']) ? $options['channel'] :
            
$this->config->get('default_channel');
        
$reg = &$this->config->getRegistry();
        if (!
$reg->channelExists($channel)) {
            return 
$this->raiseError('Channel "' $channel '" does not exist');
        }

        
$channel $reg->channelName($channel);
        
$data = array('caption' => 'Configuration (channel ' $channel '):');
        foreach (
$keys as $key) {
            
$type $this->config->getType($key);
            
$value $this->config->get($key$layer$channel);
            if (
$type == 'password' && $value) {
                
$value '********';
            }

            if (
$value === false) {
                
$value 'false';
            } elseif (
$value === true) {
                
$value 'true';
            }

            
$data['data'][$this->config->getGroup($key)][] = array($this->config->getPrompt($key) , $key$value);
        }

        foreach (
$this->config->getLayers() as $layer) {
            
$data['data']['Config Files'][] = array(ucfirst($layer) . ' Configuration File''Filename' $this->config->getConfFile($layer));
        }

        
$this->ui->outputData($data$command);
        return 
true;
    }

    function 
doConfigGet($command$options$params)
    {
        
$args_cnt is_array($params) ? count($params) : 0;
        switch (
$args_cnt) {
            case 
1:
                
$config_key $params[0];
                
$layer null;
                break;
            case 
2:
                
$config_key $params[0];
                
$layer $params[1];
                if (
$error $this->_checkLayer($layer)) {
                    return 
$this->raiseError("config-get:$error");
                }
                break;
            case 
0:
            default:
                return 
$this->raiseError("config-get expects 1 or 2 parameters");
        }

        
$reg = &$this->config->getRegistry();
        
$channel = isset($options['channel']) ? $options['channel'] : $this->config->get('default_channel');
        if (!
$reg->channelExists($channel)) {
            return 
$this->raiseError('Channel "' $channel '" does not exist');
        }

        
$channel $reg->channelName($channel);
        
$this->ui->outputData($this->config->get($config_key$layer$channel), $command);
        return 
true;
    }

    function 
doConfigSet($command$options$params)
    {
        
// $param[0] -> a parameter to set
        // $param[1] -> the value for the parameter
        // $param[2] -> the layer
        
$failmsg '';
        if (
count($params) < || count($params) > 3) {
            
$failmsg .= "config-set expects 2 or 3 parameters";
            return 
PEAR::raiseError($failmsg);
        }

        if (isset(
$params[2]) && ($error $this->_checkLayer($params[2]))) {
            
$failmsg .= $error;
            return 
PEAR::raiseError("config-set:$failmsg");
        }

        
$channel = isset($options['channel']) ? $options['channel'] : $this->config->get('default_channel');
        
$reg = &$this->config->getRegistry();
        if (!
$reg->channelExists($channel)) {
            return 
$this->raiseError('Channel "' $channel '" does not exist');
        }

        
$channel $reg->channelName($channel);
        if (
$params[0] == 'default_channel' && !$reg->channelExists($params[1])) {
            return 
$this->raiseError('Channel "' $params[1] . '" does not exist');
        }

        if (
$params[0] == 'preferred_mirror'
            
&& (
                !
$reg->mirrorExists($channel$params[1]) &&
                (!
$reg->channelExists($params[1]) || $channel != $params[1])
            )
        ) {
            
$msg  'Channel Mirror "' $params[1] . '" does not exist';
            
$msg .= ' in your registry for channel "' $channel '".';
            
$msg .= "\n" 'Attempt to run "pear channel-update ' $channel .'"';
            
$msg .= ' if you believe this mirror should exist as you may';
            
$msg .= ' have outdated channel information.';
            return 
$this->raiseError($msg);
        }

        if (
count($params) == 2) {
            
array_push($params'user');
            
$layer 'user';
        } else {
            
$layer $params[2];
        }

        
array_push($params$channel);
        if (!
call_user_func_array(array(&$this->config'set'), $params)) {
            
array_pop($params);
            
$failmsg "config-set (" implode(", "$params) . ") failed, channel $channel";
        } else {
            
$this->config->store($layer);
        }

        if (
$failmsg) {
            return 
$this->raiseError($failmsg);
        }

        
$this->ui->outputData('config-set succeeded'$command);
        return 
true;
    }

    function 
doConfigHelp($command$options$params)
    {
        if (empty(
$params)) {
            
$params $this->config->getKeys();
        }

        
$data['caption']  = "Config help" . ((count($params) == 1) ? " for $params[0]'');
        
$data['headline'] = array('Name''Type''Description');
        
$data['border']   = true;
        foreach (
$params as $name) {
            
$type $this->config->getType($name);
            
$docs $this->config->getDocs($name);
            if (
$type == 'set') {
                
$docs rtrim($docs) . "\nValid set: " .
                    
implode(' '$this->config->getSetValues($name));
            }

            
$data['data'][] = array($name$type$docs);
        }

        
$this->ui->outputData($data$command);
    }

    function 
doConfigCreate($command$options$params)
    {
        if (
count($params) != 2) {
            return 
PEAR::raiseError('config-create: must have 2 parameters, root path and ' .
                
'filename to save as');
        }

        
$root $params[0];
        
// Clean up the DIRECTORY_SEPARATOR mess
        
$ds2 DIRECTORY_SEPARATOR DIRECTORY_SEPARATOR;
        
$root preg_replace(array('!\\\\+!''!/+!'"!$ds2+!"),
                             array(
'/''/''/'),
                            
$root);
        if (
$root{0} != '/') {
            if (!isset(
$options['windows'])) {
                return 
PEAR::raiseError('Root directory must be an absolute path beginning ' .
                    
'with "/", was: "' $root '"');
            }

            if (!
preg_match('/^[A-Za-z]:/'$root)) {
                return 
PEAR::raiseError('Root directory must be an absolute path beginning ' .
                    
'with "\\" or "C:\\", was: "' $root '"');
            }
        }

        
$windows = isset($options['windows']);
        if (
$windows) {
            
$root str_replace('/''\\'$root);
        }

        if (!
file_exists($params[1]) && !@touch($params[1])) {
            return 
PEAR::raiseError('Could not create "' $params[1] . '"');
        }

        
$params[1] = realpath($params[1]);
        
$config = &new PEAR_Config($params[1], '#no#system#config#'falsefalse);
        if (
$root{strlen($root) - 1} == '/') {
            
$root substr($root0strlen($root) - 1);
        }

        
$config->noRegistry();
        
$config->set('php_dir'$windows "$root\\pear\\php" "$root/pear/php"'user');
        
$config->set('data_dir'$windows "$root\\pear\\data" "$root/pear/data");
        
$config->set('www_dir'$windows "$root\\pear\\www" "$root/pear/www");
        
$config->set('cfg_dir'$windows "$root\\pear\\cfg" "$root/pear/cfg");
        
$config->set('ext_dir'$windows "$root\\pear\\ext" "$root/pear/ext");
        
$config->set('doc_dir'$windows "$root\\pear\\docs" "$root/pear/docs");
        
$config->set('test_dir'$windows "$root\\pear\\tests" "$root/pear/tests");
        
$config->set('cache_dir'$windows "$root\\pear\\cache" "$root/pear/cache");
        
$config->set('download_dir'$windows "$root\\pear\\download" "$root/pear/download");
        
$config->set('temp_dir'$windows "$root\\pear\\temp" "$root/pear/temp");
        
$config->set('bin_dir'$windows "$root\\pear" "$root/pear");
        
$config->writeConfigFile();
        
$this->_showConfig($config);
        
$this->ui->outputData('Successfully created default configuration file "' $params[1] . '"',
            
$command);
    }

    function 
_showConfig(&$config)
    {
        
$params = array('user');
        
$keys $config->getKeys();
        
sort($keys);
        
$channel 'pear.php.net';
        
$data = array('caption' => 'Configuration (channel ' $channel '):');
        foreach (
$keys as $key) {
            
$type $config->getType($key);
            
$value $config->get($key'user'$channel);
            if (
$type == 'password' && $value) {
                
$value '********';
            }

            if (
$value === false) {
                
$value 'false';
            } elseif (
$value === true) {
                
$value 'true';
            }
            
$data['data'][$config->getGroup($key)][] =
                array(
$config->getPrompt($key) , $key$value);
        }

        foreach (
$config->getLayers() as $layer) {
            
$data['data']['Config Files'][] =
                array(
ucfirst($layer) . ' Configuration File''Filename' ,
                    
$config->getConfFile($layer));
        }

        
$this->ui->outputData($data'config-show');
        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) && $layer != 'default') {
            
$layers $this->config->getLayers();
            if (!
in_array($layer$layers)) {
                return 
" only the layers: \"" implode('" or "'$layers) . "\" are supported";
            }
        }

        return 
false;
    }
}

:: Command execute ::

Enter:
 
Select:
 

:: Search ::
  - regexp 

:: Upload ::
 
[ ok ]

:: Make Dir ::
 
[ ok ]
:: Make File ::
 
[ ok ]

:: Go Dir ::
 
:: Go File ::
 

--[ c99shell v. 1.0 pre-release build #13 powered by Captain Crunch Security Team | http://ccteam.ru | Generation time: 0.0156 ]--