diff options
Diffstat (limited to 'tools/make-first-zones.pl')
| -rwxr-xr-x | tools/make-first-zones.pl | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/tools/make-first-zones.pl b/tools/make-first-zones.pl index 1227129..a0946cc 100755 --- a/tools/make-first-zones.pl +++ b/tools/make-first-zones.pl @@ -15,11 +15,11 @@ $base = $ARGV[0] if $#ARGV > -1; $base .= "/" if not $base =~ m/\/$/ and not $base eq ""; my $tgname = $nms::config::tgname; -my $pri_a = $nms::config::pri_a; -my $pri_ptr = $nms::config::pri_ptr; +my $pri_hostname = $nms::config::pri_hostname; +my $pri_v4 = $nms::config::pri_v4; my $pri_v6 = $nms::config::pri_v6; -my $sec_a = $nms::config::sec_a; -my $sec_ptr = $nms::config::sec_ptr; +my $sec_hostname = $nms::config::sec_hostname; +my $sec_v4 = $nms::config::sec_v4; my $sec_v6 = $nms::config::sec_v6; my $ipv6zone = $nms::config::ipv6zone; @@ -38,7 +38,7 @@ if ( not -f $zonefile ) print MAINZONE <<"EOF"; \$TTL 3600 -@ IN SOA $pri_a.$tgname.gathering.org. abuse.gathering.org. ( +@ IN SOA $pri_hostname.$tgname.gathering.org. abuse.gathering.org. ( $serial; serial 3600 ; refresh 1800 ; retry @@ -48,14 +48,14 @@ if ( not -f $zonefile ) IN NS ns1.$tgname.gathering.org. IN NS ns2.$tgname.gathering.org. -ns1 IN A $pri_ptr +ns1 IN A $pri_v4 ns1 IN AAAA $pri_v6 -ns2 IN A $sec_ptr +ns2 IN A $sec_v4 ns2 IN AAAA $sec_v6 -$pri_a IN A $pri_ptr -$pri_a IN AAAA $pri_v6 -$sec_a IN A $sec_ptr -$sec_a IN AAAA $sec_v6 +$pri_hostname IN A $pri_v4 +$pri_hostname IN AAAA $pri_v6 +$sec_hostname IN A $sec_v4 +$sec_hostname IN AAAA $sec_v6 ; Generated by make-all-config.sh on the bootstrapping/nms server. ; Will not be overwritten unless it is missing ;) @@ -73,15 +73,15 @@ if ( not -f $zonefile ) print MAINZONE <<"EOF"; \$TTL 3600 -@ IN SOA $pri_a.$tgname.gathering.org. abuse.gathering.org. ( +@ IN SOA $pri_hostname.$tgname.gathering.org. abuse.gathering.org. ( $serial; serial 3600 ; refresh 1800 ; retry 608400 ; expire 3600 ) ; minimum and default TTL - IN NS $pri_a.$tgname.gathering.org. - IN NS $sec_a.$tgname.gathering.org. + IN NS $pri_hostname.$tgname.gathering.org. + IN NS $sec_hostname.$tgname.gathering.org. ; Generated by make-all-config.sh on the bootstrapping/nms server. ; Will not be overwritten unless it is missing ;) @@ -116,9 +116,9 @@ EOF my $ip_pri = new Net::IP( $pri_v6 ) or die ( "Error, new Net::IP for " . $pri_v6 ); my $ip_sec = new Net::IP( $sec_v6 ) or die ( "Error, new Net::IP for " . $sec_v6 ); print IPV6ZONE $ip_pri->reverse_ip() . " IN PTR ns1.$tgname.gathering.org.\n"; - print IPV6ZONE $ip_pri->reverse_ip() . " IN PTR $pri_a.$tgname.gathering.org.\n"; + print IPV6ZONE $ip_pri->reverse_ip() . " IN PTR $pri_hostname.$tgname.gathering.org.\n"; print IPV6ZONE $ip_sec->reverse_ip() . " IN PTR ns2.$tgname.gathering.org.\n"; - print IPV6ZONE $ip_sec->reverse_ip() . " IN PTR $sec_a.$tgname.gathering.org.\n"; + print IPV6ZONE $ip_sec->reverse_ip() . " IN PTR $sec_hostname.$tgname.gathering.org.\n"; close IPV6ZONE; } else { print "Skipped v6-reverse-zone, file exists.\n"; } |