Changeset 585 for trunk/cgi-bin/main.cgi

Timestamp:

01/16/13 17:16:46 (11 years ago)

Author:

Kris Deugau

Message:

/trunk

Reverse DNS RPCing should now be complete for all add operations.
See #1.

Some fine-tuning may still be needed, eg for static IPs, convert
template placeholders before doing the RPC call; this could also
be done entirely on the DNS side at export instead.

File:

• trunk/cgi-bin/main.cgi (modified) (3 diffs)

trunk/cgi-bin/main.cgi

@@ -318 +318 @@
     $page->param(rdepth => $webvar{rdepth});
 
+    my $rdns = getBlockRDNS($ip_dbh, $webvar{block}, $webvar{rdepth}, vrf => $webvar{vrf}, user => $authuser);
+    $page->param(rdns => $rdns) if $rdns;
+
     $webvar{fbtype} = '' if !$webvar{fbtype};
     if ($webvar{fbtype} eq 'i') {
@@ -468 +471 @@
   $page->param(rdepth => $webvar{rdepth});
   $page->param(cidr => $cidr);
+  $page->param(rdns => $webvar{rdns});
   $page->param(city => $q->escapeHTML($webvar{city}));
   $page->param(custid => $webvar{custid});
@@ -518 +522 @@
         rdepth => $webvar{rdepth}, custid => $webvar{custid}, type => $webvar{alloctype}, city => $webvar{city}, 
         desc => $webvar{desc}, notes => $webvar{notes}, circid => $webvar{circid},
-        privdata => $webvar{privdata}, nodeid => $webvar{node});
+        privdata => $webvar{privdata}, nodeid => $webvar{node}, rdns => $webvar{rdns}, user => $authuser);
 
   if ($code eq 'OK') {