Skip to content

Commit

Permalink
changed to use ttb.
Browse files Browse the repository at this point in the history
  • Loading branch information
huiqing committed Sep 23, 2012
1 parent 0d3b0e1 commit 7f873f2
Showing 1 changed file with 6 additions and 20 deletions.
26 changes: 6 additions & 20 deletions src/multi_node_trace.erl
Expand Up @@ -2,26 +2,12 @@

-compile(export_all).

-spec(start([{node(), file:filename()}]) -> ok).
start(NodeTraceFilePairs) ->
{Nodes, _Files} = lists:unzip(NodeTraceFilePairs),
erlang:set_cookie(node(), secret),
application:start(runtime_tools),
{ok, Pid} = inviso:start(),
io:format("Starting inviso ok: ~p~n", [Pid]),
{ok, Result1} = inviso:add_nodes(Nodes, mytag),
io:format("Adding nodes ok: ~p~n", [Result1]),
InitTraceSetting = [{Node, [{trace, {file, TraceFile}}]}||
{Node, TraceFile}<-NodeTraceFilePairs],
{ok, Result2} = inviso:init_tracing(InitTraceSetting),
io:format("Initiate tracing ok:~p~n", [Result2]),
{ok, Result3}=inviso:tf(Nodes, all, [send, 'receive']),
io:format("Setting tracing flags ok:~p~n", [Result3]),
{ok, Result4}=inviso:tf(all, [timestamp]),
io:format("Setting tracing flags ok:~p~n", [Result4]),
-spec(start([node()]) -> ok).
start(Nodes) ->
Res=ttb:tracer(Nodes),
Res1=ttb:p(all, [send, 'receive']),
ok.

stop()->
inviso:stop_tracing(),
inviso:stop().

ttb:stop().

0 comments on commit 7f873f2

Please sign in to comment.