class CreateResponseMaps < ActiveRecord::Migration[4.2]
  def self.up
    create_table :response_maps do |t|
      t.column :reviewed_object_id, :integer, :null => false
      t.column :reviewer_id,        :integer, :null => false
      t.column :reviewee_id,        :integer, :null => false
      t.column :type,               :string,  :null => false     
    end     
    
    # reviewee can't be constrained since it maps to either a participant or a team
    # a better design might allow for teams to be and have participants.
    
    execute 'ALTER TABLE `response_maps`
             ADD CONSTRAINT fk_response_map_reviewer
             FOREIGN KEY (reviewer_id) REFERENCES participants(id)'      
    
    create_table :responses do |t|
      t.column :map_id, :integer, :null => false
      t.column :additional_comment, :string, :null => true
      t.column :created_at, :datetime, :null => true
      t.column :updated_at, :datetime, :null => true
    end


    execute 'ALTER TABLE `responses`
             ADD CONSTRAINT fk_response_response_map
             FOREIGN KEY (map_id) REFERENCES response_maps(id)'    
    
    add_column :scores, :response_id, :integer, :null => true
    
    execute 'ALTER TABLE `scores`
             ADD CONSTRAINT fk_score_response
             FOREIGN KEY (response_id) REFERENCES responses(id)'              
    
    ActiveRecord::Base.connection.select_all("select * from review_of_review_mappings").each{
       | map | 
       rmap = ActiveRecord::Base.connection.select_all("select * from review_mappings where id = #{map['reviewed_object_id']}")       
       assignment = Assignment.find(rmap[0]['reviewed_object_id'].to_i) 
       create_response_map(map,"review_of_reviews","MetareviewResponseMap", "MetareviewQuestionnaire",assignment)       
    }
    
    ActiveRecord::Base.connection.select_all("select * from feedback_mappings").each{
       | map | 
       review = ActiveRecord::Base.connection.select_all("select * from reviews where id = #{map['reviewed_object_id']}")
       rmap = ActiveRecord::Base.connection.select_all("select * from review_mappings where id = #{review[0]['mapping_id']}")
       assignment = Assignment.find(rmap[0]['reviewed_object_id'].to_i)              
       create_response_map(map,"review_feedbacks","FeedbackResponseMap", "AuthorFeedbackQuestionnaire",assignment)
    }  
    
    ActiveRecord::Base.connection.select_all("select * from teammate_review_mappings").each{
       | map | 
       assignment = Assignment.find(map['reviewed_object_id'].to_i)               
       create_response_map(map,"teammate_reviews","TeammateReviewResponseMap", "TeammateReviewQuestionnaire",assignment)        
    }     
   
    # create response mappings as associate to a given review object
    ActiveRecord::Base.connection.select_all("select * from review_mappings").each{
       | map | 
       
       assignment = Assignment.find(map['reviewed_object_id'].to_i) 
       
       review = ActiveRecord::Base.connection.select_all("select * from reviews where mapping_id = #{map['id']}")
       if map['type'] = 'ParticipantReviewMapping'
          map_type = "ParticipantReviewResponseMap"
       else
          map_type = "TeamReviewResponseMap"
       end
       rmap, response = create_response_map(map,"reviews",map_type, "ReviewQuestionnaire",assignment)
       
       MetareviewResponseMap.where(reviewed_object_id: map['id'].to_i).each{
         | metamap |
         if rmap != nil
           metamap.update_attribute('reviewed_object_id',rmap.id)
         else
          cleanup(metamap)         
         end   
       }
       
       if review.length > 0 && review[0] != nil         
       FeedbackResponseMap.find_all_by_reviewed_object_id(review[0]['id'].to_i).each{
         | fmap |
         if response != nil
          fmap.update_attribute('reviewed_object_id',response.id)
         else
          cleanup(fmap)
         end
       }  
       end    
    }
    
    Score.delete_all("response_id is null")
     
    remove_column :scores, :instance_id
     
    drop_table :review_of_reviews    
    drop_table :review_of_review_mappings
    drop_table :review_feedbacks
    drop_table :feedback_mappings
    drop_table :teammate_reviews
    drop_table :teammate_review_mappings    
    drop_table :reviews
    drop_table :review_mappings

  end
  
  def self.cleanup(map)
    response = Response.find_by_map_id(map.id)    
    if response != nil       
       Score.delete_all(["instance_id = ?", response.id])       
       response.destroy
    end
    map.destroy    
  end
  
  def self.create_response_map(map, review_type, map_type, questionnaire_type, assignment)
    response = nil
    rmap = nil 
   
    today = Time.now             
    oldest_allowed_time = Time.local(today.year - 1,today.month,today.day,0,0,0)    
       review = ActiveRecord::Base.connection.select_all("select * from #{review_type} where mapping_id = #{map['id']}")
        rmap = Object.const_get(map_type).create(
                  :reviewed_object_id => map['reviewed_object_id'].to_i,
                  :reviewer_id => map['reviewer_id'].to_i,
                  :reviewee_id => map['reviewee_id'].to_i)                 
        if review[0] != nil     
          questionnaire = assignment.questionnaires.find_by_type(questionnaire_type)          
          if questionnaire != nil
            response = create_response(review[0], rmap, questionnaire.questions)
          end
        end
      end
    return rmap, response
  end
  
  def self.create_response(review, response_map, questions)      
      response = Response.create(:map_id => response_map.id, :additional_comment => review['additional_comment'])
      Response.record_timestamps = false
      response.update_attribute('created_at',review['created_at'])
      response.update_attribute('updated_at',review['updated_at'])            
      Response.record_timestamps = true
      score_found = false      
      questions.each{
        | question |
        score = Score.where(instance_id: review['id'].to_i, question_id:  question.id).first 
        if score != nil
          score_found = true
          score.update_attribute('response_id',response.id)
        end
      }
      unless score_found
        response.destroy
      end
      return response
  end

  def self.down    
    begin
      execute "ALTER TABLE `scores` 
               DROP FOREIGN KEY `fk_score_response`"
    rescue
    end
    
    begin
      execute "ALTER TABLE `scores` 
               DROP INDEX `fk_score_response`"
    rescue
    end
   
    remove_column :scores, :response_id
  
    drop_table :responses
    drop_table :response_maps    
  end
end
