module BraspagPagador
  class Connection

    class InvalidMerchantId < Exception ; end
    class InvalidEnvironment < Exception ; end

    PRODUCTION_URL = "https://transaction.pagador.com.br"
    HOMOLOGATION_URL = "https://homologacao.pagador.com.br"
    # PROTECTED_CARD_HOMOLOGATION_URL = "https://cartaoprotegido.braspag.com.br/Services/V2"
    # PROTECTED_CARD_PRODUCTION_URL = "https://homologacao.braspag.com.br/services/testenvironment"
    PROTECTED_CARD_PRODUCTION_URL = "https://cartaoprotegido.braspag.com.br/Services/V2"
    PROTECTED_CARD_HOMOLOGATION_URL = "https://homologacao.braspag.com.br/services/testenvironment"

    attr_reader :merchant_id, :env, :logger, :proxy_address

    def initialize(params = {})
      merchant_id = params[:merchant_id]
      env = params[:environment]
      raise InvalidMerchantId unless merchant_id =~ /\{[a-z0-9]{8}-([a-z0-9]{4}-){3}[a-z0-9]{12}\}/i
      raise InvalidEnvironment unless (env == :homologation || env == :production)

      @merchant_id = merchant_id
      @env = env
      @logger = params[:logger]
      @proxy_address = params[:proxy_address]
    end

    def production?
      @env == :production
    end

    def homologation?
      @env == :homologation
    end

    def url_for(method_name)
      braspag_url = production? ? PRODUCTION_URL : HOMOLOGATION_URL
      protected_card_url = production? ? PROTECTED_CARD_PRODUCTION_URL : PROTECTED_CARD_HOMOLOGATION_URL

      braspag_info_url = if production?
        braspag_url + "/webservices/pagador/pedido.asmx"
      else
        braspag_url + "/pagador/webservice/pedido.asmx"
      end

      case method_name
      when :authorize
        braspag_url + "/webservices/pagador/Pagador.asmx/Authorize"
      when :void
        braspag_url + "/webservices/pagador/Pagador.asmx/VoidTransaction"
      when :capture
        braspag_url + "/webservices/pagador/Pagador.asmx/Capture"
      when :generate_billet
        braspag_url + "/webservices/pagador/Boleto.asmx/CreateBoleto"
      when :generate_eft
        braspag_url + "/pagador/passthru.asp"
      when :info_billet
        braspag_info_url + "/GetDadosBoleto"
      when :info_credit_card
        braspag_info_url + "/GetDadosCartao"
      when :info
        braspag_info_url + "/GetDadosPedido"
      when :encrypt
        braspag_url + "/BraspagGeneralService/BraspagGeneralService.asmx"
      when :save_credit_card
        protected_card_url + "/CartaoProtegido.asmx?wsdl"
      when :get_credit_card
        protected_card_url + "/CartaoProtegido.asmx?wsdl"
      end
    end

    def post(method_name, *args)
      response = BraspagPagador::Poster.new(
        self,
        self.url_for(method_name)
      ).do_post(
        method_name,
        self.convert(method_name, :to, args)
      )

      self.convert(method_name, :from, args + [response] )
    end

    def soap_request(method_name, *args)
      url = url_for(method_name)
      client = Savon.client(wsdl: url)

      response = client.call method_name, message: self.convert(method_name, :to, args)

      self.convert(method_name, :from, args + [response] )
    end

    def convert(method_name, direction, args)
      target = case method_name
      when :authorize, :void, :capture, :save_credit_card, :get_credit_card, :authorize_saved_credit_card
        CreditCard
      when :generate_billet
        Billet
      when :generate_eft
        EFT
      when :info_billet, :info_credit_card, :info
        Order
      when :encrypt
        Crypto::Webservice
      end

      target.send("#{direction}_#{method_name}", *([self] + args))
    end
  end
end