hssc_surveyor 1.4.1.pre

data/spec/helpers/surveyor_helper_spec.rb

@@ -0,0 +1,118 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe SurveyorHelper do
+  context "numbering" do
+    let(:asset_directory){ asset_pipeline_enabled? ? "assets" : "images" }
+    before do
+      ActionController::Base.helpers.config.assets_dir = "public" unless asset_pipeline_enabled?
+    end
+    it "should return the question text with number, except for labels, dependencies, images, and grouped questions" do
+      q1 = Factory(:question)
+      q2 = Factory(:question, :display_type => "label")
+      q3 = Factory(:question, :dependency => Factory(:dependency))
+      q4 = Factory(:question, :display_type => "image", :text => "something.jpg")
+      q5 = Factory(:question, :question_group => Factory(:question_group))
+      helper.q_text(q1).should == "<span class='qnum'>1) </span>#{q1.text}"
+      helper.q_text(q2).should == q2.text
+      helper.q_text(q3).should == q3.text
+      helper.q_text(q4).should == %Q(<img alt="Something" src="/#{asset_directory}/something.jpg" />)
+      helper.q_text(q5).should == q5.text
+    end
+  end
+
+  context "with mustache text substitution" do
+    require 'mustache'
+    let(:mustache_context){ Class.new(::Mustache){ def site; "Northwestern"; end; def somethingElse; "something new"; end; def group; "NUBIC"; end } }
+    it "substitues values into Question#text" do
+      q1 = Factory(:question, :text => "You are in {{site}}")
+      label = Factory(:question, :display_type => "label", :text => "Testing {{somethingElse}}")
+      helper.q_text(q1, mustache_context).should == "<span class='qnum'>1) </span>You are in Northwestern"
+      helper.q_text(label, mustache_context).should == "Testing something new"
+    end
+  end
+
+  context "response methods" do
+    it "should find or create responses, with index" do
+      q1 = Factory(:question, :answers => [a = Factory(:answer, :text => "different")])
+      q2 = Factory(:question, :answers => [b = Factory(:answer, :text => "strokes")])
+      q3 = Factory(:question, :answers => [c = Factory(:answer, :text => "folks")])
+      rs = Factory(:response_set, :responses => [r1 = Factory(:response, :question => q1, :answer => a), r3 = Factory(:response, :question => q3, :answer => c, :response_group => 1)])
+
+      helper.response_for(rs, nil).should == nil
+      helper.response_for(nil, q1).should == nil
+      helper.response_for(rs, q1).should == r1
+      helper.response_for(rs, q1, a).should == r1
+      helper.response_for(rs, q2).attributes.reject{|k,v| k == "api_id"}.should == Response.new(:question => q2, :response_set => rs).attributes.reject{|k,v| k == "api_id"}
+      helper.response_for(rs, q2, b).attributes.reject{|k,v| k == "api_id"}.should == Response.new(:question => q2, :response_set => rs).attributes.reject{|k,v| k == "api_id"}
+      helper.response_for(rs, q3, c, "1").should == r3
+
+    end
+    it "should keep an index of responses" do
+      helper.response_idx.should == "1"
+      helper.response_idx.should == "2"
+      helper.response_idx(false).should == "2"
+      helper.response_idx.should == "3"
+    end
+    it "should translate response class into attribute" do
+      helper.rc_to_attr(:string).should == :string_value
+      helper.rc_to_attr(:text).should == :text_value
+      helper.rc_to_attr(:integer).should == :integer_value
+      helper.rc_to_attr(:float).should == :float_value
+      helper.rc_to_attr(:datetime).should == :datetime_value
+      helper.rc_to_attr(:date).should == :date_value
+      helper.rc_to_attr(:time).should == :time_value
+    end
+
+    it "should translate response class into as" do
+      helper.rc_to_as(:string).should == :string
+      helper.rc_to_as(:text).should == :text
+      helper.rc_to_as(:integer).should == :string
+      helper.rc_to_as(:float).should == :string
+      helper.rc_to_as(:datetime).should == :string
+      helper.rc_to_as(:date).should == :string
+      helper.rc_to_as(:time).should == :string
+    end
+  end
+
+  context "overriding methods" do
+    before do
+      module SurveyorHelper
+        include Surveyor::Helpers::SurveyorHelperMethods
+        alias :old_rc_to_as :rc_to_as
+        def rc_to_as(type_sym)
+          case type_sym.to_s
+          when /(integer|float)/ then :string
+          when /(datetime)/ then :datetime
+          else type_sym
+          end
+        end
+      end
+    end
+    it "should translate response class into as" do
+      helper.rc_to_as(:string).should == :string
+      helper.rc_to_as(:text).should == :text
+      helper.rc_to_as(:integer).should == :string
+      helper.rc_to_as(:float).should == :string
+      helper.rc_to_as(:datetime).should == :datetime  # not string
+      helper.rc_to_as(:date).should == :date          # not string
+      helper.rc_to_as(:time).should == :time
+    end
+    after do
+      module SurveyorHelper
+        include Surveyor::Helpers::SurveyorHelperMethods
+        def rc_to_as(type_sym)
+          old_rc_to_as(type_sym)
+        end
+      end
+    end
+  end
+
+  # run this context after 'overriding methods'
+  context "post override test" do
+    # Sanity check
+    it "should translate response class into as after override" do
+      helper.rc_to_as(:datetime).should == :string  # back to string
+      helper.rc_to_as(:date).should == :string      # back to string
+    end
+  end
+end

data/spec/lib/benchmark_spec.rb

@@ -0,0 +1,22 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe Surveyor do
+  it "should write thousands of response sets" do
+    Surveyor::Parser.parse(File.read(File.join(Rails.root, 'surveys', 'kitchen_sink_survey.rb')))
+    survey = Survey.last
+    rs = ResponseSet.create(:survey => survey)
+    survey.sections.each{|s| s.questions.each{|q| rs.responses.create(:question => q, :answer => q.answers.first)}}
+    Benchmark.bm 20 do |x|
+      x.report "a test" do
+        full_path = File.join(Rails.root,"#{survey.access_code}_#{Time.now.to_i}.csv")
+        File.open(full_path, 'w') do |f|
+          100.times do # adjust this to test
+            survey.response_sets.each_with_index{|r,i| f.write(r.to_csv(true, i == 0)) } # print access code every time, print_header first time
+          end
+        end        
+      end
+    end
+  end
+end
+
+

data/spec/lib/chinese_survey.rb

@@ -0,0 +1,14 @@
+survey "青少年人际关系问卷", :access_code => "青少年人际关系问卷" do
+  section "Basic questions" do
+    grid "第二部分：以下列出了一些描述。请您根据自己的实际情况作答。如果“非常不像我”，请选“1”，如果“非常像我”，请选“5”，以此类推。" do
+      a "1"
+      a "2"
+      a "3"
+      a "4"
+      a "5"
+      q "我常常想出新的有趣的点子", :pick => :one
+      q "我比同龄的其他孩子更有想象力", :pick => :one
+      q "即使一个人独处，我也不会觉得无聊", :pick => :one
+    end
+  end
+end

data/spec/lib/common_spec.rb

@@ -0,0 +1,34 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe Surveyor::Common, "" do
+  it "should convert text to a code that is more appropirate for a database entry" do
+    # A few answers from the survey
+    { "This? is a in - t3rrible-@nswer of! (question) on" => "this_t3rrible_nswer",
+      "Private insurance/ HMO/ PPO" => "private_insurance_hmo_ppo",
+      "<bold>VA</bold>" => "va",
+      "PMS (Premenstrual syndrome)/ PMDD (Premenstrual Dysphoric Disorder)" => "pms_pmdd",
+      "Have never been employed outside the home" => "never_been_employed_outside_home",
+      "Professional" => "professional",
+      "Not working because of temporary disability, but expect to return to a job" => "temporary_disability_expect_return_job",
+      "How long has it been since you last visited a doctor for a routine checkup (routine being not for a particular reason)?" => "visited_doctor_for_routine_checkup",
+      "Do you take medications as directed?" => "you_take_medications_as_directed",
+      "Do you every leak urine (or) water when you didn't want to?" => "urine_water_you_didnt_want", #checking for () and ' removal
+      "Do your biological family members (not adopted) have a \"history\" of any of the following?" => "family_members_history_any_following",
+      "Your health:" => "your_health",
+      "In general, you would say your health is:" => "you_would_say_your_health"
+    }.each{|k, v| Surveyor::Common.to_normalized_string(k).should == v}
+  end
+  describe '#generate_api_id' do
+    def generate
+      Surveyor::Common.generate_api_id
+    end
+
+    it 'generates a String' do
+      generate.should be_a String
+    end
+
+    it 'generates a new value every time' do
+      (1..100).collect { generate }.uniq.size.should == 100
+    end
+  end
+end

data/spec/lib/parser_spec.rb

@@ -0,0 +1,204 @@
+# -*- coding: utf-8 -*-
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe Surveyor::Parser do
+  let(:parser){ Surveyor::Parser.new }
+  it "should translate shortcuts into full model names" do
+    parser.send(:full, "section").should == "survey_section"
+    parser.send(:full, "g").should == "question_group"
+    parser.send(:full, "repeater").should == "question_group"
+    parser.send(:full, "label").should == "question"
+    parser.send(:full, "vc").should == "validation_condition"
+    parser.send(:full, "vcondition").should == "validation_condition"
+  end
+  it "should translate 'condition' based on context" do
+    parser.send(:full, "condition").should == "dependency_condition"
+    parser.send(:full, "c").should == "dependency_condition"
+    parser.context[:validation] = Validation.new
+    parser.send(:full, "condition").should == "validation_condition"
+    parser.send(:full, "c").should == "validation_condition"
+    parser.context[:validation] = nil
+    parser.send(:full, "condition").should == "dependency_condition"
+    parser.send(:full, "c").should == "dependency_condition"
+  end
+  it "should not translate bad shortcuts" do
+    parser.send(:full, "quack").should == "quack"
+    parser.send(:full, "grizzly").should == "grizzly"
+  end
+  it "should identify models that take blocks" do
+    parser.send(:block_models).should == %w(survey survey_section question_group)
+  end
+  it "should return a survey object" do
+    Surveyor::Parser.new.parse("survey 'hi' do\n end").is_a?(Survey).should be_true
+  end
+  describe 'reference checking' do
+    it 'accepts Answer#reference_identifier via underscore or hash syntax' do
+      survey_text = <<END
+  survey "Numbers" do
+    section_one "One" do
+      q_1 "Select a number", :pick => :one
+      a "One", {:reference_identifier => "1"}
+      a_2 "Two"
+      a_3 "Three"
+
+      label_2 "One is the loneliest number..."
+      dependency :rule => "A"
+      condition_A :q_1, "==", {:answer_reference => "1"}
+
+      label_3 "Two can be as bad as one..."
+      dependency :rule => "A"
+      condition_A :q_1, "==", {:answer_reference => "2"}
+
+      label_4 "that you'll ever do"
+      dependency :rule => "A"
+      condition_A :q_1, "==", :a_1
+
+      label_5 "it's the loneliest number since the number one"
+      dependency :rule => "A"
+      condition_A :q_1, "==", :a_2
+    end
+  end
+END
+      survey = Surveyor::Parser.new.parse(survey_text)
+      survey.is_a?(Survey).should == true
+    end
+
+  end
+
+  describe 'translations' do
+
+    it 'should produce the survey text for :default locale' do
+      survey_text = <<END
+  survey "One language is never enough" do
+   translations :en => :default, :es =>{'questions' => {'name' =>{ 'text' => '¡Hola!'}}}
+    section_one "One" do
+      label_name "Hello!"
+    end
+  end
+END
+      survey = Surveyor::Parser.new.parse(survey_text)
+      survey.is_a?(Survey).should == true
+      survey.translations.size.should == 2
+      question = survey.sections.first.questions.first
+      question.translation(:en)[:text].should == "Hello!"
+      question.translation(:es)[:text].should == "¡Hola!"
+    end
+
+
+    it 'should raise an error w/o :default locale' do
+      survey_text = <<END
+  survey "One language is never enough" do
+   translations :es =>{'questions' => {'name' =>{ 'text' => '¡Hola!'}}}
+    section_one "One" do
+      label_name "Hello!"
+    end
+  end
+END
+      s = Survey.all.size
+      expect {survey = Surveyor::Parser.new.parse(survey_text)}.to raise_error
+      Survey.all.size.should == s
+    end
+
+
+    it 'should allow multiple default locales' do
+      survey_text = <<END
+  survey "Just don't talk about tyres" do
+   translations :'en-US' => :default, :'en-GB' => :default, :es =>{'questions' => {'name' =>{'text' => '¡Hola!'}}}
+   section_one "One" do
+     label_name "Hello!"
+   end
+  end
+END
+
+      survey = Surveyor::Parser.new.parse(survey_text)
+      survey.is_a?(Survey).should == true
+      survey.translations.size.should == 3
+      question = survey.sections.first.questions.first
+      question.translation(:'en-US')[:text].should == "Hello!"
+      question.translation(:'en-GB')[:text].should == "Hello!"
+      question.translation(:es)[:text].should == "¡Hola!"
+    end
+
+    context 'when a translation is specified as a Hash' do
+      it 'should should treat the hash as an inline translation' do
+        survey_text = <<END
+survey "One language is never enough" do
+      translations :en => :default, :es => {"title"=>"Un idioma nunca es suficiente", "survey_sections"=>{"one"=>{"title"=>"Uno"}}, "question_groups"=>{"hello"=>{"text"=>"¡Hola!"}}, "questions"=>{"name"=>{"text"=>"¿Cómo se llama Usted?", "answers"=>{"name"=>{"help_text"=>"Mi nombre es..."}}}}}
+      section_one "One" do
+        g_hello "Hello" do
+          q_name "What is your name?"
+          a_name :string, :help_text => "My name is..."
+        end
+      end
+    end
+END
+        survey = Surveyor::Parser.new.parse(survey_text)
+        survey.is_a?(Survey).should == true
+        survey.translations.size.should == 2
+        survey.translation(:es)['title'].should == "Un idioma nunca es suficiente"
+      end
+    end
+
+    context 'when a translation is specified as a String' do
+
+      context 'when the survey filename is not given' do
+        it 'should look for the translation file relative to pwd' do
+          Dir.mktmpdir do |dir|
+            FileUtils.cd(dir) do
+              translation_yaml = YAML::dump({'title' => 'Un idioma nunca es suficiente'})
+              translation_temp_file = Tempfile.new('parser_spec_translation.yml',dir)
+              translation_temp_file.write(translation_yaml)
+              translation_temp_file.flush
+              survey_text = <<END
+survey "One language is never enough" do
+      translations :es =>'#{File.basename(translation_temp_file.path)}', :en => :default
+      section_one "One" do
+        g_hello "Hello" do
+          q_name "What is your name?"
+          a_name :string, :help_text => "My name is..."
+        end
+      end
+    end
+END
+              survey_temp_file = Tempfile.new('parser_spec_survey.rb',dir)
+              survey_temp_file.write(survey_text)
+              survey_temp_file.flush
+              Surveyor::Parser.parse(File.read(survey_temp_file.path))
+              survey = Survey.where(:title=>'One language is never enough').first
+              survey.nil?.should == false
+              survey.translation(:es)['title'].should == "Un idioma nunca es suficiente"
+            end
+          end
+        end
+      end
+      context 'when the survey filename is given' do
+        it 'should look for the translation file relative to the survey directory' do
+          Dir.mktmpdir do |dir|
+            translation_yaml = YAML::dump({'title' => 'Un idioma nunca es suficiente'})
+            translation_temp_file = Tempfile.new('surveyor:parser_spec.rb',dir)
+            translation_temp_file.write(translation_yaml)
+            translation_temp_file.flush
+            survey_text = <<END
+survey "One language is never enough" do
+      translations :es =>'#{File.basename(translation_temp_file.path)}', :en => :default
+      section_one "One" do
+        g_hello "Hello" do
+          q_name "What is your name?"
+          a_name :string, :help_text => "My name is..."
+        end
+      end
+    end
+END
+            survey_temp_file = Tempfile.new('surveyor:parser_spec.rb',dir)
+            survey_temp_file.write(survey_text)
+            survey_temp_file.flush
+            Surveyor::Parser.parse_file(survey_temp_file.path)
+            survey = Survey.where(:title=>'One language is never enough').first
+            survey.nil?.should == false
+            survey.translation(:es)['title'].should == "Un idioma nunca es suficiente"
+          end
+        end
+      end
+    end
+  end
+end

data/spec/lib/rake_kitchen_sink.rb

@@ -0,0 +1,40 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+require 'rake'
+
+describe Surveyor::Parser do
+  before do
+    @rake = Rake::Application.new
+    Rake.application = @rake
+    Rake.application.rake_require "lib/tasks/surveyor_tasks"
+    Rake::Task.define_task(:environment)
+  end
+  it "should return properly parse the kitchen sink survey" do
+    ENV["FILE"]="surveys/kitchen_sink_survey.rb"
+    @rake["surveyor"].invoke
+    
+    Survey.count.should == 1
+    SurveySection.count.should == 2 
+    Question.count.should == 44 
+    Answer.count.should == 241 
+    Dependency.count.should == 6 
+    DependencyCondition.count.should == 9 
+    QuestionGroup.count.should == 6
+
+    Survey.all.map(&:destroy)
+  end
+  it "should return properly parse a UTF8 survey" do
+    ENV["FILE"]="../spec/lib/chinese_survey.rb"
+    @rake["surveyor"].invoke
+    
+    Survey.count.should == 1
+    SurveySection.count.should == 1
+    Question.count.should == 3
+    Answer.count.should == 15
+    Dependency.count.should == 0
+    DependencyCondition.count.should == 0
+    QuestionGroup.count.should == 1
+
+    Survey.all.map(&:destroy)
+  end
+
+end

data/spec/lib/redcap_parser_spec.rb

@@ -0,0 +1,75 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe Surveyor::RedcapParser do
+  before(:each) do
+    # @parser = Surveyor::Parser.new
+  end
+  it "should require specific columns" do
+    # with standard fields
+    x = %w(field_units choices_or_calculations text_validation_type variable__field_name form_name  section_header field_type field_label field_note text_validation_min text_validation_max identifier branching_logic_show_field_only_if required_field)
+    Surveyor::RedcapParser.new.missing_columns(x).should be_blank
+    # without field_units
+    y = %w(choices_or_calculations text_validation_type variable__field_name form_name  section_header field_type field_label field_note text_validation_min text_validation_max identifier branching_logic_show_field_only_if required_field)
+    Surveyor::RedcapParser.new.missing_columns(y).should be_blank
+    # choices_or_calculations => choices_calculations_or_slider_labels
+    z = %w(field_units choices_calculations_or_slider_labels text_validation_type variable__field_name form_name  section_header field_type field_label field_note text_validation_min text_validation_max identifier branching_logic_show_field_only_if required_field)
+    Surveyor::RedcapParser.new.missing_columns(z).should be_blank
+    # text_validation_type => text_validation_type_or_show_slider_number
+    a = %w(field_units choices_or_calculations text_validation_type_or_show_slider_number variable__field_name form_name  section_header field_type field_label field_note text_validation_min text_validation_max identifier branching_logic_show_field_only_if required_field)
+    Surveyor::RedcapParser.new.missing_columns(a).should be_blank
+  end
+  it "should decompose dependency rules" do
+    # basic
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[f1_q12]="1"').should == {:rule => "A", :components => ['[f1_q12]="1"']}
+    # spacing
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[f1_q9] = "1"').should == {:rule => "A", :components => ['[f1_q9] = "1"']}
+    # and
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[pre_q88]="1" and [pre_q90]="1"').should == {:rule => "A and B", :components => ['[pre_q88]="1"', '[pre_q90]="1"']}
+    # or
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[second_q111]="1" or [second_q111]="3"').should == {:rule => "A or B", :components => ['[second_q111]="1"', '[second_q111]="3"']}
+    # or and
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[second_q100]="1" or [second_q100]="3" and [second_q101]="1"').should == {:rule => "A or B and C", :components => ['[second_q100]="1"', '[second_q100]="3"', '[second_q101]="1"']}
+    # and or
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[second_q4]="1" and [second_q11]="1" or [second_q11]="98"').should == {:rule => "A and B or C", :components => ['[second_q4]="1"', '[second_q11]="1"', '[second_q11]="98"']}
+    # or or or
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[pre_q74]="1" or [pre_q74]="2" or [pre_q74]="4" or [pre_q74]="5"').should == {:rule => "A or B or C or D", :components => ['[pre_q74]="1"', '[pre_q74]="2"', '[pre_q74]="4"', '[pre_q74]="5"']}
+    # and with different operator
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[f1_q15] >= 21 and [f1_q28] ="1"').should == {:rule => "A and B", :components => ['[f1_q15] >= 21', '[f1_q28] ="1"']}
+  end
+  it "should decompose nested dependency rules" do
+    # external parenthesis
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('([pre_q74]="1" or [pre_q74]="2" or [pre_q74]="4" or [pre_q74]="5") and [pre_q76]="2"').should == {:rule => "(A or B or C or D) and E", :components => ['[pre_q74]="1"', '[pre_q74]="2"', '[pre_q74]="4"', '[pre_q74]="5"', '[pre_q76]="2"']}
+    # internal parenthesis
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[f1_q10(4)]="1"').should == {:rule => "A", :components => ['[f1_q10(4)]="1"']}
+    # internal and external parenthesis
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('([f1_q7(11)] = "1" or [initial_52] = "1") and [pre_q76]="2"').should == {:rule => "(A or B) and C", :components => ['[f1_q7(11)] = "1"', '[initial_52] = "1"', '[pre_q76]="2"']}
+  end
+  it "should decompose shortcut dependency rules" do
+    # 'or' on the right of the operator
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[initial_108] = "1" or "2"').should == {:rule => "A or B", :components => ['[initial_108] = "1"', '[initial_108] = "2"']}
+    # multiple 'or' on the right
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[initial_52] = "1" or "2" or "3"').should == {:rule => "A or B or C", :components => ['[initial_52] = "1"', '[initial_52] = "2"', '[initial_52] = "3"']}
+    # commas on the right
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[initial_189] = "1, 2, 3"').should == {:rule => "(A and B and C)", :components => ['[initial_189] = "1"', '[initial_189] = "2"', '[initial_189] = "3"']}
+    # multiple internal parenthesis on the left
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_rule('[initial_119(1)(2)(3)(4)(5)] = "1"').should == {:rule => "(A and B and C and D and E)", :components => ['[initial_119(1)] = "1"', '[initial_119(2)] = "1"', '[initial_119(3)] = "1"', '[initial_119(4)] = "1"', '[initial_119(5)] = "1"']}
+  end
+  it "should decompose components" do
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_component('[initial_52] = "1"').should == {:question_reference => 'initial_52', :operator => '==', :answer_reference => '1'}
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_component('[initial_119(2)] = "1"').should == {:question_reference => 'initial_119', :operator => '==', :answer_reference => '2'}
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_component('[f1_q15] >= 21').should == {:question_reference => 'f1_q15', :operator => '>=', :integer_value => '21'}
+    # basic, blanks
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_component("[f1_q15]=''").should == {:question_reference => 'f1_q15', :operator => '==', :answer_reference => ''}
+    # basic, negatives
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_component("[f1_q15]='-2'").should == {:question_reference => 'f1_q15', :operator => '==', :answer_reference => '-2'}
+    # internal parenthesis
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_component("[hiprep_heat2(97)] = '1'").should == {:question_reference => 'hiprep_heat2', :operator => '==', :answer_reference => '97'}
+    Dependency.new.extend(SurveyorRedcapParserDependencyMethods).decompose_component("[hi_event1_type] <> ''").should == {:question_reference => 'hi_event1_type', :operator => '!=', :answer_reference => ''}
+
+  end
+  it "should return a survey object" do
+    x = %("Variable / Field Name","Form Name","Field Units","Section Header","Field Type","Field Label","Choices OR Calculations","Field Note","Text Validation Type","Text Validation Min","Text Validation Max",Identifier?,"Branching Logic (Show field only if...)","Required Field?"\nstudy_id,demographics,,,text,"Study ID",,,,,,,,)
+    Surveyor::RedcapParser.new.parse(x, "redcaptest").is_a?(Survey).should be_true
+  end
+
+end

data/spec/lib/tasks_spec.rake

@@ -0,0 +1,26 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+require "rake"
+
+describe "app rake tasks" do
+  before(:all) do # do this only once before all tests
+    @rake = Rake::Application.new
+    Rake.application = @rake
+    Rake.application.rake_require "lib/tasks/surveyor_tasks"
+    Rake::Task.define_task(:environment)
+  end
+  after do # after every test
+    @rake[@task_name].reenable if @task_name
+  end
+
+  it "should have 'environment' as a prereq" do
+    @task_name = "surveyor:parse"
+    @rake[@task_name].prerequisites.should include("environment")
+  end
+  it "should should trace" do
+    ENV["FILE"]="surveys/kitchen_sink_survey.rb"
+    @task_name = "surveyor:parse"
+    @rake.options.trace = true
+    Surveyor::Parser.should_receive(:parse).with(File.read(File.join(Rails.root, ENV["FILE"])), {:trace => true})
+    @rake[@task_name].invoke
+  end
+end