105 lines
3.3 KiB
Text
105 lines
3.3 KiB
Text
<?
|
|
/*
|
|
Whois2.php PHP classes to conduct whois queries
|
|
|
|
Copyright (C)1999,2000 easyDNS Technologies Inc. & Mark Jeftovic
|
|
|
|
Maintained by Mark Jeftovic <markjr@easydns.com>
|
|
|
|
For the most recent version of this package:
|
|
|
|
http://www.easydns.com/~markjr/whois2/
|
|
|
|
This program is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public License
|
|
as published by the Free Software Foundation; either version 2
|
|
of the License, or (at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
*/
|
|
|
|
/* chnic.whois 1.1 David Saez Padros <david@ols.es> For .ch & .li domains */
|
|
/* 8/1/2002 1.2 Added status (active/inactive) and corrected error */
|
|
/* for inactive domains */
|
|
/* (like creart.ch) thanx to Roger Fichmann */
|
|
/* 24/7/2002 2.0 David Saez - updated to new object model */
|
|
|
|
if(!defined("__CHNIC_HANDLER__")) define("__CHNIC_HANDLER__",1);
|
|
|
|
class chnic extends Whois {
|
|
|
|
function chnic($data)
|
|
{
|
|
$this->result=$this->parse($data);
|
|
}
|
|
|
|
function parse ($data_str)
|
|
{
|
|
|
|
$items=array( "owner.organization" => "Holder of domain name:",
|
|
"domain.name" => "Domain name:",
|
|
"domain.created" => "Date of last registration:",
|
|
"domain.changed" => "Date of last modification:",
|
|
"tech.organization" => "Technical contact:"
|
|
);
|
|
|
|
|
|
$r["rawdata"]=$data_str["rawdata"];
|
|
|
|
$r["regrinfo"]=array();
|
|
$r["regrinfo"]["domain"]=array();
|
|
|
|
while (list($key, $val)=each($data_str["rawdata"]))
|
|
{ $val=trim($val);
|
|
|
|
if ($val!="")
|
|
{ if ($val=="Name servers:")
|
|
{ while (list($key, $val)=each($data_str["rawdata"]))
|
|
{ $val=trim($val);
|
|
if ($val=="") break;
|
|
$parts=explode(" ",$val);
|
|
$r["regrinfo"]["domain"]["nserver"][]=$parts[0];
|
|
}
|
|
continue;
|
|
}
|
|
|
|
reset($items);
|
|
|
|
while (list($field, $match)=each($items))
|
|
if (strstr($val,$match))
|
|
{ list($key, $val)=each($data_str["rawdata"]);
|
|
$parts=explode(".",$field);
|
|
$var="\$r[\"regrinfo\"]";
|
|
while (list($fn,$mn)=each($parts))
|
|
if ($mn=="")
|
|
$var=$var."[]";
|
|
else $var=$var."[\"".$mn."\"]";
|
|
|
|
if ($val!="")
|
|
eval($var."=\"".$val."\";");
|
|
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (!empty($r["regrinfo"]["domain"]))
|
|
{ $r["regyinfo"]=array("whois"=>"whois.nic.ch","referrer"=>"www.nic.ch",
|
|
"registrar"=>"SWITCH Domain Name Registration");
|
|
$r["regrinfo"]["registered"]="yes";
|
|
}
|
|
else { $r="";
|
|
$r["regrinfo"]["registered"]="no";
|
|
}
|
|
|
|
return($r);
|
|
}
|
|
|
|
}
|