Home Files
Adminer
Execute Command
PHP Eval
Symlink
File Upload
Owner :
www-data
PHP Version
5.6.40-0+deb8u12
Disk Space
40.96 GB
Server Addr
19-www4
Your IP
10.10.10.40
Edit File
File:
#!/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("");