<?php

/** -------- Модуль "Переходы"
**
    Website: http://polza.my1.ru
**
**********
<script type="text/javascript">$.get('/php/ref/index.php?r='+encodeURIComponent(document.referrer));</script>

<div id="ref">Загрузка...</div><script type="text/javascript">$('#ref').load('/php/ref/index.php');</script>
**********/
$___notjson = 1;
$max = 10; // Максимальное кол-во переходов которые выводятся
$ref = $_REQUEST['r'];
$ref_name = parse_url($ref);
$ref_name = $ref_name[host];
$ref_name = str_replace('www.', '', $ref_name);
$surl = $_SERVER['HTTP_REFERER'];

function r($r, $n){
  return eregi($n, $r);
}

function save($ref, $ref_name, $surl, $max){
  if(r($ref_name, 'yandex.ru')){
    $ref_name = 'yandex';
    $ref_t = '#text=(.*?)&#';
  }
  if(r($ref_name, 'nigma.ru')){
    $ref_name = 'nigma';
    $ref_t = '#s=(.*?)&#';
  }
  if(r($ref_name, 'google.ru')){
    $ref_name = 'google';
    $ref_t = '#q=(.*?)&#';
  }
  if(r($ref_name, 'mail.ru')){
    $ref_name = 'mail';
    $ref_t = '#q=(.*?)&#';
  }
  if(r($ref_name, 'rambler.ru')){
    $ref_name = 'rambler';
    $ref_t = '#query=(.*?)&#';
  }
  if(r($ref_name, 'yahoo.com')){
    $ref_name = 'yahoo';
    $ref_t = '#p=(.*?)&#';
  }
  preg_match_all($ref_t, urldecode($ref).'&', $text);
  if(!empty($ref_t) && !empty($surl) && !empty($text[1][0])){
    $surl_name = parse_url($surl);
	if($ref_name == 'google'){
	  $ref = 'http://www.google.ru/search?ie=UTF-8&hl=ru&q='.urlencode($text[1][0]);
	}
	$text[1][0] = htmlspecialchars($text[1][0]);
    $data = '<img style="margin:0 0 3px 0;padding:0;vertical-align:middle;border:none" src="http://'.$surl_name[host].'/ref/'.$ref_name.'.png"> <b><a href="'.$ref.'" target="_blank">'.ucfirst($ref_name).':</a></b> <a href="'.$surl.'">'.$text[1][0].'</a><br>';
    $s = file('data.dat');
    $s[0] = $data.PHP_EOL.$s[0];
    $e = sizeof($s);
    for($c = 0; $c != $e; $c++){
      if($c >= $max-1){
        $s[$c] = '';
      }
    }
   $d = fopen('data.dat', 'w');
   foreach($s as $s_){
    fwrite($d, $s_.'');
   }
   fclose($d);
  }
}


if(empty($ref)){
  $data = file_get_contents('data.dat');
  if(empty($data)){
    echo 'Пока пусто...';
  }else{
    echo $data;
  }
}else{
  save($ref, $ref_name, $surl, $max);
}

?>