Merge branch 'stable-3.1'

Marius Burkard

2016-07-10 e1ceb050e19c7574bca146a8da7047ee4ff456b5

 interface/web/dns/dns_import.php

@@ -38,10 +38,22 @@
$error = '';

// Loading the template
$app->uses('tpl,validate_dns');
$app->uses('tform,tpl,validate_dns');
$app->tpl->newTemplate("form.tpl.htm");
$app->tpl->setInclude('content_tpl', 'templates/dns_import.htm');
$app->load_language_file('/web/dns/lib/lang/'.$_SESSION['s']['language'].'_dns_wizard.lng');

// Check if dns record limit has been reached. We will check only users, not admins
if($_SESSION["s"]["user"]["typ"] == 'user') {
   $app->tform->formDef['db_table_idx'] = 'id';
   $app->tform->formDef['db_table'] = 'dns_soa';
   if(!$app->tform->checkClientLimit('limit_dns_zone')) {
      $app->error($app->lng('limit_dns_zone_txt'));
   }
   if(!$app->tform->checkResellerLimit('limit_dns_zone')) {
      $app->error('Reseller: '.$app->lng('limit_dns_zone_txt'));
   }
}

// import variables
$template_id = (isset($_POST['template_id']))?$app->functions->intval($_POST['template_id']):0;
@@ -56,7 +68,8 @@
   $server_id = $app->functions->intval($_POST['server_id_value']);
   $post_server_id = true;
} else {
   $server_id = 1;
   $settings = $app->getconf->get_global_config('dns');
   $server_id = $app->functions->intval($settings['default_dnsserver']);
   $post_server_id = false;
}

@@ -105,13 +118,13 @@

   // Get the limits of the client
   $client_group_id = intval($_SESSION["s"]["user"]["default_group"]);
   $client = $app->db->queryOneRecord("SELECT client.client_id, client.contact_name, CONCAT(IF(client.company_name != '', CONCAT(client.company_name, ' :: '), ''), client.contact_name, ' (', client.username, IF(client.customer_no != '', CONCAT(', ', client.customer_no), ''), ')') as contactname, sys_group.name FROM sys_group, client WHERE sys_group.client_id = client.client_id and sys_group.groupid = $client_group_id");
   $client = $app->db->queryOneRecord("SELECT client.client_id, client.contact_name, CONCAT(IF(client.company_name != '', CONCAT(client.company_name, ' :: '), ''), client.contact_name, ' (', client.username, IF(client.customer_no != '', CONCAT(', ', client.customer_no), ''), ')') as contactname, sys_group.name FROM sys_group, client WHERE sys_group.client_id = client.client_id and sys_group.groupid = ?", $client_group_id);


   // load the list of clients
   $sql = "SELECT sys_group.groupid, sys_group.name, CONCAT(IF(client.company_name != '', CONCAT(client.company_name, ' :: '), ''), client.contact_name, ' (', client.username, IF(client.customer_no != '', CONCAT(', ', client.customer_no), ''), ')') as contactname FROM sys_group, client WHERE sys_group.client_id = client.client_id AND client.parent_client_id = ".intval($client['client_id'])." ORDER BY client.company_name, client.contact_name, sys_group.name";
   $clients = $app->db->queryAllRecords($sql);
   $tmp = $app->db->queryOneRecord("SELECT groupid FROM sys_group WHERE client_id = ".intval($client['client_id']));
   $sql = "SELECT sys_group.groupid, sys_group.name, CONCAT(IF(client.company_name != '', CONCAT(client.company_name, ' :: '), ''), client.contact_name, ' (', client.username, IF(client.customer_no != '', CONCAT(', ', client.customer_no), ''), ')') as contactname FROM sys_group, client WHERE sys_group.client_id = client.client_id AND client.parent_client_id = ? ORDER BY client.company_name, client.contact_name, sys_group.name";
   $clients = $app->db->queryAllRecords($sql, $client['client_id']);
   $tmp = $app->db->queryOneRecord("SELECT groupid FROM sys_group WHERE client_id = ?", $client['client_id']);
   $client_select = '<option value="'.$tmp['groupid'].'">'.$client['contactname'].'</option>';
   if(is_array($clients)) {
      foreach( $clients as $client) {
@@ -126,7 +139,7 @@
if($_SESSION["s"]["user"]["typ"] != 'admin')
{
   $client_group_id = $_SESSION["s"]["user"]["default_group"];
   $client_dns = $app->db->queryOneRecord("SELECT dns_servers FROM sys_group, client WHERE sys_group.client_id = client.client_id and sys_group.groupid = $client_group_id");
   $client_dns = $app->db->queryOneRecord("SELECT dns_servers FROM sys_group, client WHERE sys_group.client_id = client.client_id and sys_group.groupid = ?", $client_group_id);

   $client_dns['dns_servers_ids'] = explode(',', $client_dns['dns_servers']);

@@ -137,8 +150,8 @@
      $app->tpl->setVar('server_id_value', $client_dns['dns_servers_ids'][0]);
   }

   $sql = "SELECT server_id, server_name FROM server WHERE server_id IN (" . $client_dns['dns_servers'] . ");";
   $dns_servers = $app->db->queryAllRecords($sql);
   $sql = "SELECT server_id, server_name FROM server WHERE server_id IN ?";
   $dns_servers = $app->db->queryAllRecords($sql, $client_dns['dns_servers_ids']);

   $options_dns_servers = "";

@@ -151,6 +164,44 @@

}

/*
 * Now we have to check, if we should use the domain-module to select the domain
 * or not
 */
$app->uses('ini_parser,getconf');
$settings = $app->getconf->get_global_config('domains');
if ($settings['use_domain_module'] == 'y') {
   /*
    * The domain-module is in use.
   */
   $domains = $app->tools_sites->getDomainModuleDomains("dns_soa");
   /*
    * We can leave domain empty if domain is filename
   */
   $domain_select = "<option value=''></option>\r\n";
   if(is_array($domains) && sizeof($domains) > 0) {
      /* We have domains in the list, so create the drop-down-list */
      foreach( $domains as $domain) {
         $domain_select .= "<option value=" . $domain['domain_id'] ;
         if ($domain['domain'] == $_POST['domain']) {
            $domain_select .= " selected";
         }
         $domain_select .= ">" . $app->functions->idn_decode($domain['domain']) . ".</option>\r\n";
      }
   }
   $app->tpl->setVar("domain_option", $domain_select);
   /* check if the selected domain can be used! */
   if ($domain) {
      $domain_check = $app->tools_sites->checkDomainModuleDomain($domain);
      if(!$domain_check) {
         // invalid domain selected
         $domain = NULL;
      } else {
         $domain = $domain_check;
      }
   }
}

$lng_file = 'lib/lang/'.$_SESSION['s']['language'].'_dns_import.lng';
include $lng_file;
$app->tpl->setVar($wb);
@@ -160,8 +211,8 @@
if(isset($_FILES['file']['name']) && is_uploaded_file($_FILES['file']['tmp_name'])){
   $valid_zone_file = FALSE;

   $sql = "SELECT server_name FROM `server` WHERE server_id=".$app->functions->intval($server_id)." OR mirror_server_id=".$app->functions->intval($server_id)." ORDER BY server_name ASC";
   $servers = $app->db->queryAllRecords($sql);
   $sql = "SELECT server_name FROM `server` WHERE server_id=? OR mirror_server_id=? ORDER BY server_name ASC";
   $servers = $app->db->queryAllRecords($sql, $server_id, $server_id);
   for ($i=0;$i<count($servers);$i++)
   {
      if (substr($servers[$i]['server_name'], strlen($servers[$i]['server_name'])-1) != ".")
@@ -176,9 +227,22 @@
   foreach($lines as $line){
      $line = trim($line);
      if ($line != '' && substr($line, 0, 1) != ';'){
         if(strpos($line, ";") !== FALSE) $line = substr($line, 0, strpos($line, ";"));
         if(strpos($line, "(") !== FALSE) $line = substr($line, 0, strpos($line, "("));
         if(strpos($line, ")") !== FALSE) $line = substr($line, 0, strpos($line, ")"));
         if(strpos($line, ";") !== FALSE) {
            if(!preg_match("/\"[^\"]+;[^\"]*\"/", $line)) {
               $line = substr($line, 0, strpos($line, ";"));
            }
         }
         if(strpos($line, "(") !== FALSE ) {
            if (!preg_match("/v=DKIM/",$line)) {
               $line = substr($line, 0, strpos($line, "("));
            }
         }
         if(strpos($line, ")") !== FALSE ) {
            if (!preg_match("/v=DKIM/",$line)) {
               $line = substr($line, 0, strpos($line, ")"));
            }
         }
			
         $line = trim($line);
         if ($line != ''){
            $sPattern = '/\s+/m';
@@ -214,10 +278,18 @@

      $parts = explode(' ', $line);

      // make all elements lowercase
      // make elements lowercase
      $new_parts = array();
      foreach($parts as $part){
         $new_parts[] = strtolower($part);
      if(
         (strpos($part, ';') === false) &&
         (!preg_match("/^\"/", $part)) &&
         (!preg_match("/\"$/", $part))
      ) {
            $new_parts[] = strtolower($part);
         } else {
            $new_parts[] = $part;
         }
      }
      unset($parts);
      $parts = $new_parts;
@@ -518,130 +590,6 @@
      $i++;
   }

   /*
   $i = 0;
   $r = 0;
   $s = 0;
   $dns_rr = array();
   foreach ($lines as $line)
   {
      $line = trim($line);
      if ($line != '' && substr($line,0,1) != ';' && substr($line,0,1) != '$')
      {
         $line = str_replace("\n",NULL,$line);
         $i++;

         // TODO - Find a better way to parse the SOA record. Lazy checking.
         if ($i <= 7)
         {
            if ($i > 1)
            {
               $s++;
               $line = str_replace("\t",NULL,$line);
               if (!empty($line))
               {
                  print(strpos(";",$line));
                  $line = substr($line,0,strpos($line,";"));
                  if ($s == 1)
                     $soa['serial'] = $line;
                  else if ($s == 2)
                     $soa['refresh'] = $line;
                  else if ($s == 3)
                     $soa['retry'] = $line;
                  else if ($s == 4)
                     $soa['expire'] = $line;
                  else if ($s == 5)
                     $soa['minimum'] = $line;

               }
            }
            else
            {
               $line = str_replace("\t",",",$line);
               $line = str_replace(" ",",",$line);
               $recs = explode(",",$line);

               foreach ($recs as $key => $rec)
               {
                  $rec = trim($rec);
                  if($rec == '') continue;
                  //name   type   data   aux   ttl   active
                  if ($key == 0)
                  {
                     if ($rec == '@')
                     {
                        $rec = $name;
                     }

                     $soa['name'] = $rec;
                  }

                  if ($key != 0 && strtolower($rec) == 'soa')
                  {
                     $typekeys[$s] = $key;
                  }
                  else if ($key > $typekey[$r])
                  {
                     if ($rec != "" && $rec != "(")
                     {
                        $rec = explode(" ",$rec);

                        $soa['ns'] = $servers[0]['server_name'];
                        $soa['mbox'] = $rec[1];
                     }
                  }
               }
            }
         }
         else
         {
            $line = str_replace("\n","",trim($line));

            if (!empty($line))
            {

               preg_match_all('/(.*?)\s*IN\s*(A|CNAME|MX|TXT|NS|AAAA)\s*(.*)/',$line, $recs);

               if ($recs[1][0] == '@' || trim($recs[1][0]) == "")
               {
                  $recs[1][0] = $name;
               }
               $dns_rr[$r]['name'] = $recs[1][0];
               $dns_rr[$r]['type'] = $recs[2][0];
               if (strtolower($dns_rr[$r]['type'])=='mx')
               {
                  $recs[3][0] = str_replace(" ","\t",$recs[3][0]);
                  $mx[$r] = explode("\t",$recs[3][0]);
                  for ($m=1;$m<count($mx[$r]);$m++)
                  {
                     if (!empty($mx[$r][$m]))
                        $dns_rr[$r]['data'] = $mx[$r][$m];
                  }

                  $dns_rr[$r]['aux'] = $mx[$r][0];
               }
               else if (strtolower($dns_rr[$r]['type'])=='txt')
               {
                  $dns_rr[$r]['data'] = substr($recs[3][0],1,(strlen($recs[3][0])-2));
               }
               else
               {
                  $dns_rr[$r]['data'] = $recs[3][0];
               }

               if (strtolower($dns_rr[$r]['type'])=='ns' && strtolower($dns_rr[$r]['name'])==$name)
               {
                  unset($dns_rr[$r]);
               }

               $r++;
            }
         }

      }
   }
   */

   foreach ($servers as $server){
      $dns_rr[$r]['name'] = $soa['name'];
      $dns_rr[$r]['type'] = 'NS';
@@ -656,21 +604,38 @@

   // Insert the soa record
   $sys_userid = $_SESSION['s']['user']['userid'];
   $origin = $app->db->quote($soa['name']);
   $ns = $app->db->quote($soa['ns']);
   $mbox = $app->db->quote($soa['mbox']);
   $refresh = $app->db->quote($soa['refresh']);
   $retry = $app->db->quote($soa['retry']);
   $expire = $app->db->quote($soa['expire']);
   $minimum = $app->db->quote($soa['minimum']);
   $ttl = $app->db->quote($soa['ttl']);
   $xfer = $app->db->quote('');
   $serial = $app->db->quote($app->functions->intval($soa['serial'])+1);
   $origin = $soa['name'];
   $ns = $soa['ns'];
   $mbox = $soa['mbox'];
   $refresh = $soa['refresh'];
   $retry = $soa['retry'];
   $expire = $soa['expire'];
   $minimum = $soa['minimum'];
   $ttl = $soa['ttl'];
   $xfer = '';
   $serial = $app->functions->intval($soa['serial']+1);
   //print_r($soa);
   //die();
   if($valid_zone_file){
      $insert_data = "(`sys_userid`, `sys_groupid`, `sys_perm_user`, `sys_perm_group`, `sys_perm_other`, `server_id`, `origin`, `ns`, `mbox`, `serial`, `refresh`, `retry`, `expire`, `minimum`, `ttl`, `active`, `xfer`) VALUES
      ('$sys_userid', '$sys_groupid', 'riud', 'riud', '', '$server_id', '$origin', '$ns', '$mbox', '$serial', '$refresh', '$retry', '$expire', '$minimum', '$ttl', 'Y', '$xfer')";
      $insert_data = array(
         "sys_userid" => $sys_userid,
         "sys_groupid" => $sys_groupid,
         "sys_perm_user" => 'riud',
         "sys_perm_group" => 'riud',
         "sys_perm_other" => '',
         "server_id" => $server_id,
         "origin" => $origin,
         "ns" => $ns,
         "mbox" => $mbox,
         "serial" => $serial,
         "refresh" => $refresh,
         "retry" => $retry,
         "expire" => $expire,
         "minimum" => $minimum,
         "ttl" => $ttl,
         "active" => 'Y',
         "xfer" => $xfer
      );
      $dns_soa_id = $app->db->datalogInsert('dns_soa', $insert_data, 'id');

      // Insert the dns_rr records
@@ -678,8 +643,21 @@
      {
         foreach($dns_rr as $rr)
         {
            $insert_data = "(`sys_userid`, `sys_groupid`, `sys_perm_user`, `sys_perm_group`, `sys_perm_other`, `server_id`, `zone`, `name`, `type`, `data`, `aux`, `ttl`, `active`) VALUES
            ('$sys_userid', '$sys_groupid', 'riud', 'riud', '', '$server_id', '$dns_soa_id', '".$app->db->quote($rr['name'])."', '".$app->db->quote($rr['type'])."', '".$app->db->quote($rr['data'])."', '".$app->db->quote($rr['aux'])."', '".$app->db->quote($rr['ttl'])."', 'Y')";
            $insert_data = array(
               "sys_userid" => $sys_userid,
               "sys_groupid" => $sys_groupid,
               "sys_perm_user" => 'riud',
               "sys_perm_group" => 'riud',
               "sys_perm_other" => '',
               "server_id" => $server_id,
               "zone" => $dns_soa_id,
               "name" => $rr['name'],
               "type" => $rr['type'],
               "data" => $rr['data'],
               "aux" => $rr['aux'],
               "ttl" => $rr['ttl'],
               "active" => 'Y'
            );
            $dns_rr_id = $app->db->datalogInsert('dns_rr', $insert_data, 'id');
         }
      }