Решил почекать освобождающиеся доменчики ради интереса. В принципе не проблема нарыть доменов с тицем 10-20 и хоть какими-то данными (кэш гугли, вебархив). Вот домены в ЯК - это проблема, хотя, вероятно, тоже бывают, но очень-очень редко

И накрапал на коленке чекалку, ибо на семониторе в свое время сэкономил

Кому надо - ловим код

<form method=”POST” action=”tic.php”>
<textarea name=”links” cols=”30″ rows=”30″></textarea><br>
<input type=”submit” name=”go” value=”go”>
</form>
<?
//print_r($_REQUEST);
if($_REQUEST['go']==’go’)
{
set_time_limit(0);
$links=explode(”\r\n”,$_REQUEST['links']);
for($i=0;$i<count($links);$i++) {echo YaTic(strtolower($links[$i]));sleep(2);}
}

//print_r(YaTic(’www.baltictile.ru’));

//<Yandex_Tic_Yaca>
function YaTic($url) {

$str=file_get_contents(’http://bar-navig.yandex.ru/u?ver=2&url=’.urlencode(’http://’.$url.’/').’&show=1&post=0′);

$p=explode(’value=”‘,$str);
$p2=explode(’”‘,$p[1]);
$tic=$p2[0];
$p=explode(’domain=”‘,$str);
$p2=explode(’”‘,$p[1]);
$domain=$p2[0];
if(strpos($str,’<topic title=”‘)!==false)
{
$p=explode(’<topic title=”‘,$str);
$p2=explode(’”‘,$p[1]);
$topic=$p2[0];
$p=explode(’url=”‘,$str);
$p2=explode(’”‘,$p[1]);
$yaca=$p2[0];
}
return $domain.’ - <font color=”red”>’.$tic.’</font> - ‘.pr_google(’http://’.$url.’/').’ - <a href=”‘.$yaca.’”>’.$topic.’</a><br>’;
}
//</Yandex_Tic_Yaca>

//<Google_PR>
define(’GOOGLE_MAGIC’, 0xE6359A60);

function zeroFill($a, $b) {
$z = hexdec(80000000);
if($z & $a) {
$a = ($a>>1);
$a &= (~$z);
$a |= 0×40000000;
$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($urlpage, $length=null, $init=GOOGLE_MAGIC) {
if(is_null($length)) { $length = sizeof($urlpage); }
$a = $b = 0×9E3779B9;
$c = $init;
$k = 0;
$len = $length;
while($len >= 12) {
$a += ($urlpage[$k+0] + ($urlpage[$k+1]<<8) + ($urlpage[$k+2]<<16) + ($urlpage[$k+3]<<24));
$b += ($urlpage[$k+4] + ($urlpage[$k+5]<<8) + ($urlpage[$k+6]<<16) + ($urlpage[$k+7]<<24));
$c += ($urlpage[$k+8] + ($urlpage[$k+9]<<8) + ($urlpage[$k+10]<<16)+ ($urlpage[$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+=($urlpage[$k+10]<<24);
case 10: $c+=($urlpage[$k+9]<<16);
case 9 : $c+=($urlpage[$k+8]<<8);
case 8 : $b+=($urlpage[$k+7]<<24);
case 7 : $b+=($urlpage[$k+6]<<16);
case 6 : $b+=($urlpage[$k+5]<<8);
case 5 : $b+=($urlpage[$k+4]);
case 4 : $a+=($urlpage[$k+3]<<24);
case 3 : $a+=($urlpage[$k+2]<<16);
case 2 : $a+=($urlpage[$k+1]<<8);
case 1 : $a+=($urlpage[$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 pr_google($url) {
$urlpage = ‘info:’.$url;
$ch = GoogleCH(strord($urlpage));
$ch = “6$ch”;
$page = @file(”http://www.google.com/search?client=navclient-auto&ch=$ch&features=Rank&q=info:”.urlencode($url));
$page = @implode(”", $page);
if(preg_match(”/Rank_1:(.):(.+?)\n/is”, $page, $res)) { return “$res[2]“; }
else return “0″;
}
//</Google_PR>
?>