review 0.6.0

data/lib/review/index.rb

@@ -0,0 +1,224 @@
+# $Id: index.rb 4300 2009-06-21 23:45:49Z kmuto $
+#
+# Copyright (c) 2002-2007 Minero Aoki
+#               2008-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 LGPL, see the file "COPYING".
+#
+
+require 'review/compat'
+require 'review/exception'
+
+module ReVIEW
+
+  class Index
+    def Index.parse(src, *args)
+      items = []
+      seq = 1
+      src.grep(%r<^//#{item_type()}>) do |line|
+        if id = line.slice(/\[(.*?)\]/, 1)
+          items.push item_class().new(id, seq)
+          seq += 1
+        end
+      end
+      new(items, *args)
+    end
+
+    Item = Struct.new(:id, :number)
+
+    def Index.item_class
+      self::Item
+    end
+
+    include Enumerable
+
+    def item_type
+      self.class.item_type
+    end
+
+    def initialize(items)
+      @items = items
+      @index = {}
+      items.each do |i|
+        warn "warning: duplicate ID: #{i.id}" unless @index[i.id].nil?
+        @index[i.id] = i
+      end
+    end
+
+    def setParameter(param)
+      @param = param
+    end
+
+    def [](id)
+      @index.fetch(id)
+    end
+
+    def number(id)
+      @index.fetch(id).number.to_s
+    end
+
+    def each(&block)
+      @items.each(&block)
+    end
+  end
+
+
+  class ChapterIndex < Index
+    def item_type
+      'chapter'
+    end
+
+    def number(id)
+      "第#{@index.fetch(id).number}章"
+    end
+
+    def title(id)
+      @index.fetch(id).title
+    end
+
+    def display_string(id)
+      "#{number(id)}「#{title(id)}」"
+    end
+  end
+
+
+  class ListIndex < Index
+    def ListIndex.item_type
+      '(list|listnum)'
+    end
+  end
+
+
+  class TableIndex < Index
+    def TableIndex.item_type
+      'table'
+    end
+  end
+
+
+  class FootnoteIndex < Index
+    Item = Struct.new(:id, :number, :content)
+
+    def FootnoteIndex.parse(src)
+      items = []
+      seq = 1
+      src.grep(%r<^//footnote>) do |line|
+        if m = /\[(.*?)\]\[(.*)\]/.match(line)
+          items.push Item.new(m[1], seq, m[2])
+        end
+        seq += 1
+      end
+      new(items)
+    end
+  end
+
+
+  class ImageIndex < Index
+    class Item
+      def initialize(id, number)
+        @id = id
+        @number = number
+        @pathes = nil
+      end
+
+      attr_reader :id
+      attr_reader :number
+      attr_writer :index    # internal use only
+
+      def bound?
+        not pathes().empty?
+      end
+
+      def path
+        pathes().first
+      end
+
+      def pathes
+        @pathes ||= @index.find_pathes(id)
+      end
+    end
+
+    def ImageIndex.item_type
+      'image'
+    end
+
+    def initialize(items, chapid, basedir, types)
+      super items
+      items.each do |i|
+        i.index = self
+      end
+      @chapid = chapid
+      @basedir = basedir
+      @types = types
+    end
+
+    # internal use only
+    def find_pathes(id)
+      if @param["subdirmode"].nil?
+        re = /\A#{@chapid}-#{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#{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}" }
+      end
+    end
+
+    private
+
+    def entries
+      if @param["subdirmode"].nil?
+        @entries ||= Dir.entries(@basedir)
+      else
+        @entries ||= Dir.entries(File.join(@basedir, @chapid))
+      end
+    rescue Errno::ENOENT
+      @entries = []
+    end
+  end
+
+
+  class FormatRef
+    def initialize(locale, index)
+      @locale = locale
+      @index = index
+    end
+
+    def title(id)
+      sprintf(@locale["#{@index.item_type}_caption_format".intern],
+              @index.title(id))
+    end
+
+    def number(id)
+      sprintf(@locale["#{@index.item_type}_number_format".intern],
+              @index.number(id))
+    end
+
+    def method_missing(mid, *args, &block)
+      super unless @index.respond_to?(mid)
+      @index.__send__(mid, *args, &block)
+    end
+  end
+
+  class BibpaperIndex < Index
+    Item = Struct.new(:id, :number, :caption)
+
+    def BibpaperIndex.parse(src)
+      items = []
+      seq = 1
+      src.grep(%r<^//bibpaper>) do |line|
+        if m = /\[(.*?)\]\[(.*)\]/.match(line)
+          items.push Item.new(m[1], seq, m[2])
+        end
+        seq += 1
+      end
+      new(items)
+    end
+  end
+end

data/lib/review/latexbuilder.rb

@@ -0,0 +1,420 @@
+#
+#
+# Copyright (c) 2002-2007 Minero Aoki
+#               2008-2009 Minero Aoki, Kenshi Muto
+#               2010  Minero Aoki, Kenshi Muto, TAKAHASHI Masayoshi
+#
+# 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/builder'
+require 'review/latexutils'
+require 'review/textutils'
+
+module ReVIEW
+
+  class LATEXBuilder < Builder
+
+    include LaTeXUtils
+    include TextUtils
+
+    def extname
+      '.tex'
+    end
+
+    def builder_init_file
+      #@index = indexes[:latex_index]
+      @blank_needed = false
+    end
+    private :builder_init_file
+
+    def blank
+      @blank_needed = true
+    end
+    private :blank
+
+    def print(*s)
+      if @blank_needed
+        @output.puts
+        @blank_needed = false
+      end
+      super
+    end
+    private :print
+
+    def puts(*s)
+      if @blank_needed
+        @output.puts
+        @blank_needed = false
+      end
+      super
+    end
+    private :puts
+
+    HEADLINE = {
+      1 => 'chapter',
+      2 => 'section',
+      3 => 'subsection',
+      4 => 'subsubsection'
+    }
+
+    def headline(level, label, caption)
+      prefix = ""
+      if level > @param["secnolevel"]
+        prefix = "*"
+      end
+      blank unless @output.pos == 0
+      puts macro(HEADLINE[level]+prefix, escape(caption))
+    end
+
+    def column_begin(level, label, caption)
+      blank
+      ## puts '\vspace{2zw}' 
+      puts '\begin{center}'
+      puts '\begin{minipage}{0.9\linewidth}'
+      puts '\begin{framed}'
+      puts '\setlength{\FrameSep}{2zw}'
+
+      headline(2, label, caption)   # FIXME
+    end
+
+    def column_end(level)
+      puts '\end{framed}'
+      puts '\end{minipage}'
+      puts '\end{center}'
+      ## puts '\vspace{2zw}'
+      blank
+    end
+
+    def ul_begin
+      blank
+      puts '\begin{itemize}'
+    end
+
+    def ul_item(lines)
+      puts '\item ' + lines.join("\n")
+    end
+
+    def ul_end
+      puts '\end{itemize}'
+      blank
+    end
+
+    def ol_begin
+      blank
+      puts '\begin{enumerate}'
+    end
+
+    def ol_item(lines, num)
+      puts '\item ' + lines.join("\n")
+    end
+
+    def ol_end
+      puts '\end{enumerate}'
+      blank
+    end
+
+    def dl_begin
+      blank
+      puts '\begin{description}'
+    end
+
+    def dt(str)
+      puts '\item[' + str + '] \mbox{} \\\\'
+    end
+
+    def dd(lines)
+      lines.each do |line|
+        puts line
+      end
+    end
+
+    def dl_end
+      puts '\end{description}'
+      blank
+    end
+
+    def paragraph(lines)
+      blank
+      lines.each do |line|
+        puts line
+      end
+      blank
+    end
+
+    def parasep()
+      puts '\\parasep'
+    end
+
+    def read(lines)
+      latex_block 'quotation', lines
+    end
+
+    alias lead read
+
+    def emlist(lines)
+      blank
+      puts '\begin{reviewemlist}'
+      puts '\begin{verbatim}'
+      lines.each do |line|
+        puts line
+      end
+      puts '\end{verbatim}'
+      puts '\end{reviewemlist}'
+      blank
+    end
+
+    def cmd(lines)
+      blank
+      puts '\begin{reviewcmd}'
+      puts '\begin{verbatim}'
+      lines.each do |line|
+        puts line
+      end
+      puts '\end{verbatim}'
+      puts '\end{reviewcmd}'
+      blank
+    end
+
+    def list_header(id, caption)
+      puts macro('reviewlistcaption', "#{@chapter.number}.#{@chapter.list(id).number}", text(caption))
+    end
+
+    def list_body(lines)
+      puts '\begin{reviewlist}'
+      puts '\begin{verbatim}'
+      lines.each do |line|
+        puts line
+      end
+      puts '\end{verbatim}'
+      puts '\end{reviewlist}'
+      puts
+    end
+
+    def image_header(id, caption)
+    end
+
+    def image_image(id, metric, caption)
+      # image is always bound here
+      puts '\begin{reviewimage}'
+      if metric
+        puts "\\includegraphics[#{metric}]{#{@chapter.image(id).path}}"
+      else
+        puts macro('includegraphics', @chapter.image(id).path)
+      end
+      puts macro('label', image_label(id))
+      if !caption.empty?
+        puts macro('caption', text(caption))
+      end
+      puts '\end{reviewimage}'
+    end
+
+    def image_dummy(id, caption, lines)
+      puts '\begin{reviewdummyimage}'
+      puts '\begin{verbatim}'
+      path = @chapter.image(id).path
+      puts "--[[path = #{path} (#{existence(id)})]]--"
+      lines.each do |line|
+        puts detab(line.rstrip)
+      end
+      puts '\end{verbatim}'
+      puts macro('label', image_label(id))
+      puts text(caption)
+      puts '\end{reviewdummyimage}'
+    end
+
+    def existence(id)
+      @chapter.image(id).bound? ? 'exist' : 'not exist'
+    end
+    private :existence
+
+    def image_label(id)
+      "image:#{@chapter.id}:#{id}"
+    end
+    private :image_label
+
+    def table_header(id, caption)
+      puts macro('reviewtablecaption', "#{@chapter.number}.#{@chapter.table(id).number}", text(caption))
+    end
+
+    def table_begin(ncols)
+      puts macro('begin', 'reviewtable', (['|'] * (ncols + 1)).join('l'))
+      puts '\hline'
+    end
+
+    def table_separator
+      #puts '\hline'
+    end
+
+    def th(s)
+      macro('textgt', s)
+    end
+
+    def td(s)
+      s
+    end
+
+    def tr(rows)
+      print rows.join(' & ')
+      puts ' \\\\  \hline'
+    end
+
+    def table_end
+      puts macro('end', 'reviewtable')
+      blank
+    end
+
+    def quote(lines)
+      latex_block 'quotation', lines
+    end
+
+    def center(lines)
+      latex_block 'center', lines
+    end
+
+    def right(lines)
+      latex_block 'flushright', lines
+    end
+
+    def latex_block(type, lines)
+      blank
+      puts macro('begin', type)
+      lines.each do |line|
+        puts line
+      end
+      puts macro('end', type)
+      blank
+    end
+    private :latex_block
+
+    def direct(lines, fmt)
+      return unless fmt == 'latex'
+      lines.each do |line|
+        puts line
+      end
+    end
+
+    def comment(str)
+      puts "% #{str}"
+    end
+
+    def label(id)
+      puts macro('label', id)
+    end
+
+    def pagebreak
+      puts '\pagebreak'
+    end
+
+    def linebreak
+      puts '\\\\'
+    end
+
+    def noindent
+      puts '\noindent'
+    end
+
+    # FIXME: use TeX native label/ref.
+    def inline_list(id)
+      macro('reviewlistref', "#{@chapter.number}.#{@chapter.list(id).number}")
+    end
+
+    def inline_table(id)
+      macro('reviewtableref', "#{@chapter.number}.#{@chapter.table(id).number}")
+    end
+
+    def inline_img(id)
+      macro('reviewimageref', "#{@chapter.number}.#{@chapter.image(id).number}")
+    end
+
+    def footnote(id, content)
+    end
+
+    def inline_fn(id)
+      macro('footnote', compile_inline(@chapter.footnote(id).content.strip))
+    end
+
+    BOUTEN = "・"
+
+    def inline_bou(str)
+      str.split(//).map {|c| macro('ruby', escape(c), macro('textgt', BOUTEN)) }.join('\allowbreak')
+    end
+
+    def inline_ruby(str)
+      base, ruby = *str.split(/,/)
+      macro('ruby', base, ruby)
+    end
+
+    # math
+    def inline_m(str)
+      " $#{str}$ "
+    end
+
+    # hidden index
+    def inline_hi(str)
+      index(str)
+    end
+
+    # index
+    def inline_i(str)
+      text(str) + index(str)
+    end
+
+    # bold
+    def inline_b(str)
+      macro('textbf', text(str))
+    end
+
+    def nofunc_text(str)
+      escape(str)
+    end
+
+    def inline_tt(str)
+      macro('texttt', escape(str))
+    end
+
+    def index(str)
+      str.sub!(/\(\)/, '')
+      decl = ''
+      if /@\z/ =~ str
+        str.chop!
+        decl = '|IndexDecl'
+      end
+      unless /[^ -~]/ =~ str
+        if /\^/ =~ str
+          macro('index', escape_index(str.gsub(/\^/, '')) + '@' + escape_index(text(str)) + decl)
+        else
+          '\index{' + escape_index(text(str)) + decl + '}'
+        end
+      else
+        '\index{' + escape_index(@index_db[str]) + '@' + escape_index(text(str)) + '}'
+      end
+    end
+
+    def compile_kw(word, alt)
+      if alt
+        macro('textgt', escape(word)) + "（#{escape(alt.strip)}）"
+      else
+        macro('textgt', escape(word))
+      end
+    end
+
+    def compile_href(url, label)
+      label ||=  url
+      if /\A[a-z]+:\/\// =~ url
+        macro("href", url, escape(label))
+      else
+        macro("ref", url)
+      end
+    end
+
+    def tsize(str)
+      # dummy
+    end
+
+  end
+
+end