defmodule Singleton do
  @moduledoc """
  Singleton application.

  The top supervisor of singleton is a `:simple_one_for_one`
  supervisor. Singleton can manage many singleton processes at the
  same time. Each singleton is identified by its unique `name` term.

  """

  use Application

  require Logger

  def start(_, _) do
    import Supervisor.Spec, warn: false

    children = [
      worker(Singleton.Manager, [], restart: :permanent),
    ]

    opts = [strategy: :simple_one_for_one, name: Singleton.Supervisor]
    Supervisor.start_link(children, opts)
  end

  @doc """
  Start a new singleton process.

  This function needs to be executed on all nodes where the singleton
  process is allowed to live. The actual process will be started only
  once; a manager process is started on each node for each singleton
  to ensure that the process continues on (possibly) another node in
  case of node disconnects or crashes.

  """
  def start_child(module, args, name) do
    Supervisor.start_child(Singleton.Supervisor, [module, args, name])
  end

end