e19ce93a444ffd3d4d87a2be90ed589f897e86a8
5 use pharext\Cli\Args
as CliArgs
;
7 require_once "pharext/Version.php";
12 * Command line arguments
13 * @var pharext\CliArgs
19 * @see \pharext\Command::getArgs()
21 public function getArgs() {
26 * Output pharext vX.Y.Z header
29 printf("pharext v%s (c) Michael Wallner <mike@php.net>\n\n",
35 * @see \pharext\Command::debug()
37 public function debug($fmt) {
38 if ($this->args
->verbose
) {
39 vprintf($fmt, array_slice(func_get_args(), 1));
45 * @see \pharext\Command::info()
47 public function info($fmt) {
48 if (!$this->args
->quiet
) {
49 vprintf($fmt, array_slice(func_get_args(), 1));
55 * @see \pharext\Command::error()
57 public function error($fmt) {
58 if (!$this->args
->quiet
) {
61 $arg = error_get_last()["message"];
63 $arg = array_slice(func_get_args(), 1);
65 vfprintf(STDERR
, "ERROR: $fmt", $arg);
70 * Output command line help message
73 public function help($prog) {
74 printf("Usage:\n\n \$ %s", $prog);
79 foreach ($this->args
->getSpec() as $spec) {
80 if ($spec[3] & CliArgs
::REQARG
) {
81 if ($spec[3] & CliArgs
::REQUIRED
) {
92 printf(" [-%s]", implode("", array_column($flags, 0)));
94 foreach ($required as $req) {
95 printf(" -%s <arg>", $req[0]);
98 printf(" [-%s <arg>]", implode("|-", array_column($optional, 0)));
101 $spc = $this->args
->getSpec();
102 $max = max(array_map("strlen", array_column($spc, 1)));
103 $max +
= $max %
8 +
2;
104 foreach ($spc as $spec) {
105 if (isset($spec[0])) {
106 printf(" -%s|", $spec[0]);
110 printf("--%s ", $spec[1]);
111 if ($spec[3] & CliArgs
::REQARG
) {
113 } elseif ($spec[3] & CliArgs
::OPTARG
) {
118 printf("%s%s", str_repeat(" ", $max-strlen($spec[1])+
3*!isset($spec[0])), $spec[2]);
119 if ($spec[3] & CliArgs
::REQUIRED
) {
120 printf(" (REQUIRED)");
122 if (isset($spec[4])) {
123 printf(" [%s]", $spec[4]);
134 private function rm($dir) {
135 foreach (scandir($dir) as $entry) {
136 if ($entry === "." ||
$entry === "..") {
138 } elseif (is_dir("$dir/$entry")) {
139 $this->rm("$dir/$entry");
140 } elseif (!unlink("$dir/$entry")) {