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

Revision 7688, 34.4 KB checked in by cristiano, 11 years ago (diff)

Ticket #3209 - ErSincronização? de status e acl de edição

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