Handle hostnames with upper-case letters
[webmin.git] / fsdump / log_parser.pl
1 # log_parser.pl
2 # Functions for parsing this module's logs
3
4 do 'fsdump-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 ($action eq 'create' || $action eq 'modify' ||
12     $action eq 'delete' || $action eq 'kill') {
13         return &text("log_$action", "<tt>".&html_escape($p->{'dir'})."</tt>");
14         }
15 elsif ($action eq 'backup' || $action eq 'bgbackup') {
16         return &text('log_'.$action, "<tt>".&html_escape($p->{'dir'})."</tt>",
17                                    "<tt>".&dump_dest($p)."</tt>");
18         }
19 elsif ($action eq 'restore') {
20         return &text('log_restore', "<tt>".&html_escape($object)."</tt>");
21         }
22 else {
23         return undef;
24         }
25 }
26