Scroll to page top on content load

Marius Cramer

2015-01-14 e2776cf48bfef3ffe330dcd725256dfd519e7558

 interface/web/dns/dns_dmarc_edit.php

@@ -104,9 +104,15 @@
         $temp = explode('; ', $old_data);
         foreach ($temp as $part) {
            if (preg_match("/^p=/", $part)) $dmarc_policy = str_replace('p=', '', $part);
            if (preg_match("/^rua=/", $part)) $dmarc_rua = str_replace('rua=mailto:', '', $part).' ';
            if (preg_match("/^ruf=/", $part)) $dmarc_ruf = str_replace('ruf=mailto:', '', $part).' ';
            if (preg_match("/^fo:/", $part)) $dmarc_fo = str_replace('fo:', '', $part);
            if (preg_match("/^rua=/", $part)) {
               $dmarc_rua = str_replace(array('rua=','mailto:'), '', $part).' ';
               $dmarc_rua = str_replace(',', ' ', $dmarc_rua);
            }
            if (preg_match("/^ruf=/", $part)) {
               $dmarc_ruf = str_replace(array('ruf=','mailto:'), '', $part).' ';
               $dmarc_ruf = str_replace(',', ' ', $dmarc_ruf);
            }
            if (preg_match("/^fo=/", $part)) $dmarc_fo = str_replace('fo=', '', $part);
            if (preg_match("/^adkim=/", $part)) $dmarc_adkim = str_replace('adkim=', '', $part);
            if (preg_match("/^aspf=/", $part)) $dmarc_aspf = str_replace('aspf=', '', $part);
            if (preg_match("/^rf=/", $part)) $dmarc_rf = str_replace('rf=', '', $part);
@@ -137,10 +143,10 @@
      if (!empty($dmarc_ruf)) $app->tpl->setVar("dmarc_ruf", $dmarc_ruf);

      //set dmarc-fo-options
      $temp = explode(':', $dmarc_fo);
      if (is_array($temp))
      if (isset($dmarc_fo)) {
         $temp = explode(':', $dmarc_fo);
         foreach ($temp as $fo => $value) $app->tpl->setVar("dmarc_fo".$value, 'CHECKED');
      else
      } else
         $app->tpl->setVar("dmarc_fo0", 'CHECKED');

      unset($temp);
@@ -219,56 +225,28 @@
      } // end if user is not admin

      $domain_name = rtrim($soa['origin'], '.');
      // DMARC requieres at lest a spf OR dkim-record
      // abort if more than 1 active spf-records (backward-compatibility)
      $sql = "SELECT * FROM dns_rr WHERE name = ? AND type='TXT' AND data like 'v=spf1%' AND active='Y'";
      $temp = $app->db->queryAllRecords($sql, $domain_name.'.');
      if (is_array($temp[1])) {
         if (isset($app->tform->errorMessage )) $app->tform->errorMessage = '<br/>' . $app->tform->errorMessage;
         $app->tform->errorMessage .= $app->tform->wordbook['dmarc_more_spf_txt'].$email;
      }

      $sql = "SELECT *  FROM dns_rr WHERE name LIKE ? AND type='TXT' AND active = 'Y' AND (data LIKE 'v=DKIM1;%' OR data LIKE 'v=spf1%')";
      $temp = $app->db->queryAllRecords($sql, '%._domainkey.'.$domain_name.'.');
      if (empty($temp)) {
         if (isset($app->tform->errorMessage )) $app->tform->errorMessage = '<br/>' . $app->tform->errorMessage;
         $app->tform->errorMessage .= $app->tform->wordbook['dmarc_no_dkim_spf_txt'].$email;
      }
      unset($temp);
      //TODO: should DMARC requiere DKIM and SPF to be valid? This breaks draft-kucherawy-dmarc-base-07 but makes much more sense
/*
      // DMARC requieres at least one active dkim-record...
      $sql = "SELECT * FROM dns_rr WHERE name LIKE ? AND type='TXT' AND data like 'v=DKIM1;%' AND active='Y'";
      $temp = $app->db->queryOneRecord($sql, '%._domainkey.'.$domain_name.'.');
      $temp = $app->db->queryAllRecords($sql, '%._domainkey.$domain_name'.'.');
      if (!is_array($temp)) {
         if (isset($app->tform->errorMessage )) $app->tform->errorMessage = '<br/>' . $app->tform->errorMessage;
         $app->tform->errorMessage .= $app->tform->wordbook['dmarc_no_dkim_txt'].$email;
      }
      unset($temp);

      // ... and dkim-signed mails to allow "policy != none"
      $sql = "SELECT * FROM mail_domain WHERE domain = '".$app->db->quote($domain_name)."'";
      $temp = $app->db->queryOneRecord($sql);
      if ($temp['dkim'] != 'y' && $this->dataRecord['dmarc_policy'] != 'none') {
         if (isset($app->tform->errorMessage )) $app->tform->errorMessage = '<br/>' . $app->tform->errorMessage;
         $app->tform->errorMessage .= $app->tform->wordbook['dmarc_policy_error_txt'].$email;
      }
      unset($temp);

      // DMARC requieres an active spf-record
      $sql = "SELECT * FROM dns_rr WHERE name = ? AND type='TXT' AND data like 'v=spf1%' AND active='Y'";
      // ... and an active spf-record (this breaks the current draft but DMARC is useless if you use DKIM or SPF
      $sql = "SELECT * FROM dns_rr WHERE name LIKE ? AND type='TXT' AND (data LIKE 'v=spf1;%' AND active = 'y')";
      $temp = $app->db->queryAllRecords($sql, $domain_name.'.');
      // abort if more than 1 active spf-records (backward-compatibility)
      if (is_array($temp[1])) {
         if (isset($app->tform->errorMessage )) $app->tform->errorMessage = '<br/>' . $app->tform->errorMessage;
         $app->tform->errorMessage .= $app->tform->wordbook['dmarc_more_spf_txt'].$email;
         $app->tform->errorMessage .= $app->tform->wordbook['dmarc_more_spf_txt'];
      }
      if (empty($temp)) {
         if (isset($app->tform->errorMessage )) $app->tform->errorMessage = '<br/>' . $app->tform->errorMessage;
         $app->tform->errorMessage .= $app->tform->wordbook['dmarc_no_spf_txt'].$email;
         $app->tform->errorMessage .= $app->tform->wordbook['dmarc_no_spf_txt'];
      }
      unset($temp);
*/

      //validate dmarc_pct
      $this->dataRecord['dmarc_pct'] = $app->functions->intval($this->dataRecord['dmarc_pct']);
      if ($this->dataRecord['dmarc_pct'] < 0) $this->dataRecord['dmarc_pct'] = 0;
@@ -277,63 +255,53 @@
      //create dmarc-record
      $dmarc_record[] = 'p='.$this->dataRecord['dmarc_policy'];

      /* TODO: 
      draft-kucherawy-dmarc-base-07 allows multiple rua and ruf-entries
      */
      $dmarc_rua = trim($this->dataRecord['dmarc_rua']);
      if (!empty($dmarc_rua)) {
         if (!filter_var($dmarc_rua, FILTER_VALIDATE_EMAIL)) {
            if (isset($app->tform->errorMessage )) $app->tform->errorMessage = '<br/>' . $app->tform->errorMessage;
             $app->tform->errorMessage .= $app->tform->wordbook['dmarc_invalid_email_txt'].$dmarc_rua;
         } else {
            /* TODO: 
            allow an external report-address. this requieres changes in a remote zone.
            */
            $mail_domain = explode('@', $dmarc_rua);
            if ($mail_domain[1] != $domain_name) {
      if (!empty($this->dataRecord['dmarc_rua'])) {
         $dmarc_rua = explode(' ', $this->dataRecord['dmarc_rua']);
         $dmarc_rua = array_filter($dmarc_rua);
         foreach ($dmarc_rua as $rec) {
            if (!filter_var($rec, FILTER_VALIDATE_EMAIL)) {
               if (isset($app->tform->errorMessage )) $app->tform->errorMessage = '<br/>' . $app->tform->errorMessage;
               $app->tform->errorMessage .= $app->tform->wordbook['dmarc_invalid_domain_txt'].$dmarc_ruf.' in '.$dmarc_ruf;
               $app->tform->errorMessage .= $app->tform->wordbook['dmarc_invalid_email_txt'].': '.$dmarc_rua;
            } else {
               $dmarc_record[] = 'rua=mailto:'.$dmarc_rua;
               $temp .= 'mailto:'.$rec.',';
            }
         }
         $dmarc_record[] = 'rua='.rtrim($temp, ',');
         unset ($dmarc_rua);
         unset($temp);
      }
      unset ($dmarc_rua);
      unset ($mail_domain);

      $dmarc_ruf = trim($this->dataRecord['dmarc_ruf']);
      if (!empty($dmarc_ruf)) {
         if (!filter_var($dmarc_ruf, FILTER_VALIDATE_EMAIL)) {
            if (isset($app->tform->errorMessage )) $app->tform->errorMessage = '<br/>' . $app->tform->errorMessage;
             $app->tform->errorMessage .= $app->tform->wordbook['dmarc_invalid_email_txt'].$dmarc_ruf;
         } else {
            /* TODO: 
            allow an external report-address. this requieres changes in a remote zone.
            */
            $mail_domain[1] = explode('@', $dmarc_ruf);
            if ($mail_domain != $domain_name) {
		
      if (!empty($this->dataRecord['dmarc_ruf'])) {
         $dmarc_ruf = explode(' ', $this->dataRecord['dmarc_ruf']);
         $dmarc_ruf = array_filter($dmarc_ruf);
         foreach ($dmarc_ruf as $rec) {
            if (!filter_var($rec, FILTER_VALIDATE_EMAIL)) {
               if (isset($app->tform->errorMessage )) $app->tform->errorMessage = '<br/>' . $app->tform->errorMessage;
                $app->tform->errorMessage .= $app->tform->wordbook['dmarc_invalid_domain_txt'].$dmarc_ruf.' in '.$dmarc_ruf;
               $app->tform->errorMessage .= $app->tform->wordbook['dmarc_invalid_email_txt'].': '.$dmarc_rua;
            } else {
               $dmarc_record[] = 'ruf=mailto:'.$dmarc_ruf;
               $temp .= 'mailto:'.$rec.',';
            }
         }
         $dmarc_record[] = 'ruf='.rtrim($temp, ',');
         unset ($dmarc_ruf);
         unset($temp);
      }
      unset ($dmarc_ruf);
      unset ($mail_domain);	
      
      $fo_rec = '';
      if (isset($this->dataRecord['dmarc_fo0'])) $fo_rec[] = '0';
      if (isset($this->dataRecord['dmarc_fo1'])) $fo_rec[] = '1';
      if (isset($this->dataRecord['dmarc_fod'])) $fo_rec[] = 'd';
      if (isset($this->dataRecord['dmarc_fos'])) $fo_rec[] = 's';
      if (is_array($fo_rec) && !empty($fo_rec)) 
         $dmarc_record[] = 'fo:'.implode(':', $fo_rec);
      if (is_array($fo_rec) && !empty($fo_rec)) {
         $rec = 'fo='.implode(':', $fo_rec);
         if ($rec != 'fo=0') $dmarc_record[] = 'fo='.implode(':', $fo_rec);
         unset($rec);
      }

      if (!empty($this->dataRecord['dmarc_adkim']) && $this->dataRecord['dmarc_adkim'] != 'r' )
      if ($this->dataRecord['dmarc_adkim'] != 'r' )
         $dmarc_record[] = 'adkim='.$this->dataRecord['dmarc_adkim'];

      if (!empty($this->dataRecord['dmarc_aspf']) && $this->dataRecord['dmarc_aspf'] != 'r' )
      if ($this->dataRecord['dmarc_aspf'] != 'r' )
         $dmarc_record[] = 'aspf='.$this->dataRecord['dmarc_aspf'];

      if (isset($this->dataRecord['dmarc_rf_afrf']) && isset($this->dataRecord['dmarc_rf_iodef']))