眼看著新浪IP庫就這么“死掉了”，心情很是不好啊，新浪IP庫可以說是IP庫中適用最方便的，前面361模板介紹過《融合新浪IP庫和搜狐IP庫獲取訪客IP地址和IP歸屬地信息并無刷新顯示》，就是新浪IP庫最常用的通過IP實(shí)現(xiàn)不同的IP訪問跳轉(zhuǎn)到不同的頁面。但是現(xiàn)在實(shí)現(xiàn)這樣個(gè)功能就麻煩多了，雖然我們也有搜狐IP庫，淘寶IP庫等等，但是都不是很方便，今天361模板給大家介紹的是繞過遠(yuǎn)程的IP庫，適用純真庫實(shí)現(xiàn)。PHP加純真數(shù)據(jù)庫實(shí)現(xiàn)根據(jù)IP跳轉(zhuǎn)到不同網(wǎng)頁。

直接上代碼：

<?header("content-type:text/html;charset=utf-8");   //php獲取ip的算法$user_IP = ($_SERVER["HTTP_VIA"]) ? $_SERVER["HTTP_X_FORWARDED_FOR"] : $_SERVER["REMOTE_ADDR"];$user_IP = ($user_IP) ? $user_IP : $_SERVER["REMOTE_ADDR"];//echo $user_IP;//===================================//// 功能：IP地址獲取真實(shí)地址函數(shù)// 參數(shù)：$ip - IP地址// 作者：[Discuz!] (C) Comsenz Inc.////===================================function convertip($ip) {    //IP數(shù)據(jù)文件路徑，請(qǐng)根據(jù)情況自行修改    $dat_path = 'QQWry.dat';    //檢查IP地址    if(!ereg("^([0-9]{1,3}.){3}[0-9]{1,3}$", $ip)){        return 'IP Address Error';    }    //打開IP數(shù)據(jù)文件    if(!$fd = @fopen($dat_path, 'rb')){        return 'IP date file not exists or access denied';    }    //分解IP進(jìn)行運(yùn)算，得出整形數(shù)    $ip = explode('.', $ip);    $ipNum = $ip[0] * 16777216 + $ip[1] * 65536 + $ip[2] * 256 + $ip[3];    //獲取IP數(shù)據(jù)索引開始和結(jié)束位置    $DataBegin = fread($fd, 4);    $DataEnd = fread($fd, 4);    $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 = 0;    $EndNum = $ipAllNum;    //使用二分查找法從索引記錄中搜索匹配的IP記錄    while($ip1num>$ipNum || $ip2num<$ipNum) {        $Middle= intval(($EndNum + $BeginNum) / 2);        //偏移指針到索引位置讀取4個(gè)字節(jié)        fseek($fd, $ipbegin + 7 * $Middle);        $ipData1 = fread($fd, 4);        if(strlen($ipData1) < 4) {            fclose($fd);            return 'System Error';        }        //提取出來的數(shù)據(jù)轉(zhuǎn)換成長(zhǎng)整形，如果數(shù)據(jù)是負(fù)數(shù)則加上2的32次冪        $ip1num = implode('', unpack('L', $ipData1));        if($ip1num < 0) $ip1num += pow(2, 32);        //提取的長(zhǎng)整型數(shù)大于我們IP地址則修改結(jié)束位置進(jìn)行下一次循環(huán)        if($ip1num > $ipNum) {            $EndNum = $Middle;            continue;        }        //取完上一個(gè)索引后取下一個(gè)索引        $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);    //最后做相應(yīng)的替換操作后返回結(jié)果    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;}?><script language="javascript">var sf='<?echo convertip($user_IP);?>';if(sf.indexOf("江蘇")>=0){        window.location.href="/plus/list.php?tid=28&len=江蘇";}else if(sf.indexOf("北京")>=0){        window.location.href="/plus/list.php?tid=28&len=北京";}else if(sf.indexOf("天津")>=0){        window.location.href="/plus/list.php?tid=28&len=天津";}else if(sf.indexOf("河北")>=0){        window.location.href="/plus/list.php?tid=28&len=河北";}else if(sf.indexOf("山西")>=0){        window.location.href="/plus/list.php?tid=28&len=山西";}else if(sf.indexOf("內(nèi)蒙古")>=0){        window.location.href="/plus/list.php?tid=28&len=內(nèi)蒙古";}else if(sf.indexOf("上海")>=0){        window.location.href="/plus/list.php?tid=28&len=上海";}else if(sf.indexOf("浙江")>=0){        window.location.href="/plus/list.php?tid=28&len=浙江";}else if(sf.indexOf("山東")>=0){        window.location.href="/plus/list.php?tid=28&len=山東";}else if(sf.indexOf("安徽")>=0){        window.location.href="/plus/list.php?tid=28&len=安徽";}else if(sf.indexOf("遼寧")>=0){        window.location.href="/plus/list.php?tid=28&len=遼寧";}else if(sf.indexOf("吉林")>=0){        window.location.href="/plus/list.php?tid=28&len=吉林";}else if(sf.indexOf("黑龍江")>=0){        window.location.href="/plus/list.php?tid=28&len=黑龍江";}else if(sf.indexOf("湖北")>=0){        window.location.href="/plus/list.php?tid=28&len=湖北";}else if(sf.indexOf("湖南")>=0){        window.location.href="/plus/list.php?tid=28&len=湖南";}else if(sf.indexOf("河南")>=0){        window.location.href="/plus/list.php?tid=28&len=河南";}else if(sf.indexOf("江西")>=0){        window.location.href="/plus/list.php?tid=28&len=江西";}else if(sf.indexOf("廣東")>=0){        window.location.href="/plus/list.php?tid=28&len=廣東";}else if(sf.indexOf("廣西")>=0){        window.location.href="/plus/list.php?tid=28&len=廣西";}else if(sf.indexOf("海南")>=0){        window.location.href="/plus/list.php?tid=28&len=海南";}else if(sf.indexOf("福建")>=0){        window.location.href="/plus/list.php?tid=28&len=福建";}else if(sf.indexOf("四川")>=0){        window.location.href="/plus/list.php?tid=28&len=四川";}else if(sf.indexOf("重慶")>=0){        window.location.href="/plus/list.php?tid=28&len=重慶";}else if(sf.indexOf("貴州")>=0){        window.location.href="/plus/list.php?tid=28&len=貴州";}else if(sf.indexOf("云南")>=0){        window.location.href="/plus/list.php?tid=28&len=云南";}else if(sf.indexOf("西藏")>=0){        window.location.href="/plus/list.php?tid=28&len=西藏";}else if(sf.indexOf("陜西")>=0){        window.location.href="/plus/list.php?tid=28&len=陜西";}else if(sf.indexOf("甘肅")>=0){        window.location.href="/plus/list.php?tid=28&len=甘肅";}else if(sf.indexOf("新疆")>=0){        window.location.href="/plus/list.php?tid=28&len=新疆";}else if(sf.indexOf("青海")>=0){        window.location.href="/plus/list.php?tid=28&len=青海";}else if(sf.indexOf("寧夏")>=0){        window.location.href="/plus/list.php?tid=28&len=寧夏";}else if(sf.indexOf("香港")>=0){        window.location.href="/plus/list.php?tid=28&len=香港";}else if(sf.indexOf("澳門")>=0){        window.location.href="/plus/list.php?tid=28&len=澳門";}else if(sf.indexOf("臺(tái)灣")>=0){        window.location.href="/plus/list.php?tid=28&len=臺(tái)灣";}else{        window.location.href="/plus/list.php?tid=28";}</script>

因?yàn)?61模板給用戶做的是UTF-8的頁面，所有這里也給大家分享一份很少見的純真的UTF-8的數(shù)據(jù)庫。

鏈接: https://pan.baidu.com/s/1U-OsdkotB1IPyvY3zTX3YQ    密碼: bxfv