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:pid_tracker/lttng:targets/lttng:pid_target")
144 if [[ $mi_result = "true" ]]; then
145 ok
0 "Pid target is present"
147 fail
"Pid target missing"
150 # Test to remove the target just to make sure
151 lttng_untrack_ok
"-p 666 -u -s $SESSION_NAME-trackers"
154 destroy_lttng_session_ok
"$SESSION_NAME-trackers"
155 rm -rf ${mi_output_file}
158 function test_override_url_normal
()
160 local local_url_override
="file:///tmp/override/to/here"
161 local local_path_override
="/tmp/override/to/here"
162 local local_path_compare_value
="/tmp/override/to/here/"
163 local stream_url_override
="net://127.0.0.1:8172:9817"
164 local stream_url_compare
="tcp4://127.0.0.1:8172/ [data: 9817]"
166 diag
"Test url override for normal session"
168 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
170 local mi_output_file
=$
(mktemp
)
171 if [ $?
-ne 0 ]; then
175 # Url of style file://
176 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${local_url_override}"
177 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
178 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
180 test $mi_result = "${local_path_compare_value}"
181 ok $?
"Path url file:// override [{$mi_result}, ${local_path_compare_value}]"
182 destroy_lttng_session_ok
"$SESSION_NAME"
185 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${local_path_override}"
186 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
187 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
189 test $mi_result = "${local_path_compare_value}"
190 ok $?
"Path url / override [{$mi_result}, ${local_path_compare_value}]"
191 destroy_lttng_session_ok
"$SESSION_NAME"
193 # Url of style net://ip:port:port
194 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${stream_url_override}"
195 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
196 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
198 test "$mi_result" = "${stream_url_compare}"
199 ok $?
"Path url net://host:port:port override [${mi_result}, ${stream_url_compare}]"
201 destroy_lttng_session_ok
"$SESSION_NAME"
203 rm -rf ${mi_output_file}
206 function test_override_url_snapshot
()
208 local url_override
="file:///tmp/override/to/here"
209 local path_override
="/tmp/override/to/here"
210 local path_compare_value
="/tmp/override/to/here/"
211 local stream_url_override
="net://127.0.0.1:8172:9817"
212 local stream_url_compare_ctrl
="tcp4://127.0.0.1:8172/"
213 local stream_url_compare_data
="tcp4://127.0.0.1:9817/"
214 local local_session_name
="${SESSION_NAME}-snapshot"
216 diag
"Test url override for snapshot session"
218 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
220 local mi_output_file
=$
(mktemp
)
221 if [ $?
-ne 0 ]; then
225 # Url of style file://
226 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${url_override}"
227 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
228 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")
230 test $mi_result = "${path_compare_value}"
231 ok $?
"Path url file:// override [{$mi_result}, ${path_compare_value}]"
232 destroy_lttng_session_ok
"$local_session_name"
235 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${path_override}"
236 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
237 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")
239 test $mi_result = "${path_compare_value}"
240 ok $?
"Path url / override [{$mi_result}, ${path_compare_value}]"
241 destroy_lttng_session_ok
"$local_session_name"
243 # Url of style net://ip:port:port
244 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${stream_url_override}"
245 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
246 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")
248 test "$mi_result" = "${stream_url_compare_ctrl}"
249 ok $?
"Path url ctrl net://host:port:port override [${mi_result}, ${stream_url_compare_ctrl}]"
251 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")
253 test "$mi_result" = "${stream_url_compare_data}"
254 ok $?
"Path url data net://host:port:port override [${mi_result}, ${stream_url_compare_data}]"
256 destroy_lttng_session_ok
"$local_session_name"
258 rm -rf ${mi_output_file}
261 function test_override_url_live
()
263 local url_override
="file:///tmp/override/to/here"
264 local path_override
="/tmp/override/to/here"
265 local path_compare_value
="/tmp/override/to/here/"
266 local stream_url_override
="net://127.0.0.1:8172:9817"
267 local stream_url_compare
="tcp4://127.0.0.1:8172/ [data: 9817]"
268 local local_session_name
="${SESSION_NAME}-live"
270 diag
"Test url override for live session"
272 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
274 local mi_output_file
=$
(mktemp
)
275 if [ $?
-ne 0 ]; then
279 # Url of style file://
280 # Expect this to fail since live session should never accept local
282 lttng_load_fail
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${url_override}"
283 destroy_lttng_session_fail
"$local_session_name"
286 # Expect this to fail since live session should never accept local
288 lttng_load_fail
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${path_override}"
289 destroy_lttng_session_fail
"$local_session_name"
291 # Url of style net://ip:port:port
292 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${stream_url_override}"
293 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$local_session_name" > $mi_output_file
294 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
296 test "$mi_result" = "${stream_url_compare}"
297 ok $?
"Path url net://host:port:port override [${mi_result}, ${stream_url_compare}]"
299 destroy_lttng_session_ok
"$local_session_name"
301 rm -rf ${mi_output_file}
304 function test_override_session_name
()
306 diag
"Test session name override"
307 local override_name
="PinkyAndTheBrain"
308 local output_path
="/tmp/lttng/load-42-1"
310 local mi_output_file
=$
(mktemp
)
311 if [ $?
-ne 0 ]; then
315 lttng_load_ok
"-i ${CURDIR}/${SESSION_NAME}.lttng --override-name=${override_name} ${SESSION_NAME}"
316 ${TESTDIR}/../src/bin/lttng/${LTTNG_BIN} --mi XML list "${SESSION_NAME}" &> /dev/null
317 if [ $? -eq 0 ]; then
318 fail "Expected a failure on listing
for old session name
"
321 ${TESTDIR}/../src/bin/lttng/${LTTNG_BIN} --mi XML list "${override_name}" > $mi_output_file
322 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:name")
324 test "${mi_result}" = "${override_name}"
325 ok $?
"Override name successful [${SESSION_NAME} to ${override_name}]"
327 # Make sure that the name override did not change something else
328 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
329 test "${mi_result}" = "${output_path}"
330 ok $?
"Output path is not affected by name override"
332 destroy_lttng_session_ok
"${override_name}"
334 diag
"Test session name override with all (Do not permit)"
335 lttng_load_fail
"-i ${CURDIR}/${SESSION_NAME}.lttng --override-name=${override_name}"
337 rm -rf ${mi_output_file}
348 test_override_session_name
349 test_override_url_normal
350 test_override_url_snapshot
351 test_override_url_live
354 for fct_test
in ${TESTS[@]};
356 TRACE_PATH
=$
(mktemp
-d)
359 if [ $?
-ne 0 ]; then
362 # Only delete if successful