bike 0.2.1

data/t/test_i18n.rb

@@ -0,0 +1,325 @@
+# encoding: UTF-8
+
+# Author::    Akira FUNAI
+# Copyright:: Copyright (c) 2009 Akira FUNAI
+
+require "#{::File.dirname __FILE__}/t"
+
+class TC_Bike_I18n < Test::Unit::TestCase
+
+  include Bike::I18n
+
+  def setup
+    Bike::I18n.domain = 'index'
+    Bike::I18n.po_dir = './t/locale'
+  end
+
+  def teardown
+  end
+
+  def test_lang
+    Bike::I18n.lang = 'ja'
+    assert_instance_of(
+      Array,
+      Bike::I18n.lang,
+      'Bike::I18n.lang should return an array'
+    )
+    assert_equal(
+      ['ja'],
+      Bike::I18n.lang,
+      'Bike::I18n.lang should return the current acceptable language-ranges'
+    )
+  end
+
+  def test_lang_case
+    Bike::I18n.lang = 'JA-jp'
+    assert_equal(
+      ['ja-JP'],
+      Bike::I18n.lang,
+      'Bike::I18n.lang should be properly downcase/upcased'
+    )
+  end
+
+  def test_multiple_lang
+    Bike::I18n.lang = 'ja, de;q=0.5, en;q=0.8'
+    assert_equal(
+      ['ja', 'en', 'de'],
+      Bike::I18n.lang,
+      'Bike::I18n.lang should sort the language-ranges by their quality values'
+    )
+  end
+
+  def test_same_qvalues
+    Bike::I18n.lang = 'ja, de;q=0.5, en;q=0.5'
+    assert_equal(
+      ['ja', 'de', 'en'],
+      Bike::I18n.lang,
+      'Bike::I18n.lang should be sorted by their original order if the qvalues are same'
+    )
+    Bike::I18n.lang = 'ja, de, en'
+    assert_equal(
+      ['ja', 'de', 'en'],
+      Bike::I18n.lang,
+      'Bike::I18n.lang should be sorted by their original order if the qvalues are same'
+    )
+  end
+
+  def test_po_dir
+    Bike::I18n.po_dir = 'foo/bar'
+    assert_equal(
+      'foo/bar',
+      Bike::I18n.po_dir,
+      'Bike::I18n.po_dir should be return the path to po files'
+    )
+  end
+
+  def test_domain
+    Bike::I18n.domain = 'foo'
+    assert_equal(
+      'foo',
+      Bike::I18n.domain,
+      'Bike::I18n.domain should be return the current domain'
+    )
+  end
+
+  def test_bindtextdomain
+    Bike::I18n.bindtextdomain('foo', 'bar/baz')
+    assert_equal(
+      'foo',
+      Bike::I18n.domain,
+      'Bike::I18n.bindtextdomain should set the current domain'
+    )
+    assert_equal(
+      'bar/baz',
+      Bike::I18n.po_dir,
+      'Bike::I18n.bindtextdomain should set the path to po files'
+    )
+  end
+
+  def test_msg
+    Bike::I18n.lang = 'ja'
+    assert_instance_of(
+      ::Hash,
+      Bike::I18n.msg,
+      'Bike::I18n.msg should return a hash'
+    )
+    assert_equal(
+      {'color' => '色', 'one color' =>['%{n}色']},
+      Bike::I18n.msg.reject {|k, v| k == :plural },
+      'Bike::I18n.msg should return a hash containing {msgid => msgstr}'
+    )
+    assert_instance_of(
+      ::Proc,
+      Bike::I18n.msg[:plural],
+      'Bike::I18n.msg[:plural] should return a proc'
+    )
+
+    Bike::I18n.lang = 'po'
+    assert_equal(
+      {},
+      Bike::I18n.msg,
+      'Bike::I18n.msg should be reset when the lang is updated'
+    )
+  end
+
+  def test_merge_msg!
+    Bike::I18n.lang = 'no'
+    assert_equal({}, Bike::I18n.msg)
+
+    Bike::I18n.merge_msg!('color' => 'farge')
+    assert_equal(
+      {'color' => 'farge'},
+      Bike::I18n.msg,
+      'Bike::I18n.merge_msg! should dynamically merge a hash to the msg of the current thread'
+    )
+
+    Bike::I18n.merge_msg!(:plural => Proc.new { 123 })
+    assert_equal(
+      {'color' => 'farge'},
+      Bike::I18n.msg,
+      'Bike::I18n.merge_msg! should not merge :plural'
+    )
+
+    Bike::I18n.lang = 'no'
+    assert_equal(
+      {},
+      Bike::I18n.msg,
+      'Bike::I18n.merge_msg! should not affect anything other than the current thread'
+    )
+  end
+
+  def test_rex_plural_expression_ok
+    src = <<'_eos'.split "\n"
+"Plural-Forms: nplurals=1; plural=0;"
+"Plural-Forms: nplurals=2; plural=n != 1;"
+"Plural-Forms: nplurals=2; plural=n>1;"
+"Plural-Forms: nplurals=3; plural=n%10==1 && n%100!=11 ? 0 : n != 0 ? 1 : 2;"
+"Plural-Forms: nplurals=3; plural=n==1 ? 0 : n==2 ? 1 : 2;"
+"Plural-Forms: nplurals=3; Plural=n==1 ? 0 : (n==0 || (n%100 > 0 && n%100 < 20)) ? 1 : 2;"
+"Plural-Forms: nplurals=3; Plural=n%10==1 && n%100!=11 ? 0 : n%10>=2 && (n%100<10 || n%100>=20) ? 1 : 2;"
+"Plural-Forms: nplurals=3; Plural=n%10==1 && n%100!=11 ? 0 : n%10>=2 && n%10<=4 && (n%100<10 || n%100>=20) ? 1 : 2;"
+"Plural-Forms: nplurals=3; Plural=(n==1) ? 0 : (n>=2 && n<=4) ? 1 : 2;"
+"Plural-Forms: nplurals=3; Plural=n==1 ? 0 : n%10>=2 && n%10<=4 && (n%100<10 || n%100>=20) ? 1 : 2;"
+"Plural-Forms: nplurals=4; Plural=n%100==1 ? 0 : n%100==2 ? 1 : n%100==3 || n%100==4 ? 2 : 3;"
+_eos
+    src.each {|s|
+      assert_match(
+        Bike::I18n::REX::PLURAL_EXPRESSION,
+        s,
+        'Bike::I18n::REX::PLURAL_EXPRESSION should match'
+      )
+    }
+  end
+
+  def test_rex_plural_expression_ng
+    src = <<'_eos'.split "\n"
+"Plural-Forms: nplurals=1; plural=rm '.';"
+"Plural-Forms: nplurals=1; plural=Fileutils.rm_r('.');"
+"Plural-Forms: nplurals=1; plural=Fileutils.rm_r '.';"
+"Plural-Forms: nplurals=1; plural=Fileutils.rm_r ".";"
+"Plural-Forms: nplurals=2; plural=n;"
+"Plural-Forms: nplurals=2; plural=nn;"
+"Plural-Forms: nplurals=3; plural=n();"
+"Plural-Forms: nplurals=3; plural=n(123);"
+"Plural-Forms: nplurals=3; plural=n 123;"
+_eos
+    src.each {|s|
+      assert_no_match(
+        Bike::I18n::REX::PLURAL_EXPRESSION,
+        s,
+        'Bike::I18n::REX::PLURAL_EXPRESSION should not match malicious expressions'
+      )
+    }
+  end
+
+  def test__
+    Bike::I18n.lang = 'ja'
+    assert_equal(
+      '色',
+      _('color'),
+      'Bike::I18n#_() should return a string according to the msgid'
+    )
+
+    Bike::I18n.lang = 'en-GB'
+    assert_equal(
+      'colour',
+      _('color'),
+      'Bike::I18n#_() should return a string according to the msgid'
+    )
+
+    Bike::I18n.lang = 'no'
+    assert_equal(
+      'color',
+      _('color'),
+      'Bike::I18n#_() should return a msgid if the msgid is not existed in the msg'
+    )
+  end
+
+  def test_n_
+    Bike::I18n.lang = 'ja'
+    assert_equal(
+      '%{n}色',
+      n_('one color', '%{n} colors', 1),
+      'Bike::I18n#n_() should return a string according to the msgid and the n'
+    )
+    assert_equal(
+      '%{n}色',
+      n_('one color', '%{n} colors', 2),
+      'Bike::I18n#n_() should return a string according to the msgid and the n'
+    )
+
+    Bike::I18n.lang = 'en-GB'
+    assert_equal(
+      'one colour',
+      n_('one color', '%{n} colors', 1),
+      'Bike::I18n#n_() should return a string according to the msgid and the n'
+    )
+    assert_equal(
+      '%{n} colours',
+      n_('one color', '%{n} colors', 2),
+      'Bike::I18n#n_() should return a string according to the msgid and the n'
+    )
+
+    Bike::I18n.lang = 'no'
+    assert_equal(
+      'one color',
+      n_('one color', '%{n} colors', 1),
+      'Bike::I18n#_() should return a msgid if the msgid is not existed in the msg'
+    )
+    assert_equal(
+      '%{n} colors',
+      n_('one color', '%{n} colors', 2),
+      'Bike::I18n#_() should return a msgid if the msgid is not existed in the msg'
+    )
+  end
+
+  def test__with_n_
+    Bike::I18n.lang = 'en-GB'
+    assert_equal(
+      'one colour',
+      _('one color'),
+      'Bike::I18n#_() should return msgstr[0] if the msgid refer to plural msgstrs'
+    )
+  end
+
+  def test_n_with__
+    Bike::I18n.lang = 'en-GB'
+    assert_equal(
+      'color',
+      n_('color', '%{n} colors', 1),
+      'Bike::I18n#n_() should return msgid if the msgid refer to sigular msgstr'
+    )
+  end
+
+  def test_msgstr
+    Bike::I18n.lang = 'en-GB'
+
+    assert_instance_of(
+      Bike::I18n::Msgstr,
+      _('color'),
+      'Bike::I18n#_() should return a instance of Bike::I18n::Msgstr'
+    )
+
+    s = n_('one color', '%{n} colors', 2)
+    assert_instance_of(
+      Bike::I18n::Msgstr,
+      s,
+      'Bike::I18n#n_() should return a instance of Bike::I18n::Msgstr'
+    )
+    assert_equal(
+      '2 colours',
+      s % {:n => 2},
+      'Bike::I18n::Msgstr#% should be able to proccess named variables'
+    )
+    assert_equal(
+      '2 colours',
+      s % [2],
+      "Bike::I18n::Msgstr#% should regard %{...} as '%s' if given an array"
+    )
+    assert_equal(
+      '2 colours',
+      s % 2,
+      "Bike::I18n::Msgstr#% should regard %{...} as '%s' if given a scalar"
+    )
+
+    s = n_('one foo', '%{n} foo %{bar}', 2)
+    assert_equal(
+      '2 foo selected',
+      s % [2, 'selected'],
+      "Bike::I18n::Msgstr#% should regard %{...} as '%s' if given an array"
+    )
+
+    s = n_('one color', '%{n} colors', 1)
+    assert_instance_of(
+      Bike::I18n::Msgstr,
+      s,
+      'Bike::I18n#n_() should return a instance of Bike::I18n::Msgstr'
+    )
+    assert_equal(
+      'one colour',
+      s % {:n => 1},
+      'Bike::I18n::Msgstr#% should work with msgstrs without a placeholder'
+    )
+  end
+
+end

data/t/test_id.rb

@@ -0,0 +1,215 @@
+# encoding: UTF-8
+
+# Author::    Akira FUNAI
+# Copyright:: Copyright (c) 2009-2010 Akira FUNAI
+
+require "#{::File.dirname __FILE__}/t"
+
+class TC_Id < Test::Unit::TestCase
+
+  def setup
+    meta = nil
+    Bike::Parser.gsub_scalar('$(foo meta-id 3 1..5)') {|id, m|
+      meta = m
+      ''
+    }
+    @f = Bike::Field.instance meta
+
+    Bike.current[:base] = nil
+  end
+
+  def teardown
+  end
+
+  def test_meta
+    assert_equal(
+      3,
+      @f[:size],
+      'Meta::Id#initialize should set :size from the token'
+    )
+    assert_equal(
+      1,
+      @f[:min],
+      'Meta::Id#initialize should set :min from the range token'
+    )
+    assert_equal(
+      5,
+      @f[:max],
+      'Meta::Id#initialize should set :max from the range token'
+    )
+  end
+
+  def test_val_cast
+    assert_equal(
+      '',
+      @f.val,
+      'Meta::Id#val_cast should cast the given val to String'
+    )
+
+    @f.load 123
+    assert_equal(
+      '123',
+      @f.val,
+      'Meta::Id#val_cast should cast the given val to String'
+    )
+  end
+
+  def test_new_id?
+    @f[:parent] = Bike::Set::Static.new(:id => '20100526_0001')
+    assert_equal(
+      false,
+      @f.send(:new_id?),
+      'Meta::Id#new_id? should return whether the ancestors is new or not'
+    )
+
+    @f[:parent] = Bike::Set::Static.new(:id => '_001')
+    assert_equal(
+      true,
+      @f.send(:new_id?),
+      'Meta::Id#new_id? should return whether the ancestors is new or not'
+    )
+  end
+
+  def test_get
+    @f[:parent] = Bike::Set::Static.new(:id => '_001')
+    assert_equal(
+      '<span class="meta-id"><input type="text" name="" value="" size="3" /></span>',
+      @f.get(:action => :create),
+      'Meta::Id#_g_create should return <input> if the ancestor is new'
+    )
+
+    @f[:parent] = Bike::Set::Static.new(:id => '20100526_0001')
+    assert_equal(
+      '',
+      @f.get(:action => :create),
+      'Meta::Id#_g_create should return val if the ancestor is not new'
+    )
+
+    @f.load 'bar'
+    assert_equal(
+      'bar',
+      @f.get,
+      'Meta::Id#get should return proper string'
+    )
+
+    @f[:parent] = Bike::Set::Static.new(:id => '_001')
+    assert_equal(
+      '<span class="meta-id"><input type="text" name="" value="bar" size="3" /></span>',
+      @f.get(:action => :update),
+      'Meta::Id#_g_update should return <input> if the ancestor is new'
+    )
+
+    @f[:parent] = Bike::Set::Static.new(:id => '20100526_0001')
+    assert_equal(
+      'bar',
+      @f.get(:action => :update),
+      'Meta::Id#_g_update should return val if the ancestor is not new'
+    )
+
+    @f.load '<bar>'
+    assert_equal(
+      '&lt;bar&gt;',
+      @f.get,
+      'Meta::Id#get should escape the special characters'
+    )
+
+    @f[:parent] = Bike::Set::Static.new(:id => '_001')
+    @f.load '<bar>'
+    assert_equal(
+      '<span class="meta-id error"><input type="text" name="" value="&lt;bar&gt;" size="3" /><span class="error_message">malformatted id</span>' + "\n</span>",
+      @f.get(:action => :update),
+      'Meta::Id#get should escape the special characters'
+    )
+  end
+
+  def test_post_new_ancestor
+    @f[:parent] = Bike::Set::Static.new(:id => '_001')
+    @f.create 'frank'
+    assert_equal(
+      'frank',
+      @f.val,
+      'Meta::Id#post should create like a normal field'
+    )
+
+    @f.update 'bobby'
+    assert_equal(
+      'bobby',
+      @f.val,
+      'Meta::Id#post should update the current val if the ancestor is new'
+    )
+  end
+
+  def test_post_old_ancestor
+    @f[:parent] = Bike::Set::Static.new(:id => '20100526_0001')
+    @f.load 'frank'
+
+    @f.update 'bobby'
+    assert_equal(
+      'frank',
+      @f.val,
+      'Meta::Id#post should not update the current val if the ancestor is not new'
+    )
+  end
+
+  def test_errors
+    @f.load '<a'
+    assert_equal(
+      ['malformatted id'],
+      @f.errors,
+      'Meta::Id#errors should return the errors of the current val'
+    )
+
+    @f.load '123a'
+    assert_equal(
+      ['malformatted id'],
+      @f.errors,
+      'Meta::Id#errors should return the errors of the current val'
+    )
+
+    @f.load 'abcdefghijk'
+    assert_equal(
+      ['too long: 5 characters maximum'],
+      @f.errors,
+      'Meta::Id#errors should return the errors of the current val'
+    )
+
+    @f.load 'frank'
+    assert_equal(
+      [],
+      @f.errors,
+      'Meta::Id#errors should return an empty array if there is no error'
+    )
+  end
+
+  def test_errors_duplicate_id
+    Bike.client = 'root'
+    sd = Bike::Set::Static::Folder.root.item('_users', 'main')
+
+    sd.update(
+      '_001' => {:action => :create, '_id' => 'test'}
+    )
+    assert_equal(
+      ['duplicate id: test'],
+      sd.item('_001', '_id').errors,
+      'Meta::Id#errors should return an error if the current val is duplicated in the sd'
+    )
+
+    sd.update(
+      '_001' => {:action => :create, '_id' => 'frank'}
+    )
+    assert_equal(
+      [],
+      sd.item('_001', '_id').errors,
+      'Meta::Id#errors should return no error if the current val is unique in the sd'
+    )
+
+    f = Bike::Set::Static::Folder.root.item('_users', 'main', 'test', '_id')
+    f.update 'test'
+    assert_equal(
+      [],
+      f.errors,
+      'Meta::Id#errors should return no error if the current val is unchanged'
+    )
+  end
+
+end