3 # Copyright (C) - 2014 David Goulet <dgoulet@efficios.com>
5 # This library is free software; you can redistribute it and/or modify it under
6 # the terms of the GNU Lesser General Public License as published by the Free
7 # Software Foundation; version 2.1 of the License.
9 # This library is distributed in the hope that it will be useful, but WITHOUT
10 # ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
11 # FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more
14 # You should have received a copy of the GNU Lesser General Public License
15 # along with this library; if not, write to the Free Software Foundation, Inc.,
16 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
18 TEST_DESC
="Load session(s)"
21 CONFIG_DIR
="${CURDIR}/configuration"
22 TESTDIR
=$CURDIR/..
/..
/..
/
23 SESSIOND_BIN
="lttng-sessiond"
24 RELAYD_BIN
="lttng-relayd"
26 export LTTNG_SESSION_CONFIG_XSD_PATH
=$
(readlink
-m ${TESTDIR}..
/src
/common
/config
/)
28 SESSION_NAME
="load-42"
29 EVENT_NAME
="tp:tptest"
31 DIR
=$
(readlink
-f $TESTDIR)
35 source $TESTDIR/utils
/utils.sh
37 # MUST set TESTDIR before calling those functions
40 print_test_banner
"$TEST_DESC"
42 function test_basic_load
()
44 diag
"Test basic load"
46 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng"
48 destroy_lttng_session_ok
$SESSION_NAME
51 function test_complex_load
()
53 local sess
="$SESSION_NAME-complex"
56 diag
"Test complex load"
58 # Start relayd with localhost binding. The complex session uses those
60 start_lttng_relayd
"-C tcp://localhost:8172 -D tcp://localhost:9817"
62 lttng_load_ok
"-i $CURDIR/$sess.lttng"
64 # Once loaded, we are suppose to be able to disable certain events/channels
65 # thus having a confirmation that it's valid
66 disable_ust_lttng_event
$sess uevent1 chan1
67 disable_ust_lttng_event
$sess uevent2 chan2
68 disable_ust_lttng_event
$sess uevent3
* chan3
70 disable_ust_lttng_channel
$sess chan1
71 disable_ust_lttng_channel
$sess chan2
72 disable_ust_lttng_channel
$sess chan3
74 # Confirm that an event stored as disabled is restored in its disabled state
75 local mi_output_file
=$
(mktemp
)
79 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
$sess -c chan2
> $mi_output_file
80 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:domains/lttng:domain[lttng:type='UST']/lttng:channels/lttng:channel[lttng:name='chan2']/lttng:events/lttng:event[lttng:name='uevent_disabled']/lttng:enabled/text()")
81 if [[ $mi_result = "false" ]]; then
82 ok
0 "Disabled event is loaded in disabled state"
84 fail
"Disabled event is loaded in disabled state"
87 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:domains/lttng:domain/lttng:channels/lttng:channel[lttng:name='chan2']/lttng:events/lttng:event[lttng:name='uevent_disabled']/lttng:enabled/text()")
88 test $mi_result = "false"
89 ok $?
"Disabled event is loaded in disabled state"
91 # Check that uevent_same_name_diff_llevel with log level 6 (TRACE_INFO) is enabled
92 # This ensure that the state of events with similar name but not same
93 # descriptor tuple (exclusion,filter,loglevel) is restored correctly.
94 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:domains/lttng:domain/lttng:channels/lttng:channel[lttng:name='chan2']/lttng:events/lttng:event[lttng:name='uevent_same_name_diff_llevel' and lttng:loglevel='TRACE_INFO']/lttng:enabled/text()")
95 test $mi_result = "true"
96 ok $?
"Enabled event with same name but different loglevel is in disabled state"
98 destroy_lttng_session_ok
$sess
101 rm -rf ${mi_output_file}
104 function test_all_load
()
106 diag
"Test load all sessions"
108 # Start relayd with localhost binding. The complex session uses those
110 start_lttng_relayd
"-C tcp://localhost:8172 -D tcp://localhost:9817"
112 lttng_load_ok
"-a -i $CURDIR"
114 destroy_lttng_session_ok
$SESSION_NAME
115 destroy_lttng_session_ok
"$SESSION_NAME-complex"
116 destroy_lttng_session_ok
"$SESSION_NAME-trackers"
121 function test_overwrite
()
123 diag
"Test load overwrite"
125 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng"
127 # This one should succeed
128 lttng_load_ok
"-f -i $CURDIR $SESSION_NAME"
130 destroy_lttng_session_ok
$SESSION_NAME
133 function test_trackers
()
135 diag
"Test trackers loading"
137 lttng_load_ok
"-i $CURDIR/$SESSION_NAME-trackers.lttng"
139 diag
"Test pid tracker"
140 local mi_output_file
=$
(mktemp
)
141 if [ $?
-ne 0 ]; then
144 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME-trackers" > $mi_output_file
145 mi_result
=$
($CURDIR/..
/mi
/extract_xml
-e $mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:domains/lttng:domain/lttng:trackers/lttng:vpid_tracker/lttng:targets/lttng:vpid_target")
146 if [[ $mi_result = "true" ]]; then
147 ok
0 "VPID target is present"
149 fail
"VPID target missing"
152 mi_result
=$
($CURDIR/..
/mi
/extract_xml
-e $mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:domains/lttng:domain/lttng:trackers/lttng:vuid_tracker/lttng:targets/lttng:vuid_target")
153 if [[ $mi_result = "true" ]]; then
154 ok
0 "VUID target is present"
156 fail
"VUID target missing"
159 mi_result
=$
($CURDIR/..
/mi
/extract_xml
-e $mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:domains/lttng:domain/lttng:trackers/lttng:vgid_tracker/lttng:targets/lttng:vgid_target")
160 if [[ $mi_result = "true" ]]; then
161 ok
0 "VGID target is present"
163 fail
"VGID target missing"
166 # Test to remove the target just to make sure
167 lttng_untrack_ok
"--vpid 666 -u -s $SESSION_NAME-trackers"
168 lttng_untrack_ok
"--vuid 777 -u -s $SESSION_NAME-trackers"
169 lttng_untrack_ok
"--vgid 888 -u -s $SESSION_NAME-trackers"
170 # Actually using vpid (backward compat)
171 lttng_untrack_ok
"--pid 999 -u -s $SESSION_NAME-trackers"
173 destroy_lttng_session_ok
"$SESSION_NAME-trackers"
174 rm -rf ${mi_output_file}
177 function test_override_url_normal
()
179 local local_url_override
="file:///tmp/override/to/here"
180 local local_path_override
="/tmp/override/to/here"
181 local local_path_compare_value
="/tmp/override/to/here/"
182 local stream_url_override
="net://127.0.0.1:8172:9817"
183 local stream_url_compare
="tcp4://127.0.0.1:8172/ [data: 9817]"
185 diag
"Test url override for normal session"
187 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
189 local mi_output_file
=$
(mktemp
)
190 if [ $?
-ne 0 ]; then
194 # Url of style file://
195 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${local_url_override}"
196 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
197 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
199 test $mi_result = "${local_path_compare_value}"
200 ok $?
"Path url file:// override [{$mi_result}, ${local_path_compare_value}]"
201 destroy_lttng_session_ok
"$SESSION_NAME"
204 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${local_path_override}"
205 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
206 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
208 test $mi_result = "${local_path_compare_value}"
209 ok $?
"Path url / override [{$mi_result}, ${local_path_compare_value}]"
210 destroy_lttng_session_ok
"$SESSION_NAME"
212 # Url of style net://ip:port:port
213 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${stream_url_override}"
214 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
215 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
217 test "$mi_result" = "${stream_url_compare}"
218 ok $?
"Path url net://host:port:port override [${mi_result}, ${stream_url_compare}]"
220 destroy_lttng_session_ok
"$SESSION_NAME"
222 rm -rf ${mi_output_file}
225 function test_override_url_snapshot
()
227 local url_override
="file:///tmp/override/to/here"
228 local path_override
="/tmp/override/to/here"
229 local path_compare_value
="/tmp/override/to/here/"
230 local stream_url_override
="net://127.0.0.1:8172:9817"
231 local stream_url_compare_ctrl
="tcp4://127.0.0.1:8172/"
232 local stream_url_compare_data
="tcp4://127.0.0.1:9817/"
233 local local_session_name
="${SESSION_NAME}-snapshot"
235 diag
"Test url override for snapshot session"
237 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
239 local mi_output_file
=$
(mktemp
)
240 if [ $?
-ne 0 ]; then
244 # Url of style file://
245 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${url_override}"
246 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
247 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:snapshot_action/lttng:output/lttng:session/lttng:snapshots/lttng:snapshot/lttng:ctrl_url")
249 test $mi_result = "${path_compare_value}"
250 ok $?
"Path url file:// override [{$mi_result}, ${path_compare_value}]"
251 destroy_lttng_session_ok
"$local_session_name"
254 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${path_override}"
255 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
256 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:snapshot_action/lttng:output/lttng:session/lttng:snapshots/lttng:snapshot/lttng:ctrl_url")
258 test $mi_result = "${path_compare_value}"
259 ok $?
"Path url / override [{$mi_result}, ${path_compare_value}]"
260 destroy_lttng_session_ok
"$local_session_name"
262 # Url of style net://ip:port:port
263 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${stream_url_override}"
264 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
265 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:snapshot_action/lttng:output/lttng:session/lttng:snapshots/lttng:snapshot/lttng:ctrl_url")
267 test "$mi_result" = "${stream_url_compare_ctrl}"
268 ok $?
"Path url ctrl net://host:port:port override [${mi_result}, ${stream_url_compare_ctrl}]"
270 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:snapshot_action/lttng:output/lttng:session/lttng:snapshots/lttng:snapshot/lttng:data_url")
272 test "$mi_result" = "${stream_url_compare_data}"
273 ok $?
"Path url data net://host:port:port override [${mi_result}, ${stream_url_compare_data}]"
275 destroy_lttng_session_ok
"$local_session_name"
277 rm -rf ${mi_output_file}
280 function test_override_url_live
()
282 local url_override
="file:///tmp/override/to/here"
283 local path_override
="/tmp/override/to/here"
284 local path_compare_value
="/tmp/override/to/here/"
285 local stream_url_override
="net://127.0.0.1:8172:9817"
286 local stream_url_compare
="tcp4://127.0.0.1:8172/ [data: 9817]"
287 local local_session_name
="${SESSION_NAME}-live"
289 diag
"Test url override for live session"
291 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
293 local mi_output_file
=$
(mktemp
)
294 if [ $?
-ne 0 ]; then
298 # Url of style file://
299 # Expect this to fail since live session should never accept local
301 lttng_load_fail
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${url_override}"
302 destroy_lttng_session_fail
"$local_session_name"
305 # Expect this to fail since live session should never accept local
307 lttng_load_fail
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${path_override}"
308 destroy_lttng_session_fail
"$local_session_name"
310 # Url of style net://ip:port:port
311 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${stream_url_override}"
312 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$local_session_name" > $mi_output_file
313 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
315 test "$mi_result" = "${stream_url_compare}"
316 ok $?
"Path url net://host:port:port override [${mi_result}, ${stream_url_compare}]"
318 destroy_lttng_session_ok
"$local_session_name"
320 rm -rf ${mi_output_file}
323 function test_override_session_name
()
325 diag
"Test session name override"
326 local override_name
="PinkyAndTheBrain"
327 local output_path
="/tmp/lttng/load-42-1"
329 local mi_output_file
=$
(mktemp
)
330 if [ $?
-ne 0 ]; then
334 lttng_load_ok
"-i ${CURDIR}/${SESSION_NAME}.lttng --override-name=${override_name} ${SESSION_NAME}"
335 ${TESTDIR}/../src/bin/lttng/${LTTNG_BIN} --mi XML list "${SESSION_NAME}" &> /dev/null
336 if [ $? -eq 0 ]; then
337 fail "Expected a failure on listing
for old session name
"
340 ${TESTDIR}/../src/bin/lttng/${LTTNG_BIN} --mi XML list "${override_name}" > $mi_output_file
341 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:name")
343 test "${mi_result}" = "${override_name}"
344 ok $?
"Override name successful [${SESSION_NAME} to ${override_name}]"
346 # Make sure that the name override did not change something else
347 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
348 test "${mi_result}" = "${output_path}"
349 ok $?
"Output path is not affected by name override"
351 destroy_lttng_session_ok
"${override_name}"
353 diag
"Test session name override with all (Do not permit)"
354 lttng_load_fail
"-i ${CURDIR}/${SESSION_NAME}.lttng --override-name=${override_name}"
356 rm -rf ${mi_output_file}
367 test_override_session_name
368 test_override_url_normal
369 test_override_url_snapshot
370 test_override_url_live
373 for fct_test
in ${TESTS[@]};
375 TRACE_PATH
=$
(mktemp
-d)
378 if [ $?
-ne 0 ]; then
381 # Only delete if successful