RubyGems - clutil - Versions diffs - 2011.138.0 → 2014.304.0 - Mend

clutil 2011.138.0 → 2014.304.0

Files changed (24) hide show

metadata +47 -71
data/cl/util/clqsend.rb +0 -86
data/cl/util/console.rb +0 -60
data/cl/util/cvs.maint.rb +0 -41
data/cl/util/decide.rb +0 -69
data/cl/util/dirsize.rb +0 -144
data/cl/util/doc/License +0 -14
data/cl/util/doc/Readme +0 -22
data/cl/util/file.rb +0 -312
data/cl/util/install.rb +0 -117
data/cl/util/install.util.rb +0 -67
data/cl/util/net.rb +0 -35
data/cl/util/progress.rb +0 -104
data/cl/util/smtp.rb +0 -170
data/cl/util/string.rb +0 -73
data/cl/util/test/dirsizetest.rb +0 -137
data/cl/util/test/filetest.rb +0 -244
data/cl/util/test/installtest.rb +0 -11
data/cl/util/test/progresstest.rb +0 -43
data/cl/util/test/stringtest.rb +0 -58
data/cl/util/test/wintest.rb +0 -106
data/cl/util/test.rb +0 -90
data/cl/util/time.rb +0 -35
data/cl/util/win.rb +0 -350

data/cl/util/smtp.rb DELETED Viewed

@@ -1,170 +0,0 @@
-# $Id: smtp.rb,v 1.4 2008/12/09 06:58:56 chrismo Exp $
-=begin
---------------------------------------------------------------------------
-Copyright (c) 2001-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 'net/smtp'
-require 'time'
-module ClUtil
-  class Attachment
-    def self.load_from_file(filename)
-      data = nil
-      File.open(filename, 'rb') do |f|
-        data = f.read()
-      end
-      data = [data].pack("m*")
-      Attachment.new(File.basename(filename), data)
-    end
-    attr_reader :name, :data
-    def initialize(name, data)
-      @name = name
-      @data = data
-    end
-  end
-  class Smtp
-    attr_reader :attachments
-    attr_accessor :from, :subj, :body, :extra_headers, :username, :password, :auth_type, :enable_starttls, :port
-    def initialize(smtpsrv='localhost', port=25)
-      @smtpsrv = smtpsrv
-      @port = port
-      @attachments = []
-      @username = nil
-      @password = nil
-      @auth_type = :login
-      @enable_starttls = false
-    end
-    def to
-      @to
-    end
-    def to=(value)
-      @to = [value].flatten
-    end
-    def sendmail
-      msg = build_message
-      @smtp = Net::SMTP.new(@smtpsrv, @port)
-      start_tls_if_needed
-      @smtp.start('localhost.localdomain', @username, @password, @auth_type) do |smtp|
-        smtp.sendmail(msg, @from, @to)
-      end
-    end
-    def start_tls_if_needed
-      return if !@enable_starttls
-      # require 'rubygems'
-      # gem 'smtp_tls'
-      # require 'smtp_tls'
-      @smtp.enable_starttls
-    end
-    def content_type
-      @body =~ /<html>/ ? "text/html" : "text/plain"
-    end
-    def build_message
-      msg = format_headers
-      boundary = create_boundary
-      if !@attachments.empty?
-        msg << [
-          "Content-Type: multipart/mixed; boundary=\"#{boundary}\"\n",
-          "\n",
-          "This is a multi-part message in MIME format.\n",
-          "\n"
-        ]
-      end
-      if @body
-        msg << [ "--#{boundary}\n" ] if !@attachments.empty?
-        msg << [
-          "Content-Type: #{content_type}; charset=\"iso-8859-1\"\n",
-          "Content-Transfer-Encoding: 8bit\n",
-          "\n",
-          "#{@body}\n",
-          "\n"
-        ]
-      end
-      @attachments.each do |attachment|
-        basename = attachment.name
-        msg << [
-          "--#{boundary}\n",
-          "Content-Type: application/octet-stream; name=\"#{basename}\"\n",
-          "Content-Transfer-Encoding: base64\n",
-          "Content-Disposition: attachment; filename=\"#{basename}\"\n",
-          "\n",
-          "#{attachment.data}",  # no \n needed
-          "\n"
-        ]
-      end
-      msg << ["--#{boundary}--\n"] if !@attachments.empty?
-      msg.flatten!
-    end
-    def create_boundary()
-      return "_____clabs_smtp_boundary______#{Time.new.to_i.to_s}___"
-    end
-    def format_headers
-      headers = ["Subject: #{subj}", "From: #{from}", "To: #{to.join(";")}", "Date: #{Time.now.rfc2822}", "MIME-Version: 1.0" ]
-      headers << @extra_headers if @extra_headers
-      headers.flatten!
-      headers.collect! { |hdr| hdr.strip << "\n" }
-      [headers].flatten
-    end
-  end
-end
-# deprecated - use ClUtil::Smtp instead. The attachments argument is designed
-# to be either a single filename or an array of filenames.
-def sendmail(to, from, subj, body, smtpsrv=nil, attachments=nil, extra_headers=nil)
-  smtpsrv = 'localhost' if !smtpsrv
-  smtp = ClUtil::Smtp.new(smtpsrv)
-  smtp.to = to
-  smtp.from = from
-  smtp.subj = subj
-  smtp.body = body
-  smtp.extra_headers = extra_headers
-  attachments = [attachments].flatten
-  attachments.compact!
-  attachments.each do |attachment_fn|
-    smtp.attachments << ClUtil::Attachment.load_from_file(attachment_fn)
-  end
-  smtp.sendmail
-end

data/cl/util/string.rb DELETED Viewed

@@ -1,73 +0,0 @@
-# $Id: string.rb,v 1.2 2003/06/27 17:46:03 chrismo Exp $
-=begin
-----------------------------------------------------------------------------
-Copyright (c) 2001 - 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.
-----------------------------------------------------------------------------
-(based on BSD Open Source License)
-=end
-class String
-  def get_indent
-    scan(/^(\s*)/).flatten[0].to_s
-  end
-  def rbpath
-    self.gsub(/\\/, '/')
-  end
-  def winpath
-    self.gsub(/\//, "\\")
-  end
-end
-def indent(s, amt)
-  a = s.split("\n", -1)
-  if amt >= 0
-    a.collect! do |ln|
-      if !ln.empty?
-        (' ' * amt) + ln
-      else
-        ln
-      end
-    end
-  else
-    a.collect! do |ln|
-      (1..amt.abs).each do ln = ln[1..-1] if ln[0..0] == ' ' end
-      ln
-    end
-  end
-  a.join("\n")
-end
-def here_ltrim(s, add_indent_amt=0)
-  a = s.split("\n", -1)
-  trim_indent_amt = a[0].get_indent.length
-  indent(s, add_indent_amt - trim_indent_amt)
-end

data/cl/util/test/dirsizetest.rb DELETED Viewed

@@ -1,137 +0,0 @@
-=begin
---------------------------------------------------------------------------
-Copyright (c) 2001, 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__) + '/../test'
-require File.dirname(__FILE__) + '/../dirsize'
-require 'test/unit'
-TestData = Struct.new("TestData",
-  :clusterSize,
-  :expectedFileSize,
-  :expectedDiskSpace,
-  :expectedFileSizeIncludeSubs,
-  :expectedDiskSpaceIncludeSubs,
-  :expectedFileCount,
-  :expectedAvgFileSize,
-  :expectedFileCountIncludeSubs,
-  :expectedAvgFileSizeIncludeSubs
-)
-class TestDirSize < TempDirTest
-  def setup
-    super
-    @test_data = TestData.new
-  end
-  def test_larger_singleton
-    make_sample_text_file('', 5000)
-    @test_data.clusterSize = 4096
-    @test_data.expectedFileSize = 5000
-    @test_data.expectedDiskSpace = (4096 * 2)
-    @test_data.expectedFileSizeIncludeSubs = 5000
-    @test_data.expectedDiskSpaceIncludeSubs = (4096 * 2)
-    @test_data.expectedFileCount = 1
-    @test_data.expectedAvgFileSize = 5000
-    @test_data.expectedFileCountIncludeSubs = 1
-    @test_data.expectedAvgFileSizeIncludeSubs = 5000
-    do_test_dir_size(@test_data)
-  end
-  def do_test_dir_size(test_data)
-    dir_size = DirSize.new
-    dir_size.directory = @temp_dir
-    dir_size.clusterSize = test_data.clusterSize
-    dir_size.getSize
-    assert_equal(test_data.expectedFileSize, dir_size.fileSize(false))
-    assert_equal(test_data.expectedDiskSpace, dir_size.diskSpace(false))
-    assert_equal(test_data.expectedFileSizeIncludeSubs, dir_size.fileSize(true))
-    assert_equal(test_data.expectedDiskSpaceIncludeSubs,
-      dir_size.diskSpace(true))
-    assert_equal(test_data.expectedDiskSpace - test_data.expectedFileSize,
-      dir_size.unusedDiskSpace(false))
-    assert_equal(
-      (test_data.expectedDiskSpaceIncludeSubs -
-        test_data.expectedFileSizeIncludeSubs), dir_size.unusedDiskSpace(true))
-    assert_equal(test_data.expectedFileCount, dir_size.fileCount(false))
-    assert_equal(test_data.expectedAvgFileSize, dir_size.avgFileSize(false))
-    assert_equal(test_data.expectedFileCountIncludeSubs,
-      dir_size.fileCount(true))
-    assert_equal(test_data.expectedAvgFileSizeIncludeSubs,
-      dir_size.avgFileSize(true))
-  end
-  def test_small_singleton
-    make_sample_text_file('', 1000)
-    @test_data.clusterSize = 4096
-    @test_data.expectedFileSize = 1000
-    @test_data.expectedDiskSpace = (4096 * 1)
-    @test_data.expectedFileSizeIncludeSubs = 1000
-    @test_data.expectedDiskSpaceIncludeSubs = (4096 * 1)
-    @test_data.expectedFileCount = 1
-    @test_data.expectedAvgFileSize = 1000
-    @test_data.expectedFileCountIncludeSubs = 1
-    @test_data.expectedAvgFileSizeIncludeSubs = 1000
-    do_test_dir_size(@test_data)
-  end
-  def test_sub_dir
-    make_sub_dir('suba')
-    make_sub_dir("suba\\suba1")
-    make_sample_text_file('', 1000)
-    make_sample_text_file('suba', 1000)
-    make_sample_text_file("suba\\suba1", 1000)
-    make_sample_text_file("suba\\suba1", 2000)
-    @test_data.clusterSize = 4096
-    @test_data.expectedFileSize = 1000
-    @test_data.expectedDiskSpace = (4096 * 1)
-    @test_data.expectedFileSizeIncludeSubs = 5000
-    @test_data.expectedDiskSpaceIncludeSubs = (4096 * 4)
-    @test_data.expectedFileCount = 1
-    @test_data.expectedAvgFileSize = 1000
-    @test_data.expectedFileCountIncludeSubs = 4
-    @test_data.expectedAvgFileSizeIncludeSubs = 1250
-    do_test_dir_size(@test_data)
-  end
-  def test_empty_dir
-    @test_data.clusterSize = 4096
-    @test_data.expectedFileSize = 0
-    @test_data.expectedDiskSpace = 0
-    @test_data.expectedFileCount = 0
-    @test_data.expectedAvgFileSize = 0
-    @test_data.expectedFileCountIncludeSubs = 0
-    @test_data.expectedAvgFileSizeIncludeSubs = 0
-    @test_data.expectedFileSizeIncludeSubs = 0
-    @test_data.expectedDiskSpaceIncludeSubs = 0
-    do_test_dir_size(@test_data)
-  end
-end

data/cl/util/test/filetest.rb DELETED Viewed

@@ -1,244 +0,0 @@
-# $Id: filetest.rb,v 1.3 2002/08/28 16:49:33 chrismo Exp $
-=begin
---------------------------------------------------------------------------
-Copyright (c) 2001, 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)
-=end
-require File.dirname(__FILE__) + '/../file'
-require File.dirname(__FILE__) + '/../test'
-require 'test/unit'
-# don't inherit from clutiltest.rb.TempDirTest, it uses things that are tested here
-class TestUtilFile < Test::Unit::TestCase
-  READ_WRITE = 0644
-  READ_ONLY = 0444
-  def create_test_file(file_name, content, mtime=Time.now, attr=READ_WRITE)
-    f = File.new(file_name, 'w+')
-    f.puts(content)
-    f.flush
-    f.close
-    File.utime(mtime, mtime, file_name)
-    File.chmod(attr, file_name)
-  end
-  def setup
-    @files = []
-  end
-  def teardown
-    @files.each { | filename | File.delete_all(filename) if File.exists?(filename) }
-    @dirs.reverse_each { | dirname | Dir.delete(dirname) if File.exists?(dirname) } if @dirs
-  end
-  def do_test_del_tree(attr)
-    @dirs = ['/tmp/utilfiletest',
-             '/tmp/utilfiletest/subA',
-             '/tmp/utilfiletest/subA/subA1',
-             '/tmp/utilfiletest/subA/subA2',
-             '/tmp/utilfiletest/subB',
-             '/tmp/utilfiletest/subB/subB1',
-             '/tmp/utilfiletest/subB/subB1/subB1a']
-    @dirs.each { | dir_name | FileUtils::makedirs(dir_name) }
-    @files = ['/tmp/utilfiletest/subA/blah.txt',
-              '/tmp/utilfiletest/subA/subA1/blah.txt',
-              '/tmp/utilfiletest/subA/subA2/blah.txt',
-              '/tmp/utilfiletest/subB/blah.txt',
-              '/tmp/utilfiletest/subB/subB1/blah.txt',
-              '/tmp/utilfiletest/subB/subB1/subB1a/blah.txt']
-    @files.each { | filename | create_test_file(filename, 'test content', Time.now, attr) }
-    ClUtilFile.delTree(@dirs[0])
-    @files.each { | file_name | assert(!File.exists?(file_name)) }
-    @dirs.each { | dir_name | assert(!File.exists?(dir_name)) }
-  end
-  def test_del_tree
-    do_test_del_tree(READ_WRITE)
-  end
-  def test_del_tree_ro_files
-    do_test_del_tree(READ_ONLY)
-  end
-  def test_del_tree_file_name_match
-    @dirs = ['/tmp/utilfiletest',
-             '/tmp/utilfiletest/subA',
-             '/tmp/utilfiletest/subB']
-    @dirs.each { | dir_name | FileUtils::makedirs(dir_name) }
-    @files_to_stay = ['/tmp/utilfiletest/subA/blah.doc',
-                    '/tmp/utilfiletest/subB/blah.doc']
-    @files_to_delete = ['/tmp/utilfiletest/subA/blah.txt',
-                      '/tmp/utilfiletest/subB/blah.txt']
-    @files << @files_to_stay
-    @files << @files_to_delete
-    @files.flatten!
-    @files_to_stay.each { | filename | create_test_file(filename, 'test content') }
-    @files_to_delete.each { | filename | create_test_file(filename, 'test content') }
-    ClUtilFile.delTree(@dirs[0], '*.txt')
-    @files_to_stay.each { | file_name | assert(File.exists?(file_name)) }
-    @files_to_delete.each { | file_name | assert(!File.exists?(file_name)) }
-    ClUtilFile.delTree(@dirs[0])
-    @files_to_stay.each { | file_name | assert(!File.exists?(file_name)) }
-    @files_to_delete.each { | file_name | assert(!File.exists?(file_name)) }
-    @dirs.each { | dir_name | assert(!File.exists?(dir_name)) }
-  end
-  def test_del_tree_aging
-    @dirs = ['/tmp/utilfiletest',
-             '/tmp/utilfiletest/subA',
-             '/tmp/utilfiletest/subB']
-    @dirs.each { | dir_name | FileUtils::makedirs(dir_name) }
-    @files_to_stay = ['/tmp/utilfiletest/subA/blah0.txt',
-                    '/tmp/utilfiletest/subB/blah1.txt']
-    @files_to_delete = ['/tmp/utilfiletest/subA/blah2.txt',
-                      '/tmp/utilfiletest/subB/blah3.txt']
-    @files << @files_to_stay
-    @files << @files_to_delete
-    @files.flatten!
-    @files_to_stay.each { | filename | create_test_file(filename, 'test content') }
-    day = 60 * 60 * 24
-    eight_days = day * 8
-    seven_days = day * 7
-    @files_to_delete.each { | filename | create_test_file(filename, 'test content', Time.now - eight_days) }
-    ClUtilFile.delTree(@dirs[0]) { | file_name |
-      (File.mtime(file_name) < (Time.now - seven_days))
-    }
-    @files_to_stay.each { | file_name | assert(File.exists?(file_name)) }
-    @files_to_delete.each { | file_name | assert(!File.exists?(file_name)) }
-    ClUtilFile.delTree(@dirs[0])
-    @files_to_stay.each { | file_name | assert(!File.exists?(file_name)) }
-    @files_to_delete.each { | file_name | assert(!File.exists?(file_name)) }
-    @dirs.each { | dir_name | assert(!File.exists?(dir_name)) }
-  end
-  def test_dir_files
-    @dirs = ['/tmp/utilfiletest',
-             '/tmp/utilfiletest/subA',
-             '/tmp/utilfiletest/subA/subA1',
-             '/tmp/utilfiletest/subA/subA2',
-             '/tmp/utilfiletest/subB',
-             '/tmp/utilfiletest/subB/subB1',
-             '/tmp/utilfiletest/subB/subB1/subB1a']
-    @dirs.each { | dir_name | FileUtils::makedirs(dir_name) }
-    @files = ['/tmp/utilfiletest/subA/blah.txt',
-              '/tmp/utilfiletest/subA/subA1/blah.txt',
-              '/tmp/utilfiletest/subA/subA2/blah.txt',
-              '/tmp/utilfiletest/subB/blah.txt',
-              '/tmp/utilfiletest/subB/subB1/blah.txt',
-              '/tmp/utilfiletest/subB/subB1/subB1a/blah.txt']
-    @files.each { | filename | create_test_file(filename, 'test content') }
-    #puts 'Dir.entries'
-    #puts Dir.entries('/tmp/utilfiletest/subA/subA1/')
-    #puts 'Dir.files'
-    #puts Dir.files('/tmp/utilfiletest/subA/subA1/')
-    assert_equal(["blah.txt"], Dir.files('/tmp/utilfiletest/subA/subA1/'))
-  end
-  def test_file_extension
-    assert_equal('rb', File.extension('/test/file.rb'))
-    assert_equal(nil, File.extension('/test/file'))
-    assert_equal('rb', File.extension('/test/file.of.some.such.rb'))
-  end
-end
-class TestBackup < TempDirTest
-  def setup
-    super
-    @a_dir = make_sub_dir('a')
-    @b_dir = make_sub_dir('b')
-  end
-  def test_backed_up_because_not_exists
-    src = make_sample_text_file('a')
-    dst = File.join(@b_dir, File.basename(src))
-    assert_equal(true, File.backup(src, dst))
-    assert_equal(true, File.exists?(dst))
-  end
-  def test_not_backed_up_because_exists
-    src = make_sample_text_file('a')
-    dst = File.join(@b_dir, File.basename(src))
-    assert_equal(true, File.backup(src, dst))
-    assert_equal(false, File.backup(src, dst))
-  end
-  def test_backed_up_because_exists_different_mtime
-    src = make_sample_text_file('a')
-    dst = File.join(@b_dir, File.basename(src))
-    assert_equal(true, File.backup(src, dst))
-    File.utime(0, 0, dst)
-    assert_equal(true, File.backup(src, dst))
-  end
-  def test_backed_up_because_exists_different_size
-    src = make_sample_text_file('a')
-    dst = File.join(@b_dir, File.basename(src))
-    assert_equal(true, File.backup(src, dst))
-    File.open(dst, 'a+') do |f| f.print "bigger" end
-    assert_equal(true, File.backup(src, dst))
-  end
-  def test_not_backed_up_because_exists_byte_diff_but_no_bincompare
-    src = make_sample_text_file('a')
-    dst = File.join(@b_dir, File.basename(src))
-    assert_equal(true, File.backup(src, dst))
-    guts = File.read(dst)
-    guts.reverse!
-    File.open(dst, 'w+') do |f| f.print guts end
-    File.utime(File.atime(src), File.mtime(src), dst)
-    assert_equal(false, File.backup(src, dst))
-  end
-  def test_backed_up_because_exists_byte_diff_and_bincompare
-    src = make_sample_text_file('a')
-    dst = File.join(@b_dir, File.basename(src))
-    assert_equal(true, File.backup(src, dst))
-    guts = File.read(dst)
-    guts.reverse!
-    File.open(dst, 'w+') do |f| f.print guts end
-    File.utime(File.atime(src), File.mtime(src), dst)
-    assert_equal(true, File.backup(src, dst, true))
-  end
-end

data/cl/util/test/installtest.rb DELETED Viewed

@@ -1,11 +0,0 @@
-require File.expand_path(File.dirname(__FILE__) + '/../install')
-require 'test/unit'
-class TestInstall < Test::Unit::TestCase
-  def test_set_prefix
-    install = CLabs::Install.new
-    conf = install.get_conf({'prefix' => '/tmp/ruby'})
-    assert_equal('/tmp/ruby', conf['prefix'])
-    assert_equal('/tmp/ruby/lib/ruby/site_ruby', conf['sitedir'])
-  end
-end

data/cl/util/test/progresstest.rb DELETED Viewed

@@ -1,43 +0,0 @@
-# $Id: progresstest.rb,v 1.2 2003/09/12 14:53:53 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
-$LOAD_PATH << '..'
-require 'progress'
-p = Progress.new(10)
-p.start
-(0..9).each do |x| puts p.progress(true); sleep 0.5 end
-p = Progress.new(10)
-p.start
-(0..9).each do |x| print p.in_place_pct(true); sleep 0.5 end