Viewing file: log_parser.pl (843 B) -rwxr-xr-x Select action/file-type: (+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
# log_parser.pl # Functions for parsing this module's logs
use strict; use warnings; no warnings 'redefine'; no warnings 'uninitialized'; do 'servers-lib.pl'; our (%text);
# parse_webmin_log(user, script, action, type, object, ¶ms) # Converts logged information from this module into human-readable form sub parse_webmin_log { my ($user, $script, $action, $type, $object, $p) = @_; $object = &html_escape($object); if ($action eq 'modify') { return &text('log_modify', "<tt>$object</tt>"); } elsif ($action eq 'create') { return &text('log_create', "<tt>$object</tt>"); } elsif ($action eq 'find') { return &text('log_find', "<tt>$object</tt>"); } elsif ($action eq 'delete') { return &text('log_delete', "<tt>$object</tt>"); } elsif ($action eq 'deletes') { return &text('log_deletes', $object); } else { return undef; } }
|