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:pid_tracker/lttng:targets/lttng:pid_target")
146 if [[ $mi_result = "true" ]]; then
147 ok
0 "Pid target is present"
149 fail
"Pid target missing"
152 # Test to remove the target just to make sure
153 lttng_untrack_ok
"-p 666 -u -s $SESSION_NAME-trackers"
155 destroy_lttng_session_ok
"$SESSION_NAME-trackers"
156 rm -rf ${mi_output_file}
159 function test_override_url_normal
()
161 local local_url_override
="file:///tmp/override/to/here"
162 local local_path_override
="/tmp/override/to/here"
163 local local_path_compare_value
="/tmp/override/to/here/"
164 local stream_url_override
="net://127.0.0.1:8172:9817"
165 local stream_url_compare
="tcp4://127.0.0.1:8172/ [data: 9817]"
167 diag
"Test url override for normal session"
169 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
171 local mi_output_file
=$
(mktemp
)
172 if [ $?
-ne 0 ]; then
176 # Url of style file://
177 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${local_url_override}"
178 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
179 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
181 test $mi_result = "${local_path_compare_value}"
182 ok $?
"Path url file:// override [{$mi_result}, ${local_path_compare_value}]"
183 destroy_lttng_session_ok
"$SESSION_NAME"
186 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${local_path_override}"
187 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$SESSION_NAME" > $mi_output_file
188 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
190 test $mi_result = "${local_path_compare_value}"
191 ok $?
"Path url / override [{$mi_result}, ${local_path_compare_value}]"
192 destroy_lttng_session_ok
"$SESSION_NAME"
194 # Url of style net://ip:port:port
195 lttng_load_ok
"-i $CURDIR/$SESSION_NAME.lttng --override-url=${stream_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" = "${stream_url_compare}"
200 ok $?
"Path url net://host:port:port override [${mi_result}, ${stream_url_compare}]"
202 destroy_lttng_session_ok
"$SESSION_NAME"
204 rm -rf ${mi_output_file}
207 function test_override_url_snapshot
()
209 local url_override
="file:///tmp/override/to/here"
210 local path_override
="/tmp/override/to/here"
211 local path_compare_value
="/tmp/override/to/here/"
212 local stream_url_override
="net://127.0.0.1:8172:9817"
213 local stream_url_compare_ctrl
="tcp4://127.0.0.1:8172/"
214 local stream_url_compare_data
="tcp4://127.0.0.1:9817/"
215 local local_session_name
="${SESSION_NAME}-snapshot"
217 diag
"Test url override for snapshot session"
219 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
221 local mi_output_file
=$
(mktemp
)
222 if [ $?
-ne 0 ]; then
226 # Url of style file://
227 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${url_override}"
228 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
229 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")
231 test $mi_result = "${path_compare_value}"
232 ok $?
"Path url file:// override [{$mi_result}, ${path_compare_value}]"
233 destroy_lttng_session_ok
"$local_session_name"
236 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${path_override}"
237 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML snapshot list-output
-s "$local_session_name" > $mi_output_file
238 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")
240 test $mi_result = "${path_compare_value}"
241 ok $?
"Path url / override [{$mi_result}, ${path_compare_value}]"
242 destroy_lttng_session_ok
"$local_session_name"
244 # Url of style net://ip:port:port
245 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${stream_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" = "${stream_url_compare_ctrl}"
250 ok $?
"Path url ctrl net://host:port:port override [${mi_result}, ${stream_url_compare_ctrl}]"
252 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")
254 test "$mi_result" = "${stream_url_compare_data}"
255 ok $?
"Path url data net://host:port:port override [${mi_result}, ${stream_url_compare_data}]"
257 destroy_lttng_session_ok
"$local_session_name"
259 rm -rf ${mi_output_file}
262 function test_override_url_live
()
264 local url_override
="file:///tmp/override/to/here"
265 local path_override
="/tmp/override/to/here"
266 local path_compare_value
="/tmp/override/to/here/"
267 local stream_url_override
="net://127.0.0.1:8172:9817"
268 local stream_url_compare
="tcp4://127.0.0.1:8172/ [data: 9817]"
269 local local_session_name
="${SESSION_NAME}-live"
271 diag
"Test url override for live session"
273 start_lttng_relayd
"-C tcp://127.0.0.1:8172 -D tcp://127.0.0.1:9817"
275 local mi_output_file
=$
(mktemp
)
276 if [ $?
-ne 0 ]; then
280 # Url of style file://
281 # Expect this to fail since live session should never accept local
283 lttng_load_fail
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${url_override}"
284 destroy_lttng_session_fail
"$local_session_name"
287 # Expect this to fail since live session should never accept local
289 lttng_load_fail
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${path_override}"
290 destroy_lttng_session_fail
"$local_session_name"
292 # Url of style net://ip:port:port
293 lttng_load_ok
"-i $CONFIG_DIR/$local_session_name.lttng --override-url=${stream_url_override}"
294 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN --mi XML list
"$local_session_name" > $mi_output_file
295 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
297 test "$mi_result" = "${stream_url_compare}"
298 ok $?
"Path url net://host:port:port override [${mi_result}, ${stream_url_compare}]"
300 destroy_lttng_session_ok
"$local_session_name"
302 rm -rf ${mi_output_file}
305 function test_override_session_name
()
307 diag
"Test session name override"
308 local override_name
="PinkyAndTheBrain"
309 local output_path
="/tmp/lttng/load-42-1"
311 local mi_output_file
=$
(mktemp
)
312 if [ $?
-ne 0 ]; then
316 lttng_load_ok
"-i ${CURDIR}/${SESSION_NAME}.lttng --override-name=${override_name} ${SESSION_NAME}"
317 ${TESTDIR}/../src/bin/lttng/${LTTNG_BIN} --mi XML list "${SESSION_NAME}" &> /dev/null
318 if [ $? -eq 0 ]; then
319 fail "Expected a failure on listing
for old session name
"
322 ${TESTDIR}/../src/bin/lttng/${LTTNG_BIN} --mi XML list "${override_name}" > $mi_output_file
323 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:name")
325 test "${mi_result}" = "${override_name}"
326 ok $?
"Override name successful [${SESSION_NAME} to ${override_name}]"
328 # Make sure that the name override did not change something else
329 mi_result
=$
($CURDIR/..
/mi
/extract_xml
$mi_output_file "//lttng:command/lttng:output/lttng:sessions/lttng:session/lttng:path")
330 test "${mi_result}" = "${output_path}"
331 ok $?
"Output path is not affected by name override"
333 destroy_lttng_session_ok
"${override_name}"
335 diag
"Test session name override with all (Do not permit)"
336 lttng_load_fail
"-i ${CURDIR}/${SESSION_NAME}.lttng --override-name=${override_name}"
338 rm -rf ${mi_output_file}
349 test_override_session_name
350 test_override_url_normal
351 test_override_url_snapshot
352 test_override_url_live
355 for fct_test
in ${TESTS[@]};
357 TRACE_PATH
=$
(mktemp
-d)
360 if [ $?
-ne 0 ]; then
363 # Only delete if successful