require "eventmachine"
 
# Load this script up with thin
 
class DeferrableBody
  include EventMachine::Deferrable
 
  def call(body)
    body.each do |chunk|
      @body_callback.call(chunk)
    end
  end
 
  def each &blk
    @body_callback = blk
  end
end
 
class AsyncHostIPInfo
  AsyncResponse = [-1, {}, []].freeze
 
  def call(env)
    body = DeferrableBody.new
    req = Rack::Request.new(env)
 
    EM::next_tick do
      env['async.callback'].call [200, {'Content-Type' => 'text/javascript'}, body]
    end
 
    ip = req.params["ip"]
    callback = req.params["callback"]
 
    conn = EM::Protocols::HttpClient2.connect "api.hostip.info", 80
    http = conn.get "/get_html.php?ip=#{ip}&position=true"
    http.callback do |r|
      contents = r.content.split("\n").map do |line|
        if line =~ /^C(ountry|ity)/
          line.gsub(/(.*): (.*)/, '\1:"\2"')
        else
          line.sub(": ", ":")
        end
      end
      body.call ["#{callback}({#{contents.join(",")}});"]
      body.succeed
    end
 
    AsyncResponse
  end
end
 
run AsyncHostIPInfo.new