<?
/*
QQ: 369768917
email:binghe6218@163.com
网址: www.qumiao.com
程序下载地址:http://www.qumiao.com/php/checksite.rar
*/
error_reporting(0);
define('GOOGLE_MAGIC', 0xE6359A60);
$g = $_REQUEST['g'];;
$murl = $_REQUEST['m'];
$furl = $_REQUEST['f'];
if($g=="1")inc();
else if($g=="2")baidu();
else if($g=="3")baidukz();
else if($g=="4")google();
else if($g=="5")pr();
function inc()
{
global $murl,$furl;
$page = file_get_contents("http://$furl");
if($page){
if(strpos($page,$murl)>-1)
echo escape("是");
else
echo escape("<font color=red>否</font>");
}
else
{
echo escape("无法访问");
}
}
function baidu()
{
global $murl,$furl;
$url = "http://www.baidu.com/s?wd=site:$furl";
$page = file_get_contents($url);
$PageNum = "0";
$PageNum = str_replace(",","",cut($page,"找到相关网页约", "篇" ));
if ($PageNum == "") $PageNum = str_replace(",","", cut($page,"找到相关网页", "篇"));
if ($PageNum == "") $PageNum = "0";
echo "<a href='".$url."' target='_blank'>$PageNum</a>";
}
function baidukz()
{
global $murl,$furl;
$url = "http://www.baidu.com/s?wd=$furl";
$page = file_get_contents($url);
$kzdate = "0";
$kzdate = cut($page,"<font color=#008000>$furl", "</font>" );
if($kzdate!=""){
/// 37K 2008-9-13
$kzarray = explode ('K', $kzdate);
$kzdate = trim($kzarray[1]);
if(trim($kzarray[1])!=""){
echo "<a href='".$url."' target='_blank'>$kzdate</a>";
}
}
else{
echo escape("无");
}
}
function google()
{
//在同时间过于频繁地扫描Google搜索结果,GG会屏蔽该IP.因此冰河在此暂时去掉了此功能
//诸位网友如果想开放此功能可以,可将下面这一行加上注释即可,谢谢!
echo "0"; return "";
global $murl,$furl;
$url = "http://www.google.cn/search?hl=zh-CN&q=site:$furl";
$page = file_get_contents($url);
//echo $page;
$PageNum = "0";
$PageNum = str_replace(",","",cut($page,"<p> 约有 <b>", "</b> 项符合"));
if ($PageNum == "") $PageNum = "0";
echo "<a href='".$url."' target='_blank'>$PageNum</a>";
}
function pr()
{
global $murl,$furl;
echo GetPR("http://$furl") ;
}
function cut($string,$start,$end)
{
$message = explode($start,$string);
$message = explode($end,$message[1]);
return $message[0];
}
//功能与javascript中的escape一样
function escape($str) {
preg_match_all("/[\x80-\xff].|[\x01-\x7f]+/",$str,$r);
$ar = $r[0];
foreach($ar as $k=>$v) {
if(ord($v[0]) < 128)
$ar[$k] = rawurlencode($v);
else
$ar[$k] = "%u".bin2hex(iconv("GB2312","UCS-2",$v));
}
return join("",$ar);
}
function unescape($str) {
$str = rawurldecode($str);
preg_match_all("/(?:%u.{4})|.+/",$str,$r);
$ar = $r[0];
foreach($ar as $k=>$v) {
if(substr($v,0,2) == "%u" && strlen($v) == 6)
$ar[$k] = iconv("UCS-2","GB2312",pack("H4",substr($v,-4)));
}
return join("",$ar);
}
//下面的函数用于查pr
function zeroFill($a, $b)
{
$z = hexdec(80000000);
if ($z & $a)
{
$a = ($a>>1);
$a &= (~$z);
$a |= 0x40000000;
$a = ($a>>($b-1));
}
else
{
$a = ($a>>$b);
}
return $a;
}
function mix($a,$b,$c)
{
$a -= $b; $a -= $c; $a ^= (zeroFill($c,13));
$b -= $c; $b -= $a; $b ^= ($a<<8);
$c -= $a; $c -= $b; $c ^= (zeroFill($b,13));
$a -= $b; $a -= $c; $a ^= (zeroFill($c,12));
$b -= $c; $b -= $a; $b ^= ($a<<16);
$c -= $a; $c -= $b; $c ^= (zeroFill($b,5));
$a -= $b; $a -= $c; $a ^= (zeroFill($c,3));
$b -= $c; $b -= $a; $b ^= ($a<<10);
$c -= $a; $c -= $b; $c ^= (zeroFill($b,15));
return array($a,$b,$c);
}
function GoogleCH($url, $length=null, $init=GOOGLE_MAGIC)
{
if(is_null($length))
{
$length = sizeof($url);
}
$a = $b = 0x9E3779B9;
$c = $init;
$k = 0;
$len = $length;
while($len >= 12)
{
$a += ($url[$k+0] +($url[$k+1]<<8) +($url[$k+2]<<16) +($url[$k+3]<<24));
$b += ($url[$k+4] +($url[$k+5]<<8) +($url[$k+6]<<16) +($url[$k+7]<<24));
$c += ($url[$k+8] +($url[$k+9]<<8) +($url[$k+10]<<16)+($url[$k+11]<<24));
$mix = mix($a,$b,$c);
$a = $mix[0]; $b = $mix[1]; $c = $mix[2];
$k += 12;
$len -= 12;
}
$c += $length;
switch($len)
{
case 11: $c+=($url[$k+10]<<24);
case 10: $c+=($url[$k+9]<<16);
case 9 : $c+=($url[$k+8]<<8);
case 8 : $b+=($url[$k+7]<<24);
case 7 : $b+=($url[$k+6]<<16);
case 6 : $b+=($url[$k+5]<<8);
case 5 : $b+=($url[$k+4]);
case 4 : $a+=($url[$k+3]<<24);
case 3 : $a+=($url[$k+2]<<16);
case 2 : $a+=($url[$k+1]<<8);
case 1 : $a+=($url[$k+0]);
}
$mix = mix($a,$b,$c);
return $mix[2];
}
function strord($string) {
for($i=0;$i<strlen($string);$i++) {
$result[$i] = ord($string{$i});
}
return $result;
}
function ReadPR($link)
{
$fp = fsockopen ("www.google.com", 80, $errno, $errstr, 30);
if (!$fp)
{
echo "$errstr ($errno)\n";
exit(1);
}
else
{
$out = "GET $link HTTP/1.0\r\n";
$out .= "Host: toolbarqueries.google.com\r\n";
$out .= "User-Agent: Mozilla/4.0 (compatible; GoogleToolbar 2.0.114.9-big; Linux 2.6)\r\n";
$out .= "Connection: Close\r\n\r\n";
fwrite($fp, $out);
do{
$line = fgets($fp, 128);
}while ($line !== "\r\n");
$data = fread($fp,8192);
fclose ($fp);
return $data;
}
}
function GetPR($url)
{
$url ='info:'.$url;
$ch = GoogleCH(strord($url));
$data = ReadPR("/search?client=navclient-auto&ch=6$ch&features=Rank&q=$url");
$rankarray = explode (':', $data);
if(trim($rankarray[2])!=""){
return $rankarray[2];
}
else
return "0";
}
?>
没有合适的资源?快使用搜索试试~ 我知道了~
温馨提示
【项目资源】:包含前端、后端、移动开发、操作系统、人工智能、物联网、信息化管理、数据库、硬件开发、大数据、课程资源、音视频、网站开发等各种技术项目的源码。包括STM32、ESP8266、PHP、QT、Linux、iOS、C++、Java、python、web、C#、EDA、proteus、RTOS等项目的源码。【项目质量】:所有源码都经过严格测试,可以直接运行。功能在确认正常工作后才上传。【适用人群】:适用于希望学习不同技术领域的小白或进阶学习者。可作为毕设项目、课程设计、大作业、工程实训或初期项目立项。【附加价值】:项目具有较高的学习借鉴价值,也可直接拿来修改复刻。对于有一定基础或热衷于研究的人来说,可以在这些基础代码上进行修改和扩展,实现其他功能。【沟通交流】:有任何使用上的问题,欢迎随时与博主沟通,博主会及时解答。鼓励下载和使用,并欢迎大家互相学习,共同进步。
资源推荐
资源详情
资源评论
收起资源包目录
基于PHP实现的在线友情链接监测管理_checksite_工具查询(PHP源代码+html).zip (5个子文件)
[工具查询]在线友情链接监测管理_checksite
checksite
checkServer.php 5KB
check.php 5KB
images
loading.gif 722B
bar_bg_a.gif 610B
selSite.js 3KB
共 5 条
- 1
资源评论
CyMylive.
- 粉丝: 7496
- 资源: 4万+
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功