本站文章均备注出处或说明,因本人自用,概不接受删除要求!

WordPress显示评论者IP的归属地及运营商信息

建站随笔 xiechangan123 1213℃ 7评论

让WordPress显示评论用户的IP地址。网上有很多类似的文章,本文亲测以后整理一下,发出来!

如何让留言者IP地址显示对应的物理地址呢?首先你得需要一个IP数据库!我们本文用到的是纯真数据库,纯真数据库下载地址:链接:https://share.weiyun.com/5bxqOpv 密码:g69cda

更新记录

更新日期:2019-08-25
IP数据记录:526814条
数据库大小:9.9M

更新日期:2019-01-20
IP数据记录:472038条
数据库大小:9M

首先把纯真数据库下载,上传至你的当前主题目录下。然后在当前主题functions.php文件中添加一下代码,引用数据库!

//显示IP地址   
function convertip($ip) {      

    $dat_path = TEMPLATEPATH.'/qqwry.dat';      
    if(!$fd = @fopen($dat_path, 'rb')){      
        return 'IP数据库文件不存在或者禁止访问或者已经被删除!';      
    }      
    $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 '系统出错!';      
        }      
        $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 '系统出错!';      
        }      
        $DataSeek = implode('', unpack('L', $DataSeek.chr(0)));      
        fseek($fd, $DataSeek);      
        $ipData2 = fread($fd, 4);      
        if(strlen($ipData2) < 4) {      
            fclose($fd);      
            return '系统出错!';      
        }      
        $ip2num = implode('', unpack('L', $ipData2));      
        if($ip2num < 0) $ip2num += pow(2, 32);      
        if($ip2num < $ipNum) {      
            if($Middle == $BeginNum) {      
                fclose($fd);      
                return '未知';      
            }      
            $BeginNum = $Middle;      
        }      
    }      
    $ipFlag = fread($fd, 1);      

    if($ipFlag == chr(1)) {      
        $ipSeek = fread($fd, 3);      
        if(strlen($ipSeek) < 3) {      
            fclose($fd);      
            return '系统出错!';      
        }      
        $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 '系统出错!';      
        }      
        $ipFlag = fread($fd, 1);      
        if($ipFlag == chr(2)) {      
            $AddrSeek2 = fread($fd, 3);      
            if(strlen($AddrSeek2) < 3) {      
                fclose($fd);      
                return '系统出错!';      
            }      
            $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 '系统出错!';      
            }      
            $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 = '未知';      
    }      
    $ipaddr = iconv('gbk', 'utf-8//IGNORE', $ipaddr);       

    if( $ipaddr != '  ' )      
        return $ipaddr;      

    else     
        $ipaddr = '评论者来自火星!';      
        return $ipaddr;      
}

PS:以上带有 flag字段的好像没多大用处,等我有时间剔除

添加以上代码之后,在你的评论内容引用的地方,欲思主题是在functions.php文件中添加如下函数:

echo convertip(get_comment_author_ip());

添加位置如下图红框处

详情:https://www.ziyouwu.com/archives/1078.html

转载请注明:复仇的撒旦 » WordPress显示评论者IP的归属地及运营商信息

喜欢 (0)
发表我的评论
取消评论

表情

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址
(7)个小伙伴在吐槽
  1. 早上好~
    Haha2019-01-31 10:50 Internet Explorer 6 Internet Explorer 6 Windows Server 2003 Windows Server 2003日本 东京Choopa数据中心回复
    • 早上好,还在用Server 2003啊,不怕被爆么
      xiechangan1232019-01-31 10:57 Microsoft Edge 18 Microsoft Edge 18 Windows 10 Windows 10安徽省合肥市巢湖市 电信回复
  2. 为什么
    为什么2019-01-31 12:20 Google Chrome 67 Google Chrome 67 Windows 10 Windows 10江西省上饶市 电信回复
    • 感谢来访
      xiechangan1232019-01-31 12:22 Microsoft Edge 18 Microsoft Edge 18 Windows 10 Windows 10美国 加利福尼亚州洛杉矶ColoCrossing数据中心回复
  3. 测试1,看看地址!
    xiechangan1232020-05-22 08:50 Microsoft Edge 81 Microsoft Edge 81 Windows 10 Windows 10安徽省合肥市巢湖市 电信回复
  4. 测试2,看看地址!
    xiechangan1232020-05-22 08:52 Microsoft Edge 81 Microsoft Edge 81 Windows 10 Windows 10新加坡 阿里云回复
  5. 测试3,看看地址!
    xiechangan1232020-05-22 08:53 Microsoft Edge 81 Microsoft Edge 81 Windows 10 Windows 10美国 亚利桑那州凤凰城Oracle云计算数据中心回复