说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

PHP获取Google PR值

HTML文档下载 WORD文档下载 PDF文档下载
这是获取Google PR值的PHP实现版本,经过测试运行正常。

下载源代码

 

这是获取Google PR值的PHP实现版本,经过测试运行正常。将下面代码保存为googlepr.php则读取www.okbase.net网站的PR值调用格式为:

googlepr.php?url=www.okbase.net

 

代码如下:

 

<?php//PageRank Lookup v1.1 by HM2K (update: 31/01/07)//based on an alogoritham found here: http://pagerank.gamesaga.net///settings - host and user agent$googlehost='toolbarqueries.google.com';$googleua='Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.0.6) Gecko/20060728 Firefox/1.5';//字符串转换到32位整数function StrToNum($Str, $Check, $Magic) {    $Int32Unit = 4294967296;  // 2^32    $length = strlen($Str);    for ($i = 0; $i < $length; $i++) {        $Check *= $Magic; 	        //If the float is beyond the boundaries of integer (usually +/- 2.15e+9 = 2^31),         //  the result of converting to integer is undefined        //  refer to http://www.php.net/manual/en/language.types.integer.php        if ($Check >= $Int32Unit) {            $Check = ($Check - $Int32Unit * (int) ($Check / $Int32Unit));            //if the check less than -2^31            $Check = ($Check < -2147483648) ? ($Check + $Int32Unit) : $Check;        }        $Check += ord($Str{$i});     }    return $Check;}//将URL进行哈希编码function HashURL($String) {    $Check1 = StrToNum($String, 0x1505, 0x21);    $Check2 = StrToNum($String, 0, 0x1003F);    $Check1 >>= 2; 	    $Check1 = (($Check1 >> 4) & 0x3FFFFC0 ) | ($Check1 & 0x3F);    $Check1 = (($Check1 >> 4) & 0x3FFC00 ) | ($Check1 & 0x3FF);    $Check1 = (($Check1 >> 4) & 0x3C000 ) | ($Check1 & 0x3FFF);		    $T1 = (((($Check1 & 0x3C0) << 4) | ($Check1 & 0x3C)) <<2 ) | ($Check2 & 0xF0F );    $T2 = (((($Check1 & 0xFFFFC000) << 4) | ($Check1 & 0x3C00)) << 0xA) | ($Check2 & 0xF0F0000 );	    return ($T1 | $T2);}//为哈希字符串生成校验码function CheckHash($Hashnum) {    $CheckByte = 0;    $Flag = 0;    $HashStr = sprintf('%u', $Hashnum) ;    $length = strlen($HashStr);	    for ($i = $length - 1;  $i >= 0;  $i --) {        $Re = $HashStr{$i};        if (1 === ($Flag % 2)) {                          $Re += $Re;                 $Re = (int)($Re / 10) + ($Re % 10);        }        $CheckByte += $Re;        $Flag ++;	    }    $CheckByte %= 10;    if (0 !== $CheckByte) {        $CheckByte = 10 - $CheckByte;        if (1 === ($Flag % 2) ) {            if (1 === ($CheckByte % 2)) {                $CheckByte += 9;            }            $CheckByte >>= 1;        }    }    return '7'.$CheckByte.$HashStr;}//返回pagerank哈希校验码function getch($url) { return CheckHash(HashURL($url)); }//返回PR值function getpr($url) {	global $googlehost,$googleua;	$ch = getch($url);	$fp = fsockopen($googlehost, 80, $errno, $errstr, 30);	if ($fp) {	   $out = "GET /search?client=navclient-auto&ch=$ch&features=Rank&q=info:$url HTTP/1.1\r\n";	   //echo "<pre>$out</pre>\n"; //debug only	   $out .= "User-Agent: $googleua\r\n";	   $out .= "Host: $googlehost\r\n";	   $out .= "Connection: Close\r\n\r\n";		   fwrite($fp, $out);	   	   //$pagerank = substr(fgets($fp, 128), 4); //debug only	   //echo $pagerank; //debug only	   while (!feof($fp)) {			$data = fgets($fp, 128);			//echo $data;			$pos = strpos($data, "Rank_");			if($pos === false){} else{				$pr=substr($data, $pos + 9);				$pr=trim($pr);				$pr=str_replace("\n",'',$pr);				return $pr;			}	   }	   //else { echo "$errstr ($errno)<br />\n"; } //debug only	   fclose($fp);	}}//生成pagerank图形function pagerank($url,$width=40,$method='style') {	if (!preg_match('/^(http:\/\/)?([^\/]+)/i', $url)) { $url='http://'.$url; }	$pr=getpr($url);	$pagerank="PageRank: $pr/10";	//The (old) image method	if ($method == 'image') {	$prpos=$width*$pr/10;	$prneg=$width-$prpos;	$html='<img src="http://www.google.com/images/pos.gif" width='.$prpos.' height=4 border=0 alt="'.$pagerank.'"><img src="http://www.google.com/images/neg.gif" width='.$prneg.' height=4 border=0 alt="'.$pagerank.'">';	}	//The pre-styled method	if ($method == 'style') {	$prpercent=100*$pr/10;	$html='<div style="position: relative; width: '.$width.'px; padding: 0; background: #D9D9D9;"><strong style="width: '.$prpercent.'%; display: block; position: relative; background: #5EAA5E; text-align: center; color: #333; height: 4px; line-height: 4px;"><span></span></strong></div>';	}		$out='<a href="'.$url.'" title="'.$pagerank.'">'.$html.'</a>';	return $out;}if ((!isset($_POST['url'])) && (!isset($_GET['url']))) { echo '<form action="" method="post"><input name="url" type="text"><input type="submit" name="Submit" value="Get Pagerank"></form>'; }if (isset($_REQUEST['url'])) { echo pagerank($_REQUEST['url']); }?>

 

 

从F1赛车到智能手机,无线充电技术之崛起 助力梦想!MDCC免费为优秀App开发团队提供展位 为Symfony2和Redis正名,基于PHP的10亿请求/周网站打造 【聚焦API】教你如何选择最适合的NLP API服务商? 直接改应用!Flipboard开源iOS应用内调试工具FLEX 专访腾讯游戏运营总经理崔晓春:云时代游戏运营的变革与创新 嵌入式专家Bruce Douglass经验谈 门票销售过半 从2014微信开发者大会购票者特征说起 当来自金星的Devs碰上火星的Ops——共话应用扩展 移动平台市场占有率:Android首次赶超iOS 豌豆荚范怀宇 I/O大会总结:Android无处不在 轻博客始祖Tumblr:哈希以支撑2.3万Blog请求/秒 《近匠》FIR.im:简单易用的内测分发工具 传苹果公司将于9月9日召开新一代iPhone发布会 近百家微信开发商参与征集评选活动 TOP10正浮出水面 Java程序猿,手游引擎怎么选? MDCC 2014优秀移动团队免费展位火热申请中 【微信讲师面对面】你在企业服务号开发中遇到的坑和难点 五个解决方案让MongoDB拥有RDBMS的鲁棒性事务 浅谈Apache Spark的6个发光点 安卓 “假ID” 签名漏洞,竟然骗过了支付宝和360 从Social到Big Data,移动App蚂蜂窝转型推新品 《近匠》nice曹大鹏,从男装导购到潮人社区的心路历程 DevOps扼杀的不是开发者,而是开发生产力! 利用Docker构建开发环境 Netflix公布Cassandra新性能:基于AWS的百万次写入每秒 一周消息树:谷歌Android遭遇“颠覆”危机 微软发布新应用Snipp3t,iOS平台首发且无Windows Phone版 TOP10优秀微信开发商随后揭晓 2014微信开发者大会开幕在即 8月12日:PC鼻祖IBM 5150迎来33周年 平板创作3D展现:蒙特利尔大学发明Hyve-3D设计系统 高手请问 拉格朗日算法VB=>BCB 求ASP的字符串比较函数. 找C++BUILDER高手!! 我在做演示光盘,用camtasia录制的屏幕图象,可是在客户的机器上播放不出来,在线等待,解决问题马上揭贴! fastreport如何不进行预览而直接打印! 不使用下拉数据窗口,如何实现输入产品代码即可显示产品名称 大哥救命啊 一个简单问题,在一个Win32 applicaion 中如何使用CString变量! 在线等待! 倒霉!!!平白无故被副总扣了100点! 我高中的班主任 JBuilder的爱好者,请留下您的联系方式!谢谢,让我们共同进步! 未指定默认数据库驱动…… VC中如何添加数据库支持? 栽ejb-jar.xml中部署的Ejb QL怎么和Home接口中声明的查询连接起来,必须以ejbSelect开头吗? 如何通过程序调用荧光笔操作?急,在线等!高分相送啊! 表格宽度 发现我的作文水平如果参加今年高考能得满分(仅限作文) 送100分,JB7+JBoss下,用CMP方式建两个EntityBean,比如DIfsZxx(主键所在实体),DIfsZxxRw(外建所在实体),当两者之间关系设为。。。。 谁能够告诉我所有ACCESS数据类型的英文名字?偶在VB中有用到! 请问如何才能使用asp连接foxpro数据库,使用oledb 启动出现找不到windows\system\service.vbs怎么回事??但进入系统正常,如何去掉??? Datagrid!!! 大家能不能推荐一个免费个人主页啊。 大家来帮我看看PHP连接ACCESS数据库的问题! 大家讨论一下这种软件的开发机制和速度优化机制,有没有可能进入代理内部? 放分拉,关于struts的问题,如何在action类中调用ApplicationResources.properties中的信息!!进者有分!! 如何基于对话框打印表格(比如个人简历)在线给分! 今天刚装了新的内核,所以写出过程供大家参考! 一个急需要解决的问题??? VC下如何接收COM+事件 妈妈,女儿对不起你 jbuilder乱码,在线求解 请教一个有难度的代码,江湖救急啊! 在线等!!! 编写一个短信中心,必须要向服务商拿哪些参数? 简单问题:关于ModifyStyle 大家有遇到这种情况吗:"使用jsp无法实现功能,而要被迫使用servlet"? 自己设计VCL组件时,怎样定义对象类型的属性 ? 关联算法的一个问题,大家共同讨论啊 奇怪的问题:高手来看看! 急,关于有状态会话bean的概念问题 关于mediaplayer控件的一个问题 如何让一个表格底下呈现阴影的样式 关于OBJECT哪位大虾知道,赶快进呀!帮小弟解决问题呀!:) 关于UNC ? 请问如何进行这样的操作:察看数据库中的数据,如果数据与edit1.text相同,则showmessage,如果不同,则添加。 拜托大侠们,帮我找个WIN98二版的序列号,急!急!在线等待! To:kane (城里人) 开帖加分! 我想在网站上实现3D家居展览,该如何做?需要使用哪些软件开发? sql 语句的问题。。。。。。 怎么黑对方的计算机---局域网!!!!!!!!!!!!!!!! 7月20考试,conversation怎么提高?conversation总是错很多,感觉比lecture快,来不及记笔记,有些细节题总错,还把握不好出题点,怎么办?请大家指教, 帮我把“快开学了,收拾一下心情,迎接新学期咯”改成可爱版本的,可以改字,但是有符号的尽量用符号!弄卡哇伊一点啦.能卡哇伊就再卡哇伊一点.. 跪求 RT阴险 坏笑 拥抱 爱你 急,快来帮我,本人数学不好 我是一名学习还不错的学生,我每天都非常努力的学习,非常勤奋,我认为学习是快乐的,只是最近的情绪不好,每天晚上都没有看书,导致现在的我都不知道我自己为什么要那么勤奋的读书,每天也 女生发调皮表情的意思是什么?如题 在直四棱锥ABCD-A1B1C1D1中,AA1=2,底面是边长为1的正方形,分别是棱B1B、DA的中点.(1)求证:BF//平面AD1E (2)求证:DE垂直平面AEC 用不寒而栗和不翼而飞和草菅人命和不绝如缕和立竿见影造句. 平行四边形的概念怎么得出 商女不知亡国恨,隔江独唱后庭花写的是哪一处名胜? 有首歌 我只说得出几句 ‘行驶在城市的边缘 努力把情绪抛很远. 函数y=log3 (ax²-2ax+1)的定义域为R,则a的取值范围是y=log3 (ax²-2x+1)式子写错了 西西 人们在下雨天很容易打瞌睡 下列原因中错误的是人们在下雨天很容易打瞌睡,下列原因中错误的是:A.下雨时发出雨声属于白噪音,是天然的 安眠曲B.雨天气压低,交感神经不给力C,雨天时,褪黑 有没有人喜欢寒冷?我喜欢 y=sin(-3x+1)的单调增区间 打瞌睡是由什么原因组成的 最上面那题,下列各式是否有意义?为什么? “不知所措”造句 (英语)看图,用正确的反身代词完成对话. 全国卷的数学 难不难啊 要用呀,打心底感受大伙了2G 由于数学考砸了,数学课代表被撤职了,我该怎么办? 不翼而飞的造句我在看书时看到全身的疲倦不翼而飞 说是错误的 不翼而飞比喻东西突然不见了.也比喻事情传播得很迅速百科里面还有造句是 我的铅笔不翼而飞为什么疲倦不翼而飞不行铅笔 要用呀,打心底感受大伙了9f 我第一次数学考得不好.班主任同时是数学老师,于是辞职,老师说我还行叫我不要胡思乱想没答应,这是怎么回事 用200个成语造句,每句字数不少于50字,哎,只郁闷,帮帮啊,都组好了50多个了,实在是想不出来了 请问一下大家谁知道小学生如何练习写字?要用呀,打心底感受大伙了9f 上课老打瞌睡怎么办?我上生物课和数学课的时候总是打瞌睡,掐自己也没有用,怎么办? 68个人坐在20辆车里,而且每辆车最多包含4个人,那么问:确切可能包含68个人当中的一个人,这种情况下最大可能的车的数量是多少?A:2B:3C:4D:8E:12 木、公、卒、中加什么共同偏旁都能组成新字 平行四边形有几条高? 尔尊是什么意思 我想养一只鼠,可不知道养哪种,珍珠鼠、小仓鼠、荷兰鼠哪个最好?哈哈,这么多答案,叫我听谁的好啊! 在三角形ABC ∠C=90° 且AC=BC=3点M满足向量BM=2向量MA 则向量CM于向量CB的乘机是? 邓丽君的经典歌曲 求 y=sin(-3x+π/4)的单调递增区间,遇到问题如下,我一开始是直接用2kπ -π/2 ≤ -3x+ π/4 ≤ π/2 + 2kπ求的,不知是否正确.然后老师说要把原式变成 y= -sin(3x-π/4),再有 2kπ+ π/2 ≤ 3x-π/4 ≤ 3π/2 + 考数学心态非常不好我考数学时心态非常不好,非常紧张,手也在发抖,非常害怕考不好,本来也考的不怎么样,每次也就是六七十分,一紧张,会的也忘了,有一阵子该紧张到胃痉挛,怎么办?我真的非 邓丽君最好听的歌妈妈很喜欢她的歌她这个年纪都是喜欢什么样的歌30首之内就OK了 详细的问我要短文! “佛”里的单人旁,能不能换成其他的偏旁? 地下城物理暴击与物理背击加满好不?如题 我是剑魂,用光剑,很多人说加满,但我没用过,加满这个攻高不,两个一起加满大概需要对少SP,请详细说明, 英语翻译 平行四边形有几条底?几条高? 地下城物理暴击加多少?暴走加满了,还用加吗 文章末尾有提问 若(2a^mb^m+n)^3=8a^9b^15成立,则m= n=(急)帮帮小弟吧.不不,是小妹.呜呜 将20%的食盐水200g,稀释到10%,可加入5%的食盐水多少克 "杨"字的另一半是什么字."木"字旁,旁边的字 若(2a^m*b^m+n)^3=8a^9b^15 则m= ,n= .求回答, 不知所措造句 根号4又25分之12乘根号25的值看在这么多钱上. 已知(1/2a^m+1b^n-1)^3=1/8a^9b^12,求m和n的值 不知所措怎么造句 仓鼠和荷兰鼠选择哪个比较好呢?有什么利与弊?如果是仓鼠选择什么品种?个花费大概多少?想养只比较好养的,因为喜欢仓鼠的小窝,荷兰鼠可以用么? (-10a^m+3b^n-8a^m+1b^n+2-2a^mb^n+3)除以(-2a^mb^n-1)的结果是不是5a^3b+4ab^3+b^4 用“恐怕”造句 用“不知所措”造句用“恐怕”造句用“不知所措”造句 看图完成对话,每空一词, 2012年5月20日人力二级 实操技能 请问同样考这个的同学,简答题的三道题分别是什么题目啊?如题简答题的题目分别是什么啊? 将一张长60公分.宽40公分的止,简成大小相同且边长都是整数公分的正方形,正方形的边长可能是多少/最长是多少公分? 用不知所措造句,怎么造? 全球海洋工程产业呈现向中国转移趋势新华国际时评:美国还能相信谁秘鲁举办第25届欧洲电影节美国纽约州建高校免税区激励创新带动经英救助儿童会报告全球婴幼儿死亡率下降秘鲁举办第25届欧洲电影节北京陶身体现代舞团惊艳亮相塞万提斯艺马凯将赴欧主持第四次中欧经贸高层对话奥巴马演讲时扶住快要晕倒的孕妇被疑做孟加拉国客机厕所中现280块金锭 价孟加拉国客机厕所中现280块金锭 价研究称美国人网购母乳风险高 75%或研究称美国人网购母乳风险高 75%或芬兰一研究人员拟通过拍摄关注当地避难澳新州消防部门提醒当地居民撤离以应对日本东京警视厅一警官因涉嫌唆使少女卖日本进行冻结核污水实验 望解决污染水分析称政府再停摆凸显美国政治新焦点妻子选总统 洪都拉斯被罢黜总统或可重美国男子冲浪遭遇鲨鱼 用拳击技巧击将马来西亚妇女操作轿车不当误撞死邻居7天气放晴雾霾又神出鬼没了 杭州10个植物园的蜡梅提前开了?冬蜡梅还要一个杭州本周天气:不冷不热不闷不晒 22以可持续理念领跑能源未来美内华达州中学枪击案学生持枪击中教师美元对主要货币汇率21日普涨同城读报彼岸花开三万人狂欢颐和盛世再次日光微发现(城市生活记事簿)挖穿管道气居民没脾气假身份证登记租车 伪造证件转卖诈骗万科举办“社区HAPPY家庭节”活动射灯被盗?市建委:确有其事静观 王庆松、王志平、芦笛、潘钺曹志伟:尽快出台办证便民细则惠州最大规模西方油画展方直·君御开展万斤柚子赠老人碧桂园志愿者走进深圳敬1300万元/年 居委涨薪财局拨款近四成房企四季度增加供货花都:五重“民生大礼”撬动民生“大幸围观吵架推人一把伤者次日不治身亡
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘