mirror of
https://github.com/webmin/webmin.git
synced 2026-05-15 11:20:29 +01:00
68aab1c057
Some checks failed
webmin.dev: webmin/webmin / build (push) Has been cancelled
[no-build]
81 lines
2.3 KiB
Perl
Executable File
81 lines
2.3 KiB
Perl
Executable File
|
|
require 'lpadmin-lib.pl';
|
|
|
|
# acl_security_form(&options)
|
|
# Output HTML for editing security options for the lpadmin module
|
|
sub acl_security_form
|
|
{
|
|
my ($o) = @_;
|
|
my @plist = &list_printers();
|
|
my @popts = map {
|
|
my $prn = &get_printer($_);
|
|
[ $_, $prn->{'desc'}." ($_)" ]
|
|
} @plist;
|
|
|
|
print &ui_table_row($text{'acl_printers'},
|
|
&ui_radio("printers_def", $o->{'printers'} eq '*' ? 1 : 0,
|
|
[ [ 1, $text{'acl_pall'} ],
|
|
[ 0, $text{'acl_psel'} ] ])."<br>\n".
|
|
&ui_select("printers", [ split(/\s+/, $o->{'printers'}) ], \@popts, 4, 1),
|
|
3);
|
|
|
|
print &ui_table_row($text{'acl_cancel'},
|
|
&ui_radio_table("cancel",
|
|
defined($o->{'cancel'}) ? $o->{'cancel'} : 0,
|
|
[ [ 0, $text{'no'} ],
|
|
[ 1, $text{'yes'} ],
|
|
[ 2, $text{'acl_listed'},
|
|
&ui_select("jobs", [ split(/\s+/, $o->{'jobs'}) ], \@popts, 4, 1) ] ], 1),
|
|
3);
|
|
|
|
my $user_def = $o->{'user'} eq '*' ? 1 : $o->{'user'} ? 0 : 2;
|
|
print &ui_table_row($text{'acl_user'},
|
|
&ui_radio_table("user_def", $user_def,
|
|
[ [ 1, $text{'acl_user_all'} ],
|
|
[ 2, $text{'acl_user_this'} ],
|
|
[ 0, "", &ui_textbox("user",
|
|
$user_def == 0 ? $o->{'user'} : "", 13) ] ], 1),
|
|
3);
|
|
|
|
print &ui_table_row($text{'acl_add'},
|
|
&ui_yesno_radio("add", $o->{'add'}));
|
|
print &ui_table_row($text{'acl_stop'},
|
|
&ui_radio("stop", defined($o->{'stop'}) ? $o->{'stop'} : 0,
|
|
[ [ 1, $text{'yes'} ],
|
|
[ 2, $text{'acl_restart'} ],
|
|
[ 0, $text{'no'} ] ]));
|
|
|
|
print &ui_table_row($text{'acl_view'},
|
|
&ui_yesno_radio("view", $o->{'view'}));
|
|
print &ui_table_row($text{'acl_test'},
|
|
&ui_yesno_radio("test", $o->{'test'}));
|
|
|
|
print &ui_table_row($text{'acl_delete'},
|
|
&ui_yesno_radio("delete", $o->{'delete'}));
|
|
print &ui_table_row($text{'acl_cluster'},
|
|
&ui_yesno_radio("cluster", $o->{'cluster'}));
|
|
}
|
|
|
|
# acl_security_save(&options)
|
|
# Parse the form for security options for the lpadmin module
|
|
sub acl_security_save
|
|
{
|
|
if ($in{'printers_def'}) {
|
|
$_[0]->{'printers'} = '*';
|
|
}
|
|
else {
|
|
$_[0]->{'printers'} = join(" ", split(/\0/, $in{'printers'}));
|
|
}
|
|
$_[0]->{'cancel'} = $in{'cancel'};
|
|
$_[0]->{'jobs'} = $in{'cancel'} == 2 ? join(" ", split(/\0/, $in{'jobs'})) : "";
|
|
$_[0]->{'add'} = $in{'add'};
|
|
$_[0]->{'stop'} = $in{'stop'};
|
|
$_[0]->{'view'} = $in{'view'};
|
|
$_[0]->{'user'} = $in{'user_def'} == 1 ? '*' :
|
|
$in{'user_def'} == 2 ? undef : $in{'user'};
|
|
$_[0]->{'delete'} = $in{'delete'};
|
|
$_[0]->{'test'} = $in{'test'};
|
|
$_[0]->{'cluster'} = $in{'cluster'};
|
|
}
|
|
|