Automatic installer.php lang files by installer_builder (20070726)
[moodle-linuxchix.git] / lib / pear / HTML / QuickForm / Rule / Email.php
blob8a887f6d77e7efee492125d8d88ae7bc0e2d1b35
1 <?php
2 /* vim: set expandtab tabstop=4 shiftwidth=4: */
3 // +----------------------------------------------------------------------+
4 // | PHP version 4.0 |
5 // +----------------------------------------------------------------------+
6 // | Copyright (c) 1997-2003 The PHP Group |
7 // +----------------------------------------------------------------------+
8 // | This source file is subject to version 2.0 of the PHP license, |
9 // | that is bundled with this package in the file LICENSE, and is |
10 // | available at through the world-wide-web at |
11 // | http://www.php.net/license/2_02.txt. |
12 // | If you did not receive a copy of the PHP license and are unable to |
13 // | obtain it through the world-wide-web, please send a note to |
14 // | license@php.net so we can mail you a copy immediately. |
15 // +----------------------------------------------------------------------+
16 // | Authors: Bertrand Mansion <bmansion@mamasam.com> |
17 // +----------------------------------------------------------------------+
19 // $Id$
21 require_once('HTML/QuickForm/Rule.php');
23 /**
24 * Email validation rule
25 * @version 1.0
27 class HTML_QuickForm_Rule_Email extends HTML_QuickForm_Rule
29 var $regex = '/^((\"[^\"\f\n\r\t\v\b]+\")|([\w\!\#\$\%\&\'\*\+\-\~\/\^\`\|\{\}]+(\.[\w\!\#\$\%\&\'\*\+\-\~\/\^\`\|\{\}]+)*))@((\[(((25[0-5])|(2[0-4][0-9])|([0-1]?[0-9]?[0-9]))\.((25[0-5])|(2[0-4][0-9])|([0-1]?[0-9]?[0-9]))\.((25[0-5])|(2[0-4][0-9])|([0-1]?[0-9]?[0-9]))\.((25[0-5])|(2[0-4][0-9])|([0-1]?[0-9]?[0-9])))\])|(((25[0-5])|(2[0-4][0-9])|([0-1]?[0-9]?[0-9]))\.((25[0-5])|(2[0-4][0-9])|([0-1]?[0-9]?[0-9]))\.((25[0-5])|(2[0-4][0-9])|([0-1]?[0-9]?[0-9]))\.((25[0-5])|(2[0-4][0-9])|([0-1]?[0-9]?[0-9])))|((([A-Za-z0-9\-])+\.)+[A-Za-z\-]+))$/';
31 /**
32 * Validates an email address
34 * @param string $email Email address
35 * @param boolean $checkDomain True if dns check should be performed
36 * @access public
37 * @return boolean true if email is valid
39 function validate($email, $checkDomain = false)
41 if (preg_match($this->regex, $email)) {
42 if ($checkDomain && function_exists('checkdnsrr')) {
43 $tokens = explode('@', $email);
44 if (checkdnsrr($tokens[1], 'MX') || checkdnsrr($tokens[1], 'A')) {
45 return true;
47 return false;
49 return true;
51 return false;
52 } // end func validate
55 function getValidationScript($options = null)
57 return array(" var regex = " . $this->regex . ";\n", "{jsVar} != '' && !regex.test({jsVar})");
58 } // end func getValidationScript
60 } // end class HTML_QuickForm_Rule_Email