五月综合缴情婷婷六月,色94色欧美sute亚洲线路二,日韩制服国产精品一区,色噜噜一区二区三区,香港三级午夜理伦三级三

您現(xiàn)在的位置: 365建站網(wǎng) > 365文章 > PHP轉(zhuǎn)換IP地址到真實(shí)地址

PHP轉(zhuǎn)換IP地址到真實(shí)地址

文章來(lái)源:365jz.com     點(diǎn)擊數(shù):286    更新時(shí)間:2011-02-11 20:47   參與評(píng)論
生在紅旗下長(zhǎng)在春風(fēng)里,長(zhǎng)期浸泡在河蟹社會(huì)里面所以久而久之就有了一些河蟹的思維方式,正好有一段時(shí)間在做一個(gè).NET的網(wǎng)站訪問(wèn)統(tǒng)計(jì)系統(tǒng),順便想著怎么“監(jiān)視”下每一個(gè)留言的博主們的所在地,于是就有了如今下圖所示的根據(jù)獲取到的留言者的IP地址得到留言者所在的地區(qū),當(dāng)然并沒(méi)有河蟹社會(huì)監(jiān)視人民群眾的意思,純屬了解一下各位博主所在的真實(shí)地點(diǎn),萬(wàn)一是個(gè)美女博主不就可以讓我有線索可循。

PHP轉(zhuǎn)換IP地址到真實(shí)地址

  想要把IPv4地址轉(zhuǎn)為真實(shí)的地址,肯定要參考IP數(shù)據(jù)庫(kù),商業(yè)的IP數(shù)據(jù)庫(kù)存儲(chǔ)在關(guān)系型數(shù)據(jù)庫(kù)中,查詢和使用都非常方便,但是成本不是個(gè)人和小公司愿意承受的,所以簡(jiǎn)單應(yīng)用的思路就是利用一些免費(fèi)的IP數(shù)據(jù)庫(kù)或者一些大網(wǎng)站提供的查詢API,他們的數(shù)據(jù)量足夠我們使用了。

  1. 利用純真IP數(shù)據(jù)庫(kù)

  利用本地的QQWry.Dat文件(搜索下載一個(gè)QQWry.Dat 文件放到你的wordpress主題根目錄下),優(yōu)點(diǎn)是查詢速度非常快,缺點(diǎn)是數(shù)據(jù)庫(kù)文件要放在自己的空間內(nèi)并且要偶爾更新數(shù)據(jù)庫(kù)。時(shí)間關(guān)系廢話不多說(shuō),下面是使用這個(gè)文件的函數(shù),如果是在WordPress里面使用這個(gè)功能,把下面的代碼寫入主題下面的functions.php里面,然后在comments-list的輸出<?php echo convertip(get_comment_author_ip()); ?>即可。僅管理員可見(jiàn)話,則調(diào)用代碼<?php if ( is_user_logged_in() ) echo convertip(get_comment_author_ip()); ?>即可。如果是其他程序引用,輸入一個(gè)有效的IPv4地址就可以得到一個(gè)真實(shí)的地址。

以下為引用的內(nèi)容:

function convertip($ip) {
    $dat_path = TEMPLATEPATH.'/QQWry.Dat';
    if(!$fd = @fopen($dat_path, 'rb')){
        return 'IP date file not exists or access denied';
    }
    $ip = explode('.', $ip);
    $ipNum = $ip[0] * 16777216 + $ip[1] * 65536 + $ip[2] * 256 + $ip[3];
    $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;
    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';
    }
    $ipaddr = iconv('gbk', 'utf-8//IGNORE', $ipaddr);
    if( $ipaddr != '  ' )
        return $ipaddr;
    else
        $ipaddr = '地址未知!火星來(lái)客?';
        return $ipaddr;
}

本文作者:未知

如對(duì)本文有疑問(wèn),請(qǐng)?zhí)峤坏浇涣髡搲?,廣大熱心網(wǎng)友會(huì)為你解答!! 點(diǎn)擊進(jìn)入論壇

發(fā)表評(píng)論 (286人查看,0條評(píng)論)
請(qǐng)自覺(jué)遵守互聯(lián)網(wǎng)相關(guān)的政策法規(guī),嚴(yán)禁發(fā)布色情、暴力、反動(dòng)的言論。
昵稱:
最新評(píng)論
------分隔線----------------------------

其它欄目

· 建站教程
· 365學(xué)習(xí)

業(yè)務(wù)咨詢

· 技術(shù)支持
· 服務(wù)時(shí)間:9:00-18:00
365建站網(wǎng)二維碼

Powered by 365建站網(wǎng) RSS地圖 HTML地圖

copyright © 2013-2024 版權(quán)所有 鄂ICP備17013400號(hào)