clutil 2011.138.0 → 2014.304.0

data/cl/util/file.rb

@@ -1,312 +0,0 @@
-# $Id: file.rb,v 1.9 2010/04/26 02:11:27 chrismo Exp $
-=begin
---------------------------------------------------------------------------
-Copyright (c) 2001 - 2002, Chris Morris
-All rights reserved.
-
-Redistribution and use in source and binary forms, with or without modification,
-are permitted provided that the following conditions are met:
-
-1. Redistributions of source code must retain the above copyright notice, this
-list of conditions and the following disclaimer.
-
-2. Redistributions in binary form must reproduce the above copyright notice,
-this list of conditions and the following disclaimer in the documentation and/or
-other materials provided with the distribution.
-
-3. Neither the names Chris Morris, cLabs nor the names of contributors to this
-software may be used to endorse or promote products derived from this software
-without specific prior written permission.
-
-THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS IS''
-AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE
-FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
-DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
-SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
-CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
-TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
-THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
---------------------------------------------------------------------------------
-(based on BSD Open Source License)
-
-code in copyTree includes code from rubycookbook.org under the following license:
---------------------------------------------------------------------------------
-Copyright (c) Phil Tomson, Brian Takita
-
-All rights reserved.
-
-Permission is hereby granted, free of charge, to any person obtaining a copy of
-this software and associated documentation files (the "Software"), to deal in
-the Software without restriction, including without limitation the rights to
-use, copy, modify, merge, publish, distribute, and/or sell copies of the
-Software, and to permit persons to whom the Software is furnished to do so,
-provided that the above copyright notice(s) and this permission notice appear in
-all copies of the Software and that both the above copyright notice(s) and this
-permission notice appear in supporting documentation.
-
-THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS
-FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF THIRD PARTY RIGHTS. IN NO EVENT
-SHALL THE COPYRIGHT HOLDER OR HOLDERS INCLUDED IN THIS NOTICE BE LIABLE FOR ANY
-CLAIM, OR ANY SPECIAL INDIRECT OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES
-WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF
-CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
-WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
-
-Except as contained in this notice, the name of a copyright holder shall not be
-used in advertising or otherwise to promote the sale, use or other dealings in
-this Software without prior written authorization of the copyright holder.
---------------------------------------------------------------------------------
-(X11 license)
-=end
-
-require 'fileutils'
-
-class Dir
-  def Dir.empty?(dirname)
-    Dir.entries(dirname).length == 2
-  end
-
-  def Dir.files(dirname)
-    # Dir[dirname + '*'] does the same, except it includes the directory name
-    result = []
-    Dir.entries(dirname).each do |entry|
-      result << entry if File.stat(File.join(dirname, entry)).file?
-    end
-    result
-  end
-end
-
-class << File
-  def extension(filename)
-    res = filename.scan(/\.[^.]*$/)[0].to_s
-    res.gsub!(/\./, '')
-    res = nil if res.empty?
-    res
-  end
-  
-  def delete_all(*files)
-    files.flatten!
-    files.each do |file|
-      # make writable to allow deletion
-      File.chmod(0644, file)
-      File.delete(file)
-    end
-  end
-
-  # returns false if up-to-date check passed and the file was not copied.
-  # returns true if up-to-date check failed and the file was copied.
-  def backup(src, dst, bincompare=false)
-    installed = false
-    if (
-         File.exists?(dst) &&
-         (
-           (File.stat(src).mtime != File.stat(dst).mtime) ||
-           (File.stat(src).size != File.stat(dst).size)
-         )
-       ) || !File.exists?(dst) || bincompare
-      FileUtils.install src, dst, :verbose => true
-      installed = true
-    end
-    
-    if !File.stat(dst).writable?
-      File.chmod(0644, dst) 
-      set_ro = true
-    else
-      set_ro = false
-    end
-    match_mtime(src, dst)
-    File.chmod(0444, dst) if set_ro
-    return installed
-  end
-
-  # XP's utime appears to still have a bug when the file's time is within Daylight Saving Time, but
-  # the current system time is outside Daylight Saving Time. This method will ensure any difference
-  # is compensated for.
-  def match_mtime(src, dst)
-    new_atime = Time.now
-    File.utime(new_atime, File.mtime(src), dst)
-    if File.mtime(src) != File.mtime(dst)
-      new_mtime = File.mtime(src)
-      new_mtime += (File.mtime(src) - File.mtime(dst))
-      File.utime(new_atime, new_mtime, dst)
-    end
-  end
-
-  # human readable size
-  def h_size(filename)
-    size = File.size(filename)
-    return '0B' if size == 0
-    units = %w{B KB MB GB TB}
-    e = (Math.log(size) / Math.log(1024)).floor
-    s = "%.0f" % (size.to_f / 1024**e)
-    s.sub(/\.?0*$/, units[e])
-  end
-end
-
-class ClUtilFile
-  def ClUtilFile.delTree(rootDirName, pattern='*')
-    if (rootDirName == '/') or (rootDirName.empty?)
-      raise 'Cannot delete root or empty?'
-    end
-
-    if !File.exists?(rootDirName)
-      raise 'rootDirName does not exist'
-    end
-
-    # puts all sub-dirs and filenames in array.
-    # Sub-dirs will be breadth first search.
-    dirsAndFiles = Dir["#{rootDirName}/**/" + pattern]
-
-    # delete all files first
-    dirsAndFiles.each do | dirOrFileName |
-      if FileTest.file?(dirOrFileName)
-        if block_given?
-          File.delete_all(dirOrFileName) if yield dirOrFileName
-        else
-          File.delete_all(dirOrFileName)
-        end
-      end
-    end
-
-    # go through array backward to delete dirs in proper order
-    dirsAndFiles.reverse_each do | dirOrFileName |
-      if FileTest.directory?(dirOrFileName)
-        Dir.delete(dirOrFileName) if Dir.empty?(dirOrFileName)
-      end
-    end
-
-    Dir.delete(rootDirName) if Dir.empty?(rootDirName)
-  end
-
-=begin
-  1.8 FileUtils has cp_r in it ...
-
-  def ClUtilFile.copyTree(fromDir, toDir, pattern='*')
-    ##################################################################
-    # cp_r  - recursive copy
-    # usage: cp_r(from,to,file_param,permissions)
-    ##################################################################
-    def cp_r(from,to,file_param=".*",permissions = 0644)
-      Dir.mkdir(to) unless FileTest.exists?(to)
-      Dir.chdir(to)
-
-      dirContents = Dir["#{from}/*"]
-      dirContents.each { |entry|
-        file = File.basename(entry)
-
-        if FileTest.directory?(entry)
-          Dir.mkdir(file) unless FileTest.exists?(file)
-          cp_r(entry,file,file_param)
-          Dir.chdir("..") #get back to the dir we were working on
-        else
-          if file =~ file_param
-              begin
-                p = permissions
-                if FileTest.executable?(entry)
-                   p = 0744 #make it executable
-                end
-                File.install(entry,file,p)
-              rescue
-                  puts "could not copy #{entry} to #{file}"
-              end
-            end
-        end
-      }
-    end #cp_r
-    #example usage
-    #cp_r("/usr/local","my_tmp",".*\.html?")
-
-  end
-=end
-end
-
-
-class Dir
-  # Dir.mktmpdir creates a temporary directory.
-  #
-  # [Copied from Ruby 1.9]
-  #
-  # The directory is created with 0700 permission.
-  #
-  # The prefix and suffix of the name of the directory is specified by
-  # the optional first argument, <i>prefix_suffix</i>.
-  # - If it is not specified or nil, "d" is used as the prefix and no suffix is used.
-  # - If it is a string, it is used as the prefix and no suffix is used.
-  # - If it is an array, first element is used as the prefix and second element is used as a suffix.
-  #
-  #  Dir.mktmpdir {|dir| dir is ".../d..." }
-  #  Dir.mktmpdir("foo") {|dir| dir is ".../foo..." }
-  #  Dir.mktmpdir(["foo", "bar"]) {|dir| dir is ".../foo...bar" }
-  #
-  # The directory is created under Dir.tmpdir or
-  # the optional second argument <i>tmpdir</i> if non-nil value is given.
-  #
-  #  Dir.mktmpdir {|dir| dir is "#{Dir.tmpdir}/d..." }
-  #  Dir.mktmpdir(nil, "/var/tmp") {|dir| dir is "/var/tmp/d..." }
-  #
-  # If a block is given,
-  # it is yielded with the path of the directory.
-  # The directory and its contents are removed
-  # using FileUtils.remove_entry_secure before Dir.mktmpdir returns.
-  # The value of the block is returned.
-  #
-  #  Dir.mktmpdir {|dir|
-  #    # use the directory...
-  #    open("#{dir}/foo", "w") { ... }
-  #  }
-  #
-  # If a block is not given,
-  # The path of the directory is returned.
-  # In this case, Dir.mktmpdir doesn't remove the directory.
-  #
-  #  dir = Dir.mktmpdir
-  #  begin
-  #    # use the directory...
-  #    open("#{dir}/foo", "w") { ... }
-  #  ensure
-  #    # remove the directory.
-  #    FileUtils.remove_entry_secure dir
-  #  end
-  #
-  def Dir.mktmpdir(prefix_suffix=nil, tmpdir=nil)
-    case prefix_suffix
-    when nil
-      prefix = "d"
-      suffix = ""
-    when String
-      prefix = prefix_suffix
-      suffix = ""
-    when Array
-      prefix = prefix_suffix[0]
-      suffix = prefix_suffix[1]
-    else
-      raise ArgumentError, "unexpected prefix_suffix: #{prefix_suffix.inspect}"
-    end
-    tmpdir ||= Dir.tmpdir
-    t = Time.now.strftime("%Y%m%d")
-    n = nil
-    begin
-      path = "#{tmpdir}/#{prefix}#{t}-#{$$}-#{rand(0x100000000).to_s(36)}"
-      path << "-#{n}" if n
-      path << suffix
-      Dir.mkdir(path, 0700)
-    rescue Errno::EEXIST
-      n ||= 0
-      n += 1
-      retry
-    end
-
-    if block_given?
-      begin
-        yield path
-      ensure
-        FileUtils.remove_entry_secure path
-      end
-    else
-      path
-    end
-  end
-end

data/cl/util/install.rb

@@ -1,117 +0,0 @@
-# $Id: install.rb,v 1.7 2002/09/09 03:04:38 chrismo Exp $
-=begin
---------------------------------------------------------------------------
-Copyright (c) 2002-2010, Chris Morris
-All rights reserved.
-
-Redistribution and use in source and binary forms, with or without modification,
-are permitted provided that the following conditions are met:
-
-1. Redistributions of source code must retain the above copyright notice, this
-list of conditions and the following disclaimer.
-
-2. Redistributions in binary form must reproduce the above copyright notice,
-this list of conditions and the following disclaimer in the documentation and/or
-other materials provided with the distribution.
-
-3. Neither the names Chris Morris, cLabs nor the names of contributors to this
-software may be used to endorse or promote products derived from this software
-without specific prior written permission.
-
-THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS IS''
-AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE
-FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
-DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
-SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
-CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
-TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
-THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
---------------------------------------------------------------------------------
-=end
-
-require 'rbconfig'
-require 'find'
-require 'fileutils'
-require "#{File.dirname(__FILE__)}/console"
-
-module CLabs
-  class Install
-    include Config
-
-    attr_reader :version, :libdir, :bindir, :sitedir, :siteverdir, :archdir
-
-    def initialize
-      init
-    end
-
-    # altered copy of rbconfig.rb -> Config::expand
-    def custom_expand(val, conf)
-      val.gsub!(/\$\(([^()]+)\)/) do |var|
-        key = $1
-        if CONFIG.key? key
-          custom_expand(conf[key], conf)
-        else
-          var
-        end
-      end
-      val
-    end
-
-    def get_conf(customizations)
-      conf = {}
-      MAKEFILE_CONFIG.each { |k, v| conf[k] = v.dup }
-      customizations.each do |k, v|
-        conf[k] = v
-      end
-      conf.each_value do |val|
-        custom_expand(val, conf)
-      end
-      conf
-    end
-
-    def init
-      prefixdir = get_switch('-p')
-      customizations = {}
-      customizations['prefix'] = prefixdir if prefixdir
-      conf = get_conf(customizations)
-
-      @version = conf["MAJOR"]+"."+conf["MINOR"]
-      @libdir = File.join(conf["libdir"], "ruby", @version)
-
-      @bindir =  conf["bindir"]
-      @sitedir = conf["sitedir"] || File.join(@libdir, "site_ruby")
-      @siteverdir = File.join(@sitedir, @version)
-      @archdir = File.join(@libdir, "i586-mswin32")
-    end
-
-    def install_executables(files)
-      tmpfn = "cl_tmp"
-      files.each do |aFile, dest|
-        File.open(aFile) do |ip|
-          File.open(tmpfn, "w") do |op|
-            ruby = File.join($bindir, "ruby")
-            op.puts "#!#{ruby}"
-            op.write ip.read
-          end
-        end
-
-        File::makedirs(dest)
-        # 0755 I assume means read/write/execute, not needed for Windows
-        File::chmod(0755, dest, true)
-        File::install(tmpfn, File.join(dest, File.basename(aFile)), 0755, true)
-        File::unlink(tmpfn)
-      end
-    end
-
-    def install_lib(files)
-      files.each do |aFile, dest|
-        File::makedirs(dest)
-        File::install(aFile, File.join(dest, File.basename(aFile)), 0644, true)
-      end
-    end
-  end
-end
-
-

data/cl/util/install.util.rb

@@ -1,67 +0,0 @@
-# $Id: install.util.rb,v 1.8 2003/06/27 17:46:03 chrismo Exp $
-=begin
---------------------------------------------------------------------------
-Copyright (c) 2002, Chris Morris
-All rights reserved.
-
-Redistribution and use in source and binary forms, with or without modification,
-are permitted provided that the following conditions are met:
-
-1. Redistributions of source code must retain the above copyright notice, this
-list of conditions and the following disclaimer.
-
-2. Redistributions in binary form must reproduce the above copyright notice,
-this list of conditions and the following disclaimer in the documentation and/or
-other materials provided with the distribution.
-
-3. Neither the names Chris Morris, cLabs nor the names of contributors to this
-software may be used to endorse or promote products derived from this software
-without specific prior written permission.
-
-THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS IS''
-AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE
-FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
-DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
-SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
-CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
-TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
-THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
---------------------------------------------------------------------------------
-=end
-
-require "#{File.dirname(__FILE__)}/install"
-init
-
-$cldir = File.join($siteverdir, "cl")
-$clutildir = File.join($cldir, "util")
-$clutiltestdir = File.join($clutildir, "test")
-
-$libfiles = { 'util.rb'    => $cldir ,
-
-              "file.rb"    => $clutildir ,
-              "win.rb"     => $clutildir ,
-              "dirsize.rb" => $clutildir ,
-              "test.rb" => $clutildir ,
-              "time.rb" => $clutildir ,
-              "console.rb" => $clutildir ,
-              "progress.rb" => $clutildir ,
-              "install.rb" => $clutildir ,
-              "smtp.rb"    => $clutildir ,
-              "string.rb"  => $clutildir ,
-              "version.rb" => $clutildir ,
-              "clqsend.rb"   => $bindir ,
-
-              "./test/dirsizetest.rb" => $clutiltestdir,
-              "./test/filetest.rb" => $clutiltestdir ,
-              "./test/installtest.rb" => $clutiltestdir ,
-              "./test/progresstest.rb" => $clutiltestdir,
-              "./test/stringtest.rb" => $clutiltestdir,
-              "./test/versiontest.rb" => $clutiltestdir,
-              "./test/wintest.rb" => $clutiltestdir
-            }
-
-if __FILE__ == $0
-  install_lib($libfiles)
-end

data/cl/util/net.rb

@@ -1,35 +0,0 @@
-module ClUtilNet
-  def ping(host)
-    (`ping -n 1 #{host}` =~ "Request timed out") == nil
-  end
-end
-
-class NetUse
-  def initialize(unc, user='', password='')
-    @unc = unc
-    @user = user
-    @password = password
-  end
-
-  def attached?
-
-  end
-
-  def attach(drive='')
-
-  end
-
-  def detach
-    
-  end
-end
-
-if __FILE__ == $0
-  include ClUtilNet
-  
-  puts "Pinging 66.169.210.208"
-  puts ping("66.169.210.208")
-  
-  puts "Pinging localhost"
-  puts ping("localhost")
-end

data/cl/util/progress.rb

@@ -1,104 +0,0 @@
-# $Id: progress.rb,v 1.2 2003/09/12 14:53:50 chrismo Exp $
-=begin
---------------------------------------------------------------------------
-Copyright (c) 2002, Chris Morris
-All rights reserved.
-
-Redistribution and use in source and binary forms, with or without modification,
-are permitted provided that the following conditions are met:
-
-1. Redistributions of source code must retain the above copyright notice, this
-list of conditions and the following disclaimer.
-
-2. Redistributions in binary form must reproduce the above copyright notice,
-this list of conditions and the following disclaimer in the documentation and/or
-other materials provided with the distribution.
-
-3. Neither the names Chris Morris, cLabs nor the names of contributors to this
-software may be used to endorse or promote products derived from this software
-without specific prior written permission.
-
-THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS IS''
-AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE
-FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
-DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
-SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
-CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
-TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
-THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
---------------------------------------------------------------------------------
-=end
-
-class Progress
-  def initialize(total)
-    @total = total
-    @current = 0
-  end
-
-  def start
-    @start = Time.now
-    @in_place_called_already = false
-  end
-
-  def step
-    @current += 1
-  end
-
-  def elapsed
-    (Time.now - @start)
-  end
-
-  def format_seconds(seconds)
-    minutes, seconds = seconds.divmod 60
-    hours, minutes = minutes.divmod 60
-    sprintf("%02d:%02d:%02d", hours, minutes, seconds)
-  end
-
-  def elapsedf
-    format_seconds(elapsed)
-  end
-
-  def done
-    @current
-  end
-
-  def remaining
-    @total - @current
-  end
-
-  def est_remaining_time
-    ((elapsed / done) * remaining)
-  end
-
-  def est_remaining_timef
-    format_seconds(est_remaining_time)
-  end
-
-  def progress(doStep=false)
-    step if doStep
-    "#{@current.to_s}/#{@total.to_s} done. Elapsed: #{elapsedf} Est Remain: #{est_remaining_timef}"
-  end
-
-
-  def pct_done
-    if @total > 0
-      pct = ((done.to_f / @total.to_f) * 100).to_i
-    else
-      pct = 0
-    end
-
-    pct.to_s.rjust(3) + '%'
-  end
-
-  def in_place_pct(doStep=false)
-    step if doStep
-    rubout = 8.chr
-    out = ''
-    out << (rubout * 4) if @in_place_called_already
-    out << pct_done
-    @in_place_called_already = true
-    out
-  end
-end