tmtms-review 1.0.0

data/lib/review/review.tex.erb

@@ -0,0 +1,232 @@
+\documentclass[<%= documentclassoption %>]{<%= documentclass %>}
+\usepackage[deluxe]{otf}
+\usepackage[dvipdfmx]{color}
+\usepackage[dvipdfmx]{graphicx}
+\usepackage{framed}
+\usepackage{wrapfig}
+\definecolor{shadecolor}{gray}{0.9}
+\definecolor{shadecolorb}{gray}{0.1}
+\usepackage[utf8]{inputenc}
+\usepackage{ascmac}
+\usepackage{float}
+\usepackage{alltt}
+\usepackage{amsmath}
+
+%% if you use @<u>{} (underline), use jumoline.sty
+%%\usepackage{jumoline}
+
+\newenvironment{shadedb}{%
+  \def\FrameCommand{\fboxsep=\FrameSep \colorbox{shadecolorb}}%
+  \MakeFramed {\FrameRestore}}%
+ {\endMakeFramed}
+
+\usepackage[top=10zw,bottom=12zw,left=10zw,right=10zw]{geometry}
+%\usepackage[top=5zw,bottom=5zw,left=1zw,right=1zw]{geometry}
+
+
+\newcommand{\parasep}{\vspace*{3zh}}
+\setlength{\footskip}{30pt}
+
+%% Bookmarkの文字化け対策（日本語向け）
+\ifnum 46273=\euc"B4C1 % 46273 == 0xB4C1 == 漢(EUC-JP)
+  \usepackage{atbegshi}%
+  \AtBeginShipoutFirst{\special{pdf:tounicode EUC-UCS2}}%
+  %%\AtBeginDvi{\special{pdf:tounicode EUC-UCS2}}%
+\else
+  \usepackage{atbegshi}%
+  \AtBeginShipoutFirst{\special{pdf:tounicode 90ms-RKSJ-UCS2}}%
+  %%\AtBeginDvi{\special{pdf:tounicode 90ms-RKSJ-UCS2}}%
+\fi
+
+\usepackage[dvipdfm,bookmarks=true,bookmarksnumbered=true,colorlinks=true,%
+            pdftitle={<%= values["booktitle"] %>},%
+            pdfauthor={<%= values["aut"] %>}]{hyperref}
+
+\newenvironment{reviewimage}{%
+  \begin{figure}[H]
+    \begin{center}}{%
+    \end{center}
+  \end{figure}}
+
+\newenvironment{reviewdummyimage}{%
+  \begin{figure}[H]
+    \begin{center}}{%
+    \end{center}
+  \end{figure}}
+
+\newenvironment{reviewemlist}{%
+  \medskip\small\begin{shaded}\setlength{\baselineskip}{1.3zw}}{%
+  \end{shaded}}
+
+\newenvironment{reviewlist}{%
+  \begin{shaded}\small\setlength{\baselineskip}{1.3zw}}{%
+  \end{shaded}\par\vspace*{0.5zw}}
+
+\newenvironment{reviewcmd}{%
+  \color{white}\medskip\small\begin{shadedb}\setlength{\baselineskip}{1.3zw}}{%
+  \end{shadedb}}
+
+\newenvironment{reviewtable}[1]{%
+  \begin{center}\small\setlength{\baselineskip}{1.2zw}
+    \begin{tabular}{#1}}{%
+    \end{tabular}
+  \end{center}}
+
+\newenvironment{reviewcolumn}{%
+     \begin{framed}
+   }{%
+      \end{framed}
+  \vspace{2zw}}
+
+\newcommand{\reviewcolumnhead}[2]{%
+{\noindent\large ■コラム: #2}}
+
+\newcommand{\reviewtablecaption}[1]{%
+  \caption{#1}}
+
+\newcommand{\reviewbackslash}[0]{%
+  \textbackslash{}}
+
+\newcommand{\reviewlistcaption}[1]{%
+  \medskip{\small\noindent #1}\vspace*{-1.3zw}}
+
+\newcommand{\reviewemlistcaption}[1]{%
+  \medskip{\small\noindent #1}\vspace*{-1.3zw}}
+
+\newcommand{\reviewcmdcaption}[1]{%
+  \medskip{\small\noindent #1}\vspace*{-1.3zw}}
+
+\newcommand{\reviewindepimagecaption}[1]{%
+  \begin{center}#1\end{center}}
+
+\newcommand{\reviewimageref}[2]{%
+  図 #1}
+\newcommand{\reviewtableref}[2]{%
+  表 #1}
+\newcommand{\reviewlistref}[1]{%
+  リスト #1}
+
+\newcommand{\reviewminicolumntitle}[1]{%
+  {\large ■メモ：#1}\\}
+
+\newenvironment{reviewminicolumn}{%
+  \vspace{1.5zw}\begin{screen}}{%
+  \end{screen}\vspace{2zw}}
+
+\newcommand{\reviewkw}[1]{%
+  \textbf{\textgt{#1}}}
+
+\newcommand{\reviewami}[1]{%
+  \mask{#1}{A}}
+
+\newcommand{\reviewem}[1]{%
+  \textbf{#1}}
+
+\newcommand{\reviewstrong}[1]{%
+  \textbf{#1}}
+
+\newcommand{\reviewth}[1]{%
+  \textgt{#1}}
+
+\newcommand{\reviewtitlefont}[0]{%
+  \usefont{T1}{phv}{b}{n}\gtfamily}
+
+\newcommand{\reviewmainfont}[0]{%
+ }
+
+\newcommand{\reviewcolophon}[0]{%
+  \backmatter
+  \clearpage}
+\newcommand{\reviewappendix}[0]{%
+  \appendix}
+
+\makeatletter
+\def\maxwidth{%
+  \ifdim\Gin@nat@width>\linewidth
+    \linewidth
+  \else
+    \Gin@nat@width
+  \fi
+}
+\makeatother
+
+<%= values["usepackage"] %>
+
+\usepackage[T1]{fontenc}
+
+\begin{document}
+
+\reviewmainfont
+
+<% if values["titlepage"] %>
+<% if custom_titlepage %>
+<%= custom_titlepage %>
+<% else %>
+\begin{titlepage}
+  <% if values["coverimage"] %>
+  \begin{center}
+    %%%\mbox{}\vskip5zw%
+    \includegraphics[width=\textwidth,height=\textheight,keepaspectratio]{./images/<%= values["coverimage"] %>}
+  \end{center}
+  \clearpage
+  <% end %>
+\thispagestyle{empty}
+\begin{center}%
+  \mbox{} \vskip5zw
+   \reviewtitlefont%
+    {\Huge <%= values["booktitle"] %> \par}%
+    \vskip 15em%
+    {\huge
+      \lineskip .75em
+      \begin{tabular}[t]{c}%
+        <%= authors %>
+      \end{tabular}\par}%
+    \vfill
+    {\large <%= values["date"] %> 版\hspace{2zw}<%= values["prt"] %>　発行\par}%
+\vskip4zw\mbox{}
+  \end{center}%
+\end{titlepage}
+<% end %>
+<% end %>
+
+\renewcommand{\chaptermark}[1]{{}}
+\frontmatter
+
+%% preface
+<%= values["pre_str"] %>
+
+<% if values["toc"] %>
+\setcounter{tocdepth}{<%= values["toclevel"] %>}
+\tableofcontents
+<% end %>
+
+\renewcommand{\chaptermark}[1]{\markboth{\prechaptername\thechapter\postchaptername~#1}{}}
+\mainmatter
+<%= values["chap_str"] %>
+\renewcommand{\chaptermark}[1]{\markboth{\appendixname\thechapter~#1}{}}
+\reviewappendix
+<%= values["post_str"] %>
+
+<% if values["colophon"] %>
+%% okuduke
+\reviewcolophon
+\thispagestyle{empty}
+
+\vspace*{\fill}
+
+{\noindent\reviewtitlefont\Large <%= values["booktitle"] %>} \\
+\rule[8pt]{14cm}{1pt} \\
+{\noindent
+<%= values["pubhistory"].to_s.gsub(/\n/){"\n\n\\noindent"} %>
+}
+
+\begin{tabular}{ll}
+<%= okuduke %>
+\end{tabular}
+　\\
+\rule[0pt]{14cm}{1pt} \\
+<%= values["rights"] %> \\
+<% end %>
+
+
+\end{document}

data/lib/review/textbuilder.rb

@@ -0,0 +1,17 @@
+# textbuilder.rb
+#
+# 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.
+#
+
+require 'review/topbuilder'
+
+module ReVIEW
+
+  class TEXTBuilder < TOPBuilder
+  end
+
+end   # module ReVIEW

data/lib/review/textutils.rb

@@ -0,0 +1,66 @@
+# $Id: textutils.rb 2192 2005-11-13 11:55:42Z aamine $
+require 'nkf'
+
+module ReVIEW
+  module TextUtils
+    def detab(str, ts = 8)
+      add = 0
+      len = nil
+      str.gsub(/\t/) {
+        len = ts - ($`.size + add) % ts
+        add += len - 1
+        ' ' * len
+      }
+    end
+
+    def split_paragraph(lines)
+      pre = pre_paragraph
+      post = post_paragraph
+
+      blocked_lines = [[]]
+      lines.each {|element|
+        if element == ""
+          if blocked_lines.last != []
+            blocked_lines << []
+          end
+        else
+          blocked_lines.last << element
+        end
+      }
+
+      if !pre.nil? and !post.nil?
+        blocked_lines.map!{|i| [pre] + i + [post] }
+      end
+
+      blocked_lines.map{|l| l.join("")}
+    end
+
+    def convert_inencoding(str, enc)
+      case enc
+      when /^EUC$/i
+        NKF.nkf("-E -w -m0x", str)
+      when /^SJIS$/i
+        NKF.nkf("-S -w -m0x", str)
+      when /^JIS$/i
+        NKF.nkf("-J -w -m0x", str)
+      when /^UTF-8$/i
+        NKF.nkf("-W -w -m0x", str)
+      else
+        NKF.nkf("-w -m0 -m0x", str)
+      end
+    end
+
+    def convert_outencoding(str, enc)
+      case enc
+      when /^EUC$/i
+        NKF.nkf("-W -e -m0x", str)
+      when /^SJIS$/i
+        NKF.nkf("-W -s -m0x", str)
+      when /^JIS$/i
+        NKF.nkf("-W -j -m0x", str)
+      else
+        str
+      end
+    end
+  end
+end

data/lib/review/tocparser.rb

@@ -0,0 +1,342 @@
+#
+# $Id: tocparser.rb 4268 2009-05-27 04:17:08Z 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 the GNU LGPL, see the file "COPYING".
+#
+
+require 'review/preprocessor'
+require 'review/book'
+require 'forwardable'
+
+module ReVIEW
+
+  class TOCParser
+    def TOCParser.parse(chap)
+      chap.open {|f|
+        stream = Preprocessor::Strip.new(f)
+        new.parse(stream, chap.id, chap.path).map {|root|
+          root.number = chap.number
+          root
+        }
+      }
+    end
+
+    def parse(f, id, filename)
+      roots = []
+      path = []
+
+      while line = f.gets
+        line.sub!(/\A\xEF\xBB\xBF/u, '') # remove BOM
+        case line
+        when /\A\#@/
+          ;
+        when /\A\s*\z/
+          ;
+        when /\A(={2,})[\[\s]/
+          lev = $1.size
+          error! filename, f.lineno, "section level too deep: #{lev}" if lev > 5
+          if path.empty?
+            # missing chapter label
+            path.push Chapter.new(get_label(line), id, filename)
+            roots.push path.first
+          end
+          next if get_label(line) =~ /\A\[\// # ex) "[/column]"
+          new = Section.new(lev, get_label(line))
+          until path.last.level < new.level
+            path.pop
+          end
+          path.last.add_child new
+          path.push new
+
+        when /\A= /
+          path.clear
+          path.push Chapter.new(get_label(line), id, filename)
+          roots.push path.first
+
+        when %r<\A//\w+(?:\[.*?\])*\{\s*\z>
+          if path.empty?
+            error! filename, f.lineno, 'list found before section label'
+          end
+          path.last.add_child(list = List.new)
+          beg = f.lineno
+          list.add line
+          while line = f.gets
+            break if %r<\A//\}> =~ line
+            list.add line
+          end
+          error! filename, beg, 'unterminated list' unless line
+
+        when %r<\A//\w>
+          ;
+        else
+          #if path.empty?
+          #  error! filename, f.lineno, 'text found before section label'
+          #end
+          next if path.empty?
+          path.last.add_child(par = Paragraph.new)
+          par.add line
+          while line = f.gets
+            break if /\A\s*\z/ =~ line
+            par.add line
+          end
+        end
+      end
+
+      roots
+    end
+
+    def get_label(line)
+      line = line.strip.sub(/\A=+\s*/, '')
+      compile_label(line)
+    end
+
+    def compile_label(line)
+      b = TEXTBuilder.new
+      b.bind(ReVIEW::Compiler.new(b), nil, nil)
+      b.compile_inline(line)
+    end
+
+    def error!(filename, lineno, msg)
+      raise "#{filename}:#{lineno}: #{msg}"
+    end
+
+
+    class Node
+
+      def initialize(children = [])
+        @children = children
+      end
+
+      attr_reader :children
+
+      def add_child(c)
+        @children.push c
+      end
+      
+      def each_node(&block)
+        @children.each do |c|
+          yield c
+          c.each(&block)
+        end
+      end
+      
+      def each_child(&block)
+        @children.each(&block)
+      end
+
+      def chapter?
+        false
+      end
+
+      def each_section(&block)
+        @children.each do |n|
+          n.yield_section(&block)
+        end
+      end
+
+      def each_section_with_index
+        i = 0
+        each_section do |n|
+          yield n, i
+          i += 1
+        end
+      end
+
+      def n_sections
+        cnt = 0
+        @children.each do |n|
+          n.yield_section { cnt += 1 }
+        end
+        cnt
+      end
+
+    end
+
+
+    class Section < Node
+
+      def initialize(level, label, path = nil)
+        super()
+        @level = level
+        @label = label
+        @filename = (path ? real_filename(path) : nil)
+      end
+
+      def real_filename(path)
+        if FileTest.symlink?(path)
+          File.basename(File.readlink(path))
+        else
+          File.basename(path)
+        end
+      end
+      private :real_filename
+
+      attr_reader :level
+      attr_reader :label
+
+      def display_label
+        if @filename
+          @label + ' ' + @filename
+        else
+          @label
+        end
+      end
+
+      def estimated_lines
+        @children.inject(0) {|sum, n| sum + n.estimated_lines }
+      end
+
+      def yield_section
+        yield self
+      end
+
+      def inspect
+        "\#<#{self.class} level=#{@level} #{@label}>"
+      end
+
+    end
+
+
+    class Chapter < Section
+
+      def initialize(label, id, path)
+        super 1, label, path
+        @chapter_id = id
+        @path = path
+        @volume = nil
+        @number = nil
+      end
+
+      attr_accessor :number
+
+      def chapter?
+        true
+      end
+
+      attr_reader :chapter_id
+
+      def volume
+        return @volume if @volume
+        return Book::Volume.dummy unless @path
+        @volume = Book::Volume.count_file(@path)
+        @volume.lines = estimated_lines()
+        @volume
+      end
+
+      def inspect
+        "\#<#{self.class} #{@filename}>"
+      end
+
+    end
+
+
+    class Paragraph < Node
+
+      def initialize
+        @bytes = 0
+      end
+
+      def inspect
+        "\#<#{self.class}>"
+      end
+
+      def add(line)
+        @bytes += line.strip.bytesize
+      end
+
+      def estimated_lines
+        (@bytes + 2) / ReVIEW.book.page_metric.text.n_columns + 1
+      end
+
+      def yield_section
+      end
+
+    end
+
+
+    class List < Node
+
+      def initialize
+        @lines = 0
+      end
+
+      def inspect
+        "\#<#{self.class}>"
+      end
+
+      def add(line)
+        @lines += 1
+      end
+
+      def estimated_lines
+        @lines + 2
+      end
+
+      def yield_section
+      end
+
+    end
+
+  end
+
+
+  module TOCRoot
+    def level
+      0
+    end
+
+    def chapter?
+      false
+    end
+
+    def each_section_with_index
+      idx = -1
+      each_section do |node|
+        yield node, (idx += 1)
+      end
+    end
+
+    def each_section(&block)
+      each_chapter do |chap|
+        yield chap.toc
+      end
+    end
+
+    def n_sections
+      chapters.size
+    end
+
+    def estimated_lines
+      chapters.inject(0) {|sum, chap| sum + chap.toc.estimated_lines }
+    end
+  end
+
+  class Book::Base   # reopen
+    include TOCRoot
+  end
+
+  class Book::ChapterSet   # reopen
+    include TOCRoot
+  end
+
+  class Book::Part
+    include TOCRoot
+  end
+
+  class Book::Chapter   # reopen
+    def toc
+      @toc ||= TOCParser.parse(self)
+      unless @toc.size == 1
+        $stderr.puts "warning: chapter #{@toc.join} contains more than 1 chapter"
+      end
+      @toc.first
+    end
+  end
+
+end