ccls-ccls_engine 3.11.0

data/lib/ccls_engine/action_view_extension.rb

@@ -0,0 +1,3 @@
+module Ccls::ActionViewExtension; end
+require 'ccls_engine/action_view_extension/base'
+require 'ccls_engine/action_view_extension/form_builder'

data/lib/ccls_engine/action_view_extension/base.rb

@@ -0,0 +1,53 @@
+module Ccls::ActionViewExtension::Base
+
+	def self.included(base)
+		base.send(:include, InstanceMethods)
+	end
+
+	module InstanceMethods
+
+		def yndk(value=nil)
+			YNDK[value]||' '
+		end
+
+		def ynodk(value=nil)
+			YNODK[value]||' '
+		end
+
+		def ynrdk(value=nil)
+			YNRDK[value]||' '
+		end
+
+		def adna(value=nil)
+			ADNA[value]||' '
+		end
+
+		def _wrapped_yndk_spans(object_name,method,options={})
+			object = instance_variable_get("@#{object_name}")
+			_wrapped_spans(object_name,method,options.update(
+				:value => (YNDK[object.send(method)]||' ') ) )
+		end
+
+		def _wrapped_ynodk_spans(object_name,method,options={})
+			object = instance_variable_get("@#{object_name}")
+			_wrapped_spans(object_name,method,options.update(
+				:value => (YNODK[object.send(method)]||' ') ) )
+		end
+
+		def _wrapped_ynrdk_spans(object_name,method,options={})
+			object = instance_variable_get("@#{object_name}")
+			_wrapped_spans(object_name,method,options.update(
+				:value => (YNRDK[object.send(method)]||' ') ) )
+		end
+
+		def _wrapped_adna_spans(object_name,method,options={})
+			object = instance_variable_get("@#{object_name}")
+			_wrapped_spans(object_name,method,options.update(
+				:value => (ADNA[object.send(method)]||' ') ) )
+		end
+
+	end	#	module InstanceMethods
+
+end	#	module Ccls::ActionViewExtension::Base
+ActionView::Base.send(:include, 
+	Ccls::ActionViewExtension::Base )

data/lib/ccls_engine/action_view_extension/form_builder.rb

@@ -0,0 +1,39 @@
+module Ccls::ActionViewExtension::FormBuilder
+
+	def self.included(base)
+		base.send(:include,InstanceMethods)
+	end
+
+	module InstanceMethods
+
+#	NOTE 
+#		calling <%= f.wrapped_yndk_select :code %> will NOT call these methods.
+#		It will call the method missing and then the @template.method
+#		Actually, now I believe that it will.
+#
+
+		def yndk_select(method,options={},html_options={})
+			@template.select(object_name, method, YNDK.selector_options,
+				{:include_blank => true}.merge(objectify_options(options)), html_options)
+		end
+
+		def ynrdk_select(method,options={},html_options={})
+			@template.select(object_name, method, YNRDK.selector_options,
+				{:include_blank => true}.merge(objectify_options(options)), html_options)
+		end
+
+		def ynodk_select(method,options={},html_options={})
+			@template.select(object_name, method, YNODK.selector_options,
+				{:include_blank => true}.merge(objectify_options(options)), html_options)
+		end
+
+		def adna_select(method,options={},html_options={})
+			@template.select(object_name, method, ADNA.selector_options,
+				{:include_blank => true}.merge(objectify_options(options)), html_options)
+		end
+
+	end	#	module InstanceMethods
+
+end	#	module Ccls::ActionViewExtension::FormBuilder
+ActionView::Helpers::FormBuilder.send(:include, 
+	Ccls::ActionViewExtension::FormBuilder )

data/lib/ccls_engine/active_record_extension.rb

@@ -0,0 +1,2 @@
+module Ccls::ActiveRecordExtension; end
+require 'ccls_engine/active_record_extension/base'

data/lib/ccls_engine/active_record_extension/base.rb

@@ -0,0 +1,70 @@
+module Ccls::ActiveRecordExtension::Base
+
+	def self.included(base)
+#		base.send(:include, InstanceMethods)
+		base.extend(ClassMethods)
+	end
+
+	module ClassMethods
+
+		def acts_like_a_hash(*args)
+			options = {
+				:key   => :key,
+				:value => :description
+			}.update(args.extract_options!)
+
+			class_eval do
+
+				validates_presence_of   options[:key], options[:value]
+				validates_uniqueness_of options[:key], options[:value]
+				validates_length_of     options[:key], options[:value],
+					:maximum => 250, :allow_blank => true
+
+				# Treats the class a bit like a Hash and
+				# searches for a record with a matching key.
+				def self.[](key)
+					# may need to deal with options[:key] here, but not needed yet
+					find_by_key(key.to_s)
+				end
+
+			end	#	class_eval do
+		end	#	def acts_like_a_hash(*args)
+
+
+#		#
+#		#	Create virtual attribute accessors for datetime parts,
+#		#		year, month, day, hour, minute for use by 
+#		#		view selectors and model validations?
+#		#
+#		#	If this all works, may want to separate it out.
+#		#
+#		def datetime_accessors_for(*args)
+#			options = { 
+#			}.update(args.extract_options!)
+#			args.each do |field|
+#
+##				What if there is no 'field'?  Typo?
+#
+##				When to actually compile the 'field'
+#
+##				define instance variable "#{field}_year"
+#
+#				define_method "#{field}_year" do
+#					#	return the instance variable? or pull it from 'field'?
+#				end
+#
+#				define_method "#{field}_year=" do |new_year|
+#					#	just set the instance variable?
+#				end
+#
+#			end
+#		end	#	def datetime_accessors_for(*args)
+
+	end	#	module ClassMethods
+
+#	module InstanceMethods
+#	end	#	module InstanceMethods
+
+end	#	module Ccls::ActiveRecordExtension::Base
+ActiveRecord::Base.send(:include, 
+	Ccls::ActiveRecordExtension::Base )

data/lib/ccls_engine/active_record_shared.rb

@@ -0,0 +1,8 @@
+#
+#	Due to the possibility of rails adding a class called ActiveRecord::Shared
+#	I'm just going to name this ActiveRecordShared
+#
+class ActiveRecordShared < ActiveRecord::Base
+	use_db :prefix => "shared_"
+	self.abstract_class = true
+end

data/lib/ccls_engine/assertions.rb

@@ -0,0 +1,69 @@
+module Ccls::Assertions
+
+	def self.included(base)
+		base.extend(ClassMethods)
+	end
+
+	def assert_subject_is_eligible(study_subject)
+		hxe = study_subject.enrollments.find_by_project_id(Project['HomeExposures'].id)
+		assert_not_nil hxe
+		assert_nil     hxe.ineligible_reason_id
+		assert_equal   hxe.is_eligible, YNDK[:yes]
+	end
+	alias_method :assert_study_subject_is_eligible, :assert_subject_is_eligible
+
+	def assert_subject_is_not_eligible(study_subject)
+		hxe = study_subject.enrollments.find_by_project_id(Project['HomeExposures'].id)
+		assert_not_nil hxe
+		assert_not_nil hxe.ineligible_reason_id
+		assert_equal   hxe.is_eligible, YNDK[:no]
+	end
+	alias_method :assert_study_subject_is_not_eligible, :assert_subject_is_not_eligible
+
+	module ClassMethods
+
+		def assert_should_create_default_object
+			#	It appears that model_name is a defined class method already in ...
+			#	activesupport-####/lib/active_support/core_ext/module/model_naming.rb
+			test "should create default #{model_name.sub(/Test$/,'').underscore}" do
+				assert_difference( "#{model_name}.count", 1 ) do
+					object = create_object
+					assert !object.new_record?, 
+						"#{object.errors.full_messages.to_sentence}"
+				end
+			end
+		end
+
+		def assert_should_behave_like_a_hash(*args)
+			options = {
+				:key => :key,
+				:value => :description
+			}
+			options.update(args.extract_options!)
+
+			assert_should_require_attribute( options[:key], options[:value] )
+			assert_should_require_unique_attribute( options[:key], options[:value] )
+			assert_should_require_attribute_length( options[:key], options[:value],
+				:maximum => 250 )
+
+			test "should find by key with ['string']" do
+				object = create_object
+				assert object.is_a?(model_name.constantize)
+				found = (model_name.constantize)[object.key.to_s]
+				assert found.is_a?(model_name.constantize)
+				assert_equal object, found
+			end
+
+			test "should find by key with [:symbol]" do
+				object = create_object
+				assert object.is_a?(model_name.constantize)
+				found = (model_name.constantize)[object.key.to_sym]
+				assert found.is_a?(model_name.constantize)
+				assert_equal object, found
+			end
+
+		end
+
+	end
+end
+ActiveSupport::TestCase.send(:include,Ccls::Assertions)

data/lib/ccls_engine/autotest.rb

@@ -0,0 +1,54 @@
+class Autotest::Rails
+
+	#
+	#	Need both the mapping and the extra files
+	#
+	def run_with_ccls_engine
+		add_exception %r%config/%
+		add_exception %r%versions/%
+		add_exception %r%\.git/%
+		self.extra_files << File.expand_path(File.join(
+				File.dirname(__FILE__),'/../../test/unit/ccls/'))
+
+#		self.extra_files << File.expand_path(File.join(
+#				File.dirname(__FILE__),'/../../test/functional/ccls/'))
+
+#		add_mapping( 
+#			%r{^#{File.expand_path(File.join(File.dirname(__FILE__),'/../../test/'))}/(unit|functional)/ccls/.*_test\.rb$}
+#			) do |filename, _|
+#			filename
+#		end
+
+		add_mapping( 
+			%r{^#{File.expand_path(File.join(File.dirname(__FILE__),'/../../test/'))}/unit/ccls/.*_test\.rb$}
+			) do |filename, _|
+			filename
+		end
+
+		##
+		#	This stops the ...
+		#
+		#	Unable to map class Ccls::IdentifierTest to a file
+		#	Unable to map class Ccls::SubjectTest to a file
+		#
+		#	By default autotest is expecting all the namespaces to end with Test
+		#		ie. CclsTest::IdentifierTest
+		#	Could have renamed the dir, I suppose.
+		#
+		Dir[File.join(File.dirname(__FILE__),'/../../test/unit/**/*rb')].each do |f|
+#	the condition isn't as important as grabbing "ccls/test_file_name.rb" for camelcasing
+			if f =~ /test\/unit\/(ccls\/.*)\.rb/
+				self.extra_class_map[$1.camelcase] = File.expand_path(f)
+			end
+		end
+#		Dir[File.join(File.dirname(__FILE__),'/../../test/functional/**/*rb')].each do |f|
+#			if f =~ /test\/functional\/(ccls\/.*)\.rb/
+#				self.extra_class_map[$1.camelcase] = File.expand_path(f)
+#			end
+#		end
+
+		run_without_ccls_engine
+	end
+	alias_method_chain :run, :ccls_engine
+
+end

data/lib/ccls_engine/ccls_user.rb

@@ -0,0 +1,117 @@
+#	== requires
+#	*	uid (unique)
+#
+#	== accessible attributes
+#	*	sn
+#	*	displayname
+#	*	mail
+#	*	telephonenumber
+class Ccls::User < Calnet::User	#ActiveRecord::Base
+	self.abstract_class = true
+
+#	def self.search(options={})
+#		conditions = {}
+#		includes = joins = []
+#		if !options[:role_name].blank?
+#			includes = [:roles]
+#			if Role.all.collect(&:name).include?(options[:role_name])
+#				joins = [:roles]
+##				conditions = ["roles.name = '#{options[:role_name]}'"]
+#				conditions = ["roles.name = ?",options[:role_name]]
+#	#		else
+#	#			@errors = "No such role '#{options[:role_name]}'"
+#			end 
+#		end 
+#		self.all( 
+#			:joins => joins, 
+#			:include => includes,
+#			:conditions => conditions )
+#	end 
+#
+#	#	Find or Create a user from a given uid, and then 
+#	#	proceed to update the user's information from the 
+#	#	UCB::LDAP::Person.find_by_uid(uid) response.
+#	#	
+#	#	Returns: user
+#	def self.find_create_and_update_by_uid(uid)
+#		user = self.find_or_create_by_uid(uid)
+#		person = UCB::LDAP::Person.find_by_uid(uid) 
+#		user.update_attributes!({
+#			:displayname     => person.displayname,
+#			:sn              => person.sn.first,
+#			:mail            => person.mail.first || '',
+#			:telephonenumber => person.telephonenumber.first
+#		}) unless person.nil?
+#		user
+#	end
+#
+#	#	FYI.  gravatar can't deal with a nil email
+#	gravatar :mail, :rating => 'PG'
+#
+#	#	gravatar.url will include & that are not encoded to &amp;
+#	#	which works just fine, but technically is invalid html.
+#	def gravatar_url
+#		gravatar.url.gsub(/&/,'&amp;')
+#	end
+#
+#	def to_s
+#		displayname
+#	end
+
+#	this has been included above
+#	ucb_authenticated
+
+#	defined in plugin/engine ...
+#
+#	def may_administrate?(*args)
+#		(self.role_names & ['superuser','administrator']).length > 0
+#	end
+#
+#	def may_read?(*args)
+#		(self.role_names & 
+#			['superuser','administrator','editor','interviewer','reader']
+#		).length > 0
+#	end
+#
+#	def may_edit?(*args)
+#		(self.role_names & 
+#			['superuser','administrator','editor']
+#		).length > 0
+#	end
+
+	def self.inherited(subclass)
+
+		subclass.class_eval do
+			#	for some reason is nil which causes problems
+			self.default_scoping = []
+
+			#	I don't think that having this in a separate gem
+			#	is necessary anymore.  This is the only place that 
+			#	it is ever used.  I'll import the calnet_authenticated
+			#	functionality later.
+#			calnet_authenticated
+#			validates_presence_of   :uid
+#			validates_uniqueness_of :uid
+
+			#	include the many may_*? for use in the controllers
+#	I don't know why I need this in BOTH Calnet::User AND Ccls::User
+#	It works without it in the console, but some random tests fail
+#	should probably ensure that calling it twice doesn't do anything bad
+			authorized
+
+#			alias_method :may_create?,  :may_edit?
+#			alias_method :may_update?,  :may_edit?
+#			alias_method :may_destroy?, :may_edit?
+
+#			%w(	people races languages refusal_reasons ineligible_reasons
+#					).each do |resource|
+#				alias_method "may_create_#{resource}?".to_sym,  :may_administrate?
+#				alias_method "may_read_#{resource}?".to_sym,    :may_administrate?
+#				alias_method "may_edit_#{resource}?".to_sym,    :may_administrate?
+#				alias_method "may_update_#{resource}?".to_sym,  :may_administrate?
+#				alias_method "may_destroy_#{resource}?".to_sym, :may_administrate?
+#			end
+		end	#	class_eval
+	end	#	inherited()
+
+end

data/lib/ccls_engine/core_extension.rb

@@ -0,0 +1,14 @@
+module Ccls::CoreExtension
+
+	def class_exists?(full_class_name)
+		name_spaces = full_class_name.to_s.split('::')
+		class_name = name_spaces.pop
+		name_space = name_spaces.join('::')
+		klass = ((name_space.blank?) ? Module : name_space.constantize).const_get(class_name.to_s)
+		return klass.is_a?(Class)
+	rescue NameError
+		return false
+	end
+
+end	#	Ccls::CoreExtension
+include Ccls::CoreExtension

data/lib/ccls_engine/date_and_time_formats.rb

@@ -0,0 +1,30 @@
+#	%a - The abbreviated weekday name (``Sun'')
+#	%A - The  full  weekday  name (``Sunday'')
+#	%b - The abbreviated month name (``Jan'')
+#	%B - The  full  month  name (``January'')
+#	%c - The preferred local date and time representation
+#	%d - Day of the month (01..31)
+#	%H - Hour of the day, 24-hour clock (00..23)
+#	%I - Hour of the day, 12-hour clock (01..12)
+#	%j - Day of the year (001..366)
+#	%m - Month of the year (01..12)
+#	%M - Minute of the hour (00..59)
+#	%p - Meridian indicator (``AM''  or  ``PM'')
+#	%S - Second of the minute (00..60)
+#	%U - Week  number  of the current year,
+#	     starting with the first Sunday as the first
+#	     day of the first week (00..53)
+#	%W - Week  number  of the current year,
+#	     starting with the first Monday as the first
+#	     day of the first week (00..53)
+#	%w - Day of the week (Sunday is 0, 0..6)
+#	%x - Preferred representation for the date alone, no time
+#	%X - Preferred representation for the time alone, no date
+#	%y - Year without a century (00..99)
+#	%Y - Year with century
+#	%Z - Time zone name
+
+Time::DATE_FORMATS[:mdy] = "%b %d, %Y"   # Jan 01, 2009
+Time::DATE_FORMATS[:dob] = "%m/%d/%Y"   # 01/01/2009
+Date::DATE_FORMATS[:dob] = "%m/%d/%Y"   # 01/01/2009
+Time::DATE_FORMATS[:filename] = "%Y%m%d%H%M%S"   # 20091231235959