<?php
/***************************************************************
 * Copyright (C) 2003 Patrick Preuster <sica@megami.de>
 *
 * This is free software. You can redistribute and modify
 * it under the terms of the GNU General Public License.
 *
 * $Id: mail_check.php,v 1.5 2003-09-19 13:01:37 progman Exp $
 *
 ***************************************************************/

/* Usage: validate_mailaddr("email1", "email2", "email3"...);
 *
 * returns true if all mail addresses are valid, false if one
 * of them is not valid
 */

function validate_mailaddr() {
    for($i = 0; $i < func_num_args(); $i++) {
        $addr = trim(func_get_arg($i));
        $parts = explode('@', $addr);

        if((!is_array($parts)) or (count($parts) != 2)) {
            return false;
        }
        if(!preg_match('/^[0-9a-z_]([-_.]?[0-9a-z])*$/i', $parts[0])) {
            return false;
        }
        if(is_numeric($parts[1])) {
            $parts[1] = long2ip($parts[1]);
        }
        if(preg_match('/^(\d+)\.(\d+)\.(\d+)\.(\d+)$/', $parts[1], $matches)) {
            foreach($matches as $part) {
                if($part < 0 || $part > 255) {
                    return false;
                }
            }
        }
        elseif(preg_match('/^([0-9a-z][-.0-9a-z]*\\.[a-z]{2,4}[.]?)$/i', $parts[1], $matches)) {
            $host = $matches[1];
            if(!getmxrr($host, $tmp_mx_hosts) or !checkdnsrr($host,'ANY')) {
                return false;
            }
            // fix for verisign sitefinder
            if(gethostbyname($host) == '64.94.110.11') {
                return false;
            }
        }
        else {
            return false;
        }
    }
    return true;
}
?>