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. */ /* uknic.whois 1.2 David Saez Padros */ /* Fixed detection of non-existant domains */ /* uknic.whois 1.3 8/1/2002 Added status (active/inactive/detagged) */ /* and corrected error for detagged domains */ /* (like blue.co.uk) thanx to Adam Greedus */ /* uknic.whois 1.4 16/10/2002 Updated for new Nominet whois output */ /* also updated for common object model */ /* uknic.whois 1.5 03/03/2003 minor fixes */ if(!defined("__UKNIC_HANDLER__")) define("__UKNIC_HANDLER__",1); class uknic extends Whois { function uknic($data) { $this->result=$this->parse($data); } function parse ($data_str) { $items=array( "owner.organization" => "Registrant:", "owner.address" => "Registrant's Address:", "domain.name" => "Domain Name:", "domain.sponsor" => "Registrant's Agent:", "domain.created" => "Registered on:", "domain.changed" => "Last updated:" ); $r["rawdata"]=$data_str["rawdata"]; while (list($key, $val)=each($data_str["rawdata"])) { $val=trim($val); if ($val!="") { if ($val=="Name servers listed in order:") { while (list($key, $val)=each($data_str["rawdata"])) { if (!($value=trim($val))) break; $r["regrinfo"]["domain"]["nserver"][]=$value; } break; } reset($items); while (list($field, $match)=each($items)) if (strstr($val,$match)) { $v=trim(substr($val,strlen($match))); if ($v=="") { $v=each($data_str["rawdata"]); $v=trim($v["value"]); } $parts=explode(".",$field); $var="\$r[\"regrinfo\"]"; while (list($fn,$mn)=each($parts)) $var=$var."[\"".$mn."\"]"; eval($var."=\"".$v."\";"); break; } } } $r["regyinfo"]["referrer"]="http://www.nic.uk"; $r["regyinfo"]["registrar"]="Nominet UK"; if (!empty($r["regrinfo"]["domain"]["name"])) { $r["regrinfo"]["registered"] = "yes"; if (!empty($r["regrinfo"]["domain"]["nserver"])) $r["regrinfo"]["domain"]["status"]="active"; else { if (strstr($r["regrinfo"]["domain"]["sponsor"],"DETAGGED")) $r["regrinfo"]["domain"]["status"]="detagged"; else $r["regrinfo"]["domain"]["status"]="inactive"; } } else $r["regrinfo"]["registered"] = "no"; return($r); } } ?>