GUnit 0.1.2

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,5 @@
+*.sw?
+.DS_Store
+coverage
+rdoc
+pkg

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Greg Sterndale
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,17 @@
+= GUnit
+
+Unit Test. Gangsta style.
+
+GUnit is a fresh new XUnit Test implementation, poppin' a cap in the ass of TestUnit. 
+
+Just playin'. TestUnit is our boy.
+
+== Rolling with the following features:
+* Nested contexts
+* Custom macros *soon*
+* Setup, teardown and *soon* exercise
+* Todos
+
+== Copyright
+
+Copyright (c) 2009 Greg Sterndale. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,56 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "GUnit"
+    gem.summary = %Q{XUnit Test. Gangsta style.}
+    gem.description = %Q{GUnit is a fresh new XUnit Test implementation, poppin' a cap in the ass of TestUnit. Just playin'. TestUnit is our boy.}
+    gem.email = "gsterndale@gmail.com"
+    gem.homepage = "http://github.com/gsterndale/gunit"
+    gem.authors = ["Greg Sterndale"]
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: sudo gem install jeweler"
+end
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/*_test.rb'
+  test.verbose = true
+end
+
+begin
+  require 'rcov/rcovtask'
+  Rcov::RcovTask.new do |test|
+    test.libs << 'test'
+    test.pattern = 'test/**/*_test.rb'
+    test.verbose = true
+  end
+rescue LoadError
+  task :rcov do
+    abort "RCov is not available. In order to run rcov, you must: sudo gem install spicycode-rcov"
+  end
+end
+
+task :test => :check_dependencies
+
+task :default => :test
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  if File.exist?('VERSION')
+    version = File.read('VERSION')
+  else
+    version = ""
+  end
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "GUnit #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end

data/VERSION

@@ -0,0 +1 @@
+0.1.2

data/gunit.gemspec

@@ -0,0 +1,86 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run the gemspec command
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{GUnit}
+  s.version = "0.1.2"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Greg Sterndale"]
+  s.date = %q{2010-01-22}
+  s.description = %q{GUnit is a fresh new XUnit Test implementation, poppin' a cap in the ass of TestUnit. Just playin'. TestUnit is our boy.}
+  s.email = %q{gsterndale@gmail.com}
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+     ".gitignore",
+     "LICENSE",
+     "README.rdoc",
+     "Rakefile",
+     "VERSION",
+     "gunit.gemspec",
+     "lib/gunit.rb",
+     "lib/gunit/assertions.rb",
+     "lib/gunit/context.rb",
+     "lib/gunit/exception_response.rb",
+     "lib/gunit/exercise.rb",
+     "lib/gunit/fail_response.rb",
+     "lib/gunit/pass_response.rb",
+     "lib/gunit/proc_extensions.rb",
+     "lib/gunit/setup.rb",
+     "lib/gunit/teardown.rb",
+     "lib/gunit/test_case.rb",
+     "lib/gunit/test_response.rb",
+     "lib/gunit/test_runner.rb",
+     "lib/gunit/test_suite.rb",
+     "lib/gunit/to_do_response.rb",
+     "lib/gunit/verification.rb",
+     "test/integration/foo_test.rb",
+     "test/test_helper.rb",
+     "test/unit/assertions_test.rb",
+     "test/unit/context_test.rb",
+     "test/unit/fail_response_test.rb",
+     "test/unit/proc_extensions_test.rb",
+     "test/unit/setup_test.rb",
+     "test/unit/teardown_test.rb",
+     "test/unit/test_case_test.rb",
+     "test/unit/test_runner_test.rb",
+     "test/unit/test_suite_test.rb",
+     "test/unit/verification_test.rb"
+  ]
+  s.homepage = %q{http://github.com/gsterndale/gunit}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.5}
+  s.summary = %q{XUnit Test. Gangsta style.}
+  s.test_files = [
+    "test/integration/foo_test.rb",
+     "test/test_helper.rb",
+     "test/unit/assertions_test.rb",
+     "test/unit/context_test.rb",
+     "test/unit/fail_response_test.rb",
+     "test/unit/proc_extensions_test.rb",
+     "test/unit/setup_test.rb",
+     "test/unit/teardown_test.rb",
+     "test/unit/test_case_test.rb",
+     "test/unit/test_runner_test.rb",
+     "test/unit/test_suite_test.rb",
+     "test/unit/verification_test.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+    else
+    end
+  else
+  end
+end
+

data/lib/gunit/assertions.rb

@@ -0,0 +1,84 @@
+module GUnit
+  
+  class AssertionFailure < StandardError
+  end
+  
+  module Assertions
+    
+    def assert(*args, &blk)
+      expected = true
+      
+      if blk
+        actual  = blk
+        message = args[0] 
+      else
+        actual  = args[0]
+        message = args[1]
+      end
+      
+      actual = actual.call if actual.is_a?(Proc)
+      
+      unless actual == expected
+        message ||= "#{actual.to_s} != #{expected.to_s}"
+        raise GUnit::AssertionFailure.new(message)
+      end
+      
+      true
+    end
+    
+    def assert_equal(*args, &blk)
+      expected = args[0]
+      
+      if blk
+        actual  = blk
+        message = args[1]
+      else
+        actual  = args[1]
+        message = args[2]
+      end
+      
+      actual = actual.call if actual.is_a?(Proc)
+      
+      message ||= "#{actual.to_s} != #{expected.to_s}"
+      
+      assert expected == actual, message
+    end
+    
+    def assert_raises(*args, &blk)
+      expected = args[0]
+      message  = args[1]
+      
+      begin
+        blk.call
+      rescue Exception => e
+        actual = e
+      end
+
+      bool = case
+      when actual.nil?
+        false
+      when expected.is_a?(String)
+        actual.to_s == expected
+      when expected.is_a?(Class)
+        actual.is_a?(expected)
+      when expected.nil?
+        !actual.nil?
+      else
+        actual == expected
+      end
+      
+      message ||= case
+      when !expected.nil? && !actual.nil?
+        "Expected #{expected.to_s} to be raised, but got #{actual.to_s}"
+      when !expected.nil? && actual.nil?
+        "Expected #{expected.to_s} to be raised, but nothing raised"
+      else
+        "Nothing raised"
+      end
+      
+      assert bool, message
+    end
+    
+  end
+  
+end

data/lib/gunit/context.rb

@@ -0,0 +1,46 @@
+module GUnit
+  # Context instance has message, setups, exercises, teardowns, and parent (another Context)
+  class Context
+    attr_accessor :task, :parent, :message, :setups, :teardowns
+    
+    # Context.new("my message")
+    # Context.new("my message") do
+    #   setup { @foo = "bar" }
+    #   verify { true }
+    # end
+    # Context.new do
+    #   setup { @foo = "bar" }
+    #   verify { true }
+    # end
+    def initialize(*args, &blk)
+      self.message    = args[0] || ''
+      self.setups     = []
+      self.teardowns  = []
+      self.task = blk if blk
+    end
+    
+    def run(binding=self)
+      if @task.is_a?(Proc)
+        bound_task = @task.bind(binding)
+        bound_task.call
+      end
+      return true
+    end
+    
+    def all_message
+      parent_message = self.parent.message if self.parent
+      parent_message = nil if parent_message == ''
+      [parent_message, @message].compact.join(' ')
+    end
+    
+    def all_setups
+      (self.parent ? self.parent.setups : []) + @setups
+    end
+    
+    def all_teardowns
+      (self.parent ? self.parent.teardowns : []) + @teardowns
+    end
+    
+  end
+  
+end

data/lib/gunit/exception_response.rb

@@ -0,0 +1,6 @@
+module GUnit
+  
+  class ExceptionResponse < TestResponse
+  end
+  
+end

data/lib/gunit/fail_response.rb

@@ -0,0 +1,19 @@
+module GUnit
+  
+  class FailResponse < TestResponse
+    
+    DEFAULT_MESSAGE = 'Fail'
+    
+    attr_accessor :message
+    
+    # FailResponse.new("my message")
+    # Verification.new()
+    def initialize(msg=DEFAULT_MESSAGE)
+      self.message = msg
+    end
+    
+  end
+  
+end
+
+

data/lib/gunit/pass_response.rb

@@ -0,0 +1,8 @@
+module GUnit
+  
+  class PassResponse < TestResponse
+  end
+  
+end
+
+

data/lib/gunit/proc_extensions.rb

@@ -0,0 +1,14 @@
+# Stolen straight from ActiveSupport
+
+class Proc #:nodoc:
+  def bind(object)
+    block, time = self, Time.now
+    (class << object; self end).class_eval do
+      method_name = "__bind_#{time.to_i}_#{time.usec}"
+      define_method(method_name, &block)
+      method = instance_method(method_name)
+      remove_method(method_name)
+      method
+    end.bind(object)
+  end
+end

data/lib/gunit/setup.rb

@@ -0,0 +1,41 @@
+module GUnit
+  
+  class Setup
+    attr_writer :message
+    attr_accessor :task
+    
+    # Setup.new("my message")
+    # Setup.new("my message") { @foo = "bar" }
+    # Setup.new() { @foo = "bar" }
+    def initialize(*args, &blk)
+      self.message = args[0]
+      self.task = blk if blk
+    end
+    
+    def run(binding=self)
+      begin
+        if @task.is_a?(Proc)
+          bound_task = @task.bind(binding)
+          bound_task.call
+        end
+        return true
+      rescue GUnit::AssertionFailure => e
+        FailResponse.new
+      rescue ::StandardError => e
+        ExceptionResponse.new
+      end
+    end
+    
+    def message
+      @message || default_message
+    end
+    
+    def default_message
+      "Setup"
+    end
+    
+  end
+  
+end
+
+

data/lib/gunit/teardown.rb

@@ -0,0 +1,41 @@
+module GUnit
+  
+  class Teardown
+    attr_writer :message
+    attr_accessor :task
+    
+    # Teardown.new("my message")
+    # Teardown.new("my message") { @foo = "bar" }
+    # Teardown.new() { @foo = "bar" }
+    def initialize(*args, &blk)
+      self.message = args[0]
+      self.task = blk if blk
+    end
+    
+    def run(binding=self)
+      begin
+        if @task.is_a?(Proc)
+          bound_task = @task.bind(binding)
+          bound_task.call
+        end
+        return true
+      rescue GUnit::AssertionFailure => e
+        FailResponse.new
+      rescue ::StandardError => e
+        ExceptionResponse.new
+      end
+    end
+    
+    def message
+      @message || default_message
+    end
+    
+    def default_message
+      "Teardown"
+    end
+    
+  end
+  
+end
+
+

data/lib/gunit/test_case.rb

@@ -0,0 +1,136 @@
+module GUnit
+  
+  # Acts as a TestSuite Factory
+  # Creates a TestCase Object for each Test Method
+  # Adds all TestCase Objects onto a TestSuite Object
+  # The TestSuite Object will be used by a TestRunner
+  
+  # Each TestCase Object of the TestCase Class have a way to determine which Test Method it should invoke.
+  # Pluggable Behavior is the most common way to do this. 
+  # The constructor of the TestCase Class takes the name of the method to be invoked as a parameter and store this name in an instance variable.
+  # When the Test Runner invokes the run method on the TestCase Object, it uses reflection to find and invoke the method whose name is in the instance variable.
+  
+  # count, run, display
+  class TestCase
+    
+    include Assertions
+    
+    TEST_METHOD_PREFIX = 'test'
+    
+    attr_accessor :method_name, :context
+    
+    @@method_count          = 0
+    @@context_stack         = [ GUnit::Context.new ]
+    @@test_method_contexts  = {}
+    
+    def initialize(method=nil)
+      self.method_name = method
+    end
+    
+    def context
+      self.class.context_for_method(self.method_name)
+    end
+    
+    def run
+      self.run_setups
+      response = self.send(self.method_name.to_sym)
+      self.run_teardowns
+      response
+    end
+    
+    def self.suite
+      # Create an new instance of self.class for each test method and add them to a TestSuite Object
+      test_suite = TestSuite.new
+      test_methods.each do |test_method|
+        test_suite.tests << new(test_method)
+      end
+      test_suite
+    end
+
+    def self.test_methods(prefix=TEST_METHOD_PREFIX)
+      method_names = instance_methods.find_all{|method| method =~ /\A#{prefix}/ && ! GUnit::TestCase.instance_methods.include?(method) }
+      method_names.map!{|m| m.to_sym }
+    end
+    
+    def self.context_for_method(method_name)
+      @@test_method_contexts[method_name] || @@context_stack.first
+    end
+    
+    def self.context(*args, &blk)
+      new_context = if blk
+        GUnit::Context.new(args.first, &blk)
+      else
+        GUnit::Context.new(args.first)
+      end
+      new_context.parent = current_context
+      @@context_stack << new_context
+      current_context.run(self)
+      @@context_stack.pop
+    end
+    
+    def self.setup(*args, &blk)
+      setup = if blk
+        GUnit::Setup.new(args.first, &blk)
+      else
+        GUnit::Setup.new(args.first)
+      end
+      current_context.setups << setup
+    end
+    
+    def self.teardown(*args, &blk)
+      teardown = if blk
+        GUnit::Teardown.new(args.first, &blk)
+      else
+        GUnit::Teardown.new(args.first)
+      end
+      current_context.teardowns << teardown
+    end
+    
+    def self.verify(*args, &blk)
+      test_method_name = message_to_unique_test_method_name(args.first)
+      define_method(test_method_name) do
+        verification = if blk
+          GUnit::Verification.new(args.first, &blk)
+        else
+          GUnit::Verification.new(args.first)
+        end
+        verification.run(self)
+      end
+      @@method_count += 1
+      @@test_method_contexts[test_method_name] = current_context
+      test_method_name
+    end
+    
+    def self.message_to_test_method_name(msg)
+      if msg && msg != ''
+        [TEST_METHOD_PREFIX, msg.downcase.gsub(/ |@/,'_')].join('_').to_sym
+      else
+        TEST_METHOD_PREFIX.to_sym
+      end
+    end
+    
+  protected
+    
+    def run_setups
+      self.context.setups.each {|s| s.run(self) }
+    end
+  
+    def run_teardowns
+      self.context.teardowns.reverse.each {|t| t.run(self) } if self.context
+    end
+    
+    def self.current_context
+      @@context_stack.last
+    end
+
+    def self.message_to_unique_test_method_name(msg)
+      name = message_to_test_method_name(msg)
+      if method_defined?(name)
+        name = [name.to_s, (@@method_count+1).to_s].join('_').to_sym
+      end
+      name
+    end
+    
+  end
+  
+end

data/lib/gunit/test_response.rb

@@ -0,0 +1,8 @@
+module GUnit
+  
+  class TestResponse
+  end
+  
+end
+
+