/usr/sbin/octo_statistic_reporter is in octopussy 1.0.6-0ubuntu2.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 | #!/usr/bin/perl -w
=head1 NAME
octo_statistics_reporter - Octopussy Statistics Reporter program
=head1 SYNOPSIS
octo_statistics_reporter <statistics_report>
=head1 DESCRIPTION
octo_statistics_reporter is the program used by the Octopussy Project
to generate Statistics Reports
=cut
use strict;
use warnings;
use Readonly;
use Linux::Inotify2;
use AAT;
use Octopussy;
use Octopussy::FS;
Readonly my $PROG_NAME => 'octo_statistics_reporter';
my $dir_program = Octopussy::FS::Directory('programs');
my $dir_pid = Octopussy::FS::Directory('running');
my $report = $ARGV[0];
#
# MAIN
#
exit if (!Octopussy::Valid_User($PROG_NAME));
AAT::Syslog($PROG_NAME, "Report: $report Started !");
while (!$exit_request)
{
my @events = $inotify->read;
foreach my $e (@events) { Inotify_Watch($e->fullname); }
while ($file = shift @files)
{
chomp $file;
if (scalar @services == 0) { Incoming_To_Unknown($file); }
else { File_Handler($file); }
last if ($reload_request || $exit_request);
}
if (!$exit_request) { sleep 2; }
}
unlink $file_pid;
AAT::Syslog($PROG_NAME, "Report: $report Stopped !");
=head1 AUTHOR
Sebastien Thebert <octo.devel@gmail.com>
=head1 SEE ALSO
octo_dispatcher, octo_extractor, octo_uparser, octo_reporter, octo_scheduler
=cut
|