php 如何将ip地址转换成真实地址代码

define('WEB_ROOT',dirname(__FILE__)); echo convertip('111.63.244.69','full');

function convertip($ip,$integrity='simple'){ $return=''; $integrity=in_array($integrity,array('simple','full'))?$integrity:'simple'; if(preg_match("/^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/",$ip)){ $iparray=explode('.',$ip); if($iparray[0]==10||$iparray[0]==127||($iparray[0]==192&&$iparray[1]==168)||($iparray[0]==172&&($iparray[1]>=16&&$iparray[1]<=31))){ $return = '- LAN'; }elseif($iparray[0]>255||$iparray[1]>255||$iparray[2]>255||$iparray[3]>255){ $return='- Invalid IP Address'; }else{ $tinyipfile=WEB_ROOT.'./tinyipdata.dat';//IP==地址数据包精简版 $fullipfile=WEB_ROOT.'./wry.dat';//IP==地址数据包完整版 if($integrity=='simple'&&@file_exists($tinyipfile)){ $return=convertip_tiny($ip,$tinyipfile); }elseif(@file_exists($fullipfile)){ $return=convertip_full($ip,$fullipfile); } } } return $return; }

function convertip_tiny($ip,$ipdatafile){ static $fp=NULL,$offset=array(),$index=NULL; $ipdot=explode('.',$ip); $ip=pack('N',ip2long($ip)); $ipdot[0]=(int)$ipdot[0]; $ipdot[1]=(int)$ipdot[1]; if($fp===NULL&&$fp=@fopen($ipdatafile,'rb')){ $offset=@unpack('Nlen',@fread($fp,4)); $index=@fread($fp,$offset['len']-4); }elseif($fp==FALSE){ return '- Invalid IP data file'; } $length=$offset['len']-1028; $start =@unpack('Vlen',$index[$ipdot[0]*4].$index[$ipdot[0]*4+1].$index[$ipdot[0]*4+2].$index[$ipdot[0]*4+3]); for ($start=$start['len']*8+1024;$start<$length;$start+=8){ if ($index{$start}.$index{$start+1}.$index{$start+2}.$index{$start+3}>=$ip){ $index_offset=@unpack('Vlen',$index{$start+4}.$index{$start+5}.$index{$start+6}."\x0"); $index_length=@unpack('Clen',$index{$start+7}); break; } } @fseek($fp,$offset['len']+$index_offset['len']-1024); if($index_length['len']){ return '- '.@fread($fp,$index_length['len']); }else{ return '- Unknown'; } }

function convertip_full($ip,$ipdatafile){ if(!$fd=@fopen($ipdatafile,'rb')){ return '- Invalid IP data file'; } $ip=explode('.',$ip); $ipNum=$ip[0]*16777216+$ip[1]*65536+$ip[2]*256+$ip[3]; if(!($DataBegin=fread($fd,4))||!($DataEnd=fread($fd,4))) return; @$ipbegin=implode('',unpack('L',$DataBegin)); if($ipbegin<0) $ipbegin+=pow(2,32); @$ipend=implode('',unpack('L',$DataEnd)); if($ipend<0) $ipend+=pow(2,32); $ipAllNum=($ipend-$ipbegin)/7+1; $BeginNum=$ip2num=$ip1num=0; $ipAddr1=$ipAddr2=''; $EndNum=$ipAllNum; while($ip1num>$ipNum||$ip2num<$ipNum){ $Middle= intval(($EndNum+$BeginNum)/2); fseek($fd,$ipbegin+7*$Middle); $ipData1=fread($fd,4); if(strlen($ipData1)<4){ fclose($fd); return '- System Error'; } $ip1num=implode('',unpack('L',$ipData1)); if($ip1num<0) $ip1num+=pow(2,32); if($ip1num>$ipNum){ $EndNum=$Middle; continue; } $DataSeek=fread($fd,3); if(strlen($DataSeek)<3){ fclose($fd); return '- System Error'; } $DataSeek=implode('',unpack('L',$DataSeek.chr(0))); fseek($fd,$DataSeek); $ipData2=fread($fd,4); if(strlen($ipData2)<4){ fclose($fd); return '- System Error'; } $ip2num=implode('',unpack('L',$ipData2)); if($ip2num<0) $ip2num+=pow(2,32); if($ip2num<$ipNum){ if($Middle==$BeginNum){ fclose($fd); return '- Unknown'; } $BeginNum=$Middle; } } $ipFlag=fread($fd,1); if($ipFlag==chr(1)){ $ipSeek=fread($fd,3); if(strlen($ipSeek)<3){ fclose($fd); return '- System Error'; } $ipSeek=implode('',unpack('L',$ipSeek.chr(0))); fseek($fd,$ipSeek); $ipFlag=fread($fd,1); } if($ipFlag==chr(2)){ $AddrSeek=fread($fd,3); if(strlen($AddrSeek)<3){ fclose($fd); return '- System Error'; } $ipFlag=fread($fd,1); if($ipFlag==chr(2)){ $AddrSeek2=fread($fd,3); if(strlen($AddrSeek2)<3){ fclose($fd); return '- System Error'; } $AddrSeek2=implode('',unpack('L',$AddrSeek2.chr(0))); fseek($fd,$AddrSeek2); }else{ fseek($fd,-1,SEEK_CUR); } while(($char=fread($fd,1)) != chr(0)) $ipAddr2 .= $char; $AddrSeek=implode('',unpack('L',$AddrSeek.chr(0))); fseek($fd,$AddrSeek); while(($char=fread($fd,1)) != chr(0)) $ipAddr1 .= $char; }else{ fseek($fd,-1,SEEK_CUR); while(($char=fread($fd,1)) != chr(0)) $ipAddr1 .= $char; $ipFlag=fread($fd,1); if($ipFlag==chr(2)){ $AddrSeek2=fread($fd,3); if(strlen($AddrSeek2)<3){ fclose($fd); return '- System Error'; } $AddrSeek2=implode('',unpack('L',$AddrSeek2.chr(0))); fseek($fd,$AddrSeek2); }else{ fseek($fd,-1,SEEK_CUR); } while(($char=fread($fd,1)) != chr(0)) $ipAddr2 .= $char; } fclose($fd); if(preg_match('/http/i',$ipAddr2)){ $ipAddr2=''; } $ipaddr="$ipAddr1 $ipAddr2"; $ipaddr=preg_replace('/CZ88\.NET/is','',$ipaddr); $ipaddr=preg_replace('/^\s*/is','',$ipaddr); $ipaddr=preg_replace('/\s*$/is','',$ipaddr); if(preg_match('/http/i',$ipaddr)||$ipaddr==''){ $ipaddr='- Unknown'; } return '- '.$ipaddr; }