greenpepper-ruby 0.0.1

data/test/greenpepper/example/dowithexampletest.rb

@@ -0,0 +1,148 @@
+=begin
+author: Simon Mathieu (simon.math@gmail.com)
+date: March 19, 2009
+=end
+
+require 'test/unit'
+require 'greenpepper/example/dowithexample'
+require 'greenpepper/example/executionresults'
+
+require 'test/fixtures/fixture'
+require 'test/helper/assert'
+require 'test/fixtures/dowithfixture'
+
+include GreenPepper
+
+class DoWithExampleTest < Test::Unit::TestCase
+  def test_create_empty_dowith_example
+    ex = DoWithExample.new "Bank"
+    ex.add_function_call "open_checking_account", 1, '1234'
+    results = ex.execute
+    
+    assert_equal 0, results.size
+    assert_results_fixture_found(results)
+  end
+
+  def test_create_empty_dowith_example_two_args
+    ex = DoWithExample.new "Bank"
+    ex.add_function_call "open_checking_account_for", 1, '123', 'abc'
+    results = ex.execute
+
+    assert_equal 0, results.size
+    assert_results_fixture_found(results)
+  end
+
+  def test_do_with_example_check_keyword
+    ex = DoWithExample.new "Bank"
+    ex.add_check "get_amount", 0, '100', '123'
+    ex.add_check "get_amount", 0, '101', '123'
+    results = ex.execute
+
+    assert_check_results results, 1, 0, :success
+    assert_check_results results, 2, 0, :failure
+  end
+
+  def test_do_with_example_accept_keyword
+    ex = DoWithExample.new "Bank"
+    ex.add_accept "withdraw_from_account", 0, '123', '50' 
+    ex.add_accept "withdraw_from_account", 0, '123', '140'
+    results = ex.execute
+
+    assert_check_results results, 1, 0, :success
+    assert_check_results results, 2, 0, :failure
+  end
+
+  def test_do_with_example_reject_keyword
+    ex = DoWithExample.new "bank"
+    ex.add_reject "withdraw_from_account", 0, '123', '50' 
+    ex.add_reject "withdraw_from_account", 0, '123', '140'
+    results = ex.execute
+
+    assert_check_results results, 1, 0, :failure
+    assert_check_results results, 2, 0, :success
+  end
+
+  def test_do_with_example_multiple_lines
+    ex = DoWithExample.new "Bank2"
+    ex.add_function_call 'open_account', 0, '123'
+    ex.add_check 'get_amount_for_account', 0, '0', '123'
+    ex.add_accept 'deposit_in_account', 0, '100', '123'
+    ex.add_reject 'withdraw_from_account', 0, '200', '123'
+    results = ex.execute
+    result = HtmlTableExecutionResults.get_all_results([results])
+
+    assert_equal 3, results.size
+
+    assert_check_results results, 2, 0, :success
+    assert_check_results results, 3, 0, :success
+    assert_check_results results, 4, 0, :success
+
+    assert_equal 3, result.successes
+    assert_equal 0, result.failures
+    assert_equal 0, result.errors
+  end
+
+  def test_fixture_with_exeption
+    ex = DoWithExample.new "Bank"
+    ex.add_function_call 'will_raise', 0, '123'
+    results = ex.execute
+
+    assert_check_results results, 1, 0, :error
+  end
+
+  def test_fixture_not_found
+    ex = DoWithExample.new "This Fixture Dont exist"
+    ex.add_reject "withdraw_from_account", 0, '123', '50' 
+    results = ex.execute
+    assert_results_fixture_not_found(results)
+  end
+
+  def test_do_with_example_reject_keyword_with_natural_language_function_name
+    ex = DoWithExample.new "bank"
+    ex.add_reject "withdraw from account", 0, '123', '50' 
+    ex.add_reject "withdraw from account", 0, '123', '140'
+    results = ex.execute
+    assert_check_results results, 1, 0, :failure
+    assert_check_results results, 2, 0, :success
+  end
+
+  def test_do_with_example_with_column_name_that_does_not_exist
+    ex = DoWithExample.new "Bank"
+    ex.add_function_call 'does not exist', 0, '123'
+    results = ex.execute
+    assert_check_results results, 1, 0, :error
+  end
+
+  def test_do_with_example_parse_in_fixture
+    ex = DoWithExample.new "BankFixtureConversion"
+    ex.add_accept 'get_account', 0, 'abc'
+    ex.add_accept 'get_account', 0, 'abd'
+    results = ex.execute
+    assert_check_results results, 1, 0, :success
+    assert_check_results results, 2, 0, :failure
+  end
+
+  def test_do_with_example_parse_multiple_args
+    ex = DoWithExample.new "BankFixtureConversion"
+    ex.add_function_call 'multiple_params', 0, 'a', 'b', 'c'
+    results = ex.execute
+
+    assert_equal 0, results.size #TODO : Shall be a test with success
+  end
+
+  def test_do_with_example_check_parse_expected_result
+    ex = DoWithExample.new "BankFixtureConversion"
+    ex.add_check "that_balance_is", 0, '0.0', '123'
+    results = ex.execute
+    assert_check_results results, 1, 0, :success
+  end
+
+  def test_missing_method_in_do_with_should_not_return_address_in_error
+    ex = DoWithExample.new "Object"
+    ex.add_function_call 'toto', 0
+    results = ex.execute
+    
+    result = assert_check_results results, 1, 0, :error
+    assert_equal "Cannot find method toto on fixture Object.", result.exception.to_s
+  end
+end

data/test/greenpepper/example/exampletest.rb

@@ -0,0 +1,28 @@
+=begin
+author: Simon Mathieu (simon.math@gmail.com) 
+date: April 18, 2009
+=end
+
+require 'test/unit'
+require 'test/fixtures/fixture.rb'
+require 'greenpepper/example/examplewithfixture'
+
+include GreenPepper
+
+class ExampleTest < Test::Unit::TestCase
+  class MockExampleRaisesError < ExampleWithFixture
+    def initialize
+      super "EmptyMockFixture"
+    end
+
+    def do_execute
+      raise "error"
+    end
+  end
+
+  def test_example_with_fixture_exception_handling
+    ex = MockExampleRaisesError.new
+    results = ex.execute
+    assert results.errors != 0
+  end
+end

data/test/greenpepper/example/freetextexampletest.rb

@@ -0,0 +1,151 @@
+=begin
+author: Simon Mathieu (simon.math@gmail.com)
+date: September 13, 2009
+=end
+
+require 'test/unit'
+require 'test/helper/assert.rb'
+require 'greenpepper/freetext'
+require 'greenpepper/example/freetextexample'
+
+include GreenPepper
+
+class FreeTextExampleTest < Test::Unit::TestCase
+  def setup
+    @example = FreeTextExample.new "FreeTextFixture1"
+  end
+
+  def test_free_text_example_successful_boolean_result
+    @example.add_action "success"
+    results = @example.execute
+
+    assert results[1].success?
+  end
+
+  def test_free_text_example_unsuccessful_boolean_result
+    @example.add_action "failure"
+    results = @example.execute
+
+    assert results[1].failure?
+  end
+
+  def test_free_text_example_unmapable_action
+    @example.add_action "unkown"
+    results = @example.execute
+    assert results[1].exception.is_a?(GreenPepperUnknownActionError)
+  end
+
+  def test_free_text_example_action_return_object_should_fail
+    @example.add_action "return some object"
+    results = @example.execute
+
+    assert results[1].failure?
+  end
+
+  def test_free_text_example_should_be_able_to_execute_a_list_of_actions
+    @example.add_action "success"
+    @example.add_action "failure"
+    results = @example.execute
+
+    assert results[1].success?
+    assert results[2].failure?
+  end
+
+  def test_free_text_example_should_execute_action_in_order
+    example = FreeTextExample.new "FreeTextFixtureCheckOrder"
+    example.add_action "action1"
+    example.add_action "action2"
+    results = example.execute
+
+    assert results[1].success?
+    assert results[2].success?
+  end
+
+  def test_free_text_fixture_not_found
+    example = FreeTextExample.new "Inexisting Fixture"
+    results = example.execute
+
+    assert results[0].error?
+  end
+
+  def test_free_text_should_match_regex_in_correct_fixture
+    example1 = FreeTextExample.new "FreeTextFixtureSame1"
+    example2 = FreeTextExample.new "FreeTextFixtureSame2"
+    example1.add_action "success once"
+    example2.add_action "success once"
+
+    stats1 = example1.execute
+    stats2 = example2.execute
+
+    assert_equal 1, stats1.successes
+    assert_equal 1, stats2.successes
+    assert_equal 0, stats1.failures
+    assert_equal 0, stats2.failures
+    assert_equal 0, stats1.errors
+    assert_equal 0, stats2.errors
+  end
+end
+
+class FreeTextFixture1
+  include FreeText
+
+  Check /success/ do 
+    true
+  end
+
+  Check /failure/ do 
+    false 
+  end
+
+  Check /return some object/ do
+    Object.new
+  end
+end
+
+class FreeTextFixtureSame1
+  include FreeText
+  @@first = true
+
+  Check /^success once$/ do 
+    ret = false
+    if @@first
+      @@first = false
+      ret = true
+    end
+    ret
+  end
+end
+
+class FreeTextFixtureSame2
+  include FreeText
+  @@first = true
+
+  Check /^success once$/ do 
+    ret = false
+    if @@first
+      @@first = false
+      ret = true
+    end
+    ret
+  end
+end
+
+class FreeTextFixtureCheckOrder
+  include FreeText
+
+  def initialize
+    @count = 0
+  end
+
+  Check /action1/ do 
+    @count += 1
+    raise "Bad order" unless 1 == @count
+    true
+  end
+
+  Check /action2/ do 
+    @count += 1
+    raise "Bad order" unless 2 == @count
+    true
+  end
+end

data/test/greenpepper/example/importexampletest.rb

@@ -0,0 +1,79 @@
+=begin
+author: Pascal Ouellet (pas.ouellet@gmail.com)
+date  : March 6, 09
+=end
+require 'test/helper/assertion'
+require 'test/helper/assert'
+require 'greenpepper/parser/table'
+require 'greenpepper/example/importexample'
+require 'greenpepper/factory/importexamplefactory'
+require 'greenpepper/core'
+
+include GreenPepper
+
+class ImportExampleTest < Test::Unit::TestCase
+  
+  def setup
+    @simple_table = ['import', 'test/common/importtestfixture']
+    @simple_example = ImportExample.new
+    @simple_example.add *@simple_table[1..-1]
+
+    @complex_table = ['Import',
+      'test/fixtures/importtestfixture',
+      'test/fixtures/importtestfixture2']
+    @complex_example = ImportExample.new
+    @complex_example.add *@complex_table[1..-1]
+
+
+    @example_with_errors = ImportExample.new
+    @example_with_errors.add 'test/fixtures/importtestfixture',
+      'somethingthatdontexist', 
+      'test/fixtures/importtestfixture2', 
+      'unknownimport'
+  end
+
+  def test_import_example_should_contain_imported_module
+    assert_equal @complex_table[1], @complex_example.imports[0]
+    assert_equal @complex_table[2], @complex_example.imports[1]
+  end
+
+  def test_import_example_should_load_modules_when_executed
+    assert_raise(NameError) {NonExistingFixture.new} 
+
+    @complex_example.execute
+
+    assert_nothing_raised {
+      fixture = ImportTestFixture.new
+      fixture.test
+      fixture = ImportTestFixture2.new
+      fixture.test
+    }
+  end
+
+  def test_execute_should_raise_significant_exception_if_not_found
+    expected_message = "Failed to import test/common/someunknownimport: no such file to load -- test/common/someunknownimport"
+    
+    import = ImportExample.new
+    import.add 'test/common/someunknownimport'
+    results = import.execute
+
+    assert_equal expected_message, results.at(1,0).exception.message
+  end
+
+  def test_results_should_not_be_collected_for_import_failures
+    results = @example_with_errors.execute
+
+    assert_equal 0, results.errors
+    assert_equal 0, results.successes
+    assert_equal 0, results.failures
+  end
+
+  def test_results_should_reflect_execution_of_import
+    results = @example_with_errors.execute
+
+    assert results.at(1, 0).is_a?(NoExampleResult)
+    assert results.at(2, 0).is_a?(ErrorExampleResult)
+    assert results.at(3, 0).is_a?(NoExampleResult)
+    assert results.at(4, 0).is_a?(ErrorExampleResult)
+  end
+end

data/test/greenpepper/example/nameresolvertest.rb

@@ -0,0 +1,56 @@
+=begin
+author: Sebastien Boisclair (SebBoisclair@gmail.com)
+date: Februrary 24, 2009
+=end
+
+require 'test/unit'
+require 'greenpepper/example/nameresolver'
+require 'test/fixtures/fixture.rb'
+
+include GreenPepper
+
+class NameResolverTest < Test::Unit::TestCase
+  def test_fixture_name_resolver_with_space_and_downcase_only
+    fixture_class = NameResolver.solve_fixture_name "Rule for example equality lowercase" 
+    assert_equal 'Ruleforexampleequalitylowercasefixture', fixture_class.name
+  end
+
+  def test_fixture_name_resolver_name_with_space_and_fixture_class_with_underscore
+    fixture_class = NameResolver.solve_fixture_name "Ruleforexample equality underscore"
+    assert_equal 'Ruleforexample_equality_underscore_fixture', fixture_class.name
+  end
+  
+  def test_fixture_name_resolver_name_in_camel_case
+    fixture_class = NameResolver.solve_fixture_name "RuleforexampleEqualityUnderscore"
+    assert_equal 'Ruleforexample_equality_underscore_fixture', fixture_class.name
+  end
+
+  def test_fixture_name_resolver_name_with_example_and_underscore_and_fixture_not_in_the_name
+    fixture_class = NameResolver.solve_fixture_name "RuleFor_example_Without_the f word"
+    assert_equal 'RuleFor_example_without_the_f_word', fixture_class.name
+  end
+  
+  def test_fixture_name_resolver_name_with_accents
+    fixture_class = NameResolver.solve_fixture_name "RuleFor éxample Without the f word"
+    assert_equal 'RuleFor_example_without_the_f_word', fixture_class.name
+  end
+
+  def test_fixture_name_resolver_name_with_illegal_caracters_removed
+    fixture_class = NameResolver.solve_fixture_name "RuleFor example Without the f word.,'\"&"
+    assert_equal 'RuleFor_example_without_the_f_word', fixture_class.name
+  end
+
+  def test_for_example_with_name_of_the_column_in_natural_language
+    assert_equal "sum_with_space", NameResolver.format_column_name( "sum With spaCe")
+  end
+
+  def test_exception_should_be_raised_when_accessor_missing_in_fixture
+    fixture_class = NameResolver.solve_fixture_name "RuleFor_example_without_accessor_to_header"
+    assert_raise(GreenPepperMissingMethodError) { 
+      NameResolver.set_instance_field(fixture_class, "h1", "field value")
+    }
+    assert_raise(GreenPepperMissingMethodError) { 
+      NameResolver.get_instance_field(fixture_class, "h1")
+    }
+  end
+end