mirror of
https://github.com/webmin/webmin.git
synced 2026-06-05 21:00:22 +01:00
267f05ed73
* Note: Gate manual Nginx config editing behind a dedicated ACL and add a per-server quick edit icon for the owning config file.
72 lines
1.9 KiB
Perl
Executable File
72 lines
1.9 KiB
Perl
Executable File
use strict;
|
|
use warnings;
|
|
our (%text, %in);
|
|
|
|
do 'nginx-lib.pl';
|
|
|
|
# acl_security_form(&options)
|
|
# Output HTML for editing security options for the acl module
|
|
sub acl_security_form
|
|
{
|
|
my ($o) = @_;
|
|
|
|
# Allowed server blocks
|
|
print &ui_table_row($text{'acl_vhosts'},
|
|
&ui_radio("vhosts_def", $o->{'vhosts'} ? 0 : 1,
|
|
[ [ 1, $text{'acl_hosts1'} ],
|
|
[ 0, $text{'acl_hosts0'} ] ])."<br>\n".
|
|
&ui_textarea("vhosts",
|
|
join("\n", split(/\s+/, $o->{'vhosts'})), 5, 30), 3);
|
|
|
|
# Can edit server settings?
|
|
print &ui_table_row($text{'acl_edit'},
|
|
&ui_yesno_radio("edit", $o->{'edit'}));
|
|
|
|
# Can create server blocks?
|
|
print &ui_table_row($text{'acl_create'},
|
|
&ui_yesno_radio("create", !defined($o->{'create'}) || $o->{'create'}));
|
|
|
|
# Can stop and start Nginx?
|
|
print &ui_table_row($text{'acl_stop'},
|
|
&ui_yesno_radio("stop", $o->{'stop'}));
|
|
|
|
# Allowed directories for locations
|
|
print &ui_table_row($text{'acl_root'},
|
|
&ui_textarea("root", $o->{'root'}, 5), 3);
|
|
|
|
# Can edit global settings?
|
|
print &ui_table_row($text{'acl_global'},
|
|
&ui_yesno_radio("global", $o->{'global'}));
|
|
|
|
# Can manually edit configuration files?
|
|
print &ui_table_row($text{'acl_manual'},
|
|
&ui_yesno_radio("manual",
|
|
defined($o->{'manual'}) ? $o->{'manual'} : $o->{'global'}));
|
|
|
|
# Can edit log files?
|
|
print &ui_table_row($text{'acl_logs'},
|
|
&ui_yesno_radio("logs", $o->{'logs'}));
|
|
|
|
# Write password files as user
|
|
print &ui_table_row($text{'acl_user'},
|
|
&ui_user_textbox("user", $o->{'user'}));
|
|
|
|
}
|
|
|
|
# acl_security_save(&options)
|
|
# Parse the form for security options for the acl module
|
|
sub acl_security_save
|
|
{
|
|
my ($o) = @_;
|
|
$o->{'vhosts'} = $in{'vhosts_def'} ? ""
|
|
: join(" ", split(/\s+/, $in{'vhosts'}));
|
|
$o->{'edit'} = $in{'edit'};
|
|
$o->{'create'} = $in{'create'};
|
|
$o->{'root'} = $in{'root'};
|
|
$o->{'global'} = $in{'global'};
|
|
$o->{'manual'} = $in{'manual'};
|
|
$o->{'logs'} = $in{'logs'};
|
|
$o->{'user'} = $in{'user'};
|
|
$o->{'stop'} = $in{'stop'};
|
|
}
|