我是Elixir的初学者。
我有一个应用程序在application.ex中启动一个自定义管理程序。代码:
defmodule MyApp do
use Application
def start(_type, _args) do
import Supervisor.Spec
children = [
supervisor(MyApp.Web.Endpoint, []),
supervisor(MyApp.Repo, []),
#my notifier
MyApp.MyNotifier.Supervisor
]
opts = [strategy: :one_for_one, name: MyApp.Supervisor]
Supervisor.start_link(children, opts)
end
end
主管的代码是这样的:
defmodule MyApp.MyNotifier.Supervisor do
use Supervisor
def start_link(_options), do:
Supervisor.start_link(__MODULE__, :ok, name: __MODULE__)
def start_my_notifier(state) do
Supervisor.start_child(__MODULE__, state)
end
def init(:ok) do
Supervisor.init([], strategy: :one_for_one)
end
end
工人的代码是这样的:
defmodule MyApp.MyNotifier do
use GenServer
# Client
def start_link(state) do
GenServer.start_link(__MODULE__, state)
end
# Server
def init(state) do
# Reschedule
reschedule(state)
# Reply
{:ok, state}
end
def handle_info(:reschedule, state) do
case state["count"] < 9 do
true ->
# Send notification
MyNotifier.Helper.notify_past_delivery_time(sate["id"])
# Reschedule once more
reschedule(state)
false ->
# End process
Process.exit(self(), :normal)
end
{:noreply, state}
end
defp reschedule(state) do
Process.send_after(self(), :reschedule, state["time"] * 60 * 1000)
end
end
当我的应用程序发生某些事情时,我希望使用以下代码动态添加/启动一个工作人员:
MyNotifier.Supervisor.start_my_notifier(%{"name" => name, "id" => id, "time" => 15, "count" => 0})
当我在调试模式下运行我的应用程序(iex -S mix phx.server)并将一个IEx.pry放在worker的init函数中时(然后我们强制应用程序进入启动子进程的状态)。为什么申请永远不会停止?
答案 0 :(得分:1)
我在管理员代码中更改了simple_one_for_one的管理员策略。
Supervisor.init([], strategy: :simple_one_for_one)
这适合我。
答案 1 :(得分:0)
调用Supervisor.start_child/2
的第二个参数应该是子规范,而不是:
Supervisor.start_child(__MODULE__, state)
应该有点像:
Supervisor.start_child(__MODULE__, [self(), MyApp.MyNotifier, [state]])