Changeset 384

Timestamp:

Jan 4, 2018, 5:19:53 PM (6 years ago)

Author:

g7moreau

Message:

• Add more test in addentrydb

File:

• trunk/klask (modified) (1 diff)

trunk/klask

@@ -1569 +1569 @@
    my @ARGV = @_;
 
-   my ($ip, $mac, $network);
+   my ($ip, $mac, $net);
 
    GetOptions(
       'ip|i=s'      => \$ip,
-      'mac|r=s'     => \$mac,
-      'network|r=s' => \$net,
+      'mac|m=s'     => \$mac,
+      'network|n=s' => \$net,
       );
 
+   if (not $ip or not $mac or not $net) {
+      print {*STDERR} "Error: mandatory parameter --ip $ip\n"       if not $ip;
+      print {*STDERR} "Error: mandatory parameter --mac $mac\n"     if not $mac;
+      print {*STDERR} "Error: mandatory parameter --network $net\n" if not $net;
+      print {*STDERR} "\n";
+      $CMD_DB{'help'}->();
+      exit 1;
+      }
+
    test_maindb_environnement();
 
-   my $mac = normalize_mac_address($mac);
+   $mac = normalize_mac_address($mac);
 
    if ($ip !~ m/^ $RE_IPv4_ADDRESS $/xms or $mac !~ m/^ $RE_MAC_ADDRESS $/xms or not exists $KLASK_CFG->{'network'}{$net}) {