Packages
stellar_sdk
0.17.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/host_function.ex
defmodule Stellar.TxBuild.HostFunction do
@moduledoc """
`HostFunction` struct definition.
"""
alias Stellar.TxBuild.{CreateContractArgs, SCVec}
alias StellarBase.XDR.{HostFunction, HostFunctionType, VariableOpaque}
@behaviour Stellar.TxBuild.XDR
@type value :: CreateContractArgs.t() | SCVec.t() | binary()
@type error :: {:error, atom()}
@type validation :: {:ok, any()} | error()
@type type ::
:invoke_contract
| :create_contract
| :upload_contract_wasm
@type t :: %__MODULE__{
type: type(),
value: value()
}
defstruct [:type, :value]
@allowed_types ~w(invoke_contract create_contract upload_contract_wasm)a
@impl true
def new(args, opts \\ [])
def new([{type, value}], _opts) when type in @allowed_types do
with {:ok, _value} <- validate_host_function({type, value}) do
%__MODULE__{
type: type,
value: value
}
end
end
def new(_args, _opts), do: {:error, :invalid_operation_attributes}
@impl true
def to_xdr(%__MODULE__{
type: :invoke_contract,
value: value
}) do
type = HostFunctionType.new(:HOST_FUNCTION_TYPE_INVOKE_CONTRACT)
value
|> SCVec.to_xdr()
|> HostFunction.new(type)
end
def to_xdr(%__MODULE__{
type: :create_contract,
value: value
}) do
type = HostFunctionType.new(:HOST_FUNCTION_TYPE_CREATE_CONTRACT)
value
|> CreateContractArgs.to_xdr()
|> HostFunction.new(type)
end
def to_xdr(%__MODULE__{
type: :upload_contract_wasm,
value: value
}) do
type = HostFunctionType.new(:HOST_FUNCTION_TYPE_UPLOAD_CONTRACT_WASM)
value
|> VariableOpaque.new()
|> HostFunction.new(type)
end
@spec validate_host_function({type :: atom(), value :: value()}) :: validation()
defp validate_host_function({:invoke_contract, %SCVec{} = value}), do: {:ok, value}
defp validate_host_function({:create_contract, %CreateContractArgs{} = value}), do: {:ok, value}
defp validate_host_function({:upload_contract_wasm, value}) when is_binary(value),
do: {:ok, value}
defp validate_host_function({type, _value}), do: {:error, :"invalid_#{type}"}
end