mirror of
https://github.com/webmin/webmin.git
synced 2026-06-29 15:20:29 +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.
35 lines
863 B
Perl
35 lines
863 B
Perl
use strict;
|
|
use warnings;
|
|
|
|
require './systemd-lib.pl'; ## no critic
|
|
|
|
our (%in, %text);
|
|
|
|
# show_visible_tabs(value)
|
|
# Returns checkbox controls for choosing which index tabs are visible.
|
|
sub show_visible_tabs
|
|
{
|
|
my ($value) = @_;
|
|
my %enabled = map { $_, 1 } split(/\s*,\s*/, $value || default_visible_tabs());
|
|
my @fields;
|
|
foreach my $tab (get_index_tab_ids()) {
|
|
my $label = $text{'systemd_tab_'.$tab} || ucfirst($tab);
|
|
push(@fields, ui_checkbox(
|
|
"visible_tabs", $tab, $label, $enabled{$tab}));
|
|
}
|
|
return join(" ", @fields);
|
|
}
|
|
|
|
# parse_visible_tabs(value)
|
|
# Returns selected tab IDs, and rejects saving with every tab hidden.
|
|
sub parse_visible_tabs
|
|
{
|
|
my @tabs = split(/\0/, $in{'visible_tabs'} || "");
|
|
my %valid = map { $_, 1 } get_index_tab_ids();
|
|
@tabs = grep { $valid{$_} } @tabs;
|
|
@tabs || error($text{'systemd_evisibletabs'});
|
|
return join(",", @tabs);
|
|
}
|
|
|
|
1;
|