wtex 0.1.0

data/skel/Makefile

@@ -0,0 +1,16 @@
+all : pdf
+
+pdf : book.pdf
+
+book.pdf : out/tmpl.dvi
+	dvipdfmx -o book.pdf out/tmpl.dvi
+
+out/tmpl.dvi : tmpl.tex head.tex body.tex
+	platex -output-directory=out tmpl.tex
+	platex -output-directory=out tmpl.tex
+
+tmpl.tex:
+	cp -p tmpl.tex.report tmpl.tex
+
+body.tex : body.txt
+	wikitex convert

data/skel/body.txt

@@ -0,0 +1,2 @@
+ここに本文を書いてください。
+make結果は、book.pdfに出力されます。

data/skel/head.tex

@@ -0,0 +1,3 @@
+\title{文書タイトル}
+\author{著者名}
+\date{日付} % delete this line to display the current date

data/skel/out/tmpl.dvi

@@ -0,0 +1 @@
+

data/skel/tmpl.tex.report

@@ -0,0 +1,81 @@
+\documentclass[oneside,11pt,a4paper]{report}
+\usepackage{okumacro}
+\usepackage{ascmac}
+\usepackage{fancybox}
+
+\textheight 25cm
+\textwidth 17cm
+\topmargin -1cm
+\oddsidemargin -.5cm
+\evensidemargin -.5cm
+
+\parindent 0zw
+\parskip 1zw plus .5zw minus .2zw
+\vfuzz 10pt
+
+%%% custom commands
+\newcommand{\WTunderline}[1]
+{
+  \underline{#1}
+}
+
+\newcommand{\WTseparator}[0]
+{
+  \begin{center}\subsection*{◆◇◆}\end{center}
+}
+
+%%% custom environments
+\newenvironment{WTbox}[1]
+{
+  \begin{itembox}[l]{#1}
+}
+{
+  \end{itembox}
+}
+
+\newenvironment{WTbox-without-title}[0]
+{
+  \begin{screen}
+}
+{
+  \end{screen}
+}
+
+\newenvironment{WTcode}[1]
+{
+  \VerbatimEnvironment
+  \begin{itembox}[l]{#1}
+  \baselineskip=.8\normalbaselineskip
+  \begin{Verbatim}
+}
+{
+  \end{Verbatim}
+  \baselineskip=\normalbaselineskip
+  \end{itembox}
+}
+
+\newenvironment{WTcode-without-title}[0]
+{
+  \VerbatimEnvironment
+  \begin{screen}
+  \baselineskip=.8\normalbaselineskip
+  \begin{Verbatim}
+}
+{
+  \end{Verbatim}
+  \baselineskip=\normalbaselineskip
+  \end{screen}
+}
+
+%%% title, author, etc.
+\include{head}
+
+%%% body
+\begin{document}
+
+\maketitle
+\tableofcontents
+
+\include{body}
+
+\end{document}

data/skel/tmpl.tex.tbook

@@ -0,0 +1,85 @@
+\documentclass[oneside,12pt,landscape]{tbook}
+\usepackage{okumacro}
+\usepackage{ascmac}
+\usepackage{fancybox}
+
+\AtBeginDvi{\special{papersize=297mm,210mm}}
+
+\textheight 34\baselineskip
+\textwidth 39zw
+\oddsidemargin 4zw
+
+%\textwidth 41zw
+%\kanjiskip=.1zw plus 3pt minus 3pt
+%\xkanjiskip=.2zw plus 3pt minus 3pt
+
+\parindent 0zw
+\parskip 1zw plus .5zw minus .2zw
+\vfuzz 10pt
+
+%%% custom commands
+\newcommand{\WTunderline}[1]
+{
+  \bou{#1}
+}
+
+\newcommand{\WTseparator}[0]
+{
+  \begin{center}\subsection*{◆◇◆}\end{center}
+}
+
+%%% custom environments
+\newenvironment{WTbox}[1]
+{
+  \begin{itembox}[l]{#1}
+}
+{
+  \end{itembox}
+}
+
+\newenvironment{WTbox-without-title}[0]
+{
+  \begin{screen}
+}
+{
+  \end{screen}
+}
+
+\newenvironment{WTcode}[1]
+{
+  \VerbatimEnvironment
+  \begin{itembox}[l]{#1}
+  \baselineskip=.6\normalbaselineskip
+  \begin{Verbatim}
+}
+{
+  \end{Verbatim}
+  \baselineskip=\normalbaselineskip
+  \end{itembox}
+}
+
+\newenvironment{WTcode-without-title}[0]
+{
+  \VerbatimEnvironment
+  \begin{screen}
+  \baselineskip=.6\normalbaselineskip
+  \begin{Verbatim}
+}
+{
+  \end{Verbatim}
+  \baselineskip=\normalbaselineskip
+  \end{screen}
+}
+
+%%% title, author, etc.
+\include{head}
+
+%%% body
+\begin{document}
+
+\maketitle
+\tableofcontents
+
+\include{body}
+
+\end{document}

data/t/t.rb

@@ -0,0 +1,13 @@
+#!/usr/bin/env ruby
+# encoding: UTF-8
+
+# Author::    Akira FUNAI
+# Copyright:: Copyright (c) 2011 Akira FUNAI
+
+require 'test/unit'
+
+t_dir = ::File.dirname __FILE__
+
+$LOAD_PATH.unshift t_dir
+$LOAD_PATH.unshift(::File.expand_path('../lib', t_dir))
+require 'wtex'

data/t/test_wtex.rb

@@ -0,0 +1,455 @@
+# encoding: UTF-8
+
+# Author::    Akira FUNAI
+# Copyright:: Copyright (c) 2011 Akira FUNAI
+
+require "#{::File.dirname __FILE__}/t"
+
+class TC_WTeX < Test::Unit::TestCase
+
+  def setup
+    @wt = WTeX.new
+  end
+
+  def teardown
+  end
+
+  def test_instance
+    wt = nil
+    assert_nothing_raised(
+      'WikiTex.new should return a proper instance'
+    ) {
+      wt = WTeX.new
+    }
+    assert_instance_of(
+      WTeX,
+      wt,
+      'WikiTex.new should return a proper instance'
+    )
+  end
+
+  def test_tex_heading
+    [
+      '!foo',
+      '! foo',
+      "! foo\n",
+    ].each {|w|
+      assert_equal(
+        "\\subsection{foo}\n",
+        @wt.tex(w.dup),
+        "WTeX#tex should convert #{w.inspect} into \\subsection{foo}"
+      )
+    }
+
+    assert_equal(
+      "\\section{bar}\n",
+      @wt.tex('!! bar'),
+      'WTeX#tex should convert "!! bar" into \\section{bar}'
+    )
+    assert_equal(
+      "\\chapter{baz}\n",
+      @wt.tex('!!! baz'),
+      'WTeX#tex should convert "!!! baz" into \\chapter{baz}'
+    )
+
+    assert_equal(
+      "\\chapter{baz}\n",
+      @wt.tex('!!!!! baz'),
+      'WTeX#tex should convert more than 4 "!"s into \\chapter{}'
+    )
+  end
+
+  def test_tex_separator
+    assert_equal(
+      "\\WTseparator{}\n",
+      @wt.tex('---'),
+      'WTeX#tex should convert "---" into \\WTseparator{}'
+    )
+  end
+
+  def test_tex_heading_without_number
+    assert_equal(
+      "\\subsection*{foo}\n",
+      @wt.tex('!* foo'),
+      'WTeX#tex should convert "!!!" with "*" into \\chapter*{}'
+    )
+    assert_equal(
+      "\\chapter*{baz}\n",
+      @wt.tex('!!!* baz'),
+      'WTeX#tex should convert "!!!" with "*" into \\chapter*{}'
+    )
+  end
+
+  def test_tex_heading_combination
+    w = <<'_eos'
+!!! foo
+
+!! bar
+
+_eos
+    assert_equal(
+      <<'_eos',
+\chapter{foo}
+
+\section{bar}
+
+_eos
+      @wt.tex(w),
+      'WTeX#tex should deal with multiple headings'
+    )
+
+    w = <<'_eos'
+!!! foo
+!! bar
+
+_eos
+    assert_equal(
+      <<'_eos',
+\chapter{foo}
+\section{bar}
+
+_eos
+      @wt.tex(w),
+      'WTeX#tex should deal with sequence of headings'
+    )
+  end
+
+  def test_tex_p
+    w = <<'_eos'
+foo
+bar
+_eos
+    assert_equal(
+      <<'_eos',
+foo\\
+bar
+_eos
+      @wt.tex(w),
+      'WTeX#tex should append new line commands explicitly'
+    )
+  end
+
+  def test_tex_p_multiple
+    w = <<'_eos'
+foo
+bar
+
+baz
+qux
+
+boo
+_eos
+    assert_equal(
+      <<'_eos',
+foo\\
+bar
+
+baz\\
+qux
+
+boo
+_eos
+      @wt.tex(w),
+      'WTeX#tex should deal with multiple paragraphs'
+    )
+
+    w = <<'_eos'
+foo
+bar
+baz
+
+qux
+
+boo
+_eos
+    assert_equal(
+      <<'_eos',
+foo\\
+bar\\
+baz
+
+qux
+
+boo
+_eos
+      @wt.tex(w),
+      'WTeX#tex should deal with multiple paragraphs'
+    )
+  end
+
+  def test_tex_p_combination
+    w = <<'_eos'
+!!! foo
+
+baz
+qux
+
+boo
+_eos
+    assert_equal(
+      <<'_eos',
+\chapter{foo}
+
+baz\\
+qux
+
+boo
+_eos
+      @wt.tex(w),
+      'WTeX#tex should deal with combination of commands and paragraphs'
+    )
+
+    w = <<'_eos'
+foo
+bar
+
+!! qux
+
+boo
+_eos
+    assert_equal(
+      <<'_eos',
+foo\\
+bar
+
+\section{qux}
+
+boo
+_eos
+      @wt.tex(w),
+      'WTeX#tex should deal with combination of commands and paragraphs'
+    )
+  end
+
+  def test_tex_box
+    w = <<'_eos'
+foo:
+] ***big***
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{WTbox}{foo}
+ {\LARGE\bf big}
+\end{WTbox}
+_eos
+      @wt.tex(w),
+      "WTeX#tex should convert lines which begin with ']' into boxed block"
+    )
+
+    w = <<'_eos'
+] ***big***
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{WTbox-without-title}
+ {\LARGE\bf big}
+\end{WTbox-without-title}
+_eos
+      @wt.tex(w),
+      "WTeX#tex should convert lines which begin with ']' into boxed block"
+    )
+  end
+
+  def test_tex_code
+    w = <<'_eos'
+foo.rb:
+|a = 123
+| b = 456 * 789
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{WTcode}{foo.rb}
+a = 123
+ b = 456 * 789
+\end{WTcode}
+_eos
+      @wt.tex(w),
+      "WTeX#tex should convert lines which begin with '|' into code block"
+    )
+
+    w = <<'_eos'
+foo.rb:
+bbb|a = 123
+_eos
+    assert_equal(
+      <<'_eos',
+foo.rb:\\
+bbb\textbar{}a = 123
+_eos
+      @wt.tex(w),
+      "WTeX#tex should convert lines which begin with '|' into code block"
+    )
+
+    w = <<'_eos'
+foo_bar.rb:
+|a = 123
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{WTcode}{foo\_{}bar.rb}
+a = 123
+\end{WTcode}
+_eos
+      @wt.tex(w),
+      'WTeX#tex should escape title of code blocks'
+    )
+  end
+
+  def test_tex_code_without_title
+    w = <<'_eos'
+|a = 123
+| b = 456 * 789
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{WTcode-without-title}
+a = 123
+ b = 456 * 789
+\end{WTcode-without-title}
+_eos
+      @wt.tex(w),
+      "WTeX#tex should convert lines which begin with '|' into code block"
+    )
+
+    w = <<'_eos'
+|foo.rb:
+|a = 123
+| b = 456 * 789
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{WTcode-without-title}
+foo.rb:
+a = 123
+ b = 456 * 789
+\end{WTcode-without-title}
+_eos
+      @wt.tex(w),
+      "WTeX#tex should not treat lines which begin with '|' as a title"
+    )
+  end
+
+  def test_tex_quote
+    w = <<'_eos'
+>a = 123
+> b = 456 & 789
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{quote}
+a = 123\\
+ b = 456 \&{} 789
+\end{quote}
+_eos
+      @wt.tex(w),
+      "WTeX#tex should convert lines which begin with '>' into quote"
+    )
+  end
+
+  def test_tex_itemize
+    w = <<'_eos'
+* foo
+* bar
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{itemize}
+\item foo
+\item bar
+\end{itemize}
+_eos
+      @wt.tex(w),
+      "WTeX#tex should convert lines which begin with '*' into list"
+    )
+
+    w = <<'_eos'
+* **baz**
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{itemize}
+\item {\large\bf baz}
+\end{itemize}
+_eos
+      @wt.tex(w),
+      "WTeX#tex should convert lines which begin with '*' into list"
+    )
+  end
+
+  def test_tex_itemize_ambiguous
+    w = <<'_eos'
+*foo
+_eos
+    assert_equal(
+      <<'_eos',
+*foo
+_eos
+      @wt.tex(w),
+      "WTeX#tex should not convert lines with '*' and immidiate strings without spaces"
+    )
+  end
+
+  def test_tex_enumerate
+    w = <<'_eos'
++ foo
++ bar
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{enumerate}
+\item foo
+\item bar
+\end{enumerate}
+_eos
+      @wt.tex(w),
+      "WTeX#tex should convert lines which begin with '+' into list"
+    )
+  end
+
+  def test_tex_nested_list
+    w = <<'_eos'
+* foo
+** bar
+** baz
+* qux
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{itemize}
+\item foo\begin{itemize}
+\item bar
+\item baz
+\end{itemize}
+
+\item qux
+\end{itemize}
+_eos
+      @wt.tex(w),
+      'WTeX#tex should handle nested lists'
+    )
+  end
+
+  def test_tex_mixed_list
+    w = <<'_eos'
+* foo
+*+ bar
+*+ baz
+* qux
+_eos
+    assert_equal(
+      <<'_eos',
+\begin{itemize}
+\item foo\begin{enumerate}
+\item bar
+\item baz
+\end{enumerate}
+
+\item qux
+\end{itemize}
+_eos
+      @wt.tex(w),
+      'WTeX#tex should handle mixed lists'
+    )
+  end
+
+end