From 42d4e3533e011234650b2e15f8fe7ca5738df94d Mon Sep 17 00:00:00 2001
From: Antony Dovgal <tony2001@php.net>
Date: Sun, 10 Sep 2006 11:26:53 +0000
Subject: MFH: improve the script

---
 scripts/dev/check_parameters.php | 34 +++++++++++++++++++++++++++++++++-
 1 file changed, 33 insertions(+), 1 deletion(-)

(limited to 'scripts')

diff --git a/scripts/dev/check_parameters.php b/scripts/dev/check_parameters.php
index d08a8b16fb..f79f868963 100644
--- a/scripts/dev/check_parameters.php
+++ b/scripts/dev/check_parameters.php
@@ -333,4 +333,36 @@ function recurse($path)
 	}
 }
 
-recurse(PHPDIR);
+$dirs = array();
+
+if (isset($argc) && $argc > 1) {
+	if ($argv[1] == '-h' || $argv[1] == '-help' || $argv[1] == '--help') {
+		echo <<<HELP
+Synopsis:
+    php check_parameters.php [directories]
+
+HELP;
+		exit(0);
+	}
+	for ($i = 1; $i < $argc; $i++) {
+		$dirs[] = $argv[$i];
+	}
+} else { 
+	$dirs[] = PHPDIR;
+}
+
+foreach($dirs as $dir) {
+	if (is_dir($dir)) {
+		if (!is_readable($dir)) {
+			echo "ERROR: directory '", $dir ,"' is not readable\n";
+			exit(1);
+		}
+	} else {
+		echo "ERROR: bogus directory '", $dir ,"'\n";
+		exit(1);
+	}
+}
+
+foreach ($dirs as $dir) {
+	recurse($dir);
+}
-- 
cgit v1.2.1