aozora2html 0.1.0

data/test/test_aozora2html.rb

@@ -0,0 +1,88 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+require 'fileutils'
+require 'tmpdir'
+
+class Aozora2HtmlTest < Test::Unit::TestCase
+  def setup
+  end
+
+  def test_aozora2html_new
+    Dir.mktmpdir do |dir|
+      input = File.join(dir,'dummy.txt')
+      output = File.join(dir,'dummy2.txt')
+      File.write(input, "テスト\r\n")
+      parser = Aozora2Html.new(input, output)
+
+      assert_equal Aozora2Html, parser.class
+    end
+  end
+
+  def test_scount
+    Dir.mktmpdir do |dir|
+      input = File.join(dir,'dummy.txt')
+      output = File.join(dir,'dummy2.txt')
+      File.write(input, "a\r\nb\r\nc\r\n")
+      parser = Aozora2Html.new(input, output)
+
+      assert_equal 0, parser.scount
+      ch = parser.read_char
+      assert_equal "a",ch
+      assert_equal 1, parser.scount
+      ch = parser.read_char
+      assert_equal "\r\n",ch
+      assert_equal 1, parser.scount
+      ch = parser.read_char
+      assert_equal "b",ch
+      assert_equal 2, parser.scount
+      ch = parser.read_char
+      assert_equal "\r\n",ch
+      assert_equal 2, parser.scount
+      ch = parser.read_char
+      assert_equal "c",ch
+      assert_equal 3, parser.scount
+    end
+  end
+
+  def test_read_line
+    Dir.mktmpdir do |dir|
+      input = File.join(dir,'dummy.txt')
+      output = File.join(dir,'dummy2.txt')
+      File.write(input, "ab\r\nc\r\n")
+      parser = Aozora2Html.new(input, output)
+
+      parsed = parser.read_line
+      assert_equal "ab", parsed
+    end
+  end
+
+  def test_char_type
+    Dir.mktmpdir do |dir|
+      input = File.join(dir,'dummy.txt')
+      output = File.join(dir,'dummy2.txt')
+      File.write(input, "ab\r\nc\r\n")
+      parser = Aozora2Html.new(input, output)
+
+      assert_equal :kanji, parser.char_type(Embed_Gaiji_tag.new(nil,"foo","1-2-3","name"))
+      assert_equal :kanji, parser.char_type(UnEmbed_Gaiji_tag.new(nil,"foo"))
+      assert_equal :hankaku, parser.char_type(Accent_tag.new(nil,123,"abc"))
+      assert_equal :else, parser.char_type(Okurigana_tag.new(nil,"abc"))
+      assert_equal :else, parser.char_type(Inline_keigakomi_tag.new(nil,"abc"))
+      assert_equal :katakana, parser.char_type(Dakuten_katakana_tag.new(nil,1,"abc"))
+
+      assert_equal :hiragana, parser.char_type("あ".encode("shift_jis"))
+      assert_equal :hiragana, parser.char_type("っ".encode("shift_jis"))
+      assert_equal :katakana, parser.char_type("ヴ".encode("shift_jis"))
+      assert_equal :katakana, parser.char_type("ー".encode("shift_jis"))
+      assert_equal :zenkaku, parser.char_type("ｗ".encode("shift_jis"))
+      assert_equal :hankaku, parser.char_type("z".encode("shift_jis"))
+      assert_equal :kanji, parser.char_type("漢".encode("shift_jis"))
+      assert_equal :hankaku_terminate, parser.char_type("!".encode("shift_jis"))
+      assert_equal :else, parser.char_type("？".encode("shift_jis"))
+    end
+  end
+
+  def teardown
+  end
+end

data/test/test_aozora_accent_parser.rb

@@ -0,0 +1,20 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class Aozora2HtmlTest < Test::Unit::TestCase
+  def setup
+  end
+
+  def test_new
+    str = "〔e'tiquette〕\r\n".encode("shift_jis")
+    strio = StringIO.new(str)
+    stream = Jstream.new(strio)
+    parsed = Aozora_accent_parser.new(stream,"〕".encode("shift_jis"),{},[]).process
+    expected = "〔<img src=\"../../../gaiji/1-09/1-09-63.png\" alt=\"※(アキュートアクセント付きE小文字)\" class=\"gaiji\" />tiquette"
+    assert_equal expected, parsed.to_s.encode("utf-8")
+  end
+
+  def teardown
+  end
+end

data/test/test_compat.rb

@@ -0,0 +1,11 @@
+require 'test_helper'
+require 'aozora2html'
+
+class CompatTest < Test::Unit::TestCase
+  def test_array_to_s
+    assert_equal "abc", ["a", "b", "c"].join
+  end
+end
+
+
+

data/test/test_dakuten_katakana_tag.rb

@@ -0,0 +1,26 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class DakutenKatakanaTagTest < Test::Unit::TestCase
+  def setup
+    @orig_gaiji_dir = $gaiji_dir
+    $gaiji_dir = "g_dir"
+    stub(@parser).block_allowed_context?{true}
+  end
+
+  def test_dakuten_katakana_new
+    tag = Dakuten_katakana_tag.new(@parser,1,"ア".encode("shift_jis"))
+    assert_equal Dakuten_katakana_tag, tag.class
+    assert_equal true, tag.kind_of?(Inline_tag)
+  end
+
+  def test_to_s
+    tag = Dakuten_katakana_tag.new(@parser,1,"ア".encode("shift_jis"))
+    assert_equal "<img src=\"g_dir/1-07/1-07-81.png\" alt=\"※(濁点付き片仮名「ア」、1-07-81)\" class=\"gaiji\" />", tag.to_s.encode("utf-8")
+  end
+
+  def teardown
+    $gaiji_dir = @orig_gaiji_dir
+  end
+end

data/test/test_decorate_tag.rb

@@ -0,0 +1,23 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class DecorateTagTest < Test::Unit::TestCase
+  def setup
+    stub(@parser).block_allowed_context?{true}
+  end
+
+  def test_decorate_new
+    tag = Decorate_tag.new(@parser,"aa",1,:dai)
+    assert_equal Decorate_tag, tag.class
+    assert_equal true, tag.kind_of?(Inline_tag)
+  end
+
+  def test_to_s
+    tag = Decorate_tag.new(@parser,"テスト".encode("shift_jis"),"foo","span")
+    assert_equal "<span class=\"foo\">テスト</span>", tag.to_s.encode("utf-8")
+  end
+
+  def teardown
+  end
+end

data/test/test_dir_tag.rb

@@ -0,0 +1,23 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class DirTagTest < Test::Unit::TestCase
+  def setup
+    stub(@parser).block_allowed_context?{true}
+  end
+
+  def test_dir_new
+    tag = Dir_tag.new(@parser,"テスト".encode("shift_jis"))
+    assert_equal Dir_tag, tag.class
+    assert_equal true, tag.kind_of?(Inline_tag)
+  end
+
+  def test_to_s
+    tag = Dir_tag.new(@parser,"テスト".encode("shift_jis"))
+    assert_equal "<span dir=\"ltr\">テスト</span>", tag.to_s.encode("utf-8")
+  end
+
+  def teardown
+  end
+end

data/test/test_editor_note_tag.rb

@@ -0,0 +1,22 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class EditorNoteTagTest < Test::Unit::TestCase
+  def setup
+  end
+
+  def test_editor_note_new
+    tag = Editor_note_tag.new(nil,"注記のテスト".encode("shift_jis"))
+    assert_equal Editor_note_tag, tag.class
+    assert_equal true, tag.kind_of?(Inline_tag)
+  end
+
+  def test_to_s
+    tag = Editor_note_tag.new(nil,"注記のテスト".encode("shift_jis"))
+    assert_equal "<span class=\"notes\">［＃注記のテスト］</span>", tag.to_s.encode("utf-8")
+  end
+
+  def teardown
+  end
+end

data/test/test_exception.rb

@@ -0,0 +1,23 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class ExceptionTest < Test::Unit::TestCase
+  def test_raise_aozora_exception
+    assert_raises(Aozora_Exception) do
+      raise Aozora_Exception, "error!"
+    end
+  end
+
+  def test_raise_aozora_error
+    error_msg = ""
+    begin
+      raise Aozora_Error, "sample error"
+    rescue Aozora_Error => msg
+      error_msg = msg.message(123)
+    end
+    assert_equal "エラー(123行目):sample error. \r\n処理を停止します",
+                 error_msg.encode("utf-8")
+
+  end
+end

data/test/test_font_size_tag.rb

@@ -0,0 +1,33 @@
+require 'test_helper'
+require 'aozora2html'
+
+class FontSizeTagTest < Test::Unit::TestCase
+  def setup
+    stub(@parser).block_allowed_context?{true} 
+  end
+
+  def test_font_size_new
+    tag = Font_size_tag.new(@parser,1,:dai)
+    assert_equal Font_size_tag, tag.class
+    assert_equal true, tag.kind_of?(Block_tag)
+    assert_equal true, tag.kind_of?(Multiline_tag)
+  end
+
+  def test_to_s
+    tag = Font_size_tag.new(@parser,1,:dai)
+    assert_equal "<div class=\"dai1\" style=\"font-size: large;\">", tag.to_s.encode("utf-8")
+  end
+
+  def test_to_s2
+    tag = Font_size_tag.new(@parser,2,:dai)
+    assert_equal "<div class=\"dai2\" style=\"font-size: x-large;\">", tag.to_s.encode("utf-8")
+  end
+
+  def test_to_s3
+    tag = Font_size_tag.new(@parser,3,:sho)
+    assert_equal "<div class=\"sho3\" style=\"font-size: xx-small;\">", tag.to_s.encode("utf-8")
+  end
+
+  def teardown
+  end
+end

data/test/test_gaiji_tag.rb

@@ -0,0 +1,35 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class EmbedGaijiTagTest < Test::Unit::TestCase
+  def setup
+    @orig_gaiji_dir = $gaiji_dir
+    $gaiji_dir = "g_dir/"
+  end
+
+  def test_gaiji_new
+    egt = Embed_Gaiji_tag.new(nil,"foo","1-2-3","name")
+    assert_equal "<img src=\"g_dir/foo/1-2-3.png\" alt=\"※(name)\" class=\"gaiji\" />", egt.to_s.encode("utf-8")
+  end
+
+  def test_unembed_gaiji_new
+    egt = UnEmbed_Gaiji_tag.new(nil,"テストtest".encode("Shift_JIS"))
+    assert_equal "<span class=\"notes\">［テストtest］</span>", egt.to_s.encode("utf-8")
+  end
+
+  def test_espcaed?
+    egt = UnEmbed_Gaiji_tag.new(nil,"テストtest".encode("Shift_JIS"))
+    assert_equal false, egt.escaped?
+  end
+
+  def test_espcae!
+    egt = UnEmbed_Gaiji_tag.new(nil,"テストtest".encode("Shift_JIS"))
+    egt.escape!
+    assert_equal true, egt.escaped?
+  end
+
+  def teardown
+    $gaiji_dir = @orig_gaiji_dir
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,5 @@
+$LOAD_PATH.unshift(File.dirname(__FILE__) + '/../lib/')
+require 'test/unit'
+require 'test/unit/rr'
+require 'tmpdir'
+# require 'test/unit/notify'

data/test/test_img_tag.rb

@@ -0,0 +1,22 @@
+require 'test_helper'
+require 'aozora2html'
+
+class ImgTagTest < Test::Unit::TestCase
+  def setup
+    stub(@parser).block_allowed_context?{true} 
+  end
+
+  def test_img_new
+    tag = Img_tag.new(@parser,"foo.png","img1","alt img1",40,50)
+    assert_equal Img_tag, tag.class
+    assert_equal true, tag.kind_of?(Inline_tag)
+  end
+
+  def test_to_s
+    tag = Img_tag.new(@parser,"foo.png","img1","alt img1",40,50)
+    assert_equal "<img class=\"img1\" width=\"40\" height=\"50\" src=\"foo.png\" alt=\"alt img1\" />", tag.to_s.encode("utf-8")
+  end
+
+  def teardown
+  end
+end

data/test/test_inline_caption_tag.rb

@@ -0,0 +1,23 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class InlineCaptionTagTest < Test::Unit::TestCase
+  def setup
+    stub(@parser).block_allowed_context?{true}
+  end
+
+  def test_caption_new
+    tag = Inline_caption_tag.new(@parser,"aaa")
+    assert_equal Inline_caption_tag, tag.class
+    assert_equal true, tag.kind_of?(Inline_tag)
+  end
+
+  def test_to_s
+    tag = Inline_caption_tag.new(@parser,"テスト".encode("shift_jis"))
+    assert_equal "<span class=\"caption\">テスト</span>", tag.to_s.encode("utf-8")
+  end
+
+  def teardown
+  end
+end

data/test/test_inline_font_size_tag.rb

@@ -0,0 +1,33 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class InlineFontSizeTagTest < Test::Unit::TestCase
+  def setup
+    stub(@parser).block_allowed_context?{true}
+  end
+
+  def test_font_size_new
+    tag = Inline_font_size_tag.new(@parser,"aa",1,:dai)
+    assert_equal Inline_font_size_tag, tag.class
+    assert_equal true, tag.kind_of?(Inline_tag)
+  end
+
+  def test_to_s
+    tag = Inline_font_size_tag.new(@parser,"テスト".encode("shift_jis"),1,:dai)
+    assert_equal "<span class=\"dai1\" style=\"font-size: large;\">テスト</span>", tag.to_s.encode("utf-8")
+  end
+
+  def test_to_s2
+    tag = Inline_font_size_tag.new(@parser,"テスト".encode("shift_jis"),2,:sho)
+    assert_equal "<span class=\"sho2\" style=\"font-size: x-small;\">テスト</span>", tag.to_s.encode("utf-8")
+  end
+
+  def test_to_s3
+    tag = Inline_font_size_tag.new(@parser,"テスト".encode("shift_jis"),3,:sho)
+    assert_equal "<span class=\"sho3\" style=\"font-size: xx-small;\">テスト</span>", tag.to_s.encode("utf-8")
+  end
+
+  def teardown
+  end
+end

data/test/test_inline_keigakomi_tag.rb

@@ -0,0 +1,23 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class InlineKeigakomiTagTest < Test::Unit::TestCase
+  def setup
+    stub(@parser).block_allowed_context?{true}
+  end
+
+  def test_keigakomi_new
+    tag = Inline_keigakomi_tag.new(@parser,"aaa")
+    assert_equal Inline_keigakomi_tag, tag.class
+    assert_equal true, tag.kind_of?(Inline_tag)
+  end
+
+  def test_to_s
+    tag = Inline_keigakomi_tag.new(@parser,"テスト".encode("shift_jis"))
+    assert_equal "<span class=\"keigakomi\">テスト</span>", tag.to_s.encode("utf-8")
+  end
+
+  def teardown
+  end
+end

data/test/test_inline_yokogumi_tag.rb

@@ -0,0 +1,23 @@
+# encoding: utf-8
+require 'test_helper'
+require 'aozora2html'
+
+class InlineYokogumiTagTest < Test::Unit::TestCase
+  def setup
+    stub(@parser).block_allowed_context?{true}
+  end
+
+  def test_yokogumi_new
+    tag = Inline_yokogumi_tag.new(@parser,"aaa")
+    assert_equal Inline_yokogumi_tag, tag.class
+    assert_equal true, tag.kind_of?(Inline_tag)
+  end
+
+  def test_to_s
+    tag = Inline_yokogumi_tag.new(@parser,"テスト".encode("shift_jis"))
+    assert_equal "<span class=\"yokogumi\">テスト</span>", tag.to_s.encode("utf-8")
+  end
+
+  def teardown
+  end
+end