mysql/syslog_logs.pl

   1 # Contains a function to supply the syslog module with extra logs
   2
   3 do 'mysql-lib.pl';
   4
   5 # syslog_getlogs()
   6 # Returns a list of structures containing extra log files known to this module
   7 sub syslog_getlogs
   8 {
   9 local $conf = &get_mysql_config();
  10 local ($sect) = grep { $_->{'name'} eq 'mysqld_safe' ||
  11                        $_->{'name'} eq 'safe_mysqld' } @$conf;
  12 local @rv;
  13 if ($sect) {
  14         local $log = &find_value("err-log", $sect->{'members'});
  15         if ($log) {
  16                 push(@rv, { 'file' => $log,
  17                             'desc' => $text{'syslog_desc'},
  18                             'active' => 1,
  19                           } );
  20                 }
  21         local $log = &find_value("log", $sect->{'members'});
  22         if ($log) {
  23                 push(@rv, { 'file' => $log,
  24                             'desc' => $text{'syslog_logdesc'},
  25                             'active' => 1,
  26                           } );
  27                 }
  28         }
  29 return @rv;
  30 }
  31