diff options
| author | Peter Palfrader <peter@palfrader.org> | 2003-01-14 06:40:24 +0000 |
|---|---|---|
| committer | Peter Palfrader <peter@palfrader.org> | 2003-01-14 06:40:24 +0000 |
| commit | de0bd086333426c994a97addfcdfc7365c14fdf7 (patch) | |
| tree | d3a8a50bb4a834ad6e2cc702cf34f4c4fcfd417b /Echolot | |
| parent | e00e832d440e065e66858155264d0e79cfd3df23 (diff) | |
Make logging configureable
redirect stdout/err to the logfile rather than "outfile" (nothing should ever get there);
redirect stderr to /dev/null when calling Mixmaster
Diffstat (limited to 'Echolot')
| -rw-r--r-- | Echolot/Config.pm | 9 | ||||
| -rw-r--r-- | Echolot/Pinger/Mix.pm | 4 |
2 files changed, 9 insertions, 4 deletions
diff --git a/Echolot/Config.pm b/Echolot/Config.pm index 090d55b..385d1d4 100644 --- a/Echolot/Config.pm +++ b/Echolot/Config.pm @@ -1,7 +1,7 @@ package Echolot::Config; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Config.pm,v 1.45 2003/01/14 05:25:35 weasel Exp $ +# $Id: Config.pm,v 1.46 2003/01/14 06:40:24 weasel Exp $ # =pod @@ -138,6 +138,11 @@ sub init($) { } }, + # logging + logfile => 'pingd.log', + loglevel => 'info', + + # ping types do_pings => { 'cpunk-dsa' => 1, @@ -180,7 +185,7 @@ sub init($) { " not a remailer\n". "\n". "If you want to talk to a human please mail <TMPL_VAR NAME=\"operator_address\">.\n", - + homedir => undef, my_localpart => undef, my_domain => undef, diff --git a/Echolot/Pinger/Mix.pm b/Echolot/Pinger/Mix.pm index b0cf783..6e1072d 100644 --- a/Echolot/Pinger/Mix.pm +++ b/Echolot/Pinger/Mix.pm @@ -1,7 +1,7 @@ package Echolot::Pinger::Mix; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Mix.pm,v 1.11 2003/01/14 06:04:37 weasel Exp $ +# $Id: Mix.pm,v 1.12 2003/01/14 06:40:24 weasel Exp $ # =pod @@ -67,7 +67,7 @@ sub ping($$$$) { return 0; $ENV{'MIXPATH'} = Echolot::Config::get()->{'mixhome'}; - open(MIX, "|".Echolot::Config::get()->{'mixmaster'}." -m -S -l $chaincomma") or + open(MIX, "|".Echolot::Config::get()->{'mixmaster'}." -m -S -l $chaincomma 2>/dev/null") or Echolot::Log::warn("Cannot exec mixpinger: $!."), return 0; print MIX "To: $to\n\n$body\n"; |