Packages

extreme_system

0.0.2
0.3.1 0.2.16 0.2.15 0.2.14 0.2.13 0.2.12 0.2.11 0.2.10 0.2.9 0.2.8 0.2.7 0.2.6 retired 0.2.5 0.2.4 0.2.3 0.2.2 0.2.1 0.2.0 0.1.5 0.1.4 0.1.3 0.1.2 0.1.1 0.1.0 0.0.9 0.0.8 0.0.7 0.0.6 0.0.5 0.0.4 0.0.3 0.0.2 0.0.1

Building blocks for distributed systems

HexDocs

Current section

Files

Jump to
Readme
33 Versions
3 Dependencies
Dependants
Files
Activity
extreme_system lib system aggregate_group.ex
Raw

lib/system/aggregate_group.ex 

defmodule Extreme.System.AggregateGroup do

  use     Supervisor

  alias   Extreme.System.AggregateSup

  alias   Extreme.System.PidRegistry



  def start_link(aggregate_module),

    do: Supervisor.start_link __MODULE__, aggregate_module, name: group_name(aggregate_module)



  def spawn_aggregate(aggregate_module, key, child_params \\ []) do

    {:ok, pid} = aggregate_module |> sup_name      |> AggregateSup.start_child(child_params)

    :ok        = aggregate_module |> registry_name |> PidRegistry.register(key, pid)

    {:ok, pid}

  end



  def get_registered(aggregate_module, key),

    do: aggregate_module |> registry_name |> PidRegistry.get(key)





  def init(aggregate_module) do

    children = [

      supervisor( AggregateSup, [aggregate_module, [name: sup_name(aggregate_module)]]),

      worker(     PidRegistry,  [registry_name(aggregate_module)])

    ]

    supervise children, strategy: :one_for_all

  end





  defp group_name(aggregate_module),    do: "#{aggregate_module}Group"    |> String.to_atom

  defp sup_name(aggregate_module),      do: "#{aggregate_module}Sup"      |> String.to_atom

  defp registry_name(aggregate_module), do: "#{aggregate_module}Registry" |> String.to_atom

end