Всем привет!

Существует ли в природе тулза для мониторинга активности пользователей при обращении к SQUIDу в реальном масштабе времени???

• Мониторинг активности,mika, 09:46 , 25-Апр-03
• Мониторинг активности,mplane, 15:07 , 15-Май-03
  • Мониторинг активности,sis, 09:42 , 16-Май-03
• Мониторинг активности,ds, 14:19 , 16-Май-03
  • Мониторинг активности,AD, 20:38 , 21-Май-03

>Всем привет!
>
>Существует ли в природе тулза для мониторинга активности пользователей при обращении к
>SQUIDу в реальном масштабе времени???

http://www.ssft.net/squidstat/

>Всем привет!
>
>Существует ли в природе тулза для мониторинга активности пользователей при обращении к
>SQUIDу в реальном масштабе времени???

если хош я тебе енту тулузу вышлю.......пиши vkvmail@mail.ru

>>Всем привет!
>>
>>Существует ли в природе тулза для мониторинга активности пользователей при обращении к
>>SQUIDу в реальном масштабе времени???
>
>если хош я тебе енту тулузу вышлю.......пиши vkvmail@mail.ru

а у меня проблема с этой прогой в сквиде разрешил доступ кешменеджеру
виндовая версия конектиться но нечего непоказывает
а линуксовая постоянно орет сол нет доступа.
вот такая трабла.
так что приходиться пользоваться
#!/bin/sh
tail -f /var/log/squid/access.log | awk {if($7 ~ /http:\/\/www.*/) print i$3"\t" $7"\t"$8 }

>Всем привет!
>
>Существует ли в природе тулза для мониторинга активности пользователей при обращении к
>SQUIDу в реальном масштабе времени???

Или так

#!/bin/sh                                                                      
gawk '$5>100000 {print strftime("%d-%m-%Y %H:%M:%S",$1), $3, $5, $7}' /usr/local/squid/logs/access.log

где 100000 - количество байт.

Т.е. если кол-во больше указанного, вывести на консоль. Можешь перенаправить вывод по желанию.
          

!/bin/sh

tail -f /usr/local/squid/logs/access.log |   perl -e 'use Socket;use Term::ANSIC
olor;while (<>) {chomp;my @val=split /\s+/,$_;
              @addr=gethostbyaddr(Socket::inet_aton($val[2]),Socket::AF_INET);
              my($sec,$min,$hour,$mday,$mon,$year,$wday,$yday)=localtime("$val[0
]");
              $min=0 x (2-length($min)).$min;
              $hour=0 x (2-length($hour)).$hour;
              $val = join(" ", @val);
              print color ("reset"), ("IP:", $addr[0]?$addr[0]:$val[2],"\tUser:"
, $val[7], "\tResult:", $val[3], "\n", "Size:", $val[1], " Byte\t", "$hour:$min"
, "\t", $val[6], "\n");
              print color ("red"), ("___________________________________________
_____________________________________", "\n")}' ;

такая еще есть./