basketcase 1.0.0 → 1.1.0

data/History.txt

@@ -1,3 +1,8 @@
+=== 1.1.0 / 2008-09-17
+
+* Add 'bc-mirror' script, to support periodically publishing an
+  externally-managed directory into ClearCase.
+
 === 1.0.0 / 2008-09-16
 
 * Converted into a gem, using sow.

data/Manifest.txt

@@ -3,4 +3,5 @@ Manifest.txt
 README.txt
 Rakefile
 bin/basketcase
+bin/bc-mirror
 lib/basketcase.rb

data/README.txt

@@ -1,5 +1,11 @@
 = basketcase
 
+* http://basketcase.rubyforge.org/
+* http://rubyforge.org/projects/basketcase/
+* http://dogbiscuit.org/mdub/
+
+== Description
+
 BasketCase is a (Ruby) script that encapsulates the Rational ClearCase
 command-line interface, <code>cleartool</code>, making it (slightly) more
 comfortable for developers more used to non-locking version-control systems
@@ -77,11 +83,6 @@ way:
 
 Mike wrote BasketCase in frustration.
 
-== See also
-
-* http://rubyforge.org/projects/basketcase/
-* http://dogbiscuit.org/mdub/
-
 == License
 
 (The MIT License)

data/bin/bc-mirror

@@ -0,0 +1,127 @@
+#! /usr/bin/env ruby
+
+# Synchronise a directory with a Clearcase snapshot view.
+#
+# @author Mike Williams
+
+$LOAD_PATH.unshift(File.expand_path(File.dirname(__FILE__) + "/../lib"))
+
+require 'basketcase'
+require 'pathname'
+require 'ftools'
+
+class DirSyncer
+
+  def initialize(src_root, dest_root)
+    @src_root = Pathname(src_root)
+    @dest_root = Pathname(dest_root)
+  end
+
+  def sync
+    visit(@src_root)
+    cleanup(@dest_root)
+  end
+
+  private
+
+  def ignored?(path)
+    path.to_str =~ %r{(^|/).git($|/)}
+  end
+
+  def visit(src_file)
+    return if ignored?(src_file)
+    if src_file.directory?
+      sync_dir(src_file)
+    else
+      sync_file(src_file)
+    end
+  end
+
+  def ensure_we_can_write_to(file)
+    file.chmod(file.stat.mode | 0600) unless file.writable?
+  end
+
+  def sync_dir(src_dir)
+    src_dir.children.sort.each do |f|
+      visit(f)
+    end
+  end
+
+  def sync_file(src_file)
+    file_path = src_file.relative_path_from(@src_root)
+    dest_file = @dest_root + file_path
+    dest_file.parent.mkpath
+    ensure_we_can_write_to(dest_file.parent)
+    if dest_file.exist?
+      if File.read(src_file) == File.read(dest_file)
+        return
+      end
+      ensure_we_can_write_to(dest_file)
+    end
+    puts file_path
+    FileUtils.copy(src_file, dest_file)
+  end
+
+  def cleanup(dest_file)
+    if dest_file.directory?
+      cleanup_dir(dest_file)
+    else
+      cleanup_file(dest_file)
+    end
+  end
+
+  def cleanup_dir(dest_dir)
+    dest_dir.children.sort.each do |f|
+      cleanup(f)
+    end
+    if dest_dir.children.empty?
+      puts "rmdir #{dest_dir.relative_path_from(@dest_root)}"
+      dest_dir.rmdir
+    end
+  end
+
+  def cleanup_file(dest_file)
+    file_path = dest_file.relative_path_from(@dest_root)
+    src_file = @src_root + file_path
+    if !src_file.exist? || ignored?(file_path)
+      ensure_we_can_write_to(dest_file.parent)
+      puts "rm #{file_path}"
+      dest_file.delete
+    end
+  end
+
+end
+
+#---( Mainline )---
+
+def exit_with(status, message)
+  $stderr.puts message; exit(status)
+end
+
+exit_with(3, "usage: #{File.basename($0)} <source> <clearcase_snapshot>") unless ARGV.size == 2
+
+source_dir, cc_snapshot_dir = ARGV
+source_dir = Pathname(source_dir).expand_path
+cc_snapshot_dir = Pathname(cc_snapshot_dir).expand_path
+
+def check_dir(dir)
+  exit_with(5, "ERROR: no such directory? #{dir}") unless dir.exist?
+  exit_with(5, "ERROR: #{dir} is not a directory") unless dir.directory?
+end
+
+check_dir(source_dir)
+check_dir(cc_snapshot_dir)
+
+puts "--- Syncing to CC view"
+DirSyncer.new(source_dir, cc_snapshot_dir).sync
+
+Dir.chdir(cc_snapshot_dir)
+basketcase = Basketcase.new
+
+puts "--- Adding/removing stuff"
+basketcase.do('auto-sync', '-n')
+
+puts "--- Commiting"
+basketcase.do('auto-commit', '-m', "upload from #{source_dir}")
+
+puts "--- Done"

data/lib/basketcase.rb

@@ -3,7 +3,7 @@ require 'forwardable'
 
 class Basketcase
 
-  VERSION = '1.0.0'
+  VERSION = '1.1.0'
 
   @usage = <<EOF
 usage: basketcase <command> [<options>]

metadata

@@ -1,15 +1,36 @@
 --- !ruby/object:Gem::Specification 
 name: basketcase
 version: !ruby/object:Gem::Version 
-  version: 1.0.0
+  version: 1.1.0
 platform: ruby
 authors: 
 - mdub
 autorequire: 
 bindir: bin
-cert_chain: []
+cert_chain: 
+- |
+  -----BEGIN CERTIFICATE-----
+  MIIDNDCCAhygAwIBAgIBADANBgkqhkiG9w0BAQUFADBAMQ0wCwYDVQQDDARtZHVi
+  MRowGAYKCZImiZPyLGQBGRYKZG9nYmlzY3VpdDETMBEGCgmSJomT8ixkARkWA29y
+  ZzAeFw0wODEwMTgxOTEyMjFaFw0wOTEwMTgxOTEyMjFaMEAxDTALBgNVBAMMBG1k
+  dWIxGjAYBgoJkiaJk/IsZAEZFgpkb2diaXNjdWl0MRMwEQYKCZImiZPyLGQBGRYD
+  b3JnMIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAuN6ECjnDnRrS8+e/
+  Ld0qOFQm7pLwSbyqHr0ZFRTZybDUTOw1IHpaKUzEcblOfAI6QhdqiRAhd0/SGHhV
+  kLky24wpdI1mpvdYNB7EUQKp0xlDKD4H2zpI7aOpcaWQD2vtkx2QcaOqzwd7WDHz
+  PqgylAv6RCHFhbUOjDcwkaxce0VYwnCxtAn7UaxdOUoXvMwptKUp9Kn9AxFNklYU
+  4m29nz9n8o1Yat1wSen+eUM6HRbazeK5jiMUIC9lygvdibfxAVeGtQwk3g18WmR8
+  gbROV9ZPCwbIQyxoMvY2ZBTVfAxf6pEYiwr33HlgdTKUHdymJ9FGuRINF5L/Q3DI
+  mDltTwIDAQABozkwNzAJBgNVHRMEAjAAMAsGA1UdDwQEAwIEsDAdBgNVHQ4EFgQU
+  BSFEL+Pfdvqb0bjyd7t4x1++/NgwDQYJKoZIhvcNAQEFBQADggEBAHM3UqaW13Os
+  Q1ME0sLhHFvF4QE7Z6mRmWUwaokJgSLQdy+YDC069AJPBDiSBmg3oJtzVTTrGadV
+  bguWLRGZwjHEBSWGSnJlIoz3jKgVBcYEYhe+snrLYOr0BoF1U64WiVPPEGDdHlbM
+  /tcBD2oDTz7mt52yHGJArq3bceD8UE5ZRZ4GMO5X+oQlSDkI395dcgAgCWhvzppa
+  7tmPDgdNhjWsIS5Ozf1hu4VguwOXYMX2Gez4B3Al/2Jn+2vzSCsmd3RRHUq9RBx5
+  +pTb3lixdToGe6TKuoxCURlQWS5JYyXm8TRVmaZrJcaNKN6bmlLNTfPWv3rMqbTz
+  oYjap0xxejs=
+  -----END CERTIFICATE-----
 
-date: 2008-10-15 00:00:00 +11:00
+date: 2008-10-19 00:00:00 +11:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -22,11 +43,12 @@ dependencies:
       - !ruby/object:Gem::Version 
         version: 1.7.0
     version: 
-description: ""
+description: BasketCase is a (Ruby) script that encapsulates the Rational ClearCase command-line interface, <code>cleartool</code>, making it (slightly) more comfortable for developers more used to non-locking version-control systems such as CVS or Subversion.
 email: 
 - mdub@dogbiscuit.org
 executables: 
 - basketcase
+- bc-mirror
 extensions: []
 
 extra_rdoc_files: 
@@ -39,9 +61,10 @@ files:
 - README.txt
 - Rakefile
 - bin/basketcase
+- bin/bc-mirror
 - lib/basketcase.rb
 has_rdoc: true
-homepage: BasketCase is a (Ruby) script that encapsulates the Rational ClearCase
+homepage: http://basketcase.rubyforge.org/
 post_install_message: 
 rdoc_options: 
 - --main
@@ -66,6 +89,6 @@ rubyforge_project: basketcase
 rubygems_version: 1.2.0
 signing_key: 
 specification_version: 2
-summary: ""
+summary: BasketCase is a (Ruby) script that encapsulates the Rational ClearCase command-line interface, <code>cleartool</code>, making it (slightly) more comfortable for developers more used to non-locking version-control systems such as CVS or Subversion.
 test_files: []
 

metadata.gz.sig

@@ -0,0 +1,3 @@
+�t�7�A�����oa�M�u�O����'p4K
+�a�|���ps�&R���9�;���)96�{Æ�G���3��7��M��x�M�����Ac��Nԧ��G�.���4�@�(R
ʹ�.�rfݿ��#�>���|A%���^�[Spsj�%S��C2t�e�Hq�J� ��zB0�D�MWb1�u�d��Ln�*2� ӆ������8�ے?M9�
+&�M̓F������Əe