← Back
Editing: edit_saccess.cgi
#!/usr/bin/perl # Show server block access control options use strict; use warnings; require './nginx-lib.pl'; our (%text, %in, %access); &ReadParse(); my $server = &find_server($in{'id'}); $server || &error($text{'server_egone'}); &can_edit_server($server) || &error($text{'server_ecannot'}); &ui_print_header(&server_desc($server), $text{'access_title'}, ""); print &ui_form_start("save_saccess.cgi", "post"); print &ui_hidden("id", $in{'id'}); print &nginx_submod_hidden(); print &ui_table_start($text{'access_header'}, undef, 2); print &nginx_access_input("allow", "deny", $server); print &nginx_realm_input("auth_basic", $server); print &nginx_passfile_input("auth_basic_user_file", $server, $in{'id'}); print &ui_table_end(); print &ui_form_end([ [ undef, $text{'save'} ] ]); &ui_print_footer(&nginx_submod_url("edit_server.cgi?id=".&urlize($in{'id'})), $text{'server_return'});
Save File
Cancel