mirror of
https://github.com/webmin/webmin.git
synced 2026-06-09 22:40:23 +01:00
*Note: Removes Kea-specific ACL wrapper helpers and switches ACL editor/runtime checks to standard Webmin handling with direct supplied ACL values and get_module_acl checks.
18 lines
474 B
Perl
Executable File
18 lines
474 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# Stop Kea services.
|
|
|
|
use strict;
|
|
use warnings;
|
|
require './kea-dhcp-lib.pl'; ## no critic
|
|
our %text;
|
|
&error_setup($text{'eacl_aviol'});
|
|
my %access = &get_module_acl();
|
|
&error("$text{'eacl_np'} $text{'eacl_papply'}") if (!$access{'apply'});
|
|
|
|
# The header action buttons operate on all configured Kea components together.
|
|
&error_setup($text{'stop_fail'});
|
|
my $err = &kea_run_action('stop');
|
|
&error($err) if ($err);
|
|
&webmin_log("stop");
|
|
&redirect("");
|