3

我有 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 并按名称停止?

谢谢你。

4

2 回答 2

14

第一:您必须始终使用相同的名称来处理一个进程,"foo"并且foo是不同的,因此首先要有一个严格的命名约定。

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

在我看来,您还应该将该stop函数转换为 use 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提供了更好的分布。

于 2011-04-20T07:22:16.693 回答
1

我面前没有文档,但我的猜测是您需要将用户名包装在 gen_server 演员表中的全局元组中。

于 2011-04-20T07:21:51.247 回答