Packages
stellar_sdk
0.16.1
0.23.0
0.22.0
0.21.2
0.21.1
0.21.0
0.20.0
0.19.0
0.18.1
0.18.0
0.17.1
0.17.0
0.16.1
0.16.0
0.15.1
0.15.0
0.14.0
0.13.1
0.13.0
0.12.0
0.11.8
0.11.7
0.11.6
0.11.5
0.11.4
0.11.3
0.11.2
0.11.1
0.11.0
0.10.2
0.10.1
0.10.0
0.9.3
0.9.2
0.9.1
0.9.0
0.8.1
0.8.0
0.7.1
0.7.0
0.6.0
0.5.0
0.4.0
0.3.0
0.2.0
0.1.0
Elixir SDK for the Stellar network.
Current section
Files
Jump to
Current section
Files
lib/tx_build/soroban_authorization_entry.ex
defmodule Stellar.TxBuild.SorobanAuthorizationEntry do
@moduledoc """
`SorobanAuthorizationEntry` struct definition.
"""
alias Stellar.TxBuild.{
SorobanCredentials,
SorobanAuthorizedInvocation
}
alias StellarBase.XDR.SorobanAuthorizationEntry
@behaviour Stellar.TxBuild.XDR
@type error :: {:error, atom()}
@type validation :: {:ok, any()} | error()
@type credentials :: SorobanCredentials.t()
@type root_invocation :: SorobanAuthorizedInvocation.t()
@type t :: %__MODULE__{
credentials: credentials(),
root_invocation: root_invocation()
}
defstruct [:credentials, :root_invocation]
@impl true
def new(value, opts \\ [])
def new(args, _opts) when is_list(args) do
credentials = Keyword.get(args, :credentials)
root_invocation = Keyword.get(args, :root_invocation)
with {:ok, credentials} <- validate_credentials(credentials),
{:ok, root_invocation} <- validate_root_invocation(root_invocation) do
%__MODULE__{
credentials: credentials,
root_invocation: root_invocation
}
end
end
def new(_value, _opts), do: {:error, :invalid_auth_entry_args}
@impl true
def to_xdr(%__MODULE__{
credentials: credentials,
root_invocation: root_invocation
}) do
root_invocation = SorobanAuthorizedInvocation.to_xdr(root_invocation)
credentials
|> SorobanCredentials.to_xdr()
|> SorobanAuthorizationEntry.new(root_invocation)
end
def to_xdr(_struct), do: {:error, :invalid_struct}
@spec validate_credentials(credentials :: credentials()) :: validation()
defp validate_credentials(%SorobanCredentials{} = credentials), do: {:ok, credentials}
defp validate_credentials(_credentials), do: {:error, :invalid_credentials}
@spec validate_root_invocation(root_invocation :: root_invocation()) :: validation()
defp validate_root_invocation(%SorobanAuthorizedInvocation{} = root_invocation),
do: {:ok, root_invocation}
defp validate_root_invocation(_root_invocation), do: {:error, :invalid_root_invocation}
end