Some old stuff
This commit is contained in:
44
php/pkgstat.php
Normal file
44
php/pkgstat.php
Normal file
@@ -0,0 +1,44 @@
|
||||
<?php
|
||||
|
||||
function delUponExit() {
|
||||
if(is_file('/tmp/php.apt_history.log'))
|
||||
unlink('/tmp/php.apt_history.log');
|
||||
}
|
||||
register_shutdown_function('delUponExit');
|
||||
|
||||
$i = 1;
|
||||
exec("ls /var/log/apt/history.log.*.gz", $list);
|
||||
foreach($list as $entry) {
|
||||
$lines = gzfile($entry);
|
||||
file_put_contents("/tmp/php.apt_history.log", $lines, FILE_APPEND);
|
||||
}
|
||||
$list = null;
|
||||
exec("cat /var/log/apt/history.log >> /tmp/php.apt_history.log");
|
||||
exec('cat /tmp/php.apt_history.log |egrep --regexp=\'^Commandline:\sapt-get\s[(install)(remove)(purge)]\'|awk \'{print $3" "$4}\'', $list);
|
||||
$i = 0; $j = 0;
|
||||
foreach($list as $entry) {
|
||||
$history=explode(" ", $entry);
|
||||
if($history[0] == "autoremove" || $history[0] == "upgrade")continue;
|
||||
$history[0] == "install" ? ($packages[$history[1]]=true):($packages[$history[1]]=false);
|
||||
}
|
||||
foreach($packages as $package => $stat) {
|
||||
$stat ? ($ipackage[$i ++] = $package):($rpackage[$j ++] = $package);
|
||||
}
|
||||
$i = sizeOf($ipackage);
|
||||
$j = sizeOf($rpackage);
|
||||
|
||||
$l = $i > $j ? $i:$j;
|
||||
echo "Custom package activities(apt-get):\n";
|
||||
echo "+---------------------------------------------------------+\n";
|
||||
echo "| Package(s) installed | Package(s) removed |\n";
|
||||
echo "|----------------------------+----------------------------|\n";
|
||||
$ll = .5*(strlen("+---------------------------------------------------------+") - 3);
|
||||
for($k = 0; $k < $l; $k ++) {
|
||||
$il = str_pad($k < $i ? $ipackage[$k]:"", $ll, " ", STR_PAD_BOTH);
|
||||
$rl = str_pad($k < $j ? $rpackage[$k]:"", $ll, " ", STR_PAD_BOTH);
|
||||
|
||||
|
||||
echo "|$il|$rl|\n";
|
||||
}
|
||||
echo "+---------------------------------------------------------+\n";
|
||||
?>
|
228
php/regRename.php
Normal file
228
php/regRename.php
Normal file
@@ -0,0 +1,228 @@
|
||||
<?php
|
||||
|
||||
error_reporting ( E_ALL^E_NOTICE ) ;
|
||||
|
||||
//----------- Usage -----------
|
||||
|
||||
if ( !$argv[1] )
|
||||
die ( "Usage: php {$argv[0]} [options] [-d directory] [-p patterns] [-s \"first match\" \"second\" ...] [...args]\n
|
||||
-d <paths> Directories to look over
|
||||
-p <patterns> Define RegEx patterns
|
||||
-r Rename file recursively
|
||||
-s <str ...> Strings that will replace the matches
|
||||
|
||||
Optional:
|
||||
*-e <patterns> Exclude defined pattern
|
||||
*-l <File> Output log file
|
||||
-t Test without modifying anything
|
||||
|
||||
*Not available yet.
|
||||
|
||||
" ) ;
|
||||
|
||||
//------- End Usage -----------
|
||||
|
||||
|
||||
|
||||
|
||||
//Define globals
|
||||
$test = false;
|
||||
$recursive = false;
|
||||
$searchDirs = array();
|
||||
$patterns = array();
|
||||
$replaceStrs = array();
|
||||
|
||||
//------- Main Functions --------
|
||||
function getDirName ( $dir ) {
|
||||
return is_dir ( $dir ) ? $dir : dirname ( $dir ) ;
|
||||
}
|
||||
|
||||
function getFileList ( $dir ) {
|
||||
$fileList = array();
|
||||
$iterator = new DirectoryIterator ( getDirName ( $dir ) ) ;
|
||||
foreach ( $iterator as $fileinfo ) {
|
||||
if ( $fileinfo->isFile() ) {
|
||||
$fileList[] = $dir."/".$fileinfo->getFilename();
|
||||
}
|
||||
}
|
||||
return $fileList;
|
||||
}
|
||||
|
||||
function getDirList ( $dir ) {
|
||||
$dirList = array();
|
||||
$iterator = new DirectoryIterator ( getDirName ( $dir ) ) ;
|
||||
foreach ( $iterator as $fileinfo ) {
|
||||
if ( $fileinfo->isDir() ) {
|
||||
$dirList[] = $fileinfo->getFilename();
|
||||
}
|
||||
}
|
||||
//Chop dir "." and ".."
|
||||
array_shift ( $dirList ) ;
|
||||
array_shift ( $dirList ) ;
|
||||
return $dirList;
|
||||
}
|
||||
|
||||
function getWholeDirList ( $dir ) {
|
||||
$wholeDirList = array();
|
||||
//getWholeDirList will stop untill getDirList return an empty array.
|
||||
foreach ( getDirList ( $dir ) as $file ) {
|
||||
//Store found path
|
||||
$wholeDirList[] = "$dir/$file";
|
||||
//Method getWholeDirList will self-iterate if sub-directories exist.
|
||||
$wholeDirList = array_merge ( $wholeDirList, getWholeDirList ( "$dir/$file" ) ) ;
|
||||
}
|
||||
return $wholeDirList;
|
||||
}
|
||||
|
||||
function getWholeFileList ( $dir ) {
|
||||
//Get the first level list.
|
||||
$wholeFileList = getFileList( $dir );
|
||||
//getWholeDirList and search its files.
|
||||
foreach ( getWholeDirList ( $dir ) as $dir ) {
|
||||
$wholeFileList = array_merge ( $wholeFileList, getFileList ( $dir ) ) ;
|
||||
}
|
||||
return $wholeFileList;
|
||||
}
|
||||
|
||||
function validateOptions ( ) {
|
||||
global $searchDirs, $patterns, $replaceStrs;
|
||||
|
||||
try {
|
||||
if(count($searchDirs) == 0)
|
||||
throw new Exception("Search directory is missing");
|
||||
else if(count($patterns) == 0)
|
||||
throw new Exception("Search pattern is missing");
|
||||
else if(count($replaceStrs) == 0)
|
||||
throw new Exception("Replacement string is missing");
|
||||
else if(count($replaceStrs) != count($patterns))
|
||||
throw new Exception("Replacement string and pattern count not match");
|
||||
} catch(Exception $e) {
|
||||
var_dump( $GLOBALS );
|
||||
die("Error: $e.\n");
|
||||
}
|
||||
}
|
||||
|
||||
function setOptions( $item, $value = NULL ) {
|
||||
global $test, $recursive, $searchDirs, $patterns, $replaceStrs;
|
||||
switch($item) {
|
||||
case "-d":
|
||||
if($value)
|
||||
$searchDirs[] = $value;
|
||||
break;
|
||||
case "-p":
|
||||
if($value)
|
||||
$patterns[] = $value;
|
||||
break;
|
||||
case "-r":
|
||||
$recursive = true;
|
||||
break;
|
||||
case "-s":
|
||||
if($value)
|
||||
$replaceStrs[] = $value;
|
||||
break;
|
||||
case "-t":
|
||||
$test = true;
|
||||
break;
|
||||
default:
|
||||
//Do nothing
|
||||
}
|
||||
}
|
||||
|
||||
//parseOptions utilitiese by tgckpg
|
||||
function parseOptions ( $argStream, $handler ) {
|
||||
//Chop first useless argument -- argv[0]
|
||||
array_shift ( $argStream ) ;
|
||||
//Initiate ArrayObject for iterator
|
||||
$arrayobject = new ArrayObject ( $argStream ) ;
|
||||
//Initiate iterator for iteration
|
||||
$iterator = $arrayobject->getIterator();
|
||||
|
||||
//If options is set first
|
||||
if( $iterator->valid() && preg_match ( '/^-\w$/', $iterator->current() ) ) {
|
||||
//iterate through whole argument stream
|
||||
for ( ; $iterator->valid(); $iterator->next() ) {
|
||||
//Check if reached next option
|
||||
if( preg_match ( '/^-\w$/', $opts = $iterator->current() ) ) {
|
||||
//Get current options
|
||||
$currOpt = $opts;
|
||||
//echo "$currOpt\n";
|
||||
//Test if next stream is an option
|
||||
for ( $iterator->next(); $iterator->valid(); $iterator->next() ) {
|
||||
if ( preg_match ( '/^-\w$/', $opts = $iterator->current() ) ) {
|
||||
//echo "$currOpt $opts\n";
|
||||
$handler($currOpt);
|
||||
$currOpt = $opts;
|
||||
} else break;
|
||||
//var_dump($iterator->valid());
|
||||
}
|
||||
}//End if
|
||||
//echo "$currOpt $opts\n";
|
||||
$handler($currOpt, $opts);
|
||||
//A temporary fix for infinite loop
|
||||
if(!$iterator->valid())
|
||||
break;
|
||||
}// End for
|
||||
//If option is not set first.
|
||||
} else {
|
||||
//Try other approach.
|
||||
}// End if
|
||||
}
|
||||
|
||||
|
||||
//------- End Main Functions --------
|
||||
|
||||
|
||||
parseOptions ( $argv, 'setOptions' ) ;
|
||||
validateOptions();
|
||||
|
||||
|
||||
//------- Begin Operations -------
|
||||
foreach ( $searchDirs as $dir ) {
|
||||
echo "Directory: $dir\nBuilding file list ...\n";
|
||||
if ( $recursive ) {
|
||||
$fileList = getWholeFileList($dir);
|
||||
} else {
|
||||
$fileList = getFileList($dir);
|
||||
}
|
||||
echo "Searching ...\n";
|
||||
foreach ( $fileList as $file ) {
|
||||
//
|
||||
// Get the file name
|
||||
// RegExplained:
|
||||
// Example: /foo/bar/foobar.bar
|
||||
// $matches[0][0] is the whole string "/foo/bar/foobar.bar"
|
||||
//
|
||||
// ^(.+?)
|
||||
// This gets the file path "/foo/bar/" for $matches[1][0]
|
||||
//
|
||||
// ([^\/\\\\]+)$
|
||||
// This gets the file name "foobar.bar" for $matches[2][0]
|
||||
//
|
||||
preg_match_all('/^(.+?)([^\/\\\\]+)$/', $file, $matches );
|
||||
$newName = $matches[2][0];
|
||||
foreach ( $patterns as $key => $pattern ) {
|
||||
//Rename over the patterns
|
||||
$newName = preg_replace( $pattern, $replaceStrs[$key], $newName );
|
||||
}
|
||||
if( $matches[2][0] != $newName ) {
|
||||
if( $test ) {
|
||||
echo "File \"{$matches[2][0]}\" will renamed to \"$newName\"\n";
|
||||
} else {
|
||||
rename ( $file, "{$matches[1][0]}$newName" );
|
||||
}
|
||||
if ( $logfile ) {
|
||||
|
||||
}
|
||||
}/* else {
|
||||
echo "File \"{$matches[0][0]}\" will not be renamed\n";
|
||||
}
|
||||
//*/
|
||||
}
|
||||
echo "\n";
|
||||
}
|
||||
if ( $test ) echo "*** Test enabled ***\n\n";
|
||||
|
||||
|
||||
|
||||
//------- End Operations -------*/
|
||||
?>
|
Reference in New Issue
Block a user