svn-walk

#!/usr/bin/ruby -w

require "find"
require "optparse"
require "ostruct"

Options = OpenStruct.new

Options.verbose = 0

OptionParser.new do |opts|
  opts.banner = "Usage: svn-walk [options] [<command>]"

  opts.on("-v", "--[no-]verbose", "Run verbosely") do |v|
    if v
      Options.verbose += 1
    else
      Options.verbose = 0
    end
  end

  opts.on("-w", "--walk PATH", "Path to start walking from.") do |v|
    Options.walk ||= []
    Options.walk << v
  end
end.parse!

Cmd = ARGV

unless Options.walk
  Options.walk = [ "." ]
end

if Options.verbose > 1
  p Options
  p Cmd
end

Find.find(*Options.walk) do |path|
  puts "? "+path if Options.verbose > 1
  next unless FileTest.directory? path
  next unless FileTest.directory? path+"/.svn"

  begin
    if Cmd.empty?
      puts path
      next
    end

    cmd = Cmd.dup
    cmd.push path

    if Options.verbose > 0
      puts "= #{cmd.join " "}"
    end

    system(*cmd)

    unless $?.success?
      $stderr.write "cmd failed with #{$?} - #{cmd.inspect}"
      exit 1
    end
  ensure
    Find.prune
  end
  
end