Support alternate log file

This commit is contained in:
Daniel Berteaud 2012-10-19 19:50:08 +02:00
parent 151ff8b893
commit 284605dfb4
2 changed files with 12 additions and 2 deletions

View File

@ -9,7 +9,7 @@ use strict;
our %opts = ();
# Set default options
$opts{log} = '/var/log/smb_audit.log';
$opts{log} = '/var/log/messages';
$opts{debug} = 0;
$opts{dbhost} = 'localhost';
$opts{dbname} = 'samba_log';

View File

@ -7,10 +7,20 @@ my $dbname = $rec->prop('DbName') || 'samba_log';
my $dbuser = $rec->prop('DbUser') || 'samba';
my $dbpass = $rec->prop('DbPassword') || 'samba';
my $dbhost = $rec->prop('DbHost') || 'localhost';
my $log = '/var/log/messages';
if (-e '/var/log/smb_audit.log') {
$log = '/var/log/smb_audit.log';
}
elsif ($rec->prop('LogFile')){
$log = $rec->prop('LogFile');
}
open(STDERR, ">&STDOUT");
my @args = ("--debug=1", "--dbname=$dbname", "--dbuser=$dbuser", "--dbpass=$dbpass", "--exclude=opendir");
my @args = ("--debug=1", "--dbname=$dbname", "--dbuser=$dbuser",
"--dbpass=$dbpass", "--exclude=opendir",
"--log=$log");
push @args, "--dbhost=$dbhost" if ($dbhost ne 'localhost');