Changeset 213 for trunk/system/generators/dns.php

Timestamp:

May 10, 2009, 12:30:09 PM (15 years ago)

Author:

george

Message:

Opraveno: Skripty pro generování nastavení směrovačů.

File:

• trunk/system/generators/dns.php (modified) (8 diffs)

trunk/system/generators/dns.php

@@ -34 +34 @@
 "\t\t\tMX\t10 ".$MailServer.".".$BaseDomain.".\n");
 
-$DbResult = $Database->query('SELECT NetworkInterface.*, NetworkDevice.Name AS DeviceName FROM NetworkInterface JOIN NetworkDevice ON NetworkDevice.Id = NetwordInterface.Device WHERE NetworkInterface.LocalIP <> ""');
+$DbResult = $Database->query('SELECT NetworkInterface.*, NetworkDevice.Name AS DeviceName FROM NetworkInterface JOIN NetworkDevice ON NetworkDevice.Id = NetworkInterface.Device WHERE NetworkInterface.LocalIP <> ""');
 while($Interface = $DbResult->fetch_assoc())
 {
@@ -45 +45 @@
 
 // External records in internal server
-$DbResult = $Database->query('SELECT NetworkInterface.*, NetworkDevice.Name AS DeviceName FROM NetworkInterface JOIN NetworkDevice ON NetworkDevice.Id = NetwordInterface.Device WHERE NetworkInterface.ExternalIP <> ""');
+$DbResult = $Database->query('SELECT NetworkInterface.*, NetworkDevice.Name AS DeviceName FROM NetworkInterface JOIN NetworkDevice ON NetworkDevice.Id = NetworkInterface.Device WHERE NetworkInterface.ExternalIP <> ""');
 while($Interface = $DbResult->fetch_assoc())
 {
@@ -117 +117 @@
     if($Interface['Name'] != '') $Name .= '-'.$Interface['Name'];
     $Name = strtolower($Name.'-ext');
-    $IP = explode('.',$Interafce['ExternalIP']);
-    fputs($File, $IP[3]."\tIN\tPTR\t".strtolower($Name])."-ext.".$BaseDomain.".\n");
+    $IP = explode('.',$Interface['ExternalIP']);
+    fputs($File, $IP[3]."\tIN\tPTR\t".strtolower($Name)."-ext.".$BaseDomain.".\n");
   }
   fclose($File);
@@ -191 +191 @@
   "\t\t\tNS\t".$NameServers[1].".".$BaseDomain.".\n");
 
-  $DbResult = $Database->query('SELECT NetworkInterface.*, NetworkDevice.Name AS DeviceName FROM NetworkInterface JOIN NetworkDevice ON NetworkDevice.Id = NetwordInterface.Device WHERE NetworkInterface.ExternalIP LIKE "'.$Network.'.%"');
+  $DbResult = $Database->query('SELECT NetworkInterface.*, NetworkDevice.Name AS DeviceName FROM NetworkInterface JOIN NetworkDevice ON NetworkDevice.Id = NetworkInterface.Device WHERE NetworkInterface.ExternalIP LIKE "'.$Network.'.%"');
   while($Interface = $DbResult->fetch_assoc())
   {
@@ -197 +197 @@
     if($Interface['Name'] != '') $Name .= '-'.$Interface['Name'];
     $Name = strtolower($Name);
-    if(strlen($Name) < 8) $Name .= "\t";
+    //if(strlen($Name) < 8) $Name .= "\t";
     $IP = explode('.', $Interface['ExternalIP']);
-    fputs($File, $IP[3]."\tIN\tPTR\t".strtolower($Interface['Name']).".".$BaseDomain.".\n");
+    fputs($File, $IP[3]."\tIN\tPTR\t".strtolower($Name).".".$BaseDomain.".\n");
   }
 
@@ -254 +254 @@
   fputs($File, $Name."\tIN\tA\t".$Interface['CZFreeIP']."\n");
   fputs($File2, $Name."\tIN\tA\t".$Interface['LocalIP']."\n");
+  $Name = $Interface['DeviceName'];
+  if($Interface['Name'] != '') $Name .= '-'.$Interface['Name'];
+  $Name = strtolower($Name);
   $Name .= '-czfree';
   fputs($File2, $Name."\tIN\tA\t".$Interface['CZFreeIP']."\n");
 }
 
-$DbResult = $Database->query('SELECT NetworkDomainAlias.* FROM `NetworkDomainAlias` JOIN `hosts`  ON NetworkDomainAlias.Target LIKE hosts.name AND hosts.czfree_ip != ""');
+$DbResult = $Database->query('SELECT NetworkDomainAlias.* FROM `NetworkDomainAlias`');
+// JOIN `hosts`  ON NetworkDomainAlias.Target LIKE hosts.name AND hosts.czfree_ip != ""');
 while($Alias = $DbResult->fetch_assoc())
 {
@@ -303 +307 @@
   fputs($File2, $Header);
 
-  $DbResult = $Database->query('SELECT NetworkInterface.*, NetworkDevice.Name AS DeviceName FROM NetworkInterface JOIN NetworkDevice ON NetworkDevice.Id = NetwordInterface.Device WHERE NetworkInterface.CZFreeIP LIKE "'.$Network.'.%"');
+  $DbResult = $Database->query('SELECT NetworkInterface.*, NetworkDevice.Name AS DeviceName FROM NetworkInterface JOIN NetworkDevice ON NetworkDevice.Id = NetworkInterface.Device WHERE NetworkInterface.CZFreeIP LIKE "'.$Network.'.%"');
   while($Interface = $DbResult->fetch_assoc())
   {
@@ -309 +313 @@
     if($Interface['Name'] != '') $Name .= '-'.$Interface['Name'];
     $Name = strtolower($Name);
+    $Name2 = $Name;
     if(strlen($Name) < 8) $Name .= "\t";
     $IP = explode('.', $Interface['CZFreeIP']);
-    fputs($File, $IP[3]."\tIN\tPTR\t".strtolower($Interface['Name']).".".$Domain.".\n");
-    fputs($File2, $IP[3]."\tIN\tPTR\t".strtolower($Interface['Name'].'-czfree').".".$Domain.".\n");
+    fputs($File, $IP[3]."\tIN\tPTR\t".strtolower($Name2).".".$Domain.".\n");
+    fputs($File2, $IP[3]."\tIN\tPTR\t".strtolower($Name2.'-czfree').".".$Domain.".\n");
   }