braintree

if Mix.env == :test do
  defmodule Braintree.Testing.TestTransaction do
    @moduledoc """
    Create transasctions for testing purposes only.
    Transition to settled, settlement_confirmed, or settlement_declined states.
    """

    alias Braintree.Transaction
    alias Braintree.HTTP
    alias Braintree.ErrorResponse, as: Error

    @doc """
    Use a `transaction_id` to transition to settled status. This
    allows for testing of refunds.

    ## Example

        {:ok, transaction} = TestTransaction.settle(transaction_id: "123")

        transaction.status # "settled"
    """
    @spec settle(String.t) :: {:ok, any} | {:error, Error.t}
    def settle(transaction_id) do
      case HTTP.put("transactions/#{transaction_id}/settle", %{}) do
        {:ok, %{"transaction" => transaction}} ->
          {:ok, Transaction.construct(transaction)}
        {:error, %{"api_error_response" => error}} ->
          {:error, Error.construct(error)}
        {:error, :not_found} ->
          {:error, Error.construct(%{"message" => "Transaction ID is invalid."})}
      end
    end

    @doc """
    Use a `transaction_id` to transition to settled_confirmed status

    ## Example

        {:ok, transaction} = TestTransaction.settlement_confirm(
          transaction_id: "123")

        transaction.status # "settlement_confirmed"
    """
    @spec settlement_confirm(String.t) :: {:ok, any} | {:error, Error.t}
    def settlement_confirm(transaction_id) do
      case HTTP.put("transactions/#{transaction_id}/settlement_confirm", %{}) do
        {:ok, %{"transaction" => transaction}} ->
          {:ok, Transaction.construct(transaction)}
        {:error, %{"api_error_response" => error}} ->
          {:error, Error.construct(error)}
        {:error, :not_found} ->
          {:error, Error.construct(%{"message" => "Transaction ID is invalid."})}
      end
    end

    @doc """
    Use a `transaction_id` to transition to settlement_declined status

    ## Example

        {:ok, transaction} = TestTransaction.settlement_decline(
          transaction_id: "123")

        transaction.status # "settlement_declined"
    """
    @spec settlement_decline(String.t) :: {:ok, any} | {:error, Error.t}
    def settlement_decline(transaction_id) do
      case HTTP.put("transactions/#{transaction_id}/settlement_decline", %{}) do
        {:ok, %{"transaction" => transaction}} ->
          {:ok, Transaction.construct(transaction)}
        {:error, %{"api_error_response" => error}} ->
          {:error, Error.construct(error)}
        {:error, :not_found} ->
          {:error, Error.construct(%{"message" => "Transaction ID is invalid."})}
      end
    end
  end
end