diff options
| author | Kristian Lyngstol <kristian@bohemians.org> | 2016-03-27 08:27:17 +0200 |
|---|---|---|
| committer | Kristian Lyngstol <kristian@bohemians.org> | 2016-03-27 08:27:17 +0200 |
| commit | 1d2470a411e5eaac7e5a1c5d5b6b81e92c92f4a8 (patch) | |
| tree | 54b901757b088d54d33e70f28a6203383b4dc844 /tools/generate-dnsrr.pl | |
| parent | 0a230ac5481b9518abc64181dbbb4509d83c0b89 (diff) | |
| parent | 96a9bb4c42f4b53020302fea2a46e734c61c0319 (diff) | |
Merge branch 'master' of github.com:tech-server/tgmanage
Diffstat (limited to 'tools/generate-dnsrr.pl')
| -rwxr-xr-x | tools/generate-dnsrr.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/tools/generate-dnsrr.pl b/tools/generate-dnsrr.pl index ad9230c..99ff395 100755 --- a/tools/generate-dnsrr.pl +++ b/tools/generate-dnsrr.pl @@ -19,6 +19,9 @@ # Command-syntax to send this to nsupdate, running it on the DNS server: # cat file.txt | tools/generate-dnsrr.pl --dom foo -ns | ssh $dnsserver "nsupdate -k /etc/bind/Kdhcp_updater.+157+XXXXX" # +# Generate DNS for linknets: +# cat /tmp/linknets.txt | perl -wple 's,;, ,g' | perl tools/make-linknet-hosts.pl | tools/generate-dnsrr.pl --domain tgXX.gathering.org -ns -rev | ssh $dnsserver "nsupdate -k /etc/bind/Kdhcp_updater.XXXXX" +# # Format of input: # hostname ipv4-adress ipv6-address # If any of ipv4-address or ipv6-address are NOT set for the host, specify "nope" @@ -99,7 +102,6 @@ sub print_ptr{ unless ( $ipv4 eq "nope" ) { my $v4 = new Net::IP($ipv4); - print "prereq nxdomain " . $v4->reverse_ip() . "\n" unless $delete; print "update add " . $v4->reverse_ip() . " 3600 IN PTR " . $hostname . $domain .".\n" unless $delete; print "update delete " . $v4->reverse_ip() . " IN PTR\n" if $delete; print "send\n"; @@ -109,7 +111,6 @@ sub print_ptr{ if (( not ($ipv6 eq "nope") ) && ( $ipv6 )) { my $v6 = new Net::IP($ipv6); - print "prereq nxdomain " . $v6->reverse_ip() . "\n" unless $delete; print "update add " . $v6->reverse_ip() . " 3600 IN PTR " . $hostname . $domain . ".\n" unless $delete; print "update delete " . $v6->reverse_ip() . " IN PTR\n" if $delete; print "send\n"; |