tmtms-review 1.0.0

data/lib/epubmaker/resource.rb

@@ -0,0 +1,66 @@
+# encoding: utf-8
+# = resource.rb -- Message resources for EPUBMaker.
+#
+# Copyright (c) 2010 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.
+# For details of the GNU LGPL, see the file "COPYING".
+#
+
+module EPUBMaker
+
+# EPUBMaker::Resource contains message translation resources for EPUBMaker.
+  class Resource
+    # Construct message resource object with using +params+["language"] value.
+    def initialize(params)
+      @hash = nil
+      begin
+        @hash = __send__ params["language"]
+      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.
+    def en
+      {
+        "toctitle" => "Table of Contents",
+        "covertitle" => "Cover",
+        "titlepagetitle" => "Title Page",
+        "colophontitle" => "Colophon",
+        "c-aut" => "Author",
+        "c-dsr" => "Designer",
+        "c-ill" => "Illustrator",
+        "c-edt" => "Editor",
+        "c-prt" => "Publisher",
+      }
+    end
+    
+    # Japanese messages.
+    def ja
+      {
+        "toctitle" => "目次",
+        "covertitle" => "表紙",
+        "titlepagetitle" => "権利表記",
+        "colophontitle" => "奥付",
+        "c-aut" => "著　者",
+        "c-dsr" => "デザイン",
+        "c-ill" => "イラスト",
+        "c-edt" => "編　集",
+        "c-prt" => "発行所",
+      }
+    end
+  end
+end

data/lib/lineinput.rb

@@ -0,0 +1,155 @@
+#
+# $Id: lineinput.rb 2226 2006-04-15 03:05:09Z aamine $
+#
+# Copyright (c) 2002-2005 Minero Aoki
+#
+# This program is free software.
+# You can distribute/modify this program under the terms of
+# the GNU LGPL, Lesser General Public License version 2.1.
+#
+
+class LineInput
+
+  def initialize(f)
+    @input = f
+    @buf = []
+    @lineno = 0
+    @eof_p = false
+  end
+
+  def inspect
+    "\#<#{self.class} file=#{@input.inspect} line=#{lineno()}>"
+  end
+
+  def eof?
+    @eof_p
+  end
+
+  def lineno
+    @lineno
+  end
+
+  def gets
+    unless @buf.empty?
+      @lineno += 1
+      return @buf.pop
+    end
+    return nil if @eof_p   # to avoid ARGF blocking.
+    line = @input.gets
+    @eof_p = true unless line
+    @lineno += 1
+    line
+  end
+
+  def ungets(line)
+    return unless line
+    @lineno -= 1
+    @buf.push line
+    line
+  end
+
+  def peek
+    line = gets()
+    ungets line if line
+    line
+  end
+
+  def next?
+    peek() ? true : false
+  end
+
+  def skip_blank_lines
+    n = 0
+    while line = gets()
+      unless line.strip.empty?
+        ungets line
+        return n
+      end
+      n += 1
+    end
+    n
+  end
+
+  def gets_if(re)
+    line = gets()
+    if not line or not (re =~ line)
+      ungets line
+      return nil
+    end
+    line
+  end
+
+  def gets_unless(re)
+    line = gets()
+    if not line or re =~ line
+      ungets line
+      return nil
+    end
+    line
+  end
+
+  def each
+    while line = gets()
+      yield line
+    end
+  end
+
+  def while_match(re)
+    while line = gets()
+      unless re =~ line
+        ungets line
+        return
+      end
+      yield line
+    end
+    nil
+  end
+
+  def getlines_while(re)
+    buf = []
+    while_match(re) do |line|
+      buf.push line
+    end
+    buf
+  end
+
+  alias span getlines_while   # from Haskell
+
+  def until_match(re)
+    while line = gets()
+      if re =~ line
+        ungets line
+        return
+      end
+      yield line
+    end
+    nil
+  end
+
+  def getlines_until(re)
+    buf = []
+    until_match(re) do |line|
+      buf.push line
+    end
+    buf
+  end
+
+  alias break getlines_until   # from Haskell
+
+  def until_terminator(re)
+    while line = gets()
+      return if re =~ line   # discard terminal line
+      yield line
+    end
+    nil
+  end
+
+  def getblock(term_re)
+    buf = []
+    until_terminator(term_re) do |line|
+      buf.push line
+    end
+    buf
+  end
+
+end

data/lib/review.rb

@@ -0,0 +1,3 @@
+Dir["#{File.dirname(__FILE__)}/review/*.rb"].sort.each do |path|
+  require "review/#{File.basename(path, '.rb')}"
+end

data/lib/review/book.rb

@@ -0,0 +1,46 @@
+#
+# $Id: book.rb 4315 2009-09-02 04:15:24Z kmuto $
+#
+# Copyright (c) 2002-2008 Minero Aoki
+#               2009 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.
+# For details of the GNU LGPL, see the file "COPYING".
+#
+
+require 'review/exception'
+require 'review/extentions'
+require 'forwardable'
+require 'nkf'
+
+require 'review/book/base'
+require 'review/book/chapter'
+require 'review/book/part'
+require 'review/book/parameters'
+require 'review/book/page_metric'
+require 'review/book/volume'
+require 'review/book/index'
+
+module ReVIEW
+  @default_book = nil
+
+  def ReVIEW.book
+    @default_book ||= Book::Base.load_default
+  end
+
+  module Book
+    def self.load_default
+      Base.load_default
+    end
+
+    def self.load(dir)
+      Base.load dir
+    end
+
+    def self.update_rubyenv(dir)
+      Base.update_rubyenv dir
+    end
+  end
+end

data/lib/review/book/base.rb

@@ -0,0 +1,235 @@
+#
+# $Id: book.rb 4315 2009-09-02 04:15:24Z kmuto $
+#
+# Copyright (c) 2002-2008 Minero Aoki
+#               2009 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.
+# For details of the GNU LGPL, see the file "COPYING".
+#
+module ReVIEW
+  module Book
+    class Base
+
+      attr_accessor :param
+
+      def self.load_default
+        %w( . .. ../.. ).each do |basedir|
+          if File.file?("#{basedir}/CHAPS")
+            book = load(basedir)
+            if File.file?("#{basedir}/config.rb")
+              book.instance_variable_set("@parameters", Parameters.load("#{basedir}/config.rb"))
+            end
+            return book
+          end
+        end
+        new('.')
+      end
+
+      def self.load(dir)
+        update_rubyenv dir
+        new(dir)
+      end
+
+      @basedir_seen = {}
+
+      def self.update_rubyenv(dir)
+        return if @basedir_seen.key?(dir)
+        if File.directory?("#{dir}/lib/review")
+          $LOAD_PATH.unshift "#{dir}/lib"
+        end
+        if File.file?("#{dir}/review-ext.rb")
+          Kernel.load File.expand_path("#{dir}/review-ext.rb")
+        end
+        @basedir_seen[dir] = true
+      end
+
+      def initialize(basedir, parameters = Parameters.default)
+        @basedir = basedir
+        @parameters = parameters
+        @parts = nil
+        @chapter_index = nil
+      end
+
+      extend Forwardable
+      def_delegators '@parameters',
+      :chapter_file,
+      :part_file,
+      :bib_file,
+      :reject_file,
+      :predef_file,
+      :postdef_file,
+      :ext,
+      :image_dir,
+      :image_types,
+      :page_metric
+
+      def parts
+        @parts ||= read_parts()
+      end
+
+      def parts_in_file
+        parts.find_all{|part| part if part.file? }
+      end
+
+      def part(n)
+        parts.detect {|part| part.number == n }
+      end
+
+      def each_part(&block)
+        parts.each(&block)
+      end
+
+      def chapters
+        parts().map {|p| p.chapters }.flatten
+      end
+
+      def each_chapter(&block)
+        chapters.each(&block)
+      end
+
+      def chapter_index
+        @chapter_index ||= ChapterIndex.new(chapters())
+        @chapter_index
+      end
+
+      def chapter(id)
+        chapter_index()[id]
+      end
+
+      def volume
+        Volume.sum(chapters.map {|chap| chap.volume })
+      end
+
+      def read_CHAPS
+        read_FILE("chapter_file")
+      end
+
+      def read_PREDEF
+        read_FILE("predef_file")
+      end
+
+      def read_POSTDEF
+        read_FILE("postdef_file")
+      end
+
+      def read_PART
+        @read_PART ||= File.read("#{@basedir}/#{part_file}")
+      end
+
+      def part_exist?
+        File.exist?("#{@basedir}/#{part_file}")
+      end
+
+      def read_bib
+        File.read("#{@basedir}/#{bib_file}")
+      end
+
+      def bib_exist?
+        File.exist?("#{@basedir}/#{bib_file}")
+      end
+
+      def prefaces
+        if File.file?("#{@basedir}/#{predef_file}")
+          begin
+            return mkpart_from_namelistfile("#{@basedir}/#{predef_file}")
+          rescue FileNotFound => err
+            raise FileNotFound, "preface #{err.message}"
+          end
+        else
+          mkpart_from_namelist(%w(preface))
+        end
+      end
+
+      def postscripts
+        if File.file?("#{@basedir}/#{postdef_file}")
+          begin
+            return mkpart_from_namelistfile("#{@basedir}/#{postdef_file}")
+          rescue FileNotFound => err
+            raise FileNotFound, "postscript #{err.message}"
+          end
+        else
+          mkpart_from_namelist(%w(appendix postscript))
+        end
+      end
+
+      def basedir
+        @basedir
+      end
+
+      private
+
+      def read_parts
+        list = parse_chapters
+        if pre = prefaces
+          list.unshift pre
+        end
+        if post = postscripts
+          list.push post
+        end
+        list
+      end
+
+      def parse_chapters
+        part = 0
+        num = 0
+        chap = read_CHAPS()\
+          .strip.lines.map {|line| line.strip }.join("\n").split(/\n{2,}/)\
+          .map {|part_chunk|
+          chaps = part_chunk.split.map {|chapid|
+            Chapter.new(self, (num += 1), chapid, "#{@basedir}/#{chapid}")
+          }
+          if part_exist? && read_PART.split("\n").size >= part
+            Part.new(self, (part += 1), chaps, read_PART.split("\n")[part-1])
+          else
+            Part.new(self, (part += 1), chaps)
+          end
+        }
+        return chap
+      end
+
+      def mkpart_from_namelistfile(path)
+        mkpart(File.read(path).split.map {|name| mkchap(name) })
+      end
+
+      def mkpart_from_namelist(names)
+        mkpart(names.map {|n| mkchap_ifexist(n) }.compact)
+      end
+
+      def mkpart(chaps)
+        chaps.empty? ? nil : Part.new(self, nil, chaps)
+      end
+
+      def mkchap(name)
+        name += ext if File.extname(name) == ""
+        path = "#{@basedir}/#{name}"
+        raise FileNotFound, "file not exist: #{path}" unless File.file?(path)
+        Chapter.new(self, nil, name, path)
+      end
+
+      def mkchap_ifexist(id)
+        name = "#{id}#{ext()}"
+        path = "#{@basedir}/#{name}"
+        File.file?(path) ? Chapter.new(self, nil, name, path) : nil
+      end
+
+      def read_FILE(filename)
+        res = ""
+        File.open("#{@basedir}/#{eval(filename)}") do |f|
+          while line = f.gets
+            if /\A#/ =~ line
+              next
+            end
+            line.gsub!(/#.*$/, "")
+            res << line
+          end
+        end
+        res
+      rescue Errno::ENOENT
+        Dir.glob("#{@basedir}/*#{ext()}").sort.join("\n")
+      end
+    end
+  end
+end