Changeset 756 for trunk/cgi-bin

Timestamp:

07/28/15 17:47:57 (9 years ago)

Author:

Kris Deugau

Message:

/trunk

Update addMaster() to insert reference records in dnsavail table. See #41.

File:

• trunk/cgi-bin/IPDB.pm (modified) (2 diffs)

trunk/cgi-bin/IPDB.pm

@@ -756 +756 @@
       my @fails;
       ##fixme:  remove hardcoding where possible
+      my $dasth = $dbh->prepare("INSERT INTO dnsavail (zone,location,parent_alloc) VALUES (?,?,?)");
       foreach my $subzone (@zonelist) {
         my %rpcargs = (
@@ -765 +766 @@
           state => 1,   # could make them globally configurable maybe
         );
-        if ($rpc_url && !_rpc('addRDNS', %rpcargs)) {
-          push @fails, ("$subzone" => $errstr);
+        if ($rpc_url) {
+          if (!_rpc('addRDNS', %rpcargs)) {
+            push @fails, ("$subzone" => $errstr);
+          } else {
+            $dasth->execute($subzone, $args{defloc}, $mid)
+                or push @fails, ("$subzone" => "rDNS added but failed to track locally: ".$dasth->errstr."\n");
+          }
         }
       }