tdiary 4.0.1.20130903 → 4.0.1.20130929

data/misc/style/wiki/README

@@ -1,116 +0,0 @@
-! Wikiスタイル - Wiki風の記述形式
-
-!!【注意】
-このスタイルはすでにサポートされていません。Wikiスタイルは標準サポー
-トとなり、tdiaryディレクトリの下に互換性のある別の実装が含まれていま
-す。
-
-このディレクトリに含まれるファイルは、何らかの都合で旧実装を使わなく
-てはならない場合にのみ使用してください。
-
-!! Wikiスタイルとは
-
-WikiWikiのオリジナル文法に近い形式で日記が書けるスタイル。HTMLよりで
-きることは少ないが、ルールが簡単で覚えやすいので、あまり凝ったことを
-しない人に向いている。
-
-!! 使い方
-
-wiki_parser.rbとwiki_style.rbを、インストールディレクトリにあるtdiary
-ディレクトリにコピーし、tdiary.confに以下の設定をする。
-
- @style = 'Wiki'
-
-また、リンク機能を使う場合には、プラグイン集に含まれているkw.rbをtDiary
-のpluginディレクトリにコピーしておく必要がある。
-
-!! Wikiスタイルの文法
-
-!!! 段落
-
-普通に行頭から書き始めればそれが段落。単一の改行は無視され、空改行で
-別段落になる。tDiary上では<p>タグで囲まれる。一日の初めが通常の段落
-で始まっている場合には、その段落のみセクション扱いになる。
-
-!!! 見出し
-
-見出しは「!」で始める。tDiary上では「!」ひとつで<h3>になり、セクショ
-ンの開始になる。以下、「!!」で<h4>、「!!!」で<h5>……となる。
-
-!!! 整形済みテキスト
-
-いわゆる<pre>は、行頭を空白かタブで始める。マークアップはいっさい効
-かなくなる。
-
-!!! 箇条書き
-
-「*」で始めると箇条書き。「#」で始めると数字付きになる。マークの個数
-で入れ子を表現する。オリジナルWikiでは数字で始めると数字付き箇条書き
-というルールがあるようだが、それだと数字で始まる段落が書けなくなる気
-がするので、サポートしていない。
-
-!!! 引用
-
-「""」(2つの二重引用符)で始まる行は、引用(<blockquote>扱い)となる。
-文中の改行は、通常段落の行頭に「""」を付けたものとして扱う。
-
-!!! 定義リスト
-
-いわゆる<dl>は、「:キーワード:説明」という構文。
-
- :キーワード:説明文をここに1行で書く。
-
-!!! 表
-
-表(テーブル)は「||」で始め、以下のように書ける。
-
- ||項目1-1||項目1-2||項目1-3
- ||項目2-1||項目2-2||項目2-3
-
-!!! リンク
-
-2つのカギカッコで囲んだ単語は、日本語、英数字問わずキーワードとして扱われ、kwプラグインに展開される。いわゆるWikiName(WikiWord)はサポートしない。
-
- [[キーワード]]
-
-キーワードを「:」で区切ると、InterWikiName相当になる(kwプラグインの機能)。
-
- [[hoge:キーワード]]
-
-「|」で区切ると、任意のURLへのリンクを生成できる。
-
- [[Asumi日記|http://sho.tdiary.net/]]
- [[このファイル|../files/hoge.txt]]
- [[ほげ|hoge:キーワード]]
-
-なお、上記構文で、右側のURL部分がtDiaryのアンカー風(20030125#p03とか)
-の場合は、myプラグインに展開される。
-
-さらに、文中にある生のURLは、そのままリンクになる。ただし、最後が.jpg
-とか.pngの場合はインラインイメージに展開される。相対URLもサポートさ
-れているので、  
-
- http:.images/hoge.jpg
-
-などとして使うこともできる。
-
-!!! 強調
-
-単一引用符の連続で囲むことで、強調を指定できる。
-
- ふたつだと''普通の強調''で、<em>に展開
- みっつだと'''すごく強調'''で、<strong>に展開
-
-!!! 取消線
-
-イコールふたつで囲んだ部分は、取消線(<del>)になる。これはtDiary拡張。
-
- ==この部分が取り消し==
-
-!!! プラグイン
-
-これもtDiary拡張。にょろカッコふたつで囲むと、tDiaryのプラグイン呼び
-出しになる。
-
- {{amazon '4906470068'}}
-

data/misc/style/wiki/README.en

@@ -1,101 +0,0 @@
-! Wiki Style
-
-!! '''NOTICE'''
-This implements was obsluted.
-
-Wiki style is supported in default now in another implements. See
-tdiary directory.
-
-If you want to need old implements, use files in this directory.
-
-
-!! about Wiki Style
-
-Like original style of WikiWikiWeb.
-
-!! How to use
-
-Copy wiki_parser.rb and wiki_style.rb into tdiary directory in you
-tdiary installed. And specify into tdiary.conf below:
-
- @style = 'Wiki'
-
-If you want to use link feature, find kw.rb from tDiary plugins and
-copy it into plugin directory of tDiary.
-
-!! How to write Wiki Style
-
-!!! Paragraph
-
-Starting words from top of the line.
-If you want to change paragraph, insert a null line.
-When a day starts with a paragraph, the paragraph become to
-a section.
-
-!!! Heading
-
-You can start headings with '!'. In tDiary, one '!' become to '<h3>'
-and it starts a section. Then '!!' is '<h4>', '!!!' is '<h5>' ...
-
-!!! Formatted text
-
-Formatted text you know '<pre>' is start with space or TAB.
-All other markups are ignore.
-
-!!! Lists
-
-Starts with '*' means lists. And starts with '#' is numbered lists.
-You can increase nests by '**', '***' and '****'.
-
-!!! Blockquote
-
-Two double quote means blockquote.
-
-!!!Definition Lists
-
-You can describe '<dl>' by ":keywors:description".
-
-!!!Table
-
-Table starts with '||', and separate cells with '||'
-
-!!! Links
-
-Double '[' and ']' makes a link. It expand kw plugin.
-No WikiWord supported.
-
- [[keyword]]
-
-By separating keyword with ':', you can make a link equivalent of InterWikiName.
-This is a feature of kw plugin.
-
- [[foo:keyword]]
-
-You can make alias name of link word by separate '|'.
-
- [[tDiary|http://www.tdiary.org/]]
- [[this file|../files/foo.txt]]
- [[bar|foo:KeyWord]]
-
-In this case, if the URL part is like a tDiary's anchor
-(ex. 20030125#p03), it expand to my plugin but not kw plugin.
-
-And alone URL will become to a link.
-
-!!! Emphasis
-
-Two or three single-quote makes Emphasis.
-
- Two single-quote makes ''EMPHASUS'', it means <em>.
- Three single-quote makes '''STRONG''', it means <strong>.
-
-!!! Deleted line
-
-Two equal sign ('=') means <del>. It is tDiary original.
-
-!!! Plugin
-
-Two '{' and '}' expand to plugin.
-
- {{amazon '4906470068'}}
-

data/misc/style/wiki/wiki_parser.rb

@@ -1,273 +0,0 @@
-# -*- coding: utf-8; -*-
-# wiki_parser.rb: Wiki parser for tDiary style $Revision: 1.10 $
-#
-# Copyright (C) 2003, TADA Tadashi <sho@spc.gr.jp>
-# You can distribute this under GPL.
-#
-
-class WikiParser
-	class ParserQueue < Array
-		def <<( s )
-			$stderr.puts s if $DEBUG
-			super( s )
-		end
-	end
-
-	# opt is a Hash.
-	#
-	#     key  |    value    |      mean       |default 
-	# ---------+-------------+-----------------+---------
-	# :wikiname|true or false|parse WikiName   | true
-	# :url     |true or false|make URL to link | true
-	# :plugin  |true or false|parse plugin     | true
-	# :absolute|true or false|only absolute URL| false
-	#
-	def initialize( opt = {} )
-		@opt = {    # set default
-			:wikiname => true,
-			:url => true,
-			:plugin => true,
-			:absolute => false,
-		}
-		@opt.update( opt )
-	end
-
-	def parse( f )
-		@q = ParserQueue::new
-		nest = 0
-		f.each do |l|
-			l.sub!( /[\r\n]+\Z/, '' )
-			case l
-			when /^$/ # null string
-				@q << nil unless @q.last == nil
-
-			when /^----+$/ # horizontal bar
-				@q << :RS << :RE
-
-			when /^(!{1,5})\s*(.*)/ # headings
-				eval( "@q << :HS#{$1.size}" )
-				inline( $2 )
-				eval( "@q << :HE#{$1.size}" )
-
-			when /^([\*#]{1,3})\s*(.*)/ # list
-				r, depth = $2, $1.size
-				style = $1[0] == ?* ? 'U' : 'O'
-				nest = 0 unless /^[UO]E$/ =~ @q.last.to_s
-				tmp = []
-				if nest < depth then
-					(nest * 2).times do tmp << @q.pop end
-					eval( "@q << :#{style}S << :LS" )
-					inline( r )
-					eval( "@q << :LE << :#{style}E" )
-				elsif nest > depth
-					(depth * 2 - 1).times do tmp << @q.pop end
-					@q << :LS
-					inline( r )
-					@q << :LE
-				else
-					(nest * 2 - 1).times do tmp << @q.pop end
-					@q << :LS
-					inline( r )
-					@q << :LE
-				end
-				@q << tmp.pop while tmp.size != 0
-				nest = depth
-
-			when /^:([^:]+):(.*)/ # definition list
-				if @q.last == :DE then
-					@q.pop
-				else
-					@q << :DS
-				end
-				@q << :DTS
-				inline( $1 )
-				@q << :DTE << :DDS
-				inline( $2 )
-				@q << :DDE << :DE
-
-			when /^""$/ # block quote (null line)
-				if @q.last == :QE then
-					@q.pop
-				else
-					@q << :QS
-				end
-				@q << :PS << :PE << :QE
-
-			when /^""\s*(.*)/ # block quote
-				if @q.last == :QE then
-					@q.pop
-					@q.pop
-				else
-					@q << :QS << :PS
-				end
-				inline( $1 + "\n" )
-				@q << :PE << :QE
-
-			when /^\s(.*)/ # formatted text
-				if @q.last == :FE then
-					@q.pop
-				else
-					@q << :FS
-				end
-				@q << ( $1 + "\n" ) << :FE
-
-			when /^\|\|(.*)/ # table
-				if @q.last == :TE then
-					@q.pop
-					@q << :TRS
-				else
-					@q << :TS << :TRS
-				end
-				$1.split( /\|\|/ ).each do |s|
-					@q << :TDS
-					inline( s )
-					@q << :TDE
-				end
-				@q << :TRE << :TE
-
-			else # paragraph
-				if @q.last == :PE then
-					@q.pop
-				else
-					@q << :PS
-				end
-				inline( l )
-				@q << :PE
-			end
-		end
-		@q.compact!
-		@q
-	end
-
-	private
-	def inline( l )
-		if @opt[:plugin] then
-			r = /(.*?)(\[\[|\]\]|\{\{.*?\}\}|'''|''|==)/
-		else
-			r = /(.*?)(\[\[|\]\]|'''|''|==)/
-		end
-		a = l.scan( r ).flatten
-		tail = a.size == 0 ? l : $'
-		stat = []
-		a.each do |i|
-			case i
-			when '[['
-				@q << :KS
-				stat.push :KE
-			when ']]'
-				@q << stat.pop
-			when "'''"
-				if stat.last == :SE then
-					@q << stat.pop
-				else
-					@q << :SS
-					stat.push :SE
-				end
-			when "''"
-				if stat.last == :EE then
-					@q << stat.pop
-				else
-					@q << :ES
-					stat.push :EE
-				end
-			when "=="
-				if stat.last == :ZE then
-					@q << stat.pop
-				else
-					@q << :ZS
-					stat.push :ZE
-				end
-			else
-				if @opt[:plugin] and /^\{\{(.*)\}\}$/ =~ i then
-					@q << :GS << $1 << :GE
-				elsif stat.last == :KE
-					@q << i
-				else
-					url( i ) if i.size > 0
-				end
-			end
-		end
-		url( tail ) if tail
-	end
-
-	def url( l )
-		unless @opt[:url]
-			@q << l
-			return
-		end
-
-		r = %r<(((https?|ftp):[\(\)%#!/0-9a-zA-Z_$@.&+-,'"*=;?:~-]+)|([0-9a-zA-Z_.-]+@[\(\)%!0-9a-zA-Z_$.&+-,'"*-]+\.[\(\)%!0-9a-zA-Z_$.&+-,'"*-]+))>
-		a = l.gsub( r ) {
-			if $1 == $2 then
-				url = $2
-				if %r<^(https?|ftp)(://)?$> =~ url then
-					url
-				elsif %r<^(https?|ftp)://> =~ url
-					"[[#{url}]]"
-				else
-					if @opt[:absolute] then
-						url
-					else
-						"[[#{url.sub( /^(https?|ftp):/, '' )}]]"
-					end
-				end
-			else
-				"[[mailto:#$4]]"
-			end
-		}.scan( /(.*?)(\[\[|\]\])/ ).flatten
-		tail = a.size == 0 ? l : $'
-		a.each do |i|
-			case i
-			when '[['
-				@q << :XS
-			when ']]'
-				@q << :XE
-			else
-				if @q.last == :XS then
-					@q << i
-				else
-					wikiname( i )
-				end
-			end
-		end
-		wikiname( tail ) if tail
-	end
-
-	def wikiname( l )
-		unless @opt[:wikiname]
-			@q << l
-			return
-		end
-
-		l.gsub!( /[A-Z][a-z0-9]+([A-Z][a-z0-9]+)+/, '[[\0]]' )
-		a = l.scan( /(.*?)(\[\[|\]\])/ ).flatten
-		tail = a.size == 0 ? l : $'
-		a.each do |i|
-			case i
-			when '[['
-				@q << :KS
-			when ']]'
-				@q << :KE
-			else
-				@q << i
-			end
-		end
-		@q << tail if tail
-	end
-end
-
-if $0 == __FILE__
-	$DEBUG = true
-	p WikiParser::new( :wikiname => true, :plugin => true ).parse( DATA )
-end
-
-__END__
-:a:aaaa
-:b:bbbb
-
-# Local Variables:
-# mode: ruby
-# indent-tabs-mode: t
-# tab-width: 3
-# ruby-indent-level: 3
-# End: