Why is that?
could you demo a door
Sure. The code below is untested, but the idea is correct.
defmodule Door do
@fsm """
unplugged --> |on!| closed
closed --> |button| input
closed --> |off| dismantled
input --> |button| input,unlocked,locked
unlocked --> |plumber| closed
locked --> |plumber| closed
"""
use Finitomata, fsm: @fsm, timer: 10, impl_for: :all, auto_terminate: true
@impl true
# entering `input`
def on_transition(:closed, :button, button, %{code: code, entered: []} = state),
do: {:ok, :input, Map.update(state, :entered, & [button | &1])}
# processing input
def on_transition(:input, :button, button, %{code: code, entered: current} = state) do
current = [button | current]
cond do
valid?(current, code) -> {:ok, :unlocked, Map.put(state, entered: [])}
length(current) >= 10 -> {:ok, :locked, Map.put(state, entered: [])}
true -> {:ok, :input, Map.put(state, entered: current)}
end
end
def on_timer(:locked, %{locked_from: timestamp} = state) do
if elapsed_lock?(timestamp),
do: {:transition, :plumber, state}, # unlock
else: {:ok, state}
end
def on_timer(:input, state) do
if elapsed_timeout?(timestamp),
do: {:transition, :plumber, Map.put(state, :entered, [])}, # reset
else: {:ok, state}
end
end
I didn’t implement private helpers like elapsed?/1 and valid?/2 because they are trivial.
