From: Maniacikarus Date: Sun, 19 Oct 2008 16:03:09 +0000 (+0200) Subject: Integrated logging facility to redirector now warning X-Git-Tag: v2.3-rc1~24 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=0ba563aa596f08f16672dddf3f62ae9177a8db94;p=ipfire-2.x.git Integrated logging facility to redirector now warning if squidGuard List are plaintext files --- diff --git a/config/urlfilter/redirect_wrapper b/config/urlfilter/redirect_wrapper index c9636fcf65..4e39460e31 100644 --- a/config/urlfilter/redirect_wrapper +++ b/config/urlfilter/redirect_wrapper @@ -62,9 +62,9 @@ my $i; my $debug=0; # enable only for debugging if ($debug){ - print "Urlfilter = ".$proxysettings{'ENABLE_FILTER'}."\n"; - print "Clamav = ".$proxysettings{'ENABLE_CLAMAV'}."\n"; - print "Updxlrator = ".$proxysettings{'ENABLE_UPDXLRATOR'}."\n"; + writetolog("Urlfilter = ".$proxysettings{'ENABLE_FILTER'}); + writetolog("Clamav = ".$proxysettings{'ENABLE_CLAMAV'}); + writetolog("Updxlrator = ".$proxysettings{'ENABLE_UPDXLRATOR'}); } # open progamms @@ -72,7 +72,7 @@ my $pidlist = []; my $rlist = []; my $wlist = []; for($i = 0; $i < @$redirectors; $i++) { - if ($debug){print "Current redirector is ".$redirectors->[$i]."\n";} + if ($debug){writetolog("Current redirector is ".$redirectors->[$i]);} $pidlist->[$i] = open2($rlist->[$i], $wlist->[$i], $redirectors->[$i]); } @@ -82,18 +82,27 @@ while($line = <>) { $wlist->[$i]->print($line); $return = $rlist->[$i]->getline; last if($return ne "\n" and $return ne $line); - # break if redirector changes data + # break if redirector changes data + if ( $return eq "Processing file and database" ){ + writetolog("Emergency - squidGuard not initialised please run squidGuard -C all"); + last; + } } print $return; - if ($debug){ - chomp $line; - chomp $return; - if ( $line ne $return ){ - open(DATEI, ">>/var/log/squid/redirector_debug") || die "Unable to acces file /var/log/redirector_debug"; - print DATEI "Requested ".$line."\nAnswer ".$return."\n"; - close(DATEI); - } - } + if ($debug){ + chomp $line; + chomp $return; + if ( $line ne $return ){ + writetolog("Requested ".$line."\nAnswer ".$return); + } + } } exit 0; + +sub writetolog { + my $log = shift; + open(DATEI, ">>/var/log/squid/redirector_debug") || die "Unable to acces file /var/log/redirector_debug"; + print DATEI $log."\n"; + close(DATEI); +}