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 /
bind8 /
[ HOME SHELL ]
Name
Size
Permission
Action
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
CHANGELOG
12.67
KB
-rw-r--r--
acl_security.pl
10.25
KB
-rwxr-xr-x
backup_config.pl
1.47
KB
-rwxr-xr-x
bind8-lib.pl
114.63
KB
-rwxr-xr-x
cgi_args.pl
1.92
KB
-rwxr-xr-x
check_zone.cgi
1.04
KB
-rwxr-xr-x
close.cgi
342
B
-rwxr-xr-x
conf_acls.cgi
989
B
-rwxr-xr-x
conf_controls.cgi
2.34
KB
-rwxr-xr-x
conf_dnssec.cgi
936
B
-rwxr-xr-x
conf_dnssectools.cgi
2.16
KB
-rwxr-xr-x
conf_files.cgi
1.19
KB
-rwxr-xr-x
conf_forwarding.cgi
1.54
KB
-rwxr-xr-x
conf_keys.cgi
1.07
KB
-rwxr-xr-x
conf_logging.cgi
4.85
KB
-rwxr-xr-x
conf_manual.cgi
1.21
KB
-rwxr-xr-x
conf_misc.cgi
1.95
KB
-rwxr-xr-x
conf_ncheck.cgi
807
B
-rwxr-xr-x
conf_net.cgi
3.49
KB
-rwxr-xr-x
conf_rndc.cgi
1.15
KB
-rwxr-xr-x
conf_servers.cgi
1.8
KB
-rwxr-xr-x
conf_trusted.cgi
2.84
KB
-rwxr-xr-x
conf_zonedef.cgi
4.9
KB
-rwxr-xr-x
config-AlmaLinux-6.0-ALL
989
B
-rw-r--r--
config-CentOS-Linux-6.0-7.9
997
B
-rw-r--r--
config-CentOS-Linux-8.0-ALL
989
B
-rw-r--r--
config-CentOS-Stream-Linux-8.0...
989
B
-rw-r--r--
config-Oracle-Linux-8.0-ALL
989
B
-rw-r--r--
config-Redhat-Enterprise-Linux...
976
B
-rw-r--r--
config-Redhat-Enterprise-Linux...
989
B
-rw-r--r--
config-Rocky-Linux-6.0-ALL
989
B
-rw-r--r--
config-Scientific-Linux-6.0-AL...
935
B
-rw-r--r--
config-aix
717
B
-rw-r--r--
config-cobalt-linux
722
B
-rw-r--r--
config-coherent-linux
857
B
-rw-r--r--
config-corel-linux
722
B
-rw-r--r--
config-debian-linux
722
B
-rw-r--r--
config-debian-linux-10.0-ALL
991
B
-rw-r--r--
config-debian-linux-2.2
727
B
-rw-r--r--
config-debian-linux-3.0
842
B
-rw-r--r--
config-debian-linux-3.1-9.0
934
B
-rw-r--r--
config-freebsd-12.0-ALL
790
B
-rw-r--r--
config-freebsd-2.1-2.2
728
B
-rw-r--r--
config-freebsd-3.0
729
B
-rw-r--r--
config-freebsd-3.1-3.5
722
B
-rw-r--r--
config-freebsd-4.0-11.0
757
B
-rw-r--r--
config-generic-linux
750
B
-rw-r--r--
config-gentoo-linux
827
B
-rw-r--r--
config-hpux
722
B
-rw-r--r--
config-irix
722
B
-rw-r--r--
config-macos
728
B
-rw-r--r--
config-macos-1.3-ALL
789
B
-rw-r--r--
config-mandrake-linux
814
B
-rw-r--r--
config-mandrake-linux-10.2-ALL
802
B
-rw-r--r--
config-msc-linux
788
B
-rw-r--r--
config-netbsd
729
B
-rw-r--r--
config-open-linux
798
B
-rw-r--r--
config-openSUSE-Linux-15.0-ALL
938
B
-rw-r--r--
config-openbsd-2.5-3.1
722
B
-rw-r--r--
config-openbsd-3.2-ALL
740
B
-rw-r--r--
config-openmamba-linux
798
B
-rw-r--r--
config-openserver
722
B
-rw-r--r--
config-osf1
722
B
-rw-r--r--
config-pardus-linux
875
B
-rw-r--r--
config-redhat-linux-7.0-ALL
989
B
-rw-r--r--
config-redhat-linux-ALL-6.0
997
B
-rw-r--r--
config-slackware-linux
722
B
-rw-r--r--
config-slackware-linux-8.0-ALL
756
B
-rw-r--r--
config-sol-linux
850
B
-rw-r--r--
config-solaris
737
B
-rw-r--r--
config-solaris-10-ALL
835
B
-rw-r--r--
config-solaris-7-9
725
B
-rw-r--r--
config-suse-linux
722
B
-rw-r--r--
config-suse-linux-8.2
882
B
-rw-r--r--
config-suse-linux-9.0-9.2
995
B
-rw-r--r--
config-suse-linux-9.3-ALL
1.03
KB
-rw-r--r--
config-syno-linux
683
B
-rw-r--r--
config-trustix-linux
927
B
-rw-r--r--
config-trustix-linux-2.1
923
B
-rw-r--r--
config-trustix-linux-2.2-ALL
939
B
-rw-r--r--
config-turbo-linux
722
B
-rw-r--r--
config-united-linux
822
B
-rw-r--r--
config-unixware
763
B
-rw-r--r--
config-windows
1.17
KB
-rw-r--r--
config.info
4.02
KB
-rw-r--r--
config.info.bg
6.88
KB
-rw-r--r--
config.info.ca
4.5
KB
-rw-r--r--
config.info.cs
3.34
KB
-rw-r--r--
config.info.de
4.6
KB
-rw-r--r--
config.info.es
3.33
KB
-rw-r--r--
config.info.fa
4.7
KB
-rw-r--r--
config.info.fr
4.92
KB
-rw-r--r--
config.info.hu
0
B
-rw-r--r--
config.info.ja
4.03
KB
-rw-r--r--
config.info.ms
1.12
KB
-rw-r--r--
config.info.nl
4.1
KB
-rw-r--r--
config.info.no
4
KB
-rw-r--r--
config.info.pl
4.42
KB
-rw-r--r--
config.info.pt_BR
3.86
KB
-rw-r--r--
config.info.ru
3.02
KB
-rw-r--r--
config.info.sv
1.02
KB
-rw-r--r--
config.info.tr
646
B
-rw-r--r--
config.info.uk
3.14
KB
-rw-r--r--
config.info.zh
750
B
-rw-r--r--
config.info.zh_TW
364
B
-rw-r--r--
convert_master.cgi
1.02
KB
-rwxr-xr-x
convert_slave.cgi
1.44
KB
-rwxr-xr-x
cpan_modules.pl
143
B
-rw-r--r--
create_delegation.cgi
1.77
KB
-rwxr-xr-x
create_forward.cgi
2.09
KB
-rwxr-xr-x
create_hint.cgi
1.47
KB
-rwxr-xr-x
create_master.cgi
5.61
KB
-rwxr-xr-x
create_slave.cgi
4.1
KB
-rwxr-xr-x
create_view.cgi
1.5
KB
-rwxr-xr-x
db.cache
2.44
KB
-rw-r--r--
defaultacl
219
B
-rw-r--r--
delegation_form.cgi
1.3
KB
-rwxr-xr-x
delete_recs.cgi
2.66
KB
-rwxr-xr-x
delete_view.cgi
2.34
KB
-rwxr-xr-x
delete_zone.cgi
5.3
KB
-rwxr-xr-x
disable_zonedt.cgi
934
B
-rwxr-xr-x
disable_zonekey.cgi
928
B
-rwxr-xr-x
dns_boot.cgi
2.56
KB
-rwxr-xr-x
edit_delegation.cgi
1.11
KB
-rwxr-xr-x
edit_forward.cgi
1.82
KB
-rwxr-xr-x
edit_hint.cgi
1
KB
-rwxr-xr-x
edit_master.cgi
5.75
KB
-rwxr-xr-x
edit_options.cgi
1.62
KB
-rwxr-xr-x
edit_record.cgi
1.13
KB
-rwxr-xr-x
edit_recs.cgi
7.65
KB
-rwxr-xr-x
edit_slave.cgi
3.93
KB
-rwxr-xr-x
edit_soa.cgi
2.51
KB
-rwxr-xr-x
edit_soptions.cgi
2.11
KB
-rwxr-xr-x
edit_stub.cgi
3.93
KB
-rwxr-xr-x
edit_text.cgi
1.26
KB
-rwxr-xr-x
edit_view.cgi
2.12
KB
-rwxr-xr-x
edit_zonedt.cgi
6.52
KB
-rwxr-xr-x
edit_zonekey.cgi
4.13
KB
-rwxr-xr-x
enable_zonedt.cgi
1.12
KB
-rwxr-xr-x
enable_zonekey.cgi
1.42
KB
-rwxr-xr-x
feedback_files.pl
588
B
-rwxr-xr-x
find_free.cgi
5.59
KB
-rwxr-xr-x
find_zones.cgi
3.89
KB
-rwxr-xr-x
fix_trusted.cgi
1
KB
-rwxr-xr-x
forward_form.cgi
1.38
KB
-rwxr-xr-x
free_chooser.cgi
2
KB
-rwxr-xr-x
freeze_zone.cgi
992
B
-rwxr-xr-x
hint_form.cgi
1.79
KB
-rwxr-xr-x
index.cgi
17.51
KB
-rwxr-xr-x
install_check.pl
513
B
-rwxr-xr-x
list_gen.cgi
1.95
KB
-rwxr-xr-x
list_slaves.cgi
3.28
KB
-rwxr-xr-x
log_parser.pl
2.47
KB
-rwxr-xr-x
mass_create.cgi
7.33
KB
-rwxr-xr-x
mass_delete.cgi
3.42
KB
-rwxr-xr-x
mass_form.cgi
1.44
KB
-rwxr-xr-x
mass_rcreate.cgi
3.56
KB
-rwxr-xr-x
mass_rcreate_form.cgi
1.49
KB
-rwxr-xr-x
mass_rdelete.cgi
1.87
KB
-rwxr-xr-x
mass_rdelete_form.cgi
1.3
KB
-rwxr-xr-x
mass_update.cgi
3
KB
-rwxr-xr-x
mass_update_form.cgi
1.07
KB
-rwxr-xr-x
master_form.cgi
3.48
KB
-rwxr-xr-x
module.info
279
B
-rw-r--r--
module.info.af
0
B
-rw-r--r--
module.info.af.auto
116
B
-rw-r--r--
module.info.ar
0
B
-rw-r--r--
module.info.ar.auto
152
B
-rw-r--r--
module.info.be
0
B
-rw-r--r--
module.info.be.auto
173
B
-rw-r--r--
module.info.bg
30
B
-rw-r--r--
module.info.bg.auto
143
B
-rw-r--r--
module.info.ca
106
B
-rw-r--r--
module.info.ca.auto
16
B
-rw-r--r--
module.info.cs
24
B
-rw-r--r--
module.info.cs.auto
105
B
-rw-r--r--
module.info.da
0
B
-rw-r--r--
module.info.da.auto
122
B
-rw-r--r--
module.info.de
113
B
-rw-r--r--
module.info.de.auto
15
B
-rw-r--r--
module.info.el
0
B
-rw-r--r--
module.info.el.auto
199
B
-rw-r--r--
module.info.es
29
B
-rw-r--r--
module.info.es.auto
90
B
-rw-r--r--
module.info.eu
0
B
-rw-r--r--
module.info.eu.auto
129
B
-rw-r--r--
module.info.fa
0
B
-rw-r--r--
module.info.fa.auto
164
B
-rw-r--r--
module.info.fi
0
B
-rw-r--r--
module.info.fi.auto
129
B
-rw-r--r--
module.info.fr
41
B
-rw-r--r--
module.info.fr.auto
113
B
-rw-r--r--
module.info.he
0
B
-rw-r--r--
module.info.he.auto
147
B
-rw-r--r--
module.info.hr
0
B
-rw-r--r--
module.info.hr.auto
124
B
-rw-r--r--
module.info.hu
27
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
107
B
-rw-r--r--
module.info.ja
27
B
-rw-r--r--
module.info.ja.auto
134
B
-rw-r--r--
module.info.ko
25
B
-rw-r--r--
module.info.ko.auto
111
B
-rw-r--r--
module.info.lt
0
B
-rw-r--r--
module.info.lt.auto
128
B
-rw-r--r--
module.info.lv
0
B
-rw-r--r--
module.info.lv.auto
132
B
-rw-r--r--
module.info.ms
110
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
114
B
-rw-r--r--
module.info.nl
24
B
-rw-r--r--
module.info.nl.auto
87
B
-rw-r--r--
module.info.no
24
B
-rw-r--r--
module.info.no.auto
98
B
-rw-r--r--
module.info.pl
96
B
-rw-r--r--
module.info.pl.auto
17
B
-rw-r--r--
module.info.pt
29
B
-rw-r--r--
module.info.pt.auto
101
B
-rw-r--r--
module.info.pt_BR
32
B
-rw-r--r--
module.info.pt_BR.auto
107
B
-rw-r--r--
module.info.ro
0
B
-rw-r--r--
module.info.ro.auto
131
B
-rw-r--r--
module.info.ru
30
B
-rw-r--r--
module.info.ru.auto
167
B
-rw-r--r--
module.info.sk
0
B
-rw-r--r--
module.info.sk.auto
125
B
-rw-r--r--
module.info.sl
0
B
-rw-r--r--
module.info.sl.auto
128
B
-rw-r--r--
module.info.sv
24
B
-rw-r--r--
module.info.sv.auto
93
B
-rw-r--r--
module.info.th
0
B
-rw-r--r--
module.info.th.auto
218
B
-rw-r--r--
module.info.tr
26
B
-rw-r--r--
module.info.tr.auto
121
B
-rw-r--r--
module.info.uk
0
B
-rw-r--r--
module.info.uk.auto
197
B
-rw-r--r--
module.info.ur
0
B
-rw-r--r--
module.info.ur.auto
193
B
-rw-r--r--
module.info.vi
0
B
-rw-r--r--
module.info.vi.auto
151
B
-rw-r--r--
module.info.zh
27
B
-rw-r--r--
module.info.zh.auto
83
B
-rw-r--r--
module.info.zh_TW
30
B
-rw-r--r--
module.info.zh_TW.auto
89
B
-rw-r--r--
move_zone.cgi
1.27
KB
-rwxr-xr-x
old_save_controls.cgi
2.13
KB
-rwxr-xr-x
open.cgi
307
B
-rwxr-xr-x
prefs.info
61
B
-rw-r--r--
records-lib.pl
26.54
KB
-rwxr-xr-x
refetch.cgi
705
B
-rwxr-xr-x
resign.pl
2.11
KB
-rwxr-xr-x
resign_zone.cgi
708
B
-rwxr-xr-x
restart.cgi
819
B
-rwxr-xr-x
restart_zone.cgi
655
B
-rwxr-xr-x
save_acls.cgi
1.6
KB
-rwxr-xr-x
save_controls.cgi
2.3
KB
-rwxr-xr-x
save_dnssec.cgi
1.29
KB
-rwxr-xr-x
save_dnssectools.cgi
1.39
KB
-rwxr-xr-x
save_files.cgi
831
B
-rwxr-xr-x
save_forward.cgi
847
B
-rwxr-xr-x
save_forwarding.cgi
1.08
KB
-rwxr-xr-x
save_gen.cgi
3.79
KB
-rwxr-xr-x
save_keys.cgi
1.15
KB
-rwxr-xr-x
save_logging.cgi
2.97
KB
-rwxr-xr-x
save_manual.cgi
774
B
-rwxr-xr-x
save_master.cgi
1.06
KB
-rwxr-xr-x
save_misc.cgi
1.3
KB
-rwxr-xr-x
save_net.cgi
3.16
KB
-rwxr-xr-x
save_record.cgi
22.66
KB
-rwxr-xr-x
save_rndc.cgi
2.87
KB
-rwxr-xr-x
save_servers.cgi
1.73
KB
-rwxr-xr-x
save_slave.cgi
1.56
KB
-rwxr-xr-x
save_soa.cgi
2.58
KB
-rwxr-xr-x
save_text.cgi
1.12
KB
-rwxr-xr-x
save_trusted.cgi
2.76
KB
-rwxr-xr-x
save_view.cgi
1.36
KB
-rwxr-xr-x
save_zonedef.cgi
3.05
KB
-rwxr-xr-x
sign_zone.cgi
770
B
-rwxr-xr-x
slave_add.cgi
4.97
KB
-rwxr-xr-x
slave_delete.cgi
651
B
-rwxr-xr-x
slave_form.cgi
2.15
KB
-rwxr-xr-x
start.cgi
467
B
-rwxr-xr-x
stop.cgi
341
B
-rwxr-xr-x
stub_form.cgi
2.15
KB
-rwxr-xr-x
syslog_logs.pl
708
B
-rwxr-xr-x
system_info.pl
1.11
KB
-rw-r--r--
unfreeze_zone.cgi
990
B
-rwxr-xr-x
view_form.cgi
1.11
KB
-rwxr-xr-x
view_text.cgi
1.05
KB
-rwxr-xr-x
whois.cgi
1.14
KB
-rwxr-xr-x
xfer.cgi
1.66
KB
-rwxr-xr-x
zone_dnssecmgt_dt.cgi
1.37
KB
-rwxr-xr-x
zone_dnssecmigrate_dt.cgi
2.32
KB
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : acl_security.pl
use strict; use warnings; no warnings 'redefine'; no warnings 'uninitialized'; require 'bind8-lib.pl'; # Globals from bind8-lib.pl our (%config, %text, %in); # acl_security_form(&options) # Output HTML for editing security options for the bind8 module sub acl_security_form { my $m = $_[0]->{'zones'} eq '*' ? 1 : $_[0]->{'zones'} =~ /^\!/ ? 2 : 0; print "<tr> <td valign=top><b>$text{'acl_zones'}</b></td>\n"; print "<td colspan=3><table cellpadding=0 cellspacing=0> <tr><td valign=top>\n"; printf "<input type=radio name=zones_def value=1 %s> %s<br>\n", $m == 1 ? 'checked' : '', $text{'acl_zall'}; printf "<input type=radio name=zones_def value=0 %s> %s<br>\n", $m == 0 ? 'checked' : '', $text{'acl_zsel'}; printf "<input type=radio name=zones_def value=2 %s> %s</td>\n", $m == 2 ? 'checked' : '', $text{'acl_znsel'}; print "<td><select name=zones multiple size=4 width=150>\n"; my $conf = &get_config(); my @zones = grep { $_->{'value'} ne "." } &find("zone", $conf); my @views = &find("view", $conf); foreach my $v (@views) { push(@zones, grep { $_->{'value'} ne "." } &find("zone", $v->{'members'})); } my %zcan; map { $zcan{$_}++ } split(/\s+/, $_[0]->{'zones'}); foreach my $z (sort { $a->{'value'} cmp $b->{'value'} } @zones) { printf "<option value='%s' %s>%s</option>\n", $z->{'value'}, $zcan{$z->{'value'}} ? "selected" : "", &arpa_to_ip($z->{'value'}); } foreach my $v (sort { $a->{'value'} cmp $b->{'value'} } @views) { printf "<option value='%s' %s>%s</option>\n", 'view_'.$v->{'value'}, $zcan{'view_'.$v->{'value'}} ? "selected" : "", &text('acl_inview', $v->{'value'}); } print "</select></td> </tr></table></td></tr>\n"; if (@views) { print "<tr> <td valign=top><b>$text{'acl_inviews'}</b></td>\n"; print "<td colspan=3>\n"; print &ui_radio("inviews_def", $_[0]->{'inviews'} eq "*" ? 1 : 0, [ [ 1, $text{'acl_vall'} ], [ 0, $text{'acl_vsel'} ] ]),"<br>\n"; print "<select name=inviews multiple size=4 width=150>\n"; my %vcan; map { $vcan{$_}++ } split(/\s+/, $_[0]->{'inviews'}); printf "<option value='%s' %s>%s</option>\n", "_", $vcan{"_"} ? "selected" : "", "<".$text{'acl_toplevel'}.">"; foreach my $v (sort { $a->{'value'} cmp $b->{'value'} } @views) { printf "<option value='%s' %s>%s</option>\n", $v->{'value'}, $vcan{$v->{'value'}} ? "selected" : "", $v->{'value'}; } print "</select></td></tr>\n"; } print "<tr> <td><b>$text{'acl_types'}</b></td> <td colspan=3>\n"; printf "<input type=radio name=types_def value=1 %s> %s\n", $_[0]->{'types'} ? "" : "checked", $text{'acl_types1'}; printf "<input type=radio name=types_def value=0 %s> %s\n", $_[0]->{'types'} ? "checked" : "", $text{'acl_types0'}; printf "<input name=types size=40 value='%s'></td> </tr>\n", $_[0]->{'types'}; print "<tr> <td valign=top><b>$text{'acl_dir'}</b></td>\n"; printf "<td colspan=3><input name=dir size=30 value='%s'> %s<br>\n", $_[0]->{'dir'}, &file_chooser_button("dir", 1); printf "<input type=checkbox name=dironly value=1 %s> %s</td> </tr>\n", $_[0]->{'dironly'} ? "checked" : "", $text{'acl_dironly'}; print "<tr> <td><b>$text{'acl_defaults'}</b></td> <td nowrap>\n"; printf "<input type=radio name=defaults value=1 %s> $text{'yes'}\n", $_[0]->{'defaults'} ? "checked" : ""; printf "<input type=radio name=defaults value=0 %s> $text{'no'}</td> </tr>\n", $_[0]->{'defaults'} ? "" : "checked"; print "<tr> <td><b>$text{'acl_ztypes'}</b></td> <td colspan=3>\n"; foreach my $t ("master", "slave", "forward", "delegation") { printf "<input type=checkbox name=%s %s> %s\n", $t, $_[0]->{$t} ? "checked" : "", $text{'acl_ztypes_'.$t}; } print "</td> </tr>\n"; print "<tr> <td><b>$text{'acl_reverse'}</b></td> <td nowrap>\n"; printf "<input type=radio name=reverse value=1 %s> $text{'yes'}\n", $_[0]->{'reverse'} ? "checked" : ""; printf "<input type=radio name=reverse value=0 %s> $text{'no'}</td>\n", $_[0]->{'reverse'} ? "" : "checked"; print "<td><b>$text{'acl_multiple'}</b></td> <td nowrap>\n"; printf "<input type=radio name=multiple value=1 %s> $text{'yes'}\n", $_[0]->{'multiple'} ? "checked" : ""; printf "<input type=radio name=multiple value=0 %s> $text{'no'}</td> </tr>\n", $_[0]->{'multiple'} ? "" : "checked"; print "<tr> <td><b>$text{'acl_ro'}</b></td> <td nowrap>\n"; printf "<input type=radio name=ro value=1 %s> $text{'yes'}\n", $_[0]->{'ro'} ? "checked" : ""; printf "<input type=radio name=ro value=0 %s> $text{'no'}</td>\n", $_[0]->{'ro'} ? "" : "checked"; print "<td><b>$text{'acl_apply'}</b></td> <td nowrap>\n"; print &ui_select("apply", $_[0]->{'apply'}, [ [ 1, $text{'yes'} ], [ 2, $text{'acl_applyonly'} ], [ 3, $text{'acl_applygonly'} ], [ 0, $text{'no'} ] ]),"</td> </tr>\n"; print "<tr> <td><b>$text{'acl_file'}</b></td> <td nowrap>\n"; printf "<input type=radio name=file value=1 %s> $text{'yes'}\n", $_[0]->{'file'} ? "checked" : ""; printf "<input type=radio name=file value=0 %s> $text{'no'}</td>\n", $_[0]->{'file'} ? "" : "checked"; print "<td><b>$text{'acl_params'}</b></td> <td nowrap>\n"; printf "<input type=radio name=params value=1 %s> $text{'yes'}\n", $_[0]->{'params'} ? "checked" : ""; printf "<input type=radio name=params value=0 %s> $text{'no'}</td> </tr>\n", $_[0]->{'params'} ? "" : "checked"; print "<tr> <td><b>$text{'acl_opts'}</b></td> <td nowrap>\n"; printf "<input type=radio name=opts value=1 %s> $text{'yes'}\n", $_[0]->{'opts'} ? "checked" : ""; printf "<input type=radio name=opts value=0 %s> $text{'no'}</td>\n", $_[0]->{'opts'} ? "" : "checked"; print "<td><b>$text{'acl_delete'}</b></td> <td nowrap>\n"; printf "<input type=radio name=delete value=1 %s> $text{'yes'}\n", $_[0]->{'delete'} ? "checked" : ""; printf "<input type=radio name=delete value=0 %s> $text{'no'}</td> </tr>\n", $_[0]->{'delete'} ? "" : "checked"; print "<tr> <td><b>$text{'acl_gen'}</b></td> <td nowrap>\n"; printf "<input type=radio name=gen value=1 %s> $text{'yes'}\n", $_[0]->{'gen'} ? "checked" : ""; printf "<input type=radio name=gen value=0 %s> $text{'no'}</td>\n", $_[0]->{'gen'} ? "" : "checked"; print "<td><b>$text{'acl_whois'}</b></td> <td nowrap>\n"; printf "<input type=radio name=whois value=1 %s> $text{'yes'}\n", $_[0]->{'whois'} ? "checked" : ""; printf "<input type=radio name=whois value=0 %s> $text{'no'}</td> </tr>\n", $_[0]->{'whois'} ? "" : "checked"; print "<tr> <td><b>$text{'acl_findfree'}</b></td> <td nowrap>\n"; printf "<input type=radio name=findfree value=1 %s> $text{'yes'}\n", $_[0]->{'findfree'} ? "checked" : ""; printf "<input type=radio name=findfree value=0 %s> $text{'no'}</td>\n", $_[0]->{'findfree'} ? "" : "checked"; print "<td><b>$text{'acl_remote'}</b></td> <td nowrap>\n"; printf "<input type=radio name=remote value=1 %s> $text{'yes'}\n", $_[0]->{'remote'} ? "checked" : ""; printf "<input type=radio name=remote value=0 %s> $text{'no'}</td> </tr>\n", $_[0]->{'remote'} ? "" : "checked"; print "<tr> <td><b>$text{'acl_slaves'}</b></td> <td nowrap>\n"; printf "<input type=radio name=slaves value=1 %s> $text{'yes'}\n", $_[0]->{'slaves'} ? "checked" : ""; printf "<input type=radio name=slaves value=0 %s> $text{'no'}</td>\n", $_[0]->{'slaves'} ? "" : "checked"; print "<td><b>$text{'acl_dnssec'}</b></td> <td nowrap>\n"; printf "<input type=radio name=dnssec value=1 %s> $text{'yes'}\n", $_[0]->{'dnssec'} ? "checked" : ""; printf "<input type=radio name=dnssec value=0 %s> $text{'no'}</td> </tr>\n", $_[0]->{'dnssec'} ? "" : "checked"; print "</tr>\n"; print "<tr> <td><b>$text{'acl_views'}</b></td> <td colspan=3>\n"; printf "<input type=radio name=views value=1 %s> $text{'yes'}\n", $_[0]->{'views'} == 1 ? "checked" : ""; printf "<input type=radio name=views value=2 %s> $text{'acl_edonly'}\n", $_[0]->{'views'} == 2 ? "checked" : ""; printf "<input type=radio name=views value=0 %s> $text{'no'}</td> </tr>\n", $_[0]->{'views'} ? "" : "checked"; if (@views) { my $m = $_[0]->{'vlist'} eq '*' ? 1 : $_[0]->{'vlist'} =~ /^\!/ ? 2 : $_[0]->{'vlist'} eq '' ? 3 : 0; print "<tr> <td valign=top><b>$text{'acl_vlist'}</b></td>\n"; print "<td colspan=3><table cellpadding=0 cellspacing=0> <tr><td valign=top>\n"; printf "<input type=radio name=vlist_def value=1 %s> %s<br>\n", $m == 1 ? 'checked' : '', $text{'acl_vall'}; printf "<input type=radio name=vlist_def value=0 %s> %s<br>\n", $m == 0 ? 'checked' : '', $text{'acl_vsel'}; printf "<input type=radio name=vlist_def value=2 %s> %s<br>\n", $m == 2 ? 'checked' : '', $text{'acl_vnsel'}; printf "<input type=radio name=vlist_def value=3 %s> %s</td>\n", $m == 3 ? 'checked' : '', $text{'acl_vnone'}; print "<td><select name=vlist multiple size=4 width=150>\n"; my ($v, %vcan); map { $vcan{$_}++ } split(/\s+/, $_[0]->{'vlist'}); foreach my $v (sort { $a->{'value'} cmp $b->{'value'} } @views) { printf "<option value='%s' %s>%s</option>\n", $v->{'value'}, $vcan{$v->{'value'}} ? "selected" : "", $v->{'value'}; } print "</select></td> </tr></table></td></tr>\n"; } } # acl_security_save(&options) # Parse the form for security options for the bind8 module sub acl_security_save { if ($in{'zones_def'} == 1) { $_[0]->{'zones'} = "*"; } elsif ($in{'zones_def'} == 2) { $_[0]->{'zones'} = join(" ", "!", split(/\0/, $in{'zones'})); } else { $_[0]->{'zones'} = join(" ", split(/\0/, $in{'zones'})); } $_[0]->{'inviews'} = !defined($in{'inviews'}) || $in{'inviews_def'} ? "*" : join(" ", split(/\0/, $in{'inviews'})); $_[0]->{'types'} = $in{'types_def'} ? undef : $in{'types'}; $_[0]->{'master'} = $in{'master'} || 0; $_[0]->{'slave'} = $in{'slave'} || 0; $_[0]->{'forward'} = $in{'forward'} || 0; $_[0]->{'delegation'} = $in{'delegation'} || 0; $_[0]->{'defaults'} = $in{'defaults'}; $_[0]->{'reverse'} = $in{'reverse'}; $_[0]->{'multiple'} = $in{'multiple'}; $_[0]->{'ro'} = $in{'ro'}; $_[0]->{'apply'} = $in{'apply'}; $_[0]->{'dir'} = $in{'dir'}; $_[0]->{'dironly'} = $in{'dironly'}; $_[0]->{'file'} = $in{'file'}; $_[0]->{'params'} = $in{'params'}; $_[0]->{'opts'} = $in{'opts'}; $_[0]->{'delete'} = $in{'delete'}; $_[0]->{'findfree'} = $in{'findfree'}; $_[0]->{'slaves'} = $in{'slaves'}; $_[0]->{'views'} = $in{'views'}; $_[0]->{'remote'} = $in{'remote'}; $_[0]->{'dnssec'} = $in{'dnssec'}; $_[0]->{'gen'} = $in{'gen'}; $_[0]->{'whois'} = $in{'whois'}; $_[0]->{'vlist'} = $in{'vlist_def'} == 1 ? "*" : $in{'vlist_def'} == 3 ? "" : $in{'vlist_def'} == 2 ? join(" ", "!",split(/\0/, $in{'vlist'})) : join(" ", split(/\0/, $in{'vlist'})); }
Close