review-peg 0.1.0

data/test/book_test_helper.rb

@@ -0,0 +1,35 @@
+require 'test_helper'
+require 'review/book'
+
+require 'stringio'
+require 'tempfile'
+require 'tmpdir'
+
+include ReVIEW
+
+module BookTestHelper
+  def mktmpbookdir(files = {})
+    created_files = {}
+    Dir.mktmpdir do |dir|
+      files.each_pair do |basename, content|
+        path = File.join(dir, basename)
+        File.open(path, 'w') {|o| o.print content }
+        created_files[basename] = path
+      end
+      book = Book::Base.load(dir)
+      yield(dir, book, created_files)
+    end
+  end
+
+  def get_instance_variables(obj)
+    obj.instance_variables.inject({}) do |memo, name|
+      value = obj.instance_variable_get(name)
+      if value.instance_variables.empty?
+        memo[name] = value
+      else
+        memo[name] = get_instance_variables(value)
+      end
+      memo
+    end
+  end
+end

data/test/sample-book/README.md

@@ -0,0 +1,7 @@
+# Re:VIEWサンプル書籍データ
+
+Re:VIEW ( http://github.com/kmuto/review )で書籍データを作るためのサンプルファイルです。
+
+必要なファイルはsrc/ディレクトリ内にあります。srcディレクトリで「review-epubmaker config.yml」と実行すればEPUBが、「review-pdfmaker config.yml」とすればPDFが生成されます(PDFの生成にはpLaTeXとdvipdfmxが必要です)。
+
+Ruby製のビルドツールであるrakeがインストールされている環境の場合、「rake pdf」を実行すればPDFが、「rake epub」を実行すればEPUBが生成されます。また、「rake html_all」を実行すればHTMLが生成されます。

data/test/sample-book/src/Rakefile

@@ -0,0 +1,58 @@
+require 'fileutils'
+require 'rake/clean'
+
+BOOK = "book"
+BOOK_PDF = BOOK+".pdf"
+BOOK_EPUB = BOOK+".epub"
+CONFIG_FILE = "config.yml"
+REVIEW_COMPILE = "review-compile-peg"
+
+def build(mode, chapter)
+  sh "#{REVIEW_COMPILE} --target=#{mode} --footnotetext --stylesheet=style.css #{chapter} > tmp"
+  mode_ext = {"html" => "html", "latex" => "tex",
+              "idgxml" => "xml", "inao" => "inao"}
+  FileUtils.mv "tmp", chapter.gsub(/re\z/, mode_ext[mode])
+end
+
+def build_all(mode)
+  sh "#{REVIEW_COMPILE} --all --target=#{mode} --footnotetext --stylesheet=style.css"
+end
+
+task :default => :html_all
+
+desc "build html (Usage: rake build re=target.re)"
+task :html do
+  if ENV['re'].nil?
+    puts "Usage: rake build re=target.re"
+    exit
+  end
+  build("html", ENV['re'])
+end
+
+desc "build all html"
+task :html_all do
+  build_all("html")
+end
+
+desc 'generate PDF and EPUB file'
+task :all => [:pdf, :epub]
+
+desc 'generate PDF file'
+task :pdf => BOOK_PDF
+
+desc 'generate EPUB file'
+task :epub => BOOK_EPUB
+
+SRC = FileList['*.re'] + [CONFIG_FILE]
+
+file BOOK_PDF => SRC do
+  FileUtils.rm_rf [BOOK_PDF, BOOK, BOOK+"-pdf"]
+  sh "review-pdfmaker #{CONFIG_FILE}"
+end
+
+file BOOK_EPUB => SRC do
+  FileUtils.rm_rf [BOOK_EPUB, BOOK, BOOK+"-epub"]
+  sh "review-epubmaker #{CONFIG_FILE}"
+end
+
+CLEAN.include([BOOK, BOOK_PDF, BOOK_EPUB, BOOK+"-pdf", BOOK+"-epub"])

data/test/sample-book/src/_cover.html

@@ -0,0 +1,3 @@
+<div id="cover-image" style="img { max-width:100%; }">
+  <img src="images/cover.jpg" alt="cover"/>
+</div>

data/test/sample-book/src/catalog.yml

@@ -0,0 +1,10 @@
+PREDEF:
+  - preface.re
+
+CHAPS:
+  - ch01.re
+  - ch02.re
+
+APPENDIX:
+
+POSTDEF:

data/test/sample-book/src/ch01.re

@@ -0,0 +1,71 @@
+= サンプル
+
+//lead{
+書き方のサンプルです。上書きするなりして消して下さい。
+//}
+
+== 本文の書き方
+
+最初の段落です。
+この行も同じ段落です。
+
+次の段落です。
+
+
+
+２行以上以上空いていても１行空いているのと同様に処理します。
+
+=== 見出し
+
+「=」「==」「===」の後に一文字空白をあけると見出しになります。
+
+
+====[column] コラムについて
+
+見出しの先頭に「[column]」と書くと、そこはコラムになります。
+
+== 箇条書き
+
+番号のない箇条書きは「*」を使います。前後に空白を入れて下さい。
+
+ * 1つ目
+ * 2つ目
+ * 3つ目
+
+番号つきの箇条書きには、「1.」「2.」などと書きます。
+数字の値は実際には無視され、連番が振られます。
+
+ 1. 1つ目
+ 2. 2つ目
+ 3. 3つ目
+
+== ソースコードなどのリスト
+
+リストには「//list」ブロックや「//emlist」ブロックを使います。
+
+//list[list][リストのサンプル]{
+int main(int argc, char **argv) {
+  puts("OK");
+  return 0;
+}
+//}
+
+文中にリストを書くには「//emlist」になります。
+
+//emlist{
+def main
+  puts "ok"
+end
+//}
+
+== 画像
+
+画像は「//image」ブロックを使います。
+
+//image[imgsample][画像サンプル]{
+//}
+
+
+より詳しくは、
+@<href>{https://github.com/kmuto/review/blob/master/doc/format.rdoc}
+を御覧ください。

data/test/sample-book/src/ch02.re

@@ -0,0 +1,3 @@
+= サンプルその２
+
+基本はサンプルと同様です。

data/test/sample-book/src/config.yml

@@ -0,0 +1,186 @@
+# review-epubmaker向けの設定ファイルの例。
+# yamlファイルをRe:VIEWファイルのある場所に置き、
+# 「review-epubmaker yamlファイル」を実行すると、<bookname>.epubファイルが
+# 生成されます。
+# このファイルはUTF-8エンコーディングで記述してください。
+
+# ブック名(ファイル名になるもの。ASCII範囲の文字を使用)
+bookname: book
+# 記述言語。省略した場合はja
+language: ja
+# 書名
+booktitle: Re:VIEWサンプル書籍
+# 固有IDに使用するドメイン。省略した場合は時刻に基づくランダムUUIDが入る
+urnid: urn:uid:http://tatsu-zine.com/books/review-sample-book/1.0.0/
+# ISBN。省略した場合はurnidが入る
+# isbn: null
+# 著者名。["高橋征義", "John Doe"] のように配列を使うことで複数指定可
+aut: 高橋征義
+# 出版社。配列書式で複数指定可能
+prt: 達人出版会
+# 編集者。配列書式で複数指定可能
+edt: 高橋征義
+# 刊行日。YYYY-MM-DD形式。省略した場合は本日の日付
+date: 2011-08-03
+# 発行年月。YYYY-MM-DD形式による配列指定。省略した場合はdateを使用する
+# 複数指定する場合は次のように記述する
+# [["初版第第1刷の日付", "初版第第2刷の日付"], ["第2版第1刷の日付"]]
+# 日付の後ろを空白文字で区切り、任意の文字列を置くことも可能。
+history: [["2011-08-03 v1.0.0版発行"]]
+# 権利表記
+rights: (C) 2011 Masayoshi Takahashi
+
+# 以下はオプション(autと同じように配列書式で複数指定可能)。
+# adp: 異なるメディア向けに作り直した者
+# ann: 注釈記述者
+# arr: アレンジした者
+# art: グラフィックデザインおよび芸術家
+# asn: 関連・かつての所有者・関係者
+# aqt: 大きく引用された人物
+# aft: 後書き・奥付の責任者
+# aui: 序論・序文・前書きの責任者
+# ant: 目録責任者
+# bkp: メディア制作責任者
+# clb: 限定参加または補足者
+# cmm: 解釈・分析・考察者
+# dsr: デザイナ
+# edt: 編集者
+# ill: イラストレータ
+# lyr: 歌詞作成者
+# mdc: メタデータセットの一次的責任者
+# mus: 音楽家
+# nrt: 語り手
+# oth: その他
+# pht: 撮影責任者
+# red: 項目の枠組起草者
+# rev: 評論者
+# spn: 援助者
+# ths: 監督者
+# trc: 筆記・タイプ作業者
+# trl: 翻訳者
+# description: ブックの説明
+# subject: 短い説明用タグ
+# type: 書籍のカテゴリーなど
+# format: メディアタイプおよび特徴
+# source: 出版物生成の重要なリソース情報
+# relation: 補助的リソース
+# coverage: 内容の範囲や領域
+
+# htmlext: HTMLファイルの拡張子(省略した場合はhtml)
+# CSSファイル(配列で複数指定可、yamlファイルおよびRe:VIEWファイルを置いたディレクトリにあること)
+stylesheet: ["style.css"]
+
+# ePUBのバージョン (2か3) 省略した場合は2
+epubversion: 3
+# HTMLのバージョン (4か5。epubversionを3にしたときには5にする)
+# htmlversion: 5
+
+# 目次を作成するか。省略した場合はnull（作成しない）
+# toc: true
+
+# 目次として抽出する見出しレベル。省略した場合は2
+toclevel: 2
+# 本文でセクション番号を表示する見出しレベル。省略した場合は2
+# 採番させたくない見出しには「==[nonum]」のようにnonum指定をする
+secnolevel: 3
+# EPUB2標準の目次以外に物理目次ファイルを作成するか。省略した場合はnull (作成しない)
+# ePUB3においてはこの設定によらず必ず作成される
+# mytoc: true
+
+# 付録の連番のスタイル。null(アラビア数字1〜。デフォルト)、alpha(英字A〜)、roman(ローマ数字I〜)
+# appendix_format: null
+
+# 表紙にするHTMLファイル。ファイル名を指定すると表紙として入る
+# cover: _cover.html
+# 表紙に配置し、書籍の影絵にも利用する画像ファイル。省略した場合はnull (画像を使わない)
+coverimage: cover.jpg
+# 表紙の後に大扉ページを作成するか。省略した場合はnull (作成しない)
+# titlepage: null
+# 自動生成される大扉ページを上書きするファイル。ファイル名を指定すると大扉として入る
+# titlefile: null
+# 原書大扉ページにするHTMLファイル。ファイル名を指定すると原書大扉として入る
+# originaltitlefile: null
+# 権利表記ページファイル。ファイル名を指定すると権利表記として入る
+# creditfile: null
+# プロフィールページファイル。ファイル名を指定すると著者紹介として入る
+# profile: null
+# プロフィールページの目次上の見出し
+# profiletitle: 著者紹介
+# 広告ファイル。ファイル名を指定すると広告として入る
+# advfile: null
+# 奥付を作成するか。デフォルトでは作成されない。trueを指定するとデフォルトの奥付、ファイル名を指定するとそれがcolophon.htmlとしてコピーされる
+colophon: true
+# 裏表紙ファイル (画像はcoversまたはimagesに配置する)。ファイル名を指定すると裏表紙として入る
+# backcover: null
+
+# 以下のパラメータを有効にするときには、
+# epubmaker:
+#    パラメータ: 値
+#    パラメータ: 値
+#   ...
+# という構成にする必要がある(インデントさせる)
+
+# epubmaker:
+# 目次を要素の階層表現にしない。省略した場合(null)は階層化する。
+# 特に部扉が入るなどの理由で、構成によっては階層化目次でepubcheckに
+# パスしない目次ができるが、そのようなときにはこれをtrueにする
+#  flattoc: null
+# 目次のインデントレベルをスペース文字で表現する(flattocがtrueのときのみ)
+#  flattocindent: true
+# NCX目次の見出しレベルごとの飾り(配列で設定)。EPUB3ではNCXは作られない
+#  ncxindent:
+#- 
+#- - 
+# フックは、各段階で介入したいときのプログラムを指定する。自動で適切な引数が渡される
+# プログラムには実行権限が必要
+# ファイル変換処理の前に実行するプログラム。スタイルシートのコンパイルをしたいときなどに利用する。
+# 渡される引数1=作業用展開ディレクトリ
+#  hook_beforeprocess: null
+# 前付の作成後に実行するプログラム。作業用展開ディレクトリにある目次ファイル(toc-html.txt)を操作したいときなどに利用する。
+# 渡される引数1=作業用展開ディレクトリ
+#  hook_afterfrontmatter: null
+# 本文の変換後に実行するプログラム。作業用展開ディレクトリにある目次ファイル(toc-html.txt)を操作したいときなどに利用する。
+# 渡される引数1=作業用展開ディレクトリ
+#  hook_afterbody: null
+# 後付の作成後に実行するプログラム。作業用展開ディレクトリにある目次ファイル(toc-html.txt)を操作したいときなどに利用する。
+# 渡される引数1=作業用展開ディレクトリ
+#  hook_afterbackmatter: null
+# 画像およびフォントをコピーした後に実行するプログラム。別の画像やフォントを追加したいときなどに利用する。
+# 渡される引数1=作業用展開ディレクトリ
+#  hook_aftercopyimage: null
+# ePUB zipアーカイブ直前に実行するプログラム。メタ情報などを加工したいときなどに利用する。
+# 渡される引数1=ePUB準備ディレクトリ
+#  hook_prepack: null
+# 変換したHTMLファイルおよびCSSを解析して厳密に使用している画像ファイルだけを取り込むか。デフォルトはnull(imagesディレクトリすべてを取り込む)
+# なお、フォント、カバー、広告についてはこの設定によらずディレクトリ内のものがすべて取り込まれる
+#  verify_target_images: null
+#  verify_target_imagesがtrueの状態において、解析で発見されなくても強制的に取り込むファイルの相対パスの配列
+#  force_include_images: []
+# Re:VIEWファイル名を使わず、前付にpre01,pre02...、本文にchap01,chap02l...、後付にpost01,post02...という名前付けルールにするか
+#  rename_for_legacy: null
+# ePUBアーカイブの非圧縮実行
+#  zip_stage1: "zip -0Xq"
+# ePUBアーカイブの圧縮実行
+#  zip_stage2: "zip -Xr9Dq"
+# ePUBアーカイブに追加するパス(デフォルトはmimetype、META-INF、OEBPS)
+#  zip_addpath: null
+#
+# epubmaker:階層を使うものはここまで
+
+# ハイライトを有効にするか。pygments.gemが必要
+# pygments: null
+
+# 取り込む画像が格納されているディレクトリ。省略した場合は以下
+# imagedir: images
+
+# 取り込むフォントが格納されているディレクトリ。省略した場合は以下
+# fontdir: fonts
+
+# imagedir内から取り込まれる対象となるファイル拡張子。省略した場合は以下
+# image_ext: ["png", "gif", "jpg", "jpeg", "svg", "ttf", "woff", "otf"]
+
+# fontdir内から取り込まれる対象となるファイル拡張子。省略した場合は以下
+# font_ext: ["ttf", "woff", "otf"]
+
+texstyle: reviewmacro
+debug: true

data/test/sample-book/src/preface.re

@@ -0,0 +1,15 @@
+= はじめに
+
+(読者が読みたくなるようなまえがきっぽい言葉)
+
+== 内容について
+
+(内容紹介)
+
+== 動作環境について
+
+(バージョンとか)
+
+== 謝辞
+
+(必要に応じて)

data/test/sample-book/src/sty/jumoline.sty

@@ -0,0 +1,310 @@
+%%
+%% This is file `jumoline.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% jumoline.dtx  (with options: `package')
+%% 
+%% IMPORTANT NOTICE:
+%% 
+%% For the copyright see the source file.
+%% 
+%% Any modified versions of this file must be renamed
+%% with new filenames distinct from jumoline.sty.
+%% 
+%% For distribution of the original source see the terms
+%% for copying and modification in the file jumoline.dtx.
+%% 
+%% This generated file may be distributed as long as the
+%% original source files, as listed above, are part of the
+%% same distribution. (The sources need not necessarily be
+%% in the same archive or directory.)
+%% Style file `jumoline'.
+%% Copyright (C) 1999-2001  Hiroshi Nakashima
+%%        (Toyohashi Univ. of Tech.)
+%%
+%% This program can be redistributed and/or modified under the terms
+%% of the LaTeX Project Public License distributed from CTAN
+%% archives in directory macros/latex/base/lppl.txt; either
+%% version 1 of the License, or any later version.
+%%
+%% \CharacterTable
+%%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%%   Digits        \0\1\2\3\4\5\6\7\8\9
+%%   Exclamation   \!     Double quote  \"     Hash (number) \#
+%%   Dollar        \$     Percent       \%     Ampersand     \&
+%%   Acute accent  \'     Left paren    \(     Right paren   \)
+%%   Asterisk      \*     Plus          \+     Comma         \,
+%%   Minus         \-     Point         \.     Solidus       \/
+%%   Colon         \:     Semicolon     \;     Less than     \<
+%%   Equals        \=     Greater than  \>     Question mark \?
+%%   Commercial at \@     Left bracket  \[     Backslash     \\
+%%   Right bracket \]     Circumflex    \^     Underscore    \_
+%%   Grave accent  \`     Left brace    \{     Vertical bar  \|
+%%   Right brace   \}     Tilde         \~}
+%%
+%%
+\def\next{LaTeX2e}
+\ifx\fmtname\next
+\def\next{
+\NeedsTeXFormat{LaTeX2e}[1994/12/01]
+\ProvidesPackage{jumoline}}
+\else\def\next[#1]{}\fi
+\next
+[2001/05/31 v1.2 ]
+
+\ifx\PackageError\undefined
+\def\PackageError#1#2#3{\@latexerr{#1:#2}{#3^^J\@ehc}}
+\fi
+
+%%^L
+
+%% Register Declaration
+
+\newdimen\UnderlineDepth \UnderlineDepth-\maxdimen
+\newdimen\MidlineHeight \MidlineHeight-\maxdimen
+\newdimen\OverlineHeight \OverlineHeight-\maxdimen
+\newdimen\UMOlineThickness \UMOlineThickness.4pt
+
+\newdimen\UMO@height \newdimen\UMO@depth
+\newdimen\UMO@dqspace \newdimen\UMO@tempdim
+
+\newskip\UMO@prejfmglue \newskip\UMO@postjfmglue
+
+\newcount\UMO@mode
+\let\UMO@afterblock\z@
+\let\UMO@afterword\@ne
+\let\UMO@afterchar\tw@
+
+\newcount\UMO@spacefactor
+\newcount\UMO@firstxspcode
+\newcount\UMO@lastxspcode
+\newcount\UMO@inhibitxspcode
+\newcount\UMO@prebreakpenalty
+\newcount\UMO@postbreakpenalty
+\newcount\UMO@kpostbreakpenalty
+
+\newif\ifUMO@nospace \newif\ifUMO@firstelem
+
+%%^L
+
+%% User Interface and Initialization
+
+\def\Underline{\UMO@line\UnderlineDepth{-\UnderlineDepth}{-\dp\strutbox}}
+\def\Midline{\setbox\@tempboxa\hbox{あ}%
+        \UMO@line\MidlineHeight\MidlineHeight{.5\ht\@tempboxa}}
+\def\Overline{\UMO@line\OverlineHeight\OverlineHeight{\ht\strutbox}}
+\def\UMOline{\UMO@line{-\maxdimen}\z@}
+
+\def\UMO@line#1#2#3#4{\begingroup \let\\\UMOnewline
+        \relax\ifdim#1<\z@ \UMO@height#3\relax
+        \else \UMO@height#2\relax \fi
+        \UMO@depth-\UMO@height
+        \ifdim\UMO@height<\z@ \advance\UMO@depth\UMOlineThickness
+        \else                 \advance\UMO@height\UMOlineThickness \fi
+        \settowidth\UMO@dqspace{“}\advance\UMO@dqspace-1zw
+        \UMO@dqspace-\UMO@dqspace \divide\UMO@dqspace\tw@
+        \UMO@nospacetrue \UMO@firstelemtrue
+        \UMO@mode\UMO@afterblock
+        \ifvmode\leavevmode\fi
+        \def\@tempa{#4 }\edef\@tempb{\noexpand\@nil\space}%
+        \expandafter\expandafter\expandafter\UMO@wordloop
+                \expandafter\@tempa\@tempb
+        \endgroup \UMO@aftergroup}
+
+%%^L
+
+%% Processing Word Elements
+
+\def\UMO@wordloop{\UMO@ifbgroup\UMO@wordblock\UMO@iwordloop}
+\def\UMO@ifbgroup#1#2{\let\@tempa#1\let\@tempb#2\futurelet\@tempc\UMO@ifnc}
+\def\UMO@ifnc{\ifx\@tempc\bgroup \let\next\@tempa \else\let\next\@tempb \fi
+        \next}
+\def\UMO@wordblock#1{\UMO@spaceskip
+        \UMO@putbox\relax{#1}\UMO@nospacetrue \UMO@mode\UMO@afterblock
+        \UMO@spacefactor\@m \UMO@wordloop}
+\def\UMO@iwordloop#1 {\def\@tempa{#1}\ifx\@tempa\@nnil \let\next\UMO@end
+        \else
+        \ifx\@tempa\empty \UMO@nospacefalse
+        \else
+                \UMO@spaceskip \UMO@mode\UMO@afterblock
+                \def\UMO@theword{}\UMO@firstxspcode\m@ne
+                \UMO@charloop#1\@nil \fi
+        \let\next\UMO@wordloop \fi
+        \next}
+
+%%^L
+
+%% Interword Spacing
+
+\def\UMO@spaceskip{\ifUMO@nospace \UMO@nospacefalse \else
+        \ifdim\spaceskip=\z@
+            \@tempdima\fontdimen3\font\relax
+                \multiply\@tempdima\UMO@spacefactor \divide\@tempdima\@m
+            \@tempdimb\fontdimen4\font\relax \multiply\@tempdimb\@m
+                \divide\@tempdimb\UMO@spacefactor
+            \@tempskipa\fontdimen2\font plus\@tempdima minus\@tempdimb\relax
+        \else
+            \edef\@tempa{\the\spaceskip\space @ @ @ @ }%
+            \expandafter\UMO@setspaceskip\@tempa\@nil
+        \fi
+        \ifnum\UMO@spacefactor<2000\else
+                \ifdim\xspaceskip=\z@ \advance\@tempskipa\fontdimen7\font
+                \else \@tempskipa\xspaceskip
+        \fi\fi
+        \UMO@skip\@tempskipa \fi}
+\def\UMO@setspaceskip#1 #2 #3 #4 #5 #6\@nil{\@tempdima\z@ \@tempdimb\z@
+        \def\@tempa{#2}\def\@tempb{#3}%
+        \ifx\@tempa\UMO@plus \@tempdima#3\def\@tempa{#4}\def\@tempb{#5}\fi
+        \ifx\@tempa\UMO@minus \@tempdimb\@tempb\relax\fi
+        \multiply\@tempdima\UMO@specefactor \divide\@tempdima\@m
+        \multiply\@tempdimb\@m \divide\UMO@spacefactor
+        \@tempskipa#1 plus\@tempdima minus\@tempdimb\relax}
+\def\@tempa#1 #2 #3 #4 #5\@nil{\def\UMO@plus{#2}\def\UMO@minus{#4}}
+\@tempskipa1pt plus 2pt minus 3pt
+\expandafter\@tempa\the\@tempskipa\@nil
+
+%%^L
+
+%% Processing Characters
+
+\def\UMO@charloop{\UMO@ifbgroup\UMO@charblock\UMO@icharloop}
+\def\UMO@charblock#1{\UMO@putword
+        \UMO@putbox\relax{#1}\UMO@mode\UMO@afterblock \UMO@spacefactor\@m
+        \UMO@charloop}
+\def\UMO@icharloop#1{\def\@tempa{#1}%
+        \ifx\@tempa\@nnil \UMO@putword \let\next\relax
+        \else\ifx\UMOspace#1\relax \UMO@putword \let\next\UMO@space
+        \else\ifx\UMOnewline#1\relax \UMO@putword \let\next\UMO@newline
+        \else
+        \ifnum`#1<256\relax \edef\UMO@theword{\UMO@theword#1}%
+                \ifnum\UMO@firstxspcode<\z@
+                        \UMO@firstxspcode\xspcode`#1\relax
+                        \UMO@prebreakpenalty\prebreakpenalty`#1\relax
+                        \fi
+                \UMO@lastxspcode\xspcode`#1\relax
+                \UMO@postbreakpenalty\postbreakpenalty`#1\relax
+        \else \UMO@putword \UMO@putchar{#1}\UMO@spacefactor\@m\fi
+        \let\next\UMO@charloop \fi\fi\fi \next}
+\def\UMOspace{\PackageError{jumoline}%
+        {\string\UMOspace\space cannot be used here.}%
+        {\string\UMOspace\space can be used only in the argument of
+                \string\Underline\space and its relatives.}}
+\def\UMOnewline{\PackageError{jumoline}%
+        {\string\UMOnewline\space cannot be used here.}%
+        {\string\UMOnewline\space can be used only in the argument of
+                \string\Underline\space and its relatives.}}
+
+%%^L
+
+%% Put ASCII String
+
+\def\UMO@putword{\ifx\UMO@theword\empty\else
+        \ifnum\UMO@mode=\UMO@afterchar
+                \advance\UMO@kpostbreakpenalty\UMO@prebreakpenalty
+                \penalty\UMO@kpostbreakpenalty
+                \ifdim\UMO@postjfmglue>\z@ \UMO@skip\UMO@postjfmglue
+                \else\ifodd\UMO@inhibitxspcode \ifodd\UMO@firstxspcode
+                        \UMO@skip\xkanjiskip \fi\fi\fi\fi
+        \setbox\@tempboxa\hbox{%
+                \UMO@theword\global\UMO@spacefactor\spacefactor}%
+        \UMO@putbox\relax\UMO@theword \UMO@mode\UMO@afterword
+        \def\UMO@theword{}\fi \UMO@firstxspcode\m@ne}
+
+%%^L
+
+%% Put Kanji Letter
+
+\def\UMO@putchar#1{%
+        \ifnum\UMO@mode=\UMO@afterchar \UMO@prejfmglue\UMO@postjfmglue
+        \else                          \UMO@prejfmglue\z@ \fi
+        \UMO@postjfmglue\z@
+        \ifnum`#1<\kuten"1001\relax\UMO@setjfmglue{#1}\fi
+        \@tempskipa\UMO@prejfmglue
+        \UMO@inhibitxspcode\inhibitxspcode`#1\relax
+        \@tempcnta\prebreakpenalty`#1\relax
+        \ifnum\UMO@mode=\UMO@afterchar
+                \advance\@tempcnta\UMO@kpostbreakpenalty
+                \ifdim\UMO@prejfmglue=\z@ \@tempskipa\kanjiskip \fi
+        \else\ifnum\UMO@mode=\UMO@afterword
+                \advance\@tempcnta\UMO@postbreakpenalty
+                \ifdim\UMO@prejfmglue=\z@
+                \ifnum\UMO@lastxspcode>\@ne \ifnum\UMO@inhibitxspcode>\@ne
+                        \@tempskipa\xkanjiskip \fi\fi\fi\fi\fi
+        \penalty\@tempcnta
+        \edef\@tempa{\the\@tempskipa}\ifx\@tempa\UMO@zskip\else
+                \UMO@skip\@tempskipa \fi
+        \UMO@putbox\inhibitglue{#1}%
+        \UMO@kpostbreakpenalty\postbreakpenalty`#1\relax
+        \UMO@mode\UMO@afterchar}
+\@tempskipa\z@
+\edef\UMO@zskip{\the\@tempskipa}
+\def\UMO@setjfmglue#1{%
+        \settowidth\@tempdima{あ#1}\settowidth\@tempdimb{あ\inhibitglue#1}%
+        \advance\@tempdima-\@tempdimb
+        \settowidth\UMO@tempdim{#1あ}\settowidth\@tempdimb{#1\inhibitglue あ}%
+        \advance\UMO@tempdim-\@tempdimb
+        \ifdim\@tempdima>\z@
+                \ifdim\UMO@tempdim>\z@
+                        \@tempskipa\@tempdima minus\@tempdima\relax
+                        \UMO@postjfmglue\UMO@tempdim minus\UMO@tempdim\relax
+                \else   \@tempskipa\@tempdima minus\UMO@dqspace\relax \fi
+                \advance\UMO@prejfmglue\@tempskipa
+        \else \UMO@postjfmglue\UMO@tempdim minus\UMO@dqspace \fi}
+
+%%^L
+
+%% Draw Under/Mid/Overline
+
+\def\UMO@putbox#1#2{\setbox\@tempboxa\hbox{#1#2#1}\@tempdima\wd\@tempboxa
+        \ifUMO@firstelem\else
+        \rlap{\vrule\@height\UMO@height\@depth\UMO@depth\@width\@tempdima}\fi
+        \box\@tempboxa
+        \ifUMO@firstelem \UMO@firstelemfalse
+        \llap{\vrule\@height\UMO@height\@depth\UMO@depth\@width\@tempdima}\fi}
+\def\UMO@skip#1{%
+        \leaders\hrule\@height\UMO@height\@depth\UMO@depth\hskip#1\relax}
+
+%%^L
+
+%% Explicit Spacing and Line Breaking
+
+\def\UMO@space{\UMO@mode\UMO@afterblock
+        \@ifstar\UMO@sspace\UMO@ispace}
+\def\UMO@sspace#1{\vrule width\z@\nobreak\UMO@skip{#1}\UMO@charloop}
+\def\UMO@ispace#1{\@tempskipa#1\relax
+        \@ifstar{\@tempswafalse\UMO@iispace}{\@tempswatrue\UMO@iispace}}
+\def\UMO@iispace{\@ifnextchar[%]
+                              {\UMO@penalty}%
+                              {\UMO@skip\@tempskipa \UMO@charloop}}
+\def\UMO@penalty[#1]{\@tempcnta#1\relax
+        \if@tempswa
+                \ifnum\@tempcnta<\z@ \@tempcnta-\@tempcnta \fi
+                \ifcase\@tempcnta \or
+                        \@tempcnta\@lowpenalty \or
+                        \@tempcnta\@medpenalty \or
+                        \@tempcnta\@highpenalty \else
+                        \@tempcnta\@M \fi
+                \ifnum#1<\z@ \@tempcnta-\@tempcnta \fi \fi
+        \penalty\@tempcnta \UMO@skip\@tempskipa \UMO@charloop}
+
+\def\UMO@newline{\UMO@mode\UMO@afterblock
+        \@ifstar{\UMO@skip{0pt plus1fil}\break \UMO@charloop}%
+                                 {\hfil \break \UMO@charloop}}
+
+%%^L
+
+%% Finalization
+
+\def\UMO@end{\ifnum\UMO@mode=\UMO@afterchar
+        \ifnum\UMO@kpostbreakpenalty>\z@
+                \penalty\UMO@kpostbreakpenalty \fi
+        \ifdim\UMO@postjfmglue>\z@
+                \UMO@skip\UMO@postjfmglue\fi \fi
+        \xdef\UMO@aftergroup{\ifnum\UMO@mode=\UMO@afterword
+                \spacefactor\number\UMO@spacefactor\fi}}
+\endinput
+%%
+%% End of file `jumoline.sty'.