qwik2md 0.1.0

data/vendor/qwik/lib/qwik/description.rb

@@ -0,0 +1,256 @@
+# -*- 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.
+
+module Qwik
+  class Action
+    D_QwikWeb = {
+      :dt => 'How to qwikWeb',
+      :dd => 'How to use qwikWeb',
+#You can see brief descriptions of qwikWeb functions.
+      :dc => "
+'''qwikWeb''' is a group communication system that integrates
+WikiWikiWeb and a mailing list.
+
+Please see [[qwikWeb|http://qwik.jp/qwikWeb.html]] for details.
+
+A list of qwikWeb functions is presented below.
+"
+    }
+
+    D_SiteManagement = {
+      :dt => 'Site management',
+      :dd => 'Site management menu.',
+      :dc => '
+* Site management function
+You can access site management pages from the right side of the edit page.
+You can access the same pages here.
+- [[Config|_SiteConfig]] Site configuration page
+- [[Chronology|.chronology]] The site chronology is shown here.
+- [[Members|_GroupMembers]] Add or delete members of this group.
+-- Please enter a mail address on each line. (Do not use a comma-separated values format.)
+-- \'\'\'Warning:\'\'\' You cannot log in to this site again if you delete your mail from this page.
+- {{zip}} You can receive a site archive.
+-- The archive includes the static HTML pages. You can place the HTML pages onto a web site.
+* Site page configuration
+You can edit menus, such as a sidemenu, from here.
+- [[AdminMenu|_AdminMenu]] On the top of this page.
+- [[SideMenu|_SideMenu]] On the side of this page.
+- [[PageAttribute|_PageAttribute]] As the page attribute.
+- [[EditorFooter|_EditorFooter]] The footer of the edit page.
+You can also edit several configurations.
+- [[_SiteTheme]] You can attach your own css file to this page.
+- [[_InterWikiName]] Inter wiki link.
+- [[_IsbnLink]] Used for the isbn plugin.
+- [[_BookSearch]] Used for the book search plugin.
+- [[_LoginMessage]] You will see a message on the Login page if you created this page.
+These pages are inherited from the parent pages.
+The contents are copied from the parent pages if you edited the pages.
+Even if the parent pages are edited, the changes might not appear.
+If so, please save the contents of the current page to your editor and
+erase the page. Then you will see the contents of the parent page.
+After that, please re-edit the page.
+* etc.
+- [[SandBox]]
+- [[SiteLog|_SiteLogView]]
+Please see [[qwikWeb|http://qwik.jp/qwikWeb.html]] for details.
+'
+    }
+
+    D_TextFormatSimple = {
+      :dt => 'TextFormat',
+      :dd => 'You can view a brief description of the text format.',
+      :dc => "* Text format
+Please also access the [[full text format|TextFormat.describe]].
+** Header 2
+*** Header 3
+**** Header 4
+***** Header 5
+- List level 1
+-- List level 2
+--- List level 3
++ Unordered list 1
+++ Unordered list 2
++++ Unordered list 3
+ Pre formatted text.
+> This is a quote.
+:Wiki:A writable Web system.
+:QuickML:An easy to use mailing list system.
+,Data 1-1,Data 1-2,Data 1-3
+,Data 2-1,Data 2-2,Data 2-3
+''emphasis text'', '''strong text''', ==stroke out text==
+[[new|http://qwik.jp/.theme/new.png]]
+[[FrontPage]]
+[[Yahoo!|http://www.yahoo.co.jp/]]
+{{recent(1)}}
+{{{
+** Header 2
+*** Header 3
+**** Header 4
+***** Header 5
+- List level 1
+-- List level 2
+--- List level 3
++ Unordered list 1
+++ Unordered list 2
++++ Unordered list 3
+ Pre formatted text.
+> This is a quote.
+:Wiki:A writable Web system.
+:QuickML:An easy to use mailing list system.
+,Data 1-1,Data 1-2,Data 1-3
+,Data 2-1,Data 2-2,Data 2-3
+''emphasis text'', '''strong text''', ==stroke out text==
+[[new|http://qwik.jp/.theme/new.png]]
+[[FrontPage]]
+[[Yahoo!|http://www.yahoo.co.jp/]]
+{{recent(1)}}
+}}}
+"
+    }
+
+    D_TextFormat = {
+      :dt => 'TextFormat',
+      :dd => 'The text format of qwikWeb can be viewed here.',
+      :dc => "* Text format
+Please also access the [[simplified text format|TextFormatSimple.describe]].
+* Header
+- You can describe header by placing '*' on the beginning of the line.
+- You can use '*' from one to five. The stars are translated from h2 to h6.
+ * Header 1
+ ** Header 2
+ *** Header 3
+ **** Header 4
+ ***** Header 5
+* Header 1
+** Header 2
+*** Header 3
+**** Header 4
+***** Header 5
+* Page Title
+You can specify the page title using '*' on the first line of the page.
+The header acts as the page title.
+You can link the page using the page title.
+
+For example, you can link to the TextFormat page using [[TextFormat]].
+In addition, you can use [[書式一覧詳細版]] to link the page.
+
+However, usually, please use the page ID to link the page.
+If you use page title to link to the page,
+the page link will be disconnected.
+The page title will appear instead of the page ID
+if you use page ID to link to the page.
+
+* List
+- You can use an unordered list using '-' on the beginning of the line.
+- You can use '-' from one to three times. You can use a nested list.
+- You can use an ordered list using '+' also.
+ - List level 1
+ -- List level 2
+ --- List level 3
+ + Unordered list 1
+ ++ Unordered list 2
+ +++ Unordered list 3
+- List level 1
+-- List level 2
+--- List level 3
++ Unordered list 1
+++ Unordered list 2
++++ Unordered list 3
+* Paragraph
+- You can describe normal paragraphs.
+- The blank lines become separators between paragraphs.
+ For example,
+ you can describe several lines
+ using several lines.
+For example,
+you can describe several lines
+using several lines.
+* Horizontal rules
+- You can describe a horizontal rule using '===='.
+ There is a separator between this word
+ ====
+ and this word.
+There is a separator between this word
+====
+and this word.
+
+* Pre-formatted text
+You can describe pre-formatted text using ' ' or 'tab'.
+ This is a
+ pre-formatted text.
+You can also use '{{{' and
+'}}}' for specifying pre-formatted text.
+ {{{
+ void main()
+ {
+     printf(\"hello, world\n\");
+ }
+ }}}
+{{{
+void main()
+{
+    printf(\"hello, world\n\");
+}
+}}}
+* Quote
+You can describe a quote using '>'.
+ > This is a quote.
+> This is a quote.
+* Word description
+You can make a word description using ':'.
+ :Wiki:A writable Web system.
+ :QuickML:An easy-to-use mailing list system.
+:Wiki:A writable Web system.
+:QuickML:An easy-to-use mailing list system.
+* Table
+You can use a table using ',' or '|'.
+ ,Data 1-1,Data 1-2,Data 1-3
+ ,Data 2-1,Data 2-2,Data 2-3
+,Data 1-1,Data 1-2,Data 1-3
+,Data 2-1,Data 2-2,Data 2-3
+* Inline Elements
+You can specify inline elements.
+- You can add emphasis to an enclosed text using 2 apostrophes.
+- You can add stronger emphasis to an enclosed text using 3 apostrophes.
+- You can add strike out an enclosed text using 3 equals signs.
+ This is ''emphasis text''.
+ This is '''bold text'''.
+ This is ==stricken out text==.
+This is ''emphasis text''.
+This is '''bold text'''.
+This is ==stricken out text==.
+* Link
+You can make a link to a page using '[[' and ']]'.
+ For example, this is a link to [[FrontPage]].
+For example, this is a link to [[FrontPage]].
+* Create a new page
+You can create a new page by following a new page link.
+* Delete a page.
+You can delete a page by saving the page with a null string.
+* Link to a URL
+You can link a URL by describing the URL in the text.
+ You can access qwikWeb homepage from http://qwik.jp/ .
+You can access qwikWeb homepage from http://qwik.jp/ .
+
+Furthermore, you can specify the link using '[[' and ']]'.
+ You can use it with an alias like this [[qwik|http://qwik.jp/]].
+You can use it with an alias like this [[qwik|http://qwik.jp/]].
+
+If the suffix of the link is jpg, jpeg, png, or gif,
+the images will be embedded in the page.
+ [[New!|http://img.yahoo.co.jp/images/new2.gif]]
+[[New!|http://img.yahoo.co.jp/images/new2.gif]]
+* InterWiki function.
+You can describe a link to the other Wiki sites.
+ - [[google:qwikWeb]]
+ - [[isbn:4797318325]]
+ - [[amazon:Wiki]]
+- [[google:qwikWeb]]
+- [[isbn:4797318325]]
+- [[amazon:Wiki]]
+"
+    }
+  end
+end

data/vendor/qwik/lib/qwik/dev-add-copyright.rb

@@ -0,0 +1,23 @@
+# 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/util-pathname'
+
+COPYRIGHT_BANNER = <<END
+# 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.
+
+END
+
+ARGV.each {|fname|
+  #s = File.read(fname)
+  s = fname.path.read
+  unless /\A#/ =~ s
+    s = COPYRIGHT_BANNER + s
+    fname.path.write(s)
+    #File.open(fname, "w"){|f| f.write(s) }
+  end
+}

data/vendor/qwik/lib/qwik/dev-backup.rb

@@ -0,0 +1,24 @@
+# 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 Backup
+    def self.main(argv)
+      Dir.chdir($base)
+      date = Time.now.strftime('%Y-%m-%dT%H')
+      if ! FileTest.exist?('backup')
+	Dir.mkdir('backup')
+      end
+      cmd = "tar cfj backup/data-#{date}.tar.bz2 data"
+      puts cmd
+      system cmd
+    end
+  end
+end
+
+if $0 == __FILE__
+  Qwik::Backup.main(ARGV)
+end

data/vendor/qwik/lib/qwik/dev-bench.rb

@@ -0,0 +1,175 @@
+# 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.
+
+require 'benchmark'
+require 'optparse'
+require 'fileutils'
+
+$LOAD_PATH.unshift '..' unless $LOAD_PATH.include? '..'
+require 'qwik/bench-module-session'
+require 'qwik/test-common'
+
+$test = true
+
+class QwikBench
+  include TestSession
+
+  DefaultConfig = {
+    :sitename	=> 'www',
+    :path	=> nil,
+    :repeat	=> 1,
+  }
+
+  def nu_copy_all(sitename)
+    src  = @org_sites_dir.path + sitename
+    return nil unless src.exist?
+    dest = @dir
+
+    pages = []
+    src.each_entry {|file|
+      if /\A.+\.txt\z/ =~ file.to_s
+	srcfile = src+file
+	str = srcfile.read
+	mtime = srcfile.mtime
+
+	destfile = dest+file
+	destfile.put(str)
+	destfile.utime(mtime, mtime)
+
+	pages << file.to_s.sub(/\.txt\z/, "")
+      end
+    }
+    return pages
+  end
+
+  def get_pages(src)
+    pages = []
+    src.each_entry {|file|
+      if /\A(.+)\.txt\z/ =~ file.to_s
+	#pages << file.to_s.sub(/\.txt\z/, "")
+	pages << $1
+      end
+    }
+    return pages
+  end
+
+  def copy_all(sitename)
+    src  = @org_sites_dir.path + sitename
+    return nil unless src.exist?
+
+    dest = @dir
+    dest.rmtree if dest.exist?
+    dest.rmdir if dest.exist?
+
+    puts 'start copy.'
+    if File.exist?('/bin/cp')
+      system "/bin/cp -a #{src} #{dest}"
+    else
+      FileUtils.cp_r(src.to_s, dest.to_s)
+    end
+    puts 'copy done.'
+
+    return get_pages(src)
+  end
+
+  def bench(config)
+    sitename = config[:sitename]
+    path = config[:path]
+    repeat = config[:repeat]
+    pages = copy_all(sitename)
+
+    if pages.nil?
+      puts 'Error: No such site.'
+      return 
+    end
+
+    puts "=" * 70
+    puts "sitename: #{sitename}"
+    puts "pagenum: #{pages.length}"
+    puts "path: #{path}" if path
+    puts "repeat: #{repeat}"
+    puts
+
+    bench_result = Benchmark.measure {
+      t_add_user
+      repeat.times {
+	if path
+	  res = session(path)
+	  dummy = res.body.format_xml
+	else
+	  pages.each {|base|
+	    res = session("/test/#{base}.html")
+	    dummy = res.body.format_xml
+	  }
+	end
+      }
+    }
+
+    puts Benchmark::CAPTION
+    puts bench_result
+    puts "=" * 70
+  end
+
+  def run(config)
+    setup
+    bench(config)
+    #teardown
+  end
+
+  def self.main(argv)
+    config = {}
+    config.update(DefaultConfig)
+    config.update(parse_args(argv))
+    qb = QwikBench.new
+    qb.run(config)
+  end
+
+  def self.parse_args(argv)
+    config = {}
+    optionparser = OptionParser.new {|opts|
+      opts.banner = "Usage: qwik-bench [options]"
+      opts.separator ''
+      opts.separator 'Specific options:'
+      opts.on('-c', '--copy',
+	      'Copy directory first.') {|a|
+	config[:copy] = a
+      }
+      opts.on('-s', '--sitename sitename', 'Specify your sitename.') {|a|
+	config[:sitename] = a
+      }
+      opts.on('-p', '--path path', 'Specify path.') {|a|
+	config[:path] = a
+      }
+      opts.on('-r', '--repeat 100', OptionParser::DecimalInteger,
+	      'Repeat times.') {|a|
+	config[:repeat] = a
+      }
+      opts.separator ''
+      opts.separator 'Common options:'
+      opts.on_tail('-h', '--help', 'Show this message') {
+	puts opts
+	exit
+      }
+    }
+    optionparser.parse!(argv)
+    return config
+  end
+end
+
+if $0 == __FILE__
+  if ARGV[0] == '-b'
+    AB_PATH = "/usr/sbin/ab"
+    def main
+      url = "http://127.0.0.1:9190/"
+      requests = 1000
+      concurrency = 100
+      cmd = "#{AB_PATH} -n #{requests} -c #{concurrency} #{url}"
+      puts cmd
+      system cmd
+    end
+    main
+  else
+    QwikBench.main(ARGV)
+  end
+end

data/vendor/qwik/lib/qwik/dev-calctime.rb

@@ -0,0 +1,52 @@
+# 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/util-path'
+
+def die(msg)
+  puts msg
+  exit 1
+end
+
+def main
+  #log = 'log'.path
+  log = ARGV.shift
+  die('Usage: dev-calctime log') if log.nil?
+  
+  log = log.path
+  die('log not found.') if ! log.exist?
+
+  content = log.open {|f| f.read }
+
+  ar = []
+  content.each_line {|line|
+    line.chomp!
+    if /(\([0-9\.]+\))\z/ =~ line
+      time = $1
+      time = time.sub(/\A\(/, '').sub(/\)\z/, '').to_f
+
+      line = line.sub(/(\([0-9\.]+\))\z/, '')
+      method, klass = line.split(/[\(\)]/)
+      ar << [time, klass, method]
+    end
+  }
+
+  newstr = ''
+  ar.sort.reverse.each {|time, klass, method|
+    if 0.1 < time
+      line = "#{time}\t#{klass}\t#{method}\n"
+      newstr << line
+    end
+  }
+
+  if false
+    'out'.path.open('wb') {|out|
+      out.print newstr
+    }
+  else
+    print newstr
+  end
+end
+main

data/vendor/qwik/lib/qwik/dev-css-compressor.rb

@@ -0,0 +1,60 @@
+# 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/util-pathname'
+
+class CSSCompressor
+  def self.run
+    generate_src
+  end
+
+  def self.generate_src
+    src = <<'EOT'
+/*
+
+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 General Public License version 2.
+
+This file is automatically generated.
+PLEASE DO NOT EDIT THIS FILE.
+
+*/
+EOT
+    '.'.path.each_entry {|file|
+      f = file.to_s
+      next unless /\.css\z/ =~ f
+      s = ''
+      file.open {|f|
+	while line = f.gets
+	  line.sub!(/\/\/.+$/, '')
+	  line.sub!(/\A\s+/, '')
+	  line.sub!(/\A([-\w]+:)\s+/) { $1 }
+	  case line
+	  when /\A\/\//, /\A\s*$/
+	    # do nothing
+	  when /\A\/\*.+\*\/$/
+	    # do nothing
+	  else
+	    s << line
+	  end
+	end
+	f.read
+      }
+      src << s
+    }
+
+    '../all.css'.path.open('wb') {|f|
+      f.puts src
+    }
+  end
+end
+
+if $0 == __FILE__
+  CSSCompressor.run
+end

data/vendor/qwik/lib/qwik/dev-extract-catalog.rb

@@ -0,0 +1,102 @@
+#! /usr/bin/ruby
+# Copyright (C) 2003-2008 AIST, 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.
+
+require 'pathname'
+require 'pp'
+require 'stringio'
+$KCODE = 'SJIS'
+
+class String
+  def trim_line!
+    self.chomp!
+    self.gsub!(/\A\s*/, '')
+    self.gsub!(/\s*\z/, '')
+  end
+
+  def strip_metachar!
+    self.gsub!(/\\n/, '')
+    self.gsub!(/\\"/, '"')
+    self.sub!(/\A['"]/, '')
+    self.sub!(/['"]\Z/, '')
+  end
+
+  def del!(regexp)
+    self.gsub!(regexp) { '' }
+  end
+end
+
+class ExtractCatalog
+  def main
+    mypath = Pathname.new(__FILE__)
+
+    catalog_ja = mypath.parent + 'catalog-ja.rb'
+    ar = parse(catalog_ja)
+    outpath = Pathname.new '../../interfaces-web.txt'
+    output(outpath, ar)
+
+    catalog_ml_ja = mypath.parent + 'catalog-ml-ja.rb'
+    ar = parse(catalog_ml_ja)
+    outpath = Pathname.new '../../interfaces-ml.txt'
+    output(outpath, ar)
+  end
+
+  def parse(path)
+    str = path.read
+
+    str2 = ''
+    str.each_line {|line|
+      line.trim_line!
+
+      next if line.empty?
+
+      case line
+      when /^#/, /^module /, /^class /, /^def /, /^\{/, /^\}/, /^end$/,
+	  /^:charset/, /^:codeconv/
+	next
+      end
+
+      str2 << line
+    }
+
+    ar = []
+    lines = str2.split(/['"],['"]/)
+    lines.each {|line|
+      e, j = line.split(/['"]\s*=>\s*['"]/)
+      ar << [e, j]
+    }
+
+    return ar
+  end
+
+  def output(outpath, ar)
+    outpath.open('w') {|out|
+      ar.each {|e, j|
+	next if e.nil?
+	next if j.nil?
+
+	e.del!(/\A'/)
+	j.del!(/['"],\z/)
+	e.del!(/\\n/)
+	j.del!(/\\n/)
+
+	e.gsub!(/\\\"/) { '"' }
+
+	next if e.empty?
+	next if j.empty?
+
+	next if e == '->'
+	next if e == '<-'
+	next if j == '→'
+	next if j == '←'
+
+	out.puts j
+	out.puts e
+	out.puts
+      }
+    }
+  end
+end
+
+ExtractCatalog.new.main