module Moip2

  class Client
    include HTTParty

    attr_reader :env, :auth, :uri

    def initialize(env = :sandbox, auth = nil, opts = {})
      @env, @auth, @opts = env.to_sym, auth, opts

      @uri = get_base_uri
      self.class.base_uri @uri
    end

    def sandbox?
      env == :sandbox
    end

    def production?
      env == :production
    end

    def opts
      opts = @opts
      opts[:headers] ||= {}

      opts[:headers].merge!(
          {
            "Content-Type" => "application/json",
            "Authorization" => auth.header
          }
      )

      opts
    end

    def post(path, resource)
      options = opts().merge(body: convert_hash_keys_to(:camel_case, resource).to_json)
      resp = self.class.post path, options
      create_response resp
    end

    def put(path, resource)
      options = opts().merge(body: convert_hash_keys_to(:camel_case, resource).to_json)
      resp = self.class.put path, options

      create_response resp
    end

    def get(path)
      resp = self.class.get path, opts()

      create_response resp
    end

    private

    def get_base_uri
      return ENV["base_uri"] if ENV["base_uri"]

      if production?
        "https://api.moip.com.br"
      else
        "https://sandbox.moip.com.br"
      end

    end

    def create_response(resp)
      raise NotFoundError, "Resource not found" if resp.code == 404

      Response.new resp, convert_hash_keys_to(:snake_case, resp.parsed_response)
    end

    def basic_auth
      { username: @auth[:token], password: @auth[:secret]}
    end

    def convert_hash_keys_to(conversion, value)
      case value
        when Array
          value.map { |v| convert_hash_keys_to(conversion, v) }
        when Hash
          Hash[value.map { |k, v| [send(conversion, k).to_sym, convert_hash_keys_to(conversion, v)] }]
        else
          value
       end
    end

    def camel_case(str)
      return str.to_s if str.to_s !~ /_/ && str.to_s =~ /[A-Z]+.*/
      words = str.to_s.split('_')
      (words[0..0] << words[1..-1].map{|e| e.capitalize}).join
    end

    def snake_case(str)
        str.gsub(/::/, '/').
            gsub(/([A-Z]+)([A-Z][a-z])/,'\1_\2').
            gsub(/([a-z\d])([A-Z])/,'\1_\2').
            tr("-", "_").
            downcase
    end

  end

end