surveillance 0.1.1

data/lib/surveillance/field/date.rb

@@ -0,0 +1,17 @@
+module Surveillance
+  module Field
+    class Date < Base
+      def present?
+        answer && answer.content
+      end
+
+      def mandatory_content?
+        true
+      end
+
+      def answer_string
+        answer.content ? l(answer.content) : ''
+      end
+    end
+  end
+end

data/lib/surveillance/field/matrix.rb

@@ -0,0 +1,66 @@
+module Surveillance
+  module Field
+    class Matrix < Base
+      include OtherChoice
+      setting :randomize_sub_questions, type: :boolean, default: false
+
+      def choosable?
+        true
+      end
+
+      def settings?
+        true
+      end
+
+      def matrix?
+        true
+      end
+
+      def has_sub_questions?
+        true
+      end
+
+      def view_name
+        "matrix"
+      end
+
+      def present?
+        question.questions.all? do |sub_question|
+          field = sub_question.field(attempt: attempt)
+          field.present?
+        end
+      end
+
+      def answer
+        @answer ||= if question.parent.is_a?(Surveillance::Question)
+          attempt.answers.find do |answer|
+            answer.question_id == question.id
+          end
+        else
+          super
+        end
+      end
+
+      def before_validation_callback
+        question.questions.each do |sub_question|
+          sub_question.field_type = "matrix_question"
+          sub_question.mandatory = question.mandatory
+        end
+      end
+
+      def ordered_sub_questions
+        if setting_value(:randomize_sub_questions) == "1"
+          question.questions.sort_by { rand }
+        else
+          question.questions
+        end
+      end
+
+      class << self
+        def questions_fields_path
+          "surveillance/field/matrix/questions_fields"
+        end
+      end
+    end
+  end
+end

data/lib/surveillance/field/matrix_question.rb

@@ -0,0 +1,13 @@
+module Surveillance
+  module Field
+    class MatrixQuestion < Base
+      def present?
+        answer.option_ids.length > 0
+      end
+
+      def answer_string
+        answer.options.map(&:title).join("|")
+      end
+    end
+  end
+end

data/lib/surveillance/field/multiple_choices.rb

@@ -0,0 +1,29 @@
+module Surveillance
+  module Field
+    class MultipleChoices < SingleChoice
+      def options
+        if display_other_field?(question)
+          question.options + [ Option.new(id: "", title: settings.other.label) ]
+        else
+          question.options
+        end
+      end
+
+      def overview_path
+        "surveillance/field/single_choice/overview"
+      end
+
+      def other_option
+        Option.new(title: settings.other.label)
+      end
+
+      def validate_answer answer
+        self.answer = answer
+
+        if question.mandatory && empty?
+          answer.errors[:option_ids] << I18n.t("errors.messages.empty")
+        end
+      end
+    end
+  end
+end

data/lib/surveillance/field/multiple_choices_matrix.rb

@@ -0,0 +1,13 @@
+module Surveillance
+  module Field
+    class MultipleChoicesMatrix < Matrix
+      def settings_path
+        "surveillance/field/matrix/settings"
+      end
+
+      def overview_path
+        "surveillance/field/matrix/overview"
+      end
+    end
+  end
+end

data/lib/surveillance/field/number.rb

@@ -0,0 +1,34 @@
+module Surveillance
+  module Field
+    class Number < Text
+      setting :minimum, type: :number, default: nil
+      setting :maximum, type: :number, default: nil
+
+      def view_name
+        "number"
+      end
+
+      def validate_answer answer
+        self.answer = answer
+
+        if question.mandatory && empty?
+          answer.errors[:present] << I18n.t("errors.messages.empty") and return
+        end
+
+        minimum = question.field.setting_value(:minimum).presence
+        maximum = question.field.setting_value(:maximum).presence
+        answer_value = answer.content.value.to_f
+
+        if minimum && answer_value < minimum.to_f
+          answer.errors[:present] << I18n.t(
+            "errors.messages.greater_than_or_equal_to", count: minimum
+          )
+        elsif maximum && answer_value > maximum.to_f
+          answer.errors[:present] << I18n.t(
+            "errors.messages.less_than_or_equal_to", count: maximum
+          )
+        end
+      end
+    end
+  end
+end

data/lib/surveillance/field/order.rb

@@ -0,0 +1,40 @@
+module Surveillance
+  module Field
+    class Order < Matrix
+      def choosable?
+        false
+      end
+
+      def matrix?
+        false
+      end
+
+      def view_name
+        "order"
+      end
+
+      def present?
+        question.questions.map(&:field).all? do |field|
+          field.answer.content.presence
+        end
+      end
+
+      def ordered_answers
+        question.questions.sort do |q1, q2|
+          field1 = q1.field
+          field2 = q2.field
+          field1.attempt ||= attempt
+          field2.attempt ||= attempt
+          field1.answer.content.value.to_i <=> field2.answer.content.value.to_i rescue 0
+        end
+      end
+
+      def before_validation_callback
+        question.questions.each do |sub_question|
+          sub_question.field_type = "order_question"
+          sub_question.mandatory = question.mandatory
+        end
+      end
+    end
+  end
+end

data/lib/surveillance/field/order_question.rb

@@ -0,0 +1,22 @@
+module Surveillance
+  module Field
+    class OrderQuestion < Base
+      def present?
+        answer.content
+      end
+
+      def answer_string
+        answer.content && (answer.content.value.to_i + 1)
+      end
+
+      # Overall answers
+      def answers
+        size = question.parent.questions.length
+        question.answers.includes(:content).reduce(Array.new(size, 0)) do |ary, answer|
+          ary[answer.content.value.to_i] += 1
+          ary
+        end
+      end
+    end
+  end
+end

data/lib/surveillance/field/other_choice.rb

@@ -0,0 +1,28 @@
+module Surveillance
+  module Field
+    module OtherChoice
+      extend ActiveSupport::Concern
+
+      included do
+        setting :other, type: :boolean, default: false
+      end
+
+      def present?
+        answer && answer.option_ids.length > 0 || other_choosed?
+      end
+
+      def mandatory_content?
+        other_choosed?
+      end
+
+      def other_choosed?
+        answer && answer.other_choosed
+      end
+
+      def display_other_field? question
+        other = question.settings.find { |s| s.key == "other" }
+        other ? (other.value == "1") : false
+      end
+    end
+  end
+end

data/lib/surveillance/field/select_matrix.rb

@@ -0,0 +1,13 @@
+module Surveillance
+  module Field
+    class SelectMatrix < Matrix
+      def view_name
+        "select-matrix"
+      end
+
+      def settings_path
+        "surveillance/field/matrix/settings"
+      end
+    end
+  end
+end

data/lib/surveillance/field/single_choice.rb

@@ -0,0 +1,36 @@
+module Surveillance
+  module Field
+    class SingleChoice < Base
+      include OtherChoice
+      setting :randomize, type: :boolean, default: false
+
+      def choosable?
+        true
+      end
+
+      def view_name
+        "choice"
+      end
+
+      def answer_string
+        other_choosed? ? super : answer.options.map(&:title).join("|")
+      end
+
+      def validate_answer answer
+        super
+
+        if other_choosed? && !answer.content
+          answer.errors[:content] << I18n.t("errors.messages.empty")
+        end
+      end
+
+      def ordered_options
+        if setting_value(:randomize) == "1"
+          question.options.sort_by { rand }
+        else
+          question.options
+        end
+      end
+    end
+  end
+end

data/lib/surveillance/field/single_select.rb

@@ -0,0 +1,31 @@
+module Surveillance
+  module Field
+    class SingleSelect < Base
+      def choosable?
+        true
+      end
+
+      def present?
+        answer && answer.option_ids.any?
+      end
+
+      def view_name
+        "choice"
+      end
+
+      def answer_string
+        answer.first.try(:title)
+      end
+
+      def ordered_options
+        question.options
+      end
+
+      def options_for_select
+        ordered_options.map do |option|
+          [option.title, option.id]
+        end
+      end
+    end
+  end
+end

data/lib/surveillance/field/text.rb

@@ -0,0 +1,13 @@
+module Surveillance
+  module Field
+    class Text < Base
+      def present?
+        answer && answer.content
+      end
+
+      def mandatory_content?
+        true
+      end
+    end
+  end
+end

data/lib/surveillance/field/text_area.rb

@@ -0,0 +1,6 @@
+module Surveillance
+  module Field
+    class TextArea < Text
+    end
+  end
+end

data/lib/surveillance/partials_collection.rb

@@ -0,0 +1,7 @@
+module Surveillance
+  class PartialsCollection < Array
+    def register name, path
+      push([name, path])
+    end
+  end
+end

data/lib/surveillance/setting.rb

@@ -0,0 +1,24 @@
+module Surveillance
+  class Setting
+    attr_accessor :klass, :key, :type, :default
+
+    def initialize klass, options = {}
+      self.klass = klass
+      self.key = options.fetch(:key, nil)
+      self.type = options.fetch(:type, :string)
+      self.default = options.fetch(:default, nil)
+    end
+
+    def label
+      I18n.t("surveillance.settings.#{ class_name }.#{ key }.field")
+    end
+
+    def admin_label
+      I18n.t("surveillance.settings.#{ class_name }.#{ key }.admin")
+    end
+
+    def class_name
+      @class_name ||= klass.name.demodulize.underscore
+    end
+  end
+end

data/lib/surveillance/settings_collection.rb

@@ -0,0 +1,17 @@
+module Surveillance
+  class SettingsCollection < HashWithIndifferentAccess
+    def method_missing method, *args
+      if args.length == 1 && (match = method.to_s.match(/(.*)=$/))
+        self[match[1]] = args.first
+      elsif key?(method)
+        self[method]
+      else
+        super
+      end
+    end
+
+    def respond_to?(method, include_private = false)
+      (method.to_s =~ /=$/ || key?(method)) ? true : super
+    end
+  end
+end

data/lib/surveillance/validators.rb

@@ -0,0 +1,7 @@
+module Surveillance
+  module Validators
+    extend ActiveSupport::Autoload
+
+    autoload :AnswerValidator, "surveillance/validators/answer_validator"
+  end
+end

data/lib/surveillance/validators/answer_validator.rb

@@ -0,0 +1,9 @@
+module Surveillance
+  module Validators
+    class AnswerValidator < ActiveModel::Validator
+      def validate record
+        record.question.field.validate_answer(record)
+      end
+    end
+  end
+end