From 3069eaf35e833ffe4a1c1c7829dd7e168ae27420 Mon Sep 17 00:00:00 2001 From: Ciro Mattia Gonano Date: Wed, 11 Sep 2013 15:56:48 +0200 Subject: Merge up to r3319 --- buildscripts/PhpDocumentor/scripts/add_cvs.php | 153 ------------------------- 1 file changed, 153 deletions(-) delete mode 100644 buildscripts/PhpDocumentor/scripts/add_cvs.php (limited to 'buildscripts/PhpDocumentor/scripts/add_cvs.php') diff --git a/buildscripts/PhpDocumentor/scripts/add_cvs.php b/buildscripts/PhpDocumentor/scripts/add_cvs.php deleted file mode 100644 index 8b1145d0..00000000 --- a/buildscripts/PhpDocumentor/scripts/add_cvs.php +++ /dev/null @@ -1,153 +0,0 @@ - - * @copyright Copyright 2003, Greg Beaver - * @version 1.0 - */ -/**#@+ - * phpDocumentor include files. If you don't have phpDocumentor, go get it! - * Your php life will be changed forever - */ -$dir = realpath(dirname(__FILE__).'/..'); -require_once("$dir/phpDocumentor/common.inc.php"); -require_once("$dir/phpDocumentor/Io.inc"); -/**#@-*/ - -/** -* Physical location on this computer of the package to parse -* @global string $cvsadd_directory -*/ -$cvsadd_directory = realpath('.'); -/** -* Comma-separated list of files and directories to ignore -* -* This uses wildcards * and ? to remove extra files/directories that are -* not part of the package or release -* @global string $ignore -*/ -$ignore = array('CVS/'); - -/****************************************************************************** -* Don't change anything below here unless you're adventuresome * -*******************************************************************************/ - -/** - * @global Io $files - */ -$files = new Io; - -$allfiles = $files->dirList($cvsadd_directory); -/**#@+ - * Sorting functions for the file list - * @param string - * @param string - */ -function sortfiles($a, $b) -{ - return strnatcasecmp($a['file'],$b['file']); -} - -function mystrucsort($a, $b) -{ - if (is_numeric($a) && is_string($b)) return 1; - if (is_numeric($b) && is_string($a)) return -1; - if (is_numeric($a) && is_numeric($b)) - { - if ($a > $b) return 1; - if ($a < $b) return -1; - if ($a == $b) return 0; - } - return strnatcasecmp($a,$b); -} -/**#@-*/ - -$struc = array(); -foreach($allfiles as $file) -{ - if ($files->checkIgnore(basename($file),dirname($file),$ignore, false)) - { -// print 'Ignoring '.$file."
\n"; - continue; - } - $path = substr(dirname($file),strlen(str_replace('\\','/',realpath($cvsadd_directory)))+1); - if (!$path) $path = '/'; - $file = basename($file); - $ext = array_pop(explode('.',$file)); - if (strlen($ext) == strlen($file)) $ext = ''; - $struc[$path][] = array('file' => $file,'ext' => $ext); -} -uksort($struc,'strnatcasecmp'); -foreach($struc as $key => $ind) -{ - usort($ind,'sortfiles'); - $struc[$key] = $ind; -} -$tempstruc = $struc; -$struc = array('/' => $tempstruc['/']); -$bv = 0; -foreach($tempstruc as $key => $ind) -{ - $save = $key; - if ($key != '/') - { - $struc['/'] = setup_dirs($struc['/'], explode('/',$key), $tempstruc[$key]); - } -} -uksort($struc['/'],'mystrucsort'); -/** - * Recursively add files to cvs - * @param array the sorted directory structure - */ -function addToCVS($struc) -{ - foreach($struc as $dir => $files) - { - if ($dir === '/') - { - print 'processing '.$dir . "\n"; - addToCVS($struc[$dir]); - return; - } else - { - if (!isset($files['file'])) - { - print 'adding '.$dir . "\n"; - system('cvs add '.$dir); - chdir($dir); - addToCVS($files); - chdir('..'); - } else - { - print 'adding '.$files['file'] . "\n"; - system('cvs add '.$files['file']); - system('cvs commit -m "" '.$files['file']); - } - } - } -} -addToCVS($struc); -print "\n".'done'; -?> \ No newline at end of file -- cgit v1.2.3