X-Git-Url: https://git.openstreetmap.org./dns.git/blobdiff_plain/65215120765779c2a38ebe24f5443b84ad4fbc3d..cd71c84ea3565cd553b26cc1b8bd2cf86168b396:/bin/mkgeo diff --git a/bin/mkgeo b/bin/mkgeo index e02fbee..8cb4687 100755 --- a/bin/mkgeo +++ b/bin/mkgeo @@ -205,7 +205,7 @@ my @json; # Open output files my $zonefile = IO::File->new("> include/${zone}.js") || die "$!"; -my $jsonfile = IO::File->new("> json/${zone}.json") || die "$!"; +my $jsonfile = IO::File->new("> json/${zone}.openstreetmap.org.json") || die "$!"; # Output headers $zonefile->print("var \U${zone}\E_RECORDS = [\n"); @@ -259,11 +259,11 @@ if (!defined($gdnsname)) if (my $default = $cluster->{default}) { - output_server($zonefile, "${default}.${zone}", $cluster); + output_server($zonefile, "${default}.${zone}", $cluster, 0); } elsif (exists($cluster->{default})) { - output_server($zonefile, "${zone}", $cluster); + output_server($zonefile, "${zone}", $cluster, 0); } } } @@ -273,11 +273,13 @@ foreach my $cluster (sort { $a->{name} cmp $b->{name} } values %$clusters) { my $name = $cluster->{name}; - output_server($zonefile, "${name}.${zone}", $cluster); - if (@{$cluster->{servers}} > 1) { - output_server($zonefile, "${name}-%02d.${zone}", $cluster); + output_server($zonefile, "${name}-%02d.${zone}", $cluster, 1); + } + else + { + output_server($zonefile, "${name}.${zone}", $cluster, 1); } } @@ -348,7 +350,7 @@ if (defined($gdnsname)) my $number = sprintf("%02d", $index + 1); my $bandwidth = $server->{bandwidth}; - $gdnsweightedfile->print(" ${name}-${number} = [ ${name}-${number}.${zone}., ${bandwidth} ]\n"); + $gdnsweightedfile->print(" ${name}-${number} = [ ${name}-${number}.${zone}.openstreetmap.org., ${bandwidth} ]\n"); } } @@ -358,7 +360,7 @@ if (defined($gdnsname)) } else { - $gdnsresourcefile->print(" ${name} => ${name}.${zone}.\n"); + $gdnsresourcefile->print(" ${name} => ${name}.${zone}.openstreetmap.org.\n"); } } @@ -525,10 +527,11 @@ sub output_server my $zonefile = shift; my $name = shift; my $cluster = shift; + my $all = shift; while (my($index,$server) = each @{$cluster->{servers}}) { - if ($server->{status} eq "up") + if ($all || $server->{status} eq "up") { $zonefile->printf(" A(\"${name}\", \"$server->{ipv4}\", TTL(\"10m\")),\n", $index + 1);