tmtms-review 1.0.0

data/lib/review/htmllayout.rb

@@ -0,0 +1,19 @@
+# Copyright (c) 2009 Narihiro Nakamura <authornari@gmail.com>
+require 'erb'
+
+class HTMLLayout
+  def initialize(src, title, template)
+    @body = src
+    @title = title
+    @template = template
+  end
+  attr_reader :body, :title
+
+  def result
+    if File.exist?(@template)
+      return ERB.new(IO.read(@template)).result(binding)
+    else
+      return @src
+    end
+  end
+end

data/lib/review/htmlutils.rb

@@ -0,0 +1,36 @@
+#
+# $Id: htmlutils.rb 2227 2006-05-13 00:09:08Z aamine $
+#
+# Copyright (c) 2002-2006 Minero Aoki
+#
+# This program is free software.
+# You can distribute or modify this program under the terms of
+# the GNU LGPL, Lesser General Public License version 2.1.
+#
+
+module ReVIEW
+
+  module HTMLUtils
+    ESC = {
+      '&' => '&',
+      '<' => '&lt;',
+      '>' => '&gt;',
+      '"' => '&quot;'
+    }
+
+    def escape_html(str)
+      t = ESC
+      str.gsub(/[&"<>]/) {|c| t[c] }
+    end
+
+    def unescape_html(str)
+      # FIXME better code
+      str.gsub('&quot;', '"').gsub('&gt;', '>').gsub('&lt;', '<').gsub('&amp;', '&')
+    end
+
+    def strip_html(str)
+      str.gsub(/<\/?[^>]*>/, "")
+    end
+  end
+
+end   # module ReVIEW

data/lib/review/i18n.rb

@@ -0,0 +1,30 @@
+# -*- coding: utf-8 -*-
+require 'yaml'
+
+module ReVIEW
+  class I18n
+    def self.setup
+      user_i18n = YAML.load_file(File.expand_path "locale.yaml", ENV["PWD"])
+      I18n.i18n user_i18n["locale"], user_i18n
+    rescue
+      I18n.i18n "ja"
+    end
+
+    def self.i18n(locale, user_i18n = {})
+      locale ||= "ja"
+      i18n_yaml_path = File.expand_path "i18n.yaml", File.dirname(__FILE__)
+      @i18n = YAML.load_file(i18n_yaml_path)[locale]
+      if @i18n
+        @i18n.merge!(user_i18n)
+      end
+    end
+
+    def self.t(str, args = nil)
+      @i18n[str] % args
+    rescue
+      str
+    end
+  end
+
+  I18n.setup
+end

data/lib/review/i18n.yaml

@@ -0,0 +1,34 @@
+ja:
+  image: 図
+  table: 表
+  list: リスト
+  part: 第%d部
+  chapter: 第%d章
+  chapter_postfix: "　"
+  appendix: 付録%s
+  numberless_image: "図:"
+  format_number: "%s.%d"
+  format_number_header: "%s.%d:"
+  format_number_without_chapter: "%d"
+  format_number_header_without_chapter: "%d:"
+  caption_prefix: " "
+  caption_prefix_idgxml: "　"
+  ruby_prefix: "（"
+  ruby_postfix: "）"
+
+en:
+  image: "Figure "
+  table: "Table "
+  list: "List "
+  chapter: Chapter %d
+  chapter_postfix: ". "
+  appendix: Appendix %s
+  numberless_image: "Figure:"
+  format_number: "%s.%d"
+  format_number_header: "%s.%d:"
+  format_number_without_chapter: "%d"
+  format_number_header_without_chapter: "%d:"
+  caption_prefix: " "
+  caption_prefix_idgxml: "　"
+  ruby_prefix: "("
+  ruby_postfix: ")"

data/lib/review/idgxmlbuilder.rb

@@ -0,0 +1,1145 @@
+# encoding: utf-8
+#
+# Copyright (c) 2002-2007 Minero Aoki
+#               2008-2012 Minero Aoki, Kenshi Muto
+#
+# This program is free software.
+# You can distribute or modify this program under the terms of
+# the GNU LGPL, Lesser General Public License version 2.1.
+#
+
+require 'review/builder'
+require 'review/htmlutils'
+require 'review/textutils'
+require 'nkf'
+
+module ReVIEW
+
+  class IDGXMLBuilder < Builder
+
+    include TextUtils
+    include HTMLUtils
+
+    [:ttbold, :hint, :maru, :keytop, :labelref, :ref, :pageref, :balloon].each {|e| Compiler.definline(e) }
+    Compiler.defsingle(:dtp, 1)
+
+    Compiler.defblock(:insn, 0..1)
+    Compiler.defblock(:memo, 0..1)
+    Compiler.defblock(:tip, 0..1)
+    Compiler.defblock(:info, 0..1)
+    Compiler.defblock(:planning, 0..1)
+    Compiler.defblock(:best, 0..1)
+    Compiler.defblock(:important, 0..1)
+    Compiler.defblock(:security, 0..1)
+    Compiler.defblock(:caution, 0..1)
+    Compiler.defblock(:notice, 0..1)
+    Compiler.defblock(:point, 0..1)
+    Compiler.defblock(:shoot, 0..1)
+    Compiler.defblock(:reference, 0)
+    Compiler.defblock(:term, 0)
+    Compiler.defblock(:link, 0..1)
+    Compiler.defblock(:practice, 0)
+    Compiler.defblock(:expert, 0)
+    Compiler.defblock(:rawblock, 0)
+
+    def pre_paragraph
+      '<p>'
+    end
+
+    def post_paragraph
+      '</p>'
+    end
+
+    def extname
+      '.xml'
+    end
+
+    def builder_init(no_error = false)
+      @no_error = no_error
+    end
+    private :builder_init
+
+    def builder_init_file
+      @warns = []
+      @errors = []
+      @section = 0
+      @subsection = 0
+      @subsubsection = 0
+      @subsubsubsection = 0
+      @noindent = nil
+      @rootelement = "doc"
+      @secttags = nil
+      @tsize = nil
+      @texblockequation = 0
+      @texinlineequation = 0
+
+      print %Q(<?xml version="1.0" encoding="UTF-8"?>\n)
+      print %Q(<#{@rootelement} xmlns:aid="http://ns.adobe.com/AdobeInDesign/4.0/">)
+      alias puts print unless ReVIEW.book.param["nolf"].nil?
+      @secttags = true unless ReVIEW.book.param["structuredxml"].nil?
+    end
+    private :builder_init_file
+
+    def result
+      s = ""
+      unless @secttags.nil?
+        s += "</sect4>" if @subsubsubsection > 0
+        s += "</sect3>" if @subsubsection > 0
+        s += "</sect2>" if @subsection > 0
+        s += "</sect>" if @section > 0
+        s += "</chapter>" if @chapter.number > 0
+      end
+      messages() + @output.string + s + "</#{@rootelement}>\n"
+    end
+
+    def warn(msg)
+      if @no_error
+        @warns.push [@location.filename, @location.lineno, msg]
+        puts "----WARNING: #{escape_html(msg)}----"
+      else
+        $stderr.puts "#{@location}: warning: #{msg}"
+      end
+    end
+
+    def error(msg)
+      if @no_error
+        @errors.push [@location.filename, @location.lineno, msg]
+        puts "----ERROR: #{escape_html(msg)}----"
+      else
+        $stderr.puts "#{@location}: error: #{msg}"
+      end
+    end
+
+    def messages
+      error_messages() + warning_messages()
+    end
+
+    def error_messages
+      return '' if @errors.empty?
+      "<h2>Syntax Errors</h2>\n" +
+      "<ul>\n" +
+      @errors.map {|file, line, msg|
+        "<li>#{escape_html(file)}:#{line}: #{escape_html(msg.to_s)}</li>\n"
+      }.join('') +
+      "</ul>\n"
+    end
+
+    def warning_messages
+      return '' if @warns.empty?
+      "<h2>Warnings</h2>\n" +
+      "<ul>\n" +
+      @warns.map {|file, line, msg|
+        "<li>#{escape_html(file)}:#{line}: #{escape_html(msg)}</li>\n"
+      }.join('') +
+      "</ul>\n"
+    end
+
+    def headline(level, label, caption)
+      prefix = ""
+      case level
+      when 1
+        unless @secttags.nil?
+          print "</sect4>" if @subsubsubsection > 0
+          print "</sect3>" if @subsubsection > 0
+          print "</sect2>" if @subsection > 0
+          print "</sect>" if @section > 0
+        end
+
+        print %Q(<chapter id="chap:#{@chapter.number}">) unless @secttags.nil?
+        if @chapter.number.to_s =~ /\A\d+$/
+          prefix = "#{I18n.t("chapter", @chapter.number)}#{I18n.t("chapter_postfix")}"
+        elsif @chapter.number.present?
+          prefix = "#{@chapter.number}#{I18n.t("chapter_postfix")}"
+        end
+        @section = 0
+        @subsection = 0
+        @subsubsection = 0
+        @subsubsubsection = 0
+      when 2
+        unless @secttags.nil?
+          print "</sect4>" if @subsubsubsection > 0
+          print "</sect3>" if @subsubsection > 0
+          print "</sect2>" if @subsection > 0
+          print "</sect>" if @section > 0
+        end
+        @section += 1
+        print %Q(<sect id="sect:#{@chapter.number}.#{@section}">) unless @secttags.nil?
+
+        prefix = @chapter.present? ? "#{@chapter.number}.#{@section}　" : ""
+
+        @subsection = 0
+        @subsubsection = 0
+        @subsubsubsection = 0
+      when 3
+        unless @secttags.nil?
+          print "</sect4>" if @subsubsubsection > 0
+          print "</sect3>" if @subsubsection > 0
+          print "</sect2>" if @subsection > 0
+        end
+
+        @subsection += 1
+        print %Q(<sect2 id="sect:#{@chapter.number}.#{@section}.#{@subsection}">) unless @secttags.nil?
+        prefix = @chapter.number.present? ? "#{@chapter.number}.#{@section}.#{@subsection}#{I18n.t("chapter_postfix")}" : ""
+
+        @subsubsection = 0
+        @subsubsubsection = 0
+      when 4
+        unless @secttags.nil?
+          print "</sect4>" if @subsubsubsection > 0
+          print "</sect3>" if @subsubsection > 0
+        end
+
+        @subsubsection += 1
+        print %Q(<sect3 id="sect:#{@chapter.number}.#{@section}.#{@subsection}.#{@subsubsection}">) unless @secttags.nil?
+        prefix = @chapter.number.present? ? "#{@chapter.number}.#{@section}.#{@subsection}.#{@subsubsection}#{I18n.t("chapter_postfix")}" : ""
+
+        @subsubsubsection = 0
+      when 5
+        unless @secttags.nil?
+          print "</sect4>" if @subsubsubsection > 0
+        end
+
+        @subsubsubsection += 1
+        print %Q(<sect4 id="sect:#{@chapter.number}.#{@section}.#{@subsection}.#{@subsubsection}.#{@subsubsubsection}">) unless @secttags.nil?
+        prefix = @chapter.number.present? ? "#{@chapter.number}.#{@section}.#{@subsection}.#{@subsubsection}.#{@subsubsubsection}#{I18n.t("chapter_postfix")}" : ""
+      else
+        raise "caption level too deep or unsupported: #{level}"
+      end
+
+      prefix = "" if (level.to_i > ReVIEW.book.param["secnolevel"])
+      label = label.nil? ? "" : " id=\"#{label}\""
+      toccaption = escape_html(compile_inline(caption.gsub(/@<fn>\{.+?\}/, '')).gsub(/<[^>]+>/, ''))
+      puts %Q(<title#{label} aid:pstyle="h#{level}">#{prefix}#{compile_inline(caption)}</title><?dtp level="#{level}" section="#{prefix}#{toccaption}"?>)
+    end
+
+    def ul_begin
+      level = block_given? ? yield : ""
+      level = nil if level == 1
+      puts "<ul#{level == 1 ? nil : level}>"
+    end
+
+    def ul_item(lines)
+      puts %Q(<li aid:pstyle="ul-item">#{lines.join.chomp}</li>)
+    end
+
+    def ul_item_begin(lines)
+      print %Q(<li aid:pstyle="ul-item">#{lines.join.chomp})
+    end
+
+    def ul_item_end
+      puts "</li>"
+    end
+
+    def choice_single_begin
+      puts "<choice type='single'>"
+    end
+
+    def choice_multi_begin
+      puts "<choice type='multi'>"
+    end
+
+    def choice_single_end
+      puts "</choice>"
+    end
+
+    def choice_multi_end
+      puts "</choice>"
+    end
+
+    def ul_end
+      level = block_given? ? yield : ""
+      level = nil if level == 1
+      puts "</ul#{level}>"
+    end
+
+    def ol_begin
+      puts '<ol>'
+    end
+
+    def ol_item(lines, num)
+      puts %Q(<li aid:pstyle="ol-item" num="#{num}">#{lines.join.chomp}</li>)
+    end
+
+    def ol_end
+      puts '</ol>'
+    end
+
+    def dl_begin
+      puts '<dl>'
+    end
+
+    def dt(line)
+      puts "<dt>#{line}</dt>"
+    end
+
+    def dd(lines)
+      puts "<dd>#{lines.join.chomp}</dd>"
+    end
+
+    def dl_end
+      puts '</dl>'
+    end
+
+    def paragraph(lines)
+      if @noindent.nil?
+        if lines[0] =~ /\A(\t+)/
+          puts %Q(<p inlist="#{$1.size}">#{lines.join('').sub(/\A\t+/, "")}</p>)
+        else
+          puts "<p>#{lines.join}</p>"
+        end
+      else
+        puts %Q(<p aid:pstyle="noindent" noindent='1'>#{lines.join}</p>)
+        @noindent = nil
+      end
+    end
+
+    def read(lines)
+      if ReVIEW.book.param["deprecated-blocklines"].nil?
+        puts %Q[<lead>#{split_paragraph(lines).join}</lead>]
+      else
+        puts %Q[<p aid:pstyle="lead">#{lines.join}</p>]
+      end
+    end
+
+    alias :lead read
+
+    def inline_list(id)
+      chapter, id = extract_chapter_id(id)
+      if get_chap(chapter).nil?
+        "<span type='list'>#{I18n.t("list")}#{I18n.t("format_number_without_chapter", [chapter.list(id).number])}</span>"
+      else
+        "<span type='list'>#{I18n.t("list")}#{I18n.t("format_number", [get_chap(chapter), chapter.list(id).number])}</span>"
+      end
+    end
+
+    def list_header(id, caption)
+      puts %Q[<codelist>]
+      if get_chap.nil?
+        puts %Q[<caption>#{I18n.t("list")}#{I18n.t("format_number_without_chapter", [@chapter.list(id).number])}#{I18n.t("caption_prefix_idgxml")}#{compile_inline(caption)}</caption>]
+      else
+        puts %Q[<caption>#{I18n.t("list")}#{I18n.t("format_number", [get_chap, @chapter.list(id).number])}#{I18n.t("caption_prefix_idgxml")}#{compile_inline(caption)}</caption>]
+      end
+    end
+
+    def list_body(lines)
+      print %Q(<pre>)
+      no = 1
+      lines.each do |line|
+        unless ReVIEW.book.param["listinfo"].nil?
+          print "<listinfo line=\"#{no}\""
+          print " begin=\"1\"" if no == 1
+          print " end=\"#{no}\"" if no == lines.size
+          print ">"
+        end
+        print detab(line)
+        print "\n"
+        print "</listinfo>" unless ReVIEW.book.param["listinfo"].nil?
+        no += 1
+      end
+      puts "</pre></codelist>"
+    end
+
+    def emlist(lines, caption = nil)
+      quotedlist lines, 'emlist', caption
+    end
+
+    def emlistnum(lines, caption = nil)
+      _lines = []
+      lines.each_with_index do |line, i|
+        _lines << detab("<span type='lineno'>" + (i + 1).to_s.rjust(2) + ": </span>" + line)
+      end
+      quotedlist _lines, 'emlistnum', caption
+    end
+
+    def listnum_body(lines)
+      print %Q(<pre>)
+      lines.each_with_index do |line, i|
+        print detab("<span type='lineno'>" + (i + 1).to_s.rjust(2) + ": </span>" + line)
+        print "\n"
+      end
+      puts "</pre></codelist>"
+    end
+
+    def cmd(lines, caption = nil)
+      quotedlist lines, 'cmd', caption
+    end
+
+    def quotedlist(lines, css_class, caption)
+      print %Q[<list type='#{css_class}'>]
+      puts "<caption aid:pstyle='#{css_class}-title'>#{compile_inline(caption)}</caption>" unless caption.nil?
+      print %Q[<pre>]
+      no = 1
+      lines.each do |line|
+        unless ReVIEW.book.param["listinfo"].nil?
+          print "<listinfo line=\"#{no}\""
+          print " begin=\"1\"" if no == 1
+          print " end=\"#{no}\"" if no == lines.size
+          print ">"
+        end
+        print detab(line)
+        print "\n"
+        print "</listinfo>" unless ReVIEW.book.param["listinfo"].nil?
+        no += 1
+      end
+      puts '</pre></list>'
+    end
+    private :quotedlist
+
+    def quote(lines)
+      if ReVIEW.book.param["deprecated-blocklines"].nil?
+        blocked_lines = split_paragraph(lines)
+        puts "<quote>#{blocked_lines.join("")}</quote>"
+      else
+        puts "<quote>#{lines.join("\n")}</quote>"
+      end
+    end
+
+    def inline_table(id)
+      chapter, id = extract_chapter_id(id)
+      if get_chap(chapter).nil?
+        "<span type='table'>#{I18n.t("table")}#{I18n.t("format_number_without_chapter", [chapter.table(id).number])}</span>"
+      else
+        "<span type='table'>#{I18n.t("table")}#{I18n.t("format_number", [get_chap(chapter), chapter.table(id).number])}</span>"
+      end
+    end
+
+    def inline_img(id)
+      chapter, id = extract_chapter_id(id)
+      if get_chap(chapter).nil?
+        "<span type='image'>#{I18n.t("image")}#{I18n.t("format_number_without_chapter", [chapter.image(id).number])}</span>"
+      else
+        "<span type='image'>#{I18n.t("image")}#{I18n.t("format_number", [get_chap(chapter), chapter.image(id).number])}</span>"
+      end
+    end
+ 
+    def handle_metric(str)
+      k, v = str.split('=', 2)
+      return %Q|#{k}=\"#{v.sub(/\A["']/, '').sub(/["']\Z/, '')}\"|
+    end
+      
+    def result_metric(array)
+      " #{array.join(' ')}"
+    end
+
+    def image_image(id, caption, metric=nil)
+      metrics = parse_metric("idgxml", metric)
+      puts "<img>"
+      puts %Q[<Image href="file://#{@chapter.image(id).path.sub(/\A.\//, "")}"#{metrics} />]
+      image_header id, caption
+      puts "</img>"
+    end
+
+    def image_dummy(id, caption, lines)
+      if ReVIEW.book.param["subdirmode"]
+        warn "image file not exist: images/#{@chapter.id}/#{id}.eps" unless File.exist?("images/#{@chapter.id}/#{id}.eps")
+      elsif ReVIEW.book.param["singledirmode"]
+        warn "image file not exist: images/#{@chapter.id}/#{id}.eps" unless File.exist?("images/#{id}.eps")
+      else
+        warn "image file not exist: images/#{@chapter.id}-#{id}.eps" unless File.exist?("images/#{@chapter.id}-#{id}.eps")
+      end
+      puts "<img>"
+      print %Q[<pre aid:pstyle="dummyimage">]
+      lines.each do |line|
+        print detab(line)
+        print "\n"
+      end
+      print %Q[</pre>]
+      image_header id, caption
+      puts "</img>"
+    end
+
+    def image_header(id, caption)
+      if get_chap.nil?
+        puts %Q[<caption>#{I18n.t("image")}#{I18n.t("format_number_without_chapter", [@chapter.image(id).number])}#{I18n.t("caption_prefix_idgxml")}#{compile_inline(caption)}</caption>]
+      else
+        puts %Q[<caption>#{I18n.t("image")}#{I18n.t("format_number", [get_chap, @chapter.image(id).number])}#{I18n.t("caption_prefix_idgxml")}#{compile_inline(caption)}</caption>]
+      end
+    end
+
+    def texequation(lines)
+      @texblockequation += 1
+      puts %Q[<replace idref="texblock-#{@texblockequation}">]
+      puts '<pre>'
+      puts "#{lines.join("\n")}"
+      puts '</pre>'
+      puts '</replace>'
+    end
+
+    def table(lines, id = nil, caption = nil)
+      tablewidth = nil
+      col = 0
+      unless ReVIEW.book.param["tableopt"].nil?
+        tablewidth = ReVIEW.book.param["tableopt"].split(",")[0].to_f / 0.351 # mm -> pt
+      end
+      puts "<table>"
+      rows = []
+      sepidx = nil
+      lines.each_with_index do |line, idx|
+        if /\A[\=\-]{12}/ =~ line
+          sepidx ||= idx
+          next
+        end
+        if tablewidth.nil?
+          rows.push(line.gsub(/\t\.\t/, "\t\t").gsub(/\t\.\.\t/, "\t.\t").gsub(/\t\.\Z/, "\t").gsub(/\t\.\.\Z/, "\t.").gsub(/\A\./, ""))
+        else
+          rows.push(line.gsub(/\t\.\t/, "\tDUMMYCELLSPLITTER\t").gsub(/\t\.\.\t/, "\t.\t").gsub(/\t\.\Z/, "\tDUMMYCELLSPLITTER").gsub(/\t\.\.\Z/, "\t.").gsub(/\A\./, ""))
+        end
+        _col = rows[rows.length - 1].split(/\t/).length
+        col = _col if _col > col
+      end
+
+      cellwidth = []
+      unless tablewidth.nil?
+        if @tsize.nil?
+          col.times {|n| cellwidth[n] = tablewidth / col }
+        else
+          cellwidth = @tsize.split(/\s*,\s*/)
+          totallength = 0
+          cellwidth.size.times do |n|
+            cellwidth[n] = cellwidth[n].to_f / 0.351 # mm -> pt
+            totallength = totallength + cellwidth[n]
+            warn "total length exceeds limit for table: #{id}" if totallength > tablewidth
+          end
+          if cellwidth.size < col
+            cw = (tablewidth - totallength) / (col - cellwidth.size)
+            warn "auto cell sizing exceeds limit for table: #{id}" if cw <= 0
+            for i in cellwidth.size..(col - 1)
+              cellwidth[i] = cw
+            end
+          end
+        end
+      end
+
+      begin
+        table_header id, caption unless caption.nil?
+      rescue KeyError => err
+        error "no such table: #{id}"
+      end
+      return if rows.empty?
+
+      if tablewidth.nil?
+        print "<tbody>"
+      else
+        print %Q[<tbody xmlns:aid5="http://ns.adobe.com/AdobeInDesign/5.0/" aid:table="table" aid:trows="#{rows.length}" aid:tcols="#{col}">]
+      end
+
+      if sepidx
+        sepidx.times do |y|
+          if tablewidth.nil?
+            puts %Q[<tr type="header">#{rows.shift}</tr>]
+          else
+            i = 0
+            rows.shift.split(/\t/).each_with_index do |cell, x|
+              print %Q[<td xyh="#{x + 1},#{y + 1},#{sepidx}" aid:table="cell" aid:theader="1" aid:crows="1" aid:ccols="1" aid:ccolwidth="#{sprintf("%.13f", cellwidth[i])}">#{cell.sub("DUMMYCELLSPLITTER", "")}</td>]
+              i += 1
+            end
+          end
+        end
+      end
+      trputs(tablewidth, rows, cellwidth, sepidx)
+      puts "</tbody></table>"
+      @tsize = nil
+    end
+
+    def trputs(tablewidth, rows, cellwidth, sepidx)
+      sepidx = 0 if sepidx.nil?
+      if tablewidth.nil?
+        lastline = rows.pop
+        rows.each {|row| puts %Q[<tr>#{row}</tr>] }
+        puts %Q[<tr type="lastline">#{lastline}</tr>] unless lastline.nil?
+      else
+        rows.each_with_index do |row, y|
+          i = 0
+          row.split(/\t/).each_with_index do |cell, x|
+            print %Q[<td xyh="#{x + 1},#{y + 1 + sepidx},#{sepidx}" aid:table="cell" aid:crows="1" aid:ccols="1" aid:ccolwidth="#{sprintf("%.13f", cellwidth[i])}">#{cell.sub("DUMMYCELLSPLITTER", "")}</td>]
+            i += 1
+          end
+        end
+      end
+    end
+
+    def table_header(id, caption)
+      if get_chap.nil?
+      puts %Q[<caption>#{I18n.t("table")}#{I18n.t("format_number_without_chapter", [@chapter.table(id).number])}#{I18n.t("caption_prefix_idgxml")}#{compile_inline(caption)}</caption>]
+      else
+        puts %Q[<caption>#{I18n.t("table")}#{I18n.t("format_number", [get_chap, @chapter.table(id).number])}#{I18n.t("caption_prefix_idgxml")}#{compile_inline(caption)}</caption>]
+      end
+    end
+
+    def table_begin(ncols)
+    end
+
+    def tr(rows)
+      puts %Q[<tr>#{rows.join("\t")}</tr>]
+    end
+
+    def th(str)
+      %Q[<?dtp tablerow header?>#{str}]
+    end
+
+    def td(str)
+      str
+    end
+    
+    def table_end
+      print "<?dtp tablerow last?>"
+    end
+
+    def comment(str)
+      print %Q(<!-- [Comment] #{escape_html(str)} -->)
+    end
+
+    def footnote(id, str)
+      # see inline_fn
+    end
+
+    def inline_fn(id)
+      %Q[<footnote>#{compile_inline(@chapter.footnote(id).content.strip)}</footnote>]
+    end
+
+    def compile_ruby(base, ruby)
+      %Q[<GroupRuby><aid:ruby xmlns:aid="http://ns.adobe.com/AdobeInDesign/3.0/"><aid:rb>#{escape_html(base.sub(/\A\s+/, "").sub(/\s+$/, ""))}</aid:rb><aid:rt>#{escape_html(ruby.sub(/\A\s+/, "").sub(/\s+$/, ""))}</aid:rt></aid:ruby></GroupRuby>]
+    end
+
+    def compile_kw(word, alt)
+      '<keyword>' +
+        if alt
+        then escape_html("#{word}（#{alt.strip}）")
+        else escape_html(word)
+        end +
+      '</keyword>' +
+        %Q[<index value="#{escape_html(word)}" />] +
+        if alt
+          alt.split(/\s*,\s*/).collect! {|e| %Q[<index value="#{escape_html(e.strip)}" />] }.join
+        else
+          ""
+        end
+    end
+
+    def compile_href(url, label)
+      %Q[<a linkurl='#{escape_html(url)}'>#{label.nil? ? escape_html(url) : escape_html(label)}</a>]
+    end
+
+    def inline_sup(str)
+      %Q[<sup>#{escape_html(str)}</sup>]
+    end
+
+    def inline_sub(str)
+      %Q[<sub>#{escape_html(str)}</sub>]
+    end
+
+    def inline_raw(str)
+      %Q[#{super(str).gsub("\\n", "\n")}]
+    end
+
+    def inline_hint(str)
+      if ReVIEW.book.param["nolf"].nil?
+        %Q[\n<hint>#{escape_html(str)}</hint>]
+      else
+        %Q[<hint>#{escape_html(str)}</hint>]
+      end
+    end
+
+    def inline_maru(str)
+      if str =~ /\A\d+\Z/
+        sprintf("&#x%x;", 9311 + str.to_i)
+      elsif str =~ /\A[A-Z]\Z/
+        begin
+          sprintf("&#x%x;", 9398 + str.codepoints.to_a[0] - 65)
+        rescue NoMethodError
+          sprintf("&#x%x;", 9398 + str[0] - 65)
+        end
+      elsif str =~ /\A[a-z]\Z/
+        begin
+          sprintf("&#x%x;", 9392 + str.codepoints.to_a[0] - 65)
+        rescue NoMethodError
+          sprintf("&#x%x;", 9392 + str[0] - 65)
+        end
+      else
+        raise "can't parse maru: #{str}"
+      end
+    end
+
+    def inline_idx(str)
+      %Q(#{escape_html(str)}<index value="#{escape_html(str)}" />)
+    end
+
+    def inline_hidx(str)
+      %Q(<index value="#{escape_html(str)}" />)
+    end
+
+    def inline_ami(str)
+      %Q(<ami>#{escape_html(str)}</ami>)
+    end
+
+    def inline_i(str)
+      %Q(<i>#{escape_html(str)}</i>)
+    end
+
+    def inline_b(str)
+      %Q(<b>#{escape_html(str)}</b>)
+    end
+
+    def inline_tt(str)
+      %Q(<tt>#{escape_html(str)}</tt>)
+    end
+
+    def inline_ttb(str)
+      index = escape_html(str).gsub(/<.*?>/, "").gsub(/\*/, "ESCAPED_ASTERISK").gsub(/'/, "&#27;")
+      %Q(<tt style='bold'>#{escape_html(str)}</tt><index value='#{index}' />)
+    end
+
+    alias :inline_ttbold inline_ttb
+
+    def inline_tti(str)
+      %Q(<tt style='italic'>#{escape_html(str)}</tt>)
+    end
+
+    def inline_u(str)
+      %Q(<underline>#{escape_html(str)}</underline>)
+    end
+
+    def inline_icon(id)
+      begin
+        %Q[<Image href="file://#{@chapter.image(id).path.sub(/\A\.\//, "")}" type="inline" />]
+      rescue
+        warn "no such icon image: #{id}"
+        ""
+      end
+    end
+
+    def inline_bou(str)
+      %Q[<bou>#{escape_html(str)}</bou>]
+    end
+
+    def inline_keytop(str)
+      %Q[<keytop>#{escape_html(str)}</keytop>]
+    end
+
+    def inline_labelref(idref)
+      %Q[<ref idref='#{escape_html(idref)}'>「●●　#{escape_html(idref)}」</ref>] # FIXME:節名とタイトルも込みで要出力
+    end
+
+    alias inline_ref inline_labelref
+
+    def inline_pageref(idref)
+      %Q[<pageref idref='#{escape_html(idref)}'>●●</pageref>] # ページ番号を参照
+    end
+
+    def inline_balloon(str)
+      %Q[<balloon>#{escape_html(str).gsub(/@maru\[(\d+)\]/) {|m| inline_maru($1)}}</balloon>]
+    end
+
+    def inline_uchar(str)
+      %Q[&#x#{str};]
+    end
+
+    def inline_m(str)
+      @texinlineequation += 1
+      %Q[<replace idref="texinline-#{@texinlineequation}"><pre>#{escape_html(str)}</pre></replace>]
+    end
+
+    def noindent
+      @noindent = true
+    end
+
+    def linebreak
+      # FIXME:pが閉じちゃってるので一度戻らないといけないが、難しい…。
+      puts "<br />"
+    end
+
+    def pagebreak
+      puts "<pagebreak />"
+    end
+
+    def nonum_begin(level, label, caption)
+      puts %Q[<title aid:pstyle="h#{level}">#{compile_inline(caption)}</title><?dtp level="#{level}" section="#{escape_html(compile_inline(caption))}"?>]
+    end
+
+    def nonum_end(level)
+    end
+
+    def circle_begin(level, label, caption)
+      puts %Q[<title aid:pstyle="smallcircle">&#x2022;#{compile_inline(caption)}</title>]
+    end
+
+    def circle_end(level)
+    end
+
+    def common_column_begin(type, caption)
+      print "<#{type}column>"
+      puts %Q[<title aid:pstyle="#{type}column-title">#{compile_inline(caption)}</title>]
+    end
+
+    def common_column_end(type)
+      puts "</#{type}column>"
+    end
+
+    def column_begin(level, label, caption)
+      common_column_begin("", caption)
+    end
+
+    def column_end(level)
+      common_column_end("")
+    end
+
+    def xcolumn_begin(level, label, caption)
+      common_column_begin("x", caption)
+    end
+
+    def xcolumn_end(level)
+      common_column_end("x")
+    end
+
+    def world_begin(level, label, caption)
+      common_column_begin("world", caption)
+    end
+
+    def world_end(level)
+      common_column_end("world")
+    end
+
+    def hood_begin(level, label, caption)
+      common_column_begin("hood", caption)
+    end
+
+    def hood_end(level)
+      common_column_end("hood")
+    end
+
+    def edition_begin(level, label, caption)
+      common_column_begin("edition", caption)
+    end
+
+    def edition_end(level)
+      common_column_end("edition")
+    end
+
+    def insideout_begin(level, label, caption)
+      common_column_begin("insideout", caption)
+    end
+
+    def insideout_end(level)
+      common_column_end("insideout")
+    end
+
+    def ref_begin(level, label, caption)
+      if !label.nil?
+        puts "<reference id='#{label}'>"
+      else
+        puts "<reference>"
+      end
+    end
+
+    def ref_end(level)
+      puts "</reference>"
+    end
+
+    def sup_begin(level, label, caption)
+      if !label.nil?
+        puts "<supplement id='#{label}'>"
+      else
+        puts "<supplement>"
+      end
+    end
+
+    def sup_end(level)
+      puts "</supplement>"
+    end
+
+    def flushright(lines)
+      if ReVIEW.book.param["deprecated-blocklines"].nil?
+        puts split_paragraph(lines).join.gsub("<p>", "<p align='right'>")
+      else
+        puts "<p align='right'>#{lines.join("\n")}</p>"
+      end
+    end
+
+    def centering(lines)
+      puts split_paragraph(lines).join.gsub("<p>", "<p align='center'>")
+    end
+
+    def captionblock(type, lines, caption, specialstyle = nil)
+      print "<#{type}>"
+      style = specialstyle.nil? ? "#{type}-title" : specialstyle
+      puts "<title aid:pstyle='#{style}'>#{compile_inline(caption)}</title>" unless caption.nil?
+      if ReVIEW.book.param["deprecated-blocklines"].nil?
+        blocked_lines = split_paragraph(lines)
+        puts "#{blocked_lines.join}</#{type}>"
+      else
+        puts "#{lines.join("\n")}</#{type}>"
+      end
+    end
+
+    def note(lines, caption = nil)
+      captionblock("note", lines, caption)
+    end
+
+    def memo(lines, caption = nil)
+      captionblock("memo", lines, caption)
+    end
+
+    def tip(lines, caption = nil)
+      captionblock("tip", lines, caption)
+    end
+
+    def info(lines, caption = nil)
+      captionblock("info", lines, caption)
+    end
+
+    def planning(lines, caption = nil)
+      captionblock("planning", lines, caption)
+    end
+
+    def best(lines, caption = nil)
+      captionblock("best", lines, caption)
+    end
+
+    def important(lines, caption = nil)
+      captionblock("important", lines, caption)
+    end
+
+    def security(lines, caption = nil)
+      captionblock("security", lines, caption)
+    end
+
+    def caution(lines, caption = nil)
+      captionblock("caution", lines, caption)
+    end
+
+    def term(lines)
+      captionblock("term", lines, nil)
+    end
+
+    def link(lines, caption = nil)
+      captionblock("link", lines, caption)
+    end
+
+    def notice(lines, caption = nil)
+      if caption.nil?
+        captionblock("notice", lines, nil)
+      else
+        captionblock("notice-t", lines, caption, "notice-title")
+      end
+    end
+
+    def point(lines, caption = nil)
+      if caption.nil?
+        captionblock("point", lines, nil)
+      else
+        captionblock("point-t", lines, caption, "point-title")
+      end
+    end
+
+    def shoot(lines, caption = nil)
+      if caption.nil?
+        captionblock("shoot", lines, nil)
+      else
+        captionblock("shoot-t", lines, caption, "shoot-title")
+      end
+    end
+
+    def reference(lines)
+      captionblock("reference", lines, nil)
+    end
+
+    def practice(lines)
+      captionblock("practice", lines, nil)
+    end
+    
+    def expert(lines)
+      captionblock("expert", lines, nil)
+    end
+
+    def syntaxblock(type, lines, caption)
+      if caption.nil?
+        puts %Q[<#{type}>]
+      else
+        titleopentag = %Q[caption aid:pstyle="#{type}-title"]
+        titleclosetag = "caption"
+        if type == "insn"
+          titleopentag = %Q[floattitle type="insn"]
+          titleclosetag = "floattitle"
+        end
+        puts %Q[<#{type}><#{titleopentag}>#{compile_inline(caption)}</#{titleclosetag}>]
+      end
+      no = 1
+      lines.each do |line|
+        unless ReVIEW.book.param["listinfo"].nil?
+          print %Q[<listinfo line="#{no}"]
+          print %Q[ begin="1"] if no == 1
+          print %Q[ end="#{no}"] if no == lines.size
+          print %Q[>]
+        end
+        print detab(line)
+        print "\n"
+        print "</listinfo>" unless ReVIEW.book.param["listinfo"].nil?
+        no += 1
+      end
+      puts "</#{type}>"
+    end
+
+    def insn(lines, caption = nil)
+      syntaxblock("insn", lines, caption)
+    end
+
+    def box(lines, caption = nil)
+      syntaxblock("box", lines, caption)
+    end
+
+    def indepimage(id, caption=nil, metric=nil)
+      metrics = parse_metric("idgxml", metric)
+      puts "<img>"
+      begin
+        puts %Q[<Image href="file://#{@chapter.image(id).path.sub(/\A\.\//, "")}"#{metrics} />]
+      rescue
+        warn %Q[no such image: #{id}]
+      end
+      puts %Q[<caption>#{compile_inline(caption)}</caption>] if !caption.nil? && !caption.empty?
+      puts "</img>"
+    end
+
+    alias :numberlessimage indepimage
+
+    def label(id)
+      # FIXME
+      print "<label id='#{id}' />"
+    end
+
+    def tsize(str)
+      @tsize = str
+    end
+
+    def dtp(str)
+      print %Q(<?dtp #{str} ?>)
+    end
+
+    def hr
+      print "<hr />"
+    end
+
+    def bpo(lines)
+      puts %Q[<bpo>#{lines.join("\n")}</bpo>]
+    end
+
+    def inline_dtp(str)
+      "<?dtp #{str} ?>"
+    end
+
+    def inline_code(str)
+      %Q[<tt type='inline-code'>#{escape_html(str)}</tt>]
+    end
+
+    def inline_br(str)
+      "\n"
+    end
+
+    def rawblock(lines)
+      no = 1
+      lines.each do |l|
+        print l.gsub("&lt;", "<").gsub("&gt;", ">").gsub("&quot;", "\"").gsub("&amp;", "&")
+        print "\n" unless lines.length == no
+        no = no + 1
+      end
+    end
+
+    def text(str)
+      str
+    end
+
+    def inline_chapref(id)
+      chs = ["", "「", "」"]
+      unless ReVIEW.book.param["chapref"].nil?
+        _chs = convert_inencoding(ReVIEW.book.param["chapref"],
+                                  ReVIEW.book.param["inencoding"]).split(",")
+        if _chs.size != 3
+          error "--chapsplitter must have exactly 3 parameters with comma."
+        else
+          chs = _chs
+        end
+      else
+      end
+      s = "#{chs[0]}#{@chapter.env.chapter_index.number(id)}#{chs[1]}#{@chapter.env.chapter_index.title(id)}#{chs[2]}"
+      if ReVIEW.book.param["chapterlink"]
+        %Q(<link href="#{id}">#{s}</link>)
+      else
+        s
+      end
+    rescue KeyError
+      error "unknown chapter: #{id}"
+      nofunc_text("[UnknownChapter:#{id}]")
+    end
+
+    def inline_chap(id)
+      if ReVIEW.book.param["chapterlink"]
+        %Q(<link href="#{id}">#{@chapter.env.chapter_index.number(id)}</link>)
+      else
+        @chapter.env.chapter_index.number(id)
+      end
+    rescue KeyError
+      error "unknown chapter: #{id}"
+      nofunc_text("[UnknownChapter:#{id}]")
+    end
+
+    def inline_title(id)
+      if ReVIEW.book.param["chapterlink"]
+        %Q(<link href="#{id}">#{@chapter.env.chapter_index.title(id)}</link>)
+      else
+        @chapter.env.chapter_index.title(id)
+      end
+    rescue KeyError
+      error "unknown chapter: #{id}"
+      nofunc_text("[UnknownChapter:#{id}]")
+    end
+
+    def source_header(caption)
+      puts %Q[<source>]
+      puts %Q[<caption>#{compile_inline(caption)}</caption>]
+    end
+
+    def source_body(lines)
+      puts %Q[<pre>]
+      lines.each do |line|
+        print detab(line)
+        print "\n"
+      end
+      puts %Q[</pre></source>]
+    end
+
+    def bibpaper(lines, id, caption)
+      bibpaper_header id, caption
+      unless lines.empty?
+        bibpaper_bibpaper id, caption, lines
+      end
+      puts %Q(</bibitem>)
+    end
+
+    def bibpaper_header(id, caption)
+      puts %Q(<bibitem id="bib-#{id}">)
+      puts "<caption><span type='bibno'>[#{@chapter.bibpaper(id).number}] </span>#{compile_inline(caption)}</caption>"
+    end
+
+    def bibpaper_bibpaper(id, caption, lines)
+        print split_paragraph(lines).join("")
+    end
+
+    def inline_bib(id)
+      %Q(<span type='bibref' idref='#{id}'>[#{@chapter.bibpaper(id).number}]</span>)
+    end
+
+    def inline_recipe(id)
+      # FIXME
+      %Q(<recipe idref="#{escape_html(id)}">[XXX]「#{escape_html(id)}」　p.XX</recipe>)
+    end
+
+    def nofunc_text(str)
+      escape_html(str)
+    end
+
+    def image_ext
+      "eps"
+    end
+
+  end
+
+end   # module ReVIEW