releasy 0.2.0rc1

data/test/releasy/dsl_wrapper_test.rb

@@ -0,0 +1,79 @@
+require File.expand_path("../teststrap", File.dirname(__FILE__))
+
+context Releasy::DSLWrapper do
+  helper :owner_class do
+    # Can't simply stub, since the DSLWrapper redirection methods are created when from the owner's methods.
+    Owner = Class.new do
+      def frog; end
+      def fish; end
+      def fish=(fish); end
+      def knees=(knees); end
+      def add_cheese(a, b); end
+      def add_peas(a, &block); end
+    end
+  end
+
+  helper(:owner) { @owner ||= owner_class.new }
+
+  setup { Releasy::DSLWrapper.new owner }
+
+  expected_methods = [:frog, :fish, :add_cheese, :owner, :add_peas, :knees]
+  expected_methods.map!(&:to_s) if RUBY_VERSION =~ /1\.8\./
+  asserts(:public_methods, false).same_elements expected_methods
+  asserts(:owner).equals { owner }
+
+  asserts("a method that doesn't exist on the owner") { topic.wibble }.raises NoMethodError, /<Owner:0x\w+> does not have either public method, #wibble or #wibble=/
+
+  should "redirect to a setter, that has no corresponding getter, even if no arguments are passed" do
+    topic.knees
+  end.raises ArgumentError
+
+  should "redirect to a getter, that has no corresponding setter, even if arguments are passed" do
+    topic.frog 25
+  end.raises ArgumentError
+
+  should "redirect a getter (that has no corresponding setter)" do
+    mock(owner, :frog).returns(5)
+    topic.frog == 5
+  end
+
+  should "redirect a setter (that has no corresponding getter)" do
+    mock(owner, :knees=).with(1).returns(5)
+    topic.knees(1) == 5
+  end
+
+  should "redirect a getter (that has a corresponding setter)" do
+    mock(owner, :fish).returns(5)
+    topic.fish == 5
+  end
+
+  should "redirect a setter (that has a corresponding getter)" do
+    mock(owner, :fish=).with(5).returns(5)
+    topic.fish(5) == 5
+  end
+
+  should "redirect a (non-setter) method with args" do
+    mock(owner).add_cheese(1, 2).returns(99)
+    topic.add_cheese(1, 2) == 99
+  end
+
+  should "redirect a block" do
+    mock(owner).add_peas(1).yields(:knees)
+    yielded = nil
+    topic.add_peas(1) do |arg|
+      yielded = arg
+    end
+    yielded == :knees
+  end
+
+  should "instance_eval when given a block on the constructor (.new)" do
+    mock(owner).frog(5)
+    Releasy::DSLWrapper.new owner do
+      frog 5
+    end
+    true
+  end
+
+  asserts(".wrap is an alias for .new without a block") { Releasy::DSLWrapper.wrap(owner).is_a? Releasy::DSLWrapper }
+  asserts(".wrap is an alias for .new given a block") { (Releasy::DSLWrapper.wrap(owner) {}).is_a? Releasy::DSLWrapper }
+end

data/test/releasy/integration/source_test.rb

@@ -0,0 +1,122 @@
+require File.expand_path("../../teststrap", File.dirname(__FILE__))
+
+folder = File.join(output_path, "test_app_0_1_SOURCE")
+
+def md5_created(extension)
+  file = "#{File.join(output_path, "test_app_0_1_SOURCE")}#{extension}.MD5"
+  asserts("MD5 file created") { File.exists?(file) }
+  asserts("MD5 file contents sensible") { File.read(file) =~ /^[0-9a-f]{32}$/ }
+end
+
+_output_path = output_path # Needed to get to work in the DSLWrapper.
+context "Source in all formats" do
+  setup do
+    Releasy::Project.new do
+      name "Test App"
+      version "0.1"
+      files source_files
+      output_path _output_path
+      verbose
+      create_md5s
+
+      add_build :source do
+        add_archive :dmg
+        add_archive :exe
+        add_archive :zip
+        add_archive :"7z"
+      end
+
+      add_archive :tar_gz
+      add_archive :tar_bz2
+    end
+  end
+
+  teardown do
+    Rake::Task.clear
+    Dir.chdir $original_path
+  end
+
+  hookup do
+    Dir.chdir project_path
+  end
+
+  helper(:contents_description) { /#{source_files.size} files, 4 folders/m }
+
+  active_builders_valid
+
+  context "tasks" do
+    tasks = [
+        [ :Task, "package", %w[package:source] ],
+        [ :Task, "package:source", %w[package:source:dmg package:source:7z package:source:exe package:source:tar_gz package:source:tar_bz2 package:source:zip] ],
+        [ :Task, "package:source:dmg", ["#{folder}.dmg"] ],
+        [ :Task, "package:source:7z", ["#{folder}.7z"] ],
+        [ :Task, "package:source:exe", ["#{folder}.exe"] ],
+        [ :Task, "package:source:tar_gz", ["#{folder}.tar.gz"] ],
+        [ :Task, "package:source:tar_bz2", ["#{folder}.tar.bz2"] ],
+        [ :Task, "package:source:zip", ["#{folder}.zip"] ],
+
+        [ :Task, "build", %w[build:source] ],
+        [ :Task, "build:source", [folder] ],
+
+        [ :FileCreationTask, '..', [] ],
+        [ :FileCreationTask, output_path, [] ], # byproduct of using #directory
+        [ :FileCreationTask, folder, source_files ],
+        [ :FileTask, "#{folder}.dmg", [folder] ],
+        [ :FileTask, "#{folder}.7z", [folder] ],
+        [ :FileTask, "#{folder}.exe", [folder] ],
+        [ :FileTask, "#{folder}.tar.gz", [folder] ],
+        [ :FileTask, "#{folder}.tar.bz2", [folder] ],
+        [ :FileTask, "#{folder}.zip", [folder] ],
+    ]
+
+    test_tasks tasks
+  end
+
+  if osx_platform?
+    # TODO: Test this better?
+    context "dmg" do
+      hookup { Rake::Task["package:source:dmg"].invoke }
+
+      asserts("archive created") { File.size("#{folder}.dmg") > 0}
+    end
+  end
+
+  context ".exe" do
+    hookup { Rake::Task["package:source:exe"].invoke }
+
+    asserts("archive created") { File.size("#{folder}.exe") > 0}
+    md5_created ".exe"
+  end
+
+  context ".tar.gz" do
+    hookup { Rake::Task["package:source:tar_gz"].invoke }
+
+    asserts("archive created") { File.size("#{folder}.tar.gz") > 0}
+    asserts("archive contains expected files") { `7z x -so -bd -tgzip #{folder}.tar.gz | 7z l -si -bd -ttar` =~ contents_description }
+    md5_created ".tar.gz"
+  end
+
+  context ".tar.bz2" do
+    hookup { Rake::Task["package:source:tar_bz2"].invoke }
+
+    asserts("archive created") { File.size("#{folder}.tar.bz2") > 0}
+    asserts("archive contains expected files") { `7z x -so -bd -tbzip2 #{folder}.tar.bz2 | 7z l -si -bd -ttar` =~ contents_description }
+    md5_created ".tar.bz2"
+  end
+
+  context ".zip" do
+    hookup { Rake::Task["package:source:zip"].invoke }
+
+    asserts("archive created") { File.size("#{folder}.zip") > 0}
+    asserts("archive contains expected files") { `7z l -bd -tzip #{folder}.zip` =~ contents_description }
+    md5_created ".zip"
+  end
+
+  context ".7z" do
+    hookup { Rake::Task["package:source:7z"].invoke }
+
+    asserts("archive created") { File.size("#{folder}.7z") > 0}
+    asserts("archive contains expected files") { `7z l -bd -t7z #{folder}.7z` =~ contents_description }
+    md5_created ".7z"
+  end
+end

data/test/releasy/mixins/register_test.rb

@@ -0,0 +1,52 @@
+require File.expand_path("../../teststrap", File.dirname(__FILE__))
+
+context Releasy::Mixins::Register do
+  setup do
+    module RegisterTest
+     extend Releasy::Mixins::Register
+    end
+  end
+
+  asserts(:[], :blue).nil
+  asserts(:has_type?, :blue).equals false
+  asserts(:types).same_elements []
+  asserts(:values).same_elements []
+
+  hookup do
+    unless defined? NotInModule
+      class NotInModule; TYPE = :wibbly; end
+      class RegisterTest::Untyped; end
+    end
+  end
+
+  asserts("trying to register a non-class") { topic.register 12 }.raises TypeError, /Can only register classes/
+  asserts("trying to register a class not within the module") { topic.register NotInModule }.raises ArgumentError, /Can't register a class not within this module/
+  asserts("trying to register a class without TYPE, even if in the module") { topic.register topic::Untyped }.raises ArgumentError, /To register, a class must have TYPE defined/
+
+  context "with registered classes (blue and red frogs)" do
+    setup do
+      module Frogs
+        extend Releasy::Mixins::Register
+      end
+    end
+
+    hookup do
+      unless defined? Frogs::BlueFrog
+        class Frogs::BlueFrog
+          TYPE = :blue # Type must be defined before registering.
+          Frogs.register self
+        end
+
+        class Frogs::RedFrog
+          TYPE = :red # Type must be defined before registering.
+          Frogs.register self
+        end
+      end
+    end
+
+    asserts(:[], :blue).equals { Frogs::BlueFrog }
+    asserts(:has_type?, :blue).equals true
+    asserts(:types).same_elements [:blue, :red]
+    asserts(:values).same_elements { [Frogs::BlueFrog, Frogs::RedFrog] }
+  end
+end

data/test/releasy/project_test.rb

@@ -0,0 +1,198 @@
+require File.expand_path("../teststrap", File.dirname(__FILE__))
+
+# Change directory into the project, since that is where we work from normally.
+
+# @author Bil Bas (Spooner)
+context Releasy::Project do
+  teardown do
+    Rake::Task.clear
+    Dir.chdir $original_path
+  end
+
+  hookup do
+    Dir.chdir project_path
+  end
+
+  context "default" do
+    setup { Releasy::Project.new }
+
+    # Defaults are mostly nil.
+    asserts(:name).nil
+    asserts(:underscored_name).nil
+    asserts(:version).nil
+    asserts(:executable).nil
+    asserts(:files).empty
+    asserts(:files).kind_of Rake::FileList
+    asserts(:exposed_files).empty
+    asserts(:exposed_files).kind_of Rake::FileList
+    asserts(:verbose?).equals true
+    asserts(:links).equals Hash.new
+    asserts(:create_md5s?).equals false
+
+    asserts(:to_s).equals "<Releasy::Project>"
+    asserts(:output_path).equals "pkg"
+    asserts(:folder_base).equals "pkg/" # Would be more, but dependent on name.
+
+    asserts("attempting to generate tasks without any outputs") { topic.send :generate_tasks }.raises Releasy::ConfigError, /must specify at least one valid output/i
+
+    asserts(:active_builders).empty
+    asserts(:add_build, :source).kind_of Releasy::Builders::Source
+    asserts(:active_builders).size 1
+    asserts(:add_build, :source).raises(Releasy::ConfigError, /already have output :source/i)
+    asserts(:add_build, :unknown).raises(ArgumentError, /unsupported output/i)
+
+    asserts("active_archivers") { topic.send(:active_archivers, topic.send(:active_builders).first) }.empty
+    asserts(:add_archive, :zip).kind_of Releasy::Archivers::Zip
+    asserts("active_archivers") { topic.send(:active_archivers, topic.send(:active_builders).first) }.size 1
+    asserts(:add_archive, :zip).raises(Releasy::ConfigError, /already have archive format :zip/i)
+    asserts(:add_archive, :unknown).raises(ArgumentError, /unsupported archive/i)
+
+    context "#verbose" do
+      hookup { topic.quiet }
+      hookup { topic.verbose }
+      asserts(:verbose?).equals true
+    end
+
+    context "#quiet" do
+      hookup { topic.verbose }
+      hookup { topic.quiet }
+      asserts(:verbose?).equals false
+    end
+
+    context "#create_md5s" do
+      hookup { topic.create_md5s }
+      asserts(:create_md5s?).equals true
+    end
+
+    context "#files" do
+      hookup { topic.files = ["fish.rb"] }
+      asserts(:files).size 1
+      asserts(:files).kind_of Rake::FileList
+    end
+
+    context "#exposed_files" do
+      hookup { topic.exposed_files = "fish.rb" }
+      asserts(:exposed_files).size 1
+      asserts(:exposed_files).kind_of Rake::FileList
+    end
+  end
+
+  context "defined" do
+    setup do
+      Releasy::Project.new do
+        name "Test Project - (2a)"
+        version "v0.1.5"
+
+        add_archive :"7z"
+        add_archive :zip
+
+        add_build :source
+        add_build :osx_app do
+          add_archive :tar_gz do
+            extension "tgz"
+          end
+          wrapper Dir["../wrappers/gosu-mac-wrapper-*.tar.gz"].first
+          url "org.url.app"
+        end
+        add_build :windows_standalone do
+          exclude_encoding
+        end
+
+        files source_files
+
+        add_link "www.frog.com", "Frog"
+        add_link "www2.fish.com", "Fish"
+      end
+    end
+
+    asserts(:to_s).equals %[<Releasy::Project Test Project - (2a) v0.1.5>]
+    asserts(:name).equals "Test Project - (2a)"
+    asserts(:underscored_name).equals "test_project_2a"
+    asserts(:version).equals "v0.1.5"
+    asserts("file") { topic.files.to_a }.same_elements source_files
+    asserts(:underscored_version).equals "v0_1_5"
+    asserts(:executable).equals "bin/test_project_2a"
+    asserts(:folder_base).equals "pkg/test_project_2a_v0_1_5"
+    asserts(:links).equals "www.frog.com" => "Frog", "www2.fish.com" => "Fish"
+
+    asserts(:active_builders).size(Gem.win_platform? ? 3 : 2)
+    asserts("source active_archivers") { topic.send(:active_archivers, topic.send(:active_builders).find {|b| b.type == :source }) }.size 2
+    asserts("osx app active_archivers") { topic.send(:active_archivers, topic.send(:active_builders).find {|b| b.type == :osx_app }) }.size 3
+    if Gem.win_platform?
+      asserts("Windows standalone active_archivers") { topic.send(:active_archivers, topic.send(:active_builders).find {|b| b.type == :windows_standalone }) }.size 2
+    end
+
+    asserts "add_build yields an instance_eval-ed Releasy::DSLWrapper" do
+      correct = false
+      topic.add_build :windows_folder do
+        correct = (is_a?(Releasy::DSLWrapper) and owner.is_a?(Releasy::Builders::WindowsFolder))
+      end
+      correct
+    end
+
+    asserts "add_archive yields an instance_eval-ed Releasy::DSLWrapper" do
+      correct = false
+      topic.add_archive :tar_gz do
+        correct = (is_a?(Releasy::DSLWrapper) and owner.is_a?(Releasy::Archivers::TarGzip))
+      end
+      correct
+    end
+
+    context "#generate_archive_tasks" do
+      asserts(:generate_archive_tasks).equals { topic }
+
+      should "call generate_tasks on all archivers" do
+        topic.send(:active_builders).each do |builder|
+          topic.send(:active_archivers, builder).each {|a| mock(a).generate_tasks(builder.type.to_s.sub('_', ':'), builder.send(:folder)) }
+        end
+        topic.send :generate_archive_tasks
+      end
+    end
+
+    context "#generate_tasks" do
+      asserts(:generate_tasks).equals { topic }
+
+      should "call generate_tasks on all builders" do
+        topic.send(:active_builders) {|b| mock(b).generate_tasks }
+        topic.send :generate_tasks
+      end
+
+      should "call #generate_archive_tasks" do
+        mock(topic).generate_archive_tasks
+        topic.send :generate_tasks
+      end
+    end
+
+    context "defined with Object#tap-like syntax" do
+      setup do
+        Releasy::Project.new do |p|
+          p.name = "Test Project - (2a)"
+          p.version = "v0.1.5"
+
+          p.add_archive :"7z"
+          p.add_archive :zip
+
+          p.add_build :source
+          p.add_build :osx_app do |b|
+            b.add_archive :tar_gz do |a|
+              a.extension = ".tgz"
+            end
+            b.wrapper = Dir["../wrappers/gosu-mac-wrapper-*.tar.gz"].first
+            b.url = "org.url.app"
+          end
+          p.add_build :windows_standalone do |b|
+            b.exclude_encoding
+          end
+
+          p.files = source_files
+
+          p.add_link "www.frog.com", "Frog"
+          p.add_link "www2.fish.com", "Fish"
+        end
+      end
+
+      # Just needed to test that the project was passing into the block.
+      asserts(:name).equals "Test Project - (2a)"
+    end
+  end
+end