统计
  • 建站日期:2019-12-01
  • 文章总数:1668 篇
  • 评论总数:1802 条
  • 分类总数:20 个
  • 最后更新:4月23日
文章 未分类

实现Emlog显示评论者的IP地理位置

程序员阿鑫
首页 未分类 正文
官方推荐

本期EMLOG教程,为你的评论区增加 已评论者的IP地理位置显现 也不算什么有用的功能 想为你的博客加上这个小功能的 那就持续阅读哦 不想加的出门右拐 不废话了 直接开始吧

第一步:你的模版/module.php增加如下代码 

<?php
//评论IP显示   
       function convertip($ip) {     
       $dat_path = EMLOG_ROOT.'/ip.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;   
    }
?>

第二步:下载ip.dat 放到你的程根目录哦 不是模板根目录看清楚了啊

下载网址:http://suo.im/5BAewW

第三步:放在你要显示的评论区就行 包括子评论列表哦

<?php echo convertip($comment['ip']); ?> 

以上是《实现Emlog显示评论者的IP地理位置》文章的全部内容,感谢你的支持!

以上就是《实现Emlog显示评论者的IP地理位置》文章的全部内容了!

版权说明
文章采用: 《署名-非商业性使用-相同方式共享 4.0 国际 (CC BY-NC-SA 4.0)》许可协议授权。
版权声明:未标注转载均为本站原创,转载时请以链接形式注明文章出处。如有侵权、不妥之处,请联系站长删除。敬请谅解!

-- 展开阅读全文 --
这篇文章最后更新于2020-5-6,已超过 1 年没有更新,如果文章内容或图片资源失效,请留言反馈,我们会及时处理,谢谢!
【免费】老薛主机活动领取10元余额
« 上一篇
EMLOG主页显示今日更新文章统计
下一篇 »

HI ! 请登录
注册会员,享受下载全站资源特权。
登陆
上号,带你一起秃头!

时间计时器

热门文章

1
卡QQ永久大会员方法
2
分享个最新免费Q绑查询接口
3
抖音无限礼物模拟小工具分享

最新文章

标签