autobuild 0.4 → 0.5

data/bin/autobuild

@@ -1,83 +0,0 @@
-#! /usr/bin/ruby -w
-
-# :main: README
-
-require 'rake'
-require 'ostruct'
-require 'optparse'
-
-require 'autobuild/options'
-require 'autobuild/config'
-require 'autobuild/reporting'
-require 'daemons'
-
-DEFAULT_HTTP_PORT = 2000
-
-def parse_options(args)
-    options = Options.default
-
-    parser = OptionParser.new do |opts|
-        opts.banner = "Usage: autobuild [options] config.yml"
-        opts.separator ""
-
-        opts.on("--srcdir PATH", "Find or imports sources in PATH") do |options.srcdir| end
-        opts.on("--prefix PATH", "Packages are installed in PATH") do |options.prefix|
-            options.logdir = "#{options.prefix}/autobuild"
-        end
-        opts.on("--logdir", "Where logs are saved (default: <prefix>/autobuild)") do |options.logdir| end
-
-        opts.on("--[no-]update", "Update already checked-out sources") do |options.update| end
-
-        opts.on('--nice NICE', Integer, 'Nice the subprocesses to the given value') do |options.nice| end
-        opts.on("--[no-]daemon", "Go into daemon mode") do |options.daemonize| end
-        #opts.on("--http [PORT]", Integer, 
-        #        "Display a HTTP information page on PORT (PORT default: #{DEFAULT_HTTP_PORT})") do |port| 
-        #    options.http = (port || DEFAULT_HTTP_PORT)
-        #end
-        opts.on("--[no-]verbose", "Display output of commands on stdout") do |options.verbose| end
-        opts.on("--[no-]debug", "Verbose information (for debugging purposes)") do |options.debug| end
-
-        opts.on_tail("-h", "--help", "Show this message") do
-            puts opts
-            exit
-        end
-    end
-
-    parser.parse!(args)
-    if !args[0]
-        puts parser
-        exit
-    end
-
-    [ options, args[0], args[1..-1] ]
-end
-
-# Load the command line options
-options, conffile, targets = parse_options(ARGV)
-
-# make conffile an absolute path since daemonize mode makes
-# / the current directory
-conffile = File.expand_path(conffile, Dir.pwd)
-if options.daemonize
-    puts "Going into daemon mode ..."
-    Daemons.daemonize 
-end
-
-Reporting.report do
-    begin
-        File.open(conffile) do |f|
-            Config.load(f, options)
-        end
-
-        if targets.empty?
-            Rake::Task[:default].invoke
-        else
-            targets.each { |t| Rake::Task[t.to_sym].invoke }
-        end
-    rescue ConfigException => e
-        e.target = conffile
-        raise
-    end
-    Reporting.success
-end
-

data/test/base.rb

@@ -1,8 +0,0 @@
-$LOAD_PATH.unshift File.expand_path('..', File.dirname(__FILE__))
-$LOAD_PATH << File.expand_path('../lib', File.dirname(__FILE__))
-require 'rubygems'
-require 'test/unit'
-require 'test/tc_config_interpolation.rb'
-require 'test/tc_config.rb'
-require 'test/tc_subcommand.rb'
-require 'test/tc_import.rb'

data/test/tc_config.rb

@@ -1,40 +0,0 @@
-$LOAD_PATH.unshift File.expand_path('..', File.dirname(__FILE__))
-$LOAD_PATH << File.expand_path('../lib', File.dirname(__FILE__))
-require 'test/unit'
-require 'test/tools'
-require 'autobuild/options'
-require 'autobuild/config'
-
-class TC_Config < Test::Unit::TestCase
-    def setup
-        @conffile = TestTools.build_config(binding, 'dummy')
-        @options_hash = File.open(@conffile) { |f| YAML.load(f) }
-        @options = File.open(@conffile) { |f| Config.load(f, Options.default) }
-    end
-
-    def teardown
-        TestTools.clean
-    end
-
-    def test_keys_to_sym
-        symed = @options_hash.keys_to_sym
-
-        pass_through = {}
-        symed.each_recursive { |k, v|
-            assert_kind_of(Symbol, k)
-            pass_through[k] = true
-        }
-
-        assert(pass_through[:PATH])
-        assert(pass_through[:prefix])
-        assert(pass_through[:autobuild])
-        assert_kind_of(String, symed[:autobuild][:srcdir])
-    end
-        
-    def test_value_type
-        assert_kind_of(String, $SRCDIR)
-        assert_kind_of(Fixnum, $NICE)
-        assert_equal(0, $NICE)
-    end
-end
-

data/test/tc_config_interpolation.rb

@@ -1,57 +0,0 @@
-$LOAD_PATH.unshift File.expand_path('..', File.dirname(__FILE__))
-$LOAD_PATH << File.expand_path('../lib', File.dirname(__FILE__))
-
-require 'test/unit'
-require 'autobuild/config-interpolator'
-
-require 'yaml'
-require 'stringio'
-
-class TC_ConfigInterpolation < Test::Unit::TestCase
-WELL_FORMED = <<EOF
-defines:
-    global_prefix: /home/doudou
-    srcdir: ${global_prefix}/src
-    prefix: ${global_prefix}/build
-    nice: 10
-
-autobuild:
-    srcdir: $srcdir
-    prefix: $prefix
-    nice: $nice
-    envvar: $ENVVAR
-
-EOF
-        
-    def setup
-        @wellformed = StringIO.open(WELL_FORMED, 'r') { |d| YAML.load(d) }
-    end
-
-    def teardown
-        @wellformed = nil
-    end
-
-    # Check that interpolation matches both forms ${var} and $var
-    def test_match
-        data = @wellformed['defines']['srcdir']
-        all_matches = []
-        Interpolator::PartialMatch.each_match(data) { |m| all_matches << m[1] }
-        assert_equal( ['global_prefix'], all_matches )
-        
-        data = @wellformed['autobuild']['srcdir']
-        all_matches = []
-        Interpolator::PartialMatch.each_match(data) { |m| all_matches << m[2] }
-        assert_equal( ['srcdir'], all_matches )
-    end
-        
-    def test_interpolation
-        ENV['ENVVAR'] = 'envvar'
-        data = Interpolator.interpolate(@wellformed)
-        assert_equal('/home/doudou/src', data["autobuild"]["srcdir"])
-        assert_equal('/home/doudou/build', data["autobuild"]["prefix"])
-        assert_equal('envvar', data["autobuild"]["envvar"])
-        assert_equal(10, data["autobuild"]["nice"])
-        assert_kind_of(Fixnum, data["autobuild"]["nice"])
-    end
-end
-

data/test/tc_import.rb

@@ -1,77 +0,0 @@
-$LOAD_PATH.unshift File.expand_path('..', File.dirname(__FILE__))
-$LOAD_PATH << File.expand_path('../lib', File.dirname(__FILE__))
-require 'test/unit'
-require 'test/tools'
-require 'autobuild/import/cvs'
-require 'autobuild/import/svn'
-
-class TC_Import < Test::Unit::TestCase
-    Package = Struct.new :srcdir, :target
-
-    def setup
-        $PROGRAMS = {}
-        $UPDATE = true
-        $LOGDIR = "#{TestTools.tempdir}/log"
-        FileUtils.mkdir_p($LOGDIR)
-
-    end
-    
-    def teardown
-        $PROGRAMS = nil
-        $UPDATE = true
-        $LOGDIR = nil
-        TestTools.clean
-    end
-
-    def test_cvs
-        TestTools.untar('cvsroot.tar')
-        cvsroot = File.join(TestTools.tempdir, 'cvsroot')
-        pkg_cvs = Package.new File.join(TestTools.tempdir, 'cvs'), :cvs
-
-        # Make a checkout
-        importer = Import.cvs [ cvsroot, 'cvs' ], {}
-        importer.import(pkg_cvs)
-        assert( File.exists?(File.join(pkg_cvs.srcdir, 'test')) )
-
-        # Make an update
-        importer.import(pkg_cvs)
-
-        # Make an update fail
-        FileUtils.rm_rf cvsroot
-        assert_raise(ImportException) { importer.import pkg_cvs }
-
-        # Make a checkout fail
-        FileUtils.rm_rf pkg_cvs.srcdir
-        assert_raise(ImportException) { importer.import pkg_cvs }
-    end
-
-    def test_svn
-        TestTools.untar('svnroot.tar')
-        svnrepo = File.join(TestTools.tempdir, 'svnroot')
-        svnroot = "file:///#{svnrepo}"
-        pkg_svn = Package.new File.join(TestTools.tempdir, 'svn'), :svn
-
-        # Make a checkout with a splitted URL
-        importer = Import.svn [ svnroot, 'svn' ], {}
-        importer.import(pkg_svn)
-        assert( File.exists?(File.join(pkg_svn.srcdir, 'test')) )
-
-        # Make a checkout with an URL as a string
-        FileUtils.rm_rf pkg_svn.srcdir
-        importer = Import.svn File.join(svnroot, 'svn'), {}
-        importer.import(pkg_svn)
-        assert( File.exists?(File.join(pkg_svn.srcdir, 'test')) )
-
-        # Make an update
-        importer.import(pkg_svn)
-
-        # Make an update fail
-        FileUtils.rm_rf svnrepo
-        assert_raise(ImportException) { importer.import(pkg_svn) }
-
-        # Make a checkout fail
-        FileUtils.rm_rf pkg_svn.srcdir
-        assert_raise(ImportException) { importer.import(pkg_svn) }
-    end
-end
- 

data/test/tc_subcommand.rb

@@ -1,61 +0,0 @@
-$LOAD_PATH.unshift File.expand_path('..', File.dirname(__FILE__))
-$LOAD_PATH << File.expand_path('../lib', File.dirname(__FILE__))
-require 'test/unit'
-require 'test/tools'
-require 'autobuild/options'
-require 'autobuild/config'
-
-require 'tmpdir'
-require 'fileutils'
-
-class TC_Subcommand < Test::Unit::TestCase
-EXAMPLE_1 = <<EOF
-This is a file
-It will be the first part of the two-part cat
-EOF
-
-EXAMPLE_2 = <<EOF
-This is another file
-It will be the second part of the two-part cat
-EOF
-
-    attr_reader :tmpdir
-    attr_reader :source1, :source2
-    def setup
-        conffile = TestTools.build_config(binding, 'dummy')
-        @tmpdir = File.dirname(conffile)
-
-        options = Options.default
-        options.logdir = tmpdir
-        File.open(conffile) do |confstream|
-            Config.load confstream, options
-        end
-
-        # Write example files
-        @source1 = File.join(tmpdir, 'source1')
-        @source2 = File.join(tmpdir, 'source2')
-        File.open(source1, 'w+') { |f| f.write(EXAMPLE_1) }
-        File.open(source2, 'w+') { |f| f.write(EXAMPLE_2) }
-    end
-
-    def teardown
-        TestTools.clean
-    end
-
-    def test_subcommand
-        assert_raise(SubcommandFailed) { || subcommand('test', 'copy', 'cat', 'bla') }
-        
-        subcommand('test', 'simple', 'cat', nil, '', source1)
-        assert( FileUtils.identical?(source1, File.join(tmpdir, 'test-simple.log')) )
-
-        subcommand('test', 'use-lt', 'cat', "<#{source1}")
-        assert( FileUtils.identical?(source1, File.join(tmpdir, 'test-use-lt.log')) )
-
-        subcommand('test', 'use-both', 'cat', source1, '-', "<#{source2}")
-        result = File.open( File.join(tmpdir, 'test-use-both.log') ) do |f|
-            f.readlines
-        end
-        assert_equal(EXAMPLE_1 + EXAMPLE_2, result.join(""))
-    end
-end
-

data/test/tools.rb

@@ -1,39 +0,0 @@
-require 'tmpdir'
-require 'erb'
-require 'fileutils'
-
-module TestTools
-    DATADIR = File.join(File.dirname(__FILE__), 'data')
-
-    def self.tempdir
-        @tmpdir = File.join(Dir::tmpdir, "/autobuild-test-#{Process.uid}")
-        FileUtils.mkdir_p(@tmpdir, :mode => 0700)
-    end
-
-    def self.clean
-        FileUtils.rm_rf tempdir
-    end
-
-    def self.build_config(bind, template)
-        eval "basedir = '#{self.tempdir}'", bind
-        ryml = File.open(File.join(DATADIR, "#{template}.ryml")) { |f| f.readlines }.join('')
-        result = ERB.new(ryml).result(bind)
-
-        yml = File.join(tempdir, "#{template}.yml")
-        File.open(yml, 'w+') { |f| f.write(result) }
-        
-        return yml
-    end
-
-    def self.untar(file)
-        file = File.expand_path(file, DATADIR)
-        dir = self.tempdir
-        Dir.chdir(dir) do 
-            system("tar xf #{file}")
-        end
-
-        dir
-    end
-end
-
-