breakpointer-surveyor 0.2.0

data/spec/fixtures/answers.yml

@@ -0,0 +1,9 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+
+one:
+  question_id: 1
+  text: MyText
+
+two:
+  question_id: 1
+  text: MyText

data/spec/fixtures/dependencies.yml

@@ -0,0 +1,7 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+
+# one:
+#   column: value
+#
+# two:
+#   column: value

data/spec/fixtures/dependency_conditions.yml

@@ -0,0 +1,27 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+
+one:
+  dependency_id: 1
+  question_id: 1
+  answer_id: 1
+  operator: MyString
+  datetime_value: 2008-09-07 07:33:46
+  integer_value: 1
+  float_value: 1.5
+  unit: MyString
+  text_value: MyText
+  string_value: MyString
+  response_other: MyString
+
+two:
+  dependency_id: 1
+  question_id: 1
+  answer_id: 1
+  operator: MyString
+  datetime_value: 2008-09-07 07:33:46
+  integer_value: 1
+  float_value: 1.5
+  unit: MyString
+  text_value: MyText
+  string_value: MyString
+  response_other: MyString

data/spec/fixtures/question_groups.yml

@@ -0,0 +1,7 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+
+# one:
+#   column: value
+#
+# two:
+#   column: value

data/spec/fixtures/questions.yml

@@ -0,0 +1,15 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+
+one:
+  survey_section_id: 1
+  display_group_id: 1
+  display_type: MyString
+  display_order: 1
+  text: MyText
+
+two:
+  survey_section_id: 1
+  display_group_id: 1
+  display_type: MyString
+  display_order: 1
+  text: MyText

data/spec/fixtures/response_sets.yml

@@ -0,0 +1,13 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+
+one:
+  user_id: 1
+  survey_id: 1
+  started_at: 2008-06-19 09:31:24
+  completed_at: 2008-06-19 09:31:24
+
+two:
+  user_id: 1
+  survey_id: 1
+  started_at: 2008-06-19 09:31:24
+  completed_at: 2008-06-19 09:31:24

data/spec/fixtures/responses.yml

@@ -0,0 +1,9 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+
+one:
+  response_set_id: 1
+  question_id: 1
+
+two:
+  response_set_id: 1
+  question_id: 1

data/spec/fixtures/survey_sections.yml

@@ -0,0 +1,11 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+
+one:
+  survey_id: 1
+  title: MyString
+  description: MyText
+
+two:
+  survey_id: 1
+  title: MyString
+  description: MyText

data/spec/fixtures/surveys.yml

@@ -0,0 +1,9 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+
+one:
+  title: MyString
+  description: MyText
+
+two:
+  title: MyString
+  description: MyText

data/spec/fixtures/users.yml

@@ -0,0 +1,7 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+
+one:
+  name: MyString
+
+two:
+  name: MyString

data/spec/helpers/survey_importer_helper_spec.rb

@@ -0,0 +1,11 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe SurveyImporterHelper do
+  
+  #Delete this example and add some real ones or delete this file
+  it "should be included in the object returned by #helper" do
+    included_modules = (class << helper; self; end).send :included_modules
+    included_modules.should include(SurveyImporterHelper)
+  end
+
+end

data/spec/helpers/surveying_helper_spec.rb

@@ -0,0 +1,11 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe SurveyingHelper do
+  
+  #Delete this example and add some real ones or delete this file
+  it "should be included in the object returned by #helper" do
+    included_modules = (class << helper; self; end).send :included_modules
+    included_modules.should include(AppHelper)
+  end
+  
+end

data/spec/models/answer_spec.rb

@@ -0,0 +1,62 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+# describe Answer, "validations" do
+#   test_helper :validations
+#   before(:each) do
+#     @model = @answer = Answer.new(:question_id => 1, :text => "Red")
+#   end
+#   it 'should validate presence of' do
+#     assert_invalid :text, "can't be blank", '', ' ', nil
+#   end
+#   it 'should validate numericality of' do
+#     assert_invalid :question_id, 'is not a number', '', ' ', nil
+#     assert_valid :question_id, '1', '2'
+#     assert_invalid :question_id, 'is not a number', 'abcd', '1,2', '1.3'
+#   end
+# end
+describe Answer, "when creating a new answer" do
+  before(:each) do
+    @q = mock_model(Question)
+    @answer = Answer.new(:question => @q, :text => "Red")
+  end
+  
+  it "should be valid" do
+    @answer.should be_valid
+  end
+
+  it "should be invalid without a unique reference identifier (within the scope of its parent)" do
+    pending
+  end
+  
+  it "should return its parent question" do
+    @answer.question_id.should == @q.id
+    @answer.question.should == @q
+  end
+  
+  it "should have 'default' partial_name with nil question" do
+    @answer.question = nil
+    @answer.partial_name.should == "default"
+  end
+  
+  it "should have 'default' partial_name with nil question.pick and response_class" do    
+    @question=mock_model(Question, :pick => nil)
+    @answer.stub!(:question).and_return(@question)
+    @answer.response_class = nil
+    @answer.partial_name.should == "default"
+  end
+  
+  it "should have a_b partial_name for a question.pick and b response_class_string" do
+    @question=mock_model(Question, :pick => "a")
+    @answer.stub!(:question).and_return(@question)
+    @answer.stub!(:response_class_string).and_return("b")
+    @answer.partial_name.should == "a_b"
+  end
+    
+  it "should return a downcase response_class_string or nil" do
+    @answer.response_class = nil
+    @answer.response_class_string.should == nil
+    @answer.response_class = "CamelCase"
+    @answer.response_class_string.should == "camelcase"
+  end
+
+end

data/spec/models/dependency_condition_spec.rb

@@ -0,0 +1,347 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+
+describe DependencyCondition, "Class methods" do
+  it "should have a list of operators" do
+    DependencyCondition.respond_to?(:operators).should be_true
+    DependencyCondition.operators.class.should == Array
+    DependencyCondition.operators.size.should > 0
+    
+    DependencyCondition.operators.include?("==").should be_true
+    DependencyCondition.operators.include?("!=").should be_true
+    DependencyCondition.operators.include?("<").should be_true
+    DependencyCondition.operators.include?(">").should be_true
+    DependencyCondition.operators.include?("<=").should be_true
+    DependencyCondition.operators.include?(">=").should be_true
+  end
+end
+
+describe DependencyCondition, "instance" do
+  before(:each) do
+    @dependency_condition = DependencyCondition.new(:dependency_id => 1, :question_id => 45, :operator => "==", :answer_id => 23, :rule_key => "1")
+  end
+
+  it "should be valid" do
+    @dependency_condition.should be_valid
+  end
+
+  it "should be invalid without a parent dependency_id, question_id, answer_id" do
+    @dependency_condition.dependency_id = nil
+    @dependency_condition.should have(1).errors_on(:dependency_id)
+    @dependency_condition.question_id = nil
+    @dependency_condition.should have(1).errors_on(:question_id)
+    @dependency_condition.answer_id = nil
+    @dependency_condition.should have(1).errors_on(:answer_id)
+  end
+
+  it "should be invalid without an operator" do
+    @dependency_condition.operator = nil
+    @dependency_condition.should have(2).errors_on(:operator)
+  end
+  
+  it "should be invalid without a rule_key" do
+    @dependency_condition.should be_valid
+    @dependency_condition.rule_key = nil
+    @dependency_condition.should_not be_valid
+    @dependency_condition.should have(1).errors_on(:rule_key)
+  end
+
+  it "should have unique rule_key within the context of a dependency" do
+   @dependency_condition.should be_valid
+   DependencyCondition.create(:dependency_id => 2, :question_id => 46, :operator => "==", :answer_id => 14, :rule_key => "2")
+   @dependency_condition.rule_key = "2" #rule key uniquness is scoped by dependency_id
+   @dependency_condition.dependency_id = 2
+   @dependency_condition.should_not be_valid
+   @dependency_condition.should have(1).errors_on(:rule_key)
+  end
+
+  it "should have an operator in DependencyCondition.operators" do
+    DependencyCondition.operators.each do |o|
+      @dependency_condition.operator = o
+      @dependency_condition.should have(0).errors_on(:operator)
+    end
+    @dependency_condition.operator = "#"
+    @dependency_condition.should have(1).error_on(:operator)
+  end
+
+  it "should evaluate within the context of a response set object" do
+    @response = Response.new(:question_id => 45, :response_set_id => 40, :answer_id => 23)
+    @response.answer = Answer.new(:question_id => 45, :response_class => "answer")
+    @response_set = ResponseSet.new()
+    @response_set.stub!(:find_response).and_return(@response)
+    @dependency_condition.evaluation_of(@response_set).should be_true
+    # inversion
+    @alt_response = Response.new(:question_id => 45, :response_set_id => 40, :answer_id => 55)
+    @alt_response.answer = Answer.new(:question_id => 45, :response_class => "answer")
+    @alt_resp_set = ResponseSet.new()
+
+    @alt_resp_set.stub!(:find_response).and_return(@alt_response)
+    @dependency_condition.evaluation_of(@alt_resp_set).should be_false
+
+  end
+  
+  it "should return false if there is no response set value that corresponds to the dependency condition" do
+    @empty_rs = mock(ResponseSet, :find_response => nil)
+    @dependency_condition.evaluation_of(@empty_rs).should be_false
+  end
+  
+  describe "when helping the dependency object determine state" do
+    
+    it "returns its key as a symbol" do
+      @dependency_condition.symbol_key.should == @dependency_condition.rule_key.to_sym 
+    end
+    
+    it "converts to a hash for evaluation by the depedency object" do
+      @rs = mock(ResponseSet)
+      @dependency_condition.stub!(:evaluation_of).with(@rs)
+      @dependency_condition.to_evaluation_hash(@rs)
+    end
+    
+  end
+end
+
+describe DependencyCondition, "evaluting the resonse_set state" do
+
+  describe "when if given a response object whether the dependency is satisfied using '=='" do
+    before(:each) do
+      @dep_c = DependencyCondition.new(:answer_id => 2, :operator => "==")
+      @select_answer = Answer.new(:question_id => 1, :response_class => "answer")
+      @response = Response.new(:question_id => 314, :response_set_id => 159, :answer_id => 2)
+      @response.answer = @select_answer
+      @dep_c.answer = @select_answer
+      @dep_c.as(:answer).should == 2
+      @response.as(:answer).should == 2
+      @dep_c.as(:answer).should == @response.as(:answer)
+    end
+
+    it "knows checkbox/radio type response" do
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @dep_c.answer_id = 12
+      @dep_c.is_satisfied_by?(@response).should be_false
+    end
+
+    it "knows string value response" do
+      @select_answer.response_class = "string"
+      @response.string_value = "hello123"
+      @dep_c.string_value = "hello123"
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.string_value = "foo_abc"
+      @dep_c.is_satisfied_by?(@response).should be_false
+    end
+
+    it "knows a text value response" do
+      @select_answer.response_class = "text"
+      @response.text_value = "hello this is some text for comparison"
+      @dep_c.text_value = "hello this is some text for comparison"
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.text_value = "Not the same text"
+      @dep_c.is_satisfied_by?(@response).should be_false 
+    end
+
+    it "knows an integer value response" do
+      @select_answer.response_class = "integer"
+      @response.integer_value = 10045
+      @dep_c.integer_value = 10045
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.integer_value = 421
+      @dep_c.is_satisfied_by?(@response).should be_false
+    end
+
+    it "knows a float value response" do
+      @select_answer.response_class = "float"
+      @response.float_value = 121.1
+      @dep_c.float_value = 121.1
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.float_value = 130.123
+      @dep_c.is_satisfied_by?(@response).should be_false
+    end
+
+  end
+
+  describe "when if given a response object whether the dependency is satisfied using '!='" do
+    before(:each) do
+      @dep_c = DependencyCondition.new(:answer_id => 2, :operator => "!=")
+      @select_answer = Answer.new(:question_id => 1, :response_class => "answer")
+      @response = Response.new(:question_id => 314, :response_set_id => 159, :answer_id => 2)
+      @response.answer = @select_answer
+      @dep_c.answer = @select_answer
+      @dep_c.as(:answer).should == 2
+      @response.as(:answer).should == 2
+      @dep_c.as(:answer).should == @response.as(:answer)
+    end
+
+    it "knows checkbox/radio type response" do
+      @dep_c.is_satisfied_by?(@response).should be_false
+      @dep_c.answer_id = 12
+      @dep_c.is_satisfied_by?(@response).should be_true
+    end
+
+    it "knows string value response" do
+      @select_answer.response_class = "string"
+      @response.string_value = "hello123"
+      @dep_c.string_value = "hello123"
+      @dep_c.is_satisfied_by?(@response).should be_false
+      @response.string_value = "foo_abc"
+      @dep_c.is_satisfied_by?(@response).should be_true
+    end
+
+    it "knows a text value response" do
+      @select_answer.response_class = "text"
+      @response.text_value = "hello this is some text for comparison"
+      @dep_c.text_value = "hello this is some text for comparison"
+      @dep_c.is_satisfied_by?(@response).should be_false
+      @response.text_value = "Not the same text"
+      @dep_c.is_satisfied_by?(@response).should be_true 
+    end
+
+    it "knows an integer value response" do
+      @select_answer.response_class = "integer"
+      @response.integer_value = 10045
+      @dep_c.integer_value = 10045
+      @dep_c.is_satisfied_by?(@response).should be_false
+      @response.integer_value = 421
+      @dep_c.is_satisfied_by?(@response).should be_true
+    end
+
+    it "knows a float value response" do
+      @select_answer.response_class = "float"
+      @response.float_value = 121.1
+      @dep_c.float_value = 121.1
+      @dep_c.is_satisfied_by?(@response).should be_false
+      @response.float_value = 130.123
+      @dep_c.is_satisfied_by?(@response).should be_true
+    end
+
+  end
+
+  describe "when if given a response object whether the dependency is satisfied using '<'" do
+    before(:each) do
+      @dep_c = DependencyCondition.new(:answer_id => 2, :operator => "<")
+      @select_answer = Answer.new(:question_id => 1, :response_class => "answer")
+      @response = Response.new(:question_id => 314, :response_set_id => 159, :answer_id => 2)
+      @response.answer = @select_answer
+      @dep_c.answer = @select_answer
+
+    end
+
+    it "knows operator on integer value response" do
+      @select_answer.response_class = "integer"
+      @response.integer_value = 50
+      @dep_c.integer_value = 100
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.integer_value = 421
+      @dep_c.is_satisfied_by?(@response).should be_false
+    end
+
+    it "knows operator on float value response" do
+      @select_answer.response_class = "float"
+      @response.float_value = 5.1
+      @dep_c.float_value = 121.1
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.float_value = 130.123
+      @dep_c.is_satisfied_by?(@response).should be_false
+    end
+
+  end
+
+  describe "when if given a response object whether the dependency is satisfied using '<='" do
+    before(:each) do
+      @dep_c = DependencyCondition.new(:answer_id => 2, :operator => "<=")
+      @select_answer = Answer.new(:question_id => 1, :response_class => "answer")
+      @response = Response.new(:question_id => 314, :response_set_id => 159, :answer_id => 2)
+      @response.answer = @select_answer
+      @dep_c.answer = @select_answer
+
+    end
+
+    it "knows operator on integer value response" do
+      @select_answer.response_class = "integer"
+      @response.integer_value = 50
+      @dep_c.integer_value = 100
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.integer_value = 100
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.integer_value = 421
+      @dep_c.is_satisfied_by?(@response).should be_false
+    end
+
+    it "knows operator on float value response" do
+      @select_answer.response_class = "float"
+      @response.float_value = 5.1
+      @dep_c.float_value = 121.1
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.float_value = 121.1
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.float_value = 130.123
+      @dep_c.is_satisfied_by?(@response).should be_false
+    end
+
+  end
+
+  describe "when if given a response object whether the dependency is satisfied using '>'" do
+    before(:each) do
+      @dep_c = DependencyCondition.new(:answer_id => 2, :operator => ">")
+      @select_answer = Answer.new(:question_id => 1, :response_class => "answer")
+      @response = Response.new(:question_id => 314, :response_set_id => 159, :answer_id => 2)
+      @response.answer = @select_answer
+      @dep_c.answer = @select_answer
+
+    end
+
+    it "knows operator on integer value response" do
+      @select_answer.response_class = "integer"
+      @response.integer_value = 50
+      @dep_c.integer_value = 100
+      @dep_c.is_satisfied_by?(@response).should be_false
+      @response.integer_value = 421
+      @dep_c.is_satisfied_by?(@response).should be_true
+    end
+
+    it "knows operator on float value response" do
+      @select_answer.response_class = "float"
+      @response.float_value = 5.1
+      @dep_c.float_value = 121.1
+      @dep_c.is_satisfied_by?(@response).should be_false
+      @response.float_value = 130.123
+      @dep_c.is_satisfied_by?(@response).should be_true
+    end
+
+  end
+
+  describe "when if given a response object whether the dependency is satisfied using '>='" do
+    before(:each) do
+      @dep_c = DependencyCondition.new(:answer_id => 2, :operator => ">=")
+      @select_answer = Answer.new(:question_id => 1, :response_class => "answer")
+      @response = Response.new(:question_id => 314, :response_set_id => 159, :answer_id => 2)
+      @response.answer = @select_answer
+      @dep_c.answer = @select_answer
+
+    end
+
+    it "knows operator on integer value response" do
+      @select_answer.response_class = "integer"
+      @response.integer_value = 50
+      @dep_c.integer_value = 100
+      @dep_c.is_satisfied_by?(@response).should be_false
+      @response.integer_value = 100
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.integer_value = 421
+      @dep_c.is_satisfied_by?(@response).should be_true
+    end
+
+    it "knows operator on float value response" do
+      @select_answer.response_class = "float"
+      @response.float_value = 5.1
+      @dep_c.float_value = 121.1
+      @dep_c.is_satisfied_by?(@response).should be_false
+      @response.float_value = 121.1
+      @dep_c.is_satisfied_by?(@response).should be_true
+      @response.float_value = 130.123
+      @dep_c.is_satisfied_by?(@response).should be_true
+    end
+  end
+  
+  
+
+end
+