BuildMaster 1.0.9 → 1.1.9

data/lib/buildmaster/algorithms.rb

@@ -0,0 +1,3 @@
+$:.unshift File.join(File.dirname(__FILE__), 'algorithms')
+
+require 'opn_compare'

data/lib/buildmaster/algorithms/opn_compare.rb

@@ -0,0 +1,108 @@
+module BuildMaster
+  module Algorithms
+    class OpnCompare
+      def initialize(a, b)
+        @a = a
+        @b = b
+        @m = a.size
+        @n = b.size
+      end
+
+      def compare
+        delta = @n - @m
+        diff = SequenceDiff.new
+        fp = NegativeIndexArray.new(@m + 1, @n + 1) {|index| EditAction.new(nil, nil, -1 - index, -1) }
+        p = -1
+        begin
+          p = p + 1
+          (-p..(delta - 1)).each do |k|
+            fp[k] = snake(k, max(fp[k-1], fp[k+1]))
+          end
+          ((delta + p)..(delta - 1)).each do |k|
+            fp[k] = snake(k, max(fp[k-1], fp[k+1]))
+          end
+          fp[delta] = snake(delta, max(fp[delta-1], fp[delta+1]))
+        end until fp[delta].y == @n
+        return diff
+      end
+
+      private
+      def snake(k, edit)
+        y = edit.y
+        x = y - k
+        snake = edit
+        while (x < @m and y < @n and @a[x] == @b[y]) do
+          x = x + 1
+          y = y + 1
+          snake = EditType::COPY.apply_to(snake)
+        end
+        snake
+      end
+
+      def max(fp1, fp2)
+        if (fp1.y < fp2.y)
+          EditType::DELETE.apply_to(fp2)
+        else
+          EditType::ADD.apply_to(fp1)
+        end
+      end
+    end
+
+    class NegativeIndexArray
+      attr_reader :max_negative, :max_positive
+      def initialize(max_negative, max_positive, &block)
+        @max_negative = max_negative
+        @max_positive = max_positive
+        @array = Array.new(max_negative + max_positive + 1) {|index| block.call(index - max_negative)}
+      end
+
+      def [](index)
+        @array[index + max_negative]
+      end
+
+      def []=(index, value)
+        @array[index + max_negative] = value
+      end
+    end
+
+    class SequenceDiff
+      def edits
+        []
+      end
+    end
+
+    class EditAction
+      attr_reader :type, :x, :y
+      def initialize(last, type, x, y)
+        @last = last
+        @type = type
+        @x = x
+        @y = y
+      end
+
+      def inspect
+        if @type
+          "#{@type.name}(#@x, #@y) - )-" + @last.inspect
+        else
+          'nil'
+        end
+      end
+    end
+
+    class EditType
+      attr_reader :name
+      def initialize(name, deltx, delty)
+        @name = name
+        @deltx = deltx
+        @delty = delty
+      end
+
+      def apply_to(edit_action)
+        EditAction.new(edit_action, self, edit_action.x + @deltx, edit_action.y + @delty)
+      end
+      ADD = EditType.new('add', 0, 1)
+      DELETE = EditType.new('delete', 1, 0)
+      COPY = EditType.new('copy', 1, 1)
+    end
+  end
+end

data/lib/buildmaster/cotta/cotta_dir.rb

@@ -88,20 +88,23 @@ class CottaDir
     @system.copy_dir(@path, target.path)
   end
 
-  def archive(target = nil)
+  def archive(target = nil, &block)
     unless target
       target = parent.file("#{name}.tar")
     end
     target.write_binary do |io|
       writer = Gem::Package::TarWriter.new(io) do |tar_io|
-        archive_dir(tar_io, self)
+        archive_dir(tar_io, self, &block)
       end
     end
     target
   end
 
-  def archive_dir(tar_io, dir)
+  def archive_dir(tar_io, dir, &block)
     dir.list.each do |child|
+      if (block_given? and not yield child)
+        next
+      end
       stat = child.stat
       entry_name = child.relative_path_from(self).to_s
       mode = stat.mode
@@ -113,7 +116,7 @@ class CottaDir
         end
       elsif (stat.directory?)
         tar_io.mkdir(entry_name, mode)
-        archive_dir(tar_io, child)
+        archive_dir(tar_io, child, &block)
       end
     end
   end

data/lib/buildmaster/cotta/cotta_file.rb

@@ -7,7 +7,7 @@ require 'io_chain'
 module BuildMaster
 class CottaFile
   include IoChain
-  attr_reader :system, :path
+  attr_reader :system, :path, :stat
 
   def initialize(system, path)
     @path = path
@@ -33,6 +33,10 @@ class CottaFile
   def stat
     @system.file_stat(@path)
   end
+
+  def older_than?(file)
+    (stat <=> file.stat) == -1 
+  end
   
   def exists?
     return @system.file_exists?(@path)
@@ -132,7 +136,6 @@ windows system because it does no put the system on binary mode
     end
   end
 
-  
   def foreach()
     open('r') do |file|
       file.each {|line| yield line}

data/lib/buildmaster/cotta/in_memory_system.rb

@@ -45,12 +45,12 @@ class InMemorySystem
   
   def dir_stat(pathname)
     check_dir_exists(pathname)
-    ContentStat.new(path_content(pathname))
+    path_content(pathname).stat
   end
   
   def file_stat(pathname)
     check_file_exists(pathname)
-    ContentStat.new(path_content(pathname))
+    path_content(pathname).stat
   end
   
   def list(pathname)
@@ -167,6 +167,9 @@ class InMemorySystem
       end
       file_content = create_file(pathname)
     end
+    if (options =~ /w/)
+      file_content.touch
+    end
     return file_content
   end
   
@@ -178,11 +181,12 @@ class InMemorySystem
 end
 
 class DirectoryContent
-  attr_reader :name, :children
+  attr_reader :name, :children, :stat
 
   def initialize(name)
     @name = name
     @children = Array.new
+    @stat = ContentStat.new(self)
   end 
 
   def file?
@@ -209,12 +213,13 @@ class DirectoryContent
 end
 
 class FileContent
-  attr_reader :name, :content
+  attr_reader :name, :content, :stat
   attr_writer :content
   
   def initialize(name)
     @name = name
     @content = ''
+    @stat = ContentStat.new(self)
   end
   
   def file?
@@ -234,11 +239,18 @@ class FileContent
     source_path = parent_dir.join(name)
     system.copy_file(source_path, target_path)
   end
+
+  def touch
+    @stat.touch
+  end
 end
 
 class ContentStat
+  attr_reader :mtime
+
   def initialize(content)
     @content = content
+    @mtime = Time.new
   end
   
   def mode
@@ -256,5 +268,17 @@ class ContentStat
   def directory?
       @content.directory?
   end
+
+  def touch
+    @mtime = Time.new
+  end
+
+  def writable?
+    true
+  end
+
+  def <=> stat
+    mtime <=> stat.mtime
+  end
 end
 end

data/lib/buildmaster/project/java.rb

@@ -0,0 +1,4 @@
+$:.unshift(__FILE__, 'java')
+
+require 'javac'
+require 'class_path'

data/lib/buildmaster/project/java/javac.rb

@@ -0,0 +1,9 @@
+$:.unshift (File.join(File.dirname(__FILE__), '..', '..'))
+
+require 'cotta'
+
+module BuildMaster
+  class Javac
+    
+  end
+end

data/lib/buildmaster/project/mysql_served_driver.rb

@@ -0,0 +1,15 @@
+require '../cotta'
+require '../cotta/in_memory_system'
+
+module BuildMaster
+class MySqlServerDriver
+  def initialize(mysqld)
+    @mysqld = mysqld
+    @cotta = mysqld.cotta
+  end
+
+  def start
+    @cotta.shell("#{@mysqld.path} --console")
+  end
+end
+end

data/lib/buildmaster/project/pscp_driver.rb

@@ -1,7 +1,6 @@
 $:.unshift File.join(File.dirname(__FILE__), '..')
 
 require 'cotta'
-require 'cotta/in_memory_system'
 
 module BuildMaster
 class PscpDriver

data/lib/buildmaster/project/svn_driver.rb

@@ -3,7 +3,6 @@ $:.unshift File.dirname(__FILE__)
 require 'stringio'
 require 'rexml/document'
 require 'svn_status_info'
-require 'common/properties'
 
 module BuildMaster
 
@@ -81,9 +80,10 @@ class SvnDriver
     
     private
     def load_svn_info
-      properties = @cotta.shell("svn info #{work_dir.path}") {|io| BuildMaster::Common::Properties.parse_io(io)}
-      @repository_root = properties['Repository Root']
-      @user = properties['Last Changed Author']
+      xml = REXML::Document.new(@cotta.shell("svn info #{work_dir.path} --xml"))
+      @repository_root = REXML::XPath.first(xml, '/info/entry/repository/root').text
+      @repository_url = REXML::XPath.first(xml, '/info/entry/url').text
+      @user = REXML::XPath.first(xml, '/info/entry/commit/author').text
     end
     
     def command_for_path(svn_command, argument='', &callback)

data/lib/buildmaster/project/svn_server_driver.rb

@@ -0,0 +1,18 @@
+$:.unshift File.join(File.dirname(__FILE__), '..')
+
+require '../cotta'
+require '../cotta/in_memory_system'
+
+module BuildMaster
+class SvnServerDriver
+  def initialize(server, repository)
+    @server = server
+    @repository = repository
+    @cotta = @server.cotta
+  end
+
+  def start
+    @cotta.shell("#{@server.path} -d -r #{@repository.path}")
+  end
+end
+end

data/lib/buildmaster/project/svn_status_info.rb

@@ -2,53 +2,56 @@ require 'rexml/document'
 require 'pathname'
 
 module BuildMaster
+  class SvnStatusInfo
+    def initialize
+      @changes = Array.new
+    end
 
-class SvnStatusInfo
-  def initialize
-    @changes = Array.new
-  end
-  
-  def add(entry)
-    @changes.push entry
-  end
+    def add(entry)
+      @changes.push entry
+    end
 
-  def SvnStatusInfo::parse_xml(content)
-    info = SvnStatusInfo.new
-    xml = REXML::Document.new(content)
-    REXML::XPath.each(xml, '/status/target/entry') do |entry|
-      info.add Entry.new(entry)
+    def SvnStatusInfo::parse_xml(content)
+      info = SvnStatusInfo.new
+      xml = REXML::Document.new(content)
+      REXML::XPath.each(xml, '/status/target/entry') do |entry|
+        info.add Entry.new(entry)
+      end
+      return info
     end
-    return info
-  end
-  
-  def unversioned
-    entries('unversioned')
-  end
-  
-  def missing
-    entries('missing')
-  end
-  
-  def entries(status)
-    @changes.select {|entry| entry.status == status}
-  end
-  
-  class Entry
-    attr_reader :path
-  
-    def initialize(element)
-      @element = element
-      @path = Pathname.new @element.attributes['path']
+
+    def unversioned
+      entries('unversioned')
+    end
+
+    def missing
+      entries('missing')
     end
-    
-    def basename
-      @path.basename
+
+    def entries(status)
+      @changes.select {|entry|
+        entry.status == status
+      }
     end
-    
-    def status
-      status_element = @element.elements.find {|element| element.name == 'wc-status'}
-      status_element.attributes['item']
+
+    class Entry
+      attr_reader :path
+
+      def initialize(element)
+        @element = element
+        @path = Pathname.new @element.attributes['path']
+      end
+
+      def basename
+        @path.basename
+      end
+
+      def status
+        status_element = @element.elements.find {|element|
+          element.name == 'wc-status'
+        }
+        status_element.attributes['item']
+      end
     end
   end
-end
 end