tdiary 3.2.2.20130518 → 3.2.2.20130527

data/vendor/rdtool-0.6.38/TODO

@@ -1,22 +0,0 @@
-# -*- mode: rd; coding: utf-8; indent-tabs-mode: nil -*-
-= TODO
-
-* HTML5 出力できるように
-  * 後方互換性を維持するならば, rd2html5-lib.rb でも作るのかな?
-* rd2html-ext-lib, Hash#index -> Hash#key
-
-== Moonwolf さんから指摘された事
-
-* Ruby1,9での動作確認(全機能)+encoding周り
-* gem化した際に、通常のsetup.rbによるインストール方法も残すか
-* 原作者のToshさんの認識していたバグが直っているかの確認(できるの?)
-  ((<URL:http://pub.cozmixng.org/~the-rwiki/rw-cgi.rb?cmd=view;name=RDtool+Bug+List>))
-
-== 佐々木が気になっている事/やりたいこと
-
-* Windows での, テストしておくべき Ruby 環境ってドレなの?
-
-== Done
-
-* COPYRIGHT の表記. きちんとまとめておきたい|おくべき.
-* makerdtool.rb などを Rake のタスクに落としこむ

data/vendor/rdtool-0.6.38/bin/rd2

@@ -1,283 +0,0 @@
-#! /usr/bin/ruby1.9.1 -Kn
-# -*- coding: ASCII-8BIT -*-
-=begin
-= NAME
-rd2 - converter from RD to other mark-up language.
-= SYNOPSIS
-  rd2 [-r <visitor>] [options] <file>
-
-= DESCRIPTION
-rd2 inputs from ((|<file>|)) and outputs into (({STDOUT})). you can
-choose ((|<visitor>|)) to select output format. For example, use
-"rd/rd2html-lib.rb" to translate it into HTML, and "rd/rd2man-lib.rb"
-to tranlate it into roff with man macros.
-
-= OPTIONS
-please read output of 
-  % rd2 --help
-and
-  % rd2 -r rd/rd2html-lib.rb --help
-
-= FILES
-  * ~/.rd2rc - User configration file.
-
-= SEE ALSO
-ruby(1)
-=end
-
-require "kconv"
-require "optparse"
-require "rd/rdfmt"
-require "rd/visitor"
-require "rd/version"
-
-module Kconv
-  NAME2CONST = {
-    "iso-2022-jp" => Kconv::JIS,
-    "euc-jp" => Kconv::EUC,
-    "shift_jis" => Kconv::SJIS,
-  }
-  NAME_ALIAS = {
-    'jis' => 'iso-2022-jp',
-    'euc' => 'euc-jp',
-    'sjis' => 'shift_jis',
-    'shift-jis' => 'shift_jis',
-  }
-  if defined?(Kconv::UTF8)
-    NAME2CONST['utf-8'] = Kconv::UTF8
-    NAME_ALIAS['utf8'] = 'utf-8'
-  end
-end
-
-include RD
-
-SYSTEM_NAME = "RDtool -- rd2"
-SYSTEM_VERSION = "$Version: "+RD::VERSION + "$" #"
-RD2_VERSION = Version.new_from_version_string(SYSTEM_NAME, SYSTEM_VERSION)
-
-# global vars
-$Visitor_Class = nil
-$Visitor = nil
-$RD2_Sub_OptionParser = nil
-
-# local vars
-include_path = []
-with_part = []
-output_file = nil
-output_index = nil
-out_code = nil
-from_rdo = nil
-
-# user option
-$DEFAULT_FORMAT_LIB = "rd/rd2html-lib"
-$RC = {}
-$RC["filter"] = Hash.new(RD::INCLUDE_FILTER)
-begin
-  if test(?r, File.expand_path("~/.rd2rc"))
-    load "~/.rd2rc"
-    #  STDERR << "#{$0}: loading ~/.rd2rc\n"
-  else
-    load "rd/dot.rd2rc"
-    #  STDERR << "#{$0}: loading rd/dot.rd2rc\n"
-  end
-rescue
-  load "rd/dot.rd2rc"
-end
-
-# initialize OptionParser
-ARGV.options do |q|
-  q.banner = "Usage: #{$0} [options] rd-file > output\n"
-  q.on_head("global options:")
-  
-  q.on("-rLIB", "--require=LIB",
-       String,
-       "choose format library.") do |i|
-    # require LIB
-    require i
-    if $Visitor_Class && !$Visitor
-      $Visitor = $Visitor_Class.new()
-      if $RD2_Sub_OptionParser    
-	require $RD2_Sub_OptionParser
-	$RD2_Sub_OptionParser = nil
-      end
-    end
-  end
-
-  q.on("-oNAME",
-       String,
-       "indicate base name of output file") do |i|
-    output_file = i
-  end
-
-  q.on("--out-code=KCODE",
-       Kconv::NAME2CONST.keys, Kconv::NAME_ALIAS,
-       "character encoding of output.(jis|euc|sjis|utf8)") do |i|
-    out_code = i
-  end
-      
-  q.on("--output-index",
-       "output method index file (*.rmi)") do |i|
-    output_index = true
-  end
-
-  q.on("-IPATH", "--include-path=PATH",
-       String,
-       "add PATH to list of include path") do |i|
-    # add to include path
-    include_path.unshift(i)
-  end
-
-  # accept "PART:FILTER" and "PART"
-  class PART ; end
-  q.accept(PART, /(\w+)(?:\s*:\s*(\w+))?/) {|s, p, f| [s, p, f] }
-  q.on("--with-part=PART",
-       PART,
-       "include PART with Filter") do |src, part, filter|
-    with_part.push([part, filter || part])
-    unless include_path.index(RD::RDTree.tmp_dir)
-      include_path.push(RD::RDTree.tmp_dir)
-    end
-  end
-
-  q.on("--from-rdo",
-       "load from *.rdo instead of *.rd") do
-    from_rdo = true
-  end
-
-  q.on("--version",
-       "print versions.") do
-    STDERR.puts RD2_VERSION
-    STDERR.puts Tree::version
-    STDERR.puts Visitor::version
-    STDERR.puts $Visitor_Class.version if $Visitor_Class
-    exit(0)
-  end
-
-  q.on_tail("--help",
-	    "print this message") do
-    STDERR.print(q.to_s)
-    exit(0)
-  end
-end # OptionParser.new
-
-# require format lib implicitly
-if /rd2.+/ =~ File.basename($0, ".*").downcase
-  visitor_lib = "rd/" + $& + "-lib.rb"
-  require visitor_lib
-  require $RD2_Sub_OptionParser  if $RD2_Sub_OptionParser
-  # make visitor
-  $Visitor = $Visitor_Class.new()
-end
-
-begin
-  ARGV.parse!
-rescue
-  STDERR.print("Error: " + $!.inspect + "\n")
-  STDERR.print(ARGV.options.to_s)
-  exit(1)
-end
-
-unless $Visitor_Class
-  require $DEFAULT_FORMAT_LIB
-  $Visitor = $Visitor_Class.new
-end
-
-$Visitor.input_filename = ARGF.filename
-
-# make tree (but not parsed yet)
-if from_rdo
-  rdos = []
-  ARGV.each do |path|
-    rdos.push(File.open(path))
-    dirname = File.dirname(path)
-    include_path.push(dirname, dirname + "/include")
-  end
-  tree = RDTree.new_from_rdo(*rdos)
-  tree.include_path = include_path
-else 
-  # set Include_Path
-  if ARGF.filename
-    dir = File.dirname(ARGF.filename)
-  else
-    dir = "."
-  end
-  include_path.push(dir)
-  include_path.push(dir + "/include")
-
-  # input from ARGF
-  src = readlines
-  if src.find{|i| /\S/ === i } and !src.find{|i| /^=begin\b/ === i }
-    src.unshift("=begin\n").push("=end\n")
-  end
-
-  tree = RDTree.new(src, include_path, nil)
-  
-  # filter set tree.filter
-  with_part.each do |i|
-    tree.filter[i[0]] = $RC["filter"][i[1]]
-  end
-  
-  # parse
-  begin
-    tree.parse
-  rescue Racc::ParseError
-    STDERR.puts($!.message)
-    exit(10)
-  end
-end
-
-# filter: set visitor.include_suffix
-with_part.each do |i|
-  $Visitor.include_suffix.push(i[0])
-end
-
-# file base name setup
-$Visitor.filename = output_file if output_file
-
-# character encoding
-if out_code
-  begin
-    $Visitor.charcode = out_code
-    $Visitor.lang = "ja"
-  rescue NameError
-  end
-end
-
-# output  
-out = $Visitor.visit(tree)
-
-# character encoding convert
-out = Kconv.kconv(out, Kconv::NAME2CONST[out_code], Kconv::AUTO) if out_code
-
-if output_file
-  filename = output_file + "." + $Visitor.class::OUTPUT_SUFFIX
-  file = open(filename, "w")
-  file.print(out)
-  file.close
-  STDERR.print("#{$0}: output to #{filename}...\n")
-else
-  print(out)
-end
-
-# RMI
-if output_index
-  if output_file
-    require "rd/rd2rmi-lib"
-    rmivisitor = RD2RMIVisitor.new
-    rmivisitor.filename = output_file
-    rmi = rmivisitor.visit(tree)
-    filename = output_file + ".rmi"
-    file = open(filename, "w")
-    file.print(rmi)
-    file.close
-    STDERR.print("#{$0}: output to #{filename}...\n")
-  else
-    raise %Q[Error: option "--output-index" must be used with option "-oNAME"]
-  end
-end
-
-
-# filter: remove tmp file
-Dir.glob("#{RD::RDTree.tmp_dir}/rdtmp.#{$$}.*.*").each do |i|
-  File.delete(i)
-end

data/vendor/rdtool-0.6.38/bin/rdswap.rb

@@ -1,207 +0,0 @@
-#! /usr/bin/ruby1.9.1 -s
-#######
-# rdswap.rb (c) C.Hintze <c.hintze@gmx.net> 30.08.1999
-#######
-
-
-require "ostruct";
-
-if ARGV.size < 2 and not ($h or $help)
-    print "Wrong # of paramter! Use `-h' for help.\n";
-    exit 1;
-elsif $h or $help
-    print eval('"'+DATA.read+'"');
-    exit 0;
-end   
-
-srcfile = ARGV.select{|fn| fn =~ /\.rb$/o};
-case srcfile.size
-when 0
-    $stderr.print "Warning: No `.rb' file given! Take first file as source.\n";
-    srcfile = ARGV[0];
-when 1
-    srcfile = srcfile[0];
-else
-    print "Sorry! Only one source file (`.rb') allowed!\n";
-    exit(1);
-end
-
-docs = {};
-srcs = {};
-
-rddoc, rddocs = nil, [];
-source, sources = [], [[]];
-
-while gets
-    lang = $1 if File::basename(String($<)) =~ /^.*?([^.]+)$/o;
-    if /^=begin/o .. /^=end/o
-        title = $2 if /^=begin(\s+(.*))?$/o;
-        unless rddoc.nil?
-            unless /^=end/o
-                rddoc.lines << $_;
-            else
-                rddocs << rddoc;
-            	sources << [];
-                rddoc = nil;
-            	title = nil;
-            end
-        else               # New RD block found! Instantiate data container.
-            rddoc = OpenStruct.new
-            rddoc.kind, rddoc.lines = title, [];
-        end
-    else                   # It is not a RD block means, it is a source line!
-        sources[-1] << $_;
-    end
-    if $<.eof?             # One file finished. Remember data and proceed.
-        docs[lang] = rddocs;
-        srcs[lang] = sources;
-        rddoc, rddocs = nil, [];
-        source, sources = [], [[]];
-    end
-end
-
-langs = docs.keys;
-langs.delete("rb");        # `rb' is not a language but the script!
-source = srcs["rb"];       # Assign it for preventing later look-ups
-srcdoc = docs["rb"];
-sourcesize = source.size;  # Do not recalculate size again and again.
-srcdocsize = srcdoc.size;
-
-for lang in langs
-    docblk = docs[lang];
-	max = [sourcesize, srcdocsize, docblk.size].max;
-    filename = File.join(srcfile+"."+lang);
-    open(filename, "w+") do |fd|
-        j = 0;
-        for i in 0...max   # Goto every block; be it source or RD.
-            fd.print source[i].join unless source[i].nil? || source[i].empty?;
-            sblk, dblk = srcdoc[i], docblk[j];
-            blk = (dblk and (dblk.kind == sblk.kind)) ? dblk : sblk;
-			next unless blk;
-            j += 1 if blk == dblk;
-            fd.print "=begin #{blk && blk.kind}\n", blk.lines.join, "=end\n";
-        end
-    end
-    print "File `#{filename}' created.\n" if $v;
-end
-
-exit(0);
-
-__END__
-
-Purpose:
-   This tool is written to support you to write multi-language documents
-   using the Ruby-Document-Format (RD).
-
-   The idea for such a tool was originated by
-   
-   		Minero Aoki <aamine@dp.u-netsurf.ne.jp>,
-		
-   how has thought about, how to make life easier for developers who have to
-   write and maintain scripts in more than one language.
-
-   You have to specify at least two filenames on the command line. One
-   containing the Ruby script, the second containing a translated RD. If the
-   script does *not* end with `.rb', it has to be the first filename mentioned
-   on the command line! In opposition, all files containing translations *must
-   not* ending with `.rb'! They should use a extension that describes the
-   language. So that would give us the following picture:
-
-      - sample.rb : Script contains the original documentation.
-      - sample.jp : Documentation written in Japanese.
-      - sample.de : Translation to German.
-
-   The tool doesn't care about the language extensions. You can name them as
-   you like! So the file containing the Japanese translation above, could also
-   be names e.g. `sample.japan' or even `japantranslation.japan'.
-
-   For every translation file, a new file will be created. The name is build
-   from the script filename plus the language extension. So regarding the
-   example above, following files would be created:
-
-      - sample.rb.jp
-      - sample.rb.de
-
-   or, given the alternative translation filename as mentioned above...
-
-      - sample.rb.japan
-
-How does it work?
-   The contents of all files will be split into source and RD blocks. The
-   source of the translation files, will be discarded! Every RD block may
-   be of a certain type. The type will be taken from the contents directly
-   following the `=begin' on the same line. If there is only a lonely `=begin'
-   on a line by itself, the type of the block is `nil'. That means in
-
-        :
-        =begin
-         bla bla
-        =end
-        :
-        =begin whatever or not
-         blub blub
-        =end
-        :
-   
-   the first block would be of type `nil' and the second one of type `whatever
-   or not'.
-   
-   Block types are important for the translation. If a source will be
-   generated from a script and a translation file, only these blocks are taken
-   from the translation files, that comes in the right sequence *and* contains
-   the same type as the block in the script! For example:
-
-        # File sample.rb
-        :
-        =begin gnark
-         Some comment
-        =end
-        :
-        =begin
-         block 2
-        =end
-        :
-        =begin
-         block 3
-        =end
-        :
-
-        # File sample.de
-        :
-        =begin
-         Block zwei
-        =end
-        :
-        =begin
-         Block drei
-        =end
-        :
-
-   Here, the first block of `sample.rb' will *not* be translated, as there is
-   no translation block with that type in sample.de! So the first block would
-   be inserted as-it-is into the translated script. The blocks afterwards,
-   however, are translated as the block type does match (it is `nil' there).
-
-   Attention: In a translation file, a second block will only be used, if
-              a first one was already used (matched). A third block will
-              only be used, if a second one was used already!
-
-   That means, if the first block of `sample.de' would be of type e.g. `Never
-   match', then no block would ever be taken to replace anyone of `sample.rb'.
-   
-Syntax:
-   #{File::basename $0} [-h|-v] <filename>...
-
-Whereby:
-   -h  shows this help text.
-   -v  shows some more text during processing.
-   <filename>  Means a file, that contains RD and/or Ruby code.
-
-Examples:
-   #{File::basename $0} -v sample.rb sample.ja sample.de
-   #{File::basename $0} -v sample.ja sample.rb sample.de
-   #{File::basename $0} -v sample.ja sample.de sample.rb
-   #{File::basename $0} -v sample.??
-
-Author:
-   Clemens Hintze <c.hintze@gmx.net>.