diff options
| author | Erlang/OTP <[email protected]> | 2009-11-20 14:54:40 +0000 |
|---|---|---|
| committer | Erlang/OTP <[email protected]> | 2009-11-20 14:54:40 +0000 |
| commit | 84adefa331c4159d432d22840663c38f155cd4c1 (patch) | |
| tree | bff9a9c66adda4df2106dfd0e5c053ab182a12bd /lib/inviso/test/inviso_tool_SUITE_data | |
| download | otp-84adefa331c4159d432d22840663c38f155cd4c1.tar.gz otp-84adefa331c4159d432d22840663c38f155cd4c1.tar.bz2 otp-84adefa331c4159d432d22840663c38f155cd4c1.zip | |
The R13B03 release.OTP_R13B03
Diffstat (limited to 'lib/inviso/test/inviso_tool_SUITE_data')
10 files changed, 115 insertions, 0 deletions
diff --git a/lib/inviso/test/inviso_tool_SUITE_data/tracecase1_off.trc b/lib/inviso/test/inviso_tool_SUITE_data/tracecase1_off.trc new file mode 100644 index 0000000000..426c1ed9f9 --- /dev/null +++ b/lib/inviso/test/inviso_tool_SUITE_data/tracecase1_off.trc @@ -0,0 +1,12 @@ +%% TRACECASE1_OFF.TRC
+%% -----------------------------------------------------------------------------
+%% This is a test trace case to be used by the inviso_tool_SUITE.
+%% Trace case deactivating the trace started by the activation case tracecase1_on.
+%%
+%% ProcessName=atom(), variable set in the test environment.
+%% Nodes=list(), inviso_tool variable - all traced nodes.
+%% -----------------------------------------------------------------------------
+
+inviso:ctf(Nodes,ProcessName,[call]).
+inviso:ctpl(Nodes,math,module_info,1).
+%% END-OF-TRACE-CASE
diff --git a/lib/inviso/test/inviso_tool_SUITE_data/tracecase1_on.trc b/lib/inviso/test/inviso_tool_SUITE_data/tracecase1_on.trc new file mode 100644 index 0000000000..a9106dbc78 --- /dev/null +++ b/lib/inviso/test/inviso_tool_SUITE_data/tracecase1_on.trc @@ -0,0 +1,17 @@ +%% TRACECASE1_ON.TRC
+%% -----------------------------------------------------------------------------
+%% This is a test trace case to be used by the inviso_tool_SUITE.
+%% Trace case setting a local pattern on math:module_info/1 and process flags
+%% on a test process which is supposed to be started by the test environment.
+%%
+%% ProcessName=atom(), variable set in the test environment.
+%% Nodes=list(), inviso_tool variable - all traced nodes.
+%% -----------------------------------------------------------------------------
+
+inviso:tpl(Nodes,math,module_info,1,[]).
+inviso:tf(Nodes,ProcessName,[call]).
+lists:foreach(fun(N)->rpc:call(N,ets,update_counter,[test_proc_tab,counter,1]) end,
+ Nodes).
+timer:sleep(500).
+%% END-OF-TRACE-CASE
+
diff --git a/lib/inviso/test/inviso_tool_SUITE_data/tracecase2_off.trc b/lib/inviso/test/inviso_tool_SUITE_data/tracecase2_off.trc new file mode 100644 index 0000000000..cc89c3aa03 --- /dev/null +++ b/lib/inviso/test/inviso_tool_SUITE_data/tracecase2_off.trc @@ -0,0 +1,12 @@ +%% TRACECASE2_OFF.TRC
+%% -----------------------------------------------------------------------------
+%% This is a test trace case to be used by the inviso_tool_SUITE.
+%% The tracecase is mainly used for testing that synchronous tracecases return
+%% values.
+%%
+%% Nodes=list(), inviso_tool variable - all traced nodes.
+%% -----------------------------------------------------------------------------
+
+inviso:ctpl(Nodes,math,pi,0).
+another_return_value.
+%% END-OF-TRACE-CASE
diff --git a/lib/inviso/test/inviso_tool_SUITE_data/tracecase2_on.trc b/lib/inviso/test/inviso_tool_SUITE_data/tracecase2_on.trc new file mode 100644 index 0000000000..a3ab5fcfc7 --- /dev/null +++ b/lib/inviso/test/inviso_tool_SUITE_data/tracecase2_on.trc @@ -0,0 +1,16 @@ +%% TRACECASE2_ON.TRC
+%% -----------------------------------------------------------------------------
+%% This is a test trace case to be used by the inviso_tool_SUITE.
+%% The tracecase is mainly used for testing that synchronous tracecases return
+%% values.
+%% We also use this tracecase to check that reactivation works when it comes to
+%% handling simulataneously issued tool commands (issued during reactivation).
+%%
+%% Nodes=list(), inviso_tool variable - all traced nodes.
+%% -----------------------------------------------------------------------------
+
+inviso:tpl(Nodes,math,pi,0,[]).
+timer:sleep(3000).
+a_return_value.
+%% END-OF-TRACE-CASE
+
diff --git a/lib/inviso/test/inviso_tool_SUITE_data/tracecase3_on.trc b/lib/inviso/test/inviso_tool_SUITE_data/tracecase3_on.trc new file mode 100644 index 0000000000..e6c5ff78b1 --- /dev/null +++ b/lib/inviso/test/inviso_tool_SUITE_data/tracecase3_on.trc @@ -0,0 +1,9 @@ +%% TRACECASE3_ON.TRC
+%% -----------------------------------------------------------------------------
+%% This is a test trace case to be used by the inviso_tool_SUITE.
+%% It is faulty and meant to cause a crash!
+%% -----------------------------------------------------------------------------
+
+1=2.
+%% END-OF-TRACE-CASE
+
diff --git a/lib/inviso/test/inviso_tool_SUITE_data/tracecase4_on.trc b/lib/inviso/test/inviso_tool_SUITE_data/tracecase4_on.trc new file mode 100644 index 0000000000..d14c11f78c --- /dev/null +++ b/lib/inviso/test/inviso_tool_SUITE_data/tracecase4_on.trc @@ -0,0 +1,9 @@ +%% TRACECASE4_ON.TRC
+%% -----------------------------------------------------------------------------
+%% This is a test trace case to be used by the inviso_tool_SUITE.
+%% It contains an infinity timer in order for the tracecase executer to hang.
+%% -----------------------------------------------------------------------------
+
+timer:sleep(infinity).
+%% END-OF-TRACE-CASE
+
diff --git a/lib/inviso/test/inviso_tool_SUITE_data/tracecase5_off.trc b/lib/inviso/test/inviso_tool_SUITE_data/tracecase5_off.trc new file mode 100644 index 0000000000..feb67acb11 --- /dev/null +++ b/lib/inviso/test/inviso_tool_SUITE_data/tracecase5_off.trc @@ -0,0 +1,11 @@ +%% TRACECASE5_OFF.TRC
+%% -----------------------------------------------------------------------------
+%% This is a test trace case to be used by the inviso_tool_SUITE.
+%% Contains a 2 second sleep.
+%% -----------------------------------------------------------------------------
+
+lists:foreach(fun(N)->rpc:call(N,ets,update_counter,[test_proc_tab,counter,1]) end,
+ Nodes).
+timer:sleep(2000).
+%% END-OF-TRACE-CASE
+
diff --git a/lib/inviso/test/inviso_tool_SUITE_data/tracecase5_on.trc b/lib/inviso/test/inviso_tool_SUITE_data/tracecase5_on.trc new file mode 100644 index 0000000000..724c617c5a --- /dev/null +++ b/lib/inviso/test/inviso_tool_SUITE_data/tracecase5_on.trc @@ -0,0 +1,11 @@ +%% TRACECASE5_ON.TRC
+%% -----------------------------------------------------------------------------
+%% This is a test trace case to be used by the inviso_tool_SUITE.
+%% This tracecase updates an ETS table. Can be used to verify that it has been
+%% done (or not done!).
+%% -----------------------------------------------------------------------------
+
+lists:foreach(fun(N)->rpc:call(N,ets,update_counter,[test_proc_tab,counter,1]) end,
+ Nodes).
+%% END-OF-TRACE-CASE
+
diff --git a/lib/inviso/test/inviso_tool_SUITE_data/tracecase_def.txt b/lib/inviso/test/inviso_tool_SUITE_data/tracecase_def.txt new file mode 100644 index 0000000000..5b08fa32a5 --- /dev/null +++ b/lib/inviso/test/inviso_tool_SUITE_data/tracecase_def.txt @@ -0,0 +1,8 @@ +{tracecase_init,on,[],"./tracecase_init.trc"}.
+{tracecase1,on_off,['ProcessName'],"./tracecase1_on.trc","./tracecase1_off.trc"}.
+{tracecase2,on_off,[],"./tracecase2_on.trc","./tracecase2_off.trc"}.
+{tracecase3,on,[],"./tracecase3_on.trc"}.
+{tracecase4,on,[],"./tracecase4_on.trc"}.
+{tracecase5,on_off,[],"./tracecase5_on.trc","./tracecase5_off.trc"}.
+
+
diff --git a/lib/inviso/test/inviso_tool_SUITE_data/tracecase_init.trc b/lib/inviso/test/inviso_tool_SUITE_data/tracecase_init.trc new file mode 100644 index 0000000000..49a79cd3a5 --- /dev/null +++ b/lib/inviso/test/inviso_tool_SUITE_data/tracecase_init.trc @@ -0,0 +1,10 @@ +%% TRACECASE_INIT.TRC
+%% -----------------------------------------------------------------------------
+%% This is a test trace case to be used by the inviso_tool_SUITE.
+%% Initial trace case executed at session start.
+%%
+%% Nodes=list(), inviso_tool variable - all traced nodes.
+%% -----------------------------------------------------------------------------
+
+inviso:tpl(Nodes,lists,module_info,1,[]).
+%% END-OF-TRACE-CASE
|