facets 2.9.0 → 2.9.1

data/lib/standard/facets/fileutils/stage.rb

@@ -0,0 +1,66 @@
+require 'fileutils'
+
+module FileUtils
+  module_function
+
+  # Stage by hard linking included files to a stage directory.
+  #
+  # stage_directory   -  Where to stage the files
+  # source_directory  -  Where to find files to stage
+  # files             -  Files to link in stage relative to source
+  #
+  # TODO: Rename to #link_stage or something less likely to name clash?
+  # TODO: Add options for :verbose, :noop and :dryrun ?
+  #
+  def stage(stage_directory, source_directory, files, options={})
+    return stage_directory if options[:noop] || options[:dryrun]
+
+    stage_directory, source_directory = stage_directory.to_s, source_directory.to_s
+    ## ensure existance of staging area
+    rm_r(stage_directory) if File.directory?(stage_directory)
+    mkdir_p(stage_directory)
+    ## link files into staging area
+    files.each do |f|
+      src  = File.join(source_directory, f)
+      file = File.join(stage_directory, f)
+      if File.directory?(src)
+        mkdir_p(file) unless File.exist?(file)
+      else
+        fdir = File.dirname(file)
+        mkdir_p(fdir) unless File.exist?(fdir)
+        unless File.exist?(file) and File.mtime(file) >= File.mtime(src)
+          ln(src, file) #safe_ln ?
+        end
+      end
+    end
+    return stage_directory
+  end
+
+  # Make public (for all submodules too).
+  public :stage
+
+  module NoWrite
+    module_function
+    def stage(stage_directory, files, options={})
+      options[:noop] = true
+      FileUtils.stage(stage_directory, files, options={})
+    end
+  end
+
+  module Verbose
+    module_function
+    def stage(stage_directory, files, options={})
+      options[:verbose] = true
+      FileUtils.stage(stage_directory, files, options={})
+    end
+  end
+
+  module DryRun
+    module_function
+    def stage(stage_directory, files, options={})
+      options[:dryrun] = true
+      FileUtils.stage(stage_directory, files, options={})
+    end
+  end
+
+end

data/lib/{more → standard}/facets/fileutils/which.rb

@@ -9,6 +9,8 @@ module FileUtils
     Win32Exts = %w{.exe .com .bat .cmd}
   end
 
+  module_function
+
   # Looks for the first occurrence of _program_ within _path_.
   #
   # On the MS Windows platform, it looks for executables ending with .exe,

data/lib/{more → standard}/facets/math.rb

@@ -1,6 +1,6 @@
 dir, base = *File.split(__FILE__)
 base = base.chomp('.rb')
-Dir[File.join(dir, base, '*')].each do |lib|
+Dir[File.join(dir, base, '*.rb')].each do |lib|
   require "facets/#{base}/#{File.basename(lib)}"
 end
 

data/lib/{more → standard}/facets/math/approx_equal.rb

@@ -5,7 +5,7 @@ module Math
 
   # Approximately equal.
   #
-  # TODO: Use core extension Numeric#approx? instead.
+  # TODO: Use core extension Numeric#approx? instead (?)
   def self.approx_equal(a, b, epsilon=EPSILON)
 	  c = a - b
 	  c *= -1.0 if c < 0

data/lib/{more → standard}/facets/math/delta.rb

@@ -1,6 +1,7 @@
 module Math
 
-  # Kronecker symbol of +i+ and +j+ - 1 if +i+ and +j+ are equal, 0 otherwise.
+  # Kronecker symbol of +i+ and +j+.
+  # Returns 1 if +i+ and +j+ are equal, 0 otherwise.
   def self.delta(i, j)
     return Integer(i) == Integer(j) ? 1 : 0
   end

data/lib/standard/facets/net/http.rb

@@ -0,0 +1,32 @@
+require 'net/http'
+
+module Net
+
+  # CREDIT: Daniel Huckstep
+  def self.download(url, limit=10)
+    raise ArgumentError, 'HTTP redirect too deep' if limit == 0
+    #url = URI.parse(url)
+    #req = Net::HTTP::Get.new(url.path)
+    #req['User-Agent'] = "Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.0.7) Gecko/2009030422 Ubuntu/8.10 (intrepid) Firefox/3.0.7"
+    #resp = Net::HTTP.new(url.host, url.port).start { |http| http.request(req) }
+    resp = Net::HTTP.get_response(URI.parse(url))
+    case resp
+    when Net::HTTPSuccess     then resp
+    when Net::HTTPRedirection then download(resp['location'], limit - 1)
+    else resp.error!
+    end
+  end
+
+  # CREDIT: Daniel Huckstep
+  def self.download_and_save(url, path=nil)
+    if path.nil?
+      path = File.expand_path(url.split('/').last)
+    else
+      path = File.expand_path(path)
+    end
+    raise ArgumentError.new('Save path is a directory') if File.directory?(path)
+    resp = download(url)
+    open(path,'w') { |file| file.write(resp.body) } if resp.is_a?(Net::HTTPSuccess)
+  end
+end
+

data/lib/{more → standard}/facets/pathname.rb

@@ -22,6 +22,7 @@
 
 require 'pathname'
 require 'facets/file/rootname'
+require 'facets/fileutils/outofdate'
 
 class Pathname
 

data/lib/{more → standard}/facets/random.rb

@@ -1,4 +1,4 @@
-require 'facets/hash/zipnew'
+require 'facets/hash/zip'
 require 'facets/string/shatter'
 require 'facets/kernel/maybe'
 
@@ -314,7 +314,7 @@ class Random
     #   h.shuffle  #~> {:b=>2, :c=>1, :a>3}
     #
     def shuffle
-      ::Hash.zipnew( keys.sort_by{Random.number}, values.sort_by{Random.number} )
+      ::Hash.zip( keys.sort_by{Random.number}, values.sort_by{Random.number} )
     end
 
     # Destructive shuffle_hash. Arrange the values in

data/lib/standard/facets/rbconfig.rb

@@ -0,0 +1,78 @@
+# An extended rendition of the Ruby's standard RbConfig module.
+module RbConfig
+
+  #
+  def self.inspect
+    CONFIG.inspect
+  end
+
+  # Methodized lookup of config.
+  def self.method_missing(s,*a,&b)
+    s = s.to_s
+    if CONFIG.key?(s)
+      CONFIG[s]
+    elsif CONFIG.key?(s.upcase)
+      CONFIG[s.upcase]
+    else
+      super(s,*a,&b)
+    end
+  end
+
+  # TODO: parse configure_args into methods too?
+
+  # In case rubygems has already defined it.
+  unless method_defined?(:datadir)
+    # Return the path to the data directory associated with the
+    # given library/package name. Normally this is just
+    #
+    #   "#{Config::CONFIG['datadir']}/#{name}"
+    #
+    # but may be modified by tools like RubyGems to handle
+    # versioned data directories.
+    def self.datadir(package_name)
+      File.join(CONFIG['datadir'], package_name)
+    end
+  end
+
+  #
+  def self.host_os
+    CONFIG['host_os']
+  end
+
+  def linux?
+    host_os =~ /linux|cygwin/
+  end
+
+  def mac?
+    host_os =~ /mac|darwin/
+  end
+
+  def bsd?
+    host_os =~ /bsd/
+  end
+
+  def windows?
+    host_os =~ /mswin|mingw/
+  end
+
+  def solaris?
+    host_os =~ /solaris|sunos/
+  end
+
+  # TODO: who knows what symbian returns?
+  def symbian?
+    host_os =~ /symbian/
+  end
+
+  #
+  def posix?
+    linux? or mac? or bsd? or solaris? or begin 
+      fork do end
+      true
+    rescue NotImplementedError, NoMethodError
+      false
+    end
+  end
+
+end
+

data/lib/{more → standard}/facets/shellwords.rb

@@ -25,6 +25,8 @@ module Shellwords
   # 1. Use platform condition?
   # 2. Use separate dos_xxx methods?
   # 3. Put in separate PowerShellwords module?
+  #
+  # CREDIT: Lavir the Whiolet
   def dos_escape(cmdline)
     '"' + cmdline.gsub(/\\(?=\\*\")/, "\\\\\\").gsub(/\"/, "\\\"").gsub(/\\$/, "\\\\\\").gsub("%", "%%") + '"'
   end

data/lib/standard/facets/strscan.rb

@@ -0,0 +1,16 @@
+require 'strscan'
+
+class StringScanner
+
+  # scans string until +pattern+ is encountered. If +pattern+ will not be
+  # encountered then it returns _nil_ but if +scan_anyway+ is _true_ then
+  # it scans until the end of the string.
+  def scan_before(pattern, scan_anyway = false)
+    if not check_until(pattern) and not scan_anyway then return nil; end
+    result = ""
+    result << getch until check(pattern) or eos?
+    return result
+  end
+
+end
+

data/lib/{more → supplemental}/facets/platform.rb

@@ -1,9 +1,12 @@
-# Original version from RubyGems, Copyright (c) 2007 Eric Hodel
+require 'facets/rbconfig'
 
-require 'rbconfig'
+unless defined?(RUBY_ENGINE)
+  RUBY_ENGINE = 'ruby'
+end
 
 # Platform class
 #
+# Original version from RubyGems, Copyright (c) 2007 Eric Hodel
 class Platform
 
   # A pure-ruby gem that may use Gem::Specification#extensions to build
@@ -197,15 +200,20 @@ class Platform
     self === other
   end
 
-  # Byte order of CPU.
+  # B Y T E  O R D E R
+
+  # Byte order of CPU. Determine byte order of underlying machine.
+  #
+  # Examines the byte order of the underlying machine. Returns <code>:big</code>
+  # if Big Endian and <code>:little</code> if Little Endian.
   #
   # TODO: This doesn't work well apearently. We need to use a chart for possible
   # cpus instead, maybe.
   def byte_order
     if [0x12345678].pack("L") == "\x12\x34\x56\x78"
-      BigEndian
+      :big
     else
-      LittleEndian
+      :little
     end
   end
 
@@ -222,5 +230,148 @@ class Platform
     byte_order == :big
   end
 
+  # R U B Y  E N G I N E
+
+  # Return the name of the ruby interpreter.
+  def interpreter
+    @interpreter ||= (
+      if RUBY_PLATFORM == 'parrot'
+        'cardinal'
+      elsif RUBY_ENGINE == 'ruby'
+        if RUBY_DESCRIPTION =~ /Enterprise/i
+          'ree'
+        else
+          'mri'
+        end
+      else
+        RUBY_ENGINE.to_s # jruby, rbx, ironruby, macruby, etc.
+      end
+    )
+  end
+
+  def mri?
+    'mri' === interpreter
+  end
+  alias official_ruby? mri?
+  alias ruby? mri?
+
+  def jruby?
+    'jruby' === interpreter
+  end
+  alias java? jruby?
+
+  def rubinius?
+    'rbx' === interpreter
+  end
+  alias rbx? rubinius?
+
+  def ree?
+    'ree' === interpreter
+  end
+  alias enterprise? ree?
+
+  def ironruby?
+    'ironruby' === interpreter
+  end
+  alias iron_ruby? ironruby?
+
+  def cardinal?
+    'cardinal' === interpreter
+  end
+  alias parrot? cardinal?
+  alias perl? cardinal?
+
+
+  # O P E R A T I N G  S Y S T E M
+
+  def host_os
+    RbConfig::CONFIG['host_os']
+  end
+
+  def linux?
+    host_os =~ /linux|cygwin/
+  end
+
+  def mac?
+    host_os =~ /mac|darwin/
+  end
+
+  def bsd?
+    host_os =~ /bsd/
+  end
+
+  def windows?
+    host_os =~ /mswin|mingw/
+  end
+
+  def solaris?
+    host_os =~ /solaris|sunos/
+  end
+
+  # TODO: who knows what symbian returns?
+  def symbian?
+    host_os =~ /symbian/
+  end
+
+  #
+  def posix?
+    linux? or mac? or bsd? or solaris? or begin 
+      fork do end
+      true
+    rescue NotImplementedError, NoMethodError
+      false
+    end
+  end
+
 end
 
+
+# Current CPU's Byte Order
+#BYTE_ORDER = RbConfig.byte_order
+
+# Current CPU
+#CPU = RbConfig.platform.cpu
+
+# Current Operating System
+#OS  = RbConfig.platform.os
+
+# Current Operating System Version
+#OS_VERSION = RbConfig.platform.version
+
+
+=begin
+  # platform
+  def current_platform
+    arch = Config::CONFIG['arch']
+    #cpu, os = arch.split '-', 2
+    return match_platform(arch)
+  end
+
+  #
+  def match_platform(arch)
+    cpu, os = arch.split '-', 2
+    cpu, os = nil, cpu if os.nil? # java
+
+    cpu = case cpu
+          when /i\d86/ then 'x86'
+          else cpu
+          end
+
+    os  = case os
+          when /cygwin/ then            [ 'cygwin',  nil ]
+          when /darwin(\d+)?/ then      [ 'darwin',  $1  ]
+          when /freebsd(\d+)/ then      [ 'freebsd', $1  ]
+          when /^java$/ then            [ 'java',    nil ]
+          when /^java([\d.]*)/ then     [ 'java',    $1  ]
+          when /linux/ then             [ 'linux',   $1  ]
+          when /mingw32/ then           [ 'mingw32', nil ]
+          when /mswin32/ then           [ 'mswin32', nil ]
+          when /openbsd(\d+\.\d+)/ then [ 'openbsd', $1  ]
+          when /solaris(\d+\.\d+)/ then [ 'solaris', $1  ]
+          else                          [ 'unknown', nil ]
+          end
+
+    [cpu, os].flatten.compact.join("-")
+  end
+=end
+