RubyGems - bike - Versions diffs - 0.2.1 - Mend

bike 0.2.1

Files changed (151) hide show

data/LICENSE +19 -0
data/README.rdoc +124 -0
data/bin/bike +35 -0
data/lib/_error.rb +14 -0
data/lib/_field.rb +260 -0
data/lib/_i18n.rb +144 -0
data/lib/_parser.rb +256 -0
data/lib/_path.rb +86 -0
data/lib/_storage/_storage.rb +215 -0
data/lib/_storage/file.rb +201 -0
data/lib/_storage/sequel.rb +174 -0
data/lib/_storage/temp.rb +73 -0
data/lib/_widget/action_create.rb +23 -0
data/lib/_widget/action_login.rb +22 -0
data/lib/_widget/action_signup.rb +16 -0
data/lib/_widget/action_update.rb +16 -0
data/lib/_widget/crumb.rb +24 -0
data/lib/_widget/done.rb +16 -0
data/lib/_widget/login.rb +25 -0
data/lib/_widget/me.rb +31 -0
data/lib/_widget/message.rb +51 -0
data/lib/_widget/navi.rb +88 -0
data/lib/_widget/submit.rb +49 -0
data/lib/_widget/view_ym.rb +77 -0
data/lib/_workflow/_workflow.rb +89 -0
data/lib/_workflow/attachment.rb +50 -0
data/lib/_workflow/blog.rb +28 -0
data/lib/_workflow/contact.rb +23 -0
data/lib/_workflow/forum.rb +26 -0
data/lib/_workflow/register.rb +39 -0
data/lib/bike.rb +396 -0
data/lib/meta/_meta.rb +20 -0
data/lib/meta/group.rb +19 -0
data/lib/meta/id.rb +59 -0
data/lib/meta/owner.rb +21 -0
data/lib/meta/timestamp.rb +118 -0
data/lib/scalar/checkbox.rb +68 -0
data/lib/scalar/file.rb +144 -0
data/lib/scalar/img.rb +112 -0
data/lib/scalar/password.rb +58 -0
data/lib/scalar/radio.rb +47 -0
data/lib/scalar/select.rb +47 -0
data/lib/scalar/text.rb +38 -0
data/lib/scalar/textarea.rb +35 -0
data/lib/scalar/textarea_pre.rb +14 -0
data/lib/scalar/textarea_wiki.rb +173 -0
data/lib/set/_set.rb +196 -0
data/lib/set/dynamic.rb +177 -0
data/lib/set/static.rb +102 -0
data/lib/set/static_folder.rb +96 -0
data/locale/en/index.po +242 -0
data/locale/index.pot +243 -0
data/locale/ja/index.po +242 -0
data/locale/lazy_parser.rb +54 -0
data/skel/config.ru +27 -0
data/skel/skin/_users/00000000_frank-avatar.jpg +0 -0
data/skel/skin/_users/00000000_frank-avatar_small.jpg +0 -0
data/skel/skin/_users/00000000_frank.yaml +12 -0
data/skel/skin/_users/00000000_root-avatar.jpg +0 -0
data/skel/skin/_users/00000000_root-avatar_small.jpg +0 -0
data/skel/skin/_users/00000000_root.yaml +11 -0
data/skel/skin/_users/css/users.css +21 -0
data/skel/skin/_users/css/users.less +25 -0
data/skel/skin/_users/done.html +42 -0
data/skel/skin/_users/index.html +46 -0
data/skel/skin/_users/index.yaml +3 -0
data/skel/skin/_users/summary.html +40 -0
data/skel/skin/css/base.css +93 -0
data/skel/skin/css/base.less +139 -0
data/skel/skin/css/coax.css +199 -0
data/skel/skin/css/coax.less +244 -0
data/skel/skin/examples/blog/20091214_0001.yaml +8 -0
data/skel/skin/examples/blog/20100630_0001.yaml +8 -0
data/skel/skin/examples/blog/20100630_0002.yaml +14 -0
data/skel/skin/examples/blog/20100701_0001.yaml +8 -0
data/skel/skin/examples/blog/20100701_0002-a-20100701_0001-f.jpg +0 -0
data/skel/skin/examples/blog/20100701_0002-a-20100701_0001-f_small.jpg +0 -0
data/skel/skin/examples/blog/20100701_0002.yaml +19 -0
data/skel/skin/examples/blog/frank/20100701_0001.yaml +10 -0
data/skel/skin/examples/blog/frank/index.yaml +4 -0
data/skel/skin/examples/blog/index.html +51 -0
data/skel/skin/examples/blog/rss.xml +18 -0
data/skel/skin/examples/contact/20100701_0001-file.txt +1 -0
data/skel/skin/examples/contact/20100701_0001.yaml +15 -0
data/skel/skin/examples/contact/20100701_0002.yaml +8 -0
data/skel/skin/examples/contact/20100701_0003.yaml +9 -0
data/skel/skin/examples/contact/index.html +47 -0
data/skel/skin/examples/contact/js/contact.js +13 -0
data/skel/skin/examples/contact/summary.html +54 -0
data/skel/skin/examples/forum/20100701_0001.yaml +41 -0
data/skel/skin/examples/forum/20100701_0002.yaml +25 -0
data/skel/skin/examples/forum/index.html +68 -0
data/skel/skin/examples/forum/summary.html +47 -0
data/skel/skin/examples/index.html +73 -0
data/skel/skin/index.html +39 -0
data/skel/skin/js/base.js +50 -0
data/t/locale/de/index.po +19 -0
data/t/locale/en-GB/index.po +25 -0
data/t/locale/ja/index.po +30 -0
data/t/skin/_users/00000000_test.yaml +3 -0
data/t/skin/_users/index.html +13 -0
data/t/skin/foo/20091120_0001.yaml +7 -0
data/t/skin/foo/bar/20091120_0001.yaml +5 -0
data/t/skin/foo/bar/index.yaml +5 -0
data/t/skin/foo/baz/css/baz.css +1 -0
data/t/skin/foo/css/foo.css +1 -0
data/t/skin/foo/index.html +14 -0
data/t/skin/foo/index.yaml +7 -0
data/t/skin/foo/not_css/foo.css +1 -0
data/t/skin/foo/qux/index.html +8 -0
data/t/skin/foo/qux/moo/index.html +6 -0
data/t/skin/foo/sub-20100306_0001.yaml +3 -0
data/t/skin/index.yaml +3 -0
data/t/skin/t_attachment/index.html +13 -0
data/t/skin/t_contact/done.html +6 -0
data/t/skin/t_contact/index.html +9 -0
data/t/skin/t_file/index.html +16 -0
data/t/skin/t_img/index.html +14 -0
data/t/skin/t_img/test.jpg +0 -0
data/t/skin/t_select/index.html +9 -0
data/t/skin/t_store/index.html +9 -0
data/t/skin/t_summary/20100326_0001.yaml +3 -0
data/t/skin/t_summary/create.html +9 -0
data/t/skin/t_summary/index.html +9 -0
data/t/skin/t_summary/summary.html +9 -0
data/t/t.rb +27 -0
data/t/test_bike.rb +768 -0
data/t/test_call.rb +1281 -0
data/t/test_checkbox.rb +273 -0
data/t/test_field.rb +330 -0
data/t/test_file.rb +900 -0
data/t/test_i18n.rb +325 -0
data/t/test_id.rb +215 -0
data/t/test_img.rb +328 -0
data/t/test_meta.rb +57 -0
data/t/test_parser.rb +1516 -0
data/t/test_password.rb +188 -0
data/t/test_radio.rb +226 -0
data/t/test_role.rb +249 -0
data/t/test_select.rb +182 -0
data/t/test_set_complex.rb +527 -0
data/t/test_set_dynamic.rb +1504 -0
data/t/test_set_folder.rb +515 -0
data/t/test_set_permit.rb +246 -0
data/t/test_set_static.rb +468 -0
data/t/test_storage.rb +915 -0
data/t/test_text.rb +125 -0
data/t/test_textarea.rb +138 -0
data/t/test_timestamp.rb +473 -0
data/t/test_workflow.rb +367 -0
metadata +347 -0

@@ -0,0 +1,30 @@
+# just a test.
+# Copyright (C) 2010 Akira FUNAI
+# This file is distributed under the same license as the PACKAGE package.
+# FIRST AUTHOR Akira FUNAI, 2010.
+#
+"Project-Id-Version: 0.01\n"
+"POT-Creation-Date: 2010-05-06 15:11+0900\n"
+"PO-Revision-Date: 2010-05-06 15:11+0900\n"
+"Last-Translator: Akira FUNAI <akira@funai.com>\n"
+"Language-Team: none <nobody@example.com>\n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+"Plural-Forms: nplurals=1; plural=0;\n"
+#: t.rb:1234
+msgid "color"
+msgstr "色"
+# msgstr "mmm"
+#: t.rb:2234
+#, fuzzy
+msgid "sound"
+msgstr "音"
+#: t.rb:2345
+msgid "one color"
+msgid_plural "%{n} colors"
+msgstr[0] "%{n}色"

data/t/skin/_users/00000000_test.yaml ADDED

@@ -0,0 +1,3 @@
+---
+_id: test
+password: ulrR7VSYJHTs6

data/t/skin/_users/index.html ADDED

@@ -0,0 +1,13 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <h1>@(label)</h1>
+    <dl id="main" class="app-blog">
+      <dt>id: $(_id = meta-id 32 1..32)</dt>
+      <dd>
+        password: $(password = password 12)
+        avatar: $(avatar = img 72*72 0...320000)
+      </dd>
+    </dl>
+  </body>
+</html>

data/t/skin/foo/20091120_0001.yaml ADDED

@@ -0,0 +1,7 @@
+_owner: frank
+name: FZ
+comment: oops.
+replies:
+  20091201_0001:
+    _owner: carl
+    reply: foo.

data/t/skin/foo/bar/20091120_0001.yaml ADDED

@@ -0,0 +1,5 @@
+---
+_owner: carl
+replies:
+  20091208_0001:
+    reply: wow.

data/t/skin/foo/bar/index.yaml ADDED

@@ -0,0 +1,5 @@
+---
+label: 'Bar Folder'
+group:
+  - carl
+  - don

data/t/skin/foo/baz/css/baz.css ADDED

	@@ -0,0 +1 @@
1	+ #moo {}

data/t/skin/foo/css/foo.css ADDED

	@@ -0,0 +1 @@
1	+ #foo {bar: baz;}

data/t/skin/foo/index.html ADDED

@@ -0,0 +1,14 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <h1>@(label)</h1>
+    <ul id="main" class="app-blog">
+      <li>
+        $(name = text 32 1..32 :'foo'): $(comment = text 64 1..64 :'bar!')
+        <ul id="files" class="app-attachment"><li>$(file=text)</li></ul>
+        <ul id="replies" class="app-blog"><li>$(reply=text)</li></ul>
+      </li>
+    </ul>
+    <ul id="sub" class="app-blog"><li>$(article=text)</li></ul>
+  </body>
+</html>

data/t/skin/foo/index.yaml ADDED

@@ -0,0 +1,7 @@
+---
+label: 'Foo Folder'
+admin: frank
+group:
+  - roy
+  - jim

data/t/skin/foo/not_css/foo.css ADDED

	@@ -0,0 +1 @@
1	+ #foo {bar: baz;}

data/t/skin/foo/qux/index.html ADDED

@@ -0,0 +1,8 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <h1>@(label)</h1>
+    <ul id="abc" class="app-blog"><li></li></ul>
+    <ul id="sub" class="app-blog"><li></li></ul>
+  </body>
+</html>

data/t/skin/foo/qux/moo/index.html ADDED

@@ -0,0 +1,6 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <p>moo!</p>
+  </body>
+</html>

data/t/skin/foo/sub-20100306_0001.yaml ADDED

@@ -0,0 +1,3 @@
+---
+_owner: root
+article: qux

data/t/skin/index.yaml ADDED

@@ -0,0 +1,3 @@
+---
+label: 'Root'

data/t/skin/t_attachment/index.html ADDED

@@ -0,0 +1,13 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <h1>@(label)</h1>
+    <ul id="main" class="app-blog">
+      <li title="tArticle, tArticles">
+        $(comment=text)
+        <ul id="files" class="app-attachment"><li>$(file=text 1..16)</li></ul>
+        <ul id="replies" class="app-blog"><li>$(reply=text)</li></ul>
+      </li>
+    </ul>
+  </body>
+</html>

data/t/skin/t_contact/done.html ADDED

@@ -0,0 +1,6 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <p>thank you!</p>
+  </body>
+</html>

data/t/skin/t_contact/index.html ADDED

@@ -0,0 +1,9 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <h1>@(label)</h1>
+    <ul id="main" class="app-contact">
+      <li>$(name = text 32 1..32 :'foo'): $(comment = text 64 1..64 :'bar!')</li>
+    </ul>
+  </body>
+</html>

data/t/skin/t_file/index.html ADDED

@@ -0,0 +1,16 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <h1>@(label)</h1>
+    <ul id="main" class="app-blog">
+      <li>
+        $(_timestamp = meta-timestamp can_edit)
+        $(foo = file 0..50)
+        $(bar = file 0..50)
+        <ul id="baz" class="app-attachment">
+          $(qux = file 1..50)
+        </ul>
+      </li>
+    </ul>
+  </body>
+</html>

data/t/skin/t_img/index.html ADDED

@@ -0,0 +1,14 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <h1>@(label)</h1>
+    <ul id="main" class="app-blog">
+      <li>
+        $(foo = img 32*32 1..5000 crop)
+        <ul id="baz" class="app-attachment">
+          $(qux = img 16*16 1..5000 crop)
+        </ul>
+      </li>
+    </ul>
+  </body>
+</html>

data/t/skin/t_img/test.jpg ADDED

Binary file

data/t/skin/t_select/index.html ADDED

@@ -0,0 +1,9 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <h1>@(label)</h1>
+    <ul id="main" class="app-blog">
+      <li>$(name = text 32 1..32 :'foo'): $(comment = text 64 1..64 :'bar!')</li>
+    </ul>
+  </body>
+</html>

data/t/skin/t_store/index.html ADDED

@@ -0,0 +1,9 @@
+<html>
+  <head><title>@(label)</title></head>
+  <body>
+    <h1>@(label)</h1>
+    <ul id="main" class="app-blog">
+      <li>$(name = text 32 1..32 :'foo'): $(comment = text 64 1..64 :'bar!')</li>
+    </ul>
+  </body>
+</html>

data/t/skin/t_summary/20100326_0001.yaml ADDED

@@ -0,0 +1,3 @@
+---
+name: frank
+comment: hi.

data/t/skin/t_summary/create.html ADDED

@@ -0,0 +1,9 @@
+<html>
+<head><title>create</title></head>
+<body>
+<h1>create</h1>
+<ul id="main" class="app-blog">
+  <li>main-create</li>
+</ul>
+</body>
+</html>

data/t/skin/t_summary/index.html ADDED

@@ -0,0 +1,9 @@
+<html>
+<head><title>index</title></head>
+<body>
+<h1>index</h1>
+<ul id="main" class="app-blog">
+  <li>$(name = text 32 1..32 :'foo'): $(comment = text 64 1..64 :'bar!')</li>
+</ul>
+</body>
+</html>

data/t/skin/t_summary/summary.html ADDED

@@ -0,0 +1,9 @@
+<html>
+<head><title>summary</title></head>
+<body>
+<h1>summary</h1>
+<table id="main" class="app-blog">
+  <tr><td>$(name)</td><td>$(comment)</td></tr>
+</table>
+</body>
+</html>

data/t/t.rb ADDED

@@ -0,0 +1,27 @@
+#!/usr/bin/env ruby
+# encoding: UTF-8
+# Author::    Akira FUNAI
+# Copyright:: Copyright (c) 2009 Akira FUNAI
+require 'test/unit'
+require 'rubygems'
+require 'mocha'
+require 'rack'
+t_dir = ::File.dirname __FILE__
+$LOAD_PATH.unshift t_dir
+$LOAD_PATH.unshift(::File.expand_path('../lib', t_dir))
+require 'bike'
+Bike.config(
+  'skin_dir' => './t/skin',
+  'storage'  => {
+    'default' => 'File',
+    'File'    => {'data_dir' => './t/data'},
+    'Sequel'  => {'uri'      => 'sqlite:/'},
+  }
+)
+Bike::I18n.bindtextdomain('index', ::File.join(t_dir, 'locale'))

data/t/test_bike.rb ADDED

@@ -0,0 +1,768 @@
+# encoding: UTF-8
+# Author::    Akira FUNAI
+# Copyright:: Copyright (c) 2009 Akira FUNAI
+require "#{::File.dirname __FILE__}/t"
+class TC_Bike < Test::Unit::TestCase
+  def setup
+  end
+  def teardown
+  end
+  def test_session
+    assert(
+      Bike.session.respond_to?(:[]),
+      'Bike.session should be a Session or Hash'
+    )
+  end
+  def test_client
+    Bike.client = nil
+    assert_equal(
+      'nobody',
+      Bike.client,
+      'Bike.client should return nobody before login'
+    )
+    Bike.client = 'frank'
+    assert_equal(
+      'frank',
+      Bike.client,
+      'Bike.client should return the user who logged in'
+    )
+    Bike.client = nil
+    assert_equal(
+      'nobody',
+      Bike.client,
+      'Bike.client should return nobody after logout'
+    )
+  end
+  def test_rebuild_params
+    bike = Bike.new
+    hash = bike.instance_eval {
+      rebuild_params(
+        '.action' => 'update'
+      )
+    }
+    assert_equal(
+      {:action => :update},
+      hash,
+      'Bike#rebuild_params should be able to rebuild special symbols'
+    )
+    hash = bike.instance_eval {
+      rebuild_params(
+        '.action-update' => 'submit'
+      )
+    }
+    assert_equal(
+      {:action => :update},
+      hash,
+      'Bike#rebuild_params should be able to rebuild special symbols'
+    )
+    hash = bike.instance_eval {
+      rebuild_params(
+        'noo'               => 'what?',
+        'noo.action-update' => 'submit',
+        'noo.conds-id'      => '4567'
+      )
+    }
+    assert_equal(
+      {
+        'noo' => {
+          :self   => 'what?',
+          :action => :update,
+          :conds  => {:id => '4567'},
+        },
+      },
+      hash,
+      'Bike#rebuild_params should rebuild both the special symbols and regular items'
+    )
+    hash = bike.instance_eval {
+      rebuild_params(
+        'moo.conds-p'                   => '9',
+        'moo-4567-addr.conds-zip-upper' => '110'
+      )
+    }
+    assert_equal(
+      {
+        'moo' => {
+          :conds => {:p => '9'},
+          '4567' => {
+            'addr' => {
+              :conds => {:'zip-upper' => '110'},
+            },
+          },
+        },
+      },
+      hash,
+      'Bike#rebuild_params should be able to rebuild any combination of symbols and items'
+    )
+    hash = bike.instance_eval {
+      rebuild_params(
+        'foo-bar.conds-id'  => '1234',
+        'foo-bar.conds-p'   => ['42'],
+        'foo-bar.action'    => 'update',
+        'foo-baz'           => ['boo', 'bee'],
+        'foo'               => 'oops',
+        'qux.action-create' => 'submit',
+        'qux.status-public' => 'oops'
+      )
+    }
+    assert_equal(
+      {
+        'foo' => {
+          :self => 'oops',
+          'bar' => {
+            :action => :update,
+            :conds  => {
+              :id => '1234',
+              :p  => ['42'],
+            },
+          },
+          'baz' => ['boo', 'bee'],
+        },
+        'qux' => {
+          :action => :create,
+          :status => :public,
+        },
+      },
+      hash,
+      'Bike#rebuild_params should be able to rebuild any combination of symbols and items'
+    )
+  end
+  def test_steps_of
+    assert_equal(
+      ['foo', 'bar'],
+      Bike::Path.steps_of('/foo/bar/'),
+      'Bike::Path.steps_of should be able to extract item steps from path_info'
+    )
+    assert_equal(
+      ['foo', 'bar'],
+      Bike::Path.steps_of('/foo/bar/create.html'),
+      'Bike::Path.steps_of should ignore the pseudo-filename'
+    )
+    assert_equal(
+      ['foo'],
+      Bike::Path.steps_of('/foo/bar'),
+      'Bike::Path.steps_of should ignore the last step without a following slash'
+    )
+    assert_equal(
+      ['foo', 'bar'],
+      Bike::Path.steps_of('/foo//bar/baz=123/'),
+      'Bike::Path.steps_of should distinguish item steps from conds'
+    )
+    assert_equal(
+      ['foo', 'bar'],
+      Bike::Path.steps_of('/1234567890.123456/foo/bar/'),
+      'Bike::Path.steps_of should distinguish item steps from a tid'
+    )
+  end
+  def test_steps_of_with_empty_steps
+    assert_equal(
+      [],
+      Bike::Path.steps_of(''),
+      'Bike::Path.steps_of should return empty array when there is no item steps'
+    )
+    assert_equal(
+      [],
+      Bike::Path.steps_of('/'),
+      'Bike::Path.steps_of should return empty array when there is no item steps'
+    )
+    assert_equal(
+      [],
+      Bike::Path.steps_of('/index.html'),
+      'Bike::Path.steps_of should return empty array when there is no item steps'
+    )
+  end
+  def test_steps_of_with_cond_d
+    assert_equal(
+      ['foo', 'bar'],
+      Bike::Path.steps_of('/foo/bar/2009/'),
+      'Bike::Path.steps_of should distinguish item steps from ambiguous conds[:d]'
+    )
+    assert_equal(
+      ['foo', 'bar'],
+      Bike::Path.steps_of('/foo/bar/1970/'),
+      'Bike::Path.steps_of should distinguish item steps from ambiguous conds[:d]'
+    )
+    assert_equal(
+      ['foo', 'bar', '3001'],
+      Bike::Path.steps_of('/foo/bar/3001/'),
+      'Bike::Path.steps_of should be patched in the next millennium :-)'
+    )
+  end
+  def test_conds_of
+    assert_equal(
+      {},
+      Bike::Path.conds_of('/foo/bar/'),
+      'Bike::Path.conds_of should return empty hash when there is no conds'
+    )
+    assert_equal(
+      {
+        :baz => '123',
+        :qux => '456',
+      },
+      Bike::Path.conds_of('/foo/bar/baz=123/qux=456/'),
+      'Bike::Path.conds_of should be able to extract conds from path_info'
+    )
+    assert_equal(
+      {
+        :baz => '123',
+        :qux => '456',
+      },
+      Bike::Path.conds_of('/foo/bar/baz=123/qux=456/create.html'),
+      'Bike::Path.conds_of should ignore the pseudo-filename'
+    )
+    assert_equal(
+      {
+        :baz => '1234',
+      },
+      Bike::Path.conds_of('/foo/bar//baz=1234//qux=4567'),
+      'Bike::Path.conds_of should ignore the item steps and the last step without a slash'
+    )
+  end
+  def test_conds_of_with_empty_conds
+    assert_equal(
+      {},
+      Bike::Path.conds_of(''),
+      'Bike::Path.conds_of should return empty hash when there is no conds'
+    )
+    assert_equal(
+      {},
+      Bike::Path.conds_of('/'),
+      'Bike::Path.conds_of should return empty hash when there is no conds'
+    )
+    assert_equal(
+      {},
+      Bike::Path.conds_of('/index.html'),
+      'Bike::Path.conds_of should return empty hash when there is no conds'
+    )
+  end
+  def test_conds_of_with_cond_d
+    assert_equal(
+      {
+        :d   => '200911',
+        :baz => '1234',
+        :qux => '4567',
+      },
+      Bike::Path.conds_of('/foo/bar/200911/baz=1234/qux=4567/'),
+      'Bike::Path.conds_of should be able to distinguish ambiguous conds[:d]'
+    )
+    assert_equal(
+      {
+        :baz => '1234',
+        :qux => '4567',
+      },
+      Bike::Path.conds_of('/foo/bar/20091129_0001/baz=1234/qux=4567/'),
+      'Bike::Path.conds_of should ignore the full-formatted id'
+    )
+  end
+  def test_conds_of_with_cond_id
+    assert_equal(
+      ['foo', 'bar'],
+      Bike::Path.steps_of('/foo/bar/20091205/9/baz=1234/qux=4567/'),
+      'Bike::Path.steps_of should ignore conds[:id]'
+    )
+    assert_equal(
+      {
+        :id  => '20091205_0009',
+        :baz => '1234',
+        :qux => '4567',
+      },
+      Bike::Path.conds_of('/foo/bar/20091205/9/baz=1234/qux=4567/'),
+      'Bike::Path.conds_of should extract conds[:id] from the path sequence'
+    )
+  end
+  def test_action_of
+    assert_equal(
+      :create,
+      Bike::Path.action_of('/foo/bar/create.html'),
+      'Bike::Path.action_of should extract the action from path_info'
+    )
+    assert_nil(
+      Bike::Path.action_of('/foo/bar/index.html'),
+      'Bike::Path.action_of should return nil if the pseudo-filename is index.*'
+    )
+    assert_nil(
+      Bike::Path.action_of('/foo/bar/'),
+      'Bike::Path.action_of should return nil if no pseudo-filename is given'
+    )
+    assert_nil(
+      Bike::Path.action_of('/foo/bar/_detail.html'),
+      "Bike::Path.action_of should return nil if the pseudo-filename begins with '_'"
+    )
+  end
+  def test_sub_action_of
+    assert_equal(
+      :detail,
+      Bike::Path.sub_action_of('/foo/bar/read_detail.html'),
+      'Bike::Path.sub_action_of should extract the sub_action from path_info'
+    )
+    assert_nil(
+      Bike::Path.sub_action_of('/foo/bar/read.html'),
+      "Bike::Path.sub_action_of should return nil if the pseudo-filename does not include '_'"
+    )
+  end
+  def test_base_of
+    sd = Bike::Path.base_of '/foo/bar/main/index.html'
+    assert_instance_of(
+      Bike::Set::Dynamic,
+      sd,
+      'Bike::Path.base_of should return a set_dynamic'
+    )
+    assert_equal(
+      '-foo-bar-main',
+      sd[:full_name],
+      'Bike::Path.base_of should return a set_dynamic at the bottom of the given steps'
+    )
+    sd = Bike::Path.base_of '/foo/bar/index.html'
+    assert_instance_of(
+      Bike::Set::Dynamic,
+      sd,
+      'Bike::Path.base_of should return a set_dynamic'
+    )
+    assert_equal(
+      '-foo-bar-main',
+      sd[:full_name],
+      "Bike::Path.base_of should return the item('main') if the given steps point at a folder"
+    )
+    sd = Bike::Path.base_of '/foo/qux/index.html'
+    assert_instance_of(
+      Bike::Set::Dynamic,
+      sd,
+      "Bike::Path.base_of should return an available set_dynamic if there is no 'main' in the folder"
+    )
+    assert_equal(
+      '-foo-qux-abc',
+      sd[:full_name],
+      "Bike::Path.base_of should return the first set_dynamic if there is no 'main' in the folder"
+    )
+    sd = Bike::Path.base_of '/foo/bar/20091120_0001/comment/index.html'
+    assert_instance_of(
+      Bike::Text,
+      sd,
+      'Bike::Path.base_of should return a text if designated'
+    )
+    sd = Bike::Path.base_of '/foo/bar/20091120_0001/files/index.html'
+    assert_instance_of(
+      Bike::Set::Dynamic,
+      sd,
+      'Bike::Path.base_of should return a set_dynamic'
+    )
+    assert_equal(
+      '-foo-bar-main-20091120_0001-files',
+      sd[:full_name],
+      "Bike::Path.base_of should be able to dive into any depth from the folder"
+    )
+    sd = Bike::Path.base_of '/foo/bar/20091120_0002/files/index.html'
+    assert_nil(
+      sd,
+      'Bike::Path.base_of should return nil if there is no set_dynamic at the steps'
+    )
+  end
+  def test_base_of_empty_folder
+    f = Bike::Path.base_of '/foo/qux/moo/index.html'
+    assert_instance_of(
+      Bike::Set::Static::Folder,
+      f,
+      'Bike::Path.base_of should return an folder if there is no SD in it'
+    )
+    assert_equal(
+      '-foo-qux-moo',
+      f[:full_name],
+      'Bike::Path.base_of should return an folder if there is no SD in it'
+    )
+  end
+  def test_path_of
+    assert_equal(
+      '20091224/123/',
+      Bike::Path.path_of(:id => '20091224_0123'),
+      'Bike::Path.path_of should return a special combination of pseudo-steps for conds[:id]'
+    )
+    assert_equal(
+      '20091224/123/',
+      Bike::Path.path_of(:d => '2009', :id => '20091224_0123'),
+      'Bike::Path.path_of should ignore the other conds if there is conds[:id]'
+    )
+    assert_equal(
+      '20091224/123/',
+      Bike::Path.path_of(:id => ['20091224_0123']),
+      'Bike::Path.path_of should return a special combination of pseudo-steps for conds[:id]'
+    )
+    assert_equal(
+      'id=20091224_0123,20100222_1234/',
+      Bike::Path.path_of(:id => ['20091224_0123', '20100222_1234']),
+      'Bike::Path.path_of should return multiple ids as a comma-separated form'
+    )
+    assert_equal(
+      '',
+      Bike::Path.path_of(:id => []),
+      'Bike::Path.path_of should return an empty string when given an empty conds[:id]'
+    )
+    assert_equal(
+      'id=carl/',
+      Bike::Path.path_of(:id => '00000000_carl'),
+      "Bike::Path.path_of should use '/id=xxx/' form for a short id"
+    )
+    assert_equal(
+      'id=20091224_0123,carl/',
+      Bike::Path.path_of(:id => ['20091224_0123', '00000000_carl']),
+      "Bike::Path.path_of should use short ids in a comma-separated form"
+    )
+    assert_equal(
+      'foo=bar/',
+      Bike::Path.path_of(:foo => 'bar'),
+      'Bike::Path.path_of should return a path of which steps represent the conds'
+    )
+    assert_equal(
+      'foo=bar/p=123/',
+      Bike::Path.path_of(:p => 123, :foo => 'bar'),
+      'Bike::Path.path_of should return the step for conds[:p] at the tail end'
+    )
+    assert_equal(
+      'foo=bar/order=desc/p=123/',
+      Bike::Path.path_of(:p => 123, :order =>'desc', :foo => 'bar'),
+      'Bike::Path.path_of should return the step for conds[:order] at the tail end'
+    )
+    assert_equal(
+      'foo=bar/',
+      Bike::Path.path_of(:p => 1, :foo => 'bar'),
+      'Bike::Path.path_of should omit the step for conds[:p] when conds[:p] == 1'
+    )
+    assert_equal(
+      'p=1/',
+      Bike::Path.path_of(:p => 1),
+      'Bike::Path.path_of should not omit the step for conds[:p] when there is no other conds'
+    )
+    assert_equal(
+      'foo=1,2,3/',
+      Bike::Path.path_of(:foo => [1, 2, 3]),
+      'Bike::Path.path_of should return multiple values as a comma-separated form'
+    )
+  end
+  def test_params_from_request
+    bike = Bike.new
+    env = Rack::MockRequest.env_for(
+      'http://example.com/foo/bar/main/qux=456/read_detail.html?acorn=round',
+      {
+        :method      => 'post',
+        :script_name => '',
+        :input       => 'coax=true&some-doors=open',
+      }
+    )
+    req = Rack::Request.new env
+    params = bike.instance_eval {
+      params_from_request req
+    }
+    assert_equal(
+      {
+        :conds      => {:qux => '456'},
+        :action     => :read,
+        :sub_action => :detail,
+        'acorn'     => 'round',
+        'coax'      => 'true',
+        'some'      => {'doors' => 'open'},
+      },
+      params,
+      'Bike#params_from_request should build params from req.path_info and req.params'
+    )
+    env = Rack::MockRequest.env_for(
+      'http://example.com/foo/bar/qux=456/index.html?acorn=round',
+      {
+        :method      => 'post',
+        :script_name => '',
+        :input       => 'coax=true&some-doors=open',
+      }
+    )
+    req = Rack::Request.new env
+    params = bike.instance_eval {
+      params_from_request req
+    }
+    assert_equal(
+      {
+        :conds      => {:qux => '456'},
+        :action     => nil,
+        :sub_action => nil,
+        'acorn'     => 'round',
+        'coax'      => 'true',
+        'some'      => {'doors' => 'open'},
+      },
+      params,
+      'Bike#params_from_request should build params from req.path_info and req.params'
+    )
+    env = Rack::MockRequest.env_for(
+      'http://example.com/foo/bar/20091120_0001/files/qux=456/index.html?acorn=round',
+      {
+        :method      => 'post',
+        :script_name => '',
+        :input       => 'coax=true&some-doors=open',
+      }
+    )
+    req = Rack::Request.new env
+    params = bike.instance_eval {
+      params_from_request req
+    }
+    assert_equal(
+      {
+        :conds      => {:qux => '456'},
+        :action     => nil,
+        :sub_action => nil,
+        'acorn'     => 'round',
+        'coax'      => 'true',
+        'some'      => {'doors' => 'open'},
+      },
+      params,
+      'Bike#params_from_request should attach the params from path_info to the base SD'
+    )
+    env = Rack::MockRequest.env_for(
+      'http://example.com/foo/bar/qux=456/index.html?acorn=round',
+      {
+        :method      => 'post',
+        :script_name => '',
+        :input       => 'some-doors=open&some.action-open=submit',
+      }
+    )
+    req = Rack::Request.new env
+    params = bike.instance_eval {
+      params_from_request req
+    }
+    assert_equal(
+      {
+        :conds      => {:qux => '456'},
+        :action     => nil,
+        :sub_action => nil,
+        'acorn'     => 'round',
+        'some'      => {'doors' => 'open', :action => :open},
+      },
+      params,
+      'Bike#params_from_request should build params from req.path_info and req.params'
+    )
+    env = Rack::MockRequest.env_for(
+      'http://example.com/foo/bar/update.html',
+      {
+        :method      => 'post',
+        :script_name => '',
+        :input       => '.action=open_sesami',
+      }
+    )
+    req = Rack::Request.new env
+    params = bike.instance_eval {
+      params_from_request req
+    }
+    assert_equal(
+      {
+        :conds      => {},
+        :action     => :open,
+        :sub_action => :sesami,
+      },
+      params,
+      'Bike#params_from_request should override path_info by :input'
+    )
+    env = Rack::MockRequest.env_for(
+      'http://example.com/foo/bar/update.html',
+      {
+        :method      => 'post',
+        :script_name => '',
+        :input       => '.action-open_sesami=submit',
+      }
+    )
+    req = Rack::Request.new env
+    params = bike.instance_eval {
+      params_from_request req
+    }
+    assert_equal(
+      {
+        :conds      => {},
+        :action     => :open,
+        :sub_action => :sesami,
+      },
+      params,
+      'Bike#params_from_request should override path_info by :input'
+    )
+  end
+  def test_current
+    Bike.current[:foo] = 'main foo'
+    main_current = Bike.current
+    t = Thread.new {
+      assert_not_equal(
+        main_current,
+        Bike.current,
+        'Bike.current should be unique per a thread'
+      )
+      assert_not_equal(
+        'main foo',
+        Bike.current[:foo],
+        'Bike.current should be unique per a thread'
+      )
+      Bike.current[:foo] = 'child foo'
+    }
+    t.join
+    assert_equal(
+      'main foo',
+      Bike.current[:foo],
+      'Bike.current should be unique per a thread'
+    )
+  end
+  def test_login
+    Bike.client = nil
+    res = Bike.new.send(
+      :login,
+      Bike::Set::Static::Folder.root.item('foo', 'main'),
+      {'id' => 'test', 'pw' => 'test', :conds => {:id => '20100222_0123'}, 'dest_action' => 'update'}
+    )
+    assert_equal(
+      'test',
+      Bike.client,
+      'Bike#login should set Bike.client given a valid pair of user/password'
+    )
+    assert_match(
+      %r{/foo/20100222/123/update.html},
+      res[1]['Location'],
+      'Bike#login should return a proper location header'
+    )
+  end
+  def test_login_default_action
+    Bike.client = nil
+    res = Bike.new.send(
+      :login,
+      Bike::Set::Static::Folder.root.item('foo', 'main'),
+      {'id' => 'test', 'pw' => 'test', :conds => {:id => '20100222_0123'}}
+    )
+    assert_match(
+      %r{/foo/20100222/123/index.html},
+      res[1]['Location'],
+      "Bike#login should set 'index' as the default action of a location"
+    )
+  end
+  def test_login_with_wrong_account
+    Bike.client = nil
+    assert_raise(
+      Bike::Error::Forbidden,
+      'Bike#login should raise Error::Forbidden given a non-existent user'
+    ) {
+      Bike.new.send(
+        :login,
+        Bike::Set::Static::Folder.root.item('foo', 'main'),
+        {'id' => 'non-existent', 'pw' => 'test'}
+      )
+    }
+    assert_equal(
+      'nobody',
+      Bike.client,
+      'Bike#login should not set Bike.client with a non-existent user'
+    )
+    assert_raise(
+      Bike::Error::Forbidden,
+      'Bike#login should raise Error::Forbidden given a empty password'
+    ) {
+      Bike.new.send(
+        :login,
+        Bike::Set::Static::Folder.root.item('foo', 'main'),
+        {'id' => 'test', 'pw' => nil}
+      )
+    }
+    assert_equal(
+      'nobody',
+      Bike.client,
+      'Bike#login should not set Bike.client with an empty password'
+    )
+    assert_raise(
+      Bike::Error::Forbidden,
+      'Bike#login should raise Error::Forbidden given a wrong password'
+    ) {
+      res = Bike.new.send(
+        :login,
+        Bike::Set::Static::Folder.root.item('foo', 'main'),
+        {
+          'id' => 'test',
+          'pw' => 'wrong',
+          :conds => {:id => '20100222_0123'},
+          'dest_action' => 'update'
+        }
+      )
+    }
+    assert_equal(
+      'nobody',
+      Bike.client,
+      'Bike#login should not set Bike.client with a wrong password'
+    )
+  end
+  def test_logout
+    Bike.client = 'frank'
+    res = Bike.new.send(
+      :logout,
+      Bike::Set::Static::Folder.root.item('foo', 'main'),
+      {'id' => 'test', 'pw' => 'test', :conds => {:id => '20100222_0123'}}
+    )
+    assert_equal(
+      'nobody',
+      Bike.client,
+      'Bike#logout should clear Bike.client'
+    )
+    assert_match(
+      %r{/foo/20100222/123/index.html},
+      res[1]['Location'],
+      'Bike#logout should return a proper location header'
+    )
+  end
+  def test_libdir
+    assert_match(
+      %r{^.*/lib$},
+      Bike.libdir,
+      'Bike#libdir should return the lib/ directory where the bike.rb is in'
+    )
+  end
+end