Changeset 857 for trunk

Timestamp:

09/15/22 17:21:00 (2 years ago)

Author:

Kris Deugau

Message:

/trunk

BIND export, unwinding dev saves, 9 of many many

• Lay out a couple more BIND export configuration options
• Start using the zone/view list configuration fragment to create a file

Location:

trunk

Files:

• DNSDB/ExportBIND.pm (modified) (3 diffs)
• dnsdb.conf (modified) (1 diff)

trunk/DNSDB/ExportBIND.pm

@@ -181 +181 @@
   # at figuring out which zones are visible/present in which views
   if ($viewlist) {
+    my $tmpconf = "$dnsdb->{bind_zone_conf}.$$"; ##fixme:  split filename for prefixing
+    open BINDCONF, ">", $tmpconf;
+
     foreach my $view (@{$viewlist}) {
 #print Dumper($view);
-#      print BINDCONF "view $view->{location} {\n";
-      print "view $view->{location} {\n";
+      print BINDCONF "view $view->{location} {\n";
+#      print "view $view->{location} {\n";
       # could also use an acl { ... }; statement, then match-clients { aclname; };, but that gets hairy
       # note that some semantics of data visibility need to be handled by the record export, since it's
@@ -190 +193 @@
       # same as a BIND view with match-clients { any; };
       if ($view->{iplist}) {
-#         print BINDCONF "  match-clients { ".join("; ", $view->iplist)."; };\n";
-         print "  match-clients { ".join("; ", split(/[\s,]+/, $view->{iplist}))."; };\n";
+         print BINDCONF "  match-clients { ".join("; ", $view->iplist)."; };\n";
+#         print "  match-clients { ".join("; ", split(/[\s,]+/, $view->{iplist}))."; };\n";
       } else {
-#         print BINDCONF "  match-clients { any; };\n";
-         print "  match-clients { any; };\n";
+         print BINDCONF "  match-clients { any; };\n";
+#         print "  match-clients { any; };\n";
       }
       foreach my $zone (@{$viewzones{$view->{location}}}) {
@@ -202 +205 @@
       print "};\n\n";
     } # foreach @$viewlist
+    rename $tmpconf, $dnsdb->{bind_zone_conf};
   } # if $viewlist
 

trunk/dnsdb.conf

@@ -29 +29 @@
 
 ## BIND export options
+# config fragment populated by exports from dnsadmin
+#bind_zone_conf = /var/named/zones.conf
+# forward zone path
 #bind_export_zone_path = /var/named/zones/%view/db.%zone
 # because they're fish of a different colour
 #bind_export_reverse_zone_path = /var/named/zones/%view/db.%arpazone
+# export all hostnames as full dot-terminated FQDNs?
+#bind_export_fqdn = 1
 
 ## DNS data template options