Changeset 827

Timestamp:

03/23/21 18:28:49 (3 years ago)

Author:

Kris Deugau

Message:

/trunk

Add a couple of configuration variables for BIND-style zone export.

File:

• trunk/DNSDB.pm (modified) (4 diffs)

trunk/DNSDB.pm

@@ -3 +3 @@
 ##
 # $Id$
-# Copyright 2008-2019 Kris Deugau <kdeugau@deepnet.cx>
+# Copyright 2008-2021 Kris Deugau <kdeugau@deepnet.cx>
 # 
 #    This program is free software: you can redistribute it and/or modify
@@ -204 +204 @@
                 usecache        => 1,   # do we bother using the cache above?
 
+                # BIND-style zone export
+                # should arguably inherit something from BIND defaults for /var/named?
+                bind_export_zone_path   => 'zones/',
+                bind_export_conf_path   => 'zones.conf',
+                bind_export_shortlines  => 0,
+
                 # Session params
                 timeout         => '1h',        # passed as-is to CGI::Session
@@ -254 +260 @@
   # Several settings are booleans.  Handle multiple possible ways of setting them.
   for my $boolopt ('log_failures', 'force_refresh', 'lowercase', 'usecache',
-        'template_skip_0', 'template_skip_255', 'autotxt') {
+        'bind_export_shortlines', 'template_skip_0', 'template_skip_255', 'autotxt') {
     if ($self->{$boolopt} ne '1' && $self->{$boolopt} ne '0') {
       # true/false, on/off, yes/no all valid.
@@ -2029 +2035 @@
       $cfg->{exportcache}       = $1 if m{^exportcache\s*=\s*([a-z0-9/_.-]+)}i;
       $cfg->{usecache}          = $1 if m{^usecache\s*=\s*([a-z01]+)}i;
+      $cfg->{bind_export_conf_path}   = $1 if m{^bind_export_conf_path\s*=\s*([a-z0-9/_.%-]+)}i;
+      $cfg->{bind_export_zone_path}   = $1 if m{^bind_export_zone_path\s*=\s*([a-z0-9/_.%-]+)}i;
+      $cfg->{bind_export_shortlines}  = $1 if /^bind_export_shortlines\s*=\s*([a-z01]+)/i;
       $cfg->{force_refresh}     = $1 if /^force_refresh\s*=\s*([a-z01]+)/i;
       $cfg->{lowercase}         = $1 if /^lowercase\s*=\s*([a-z01]+)/i;