svn_hooks 0.0.1

data/README

@@ -0,0 +1,3 @@
+README
+========================================================================
+svn_hooks

data/bin/svn_rubyhooks

@@ -0,0 +1,35 @@
+#!/usr/bin/env ruby
+
+require 'erb'
+require 'ftools'
+
+HOOK_TYPES  = %w{post-commit post-lock post-revprop-change post-unlock pre-commit pre-lock pre-revprop-change pre-unlock start-commit}
+HOOK_TEMPLATE = <<-END_TEMPLATE
+#!#{`which ruby`.chomp}
+
+Dir.chdir(File.dirname(__FILE__))
+SVN_EVENT = File.basename(__FILE__)
+
+require 'rubygems'
+require 'svn_hooks'
+END_TEMPLATE
+
+base_path = ARGV[0] || '.'
+
+if(File.directory? File.join(base_path, 'hooks'))
+  # create hook files using HOOK_TEMPLATE
+  path = File.join(base_path, 'hooks')
+  HOOK_TYPES.each do |type|
+    filename = File.join(path, type)
+
+    # move old files out of the way
+    File.rename(filename, filename+'.old') if File.exists?(filename)
+    open(filename, 'w'){|f| f.write(HOOK_TEMPLATE)}
+    File.chmod(0755, filename)
+  end
+  
+  # create path for hook scripts
+  File.makedirs File.join(path, 'scripts')
+else
+  puts 'Usage: ruby install.rb /path/to/svn/repostiory'
+end

data/lib/svn_dsl.rb

@@ -0,0 +1,33 @@
+module SVN
+  module DSL
+
+    def for_path (*searches, &proc)
+      # searches = [search] if !search.kind_of?(Array)
+      searches = searches.map{|search| Regexp.glob(search)}
+      file_paths = EVENT_STATS.files.map{|f| f.path}
+      
+      searches.each do |search|
+        if(file_paths.grep(search).length > 0)
+          return yield(EVENT_STATS) if block_given?
+        end
+      end
+    end
+    
+    alias for_paths for_path
+    
+    def for_action(*searches, &proc)
+      if(searches.include? SVN_EVENT)
+        yield(EVENT_STATS) if block_given?
+      end
+    end
+    
+    alias for_actions for_action
+    
+  end
+end
+
+class Regexp
+  def self.glob(search)
+    Regexp.new('^' + Regexp.escape(search).gsub('\\*', '.*') + '$', true)
+  end
+end

data/lib/svn_file_stat.rb

@@ -0,0 +1,32 @@
+module SVN
+  FLAGS = {
+    'A' => :added,
+    'C' => :conflict,
+    'D' => :deleted,
+    'M' => :modified,
+    'U' => :updated,
+    'R' => :replaced,
+    'G' => :merged
+  }
+  
+  class FileStat
+
+    attr_reader :path, :file_flag, :meta_flag, :lock_flag, :history_flag
+    
+    def self.parse line
+      @file_flag = SVN::FLAGS[line[0,1]]
+      @meta_flag = SVN::FLAGS[line[1,1]]
+      @lock_flag = SVN::FLAGS[line[2,1]] == 'L'
+      @history_flag = SVN::FLAGS[line[3,1]] == '+'
+      @path = line[5,-1]
+    end
+    
+    def to_s
+      @path
+    end
+    
+    def modified?
+      [:merged, :updated, :modified, :replaced].find{|a| a == @file_flag}
+    end
+  end
+end

data/lib/svn_hooks.rb

@@ -0,0 +1,11 @@
+require 'svn_stat'
+require 'svn_dsl'
+
+REPOSITORY_PATH, REVISION_NUMBER = ARGV
+EVENT_STATS = SVN::Stat.new(REPOSITORY_PATH, REVISION_NUMBER)
+
+include SVN::DSL
+
+Dir['./scripts/*.rb'].each do |file|
+  load(file, true)
+end

data/lib/svn_stat.rb

@@ -0,0 +1,46 @@
+require 'svn_file_stat'
+
+module SVN
+  class Stat
+    attr_reader :repository_path, :revision_number, :event
+    
+    def initialize repository_path, revision_number = nil
+      @revision = revision_number
+      @repository_path = repository_path
+      @event = SVN_EVENT
+      
+      @svnlook_path = `which svnlook`.chomp
+    end
+    
+    def author
+      @author ||= svnlook "author"
+    end
+    
+    def message
+      @message ||= svnlook "cat"
+    end
+    
+    def date
+      @date ||= Date.parse(svnlook("date"))
+    end
+    
+    def files
+      unless @files
+        @files = []
+        svnlook('changed').each_line{|l| @files << SVN::FileStat.parse(l)}
+      end
+      
+      @files
+    end
+    
+    private
+    
+    def revision_string
+      @revision_number ? "--revision #{@revision_number}" : ''
+    end
+    
+    def svnlook query
+      `#{@svnlook_path} #{query} #{@repository_path} #{revision_string}`.chomp
+    end
+  end
+end

data/test/svn_hooks_test.rb

@@ -0,0 +1,15 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+
+class SvnHookTest < Test::Unit::TestCase
+
+  def setup
+  end
+  
+  def teardown
+  end
+  
+  # replace this with tests of your own.
+  def test_truth
+    assert true
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,4 @@
+require "test/unit"
+
+# place common methods, assertions, and other type things in this file so
+# other tests will have access to them.

metadata

@@ -0,0 +1,57 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.9.4
+specification_version: 1
+name: svn_hooks
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+date: 2007-11-25 00:00:00 -08:00
+summary: svn_hooks
+require_paths: 
+- lib
+- lib
+- lib
+email: grijalva@gmail.com
+homepage: http://rubyforge.org/projects/svn-hooks/
+rubyforge_project: 
+description: A domain specific language for implementing svn repository hooks in Ruby.
+autorequire: 
+- svn_stat
+- svn_hooks
+- svn_file_stat
+- svn_dsl
+default_executable: 
+bindir: bin
+has_rdoc: false
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+post_install_message: 
+authors: 
+- Dave Grijalva
+files: 
+- lib/svn_dsl.rb
+- lib/svn_file_stat.rb
+- lib/svn_hooks.rb
+- lib/svn_stat.rb
+- README
+test_files: 
+- test/svn_hooks_test.rb
+- test/test_helper.rb
+rdoc_options: []
+
+extra_rdoc_files: []
+
+executables: 
+- svn_rubyhooks
+extensions: []
+
+requirements: []
+
+dependencies: []
+