Changeset 289 for trunk/DNSDB.pm

Timestamp:

03/27/12 12:56:12 (12 years ago)

Author:

Kris Deugau

Message:

/trunk

Forgot to move failed-action logging for addRec() and
updateRec(), done.
Removed commented domain-name-canonicalization for record-update page
See #35

File:

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

trunk/DNSDB.pm

@@ -2535 +2535 @@
     my $msg = $@;
     eval { $dbh->rollback; };
+    if ($config{log_failures}) {
+      $logdata{entry} = "Failed adding ".($defrec eq 'y' ? 'default ' : '').
+        "record '$$host $typemap{$$rectype} $$val', TTL $ttl ($msg)";
+      _log($dbh, %logdata);
+      $dbh->commit;
+    }
     return ('FAIL',$msg);
   }
@@ -2665 +2671 @@
     my $msg = $@;
     eval { $dbh->rollback; };
+    if ($config{log_failures}) {
+      $logdata{entry} = "Failed updating ".($defrec eq 'y' ? 'default ' : '').
+        "record '$oldrec->{host} $typemap{$oldrec->{type}} $oldrec->{val}', TTL $oldrec->{ttl} ($msg)";
+      _log($dbh, %logdata);
+      $dbh->commit;
+    }
     return ('FAIL', $msg);
   }