cvs: phpdoc /scripts genfunclist.php

techtonik Mon Apr 4 16:59:31 2005 EDT Modified files: /phpdoc/scripts genfunclist.php Log: * get rid of PEAR File_Find dependency http://cvs.php.net/diff.php/phpdoc/scripts/genfunclist.php?r1=1.2&r2=1.3&ty=u Index: phpdoc/scripts/genfunclist.php diff -u phpdoc/scripts/genfunclist.php:1.2 phpdoc/scripts/genfunclist.php:1.3 --- phpdoc/scripts/genfunclist.php:1.2 Sun Apr 3 05:56:18 2005 +++ phpdoc/scripts/genfunclist.php Mon Apr 4 16:59:30 2005 @@ -19,7 +19,7 @@ | anatoly techtonik <techtonik@users.sourceforge.net> | +----------------------------------------------------------------------+ - $Id: genfunclist.php,v 1.2 2005/04/03 09:56:18 techtonik Exp $ + $Id: genfunclist.php,v 1.3 2005/04/04 20:59:30 techtonik Exp $ */ /** @@ -72,10 +72,25 @@ ? $argv[1]."/language-scanner.lex" : NULL; - require_once "File/Find.php"; -// $parsefiles = File_Find::search('/\.(c|cpp|h|ec)$/i', $argv[1], 'perl'); - $ff = &new File_Find(); - $parsefiles = $ff->search('/\.(c|cpp|h|ec)$/i', $argv[1], 'perl'); + // find all source files recursively - returns array with filenames + function get_parsefiles($srcpath) { + $parsefiles = array(); + $srcdir = dir($srcpath); + while (false !== ($file = $srcdir->read())) { + $filepath = $srcpath."/".$file; + if (is_dir($filepath) && $file !== "." && $file !== "..") { + $parsefiles = array_merge($parsefiles, get_parsefiles($filepath)); + continue; + } + if (preg_match('/\.(c|cpp|h|ec)$/i', $file)) { + $parsefiles[] = $filepath; + } + } + $srcdir->close(); + return $parsefiles; + } + + $parsefiles = get_parsefiles($argv[1]); // make unified directory separator - / if (DIRECTORY_SEPARATOR == '\\') { @@ -115,7 +130,7 @@ foreach ($parsefiles as $key => $file) { // output source file name - echo str_replace($argv[1], "# php-src", $file)."\n"; + echo preg_replace("|^[./]+|", "# ", $file)."\n"; foreach ($blocks[$key] as $bk => $bv) { // output function block title if ($show_block_names) {