threadify 1.0.0 → 1.1.0

data/README

@@ -4,6 +4,7 @@ NAME
 SYNOPSIS
   enumerable = %w( a b c d )
   enumerable.threadify(2){ 'process this block using two worker threads' }
+  enumerable.threadify(:each_slice, 4){ 'process each slice of 4 in a thread' }
 
 DESCRIPTION
   threadify.rb makes it stupid easy to process a bunch of data using 'n'
@@ -14,6 +15,7 @@ INSTALL
 
 URI
   http://rubyforge.org/projects/codeforpeople
+  http://github.com/ahoward/threadify/
 
 SAMPLES
   
@@ -21,39 +23,34 @@ SAMPLES
 
   ~ > cat sample/a.rb
 
-    require 'open-uri'
-    require 'yaml'
-    
-    require 'rubygems'
     require 'threadify'
     
+    require 'open-uri'
+    require 'yaml'
     
     uris =
       %w(
+        http://codeforpeople.com
+        http://drawohara.com
+        http://twitter.com/drawohara
+        http://github.com/ahoward/threadify/
         http://google.com
-        http://yahoo.com
         http://rubyforge.org
         http://ruby-lang.org
-        http://kcrw.org
-        http://drawohara.com
-        http://codeforpeople.com
+        http://hypem.com
       )
     
+    curl = lambda{|url| open(url){|socket| socket.read}}
     
     time 'without threadify' do
-      uris.each do |uri|
-        body = open(uri){|pipe| pipe.read}
-      end
+      uris.each{|uri| curl[uri]}
     end
     
     
     time 'with threadify' do
-      uris.threadify do |uri|
-        body = open(uri){|pipe| pipe.read}
-      end
+      uris.threadify(uris.size){|uri| curl[uri]}
     end
     
-    
     BEGIN {
       def time label
         a = Time.now.to_f
@@ -66,34 +63,22 @@ SAMPLES
 
   ~ > ruby sample/a.rb
 
-    /opt/local/lib/ruby/1.8/net/http.rb:560:in `initialize': getaddrinfo: nodename nor servname provided, or not known (SocketError)
-    	from /opt/local/lib/ruby/1.8/net/http.rb:560:in `open'
-    	from /opt/local/lib/ruby/1.8/net/http.rb:560:in `connect'
-    	from /opt/local/lib/ruby/1.8/timeout.rb:48:in `timeout'
-    	from /opt/local/lib/ruby/1.8/timeout.rb:76:in `timeout'
-    	from /opt/local/lib/ruby/1.8/net/http.rb:560:in `connect'
-    	from /opt/local/lib/ruby/1.8/net/http.rb:553:in `do_start'
-    	from /opt/local/lib/ruby/1.8/net/http.rb:542:in `start'
-    	from /opt/local/lib/ruby/1.8/open-uri.rb:242:in `open_http'
-    	 ... 8 levels...
-    	from sample/a.rb:21:in `each'
-    	from sample/a.rb:21
-    	from sample/a.rb:37:in `time'
-    	from sample/a.rb:20
     --- 
-    without threadify: 0.0373568534851074
+    without threadify: 12.6283850669861
+    --- 
+    with threadify: 1.93842315673828
 
 
   <========< sample/b.rb >========>
 
   ~ > cat sample/b.rb
 
-    require 'yaml'
-    
-    require 'rubygems'
     require 'threadify'
     
-    size = Integer(ARGV.shift || (2 ** 15))
+    require 'yaml'
+    
+    #size = Integer(ARGV.shift || (2 ** 20))
+    size = 64
     
     haystack = Array.new(size){|i| i}
     needle = 2 * (size / 3) 
@@ -101,11 +86,19 @@ SAMPLES
     a, b = 4, 2
     
     time 'without threadify' do
-      a = haystack.each{|value| break value if value == needle}
+      a =
+        haystack.each do |value|
+          break value if value == needle
+          sleep(rand) # mimic work
+        end
     end
     
     time 'with threadify' do
-      b = haystack.threadify(16){|value| threadify! value if value == needle}
+      b = 
+        haystack.threadify(:each_slice, size / 8) do |slice|
+          slice.each{|value| threadify! value if value == needle}
+          sleep(rand) # mimic work
+        end
     end
     
     raise if a != b
@@ -125,19 +118,23 @@ SAMPLES
   ~ > ruby sample/b.rb
 
     --- 
-    without threadify: 0.00681805610656738
+    without threadify: 22.8657438755035
     --- 
-    with threadify: 0.57867693901062
+    with threadify: 0.967911005020142
     --- 
-    :needle: 21844
-    :a: 21844
-    :b: 21844
+    :needle: 42
+    :a: 42
+    :b: 42
+
 
 
 
 HISTORY
-  1.0.0
-    - adjust threadify to yield objects exactly like Enumerable#each
+  1.1.0
+    - added ability to specify arbitrary iterator (not only each)
+      [0,1,2,3].threadify(:each_slice, 2){|ary| ary}
+    - update samples
+    - auto include enumerator
 
   0.0.3
     - added ability to short-circuit the parallel processing, a.k.a to 'break'

data/README.erb

@@ -0,0 +1,38 @@
+NAME
+  threadify.rb
+
+SYNOPSIS
+  enumerable = %w( a b c d )
+  enumerable.threadify(2){ 'process this block using two worker threads' }
+  enumerable.threadify(:each_slice, 4){ 'process each slice of 4 in a thread' }
+
+DESCRIPTION
+  threadify.rb makes it stupid easy to process a bunch of data using 'n'
+  worker threads
+
+INSTALL
+  gem install threadify
+
+URI
+  http://rubyforge.org/projects/codeforpeople
+  http://github.com/ahoward/threadify/
+
+SAMPLES
+  <%= samples %>
+
+
+HISTORY
+  1.1.0
+    - added ability to specify arbitrary iterator (not only each)
+      [0,1,2,3].threadify(:each_slice, 2){|ary| ary}
+    - update samples
+    - auto include enumerator
+
+  0.0.3
+    - added ability to short-circuit the parallel processing, a.k.a to 'break'
+      from threadify
+
+  0.0.2
+    - don't use thread.exit, just let the thread die naturally
+    - add version to Threadify module
+    - comments ;-)

data/lib/threadify.rb

@@ -1,36 +1,43 @@
 module Threadify
-  VERSION = '1.0.0'
+  Threadify::VERSION = '1.1.0' unless defined?(Threadify::VERSION)
   def Threadify.version() Threadify::VERSION end
 
   require 'thread'
+  require 'enumerator'
 
   @threads = 8
   @abort_on_exception = true
+  @strategy = [:each]
 
   class << self
     attr_accessor :threads
     attr_accessor :abort_on_exception
+    attr_accessor :strategy
   end
 
   class Error < ::StandardError; end
 end
 
 module Enumerable
-  def threadify(opts = {}, &block)
+  def threadify(*args, &block)
   # setup
   #
-    opts = {:threads => opts} if Numeric === opts
-    threads = Integer(opts[:threads] || opts['threads'] || Threadify.threads)
+    opts = args.last.is_a?(Hash) ? args.pop : {}
+    opts.keys.each{|key| opts[key.to_s.to_sym] = opts.delete(key)}
+    opts[:threads] ||= (Numeric === args.first ? args.shift : Threadify.threads)
+    opts[:strategy] ||= (args.empty? ? Threadify.strategy : args)
+
+    threads = Integer(opts[:threads])
+    strategy = opts[:strategy]
     done = Object.new.freeze
     nothing = done
-    #jobs = Array.new(threads).map{ Queue.new }
     jobs = Array.new(threads).map{ [] }
     top = Thread.current
 
   # produce jobs
   #
     i = 0
-    each{|*args| jobs[i % threads].push([args, i]); i += 1}
+    send(*strategy){|*args| jobs[i % threads].push([args, i]); i += 1}
     threads.times{|i| jobs[i].push(done)}
 
   # setup consumer list
@@ -67,7 +74,6 @@ module Enumerable
           catch(:threadify) do
             loop{
               break if caught
-              #job = jobsi.pop
               job = jobsi.shift
               break if job == done
               args = job.first
@@ -78,8 +84,8 @@ module Enumerable
 
 
         unless nothing == thrown
-          args, i = job
           thrownq.push [i, thrown]
+          args, i = job
         end
       end
     end

data/rakefile

@@ -0,0 +1,231 @@
+
+This.rubyforge_project = 'codeforpeople'
+This.author = "Ara T. Howard"
+This.email = "ara.t.howard@gmail.com"
+This.homepage = "http://github.com/ahoward/#{ This.lib }/tree/master"
+
+
+task :default do
+  puts(Rake::Task.tasks.map{|task| task.name} - ['default'])
+end
+
+
+task :gemspec do
+  ignore_extensions = 'git', 'svn', 'tmp', /sw./, 'bak', 'gem'
+  ignore_directories = 'pkg'
+
+  shiteless = 
+    lambda do |list|
+      list.delete_if do |entry|
+        next unless test(?e, entry)
+        extension = File.basename(entry).split(%r/[.]/).last
+        ignore_extensions.any?{|ext| ext === extension}
+      end
+      list.delete_if do |entry|
+        next unless test(?d, entry)
+        dirname = File.expand_path(entry)
+        ignore_directories.any?{|dir| File.expand_path(dir) == dirname}
+      end
+    end
+
+  lib         = This.lib
+  version     = This.version
+  files       = shiteless[Dir::glob("**/**")]
+  executables = shiteless[Dir::glob("bin/*")].map{|exe| File.basename(exe)}
+  has_rdoc    = true #File.exist?('doc')
+  test_files  = "test/#{ lib }.rb" if File.file?("test/#{ lib }.rb")
+
+  extensions = This.extensions
+  if extensions.nil?
+    %w( Makefile configure extconf.rb ).each do |ext|
+      extensions << ext if File.exists?(ext)
+    end
+  end
+  extensions = [extensions].flatten.compact
+
+  template = 
+    if test(?e, 'gemspec.erb')
+      Template{ IO.read('gemspec.erb') }
+    else
+      Template {
+        <<-__
+          ## #{ lib }.gemspec
+          #
+
+          Gem::Specification::new do |spec|
+            spec.name = #{ lib.inspect }
+            spec.version = #{ version.inspect }
+            spec.platform = Gem::Platform::RUBY
+            spec.summary = #{ lib.inspect }
+
+            spec.files = #{ files.inspect }
+            spec.executables = #{ executables.inspect }
+            
+            spec.require_path = "lib"
+
+            spec.has_rdoc = #{ has_rdoc.inspect }
+            spec.test_files = #{ test_files.inspect }
+            #spec.add_dependency 'lib', '>= version'
+            #spec.add_dependency 'fattr'
+
+            spec.extensions.push(*#{ extensions.inspect })
+
+            spec.rubyforge_project = #{ This.rubyforge_project.inspect }
+            spec.author = #{ This.author.inspect }
+            spec.email = #{ This.email.inspect }
+            spec.homepage = #{ This.homepage.inspect }
+          end
+        __
+      }
+    end
+
+  open("#{ lib }.gemspec", "w"){|fd| fd.puts template}
+  This.gemspec = "#{ lib }.gemspec"
+end
+
+task :gem => [:clean, :gemspec] do
+  #gem = File.join(This.pkgdir, "#{ lib }.gemspec")
+  #open("#{ This.pkgdir }/#{ lib }.gemspec", "w"){|fd| fd.puts template}
+  #before = Dir['*.gem']
+  #cmd = "gem build #{ This.lib }.gemspec"
+  #`#{ cmd } 2>&1`
+  #after = Dir['*.gem']
+  #gems = [after - before]
+  #p gems
+  
+  Fu.mkdir_p This.pkgdir
+  Dir.chdir(This.pkgdir) do
+    cmd = "gem build ../#{ This.gemspec }"
+    `#{ cmd } 2>&1`
+    gem = Dir['*.gem'].first or 'abort no gem!'
+    This.gem = File.basename(gem)
+  end
+end
+
+
+task :readme do
+  samples = ''
+  prompt = '~ > '
+  lib = This.lib
+  version = This.version
+
+  Dir['sample*/*'].sort.each do |sample|
+    samples << "\n" << "  <========< #{ sample } >========>" << "\n\n"
+
+    cmd = "cat #{ sample }"
+    samples << Util.indent(prompt + cmd, 2) << "\n\n"
+    samples << Util.indent(`#{ cmd }`, 4) << "\n"
+
+    cmd = "ruby #{ sample }"
+    samples << Util.indent(prompt + cmd, 2) << "\n\n"
+
+    cmd = "ruby -e'STDOUT.sync=true; exec %(ruby -Ilib #{ sample })'"
+    samples << Util.indent(`#{ cmd } 2>&1`, 4) << "\n"
+  end
+
+  template = 
+    if test(?e, 'readme.erb')
+      Template{ IO.read('readme.erb') }
+    else
+      Template {
+        <<-__
+          NAME
+            #{ lib }
+
+          DESCRIPTION
+
+          INSTALL
+            gem install #{ lib }
+
+          SAMPLES
+            #{ samples }
+        __
+      }
+    end
+
+  open("README", "w"){|fd| fd.puts template}
+end
+
+
+task :clean do
+  Dir[File.join(This.pkgdir, '**/**')].each{|entry| Fu.rm_rf(entry)}
+end
+
+
+task :release => [:clean, :gemspec, :gem] do
+  gems = Dir[File.join(This.pkgdir, '*.gem')].flatten
+  raise "which one? : #{ gems.inspect }" if gems.size > 1
+  raise "no gems?" if gems.size < 1
+  cmd = "rubyforge login && rubyforge add_release #{ This.rubyforge_project } #{ This.lib } #{ This.version } #{ This.pkgdir }/#{ This.gem }"
+  puts cmd
+  system cmd
+end
+
+
+
+
+
+BEGIN {
+  $VERBOSE = nil
+
+  require 'ostruct'
+  require 'erb'
+  require 'fileutils'
+
+  Fu = FileUtils
+
+  This = OpenStruct.new
+
+  This.file = File.expand_path(__FILE__)
+  This.dir = File.dirname(This.file)
+  This.pkgdir = File.join(This.dir, 'pkg')
+
+  lib = ENV['LIB']
+  unless lib
+    lib = File.basename(Dir.pwd)
+  end
+  This.lib = lib
+
+  version = ENV['VERSION']
+  unless version
+    name = lib.capitalize
+    require "./lib/#{ lib }"
+    version = eval(name).send(:version)
+  end
+  This.version = version
+
+  abort('no lib') unless This.lib
+  abort('no version') unless This.version
+
+  module Util
+    def indent(s, n = 2)
+      s = unindent(s)
+      ws = ' ' * n
+      s.gsub(%r/^/, ws)
+    end
+
+    def unindent(s)
+      indent = nil
+      s.each do |line|
+      next if line =~ %r/^\s*$/
+      indent = line[%r/^\s*/] and break
+    end
+    indent ? s.gsub(%r/^#{ indent }/, "") : s
+  end
+    extend self
+  end
+
+  class Template
+    def initialize(&block)
+      @block = block
+      @template = block.call.to_s
+    end
+    def expand(b=nil)
+      ERB.new(Util.unindent(@template)).result(b||@block)
+    end
+    alias_method 'to_s', 'expand'
+  end
+  def Template(*args, &block) Template.new(*args, &block) end
+
+  Dir.chdir(This.dir)
+}

data/sample/a.rb

@@ -1,36 +1,31 @@
-require 'open-uri'
-require 'yaml'
-
-require 'rubygems'
 require 'threadify'
 
+require 'open-uri'
+require 'yaml'
 
 uris =
   %w(
+    http://codeforpeople.com
+    http://drawohara.com
+    http://twitter.com/drawohara
+    http://github.com/ahoward/threadify/
     http://google.com
-    http://yahoo.com
     http://rubyforge.org
     http://ruby-lang.org
-    http://kcrw.org
-    http://drawohara.com
-    http://codeforpeople.com
+    http://hypem.com
   )
 
+curl = lambda{|url| open(url){|socket| socket.read}}
 
 time 'without threadify' do
-  uris.each do |uri|
-    body = open(uri){|pipe| pipe.read}
-  end
+  uris.each{|uri| curl[uri]}
 end
 
 
 time 'with threadify' do
-  uris.threadify do |uri|
-    body = open(uri){|pipe| pipe.read}
-  end
+  uris.threadify(uris.size){|uri| curl[uri]}
 end
 
-
 BEGIN {
   def time label
     a = Time.now.to_f

data/sample/b.rb

@@ -1,9 +1,9 @@
-require 'yaml'
-
-require 'rubygems'
 require 'threadify'
 
-size = Integer(ARGV.shift || (2 ** 15))
+require 'yaml'
+
+#size = Integer(ARGV.shift || (2 ** 20))
+size = 64
 
 haystack = Array.new(size){|i| i}
 needle = 2 * (size / 3) 
@@ -11,11 +11,19 @@ needle = 2 * (size / 3)
 a, b = 4, 2
 
 time 'without threadify' do
-  a = haystack.each{|value| break value if value == needle}
+  a =
+    haystack.each do |value|
+      break value if value == needle
+      sleep(rand) # mimic work
+    end
 end
 
 time 'with threadify' do
-  b = haystack.threadify(16){|value| threadify! value if value == needle}
+  b = 
+    haystack.threadify(:each_slice, size / 8) do |slice|
+      slice.each{|value| threadify! value if value == needle}
+      sleep(rand) # mimic work
+    end
 end
 
 raise if a != b

data/threadify.gemspec

@@ -1,26 +1,26 @@
-### gemspec: threadify-1.0.0
+## threadify.gemspec
+#
 
-  Gem::Specification::new do |spec|
-    spec.name = "threadify"
-    spec.version = "1.0.0"
-    spec.platform = Gem::Platform::RUBY
-    spec.summary = "threadify"
+Gem::Specification::new do |spec|
+  spec.name = "threadify"
+  spec.version = "1.1.0"
+  spec.platform = Gem::Platform::RUBY
+  spec.summary = "threadify"
 
-    spec.files = ["gemspec.rb", "install.rb", "lib", "lib/threadify.rb", "README", "README.rb", "sample", "sample/a.rb", "sample/b.rb", "threadify.gemspec"]
-    spec.executables = []
-    
-    spec.require_path = "lib"
+  spec.files = ["lib", "lib/threadify.rb", "rakefile", "README", "README.erb", "sample", "sample/a.rb", "sample/b.rb", "threadify.gemspec"]
+  spec.executables = []
+  
+  spec.require_path = "lib"
 
-    spec.has_rdoc = true
-    spec.test_files = nil
-    #spec.add_dependency 'lib', '>= version'
-    #spec.add_dependency 'fattr'
+  spec.has_rdoc = true
+  spec.test_files = nil
+  #spec.add_dependency 'lib', '>= version'
+  #spec.add_dependency 'fattr'
 
-    spec.extensions.push(*[])
-
-    spec.rubyforge_project = 'codeforpeople'
-    spec.author = "Ara T. Howard"
-    spec.email = "ara.t.howard@gmail.com"
-    spec.homepage = "http://github.com/ahoward/threadify/tree/master"
-  end
+  spec.extensions.push(*[])
 
+  spec.rubyforge_project = "codeforpeople"
+  spec.author = "Ara T. Howard"
+  spec.email = "ara.t.howard@gmail.com"
+  spec.homepage = "http://github.com/ahoward/threadify/tree/master"
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: threadify
 version: !ruby/object:Gem::Version 
-  version: 1.0.0
+  version: 1.1.0
 platform: ruby
 authors: 
 - Ara T. Howard
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2009-06-02 00:00:00 -06:00
+date: 2009-06-09 00:00:00 -06:00
 default_executable: 
 dependencies: []
 
@@ -22,12 +22,11 @@ extensions: []
 extra_rdoc_files: []
 
 files: 
-- gemspec.rb
-- install.rb
 - lib
 - lib/threadify.rb
+- rakefile
 - README
-- README.rb
+- README.erb
 - sample
 - sample/a.rb
 - sample/b.rb

data/README.rb

@@ -1,83 +0,0 @@
-#! /usr/bin/env ruby
-
-template = <<-__
-  NAME
-    threadify.rb
-
-  SYNOPSIS
-    enumerable = %w( a b c d )
-    enumerable.threadify(2){ 'process this block using two worker threads' }
-
-  DESCRIPTION
-    threadify.rb makes it stupid easy to process a bunch of data using 'n'
-    worker threads
-
-  INSTALL
-    gem install threadify
-
-  URI
-    http://rubyforge.org/projects/codeforpeople
-
-  SAMPLES
-    <%= samples %>
-
-  HISTORY
-    1.0.0
-      - adjust threadify to yield objects exactly like Enumerable#each
-
-    0.0.3
-      - added ability to short-circuit the parallel processing, a.k.a to 'break'
-        from threadify
-
-    0.0.2
-      - don't use thread.exit, just let the thread die naturally
-      - add version to Threadify module
-      - comments ;-)
-__
-
-
-require 'erb'
-require 'pathname'
-
-$VERBOSE=nil
-
-def indent(s, n = 2)
-  s = unindent(s)
-  ws = ' ' * n
-  s.gsub(%r/^/, ws)
-end
-
-def unindent(s)
-  indent = nil
-  s.each do |line|
-    next if line =~ %r/^\s*$/
-    indent = line[%r/^\s*/] and break
-  end
-  indent ? s.gsub(%r/^#{ indent }/, "") : s
-end
-
-samples = ''
-prompt = '~ > '
-
-Dir.chdir(File.dirname(__FILE__))
-
-Dir['sample*/*'].sort.each do |sample|
-  samples << "\n" << "  <========< #{ sample } >========>" << "\n\n"
-
-  cmd = "cat #{ sample }" 
-  samples << indent(prompt + cmd, 2) << "\n\n" 
-  samples << indent(`#{ cmd }`, 4) << "\n" 
-
-  cmd = "ruby #{ sample }" 
-  samples << indent(prompt + cmd, 2) << "\n\n" 
-
-  cmd = "ruby -e'STDOUT.sync=true; exec %(ruby -Ilib #{ sample })'" 
-  #cmd = "ruby -Ilib #{ sample }" 
-  samples << indent(`#{ cmd } 2>&1`, 4) << "\n" 
-end
-
-erb = ERB.new(unindent(template))
-result = erb.result(binding)
-#open('README', 'w'){|fd| fd.write result}
-#puts unindent(result)
-puts result

data/gemspec.rb

@@ -1,62 +0,0 @@
-#! /usr/bin/env ruby
-
-lib, version, *ignored = ARGV
-
-unless lib
-  lib = File.basename(Dir.pwd)
-end
-
-unless version
-  mod = lib.capitalize
-  require "./lib/#{ lib }"
-  version = eval(mod).send(:version)
-end
-
-abort('no lib') unless lib
-abort('no version') unless version
-
-puts "### gemspec: #{ lib }-#{ version }"
-
-$VERBOSE = nil
-
-shiteless = lambda{|list| list.delete_if{|file| file =~ %r/\.(git|svn|tmp|sw.|bak)$/}}
-
-files       = shiteless[Dir::glob("**/**")]
-executables = shiteless[Dir::glob("bin/*")].map{|exe| File.basename(exe)}
-has_rdoc    = true #File.exist?('doc')
-test_files  = "test/#{ lib }.rb" if File.file?("test/#{ lib }.rb")
-
-extensions = []
-%w( Makefile configure extconf.rb rakefile Rakefile mkrf_conf ).each do |ext|
-  extensions << ext if File.exists?(ext)
-end
-
-template = <<-__
-
-  Gem::Specification::new do |spec|
-    spec.name = #{ lib.inspect }
-    spec.version = #{ version.inspect }
-    spec.platform = Gem::Platform::RUBY
-    spec.summary = #{ lib.inspect }
-
-    spec.files = #{ files.inspect }
-    spec.executables = #{ executables.inspect }
-    
-    spec.require_path = "lib"
-
-    spec.has_rdoc = #{ has_rdoc.inspect }
-    spec.test_files = #{ test_files.inspect }
-    #spec.add_dependency 'lib', '>= version'
-    #spec.add_dependency 'fattr'
-
-    spec.extensions.push(*#{ extensions.inspect })
-
-    spec.rubyforge_project = 'codeforpeople'
-    spec.author = "Ara T. Howard"
-    spec.email = "ara.t.howard@gmail.com"
-    spec.homepage = "http://github.com/ahoward/#{ lib }/tree/master"
-  end
-
-__
-
-puts template

data/install.rb

@@ -1,214 +0,0 @@
-#!/usr/bin/env ruby
-require 'rbconfig'
-require 'find'
-require 'ftools'
-require 'tempfile'
-include Config
-
-LIBDIR      = "lib"
-LIBDIR_MODE = 0644
-
-BINDIR      = "bin"
-BINDIR_MODE = 0755
-
-
-$srcdir            = CONFIG["srcdir"]
-$version           = CONFIG["MAJOR"]+"."+CONFIG["MINOR"]
-$libdir            = File.join(CONFIG["libdir"], "ruby", $version)
-$archdir           = File.join($libdir, CONFIG["arch"])
-$site_libdir       = $:.find {|x| x =~ /site_ruby$/}
-$bindir            = CONFIG["bindir"] || CONFIG['BINDIR']
-$ruby_install_name = CONFIG['ruby_install_name'] || CONFIG['RUBY_INSTALL_NAME'] || 'ruby'
-$ruby_ext          = CONFIG['EXEEXT'] || ''
-$ruby              = File.join($bindir, ($ruby_install_name + $ruby_ext))
-
-if !$site_libdir
-  $site_libdir = File.join($libdir, "site_ruby")
-elsif $site_libdir !~ %r/#{Regexp.quote($version)}/
-  $site_libdir = File.join($site_libdir, $version)
-end
-
-def install_rb(srcdir=nil, destdir=nil, mode=nil, bin=nil)
-#{{{
-  path   = []
-  dir    = []
-  Find.find(srcdir) do |f|
-    next unless FileTest.file?(f)
-    next if (f = f[srcdir.length+1..-1]) == nil
-    next if (/CVS$/ =~ File.dirname(f))
-    next if (/\.svn/ =~ File.dirname(f))
-    next if f =~ %r/\.lnk/
-    next if f =~ %r/\.svn/
-    next if f =~ %r/\.swp/
-    next if f =~ %r/\.svn/
-    path.push f
-    dir |= [File.dirname(f)]
-  end
-  for f in dir
-    next if f == "."
-    next if f == "CVS"
-    File::makedirs(File.join(destdir, f))
-  end
-  for f in path
-    next if (/\~$/ =~ f)
-    next if (/^\./ =~ File.basename(f))
-    unless bin
-      File::install(File.join(srcdir, f), File.join(destdir, f), mode, true)
-    else
-      from = File.join(srcdir, f)
-      to = File.join(destdir, f)
-      shebangify(from) do |sf|
-        $deferr.print from, " -> ", File::catname(from, to), "\n"
-        $deferr.printf "chmod %04o %s\n", mode, to 
-        File::install(sf, to, mode, false)
-      end
-    end
-  end
-#}}}
-end
-def shebangify f
-#{{{
-  open(f) do |fd|
-    buf = fd.read 42 
-    if buf =~ %r/^\s*#\s*!.*ruby/o
-      ftmp = Tempfile::new("#{ $$ }_#{ File::basename(f) }")
-      begin
-        fd.rewind
-        ftmp.puts "#!#{ $ruby  }"
-        while((buf = fd.read(8192)))
-          ftmp.write buf
-        end
-        ftmp.close
-        yield ftmp.path
-      ensure
-        ftmp.close!
-      end
-    else
-      yield f
-    end
-  end
-#}}}
-end
-def ARGV.switch
-#{{{
-  return nil if self.empty?
-  arg = self.shift
-  return nil if arg == '--'
-  if arg =~ /^-(.)(.*)/
-    return arg if $1 == '-'
-    raise 'unknown switch "-"' if $2.index('-')
-    self.unshift "-#{$2}" if $2.size > 0
-    "-#{$1}"
-  else
-    self.unshift arg
-    nil
-  end
-#}}}
-end
-def ARGV.req_arg
-#{{{
-  self.shift || raise('missing argument')
-#}}}
-end
-def linkify d, linked = []
-#--{{{
-  if test ?d, d
-    versioned = Dir[ File::join(d, "*-[0-9].[0-9].[0-9].rb") ]
-    versioned.each do |v| 
-      src, dst = v, v.gsub(%r/\-[\d\.]+\.rb$/, '.rb')
-      lnk = nil
-      begin
-        if test ?l, dst
-          lnk = "#{ dst }.lnk"
-          puts "#{ dst } -> #{ lnk }"
-          File::rename dst, lnk
-        end
-        unless test ?e, dst
-          puts "#{ src } -> #{ dst }"
-          File::copy src, dst 
-          linked << dst
-        end
-      ensure
-        if lnk
-          at_exit do
-            puts "#{ lnk } -> #{ dst }"
-            File::rename lnk, dst
-          end
-        end
-      end
-    end
-  end
-  linked
-#--}}}
-end
-
-
-#
-# main program
-#
-
-libdir = $site_libdir
-bindir = $bindir
-no_linkify = false
-linked = nil
-help = false
-
-usage = <<-usage
-  #{ File::basename $0 }
-    -d, --destdir    <destdir>
-    -l, --libdir     <libdir>
-    -b, --bindir     <bindir>
-    -r, --ruby       <ruby>
-    -n, --no_linkify
-    -s, --sudo
-    -h, --help
-usage
-
-begin
-  while switch = ARGV.switch
-    case switch
-    when '-d', '--destdir'
-      libdir = ARGV.req_arg
-    when '-l', '--libdir'
-      libdir = ARGV.req_arg
-    when '-b', '--bindir'
-      bindir = ARGV.req_arg
-    when '-r', '--ruby'
-      $ruby = ARGV.req_arg
-    when '-n', '--no_linkify'
-      no_linkify = true
-    when '-s', '--sudo'
-      sudo = 'sudo' 
-    when '-h', '--help'
-      help = true
-    else
-      raise "unknown switch #{switch.dump}"
-    end
-  end
-rescue
-  STDERR.puts $!.to_s
-  STDERR.puts usage
-  exit 1
-end    
-
-if help
-  STDOUT.puts usage
-  exit
-end
-
-system "#{ sudo } #{ $ruby } pre-install.rb" if test(?s, 'pre-install.rb')
-
-unless no_linkify
-  linked = linkify('lib') + linkify('bin')
-end
-
-system "#{ $ruby } extconf.rb && make && #{ sudo } make install" if test(?s, 'extconf.rb')
-
-install_rb(LIBDIR, libdir, LIBDIR_MODE)
-install_rb(BINDIR, bindir, BINDIR_MODE, bin=true)
-
-if linked
-  linked.each{|path| File::rm_f path}
-end
-
-system "#{ sudo } #{ $ruby } post-install.rb" if test(?s, 'post-install.rb')