source: trunk/library/Mail/Mail/RFC822.php @ 5146

Revision 5146, 31.2 KB checked in by wmerlotto, 12 years ago (diff)

Ticket #2305 - Enviando alteracoes, desenvolvidas internamente na Prognus. Library: adicionando arquivos.

Line 
1<?php
2/**
3 * RFC 822 Email address list validation Utility
4 *
5 * PHP versions 4 and 5
6 *
7 * LICENSE:
8 *
9 * Copyright (c) 2001-2010, Richard Heyes
10 * All rights reserved.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 *
16 * o Redistributions of source code must retain the above copyright
17 *   notice, this list of conditions and the following disclaimer.
18 * o Redistributions in binary form must reproduce the above copyright
19 *   notice, this list of conditions and the following disclaimer in the
20 *   documentation and/or other materials provided with the distribution.
21 * o The names of the authors may not be used to endorse or promote
22 *   products derived from this software without specific prior written
23 *   permission.
24 *
25 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
26 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
27 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
28 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
29 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
30 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
31 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
32 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
33 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
34 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
35 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
36 *
37 * @category    Mail
38 * @package     Mail
39 * @author      Richard Heyes <richard@phpguru.org>
40 * @author      Chuck Hagenbuch <chuck@horde.org
41 * @copyright   2001-2010 Richard Heyes
42 * @license     http://opensource.org/licenses/bsd-license.php New BSD License
43 * @version     CVS: $Id: RFC822.php 294749 2010-02-08 08:22:25Z clockwerx $
44 * @link        http://pear.php.net/package/Mail/
45 */
46
47/**
48 * RFC 822 Email address list validation Utility
49 *
50 * What is it?
51 *
52 * This class will take an address string, and parse it into it's consituent
53 * parts, be that either addresses, groups, or combinations. Nested groups
54 * are not supported. The structure it returns is pretty straight forward,
55 * and is similar to that provided by the imap_rfc822_parse_adrlist(). Use
56 * print_r() to view the structure.
57 *
58 * How do I use it?
59 *
60 * $address_string = 'My Group: "Richard" <richard@localhost> (A comment), ted@example.com (Ted Bloggs), Barney;';
61 * $structure = Mail_RFC822::parseAddressList($address_string, 'example.com', true)
62 * print_r($structure);
63 *
64 * @author  Richard Heyes <richard@phpguru.org>
65 * @author  Chuck Hagenbuch <chuck@horde.org>
66 * @version $Revision: 294749 $
67 * @license BSD
68 * @package Mail
69 */
70class Mail_RFC822 {
71
72    /**
73     * The address being parsed by the RFC822 object.
74     * @var string $address
75     */
76    var $address = '';
77
78    /**
79     * The default domain to use for unqualified addresses.
80     * @var string $default_domain
81     */
82    var $default_domain = 'localhost';
83
84    /**
85     * Should we return a nested array showing groups, or flatten everything?
86     * @var boolean $nestGroups
87     */
88    var $nestGroups = true;
89
90    /**
91     * Whether or not to validate atoms for non-ascii characters.
92     * @var boolean $validate
93     */
94    var $validate = true;
95
96    /**
97     * The array of raw addresses built up as we parse.
98     * @var array $addresses
99     */
100    var $addresses = array();
101
102    /**
103     * The final array of parsed address information that we build up.
104     * @var array $structure
105     */
106    var $structure = array();
107
108    /**
109     * The current error message, if any.
110     * @var string $error
111     */
112    var $error = null;
113
114    /**
115     * An internal counter/pointer.
116     * @var integer $index
117     */
118    var $index = null;
119
120    /**
121     * The number of groups that have been found in the address list.
122     * @var integer $num_groups
123     * @access public
124     */
125    var $num_groups = 0;
126
127    /**
128     * A variable so that we can tell whether or not we're inside a
129     * Mail_RFC822 object.
130     * @var boolean $mailRFC822
131     */
132    var $mailRFC822 = true;
133
134    /**
135    * A limit after which processing stops
136    * @var int $limit
137    */
138    var $limit = null;
139
140    /**
141     * Sets up the object. The address must either be set here or when
142     * calling parseAddressList(). One or the other.
143     *
144     * @access public
145     * @param string  $address         The address(es) to validate.
146     * @param string  $default_domain  Default domain/host etc. If not supplied, will be set to localhost.
147     * @param boolean $nest_groups     Whether to return the structure with groups nested for easier viewing.
148     * @param boolean $validate        Whether to validate atoms. Turn this off if you need to run addresses through before encoding the personal names, for instance.
149     *
150     * @return object Mail_RFC822 A new Mail_RFC822 object.
151     */
152    function Mail_RFC822($address = null, $default_domain = null, $nest_groups = null, $validate = null, $limit = null)
153    {
154        if (isset($address))        $this->address        = $address;
155        if (isset($default_domain)) $this->default_domain = $default_domain;
156        if (isset($nest_groups))    $this->nestGroups     = $nest_groups;
157        if (isset($validate))       $this->validate       = $validate;
158        if (isset($limit))          $this->limit          = $limit;
159    }
160
161    /**
162     * Starts the whole process. The address must either be set here
163     * or when creating the object. One or the other.
164     *
165     * @access public
166     * @param string  $address         The address(es) to validate.
167     * @param string  $default_domain  Default domain/host etc.
168     * @param boolean $nest_groups     Whether to return the structure with groups nested for easier viewing.
169     * @param boolean $validate        Whether to validate atoms. Turn this off if you need to run addresses through before encoding the personal names, for instance.
170     *
171     * @return array A structured array of addresses.
172     */
173    function parseAddressList($address = null, $default_domain = null, $nest_groups = null, $validate = null, $limit = null)
174    {
175        if (!isset($this) || !isset($this->mailRFC822)) {
176            $obj = new Mail_RFC822($address, $default_domain, $nest_groups, $validate, $limit);
177            return $obj->parseAddressList();
178        }
179
180        if (isset($address))        $this->address        = $address;
181        if (isset($default_domain)) $this->default_domain = $default_domain;
182        if (isset($nest_groups))    $this->nestGroups     = $nest_groups;
183        if (isset($validate))       $this->validate       = $validate;
184        if (isset($limit))          $this->limit          = $limit;
185
186        $this->structure  = array();
187        $this->addresses  = array();
188        $this->error      = null;
189        $this->index      = null;
190
191        // Unfold any long lines in $this->address.
192        $this->address = preg_replace('/\r?\n/', "\r\n", $this->address);
193        $this->address = preg_replace('/\r\n(\t| )+/', ' ', $this->address);
194
195        while ($this->address = $this->_splitAddresses($this->address));
196
197        if ($this->address === false || isset($this->error)) {
198            require_once 'PEAR.php';
199            return PEAR::raiseError($this->error);
200        }
201
202        // Validate each address individually.  If we encounter an invalid
203        // address, stop iterating and return an error immediately.
204        foreach ($this->addresses as $address) {
205            $valid = $this->_validateAddress($address);
206
207            if ($valid === false || isset($this->error)) {
208                require_once 'PEAR.php';
209                return PEAR::raiseError($this->error);
210            }
211
212            if (!$this->nestGroups) {
213                $this->structure = array_merge($this->structure, $valid);
214            } else {
215                $this->structure[] = $valid;
216            }
217        }
218
219        return $this->structure;
220    }
221
222    /**
223     * Splits an address into separate addresses.
224     *
225     * @access private
226     * @param string $address The addresses to split.
227     * @return boolean Success or failure.
228     */
229    function _splitAddresses($address)
230    {
231        if (!empty($this->limit) && count($this->addresses) == $this->limit) {
232            return '';
233        }
234
235        if ($this->_isGroup($address) && !isset($this->error)) {
236            $split_char = ';';
237            $is_group   = true;
238        } elseif (!isset($this->error)) {
239            $split_char = ',';
240            $is_group   = false;
241        } elseif (isset($this->error)) {
242            return false;
243        }
244
245        // Split the string based on the above ten or so lines.
246        $parts  = explode($split_char, $address);
247        $string = $this->_splitCheck($parts, $split_char);
248
249        // If a group...
250        if ($is_group) {
251            // If $string does not contain a colon outside of
252            // brackets/quotes etc then something's fubar.
253
254            // First check there's a colon at all:
255            if (strpos($string, ':') === false) {
256                $this->error = 'Invalid address: ' . $string;
257                return false;
258            }
259
260            // Now check it's outside of brackets/quotes:
261            if (!$this->_splitCheck(explode(':', $string), ':')) {
262                return false;
263            }
264
265            // We must have a group at this point, so increase the counter:
266            $this->num_groups++;
267        }
268
269        // $string now contains the first full address/group.
270        // Add to the addresses array.
271        $this->addresses[] = array(
272                                   'address' => trim($string),
273                                   'group'   => $is_group
274                                   );
275
276        // Remove the now stored address from the initial line, the +1
277        // is to account for the explode character.
278        $address = trim(substr($address, strlen($string) + 1));
279
280        // If the next char is a comma and this was a group, then
281        // there are more addresses, otherwise, if there are any more
282        // chars, then there is another address.
283        if ($is_group && substr($address, 0, 1) == ','){
284            $address = trim(substr($address, 1));
285            return $address;
286
287        } elseif (strlen($address) > 0) {
288            return $address;
289
290        } else {
291            return '';
292        }
293
294        // If you got here then something's off
295        return false;
296    }
297
298    /**
299     * Checks for a group at the start of the string.
300     *
301     * @access private
302     * @param string $address The address to check.
303     * @return boolean Whether or not there is a group at the start of the string.
304     */
305    function _isGroup($address)
306    {
307        // First comma not in quotes, angles or escaped:
308        $parts  = explode(',', $address);
309        $string = $this->_splitCheck($parts, ',');
310
311        // Now we have the first address, we can reliably check for a
312        // group by searching for a colon that's not escaped or in
313        // quotes or angle brackets.
314        if (count($parts = explode(':', $string)) > 1) {
315            $string2 = $this->_splitCheck($parts, ':');
316            return ($string2 !== $string);
317        } else {
318            return false;
319        }
320    }
321
322    /**
323     * A common function that will check an exploded string.
324     *
325     * @access private
326     * @param array $parts The exloded string.
327     * @param string $char  The char that was exploded on.
328     * @return mixed False if the string contains unclosed quotes/brackets, or the string on success.
329     */
330    function _splitCheck($parts, $char)
331    {
332        $string = $parts[0];
333
334        for ($i = 0; $i < count($parts); $i++) {
335            if ($this->_hasUnclosedQuotes($string)
336                || $this->_hasUnclosedBrackets($string, '<>')
337                || $this->_hasUnclosedBrackets($string, '[]')
338                || $this->_hasUnclosedBrackets($string, '()')
339                || substr($string, -1) == '\\') {
340                if (isset($parts[$i + 1])) {
341                    $string = $string . $char . $parts[$i + 1];
342                } else {
343                    $this->error = 'Invalid address spec. Unclosed bracket or quotes';
344                    return false;
345                }
346            } else {
347                $this->index = $i;
348                break;
349            }
350        }
351
352        return $string;
353    }
354
355    /**
356     * Checks if a string has unclosed quotes or not.
357     *
358     * @access private
359     * @param string $string  The string to check.
360     * @return boolean  True if there are unclosed quotes inside the string,
361     *                  false otherwise.
362     */
363    function _hasUnclosedQuotes($string)
364    {
365        $string = trim($string);
366        $iMax = strlen($string);
367        $in_quote = false;
368        $i = $slashes = 0;
369
370        for (; $i < $iMax; ++$i) {
371            switch ($string[$i]) {
372            case '\\':
373                ++$slashes;
374                break;
375
376            case '"':
377                if ($slashes % 2 == 0) {
378                    $in_quote = !$in_quote;
379                }
380                // Fall through to default action below.
381
382            default:
383                $slashes = 0;
384                break;
385            }
386        }
387
388        return $in_quote;
389    }
390
391    /**
392     * Checks if a string has an unclosed brackets or not. IMPORTANT:
393     * This function handles both angle brackets and square brackets;
394     *
395     * @access private
396     * @param string $string The string to check.
397     * @param string $chars  The characters to check for.
398     * @return boolean True if there are unclosed brackets inside the string, false otherwise.
399     */
400    function _hasUnclosedBrackets($string, $chars)
401    {
402        $num_angle_start = substr_count($string, $chars[0]);
403        $num_angle_end   = substr_count($string, $chars[1]);
404
405        $this->_hasUnclosedBracketsSub($string, $num_angle_start, $chars[0]);
406        $this->_hasUnclosedBracketsSub($string, $num_angle_end, $chars[1]);
407
408        if ($num_angle_start < $num_angle_end) {
409            $this->error = 'Invalid address spec. Unmatched quote or bracket (' . $chars . ')';
410            return false;
411        } else {
412            return ($num_angle_start > $num_angle_end);
413        }
414    }
415
416    /**
417     * Sub function that is used only by hasUnclosedBrackets().
418     *
419     * @access private
420     * @param string $string The string to check.
421     * @param integer &$num    The number of occurences.
422     * @param string $char   The character to count.
423     * @return integer The number of occurences of $char in $string, adjusted for backslashes.
424     */
425    function _hasUnclosedBracketsSub($string, &$num, $char)
426    {
427        $parts = explode($char, $string);
428        for ($i = 0; $i < count($parts); $i++){
429            if (substr($parts[$i], -1) == '\\' || $this->_hasUnclosedQuotes($parts[$i]))
430                $num--;
431            if (isset($parts[$i + 1]))
432                $parts[$i + 1] = $parts[$i] . $char . $parts[$i + 1];
433        }
434
435        return $num;
436    }
437
438    /**
439     * Function to begin checking the address.
440     *
441     * @access private
442     * @param string $address The address to validate.
443     * @return mixed False on failure, or a structured array of address information on success.
444     */
445    function _validateAddress($address)
446    {
447        $is_group = false;
448        $addresses = array();
449
450        if ($address['group']) {
451            $is_group = true;
452
453            // Get the group part of the name
454            $parts     = explode(':', $address['address']);
455            $groupname = $this->_splitCheck($parts, ':');
456            $structure = array();
457
458            // And validate the group part of the name.
459            if (!$this->_validatePhrase($groupname)){
460                $this->error = 'Group name did not validate.';
461                return false;
462            } else {
463                // Don't include groups if we are not nesting
464                // them. This avoids returning invalid addresses.
465                if ($this->nestGroups) {
466                    $structure = new stdClass;
467                    $structure->groupname = $groupname;
468                }
469            }
470
471            $address['address'] = ltrim(substr($address['address'], strlen($groupname . ':')));
472        }
473
474        // If a group then split on comma and put into an array.
475        // Otherwise, Just put the whole address in an array.
476        if ($is_group) {
477            while (strlen($address['address']) > 0) {
478                $parts       = explode(',', $address['address']);
479                $addresses[] = $this->_splitCheck($parts, ',');
480                $address['address'] = trim(substr($address['address'], strlen(end($addresses) . ',')));
481            }
482        } else {
483            $addresses[] = $address['address'];
484        }
485
486        // Check that $addresses is set, if address like this:
487        // Groupname:;
488        // Then errors were appearing.
489        if (!count($addresses)){
490            $this->error = 'Empty group.';
491            return false;
492        }
493
494        // Trim the whitespace from all of the address strings.
495        array_map('trim', $addresses);
496
497        // Validate each mailbox.
498        // Format could be one of: name <geezer@domain.com>
499        //                         geezer@domain.com
500        //                         geezer
501        // ... or any other format valid by RFC 822.
502        for ($i = 0; $i < count($addresses); $i++) {
503            if (!$this->validateMailbox($addresses[$i])) {
504                if (empty($this->error)) {
505                    $this->error = 'Validation failed for: ' . $addresses[$i];
506                }
507                return false;
508            }
509        }
510
511        // Nested format
512        if ($this->nestGroups) {
513            if ($is_group) {
514                $structure->addresses = $addresses;
515            } else {
516                $structure = $addresses[0];
517            }
518
519        // Flat format
520        } else {
521            if ($is_group) {
522                $structure = array_merge($structure, $addresses);
523            } else {
524                $structure = $addresses;
525            }
526        }
527
528        return $structure;
529    }
530
531    /**
532     * Function to validate a phrase.
533     *
534     * @access private
535     * @param string $phrase The phrase to check.
536     * @return boolean Success or failure.
537     */
538    function _validatePhrase($phrase)
539    {
540        // Splits on one or more Tab or space.
541        $parts = preg_split('/[ \\x09]+/', $phrase, -1, PREG_SPLIT_NO_EMPTY);
542
543        $phrase_parts = array();
544        while (count($parts) > 0){
545            $phrase_parts[] = $this->_splitCheck($parts, ' ');
546            for ($i = 0; $i < $this->index + 1; $i++)
547                array_shift($parts);
548        }
549
550        foreach ($phrase_parts as $part) {
551            // If quoted string:
552            if (substr($part, 0, 1) == '"') {
553                if (!$this->_validateQuotedString($part)) {
554                    return false;
555                }
556                continue;
557            }
558
559            // Otherwise it's an atom:
560            if (!$this->_validateAtom($part)) return false;
561        }
562
563        return true;
564    }
565
566    /**
567     * Function to validate an atom which from rfc822 is:
568     * atom = 1*<any CHAR except specials, SPACE and CTLs>
569     *
570     * If validation ($this->validate) has been turned off, then
571     * validateAtom() doesn't actually check anything. This is so that you
572     * can split a list of addresses up before encoding personal names
573     * (umlauts, etc.), for example.
574     *
575     * @access private
576     * @param string $atom The string to check.
577     * @return boolean Success or failure.
578     */
579    function _validateAtom($atom)
580    {
581        if (!$this->validate) {
582            // Validation has been turned off; assume the atom is okay.
583            return true;
584        }
585
586        // Check for any char from ASCII 0 - ASCII 127
587        if (!preg_match('/^[\\x00-\\x7E]+$/i', $atom, $matches)) {
588            return false;
589        }
590
591        // Check for specials:
592        if (preg_match('/[][()<>@,;\\:". ]/', $atom)) {
593            return false;
594        }
595
596        // Check for control characters (ASCII 0-31):
597        if (preg_match('/[\\x00-\\x1F]+/', $atom)) {
598            return false;
599        }
600
601        return true;
602    }
603
604    /**
605     * Function to validate quoted string, which is:
606     * quoted-string = <"> *(qtext/quoted-pair) <">
607     *
608     * @access private
609     * @param string $qstring The string to check
610     * @return boolean Success or failure.
611     */
612    function _validateQuotedString($qstring)
613    {
614        // Leading and trailing "
615        $qstring = substr($qstring, 1, -1);
616
617        // Perform check, removing quoted characters first.
618        return !preg_match('/[\x0D\\\\"]/', preg_replace('/\\\\./', '', $qstring));
619    }
620
621    /**
622     * Function to validate a mailbox, which is:
623     * mailbox =   addr-spec         ; simple address
624     *           / phrase route-addr ; name and route-addr
625     *
626     * @access public
627     * @param string &$mailbox The string to check.
628     * @return boolean Success or failure.
629     */
630    function validateMailbox(&$mailbox)
631    {
632        // A couple of defaults.
633        $phrase  = '';
634        $comment = '';
635        $comments = array();
636
637        // Catch any RFC822 comments and store them separately.
638        $_mailbox = $mailbox;
639        while (strlen(trim($_mailbox)) > 0) {
640            $parts = explode('(', $_mailbox);
641            $before_comment = $this->_splitCheck($parts, '(');
642            if ($before_comment != $_mailbox) {
643                // First char should be a (.
644                $comment    = substr(str_replace($before_comment, '', $_mailbox), 1);
645                $parts      = explode(')', $comment);
646                $comment    = $this->_splitCheck($parts, ')');
647                $comments[] = $comment;
648
649                // +2 is for the brackets
650                $_mailbox = substr($_mailbox, strpos($_mailbox, '('.$comment)+strlen($comment)+2);
651            } else {
652                break;
653            }
654        }
655
656        foreach ($comments as $comment) {
657            $mailbox = str_replace("($comment)", '', $mailbox);
658        }
659
660        $mailbox = trim($mailbox);
661
662        // Check for name + route-addr
663        if (substr($mailbox, -1) == '>' && substr($mailbox, 0, 1) != '<') {
664            $parts  = explode('<', $mailbox);
665            $name   = $this->_splitCheck($parts, '<');
666
667            $phrase     = trim($name);
668            $route_addr = trim(substr($mailbox, strlen($name.'<'), -1));
669
670            if ($this->_validatePhrase($phrase) === false || ($route_addr = $this->_validateRouteAddr($route_addr)) === false) {
671                return false;
672            }
673
674        // Only got addr-spec
675        } else {
676            // First snip angle brackets if present.
677            if (substr($mailbox, 0, 1) == '<' && substr($mailbox, -1) == '>') {
678                $addr_spec = substr($mailbox, 1, -1);
679            } else {
680                $addr_spec = $mailbox;
681            }
682
683            if (($addr_spec = $this->_validateAddrSpec($addr_spec)) === false) {
684                return false;
685            }
686        }
687
688        // Construct the object that will be returned.
689        $mbox = new stdClass();
690
691        // Add the phrase (even if empty) and comments
692        $mbox->personal = $phrase;
693        $mbox->comment  = isset($comments) ? $comments : array();
694
695        if (isset($route_addr)) {
696            $mbox->mailbox = $route_addr['local_part'];
697            $mbox->host    = $route_addr['domain'];
698            $route_addr['adl'] !== '' ? $mbox->adl = $route_addr['adl'] : '';
699        } else {
700            $mbox->mailbox = $addr_spec['local_part'];
701            $mbox->host    = $addr_spec['domain'];
702        }
703
704        $mailbox = $mbox;
705        return true;
706    }
707
708    /**
709     * This function validates a route-addr which is:
710     * route-addr = "<" [route] addr-spec ">"
711     *
712     * Angle brackets have already been removed at the point of
713     * getting to this function.
714     *
715     * @access private
716     * @param string $route_addr The string to check.
717     * @return mixed False on failure, or an array containing validated address/route information on success.
718     */
719    function _validateRouteAddr($route_addr)
720    {
721        // Check for colon.
722        if (strpos($route_addr, ':') !== false) {
723            $parts = explode(':', $route_addr);
724            $route = $this->_splitCheck($parts, ':');
725        } else {
726            $route = $route_addr;
727        }
728
729        // If $route is same as $route_addr then the colon was in
730        // quotes or brackets or, of course, non existent.
731        if ($route === $route_addr){
732            unset($route);
733            $addr_spec = $route_addr;
734            if (($addr_spec = $this->_validateAddrSpec($addr_spec)) === false) {
735                return false;
736            }
737        } else {
738            // Validate route part.
739            if (($route = $this->_validateRoute($route)) === false) {
740                return false;
741            }
742
743            $addr_spec = substr($route_addr, strlen($route . ':'));
744
745            // Validate addr-spec part.
746            if (($addr_spec = $this->_validateAddrSpec($addr_spec)) === false) {
747                return false;
748            }
749        }
750
751        if (isset($route)) {
752            $return['adl'] = $route;
753        } else {
754            $return['adl'] = '';
755        }
756
757        $return = array_merge($return, $addr_spec);
758        return $return;
759    }
760
761    /**
762     * Function to validate a route, which is:
763     * route = 1#("@" domain) ":"
764     *
765     * @access private
766     * @param string $route The string to check.
767     * @return mixed False on failure, or the validated $route on success.
768     */
769    function _validateRoute($route)
770    {
771        // Split on comma.
772        $domains = explode(',', trim($route));
773
774        foreach ($domains as $domain) {
775            $domain = str_replace('@', '', trim($domain));
776            if (!$this->_validateDomain($domain)) return false;
777        }
778
779        return $route;
780    }
781
782    /**
783     * Function to validate a domain, though this is not quite what
784     * you expect of a strict internet domain.
785     *
786     * domain = sub-domain *("." sub-domain)
787     *
788     * @access private
789     * @param string $domain The string to check.
790     * @return mixed False on failure, or the validated domain on success.
791     */
792    function _validateDomain($domain)
793    {
794        // Note the different use of $subdomains and $sub_domains
795        $subdomains = explode('.', $domain);
796
797        while (count($subdomains) > 0) {
798            $sub_domains[] = $this->_splitCheck($subdomains, '.');
799            for ($i = 0; $i < $this->index + 1; $i++)
800                array_shift($subdomains);
801        }
802
803        foreach ($sub_domains as $sub_domain) {
804            if (!$this->_validateSubdomain(trim($sub_domain)))
805                return false;
806        }
807
808        // Managed to get here, so return input.
809        return $domain;
810    }
811
812    /**
813     * Function to validate a subdomain:
814     *   subdomain = domain-ref / domain-literal
815     *
816     * @access private
817     * @param string $subdomain The string to check.
818     * @return boolean Success or failure.
819     */
820    function _validateSubdomain($subdomain)
821    {
822        if (preg_match('|^\[(.*)]$|', $subdomain, $arr)){
823            if (!$this->_validateDliteral($arr[1])) return false;
824        } else {
825            if (!$this->_validateAtom($subdomain)) return false;
826        }
827
828        // Got here, so return successful.
829        return true;
830    }
831
832    /**
833     * Function to validate a domain literal:
834     *   domain-literal =  "[" *(dtext / quoted-pair) "]"
835     *
836     * @access private
837     * @param string $dliteral The string to check.
838     * @return boolean Success or failure.
839     */
840    function _validateDliteral($dliteral)
841    {
842        return !preg_match('/(.)[][\x0D\\\\]/', $dliteral, $matches) && $matches[1] != '\\';
843    }
844
845    /**
846     * Function to validate an addr-spec.
847     *
848     * addr-spec = local-part "@" domain
849     *
850     * @access private
851     * @param string $addr_spec The string to check.
852     * @return mixed False on failure, or the validated addr-spec on success.
853     */
854    function _validateAddrSpec($addr_spec)
855    {
856        $addr_spec = trim($addr_spec);
857
858        // Split on @ sign if there is one.
859        if (strpos($addr_spec, '@') !== false) {
860            $parts      = explode('@', $addr_spec);
861            $local_part = $this->_splitCheck($parts, '@');
862            $domain     = substr($addr_spec, strlen($local_part . '@'));
863
864        // No @ sign so assume the default domain.
865        } else {
866            $local_part = $addr_spec;
867            $domain     = $this->default_domain;
868        }
869
870        if (($local_part = $this->_validateLocalPart($local_part)) === false) return false;
871        if (($domain     = $this->_validateDomain($domain)) === false) return false;
872
873        // Got here so return successful.
874        return array('local_part' => $local_part, 'domain' => $domain);
875    }
876
877    /**
878     * Function to validate the local part of an address:
879     *   local-part = word *("." word)
880     *
881     * @access private
882     * @param string $local_part
883     * @return mixed False on failure, or the validated local part on success.
884     */
885    function _validateLocalPart($local_part)
886    {
887        $parts = explode('.', $local_part);
888        $words = array();
889
890        // Split the local_part into words.
891        while (count($parts) > 0){
892            $words[] = $this->_splitCheck($parts, '.');
893            for ($i = 0; $i < $this->index + 1; $i++) {
894                array_shift($parts);
895            }
896        }
897
898        // Validate each word.
899        foreach ($words as $word) {
900            // If this word contains an unquoted space, it is invalid. (6.2.4)
901            if (strpos($word, ' ') && $word[0] !== '"')
902            {
903                return false;
904            }
905
906            if ($this->_validatePhrase(trim($word)) === false) return false;
907        }
908
909        // Managed to get here, so return the input.
910        return $local_part;
911    }
912
913    /**
914     * Returns an approximate count of how many addresses are in the
915     * given string. This is APPROXIMATE as it only splits based on a
916     * comma which has no preceding backslash. Could be useful as
917     * large amounts of addresses will end up producing *large*
918     * structures when used with parseAddressList().
919     *
920     * @param  string $data Addresses to count
921     * @return int          Approximate count
922     */
923    function approximateCount($data)
924    {
925        return count(preg_split('/(?<!\\\\),/', $data));
926    }
927
928    /**
929     * This is a email validating function separate to the rest of the
930     * class. It simply validates whether an email is of the common
931     * internet form: <user>@<domain>. This can be sufficient for most
932     * people. Optional stricter mode can be utilised which restricts
933     * mailbox characters allowed to alphanumeric, full stop, hyphen
934     * and underscore.
935     *
936     * @param  string  $data   Address to check
937     * @param  boolean $strict Optional stricter mode
938     * @return mixed           False if it fails, an indexed array
939     *                         username/domain if it matches
940     */
941    function isValidInetAddress($data, $strict = false)
942    {
943        $regex = $strict ? '/^([.0-9a-z_+-]+)@(([0-9a-z-]+\.)+[0-9a-z]{2,})$/i' : '/^([*+!.&#$|\'\\%\/0-9a-z^_`{}=?~:-]+)@(([0-9a-z-]+\.)+[0-9a-z]{2,})$/i';
944        if (preg_match($regex, trim($data), $matches)) {
945            return array($matches[1], $matches[2]);
946        } else {
947            return false;
948        }
949    }
950
951}
Note: See TracBrowser for help on using the repository browser.