gen_server和运行时错误

时间:2010-12-08 13:57:25

标签: erlang otp

我在gen_server的init部分有一个运行时错误。 - init以process_flag开头(trap_exit,true) - gen_server是监督树的一部分 我尝试在终止模块中打印原因但它似乎退出其他地方。 - 为什么没有叫终止? 应用程序因关闭而停止。 - 如何以及在何处捕获运行时错误?

1 个答案:

答案 0 :(得分:4)

terminate回调通常在这种情况下被调用,即因为你已经陷入困境。

唯一不存在这种情况的地方是如果崩溃发生在init-function中。在这种情况下,责任在于主管,主管通常会因此而终止。然后,此错误会爬上主管树,直到它最终终止整个应用程序。

通常,主管将记录上下文设置为start_error的主管报告。这是你的提示,监督树的一部分有你应该处理的问题。您应该检查这一点,因为您可能对错误发生的位置有错误的假设。

从此处编辑

你的问题是你根本不了解SASL。研究它。以下是如何使用它的示例。

示例中的提升代码:

首先,bahlonga需要告诉Erlang我们有一个gen_server。

-module(foo).
-behaviour(gen_server).
-export([start_link/0]).
-export([init/1, handle_call/3, handle_cast/2, handle_info/2,
     terminate/2, code_change/3]).

我们破解#state {}记录,以便它可以与您的代码一起使用

-record(state, { name, port, socket_listen }).

基本的start_linkage ...

start_link() ->
    gen_server:start_link({local, foo}, ?MODULE, [], []).

您的初始化函数,包括产生问题。

init([]) ->
    Port = 3252,
    Name = "foo",

上面我们为了简化而破解了一点......

    process_flag(trap_exit, true),
    erlang:error(blabla),
    Opts = [binary, {reuseaddr, true},
        {backlog,5}, {packet, 0}, {active, false}, {nodelay, true}],
    case gen_tcp:listen(Port,Opts) of
    {ok,Socket_Listen} ->
        logger:fmsg("--> [~s,init] Socket_Listen crée = ~p",
            [Name,Socket_Listen]),
        {ok,handle_accept(#state{socket_listen=Socket_Listen})};
    {error, Reason} ->
        logger:fmsg("--> [~s,init] Erreur, Raison =~p",
            [Name,Reason]), {stop, Reason}
    end.

缺少功能的黑客......

handle_accept(_) ->
    #state{}.

其余的只是基础......,所以我省略了它们。

现在foo_sup的主管foo

-module(foo_sup).
-behaviour(supervisor).
-export([start_link/0]).
-export([init/1]).
-define(SERVER, ?MODULE).

基本开始链接...

start_link() ->
    supervisor:start_link({local, ?SERVER}, ?MODULE, []).

基本ChildSpec。让foo孩子起来跑步......

init([]) ->
    FooCh = {foo, {foo, start_link, []},
         permanent, 2000, worker, [foo]},
    {ok, {{one_for_all,0,1}, [FooCh]}}.

启用SASL启动Erlang:

 jlouis@illithid:~$ erl -boot start_sasl
 Erlang R14B02 (erts-5.8.3) [source] [64-bit] [smp:2:2] [rq:2] [async-threads:0] [hipe] [kernel-poll:false]

 =PROGRESS REPORT==== 9-Dec-2010::01:01:51 ===
 [..]
 Eshell V5.8.3  (abort with ^G)

让我们尝试产生主管......

 1> foo_sup:start_link().

我们得到了这个:

=CRASH REPORT==== 9-Dec-2010::01:05:48 ===
  crasher:
    initial call: foo:init/1
    pid: <0.58.0>
    registered_name: []
    exception exit: {blabla,[{foo,init,1},
                             {gen_server,init_it,6},
                             {proc_lib,init_p_do_apply,3}]}

上面我们看到由于异常foo:init/1而导致blabla崩溃。

      in function  gen_server:init_it/6
    ancestors: [foo_sup,<0.45.0>]
    messages: []
    links: [<0.57.0>]
    dictionary: []
    trap_exit: true
    status: running
    heap_size: 233
    stack_size: 24
    reductions: 108
  neighbours:

现在,主管可以报告问题!

=SUPERVISOR REPORT==== 9-Dec-2010::01:05:48 ===
     Supervisor: {local,foo_sup}
     Context:    start_error

上下文完全正如我所说的那样......

     Reason:     {blabla,[{foo,init,1},
                          {gen_server,init_it,6},
                          {proc_lib,init_p_do_apply,3}]}

并且有预期的原因。

     Offender:   [{pid,undefined},
                  {name,foo},
                  {mfargs,{foo,start_link,[]}},
                  {restart_type,permanent},
                  {shutdown,2000},
                  {child_type,worker}]