require 'will_paginate/array'

class VisitorsController < InheritedResources::Base
        respond_to :xml, :json
	before_filter :authenticate
  actions :index

  def index
    cond = nil
    if params[:question_id]
      Question.find(params[:question_id])
      cond = "question_id = #{params[:question_id]}"
    end
    counts = {}
    if params[:votes_count]
      counts[:votes_count] = Vote.count(:conditions => cond, :group => "voter_id")
    end
    if params[:skips_count]
      counts[:skips_count] = Skip.count(:conditions => cond, :group => "skipper_id")
    end
    if params[:ideas_count]    
      idea_cond = "choices.creator_id != questions.creator_id" + 
        (cond ? " AND #{cond}" : "")
      counts[:ideas_count] = Choice.count(:joins => :question,
                                          :conditions => idea_cond,
                                          :group => "choices.creator_id")
    end
    if params[:bounces]
      counts[:bounces] = Appearance.count(:conditions => cond,
                                          :group => "voter_id",
                                          :having => "count(answerable_id) = 0")
    end
    if params[:questions_created]
      counts[:questions_created] = Question.count(:group => :creator_id)
    end

    # visitors belong to a site, so we can't just scope them to a question.
    # instead, take the union of visitor ids with counted objects
    if counts.empty?
      @visitors = current_user.visitors.scoped({})
    else      
      ids = counts.inject([]){ |ids,(k,v)| ids | v.keys }
      @visitors = current_user.visitors.scoped(:conditions => { :id => ids })
    end

    counts.each_pair do |attr,values|
      @visitors.each{ |v| v[attr] = values[v.id] || 0 }
    end

    if(params[:page])
       @visitors = WillPaginate::Collection.create(params[:page], params[:page_size] || 10, @visitors.length) do |pager|
        result = @visitors.slice(pager.offset, pager.per_page)
        result ? pager.replace(result) : nil
      end
    end
      

    index!
  end

  def objects_by_session_ids
    session_ids = params[:session_ids]

    # reject any session_ids that have characters outside of [a-f0-9]
    session_ids_query = session_ids.reject{|si| si.match(/[^a-f0-9]/)}.map{|si| "'#{si}'"}.join(',')
    vsql = "SELECT vi.identifier, count(*) as count_all
            FROM visitors vi
            LEFT JOIN votes vo ON (vi.id = vo.voter_id)
            WHERE vi.identifier in (#{session_ids_query})
            AND vo.valid_record = 1
            AND vo.voter_id IS NOT NULL
            GROUP BY vo.voter_id"
    csql = "SELECT vi.identifier, count(*) as count_all
            FROM visitors vi
            LEFT JOIN choices c ON (vi.id = c.creator_id)
            WHERE vi.identifier in (#{session_ids_query})
            AND c.creator_id IS NOT NULL
            GROUP BY c.creator_id"
    votes = Visitor.connection.select_rows(vsql)
    choices = Choice.connection.select_rows(csql)

    objects_by_session_id = Hash.new {|hsh, key| hsh[key] = {} }

    votes.each do |v|
      objects_by_session_id[v[0]]['votes'] = v[1]
    end
    choices.each do |c|
      objects_by_session_id[c[0]]['ideas'] = c[1]
    end

    respond_to do |format|
      format.json { render :json => objects_by_session_id.to_json and return}
    end
  end

	def votes
	  @visitor = Visitor.find_by_identifier!(params[:id])
	  votes = Vote.find(:all, :include => [:choice, :loser_choice, :prompt], 
				  :conditions => {:question_id => params[:question_id],
					          :voter_id => @visitor.id
	  				         },
				  :order => 'created_at ASC')
	  response = []

	  votes.each do |vote|
	    winner = (vote.prompt.left_choice_id == vote.choice_id ? 'left' : 'right')
	    if vote.choice_id == vote.prompt.left_choice_id
	      left_choice  = vote.choice
	      right_choice = vote.loser_choice
      else
        left_choice  = vote.loser_choice
        right_choice = vote.choice
      end
	    vote_response = {
	      :winner            => winner,
	      :id                => vote.id,
	      :left_choice_id    => left_choice.id,
        :left_choice_data  => left_choice.data,
        :right_choice_id   => right_choice.id,
        :right_choice_data => right_choice.data
	    }
	    response << vote_response
    end

    render :json => {:votes => response}.to_json
  end
end