review 1.1.0 → 1.2.0

data/lib/epubmaker/resource.rb

@@ -1,7 +1,7 @@
 # encoding: utf-8
 # = resource.rb -- Message resources for EPUBMaker.
 #
-# Copyright (c) 2010 Kenshi Muto
+# Copyright (c) 2010-2013 Kenshi Muto
 #
 # This program is free software.
 # You can distribute or modify this program under the terms of
@@ -21,44 +21,58 @@ module EPUBMaker
       rescue
         @hash = __send__ :en
       end
-      
+
       @hash.each_pair do |k, v|
         @hash[k] = params[k] unless params[k].nil?
       end
     end
-    
+
     # Return message translation for +key+.
     def v(key)
       return @hash[key]
     end
-    
+
     private
-    # English messages.
+    # English message catalog
     def en
       {
         "toctitle" => "Table of Contents",
         "covertitle" => "Cover",
         "titlepagetitle" => "Title Page",
+        "originaltitle" => "Title Page of Original",
+        "credittitle" => "Credit",
         "colophontitle" => "Colophon",
+        "profiletitle" => "Profile",
+        "advtitle" => "Advertisement",
         "c-aut" => "Author",
+        "c-csl" => "Consultant",
         "c-dsr" => "Designer",
         "c-ill" => "Illustrator",
         "c-edt" => "Editor",
+        "c-pht" => "Director of Photography",
+        "c-trl" => "Translator",
         "c-prt" => "Publisher",
       }
     end
-    
-    # Japanese messages.
+
+    # Japanese message catalog
     def ja
       {
         "toctitle" => "目次",
         "covertitle" => "表紙",
-        "titlepagetitle" => "権利表記",
+        "titlepagetitle" => "大扉",
+        "originaltitle" => "原書大扉",
+        "credittitle" => "クレジット",
         "colophontitle" => "奥付",
+        "advtitle" => "広告",
+        "profiletitle" => "著者紹介",
         "c-aut" => "著　者",
+        "c-csl" => "監　修",
         "c-dsr" => "デザイン",
         "c-ill" => "イラスト",
         "c-edt" => "編　集",
+        "c-pht" => "撮　影",
+        "c-trl" => "翻　訳",
         "c-prt" => "発行所",
       }
     end

data/lib/review/book/base.rb

@@ -64,6 +64,7 @@ module ReVIEW
       :ext,
       :image_dir,
       :image_types,
+      :image_types=,
       :page_metric
 
       def parts

data/lib/review/book/chapter.rb

@@ -22,8 +22,8 @@ module ReVIEW
           book = (books[File.expand_path(basedir)] ||= Book.load(basedir))
           begin
             book.chapter(File.basename(path, '.*'))
-          rescue KeyError => err
-            raise FileNotFound, "no such file: #{path}"
+          rescue KeyError
+            raise FileNotFound, "No such chapter in your book. Check if the catalog files contain the chapter. : #{path}"
           end
         }
       end

data/lib/review/book/compilable.rb

@@ -43,7 +43,7 @@ module ReVIEW
           f.each_line {|l|
             l = convert_inencoding(l, ReVIEW.book.param["inencoding"])
             if l =~ /\A=+/
-              @title = l.sub(/\A=+/, '').strip
+              @title = l.sub(/\A=+(\[.+?\])?(\{.+?\})?/, '').strip
               break
             end
           }

data/lib/review/book/index.rb

@@ -132,6 +132,8 @@ module ReVIEW
 
     class ImageIndex < Index
       class Item
+        @@entries = nil
+
         def initialize(id, number)
           @id = id
           @number = number
@@ -167,39 +169,43 @@ module ReVIEW
         @chapid = chapid
         @basedir = basedir
         @types = types
+
+        @@entries ||= get_entries
+      end
+
+      def get_entries
+        Dir.glob(File.join(@basedir, "**/*.*"))
       end
 
       # internal use only
       def find_pathes(id)
-        if ReVIEW.book.param["subdirmode"]
-          re = /\A#{id}(?i:#{@types.join('|')})\z/x
-          entries().select {|ent| re =~ ent }\
-            .sort_by {|ent| @types.index(File.extname(ent).downcase) }\
-            .map {|ent| "#{@basedir}/#{@chapid}/#{ent}" }
-        elsif ReVIEW.book.param["singledirmode"]
-          re = /\A#{id}(?i:#{@types.join('|')})\z/x
-          entries().select {|ent| re =~ ent }\
-            .sort_by {|ent| @types.index(File.extname(ent).downcase) }\
-            .map {|ent| "#{@basedir}/#{ent}" }
-        else
-          re = /\A#{@chapid.gsub('+', '\\\+').gsub('-', '\\\-')}-#{id}(?i:#{@types.join('|')})\z/x
-          entries().select {|ent| re =~ ent }\
-            .sort_by {|ent| @types.index(File.extname(ent).downcase) }\
-            .map {|ent| "#{@basedir}/#{ent}" }
-        end
-      end
+        pathes = []
 
-      private
+        # 1. <basedir>/<builder>/<chapid>/<id>.<ext>
+        target = "#{@basedir}/#{ReVIEW.book.param['builder']}/#{@chapid}/#{id}"
+        @types.each {|ext| pathes.push("#{target}#{ext}") if @@entries.include?("#{target}#{ext}")}
 
-      def entries
-        # @entries: do not cache for graph
-        if ReVIEW.book.param["subdirmode"]
-          @entries = Dir.entries(File.join(@basedir, @chapid))
-        else
-          @entries = Dir.entries(@basedir)
-        end
-      rescue Errno::ENOENT
-        @entries = []
+        # 2. <basedir>/<builder>/<chapid>-<id>.<ext>
+        target = "#{@basedir}/#{ReVIEW.book.param['builder']}/#{@chapid}-#{id}"
+        @types.each {|ext| pathes.push("#{target}#{ext}") if @@entries.include?("#{target}#{ext}")}
+
+        # 3. <basedir>/<builder>/<id>.<ext>
+        target = "#{@basedir}/#{ReVIEW.book.param['builder']}/#{id}"
+        @types.each {|ext| pathes.push("#{target}#{ext}") if @@entries.include?("#{target}#{ext}")}
+
+        # 4. <basedir>/<chapid>/<id>.<ext>
+        target = "#{@basedir}/#{@chapid}/#{id}"
+        @types.each {|ext| pathes.push("#{target}#{ext}") if @@entries.include?("#{target}#{ext}")}
+
+        # 5. <basedir>/<chapid>-<id>.<ext>
+        target = "#{@basedir}/#{@chapid}-#{id}"
+        @types.each {|ext| pathes.push("#{target}#{ext}") if @@entries.include?("#{target}#{ext}")}
+
+        # 6. <basedir>/<id>.<ext>
+        target = "#{@basedir}/#{id}"
+        @types.each {|ext| pathes.push("#{target}#{ext}") if @@entries.include?("#{target}#{ext}")}
+
+        return pathes
       end
     end
 

data/lib/review/book/parameters.rb

@@ -45,7 +45,8 @@ module ReVIEW
         PageMetric.new(const_get_safe(mod, :LINES_PER_PAGE_list) || 46,
           const_get_safe(mod, :COLUMNS_list)        || 80,
           const_get_safe(mod, :LINES_PER_PAGE_text) || 30,
-          const_get_safe(mod, :COLUMNS_text)        || 74)  # 37zw
+          const_get_safe(mod, :COLUMNS_text)        || 74,  # 37zw
+          const_get_safe(mod, :PAGE_PER_KBYTE)         ||  1)  # 37zw
       end
 
       def Parameters.const_get_safe(mod, name)
@@ -89,7 +90,7 @@ module ReVIEW
       path_param  :postdef_file
       attr_reader :ext
       path_param  :image_dir
-      attr_reader :image_types
+      attr_accessor :image_types
       attr_reader :page_metric
 
     end

data/lib/review/book/part.rb

@@ -20,7 +20,7 @@ module ReVIEW
         @number = number
         @chapters = chapters
         @path = name
-        @name = name ? File.basename(name, '.*') : nil
+        @name = name ? File.basename(name, '.re') : nil
       end
 
       attr_reader :number

data/lib/review/builder.rb

@@ -10,6 +10,7 @@
 require 'review/book/index'
 require 'review/exception'
 require 'review/textutils'
+require 'review/compiler'
 require 'stringio'
 require 'cgi'
 
@@ -60,9 +61,9 @@ module ReVIEW
     alias :raw_result result
 
     def print(*s)
-      @output.print *s.map{|i|
+      @output.print(*s.map{|i|
         convert_outencoding(i, ReVIEW.book.param["outencoding"])
-      }
+      })
     end
 
     def puts(*s)
@@ -119,7 +120,7 @@ module ReVIEW
 
       begin
         table_header id, caption unless caption.nil?
-      rescue KeyError => err
+      rescue KeyError
         error "no such table: #{id}"
       end
       return if rows.empty?
@@ -171,7 +172,7 @@ module ReVIEW
     end
 
     def inline_chapref(id)
-      @chapter.env.chapter_index.display_string(id)
+      compile_inline @chapter.env.chapter_index.display_string(id)
     rescue KeyError
       error "unknown chapter: #{id}"
       nofunc_text("[UnknownChapter:#{id}]")
@@ -276,35 +277,6 @@ module ReVIEW
       end
     end
 
-    def find_pathes(id)
-      if ReVIEW.book.param["subdirmode"]
-        re = /\A#{id}(?i:#{@chapter.name.join('|')})\z/x
-        entries().select {|ent| re =~ ent }\
-          .sort_by {|ent| @book.image_types.index(File.extname(ent).downcase) }\
-          .map {|ent| "#{@book.basedir}/#{@chapter.name}/#{ent}" }
-      elsif ReVIEW.book.param["singledirmode"]
-        re = /\A#{id}(?i:#{@chapter.name.join('|')})\z/x
-        entries().select {|ent| re =~ ent }\
-          .sort_by {|ent| @book.image_types.index(File.extname(ent).downcase) }\
-          .map {|ent| "#{@book.basedir}/#{ent}" }
-      else
-        re = /\A#{@chapter.name}-#{id}(?i:#{@book.image_types.join('|')})\z/x
-        entries().select {|ent| re =~ ent }\
-          .sort_by {|ent| @book.image_types.index(File.extname(ent).downcase) }\
-          .map {|ent| "#{@book.basedir}/#{ent}" }
-      end
-    end
-
-    def entries
-      if ReVIEW.book.param["subdirmode"]
-        @entries ||= Dir.entries(File.join(@book.basedir + @book.image_dir, @chapter.name))
-      else
-        @entries ||= Dir.entries(@book.basedir + @book.image_dir)
-      end
-    rescue Errno::ENOENT
-    @entries = []
-    end
-
     def warn(msg)
       $stderr.puts "#{@location}: warning: #{msg}"
     end
@@ -368,14 +340,10 @@ module ReVIEW
     end
 
     def graph(lines, id, command, caption = nil)
-      dir = @book.basedir + @book.image_dir
-      file = "#{@chapter.name}-#{id}.#{image_ext}"
-      if ReVIEW.book.param["subdirmode"]
-        dir = File.join(dir, @chapter.name)
-        file = "#{id}.#{image_ext}"
-      elsif ReVIEW.book.param["singledirmode"]
-        file = "#{id}.#{image_ext}"
-      end
+      c = self.class.to_s.gsub(/ReVIEW::/, '').gsub(/Builder/, '').downcase
+      dir = File.join(@book.basedir, @book.image_dir, c)
+      Dir.mkdir(dir) unless File.exist?(dir)
+      file = "#{id}.#{image_ext}"
       file_path = File.join(dir, file)
 
       line = CGI.unescapeHTML(lines.join("\n"))
@@ -392,7 +360,7 @@ module ReVIEW
       warn cmd
       system cmd
 
-      image(lines, id, caption)
+      image(lines, id, caption ||= "")
     end
 
     def image_ext

data/lib/review/compiler.rb

@@ -412,7 +412,7 @@ module ReVIEW
 
     def compile_paragraph(f)
       buf = []
-      f.until_match(%r<\A//|\A\#@|\A===+>) do |line|
+      f.until_match(%r<\A//|\A\#@>) do |line|
         break if line.strip.empty?
         buf.push text(line.sub(/^(\t+)\s*/) {|m| "<!ESCAPETAB!>" * m.size}.strip.gsub(/<!ESCAPETAB!>/, "\t"))
       end

data/lib/review/configure.rb

@@ -4,8 +4,8 @@ module ReVIEW
     def self.values
       { # These parameters can be overridden by YAML file.
         "bookname"=> "example", # it defines epub file name also
-        "booktitle" => "ReVIEW EPUBサンプル",
-        "title" => "example",
+        "booktitle" => "Re:VIEW EPUBサンプル",
+        "title" => nil,
         "aut" => nil, # author
         "prt" => nil, # printer(publisher)
         "asn" => nil, # associated name
@@ -30,7 +30,7 @@ module ReVIEW
         "epubversion" => 2,
         "titlepage" => true, # Use title page
         "toc" => true, # Use table of contents
-        "colophon" => false, # Use colophon
+        "colophon" => nil, # Use colophon
         "debug" => nil, # debug flag
       }
     end

data/lib/review/epubmaker.rb

@@ -0,0 +1,428 @@
+# encoding: utf-8
+#
+# Copyright (c) 2010-2014 Kenshi Muto and Masayoshi Takahashi
+#
+# 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.
+# For details of the GNU LGPL, see the file "COPYING".
+#
+require 'review'
+require 'rexml/document'
+require 'rexml/streamlistener'
+require 'epubmaker'
+
+module ReVIEW
+ class EPUBMaker
+  include ::EPUBMaker
+  include REXML
+
+  def initialize
+    @epub = nil
+    @tochtmltxt = "toc-html.txt"
+  end
+
+  def log(s)
+    puts s unless @params["debug"].nil?
+  end
+
+  def load_yaml(yamlfile)
+    @params = ReVIEW::Configure.values.merge(YAML.load_file(yamlfile)) # FIXME:設定がRe:VIEW側とepubmaker/producer.rb側の2つに分かれて面倒
+    @epub = Producer.new(@params)
+    @epub.load(yamlfile)
+    @params = @epub.params
+  end
+
+  def produce(yamlfile, bookname=nil)
+    load_yaml(yamlfile)
+    bookname = @params["bookname"] if bookname.nil?
+    log("Loaded yaml file (#{yamlfile}). I will produce #{bookname}.epub.")
+
+    File.unlink("#{bookname}.epub") if File.exist?("#{bookname}.epub")
+    FileUtils.rm_rf(bookname) if @params["debug"] && File.exist?(bookname)
+    
+    Dir.mktmpdir(bookname, Dir.pwd) do |basetmpdir|
+      log("Created first temporary directory as #{basetmpdir}.")
+
+      log("Call hook_beforeprocess. (#{@params["hook_beforeprocess"]})")
+      call_hook(@params["hook_beforeprocess"], basetmpdir)
+
+      copy_stylesheet(basetmpdir)
+
+      copy_frontmatter(basetmpdir)
+      log("Call hook_afterfrontmatter. (#{@params["hook_afterfrontmatter"]})")
+      call_hook(@params["hook_afterfrontmatter"], basetmpdir)
+
+      build_body(basetmpdir, yamlfile)
+      log("Call hook_afterbody. (#{@params["hook_afterbody"]})")
+      call_hook(@params["hook_afterbody"], basetmpdir)
+
+      copy_backmatter(basetmpdir)
+      log("Call hook_afterbackmatter. (#{@params["hook_afterbackmatter"]})")
+      call_hook(@params["hook_afterbackmatter"], basetmpdir)
+
+      push_contents(basetmpdir)
+
+      copy_images(@params["imagedir"], "#{basetmpdir}/images")
+      copy_images("covers", "#{basetmpdir}/images")
+      copy_images("adv", "#{basetmpdir}/images")
+      copy_images(@params["fontdir"], "#{basetmpdir}/fonts", @params["font_ext"])
+      log("Call hook_aftercopyimage. (#{@params["hook_aftercopyimage"]})")
+      call_hook(@params["hook_aftercopyimage"], basetmpdir)
+
+      @epub.import_imageinfo("#{basetmpdir}/images", basetmpdir)
+      @epub.import_imageinfo("#{basetmpdir}/fonts", basetmpdir, @params["font_ext"])
+
+      epubtmpdir = @params["debug"].nil? ? nil : "#{Dir.pwd}/#{bookname}"
+      Dir.mkdir(bookname) unless @params["debug"].nil?
+      log("Call ePUB producer.")
+      @epub.produce("#{bookname}.epub", basetmpdir, epubtmpdir)
+      log("Finished.")
+
+    end
+  end
+
+  def call_hook(filename, *params)
+    if !filename.nil? && File.exist?(filename) && FileTest.executable?(filename)
+      system(filename, *params)
+    end
+  end
+
+  def copy_images(imagedir, destdir, allow_exts=nil)
+    return nil unless File.exist?(imagedir)
+    allow_exts = @params["image_ext"] if allow_exts.nil?
+    FileUtils.mkdir_p(destdir) unless FileTest.directory?(destdir)
+    recursive_copy_images(imagedir, destdir, allow_exts)
+  end
+
+  def recursive_copy_images(imagedir, destdir, allow_exts)
+    Dir.open(imagedir) do |dir|
+      dir.each do |fname|
+        next if fname =~ /\A\./
+        if FileTest.directory?("#{imagedir}/#{fname}")
+          recursive_copy_images("#{imagedir}/#{fname}", "#{destdir}/#{fname}", allow_exts)
+        else
+          if fname =~ /\.(#{allow_exts.join("|")})\Z/i
+            Dir.mkdir(destdir) unless File.exist?(destdir)
+            log("Copy #{imagedir}/#{fname} to the temporary directory.")
+            FileUtils.cp("#{imagedir}/#{fname}", destdir)
+          end
+        end
+      end
+    end
+  end
+
+  def build_body(basetmpdir, yamlfile)
+    @precount = 0
+    @bodycount = 0
+    @postcount = 0
+
+    @manifeststr = ""
+    @ncxstr = ""
+    @tocdesc = Array.new
+    # toccount = 2  ## not used
+
+    basedir = Dir.pwd
+    base_path = Pathname.new(basedir)
+    ReVIEW::Book.load(basedir).parts.each do |part|
+      htmlfile = nil
+      if part.name.present?
+        if part.file?
+          build_chap(part, base_path, basetmpdir, yamlfile, true)
+        else
+          htmlfile = "part_#{part.number}.#{@params["htmlext"]}"
+          build_part(part, basetmpdir, htmlfile)
+          title = ReVIEW::I18n.t("part", part.number)
+          title += ReVIEW::I18n.t("chapter_postfix") + part.name.strip if part.name.strip.present?
+          write_tochtmltxt(basetmpdir, "0\t#{htmlfile}\t#{title}")
+        end
+      end
+
+      part.chapters.each do |chap|
+        build_chap(chap, base_path, basetmpdir, yamlfile, nil)
+      end
+      
+    end
+  end
+
+  def build_part(part, basetmpdir, htmlfile)
+    log("Create #{htmlfile} from a template.")
+    File.open("#{basetmpdir}/#{htmlfile}", "w") do |f|
+      f.puts header(CGI.escapeHTML(@params["booktitle"]))
+      f.puts <<EOT
+<div class="part">
+<h1 class="part-number">#{ReVIEW::I18n.t("part", part.number)}</h1>
+EOT
+      if part.name.strip.present?
+        f.puts <<EOT
+<h2 class="part-title">#{part.name.strip}</h2>
+EOT
+      end
+      
+      f.puts <<EOT
+</div>
+EOT
+      f.puts footer
+    end
+  end
+
+  def build_chap(chap, base_path, basetmpdir, yamlfile, ispart=nil)
+    filename = ""
+    if !ispart.nil?
+      filename = chap.path
+    else
+      filename = Pathname.new(chap.path).relative_path_from(base_path).to_s
+    end
+    id = filename.sub(/\.re\Z/, "")
+
+    if @params["rename_for_legacy"] && ispart.nil?
+      if chap.on_PREDEF?
+        @precount += 1
+        id = sprintf("pre%02d", @precount)
+      elsif chap.on_POSTDEF?
+        @postcount += 1
+        id = sprintf("post%02d", @postcount)
+      else
+        @bodycount += 1
+        id = sprintf("chap%02d", @bodycount)
+      end
+    end
+
+    htmlfile = "#{id}.#{@params["htmlext"]}"
+    log("Create #{htmlfile} from #{filename}.")
+
+    level = @params["secnolevel"]
+    
+    if !ispart.nil?
+      level = @params["part_secnolevel"]
+    else
+      level = @params["pre_secnolevel"] if chap.on_PREDEF?
+      level = @params["post_secnolevel"] if chap.on_POSTDEF?
+    end
+
+    stylesheet = ""
+    if @params["stylesheet"].size > 0
+      stylesheet = "--stylesheet=#{@params["stylesheet"].join(",")}"
+    end
+
+    system("review-compile --yaml=#{yamlfile} --target=html --level=#{level} --htmlversion=#{@params["htmlversion"]} --epubversion=#{@params["epubversion"]} #{stylesheet} #{@params["params"]} #{filename} > \"#{basetmpdir}/#{htmlfile}\"")
+
+    write_info_body(basetmpdir, id, htmlfile, ispart)
+  end
+
+  def write_info_body(basetmpdir, id, filename, ispart=nil)
+    headlines = []
+    # FIXME:nonumを修正する必要あり
+    Document.parse_stream(File.new("#{basetmpdir}/#{filename}"), ReVIEWHeaderListener.new(headlines))
+    first = true
+    headlines.each do |headline|
+      headline["level"] = 0 if !ispart.nil? && headline["level"] == 1
+      if first.nil?
+        write_tochtmltxt(basetmpdir, "#{headline["level"]}\t#{filename}##{headline["id"]}\t#{headline["title"]}")
+      else
+        write_tochtmltxt(basetmpdir, "#{headline["level"]}\t#{filename}\t#{headline["title"]}\tforce_include=true")
+        first = nil
+      end
+    end
+  end
+
+  def push_contents(basetmpdir)
+    File.open("#{basetmpdir}/#{@tochtmltxt}") do |f|
+      f.each_line do |l|
+        force_include = nil
+        customid = nil
+        level, file, title, custom = l.chomp.split("\t")
+        unless custom.nil?
+          # custom setting
+          vars = custom.split(/,\s*/)
+          vars.each do |var|
+            k, v = var.split("=")
+            case k
+            when "id"
+              customid = v
+            when "force_include"
+              force_include = true
+            end
+          end
+        end
+        next if level.to_i > @params["toclevel"] && force_include.nil?
+        log("Push #{file} to ePUB contents.")
+
+        if customid.nil?
+          @epub.contents.push(Content.new("file" => file, "level" => level.to_i, "title" => title))
+        else
+          @epub.contents.push(Content.new("id" => customid, "file" => file, "level" => level.to_i, "title" => title))
+        end
+      end
+    end
+  end
+
+  def copy_stylesheet(basetmpdir)
+    if @params["stylesheet"].size > 0
+      @params["stylesheet"].each do |sfile|
+        FileUtils.cp(sfile, basetmpdir)
+        @epub.contents.push(Content.new("file" => sfile))
+      end
+    end
+  end
+
+  def copy_frontmatter(basetmpdir)
+    FileUtils.cp(@params["cover"], "#{basetmpdir}/#{File.basename(@params["cover"])}") if !@params["cover"].nil? && File.exist?(@params["cover"])
+
+    if @params["titlepage"]
+      if @params["titlepagefile"].nil?
+        build_titlepage(basetmpdir, "titlepage.#{@params["htmlext"]}")
+      else
+        FileUtils.cp(@params["titlepagefile"], "titlepage.#{@params["htmlext"]}")
+      end
+      write_tochtmltxt(basetmpdir, "1\ttitlepage.#{@params["htmlext"]}\t#{@epub.res.v("titlepagetitle")}")
+    end
+
+    if !@params["originaltitlefile"].nil? && File.exist?(@params["originaltitlefile"])
+      FileUtils.cp(@params["originaltitlefile"], "#{basetmpdir}/#{File.basename(@params["originaltitlefile"])}")
+      write_tochtmltxt(basetmpdir, "1\t#{File.basename(@params["originaltitlefile"])}\t#{@epub.res.v("originaltitle")}")
+    end
+
+    if !@params["creditfile"].nil? && File.exist?(@params["creditfile"])
+      FileUtils.cp(@params["creditfile"], "#{basetmpdir}/#{File.basename(@params["creditfile"])}")
+      write_tochtmltxt(basetmpdir, "1\t#{File.basename(@params["creditfile"])}\t#{@epub.res.v("credittitle")}")
+    end
+  end
+
+  def build_titlepage(basetmpdir, htmlfile)
+    File.open("#{basetmpdir}/#{htmlfile}", "w") do |f|
+      f.puts header(CGI.escapeHTML(@params["booktitle"]))
+      f.puts <<EOT
+<div class="titlepage">
+<h1 class="tp-title">#{CGI.escapeHTML(@params["booktitle"])}</h1>
+EOT
+
+      if @params["aut"]
+        f.puts <<EOT
+<h2 class="tp-author">#{@params["aut"].join(", ")}</h2>
+EOT
+      end
+      if @params["prt"]
+        f.puts <<EOT
+<h3 class="tp-publisher">#{@params["prt"].join(", ")}</h3>
+EOT
+      end
+
+      f.puts <<EOT
+</div>
+EOT
+      f.puts footer
+    end
+  end
+
+  def copy_backmatter(basetmpdir)
+    if @params["profile"]
+      FileUtils.cp(@params["profile"], "#{basetmpdir}/#{File.basename(@params["profile"])}")
+      write_tochtmltxt(basetmpdir, "1\t#{File.basename(@params["profile"])}\t#{@epub.res.v("profiletitle")}")
+    end
+
+    if @params["advfile"]
+      FileUtils.cp(@params["advfile"], "#{basetmpdir}/#{File.basename(@params["advfile"])}")
+      write_tochtmltxt(basetmpdir, "1\t#{File.basename(@params["advfile"])}\t#{@epub.res.v("advtitle")}")
+    end
+
+    if @params["colophon"]
+      if @params["colophon"].instance_of?(String) # FIXME:このやり方はやめる？
+        FileUtils.cp(@params["colophon"], "#{basetmpdir}/colophon.#{@params["htmlext"]}")
+      else
+        File.open("#{basetmpdir}/colophon.#{@params["htmlext"]}", "w") {|f| @epub.colophon(f) }
+      end
+      write_tochtmltxt(basetmpdir, "1\tcolophon.#{@params["htmlext"]}\t#{@epub.res.v("colophontitle")}")
+    end
+  end
+
+  def write_tochtmltxt(basetmpdir, s)
+    File.open("#{basetmpdir}/#{@tochtmltxt}", "a") do |f|
+      f.puts s
+    end
+  end
+
+  def header(title)
+    # titleはすでにエスケープ済みと想定
+    s = <<EOT
+<?xml version="1.0" encoding="UTF-8"?>
+EOT
+    if @params["htmlversion"] == 5
+      s << <<EOT
+<!DOCTYPE html>
+<html xml:lang='ja' xmlns:ops='http://www.idpf.org/2007/ops' xmlns='http://www.w3.org/1999/xhtml'>
+<head>
+  <meta charset="UTF-8" />
+EOT
+    else
+      s << <<EOT
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
+<html xml:lang='ja' xmlns:ops='http://www.idpf.org/2007/ops' xmlns='http://www.w3.org/1999/xhtml'>
+<head>
+  <meta http-equiv='Content-Type' content='text/html;charset=UTF-8' />
+  <meta http-equiv='Content-Style-Type' content='text/css' />
+EOT
+    end
+    if @params["stylesheet"].size > 0
+      @params["stylesheet"].each do |sfile|
+        s << <<EOT
+  <link rel='stylesheet' type='text/css' href='#{sfile}' />
+EOT
+      end
+    end
+    s << <<EOT
+  <meta content='Re:VIEW' name='generator'/>
+  <title>#{title}</title>
+</head>
+<body>
+EOT
+  end
+
+  def footer
+    <<EOT
+</body>
+</html>
+EOT
+  end
+
+  class ReVIEWHeaderListener
+    include REXML::StreamListener
+    def initialize(headlines)
+      @level = nil
+      @content = ""
+      @headlines = headlines
+    end
+    
+    def tag_start(name, attrs)
+      if name =~ /\Ah(\d+)/
+        unless @level.nil?
+          raise "#{name}, #{attrs}"
+        end
+        @level = $1.to_i
+        @id = attrs["id"] if !attrs["id"].nil?
+      elsif !@level.nil?
+        if name == "img" && !attrs["alt"].nil?
+          @content << attrs["alt"]
+        elsif name == "a" && !attrs["id"].nil?
+          @id = attrs["id"]
+        end
+      end
+    end
+    
+    def tag_end(name)
+      if name =~ /\Ah\d+/
+        @headlines.push({"level" => @level, "id" => @id, "title" => @content}) unless @id.nil?
+        @content = ""
+        @level = nil
+        @id = nil
+      end
+    end
+    
+    def text(text)
+      unless @level.nil?
+        @content << text.gsub("\t", "　") # FIXME:区切り文字
+      end
+    end
+  end
+ end
+end