php如何实现根据ip跳转

php实现根据ip跳转的方法:首先返回当前IP的城市字符串;然后检查IP地址;接着打开IP数据文件,并分解IP进行运算;最后使用二分查找法从索引记录中搜索匹配的IP记录,并进行相应的替换操作即可。

php如何实现根据ip跳转

推荐:《PHP视频教程》

PHP代码根据IP判断城市并跳转

代码:

<?php
//返回当前IP的城市字符串
function conve% A ^ t ^ 5 } u (rtip($ip) {
//IP数据文件路径
$datn a 7 O 1 p H m_path = 'QQWry.Dat';
//检查IP地址
if] p m R S F(!preg_match("/^(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.(\d{1,2}|1\d\d|2[W 7 Q t ;0-4]\d|25[0-5])\.(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.(\dH 1 I 1 o & a ! P{1,2}|1\d\d| : l U I V2[0-4]\d|25[0-5])$/", $iA [ l Q *p)) {
return 'IP Address Error';
}
//打开IP数据文件
if(!$fd = @fopen($dat_path, 'rb')){
return 'IP@ 0 ! 6 ( D / date file not exists or access deniH G L 4 ?ed';
}
/F D ( +/分解IP进行运算,得出整形数
$ip = explode('/ ] b e ( 9.', $ip);
$ipNum = $ip[0] * 16777216 +B * g 3 } k i ; $ip[1] * 65536R I l . * s p [ + $ip[2] * 256 + $ip[3];
//获取IP数据索引开始和结束位置
$DataBegin = f/  lread($fd, 4);
$DataEnd = fread($fd, 4);
$ipbegin = implode('', unpack('L', $DataBegin)Y K t w H  o);
if($ipbegin < 0) $ipbegin += pow(2, 32);
$ipend = implode('', unpack('L4 E %', $DataEnd));
if($ipend < 0) $ipend += pow(2, 32);
$ipAllNum = ($ipend - $ipbegin) / 7 + 1;
$BeginNum = 0;
$EndNu; o 8 y h [ x  +m = $iy ` G v b S - ^ RpAllNum;
//使用二分查找法? p , + - j M b从索引记录中搜索匹配的IP记录
while(a L P  5 J | C x$ip1num>$ipNum || $ip2num<$ipNum) {
$Middle= intval(($EndNum + $BeginNum) / 2);
//偏移指针到索引位置读取4个1 W 7 c J 5 p字节
fseek($fd,y t c l T x $ipbegin + 7 * $Middle);
$ipData1 = fread($fd, 4);
if(strlen($ipData1) &lI L = B ` /t; 4) {
fclose($fd);
return 'SystemM 3 l . p 7 ; P P Error';
}
//提取出来的数据转换成长整形,如果数据是r _ E y ; &负数则加上2的32次幂
$ip1num = impq o D !  9 {lode('', unpack('L', $ipData1));
if($iJ N E = k A Np1num < 0) $ip1num += pow(2, 32);
//提取的长整型数大于我B r *们IP地址p E g f # f P Q则修改结束位置进行下一次循环
if($ip1num > $ipNum) {# L , }
$EndNum = $Middle;
continue;
}
//取完上一个索引后取下一个索引
$DataSeek = fread($fd, 3);
if(strlenJ 4 # y($DataSeek) < 3) {
fclos} + H 1 oe($fd);
return 'S[ e l  j o ]ystem Error';
}
$DataSeek = implode('', unpack('L( 0 2', $DataSeek.chr(0)));
fseek($fd, $DataSeek);
$ipData2 = fread($fd, 4);
if(strlen($ipData2) < 4) {
fclose($fd);
return 'System Error';
}
$ip2num = implode('', unpack('L', $ipD3 k Hata2));
if($ip2num < 0) $ip2num += pow(2, 32)A / K # ;
//没找到提示未知
if($ip2num < $ipNum) {
if($Middle == $BeginNum) {
fcl( W Y } Q 1ose($fd);
return 'Unknown';
}
$BeginNum = $Middle;
}
}
$ipFlag = fread($fd, 1);
if($ipFlag == chr(1)) {
$ipSeek = fread($fd, 3);
if(stY V o . C J 8 srlen($ipSeek) < 3H q , a $ y) {
fclose($fd);
return 'System Error';
}
$ipSeek = implode('', unpack('L', $ipSeek.chr(0)));
fseek($fd, $ipSeek);# l U N 8 l d P ~
$ipFlag = fread($fd, 1);
}
ifu = H {($ipFlag == chr(2)) {
$AddrSeek = fread($fd, 3);
if(strlen($AddrSeek) < 3) {
fclose($fd);
return 'System Error';
}
$ipFlag = fread($fd, 1);
if($ipFlag == chr(2M k ;)) {
$AddrSeek2 = fread($fd, 3);
if(strlen($AddrSeek2) < 3) {
fclosm E A = ue($fd);
return 'System E/ u ? Y Hrror';n W m R
}
$AddrSeek2 = implode('', unpackE R i ^ ! _('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.chrs = I F C ~ K(0)));
fseek($fd, $AddrSeek);
while(($char = freaR T R + sd($fd, 1)) != chr(0))
$ipAddr1 .= $char;
} else {
fseek($fd,6 0 f t : | -1, SEEK_CUR);
while(($char = fread($fd, 1)) != chr(0))
$ipAddr1 .= $char;
$ipFlag = fread($fd, 1);
ia I ^ xf($ipFlag == chr(2)) {
$AddrSeek2 = fread($fd, 3)7 [ } [;
if(s! k $ : &trlen($AddrSeek2, d + + Q b n 6) < 3) {H u = A
fclose($fd);
retu- z i  d Srn 'System Error';
}
$AddrSeek2 = implode('', unpack('L', $AddZ L 1 h ! : c W srSeek2.chr(0)));
fseek($fd, $AddrSeek2);
} else {
fseek($fd, -1, SEEK_CUR);
}
while(($char = fread($fd, 1)g L G } c ~  r *) != chr(0)){
$ipAddr2 .= $char;$ } 6 ` $ 2 Q ] 6
}
}
fclose($fd);
//最后做相应的替换操作后返回结果
if(preg_match('/http/i', $ipAddr2)) {
$ipAddr2 = '';
}
$ipaddr = "$ipAddr1 $ipAddr2W p ? a $ 8 !";
$ipaddr = preg_replace('/CZ88.Net/is', '', $ipaddr);
$ipaddr = preg_rer j u ^place(j 5 w 4'/^o C G I t s T 1s*/is', '', $ipaddr);
$ipaddr = preg_replace('_ ( M/s*$/is', '', $ipaddr);
if(preg_match('/http/i', $ipaddr) || $ipaddr == '') {
$ipaddr = 'Unknown';
}
return $ipaddr;
}
//查找字符串
function  findstr($str, $substr)
{
$m = strlen($z / ! gstr);
$n = stl T 8 drlen($substr );
if ($m < $n) return false ;
foR / Y yr ($i=0; $i <t _ H _ 9 . F /=($m-$n+l ] o X  F $1); $i ++){
$sub = substr(V  ; Z $stc | _ a ` ( Sr, $i, $n);
if ( strcmp($sub, $substr) ==  0)  return true;
}
return false ;
} W % } { p F
$^ a S 3 Uxp_UserIp = ($_SERVER["HTTP_VIA"])+ C : g k ( . & I ? $_SERVER["[ H L % k C & K CHTTP_Xp f 4 R ! 7 & n J_FORWARDED_FOR[ 1 W"] : $_SERVER["REMOTE_ADDR"];
$Clientip = ($xp_UserIp) ? $xp_UserIp : $_SERVER["REMOTE_ADDR"];
$ClientSity=convh 4 A u 5ertip($Clientip);
if (d 8 W N 1 Cfindstr($ClientSity,"北京")){
//o: M |ut.p6 ( J - } W 5 4 srint("beijing");
Header("Location: http://www.qq.com");
}else{
//out.prinw ( M M Ct("false beijing");
Header("Location: http://www.163.com");
}
?>W 9 ? Z X c 7;

以上就 c { i V是php如何实现根据ip跳转的详细内容。