Changeset 337 for trunk

Timestamp:

Aug 30, 2018, 1:37:00 PM (6 years ago)

Author:

g7moreau

Message:

• Add option -verbose to dns generate file

File:

• trunk/ddt/ddt (modified) (6 diffs)

trunk/ddt/ddt

@@ -21 +21 @@
 use strict;
 #use warnings;
-use version; our $VERSION = version->declare('0.10.3');
+use version; our $VERSION = version->declare('0.10.4');
 
 use Getopt::Long qw(GetOptions);
@@ -2490 +2490 @@
 
 sub cmd_generate_dns_file {
+   local @ARGV = @_;
+
+   my $help = get_cmd_name();
+   my ($verbose);
+
+   GetOptions(
+      'verbose|v' => \$verbose,
+      );
+
    my $buffer_fwd;
    my $buffer_rev;
@@ -2572 +2581 @@
             print FILE_FORWARD_DNS $buffer_fwd;
             }
-         print "- DNS: db.$domainset_current.fwd db.$domainset_current.rev [CREATE].\n";
-         print "Ex : sort -k 4n -t . /usr/local/dhcp-dns-tools/dns/dns.hmg.priv\n";
          close FILE_REVERSE_DNS;
          close FILE_FORWARD_DNS;
+         print "- DNS: db.$domainset_current.fwd db.$domainset_current.rev [CREATE].\n" if $verbose;
+         print "  Ex : sort -k 4n -t . $FOLDER_GEN_DNS/db.$domainset_current.fwd\n"     if $verbose;
          }
       }
@@ -3134 +3143 @@
  ddt enable-pxe [--hostname|-h hostname] [--domainset|-d domainset] [--ip|-i ip] [--bootp|-b pxe_config]
  ddt gen-dhcp-file
- ddt gen-dns-file
+ ddt gen-dns-file [--verbose]
  ddt help
  ddt load-database [--domainset|-d domainset] [--filename|-f filename] [--kind|-k kind]
@@ -3228 +3237 @@
  ddt enable-pxe [--hostname|-h hostname] [--domainset|-d domainset] [--ip|-i ip] [--bootp|-b pxe_config]
  ddt gen-dhcp-file
- ddt gen-dns-file
+ ddt gen-dns-file [--verbose]
  ddt help
  ddt load-database [--domainset|-d domainset] [--filename|-f filename] [--kind|-k kind]
@@ -3359 +3368 @@
 =head2 gen-dns-file
 
- ddt gen-dns-file
+ ddt gen-dns-file [--verbose]
 
 =head2 help