class VCR::Cassette::HTTPInteractionList

def assert_no_unused_interactions!
  return unless has_unused_interactions?
  logger = Logger.new(nil)
  descriptions = @interactions.map do |i|
    "  - #{logger.request_summary(i.request, @request_matchers)} => #{logger.response_summary(i.response)}"
  end.join("\n")
  raise Errors::UnusedHTTPInteractionError, "There are unused HTTP interactions left in the cassette:\n#{descriptions}"
end

def has_interaction_matching?(request)
  !!matching_interaction_index_for(request) ||
  !!matching_used_interaction_for(request) ||
  @parent_list.has_interaction_matching?(request)
end

def has_unused_interactions?
  @interactions.size > 0
end

def has_used_interaction_matching?(request)
  @used_interactions.any? { |i| interaction_matches_request?(request, i) }
end

def initialize(interactions, request_matchers, allow_playback_repeats = false, parent_list = NullList, log_prefix = '')
  @interactions           = interactions.dup
  @request_matchers       = request_matchers
  @allow_playback_repeats = allow_playback_repeats
  @parent_list            = parent_list
  @used_interactions      = []
  @log_prefix             = log_prefix
  @mutex                  = Mutex.new
  interaction_summaries = interactions.map { |i| "#{request_summary(i.request)} => #{response_summary(i.response)}" }
  log "Initialized HTTPInteractionList with request matchers #{request_matchers.inspect} and #{interactions.size} interaction(s): { #{interaction_summaries.join(', ')} }", 1
end

def interaction_matches_request?(request, interaction)
  log "Checking if #{request_summary(request)} matches #{request_summary(interaction.request)} using #{@request_matchers.inspect}", 1
  @request_matchers.all? do |matcher_name|
    matcher = VCR.request_matchers[matcher_name]
    matcher.matches?(request, interaction.request).tap do |matched|
      matched = matched ? 'matched' : 'did not match'
      log "#{matcher_name} (#{matched}): current request #{request_summary(request)} vs #{request_summary(interaction.request)}", 2
    end
  end
end

def log_prefix
  @log_prefix
end

def matching_interaction_index_for(request)
  @interactions.index { |i| interaction_matches_request?(request, i) }
end

def matching_used_interaction_for(request)
  return nil unless @allow_playback_repeats
  @used_interactions.find { |i| interaction_matches_request?(request, i) }
end

def remaining_unused_interaction_count
  @interactions.size
end

def request_summary(request)
  super(request, @request_matchers)
end

def response_for(request)
  # Without this mutex, under threaded access, the wrong response may be removed
  # out of the (remaining) interactions list (and other problems).
  @mutex.synchronize do
    if index = matching_interaction_index_for(request)
      interaction = @interactions.delete_at(index)
      @used_interactions.unshift interaction
      log "Found matching interaction for #{request_summary(request)} at index #{index}: #{response_summary(interaction.response)}", 1
      interaction.response
    elsif interaction = matching_used_interaction_for(request)
      interaction.response
    else
      @parent_list.response_for(request)
    end
  end
end