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 export LTTNG_SESSION_CONFIG_XSD_PATH
=$
(readlink
-m ${TESTDIR}..
/src
/common
/config
/)
25 SESSION_NAME
="load-42"
26 EVENT_NAME
="tp:tptest"
28 DIR
=$
(readlink
-f $TESTDIR)
32 source $TESTDIR/utils
/utils.sh
34 # MUST set TESTDIR before calling those functions
37 print_test_banner
"$TEST_DESC"
39 function test_basic_load
()
41 diag
"Test basic load"
43 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng"
45 destroy_lttng_session_ok
$SESSION_NAME
48 function test_complex_load
()
50 local sess
="$SESSION_NAME-complex"
53 diag
"Test complex load"
55 # Start relayd with localhost binding. The complex session uses those
57 start_lttng_relayd
"-C tcp://localhost:8172 -D tcp://localhost:9817"
59 lttng_load_ok
"-i $CURDIR/$sess.lttng"
61 # Once loaded, we are suppose to be able to disable certain events/channels
62 # thus having a confirmation that it's valid
63 disable_ust_lttng_event
$sess uevent1 chan1
64 disable_ust_lttng_event
$sess uevent2 chan2
65 disable_ust_lttng_event
$sess uevent3
* chan3
67 disable_ust_lttng_channel
$sess chan1
68 disable_ust_lttng_channel
$sess chan2
69 disable_ust_lttng_channel
$sess chan3
71 # Confirm that an event stored as disabled is restored in its disabled state
72 local mi_output_file
=$
(mktemp
)
76 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
$sess -c chan2
> $mi_output_file
77 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()")
78 if [[ $mi_result = "false" ]]; then
79 ok
0 "Disabled event is loaded in disabled state"
81 fail
"Disabled event is loaded in disabled state"
84 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()")
85 test $mi_result = "false"
86 ok $?
"Disabled event is loaded in disabled state"
88 # Check that uevent_same_name_diff_llevel with log level 6 (TRACE_INFO) is enabled
89 # This ensure that the state of events with similar name but not same
90 # descriptor tuple (exclusion,filter,loglevel) is restored correctly.
91 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()")
92 test $mi_result = "true"
93 ok $?
"Enabled event with same name but different loglevel is in disabled state"
95 destroy_lttng_session_ok
$sess
99 rm -rf ${mi_output_file}
102 function test_all_load
()
104 diag
"Test load all sessions"
106 # Start relayd with localhost binding. The complex session uses those
108 start_lttng_relayd
"-C tcp://localhost:8172 -D tcp://localhost:9817"
110 lttng_load_ok
"-a -i $CURDIR"
112 destroy_lttng_session_ok
$SESSION_NAME
113 destroy_lttng_session_ok
"$SESSION_NAME-complex"
114 destroy_lttng_session_ok
"$SESSION_NAME-trackers"
119 function test_overwrite
()
121 diag
"Test load overwrite"
123 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng"
125 # This one should succeed
126 lttng_load_ok
"-f -i $CURDIR $SESSION_NAME"
128 destroy_lttng_session_ok
$SESSION_NAME
131 function test_trackers
()
133 diag
"Test trackers loading"
135 lttng_load_ok
"-i $CURDIR/$SESSION_NAME-trackers.lttng"
137 diag
"Test pid tracker"
138 local mi_output_file
=$
(mktemp
)
139 if [ $?
-ne 0 ]; then
142 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME-trackers" > $mi_output_file
143 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")
144 if [[ $mi_result = "true" ]]; then
145 ok
0 "VPID target is present"
147 fail
"VPID target missing"
150 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")
151 if [[ $mi_result = "true" ]]; then
152 ok
0 "VUID target is present"
154 fail
"VUID target missing"
157 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")
158 if [[ $mi_result = "true" ]]; then
159 ok
0 "VGID target is present"
161 fail
"VGID target missing"
164 # Test to remove the target just to make sure
165 lttng_untrack_ok
"--vpid 666 -u -s $SESSION_NAME-trackers"
166 lttng_untrack_ok
"--vuid 777 -u -s $SESSION_NAME-trackers"
167 lttng_untrack_ok
"--vgid 888 -u -s $SESSION_NAME-trackers"
168 # Actually using vpid (backward compat)
169 lttng_untrack_ok
"--pid 999 -u -s $SESSION_NAME-trackers"
171 destroy_lttng_session_ok
"$SESSION_NAME-trackers"
172 rm -f ${mi_output_file}
175 function test_override_url_normal
()
177 local local_url_override
="file:///tmp/override/to/here"
178 local local_path_override
="/tmp/override/to/here"
179 local local_path_compare_value
="/tmp/override/to/here/"
180 local stream_url_override
="net://127.0.0.1:8172:9817"
181 local stream_url_compare
="tcp4://127.0.0.1:8172/ [data: 9817]"
183 diag
"Test url override for normal session"
185 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
187 local mi_output_file
=$
(mktemp
)
188 if [ $?
-ne 0 ]; then
192 # Url of style file://
193 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${local_url_override}"
194 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
195 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
197 test $mi_result = "${local_path_compare_value}"
198 ok $?
"Path url file:// override [{$mi_result}, ${local_path_compare_value}]"
199 destroy_lttng_session_ok
"$SESSION_NAME"
202 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${local_path_override}"
203 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
204 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
206 test $mi_result = "${local_path_compare_value}"
207 ok $?
"Path url / override [{$mi_result}, ${local_path_compare_value}]"
208 destroy_lttng_session_ok
"$SESSION_NAME"
210 # Url of style net://ip:port:port
211 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${stream_url_override}"
212 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
213 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
215 test "$mi_result" = "${stream_url_compare}"
216 ok $?
"Path url net://host:port:port override [${mi_result}, ${stream_url_compare}]"
218 destroy_lttng_session_ok
"$SESSION_NAME"
220 rm -rf ${mi_output_file}
223 function test_override_url_snapshot
()
225 local url_override
="file:///tmp/override/to/here"
226 local path_override
="/tmp/override/to/here"
227 local path_compare_value
="/tmp/override/to/here/"
228 local stream_url_override
="net://127.0.0.1:8172:9817"
229 local stream_url_compare_ctrl
="tcp4://127.0.0.1:8172/"
230 local stream_url_compare_data
="tcp4://127.0.0.1:9817/"
231 local local_session_name
="${SESSION_NAME}-snapshot"
233 diag
"Test url override for snapshot session"
235 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
237 local mi_output_file
=$
(mktemp
)
238 if [ $?
-ne 0 ]; then
242 # Url of style file://
243 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${url_override}"
244 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
245 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")
247 test $mi_result = "${path_compare_value}"
248 ok $?
"Path url file:// override [{$mi_result}, ${path_compare_value}]"
249 destroy_lttng_session_ok
"$local_session_name"
252 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${path_override}"
253 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
254 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")
256 test $mi_result = "${path_compare_value}"
257 ok $?
"Path url / override [{$mi_result}, ${path_compare_value}]"
258 destroy_lttng_session_ok
"$local_session_name"
260 # Url of style net://ip:port:port
261 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${stream_url_override}"
262 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
263 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")
265 test "$mi_result" = "${stream_url_compare_ctrl}"
266 ok $?
"Path url ctrl net://host:port:port override [${mi_result}, ${stream_url_compare_ctrl}]"
268 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")
270 test "$mi_result" = "${stream_url_compare_data}"
271 ok $?
"Path url data net://host:port:port override [${mi_result}, ${stream_url_compare_data}]"
273 destroy_lttng_session_ok
"$local_session_name"
275 rm -rf ${mi_output_file}
278 function test_override_url_live
()
280 local url_override
="file:///tmp/override/to/here"
281 local path_override
="/tmp/override/to/here"
282 local path_compare_value
="/tmp/override/to/here/"
283 local stream_url_override
="net://127.0.0.1:8172:9817"
284 local stream_url_compare
="tcp4://127.0.0.1:8172/ [data: 9817]"
285 local local_session_name
="${SESSION_NAME}-live"
287 diag
"Test url override for live session"
289 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
291 local mi_output_file
=$
(mktemp
)
292 if [ $?
-ne 0 ]; then
296 # Url of style file://
297 # Expect this to fail since live session should never accept local
299 lttng_load_fail
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${url_override}"
300 destroy_lttng_session_fail
"$local_session_name"
303 # Expect this to fail since live session should never accept local
305 lttng_load_fail
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${path_override}"
306 destroy_lttng_session_fail
"$local_session_name"
308 # Url of style net://ip:port:port
309 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${stream_url_override}"
310 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$local_session_name" > $mi_output_file
311 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
313 test "$mi_result" = "${stream_url_compare}"
314 ok $?
"Path url net://host:port:port override [${mi_result}, ${stream_url_compare}]"
316 destroy_lttng_session_ok
"$local_session_name"
318 rm -rf ${mi_output_file}
321 function test_override_session_name
()
323 diag
"Test session name override"
324 local override_name
="PinkyAndTheBrain"
325 local output_path
="/tmp/lttng/load-42-1"
327 local mi_output_file
=$
(mktemp
)
328 if [ $?
-ne 0 ]; then
332 lttng_load_ok
"-i ${CURDIR}/${SESSION_NAME}.lttng --override-name=${override_name} ${SESSION_NAME}"
333 ${TESTDIR}/../src/bin/lttng/${LTTNG_BIN} --mi XML list "${SESSION_NAME}" &> /dev/null
334 if [ $? -eq 0 ]; then
335 fail "Expected a failure on listing
for old session name
"
338 ${TESTDIR}/../src/bin/lttng/${LTTNG_BIN} --mi XML list "${override_name}" > $mi_output_file
339 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:name")
341 test "${mi_result}" = "${override_name}"
342 ok $?
"Override name successful [${SESSION_NAME} to ${override_name}]"
344 # Make sure that the name override did not change something else
345 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
346 test "${mi_result}" = "${output_path}"
347 ok $?
"Output path is not affected by name override"
349 destroy_lttng_session_ok
"${override_name}"
351 diag
"Test session name override with all (Do not permit)"
352 lttng_load_fail
"-i ${CURDIR}/${SESSION_NAME}.lttng --override-name=${override_name}"
354 rm -rf ${mi_output_file}
365 test_override_session_name
366 test_override_url_normal
367 test_override_url_snapshot
368 test_override_url_live
371 for fct_test
in ${TESTS[@]};
373 TRACE_PATH
=$
(mktemp
-d)
376 if [ $?
-ne 0 ]; then
379 # Only delete if successful