Packages
eventstore
0.2.0
1.4.8
1.4.7
1.4.6
1.4.4
1.4.3
1.4.2
1.4.1
1.4.0
1.3.2
1.3.1
1.3.0
1.2.3
1.2.2
1.2.1
1.2.0
1.1.0
1.0.3
1.0.2
1.0.1
1.0.0
1.0.0-rc.0
0.17.0
0.16.2
0.16.1
0.16.0
0.15.1
0.15.0
0.14.0
0.14.0-rc.0
0.13.2
0.13.1
0.13.0
0.12.1
0.12.0
0.11.0
0.11.0-rc.0
0.10.1
0.10.0
0.9.0
0.8.1
0.8.0
0.7.4
0.7.3
0.7.2
0.7.1
0.7.0
0.6.2
0.6.1
0.6.0
0.5.2
0.5.1
0.5.0
0.4.3
0.4.2
0.4.1
0.4.0
0.3.0
0.2.1
0.2.0
0.1.0
0.0.5
0.0.4
0.0.3
0.0.2
0.0.1
Event store using PostgreSQL for persistence.
Current section
Files
Jump to
Current section
Files
lib/event_store/streams.ex
defmodule EventStore.Streams do
@moduledoc """
Streams provides access to a stream process by its stream uuid
"""
use GenServer
require Logger
alias EventStore.Streams
alias EventStore.Streams.{Stream,Supervisor}
defstruct streams: %{}, supervisor: nil
def start_link do
GenServer.start_link(__MODULE__, %Streams{
streams: %{}
},
name: __MODULE__)
end
def open_stream(stream_uuid) do
GenServer.call(__MODULE__, {:open_stream, stream_uuid})
end
def init(%Streams{} = state) do
{:ok, supervisor} = Streams.Supervisor.start_link
state = %Streams{state | supervisor: supervisor}
{:ok, state}
end
def handle_call({:open_stream, stream_uuid}, _from, %Streams{streams: streams, supervisor: supervisor} = state) do
stream = case Map.get(streams, stream_uuid) do
nil -> start_stream(supervisor, stream_uuid)
stream -> stream
end
{:reply, {:ok, stream}, %Streams{state | streams: Map.put(streams, stream_uuid, stream)}}
end
def handle_info({:DOWN, ref, :process, pid, reason}, %Streams{streams: streams} = state) do
Logger.warn "stream down due to: #{reason}"
{:noreply, %Streams{state | streams: remove_stream(streams, pid)}}
end
defp start_stream(supervisor, stream_uuid) do
{:ok, stream} = Streams.Supervisor.start_stream(supervisor, stream_uuid)
Process.monitor(stream)
stream
end
defp remove_stream(streams, pid) do
Enum.reduce(streams, streams, fn
({stream_uuid, stream_pid}, acc) when stream_pid == pid -> Map.delete(acc, stream_uuid)
(_, acc) -> acc
end)
end
end