Emlog表露指摘者IP地舆消息|Emlog表露IP消息插件

原创

Emlog表露指摘者IP地舆消息|Emlog表露IP消息插件

Emlog表露指摘者IP地舆消息|Emlog表露IP消息插件

即日冬镜给大师带来的教程是Emlog表露指摘者IP地舆消息纯代码 作品尾部附赠Emlog表露指摘者IP地舆消息插件

第一步咱们开始在模版目次下找到module.php文献,翻开该文献并在结果面增添如次代码

<?php function convertip($ip) { $dat_path = EMLOG_ROOT.’/content/templates/你的沙盘文献/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;

} ?>

第二步找到你的指摘代码并在你想要表露的场所重庆SEO增添如次过载代码

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

上一张功效图,简直的不妨看下方本站留言指摘 本人领会功效越发额

这次的教程到这边就中断了,大师有什么不懂的不妨径直留言

冬镜会准时恢复的(附上Emlog表露指摘者IP地舆消息插件懒人径直载入安置插件就行)

处置员树立恢复可载入

免责声明: 本站提供的一切软件、教程和内容信息仅限用于学习和研究目的;不得将上述内容用于商业或者非法用途,否则,一切后果请用户自负。本站信息来自网络收集整理,版权争议与本站无关。您必须在下载后的24个小时之内,从您的电脑或手机中彻底删除上述内容。如果您喜欢该程序和内容,请支持正版,购买注册,得到更好的正版服务。我们非常重视版权问题,如有侵权请邮件与我们联系处理。敬请谅解!
转载请注明出处:
新未来网 » Emlog表露指摘者IP地舆消息|Emlog表露IP消息插件

提供最优质的资源集合

赞助会员 了解详情