mingle-macro-development-toolkit 1.0

data/test/integration/rest_loader_test.rb

@@ -0,0 +1,86 @@
+#Copyright 2008 ThoughtWorks, Inc.  All rights reserved.
+
+require File.dirname(__FILE__) + '/integration_test_helper.rb'
+
+class RestLoaderTest < Test::Unit::TestCase
+  
+  TEST_PROJECT = 'http://bjanakir:p@localhost:8080/lightweight_projects/scrum_template_2_2.xml'
+  
+  def test_should_load_direct_project_attributes_from_correct_fixture
+    assert_not_nil project(TEST_PROJECT)
+    assert_equal 'scrum_template_2_2', project(TEST_PROJECT).identifier
+  end
+  
+  def test_should_load_first_level_project_associations_from_correct_fixture
+    assert_equal(['Release', 'Sprint', 'Story', 'Task', 'Defect', 'Feature', 'Epic Story'], project(TEST_PROJECT).card_types.collect(&:name))
+  end
+
+  def test_should_load_second_level_project_associations_for_card_type_from_correct_fixture
+    task_type = project(TEST_PROJECT).card_types.detect { |ct| ct.name == 'Task' }
+    assert_equal(['Planning - Release', 'Planning - Sprint', 'Planning - Story', 'Priority', 'Task Status', 'Owner',  'Task Estimate', 'Depend on'], task_type.property_definitions.collect(&:name))
+  end
+
+  def test_should_load_second_level_project_associations_for_property_definition_from_correct_fixture
+    priority_definition = project(TEST_PROJECT).property_definitions.detect { |pd| pd.name == 'Priority' }
+    assert_equal(['Story', 'Task', 'Defect'], priority_definition.card_types.collect(&:name))
+  end
+  
+  def test_should_load_correct_values_for_property_definitions
+    priority_definition = project(TEST_PROJECT).property_definitions.detect { |pd| pd.name == 'Priority' }
+    assert_equal ['Low', 'Medium', 'High'], priority_definition.values.collect(&:db_identifier)
+  end  
+
+  def test_should_load_correct_colors_for_values_of_property_definitions
+    priority_definition = project(TEST_PROJECT).property_definitions.detect { |pd| pd.name == 'Priority' }
+    assert_equal ['f1ff26', 'ff6600', 'b30600'], priority_definition.values.collect(&:color)
+  end  
+
+  def test_should_load_correct_team_members
+    assert_equal [], project(TEST_PROJECT).team.collect(&:login)
+  end  
+  
+  def test_should_detect_project_variables
+    assert_equal '#21 Release 1', project(TEST_PROJECT).value_of_project_variable('Current Release')
+  end  
+
+  def test_should_execute_mql_to_return_an_array_of_hash_results_for_each_result_row
+    mql_results = project(TEST_PROJECT).execute_mql("SELECT SUM('Estimate - planning') WHERE 'Planning - Release' = (Current Release) AND 'Added On' IS NOT NULL")
+
+    assert_equal 1, mql_results.size
+    assert_equal Hash, mql_results.first.class
+    assert_equal 86, mql_results.first['Sum_Estimate___Planning'].to_i
+  end  
+
+  def test_should_execute_number_format_remotely
+    proj = project(TEST_PROJECT)
+    assert_equal "3.67", proj.format_number_with_project_precision("3.6711").to_s
+    assert_equal "20.14", proj.format_number_with_project_precision("20.1398").to_s
+  end  
+
+  def test_should_execute_date_format_remotely
+    proj = project(TEST_PROJECT)
+    assert_equal "22 May 2005", proj.format_date_with_project_date_format(Date.new(2005, 5, 22))
+    assert_equal "06 Oct 2008", proj.format_date_with_project_date_format(Date.new(2008, 10, 6))
+  end  
+
+  def test_should_execute_mql_to_return_an_array_of_hash_results_for_each_result_row
+    mql_results = project(TEST_PROJECT).execute_mql("SELECT SUM('Estimate - planning') WHERE 'Planning - Release' = (Current Release) AND 'Added On' IS NOT NULL")
+
+    assert_equal 1, mql_results.size
+    assert_equal Hash, mql_results.first.class
+    assert_equal 86, mql_results.first['Sum_Estimate___Planning'].to_i
+  end  
+
+  def test_should_errors_in_executing_mql_should_be_available_in_the_test
+    project = project(TEST_PROJECT)
+    mql_results = project.execute_mql("SELECT 'Invalid Property Name'")
+    assert_equal 1, errors.size
+    assert_equal "Card property 'Invalid Property Name' does not exist!", errors.first
+  end  
+  
+  def test_should_raise_error_on_trying_to_call_values_for_anything_other_than_managed_or_user_properties
+    added_on = project(TEST_PROJECT).property_definitions.detect { |pd| pd.name == 'Added On' }
+    assert_raise(RuntimeError) { added_on.values }
+  end  
+  
+end

data/test/unit/fixture_loader.rb

@@ -0,0 +1,180 @@
+#Copyright 2008 ThoughtWorks, Inc.  All rights reserved.
+
+module FixtureLoaders
+  class Base
+    def initialize(mingle_file_name, macro_context=nil, alert_receiver=nil)
+      @mingle_file_name = mingle_file_name
+      @expanded_fixture = File.join(File.dirname(__FILE__), '..', 'fixtures', mingle_file_name)
+      raise "No such project fixture! #{mingle_file_name}" unless File.exist?(@expanded_fixture)
+    end
+  
+    def load_fixtures_for(name)
+      YAML::load(File.open("#{@expanded_fixture}/#{name}.yml"))
+    end
+  
+    def card_types_property_definitions_by_card_type_id_loader(card_type_id)
+      LoadCardTypesPropertyDefinitionsByCardTypeId.new(card_type_id, @mingle_file_name)
+    end  
+  
+    def card_types_property_definitions_by_property_definition_id_loader(property_definition_id)
+      LoadCardTypesPropertyDefinitionsByPropertyDefinitionId.new(property_definition_id, @mingle_file_name)
+    end
+  
+    def values_by_property_definition_id_loader(property_definition_id)
+      LoadValuesByPropertyDefinitionId.new(property_definition_id, @mingle_file_name)
+    end  
+
+    def card_type_by_id_loader(card_type_id)
+      LoadCardTypeById.new(card_type_id, @mingle_file_name)
+    end
+  
+    def property_definition_by_id_loader(property_definition_id)
+      LoadPropertyDefinitionById.new(property_definition_id, @mingle_file_name)
+    end  
+    
+    def card_types_by_project_id_loader
+      LoadCardTypesByProjectId.new(@mingle_file_name)
+    end  
+
+    def property_definitions_by_project_id_loader
+      LoadPropertyDefinitionsByProjectId.new(@mingle_file_name)
+    end  
+    
+    def team_by_project_id_loader
+      LoadTeamByProjectId.new(@mingle_file_name)
+    end
+    
+    def project_variables_by_project_id_loader
+      LoadProjectVariablesByProjectId.new(@mingle_file_name)
+    end    
+    
+  end
+
+  class ProjectLoader < Base
+    def project
+      project_attributes = load_fixtures_for('projects').first
+      project = Mingle::Project.new(OpenStruct.new(project_attributes), nil)
+      project.card_types_loader = card_types_by_project_id_loader
+      project.property_definitions_loader = property_definitions_by_project_id_loader
+      project.team_loader = team_by_project_id_loader
+      project.project_variables_loader = project_variables_by_project_id_loader
+      project
+    end
+  end
+
+  class LoadCardTypesByProjectId < Base
+    def load
+      load_fixtures_for('card_types').collect do |ct|
+        card_type = Mingle::CardType.new(OpenStruct.new(ct))
+        card_type.card_types_property_definitions_loader = card_types_property_definitions_by_card_type_id_loader(ct['id'])
+        card_type
+      end.sort_by(&:position)
+    end  
+  end
+
+  class LoadPropertyDefinitionsByProjectId < Base
+    def load
+      load_fixtures_for('property_definitions').collect do |pd|
+        property_definition = Mingle::PropertyDefinition.new(OpenStruct.new(pd))
+        property_definition.card_types_property_definitions_loader = card_types_property_definitions_by_property_definition_id_loader(pd['id'])
+        property_definition.values_loader = values_by_property_definition_id_loader(pd['id'])
+        property_definition
+      end
+    end  
+  end
+
+  class LoadCardTypesPropertyDefinitionsByCardTypeId < Base
+    def initialize(card_type_id, fixture_file_name)
+      super(fixture_file_name)
+      @card_type_id = card_type_id
+    end  
+  
+    def load
+      load_fixtures_for('card_types_property_definitions').collect do |ctpd|
+        next unless ctpd['card_type_id'] == @card_type_id
+
+        card_type_property_definition = Mingle::CardTypePropertyDefinition.new(OpenStruct.new(ctpd))
+        card_type_property_definition.card_type_loader = card_type_by_id_loader(ctpd['card_type_id'])
+        card_type_property_definition.property_definition_loader = property_definition_by_id_loader(ctpd['property_definition_id'])
+        card_type_property_definition
+      end.compact.sort_by(&:position).compact
+    end  
+
+  end  
+
+  class LoadCardTypesPropertyDefinitionsByPropertyDefinitionId < Base
+    def initialize(property_definition_id, fixture_file_name)
+      super(fixture_file_name)
+      @property_definition_id = property_definition_id
+    end  
+
+    def load
+      load_fixtures_for('card_types_property_definitions').collect do |ctpd|
+        next unless ctpd['property_definition_id'] == @property_definition_id
+      
+        card_type_property_definition = Mingle::CardTypePropertyDefinition.new(OpenStruct.new(ctpd))
+        card_type_property_definition.card_type_loader = card_type_by_id_loader(ctpd['card_type_id'])
+        card_type_property_definition.property_definition_loader = property_definition_by_id_loader(ctpd['property_definition_id'])
+        card_type_property_definition
+      end.compact.sort_by(&:position).compact
+    end  
+
+  end
+
+  class LoadCardTypeById < Base
+    def initialize(card_type_id, fixture_file_name)
+      super(fixture_file_name)
+      @card_type_id = card_type_id
+    end  
+
+    def load
+      yaml = load_fixtures_for('card_types').detect { |ct| ct['id'] == @card_type_id }
+      ct = Mingle::CardType.new(OpenStruct.new(yaml))
+      ct.card_types_property_definitions_loader = card_types_property_definitions_by_card_type_id_loader(yaml['id'])
+      ct
+    end  
+  end  
+
+  class LoadPropertyDefinitionById < Base
+    def initialize(property_definition_id, fixture_file_name)
+      super(fixture_file_name)
+      @property_definition_id = property_definition_id
+    end
+
+    def load
+      yaml = load_fixtures_for('property_definitions').detect { |pd| pd['id'] == @property_definition_id }
+      pd = Mingle::PropertyDefinition.new(OpenStruct.new(yaml))
+      pd.card_types_property_definitions_loader = card_types_property_definitions_by_property_definition_id_loader(yaml['id'])
+      pd.values_loader = values_by_property_definition_id_loader(yaml['id'])
+      pd
+    end  
+  end
+
+  class LoadValuesByPropertyDefinitionId < Base
+    def initialize(property_definition_id, fixture_file_name)
+      super(fixture_file_name)
+      @property_definition_id = property_definition_id
+    end
+  
+    def load
+      result = load_fixtures_for('property_values').collect do |pv|
+        next unless pv['property_definition_id'] == @property_definition_id
+        property_value = Mingle::PropertyValue.new(OpenStruct.new(pv))
+        property_value.property_definition_loader = property_definition_by_id_loader(pv['property_definition_id'])
+        property_value
+      end.compact
+    end  
+  end
+  
+  class LoadTeamByProjectId < Base
+    def load
+      load_fixtures_for('users').collect { |user| Mingle::User.new(OpenStruct.new(user)) }
+    end  
+  end
+
+  class LoadProjectVariablesByProjectId < Base
+    def load
+      load_fixtures_for('project_variables').collect { |pv| Mingle::ProjectVariable.new(OpenStruct.new(pv)) }
+    end  
+  end
+end

data/test/unit/fixture_loader_test.rb

@@ -0,0 +1,46 @@
+#Copyright 2008 ThoughtWorks, Inc.  All rights reserved.
+
+require File.dirname(__FILE__) + '/unit_test_helper.rb'
+
+class FixtureLoaderTest < Test::Unit::TestCase
+  
+  TEST_FIXTURE = 'sample'
+  
+  def test_should_load_direct_project_attributes_from_correct_fixture
+    assert_not_nil project(TEST_FIXTURE)
+    assert_equal 'scrum_template_2_1', project(TEST_FIXTURE).identifier
+  end
+  
+  def test_should_load_first_level_project_associations_from_correct_fixture
+    assert_equal(['Release', 'Sprint', 'Story', 'Task', 'Defect', 'Feature', 'Epic Story'], project(TEST_FIXTURE).card_types.collect(&:name))
+  end
+  
+  def test_should_load_second_level_project_associations_for_card_type_from_correct_fixture
+    task_type = project(TEST_FIXTURE).card_types.detect { |ct| ct.name == 'Task' }
+    assert_equal(['Estimate - Planning', 'Risk', 'Added On', 'Priority', 'Owner',  'Task Estimate'], task_type.property_definitions.collect(&:name))
+  end
+  
+  def test_should_load_second_level_project_associations_for_property_definition_from_correct_fixture
+    priority_definition = project(TEST_FIXTURE).property_definitions.detect { |pd| pd.name == 'Priority' }
+    assert_equal(['Story', 'Task', 'Defect'], priority_definition.card_types.collect(&:name))
+  end
+  
+  def test_should_load_correct_values_for_property_definitions
+    priority_definition = project(TEST_FIXTURE).property_definitions.detect { |pd| pd.name == 'Priority' }
+    assert_equal ['High', 'Medium', 'Low'], priority_definition.values.collect(&:db_identifier)
+  end  
+  
+  def test_should_load_correct_team_members
+    assert_equal ['groucho', 'harpo', 'karl'], project(TEST_FIXTURE).team.collect(&:login)
+  end  
+  
+  def test_should_detect_project_variables
+    assert_equal 'Release 3', project(TEST_FIXTURE).value_of_project_variable('Current Release')
+  end  
+  
+  def test_should_raise_error_on_trying_to_call_values_for_anything_other_than_managed_or_user_properties
+    added_on = project(TEST_FIXTURE).property_definitions.detect { |pd| pd.name == 'Added On' }
+    assert_raise(RuntimeError) { added_on.values }
+  end  
+end  
+

data/test/unit/unit_test_helper.rb

@@ -0,0 +1,13 @@
+#Copyright 2008 ThoughtWorks, Inc.  All rights reserved.
+
+require 'test/unit'
+require 'macro_development_toolkit'
+require File.dirname(__FILE__) + '/fixture_loader'
+
+class Test::Unit::TestCase
+  
+  def project(name)
+    @project ||= FixtureLoaders::ProjectLoader.new(name).project
+  end  
+  
+end  

metadata

@@ -0,0 +1,110 @@
+--- !ruby/object:Gem::Specification 
+name: mingle-macro-development-toolkit
+version: !ruby/object:Gem::Version 
+  version: "1.0"
+platform: ruby
+authors: 
+- ThoughtWorks Inc
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-01-08 00:00:00 -08:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: activesupport
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 2.0.2
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.8.0
+    version: 
+description: ""
+email: 
+- support@thoughtworks.com
+executables: 
+- new_mingle_macro
+extensions: []
+
+extra_rdoc_files: 
+- getting_started.txt
+- README.rdoc
+- LICENSE.txt
+files: 
+- getting_started.txt
+- README.rdoc
+- LICENSE.txt
+- Rakefile
+- lib/macro_development_toolkit.rb
+- lib/macro_development_toolkit/mingle/card_type_property_definition.rb
+- lib/macro_development_toolkit/mingle/card_type.rb
+- lib/macro_development_toolkit/mingle/project_variable.rb
+- lib/macro_development_toolkit/mingle/project.rb
+- lib/macro_development_toolkit/mingle/property_definition.rb
+- lib/macro_development_toolkit/mingle/property_value.rb
+- lib/macro_development_toolkit/mingle/user.rb
+- lib/macro_development_toolkit/mingle_model_loader.rb
+- tasks/test.rake
+- test/unit/fixture_loader.rb
+- test/unit/unit_test_helper.rb
+- test/unit/fixture_loader_test.rb
+- test/integration/rest_loader.rb
+- test/integration/integration_test_helper.rb
+- test/integration/rest_loader_test.rb
+- test/fixtures/sample/card_types.yml
+- test/fixtures/sample/card_types_property_definitions.yml
+- test/fixtures/sample/project_variables.yml
+- test/fixtures/sample/projects.yml
+- test/fixtures/sample/property_definitions.yml
+- test/fixtures/sample/users.yml
+- bin/new_mingle_macro
+- example/Rakefile
+- example/deploy.rake
+- example/init.rb
+- example/macro.rb
+- example/unit_test.rb
+- example/unit_test_helper.rb
+- example/integration_test.rb
+- example/integration_test_helper.rb
+has_rdoc: true
+homepage: "This toolkit provides support for developing, testing and deploying custom Mingle macros. "
+post_install_message: getting_started.txt
+rdoc_options: 
+- --main
+- README.rdoc
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: mingle-macros
+rubygems_version: 1.3.0
+signing_key: 
+specification_version: 2
+summary: ""
+test_files: []
+