build-tool 0.5.7 → 0.6.0.rc1

data/test/integration/parser_module_test.rb

@@ -0,0 +1,103 @@
+require 'test_helper'
+
+setup_database()
+
+require 'build-tool/cfg/parser'
+
+class ParserModuleTest < ActiveSupport::TestCase
+
+    def setup
+        @configuration = BuildTool::Configuration.new()
+        @configuration.truncate()
+        @parser = BuildTool::Cfg::Parser.new( @configuration )
+        @localparser = BuildTool::Cfg::Parser.new( @configuration, false )
+    end
+
+    test 'Parses a valid module declaration' do
+        assert_nothing_raised() { @parser.parse_string <<-EOF }
+            module "test_default"
+            end
+            module "test_disabled"
+            end
+            disable module "test_disabled"
+            EOF
+        # Now check the parsed configuration
+        assert( @configuration.module( 'test_default' ).default_active? )
+        assert( @configuration.module( 'test_default' ).active? )
+        assert( !@configuration.module( 'test_disabled' ).default_active? )
+        assert( !@configuration.module( 'test_disabled' ).active? )
+
+        # Parse a local config file
+        @localparser.parse_string <<-EOF
+            disable module "test_default"
+            enable module "test_disabled"
+            EOF
+
+        # Now check the parsed configuration
+        assert( !@configuration.module( 'test_default' ).active? )
+        assert( @configuration.module( 'test_disabled' ).active? )
+        # But the defaults are the same
+        assert( @configuration.module( 'test_default' ).default_active? )
+        assert( !@configuration.module( 'test_disabled' ).default_active? )
+        @configuration.save()
+    end
+
+    test 'Parses all values' do
+        assert_nothing_raised() { @parser.parse_string <<-EOF }
+            module "test_default"
+                description "Default is a test module"
+                long description "It really is"
+            end
+            EOF
+        # Now check the parsed configuration
+        assert( @configuration.module( 'test_default' ) )
+        mod = @configuration.module( 'test_default' )
+        assert_equal( mod.description, 'Default is a test module' )
+        assert_equal( mod.long_description, 'It really is' )
+
+        # Parse a local config file
+        @localparser.parse_string <<-EOF
+            module "test_default"
+                long description """Multi line comment
+works"""
+            end
+            EOF
+
+        mod = @configuration.module( 'test_default' )
+        assert_equal( 'Default is a test module', mod.description )
+        assert_equal( "Multi line comment\nworks", mod.long_description )
+    end
+
+    test 'Keeps settings over reloads' do
+        assert_nothing_raised() { @parser.parse_string <<-EOF }
+            module "test_default"
+            end
+            module "test_disabled"
+            end
+            disable module "test_disabled"
+            EOF
+        @configuration.module( 'test_disabled' ).active = true
+        @configuration.module( 'test_default' ).active = false
+        @configuration.save()
+
+        @configuration = BuildTool::Configuration.new()
+        @configuration.load()
+        @parser = BuildTool::Cfg::Parser.new( @configuration )
+        @localparser = BuildTool::Cfg::Parser.new( @configuration, false )
+        assert_nothing_raised() { @parser.parse_string <<-EOF }
+            module "base"
+            end
+            module "test_default" < "base"
+            end
+            module "test_disabled"
+            end
+            disable module "test_disabled"
+            EOF
+
+        # Now check the parsed configuration.
+        assert( !@configuration.module( 'test_default' ).active? )
+        assert( @configuration.module( 'test_disabled' ).active? )
+
+    end
+
+end # class TestParserModuleTest

data/test/integration/parser_svn_test.rb

@@ -0,0 +1,92 @@
+require 'test_helper'
+
+setup_database()
+
+require 'build-tool/cfg/parser'
+
+class TestParserSvn < ActiveSupport::TestCase
+
+    def setup
+        @configuration = BuildTool::Configuration.new()
+        @configuration.truncate()
+        @parser = BuildTool::Cfg::Parser.new( @configuration )
+    end
+
+    test "Parses a valid svn repository declation." do
+        @configuration.add_server( BuildTool::Server.new( 'svn.kde.org', 'svn://anonsvn.kde.org/home/kde' ) )
+        @configuration.add_repository( BuildTool::Repository.new( 'kde' ) )
+        @configuration.repository( 'kde' ).server = @configuration.server( 'svn.kde.org' )
+        assert_nothing_raised() { @parser.parse_string <<-EOF }
+        module "oxygen-icons"
+            vcs svn
+                remote-path "kdesupport/oxygen"
+                use repository "kde"
+            end # vcs
+        end # module
+        EOF
+        # Now check the parsed configuration
+        assert_not_nil( @configuration.module('oxygen-icons') )
+        assert_attributes(
+            @configuration.module('oxygen-icons'),
+            {
+                :vcs =>
+                    {
+                    :name => 'svn',
+                    :config =>
+                        {
+                        :repository =>
+                            {
+                            :name => 'kde',
+                            :url => 'svn://anonsvn.kde.org/home/kde'
+                            },
+                        :remote_path => "kdesupport/oxygen"
+                        }
+                    }
+
+            }
+        )
+    end
+
+    test "SVN Repository inheritance works." do
+        @configuration.add_server( BuildTool::Server.new( 'svn.kde.org', 'svn://anonsvn.kde.org/home/kde' ) )
+        @configuration.add_repository( BuildTool::Repository.new( 'kde' ) )
+        @configuration.repository( 'kde' ).server = @configuration.server( 'svn.kde.org' )
+        assert_nothing_raised() { @parser.parse_string <<-EOF }
+        module "oxygen-icons"
+            vcs svn
+                remote-path "kdesupport/oxygen"
+                use repository "kde"
+            end # vcs
+        end # module
+        module "oxygen-icons"
+            vcs svn <
+                remote-path "kdesupport/oxygen-neu"
+            end # vcs
+        end # module
+        EOF
+        # Now check the parsed configuration
+        assert_not_nil( @configuration.module('oxygen-icons') )
+        assert_attributes(
+            @configuration.module('oxygen-icons'),
+            {
+                :vcs =>
+                    {
+                    :name => 'svn',
+                    :config =>
+                        {
+                        :repository =>
+                            {
+                            :name => 'kde',
+                            :url => 'svn://anonsvn.kde.org/home/kde'
+                            },
+                        :remote_path => "kdesupport/oxygen-neu"
+                        }
+                    }
+
+            }
+        )
+    end
+
+end
+
+

data/test/integration/parser_test.rb

@@ -0,0 +1,73 @@
+require 'test_helper'
+
+setup_database()
+
+require 'build-tool/cfg/parser'
+
+class TestParser < ActiveSupport::TestCase
+
+    def setup
+        @configuration = BuildTool::Configuration.new()
+        @configuration.truncate()
+        @parser = BuildTool::Cfg::Parser.new( @configuration )
+    end
+
+    test "Parser parses a empty string" do
+        assert_nothing_raised() { @parser.parse_string( "" ) }
+    end
+
+    test "Parser throws an exception on invalid input" do
+        assert_raise(BuildTool::ParseError) do @parser.parse_string( "this is really invalid text" ) end
+    end
+
+    test "Parses a valid recipe" do
+        assert_nothing_raised() { @parser.parse_string <<-EOF }
+        log-directory   "$HOME/test/log"
+
+        module "test"
+            build-prefix    "/home/mjansen/test"
+            install-prefix  "/tst"
+        end
+        EOF
+        # Now check the parsed configuration
+        test = @configuration.module('test')
+        assert_not_nil( @configuration.module('test'), 'There is a module named "test".' )
+        assert( test.active?, 'The module is active.' )
+        assert_nil( test.parent, 'The module has no parent.' )
+        assert_equal(
+            Pathname.new( '/home/mjansen/test' ),
+            test.build_prefix,
+            'The build prefix is correctly set.' )
+        assert_equal(
+            Pathname.new( '/home/mjansen/test/bld/test' ),
+            test.build_directory,
+            'The build directory is correctly set' )
+    end
+
+    test "Parses a valid recipe with module inheritance" do
+        assert_nothing_raised() { @parser.parse_string <<-EOF }
+        log-directory   "$HOME/test/log"
+
+        module "base"
+            build-prefix    "/home/mjansen/test"
+            install-prefix  "/tst"
+        end
+        module "test_inherit" < "base"
+        end
+        EOF
+        # Now check the parsed configuration
+        test = @configuration.module('test_inherit')
+        assert_not_nil( test, 'There is a module named "test".' )
+        assert( test.active?, 'The module is active.' )
+        assert_equal( test.parent, @configuration.module('base') )
+        assert_equal(
+            Pathname.new( '/home/mjansen/test' ),
+            test.build_prefix,
+            'The build prefix is correctly set.' )
+        assert_equal(
+            Pathname.new( '/home/mjansen/test/bld/test_inherit' ),
+            test.build_directory,
+            'The build directory is correctly set' )
+    end
+
+end

data/test/test_helper.rb

@@ -0,0 +1,61 @@
+require 'test/unit'
+require 'active_support/test_case'
+require 'active_record'
+
+require 'logging'
+Logging.init :debug2, :debug, :trace, :verbose, :info, :warn, :error
+include Logging.globally
+
+begin
+    # require 'turn'
+rescue LoadError
+end
+
+
+# Set up the database.
+def setup_database
+    if not ActiveRecord::Base.connected?
+        ActiveRecord::Base.establish_connection( :adapter => 'sqlite3', :database => ':memory:' )
+        ActiveRecord::Migrator.migrate( [ 'db/migrations' ] )
+    end
+end
+
+def close_database
+    ActiveRecord::Base.remove_connection
+end
+
+def assert_attributes( obj, attr )
+
+    attr.each do |key, val|
+        case val
+        when :not_nil
+            assert_not_nil( obj.send( key ), "#{key.to_s} should not be nil." )
+        when :nil
+            assert_nil( obj.send( key ), "#{key.to_s} should be nil." )
+        else
+            if val.is_a?( Hash )
+                assert_not_nil( obj.send( key ), "#{key.to_s} should not be nil." )
+                assert_attributes( obj.send( key ), val )
+            elsif val.is_a?( Proc )
+                val.call( obj.send( key ) )
+            else
+                assert_equal( val, obj.send( key ) )
+            end
+        end
+    end
+
+end
+
+class RepositoryMock
+    attr_accessor :name
+    def initialize( name )
+        @name = name
+    end
+end
+
+class ModuleMock
+    attr_accessor :name
+    def initialize( name )
+        @name = name
+    end
+end # class ModuleMock

data/test/unit/configuration_test.rb

@@ -0,0 +1,36 @@
+require 'test_helper'
+
+setup_database()
+
+require 'build-tool/configuration'
+
+class ConfigurationTest < ActiveSupport::TestCase
+
+    test 'Constructor.' do
+        c = BuildTool::Configuration.new
+    end
+
+    test 'log_directory is not allowed to be relative' do
+        c = BuildTool::Configuration.new
+        assert_raises( BuildTool::ConfigurationError, /Log directory .* is relative/ ) do
+            c.log_directory = 'my/relative/dir'
+        end
+        assert_raises( BuildTool::ConfigurationError, /Log directory .* is relative/ ) do
+            c.log_directory = '$SOME_SHELL_VAR/relative/dir'
+        end
+    end
+
+    test 'log_directory handles ~ and $HOME' do
+        c = BuildTool::Configuration.new
+        assert_nothing_raised() do
+            c.log_directory = '$HOME/test1'
+        end
+        assert_equal( "#{ENV["HOME"]}/test1", c.log_directory.to_s )
+        assert_nothing_raised() do
+            c.log_directory = '~/test2'
+        end
+        assert_equal( "#{ENV["HOME"]}/test2", c.log_directory.to_s )
+    end
+
+end
+

data/test/unit/git_configuration_test.rb

@@ -0,0 +1,163 @@
+require 'test_helper'
+
+require 'build-tool/vcs/git'
+
+
+class GitConfigurationTest < ActiveSupport::TestCase
+
+    test 'Constructor.' do
+        cfg = BuildTool::VCS::GitConfiguration.new
+        assert_equal( 'git', cfg.name )
+        assert_equal( {}, cfg.remote )
+        assert_equal( {}, cfg.global_options )
+        assert_equal( {}, cfg.options )
+        assert_equal( 'origin/master', cfg.track )
+    end
+
+    test 'Track is correctly split.' do
+        cfg = BuildTool::VCS::GitConfiguration.new
+        assert_equal( 'origin', cfg.track_remote )
+        assert_equal( 'master', cfg.track_branch )
+        cfg.track = 'myremote/mybranch'
+        assert_equal( 'myremote', cfg.track_remote )
+        assert_equal( 'mybranch', cfg.track_branch )
+    end
+
+    test 'Vcs() returns a git instance.' do
+        cfg = BuildTool::VCS::GitConfiguration.new
+        # :TODO:
+        # assert( cfg.vcs.is_a?( BuildTool::VCS::Git ), "vcs() returns a instance of Git." )
+    end
+
+    test 'track() accessor works.' do
+        cfg = create_configuration
+        assert_equal( 'myremote/mybranch', cfg.track )
+    end
+
+    test 'track() accessor works with inheritance.' do
+        parent = create_configuration
+        # Create a empty object with a parent
+        cfg = BuildTool::VCS::GitConfiguration.new
+        cfg.parent = parent
+        # Value is taken from parent
+        assert_equal( 'myremote/mybranch', cfg.track )
+        # Unless we set it locally
+        cfg.track = 'repo1/test'
+        assert_equal( 'repo1/test', cfg.track )
+        # After a reset
+        cfg.track = nil
+        assert_equal( 'myremote/mybranch', cfg.track )
+    end
+
+    test 'options() accessor works.' do
+        cfg = create_configuration
+        assert_equal( 'option 1', cfg.options[:option1] )
+        assert_equal( 'option 2', cfg.options[:option2] )
+        assert_nil( cfg.options[:option3] )
+    end
+
+    test 'options() accessor works with inheritance.' do
+        parent = create_configuration
+        # Create a empty object with a parent
+        cfg = BuildTool::VCS::GitConfiguration.new
+        cfg.parent = parent
+        # Options are not merged.
+        assert_nil( cfg.options[:option1] )
+        assert_nil( cfg.options[:option2] )
+        assert_nil( cfg.options[:option3] )
+        # Merged_options is merged with the parent.
+        assert_equal( 'option 1', cfg.merged_options[:option1] )
+        assert_equal( 'option 2', cfg.merged_options[:option2] )
+        assert_nil( cfg.merged_options[:option3] )
+        # But ours have priority
+        cfg.options[:option1] = 'overwritten'
+        assert_equal( 'overwritten', cfg.merged_options[:option1] )
+    end
+
+    test 'options() accessor works with global configuration.' do
+        cfg = create_configuration
+        create_global_configuration
+        assert_equal( 'option 1', cfg.merged_options[:option1] )
+        assert_equal( 'option 2', cfg.merged_options[:option2] )
+        assert_equal( 'option 3(set globally)', cfg.merged_options[:option3] )
+    end
+
+    test 'options() accessor works with global configuration and inheritance.' do
+        parent = create_configuration
+        # Create a empty object with a parent
+        cfg = BuildTool::VCS::GitConfiguration.new
+        cfg.parent = parent
+        cfg.options[:option1] = 'overwritten'
+        # Merged_options is merged with the parent and global
+        create_global_configuration
+        assert_equal( 'overwritten', cfg.merged_options[:option1] )
+        assert_equal( 'option 2', cfg.merged_options[:option2] )
+        assert_equal( 'option 3(set globally)', cfg.merged_options[:option3] )
+        # And we can reset them
+        cfg.options.delete(:option1)
+        assert_equal( 'option 1', cfg.merged_options[:option1] )
+    end
+
+    test 'global_options() works.' do
+        cfg = create_configuration
+        assert_equal( {}, cfg.global_options )
+    end
+
+    test 'global_options() works with global configuration.' do
+        cfg = create_configuration
+        create_global_configuration
+        assert_equal( 'global option 1', cfg.merged_global_options[:globaloption1] )
+        assert_equal( 'global option 2', cfg.merged_global_options[:globaloption2] )
+    end
+
+    test 'remote() accessor works.' do
+        cfg = create_configuration
+        assert_equal( 'GitRemoteObject 1', cfg.remote['origin'] )
+        assert_equal( 'GitRemoteObject 1', cfg.merged_remote['origin'] )
+    end
+
+    test 'remote() accessor works with inheritance.' do
+        parent = create_configuration
+        cfg = BuildTool::VCS::GitConfiguration.new
+        cfg.parent = parent
+        cfg.remote['other'] = 'other'
+        assert_nil( cfg.remote['origin'] )
+        assert_equal( 'GitRemoteObject 1', cfg.merged_remote['origin'] )
+        assert_equal( 'other', cfg.merged_remote['other'] )
+        cfg.remote['origin'] = 'test'
+        assert_equal( 'test', cfg.merged_remote['origin'] )
+        assert_equal( 'other', cfg.merged_remote['other'] )
+    end
+
+
+    private
+
+    def create_configuration
+        # Reset global configuration
+        BuildTool::VCS::GitConfiguration.global_config = nil
+        # Create a configuration object
+        cfg = BuildTool::VCS::GitConfiguration.new
+        cfg.track = 'myremote/mybranch'
+        cfg.options = {
+            :option1 => "option 1",
+            :option2 => "option 2" }
+        cfg.remote['origin'] = 'GitRemoteObject 1'
+        cfg.remote['private'] = 'GitRemoteObject 2'
+        cfg
+    end
+
+    def create_global_configuration
+        # Add a global configuration object
+        global = BuildTool::VCS::GitConfiguration.new
+        BuildTool::VCS::GitConfiguration.global_config = global
+        global.options = {
+            :option1 => "option 1(set globally)",
+            :option3 => "option 3(set globally)" }
+        global.global_options = {
+            :globaloption1 => "global option 1",
+            :globaloption2 => "global option 2" }
+        global
+    end
+
+
+end