sage v0.1.0 Sage

Sage is an implementation of Sagas pattern in pure Elixir. It is go to way when you dealing with distributed transactions, especially with an error recovery/cleanup. Sagas guarantees that either all the transactions in a saga are successfully completed or compensating transactions are run to amend a partial execution.

Critical Error Handling

For Transactions

Transactions are wrapped in a try..catch block. Whenever a critical error occurs (exception is raised, function has an unexpected return or async transaction exits) Sage will run all compensations and then reraise the exception, so you would see it like it occurred without Sage.

For Compensations

By default, compensations are not protected from critical errors and would raise an exception. This is done to keep simplicity and follow “let it fall” pattern of the language, thinking that this kind of errors should be logged and then manually investigated by a developer.

But if that’s not enough for you, it is possible to register handler via with_compensation_error_handler/2. When it’s registered, compensations are wrapped in a try..catch block and then it’s error handler responsibility to take care about further actions. Few solutions you might want to try:

  • Send notification to a Slack channel about need of manual resolution;
  • Retry compensation;
  • Spin off a new supervised process that would retry compensation and return an error in the Sage. (Useful when you have connection issues that would be resolved at some point in future.)

Logging for compensation errors is pretty verbose to drive the attention to the problem from system maintainers.

Examples

def my_sage do

import Sage

new()
|> run(:user, &create_user/2, &delete_user/3)
|> run(:plans, &fetch_subscription_plans/3)
|> run(:subscription, &create_subscription/2, delete_subscription/3)
|> run_async(:delivery, &schedule_delivery/2, &delete_delivery_from_schedule/3)
|> run_async(:receipt, &send_email_receipt/2, &send_excuse_for_email_receipt/3)
|> run(:update_user, &set_plan_for_a_user/2, &rollback_plan_for_a_user/3)
|> finally(&acknowledge_job/2)

end

my_sage() |> execute([pool: Poolboy.start_link(), user_attrs: %{“email” => “foo@bar.com”}]) |> case do

{:ok, success, _effects} ->
  {:ok, success}

{:error, reason} ->
  Logger.error("Failed to execute with reason #{inspect(reason)}")
  {:error, reason}

end

Wrapping Sage in a transaction:

# In this sage we don’t need &delete_user/2 and &rollback_plan_for_a_user/3, # everything is rolled back as part of DB transaction def my_db_aware_sage do

import Sage

new()
|> run(:user, &create_user/2)
|> run(:plans, &fetch_subscription_plans/3)
|> run(:subscription, &create_subscription/2, delete_subscription/3)
|> run_async(:delivery, &schedule_delivery/2, &delete_delivery_from_schedule/3)
|> run_async(:receipt, &send_email_receipt/2, &send_excuse_for_email_receipt/3)
|> run(:update_user, &set_plan_for_a_user/2)
|> finally(&acknowledge_job/2)

end

my_db_aware_sage() |> Sage.to_function(execute_opts) |> Repo.transaction()

Link to this section Summary

Types

Compensation callback

Final callback

t()

Transaction callback

Functions

Executes a Sage

Appends a sage with a function that will be triggered after sage success or abort

Creates a new sage

Appends sage with an transaction that does not have side effect

Appends sage with an transaction and function to compensate it’s effect

Appends sage with an asynchronous transaction and function to compensate it’s effect. It’s transaction callback would receive only effect created by preceding synchronous transactions

Wraps execute/2 into anonymous function to be run in a Repo transaction

Register error handler for compensation function

Registers tracing for a Sage

Link to this section Types

Link to this type async_opts()
async_opts() :: [{:timeout, integer() | :infinity}]
Link to this type compensation()
compensation() ::
  (effect_to_compensate() :: any(), {operation_operation_name :: name(), failed_value :: any()}, execute_opts :: any() -> :ok | :abort | {:retry, Keyword.t()} | {:continue, any()}) |
  :noop |
  mfa()

Compensation callback.

Compensation function should be idempotent, because it’s possible to retry transactions and compensation that failed.

You should define the steps in a compensating transaction as idempotent commands. This enables the steps to be repeated if the compensating transaction itself fails.

A compensating transaction doesn’t necessarily return the data in the system to the state it was in at the start of the original operation. Instead, it compensates for the work performed by the steps that completed successfully before the operation failed.

Receives:

  • effect created by transaction it’s responsible for or nil in case effect can not be captured;
  • {operation_operation_name, reason} tuple with failed transaction name and it’s failure reason;
  • options passed to execute/2 function.

It should return:

  • :ok if effect is compensated, Sage will continue to compensate other effects;
  • :abort if effect is compensated but should not be created again, Sage will compensate other effects and ignore all retries;
  • {:retry, retry_opts} if effect is compensated but transaction can be retried with options retry_opts;
  • {:continue, effect} if effect is compensated and execution can be retried with other effect to replace the transaction return. This allows to implement circuit breaker.

General rule is that irrespectively to what compensate wants to return, effect must be always compensated. No matter what, it should not create other effects. For circuit breaker always use data that already exists, preferably by passing it in opts to the execute/2.

Circuit Breaker

After receiving a circuit breaker response Sage will continue executing transactions by using returned effect. Circuit breaking is only allowed if compensation function that returns it is responsible for the failed transaction (they both are part of for the same operation).

If compensation violates this rule, Sage.UnexpectedCircuitBreakError is returned.

It’s the developer responsibility to match operation name and failed operation name.

Link to this type effects()
effects() :: map()
Link to this type finally()
finally() ::
  (:ok | :error, execute_opts :: any() -> no_return() | any()) |
  mfa()

Final callback.

It receives :ok if all transactions are successfully completed or :error otherwise and options passed to the execute/2.

Link to this type name()
name() :: atom()
Link to this type t()
t() :: %Sage{adapter: module(), finally: MapSet.t(finally()), on_compensation_error: :raise | module(), operation_names: MapSet.t(), operations: [{name(), operation()}], tracers: MapSet.t(module())}
Link to this type transaction()
transaction() ::
  (effects_so_far :: effects(), execute_opts :: any() -> {:ok | :error | :abort, any()}) |
  mfa()

Transaction callback.

It receives effects created by preceding transactions (only synchronous ones if the transaction is asynchronous), and options passed to execute/2 function.

It should return {:ok, effect} if transaction is successfully completed, {:error, reason} if there was an error or {:abort, reason} if there was an unrecoverable error.

After receiving {:abort, reason} Sage will compensate all side effects created so far and ignore all retries.

Transaction function should be idempotent, since it is possible to retry failed operations (after compensating it’s effects).

Sage.MalformedTransactionReturnError is raised if callback returns malformed result.

Link to this section Functions

Link to this function execute(sage, opts \\ [])
execute(sage :: t(), opts :: any()) ::
  {:ok, result :: any(), effects :: effects()} |
  {:error, any()}

Executes a Sage.

Raises ArgumentError if adapter is not loaded or does not implement execute/2 callback.

Optionally, you can pass global options in opts, that will be sent to all transaction and compensation functions. It is especially useful when you want to have keep sage definitions declarative and execute them with different arguments (eg. by storing it in the module attribute).

If there was an exception or exit in one of transaction functions, Sage will reraise it after compensating all effects.

For handling exceptions in compensation functions see “Critical Error Handling” in module doc.

Link to this function finally(sage, callback)
finally(sage :: t(), callback :: finally()) :: t()

Appends a sage with a function that will be triggered after sage success or abort.

Registering duplicated final callback is not allowed and would raise an exception.

All errors during execution of a final callback would be logged, but it won’t affect Sage execution.

For callback specification see finally/0.

Link to this function new()
new() :: t()

Creates a new sage.

Link to this function run(sage, name, transaction)
run(sage :: t(), name :: name(), apply :: transaction()) :: t()

Appends sage with an transaction that does not have side effect.

This is an alias for calling run/4 with a :noop instead of compensation callback.

Callbacks can be either anonymous function or an {module, function, [arguments]} tuple. For callbacks interface see transaction/0 and compensation/0 type docs.

Link to this function run(sage, name, transaction, compensation)
run(sage :: t(), name :: name(), apply :: transaction(), rollback :: compensation()) :: t()

Appends sage with an transaction and function to compensate it’s effect.

Callbacks can be either anonymous function or an {module, function, [arguments]} tuple. For callbacks interface see transaction/0 and compensation/0 type docs.

If transaction does not produce effect to compensate, pass :noop instead of compensation callback.

Link to this function run_async(sage, name, transaction, compensation, opts \\ [])
run_async(sage :: t(), name :: name(), apply :: transaction(), rollback :: compensation(), opts :: async_opts()) :: t()

Appends sage with an asynchronous transaction and function to compensate it’s effect. It’s transaction callback would receive only effect created by preceding synchronous transactions.

All asynchronous transactions are awaited before next synchronous transaction. If there is an error in asynchronous transaction, Sage will await for other transactions to complete or fail and then compensate for all the effect created by them.

Callbacks can be either anonymous function or an {module, function, [arguments]} tuple. For callbacks interface see transaction/0 and compensation/0 type docs.

Options

  • :timeout - the time in milliseconds to wait for the transaction to finish, :infinity will wait indefinitely (default: 5000);
Link to this function to_function(sage, opts)
to_function(sage :: t(), opts :: any()) :: function()

Wraps execute/2 into anonymous function to be run in a Repo transaction.

Link to this function with_compensation_error_handler(sage, module)
with_compensation_error_handler(sage :: t(), module :: module()) :: t()

Register error handler for compensation function.

Adapter must implement Sage.CompensationErrorHandlerAdapter behaviour.

Link to this function with_tracer(sage, module)
with_tracer(sage :: t(), module :: module()) :: t()

Registers tracing for a Sage.

It will be called before after each execution of a Sage operation, which can be used to set metrics and measure how much time each of those steps took.

Registering duplicated tracing callback is not allowed and would raise an exception.

All errors during execution of a tracing callbacks would be logged, but it won’t affect Sage execution.

Adapter must implement Sage.Tracer behaviour.