theoooo-i18n 0.2.0 → 0.2.1

data/test/fixtures/locales/de.po

@@ -0,0 +1,61 @@
+# SOME DESCRIPTIVE TITLE.
+# Copyright (C) YEAR THE PACKAGE'S COPYRIGHT HOLDER
+# This file is distributed under the same license as the PACKAGE package.
+# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: version 0.0.1\n"
+"POT-Creation-Date: 2009-02-26 19:50+0100\n"
+"PO-Revision-Date: 2009-02-18 14:53+0100\n"
+"Last-Translator: FULL NAME <EMAIL@ADDRESS>\n"
+"Language-Team: LANGUAGE <LL@li.org>\n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+"Plural-Forms: nplurals=INTEGER; plural=EXPRESSION;\n"
+
+# #: app/helpers/translation_helper.rb:3
+# msgid "%{relative_time} ago"
+# msgstr "vor %{relative_time}"
+
+#: app/views/cars/show.html.erb:5
+msgid "Axis"
+msgid_plural "Axis"
+msgstr[0] "Achse"
+msgstr[1] "Achsen"
+
+#: app/controllers/cars_controller.rb:47
+msgid "Car was successfully created."
+msgstr "Auto wurde erfolgreich gespeichert"
+
+#: app/controllers/cars_controller.rb:64
+msgid "Car was successfully updated."
+msgstr "Auto wurde erfolgreich aktualisiert"
+
+#: app/views/cars/show.html.erb:1 locale/model_attributes.rb:3
+msgid "Car|Model"
+msgstr "Modell"
+
+#: app/views/cars/show.html.erb:3 locale/model_attributes.rb:4
+msgid "Car|Wheels count"
+msgstr "Räderzahl"
+
+#: app/views/cars/show.html.erb:7
+msgid "Created"
+msgstr "Erstellt"
+
+#: app/views/cars/show.html.erb:9
+msgid "Month"
+msgstr "Monat"
+
+#: locale/model_attributes.rb:2
+msgid "car"
+msgstr "Auto"
+
+#: locale/testlog_phrases.rb:2
+msgid "this is a dynamic translation which was found thorugh gettext_test_log!"
+msgstr ""
+"Dies ist eine dynamische Übersetzung, die durch gettext_test_log "
+"gefunden wurde!"

data/test/fixtures/locales/plurals.rb

@@ -0,0 +1,110 @@
+{
+  :af  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :am  => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :ar  => { :i18n => { :pluralize => lambda { |n| n == 0 ? :zero : n == 1 ? :one : n == 2 ? :two : (3..10).include?(n % 100) ? :few : (11..99).include?(n % 100) ? :many : :other } } },
+  :az  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :be  => { :i18n => { :pluralize => lambda { |n| n % 10 == 1 && n % 100 != 11 ? :one : (2..4).include?(n % 10) && !(12..14).include?(n % 100) ? :few : n % 10 == 0 || (5..9).include?(n % 10) || (11..14).include?(n % 100) ? :many : :other } } },
+  :bg  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :bh  => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :bn  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :bo  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :bs  => { :i18n => { :pluralize => lambda { |n| n % 10 == 1 && n % 100 != 11 ? :one : (2..4).include?(n % 10) && !(12..14).include?(n % 100) ? :few : n % 10 == 0 || (5..9).include?(n % 10) || (11..14).include?(n % 100) ? :many : :other } } },
+  :ca  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :cs  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : (2..4).include?(n) ? :few : :other } } },
+  :cy  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 2 ? :two : n == 8 || n == 11 ? :many : :other } } },
+  :da  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :de  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :dz  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :el  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :en  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :eo  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :es  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :et  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :eu  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :fa  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :fi  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :fil => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :fo  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :fr  => { :i18n => { :pluralize => lambda { |n| n && n != 2 ? :one : :other } } },
+  :fur => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :fy  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :ga  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 2 ? :two : :other } } },
+  :gl  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :gu  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :guw => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :ha  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :he  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :hi  => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :hr  => { :i18n => { :pluralize => lambda { |n| n % 10 == 1 && n % 100 != 11 ? :one : (2..4).include?(n % 10) && !(12..14).include?(n % 100) ? :few : n % 10 == 0 || (5..9).include?(n % 10) || (11..14).include?(n % 100) ? :many : :other } } },
+  :hu  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :id  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :is  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :it  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :iw  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :ja  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :jv  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :ka  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :km  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :kn  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :ko  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :ku  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :lb  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :ln  => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :lt  => { :i18n => { :pluralize => lambda { |n| n % 10 == 1 && !(11..19).include?(n % 100) ? :one : (2..9).include?(n % 10) && !(11..19).include?(n % 100) ? :few : :other } } },
+  :lv  => { :i18n => { :pluralize => lambda { |n| n == 0 ? :zero : n % 10 == 1 && n % 100 != 11 ? :one : :other } } },
+  :mg  => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :mk  => { :i18n => { :pluralize => lambda { |n| n % 10 == 1 ? :one : :other } } },
+  :ml  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :mn  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :mo  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 0 ? :few : :other } } },
+  :mr  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :ms  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :mt  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 0 || (2..10).include?(n % 100) ? :few : (11..19).include?(n % 100) ? :many : :other } } },
+  :my  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :nah => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :nb  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :ne  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :nl  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :nn  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :no  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :nso => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :om  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :or  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :pa  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :pap => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :pl  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : (2..4).include?(n % 10) && !(12..14).include?(n % 100) && !(22..24).include?(n % 100) ? :few : :other } } },
+  :ps  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :pt  => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :"pt-PT" => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :ro  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 0 ? :few : :other } } },
+  :ru  => { :i18n => { :pluralize => lambda { |n| n % 10 == 1 && n % 100 != 11 ? :one : (2..4).include?(n % 10) && !(12..14).include?(n % 100) ? :few : n % 10 == 0 || (5..9).include?(n % 10) || (11..14).include?(n % 100) ? :many : :other } } },
+  :se  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 2 ? :two : :other } } },
+  :sh  => { :i18n => { :pluralize => lambda { |n| n % 10 == 1 && n % 100 != 11 ? :one : (2..4).include?(n % 10) && !(12..14).include?(n % 100) ? :few : n % 10 == 0 || (5..9).include?(n % 10) || (11..14).include?(n % 100) ? :many : :other } } },
+  :sk  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : (2..4).include?(n) ? :few : :other } } },
+  :sl  => { :i18n => { :pluralize => lambda { |n| n % 100 == 1 ? :one : n % 100 == 2 ? :two : (3..4).include?(n % 100) ? :few : :other } } },
+  :sma => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 2 ? :two : :other } } },
+  :smi => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 2 ? :two : :other } } },
+  :smj => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 2 ? :two : :other } } },
+  :smn => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 2 ? :two : :other } } },
+  :sms => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : n == 2 ? :two : :other } } },
+  :so  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :sq  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :sr  => { :i18n => { :pluralize => lambda { |n| n % 10 == 1 && n % 100 != 11 ? :one : (2..4).include?(n % 10) && !(12..14).include?(n % 100) ? :few : n % 10 == 0 || (5..9).include?(n % 10) || (11..14).include?(n % 100) ? :many : :other } } },
+  :sv  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :sw  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :ta  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :te  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :th  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :ti  => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :tk  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :tl  => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :to  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :tr  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :uk  => { :i18n => { :pluralize => lambda { |n| n % 10 == 1 && n % 100 != 11 ? :one : (2..4).include?(n % 10) && !(12..14).include?(n % 100) ? :few : n % 10 == 0 || (5..9).include?(n % 10) || (11..14).include?(n % 100) ? :many : :other } } },
+  :ur  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } },
+  :vi  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :wa  => { :i18n => { :pluralize => lambda { |n| (0..1).include?(n) ? :one : :other } } },
+  :yo  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :zh  => { :i18n => { :pluralize => lambda { |n| :other } } },
+  :zu  => { :i18n => { :pluralize => lambda { |n| n == 1 ? :one : :other } } }
+}

data/test/gettext/api_test.rb

@@ -0,0 +1,76 @@
+require File.expand_path(File.dirname(__FILE__) + '/../test_helper')
+require 'i18n/backend/gettext'
+require 'i18n/helpers/gettext'
+
+include I18n::Helpers::Gettext
+
+class I18nGettextApiTest < Test::Unit::TestCase
+  def setup
+    I18n.locale = :en
+    I18n.backend.store_translations :de, {
+      'Hi Gettext!' => 'Hallo Gettext!',
+      'Sentence 1. Sentence 2.' => 'Satz 1. Satz 2.',
+      "An apple#{I18n::Gettext::PLURAL_SEPARATOR}{{count}} apples" => { :one => 'Ein Apfel', :other => '{{count}} Äpfel' },
+      :special => { 'An apple' => { :one => 'Ein spezieller Apfel', :other => '{{count}} spezielle Äpfel' } },
+      :foo => { :bar => { :baz => 'baz-de' } }
+    }
+  end
+
+  def test_helper_uses_msg_as_default
+    assert_equal 'Hi Gettext!', _('Hi Gettext!')
+  end
+
+  def test_helper_uses_msg_as_key
+    I18n.locale = :de
+    assert_equal 'Hallo Gettext!', _('Hi Gettext!')
+  end
+
+  def test_helper_uses_msg_containing_dots_as_default
+    assert_equal 'Sentence 1. Sentence 2.', _('Sentence 1. Sentence 2.')
+  end
+
+  def test_helper_uses_msg_containing_dots_as_key
+    I18n.locale = :de
+    assert_equal 'Satz 1. Satz 2.', _('Sentence 1. Sentence 2.')
+  end
+
+  def test_sgettext_defaults_to_the_last_token_of_a_scoped_msgid
+    assert_equal 'baz', sgettext('foo|bar|baz')
+  end
+
+  def test_sgettext_looks_up_a_scoped_translation
+    I18n.locale = :de
+    assert_equal 'baz-de', sgettext('foo|bar|baz')
+  end
+
+  def test_pgettext_defaults_to_msgid
+    assert_equal 'baz', pgettext('foo|bar', 'baz', '|')
+  end
+
+  def test_pgettext_looks_up_a_scoped_translation
+    I18n.locale = :de
+    assert_equal 'baz-de', pgettext('foo|bar', 'baz', '|')
+  end
+
+  def test_ngettext_looks_up_msg_id_as_default_singular
+    assert_equal 'An apple', ngettext('An apple', '{{count}} apples', 1)
+  end
+
+  def test_ngettext_looks_up_msg_id_plural_as_default_plural
+    assert_equal '2 apples', ngettext('An apple', '{{count}} apples', 2)
+  end
+
+  def test_ngettext_looks_up_msg_id_as_singular
+    I18n.locale = :de
+    assert_equal 'Ein Apfel', ngettext('An apple', '{{count}} apples', 1)
+  end
+
+  def test_ngettext_looks_up_msg_id_as_singular
+    I18n.locale = :de
+    assert_equal '2 Äpfel', ngettext('An apple', '{{count}} apples', 2)
+  end
+
+  def test_nsgettext_looks_up_msg_id_as_default_singular
+    assert_equal 'A special apple', nsgettext('special|A special apple', '{{count}} special apples', 1, '|')
+  end
+end

data/test/gettext/backend_test.rb

@@ -0,0 +1,33 @@
+require File.expand_path(File.dirname(__FILE__) + '/../test_helper')
+require 'i18n/backend/gettext'
+require 'i18n/helpers/gettext'
+
+include I18n::Helpers::Gettext
+
+class I18nGettextBackendTest < Test::Unit::TestCase
+  def setup
+    I18n.locale = :en
+    I18n.load_path = [locales_dir + '/de.po']
+    I18n.backend.meta_class.send(:include, I18n::Backend::Gettext)
+  end
+  
+  def teardown
+    I18n.load_path = nil
+    I18n.backend = nil
+  end
+
+  def test_backend_loads_po_file
+    I18n.backend.send(:init_translations)
+    assert I18n.backend.send(:translations)[:de][:"Axis\001Axis"]
+  end
+  
+  def test_looks_up_translation
+    I18n.locale = :de
+    assert_equal 'Auto', _('car')
+  end
+  
+  def test_pluralizes_entry
+    I18n.locale = :de
+    assert_equal 'Achsen', ngettext('Axis', 'Axis', 2)
+  end
+end

data/test/locale/fallbacks_test.rb

@@ -0,0 +1,126 @@
+require File.dirname(__FILE__) + '/../test_helper.rb'
+require 'i18n/locale/fallbacks'
+require 'i18n/locale/tag'
+
+include I18n::Locale
+
+class I18nFallbacksDefaultsTest < Test::Unit::TestCase
+  def teardown
+    I18n.default_locale = :en
+  end
+
+  test "defaults reflect the I18n.default_locale if no default has been set manually" do
+    I18n.default_locale = :'en-US'
+    I18n.fallbacks = Fallbacks.new
+    assert_equal [:'en-US', :en], I18n.fallbacks.defaults
+  end
+
+  test "defaults reflect a manually passed default locale if any" do
+    I18n.fallbacks = Fallbacks.new(:'fi-FI')
+    assert_equal [:'fi-FI', :fi], I18n.fallbacks.defaults
+    I18n.default_locale = :'de-DE'
+    assert_equal [:'fi-FI', :fi], I18n.fallbacks.defaults
+  end
+
+  test "defaults allows to set multiple defaults" do
+    I18n.fallbacks = Fallbacks.new(:'fi-FI', :'se-FI')
+    assert_equal [:'fi-FI', :fi, :'se-FI', :se], I18n.fallbacks.defaults
+  end
+end
+
+class I18nFallbacksComputationTest < Test::Unit::TestCase
+  def setup
+    @fallbacks = Fallbacks.new(:'en-US')
+  end
+
+  test "with no mappings defined it returns [:es, :en-US] for :es" do
+    assert_equal [:es, :"en-US", :en], @fallbacks[:es]
+  end
+
+  test "with no mappings defined it returns [:es-ES, :es, :en-US] for :es-ES" do
+    assert_equal [:"es-ES", :es, :"en-US", :en], @fallbacks[:"es-ES"]
+  end
+
+  test "with no mappings defined it returns [:es-MX, :es, :en-US] for :es-MX" do
+    assert_equal [:"es-MX", :es, :"en-US", :en], @fallbacks[:"es-MX"]
+  end
+
+  test "with no mappings defined it returns [:es-Latn-ES, :es-Latn, :es, :en-US] for :es-Latn-ES" do
+    assert_equal [:"es-Latn-ES", :"es-Latn", :es, :"en-US", :en], @fallbacks[:'es-Latn-ES']
+  end
+
+  test "with no mappings defined it returns [:en, :en-US] for :en" do
+    assert_equal [:en, :"en-US"], @fallbacks[:en]
+  end
+
+  test "with no mappings defined it returns [:en-US, :en] for :en-US (special case: locale == default)" do
+    assert_equal [:"en-US", :en], @fallbacks[:"en-US"]
+  end
+
+  # Most people who speak Catalan also live in Spain, so it is safe to assume
+  # that they also speak Spanish as spoken in Spain.
+  test "with a Catalan mapping defined it returns [:ca, :es-ES, :es, :en-US] for :ca" do
+    @fallbacks.map(:ca => :"es-ES")
+    assert_equal [:ca, :"es-ES", :es, :"en-US", :en], @fallbacks[:ca]
+  end
+
+  test "with a Catalan mapping defined it returns [:ca-ES, :ca, :es-ES, :es, :en-US] for :ca-ES" do
+    @fallbacks.map(:ca => :"es-ES")
+    assert_equal [:"ca-ES", :ca, :"es-ES", :es, :"en-US", :en], @fallbacks[:"ca-ES"]
+  end
+
+  # People who speak Arabic as spoken in Palestine often times also speak
+  # Hebrew as spoken in Israel. However it is in no way safe to assume that
+  # everybody who speaks Arabic also speaks Hebrew.
+
+  test "with a Hebrew mapping defined it returns [:ar, :en-US] for :ar" do
+    @fallbacks.map(:"ar-PS" => :"he-IL")
+    assert_equal [:ar, :"en-US", :en], @fallbacks[:ar]
+  end
+
+  test "with a Hebrew mapping defined it returns [:ar-EG, :ar, :en-US] for :ar-EG" do
+    @fallbacks.map(:"ar-PS" => :"he-IL")
+    assert_equal [:"ar-EG", :ar, :"en-US", :en], @fallbacks[:"ar-EG"]
+  end
+
+  test "with a Hebrew mapping defined it returns [:ar-PS, :ar, :he-IL, :he, :en-US] for :ar-PS" do
+    @fallbacks.map(:"ar-PS" => :"he-IL")
+    assert_equal [:"ar-PS", :ar, :"he-IL", :he, :"en-US", :en], @fallbacks[:"ar-PS"]
+  end
+
+  # Sami people live in several scandinavian countries. In Finnland many people
+  # know Swedish and Finnish. Thus, it can be assumed that Sami living in
+  # Finnland also speak Swedish and Finnish.
+
+  test "with a Sami mapping defined it returns [:sms-FI, :sms, :se-FI, :se, :fi-FI, :fi, :en-US] for :sms-FI" do
+    @fallbacks.map(:sms => [:"se-FI", :"fi-FI"])
+    assert_equal [:"sms-FI", :sms, :"se-FI", :se, :"fi-FI", :fi, :"en-US", :en], @fallbacks[:"sms-FI"]
+  end
+  
+  # Austrian people understand German as spoken in Germany
+
+  test "with a German mapping defined it returns [:de, :en-US] for de" do
+    @fallbacks.map(:"de-AT" => :"de-DE")
+    assert_equal [:de, :"en-US", :en], @fallbacks[:"de"]
+  end
+
+  test "with a German mapping defined it returns [:de-DE, :de, :en-US] for de-DE" do
+    @fallbacks.map(:"de-AT" => :"de-DE")
+    assert_equal [:"de-DE", :de, :"en-US", :en], @fallbacks[:"de-DE"]
+  end
+
+  test "with a German mapping defined it returns [:de-AT, :de, :de-DE, :en-US] for de-AT" do
+    @fallbacks.map(:"de-AT" => :"de-DE")
+    assert_equal [:"de-AT", :de, :"de-DE", :"en-US", :en], @fallbacks[:"de-AT"]
+  end
+
+  # Mapping :de => :en, :he => :en
+
+  test "with a mapping :de => :en, :he => :en defined it returns [:de, :en] for :de" do
+    assert_equal [:de, :"en-US", :en], @fallbacks[:de]
+  end
+
+  test "with a mapping :de => :en, :he => :en defined it [:he, :en] for :de" do
+    assert_equal [:he, :"en-US", :en], @fallbacks[:he]
+  end
+end

data/test/locale/tag/rfc4646_test.rb

@@ -0,0 +1,145 @@
+require File.dirname(__FILE__) + '/../../test_helper.rb'
+require 'i18n/locale/tag'
+require 'i18n/locale/tag/rfc4646'
+
+# Rfc4646::Parser
+
+class I18nLocaleTagRfc4646ParserTest < Test::Unit::TestCase
+  include I18n::Locale
+  
+  test "Rfc4646::Parser given a valid tag 'de' returns an array of subtags" do
+    assert_equal ['de', nil, nil, nil, nil, nil, nil], Tag::Rfc4646::Parser.match('de')
+  end
+
+  test "Rfc4646::Parser given a valid tag 'de' returns an array of subtags" do
+    assert_equal ['de', nil, 'DE', nil, nil, nil, nil], Tag::Rfc4646::Parser.match('de-DE')
+  end
+
+  test "Rfc4646::Parser given a valid lowercase tag 'de-latn-de-variant-x-phonebk' returns an array of subtags" do
+    assert_equal ['de', 'latn', 'de', 'variant', nil, 'x-phonebk', nil], Tag::Rfc4646::Parser.match('de-latn-de-variant-x-phonebk')
+  end
+
+  test "Rfc4646::Parser given a valid uppercase tag 'DE-LATN-DE-VARIANT-X-PHONEBK' returns an array of subtags" do
+    assert_equal ['DE', 'LATN', 'DE', 'VARIANT', nil, 'X-PHONEBK', nil], Tag::Rfc4646::Parser.match('DE-LATN-DE-VARIANT-X-PHONEBK')
+  end
+
+  test "Rfc4646::Parser given an invalid tag 'a-DE' it returns false" do
+    assert_equal false, Tag::Rfc4646::Parser.match('a-DE')
+  end
+
+  test "Rfc4646::Parser given an invalid tag 'de-419-DE' it returns false" do
+    assert_equal false, Tag::Rfc4646::Parser.match('de-419-DE')
+  end
+end
+
+# Tag for the locale 'de-Latn-DE-Variant-a-ext-x-phonebk-i-klingon'
+
+class I18nLocaleTagSubtagsTest < Test::Unit::TestCase
+  include I18n::Locale
+  
+  def setup
+    subtags = %w(de Latn DE variant a-ext x-phonebk i-klingon)
+    @tag = Tag::Rfc4646.new *subtags
+  end
+
+  test "returns 'de' as the language subtag in lowercase" do
+    assert_equal 'de', @tag.language
+  end
+
+  test "returns 'Latn' as the script subtag in titlecase" do
+    assert_equal 'Latn', @tag.script
+  end
+
+  test "returns 'DE' as the region subtag in uppercase" do
+    assert_equal 'DE', @tag.region
+  end
+
+  test "returns 'variant' as the variant subtag in lowercase" do
+    assert_equal 'variant', @tag.variant
+  end
+
+  test "returns 'a-ext' as the extension subtag" do
+    assert_equal 'a-ext', @tag.extension
+  end
+
+  test "returns 'x-phonebk' as the privateuse subtag" do
+    assert_equal 'x-phonebk', @tag.privateuse
+  end
+
+  test "returns 'i-klingon' as the grandfathered subtag" do
+    assert_equal 'i-klingon', @tag.grandfathered
+  end
+
+  test "returns a formatted tag string from #to_s" do
+    assert_equal 'de-Latn-DE-variant-a-ext-x-phonebk-i-klingon', @tag.to_s
+  end
+
+  test "returns an array containing the formatted subtags from #to_a" do
+    assert_equal %w(de Latn DE variant a-ext x-phonebk i-klingon), @tag.to_a
+  end
+end
+
+# Tag inheritance
+
+class I18nLocaleTagSubtagsTest < Test::Unit::TestCase
+  test "#parent returns 'de-Latn-DE-variant-a-ext-x-phonebk' as the parent of 'de-Latn-DE-variant-a-ext-x-phonebk-i-klingon'" do
+    tag = Tag::Rfc4646.new *%w(de Latn DE variant a-ext x-phonebk i-klingon)
+    assert_equal 'de-Latn-DE-variant-a-ext-x-phonebk', tag.parent.to_s
+  end
+
+  test "#parent returns 'de-Latn-DE-variant-a-ext' as the parent of 'de-Latn-DE-variant-a-ext-x-phonebk'" do
+    tag = Tag::Rfc4646.new *%w(de Latn DE variant a-ext x-phonebk)
+    assert_equal 'de-Latn-DE-variant-a-ext', tag.parent.to_s
+  end
+
+  test "#parent returns 'de-Latn-DE-variant' as the parent of 'de-Latn-DE-variant-a-ext'" do
+    tag = Tag::Rfc4646.new *%w(de Latn DE variant a-ext)
+    assert_equal 'de-Latn-DE-variant', tag.parent.to_s
+  end
+
+  test "#parent returns 'de-Latn-DE' as the parent of 'de-Latn-DE-variant'" do
+    tag = Tag::Rfc4646.new *%w(de Latn DE variant)
+    assert_equal 'de-Latn-DE', tag.parent.to_s
+  end
+
+  test "#parent returns 'de-Latn' as the parent of 'de-Latn-DE'" do
+    tag = Tag::Rfc4646.new *%w(de Latn DE)
+    assert_equal 'de-Latn', tag.parent.to_s
+  end
+
+  test "#parent returns 'de' as the parent of 'de-Latn'" do
+    tag = Tag::Rfc4646.new *%w(de Latn)
+    assert_equal 'de', tag.parent.to_s
+  end
+
+  # TODO RFC4647 says: "If no language tag matches the request, the "default" value is returned."
+  # where should we set the default language?
+  # test "#parent returns '' as the parent of 'de'" do
+  #   tag = Tag::Rfc4646.new *%w(de)
+  #   assert_equal '', tag.parent.to_s
+  # end
+
+  test "#parent returns an array of 5 parents for 'de-Latn-DE-variant-a-ext-x-phonebk-i-klingon'" do
+    parents = %w(de-Latn-DE-variant-a-ext-x-phonebk-i-klingon
+                 de-Latn-DE-variant-a-ext-x-phonebk
+                 de-Latn-DE-variant-a-ext
+                 de-Latn-DE-variant
+                 de-Latn-DE
+                 de-Latn
+                 de)
+    tag = Tag::Rfc4646.new *%w(de Latn DE variant a-ext x-phonebk i-klingon)
+    assert_equal parents, tag.self_and_parents.map{|tag| tag.to_s}
+  end
+
+  test "returns an array of 5 parents for 'de-Latn-DE-variant-a-ext-x-phonebk-i-klingon'" do
+    parents = %w(de-Latn-DE-variant-a-ext-x-phonebk-i-klingon
+                 de-Latn-DE-variant-a-ext-x-phonebk
+                 de-Latn-DE-variant-a-ext
+                 de-Latn-DE-variant
+                 de-Latn-DE
+                 de-Latn
+                 de)
+    tag = Tag::Rfc4646.new *%w(de Latn DE variant a-ext x-phonebk i-klingon)
+    assert_equal parents, tag.self_and_parents.map{|tag| tag.to_s}
+  end
+end

data/test/locale/tag/simple_test.rb

@@ -0,0 +1,33 @@
+require File.dirname(__FILE__) + '/../../test_helper.rb'
+require 'i18n/locale/tag'
+require 'i18n/locale/tag/simple'
+
+class I18nLocaleTagSimpleTest < Test::Unit::TestCase
+  include I18n::Locale
+
+  test "returns 'de' as the language subtag in lowercase" do
+    assert_equal %w(de Latn DE), Tag::Simple.new('de-Latn-DE').subtags
+  end
+
+  test "returns a formatted tag string from #to_s" do
+    assert_equal 'de-Latn-DE', Tag::Simple.new('de-Latn-DE').to_s
+  end
+  
+  test "returns an array containing the formatted subtags from #to_a" do
+    assert_equal %w(de Latn DE), Tag::Simple.new('de-Latn-DE').to_a
+  end
+
+  # Tag inheritance
+
+  test "#parent returns 'de-Latn' as the parent of 'de-Latn-DE'" do
+    assert_equal 'de-Latn', Tag::Simple.new('de-Latn-DE').parent.to_s
+  end
+
+  test "#parent returns 'de' as the parent of 'de-Latn'" do
+    assert_equal 'de', Tag::Simple.new('de-Latn').parent.to_s
+  end
+
+  test "#self_and_parents returns an array of 3 tags for 'de-Latn-DE'" do
+    assert_equal %w(de-Latn-DE de-Latn de), Tag::Simple.new('de-Latn-DE').self_and_parents.map { |tag| tag.to_s}
+  end
+end