Packages
commanded
0.16.0
1.4.10
1.4.9
1.4.8
1.4.7
1.4.6
1.4.3
1.4.2
1.4.1
1.4.0
1.4.0-rc.0
1.3.1
1.3.0
1.2.0
1.1.1
1.1.0
1.0.1
1.0.0
1.0.0-rc.1
1.0.0-rc.0
0.19.1
0.19.0
0.18.1
0.18.0
0.17.5
0.17.4
0.17.3
0.17.2
0.17.1
0.17.0
0.16.0
0.16.0-rc.1
0.16.0-rc.0
0.15.1
0.15.0
0.14.0
0.14.0-rc.0
0.13.0
0.12.0
0.11.0
0.10.0
0.9.0
0.8.5
0.8.4
0.8.3
0.8.1
0.8.0
0.7.1
0.6.2
0.6.1
0.6.0
0.4.0
0.3.1
0.3.0
0.2.1
0.2.0
0.1.0
Use Commanded to build your own Elixir applications following the CQRS/ES pattern.
Current section
Files
Jump to
Current section
Files
test/helpers/command_audit_middleware.ex
defmodule Commanded.Helpers.CommandAuditMiddleware do
@moduledoc false
@behaviour Commanded.Middleware
@agent_name {:global, __MODULE__}
defmodule AuditLog do
@moduledoc false
defstruct [
dispatched: [],
succeeded: [],
failed: [],
]
end
def start_link do
Agent.start_link(fn -> %AuditLog{} end, name: @agent_name)
end
def before_dispatch(pipeline) do
Agent.update(@agent_name, fn %AuditLog{dispatched: dispatched} = audit ->
%AuditLog{audit | dispatched: dispatched ++ [pipeline]}
end)
pipeline
end
def after_dispatch(pipeline) do
Agent.update(@agent_name, fn %AuditLog{succeeded: succeeded} = audit ->
%AuditLog{audit | succeeded: succeeded ++ [pipeline]}
end)
pipeline
end
def after_failure(pipeline) do
Agent.update(@agent_name, fn %AuditLog{failed: failed} = audit ->
%AuditLog{audit | failed: failed ++ [pipeline]}
end)
pipeline
end
def reset do
Agent.update(@agent_name, fn _ -> %AuditLog{} end)
end
@doc """
Get the counts of the dispatched, succeeded, and failed commands
"""
def count_commands do
Agent.get(@agent_name, fn %AuditLog{dispatched: dispatched, succeeded: succeeded, failed: failed} ->
{length(dispatched), length(succeeded), length(failed)}
end)
end
@doc """
Access the dispatched commands the middleware received
"""
def dispatched_commands(pluck \\ &(&1.command)) do
Agent.get(@agent_name, fn %AuditLog{dispatched: dispatched} ->
dispatched |> Enum.map(pluck)
end)
end
@doc """
Access the dispatched commands that successfully executed
"""
def succeeded_commands do
Agent.get(@agent_name, fn %AuditLog{succeeded: succeeded} ->
succeeded |> Enum.map(&(&1.command))
end)
end
@doc """
Access the dispatched commands that failed to execute
"""
def failed_commands do
Agent.get(@agent_name, fn %AuditLog{failed: failed} ->
failed |> Enum.map(&(&1.command))
end)
end
end