# :nodoc:
module Veritrans

  # :nodoc:
  class Client
    include Config

    # constructor to create instance of Veritrans::Client
    def initialize(&block)
      class <<self
        self
      end.class_eval do
        attr_accessor(:commodity, *PostData::PostParam) 
      end
      
      # return-back to merchant-web
      self.customer_specification_flag = Config::CUSTOMER_SPECIFICATION_FLAG 
      self.settlement_type             = Config::SETTLEMENT_TYPE_CARD

      if block_given?
        yield(self) #self.instance_eval(&block)
        return self.get_keys
      end
    end

    #
    # Example:
    #
    #   client = Veritrans::Client.new
    #   client.order_id     = "dummy#{(0...12).map{65.+(rand(25))}.join}"
    #   client.session_id   = "session#{(0...12).map{65.+(rand(25))}.join}"
    #   client.gross_amount = "10"
    #   client.commodity    = [{
    #     "COMMODITY_ID"    => "IDxx1", 
    #     "COMMODITY_UNIT"  => "10",
    #     "COMMODITY_NUM"   => "1",
    #     "COMMODITY_NAME1" => "Waterbotle",
    #     "COMMODITY_NAME2" => "Waterbottle in Indonesian"}]
    #   client.get_keys
    #
    def get_keys
      init_instance

      params = prepare_params(PostData::ServerParam,PostData::PostParam)

      if @commodity.class == Array
        commodity = @commodity.collect do |data|
          uri = Addressable::URI.new
          uri.query_values = data
          uri.query
        end
      end

      uri = Addressable::URI.new
      uri.query_values = params
      query_string = "#{uri.query}&REPEAT_LINE=#{@commodity.length}&#{commodity.join('&')}"

      conn = Faraday.new(:url => server_host)
      @resp = conn.post do |req|
        req.url(Config::REQUEST_KEY_URL)
        req.body = query_string
      end.env
      # puts query_string

      delete_keys
      @resp[:url] = @resp[:url].to_s

      @token = parse_body(@resp[:body])
    end

    # :nodoc:
    def server_host
      return Client.config["server_host"] ? Client.config["server_host"] : Config::SERVER_HOST
    end

    def redirect_url
      "#{server_host}/web1/paymentStart.action"
    end

    # :nodoc:
    def merchant_id
      return Client.config["merchant_id"]
    end

    # :nodoc:
    def merchant_id= new_merchant_id
      Client.config["merchant_id"] = new_merchant_id
    end

    # :nodoc:
    def merchant_hash_key
      return Client.config["merchant_hash_key"]
    end

    # :nodoc:
    def merchant_hash_key= new_merchant_hash_key
      Client.config["merchant_hash_key"] = new_merchant_hash_key
    end

    # :nodoc:
    def error_payment_return_url
      return Client.config["error_payment_return_url"]
    end

    # :nodoc:
    def finish_payment_return_url
      return Client.config["finish_payment_return_url"]
    end

    # :nodoc:
    def unfinish_payment_return_url
      return Client.config["unfinish_payment_return_url"]
    end

    # :nodoc:
    def token
      return @token
    end

    private

    def merchanthash
      # Generate merchant hash code
      return HashGenerator::generate(merchant_id, merchant_hash_key, settlement_type, order_id, gross_amount);
    end

    def parse_body(body)
      arrs = body.split("\r\n")
      arrs = arrs[-2,2] if arrs.length > 1
      return Hash[arrs.collect{|x|x.split("=")}]
    end
  
    def init_instance
      @token = nil
    end

    def prepare_params(*arg)
      params = {}
      arg.flatten.each do |key|
        value = self.send(key)
        params[key.upcase] = value if value 
      end
      return params
    end

    def delete_keys
      @resp.delete(:ssl)
      @resp.delete(:request)
      @resp.delete(:response)
      @resp.delete(:request_headers)
      @resp.delete(:parallel_manager)
    end

  end
end