mirror of
https://github.com/EGroupware/egroupware.git
synced 2024-12-23 23:29:31 +01:00
382 lines
11 KiB
PHP
382 lines
11 KiB
PHP
|
<?php
|
||
|
|
|
||
|
|
namespace MrClay;
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Forms a front controller for a console app, handling and validating arguments (options)
|
||
|
|
*
|
||
|
|
* Instantiate, add arguments, then call validate(). Afterwards, the user's valid arguments
|
||
|
|
* and their values will be available in $cli->values.
|
||
|
|
*
|
||
|
|
* You may also specify that some arguments be used to provide input/output. By communicating
|
||
|
|
* solely through the file pointers provided by openInput()/openOutput(), you can make your
|
||
|
|
* app more flexible to end users.
|
||
|
|
*
|
||
|
|
* @author Steve Clay <steve@mrclay.org>
|
||
|
|
* @license http://www.opensource.org/licenses/mit-license.php MIT License
|
||
|
|
*/
|
||
|
|
class Cli {
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @var array validation errors
|
||
|
|
*/
|
||
|
|
public $errors = array();
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @var array option values available after validation.
|
||
|
|
*
|
||
|
|
* E.g. array(
|
||
|
|
* 'a' => false // option was missing
|
||
|
|
* ,'b' => true // option was present
|
||
|
|
* ,'c' => "Hello" // option had value
|
||
|
|
* ,'f' => "/home/user/file" // file path from root
|
||
|
|
* ,'f.raw' => "~/file" // file path as given to option
|
||
|
|
* )
|
||
|
|
*/
|
||
|
|
public $values = array();
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @var array
|
||
|
|
*/
|
||
|
|
public $moreArgs = array();
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @var array
|
||
|
|
*/
|
||
|
|
public $debug = array();
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @var bool The user wants help info
|
||
|
|
*/
|
||
|
|
public $isHelpRequest = false;
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @var array of Cli\Arg
|
||
|
|
*/
|
||
|
|
protected $_args = array();
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @var resource
|
||
|
|
*/
|
||
|
|
protected $_stdin = null;
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @var resource
|
||
|
|
*/
|
||
|
|
protected $_stdout = null;
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @param bool $exitIfNoStdin (default true) Exit() if STDIN is not defined
|
||
|
|
*/
|
||
|
|
public function __construct($exitIfNoStdin = true)
|
||
|
|
{
|
||
|
|
if ($exitIfNoStdin && ! defined('STDIN')) {
|
||
|
|
exit('This script is for command-line use only.');
|
||
|
|
}
|
||
|
|
if (isset($GLOBALS['argv'][1])
|
||
|
|
&& ($GLOBALS['argv'][1] === '-?' || $GLOBALS['argv'][1] === '--help')) {
|
||
|
|
$this->isHelpRequest = true;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @param Cli\Arg|string $letter
|
||
|
|
* @return Cli\Arg
|
||
|
|
*/
|
||
|
|
public function addOptionalArg($letter)
|
||
|
|
{
|
||
|
|
return $this->addArgument($letter, false);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @param Cli\Arg|string $letter
|
||
|
|
* @return Cli\Arg
|
||
|
|
*/
|
||
|
|
public function addRequiredArg($letter)
|
||
|
|
{
|
||
|
|
return $this->addArgument($letter, true);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @param string $letter
|
||
|
|
* @param bool $required
|
||
|
|
* @param Cli\Arg|null $arg
|
||
|
|
* @return Cli\Arg
|
||
|
|
* @throws \InvalidArgumentException
|
||
|
|
*/
|
||
|
|
public function addArgument($letter, $required, Cli\Arg $arg = null)
|
||
|
|
{
|
||
|
|
if (! preg_match('/^[a-zA-Z]$/', $letter)) {
|
||
|
|
throw new \InvalidArgumentException('$letter must be in [a-zA-z]');
|
||
|
|
}
|
||
|
|
if (! $arg) {
|
||
|
|
$arg = new Cli\Arg($required);
|
||
|
|
}
|
||
|
|
$this->_args[$letter] = $arg;
|
||
|
|
return $arg;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @param string $letter
|
||
|
|
* @return Cli\Arg|null
|
||
|
|
*/
|
||
|
|
public function getArgument($letter)
|
||
|
|
{
|
||
|
|
return isset($this->_args[$letter]) ? $this->_args[$letter] : null;
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Read and validate options
|
||
|
|
*
|
||
|
|
* @return bool true if all options are valid
|
||
|
|
*/
|
||
|
|
public function validate()
|
||
|
|
{
|
||
|
|
$options = '';
|
||
|
|
$this->errors = array();
|
||
|
|
$this->values = array();
|
||
|
|
$this->_stdin = null;
|
||
|
|
|
||
|
|
if ($this->isHelpRequest) {
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
|
||
|
|
$lettersUsed = '';
|
||
|
|
foreach ($this->_args as $letter => $arg) {
|
||
|
|
/* @var Cli\Arg $arg */
|
||
|
|
$options .= $letter;
|
||
|
|
$lettersUsed .= $letter;
|
||
|
|
|
||
|
|
if ($arg->mayHaveValue || $arg->mustHaveValue) {
|
||
|
|
$options .= ($arg->mustHaveValue ? ':' : '::');
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
$this->debug['argv'] = $GLOBALS['argv'];
|
||
|
|
$argvCopy = array_slice($GLOBALS['argv'], 1);
|
||
|
|
$o = getopt($options);
|
||
|
|
$this->debug['getopt_options'] = $options;
|
||
|
|
$this->debug['getopt_return'] = $o;
|
||
|
|
|
||
|
|
foreach ($this->_args as $letter => $arg) {
|
||
|
|
/* @var Cli\Arg $arg */
|
||
|
|
$this->values[$letter] = false;
|
||
|
|
if (isset($o[$letter])) {
|
||
|
|
if (is_bool($o[$letter])) {
|
||
|
|
|
||
|
|
// remove from argv copy
|
||
|
|
$k = array_search("-$letter", $argvCopy);
|
||
|
|
if ($k !== false) {
|
||
|
|
array_splice($argvCopy, $k, 1);
|
||
|
|
}
|
||
|
|
|
||
|
|
if ($arg->mustHaveValue) {
|
||
|
|
$this->addError($letter, "Missing value");
|
||
|
|
} else {
|
||
|
|
$this->values[$letter] = true;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
// string
|
||
|
|
$this->values[$letter] = $o[$letter];
|
||
|
|
$v =& $this->values[$letter];
|
||
|
|
|
||
|
|
// remove from argv copy
|
||
|
|
// first look for -ovalue or -o=value
|
||
|
|
$pattern = "/^-{$letter}=?" . preg_quote($v, '/') . "$/";
|
||
|
|
$foundInArgv = false;
|
||
|
|
foreach ($argvCopy as $k => $argV) {
|
||
|
|
if (preg_match($pattern, $argV)) {
|
||
|
|
array_splice($argvCopy, $k, 1);
|
||
|
|
$foundInArgv = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (! $foundInArgv) {
|
||
|
|
// space separated
|
||
|
|
$k = array_search("-$letter", $argvCopy);
|
||
|
|
if ($k !== false) {
|
||
|
|
array_splice($argvCopy, $k, 2);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
// check that value isn't really another option
|
||
|
|
if (strlen($lettersUsed) > 1) {
|
||
|
|
$pattern = "/^-[" . str_replace($letter, '', $lettersUsed) . "]/i";
|
||
|
|
if (preg_match($pattern, $v)) {
|
||
|
|
$this->addError($letter, "Value was read as another option: %s", $v);
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if ($arg->assertFile || $arg->assertDir) {
|
||
|
|
if ($v[0] !== '/' && $v[0] !== '~') {
|
||
|
|
$this->values["$letter.raw"] = $v;
|
||
|
|
$v = getcwd() . "/$v";
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if ($arg->assertFile) {
|
||
|
|
if ($arg->useAsInfile) {
|
||
|
|
$this->_stdin = $v;
|
||
|
|
} elseif ($arg->useAsOutfile) {
|
||
|
|
$this->_stdout = $v;
|
||
|
|
}
|
||
|
|
if ($arg->assertReadable && ! is_readable($v)) {
|
||
|
|
$this->addError($letter, "File not readable: %s", $v);
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
if ($arg->assertWritable) {
|
||
|
|
if (is_file($v)) {
|
||
|
|
if (! is_writable($v)) {
|
||
|
|
$this->addError($letter, "File not writable: %s", $v);
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
if (! is_writable(dirname($v))) {
|
||
|
|
$this->addError($letter, "Directory not writable: %s", dirname($v));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
} elseif ($arg->assertDir && $arg->assertWritable && ! is_writable($v)) {
|
||
|
|
$this->addError($letter, "Directory not readable: %s", $v);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
if ($arg->isRequired()) {
|
||
|
|
$this->addError($letter, "Missing");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
$this->moreArgs = $argvCopy;
|
||
|
|
reset($this->moreArgs);
|
||
|
|
return empty($this->errors);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Get the full paths of file(s) passed in as unspecified arguments
|
||
|
|
*
|
||
|
|
* @return array
|
||
|
|
*/
|
||
|
|
public function getPathArgs()
|
||
|
|
{
|
||
|
|
$r = $this->moreArgs;
|
||
|
|
foreach ($r as $k => $v) {
|
||
|
|
if ($v[0] !== '/' && $v[0] !== '~') {
|
||
|
|
$v = getcwd() . "/$v";
|
||
|
|
$v = str_replace('/./', '/', $v);
|
||
|
|
do {
|
||
|
|
$v = preg_replace('@/[^/]+/\\.\\./@', '/', $v, 1, $changed);
|
||
|
|
} while ($changed);
|
||
|
|
$r[$k] = $v;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return $r;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Get a short list of errors with options
|
||
|
|
*
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public function getErrorReport()
|
||
|
|
{
|
||
|
|
if (empty($this->errors)) {
|
||
|
|
return '';
|
||
|
|
}
|
||
|
|
$r = "Some arguments did not pass validation:\n";
|
||
|
|
foreach ($this->errors as $letter => $arr) {
|
||
|
|
$r .= " $letter : " . implode(', ', $arr) . "\n";
|
||
|
|
}
|
||
|
|
$r .= "\n";
|
||
|
|
return $r;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public function getArgumentsListing()
|
||
|
|
{
|
||
|
|
$r = "\n";
|
||
|
|
foreach ($this->_args as $letter => $arg) {
|
||
|
|
/* @var Cli\Arg $arg */
|
||
|
|
$desc = $arg->getDescription();
|
||
|
|
$flag = " -$letter ";
|
||
|
|
if ($arg->mayHaveValue) {
|
||
|
|
$flag .= "[VAL]";
|
||
|
|
} elseif ($arg->mustHaveValue) {
|
||
|
|
$flag .= "VAL";
|
||
|
|
}
|
||
|
|
if ($arg->assertFile) {
|
||
|
|
$flag = str_replace('VAL', 'FILE', $flag);
|
||
|
|
} elseif ($arg->assertDir) {
|
||
|
|
$flag = str_replace('VAL', 'DIR', $flag);
|
||
|
|
}
|
||
|
|
if ($arg->isRequired()) {
|
||
|
|
$desc = "(required) $desc";
|
||
|
|
}
|
||
|
|
$flag = str_pad($flag, 12, " ", STR_PAD_RIGHT);
|
||
|
|
$desc = wordwrap($desc, 70);
|
||
|
|
$r .= $flag . str_replace("\n", "\n ", $desc) . "\n\n";
|
||
|
|
}
|
||
|
|
return $r;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Get resource of open input stream. May be STDIN or a file pointer
|
||
|
|
* to the file specified by an option with 'STDIN'.
|
||
|
|
*
|
||
|
|
* @return resource
|
||
|
|
*/
|
||
|
|
public function openInput()
|
||
|
|
{
|
||
|
|
if (null === $this->_stdin) {
|
||
|
|
return STDIN;
|
||
|
|
} else {
|
||
|
|
$this->_stdin = fopen($this->_stdin, 'rb');
|
||
|
|
return $this->_stdin;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
public function closeInput()
|
||
|
|
{
|
||
|
|
if (null !== $this->_stdin) {
|
||
|
|
fclose($this->_stdin);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Get resource of open output stream. May be STDOUT or a file pointer
|
||
|
|
* to the file specified by an option with 'STDOUT'. The file will be
|
||
|
|
* truncated to 0 bytes on opening.
|
||
|
|
*
|
||
|
|
* @return resource
|
||
|
|
*/
|
||
|
|
public function openOutput()
|
||
|
|
{
|
||
|
|
if (null === $this->_stdout) {
|
||
|
|
return STDOUT;
|
||
|
|
} else {
|
||
|
|
$this->_stdout = fopen($this->_stdout, 'wb');
|
||
|
|
return $this->_stdout;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
public function closeOutput()
|
||
|
|
{
|
||
|
|
if (null !== $this->_stdout) {
|
||
|
|
fclose($this->_stdout);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @param string $letter
|
||
|
|
* @param string $msg
|
||
|
|
* @param string $value
|
||
|
|
*/
|
||
|
|
protected function addError($letter, $msg, $value = null)
|
||
|
|
{
|
||
|
|
if ($value !== null) {
|
||
|
|
$value = var_export($value, 1);
|
||
|
|
}
|
||
|
|
$this->errors[$letter][] = sprintf($msg, $value);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|