alexrabarts-tld 0.2.0

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,86 @@
+require 'singleton'
+
+class TLD
+  VERSION = '0.2.0'
+
+  MAP = {
+    :ac => 'sh',
+    :uk => 'gb',
+    :su => 'ru',
+    :tp => 'tl',
+    :yu => 'rs'
+  }
+
+  include Singleton
+
+  class UnknownTldError < StandardError; 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)
+      str.downcase!
+      str.sub!(/^\w+:\/\//, '') # Strip protocol
+      str = str.split('/').first if str.match(/\//) # Throw away anything after a slash
+      str = str.split('.').last if str.match(/\./) # Take the last one of foo.bar.baz
+      instance = all.select { |t| t.tld == str }.first
+
+      raise UnknownTldError, "TLD '#{str}' unkown." if instance.nil?
+
+      instance
+    end
+  end
+end

data/lib/tld.rb

@@ -0,0 +1,14 @@
+dir = File.dirname(__FILE__)
+$LOAD_PATH << dir unless $LOAD_PATH.include?(dir)
+
+require 'tld/tld'
+require 'tld/cc_tld'
+require 'tld/generic_tld'
+require 'tld/infrastructure_tld'
+require 'tld/pseudo_tld'
+require 'tld/reserved_tld'
+require 'tld/retired_tld'
+require 'tld/sponsored_tld'
+require 'tld/currency'
+require 'tld/name'
+require 'tld/alpha3'

data/rakelib/cultivate.rake

@@ -0,0 +1,7 @@
+# Only works on unixy type systems.
+# http://blog.behindlogic.com/2008/10/auto-generate-your-manifest-and-gemspec.html
+desc 'Rebuild manifest and gemspec.'
+task :cultivate do
+  system %q{touch Manifest.txt; rake check_manifest | grep -v "(in " | patch}
+  system %q{rake debug_gem | grep -v "(in " > `basename \`pwd\``.gemspec}
+end

data/rakelib/tld.rake

@@ -0,0 +1,30 @@
+namespace :update do
+  desc "Create CcTld classes from Wikipedia's list of ccTLDs."
+  task :tlds do
+    dirname            = File.dirname(__FILE__)
+    gen                = File.join(dirname, %w{tld.rb})
+    cc_lib             = File.expand_path(File.join(dirname, %w{.. lib tld cc_tld.rb}))
+    generic_lib        = File.expand_path(File.join(dirname, %w{.. lib tld generic_tld.rb}))
+    infrastructure_lib = File.expand_path(File.join(dirname, %w{.. lib tld infrastructure_tld.rb}))
+    pseudo_lib         = File.expand_path(File.join(dirname, %w{.. lib tld pseudo_tld.rb}))
+    reserved_lib       = File.expand_path(File.join(dirname, %w{.. lib tld reserved_tld.rb}))
+    retired_lib        = File.expand_path(File.join(dirname, %w{.. lib tld retired_tld.rb}))
+    sponsored_lib      = File.expand_path(File.join(dirname, %w{.. lib tld sponsored_tld.rb}))
+
+    require gen
+
+    {
+      cc_lib             => TLD::Task::UpdateCcTlds,
+      generic_lib        => TLD::Task::UpdateGenericTlds,
+      infrastructure_lib => TLD::Task::UpdateInfrastructureTlds,
+      pseudo_lib         => TLD::Task::UpdatePseudoTlds,
+      reserved_lib       => TLD::Task::UpdateReservedTlds,
+      retired_lib        => TLD::Task::UpdateRetiredTlds,
+      sponsored_lib      => TLD::Task::UpdateSponsoredTlds
+    }.each_pair do |lib, klass|
+      File.open(lib, File::CREAT | File::TRUNC | File::WRONLY) do |f|
+        f.write klass.get
+      end
+    end
+  end
+end # :currency

data/rakelib/tld.rb

@@ -0,0 +1,102 @@
+require 'hpricot'
+require 'open-uri'
+require 'erubis'
+
+class TLD
+  module Task
+    def self.to_ruby(tlds, klass, type)
+      tmpl  = File.read(File.join(File.dirname(__FILE__), 'tld.rb.erb'))
+      eruby = Erubis::Eruby.new(tmpl)
+      eruby.result(:tlds => tlds, :klass => klass, :type => type)
+    end
+
+    module UpdateCcTlds
+      def self.get
+        tlds = []
+        node    = nil
+        doc     = Hpricot(open('http://en.wikipedia.org/wiki/Country_code_top-level_domain').read)
+        nodes   = doc.search('strong.selflink')
+        found   = false
+
+        nodes.each do |n|
+          node = n
+          if node.inner_html == 'Country code top-level domains'
+            found = true
+            break
+          end
+        end
+
+        return nil unless found
+        node.parent.parent.parent.next_sibling.next_sibling.search('a').each do |a|
+          tld = a.inner_text.upcase
+          tld.slice!(0) # Remove the leading '.'
+          break unless tld.match(/^\w\w$/)
+          tlds.push(tld)
+        end
+
+        Task.to_ruby(tlds, 'CcTld', :cc)
+      end
+    end # end UpdateCcTlds
+  
+    module UpdateNonCcTlds
+      def self.get(inner_text_match)
+        tlds = []
+        node = nil
+        doc  = Hpricot(open('http://en.wikipedia.org/wiki/Top-level_domain').read)
+        seen = {}
+        doc.search('table.nowraplinks.navbox-subgroup tr').each do |tr|
+          tr.search('td').each do |td|
+            if td.inner_text == inner_text_match
+              td = td.next_sibling
+              td.search('a').each do |a|
+                tld = a.inner_text.upcase
+                next if seen[tld]
+                seen[tld] = true
+                tld.slice!(0) # Remove the leading '.'
+                tlds.push(tld)
+              end
+            end
+          end
+        end
+
+        tlds
+      end
+    end
+
+    module UpdateGenericTlds
+      def self.get
+        Task.to_ruby(Task::UpdateNonCcTlds.get('Generic'), 'GenericTld', :generic)
+      end
+    end # end UpdateGenericTlds
+
+    module UpdateInfrastructureTlds
+      def self.get
+        Task.to_ruby(Task::UpdateNonCcTlds.get('Infrastructure'), 'InfrastructureTld', :infrastructure)
+      end
+    end # end UpdateInfrastructureTlds
+
+    module UpdatePseudoTlds
+      def self.get
+        Task.to_ruby(Task::UpdateNonCcTlds.get('Pseudo'), 'PseudoTld', :pseudo)
+      end
+    end # end UpdatePseudoTlds
+
+    module UpdateReservedTlds
+      def self.get
+        Task.to_ruby(Task::UpdateNonCcTlds.get('Reserved'), 'ReservedTld', :reserved)
+      end
+    end # end UpdateReservedTlds
+
+    module UpdateRetiredTlds
+      def self.get
+        Task.to_ruby(Task::UpdateNonCcTlds.get('Deleted/retired'), 'RetiredTld', :retired)
+      end
+    end # end UpdateRetiredTlds
+
+    module UpdateSponsoredTlds
+      def self.get
+        Task.to_ruby(Task::UpdateNonCcTlds.get('Sponsored'), 'SponsoredTld', :sponsored)
+      end
+    end # end UpdateSponsoredTlds
+  end # Task
+end # TLD

data/rakelib/tld.rb.erb

@@ -0,0 +1,12 @@
+class TLD
+  class <%= klass %> < TLD
+    def type
+      :<%= type %>
+    end
+    <% tlds.each do |tld| -%>
+    class <%= tld %> < <%= klass %> #:nodoc:
+      self.tld = %q{<%= tld.downcase %>}
+    end
+    <% end -%>
+  end # end <%= klass %>
+end # end TLD

data/test/test_tld.rb

@@ -0,0 +1,54 @@
+require 'test/unit'
+require 'tld'
+
+class TestTld < Test::Unit::TestCase
+  def test_find_tld_by_exact_match
+    assert_equal 'au', TLD.find('au').tld
+  end
+
+  def test_find_tld_by_exact_match_with_dot
+    assert_equal 'au', TLD.find('.au').tld
+  end
+
+  def test_find_tld_with_case
+    assert_equal 'au', TLD.find('AU').tld
+  end
+
+  def test_find_tld_by_hostname
+    assert_equal 'au', TLD.find('foo.bar.au').tld
+  end
+
+  def test_find_tld_by_url
+    assert_equal 'au', TLD.find('http://foo.bar.au/baz').tld
+  end
+
+  def test_get_tld_currency
+    assert_equal 'AUD', TLD.find('au').currency
+  end
+
+  def test_get_mapped_tld_currency
+    assert_equal 'EUR', TLD.find('eu').currency
+    assert_equal 'GBP', TLD.find('uk').currency
+  end
+
+  def test_get_tld_name
+    assert_equal 'Australia', TLD.find('au').name
+    assert_equal 'Business', TLD.find('biz').name
+  end
+
+  def test_get_iso_alpha3_code
+    assert_equal 'AUS', TLD.find('au').alpha3
+    assert_equal 'GBR', TLD.find('uk').alpha3
+  end
+
+  def test_com_should_map_to_empty_currency_not_comoros
+    assert_equal [], TLD.find('com').currencies
+    assert_nil TLD.find('com').currency
+  end
+
+  def test_unknown_tld
+    assert_raises TLD::UnknownTldError do
+      TLD.find('foo')
+    end
+  end
+end

data/tld.gemspec

@@ -0,0 +1,37 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{tld}
+  s.version = "0.2.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Alex Rabarts"]
+  s.date = %q{2008-11-28}
+  s.description = %q{Provides meta information for Internet Top Level Domains (TLDs) such as a descriptive name, associated currency code and the TLD category.}
+  s.email = ["alexrabarts@gmail.com"]
+  s.extra_rdoc_files = ["History.txt", "Manifest.txt", "README.txt"]
+  s.files = ["History.txt", "Manifest.txt", "README.txt", "Rakefile", "lib/tld.rb", "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", "rakelib/cultivate.rake", "rakelib/tld.rake", "rakelib/tld.rb", "rakelib/tld.rb.erb", "test/test_tld.rb", "tld.gemspec"]
+  s.has_rdoc = true
+  s.rdoc_options = ["--main", "README.txt"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{tld}
+  s.rubygems_version = %q{1.3.1}
+  s.summary = %q{Provides meta information for Internet Top Level Domains (TLDs) such as a descriptive name, associated currency code and the TLD category.}
+  s.test_files = ["test/test_tld.rb"]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 2
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<alexrabarts-iso_country_codes>, [">= 0"])
+      s.add_development_dependency(%q<hoe>, [">= 1.8.2"])
+    else
+      s.add_dependency(%q<alexrabarts-iso_country_codes>, [">= 0"])
+      s.add_dependency(%q<hoe>, [">= 1.8.2"])
+    end
+  else
+    s.add_dependency(%q<alexrabarts-iso_country_codes>, [">= 0"])
+    s.add_dependency(%q<hoe>, [">= 1.8.2"])
+  end
+end

metadata

@@ -0,0 +1,95 @@
+--- !ruby/object:Gem::Specification 
+name: alexrabarts-tld
+version: !ruby/object:Gem::Version 
+  version: 0.2.0
+platform: ruby
+authors: 
+- Alex Rabarts
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-11-28 00:00:00 -08:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: alexrabarts-iso_country_codes
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.8.2
+    version: 
+description: Provides meta information for Internet Top Level Domains (TLDs) such as a descriptive name, associated currency code and the TLD category.
+email: 
+- alexrabarts@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+- README.txt
+files: 
+- History.txt
+- Manifest.txt
+- README.txt
+- Rakefile
+- lib/tld.rb
+- 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
+- rakelib/cultivate.rake
+- rakelib/tld.rake
+- rakelib/tld.rb
+- rakelib/tld.rb.erb
+- test/test_tld.rb
+- tld.gemspec
+has_rdoc: true
+homepage: 
+post_install_message: 
+rdoc_options: 
+- --main
+- README.txt
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: tld
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: Provides meta information for Internet Top Level Domains (TLDs) such as a descriptive name, associated currency code and the TLD category.
+test_files: 
+- test/test_tld.rb