Question

以下是在shell中使用redbug的一些消息：

% 02:49:02 <0.116.0>({cowboy_protocol,init,4})
% func1:start(<<"/second">>, [some])

% 02:49:02 <0.116.0>({cowboy_protocol,init,4})
% func1:looper(<<"/home/second">>, #{data => []}])

还有办法在redbug消息中打印行号吗？

redbug：help（）确实显示了这个：

print_fun    ()            custom print handler, fun/1 or fun/2;
                             fun(TrcMsg) -> <ignored>
                             fun(TrcMsg,AccOld) -> AccNew

但是如何使用它没有任何好的解释，所以我无法尝试查看是否可以在消息中添加行号

Answer 1

似乎你无法以任何直接的方式做到这一点。

最简单的检查方式，只需打印您在print_fun

中收到的所有数据

1> PrintFun = fun (Msg) -> io:format( ">>> ~p~n" , [Msg]) end.
#Fun<erl_eval.6.90072148>
2> redbug:start("erlang" , [{print_fun, PrintFun}]).
{30,249}
>>> {call,{{erlang,demonitor,[#Ref<0.0.0.40>]},<<>>},
          {<0.33.0>,{erlang,apply,2}},
          {11,40,31,554200}}
>>> {call,{{erlang,atom_to_list,['PrintFun']},<<>>},
          {<0.33.0>,{erlang,apply,2}},
          {11,40,31,554210}}
>>> {call,{{erlang,group_leader,[]},<<>>},
          {<0.33.0>,{erlang,apply,2}},
          {11,40,31,554213}}
>>> {call,{{erlang,monitor,[process,<0.26.0>]},<<>>},
          {<0.33.0>,{erlang,apply,2}},
          {11,40,31,554215}}
>>> {call,{{erlang,port_control,[#Port<0.491>,101,[]]},<<>>},
          {<0.24.0>,user_drv},
          {11,40,31,554231}}
>>> {call,{{erlang,module_loaded,[calendar]},<<>>},
          {<0.20.0>,code_server},
          {11,40,31,554257}}
>>> {call,{{erlang,atom_to_list,[calendar]},<<>>},
          {<0.20.0>,code_server},
          {11,40,31,554263}}
>>> {call,{{erlang,'++',["calendar",".beam"]},<<>>},
          {<0.20.0>,code_server},
          {11,40,31,554265}}
>>> {call,{{erlang,'++',["ebin","/calendar.beam"]},<<>>},
          {<0.20.0>,code_server},
          {11,40,31,554268}}
>>> {call,{{erlang,whereis,[erl_prim_loader]},<<>>},
          {<0.20.0>,code_server},
          {11,40,31,554270}}
redbug done, msg_count - 10

如您所见，您获得的只是MFA（{Module, Function, Arguments}），调用流程和时间戳。

要获得实际的函数调用行，您必须深入了解debug_info附加到梁文件（如果有的话）beam_lib模块。我认为seampleas的方法是使用beam_lib:chunks( Module, [abstract_code]).，就像这样

{ok,{redbug,[{abstract_code,{raw_abstract_v1,[{attribute,1,
                                                         file,
                                                         {"src/redbug.erl",1}},
                                              {attribute,9,module,redbug},
                                              {attribute,11,export,[{help,0}]},
                                              {attribute,13,export,[{unix,1}]},
                                              {attribute,15,export,
                                                         [{start,1},{start,2},{start,3},{start,4},{start,5}]},
                                              {attribute,16,export,[{stop,0}]},
                                              {attribute,1,file,{"src/log.hrl",1}},
                                              {function,17,'?log',2,
                                                        [{clause,17,[{var,17,...},{var,...}],[[{...}]],[{...}]},
                                                         {clause,18,[{var,...},{...}],[],[...]}]},
                                              {attribute,19,file,{"src/redbug.erl",19}},
                                              {attribute,22,record,
                                                         {cnf,[{record_field,24,{...},...},
                                                               {record_field,25,...},
                                                               {record_field,...},
                                                               {...}|...]}},
                                              {function,57,help,0,[{clause,57,[],...}]},
                                              {function,123,unix,1,
                                                        [{clause,123,...},{clause,...},{...}|...]},
                                              {function,146,to_term,1,[{clause,...},{...}]},
                                              {function,154,maybe_halt,1,[{...}]},
                                              {function,160,is_in_shell,0,[...]},
                                              {function,167,stop,0,...},
                                              {function,174,start,...},
                                              {function,176,...},
                                              {function,...},
                                              {...}|...]}}]}}

在那里你可以找到列表，你可以在其中找到像{function, LineNumber, FunctionName, Arity, FunctionCodeAsList }这样的元组。因此，通过查看此列表并找到您正在寻找的功能，您可以提取LineNumber。

仍然需要考虑一些可能无效的事情。

您正在分析光盘中的实际文件，因此需要在您当前的目录中。如果和加载到您的VM（什么代码版本），它无关。所以你可能需要做一些工作来实际找到这个.beam
编译没有 debug_info的文件可能无法生成此抽象语法树。您需要确定是否可能是您的情况，以及您希望如何处理此问题。
某些beams可能会被加密，有些可能会有其他问题。你应该阅读beam_lib module documentation，以了解你正在处理的事情。

如果您确实想出了什么，请分享。快乐的黑客！

Eper redbug，在消息中打印行号

1 个答案: