Handle hostnames with upper-case letters
[webmin.git] / webalizer / log_parser.pl
1 # log_parser.pl
2 # Functions for parsing this module's logs
3
4 do 'webalizer-lib.pl';
5
6 # parse_webmin_log(user, script, action, type, object, &params)
7 # Converts logged information from this module into human-readable form
8 sub parse_webmin_log
9 {
10 local ($user, $script, $action, $type, $object, $p) = @_;
11 if ($type eq "log") {
12         return &text("log_${action}_log", "<tt>".&html_escape($object)."</tt>");
13         }
14 elsif ($type eq "logs") {
15         return &text("log_${action}_logs", $object);
16         }
17 elsif ($type eq "global") {
18         return $object eq "-" ? $text{"log_global"} :
19                 &text("log_global2", "<tt>".&html_escape($object)."</tt>");
20         }
21 }
22