How to debug errors in Erlang? -

-

i got 1 error when starting gen server, want know how debug it, thanks!

i run "example:add_listener(self(), "127.0.0.1", 10999)." after start_link.

the error :

=error report==== 11-may-2011::13:41:57 === ** generic server <0.37.0> terminating  ** last message in {'exit',<0.35.0>,                            {{timeout,                                 {gen_server,call,                                     [<0.35.0>,                                      {add_listener,"127.0.0.1",10999}]}},                             [{gen_server,call,2},                              {erl_eval,do_apply,5},                              {shell,exprs,6},                              {shell,eval_exprs,6},                              {shell,eval_loop,3}]}} ** when server state == {state,example,                                {dict,0,16,16,8,80,48,                                      {[],[],[],[],[],[],[],[],[],[],[],[],[],                                       [],[],[]},                                      {{[],[],[],[],[],[],[],[],[],[],[],[],[],                                        [],[],[]}}},                                {dict,0,16,16,8,80,48,                                      {[],[],[],[],[],[],[],[],[],[],[],[],[],                                       [],[],[]},                                      {{[],[],[],[],[],[],[],[],[],[],[],[],[],                                        [],[],[]}}},                                []} ** reason termination ==  ** {{timeout,{gen_server,call,[<0.35.0>,{add_listener,"127.0.0.1",10999}]}},     [{gen_server,call,2},      {erl_eval,do_apply,5},      {shell,exprs,6},      {shell,eval_exprs,6},      {shell,eval_loop,3}]} ** exception exit: {timeout,{gen_server,call,                                         [<0.35.0>,{add_listener,"127.0.0.1",10999}]}}      in function  gen_server:call/2

my code :

-module(test_ess_tcp).  -export([start_link/0,          add_listener/3,          remove_listener/3]).  -export([init/2, handle_call/3, handle_cast/2, handle_info/2]). -export([terminate/2, sock_opts/0, new_connection/4]).  -behavior(ess_tcp).  start_link() ->     ess_tcp:start_link(?module, []).  add_listener(pid, ipaddr, port) ->     gen_server:call(pid, {add_listener, ipaddr, port}).  remove_listener(pid, ipaddr, port) ->     gen_server:call(pid, {remove_listener, ipaddr, port}).  init([], state) ->     %% example storing callback module specific state     %% modifies server state     {ok, ess_tcp:store_cb_state([], state)}.  handle_call({add_listener, ipaddr, port}, _from, state) ->     %% example of getting callback module state     io:format("not used here, example"),         [] = ess_tcp:get_cb_state(state),     case ess_tcp:add_listen_socket({ipaddr, port}, state) of         {ok, state1} ->             {reply, ok, state1};         error ->             {reply, error, state}     end; handle_call({remove_listener, ipaddr, port}, _from, state) ->     case ess_tcp:remove_listen_socket({ipaddr, port}, state) of         {ok, state1} ->             {reply, ok, state1};         error ->             {reply, error, state}     end; handle_call(_msg, _from, state) ->     {reply, ignored, state}.  handle_cast(_msg, state) ->     {noreply, state}.  handle_info({tcp, sock, data}, state) ->     me = self(),     p = spawn(fun() -> worker(me, sock, data) end),     gen_tcp:controlling_process(sock, p),     {noreply, state};  handle_info(_msg, state) ->     {noreply, state}.  terminate(_reason, _state) ->     ok.  sock_opts() ->     [binary, {active, once}, {packet, 0}].  new_connection(_ipaddr, _port, sock, state) ->     me = self(),     p = spawn(fun() -> worker(me, sock) end),     gen_tcp:controlling_process(sock, p),     {ok, state}.  worker(owner, sock) ->     gen_tcp:send(sock, "hello\n"),     inet:setopts(sock, [{active, once}]),     gen_tcp:controlling_process(sock, owner).  worker(owner, sock, data) ->     gen_tcp:send(sock, data),     inet:setopts(sock, [{active, once}]),     gen_tcp:controlling_process(sock, owner).

well, gen_server:call getting timeout when called. means gen_server either taking longer default 3 second timeout call or blocked somewhere.

using tracing debug kind of behaviour ideal. instance if type in shell before running test:

dbg:tracer(),dbg:p(all,c),dbg:tpl(ess_tcp, x).

you trace on functions within ess_tcp see going on in there. more info dbg see http://www.erlang.org/doc/man/dbg.html


Comments

Post a Comment

Popular posts from this blog

Cursor error with postgresql, pgpool and php -

-
hey, struggling bit determine exact cause of error has been popping in our release environment. there not seem dealing particular error on google. this error message getting: sqlstate[34000]: invalid cursor name: 7 error: portal "" not exist the error pops when using pdo prepared statements. this setup our release environment: pgpool 3.0.1 (the postgresql backend in streaming replication mode!) php 5.3.5 postgresql 9.0 edit: architecture 64bit. the same error not manifest in our test environment (edit: forgot mention, standard test environment uses postgresql 9.0 without pgpool). thus, led suspect pgpool @ least partly suspect. does know probable causes error are? edit: ok, here example of kind of code causes error. $sql = 'select * '; $sql .= 'from "mytable" "mystuff" '; $sql .= 'where "mytable"."status" = 1 '; $sql .= 'and "mytable"."mytableid" = :table...
Read more

delphi - ESC/P programming! -

-
why need use because printers using tprinter prints weird hieroglyph @ beginning of printable area. my problem if send commands, nothing happens. esc e (#27 #69) - sending escape sequence didn't work expected. removed first letter , rest of string made bold. eg. hello -> ello . after changed esc e esc (#27 #69 #27), worked fine. example managed figure out, but... trying select character table "esc t n" (#27 #116 n), make "õäöü" work. command doesn't work. nothing happens! , command supported esc/p, esc/p 2 , 9-pin esc/p, should work fine. manual can found here . if has ever needed use esc/p commands maybe 1 can shed light how work them! thanks in advance! edit: in previous post asked more or less same question though answers how did send commands printer. (i'll change question there according answers!) i accepted ken's answer, because claimed way transferred commands wasn't best , got work escape command. problem after t...
Read more

c++ - error: use of deleted function -

-
i've been working on c++ code friend has written , following error have never seen before when compiling gcc4.6: error: use of deleted function ‘gamefsm_<std::array<c, 2ul> >::hdealt::hdealt()’ implicitly deleted because default definition ill-formed: uninitialized non-static const member ‘const h_t floppokergamefsm_<std::array<c, 2ul> >::hdealt::h’ edit: comes part of code using boost msm: boost webpage edit2: there no = delete() used anywhere in sourcecode. generally speaking, error mean? should looking when type of error occurs? i don't think other answers mentioning =deleted; syntax correct. error message says default constructor has been deleted implicitly . says why: class contains non-static, const variable, not initialized default ctor. class x { const int x; }; since x::x const , must initialized -- default ctor wouldn't initialize (because it's pod type). therefore, default ctor, need define 1 (and must ...
Read more