<?php
/* SVN FILE: $Id: domain_tld_parser.class.php 4 2007-09-17 12:57:34Z jad $ */

/**
 * Domain TLD parser
 *
 * Parses the HOST part of a URL into 3 parts: domain name, TLD and sub-domain
 *
 * PHP 5
 *
 * Copyright (c) 2007, Jad BITAR
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 * 
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 * 
 * @copyright    Copyright (c) 2007, Jad BITAR
 * @link         http://myeasyscripts.com/loudbaking LoudBaking
 * @package      Domain TLD Parser
 * @since        0.0.1 
 * @version      $Revision: 2 $
 * @author       Jad Bitar
 * @modifiedby   $LastChangedBy: jad $
 * @lastmodified $Date: 2007-09-17 15:31:32 +0300 (Mon, 17 Sep 2007) $
 * @example      example.php
 */

class DomainTldParser
{
   
   /**
    * General TLDs
    *
    * @access  private 
    * @var     array
    */
   var $mGeneralTlds = array( 'com', 'edu', 'gov', 'net', 'org');
   
   /**
    * Generic TLDs
    *
    * @access  private 
    * @var     array
    */
   var $mGenericTlds = array('aero', 'asia', 'biz', 'cat', 'coop', 'info', 'jobs', 'mobi', 
                              'museum', 'name', 'pro', 'tel', 'travel', 'mil', 'int');
   
   /**
    * Official country TLDs
    *
    * @access  private 
    * @var     array
    */
   var $mCountryTlds = array('ac', 'ad', 'ae', 'af', 'ag', 'ai', 'al', 'am', 'an', 'ao', 'aq', 'ar', 
                              'as', 'at', 'au', 'aw', 'ax', 'az', 'ba', 'bb', 'bd', 'be', 'bf', 'bg', 
                              'bh', 'bi', 'bj', 'bm', 'bn', 'bo', 'br', 'bs', 'bt', 'bv', 'bw', 'by', 
                              'bz', 'ca', 'cc', 'cd', 'cf', 'cg', 'ch', 'ci', 'ck', 'cl', 'cm', 'cn', 
                              'co', 'cr', 'cu', 'cv', 'cx', 'cy', 'cz', 'de', 'dj', 'dk', 'dm', 'do', 
                              'dz', 'ec', 'ee', 'eg', 'eh', 'er', 'es', 'et', 'eu', 'fi', 'fj', 'fk', 
                              'fm', 'fo', 'fr', 'ga', 'gb', 'gd', 'ge', 'gf', 'gg', 'gh', 'gi', 'gl', 
                              'gm', 'gn', 'gp', 'gq', 'gr', 'gs', 'gt', 'gu', 'gw', 'gy', 'hk', 'hm', 
                              'hn', 'hr', 'ht', 'hu', 'id', 'ie', 'il', 'im', 'in', 'io', 'iq', 'ir', 
                              'is', 'it', 'je', 'jm', 'jo', 'jp', 'ke', 'kg', 'kh', 'ki', 'km', 'kn', 
                              'kp', 'kr', 'kw', 'ky', 'kz', 'la', 'lb', 'lc', 'li', 'lk', 'lr', 'ls', 
                              'lt', 'lu', 'lv', 'ly', 'ma', 'mc', 'md', 'me', 'mg', 'mh', 'mk', 'ml', 
                              'mm', 'mn', 'mo', 'mp', 'mq', 'mr', 'ms', 'mt', 'mu', 'mv', 'mw', 'mx', 
                              'my', 'mz', 'na', 'nc', 'ne', 'nf', 'ng', 'ni', 'nl', 'no', 'np', 'nr', 
                              'nu', 'nz', 'om', 'pa', 'pe', 'pf', 'pg', 'ph', 'pk', 'pl', 'pm', 'pn', 
                              'pr', 'ps', 'pt', 'pw', 'py', 'qa', 're', 'ro', 'rs', 'ru', 'rw', 'sa', 
                              'sb', 'sc', 'sd', 'se', 'sg', 'sh', 'si', 'sj', 'sk', 'sl', 'sm', 'sn', 
                              'so', 'sr', 'st', 'su', 'sv', 'sy', 'sz', 'tc', 'td', 'tf', 'tg', 'th', 
                              'tj', 'tk', 'tl', 'tm', 'tn', 'to', 'tp', 'tr', 'tt', 'tv', 'tw', 'tz', 
                              'ua', 'ug', 'uk', 'um', 'us', 'uy', 'uz', 'va', 'vc', 've', 'vg', 'vi', 
                              'vn', 'vu', 'wf', 'ws', 'ye', 'yt', 'yu', 'za', 'zm', 'zw');
   
   /**
    * Country specific TLDs
    *
    * @access  private 
    * @var     array
    */
   var $mSpecificTlds = array('ac' => array('kr', 'nz', 'uk'),
                              'ad' => array('jp'),
                              'co' => array('at', 'az', 'hu', 'il', 'jp', 'kr', 'nz', 'tz', 'uk', 'uz', 'vi', 'za'),
                              'gr' => array('jp'),
                              'ltd' => array('uk'),
                              'ne' => array('jp'),
                              'or' => array('jp'),
                              'plc' => array('uk'),
                              );
   
                              
   
   /**
    * Parses a string into a valid domain and TLD
    *
    * @access  public
    * @return  array    domain and TLD
    * @param   string   URL to parse
    */
   function parse($str)
   {
      $str = strtolower($str);
      
      $host = parse_url($str);
      $host = $host['host'];
      
      $parts = explode('.', $host);
      $parts_count = count($parts);
      
      if (in_array($parts[$parts_count-1], $this->mGeneralTlds) || in_array($parts[$parts_count-1], $this->mGenericTlds))
      {
         $domain = $parts[$parts_count-2];
         $tld = $parts[$parts_count-1];
         $subdomain = '';
         for ($i = 3; $parts_count - $i >= 0; $i++)
         {
            $subdomain = $parts[$parts_count-$i] . '.' . $subdomain; 
         }
      }
      else if (in_array($parts[$parts_count-1], $this->mCountryTlds))
      {
         if (in_array($parts[$parts_count-2], $this->mGeneralTlds) ||
               (in_array($parts[$parts_count-2], array_keys($this->mSpecificTlds)) && 
                  in_array($parts[$parts_count-1], $this->mSpecificTlds[$parts[$parts_count-2]])))
         {
            $domain = $parts[$parts_count-3];
            $tld = $parts[$parts_count-2] . '.' . $parts[$parts_count-1];
            $subdomain = '';
            for ($i = 4; $parts_count - $i >= 0; $i++)
            {
               $subdomain = $parts[$parts_count-$i] . '.' . $subdomain; 
            }
         }
         else
         {
            $domain = $parts[$parts_count-2];
            $tld = $parts[$parts_count-1];
            $subdomain = '';
            for ($i = 3; $parts_count - $i >= 0; $i++)
            {
               $subdomain = $parts[$parts_count-$i] . '.' . $subdomain; 
            }
         }
      }
      return array('domain' => $domain, 'tld' => $tld, 'sub' => substr($subdomain, 0, -1));
   }
}

?>