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.158
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 /
usermin /
mailbox /
[ HOME SHELL ]
Name
Size
Permission
Action
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
ulang
[ DIR ]
drwxr-xr-x
xinha
[ DIR ]
drwxr-xr-x
CHANGELOG
15.09
KB
-rw-r--r--
add_address.cgi
558
B
-rwxr-xr-x
address_chooser.cgi
5.04
KB
-rwxr-xr-x
auto.pl
1.89
KB
-rwxr-xr-x
boxes-lib.pl
80.03
KB
-rwxr-xr-x
classlinks.sh
160
B
-rwxr-xr-x
config-ALL-linux
481
B
-rw-r--r--
config-aix
482
B
-rw-r--r--
config-freebsd
478
B
-rw-r--r--
config-hpux
478
B
-rw-r--r--
config-irix
477
B
-rw-r--r--
config-macos
478
B
-rw-r--r--
config-msc-linux
495
B
-rw-r--r--
config-netbsd
478
B
-rw-r--r--
config-openbsd
478
B
-rw-r--r--
config-openserver
483
B
-rw-r--r--
config-osf1
484
B
-rw-r--r--
config-qnx
478
B
-rw-r--r--
config-solaris
477
B
-rw-r--r--
config-unixware
477
B
-rw-r--r--
config.info
3.15
KB
-rw-r--r--
config.info.ca
3.54
KB
-rwxr-xr-x
config.info.de
1.59
KB
-rw-r--r--
config.info.el
4.76
KB
-rw-r--r--
config.info.hu
0
B
-rw-r--r--
config.info.nl
2.9
KB
-rwxr-xr-x
config.info.no
3.09
KB
-rw-r--r--
copy.cgi
795
B
-rwxr-xr-x
copy_form.cgi
1.08
KB
-rwxr-xr-x
defaultuconfig
732
B
-rw-r--r--
delete_folders.cgi
1.27
KB
-rwxr-xr-x
delete_mail.cgi
6.67
KB
-rwxr-xr-x
detach.cgi
3
KB
-rwxr-xr-x
detachall.cgi
1.83
KB
-rwxr-xr-x
edit_auto.cgi
1.76
KB
-rwxr-xr-x
edit_comp.cgi
1.53
KB
-rwxr-xr-x
edit_folder.cgi
2.62
KB
-rwxr-xr-x
edit_ifolder.cgi
1
KB
-rwxr-xr-x
edit_imap.cgi
1.8
KB
-rwxr-xr-x
edit_pop3.cgi
1.64
KB
-rwxr-xr-x
edit_sig.cgi
499
B
-rwxr-xr-x
edit_virt.cgi
1.19
KB
-rwxr-xr-x
export.cgi
1.27
KB
-rwxr-xr-x
folders-lib.pl
102.93
KB
-rwxr-xr-x
import.cgi
2.97
KB
-rwxr-xr-x
inbox_login.cgi
1.36
KB
-rwxr-xr-x
inbox_login_error.cgi
1.12
KB
-rwxr-xr-x
inbox_logout.cgi
450
B
-rwxr-xr-x
index.cgi
12.21
KB
-rwxr-xr-x
list_addresses.cgi
8.47
KB
-rwxr-xr-x
list_folders.cgi
4.89
KB
-rwxr-xr-x
list_ifolders.cgi
2.77
KB
-rwxr-xr-x
mail_search.cgi
7.43
KB
-rwxr-xr-x
mailbox-lib.pl
65.52
KB
-rwxr-xr-x
module.info
296
B
-rw-r--r--
module.info.af
0
B
-rw-r--r--
module.info.af.auto
152
B
-rw-r--r--
module.info.ar
0
B
-rw-r--r--
module.info.ar.auto
256
B
-rw-r--r--
module.info.be
0
B
-rw-r--r--
module.info.be.auto
300
B
-rw-r--r--
module.info.bg
0
B
-rw-r--r--
module.info.bg.auto
305
B
-rw-r--r--
module.info.ca
26
B
-rw-r--r--
module.info.ca.auto
168
B
-rw-r--r--
module.info.cs
25
B
-rw-r--r--
module.info.cs.auto
142
B
-rw-r--r--
module.info.da
0
B
-rw-r--r--
module.info.da.auto
159
B
-rw-r--r--
module.info.de
119
B
-rw-r--r--
module.info.el
0
B
-rw-r--r--
module.info.el.auto
357
B
-rw-r--r--
module.info.es
26
B
-rw-r--r--
module.info.es.auto
163
B
-rw-r--r--
module.info.eu
0
B
-rw-r--r--
module.info.eu.auto
166
B
-rw-r--r--
module.info.fa
0
B
-rw-r--r--
module.info.fa.auto
242
B
-rw-r--r--
module.info.fi
0
B
-rw-r--r--
module.info.fi.auto
149
B
-rw-r--r--
module.info.fr
26
B
-rw-r--r--
module.info.fr.auto
167
B
-rw-r--r--
module.info.he
0
B
-rw-r--r--
module.info.he.auto
208
B
-rw-r--r--
module.info.hr
0
B
-rw-r--r--
module.info.hr.auto
167
B
-rw-r--r--
module.info.hu
38
B
-rw-r--r--
module.info.hu.auto
173
B
-rw-r--r--
module.info.it
0
B
-rw-r--r--
module.info.it.auto
151
B
-rw-r--r--
module.info.ja
0
B
-rw-r--r--
module.info.ja.auto
213
B
-rw-r--r--
module.info.ko
0
B
-rw-r--r--
module.info.ko.auto
177
B
-rw-r--r--
module.info.lt
0
B
-rw-r--r--
module.info.lt.auto
180
B
-rw-r--r--
module.info.lv
0
B
-rw-r--r--
module.info.lv.auto
168
B
-rw-r--r--
module.info.ms
0
B
-rw-r--r--
module.info.ms.auto
137
B
-rw-r--r--
module.info.mt
0
B
-rw-r--r--
module.info.mt.auto
146
B
-rw-r--r--
module.info.nl
29
B
-rw-r--r--
module.info.nl.auto
137
B
-rw-r--r--
module.info.no
19
B
-rw-r--r--
module.info.no.auto
122
B
-rw-r--r--
module.info.pl
0
B
-rw-r--r--
module.info.pl.auto
170
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
0
B
-rw-r--r--
module.info.pt_BR.auto
165
B
-rw-r--r--
module.info.ro
0
B
-rw-r--r--
module.info.ro.auto
173
B
-rw-r--r--
module.info.ru
55
B
-rw-r--r--
module.info.ru.auto
264
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
155
B
-rw-r--r--
module.info.sv
0
B
-rw-r--r--
module.info.sv.auto
150
B
-rw-r--r--
module.info.th
0
B
-rw-r--r--
module.info.th.auto
306
B
-rw-r--r--
module.info.tr
0
B
-rw-r--r--
module.info.tr.auto
172
B
-rw-r--r--
module.info.uk
0
B
-rw-r--r--
module.info.uk.auto
298
B
-rw-r--r--
module.info.ur
0
B
-rw-r--r--
module.info.ur.auto
282
B
-rw-r--r--
module.info.vi
0
B
-rw-r--r--
module.info.vi.auto
175
B
-rw-r--r--
module.info.zh
0
B
-rw-r--r--
module.info.zh.auto
141
B
-rw-r--r--
module.info.zh_TW
0
B
-rw-r--r--
module.info.zh_TW.auto
147
B
-rw-r--r--
newfolder.cgi
170
B
-rwxr-xr-x
print_mail.cgi
1.21
KB
-rwxr-xr-x
quotacheck.pl
3.13
KB
-rwxr-xr-x
reply_mail.cgi
26.55
KB
-rwxr-xr-x
save_address.cgi
981
B
-rwxr-xr-x
save_allow.cgi
708
B
-rwxr-xr-x
save_auto.cgi
1.07
KB
-rwxr-xr-x
save_comp.cgi
1.18
KB
-rwxr-xr-x
save_folder.cgi
3.85
KB
-rwxr-xr-x
save_group.cgi
744
B
-rwxr-xr-x
save_ifolder.cgi
1.73
KB
-rwxr-xr-x
save_imap.cgi
1.8
KB
-rwxr-xr-x
save_pop3.cgi
1.58
KB
-rwxr-xr-x
save_sig.cgi
595
B
-rwxr-xr-x
save_virt.cgi
983
B
-rwxr-xr-x
search_form.cgi
2.49
KB
-rwxr-xr-x
send_mail.cgi
18.73
KB
-rwxr-xr-x
slideshow.cgi
1.65
KB
-rwxr-xr-x
sort.cgi
1.03
KB
-rwxr-xr-x
specialsync.cgi
1.15
KB
-rwxr-xr-x
system_info.pl
978
B
-rw-r--r--
uconfig.info
5.01
KB
-rw-r--r--
uconfig.info.ca
5.66
KB
-rwxr-xr-x
uconfig.info.cs
5.03
KB
-rw-r--r--
uconfig.info.da
0
B
-rw-r--r--
uconfig.info.de
5.92
KB
-rw-r--r--
uconfig.info.el
7.4
KB
-rw-r--r--
uconfig.info.es
0
B
-rw-r--r--
uconfig.info.fr
145
B
-rw-r--r--
uconfig.info.hu
0
B
-rw-r--r--
uconfig.info.it
3.27
KB
-rw-r--r--
uconfig.info.nl
5.26
KB
-rw-r--r--
uconfig.info.no
5.02
KB
-rw-r--r--
uconfig.info.pl
0
B
-rwxr-xr-x
uconfig.info.pt_BR
5.01
KB
-rw-r--r--
uconfig_info.pl
264
B
-rwxr-xr-x
view_mail.cgi
17.62
KB
-rwxr-xr-x
virtualize.cgi
605
B
-rwxr-xr-x
webmin_menu.pl
4.5
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : quotacheck.pl
#!/usr/bin/perl # Called from Procmail to check if some user is over his LDAP quota, and if # so bounces it. Exits with 0 if OK, 100 if over quota, or 111 if a temporary # error occurred use strict; use warnings; use Net::LDAP; @ARGV == 6 || temperr("usage: quotacheck.pl <email> <ldap-host> <ldap-port> <ldap-based> <ldap-login> <ldap-pass>"); my ($email, $host, $port, $base, $login, $pass) = @ARGV; # Read in email my $size = 0; while(<STDIN>) { $size += length($_); } # Connect to LDAP my $ldap = Net::LDAP->new($host, port => $port); $ldap || temperr("Failed to connect to LDAP server $host:$port"); my $mesg = $ldap->bind(dn => $login, password => $pass); if (!$mesg || $mesg->code) { temperr("Failed to login to LDAP server as $login : ", $mesg ? $mesg->error : "Unknown error"); } # Lookup the email address my $rv = $ldap->search(base => $base, filter => "(|(mail=$email)(mailAlternateAddress=$email))"); if ($rv->code) { temperr("Failed to lookup user in LDAP : ",$rv->error); } my ($user) = $rv->all_entries(); exit(0) if (!$user); # Non-LDAP, so no quota # Check the current size of all the user's folders my $mms = $user->get_value('mailMessageStore'); my $inbox = { 'type' => &folder_type($mms), 'file' => $mms }; my @folders = ( $inbox ); my $fdir = $user->get_value('homeDirectory')."/mail"; opendir(DIR, $fdir); while(my $f = readdir(DIR)) { next if ($f eq "." || $f eq ".."); my $path = "$fdir/$f"; my $folder = { 'type' => &folder_type($path), 'file' => $path }; push(@folders, $folder); } closedir(DIR); my $total = &folder_size(@folders); print "Current size: $total\n"; print "Extra size: $size\n"; # Compare to quota my $quota = $user->get_value('mailQuotaSize'); print "Allowed quota: $quota\n"; if ($quota && $total + $size > $quota) { print STDERR "Quota exceeded\n"; exit(100); } exit(0); sub temperr { print STDERR @_,"\n"; exit(111); } # folder_size(&folder, ...) # Sets the 'size' field of one or more folders, and returns the total sub folder_size { my $total; foreach my $f (@_) { if ($f->{'type'} == 0) { # Single mail file - size is easy my @st = stat($f->{'file'}); $f->{'size'} = $st[7]; } elsif ($f->{'type'} == 1) { # Maildir folder size is that of all mail files my $qd; $f->{'size'} = 0; foreach my $qd ('cur', 'new') { my $mf; opendir(QDIR, "$f->{'file'}/$qd"); while($mf = readdir(QDIR)) { next if ($mf eq "." || $mf eq ".."); my @st = stat("$f->{'file'}/$qd/$mf"); $f->{'size'} += $st[7]; } closedir(QDIR); } } elsif ($f->{'type'} == 3) { # MH folder size is that of all mail files my $mf; $f->{'size'} = 0; opendir(MHDIR, $f->{'file'}); while($mf = readdir(MHDIR)) { next if ($mf eq "." || $mf eq ".."); my @st = stat("$f->{'file'}/$mf"); $f->{'size'} += $st[7]; } closedir(MHDIR); } elsif ($f->{'type'} == 5) { # Size of a combined folder is the size of all sub-folders return &folder_size(@{$f->{'subfolders'}}); } else { # Cannot get size of a remote folder $f->{'size'} = undef; } $total += $f->{'size'}; } return $total; } # folder_type(file_or_dir) sub folder_type { return -d "$_[0]/cur" ? 1 : -d $_[0] ? 3 : 0; }
Close