class AWS::Core::LogFormatter

def _duration response
  ("%.06f" % response.duration).sub(/0+$/, '')
end

def _error_class response
  response.error.class.name if response.error
end

def _error_message response
  response.error.message if response.error
end

def _http_request_body response
  response.http_request.body
end

def _http_request_headers response
  response.http_request.headers.inspect
end

def _http_request_host response
  response.http_request.host
end

def _http_request_method response
  response.http_request.http_method
end

def _http_request_port response
  response.http_request.port
end

def _http_request_protocol response
  response.http_request.use_ssl? ? 'https' : 'http'
end

def _http_request_proxy_uri response
  response.http_request.proxy_uri
end

def _http_request_uri response
  response.http_request.uri
end

def _http_response_body response
  response.http_response.body
end

def _http_response_headers response
  response.http_response.headers.inspect
end

def _http_response_status response
  response.http_response.status
end

def _operation response
  response.request_type
end

def _options response
  summarize_hash(response.request_options) if response.request_options
end

def _region response
  response.http_request.region
end

def _retry_count response
  response.retry_count
end

def _service response
  response.http_request.class.name.split('::')[1]
end

def colored
  bold = "\x1b[1m"
  color = "\x1b[34m"
  reset = "\x1b[0m"
  pattern = []
  pattern << "#{bold}#{color}[AWS"
  pattern << ":service"
  pattern << ":http_response_status"
  pattern << ":duration"
  pattern << ":retry_count retries]#{reset}#{bold}"
  pattern << ":operation(:options)"
  pattern << ":error_class"
  pattern << ":error_message#{reset}"
  LogFormatter.new(pattern.join(' ') + "\n")
end

def debug
  sig_pattern = []
  sig_pattern << ':region'
  sig_pattern << ':service'
  sig_pattern << ':operation'
  sig_pattern << ':duration'
  sig_pattern << ':retry_count retries'
  uri_pattern = []
  uri_pattern << ':http_request_protocol'
  uri_pattern << '://'
  uri_pattern << ':http_request_host'
  uri_pattern << '::'
  uri_pattern << ':http_request_port'
  uri_pattern << ':'
  uri_pattern << ':http_request_uri'
  line = "+" + '-' * 79 
  pattern = []
  pattern << line
  pattern << "| AWS #{sig_pattern.join(' ')}"
  pattern << line
  pattern << "|   REQUEST"
  pattern << line
  pattern << "|    METHOD: :http_request_method"
  pattern << "|       URL: #{uri_pattern.join}"
  pattern << "|   HEADERS: :http_request_headers"
  pattern << "|      BODY: :http_request_body"
  pattern << line
  pattern << "|  RESPONSE"
  pattern << line
  pattern << "|    STATUS: :http_response_status"
  pattern << "|   HEADERS: :http_response_headers"
  pattern << "|      BODY: :http_response_body"
  LogFormatter.new(pattern.join("\n") + "\n")
end

def default
  pattern = []
  pattern << "[AWS"
  pattern << ":service"
  pattern << ":http_response_status"
  pattern << ":duration"
  pattern << ":retry_count retries]"
  pattern << ":operation(:options)"
  pattern << ":error_class"
  pattern << ":error_message"
  LogFormatter.new(pattern.join(' ') + "\n")
end

def eql? other
  other.is_a?(self.class) and other.pattern == self.pattern
end

def format response
  pattern.gsub(/:(\w+)/) {|sym| send("_#{sym[1..-1]}", response) }
end

def initialize pattern, options = {}
  @pattern = pattern
  @max_string_size = options[:max_string_size] || 1000
end

def method_missing method_name, *args
  if method_name.to_s.chars.first == '_'
    ":#{method_name.to_s[1..-1]}"
  else
    super
  end
end

def short
  pattern = []
  pattern << "[AWS"
  pattern << ":service"
  pattern << ":http_response_status"
  pattern << ":duration]"
  pattern << ":operation"
  pattern << ":error_class"
  LogFormatter.new(pattern.join(' ') + "\n")
end

def summarize_array array
  "[" + array.map{|v| summarize_value(v) }.join(",") + "]"
end

def summarize_file path
  "#<File:#{path} (#{File.size(path)} bytes)>"
end

def summarize_hash hash
  hash.map do |key,v|
    ":#{key}=>#{summarize_value(v)}"
  end.sort.join(",")
end

def summarize_string str
  max = max_string_size
  if str.size > max
    "#<String #{str[0...max].inspect} ... (#{str.size} bytes)>"
  else
    str.inspect
  end
end

def summarize_value value
  case value
  when String   then summarize_string(value)
  when Hash     then '{' + summarize_hash(value) + '}'
  when Array    then summarize_array(value)
  when File     then summarize_file(value.path)
  when Pathname then summarize_file(value)
  else value.inspect
  end
end