phpDocumentor VFront
Function-Libraries
[ class tree: VFront ] [ index: VFront ] [ all elements ]
VFront
Packages:
VFront

Source for file func.validmail.php

Documentation is available at func.validmail.php

  1. <?php
  2. /**
  3. * Libreria di funzioni per la validazione delle email.
  4. * 
  5. * @package VFront
  6. * @subpackage Function-Libraries
  7. * @author Mario Marcello Verona <marcelloverona@gmail.com>
  8. * @copyright 2007 Mario Marcello Verona
  9. * @version 0.90
  10. * @license http://www.gnu.org/licenses/gpl.html GNU Public License
  11. */
  12.  
  13.  
  14.  
  15. function SnowCheckMail($Email,$Debug=false) 
  16. { 
  17.     global $HTTP_HOST; 
  18.     $Return =array();  
  19.     // Variable for return. 
  20.     // $Return[0] : [true|false] 
  21.     // $Return[1] : Processing result save. 
  22.  
  23.     if (!eregi("^[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+)*(\.[a-z]{2,3})$", $Email)) { 
  24.         $Return[0]=false; 
  25.         $Return[1]="${Email} is E-Mail form that is not right."; 
  26.         if ($Debug) echo "Error : {$Email} is E-Mail form that is not right.<br>";         
  27.         return $Return; 
  28.     } 
  29.     else if ($Debug) echo "Confirmation : {$Email} is E-Mail form that is not right.<br>"; 
  30.  
  31.     // E-Mail @ by 2 by standard divide. if it is $Email this "lsm@ebeecomm.com".. 
  32.     // $Username : lsm 
  33.     // $Domain : ebeecomm.com 
  34.     // list function reference : http://www.php.net/manual/en/function.list.php 
  35.     // split function reference : http://www.php.net/manual/en/function.split.php 
  36.     list ( $Username, $Domain ) = split ("@",$Email); 
  37.  
  38.     // That MX(mail exchanger) record exists in domain check . 
  39.     // checkdnsrr function reference : http://www.php.net/manual/en/function.checkdnsrr.php 
  40.     if ( checkdnsrr ( $Domain, "MX" ) )  { 
  41.         if($Debug) echo "Confirmation : MX record about {$Domain} exists.<br>"; 
  42.         // If MX record exists, save MX record address. 
  43.         // getmxrr function reference : http://www.php.net/manual/en/function.getmxrr.php 
  44.         if ( getmxrr ($Domain, $MXHost))  { 
  45.       if($Debug) { 
  46.                 echo "Confirmation : Is confirming address by MX LOOKUP.<br>"; 
  47.               for ( $i = 0,$j = 1; $i < count ( $MXHost ); $i++,$j++ ) { 
  48.             echo "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Result($j) - $MXHost[$i]<BR>";  
  49.         } 
  50.             } 
  51.         } 
  52.         // Getmxrr function does to store MX record address about $Domain in arrangement form to $MXHost. 
  53.         // $ConnectAddress socket connection address. 
  54.         $ConnectAddress = $MXHost[0]; 
  55.     } 
  56.     else { 
  57.         // If there is no MX record simply @ to next time address socket connection do . 
  58.         $ConnectAddress = $Domain;         
  59.         if ($Debug) echo "Confirmation : MX record about {$Domain} does not exist.<br>"; 
  60.     } 
  61.  
  62.     // fsockopen function reference : http://www.php.net/manual/en/function.fsockopen.php 
  63.     $Connect = fsockopen ( $ConnectAddress, 25 ); 
  64.  
  65.     // Success in socket connection 
  66.     if ($Connect)   
  67.     { 
  68.         if ($Debug) echo "Connection succeeded to {$ConnectAddress} SMTP.<br>"; 
  69.         // Judgment is that service is preparing though begin by 220 getting string after connection . 
  70.         // fgets function reference : http://www.php.net/manual/en/function.fgets.php 
  71.         if ( ereg ( "^220", $Out = fgets ( $Connect, 1024 ) ) ) { 
  72.              
  73.             // Inform client's reaching to server who connect. 
  74.             fputs ( $Connect, "HELO $HTTP_HOST\r\n" ); 
  75.                 if ($Debug) echo "Run : HELO $HTTP_HOST<br>"; 
  76.             $Out = fgets ( $Connect, 1024 ); // Receive server's answering cord. 
  77.  
  78.             // Inform sender's address to server. 
  79.             fputs ( $Connect, "MAIL FROM: <{$Email}>\r\n" ); 
  80.                 if ($Debug) echo "Run : MAIL FROM: &lt;{$Email}&gt;<br>"; 
  81.             $From = fgets ( $Connect, 1024 ); // Receive server's answering cord. 
  82.  
  83.             // Inform listener's address to server. 
  84.             fputs ( $Connect, "RCPT TO: <{$Email}>\r\n" ); 
  85.                 if ($Debug) echo "Run : RCPT TO: &lt;{$Email}&gt;<br>"; 
  86.             $To = fgets ( $Connect, 1024 ); // Receive server's answering cord. 
  87.  
  88.             // Finish connection. 
  89.             fputs ( $Connect, "QUIT\r\n"); 
  90.                 if ($Debug) echo "Run : QUIT<br>"; 
  91.  
  92.             fclose($Connect); 
  93.  
  94.                 // Server's answering cord about MAIL and TO command checks. 
  95.                 // Server about listener's address reacts to 550 codes if there does not exist  
  96.                 // checking that mailbox is in own E-Mail account. 
  97.                 if ( !ereg ( "^250", $From ) || !ereg ( "^250", $To )) { 
  98.                     $Return[0]=false; 
  99.                     $Return[1]="${Email} is address done not admit in E-Mail server."; 
  100.                     if ($Debug) echo "{$Email} is address done not admit in E-Mail server.<br>"; 
  101.                     return $Return; 
  102.                 } 
  103.         } 
  104.     } 
  105.     // Failure in socket connection 
  106.     else { 
  107.         $Return[0]=false; 
  108.         $Return[1]="Can not connect E-Mail server ({$ConnectAddress})."; 
  109.         if ($Debug) echo "Can not connect E-Mail server ({$ConnectAddress}).<br>"; 
  110.         return $Return; 
  111.     } 
  112.     $Return[0]=true; 
  113.     $Return[1]="{$Email} is E-Mail address that there is no any problem."; 
  114.     return $Return; 
  115. }
  116.  
  117.  
  118. /**
  119.  * Controllo di validità formale e|o sostanziale di una email
  120.  * Mediante il $controllo_destinatario=true è possibile capire se la mail esiste
  121.  * In caso contrario la validazione è solo formale
  122.  *
  123.  * @param string $email 
  124.  * @param bool $controllo_destinatario 
  125.  * @return bool 
  126.  */
  127. function valid_mail($email,$controllo_destinatario=false){
  128.  
  129.     if($controllo_destinatario){
  130.         
  131.         $check=SnowCheckMail($email);
  132.         return $check[0];
  133.     }
  134.     else{
  135.         return (eregi("^[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+)*(\.[a-z]{2,3})$", $email)) ? true:false;
  136.     }
  137.  
  138. }
  139.  
  140.  
  141. /**
  142.  * Funzione che estrae le email da un testo
  143.  *
  144.  * @param string $testo 
  145.  * @return array 
  146.  */
  147. function estrai_mail_valide($testo){
  148.     
  149.     
  150.     preg_match_all('"[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+)*(\.[a-z]{2,3})"iu',$testo,$mails);
  151.     
  152.     return (array) $mails[0];
  153. }
  154.  
  155. ?>
Documentation generated on Sat, 22 Sep 2007 11:50:27 +0200 by phpDocumentor 1.4.0a2