class Faraday::Logging::Formatter

def apply_filters(output)
  @filter.each do |pattern, replacement|
    output = output.to_s.gsub(pattern, replacement)
  end
  output
end

def dump_body(body)
  if body.respond_to?(:to_str)
    body.to_str
  else
    pretty_inspect(body)
  end
end

def dump_headers(headers)
  headers.map { |k, v| "#{k}: #{v.inspect}" }.join("\n")
end

def exception(exc)
  return unless log_errors?
  error_log = proc { exc.full_message }
  public_send(log_level, 'error', &error_log)
  log_headers('error', exc.response_headers) if exc.respond_to?(:response_headers) && log_headers?(:error)
  return unless exc.respond_to?(:response_body) && exc.response_body && log_body?(:error)
  log_body('error', exc.response_body)
end

def filter(filter_word, filter_replacement)
  @filter.push([filter_word, filter_replacement])
end

def initialize(logger:, options:)
  @logger = logger
  @filter = []
  @options = DEFAULT_OPTIONS.merge(options)
end

def log_body(type, body)
  body_log = proc { apply_filters(dump_body(body)) }
  public_send(log_level, type, &body_log)
end

def log_body?(type)
  case @options[:bodies]
  when Hash
    @options[:bodies][type]
  else
    @options[:bodies]
  end
end

def log_errors?
  @options[:errors]
end

def log_headers(type, headers)
  headers_log = proc { apply_filters(dump_headers(headers)) }
  public_send(log_level, type, &headers_log)
end

def log_headers?(type)
  case @options[:headers]
  when Hash
    @options[:headers][type]
  else
    @options[:headers]
  end
end

def log_level
  unless %i[debug info warn error fatal].include?(@options[:log_level])
    return :info
  end
  @options[:log_level]
end

def pretty_inspect(body)
  body.pretty_inspect
end

def request(env)
  request_log = proc do
    "#{env.method.upcase} #{apply_filters(env.url.to_s)}"
  end
  public_send(log_level, 'request', &request_log)
  log_headers('request', env.request_headers) if log_headers?(:request)
  log_body('request', env[:body]) if env[:body] && log_body?(:request)
end

def response(env)
  status = proc { "Status #{env.status}" }
  public_send(log_level, 'response', &status)
  log_headers('response', env.response_headers) if log_headers?(:response)
  log_body('response', env[:body]) if env[:body] && log_body?(:response)
end