mirror of
https://github.com/webmin/webmin.git
synced 2026-06-24 13:00:30 +01:00
d94000afbd
This PR adds a standalone Systemd Services and Units module for managing systemd units across system and user scopes. The module keeps systemd-specific behavior separate from the legacy Bootup and Shutdown module and is implemented as standalone `strict`/`warnings` Perl code rather than depending on its existing init helpers. Those helpers intentionally smooth over multiple init systems, while this module keeps systemd-specific file handling, user-manager behavior, ACL checks, and control operations explicit, scoped, and easier to audit. It includes: - Tabbed views for services, timers, sockets, paths, targets, storage, resources, devices, and user units - Guided creation and editing for common unit types, with contextual fields, validation, and help - User-scoped unit management with linger support and safe handling of home-directory unit files - Runtime actions for start, stop, restart, enable, disable, status, logs, properties, dependencies, and system-unit mask/unmask - Drop-in override inventory plus create, edit, and delete flows - Manual unit-file editing with daemon reload reminders and actions - Configurable module behavior, visible tabs, display options, and post-create navigation - Comprehensive ACL controls for system/user scopes, actions, manual edits, drop-ins, linger, reload, backup, and user filters - Safe Webmin user support through a scoped safe ACL preset - Virtualmin integration for granting domain owners access to their own systemd user units - Tests for unit generation, safety checks, ACL behavior, user-unit handling, backup coverage, and Perl::Critic compatibility A companion Virtualmin PR adds template integration so domain owners can be granted scoped access to their own systemd user units when this module is installed.
101 lines
3.4 KiB
Perl
Executable File
101 lines
3.4 KiB
Perl
Executable File
# log_parser.pl
|
|
# Functions for parsing this module's logs
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
require 'systemd-lib.pl'; ## no critic
|
|
|
|
our %text;
|
|
|
|
# parse_webmin_log(user, script, action, type, object, params)
|
|
# Converts logged information from this module into escaped HTML fragments.
|
|
sub parse_webmin_log
|
|
{
|
|
my ($user, $script, $action, $type, $object, $p) = @_;
|
|
|
|
# This parser returns HTML fragments, so escape log values before wrapping them
|
|
# in UI tags or translated strings.
|
|
if ($type eq 'systemd-user' &&
|
|
($action eq 'modify' || $action eq 'create' || $action eq 'delete' ||
|
|
$action eq 'override' || $action eq 'deleteoverride' ||
|
|
$action eq 'status' || $action eq 'props' || $action eq 'deps' ||
|
|
$action eq 'logs' ||
|
|
$action eq 'massstart' || $action eq 'massstop' ||
|
|
$action eq 'massrestart' || $action eq 'massenable' ||
|
|
$action eq 'massdisable' || $action eq 'massmask' ||
|
|
$action eq 'massunmask' || $action eq 'massdelete' ||
|
|
$action eq 'linger' ||
|
|
$action eq 'manual' || $action eq 'reload')) {
|
|
|
|
# Linger logs describe the user rather than one or more unit names.
|
|
if ($action eq 'linger') {
|
|
return text('log_user_linger',
|
|
ui_tag('tt', html_escape($p->{'user'})),
|
|
$p->{'enabled'} ? $text{'yes'} : $text{'no'});
|
|
}
|
|
if ($action eq 'manual') {
|
|
return text('log_user_manual',
|
|
ui_tag('tt', html_escape($object)),
|
|
ui_tag('tt', html_escape($p->{'user'})));
|
|
}
|
|
if ($action eq 'reload') {
|
|
return text('log_user_reload',
|
|
ui_tag('tt', html_escape($p->{'user'})));
|
|
}
|
|
|
|
# User-unit actions include both escaped unit names and the owner.
|
|
return text('log_user_'.$action,
|
|
join(", ", map { ui_tag('tt', html_escape($_)) }
|
|
split(/\s+/, $object)),
|
|
ui_tag('tt', html_escape($p->{'user'})));
|
|
}
|
|
|
|
# System-unit messages use the same escaping as user units because unit names
|
|
# can be shown directly in the Webmin log viewer.
|
|
elsif ($type eq 'systemd' && $action eq 'modify') {
|
|
return text('log_modify', ui_tag('tt', html_escape($object)));
|
|
}
|
|
elsif ($type eq 'systemd' && $action eq 'create') {
|
|
return text('log_create', ui_tag('tt', html_escape($object)));
|
|
}
|
|
elsif ($type eq 'systemd' && $action eq 'delete') {
|
|
return text('log_delete', ui_tag('tt', html_escape($object)));
|
|
}
|
|
elsif ($type eq 'systemd' && $action eq 'override') {
|
|
return text('log_override', ui_tag('tt', html_escape($object)));
|
|
}
|
|
elsif ($type eq 'systemd' && $action eq 'deleteoverride') {
|
|
return text('log_deleteoverride',
|
|
ui_tag('tt', html_escape($object)));
|
|
}
|
|
elsif ($type eq 'systemd' && $action eq 'manual') {
|
|
return text('log_manual', ui_tag('tt', html_escape($object)));
|
|
}
|
|
elsif ($type eq 'systemd' && $action eq 'reload') {
|
|
return $text{'log_reload'};
|
|
}
|
|
elsif ($type eq 'systemd' &&
|
|
($action eq 'status' || $action eq 'props' || $action eq 'deps' ||
|
|
$action eq 'logs')) {
|
|
return text('log_'.$action,
|
|
join(", ", map { ui_tag('tt', html_escape($_)) }
|
|
split(/\s+/, $object)));
|
|
}
|
|
|
|
# Mass-action logs contain space-separated unit names.
|
|
elsif ($type eq 'systemd' &&
|
|
($action eq 'massstart' || $action eq 'massstop' ||
|
|
$action eq 'massrestart' ||
|
|
$action eq 'massenable' || $action eq 'massdisable' ||
|
|
$action eq 'massmask' || $action eq 'massunmask')) {
|
|
return text('log_'.$action,
|
|
join(", ", map { ui_tag('tt', html_escape($_)) }
|
|
split(/\s+/, $object)));
|
|
}
|
|
else {
|
|
# Unknown log records fall back to Webmin's default rendering.
|
|
return;
|
|
}
|
|
}
|