query-comparison.rb

require 'benchmark'
require 'rubygems'
require 'gruff'
require 'httparty'
require 'json'

class LoggedRequest
  attr_reader :response_time, :path, :status
  
  def initialize(request)
    if request =~ /\"[A-Z]{3,4}\ (.+)\ HTTP/
      @path = $1
    end
    if request =~ /\" ([2345]\d{2})/
      @status = $1.to_i
    end
    if request =~ /[0-9\.]+\Z/
      @response_time = $~[0].to_f
    end
  end  

end

class Base
  include HTTParty
  base_uri 'localhost:7000'
end

class Fast5
  include HTTParty
  base_uri 'localhost:8000'
end

def clean(resp)
  resp.delete 'TileResult'
  res = resp['SearchResult']
  return unless res

  if listings = res['BusinessListings']
    listings.each{|l| l.delete 'HasAdBundle' }
  end

  # FIXME DUNPHY: ARE THESE OKAY TO REMOVE?
  if metadata = res['SearchMetadata']
    keys = ['excluded_cities','excluded_headings','excluded_tiers','excluded_zips','heading_codes']
    keys.each do |key|
      metadata.delete(key) if metadata[key] == []
    end
  end
end

path = ARGV.shift
f = File.new(path)

i = 0
fails = []
f.each_line do |l|
  r = LoggedRequest.new(l)
  puts i
  i += 1
  
  begin
    base = JSON.parse(Base.get(r.path))
    fast5 = JSON.parse(Fast5.get(r.path))
  rescue => e
    fails << [r.path, e.inspect, nil]
    break if i > 300
    next
  end

  clean(base)
  clean(fast5)
  
  if base != fast5
    fails << [r.path, base.to_json, fast5.to_json]
  end


  break if i > 300
end

puts "How many fails? #{fails.length}"

fails.each do |f|
  puts f[0]
  puts f[1]
  puts f[2]
end