surveyor_gui 0.0.3

data/lib/surveyor_gui/models/response_methods.rb

@@ -0,0 +1,67 @@
+module SurveyorGui
+  module Models
+    module ResponseMethods
+
+      def self.included(base)
+        base.send :has_many, :answers, :primary_key => :answer_id, :foreign_key => :id
+        base.send :has_many, :questions
+        base.send :belongs_to, :column
+        base.send :attr_accessible, :response_set, :question, :answer, :date_value, :time_value,
+            :response_set_id, :question_id, :answer_id, :datetime_value, :integer_value, :float_value,
+            :unit, :text_value, :string_value, :response_other, :response_group, 
+            :survey_section_id, :blob, :column if defined? ActiveModel::MassAssignmentSecurity
+        #belongs_to :user
+
+        # after_destroy :delete_blobs!
+        # after_destroy :delete_empty_dir
+
+        #extends response to allow file uploads.
+        base.send :mount_uploader, :blob, BlobUploader
+      end
+
+      VALUE_TYPE = ['float', 'integer', 'string', 'datetime', 'text']
+
+      def response_value
+        response_class = self.answer.response_class
+        if self.question.pick=='none'
+          _no_pick_value(response_class)
+        else
+          return self.answer.text
+        end
+      end
+
+      def is_comment?
+        if self.answer
+          self.answer.is_comment?
+        else
+          false
+        end
+      end
+
+    private
+
+      def delete_blobs!
+          self.remove_blob!
+      end
+
+
+      def delete_empty_dir
+        FileUtils.rm_rf(File.join(Rails.root.to_s,'public',BlobUploader.store_dir))
+      end
+
+      def _no_pick_value(response_class)
+        VALUE_TYPE.each do |value_type|
+          value_attribute = value_type+'_value'
+          if instance_eval(value_attribute)
+            if response_class == "time"
+              return self.datetime_value - self.datetime_value.beginning_of_day
+            else
+              return instance_eval(value_attribute)
+            end
+          end
+        end
+        nil
+      end
+    end
+  end
+end

data/lib/surveyor_gui/models/response_set_methods.rb

@@ -0,0 +1,54 @@
+module SurveyorGui
+  module Models
+    module ResponseSetMethods
+
+      def self.included(base)
+        base.send :has_many, :responses, :dependent=>:destroy
+        base.send :attr_accessible, :survey, :responses_attributes, :user_id, :survey_id, :test_data if defined? ActiveModel::MassAssignmentSecurity
+      end
+
+      #determine whether a mandatory question is missing a response.  Only applicable if the question is not dependent on other questions,
+      #or if it is dependent, but has been triggered for inclusion by a previous answer.
+      def triggered_mandatory_missing
+        qs = survey.sections.map(&:questions).flatten
+        ds = Dependency.all(:include => :dependency_conditions, :conditions => {:dependency_conditions => {:question_id => qs.map(&:id) || responses.map(&:question_id)}})
+        triggered = qs - ds.select{|d| !d.is_met?(self)}.map(&:question)
+        triggered_mandatory = triggered.select{|q| q.mandatory?}
+        triggered_mandatory_completed = triggered.select{|q| q.mandatory? and is_answered?(q)}
+        triggered_mandatory_missing = triggered_mandatory - triggered_mandatory_completed
+        return triggered_mandatory_missing
+      end
+
+      #return a hash of dependent questions.
+      def all_dependencies(question_ids = nil)
+            arr = dependencies(question_ids).partition{|d| d.is_met?(self) }
+            {:show => arr[0].map{|d| d.question_group_id.nil? ? (d.question.is_mandatory? ? nil : "q_#{d.question_id}") : "g_#{d.question_group_id}"},
+             :show_mandatory => arr[0].map{|d| d.question_group_id.nil? ? (d.question.is_mandatory? ? "q_#{d.question_id}" : nil) : "g_#{d.question_group_id}"},
+             :hide => arr[1].map{|d| d.question_group_id.nil? ? "q_#{d.question_id}" : "g_#{d.question_group_id}"}}
+      end
+      def correctness_hash
+        { :questions => Survey.where(id: self.survey_id).includes(sections: :questions).first.sections.map(&:questions).flatten.compact.size,
+          :responses => responses.to_a.compact.size,
+          :correct => responses.find_all(&:correct?).compact.size
+        }
+      end
+
+      def report_user_name
+        user_name = nil
+        if class_exists?('ResponseSetUser')
+          user_name = ResponseSetUser.new(self.user_id).report_user_name
+        end
+        user_name || self.user_id || self.id
+      end
+      
+      private
+
+      def class_exists?(class_name)
+        klass = Module.const_get(class_name)
+        return klass.is_a?(Class)
+      rescue NameError
+        return false
+      end
+    end
+  end
+end

data/lib/surveyor_gui/models/row_methods.rb

@@ -0,0 +1,11 @@
+module SurveyorGui
+  module Models
+    module RowMethods
+
+      def self.included(base)
+        base.send :belongs_to, :question_group
+        base.send :attr_accessible, :text, :question_group_id if defined? ActiveModel::MassAssignmentSecurity
+      end
+    end
+  end
+end

data/lib/surveyor_gui/models/survey_methods.rb

@@ -0,0 +1,32 @@
+module SurveyorGui
+  module Models
+    module SurveyMethods
+      def self.included(base)
+        base.extend Surveyor::Models::SurveyMethods
+        base.send :attr_accessible, :title, :access_code, :template,
+                        :survey_sections_attributes if defined? ActiveModel::MassAssignmentSecurity
+        base.send :has_many, :survey_sections, :dependent => :destroy
+        base.send :accepts_nested_attributes_for, :survey_sections, :allow_destroy => true
+
+        base.send :validate, :no_responses
+        base.send :before_destroy, :no_responses
+
+      end
+
+
+      #don't let a survey be deleted or changed if responses have been submitted
+      #to ensure data integrity
+      def no_responses
+        if self.id
+          #this will be a problem if two people are editing the survey at the same time and do a survey preview - highly unlikely though.
+          self.response_sets.where('test_data = ?',true).each {|r| r.destroy}
+        end
+        if !template && response_sets.count>0
+          errors.add(:base,"Reponses have already been collected for this survey, therefore it cannot be modified. Please create a new survey instead.")
+          return false
+        end
+      end
+
+    end
+  end
+end

data/lib/surveyor_gui/models/survey_section_methods.rb

@@ -0,0 +1,32 @@
+module SurveyorGui
+  module Models
+    module SurveySectionMethods
+
+      def self.included(base)
+
+        base.send :attr_accessible, :title, :display_order,
+                        :questions_attributes, :survey_id, :modifiable if defined? ActiveModel::MassAssignmentSecurity
+        base.send :belongs_to, :surveyform, :foreign_key=>:survey_id
+        base.send :has_many, :questions, :dependent => :destroy
+        base.send :accepts_nested_attributes_for, :questions
+        base.send :default_scope, lambda{ base.order('display_order') }
+
+        base.send :validate, :no_responses
+        base.send :before_destroy, :no_responses
+      end
+
+      #don't let a survey be deleted or changed if responses have been submitted
+      #to ensure data integrity
+      def no_responses
+        if self.id && self.survey
+          #this will be a problem if two people are editing the survey at the same time and do a survey preview - highly unlikely though.
+          self.survey.response_sets.where('test_data = ?',true).each {|r| r.destroy}
+        end
+        if self.survey && !survey.template && survey.response_sets.count>0
+          errors.add(:base,"Reponses have already been collected for this survey, therefore it cannot be modified. Please create a new survey instead.")
+          return false
+        end
+      end
+    end
+  end
+end

data/lib/surveyor_gui/surveyforms_controller_methods.rb

@@ -0,0 +1,258 @@
+module SurveyorGui
+  module SurveyformsControllerMethods
+
+    def self.included(base)
+      base.send :layout, 'surveyor_gui_default'
+    end
+
+    def index
+      if params[:template]=='false'
+        template=false
+      elsif params[:template]=='true'
+        template=true
+		  else
+			  template=false
+      end
+      @title = "Manage " + (template ? "Templates" : "Surveys")
+	   	@surveyforms = Surveyform.where('template = ?',template).search(params[:search]).order(:title).paginate(:page => params[:page])
+    end
+
+    def new
+      @title = "Create New "+ (params[:template] == 'template'? 'Template' : 'Survey')
+      @hide_survey_type = params[:hide_survey_type]
+      template = params[:template] == 'template'? true : false
+      @surveyform = Surveyform.new(:template=>template)
+      @surveyform.survey_sections.build(:title=>'Section 1', :display_order=>0, :modifiable=>true)#.questions.build(:text=>'New question',:pick=>'none',:display_order=>0,:display_type=>'default', :modifiable=>modifiable).answers.build(:text=>'string', :response_class=>'string', :display_order=>1, :template=>true)
+      @question_no = 0
+    end
+
+    def edit
+      @surveyform = Surveyform.where(:id=>params[:id]).includes(:survey_sections).first
+      @survey_locked=false
+      #unfortunately, request.referrer does not seem to capture parameters. Need to add explicitly.
+      #don't edit the format of a non template survey that has responses. could cause unpredictable results
+      @surveyform.response_sets.where('test_data=?',true).map{|r| r.destroy}
+      if !@surveyform.template && @surveyform.response_sets.count>0
+        @survey_locked=true
+        flash.now[:error] = "Reponses have already been collected for this survey, therefore modifications are not permitted."
+      end
+      @title = "Edit "+ (@surveyform.template ? 'Template' : 'Survey')
+      @surveyform.survey_sections.build if @surveyform.survey_sections.blank?
+      @question_no = 0
+      @url = "update"
+    end
+
+    def create
+      @surveyform = Surveyform.new(surveyforms_params.merge(user_id: @current_user.nil? ? @current_user : @current_user.id))
+      if @surveyform.save
+        flash[:notice] = "Successfully created survey."
+        @title = "Edit Survey"
+        @question_no = 0
+        redirect_to edit_surveyform_path(@surveyform.id)
+      else
+        render :action => 'new'
+      end
+    end
+
+    def update
+      @title = "Update Survey"
+      @surveyform = Surveyform.includes(:survey_sections).find(params[:surveyform][:id])
+      if @surveyform.update_attributes(surveyforms_params)
+        flash[:notice] = "Successfully updated surveyform."
+        redirect_to :action=>:index
+      else
+        flash[:error] = "Changes not saved."
+        @question_no = 0
+        render :action => 'edit'
+      end
+    end
+
+    def show
+      @title = "Show Survey"
+      @survey_locked = true
+      @surveyform = Surveyform.find(params[:id])
+      @question_no = 0
+    end
+
+    def destroy
+      @surveyform = Surveyform.find(params[:id])
+      @surveyform.destroy
+      if !@surveyform
+        flash[:notice] = "Successfully destroyed survey."
+        redirect_to surveyforms_url
+      else
+        if @surveyform.response_sets.count > 0
+          flash[:error] = 'This survey has responses and can not be deleted' 
+        else
+          flash[:error] = 'Survey could not be deleted.'
+        end
+        redirect_to surveyforms_url
+      end
+    end
+
+    def replace_form
+      @surveyform = SurveySection.find(params[:survey_section_id]).surveyform
+      @question_no = 0
+      render :new, :layout => false
+    end
+
+    def insert_survey_section
+      survey_id = params[:id]
+      @survey_section = Survey.find(survey_id).survey_sections.reorder('survey_sections.id').last
+      if @survey_section
+        @question_no = 0
+        render "_survey_section_fields" , :layout=> false
+      else
+        render :nothing=> true
+      end
+    end
+
+    def replace_survey_section
+      survey_section_id = params[:survey_section_id]
+      @survey_section = SurveySection.find(survey_section_id)
+      @question_no = 0
+      render "_survey_section_fields" , :layout=> false
+    end
+
+    def insert_new_question
+      question_id = params[:question_id]
+      @question = Question.find(question_id)
+      @question_no = 0
+      @surveyform = @question.survey_section.surveyform
+      render :new, :layout=>false
+    end
+
+    def cut_section
+      session[:cut_section]=params[:survey_section_id]
+      if ss=SurveySection.find(params[:survey_section_id])
+        @surveyform=ss.surveyform
+        ss.update_attribute(:survey_id,nil)
+        @question_no = 0
+        render :new, :layout=>false
+        return true
+      end
+      render :nothing=>true
+      return false
+    end
+
+    def paste_section
+      @title="Edit Survey"
+      @question_no = 0
+      if session[:cut_section]
+        _continue_paste_section
+      else
+        render :nothing=>true
+      end
+    end
+
+    def _continue_paste_section
+      survey_section = SurveySection.find(session[:cut_section])
+      place_at_section = SurveySection.find(params[:survey_section_id])
+      survey_section.survey_id = place_at_section.survey_id
+      survey_section.display_order = _paste_to(params[:position], place_at_section.survey, place_at_section)
+      @surveyform = place_at_section.surveyform
+      _save_pasted_object(survey_section, @surveyform, :cut_section)
+    end
+
+    def _paste_to(position, object_parent, object)
+      paste_position = object.display_order + _display_order_offset(position)
+      _make_room(paste_position, object_parent, object)
+      paste_position
+    end
+
+    def _display_order_offset(position)
+      position == "over" ? 0 : 1
+    end
+
+    def _make_room(paste_at, object_parent, object)
+       statement = "object_parent."+object.class.to_s.underscore.pluralize
+       collection = eval(statement)
+       collection.where('display_order >= ?',paste_at).update_all('display_order=display_order+1')
+    end
+
+    def _save_pasted_object(object, surveyform, session_id)
+      if object.save
+        surveyform.reload
+        session[session_id]=nil
+        render :new, :layout=>false
+      else
+        render :nothing=>true
+        return false
+      end
+    end
+
+    def cut_question
+      session[:cut_question]=params[:question_id]
+      if q=Question.find(params[:question_id])
+        @surveyform=q.survey_section.surveyform
+        q.update_attribute(:survey_section_id,nil)
+        q.question_group.questions.map{|q| q.update_attribute(:survey_section_id,nil)} if q.part_of_group?
+        @question_no = 0
+        render :new, :layout=>false
+        return true
+      end
+      render :nothing=>true
+      return false
+    end
+
+    def paste_question
+      @title="Edit Survey"
+      if session[:cut_question]
+        @question = Question.find(session[:cut_question])
+        @question_no = 0
+        if params[:question_id]
+          place_under_question = Question.find(params[:question_id])
+          survey_section = place_under_question.survey_section
+          survey_section_id = survey_section.id
+          survey_section.questions.where('display_order>?',place_under_question.display_order).update_all('display_order=display_order+1')
+          @question.display_order = place_under_question.display_order+1
+          @surveyform = survey_section.surveyform
+        else
+          survey_section_id = params[:survey_section_id]
+          @question.display_order = 0
+          SurveySection.find(survey_section_id).questions.update_all('display_order = display_order+1')
+          @surveyform = SurveySection.find(survey_section_id).surveyform
+        end
+        @question.survey_section_id = survey_section_id
+
+        if @question.save
+          @surveyform.reload
+          session[:cut_question]=nil
+          render :new, :layout=>false
+        else
+          render :nothing=>true
+          return false
+        end
+      end
+    end
+
+    def replace_question
+      question_id = params[:question_id]
+      begin
+        @question = Question.find(question_id)
+        @question_no = 0
+        render "_question_section" , :layout=> false
+      rescue
+        render inline: "not found"  
+      end
+    end
+     
+    def clone_survey
+      @title = "Clone Survey"
+      @surveyform = SurveyCloneFactory.new(params[:id]).clone
+      if @surveyform.save
+        flash[:notice] = "Successfully created survey, questionnaire, or form."
+        redirect_to edit_surveyform_path(@surveyform)
+      else
+        flash[:error] = "Could not clone the survey, questionnaire, or form."
+        render :action => 'new'
+      end
+    end     
+
+    private
+    def surveyforms_params
+      ::PermittedParams.new(params[:surveyform]).survey
+    end
+
+  end
+end