Subversion Repositories vgwhois

Rev

Rev 77 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 77 Rev 88
Line 3... Line 3...
3 
 
 3 
 
4 
#
 4 
#
5 
#  VGWhoIs (ViaThinkSoft Global WhoIs, a fork of generic Whois / gwhois)
 5 
#  VGWhoIs (ViaThinkSoft Global WhoIs, a fork of generic Whois / gwhois)
6 
#  Maintenance / Developer utilities
 6 
#  Maintenance / Developer utilities
7 
#
 7 
#
8 
#  (c) 2012-2019 by Daniel Marschall, ViaThinkSoft <info@daniel-marschall.de>
 8 
#  (c) 2012-2022 by Daniel Marschall, ViaThinkSoft <info@daniel-marschall.de>
9 
#
 9 
#
10 
#  License: https://www.gnu.org/licenses/gpl-2.0.html (GPL version 2)
 10 
#  License: https://www.gnu.org/licenses/gpl-2.0.html (GPL version 2)
11 
#
 11 
#
12 
 
 12 
 
13 
error_reporting(E_ALL | E_NOTICE | E_STRICT | E_DEPRECATED);
 13 
error_reporting(E_ALL | E_NOTICE | E_STRICT | E_DEPRECATED);
Line 27... Line 27...
27 
require_once __DIR__ . '/rirs.inc.php';
 27 
require_once __DIR__ . '/rirs.inc.php';
28 
 
 28 
 
29 
if (USE_IANA_DATA) {
 29 
if (USE_IANA_DATA) {
30 
	echo "IPv4 Preparation: Get IANA delegation file\n";
 30 
	echo "IPv4 Preparation: Get IANA delegation file\n";
31 
 
 31 
 
32 
	$iana_root_data = explode("\n", cached_file(IANA_IPV4_ASSIGNMENTS, CACHE_FILE_DIR));
 32 
	$iana_root_data = explode("\n", $cont = cached_file(IANA_IPV4_ASSIGNMENTS, CACHE_FILE_DIR));
33 
	$iana_root_data = array_map('trim', $iana_root_data);
 33 
	$iana_root_data = array_map('trim', $iana_root_data);
34 
 
 34 
 
- 
 
 35 
	preg_match('@(20\\d\\d\\-\\d\\d\\-\\d\\d)@ismU', $cont, $m);
- 
 
 36 
 
35 
	$iana_root_ver  = trim(str_replace('-', '', $iana_root_data[3]));
 37 
	$iana_root_ver  = trim(str_replace('-', '', $m[1]));
36 
	$iana_root_data = grep($iana_root_data, 'whois.');
 38 
	$iana_root_data = grep($iana_root_data, 'whois.');
37 
}
 39 
}
38 
 
 40 
 
39 
foreach ($rirs as &$rir) {
 41 
foreach ($rirs as &$rir) {
40 
	$step = 0;
 42 
	$step = 0;