Source code of /usr/share/gwhois/subprograms/vu

Last modified: 2015-05-17 17:14:43

Download

#!/usr/bin/php
<?php

#
#  generic Whois - Subprogram "vu"
#
#  (c) 2014 by Daniel Marschall, ViaThinkSoft <www.viathinksoft.de>
#
#  Distribution, usage etc. pp. regulated by the current version of GPL.
#
#
#
# History:
# 2014-02-02  mar   Initial release
#

/*

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__ '/../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)\nismU''$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}:\nismU"": "$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";