One Hat Cyber Team

Your IP: 216.73.216.133
Server IP: 185.119.109.197
Server: Linux managedhosting.chostar.me 5.15.0-160-generic #170-Ubuntu SMP Wed Oct 1 10:06:56 UTC 2025 x86_64
Server Software: Apache
PHP Version: 8.1.33
Buat File | Buat Folder

View File Name : log_parser.pl

# log_parser.pl
# Functions for parsing this module's logs

do 'proc-lib.pl';

# parse_webmin_log(user, script, action, type, object, ¶ms)
# Converts logged information from this module into human-readable form
sub parse_webmin_log
{
local ($user, $script, $action, $type, $object, $p, $long) = @_;
if ($action eq 'run') {
	return &text('log_run', "<tt>".&html_escape($p->{'cmd'})."</tt>");
	}
elsif ($action eq 'kill') {
	local ($desc, $i);
	@pids = $p->{'pid'} ? ( $p->{'pid'} ) : split(/\s+/, $p->{'pidlist'});
	if ($long) {
		for($i=0; $i<@pids; $i++) {
			$desc .= "<i>".$p->{"args$i"}.
				 "</i>  (PID $pids[$i])<br>";
			}
		return &text(@pids == 1 ? 'log_kill_l' : 'log_kills_l',
			     "<tt>$p->{'signal'}</tt>", $desc);
		}
	else {
		if (@pids == 1) {
			return &text('log_kill', "<tt>$p->{'signal'}</tt>",
				     $pids[0]);
			}
		else {
			return &text('log_kills', "<tt>$p->{'signal'}</tt>",
				     scalar(@pids));
			}
		}
	}
elsif ($action eq 'renice') {
	return &text('log_renice', $p->{'nice'}, $p->{'pid'});
	}
else {
	return undef;
	}
}