gonzui 1.2

data/lib/gonzui/webapp/webrick.rb

@@ -0,0 +1,48 @@
+#
+# webrick.rb - webrick enhancements
+#
+# Copyright (C) 2004-2005 Satoru Takabayashi <satoru@namazu.org> 
+#     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.
+#
+
+require 'webrick'
+include WEBrick
+
+module WEBrick
+  class HTTPRequest
+    # FIXME: it should be deleted if WEBRick supports the method
+    def parse_accept_language
+      if self["Accept-Language"]
+        tmp = []
+        parts = self["Accept-Language"].split(/,\s*/)
+        parts.each {|part|
+          if m = /^([\w-]+)(?:;q=([\d]+(?:\.[\d]+)))?$/.match(part)
+            lang = m[1]
+            q = (m[2] or 1).to_f
+            tmp.push([lang, q])
+          end
+        }
+        @accept_language = 
+          tmp.sort_by {|lang, q| q}.map {|lang, q| lang}.reverse
+      else
+        @accept_language = ["en"] # FIXME: should be customizable?
+      end
+    end
+
+    def accept_language
+      unless @accept_language
+        parse_accept_language
+      end
+      return @accept_language
+    end
+
+    def gzip_encoding_supported?
+      /\bgzip\b/.match(self["accept-encoding"])
+    end
+  end
+end
+

data/script/console

@@ -0,0 +1,10 @@
+#!/usr/bin/env ruby
+# File: script/console
+irb = RUBY_PLATFORM =~ /(:?mswin|mingw)/ ? 'irb.bat' : 'irb'
+
+libs =  " -r irb/completion"
+# Perhaps use a console_lib to store any extra methods I may want available in the cosole
+# libs << " -r #{File.dirname(__FILE__) + '/../lib/console_lib/console_logger.rb'}"
+libs <<  " -r #{File.dirname(__FILE__) + '/../lib/gonzui.rb'}"
+puts "Loading gonzui gem"
+exec "#{irb} #{libs} --simple-prompt"

data/script/destroy

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+APP_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+begin
+  require 'rubigen'
+rescue LoadError
+  require 'rubygems'
+  require 'rubigen'
+end
+require 'rubigen/scripts/destroy'
+
+ARGV.shift if ['--help', '-h'].include?(ARGV[0])
+RubiGen::Base.use_component_sources! [:rubygems, :newgem, :newgem_theme, :test_unit]
+RubiGen::Scripts::Destroy.new.run(ARGV)

data/script/generate

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+APP_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+begin
+  require 'rubigen'
+rescue LoadError
+  require 'rubygems'
+  require 'rubigen'
+end
+require 'rubigen/scripts/generate'
+
+ARGV.shift if ['--help', '-h'].include?(ARGV[0])
+RubiGen::Base.use_component_sources! [:rubygems, :newgem, :newgem_theme, :test_unit]
+RubiGen::Scripts::Generate.new.run(ARGV)

data/script/makemanifest.rb

@@ -0,0 +1,21 @@
+#!/usr/bin/ruby
+# original: http://d.hatena.ne.jp/bellbind/20070605/1180979599
+
+base_dir = File.join(File.dirname(__FILE__), "..")
+glob_pattern = File.join("**", "*")
+exclude_patterns = [
+  /^pkg/,/^doc/,
+]
+
+Dir.chdir(base_dir)
+files = Dir.glob(glob_pattern).delete_if do |fname|
+  File.directory?(fname) or
+  exclude_patterns.find do |pattern|
+    pattern =~ fname
+  end
+end
+manifest = File.new("Manifest.txt", "w")
+manifest.puts files.sort.join("\n")
+manifest.close
+
+puts "Manifest.txt updated"

data/tasks/extconf.rake

@@ -0,0 +1,13 @@
+namespace :extconf do
+  desc "Compiles the Ruby extension"
+  task :compile
+end
+
+task :compile => "extconf:compile"
+
+task :test => :compile
+
+BIN = "*.{bundle,jar,so,obj,pdb,lib,def,exp}"
+$hoe.clean_globs |= ["ext/**/#{BIN}", "lib/**/#{BIN}", 'ext/**/Makefile']
+$hoe.spec.require_paths = Dir['{lib,ext/*}']
+$hoe.spec.extensions = FileList["ext/**/extconf.rb"].to_a

data/tasks/extconf/autopack.rake

@@ -0,0 +1,43 @@
+namespace :extconf do
+  extension = File.basename(__FILE__, '.rake')
+
+  ext = "ext/#{extension}"
+  ext_so = "#{ext}/#{extension}.#{Config::CONFIG['DLEXT']}"
+  ext_files = FileList[
+    "#{ext}/*.c",
+    "#{ext}/*.h",
+    "#{ext}/*.rl",
+    "#{ext}/extconf.rb",
+    "#{ext}/Makefile",
+    # "lib"
+  ]
+
+
+  task :compile => extension do
+    if Dir.glob("**/#{extension}.{o,so,dll}").length == 0
+      STDERR.puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
+      STDERR.puts "Gem actually failed to build.  Your system is"
+      STDERR.puts "NOT configured properly to build #{GEM_NAME}."
+      STDERR.puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
+      exit(1)
+    end
+  end
+
+  desc "Builds just the #{extension} extension"
+  task extension.to_sym => ["#{ext}/Makefile", ext_so ]
+
+  file "#{ext}/Makefile" => ["#{ext}/extconf.rb"] do
+    Dir.chdir(ext) do ruby "extconf.rb" end
+  end
+
+  file ext_so => ext_files do
+    Dir.chdir(ext) do
+      sh(PLATFORM =~ /win32/ ? 'nmake' : 'make') do |ok, res|
+        if !ok
+          require "fileutils"
+          FileUtils.rm Dir.glob('*.{so,o,dll,bundle}')
+        end
+      end
+    end
+  end
+end

data/tasks/extconf/delta.rake

@@ -0,0 +1,43 @@
+namespace :extconf do
+  extension = File.basename(__FILE__, '.rake')
+
+  ext = "ext/#{extension}"
+  ext_so = "#{ext}/#{extension}.#{Config::CONFIG['DLEXT']}"
+  ext_files = FileList[
+    "#{ext}/*.c",
+    "#{ext}/*.h",
+    "#{ext}/*.rl",
+    "#{ext}/extconf.rb",
+    "#{ext}/Makefile",
+    # "lib"
+  ]
+
+
+  task :compile => extension do
+    if Dir.glob("**/#{extension}.{o,so,dll}").length == 0
+      STDERR.puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
+      STDERR.puts "Gem actually failed to build.  Your system is"
+      STDERR.puts "NOT configured properly to build #{GEM_NAME}."
+      STDERR.puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
+      exit(1)
+    end
+  end
+
+  desc "Builds just the #{extension} extension"
+  task extension.to_sym => ["#{ext}/Makefile", ext_so ]
+
+  file "#{ext}/Makefile" => ["#{ext}/extconf.rb"] do
+    Dir.chdir(ext) do ruby "extconf.rb" end
+  end
+
+  file ext_so => ext_files do
+    Dir.chdir(ext) do
+      sh(PLATFORM =~ /win32/ ? 'nmake' : 'make') do |ok, res|
+        if !ok
+          require "fileutils"
+          FileUtils.rm Dir.glob('*.{so,o,dll,bundle}')
+        end
+      end
+    end
+  end
+end

data/tasks/extconf/texttokenizer.rake

@@ -0,0 +1,43 @@
+namespace :extconf do
+  extension = File.basename(__FILE__, '.rake')
+
+  ext = "ext/#{extension}"
+  ext_so = "#{ext}/#{extension}.#{Config::CONFIG['DLEXT']}"
+  ext_files = FileList[
+    "#{ext}/*.c",
+    "#{ext}/*.h",
+    "#{ext}/*.rl",
+    "#{ext}/extconf.rb",
+    "#{ext}/Makefile",
+    # "lib"
+  ]
+
+
+  task :compile => extension do
+    if Dir.glob("**/#{extension}.{o,so,dll}").length == 0
+      STDERR.puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
+      STDERR.puts "Gem actually failed to build.  Your system is"
+      STDERR.puts "NOT configured properly to build #{GEM_NAME}."
+      STDERR.puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
+      exit(1)
+    end
+  end
+
+  desc "Builds just the #{extension} extension"
+  task extension.to_sym => ["#{ext}/Makefile", ext_so ]
+
+  file "#{ext}/Makefile" => ["#{ext}/extconf.rb"] do
+    Dir.chdir(ext) do ruby "extconf.rb" end
+  end
+
+  file ext_so => ext_files do
+    Dir.chdir(ext) do
+      sh(PLATFORM =~ /win32/ ? 'nmake' : 'make') do |ok, res|
+        if !ok
+          require "fileutils"
+          FileUtils.rm Dir.glob('*.{so,o,dll,bundle}')
+        end
+      end
+    end
+  end
+end

data/tasks/extconf/xmlformatter.rake

@@ -0,0 +1,43 @@
+namespace :extconf do
+  extension = File.basename(__FILE__, '.rake')
+
+  ext = "ext/#{extension}"
+  ext_so = "#{ext}/#{extension}.#{Config::CONFIG['DLEXT']}"
+  ext_files = FileList[
+    "#{ext}/*.c",
+    "#{ext}/*.h",
+    "#{ext}/*.rl",
+    "#{ext}/extconf.rb",
+    "#{ext}/Makefile",
+    # "lib"
+  ]
+
+
+  task :compile => extension do
+    if Dir.glob("**/#{extension}.{o,so,dll}").length == 0
+      STDERR.puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
+      STDERR.puts "Gem actually failed to build.  Your system is"
+      STDERR.puts "NOT configured properly to build #{GEM_NAME}."
+      STDERR.puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
+      exit(1)
+    end
+  end
+
+  desc "Builds just the #{extension} extension"
+  task extension.to_sym => ["#{ext}/Makefile", ext_so ]
+
+  file "#{ext}/Makefile" => ["#{ext}/extconf.rb"] do
+    Dir.chdir(ext) do ruby "extconf.rb" end
+  end
+
+  file ext_so => ext_files do
+    Dir.chdir(ext) do
+      sh(PLATFORM =~ /win32/ ? 'nmake' : 'make') do |ok, res|
+        if !ok
+          require "fileutils"
+          FileUtils.rm Dir.glob('*.{so,o,dll,bundle}')
+        end
+      end
+    end
+  end
+end

data/test/_external_tools.rb

@@ -0,0 +1,13 @@
+dn = "/dev/null"
+dn = "nul" if (/mswin|mingw|bccwin/ =~ RUBY_PLATFORM)
+APT_   = ( system( "apt-get --version 2> #{dn} > #{dn}" ) ? true : false )
+CVS_   = ( system( "cvs --version 2> #{dn} > #{dn}" ) ? true : false )
+GIT_   = ( system( "git --version 2> #{dn} > #{dn}" ) ? true : false )
+GREP_  = ( system( "grep --version 2> #{dn} > #{dn}" ) ? true : false )
+SVN_   = ( system( "svn --version 2> #{dn} > #{dn}" ) ? true : false )
+ZIP_   = ( system( "zip --version 2> #{dn} > #{dn}" ) ? true : false )
+UNZIP_ = ( system( "unzip -v 2> #{dn} > #{dn}" ) ? true : false )
+GZIP_  = ( system( "gzip --version 2> #{dn} > #{dn}" ) ? true : false )
+BZIP2_ = ( system( "bzip2 --help 2> #{dn} > #{dn}" ) ? true : false )
+TAR_   = ( system( "tar --version 2> #{dn} > #{dn}" ) ? true : false )
+ARC_ = ( ZIP_ && UNZIP_ && GZIP_ && BZIP2_ && TAR_ )

data/test/_test-util.rb

@@ -0,0 +1,142 @@
+require 'gonzui'
+require 'fileutils'
+include FileUtils
+
+def gnu_make?
+  message = IO.popen("make --version").read
+  /^GNU/.match(message)
+end
+
+module TestUtil
+  FOO_FILES   = ["bar.c", "bar.h", "foo.c", "Makefile" ].sort
+  FOO_C_FILES = FOO_FILES.find_all {|x| /\.[ch]$/.match(x) }
+  FOO_SYMBOLS = ["bar", "foo", "main", "printf"]
+  FOO_PACKAGE = "foo-0.1"
+  FOO_TGZ     = File.join(File.dirname(__FILE__), "foo",
+                          FOO_PACKAGE + ".tar.gz")
+
+  @@make_options = if gnu_make?
+                     "--quiet --no-print-directory"
+                   else
+                     ""
+                   end
+  @@foo = File.join(File.dirname(__FILE__), "foo")
+
+############### Import ###############
+
+  def add_package(config)
+    importer = Gonzui::Importer.new(config)
+    url = URI.from_path(FOO_TGZ)
+    importer.import(url)
+    importer.finish
+  end
+
+############### DB ###############
+
+  def make_db(config)
+    remove_db(config)
+    make_archives
+    importer = Gonzui::Importer.new(config)
+    url = URI.from_path(FOO_TGZ)
+    importer.import(url)
+    importer.finish
+  end
+
+  def remove_db(config)
+    rm_rf(config.db_directory)
+  end
+
+############### Make ###############
+
+  def make_dist_tree
+    system("cd #{@@foo} && make #{@@make_options} -f Makefile.foo dist-tree")
+  end
+
+  def make_clean
+    system("cd #{@@foo} && make #{@@make_options} -f Makefile.foo clean")
+  end
+
+  def make_archives
+    Gonzui::Util.require_command("zip")
+    Gonzui::Util.require_command("tar")
+    Gonzui::Util.require_command("gzip")
+    Gonzui::Util.require_command("bzip2")
+    system("cd #{@@foo} && make #{@@make_options} -f Makefile.foo dist")
+    system("cd #{@@foo} && make #{@@make_options} -f Makefile.foo dist-poor")
+  end
+
+############### CVS ###############
+
+  def cvsroot
+    File.expand_path(File.join(File.dirname(__FILE__), "tmp.cvsroot"))
+  end
+
+  def make_cvs
+    remove_cvs
+    make_dist_tree
+    assert(Gonzui::Util.command_exist?("cvs"))
+    Dir.mkdir(cvsroot)
+    command_line = sprintf("cvs -d %s init", shell_escape(cvsroot))
+    system(command_line)
+    command_line = sprintf("cd %s && ", shell_escape("#{@@foo}/#{FOO_PACKAGE}"))
+    command_line << sprintf("cvs -d %s import -m '' foo gonzui-test test", shell_escape(cvsroot))
+    system(command_line)
+  end
+
+  def remove_cvs
+    FileUtils.rm_rf(cvsroot)
+  end
+
+############### SVN ###############
+
+  def svnroot
+    File.expand_path(File.join(File.dirname(__FILE__), "tmp.svnroot"))
+  end
+
+  def make_svn
+    remove_svn
+    make_dist_tree
+    assert(Gonzui::Util.command_exist?("svn"))
+    assert(Gonzui::Util.command_exist?("svnadmin"))
+    svnroot_uri = sprintf("file:///%s", svnroot)
+    Dir.mkdir(svnroot)
+    command_line = sprintf("svnadmin create %s", shell_escape(svnroot))
+    system(command_line)
+    command_line = sprintf("cd %s && ", shell_escape("#{@@foo}/#{FOO_PACKAGE}"))
+    command_line << sprintf("svn -q import -m '' %s", shell_escape(svnroot_uri))
+    system(command_line)
+    return svnroot_uri
+  end
+
+  def remove_svn
+    FileUtils.rm_rf(svnroot)
+  end
+
+############### GIT ###############
+
+  def gitroot
+    File.expand_path(File.join(File.dirname(__FILE__), "tmp.gitroot"))
+  end
+
+  def make_git
+    remove_git
+    make_dist_tree
+    assert(Gonzui::Util.command_exist?("git"))
+    Dir.mkdir(gitroot)
+    command_line = sprintf("git --git-dir %s init", shell_escape(gitroot))
+    system(command_line)
+    command_line = sprintf("cd %s && ", shell_escape("#{@@foo}/#{FOO_PACKAGE}"))
+    command_line << sprintf("git --git-dir %s --work-tree . add . && ", shell_escape(gitroot))
+    command_line << sprintf("git --git-dir %s --work-tree . commit -m 'import'", shell_escape(gitroot))
+    system(command_line)
+    return gitroot
+  end
+
+  def remove_git
+    FileUtils.rm_rf(gitroot)
+  end
+end
+
+if ENV['MAKEFLAGS'] # be quiet in a make process.
+  ARGV.unshift("--verbose=s")
+end