Prevent credentials being logged in plain text (#249)
* Prevent credentials being logged in plain text except in the highest debug level * Fix missing semicolon
This commit is contained in:
parent
044fff9aa8
commit
260bd6cdd6
@ -120,7 +120,10 @@ sub read_input {
|
|||||||
while (<STDIN>) {
|
while (<STDIN>) {
|
||||||
alarm 0;
|
alarm 0;
|
||||||
$_ =~ s/\r?\n$//s; # advanced chomp
|
$_ =~ s/\r?\n$//s; # advanced chomp
|
||||||
$self->log(LOGINFO, "dispatching $_");
|
my $log = $_;
|
||||||
|
$log =~ s/AUTH PLAIN (.*)/AUTH PLAIN <hidden credentials>/
|
||||||
|
unless ($self->config('loglevel') || '6') >= 7;
|
||||||
|
$self->log(LOGINFO, "dispatching $log");
|
||||||
$self->connection->notes('original_string', $_);
|
$self->connection->notes('original_string', $_);
|
||||||
defined $self->dispatch(split / +/, $_, 2)
|
defined $self->dispatch(split / +/, $_, 2)
|
||||||
or $self->respond(502, "command unrecognized: '$_'");
|
or $self->respond(502, "command unrecognized: '$_'");
|
||||||
|
Loading…
Reference in New Issue
Block a user