tld 0.6.1

data/lib/tld/currency.rb

@@ -0,0 +1,24 @@
+require 'rubygems'
+require 'iso_country_codes'
+
+class TLD
+  class Currency
+    CURRENCY_MAP = {
+      :eu  => %w{EUR},
+      :gov => %w{USD},
+      :mil => %w{USD}
+    }
+
+    class << self
+      def find(klass)
+        tld = klass.tld
+        mapped_currency = CURRENCY_MAP[tld.to_sym]
+        if mapped_currency.nil?
+          return tld.match(/^\w\w$/) ? IsoCountryCodes.find(TLD::MAP[tld.to_sym] || tld).currencies : []
+        else
+          return mapped_currency
+        end
+      end
+    end
+  end
+end

data/lib/tld/generic_tld.rb

@@ -0,0 +1,28 @@
+class TLD
+  class GenericTld < TLD
+    def type
+      :generic
+    end
+    class BIZ < GenericTld #:nodoc:
+      self.tld = %q{biz}
+    end
+    class COM < GenericTld #:nodoc:
+      self.tld = %q{com}
+    end
+    class INFO < GenericTld #:nodoc:
+      self.tld = %q{info}
+    end
+    class NAME < GenericTld #:nodoc:
+      self.tld = %q{name}
+    end
+    class NET < GenericTld #:nodoc:
+      self.tld = %q{net}
+    end
+    class ORG < GenericTld #:nodoc:
+      self.tld = %q{org}
+    end
+    class PRO < GenericTld #:nodoc:
+      self.tld = %q{pro}
+    end
+  end # end GenericTld
+end # end TLD

data/lib/tld/infrastructure_tld.rb

@@ -0,0 +1,10 @@
+class TLD
+  class InfrastructureTld < TLD
+    def type
+      :infrastructure
+    end
+    class ARPA < InfrastructureTld #:nodoc:
+      self.tld = %q{arpa}
+    end
+  end # end InfrastructureTld
+end # end TLD

data/lib/tld/name.rb

@@ -0,0 +1,50 @@
+require 'rubygems'
+require 'iso_country_codes'
+
+class TLD
+  class Name
+    NAME_MAP = {
+      :aero      => 'Aeroplane',
+      :arpa      => 'Address and Routing Parameter Area (ARPA)',
+      :asia      => 'Asia',
+      :bitnet    => 'BITNET',
+      :biz       => 'Business',
+      :cat       => 'Catalan',
+      :com       => 'Commercial',
+      :coop      => 'Cooperative',
+      :csnet     => 'Computer Science Network (CSNET)',
+      :edu       => 'Education',
+      :eu        => 'European Union',
+      :example   => 'Example domain',
+      :exit      => 'Preferred Tor exit node',
+      :gov       => 'US Government',
+      :info      => 'Information',
+      :int       => 'Internet',
+      :invalid   => 'Invalid domain',
+      :jobs      => 'Jobs',
+      :local     => 'Network discovery protocol',
+      :localhost => 'Localhost',
+      :mil       => 'US Military',
+      :mobi      => 'Mobile',
+      :museum    => 'Museum',
+      :name      => 'Name',
+      :nato      => 'North Atlantic Treaty Organization (NATO)',
+      :net       => 'Network',
+      :onion     => 'Reachable via Tor',
+      :org       => 'Organization',
+      :pro       => 'Professional',
+      :root      => 'Diagnostic marker',
+      :tel       => 'Telnic',
+      :test      => 'Test domain',
+      :travel    => 'Travel',
+      :uucp      => 'Reachable by Unix to Unix CoPy (UUCP)'
+    }
+
+    class << self
+      def find(klass)
+        tld = klass.tld
+        NAME_MAP[tld.to_sym] || IsoCountryCodes.find(TLD::MAP[tld.to_sym] || tld).name
+      end
+    end
+  end
+end

data/lib/tld/pseudo_tld.rb

@@ -0,0 +1,28 @@
+class TLD
+  class PseudoTld < TLD
+    def type
+      :pseudo
+    end
+    class BITNET < PseudoTld #:nodoc:
+      self.tld = %q{bitnet}
+    end
+    class CSNET < PseudoTld #:nodoc:
+      self.tld = %q{csnet}
+    end
+    class LOCAL < PseudoTld #:nodoc:
+      self.tld = %q{local}
+    end
+    class ROOT < PseudoTld #:nodoc:
+      self.tld = %q{root}
+    end
+    class UUCP < PseudoTld #:nodoc:
+      self.tld = %q{uucp}
+    end
+    class ONION < PseudoTld #:nodoc:
+      self.tld = %q{onion}
+    end
+    class EXIT < PseudoTld #:nodoc:
+      self.tld = %q{exit}
+    end
+  end # end PseudoTld
+end # end TLD

data/lib/tld/reserved_tld.rb

@@ -0,0 +1,19 @@
+class TLD
+  class ReservedTld < TLD
+    def type
+      :reserved
+    end
+    class EXAMPLE < ReservedTld #:nodoc:
+      self.tld = %q{example}
+    end
+    class INVALID < ReservedTld #:nodoc:
+      self.tld = %q{invalid}
+    end
+    class LOCALHOST < ReservedTld #:nodoc:
+      self.tld = %q{localhost}
+    end
+    class TEST < ReservedTld #:nodoc:
+      self.tld = %q{test}
+    end
+  end # end ReservedTld
+end # end TLD

data/lib/tld/retired_tld.rb

@@ -0,0 +1,10 @@
+class TLD
+  class RetiredTld < TLD
+    def type
+      :retired
+    end
+    class NATO < RetiredTld #:nodoc:
+      self.tld = %q{nato}
+    end
+  end # end RetiredTld
+end # end TLD

data/lib/tld/sponsored_tld.rb

@@ -0,0 +1,46 @@
+class TLD
+  class SponsoredTld < TLD
+    def type
+      :sponsored
+    end
+    class AERO < SponsoredTld #:nodoc:
+      self.tld = %q{aero}
+    end
+    class ASIA < SponsoredTld #:nodoc:
+      self.tld = %q{asia}
+    end
+    class CAT < SponsoredTld #:nodoc:
+      self.tld = %q{cat}
+    end
+    class COOP < SponsoredTld #:nodoc:
+      self.tld = %q{coop}
+    end
+    class EDU < SponsoredTld #:nodoc:
+      self.tld = %q{edu}
+    end
+    class GOV < SponsoredTld #:nodoc:
+      self.tld = %q{gov}
+    end
+    class INT < SponsoredTld #:nodoc:
+      self.tld = %q{int}
+    end
+    class JOBS < SponsoredTld #:nodoc:
+      self.tld = %q{jobs}
+    end
+    class MIL < SponsoredTld #:nodoc:
+      self.tld = %q{mil}
+    end
+    class MOBI < SponsoredTld #:nodoc:
+      self.tld = %q{mobi}
+    end
+    class MUSEUM < SponsoredTld #:nodoc:
+      self.tld = %q{museum}
+    end
+    class TEL < SponsoredTld #:nodoc:
+      self.tld = %q{tel}
+    end
+    class TRAVEL < SponsoredTld #:nodoc:
+      self.tld = %q{travel}
+    end
+  end # end SponsoredTld
+end # end TLD

data/lib/tld/tld.rb

@@ -0,0 +1,104 @@
+require 'singleton'
+require 'rubygems'
+require 'addressable/uri'
+
+class TLD
+  MAP = {
+    :ac => 'sh',
+    :uk => 'gb',
+    :su => 'ru',
+    :tp => 'tl',
+    :yu => 'rs'
+  }
+
+  include Singleton
+
+  class UnknownTldError < StandardError; end
+
+  def to_s
+    tld
+  end
+
+  def tld
+    self.class.tld
+  end
+
+  def name
+    self.class.name
+  end
+
+  def main_currency
+    self.class.main_currency
+  end
+
+  def currency
+    self.class.main_currency
+  end
+
+  def currencies
+    self.class.currencies
+  end
+
+  def alpha3
+    self.class.alpha3
+  end
+
+  class << self
+    attr_accessor :tld
+
+    @@tlds = []
+
+    def inherited(tld) #:nodoc:
+      super
+      @@tlds << tld.instance unless self == TLD
+    end
+
+    def all
+      @@tlds.uniq
+    end
+
+    def name
+      Name.find(self)
+    end
+
+    def currencies
+      Currency.find(self)
+    end
+
+    def alpha3
+      Alpha3.find(self)
+    end
+
+    def main_currency
+      currencies.first
+    end
+
+    alias_method :currency, :main_currency
+
+    def find(str)
+      host     = normalized_host(str)
+      host     = str.downcase if host == ''
+      last     = host.match(/\./) ? host.split('.').last : host # Take the last one of foo.bar.baz
+      instance = all.select { |t| t.tld == last }.first
+
+      raise UnknownTldError, "TLD '#{str}' unkown." if instance.nil?
+
+      instance
+    end
+
+    def has_valid_tld?(str)
+      str = normalized_host(str)
+      str.match(/\./) ? self.valid?(str.split('.').last) : self.valid?(str)
+    end
+
+    def valid?(tld)
+      !!all.select { |t| t.to_s == tld.downcase }.first
+    end
+
+    private
+
+    def normalized_host(str)
+      Addressable::URI.heuristic_parse(str).normalized_host.to_s rescue str
+    end
+  end
+end

data/test/tld_test.rb

@@ -0,0 +1,87 @@
+require 'test/unit'
+require 'tld'
+require 'shoulda'
+
+class TestTld < Test::Unit::TestCase
+  should 'find TLD by exact match' do
+    assert_equal 'au', TLD.find('au').tld
+  end
+
+  should 'find TLD by exact match with dot' do
+    assert_equal 'au', TLD.find('.au').tld
+  end
+
+  should 'find TLD with case' do
+    assert_equal 'au', TLD.find('AU').tld
+  end
+
+  should 'find TLD by hostname' do
+    assert_equal 'au', TLD.find('foo.bar.au').tld
+  end
+
+  should 'find TLD by url' do
+    assert_equal 'au', TLD.find('http://foo.bar.au/baz').tld
+  end
+
+  should 'get TLD currency' do
+    assert_equal 'AUD', TLD.find('au').currency
+  end
+
+  should 'get mapped TLD currency' do
+    assert_equal 'EUR', TLD.find('eu').currency
+    assert_equal 'GBP', TLD.find('uk').currency
+  end
+
+  should 'get TLD name' do
+    assert_equal 'Australia', TLD.find('au').name
+    assert_equal 'Business', TLD.find('biz').name
+  end
+
+  should 'get iso alpha3 code' do
+    assert_equal 'AUS', TLD.find('au').alpha3
+    assert_equal 'GBR', TLD.find('uk').alpha3
+  end
+
+  should 'get TLD as a string' do
+    tld = TLD.find('au')
+
+    assert_equal 'au', tld.to_s
+    assert_equal tld.tld, tld.to_s
+  end
+
+  should 'com should map to empty currency (not Comoros)' do
+    assert_equal [], TLD.find('com').currencies
+    assert_nil TLD.find('com').currency
+  end
+
+  should 'raise exception when TLD is unknown' do
+    assert_raises TLD::UnknownTldError do
+      TLD.find('foo')
+    end
+  end
+
+  should 'confirm that TLD is valid' do
+    assert TLD.valid?('au')
+    assert TLD.valid?('AU')
+  end
+
+  should 'confirm that TLD is invalid' do
+    assert_equal false, TLD.valid?('not-a-tld')
+  end
+
+  should 'confirm that hostname has a valid TLD' do
+    assert TLD.has_valid_tld?('foo.com.au')
+    assert TLD.has_valid_tld?('http://foo.com.au/bar')
+  end
+
+  should 'confirm that hostname does not have a valid TLD' do
+    assert_equal false, TLD.has_valid_tld?('foo.bar')
+    assert_equal false, TLD.has_valid_tld?('http://foo.bar')
+  end
+
+  should 'raise UnknownTldError if string cannot be parsed by Addressable::URI' do
+    assert_raises TLD::UnknownTldError do
+      TLD.find('foo:')
+    end
+  end
+end

metadata

@@ -0,0 +1,113 @@
+--- !ruby/object:Gem::Specification 
+name: tld
+version: !ruby/object:Gem::Version 
+  hash: 5
+  prerelease: false
+  segments: 
+  - 0
+  - 6
+  - 1
+  version: 0.6.1
+platform: ruby
+authors: 
+- alex
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-05-20 00:00:00 +01:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: iso_country_codes
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 19
+        segments: 
+        - 0
+        - 2
+        - 2
+        version: 0.2.2
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: addressable
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id002
+description: Top-level domain library
+email: alexrabarts@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README.rdoc
+files: 
+- History.txt
+- Manifest.txt
+- README.rdoc
+- VERSION.yml
+- lib/tld/alpha3.rb
+- lib/tld/cc_tld.rb
+- lib/tld/currency.rb
+- lib/tld/generic_tld.rb
+- lib/tld/infrastructure_tld.rb
+- lib/tld/name.rb
+- lib/tld/pseudo_tld.rb
+- lib/tld/reserved_tld.rb
+- lib/tld/retired_tld.rb
+- lib/tld/sponsored_tld.rb
+- lib/tld/tld.rb
+- lib/tld.rb
+- test/tld_test.rb
+has_rdoc: true
+homepage: http://github.com/alexrabarts/tld
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --inline-source
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: Provides meta information for Internet Top Level Domains (TLDs).
+test_files: []
+