BuildMaster 0.9.1 → 1.0.6

data/bin/svnfix.rb

@@ -0,0 +1,3 @@
+require 'buildmaster/svn_helper'
+
+BuildMaster::SvnHelper.from_directory('.').fix

data/lib/buildmaster/ci/server.rb

@@ -0,0 +1,55 @@
+module BuildMaster
+module CI
+
+=begin rdoc
+A CI (Continuous Integration) server that does the following loop
+* check for modifications
+* if modification set found, 
+** update
+** make
+** publish (update site, email notification)
+=end
+class Server
+
+  def initialize
+    @modification_checker = Array.new
+    @updator = Array.new
+  end
+  
+  def serve
+    pid = fork {start}
+    if (pid)
+      ['INT', 'TERM'].each { |signal|
+           trap(signal){Process.kill('break', pid)} 
+      }
+    end
+  end
+
+  def start
+    puts "server started"
+    until @stopped
+      if check_modifications
+        build_loop
+      end
+      sleep 30
+    end
+  end
+  
+  def stop
+    @stopped = true
+    Thread.current.raise 'shutting down'
+  end
+  
+  private
+  def check_modifications
+  end
+  
+  def build_loop
+    update
+    result = build
+    publish(result)
+  end
+end
+
+end
+end

data/lib/buildmaster/common.rb

@@ -0,0 +1,3 @@
+$:.unshift File.join(File.dirname(__FILE__), 'common')
+require 'properties'
+require 'tree_to_object'

data/lib/buildmaster/common/properties.rb

@@ -0,0 +1,28 @@
+module BuildMaster
+module Common
+
+class Properties
+  def Properties::parse_io(io)
+    hash = Hash.new
+    io.each_line do |line|
+      line.strip!
+      if (line[0..0] != '#')
+        parse_into_hash(hash, line)
+      end
+    end
+    return hash
+  end
+  
+  private
+  def Properties::parse_into_hash(hash, line)
+    index = line.index(':')
+    if (index)
+      property = line[0, index].strip
+      value = line[index + 1, line.length - index - 1].strip
+      hash[property] = value
+    end
+  end
+end
+
+end
+end

data/lib/buildmaster/cotta.rb

@@ -1,4 +1,4 @@
 $:.unshift File.join(File.dirname(__FILE__))
 
 require 'cotta/cotta'
-require 'cotta/file_not_found_error'
+require 'cotta/file_not_found_error'

data/lib/buildmaster/cotta/command_error.rb

@@ -1,5 +1,10 @@
 module BuildMaster
 class CommandError < StandardError
-  
+  attr_reader :proc_status, :output
+
+  def initialize(proc_status, output)
+    @proc_status = proc_status
+    @output = output
+  end
 end
 end

data/lib/buildmaster/cotta/command_interface.rb

@@ -0,0 +1,44 @@
+module BuildMaster
+class CommandInterface
+  def initialize(io = SystemIo.new)
+    @io = io
+  end
+  
+  def puts(content)
+    @io.puts(content)
+  end
+  
+  def prompt(question)
+    puts(question)
+    gets
+  end
+  
+  def prompt_for_choice(question, candidates)
+    puts(question)
+    0.upto(candidates.size - 1) do |index|
+      puts "[#{index + 1}] #{candidates[index]}"
+    end
+    answer = gets.to_i
+    seletion = nil
+    if answer > 0 && answer <= candidates.size
+      selection = candidates[answer - 1]
+    end
+    return selection
+  end
+  
+  def gets
+    @io.gets
+  end
+  
+end
+
+class SystemIo
+  def puts(content)
+    $stdout.puts(content)
+  end
+  
+  def gets
+    $stdin.gets
+  end
+end
+end

data/lib/buildmaster/cotta/command_runner.rb

@@ -0,0 +1,39 @@
+$:.unshift File.dirname(__FILE__)
+
+require 'command_error'
+
+module BuildMaster
+class CommandRunner
+  attr_reader :outputs
+
+  def initialize(command)
+    @command = command
+  end
+  
+  def execute
+    id = rand(10000)
+    puts "[#{id}]$> #{@command}"
+    output = nil
+    IO.popen(@command) do |io|
+      if (block_given?)
+        output = yield io
+      else
+        output = load_output(id, io)
+      end
+    end
+    last_process = $?
+    raise CommandError.new(last_process, output), @command unless last_process.exitstatus == 0
+    return output
+  end
+  
+  private
+  def load_output(id, io)
+    output = ''
+    while (line = io.gets) do
+      puts "[#{id}] #{line}"
+      output << line
+    end
+    return output
+  end
+end
+end

data/lib/buildmaster/cotta/cotta.rb

@@ -4,26 +4,63 @@ require 'physical_system'
 require 'cotta_dir'
 require 'cotta_file'
 require 'pathname'
+require 'cotta_pathname'
+require 'command_interface'
 
 module BuildMaster
 class Cotta
+  attr_accessor :command_interface
+  
   def initialize(system=PhysicalSystem.new)
     @system = system
+    @command_interface = CommandInterface.new
+  end
+  
+  def shell(command_line, &block)
+    @system.shell(command_line, &block)
   end
   
-  def shell(command_line)
-    puts "$> #{command_line}"
-    @system.shell(command_line)
+  def command_interface=(value)
+    if (value)
+      @command_interface = value
+    else
+      @command_interface = CommandInterface.new
+    end
   end
   
   def dir(path)
+    return nil unless path
     return CottaDir.new(@system, Pathname.new(path))
   end
   
+  def Cotta::dir(path)
+    return nil unless path
+    return Cotta.new.dir(File.expand_path(path))
+  end
+  
   def file(path)
+    return nil unless path
     return CottaFile.new(@system, Pathname.new(path))
   end
   
+  def Cotta::file(path)
+    return nil unless path
+    return Cotta.new.file(File.expand_path(path))
+  end
+  
+  def Cotta::parent_of(path)
+    return Cotta.file(path).parent
+  end
+  
+  def entry(path)
+    entry = file(path)
+    unless (entry.exists?)
+      entry = dir(path)
+      raise "#{path} exists as niether file nor directory" unless entry.exists?
+    end
+    return entry
+  end
+  
   def environment!(variable)
     @system.environment!(variable)
   end

data/lib/buildmaster/cotta/cotta_dir.rb

@@ -7,8 +7,8 @@ class CottaDir
   attr_reader :path, :system
 
   def initialize(system, path)
-    @system = system
     @path = path
+    @system = system
     @name = @path.basename.to_s
   end
   
@@ -17,7 +17,17 @@ class CottaDir
   end
   
   def name
-    return @path.basename.to_s
+    name = nil
+    if root?
+      name = path.to_s
+    else
+      name = @path.basename.to_s
+    end
+    return name
+  end
+  
+  def root?
+    parent.nil?
   end
   
   def exists?
@@ -25,10 +35,9 @@ class CottaDir
   end
   
   def parent
-    if (@name == '.')
-      return nil
-    end
-    return CottaDir.new(@system, @path.parent)
+    parent_path = @path.cotta_parent
+    return nil unless parent_path
+    return CottaDir.new(@system, parent_path)
   end
   
   def dir(name)
@@ -56,11 +65,19 @@ class CottaDir
     @system.move_dir(@path, target.path)
   end
   
+  def move_to_path(target_path)
+    move_to(cotta.dir(target_path))
+  end
+  
   def copy_to(target)
     target.parent.mkdirs
     @system.copy_dir(@path, target.path)
   end
   
+  def copy_to_path(target_path)
+    copy_to(cotta.dir(target_path))
+  end
+  
   def list
     @system.list(@path).collect do |item|
       candidate = dir(item)
@@ -75,8 +92,12 @@ class CottaDir
     return @path == other.path && @system == other.system
   end
   
+  def inspect
+    return "#{self.class}:#{self.object_id}-#{@system.inspect}-#@path"
+  end
+  
   def to_s
-    return "#{super}-#@system-#@path"
+    @path
   end
     
 end

data/lib/buildmaster/cotta/cotta_file.rb

@@ -5,8 +5,8 @@ class CottaFile
   attr_reader :system, :path
 
   def initialize(system, path)
-    @system = system
     @path = path
+    @system = system
   end
   
   def cotta
@@ -38,11 +38,19 @@ class CottaFile
     @system.copy_file(path, target_file.path)
   end
   
+  def copy_to_path(target_path)
+    copy_to(cotta.file(target_path))
+  end
+  
   def move_to(target_file)
     target_file.parent.mkdirs
     @system.move_file(path, target_file.path)
   end
   
+  def move_to_path(target_path)
+    move_to(cotta.file(target_path))
+  end
+  
   def save(content = '')
     write {|file| file.printf content.to_s}
   end
@@ -78,7 +86,11 @@ class CottaFile
   end
   
   def to_s
-    return "#{super}-#@system-#@path"
+    @path
+  end
+  
+  def inspect
+    return "#{self.class}:#{self.object_id}-#{@system.inspect}-#@path"
   end
   
   private

data/lib/buildmaster/cotta/cotta_pathname.rb

@@ -0,0 +1,9 @@
+class Pathname
+  def cotta_parent
+    parent_path = parent
+    if (parent_path == self || parent_path.to_s == '..')
+      return nil
+    end
+    return parent_path
+  end
+end

data/lib/buildmaster/cotta/in_memory_system.rb

@@ -12,6 +12,7 @@ class InMemorySystem
     @executed_commands = []
     @content = ""
     @file_system = Hash.new
+    @file_system[nil] = DirectoryContent.new('')
     @file_system[Pathname.new('/')] = DirectoryContent.new('/')
     @file_system[Pathname.new('.')] = DirectoryContent.new('.')
     @output_map = Hash.new
@@ -19,9 +20,6 @@ class InMemorySystem
   
   def shell(command)
     @executed_commands.push(command)
-  end
-  
-  def shell_output(command)
     result = @output_map[command]
     raise "#{command} not found in expectation" unless result
     return result
@@ -30,9 +28,13 @@ class InMemorySystem
   def output_for_command(command, output)
     @output_map[command] = output
   end
+  
+  def expect_command(command)
+    Entry.new(command)
+  end
 
   def dir_exists?(pathname)
-    content = path_content(pathname)
+   content = path_content(pathname)
     return !content.nil? && content.directory?
   end
   
@@ -47,7 +49,7 @@ class InMemorySystem
   end
   
   def mkdir(pathname)
-    path_content(pathname.parent).add(create_dir(pathname))
+    path_content!(pathname.cotta_parent).add(create_dir(pathname))
   end
   
   def io(*args)
@@ -105,7 +107,7 @@ class InMemorySystem
     path_to_create = pathname   
     while (! dir_exists?(path_to_create))
       paths.push(path_to_create)
-      path_to_create = path_to_create.parent
+      path_to_create = path_to_create.cotta_parent
     end
     return paths
   end  
@@ -118,14 +120,23 @@ class InMemorySystem
   
   def create_file(pathname)
     content = FileContent.new(pathname.basename.to_s)
-    parent_dir = pathname.parent
+    parent_dir = pathname.cotta_parent
     path_content(parent_dir).add(content)
     @file_system[pathname] = content
     return content
   end
   
   def path_content(pathname)
-    return @file_system[pathname]
+    content = path_content!(pathname)
+    if (content.nil? && pathname.cotta_parent.nil?)
+      mkdir(pathname)
+      content = @file_system[pathname]
+    end
+    return content
+  end
+  
+  def path_content!(pathname)
+    @file_system[pathname]
   end
   
   def retrieve_file_content(pathname, options)
@@ -141,7 +152,7 @@ class InMemorySystem
   
   def delete_entry(pathname)
     @file_system.delete pathname
-    @file_system[pathname.parent].delete(pathname.basename.to_s)
+    @file_system[pathname.cotta_parent].delete(pathname.basename.to_s)
   end
     
 end