WebSVN – checksum-tools – Diff – /trunk/PHP/sfv_generate.php


#!/usr/bin/php
<?php
 
/*
   Copyright 2020-2021 Daniel Marschall, ViaThinkSoft
 
   Licensed under the Apache License, Version 2.0 (the "License");
   you may not use this file except in compliance with the License.
   You may obtain a copy of the License at
 
       http://www.apache.org/licenses/LICENSE-2.0
 
   Unless required by applicable law or agreed to in writing, software
   distributed under the License is distributed on an "AS IS" BASIS,
   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
   See the License for the specific language governing permissions and
   limitations under the License.
*/
 
// This script generates SFV files
// If there is already an SFV file existing, only new files get appended to the existing SFV files.
 
// TODO: make use of STDERR and return different exit codes
 
function _rec($directory) {
        if (!is_dir($directory)) {
                die("Invalid directory path $directory\n");
        }
 
        if ((basename($directory) == '.') || (basename($directory) == '..')) {
                $sfv_file = rtrim($directory,DIRECTORY_SEPARATOR).DIRECTORY_SEPARATOR.
                            basename(realpath($directory)).'.sfv';
 
        } else {
                $sfv_file = rtrim($directory,DIRECTORY_SEPARATOR).DIRECTORY_SEPARATOR.
                            basename($directory).'.sfv';
        }
 
        if (file_exists($sfv_file)) {
                $existing_files = sfv_get_files($sfv_file);
        } else {
                $existing_files = array();
        }
 
        $sd = @scandir($directory);
        if ($sd === false) {
                echo "Error: Cannot scan directory $directory\n";
                return;
        }
 
        foreach ($sd as $file) {
                if ($file === '.') continue;
                if ($file === '..') continue;
                if (strtolower($file) === 'thumbs.db') continue;
                if (strtolower(substr($file, -4)) === '.md5') continue;
                if (strtolower(substr($file, -4)) === '.sfv') continue;
 
                $fullpath = rtrim($directory,DIRECTORY_SEPARATOR).DIRECTORY_SEPARATOR.$file;
                if (is_dir($fullpath)) {
                        _rec($fullpath);
                } else if (is_file($fullpath)) {
                        global $show_verbose;
                        if ($show_verbose) echo "$fullpath\n";
                        $dir = pathinfo($fullpath, PATHINFO_DIRNAME);
 
                        if (!file_exists($sfv_file)) {
                                file_put_contents($sfv_file, "; Generated by ViaThinkSoft\r\n"); // TODO: BOM
                        }
 
                        if (!in_array($file, $existing_files)) {
                                $crc32 = strtoupper(crc32_file($fullpath));
                                file_put_contents($sfv_file, "$file $crc32\r\n", FILE_APPEND);
                        }
                } else {
                        // For some reason, some files on a NTFS volume are "FIFO" pipe files?!
                        echo "Warning: $fullpath is not a regular file!\n";
                }
        }
}
 
function sfv_get_files($filename) {
        $out = array();
        $lines = file($filename);
        foreach ($lines as $line) {
                $line = rtrim($line);
                if ($line == '') continue;
                if (substr($line,0,1) == ';') continue;
                $out[] = substr($line, 0, strrpos($line, ' '));
 
        }
        return $out;
}
 
function swapEndianness($hex) {
        return implode('', array_reverse(str_split($hex, 2)));
}
 
function crc32_file($filename, $rawOutput = false) {
        $out = bin2hex(hash_file ('crc32b', $filename , true));
        if (hash('crc32b', 'TEST') == 'b893eaee') {
                // hash_file() in PHP 5.2 has the wrong Endianess!
                // https://bugs.php.net/bug.php?id=47467
                $out = swapEndianness($out);
        }
        return $out;
}
 
# ---
 
$show_verbose = false;
$dir = '';
 
for ($i=1; $i<$argc; $i++) {
        if ($argv[$i] == '-v') {
                $show_verbose = true;
        } else {
                $dir = $argv[$i];
        }
}
 
if (empty($dir)) {
        echo "Syntax: $argv[0] [-v] <directory>\n";
        exit(2);
}
 
if (!is_dir($dir)) {
        echo "Directory not found\n";
        exit(1);
}
 
_rec($dir);
 
if ($show_verbose) echo "Done.\n";
 

Rev 11	Rev 12
1	#!/usr/bin/php	1	#!/usr/bin/php
2	<?php	2	<?php
3		3
4	/*	4	/*
5	Copyright 2020 Daniel Marschall, ViaThinkSoft	5	Copyright 2020-2021 Daniel Marschall, ViaThinkSoft
6		6
7	Licensed under the Apache License, Version 2.0 (the "License");	7	Licensed under the Apache License, Version 2.0 (the "License");
8	you may not use this file except in compliance with the License.	8	you may not use this file except in compliance with the License.
9	You may obtain a copy of the License at	9	You may obtain a copy of the License at
10		10
11	http://www.apache.org/licenses/LICENSE-2.0	11	http://www.apache.org/licenses/LICENSE-2.0
12		12
13	Unless required by applicable law or agreed to in writing, software	13	Unless required by applicable law or agreed to in writing, software
14	distributed under the License is distributed on an "AS IS" BASIS,	14	distributed under the License is distributed on an "AS IS" BASIS,
15	WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.	15	WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
16	See the License for the specific language governing permissions and	16	See the License for the specific language governing permissions and
17	limitations under the License.	17	limitations under the License.
18	*/	18	*/
19		19
20	// This script generates SFV files	20	// This script generates SFV files
21	// If there is already an SFV file existing, only new files get appended to the existing SFV files.	21	// If there is already an SFV file existing, only new files get appended to the existing SFV files.
22		22
23	// TODO: make use of STDERR and return different exit codes	23	// TODO: make use of STDERR and return different exit codes
24		24
25	function _rec($directory) {	25	function _rec($directory) {
26	if (!is_dir($directory)) {	26	if (!is_dir($directory)) {
27	die("Invalid directory path $directory\n");	27	die("Invalid directory path $directory\n");
28	}	28	}
29		29
30	if ((basename($directory) == '.') \|\| (basename($directory) == '..')) {	30	if ((basename($directory) == '.') \|\| (basename($directory) == '..')) {
31	$sfv_file = rtrim($directory,DIRECTORY_SEPARATOR).DIRECTORY_SEPARATOR.	31	$sfv_file = rtrim($directory,DIRECTORY_SEPARATOR).DIRECTORY_SEPARATOR.
32	basename(realpath($directory)).'.sfv';	32	basename(realpath($directory)).'.sfv';
33		33
34	} else {	34	} else {
35	$sfv_file = rtrim($directory,DIRECTORY_SEPARATOR).DIRECTORY_SEPARATOR.	35	$sfv_file = rtrim($directory,DIRECTORY_SEPARATOR).DIRECTORY_SEPARATOR.
36	basename($directory).'.sfv';	36	basename($directory).'.sfv';
37	}	37	}
38		38
39	if (file_exists($sfv_file)) {	39	if (file_exists($sfv_file)) {
40	$existing_files = sfv_get_files($sfv_file);	40	$existing_files = sfv_get_files($sfv_file);
41	} else {	41	} else {
42	$existing_files = array();	42	$existing_files = array();
43	}	43	}
44		44
45	$sd = @scandir($directory);	45	$sd = @scandir($directory);
46	if ($sd === false) {	46	if ($sd === false) {
47	echo "Error: Cannot scan directory $directory\n";	47	echo "Error: Cannot scan directory $directory\n";
48	return;	48	return;
49	}	49	}
50		50
51	foreach ($sd as $file) {	51	foreach ($sd as $file) {
52	if ($file === '.') continue;	52	if ($file === '.') continue;
53	if ($file === '..') continue;	53	if ($file === '..') continue;
54	if (strtolower($file) === 'thumbs.db') continue;	54	if (strtolower($file) === 'thumbs.db') continue;
55	if (strtolower(substr($file, -4)) === '.md5') continue;	55	if (strtolower(substr($file, -4)) === '.md5') continue;
56	if (strtolower(substr($file, -4)) === '.sfv') continue;	56	if (strtolower(substr($file, -4)) === '.sfv') continue;
57		57
58	$fullpath = $directory . '/' . $file;	58	$fullpath = rtrim($directory,DIRECTORY_SEPARATOR).DIRECTORY_SEPARATOR.$file;
59	if (is_dir($fullpath)) {	59	if (is_dir($fullpath)) {
60	_rec($fullpath);	60	_rec($fullpath);
61	} else if (is_file($fullpath)) {	61	} else if (is_file($fullpath)) {
62	global $show_verbose;	62	global $show_verbose;
63	if ($show_verbose) echo "$fullpath\n";	63	if ($show_verbose) echo "$fullpath\n";
64	$dir = pathinfo($fullpath, PATHINFO_DIRNAME);	64	$dir = pathinfo($fullpath, PATHINFO_DIRNAME);
65		65
66	if (!file_exists($sfv_file)) {	66	if (!file_exists($sfv_file)) {
67	file_put_contents($sfv_file, "; Generated by ViaThinkSoft\r\n"); // TODO: BOM	67	file_put_contents($sfv_file, "; Generated by ViaThinkSoft\r\n"); // TODO: BOM
68	}	68	}
69		69
70	if (!in_array($file, $existing_files)) {	70	if (!in_array($file, $existing_files)) {
71	$crc32 = strtoupper(crc32_file($fullpath));	71	$crc32 = strtoupper(crc32_file($fullpath));
72	file_put_contents($sfv_file, "$file $crc32\r\n", FILE_APPEND);	72	file_put_contents($sfv_file, "$file $crc32\r\n", FILE_APPEND);
73	}	73	}
74	} else {	74	} else {
75	// For some reason, some files on a NTFS volume are "FIFO" pipe files?!	75	// For some reason, some files on a NTFS volume are "FIFO" pipe files?!
76	echo "Warning: $fullpath is not a regular file!\n";	76	echo "Warning: $fullpath is not a regular file!\n";
77	}	77	}
78	}	78	}
79	}	79	}
80		80
81	function sfv_get_files($filename) {	81	function sfv_get_files($filename) {
82	$out = array();	82	$out = array();
83	$lines = file($filename);	83	$lines = file($filename);
84	foreach ($lines as $line) {	84	foreach ($lines as $line) {
85	$line = rtrim($line);	85	$line = rtrim($line);
86	if ($line == '') continue;	86	if ($line == '') continue;
87	if (substr($line,0,1) == ';') continue;	87	if (substr($line,0,1) == ';') continue;
88	$out[] = substr($line, 0, strrpos($line, ' '));	88	$out[] = substr($line, 0, strrpos($line, ' '));
89		89
90	}	90	}
91	return $out;	91	return $out;
92	}	92	}
93		93
94	function swapEndianness($hex) {	94	function swapEndianness($hex) {
95	return implode('', array_reverse(str_split($hex, 2)));	95	return implode('', array_reverse(str_split($hex, 2)));
96	}	96	}
97		97
98	function crc32_file($filename, $rawOutput = false) {	98	function crc32_file($filename, $rawOutput = false) {
99	$out = bin2hex(hash_file ('crc32b', $filename , true));	99	$out = bin2hex(hash_file ('crc32b', $filename , true));
100	if (hash('crc32b', 'TEST') == 'b893eaee') {	100	if (hash('crc32b', 'TEST') == 'b893eaee') {
101	// hash_file() in PHP 5.2 has the wrong Endianess!	101	// hash_file() in PHP 5.2 has the wrong Endianess!
102	// https://bugs.php.net/bug.php?id=47467	102	// https://bugs.php.net/bug.php?id=47467
103	$out = swapEndianness($out);	103	$out = swapEndianness($out);
104	}	104	}
105	return $out;	105	return $out;
106	}	106	}
107		107
108	# ---	108	# ---
109		109
110	$show_verbose = false;	110	$show_verbose = false;
111	$dir = '';	111	$dir = '';
112		112
113	for ($i=1; $i<$argc; $i++) {	113	for ($i=1; $i<$argc; $i++) {
114	if ($argv[$i] == '-v') {	114	if ($argv[$i] == '-v') {
115	$show_verbose = true;	115	$show_verbose = true;
116	} else {	116	} else {
117	$dir = $argv[$i];	117	$dir = $argv[$i];
118	}	118	}
119	}	119	}
120		120
121	if (empty($dir)) {	121	if (empty($dir)) {
122	echo "Syntax: $argv[0] [-v] <directory>\n";	122	echo "Syntax: $argv[0] [-v] <directory>\n";
123	exit(2);	123	exit(2);
124	}	124	}
125		125
126	if (!is_dir($dir)) {	126	if (!is_dir($dir)) {
127	echo "Directory not found\n";	127	echo "Directory not found\n";
128	exit(1);	128	exit(1);
129	}	129	}
130		130
131	_rec($dir);	131	_rec($dir);
132		132
133	if ($show_verbose) echo "Done.\n";	133	if ($show_verbose) echo "Done.\n";
134		134

Subversion Repositories checksum-tools

checksum-tools/trunk/PHP/sfv_generate.php – Rev 11 → 12