[RC-1] Search monitor

[BMG]

открывалась в новом маленьком окошке...

Может лучше iframe?

[CodeWorld]

По f5 страница вместе с iframe-ом будет обновляться. Вот и тормоза будут

[Siava]

найди
if (!isset($forum_id)) {
замени на
if ($user_forum_sql==='') {

и отпишись =)

Отписываюсь - то же самое =)

[Erlang]

вот и рамблера поймал: Rambler 81.19.66.38

Возьми ЛОГ-файл и засунь в прогу анализа - сразу много всяких поисковиков выявишь...

[CodeWorld]

Siava
Давай свой page_header

Добавлено спустя 6 минут 50 секунд:

BMG, вот моё временное решение. Выходные заканчиваются, так что хрен знает когда до второй беты дело дойдёт

Код: Выделить всё

//-------------------------------------
//------- search monitor v1.0b --------
//-------------------------------------

}

function addmylog($date_)
{
if (@strpos(strtolower($date_),'googlebot')) return '';
  $f = fopen("log.html","at+");
  flock($f,LOCK_EX);
  fputs($f,$date_);
  fclose($f); 
}

    $sql="SELECT * FROM ".USERS_TABLE.'_bots';
    $res=$db->sql_query($sql);
    $findme=getenv("HTTP_USER_AGENT").getenv("REMOTE_ADDR");
    $findme.=@gethostbyaddr(getenv("REMOTE_ADDR"));
    $findme=strtolower($findme);
    if ($userdata['user_level']==0) @addmylog($findme.'<br>');
    while( $row = $db->sql_fetchrow($res) ) { 
    if (@strpos($findme,strtolower(trim($row[name])))!==false){
       $botix=$row[name];
       $row[was]=intval($row[was])+1;
       $row[lastvisit]=time();
       $sql="UPDATE ".USERS_TABLE."_bots SET `lastvisit` = '".time()."', `ip` = '".addslashes(getenv("REMOTE_ADDR"))."', `was` = '".intval($row[was])."' WHERE `name` = '".addslashes($botix)."'";
       $db->sql_query($sql);
       }
       if (($row[lastvisit]>(time()-300))and($row[show]==1))
       if (( empty($topic_id) )and( empty($forum_id) )) {
          $guests_online--;
          $logged_visible_online++;
          if (trim($row[view])!=='') $row[name]=$row[view];
          if ($online_userlist!=='') $online_userlist.=', '.$row[name].'';
          else $online_userlist.=''.$row[name].'';
          }
    }
    if ($guests_online<1) $guests_online=0;

if (defined('SHOW_ONLINE')) {

//-------------------------------------
//-- thx for using search monitor :) --
//-------------------------------------

Добавлено спустя 4 часа 38 минут 43 секунды:

Обновлено до беты 1++ Кажется я исправил глюк, который был у Siava

[BMG]

обновился, вроде все ОК

Код: Выделить всё

function addmylog($date_) 
{ 
if (@strpos(strtolower($date_),'googlebot')) return ''; 
  $f = fopen("log.html","at+"); 
  flock($f,LOCK_EX); 
  fputs($f,$date_); 
  fclose($f); 
} 

этот кусок, как я понял, должен писать что-то в log.html, но я его(log.html) не нашел... ну да ладно...
За то добавил темы в location

Найти:

Код: Выделить всё

$sql = "SELECT u.user_id, u.username, u.user_session_time, u.user_session_page, s.session_logged_in, s.session_ip, s.session_start

Заменить на:

Код: Выделить всё

$sql = "SELECT u.user_id, u.username, u.user_session_time, u.user_session_page, s.session_logged_in, s.session_ip, s.session_start, u.user_session_topic

Найти:

Код: Выделить всё

$sql = "SELECT session_page, session_logged_in, session_time, session_ip, session_start

Заменить на:

Код: Выделить всё

$sql = "SELECT session_page, session_logged_in, session_time, session_ip, session_start, session_topic

Найти:

Код: Выделить всё

      message_die(GENERAL_ERROR, "Couldn't obtain user/online forums information.", "", __LINE__, __FILE__, $sql); 
   }

После этого добавить:

Код: Выделить всё

   $sql = "SELECT topic_title, topic_id 
      FROM " . TOPICS_TABLE; 
   if($forums_result = $db->sql_query($sql)) 
   { 
      while($forumsrow = $db->sql_fetchrow($forums_result)) 
      { 
         $topic_data[$forumsrow['topic_id']] = $forumsrow['topic_title']; 
      } 
   } 
   else 
   { 
      message_die(GENERAL_ERROR, "Couldn't obtain user/online topics information.", "", __LINE__, __FILE__, $sql); 
   } 

Найти:

Код: Выделить всё

switch($onlinerow_reg[$i]['user_session_page'])

Перед этим добавить:

Код: Выделить всё

$t_location = '';

Найти:

Код: Выделить всё

$location = $forum_data[$onlinerow_reg[$i]['user_session_page']];

После этого добавить:

Код: Выделить всё

$t_location = $topic_data[$onlinerow_reg[$i]['user_session_topic']];

Найти:

Код: Выделить всё

"</small></center></td><td valign=top><center><small>".$location."</small></center></td><td valign=top><center><small>". $reg_ip.' <a href="bot.php?s='.$showmod.'&ipby='.$reg_ip.'">[<b>?</b>]</a>  <a href="bot.php?s='.$showmod.'&addbot='.$reg_ip.'&view='.urlencode($username).'">[<b>+</b>]</a></small></center></td></tr>';

Заменить на:

Код: Выделить всё

"</small></center></td><td valign=top><center><small>".$location."-><span class=gensmall><b>".$t_location."</b></span></small></center></td><td valign=top><center><small>". $reg_ip.' <a href="bot.php?s='.$showmod.'&ipby='.$reg_ip.'">[<b>?</b>]</a>  <a href="bot.php?s='.$showmod.'&addbot='.$reg_ip.'&view='.urlencode($username).'">[<b>+</b>]</a></small></center></td></tr>';

Найти:

Код: Выделить всё

switch( $onlinerow_guest[$i]['session_page'] )

Перед этим добавить:

Код: Выделить всё

$t_location = '';

Найти:

Код: Выделить всё

$location = $forum_data[$onlinerow_guest[$i]['session_page']];

После этого добавить:

Код: Выделить всё

$t_location = $topic_data[$onlinerow_guest[$i]['session_topic']]; 

Найти:

Код: Выделить всё

$megalocal=$location.'<br>';

Заменить на:

Код: Выделить всё

$megalocal=$location."-><span class=gensmall><b>".$t_location.'</b></span><br>';

Вроде все правильно написал

[CodeWorld]

хак!

[BMG]

когда один поисковик заходит одновременно с разных IP то определяется как поисковик только один...

[CodeWorld]

Да у меня такое же бывает.. но времени нет Когда появится исправлю

[Siava]

CodeWorld
А меня теперь всё устраивает! Отличный мод, ещё раз спасибо

[CodeWorld]

Большое спасибо, приятно слышать. Будет сводобное время постараюсь вторую бету выпустить!

[Extremator]

Удалил из-за не надобности

[DragonDX]

Мод супер... только не смог понять... как изменить цвет поискового бота в
"Кто сейчас на форуме" ?

[service]

Может я чего-то не понял,
сегодня захлжу на бот.пхп и вижу , о радость , наконецто до нас вебалта дошла ..

| Crawler | WebAlta | 85.202.108.146 (4) | 15.11.2006 01:26 |

Вот тут интресное самое захожду на http://webnames.ru проверяю ИП и вижу

inetnum: 85.202.96.0 - 85.202.127.255
netname: VOLIA
descr: Volia ISP Dynamic IP Pool #3
country: UA
admin-c: VNCC-RIPE
tech-c: VNCC-RIPE
status: ASSIGNED PA

Обьясниет слепинькому что это и как это понимать?? Я так понимаю что ботов выкупают по юзерагенту, тогда почему апи от воли...
п.с. я знают что такое Volia.

[service]

и еще вопрос этот мод не конфликтует с модом Search Engines Friendly Board ??