Erlang 停止 gen_server

Question

我有 gen_server:

start(UserName) ->
    case gen_server:start({global, UserName}, player, [], []) of
    {ok, _} ->
        io:format("Player: " ++ UserName ++ " started");
    {error, Error} ->
        Error
    end
    ...

现在我想编写函数来停止这个 gen 服务器。我有:

stop(UserName) ->
    gen_server:cast(UserName, stop).

handle_cast(stop, State) ->
    {stop, normal, State};
handle_cast(_Msg, State) ->
    {noreply, State}.

我运行它:

start("shk").
Player: shk startedok
stop(shk).
ok
start("shk").
{already_started,<0.268.0>}

但:

stop(player).
ok

是工作。

如何按名称运行 gen_server 并按名称停止？

谢谢你。

Answer 1

第一:您必须始终使用相同的名称来处理进程，"foo"和 foo是不同的，所以首先要有一个严格的命名约定。

第二:使用全局注册的进程时，还需要使用{global, Name}用于寻址过程。

在我看来，您还应该转换 stop使用函数gen_server:call ，这将阻止并让您从 gen_server 返回一个值。一个例子:

stop(Name) ->
    gen_server:call({global, Name}, stop).

handle_call(stop, _From, State) ->
    {stop, normal, shutdown_ok, State}

这将返回 shutdown_ok给来电者。

话虽如此，global模块相当有限，可以使用 gproc 等替代方法提供了更好的分布。