qwik2md 0.1.0

data/vendor/qwik/lib/qwik/act-christel.rb

@@ -0,0 +1,112 @@
+# -*- coding: cp932 -*-
+# Copyright (C) 2003-2006 Kouichirou Eto, All rights reserved.
+# This is free software with ABSOLUTELY NO WARRANTY.
+# You can redistribute it and/or modify it under the terms of the GNU GPL 2.
+
+$LOAD_PATH.unshift '..' unless $LOAD_PATH.include? '..'
+
+module Qwik
+  class Action
+    D_christel = {
+      :dt => 'Takigawa Christel plugin',
+      :dd => 'You can embed Takigawa Christel image.',
+      :dc => "
+Follow [[PluginChristel.describe]]"
+    }
+
+    D_PluginChristel = {
+      :dt => 'Takigawa Christel plugin',
+      :dd => 'You can embed Takigawa Christel image.',
+      :dc => "* Example
+{{christel
+This is Takigawa Christel plugin.
+}}
+ {{christel
+ This is Takigawa Christel plugin.
+ }}
+
+{{christel
+You can embed images.
+http://qwik.jp/.theme/i/login_qwik_logo.gif
+}}
+ {{christel
+ You can embed images.
+ http://qwik.jp/.theme/i/login_qwik_logo.gif
+ }}
+
+{{christel(640)
+You can see bigger one.
+}}
+ {{christel(640)
+ You can see bigger one.
+ }}
+"
+    }
+
+    D_PluginChristel_ja = {
+      :dt => '滝川クリステルプラグイン',
+      :dd => '滝川クリステルさんに代りにしゃべってもらいます。',
+      :dc => "* Example
+{{christel
+滝川クリステルプラグインです
+}}
+ {{christel
+ 滝川クリステルプラグインです
+ }}
+
+{{christel
+画像も埋め込めます
+http://qwik.jp/.theme/i/login_qwik_logo.gif
+}}
+ {{christel
+ 画像も埋め込めます
+ http://qwik.jp/.theme/i/login_qwik_logo.gif
+ }}
+
+{{christel(640)
+大きくしてみました
+}}
+ {{christel(640)
+ 大きくしてみました
+ }}
+"
+    }
+
+    def plg_christel(width = 320)
+      width = width.to_i.to_s
+      content = yield
+      message, image_url = content.to_a
+      message.chomp!
+      image_url.chomp! if image_url
+      query_str = {
+	:m => message.set_page_charset.to_euc,
+	:u => image_url
+      }.to_query_string
+      url = "http://gedo-style.com/crstl/crstl.php?#{query_str}"
+      return [:img, {:src=>url, :width=>width}]
+    end
+  end
+end
+
+if $0 == __FILE__
+  require 'qwik/test-common'
+  $test = true
+end
+
+if defined?($test) && $test
+  class TestActChristel < Test::Unit::TestCase
+    include TestSession
+
+    def test_all
+      ok_wi([:img, {:width=>'320',
+		:src=>"http://gedo-style.com/crstl/crstl.php?m=a"}],
+	    "{{christel\na\n}}")
+      ok_wi([:img, {:width=>'320',
+		:src=>"http://gedo-style.com/crstl/crstl.php?m=a&u=b"}],
+	    "{{christel\na\nb\n}}")
+      ok_wi([:img, {:width=>'640',
+		:src=>"http://gedo-style.com/crstl/crstl.php?m=a"}],
+	    "{{christel(640)\na\n}}")
+    end
+  end
+end

data/vendor/qwik/lib/qwik/act-chronology.rb

@@ -0,0 +1,149 @@
+# Copyright (C) 2003-2006 Kouichirou Eto, All rights reserved.
+# This is free software with ABSOLUTELY NO WARRANTY.
+# You can redistribute it and/or modify it under the terms of the GNU GPL 2.
+
+$LOAD_PATH.unshift '..' unless $LOAD_PATH.include? '..'
+require 'qwik/site-timeline'
+
+module Qwik
+  class Action
+    D_ExtChronology = {
+      :dt => 'Chronology of site',
+      :dd => "You can see when the pages are created and updated.",
+      :dc => "* How to
+Please go [[.chronology]] page to see the chronology of this site.
+"
+    }
+
+    D_ExtChronology_ja = {
+      :dt => '年表機能 ',
+      :dd => "サイトのページがいつ作成され、編集されてきたのかを一覧できます。",
+      :dc => '* 使い方
+[[.chronology]]ページで、このサイトの年表が表示さます。
+'
+    }
+
+    def act_chronology
+      c_require_pagename
+     #c_require_member
+
+      timeline = @site.timeline
+      timeline.calc_history
+      divs = chronology_make_divs(timeline)
+      return chronology_show(divs)
+    end
+    alias act_time_walker act_chronology	# Obsolete
+
+    CHRONOLOGY_WIDTH  = 950
+    CHRONOLOGY_HEIGHT = 550
+
+    def chronology_make_divs(timeline)
+#      height = 
+
+      times = timeline.times
+      pages_history = timeline.pages_history
+      page_min = timeline.page_min
+      site_min = timeline.site_min
+      site_duration = timeline.site_duration
+
+      return [:p, "No files here."] if times.nil?
+      page_num = times.length	# Total page number
+      return [:p, "No files here."] if page_num == 0
+
+      h_span = CHRONOLOGY_HEIGHT / page_num
+      x_offset = 60
+      y_offset = 50
+
+      divs = []
+      num = 0
+      pages_history.each {|key|
+	ar = times[key]
+
+	pm_time = page_min[key]
+
+	x = 10
+	y = y_offset + CHRONOLOGY_HEIGHT * num / page_num
+
+	page = @site[key]
+	next if page.nil?
+	title = page.get_title
+	url = page.url
+
+	divs << [:div, {:title=>"#{title} | #{pm_time.ymd}",
+	    :class=>'time_title',
+	    :style=>"position:absolute;left:#{x}px;top:#{y}px;height:#{h_span}px;"},
+	  [:a, {:href=>url}, title]]
+
+	num += 1
+	ar.each {|time|
+	  past_time = time - site_min
+	  x = x_offset + (CHRONOLOGY_WIDTH-x_offset) * past_time / site_duration
+	  divs << [:div, {:title=>"#{title} | #{time.ymd}",
+	      :class=>'time_update',
+	      :style=>"left:#{x}px;top:#{y}px;width:10px;height:#{h_span}px;"},
+	    [:a, {:href=>url}, '_']]
+	}
+      }
+
+      return divs
+    end
+
+    def chronology_show(divs)
+      ar = []
+
+      ar << [:style, "@import '.theme/css/wema.css';"]
+
+      ar << [:style, "
+.time_update {
+  margin: 0;
+  padding: 0;
+  position: absolute;
+  background-color: #6dd;
+  border: 1px outset #9ff;
+}
+.time_update a {
+  margin: 0;
+  padding: 0;
+}
+"]
+
+      section = []
+      section << [:div, {:id=>"chronology"}, '']
+      section << divs
+      section << [:div, {:id=>'lines'}, '']
+      ar << [:div, {:class=>'day'},
+	[:div, {:class=>'section'},
+	  section]]
+
+      ar << [:script,
+	{:type=>'text/javascript', :src=>'.theme/js/wema.js'}, '']
+      ar << [:script,
+	{:type=>'text/javascript',:src=>'.theme/js/history.js'}, '']
+
+      title = _('Chronology') + " | #{@site.sitename}"
+      return c_plain(title) { ar }
+    end
+  end
+end
+
+if $0 == __FILE__
+  require 'qwik/test-common'
+  $test = true
+end
+
+if defined?($test) && $test
+  class TestActChronology < Test::Unit::TestCase
+    include TestSession
+
+    def test_all
+      t_add_user
+
+      page = @site.create_new
+      page.store '* t1'		# Store this page first
+      page.store '* t2'		# Store this page second
+
+      res = session '/test/.chronology'
+      ok_in ['Chronology | test'], '//title'
+    end
+  end
+end

data/vendor/qwik/lib/qwik/act-code.rb

@@ -0,0 +1,155 @@
+# -*- coding: shift_jis -*-
+# Copyright (C) 2003-2006 Kouichirou Eto, All rights reserved.
+# This is free software with ABSOLUTELY NO WARRANTY.
+# You can redistribute it and/or modify it under the terms of the GNU GPL 2.
+
+begin
+  require 'GD'
+  $have_gd = true
+rescue LoadError
+  $have_gd = false
+end
+
+module Qwik
+  class Action
+    D_code = {
+      :dt => 'Code input plugin',
+      :dd => 'You can input code on the page.',
+      :dc => "
+Follow [[PluginCode.describe]]"
+    }
+
+    D_PluginCode = {
+      :dt => 'Code input plugin',
+      :dd => 'You can input code on the page.',
+      :dc => "* Examples
+ {{code
+ puts \"hello, world!\"
+ puts \"hello, qwik users!\"
+ }}
+{{code
+puts \"hello, world!\"
+puts \"hello, qwik users!\"
+}}
+{{code
+#include <stdio.h>
+
+void main(){
+  printf(\"hello, world!\\n\");
+}
+}}
+"
+    }
+
+    D_PluginCode_ja = {
+      :dt => 'コード・プラグイン',
+      :dd => 'ページ中にコードをうめこむときに使えます。',
+      :dc => "* 例
+ {{code
+ puts \"hello, world!\"
+ puts \"hello, qwik users!\"
+ }}
+{{code
+puts \"hello, world!\"
+puts \"hello, qwik users!\"
+}}
+{{code
+#include <stdio.h>
+
+void main(){
+  printf(\"hello, world!\\n\");
+}
+}}
+"
+    }
+
+    def plg_code(filename=nil, base_linenum=1)
+      content = ''
+      content = yield if block_given?
+      pre = [:pre]
+      content.each_with_index {|line, index|
+	line.chomp!
+	linenum = index + base_linenum.to_i
+	klass = 'line '
+	klass += if linenum % 2 == 0 then 'even' else 'odd' end
+	style = "background:url(.num/#{linenum}.png) no-repeat;"
+	pre << [:span, {:class=>klass, :style=>style}, line]
+	pre << "\n"
+      }
+      return [:div, {:class=>'code'}, pre]
+    end
+
+    def act_num
+      return c_nerror if ! $have_gd
+      args = @req.path_args
+      return c_nerror if args.nil? || args.empty?
+      filename = args.first
+      return c_nerror unless /\A([0-9]+)\.png\z/ =~ filename
+      str = $1
+      return c_nerror if 10 < str.length
+      files = @site.files('FrontPage')
+      if ! files.exist?(filename)
+	png = Action.generate_png(str)
+	files.put(filename, png)
+      end
+      path = files.path(filename)
+      return c_simple_send(path, 'image/png')
+    end
+
+    def self.generate_png(str)
+      return nil if ! $have_gd
+      font, fw, fh = GD::Font::TinyFont, 5, 8
+      str = str.to_s
+      width = fw * str.length
+      height = fh
+      img = GD::Image.new(width, height)
+      white = img.colorAllocate(255, 255, 255)
+      color = img.colorAllocate(127, 127, 127)
+      img.transparent(white)
+      img.string(font, 0, 0, str, color)
+      return img.pngStr
+    end
+  end
+end
+
+if $0 == __FILE__
+  $LOAD_PATH.unshift '..' unless $LOAD_PATH.include? '..'
+  require 'qwik/test-common'
+  $test = true
+end
+
+if defined?($test) && $test
+  class TestActCode < Test::Unit::TestCase
+    include TestSession
+
+    def test_code
+      res = session
+      ok_wi [:div, {:class=>"code"},
+	[:pre, [:span, {:style=>"background:url(.num/1.png) no-repeat;",
+	      :class=>"line odd"}, "t"], "\n"]],
+	"{{code\nt\n}}"
+    end
+
+    def test_num
+      return unless $have_gd
+
+      t_add_user
+
+      res = session('/test/.num/1.png')
+      eq 'image/png', res['Content-Type']
+      str = res.body
+      eq "\211PNG\r\n\032\n\000\000\000\rIHDR\000\000\000\005\000\000\000\010\001\003\000\000\000\v?\247x\000\000\000\006PLTE\377\377\377\177\177\177br\365\207\000\000\000\001tRNS\000@\346\330f\000\000\000\024IDAT\010\231c``P`H\000b\020,``\000\000\t\300\001Q2\2179L\000\000\000\000IEND\256B`\202", str
+
+      res = session('/test/.num/1234567890.png')
+      str = res.body
+#      eq "\211PNG\r\n\032\n\000\000\000\rIHDR\000\000\0002\000\000\000\010\001\003\000\000\000\201\020>9\000\000\000\006PLTE\377\377\377\177\177\177br\365\207\000\000\000\001tRNS\000@\346\330f\000\000\000=IDAT\010\231c`\200\002e\t\177\3433\211\f\f)KN8\004Mj`P\350\364\v\350\331\324\300\240\310\3720cRP\003\203\222\212\247\247\220P\003C\371\f7C\236D\230.\006\000\352y\016\246.\260\314\346\000\000\000\000IEND\256B`\202", str
+    end
+
+    def test_generate_png
+      return if $0 != __FILE__		# Only for separated test.
+      png = Qwik::Action.generate_png(1234567890)
+      # 'tmp.png'.path.write(png)
+#      eq "\211PNG\r\n\032\n\000\000\000\rIHDR\000\000\0002\000\000\000\010\001\003\000\000\000\201\020>9\000\000\000\006PLTE\377\377\377\177\177\177br\365\207\000\000\000\001tRNS\000@\346\330f\000\000\000=IDAT\010\231c`\200\002e\t\177\3433\211\f\f)KN8\004Mj`P\350\364\v\350\331\324\300\240\310\3720cRP\003\203\222\212\247\247\220P\003C\371\f7C\236D\230.\006\000\352y\016\246.\260\314\346\000\000\000\000IEND\256B`\202", png
+    end
+  end
+end