Изпечатай

[Hmmm]

СИТУАЦИЯ:
Ubuntu 10.04 сървър с Apache и множество сайтове
Всеки сайт върви на фреймуърк, който логва изключения, потребителски грешки и т.н. в собствен файл

ЦЕЛ:
1. В реално време или на определен интервал да получавам сборна информация от всички логове, но само с последните промени в тях (тези, които не са били вече рипортнати)
2. Самия рипортинг си мисля, че ще е добре, ако стане на един rss feed, защитен с парола през https (но това мога и сам да го организирам, ако информацията от 1. достигне до php)

Имам инсталиран monit на сървъра, който не знам може ли да помогне в случая.

[Naka]

Аз правя така:
За не-много натоварен веб сървер.

tail -f log_fajla_na_apache

или пък

tail -f log_fajla_na_apache | grep 'Googlebot'

подобна комбинация е незаменима ако следиш за някакво събитие в реално време.
tail -f xxxxxx | grep 'yyyyy' | grep 'zzzzzz' | и т.н.

Ама ти май не търсиш точно това?

[Hmmm]

Мда, така трябва да гледам конзолата. Искам да му вкарам малко повече логика и през нета да получавам резултатите.

[koue]

Аз използвам следния скрипт, който изпраща на поща. Лесно може да се преправи да логва в база или в друг формат.
 

Код

GeSHi (Perl):
#!/usr/bin/perl
 
use strict;
use warnings;
my @buffer;
# the size of the buffer which will collect the logs (in lines)
my $buffersize = 3;
my $line;
my $i;
my $subject;
my $send_to = $ARGV[0] or die "\nMail address is missing!\nExample: $0 good_bad_ugly\@blablabla.net /var/log/secure\n\n";
my $LFILE = $ARGV[1] or die "\nLog file missing!\nExample: $0 good_bad_ugly\@blablabla.net /var/log/secure\n\n";
my $MSG;
# regular expression about checking for errors
my $errors = "exception|error";
# don't report if the string contents following regular expression
my $escape = "escape string";
 
open my $pipe, "-|", "/usr/bin/tail", "-n1", "-F", $LFILE or die "could not start tail on $LFILE: $!";
 
while (<$pipe>) {
	# put every single line into @buffer;
        push(@buffer, $_);
	# keep the size of the @buffer;
        while(scalar(@buffer) > $buffersize) {
                shift(@buffer);
        }
	# check log lines for the given regular expressions;
        if (m/$errors/i && !m/$escape/) {
		$subject = $&;
                $line = $_;
                my $DT = `date +H-S`;
                chomp($DT);
                $MSG = $DT." ".$LFILE."\n";
                foreach (@buffer) {
                        $MSG .= $_;
                }
                $MSG .= "--------------\n";
 
                open(SENDMAIL, "|/usr/sbin/sendmail -t") or die "Cannot open sendmail: $!";
                print SENDMAIL "Reply-to: alerts\@blablabla.net\n";
                print SENDMAIL "Subject: $subject\n";
                print SENDMAIL "To: $send_to\n";
                print SENDMAIL "Content-type: text/plain\n\n";
                print SENDMAIL $MSG;
                close(SENDMAIL);
                $MSG = "";
        }
}
 
 

[Hmmm]

Благодаря, това ще ми даде насоки.

Надявах се на нещо готово, но предполагам няма да излезе толкова трудно и да си го напиша.