Contenido Project
version 7
SVN-репозиторий
Line # Revision Author
1 3 ahitrov@rambler.ru #!/usr/bin/perl
2
3 ##############################################################################
4 # $HeadURL: http://svn.dev.rambler.ru/Contenido/trunk/services/logtail $
5 # $Id: logtail 335 2006-08-10 13:06:40Z lonerr $
6 #
7 # ������ ���������� ����, �������� ��������� � crontab:
8 # */5 10-19 * * * logtail /.../error_log ~/tmp/error_log.off
9 ##############################################################################
10
11 use strict;
12 use warnings 'all';
13
14 use File::stat;
15 use FindBin;
16
17
18 if ($#ARGV<0 || $#ARGV>1) {
19 &usage;
20 exit 1;
21 }
22
23 my $log_file = $ARGV[0];
24 my $offset_file = $ARGV[1] || "$log_file.offset";
25
26 my $stat = stat($log_file) or die "Can't stat $log_file - $!";
27
28 my ($prev_size, $prev_ino);
29 if (-f $offset_file) {
30 open OFF, "< $offset_file" or die "Can't read offset_file - $!";
31 $prev_size = <OFF>;
32 $prev_ino = <OFF>;
33 close OFF;
34 }
35 $prev_size = 0 unless $prev_ino==$stat->ino && $prev_size<=$stat->size;
36
37 exit if $prev_size==$stat->size;
38
39 open LOG, "< $log_file" or die "Can't read log - $!";
40 seek LOG, $prev_size, 0 or die "Can't seek - $!";
41 my $buf;
42 my $readed = read LOG, $buf, $stat->size - $prev_size;
43 close LOG;
44 die "Can't read log_file - $!" unless $readed;
45
46 print $buf;
47
48 open OFF, "> $offset_file" or die "Can't write offset_file - $!";
49 print OFF $stat->size."\n".$stat->ino."\n$log_file\n".localtime()."\n";
50 close OFF;
51
52
53 sub usage {
54 print <<EOM;
55 Usage:
56 $FindBin::Script logfile [offset.file]
57 EOM
58 }

Небольшая справка по веткам

cnddist – контейнер, в котором хранятся все дистрибутивы всех библиотек и программных пакетов, которые использовались при построении различных версий Contenido. Если какой-то библиотеки в данном хранилище нет, инсталлятор сделает попытку "подтянуть" ее с веба (например, с CPAN). Если библиотека слишком старая, есть очень большая вероятность, что ее там уже нет. Поэтому мы храним весь хлам от всех сборок. Если какой-то дистрибутив вдруг отсутствует в cnddist - напишите нам, мы положим его туда.

koi8 – отмирающая ветка, чей код, выдача и все внутренние библиотеки заточены на кодировку KOI8-R. Вносятся только те дополнения, которые касаются внешнего вида и функционала админки, баги ядра, обязательные обновления портов и мелочи, которые легко скопипастить. В дальнейшем планируется полная остановка поддержки по данной ветке.

utf8 – актуальная ветка, заточенная под UTF-8.

Внутри каждой ветки: core – исходники ядра; install – скрипт установки инсталляции; plugins – плагины; samples – "готовые к употреблению" проекты, которые можно поставить, запустить и посмотреть, как они работают.
© 2003 – 2009 «Рамблер»
© 2010 – 2024 «Андрей (Handy) Хитров»