Commit e40b3e30 authored by Nigel Kukard's avatar Nigel Kukard
Browse files

Slightly better printing of radius attributes

parent 11531bdb
......@@ -37,11 +37,19 @@ sub parsePacket
# Loop with packet attribute names and add to our log line
$self->addLogLine("PACKET => ");
foreach my $attrName ($self->{'packet'}->attributes()) {
foreach my $attrName (sort $self->{'packet'}->attributes()) {
# Make the value a bit more pretty to print
my $attrVal;
if ($attrName eq "User-Password") {
$attrVal = "-encrypted-";
} else {
$attrVal = $self->{'packet'}->rawattr($attrName);
}
# Add it onto the log line...
$self->addLogLine(
"%s: '%s'",
$attrName,
$self->{'packet'}->rawattr($attrName)
$attrVal,
);
}
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment