Subversion Repositories vgwhois

#!/usr/bin/php

<?php

#

#  VGWhoIs (ViaThinkSoft Global WhoIs, a fork of generic Whois / gwhois)

#  Subprogram: vu TLD whois

#

#  (c) 2014 by Daniel Marschall, ViaThinkSoft <info@daniel-marschall.de>

#

#  License: https://www.gnu.org/licenses/gpl-2.0.html (GPL version 2)

#

/*

Official whois server is: vunic.vu

But the page http://www.vunic.vu/whoiss/whois.php

contains following additional information:

- EMail

- Date modified

- Registrar

*/

require_once __DIR__ . '/../../shared/php_includes/common_functions.inc.php';

$domain = isset($argv[1]) ? $argv[1] : '';

if (preg_match('@(.*)((|\.com|\.edu|\.net|\.org)(\.vu))@isU', $domain, $m)) {

	$domain_wotld = $m[1];

	$tld = $m[2];

} else {

	echo "'$domain' is not a valid .vu domain.\n";

	exit(2);

}

$url = 'http://www.vunic.vu/whoiss/process_whois.php';

$post = 'domain='.rawurlencode($domain_wotld).'&ext='.rawurlencode($tld);

$cont = file_get_contents2($url, $post);

$cont = str_replace('</tr>', "\n", $cont);

$cont = html_entity_decode(strip_tags($cont));

// Remove whitespaces at the beginning of each line

$cont = preg_replace('@([\r\n])[ \t]+(\S)@isU', '\\1\\2', $cont);

$cont = trim($cont);

$cont = str_replace("\r", '', $cont);

$ary = explode("\n", $cont);

$cont = '';

foreach ($ary as $a) {

	$a = trim($a);

	if ($a == '') continue;

	$cont .= "$a\n";

}

$cont = preg_replace('@^(Domain|Registrar|Date Created|Date Modified|Expiry Date)\n@ismU', '$1: ', $cont);

$cont = str_replace('DNS Server',

                    "\nDNS Server\n", $cont);

$cont = str_replace('Registrant',

                    "\nRegistrant\n", $cont);

$cont = str_replace('Other results you may like',

                    "\nOther results you may like\n\n", $cont);

$cont = preg_replace("@ {0,1}:\n@ismU", ": ", $cont);

$cont = str_replace(' : ', ': ', $cont);

# ---

$puburl = 'http://www.vunic.vu/whoiss/whois.php';

echo "Information about $domain extracted from $puburl:\n\n";

echo $cont."\n";