1
0
mirror of https://github.com/mbirth/tcl_update_db.git synced 2024-12-25 12:04:07 +00:00

Even more statistics for cleanup.

This commit is contained in:
Markus Birth 2018-01-06 17:42:11 +01:00
parent 6557e04fe4
commit 2d83080751

View File

@ -8,7 +8,11 @@ $ansi_updel = $ansi_csi . 'F' . $ansi_csi . 'K';
echo 'Reading file list ...';
$file_list = glob($bkup_dir . '*.xml');
echo ' OK' . PHP_EOL;
$num_total = count($file_list);
$num_deleted = 0;
echo 'found ' . $num_total . ' files.' . PHP_EOL;
echo 'Searching for duplicates ...' . PHP_EOL . PHP_EOL;
@ -23,6 +27,7 @@ foreach ($file_list as $i => $file) {
if (md5_file($file) == md5_file($bkup_dir . $old_file)) {
echo $ansi_updel . 'Duplicate file: ' . $filename . ' (first: ' . $old_file . ')' . PHP_EOL . PHP_EOL;
unlink($file);
$num_deleted++;
continue;
}
echo $ansi_updel . 'Possible SHA1 collision?' . PHP_EOL . PHP_EOL;
@ -32,5 +37,5 @@ foreach ($file_list as $i => $file) {
flush();
}
echo count($file_list) . ' files done.' . PHP_EOL;
echo count($file_list) . ' files processed. ' . $num_deleted . ' deleted. ' . ($num_total - $num_deleted) . ' left.' . PHP_EOL;