%PDF- %PDF-
Direktori : /var/www/html/friendstravel.al/wp-content/uploads/k2/root/usr/share/webmin/at/ |
Current File : /var/www/html/friendstravel.al/wp-content/uploads/k2/root/usr/share/webmin/at/save_allow.cgi |
#!/usr/bin/perl # Update allowed or denied At users use strict; use warnings; our (%access, %text, %in); require './at-lib.pl'; ReadParse(); &error_setup($text{'allow_err'}); $access{'allow'} || &error($text{'allow_ecannot'}); if ($in{'amode'} == 0) { &save_allowed(); &save_denied(); } elsif ($in{'amode'} == 1) { my @users = split(/\s+/, $in{'ausers'}); @users || &error($text{'allow_eusers'}); &save_allowed(@users); &save_denied(); } elsif ($in{'amode'} == 2) { my @users = split(/\s+/, $in{'ausers'}); @users || &error($text{'allow_eusers'}); &save_allowed(); &save_denied(@users); } &webmin_log("allow"); &redirect("");