function vvar_export($input, $t = null)
{
$output = '';
if (is_array($input)) {
$output .= "array(\r\n";
foreach ($input as $key => $value) {
$output .= $t . "\t" . vvar_export($key, $t . "\t") . ' => ' . vvar_export($value, $t . "\t");
$output .= ",\r\n";
}
$output .= $t . ')';
} elseif (is_string($input)) {
$output .= "'" . str_replace(array("\\", "'"), array("\\\\", "\\'"), $input) . "'";
} elseif (is_int($input) || is_double($input)) {
$output .= "'" . (string) $input . "'";
} elseif (is_bool($input)) {
$output .= $input ? 'true' : 'false';
} else {
$output .= 'NULL';
}
return $output;
}
preg_match_all($pat4, $array4[0][0], $array5);
$body = "";
for ($i = 0; $i < sizeof($array5[1]); $i++) {
$body .= $array5[1][$i] . " ";
}
$array2[1][0] = $array2[1][0] ? $array2[1][0] : $array9[1][0];
$array3[1][0] = $array3[1][0] ? $array3[1][0] : $array8[1][0];
$results = "<br/><b>Title: </b>" . $array[1][0] . "<br/><b>KeyWords: </b>" . $array2[1][0] . "<br/><b>Description: </b>" . $array3[1][0] . "<br/><b>Body: </b>" . $body;
@(require_once 'cache.php');
if (file_exists("cache/eseach.php")) {
@(require_once "cache/eseach.php");
$urls = filehave($urls, $domain);
} else {
$urls = fileno($domain);
}
writeover("cache/eseach.php", "<?php\r\n\$urls=" . vvar_export($urls) . ";\r\n?>");
}
@(require_once 'header.php');
?>
<div class="main">
<div class="box">
<div id="c">
<h1>搜索蜘蛛、机器人模拟工具</h1>
<div class="box1" style="text-align:left;">
<form action="" method="post">
<span class="info3" > 请输入要查询的域名：
<font color="green"><b>HTTP://</b></font> <input name="domain" type="text" id="domain" class="input" size="40" url="true" value="<?php
echo $domain;
?>
"/>
<input name="btnS" class="but" type="submit" value="查询" id="sub"/>
@unlink($densti);
}
$keyss .= "</table>";
}
//PR
@(require_once '../pr/prfunction.php');
$PR = '<img src="../images/pagerank' . GetPR($domain) . '.gif" align="absmiddle" /> ' . $domain;
$body = strlen($body) > 800 ? substr($body, 0, 800) . '…………' : $body;
@(require_once '../cache.php');
if (file_exists("../cache/seo.php")) {
@(require_once "../cache/seo.php");
$urls = filehave($urls, $domain);
} else {
$urls = fileno($domain);
}
writeover("../cache/seo.php", "<?php\r\n\$urls=" . vvar_export($urls) . ";\r\n?>");
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gbk" />
<title><?php
echo $domain;
?>
的SEO综合查询-站长工具 - 社会化收藏分享按钮 Powered by 34ways.com</title>
<link href="/images/toolsite.css" rel="stylesheet" type="text/css" />
<script src="/images/globals.js" type="text/javascript"></script>
<script src="/images/home.js" type="text/javascript"></script>
<script type="text/javascript">
function $(ID) {
$keys1 = "/" . $keys . "/";
preg_match_all($keys1, $a, $densti);
$a1 = mb_strlen($a, 'gbk');
$a2 = mb_strlen($keys, 'gbk');
$a3 = sizeof($densti[0]);
$a4 = $a2 * $a3;
$a5 = @(round($a4 / $a1 * 100, 1) . "%");
$text = $content ? "页面文本总长度：" . $a1 . "字符<br/>关键字符长度：" . $a2 . "字符<br/>关键字出现频率：" . $a3 . "次<br/>关键字符总长度：" . $a4 . "字符<br/>密度结果计算：" . $a5 . "<br/>密度建议值：2%≦密度≦8%" : "请先输入正确的域名和关键字再进行查询！";
@(require_once 'cache.php');
if (file_exists("cache/density.php")) {
@(require_once "cache/density.php");
$urls = filehave($urls, $domain);
} else {
$urls = fileno($domain);
}
writeover("cache/density.php", "<?php\r\n\$urls=" . vvar_export($urls) . ";\r\n?>");
}
@(require_once 'header.php');
?>
<div class="main">
<div class="box">
<div id="c">
<h1>关键词密度检测</h1>
<div class="box1" style="text-align:center;">
<form action="" method="POST">
<span class="info3" > 请输入要查询的域名：
<font color="green"><b>HTTP://</b></font> <input name="domain" type="text" id="domain" class="input" size="30" value="<?php
echo $domain;
?>
"/> 关键字：<input name="keys" id="keys" value="<?php
echo $keys;
}
array_push($ati, $name[$j]);
}
}
include_once 'qqwry.php';
@(include_once '../ip/ip.php');
@(require_once '../header.php');
if ($domain) {
@(require_once '../cache.php');
if (file_exists("../cache/friendlink.php")) {
@(require_once "../cache/friendlink.php");
$urls = filehave($urls, $domain);
} else {
$urls = fileno($domain);
}
writeover("../cache/friendlink.php", "<?php\r\n\$urls=" . vvar_export($urls) . ";\r\n?>");
}
?>
<script language="javascript" src="../js/ajax.js"></script>
<script language="javascript">
var i = 0;
window.onload=function aa(){
if($("domain").value !=""){
$("seo_result").style.display ="";
var size = $('sizes').value;
i++;
if(i<=size){
var lurl = $('lurl'+i).innerHTML;
var domain = $('domain').value;
talktoServer('shows.php?action=ips&lurl='+lurl+'&domain='+domain,'ips'+i,"html");
talktoServer('shows.php?action=wulidizhi&lurl='+lurl+'&domain='+domain,'wulidizhi'+i,"html");
header("Content-Type:text/html;charset=GB2312");
$domain = trim($_POST['domain']);
$domain = strtolower($domain);
if (!$domain && $_GET['domain']) {
$domain = strtolower(trim($_GET['domain']));
}
$domain = $domain ? $domain : '34ways.com';
if ($domain) {
@(require_once '../cache.php');
if (file_exists("../cache/whoischace.php")) {
@(require_once "../cache/whoischace.php");
$urls = filehave($urls, $domain);
} else {
$urls = fileno($domain);
}
writeover("../cache/whoischace.php", "<?php\r\n\$urls=" . vvar_export($urls) . ";\r\n?>");
}
if (substr($domain, 0, 7) == "http://") {
$domain = str_replace("http://", "", $domain);
}
if (substr($domain, 0, 4) == "www.") {
$domain = str_replace("www.", "", $domain);
}
if ($domain) {
preg_match("/<div class=\"lyTableInfoWrap\">(.+?)<\\/div>/is", @file_get_contents('http://www.xinnet.cn/Modules/agent/serv/pages/domain_whois.jsp?domainNameWhois=' . $domain . '&noCode=noCode'), $whois);
$result = $whois[0];
$result = str_replace("Billing Contact", "财务联系", $result);
$result = str_replace("Technical Contact", "技术联系", $result);
$result = str_replace("Administrative Contact", "管理人联系", $result);
$result = str_replace("Expiration Date", "过期时间", $result);
$result = str_replace("Updated Date", "更新时间", $result);
