class HttpLogger

def self.deprecate_config(option)
  warn "Net::HTTP.#{option} is deprecated. Use HttpLogger.#{option} instead."
end

def self.instance
  @instance ||= HttpLogger.new
end

def self.perform(*args, &block)
  instance.perform(*args, &block)
end

def collapse_body_limit
  self.class.collapse_body_limit
end

def fakeweb?(http, request)
  return false unless defined?(::FakeWeb)
  uri = ::FakeWeb::Utility.request_uri_as_string(http, request)
  method = request.method.downcase.to_sym
  ::FakeWeb.registered_uri?(method, uri)
end

def format_log_entry(message, dump = nil)
  if self.class.colorize && Rails.configuration.colorize_logging
    message_color, dump_color = "4;32;1", "0;1"
    log_entry = "  \e[#{message_color}m#{message}\e[0m   "
    log_entry << "\e[#{dump_color}m%#{String === dump ? 's' : 'p'}\e[0m" % dump if dump
    log_entry
  else
    "%s  %s" % [message, dump]
  end
end

def ignored?(http, request)
  url = request_url(http, request)
  self.class.ignore.any? do |pattern|
    url =~ pattern
  end
end

def log(message, dump)
  self.logger.send(self.class.level, format_log_entry(message, dump)) if Rails.env.to_sym == :development
end

def log_request_body(request)
  if self.class.log_request_body
    if HTTP_METHODS_WITH_BODY.include?(request.method)
      if (body = request.body) && !body.empty?
        log("Request body", truncate_body(body))
      end
    end
  end
end

def log_request_headers(request)
  if self.class.log_headers
    request.each_capitalized { |k,v| log("HTTP request header", "#{k}: #{v}") }
  end
end

def log_request_url(http, request, start_time)
  ofset = Time.now - start_time
  log("HTTP #{request.method} (%0.2fms)" % (ofset * 1000), request_url(http, request))
end

def log_response_body(body)
  if self.class.log_response_body
    if body.is_a?(Net::ReadAdapter)
      log("Response body", "<impossible to log>")
    else
      if body && !body.empty?
        log("Response body", truncate_body(body))
      end
    end
  end
end

def log_response_code(response)
  log("Response status", "#{response.class} (#{response.code})")
end

def log_response_headers(response)
  if self.class.log_headers
    response.each_capitalized { |k,v| log("HTTP response header", "#{k}: #{v}") }
  end
end

def logger
  self.class.logger
end

def perform(http, request, request_body)
  start_time = Time.now
  tags = {}
  response = yield
rescue => ex
  tags = tags.merge({error_type: ex.class})
  raise
ensure
  values = {response_time: ((Time.now - start_time)*1000).round(2)}
  if require_logging?(http, request)
    tags = tags.merge({endpoint: http.address, method: request.method})
    log_request_url(http, request, start_time)
    log_request_body(request)
    log_request_headers(request)
    if defined?(response) && response
      tags = tags.merge({status: response.code.to_i}) 
      log_response_code(response)
      log_response_headers(response)
      log_response_body(response.body)
    end
    ZuoraConnect::AppInstance.write_to_telegraf(direction: :outbound, tags: tags, values: values)
  end
end

def request_url(http, request)
  CGI.unescape("http#{"s" if http.use_ssl?}://#{http.address}:#{http.port}#{request.path}")
end

def require_logging?(http, request)
  self.logger && !ignored?(http, request) && (http.started? || fakeweb?(http, request))
end

def truncate_body(body)
  if collapse_body_limit && collapse_body_limit > 0 && body && body.size >= collapse_body_limit
    body_piece_size = collapse_body_limit / 2
    body[0..body_piece_size] + 
      "\n\n<some data truncated>\n\n" + 
      body[(body.size - body_piece_size)..body.size]
  else
    body
  end
end