ccls-ccls_engine 3.11.0

data/test/unit/ccls/study_subject_pii_test.rb

@@ -0,0 +1,278 @@
+require 'test_helper'
+
+#	This is just a collection of pii related tests 
+#	for StudySubject separated only for clarity due
+#	to the size of the StudySubjectTest class.
+class Ccls::StudySubjectPiiTest < ActiveSupport::TestCase
+
+	test "should return 'name not available' for study_subject without names" do
+		study_subject = create_study_subject
+		assert_nil study_subject.first_name
+		assert_nil study_subject.middle_name
+		assert_nil study_subject.last_name
+		assert_equal '[name not available]', study_subject.full_name
+	end
+
+	test "should not require dob on creation for mother" do
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(
+				:subject_type => SubjectType['Mother'],
+				:dob => nil )
+		}
+		assert_nil @study_subject.reload.dob
+	end
+
+	test "should not require dob on update for mother" do
+		#	flag not necessary as study_subject.subject_type exists
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_type => SubjectType['Mother'] )
+		}
+		assert_not_nil @study_subject.reload.dob
+		@study_subject.update_attributes(:dob => nil)
+		assert_nil @study_subject.reload.dob
+	end
+
+	test "should nullify blank email" do
+		assert_difference("StudySubject.count",1) do
+			study_subject = create_study_subject(:email => ' ')
+			assert_nil study_subject.reload.email
+		end
+	end
+
+	test "should allow multiple blank email" do
+		create_study_subject(:email => '  ')
+		assert_difference( "StudySubject.count", 1 ) do
+			study_subject = create_study_subject(:email => ' ')
+		end
+	end
+
+	test "should require properly formated email address" do
+		assert_difference( "StudySubject.count", 0 ) do
+			%w( asdf me@some@where.com me@somewhere ).each do |bad_email|
+				study_subject = create_study_subject(:email => bad_email)
+				assert study_subject.errors.on_attr_and_type?(:email,:invalid)
+			end
+		end
+		assert_difference( "StudySubject.count", 1 ) do
+			%w( me@some.where.com ).each do |good_email|
+				study_subject = create_study_subject(:email => good_email)
+				assert !study_subject.errors.on_attr_and_type?(:email,:invalid)
+			end
+		end
+	end
+
+	test "should return dob as a date NOT time" do
+		study_subject = create_study_subject(:dob => (Time.now - 5.days) )
+		assert_not_nil study_subject.dob
+		assert_changes("StudySubject.find(#{study_subject.id}).dob") {
+			study_subject.update_attributes(:dob => (Time.now - 4.days) )
+		}
+		assert !study_subject.new_record?
+		assert_not_nil study_subject.dob
+		assert study_subject.dob.is_a?(Date)
+		assert_equal study_subject.dob, study_subject.dob.to_date
+	end
+
+	test "should parse a properly formatted date" do
+		assert_difference( "StudySubject.count", 1 ) do
+			study_subject = create_study_subject(
+				:dob => Date.parse("January 1 2001") )
+			assert !study_subject.new_record?, 
+				"#{study_subject.errors.full_messages.to_sentence}"
+		end
+	end
+
+	test "should return join of study_subject's initials" do
+		study_subject = create_study_subject(
+			:first_name => "John",
+			:middle_name => "X",
+			:last_name  => "Smith" )
+		assert_equal 'JXS', study_subject.initials 
+	end
+
+	test "should return join of study_subject's initials without middle name" do
+		study_subject = create_study_subject(
+			:first_name => "John",
+			:last_name  => "Smith" )
+		assert_equal 'JS', study_subject.initials 
+	end
+
+	test "should return join of study_subject's initials with blank middle name" do
+		study_subject = create_study_subject(
+			:first_name => "John",
+			:middle_name => "",
+			:last_name  => "Smith" )
+		assert_equal 'JS', study_subject.initials 
+	end
+
+	test "should return join of study_subject's name" do
+		study_subject = create_study_subject(
+			:first_name => "John",
+			:middle_name => "Xavier",
+			:last_name  => "Smith" )
+		assert_equal 'John Xavier Smith', study_subject.full_name 
+	end
+
+	test "should return join of study_subject's name without middle name" do
+		study_subject = create_study_subject(
+			:first_name => "John",
+			:last_name  => "Smith" )
+		assert_equal 'John Smith', study_subject.full_name 
+	end
+
+	test "should return join of study_subject's name with blank middle name" do
+		study_subject = create_study_subject(
+			:first_name => "John",
+			:middle_name => "",
+			:last_name  => "Smith" )
+		assert_equal 'John Smith', study_subject.full_name 
+	end
+
+	test "should return 'name not available' if study_subject's names are blank" do
+		study_subject = create_study_subject
+		assert_equal '[name not available]', study_subject.full_name 
+	end
+
+	test "should return 'name not available' if study_subject's father's names are blank" do
+		study_subject = create_study_subject
+		assert_equal '[name not available]', study_subject.fathers_name
+	end
+
+	test "should return 'name not available' if study_subject's mother's names are blank" do
+		study_subject = create_study_subject
+		assert_equal '[name not available]', study_subject.mothers_name
+	end
+
+	test "should return 'name not available' if study_subject's guardian's names are blank" do
+		study_subject = create_study_subject
+		assert_equal '[name not available]', study_subject.guardians_name
+	end
+
+	test "should return join of father's name" do
+		study_subject = create_study_subject(
+			:father_first_name => "Santa",
+			:father_middle_name => "X.",
+			:father_last_name => "Claus" )
+		assert_equal 'Santa X. Claus', study_subject.fathers_name 
+	end
+
+	test "should return join of father's name without middle name" do
+		study_subject = create_study_subject(
+			:father_first_name => "Santa",
+			:father_last_name => "Claus" )
+		assert_equal 'Santa Claus', study_subject.fathers_name 
+	end
+
+	test "should return join of father's name with blank middle name" do
+		study_subject = create_study_subject(
+			:father_first_name => "Santa",
+			:father_middle_name => "",
+			:father_last_name => "Claus" )
+		assert_equal 'Santa Claus', study_subject.fathers_name 
+	end
+
+	test "should return join of mother's name" do
+		study_subject = create_study_subject(
+			:mother_first_name => "Ms",
+			:mother_middle_name => "X.",
+			:mother_last_name => "Claus" )
+		assert_equal 'Ms X. Claus', study_subject.mothers_name 
+	end
+
+	test "should return join of mother's name without middle name" do
+		study_subject = create_study_subject(
+			:mother_first_name => "Ms",
+			:mother_last_name => "Claus" )
+		assert_equal 'Ms Claus', study_subject.mothers_name 
+	end
+
+	test "should return join of mother's name with blank middle name" do
+		study_subject = create_study_subject(
+			:mother_first_name => "Ms",
+			:mother_middle_name => "",
+			:mother_last_name => "Claus" )
+		assert_equal 'Ms Claus', study_subject.mothers_name 
+	end
+
+	test "should return join of guardian's name" do
+		study_subject = create_study_subject(
+			:guardian_first_name => "Jack",
+			:guardian_middle_name => "X.",
+			:guardian_last_name => "Frost" )
+		assert_equal 'Jack X. Frost', study_subject.guardians_name 
+	end
+
+	test "should return join of guardian's name without middle name" do
+		study_subject = create_study_subject(
+			:guardian_first_name => "Jack",
+			:guardian_last_name => "Frost" )
+		assert_equal 'Jack Frost', study_subject.guardians_name 
+	end
+
+	test "should return join of guardian's name with blank middle name" do
+		study_subject = create_study_subject(
+			:guardian_first_name => "Jack",
+			:guardian_middle_name => "",
+			:guardian_last_name => "Frost" )
+		assert_equal 'Jack Frost', study_subject.guardians_name 
+	end
+
+	test "should require guardian_relationship_other if " <<
+			"guardian_relationship == other" do
+		assert_difference( "StudySubject.count", 0 ) do
+			study_subject = create_study_subject(
+				:guardian_relationship => SubjectRelationship['other'] )
+			assert study_subject.errors.on_attr_and_type?(:guardian_relationship_other,:blank)
+		end
+	end
+
+	test "should require guardian_relationship_other with custom message" do
+		assert_difference( "StudySubject.count", 0 ) do
+			study_subject = create_study_subject(
+				:guardian_relationship => SubjectRelationship['other'] )
+			assert study_subject.errors.on_attr_and_type?(:guardian_relationship_other,:blank)
+			assert_match /You must specify a relationship with 'other relationship' is selected/, 
+				study_subject.errors.full_messages.to_sentence
+			assert_no_match /Guardian relationship other/, 
+				study_subject.errors.full_messages.to_sentence
+		end
+	end
+
+	test "should require dob with custom message" do
+		assert_difference( "StudySubject.count", 0 ) do
+			study_subject = create_study_subject( :dob => nil )
+			assert study_subject.errors.on_attr_and_type?(:dob,:blank)
+			assert_match /Date of birth can't be blank/, 
+				study_subject.errors.full_messages.to_sentence
+			assert_no_match /DOB/i, 
+				study_subject.errors.full_messages.to_sentence
+		end
+	end
+
+	test "should not require dob if subject is mother" do
+		assert_difference('StudySubject.count',1) do
+			study_subject = create_mother_study_subject( :dob => nil )
+		end
+	end
+
+	test "should require dob if subject is not mother" do
+		assert_difference('StudySubject.count',0) do
+			study_subject = create_study_subject( :dob => nil )
+		end
+	end
+
+	test "should require birth_city if birth_country is 'United States'" do
+		assert_difference( "StudySubject.count", 0 ) do
+			study_subject = create_study_subject( :birth_country => 'United States' )
+			assert study_subject.errors.on_attr_and_type?(:birth_city,:blank)
+		end
+	end
+
+	test "should require birth_state if birth_country is 'United States'" do
+		assert_difference( "StudySubject.count", 0 ) do
+			study_subject = create_study_subject( :birth_country => 'United States' )
+			assert study_subject.errors.on_attr_and_type?(:birth_state,:blank)
+		end
+	end
+
+end

data/test/unit/ccls/study_subject_races_test.rb

@@ -0,0 +1,203 @@
+require 'test_helper'
+
+#	This is just a collection of race related tests 
+#	for StudySubject separated only for clarity due
+#	to the size of the StudySubjectTest class.
+class Ccls::StudySubjectRacesTest < ActiveSupport::TestCase
+
+	test "should create study_subject with race" do
+		assert_difference( 'Race.count', 1 ){
+		assert_difference( 'SubjectRace.count', 1 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			study_subject = create_study_subject
+			study_subject.races << Factory(:race)
+			assert !study_subject.new_record?,
+				"#{study_subject.errors.full_messages.to_sentence}"
+		} } }
+	end
+
+	test "should NOT destroy races with study_subject" do
+		assert_difference('StudySubject.count',1) {
+		assert_difference('Race.count',1) {
+			@study_subject = Factory(:subject_race).study_subject
+		} }
+		assert_difference('StudySubject.count',-1) {
+		assert_difference('Race.count',0) {
+			@study_subject.destroy
+		} }
+	end
+
+	test "should NOT destroy subject_races with study_subject" do
+		assert_difference('StudySubject.count',1) {
+		assert_difference('SubjectRace.count',1) {
+			@study_subject = Factory(:subject_race).study_subject
+		} }
+		assert_difference('StudySubject.count',-1) {
+		assert_difference('SubjectRace.count',0) {
+			@study_subject.destroy
+		} }
+	end
+
+	test "should return race name for string" do
+		study_subject = create_study_subject
+		assert_equal study_subject.race_names, 
+			"#{study_subject.races.first}"
+	end
+
+	test "should create study_subject with empty subject_races_attributes" do
+		assert_difference( 'SubjectRace.count', 0 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_races_attributes => { })
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert @study_subject.races.empty?
+		assert @study_subject.subject_races.empty?
+	end
+
+	test "should create study_subject with blank race_id" do
+		assert_difference( 'SubjectRace.count', 0 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_races_attributes => { 
+				'0' => { :race_id => '' }
+			})
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert @study_subject.races.empty?
+		assert @study_subject.subject_races.empty?
+	end
+
+	test "should create study_subject with subject_races_attributes race_id" do
+		assert Race.count > 0
+		assert_difference( 'SubjectRace.count', 1 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_races_attributes => {
+				'0' => { :race_id => Race.first.id }
+			})
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert !@study_subject.races.empty?
+		assert !@study_subject.subject_races.empty?
+		assert !@study_subject.subject_races.first.is_primary
+	end
+
+	test "should create study_subject with subject_races_attributes race_id and is_primary" do
+		assert Race.count > 0
+		assert_difference( 'SubjectRace.count', 1 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_races_attributes => {
+				'0' => { :race_id => Race.first.id, :is_primary => 'true' }
+			})
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert !@study_subject.races.empty?
+		assert !@study_subject.subject_races.empty?
+		assert  @study_subject.subject_races.first.is_primary
+	end
+
+	test "should create study_subject with subject_races_attributes multiple races" do
+		assert Race.count > 2
+		races = Race.all
+		assert_difference( 'SubjectRace.count', 3 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_races_attributes => {
+				'0' => { :race_id => races[1].id },
+				'1' => { :race_id => races[2].id },
+				'2' => { :race_id => races[3].id }
+			})
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert !@study_subject.races.empty?
+		assert_equal 3, @study_subject.races.length
+		assert !@study_subject.subject_races.empty?
+		assert_equal 3, @study_subject.subject_races.length
+		assert !@study_subject.subject_races.collect(&:is_primary).any?
+	end
+
+	test "should create study_subject with subject_races_attributes multiple races and is_primaries" do
+		assert Race.count > 2
+		races = Race.all
+		assert_difference( 'SubjectRace.count', 3 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_races_attributes => {
+				'0' => { :race_id => races[1].id, :is_primary => 'true' },
+				'1' => { :race_id => races[2].id, :is_primary => 'true' },
+				'2' => { :race_id => races[3].id, :is_primary => 'true' }
+			})
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert !@study_subject.races.empty?
+		assert_equal 3, @study_subject.races.length
+		assert !@study_subject.subject_races.empty?
+		assert_equal 3, @study_subject.subject_races.length
+		assert  @study_subject.subject_races.collect(&:is_primary).all?
+	end
+
+	test "should create study_subject with subject_races_attributes with is_primary and no race_id" do
+		assert Race.count > 0
+		assert_difference( 'SubjectRace.count', 0 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject(:subject_races_attributes => {
+				'0' => { :is_primary => 'true' }
+			})
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert @study_subject.races.empty?
+		assert @study_subject.subject_races.empty?
+	end
+
+	test "should NOT create study_subject with subject_races_attributes " <<
+			"if race is other and no other given" do
+		assert Race.count > 0
+		assert_difference( 'SubjectRace.count', 0 ){
+		assert_difference( "StudySubject.count", 0 ) {
+			@study_subject = create_study_subject(:subject_races_attributes => {
+				'0' => { :race_id => Race['other'].id }
+			})
+			assert @study_subject.errors.on_attr_and_type?("subject_races.other",:blank)
+		} }
+	end
+
+	test "should update study_subject with subject_races_attributes" do
+		assert Race.count > 0
+		assert_difference( 'SubjectRace.count', 0 ){
+		assert_difference( "StudySubject.count", 1 ) {
+			@study_subject = create_study_subject
+			assert !@study_subject.new_record?, 
+				"#{@study_subject.errors.full_messages.to_sentence}"
+		} }
+		assert @study_subject.races.empty?
+		assert @study_subject.subject_races.empty?
+		assert_difference( 'SubjectRace.count', 1 ){
+		assert_difference( "StudySubject.count", 0 ) {
+			@study_subject.update_attributes(:subject_races_attributes => {
+				'0' => { :race_id => Race.first.id, :is_primary => 'true' }
+			})
+		} }
+		assert !@study_subject.races.empty?
+		assert !@study_subject.subject_races.empty?
+		assert  @study_subject.subject_races.first.is_primary
+	end
+
+	test "should destroy subject_race on update with _destroy" do
+		study_subject = create_study_subject
+		assert_difference( 'SubjectRace.count', 1 ){
+			study_subject.update_attributes(:subject_races_attributes => {
+				'0' => { :race_id => Race.first.id, :is_primary => 'true' }
+			})
+		}
+		subject_race = study_subject.subject_races.first
+		assert_difference( 'SubjectRace.count', -1 ){
+			study_subject.update_attributes(:subject_races_attributes => {
+				'0' => { :id => subject_race.id, :_destroy => 1 }
+			})
+		}
+	end
+
+end