Chris@18: <?php
Chris@18: 
Chris@18: namespace Egulias\EmailValidator\Validation;
Chris@18: 
Chris@18: use Egulias\EmailValidator\EmailLexer;
Chris@18: use Egulias\EmailValidator\Exception\InvalidEmail;
Chris@18: use Egulias\EmailValidator\Warning\NoDNSMXRecord;
Chris@18: use Egulias\EmailValidator\Exception\NoDNSRecord;
Chris@18: 
Chris@18: class DNSCheckValidation implements EmailValidation
Chris@18: {
Chris@18:     /**
Chris@18:      * @var array
Chris@18:      */
Chris@18:     private $warnings = [];
Chris@18: 
Chris@18:     /**
Chris@18:      * @var InvalidEmail
Chris@18:      */
Chris@18:     private $error;
Chris@18:     
Chris@18:     public function __construct()
Chris@18:     {
Chris@18:         if (!extension_loaded('intl')) {
Chris@18:             throw new \LogicException(sprintf('The %s class requires the Intl extension.', __CLASS__));
Chris@18:         }
Chris@18:     }
Chris@18: 
Chris@18:     public function isValid($email, EmailLexer $emailLexer)
Chris@18:     {
Chris@18:         // use the input to check DNS if we cannot extract something similar to a domain
Chris@18:         $host = $email;
Chris@18: 
Chris@18:         // Arguable pattern to extract the domain. Not aiming to validate the domain nor the email
Chris@18:         if (false !== $lastAtPos = strrpos($email, '@')) {
Chris@18:             $host = substr($email, $lastAtPos + 1);
Chris@18:         }
Chris@18: 
Chris@18:         return $this->checkDNS($host);
Chris@18:     }
Chris@18: 
Chris@18:     public function getError()
Chris@18:     {
Chris@18:         return $this->error;
Chris@18:     }
Chris@18: 
Chris@18:     public function getWarnings()
Chris@18:     {
Chris@18:         return $this->warnings;
Chris@18:     }
Chris@18: 
Chris@18:     protected function checkDNS($host)
Chris@18:     {
Chris@18:         $variant = INTL_IDNA_VARIANT_2003;
Chris@18:         if ( defined('INTL_IDNA_VARIANT_UTS46') ) {
Chris@18:             $variant = INTL_IDNA_VARIANT_UTS46;
Chris@18:         }
Chris@18:         $host = rtrim(idn_to_ascii($host, IDNA_DEFAULT, $variant), '.') . '.';
Chris@18: 
Chris@18:         $Aresult = true;
Chris@18:         $MXresult = checkdnsrr($host, 'MX');
Chris@18: 
Chris@18:         if (!$MXresult) {
Chris@18:             $this->warnings[NoDNSMXRecord::CODE] = new NoDNSMXRecord();
Chris@18:             $Aresult = checkdnsrr($host, 'A') || checkdnsrr($host, 'AAAA');
Chris@18:             if (!$Aresult) {
Chris@18:                 $this->error = new NoDNSRecord();
Chris@18:             }
Chris@18:         }
Chris@18:         return $MXresult || $Aresult;
Chris@18:     }
Chris@18: }