phpWhois.org/ipw.whois

<?
/*
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.
*/

/* ipw.whois	1.00	David Saez 12/07/2001 */
/*              1.01    David Saez 06/07/2002  Added support for */
/*                      BRNIC, KRNIC, TWNIC and LACNIC */

/* Check with 218.165.121.114 (apnic)  */
/*            62.97.102.115   (ripe)   */
/*            207.217.120.54  (arin)   */
/*            200.165.206.74  (brnic)  */
/*            210.178.148.129 (krnic)  */
/*	      200.44.33.31    (lacnic) */

if (!defined("__IPW_HANDLER__")) define("__IPW_HANDLER__",1);

class ipw extends Whois {

	var $HANDLER_VERSION = "1.0";

	var $REGISTRARS = array(
		"European Regional Internet Registry/RIPE NCC" => "whois.ripe.net",
		"RIPE Network Coordination Centre" => "whois.ripe.net",
        	"Asia Pacific Network Information Center" => "whois.apnic.net",
	        "Asia Pacific Network Information Centre" => "whois.apnic.net",
	 	"Latin American and Caribbean IP address Regional Registry" => "whois.lacnic.net"
			);

	var $HANDLERS = array( "whois.krnic.net"=>"krnic",
			       "whois.apnic.net"=>"apnic",
			       "whois.ripe.net" =>"ripe",
			       "whois.arin.net" =>"arin",
			       "whois.registro.br" =>"bripw",
			       "whois.lacnic.net"=>"lacnic"
			     );	

function ipw ($data,$query) {

$this->Query=$query;

if (!isset($this->result["rawdata"])) { $this->result["rawdata"] = array(); }

$this->result["regyinfo"]=array();
$this->result["regyinfo"]["registrar"]="American Registry for Internet Numbers (ARIN)";

reset($this->REGISTRARS);

$rawdata=$data["rawdata"];
$orgname=trim($rawdata[0]);
if ($orgname=="") $orgname=trim($rawdata[1]);

while (list($string, $whois)=each($this->REGISTRARS))
       if (strstr($orgname,$string)!="")
          { $this->Query["server"]=$whois;
            $this->result["regyinfo"]["registrar"]=$string;
            break;
          } 

switch ($this->Query["server"])
       { case "whois.apnic.net": 
         $rawdata=$this->Lookup($this->Query["string"]);
	 $rawdata=$rawdata["rawdata"];

         while (list($ln,$line)=each($rawdata))
               { if (strstr($line,"KRNIC whois server at whois.krnic.net"))
                    { $this->Query["server"]="whois.krnic.net";
                      $this->result["regyinfo"]["registrar"]="Korea Network Information Center (KRNIC)";
                      $rawdata=$this->Lookup($this->Query["string"]);
		      $rawdata=$rawdata["rawdata"];	
	              break;
                    }
               } 
         break;

         case "whois.arin.net":
         $newquery="";

         while (list($ln,$line)=each($rawdata))
               { $s=strstr($line,"(NETBLK-");
                 if ($s!="") 
                    { $newquery=substr(strtok($s,") "),1);
                      break;
                    }

		 $s=strstr($line,"(NET-");
                 if ($s!="")
                    { $newquery=substr(strtok($s,") "),1);
                      break;
                    }
               } 
       
         if ($newquery!="") $this->result["regyinfo"]["netname"]=$newquery;

         if (strstr($newquery,"BRAZIL-BLK"))
            { $this->Query["server"]="whois.registro.br";
              $this->result["regyinfo"]["registrar"]="Comite Gestor da Internet no Brasil";
              $rawdata=$this->Lookup($this->Query["string"]);
	      $rawdata=$rawdata["rawdata"];
	      $newquery="";
            }	

        if ($newquery!="") 
           { $rawdata=$this->Lookup("!".$newquery);
             $rawdata=$rawdata["rawdata"];
           }
        break;

	case "whois.lacnic.net":
	$rawdata=$this->Lookup($this->Query["string"]);
	$rawdata=$rawdata["rawdata"];

	while (list($ln,$line)=each($rawdata))
               { $s=strstr($line,"at whois.registro.br and at");
	         if ($s!="")
 		    { $this->Query["server"]="whois.registro.br";
                      $this->result["regyinfo"]["registrar"]="Comite Gestor da Internet do Brazil";
                      $rawdata=$this->Lookup($this->Query["string"]);
		      $rawdata=$rawdata["rawdata"];
		      break;
                    }
	       }
	break;

        default:
        $rawdata=$this->Lookup($this->Query["string"]);
	$rawdata=$rawdata["rawdata"];
     }

$this->result["rawdata"]=$rawdata;
$this->result["regyinfo"]["whois"]=$this->Query["server"];

if ($this->HANDLERS[$this->Query["server"]]!="")
    $this->Query["handler"] = $this->HANDLERS[$this->Query["server"]];

if (!empty($this->Query["handler"])) 
   { $this->Query["file"]=sprintf("%s.whois", $this->Query["handler"]);
     $this->result["regrinfo"]=$this->Process($this->result["rawdata"]);
   }

$this->result["regrinfo"]["network"]["host_ip"]=$this->Query["host_ip"];
$this->result["regrinfo"]["network"]["host_name"]=$this->Query["host_name"];

}

}
?>