alib 0.4.0 → 0.5.0

data/lib/alib.rb

@@ -3,9 +3,7 @@
 #
 module ALib
 #--{{{
-  VERSION = '0.4.0'
-
-  def self.version() VERSION end
+  VERSION = '0.5.0'
 
   require 'pathname'
   require 'socket'
@@ -21,14 +19,19 @@ module ALib
   require 'fcntl'
   require 'uri'
   require 'net/http'
+  require 'thread'
 
-
-# TODO - bundle open4!!
+  class ::Object
+    Alib = ALib
+    def alib() ALib end
+  end
 
   LIBDIR = 'alib-%s/' % VERSION
 
-  AUTOLOAD = {
+  require LIBDIR + 'classmethods'
+  require LIBDIR + 'stdext'
 
+  AUTOLOAD = {
     'Util'             => 'util',
 
     'Logging'          => 'logging',
@@ -54,51 +57,25 @@ module ALib
     'AbstractMain'     => 'main',
     'SimpleMain'       => 'main',
     'ConfigurableMain' => 'main',
-
   }
 
   AUTOLOAD.each{|const, basename| autoload const.to_s, LIBDIR + basename.to_s}
 
-  METACLASS = 
+  SINGLETON_CLASS = 
     class << self
       self
     end
 
-  AUTOLOAD.each{ |const, m| METACLASS.module_eval{ define_method(m){ ALib.send 'const_get', const}}}
-
-  begin
-    require 'open4'
-  rescue LoadError
-    require LIBDIR + 'open4'
-  end
+  AUTOLOAD.each{ |const, m| SINGLETON_CLASS.module_eval{define_method(m){ALib.send 'const_get', const}} unless Alib.respond_to? m}
 
-  class << self
-#--{{{
-    def load basename 
-#--{{{
-      require LIBDIR + basename.to_s
-#--}}}
-    end
-    def simple_main &b
-#--{{{
-      b ? Class::new(ALib::SimpleMain, &b) : ALib::SimpleMain
-#--}}}
-    end
-    alias_method 'main', 'simple_main'
-    alias_method 'smain', 'simple_main'
-    def configurable_main &b
-#--{{{
-      b ? Class::new(ALib::ConfigurableMain, &b) : ALib::ConfigurableMain
-#--}}}
+  %w( open4 attributes prototype binding_of_caller ).each do |lib|
+    begin
+      require lib 
+    rescue LoadError
+      require LIBDIR + lib 
+      $LOADED_FEATURES << File.basename(lib)
     end
-    alias_method 'cmain', 'configurable_main'
-#--}}}
   end
 #--}}}
 end
 
-Alib = ALib
-
-class Object
-  def alib() Alib end
-end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
-rubygems_version: 0.8.11
+rubygems_version: 0.9.0
 specification_version: 1
 name: alib
 version: !ruby/object:Gem::Version 
-  version: 0.4.0
-date: 2006-08-23 00:00:00.000000 -06:00
+  version: 0.5.0
+date: 2007-02-18 00:00:00 -07:00
 summary: alib
 require_paths: 
-  - lib
+- lib
 email: ara.t.howard@noaa.gov
 homepage: http://codeforpeople.com/lib/ruby/alib/
 rubyforge_project: 
@@ -18,43 +18,56 @@ bindir: bin
 has_rdoc: false
 required_ruby_version: !ruby/object:Gem::Version::Requirement 
   requirements: 
-    - 
-      - ">"
-      - !ruby/object:Gem::Version 
-        version: 0.0.0
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
   version: 
 platform: ruby
 signing_key: 
 cert_chain: 
+post_install_message: 
 authors: 
-  - Ara T. Howard
+- Ara T. Howard
 files: 
-  - lib
-  - install.rb
-  - install
-  - gemspec.rb
-  - build
-  - alib-0.4.0.gem
-  - b.rb
-  - a.rb
-  - lib/alib-0.4.0.rb
-  - lib/alib.rb
-  - lib/alib-0.4.0
-  - lib/alib-0.4.0/util.rb
-  - lib/alib-0.4.0/logging.rb
-  - lib/alib-0.4.0/configfile.rb
-  - lib/alib-0.4.0/listfile.rb
-  - lib/alib-0.4.0/autohash.rb
-  - lib/alib-0.4.0/orderedautohash.rb
-  - lib/alib-0.4.0/orderedhash.rb
-  - lib/alib-0.4.0/find2.rb
-  - lib/alib-0.4.0/bsearch.rb
-  - lib/alib-0.4.0/main.rb
-  - lib/alib-0.4.0/open4.rb
+- a.rb
+- gemspec.rb
+- alib-0.5.0.gem
+- install.rb
+- lib
+- lib/alib.rb
+- lib/alib-0.5.0
+- lib/alib-0.5.0/logging.rb
+- lib/alib-0.5.0/bsearch.rb
+- lib/alib-0.5.0/open4-0.9.1.rb
+- lib/alib-0.5.0/stdext.rb
+- lib/alib-0.5.0/attributes.rb
+- lib/alib-0.5.0/util.rb
+- lib/alib-0.5.0/prototype.rb
+- lib/alib-0.5.0/listfile.rb
+- lib/alib-0.5.0/binding_of_caller.rb
+- lib/alib-0.5.0/prototype-0.3.0.rb
+- lib/alib-0.5.0/configfile.rb
+- lib/alib-0.5.0/main.rb.bak
+- lib/alib-0.5.0/attributes-3.2.0.rb
+- lib/alib-0.5.0/open4.rb
+- lib/alib-0.5.0/autohash.rb
+- lib/alib-0.5.0/orderedautohash.rb
+- lib/alib-0.5.0/classmethods.rb
+- lib/alib-0.5.0/main.rb
+- lib/alib-0.5.0/orderedhash.rb
+- lib/alib-0.5.0/find2.rb
+- lib/alib-0.5.0.rb
 test_files: []
+
 rdoc_options: []
+
 extra_rdoc_files: []
+
 executables: []
+
 extensions: []
+
 requirements: []
-dependencies: []
+
+dependencies: []
+

data/b.rb

@@ -1 +0,0 @@
-class C; end

data/install

@@ -1,143 +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"]
-$ruby_install_name = CONFIG['ruby_install_name'] || CONFIG['RUBY_INSTALL_NAME']
-$ruby              = File.join($bindir, $ruby_install_name || 'ruby')
-
-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))
-    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
-
-
-#
-# main program
-#
-
-libdir = $site_libdir
-bindir = $bindir
-
-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
-    else
-      raise "unknown switch #{switch.dump}"
-    end
-  end
-rescue
-  STDERR.puts $!.to_s
-  STDERR.puts File.basename($0) + 
-    " -d <destdir>" +
-    " -l <libdir>" +
-    " -b <bindir>"
-    " -r <ruby>"
-  exit 1
-end    
-
-install_rb(LIBDIR, libdir, LIBDIR_MODE)
-install_rb(BINDIR, bindir, BINDIR_MODE, bin=true)
-

data/lib/alib-0.4.0/open4.rb

@@ -1,175 +0,0 @@
-require 'fcntl'
-
-module Open4
-#--{{{
-  def self.version
-    '0.4.0'
-  end
-
-  def popen4(*cmd)
-#--{{{
-    pw, pr, pe, ps = IO.pipe, IO.pipe, IO.pipe, IO.pipe
-
-    verbose = $VERBOSE
-    begin
-      $VERBOSE = nil
-      ps.last.fcntl(Fcntl::F_SETFD, Fcntl::FD_CLOEXEC)
-
-      cid = fork {
-        pw.last.close
-        STDIN.reopen pw.first
-        pw.first.close
-
-        pr.first.close
-        STDOUT.reopen pr.last
-        pr.last.close
-
-        pe.first.close
-        STDERR.reopen pe.last
-        pe.last.close
-
-        STDOUT.sync = STDERR.sync = true
-
-        begin
-          exec(*cmd)
-          raise "exec failed!"
-        rescue Exception => e
-          Marshal.dump(e, ps.last)
-          ps.last.flush
-        end
-        ps.last.close unless (ps.last.closed?)
-        exit!
-      }
-    ensure
-      $VERBOSE = verbose
-    end
-
-    [pw.first, pr.last, pe.last, ps.last].each{|fd| fd.close}
-
-    begin
-      e = Marshal.load ps.first
-      raise(Exception === e ? e : "unknown failure!")
-    rescue EOFError # If we get an EOF error, then the exec was successful
-      42
-    end
-
-    pw.last.sync = true
-
-    pi = [pw.last, pr.first, pe.first]
-
-    if defined? yield
-      begin
-        yield(cid, *pi)
-        Process.waitpid2(cid).last
-      ensure
-        pi.each{|fd| fd.close unless fd.closed?}
-      end
-    else
-      [cid, pw.last, pr.first, pe.first]
-    end
-#--}}}
-  end
-  alias open4 popen4
-  module_function :popen4
-  module_function :open4
-
-  class Error < ::StandardError; end
-  class SpawnError < Error
-#--{{{
-    attr 'cmd'
-    attr 'status'
-    def exitstatus
-      @status.exitstatus
-    end
-    def initialize cmd, status
-      @cmd, @status = cmd, status
-      super "cmd <#{ cmd }> failed with <#{ exitstatus }>"
-    end
-#--}}}
-  end
-  def spawn cmd, opts = {} 
-#--{{{
-    getopt = lambda do |*args|
-      keys, default, ignored = args
-      catch('opt') do
-        [keys].flatten.each do |key|
-          [key, key.to_s, key.to_s.intern].each do |key|
-            throw 'opt', opts[key] if opts.has_key?(key)
-          end
-        end
-        default
-      end
-    end
-
-    ignore_exit_failure = getopt[ 'ignore_exit_failure', getopt['quiet', false] ]
-    ignore_exec_failure = getopt[ 'ignore_exec_failure', !getopt['raise', true] ]
-    exitstatus = getopt[ %w( exitstatus exit_status status ), 0 ]
-    stdin = getopt[ ['stdin', 'in', '0', 0] ]
-    stdout = getopt[ ['stdout', 'out', '1', 1] ]
-    stderr = getopt[ ['stderr', 'err', '2', 2] ]
-    pid = getopt[ 'pid' ]
-
-    started = false
-
-    status =
-      begin
-        popen4(cmd) do |c, i, o, e|
-          started = true
-
-          if pid.respond_to? '<<'
-            pid << c
-          end
-
-          it = Thread.new(i,stdin) do |i,stdin|
-            if stdin
-              if stdin.respond_to? :each
-                stdin.each{|buf| i << buf}
-              elsif stdin.respond_to? :read
-                i << stdin.read
-              else
-                i << stdin.to_s
-              end
-            end
-            i.close
-          end
-
-          ot = Thread.new(o,stdout){|o,stdout| o.each{|buf| stdout << buf if stdout}}
-          et = Thread.new(e,stderr){|e,stderr| e.each{|buf| stderr << buf if stderr}}
-
-          it.join
-          ot.join if ot
-          et.join if et
-        end
-      rescue
-        raise unless(not started and ignore_exec_failure)
-      end
-
-    raise SpawnError.new(cmd, status) unless
-      (ignore_exit_failure or (status.nil? and ignore_exec_failure) or (status.exitstatus == exitstatus))
-
-    status
-#--}}}
-  end
-  module_function :spawn
-
-  def background cmd, opts = {}
-#--{{{
-    require 'thread'
-    q = Queue.new
-    opts['pid'] = opts[:pid] = q
-    thread = Thread.new(cmd, opts){|cmd, opts| spawn cmd, opts}
-    pid = q.pop
-    sc = class << thread; self; end
-    sc.module_eval {
-      define_method(:pid){ pid }
-      define_method(:spawn_status){ @spawn_status ||= value }
-      define_method(:exitstatus){ spawn_status.exitstatus }
-    }
-    thread
-#--}}}
-  end
-  alias bg background
-  module_function :background
-  module_function :bg
-#--}}}
-end