review 2.0.0.beta1 → 2.0.0

data/test/test_inaobuilder.rb

@@ -1,247 +0,0 @@
-# -*- coding: utf-8 -*-
-require 'test_helper'
-require 'book_test_helper'
-require 'review'
-
-class INAOBuidlerTest < Test::Unit::TestCase
-  include ReVIEW
-  include BookTestHelper
-
-  def setup
-    @param = {
-      "secnolevel" => 2,    # for IDGXMLBuilder, HTMLBuilder
-      "inencoding" => "UTF-8",
-      "outencoding" => "UTF-8",
-      "stylesheet" => nil,  # for HTMLBuilder
-    }
-  end
-
-  def test_all
-    compiler = Compiler.new(INAOBuilder.new)
-    mktmpbookdir do |dir, book, files|
-      chapter = Book::Chapter.new(book, 1, "chap1", nil, StringIO.new)
-      chapter.content = <<-EOS
-= 見出し1（大見出し、節）
-== 見出し2（中見出し、項）
-=== 見出し3（小見出し、目）
-段落冒頭の字下げは、自動で行われます。
-改行は、（改行）
-このように自動で取り除かれます。
-
-通常の本文@<b>{強調（ボールド）}通常の本文@<i>{斜体（イタリック）}通常の本文@<tt>{インラインのコード}通常の本文@<fn>{1}通常の本文@<kbd>{Enter}（←キーボードフォント）通常の本文@<ruby>{外村,ほかむら}（←ルビ）。
-
-//footnote[1][脚注]
-
-//quote{
-引用です
-//}
-
-====[column]コラム見出し
-本文コラム
-
-===== コラム小見出し
-本文コラム
-
-====[/column]
-
-== 箇条書き
-=== 通常の箇条書き
-  * 連番箇条書き
-  * 連番箇条書き
-=== 連番箇条書き
-  1. 連番箇条書き
-  2. 連番箇条書き
-
-== コマンド
-//cmd[コマンドのタイトル]{
-$ command foo
-//}
-
-=== 本文埋め込みコマンド（本文埋め込み版はWEB+DB PRESSでは未使用）
-//cmd{
-$ command foo
-//}
-
-== 表
-//table[id][表のタイトル]{
-項目1	項目2
--------------
-内容1	内容2
-内容1	内容2
-//}
-
-EOS
-
-    expected = <<-EOS
-■見出し1（大見出し、節）
-■■見出し2（中見出し、項）
-■■■見出し3（小見出し、目）
-　段落冒頭の字下げは、自動で行われます。改行は、（改行）このように自動で取り除かれます。
-　通常の本文◆b/◆強調（ボールド）◆/b◆通常の本文◆i/◆斜体（イタリック）◆/i◆通常の本文◆cmd/◆インラインのコード◆/cmd◆通常の本文◆注/◆脚注◆/注◆通常の本文Enter▲（←キーボードフォント）通常の本文◆ルビ/◆外村◆ほかむら◆/ルビ◆（←ルビ）。
-◆quote/◆
-引用です
-◆/quote◆
-
-◆column/◆
-■■■■コラム見出し
-　本文コラム
-■■■■■コラム小見出し
-　本文コラム
-◆/column◆
-■■箇条書き
-■■■通常の箇条書き
-・連番箇条書き
-・連番箇条書き
-■■■連番箇条書き
-（1）連番箇条書き
-（2）連番箇条書き
-■■コマンド
-◆list-white/◆
-●コマンドのタイトル
-$ command foo
-◆/list-white◆
-■■■本文埋め込みコマンド（本文埋め込み版はWEB+DB PRESSでは未使用）
-◆list-white/◆
-$ command foo
-◆/list-white◆
-■■表
-◆table/◆
-●表1.1　表のタイトル
-◆table-title◆項目1	項目2
-内容1	内容2
-内容1	内容2
-◆/table◆
-EOS
-      assert_equal expected, compiler.compile(chapter)
-    end
-  end
-
-  def test_list
-    compiler = Compiler.new(INAOBuilder.new)
-    mktmpbookdir do |dir, book, files|
-      chapter = Book::Chapter.new(book, 1, "chap1", nil, StringIO.new)
-      chapter.content = <<-EOS
-== リスト
-@<list>{id}
-//list[id][キャプション（コードのタイトル）]{
-function hoge() {
-    alert(foo);
-    alert(bar);
-}
-//}
-
-=== 本文埋め込みリスト
-本文中で流れでコードを掲載するときに使用します。
-
-//emlist{
-function hoge() {
-    alert(foo);@<comment>{こんな風にコメントがつけられます}
-}
-//}
-
-このように、上下に本文が入ります。
-
-本文から一連の流れで読んでもらうことができますが、コードがページをまたぐ可能性がございます。
-EOS
-      expected = <<-EOS
-■■リスト
-　リスト1.1
-◆list/◆
-●リスト1.1　キャプション（コードのタイトル）
-function hoge() {
-    alert(foo);
-    alert(bar);
-}
-◆/list◆
-■■■本文埋め込みリスト
-　本文中で流れでコードを掲載するときに使用します。
-◆list/◆
-function hoge() {
-    alert(foo);◆comment/◆こんな風にコメントがつけられます◆/comment◆
-}
-◆/list◆
-　このように、上下に本文が入ります。
-　本文から一連の流れで読んでもらうことができますが、コードがページをまたぐ可能性がございます。
-EOS
-      assert_equal expected, compiler.compile(chapter)
-    end
-  end
-
-  def test_image
-    compiler = Compiler.new(INAOBuilder.new)
-    mktmpbookdir do |dir, book, files|
-      chapter = Book::Chapter.new(book, 1, "chap1", nil, StringIO.new)
-      chapter.content = <<-EOS
-= 図
-@<img>{id}
-//image[id][図のタイトル]{
-ダミー
-//}
-EOS
-      expected = <<-EOS
-■図
-　図1.1
-●図1.1　図のタイトル
-ダミー
-EOS
-      assert_equal expected, compiler.compile(chapter)
-    end
-  end
-
-  def test_table
-    compiler = Compiler.new(INAOBuilder.new)
-    mktmpbookdir do |dir, book, files|
-      chapter = Book::Chapter.new(book, 1, "chap1", nil, StringIO.new)
-      chapter.content = <<-EOS
-== 表
-@<table>{id}
-//table[id][表のタイトル]{
-項目1	項目2
--------------
-内容1	内容2
-内容1	内容2
-//}
-EOS
-      expected = <<-EOS
-■■表
-　表1.1
-◆table/◆
-●表1.1　表のタイトル
-◆table-title◆項目1	項目2
-内容1	内容2
-内容1	内容2
-◆/table◆
-EOS
-      assert_equal expected, compiler.compile(chapter)
-    end
-  end
-
-  def test_listnum
-    compiler = Compiler.new(INAOBuilder.new)
-    mktmpbookdir do |dir, book, files|
-      chapter = Book::Chapter.new(book, 1, "chap1", nil, StringIO.new)
-      chapter.content = <<-EOS
-== リスト
-@<list>{id}
-//listnum[id][キャプション（コードのタイトル）]{
-function hoge() {
-    alert(foo);
-    alert(bar);
-}
-//}
-EOS
-      expected = <<-EOS
-■■リスト
-　リスト1.1
-◆list/◆
-●リスト1.1　キャプション（コードのタイトル）
- 1 function hoge() {
- 2     alert(foo);
- 3     alert(bar);
- 4 }
-◆/list◆
-EOS
-      assert_equal expected, compiler.compile(chapter)
-    end
-  end
-end

data/test/test_uuid.rb

@@ -1,157 +0,0 @@
-#!/usr/bin/env ruby
-# encoding: us-ascii
-#
-# Original license is below:
-#
-# Copyright(c) 2005 URABE, Shyouhei.
-#
-# Permission is hereby granted, free of  charge, to any person obtaining a copy
-# of  this code, to  deal in  the code  without restriction,  including without
-# limitation  the rights  to  use, copy,  modify,  merge, publish,  distribute,
-# sublicense, and/or sell copies of the code, and to permit persons to whom the
-# code is furnished to do so, subject to the following conditions:
-#
-#        The above copyright notice and this permission notice shall be
-#        included in all copies or substantial portions of the code.
-#
-# THE  CODE IS  PROVIDED "AS  IS",  WITHOUT WARRANTY  OF ANY  KIND, EXPRESS  OR
-# IMPLIED,  INCLUDING BUT  NOT LIMITED  TO THE  WARRANTIES  OF MERCHANTABILITY,
-# FITNESS FOR A PARTICULAR PURPOSE  AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
-# AUTHOR  OR  COPYRIGHT  HOLDER BE  LIABLE  FOR  ANY  CLAIM, DAMAGES  OR  OTHER
-# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-# OUT OF  OR IN CONNECTION WITH  THE CODE OR THE  USE OR OTHER  DEALINGS IN THE
-# CODE.
-
-require 'test/unit'
-require 'uuid'
-
-class TC_UUID < Test::Unit::TestCase
-	def test_v1
-		u1 = UUID.create
-		u2 = UUID.create
-		assert_not_equal u1, u2
-	end
-
-	def test_v1_repeatability
-		u1 = UUID.create 1, 2, "345678"
-		u2 = UUID.create 1, 2, "345678"
-		assert_equal u1, u2
-	end
-
-	def test_v3
-		u1 = UUID.create_md5 "foo", UUID::NameSpace_DNS
-		u2 = UUID.create_md5 "foo", UUID::NameSpace_DNS
-		u3 = UUID.create_md5 "foo", UUID::NameSpace_URL
-		assert_equal u1, u2
-		assert_not_equal u1, u3
-	end
-
-	def test_v5
-		u1 = UUID.create_sha1 "foo", UUID::NameSpace_DNS
-		u2 = UUID.create_sha1 "foo", UUID::NameSpace_DNS
-		u3 = UUID.create_sha1 "foo", UUID::NameSpace_URL
-		assert_equal u1, u2
-		assert_not_equal u1, u3
-	end
-
-	def test_v4
-		# This test  is not  perfect, because the  random nature of  version 4
-		# UUID  it is  not always  true that  the three  objects  below really
-		# differ.  But  in real  life it's  enough to say  we're OK  when this
-		# passes.
-		u1 = UUID.create_random
-		u2 = UUID.create_random
-		u3 = UUID.create_random
-		assert_not_equal u1.raw_bytes, u2.raw_bytes
-		assert_not_equal u1.raw_bytes, u3.raw_bytes
-		assert_not_equal u2.raw_bytes, u3.raw_bytes
-	end
-
-	def test_pack
-		u1 = UUID.pack 0x6ba7b810, 0x9dad, 0x11d1, 0x80, 0xb4,
-		"\000\300O\3240\310"
-		assert_equal UUID::NameSpace_DNS, u1
-	end
-
-	def test_unpack
-		tl, tm, th, cl, ch, m = UUID::NameSpace_DNS.unpack
-		assert_equal 0x6ba7b810, tl
-		assert_equal 0x9dad, tm
-		assert_equal 0x11d1, th
-		assert_equal 0x80, cl
-		assert_equal 0xb4, ch
-		assert_equal "\000\300O\3240\310", m
-	end
-
-	def test_parse
-		u1 = UUID.pack 0x6ba7b810, 0x9dad, 0x11d1, 0x80, 0xb4,
-		"\000\300O\3240\310"
-		u2 = UUID.parse "6ba7b810-9dad-11d1-80b4-00c04fd430c8"
-		u3 = UUID.parse "urn:uuid:6ba7b810-9dad-11d1-80b4-00c04fd430c8"
-		assert_equal u1, u2
-		assert_equal u1, u3
-	end
-
-	def test_to_s
-		u1 = UUID.parse "6ba7b810-9dad-11d1-80b4-00c04fd430c8"
-		assert_equal "6ba7b810-9dad-11d1-80b4-00c04fd430c8", u1.to_s
-	end
-
-	def test_to_i
-		u1 = UUID.parse "6ba7b810-9dad-11d1-80b4-00c04fd430c8"
-		assert_equal 0x6ba7b8109dad11d180b400c04fd430c8, u1.to_i
-	end
-
-	#def test_time
-	#	assert_raises(RangeError) do
-	#		UUID::Nil.time
-	#	end
-	#	0.times do |i|
-	#		t = Time.at i, i
-	#		u = UUID.create 0, t
-	#		assert_equal t.tv_sec, u.time.tv_sec
-	#		assert_equal t.tv_usec, u.time.tv_usec
-	#	end
-	#end
-
-	def test_version
-		assert_equal 0, UUID::Nil.version
-		assert_equal 1, UUID.create.version
-		100.times do # x100 random tests may be enough?
-			assert_equal 4, UUID.create_random.version
-		end
-	end
-
-	def test_clock
-		assert_equal 0, UUID::Nil.clock
-		1000.times do |i| # clock is 14bit so 8191 suffice, but it's too slow
-			u = UUID.create i
-			assert_equal i, u.clock
-		end
-	end
-
-	def test_equality
-		u1 = UUID.parse "6ba7b810-9dad-11d1-80b4-00c04fd430c8"
-		u2 = UUID.parse "6ba7b810-9dad-11d1-80b4-00c04fd430c8"
-		assert_equal u1.hash, u2.hash
-		case u1
-		when u2
-			assert_equal true, true # ok
-		else
-			flunk "u1 != u2"
-		end
-	end
-end
-
-
-
-# Local Variables:
-# mode: ruby
-# coding: utf-8
-# indent-tabs-mode: t
-# tab-width: 3
-# ruby-indent-level: 3
-# fill-column: 79
-# default-justification: full
-# End:
-# vi: ts=3 sw=3