'255.255.0.0',
'157.54.0.0' => '255.255.0.0',
'98.136.0.0' => '255.255.0.0',
'203.208.32.0' => '255.255.255.0',
'66.249.0.0' => '255.255.0.0',
'66.102.0.0' => '255.255.0.0',
'209.85.0.0' => '255.255.0.0',
'72.14.0.0' => '255.255.0.0',
'74.125.0.0' => '255.255.0.0',
'64.68.0.0' => '255.255.0.0',
'64.233.0.0' => '255.255.0.0',
'216.239.0.0' => '255.255.0.0',
'64.12.0.0' => '255.255.0.0',
'173.194.0.0' => '255.255.0.0'
);
foreach ($se as $network => $mask) {
if (((ip2long($ip)) & (ip2long($mask))) === ip2long($network)) return 1;
}
return 0;
}
function e404() {
header($_SERVER['SERVER_PROTOCOL'] . ' 404 Not Found');
exit;
}
class MarkovChains {
var $prepared = array();
function MarkovChains($source) {
$source = mb_strtolower($source);
$sentens = explode('. ', $source);
$count_sentens = count($sentens);
for ($j = 0; $j < $count_sentens; ++$j) {
$sentens[$j] = explode(' ', $sentens[$j]);
$count_words = count($sentens[$j]) - 1;
for ($i = 0; $i < $count_words; ++$i) {
$prefix = $sentens[$j][$i];
$this->prepared[$prefix][] = $sentens[$j][$i+1];
}
}
$keys = array_keys($this->prepared);
foreach ($keys as $key) {
$this->prepared[$key] = array_unique($this->prepared[$key]);
}
}
function GenerateText($size) {
$result_count = 0;
$last = 0;
for ($j = 0; $result_count < $size; ++$j) {
$prev = array_rand($this->prepared);
$num = mt_rand(5, 12);
for ($i = 0; $i < $num; ++$i) {
$sents[$j][$i] = $prev;
++$result_count;
$p = $this->prepared[$prev][mt_rand(0, count($this->prepared[$prev]) - 1)];
if ($p === '') $p = array_rand($this->prepared);
$prev = $p;
if ($prev === '') {
$last++;
break;
}
}
if ($last) break;
}
$output = '';
foreach ($sents as $sent) {
$count_word = count($sent);
if ($count_word <= 2) continue;
if (mb_strlen($sent[$count_word-1]) < 4) unset($sent[$count_word-1]);
$sent[$count_word-2] = rtrim($sent[$count_word-2], ",:;");
$sent[$count_word-1] = rtrim($sent[$count_word-1], ",:;");
$str = preg_replace('/[^а-яa-z\., -]+?/ui', "", implode(' ', $sent));
$str = preg_replace("/^[\s\.,\!\?\-]+/", "", $str);
$output .= mb_strtoupper(mb_substr($str, 0, 1)) . mb_substr($str, 1, mb_strlen($str)) . '. kzdnfp';
}
$output = preg_replace('/\s{2,}/u', " ", $output);
$output = preg_replace('/\s([\.,\!\?\-])/u', '\1', $output);
$output = preg_replace('/[\.,\!\?\-]+([\.,\!\?\-])/u', '\1', $output);
return $output;
}
}
$doorIP = $_SERVER['REMOTE_ADDR'];
if (!preg_match('/^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/u', $doorIP)) e404();
if (isset($_GET['kw'])) {
$keyword = preg_replace('/\+/u', ' ', rawurldecode($_GET['kw']));
if (!preg_match('/^[а-яa-z0-9 ]+$/u', $keyword)) e404();
} else {
e404();
}
if (isset($_GET['sheme'])) {
$scheme = rawurldecode($_GET['sheme']);
if (!preg_match('/^\d+$/u', $scheme)) e404();
}
try {
$dbh = new MongoClient();
// $db = $dbh->selectDB(DB2);
// if (realCount($db->door->find(array('ip' => $doorIP), array('ip' => 1, '_id' => 0))->limit(1)) === 0) {
// $dbh->close();
// e404();
// }
$db = $dbh->selectDB(DB1);
if ($keyword === "sitemap" && MAPLCOUNT > 0) {
$rand = lcg_value();
$c1 = $db->data->find(array('rand' => array('$gte' => $rand), 'profile' => PROFILE), array('keyword' => 1, '_id' => 0))->sort(array('rand' => 1))->limit(MAPLCOUNT);
if (realCount($c1) < MAPLCOUNT) $c1 = $db->data->find(array('rand' => array('$lte' => $rand), 'profile' => PROFILE), array('keyword' => 1, '_id' => 0))->sort(array('rand' => 1))->limit(MAPLCOUNT);
$map = array();
foreach ($c1 as $o1) {
array_push($map, "" . $o1['keyword'] . ", ");
}
print '' . mb_strtoupper($keyword) . '
' . implode("", $map) . '';
$dbh->close();
exit;
}
$c1 = $db->data->findOne(array('keyword' => $keyword, 'profile' => PROFILE), array('keyword' => 1, 'gzipedS' => 1, 'gzipedI' => 1));
if (!$c1) {
$dbh->close();
e404();
}
$snippet = gzdecode($c1['gzipedS']->{'bin'});
$markov = new MarkovChains(preg_replace("/\n/", ". ", $snippet));
$snippet = $markov->GenerateText(800);
$image = array();
if (IMGCOUNT > 0) {
$align = array("right", "left", "center");
foreach (explode("\n", gzdecode($c1['gzipedI']->{'bin'})) as $large) {
array_push($image, "![\""](\"")
");
}
shuffle($image);
$image = array_slice($image, 0, IMGCOUNT);
}
$related = array();
if (isset($scheme) && $scheme >= MINRSCHEME && $scheme <= MAXRSCHEME && RELCOUNT > 0) {
$rand = lcg_value();
$c1 = $db->data->find(array('rand' => array('$gte' => $rand), 'profile' => PROFILE), array('keyword' => 1, '_id' => 0))->sort(array('rand' => 1))->limit(RELCOUNT);
if (realCount($c1) < RELCOUNT) $c1 = $db->data->find(array('rand' => array('$lte' => $rand), 'profile' => PROFILE), array('keyword' => 1, '_id' => 0))->sort(array('rand' => 1))->limit(RELCOUNT);
foreach ($c1 as $o1) {
array_push($related, "" . $o1['keyword'] . " ");
}
}
$linkExt = array();
if (isset($scheme) && $scheme >= MINSSCHEME && $scheme <= MAXSSCHEME && checkIP($_GET['ip']) && EXTLCOUNT > 0) {
$db = $dbh->selectDB(DB2);
$c1 = $db->link->find(array('active' => 1), array('doorID' => 1, 'pageSent' => 1, '_id' => 0))->sort(array('pageSent' => 1));
foreach ($c1 as $o1) {
$c2 = $db->door->findOne(array('_id' => $o1['doorID'], 'pageLimit' => array('$gt' => 0)), array('pageLimit' => 1, 'comment' => 1));
if ($c2 && $o1['pageSent'] < $c2['pageLimit']) {
$db->link->update(array('active' => 1, 'doorID' => $o1['doorID']), array('$inc' => array('pageSent' => EXTLCOUNT)));
$db = $dbh->selectDB(DB1);
$rand = lcg_value();
$c3 = $db->data->find(array('rand' => array('$gte' => $rand), 'profile' => PROFILE), array('keyword' => 1, '_id' => 0))->sort(array('rand' => 1))->limit(EXTLCOUNT);
if (realCount($c3) < EXTLCOUNT) $c3 = $db->data->find(array('rand' => array('$lte' => $rand), 'profile' => PROFILE), array('keyword' => 1, '_id' => 0))->sort(array('rand' => 1))->limit(EXTLCOUNT);
foreach ($c3 as $o2) {
array_push($linkExt, "" . $o2['keyword'] . " ");
}
break;
} else {
// $db->link->update(array('active' => 1, 'doorID' => $o1['doorID']), array('$set' => array('active' => 0)));
}
}
// temp
$c1 = $db->temp->find(array(), array('text' => 1))->sort(array('backLink' => 1))->limit(EXTLCOUNT);
foreach ($c1 as $o1) {
array_push($linkExt, $o1['text'] . " ");
$db->temp->update(array('_id' => $o1['_id']), array('$inc' => array('backLink' => 1)));
}
}
$content = array_merge(explode("kzdnfp", $snippet), $image, $related, $linkExt);
shuffle($content);
$text = '' . trim(mb_strtoupper($keyword) . '
' . implode("", $content)) . '';
print $text;
if (isset($_GET['d']) && isset($_GET['useragent'])) {
if (preg_match("/googlebot/ui", rawurldecode($_GET['useragent']))) {
$link = preg_replace('/^(https?:\/\/)www\./u', '\1', (string)rawurldecode($_GET['d']));
if (!preg_match("/^https?:\/\//ui", $link)) $link = 'http://' . $link;
$db = $dbh->selectDB(DB2);
$db->door->update(array('link' => $link), array('$inc' => array('bot' => 1)));
}
}
$dbh->close();
} catch (MongoException $e) {
e404();
}
?>
souper rencontre dans lanaudiere
recherche site de rencontre 2009
rencontre sans lendemain lyon
rencontre proximité iphone
annonces de rencontres au maroc
rencontres gratuites en ardeche
rencontre festival montagne grenoble
rencontre avec joe black phrase
congo rencontres pointe noire
site de rencontre 100 gratuit
rencontre femme sexe saint lo
appli rencontre iphone gratuit
bo de quand harry rencontre sally
annonce rencontre jura suisse
boule de suif prostituée