3 # Copyright (C) - 2012 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 SESSIOND_BIN
="lttng-sessiond"
19 CONSUMERD_BIN
="lttng-consumerd"
20 RELAYD_BIN
="lttng-relayd"
22 BABELTRACE_BIN
="babeltrace"
23 OUTPUT_DEST
=/dev
/null
2>&1
25 # Minimal kernel version supported for session daemon tests
26 KERNEL_MAJOR_VERSION
=2
27 KERNEL_MINOR_VERSION
=6
28 KERNEL_PATCHLEVEL_VERSION
=27
30 # We set the default UST register timeout to "wait forever", so that
31 # basic tests don't have to worry about hitting timeouts on busy
32 # systems. Specialized tests should test those corner-cases.
33 export LTTNG_UST_REGISTER_TIMEOUT
=-1
35 source $TESTDIR/utils
/tap
/tap.sh
39 # Check if we are a terminal
41 echo -e "\e[1;32mOK\e[0m"
47 function print_fail
()
49 # Check if we are a terminal
51 echo -e "\e[1;31mFAIL\e[0m"
57 function print_test_banner
()
63 function validate_kernel_version
()
65 local kern_version
=($
(uname
-r |
awk -F.
'{ printf("%d.%d.%d\n",$1,$2,$3); }' |
tr '.' '\n'))
66 if [ ${kern_version[0]} -gt $KERNEL_MAJOR_VERSION ]; then
69 if [ ${kern_version[1]} -gt $KERNEL_MINOR_VERSION ]; then
72 if [ ${kern_version[2]} -ge $KERNEL_PATCHLEVEL_VERSION ]; then
78 # Generate a random string
79 # $1 = number of characters; defaults to 16
80 # $2 = include special characters; 1 = yes, 0 = no; defaults to yes
83 [ "$2" == "0" ] && CHAR
="[:alnum:]" || CHAR
="[:graph:]"
84 cat /dev
/urandom |
tr -cd "$CHAR" |
head -c ${1:-16}
88 function lttng_enable_kernel_event
94 if [ -z $event_name ]; then
95 # Enable all event if no event name specified
99 if [ -z $channel_name ]; then
100 # default channel if none specified
103 chan
="-c $channel_name"
106 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" $chan -s $sess_name -k >$OUTPUT_DEST
107 ok $?
"Enable kernel event $event_name for session $sess_name"
110 function lttng_enable_kernel_syscall
()
112 local expected_to_fail
=$1
114 local syscall_name
=$3
115 local channel_name
=$4
117 if [ -z $syscall_name ]; then
118 # Enable all event if no syscall name specified
122 if [ -z $channel_name ]; then
123 # default channel if none specified
126 chan
="-c $channel_name"
129 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
--syscall "$syscall_name" $chan -s $sess_name -k >$OUTPUT_DEST
131 if [[ $expected_to_fail -eq "1" ]]; then
133 ok $?
"Enable kernel syscall $syscall_name for session $sess_name on channel $channel_name fail as expected"
135 ok
$ret "Enable kernel syscall $syscall_name for session $sess_name on channel $channel_name"
139 function lttng_enable_kernel_syscall_ok
()
141 lttng_enable_kernel_syscall
0 ${*}
144 function lttng_enable_kernel_syscall_fail
()
146 lttng_enable_kernel_syscall
1 ${*}
149 function lttng_disable_kernel_syscall
()
151 local expected_to_fail
=$1
153 local syscall_name
=$3
154 local channel_name
=$4
156 if [ -z $syscall_name ]; then
157 # Enable all event if no syscall name specified
161 if [ -z $channel_name ]; then
162 # default channel if none specified
165 chan
="-c $channel_name"
168 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-event
--syscall "$syscall_name" $chan -s $sess_name -k >$OUTPUT_DEST
171 if [[ $expected_to_fail -eq "1" ]]; then
173 ok $?
"Disable kernel syscall $syscall_name for session $sess_name on channel $channel_name fail as expected"
175 ok
$ret "Disable kernel syscall $syscall_name for session $sess_name on channel $channel_name"
179 function lttng_disable_kernel_syscall_ok
()
181 lttng_disable_kernel_syscall
0 ${*}
184 function lttng_disable_kernel_syscall_fail
()
186 lttng_disable_kernel_syscall
1 ${*}
189 function lttng_enable_kernel_channel
()
191 local expected_to_fail
=$1
193 local channel_name
=$3
195 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-channel
-k $channel_name -s $sess_name >$OUTPUT_DEST
197 if [[ $expected_to_fail -eq "1" ]]; then
199 ok $?
"Expected failure on kernel channel creation $channel_name in $sess_name"
201 ok
$ret "Enable channel $channel_name for session $sess_name"
205 function lttng_enable_kernel_channel_ok
()
207 lttng_enable_kernel_channel
0 ${*}
210 function lttng_enable_kernel_channel_fail
()
212 lttng_enable_kernel_channel
1 ${*}
215 function lttng_disable_kernel_channel
()
217 local expected_to_fail
=$1
219 local channel_name
=$3
221 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-channel
-k $channel_name -s $sess_name >$OUTPUT_DEST
223 if [[ $expected_to_fail -eq "1" ]]; then
225 ok $?
"Expected failure on kernel channel creation $channel_name in $sess_name"
227 ok
$ret "disable channel $channel_name for session $sess_name"
231 function lttng_disable_kernel_channel_ok
()
233 lttng_disable_kernel_channel
0 ${*}
236 function lttng_disable_kernel_channel_fail
()
238 lttng_disable_kernel_channel
1 ${*}
241 function start_lttng_relayd
245 DIR
=$
(readlink
-f $TESTDIR)
247 if [ -z $
(pidof lt-
$RELAYD_BIN) ]; then
248 $DIR/..
/src
/bin
/lttng-relayd
/$RELAYD_BIN -b $opt >$OUTPUT_DEST
249 #$DIR/../src/bin/lttng-relayd/$RELAYD_BIN $opt -vvv >>/tmp/relayd.log 2>&1 &
250 if [ $?
-eq 1 ]; then
251 fail
"Start lttng-relayd (opt: $opt)"
254 pass
"Start lttng-relayd (opt: $opt)"
257 pass
"Start lttng-relayd (opt: $opt)"
261 function stop_lttng_relayd_nocheck
263 PID_RELAYD
=`pidof lt-$RELAYD_BIN`
265 diag
"Killing lttng-relayd (pid: $PID_RELAYD)"
266 kill $PID_RELAYD >$OUTPUT_DEST
269 if [ $retval -eq 1 ]; then
271 while [ -n "$out" ]; do
272 out
=$
(pidof lt-
$RELAYD_BIN)
279 function stop_lttng_relayd
281 stop_lttng_relayd_nocheck
283 if [ $?
-eq 1 ]; then
284 fail
"Killed lttng-relayd (pid: $PID_RELAYD)"
287 pass
"Killed lttng-relayd (pid: $PID_RELAYD)"
292 #First argument: load path for automatic loading
293 function start_lttng_sessiond
()
297 if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
298 # Env variable requested no session daemon
302 validate_kernel_version
303 if [ $?
-ne 0 ]; then
304 fail
"Start session daemon"
305 BAIL_OUT
"*** Kernel too old for session daemon tests ***"
308 DIR
=$
(readlink
-f $TESTDIR)
309 : ${LTTNG_SESSION_CONFIG_XSD_PATH=${DIR}/../src/common/config/}
310 export LTTNG_SESSION_CONFIG_XSD_PATH
312 if [ -z $
(pidof lt-
$SESSIOND_BIN) ]; then
315 $DIR/..
/src
/bin
/lttng-sessiond
/$SESSIOND_BIN --load "$1" --background --consumerd32-path="$DIR/../src/bin/lttng-consumerd/lttng-consumerd" --consumerd64-path="$DIR/../src/bin/lttng-consumerd/lttng-consumerd"
317 $DIR/..
/src
/bin
/lttng-sessiond
/$SESSIOND_BIN --background --consumerd32-path="$DIR/../src/bin/lttng-consumerd/lttng-consumerd" --consumerd64-path="$DIR/../src/bin/lttng-consumerd/lttng-consumerd"
319 #$DIR/../src/bin/lttng-sessiond/$SESSIOND_BIN --background --consumerd32-path="$DIR/../src/bin/lttng-consumerd/lttng-consumerd" --consumerd64-path="$DIR/../src/bin/lttng-consumerd/lttng-consumerd" --verbose-consumer >>/tmp/sessiond.log 2>&1
321 ok
$status "Start session daemon"
325 function stop_lttng_sessiond
()
327 if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
328 # Env variable requested no session daemon
332 PID_SESSIOND
=`pidof lt-$SESSIOND_BIN`
334 kill $PID_SESSIOND >$OUTPUT_DEST
336 if [ $?
-eq 1 ]; then
337 fail
"Kill sessions daemon"
341 while [ -n "$out" ]; do
342 out
=$
(pidof lt-
$SESSIOND_BIN)
346 while [ -n "$out" ]; do
347 out
=$
(pidof
$CONSUMERD_BIN)
350 pass
"Kill session daemon"
354 function list_lttng_with_opts
()
357 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN list
$opts >$OUTPUT_DEST
358 ok $?
"Lttng-tool list command with option $opts"
361 function create_lttng_session_no_output
()
365 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN create
$sess_name --no-output >$OUTPUT_DEST
366 ok $?
"Create session $sess_name in no-output mode"
369 function create_lttng_session
()
371 local expected_to_fail
=$1
375 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN create
$sess_name -o $trace_path > $OUTPUT_DEST
377 if [[ $expected_to_fail -eq "1" ]]; then
379 ok $?
"Expected fail on session creation $sess_name in $trace_path"
381 ok
$ret "Create session $sess_name in $trace_path"
385 function create_lttng_session_ok
()
387 create_lttng_session
0 "$@"
390 function create_lttng_session_fail
()
392 create_lttng_session
1 "$@"
396 function enable_ust_lttng_channel
()
399 local channel_name
=$2
402 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-channel
-u $channel_name -s $sess_name >$OUTPUT_DEST
404 if [[ $expect_fail ]]; then
406 ok $?
"Expected fail on ust channel creation $channel_name in $sess_name"
408 ok
$ret "Enable channel $channel_name for session $sess_name"
412 function disable_ust_lttng_channel
()
415 local channel_name
=$2
417 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-channel
-u $channel_name -s $sess_name >$OUTPUT_DEST
418 ok $?
"Disable channel $channel_name for session $sess_name"
421 function enable_lttng_mmap_overwrite_kernel_channel
()
424 local channel_name
=$2
426 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-channel
-s $sess_name $channel_name -k --output mmap
--overwrite >$OUTPUT_DEST
427 ok $?
"Enable channel $channel_name for session $sess_name"
430 function enable_lttng_mmap_overwrite_ust_channel
()
433 local channel_name
=$2
435 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-channel
-s $sess_name $channel_name -u --output mmap
--overwrite >$OUTPUT_DEST
436 ok $?
"Enable channel $channel_name for session $sess_name"
439 function enable_ust_lttng_event
()
442 local event_name
="$2"
443 local channel_name
=$3
444 local expected_to_fail
=$4
446 if [ -z $channel_name ]; then
447 # default channel if none specified
450 chan
="-c $channel_name"
453 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" $chan -s $sess_name -u >$OUTPUT_DEST
455 if [[ $expected_to_fail ]]; then
457 ok $?
"Enable ust event $event_name for session $session_name on channel $channel_name failed as expected"
459 ok
$ret "Enable event $event_name for session $sess_name"
463 function enable_jul_lttng_event
()
469 if [ -z $channel_name ]; then
470 # default channel if none specified
473 chan
="-c $channel_name"
476 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" $chan -s $sess_name -j >$OUTPUT_DEST
477 ok $?
"Enable JUL event $event_name for session $sess_name"
480 function enable_jul_lttng_event_loglevel
()
483 local event_name
="$2"
485 local channel_name
=$4
487 if [ -z $channel_name ]; then
488 # default channel if none specified
491 chan
="-c $channel_name"
494 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
--loglevel $loglevel "$event_name" $chan -s $sess_name -j >$OUTPUT_DEST
495 ok $?
"Enable JUL event $event_name for session $sess_name with loglevel $loglevel"
498 function enable_log4j_lttng_event
()
504 if [ -z $channel_name ]; then
505 # default channel if none specified
508 chan
="-c $channel_name"
511 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" $chan -s $sess_name -l >$OUTPUT_DEST
512 ok $?
"Enable LOG4J event $event_name for session $sess_name"
515 function enable_log4j_lttng_event_loglevel
()
518 local event_name
="$2"
520 local channel_name
=$4
522 if [ -z $channel_name ]; then
523 # default channel if none specified
526 chan
="-c $channel_name"
529 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
--loglevel $loglevel "$event_name" $chan -s $sess_name -l >$OUTPUT_DEST
530 ok $?
"Enable LOG4J event $event_name for session $sess_name with loglevel $loglevel"
533 function enable_python_lttng_event
()
539 if [ -z $channel_name ]; then
540 # default channel if none specified
543 chan
="-c $channel_name"
546 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" $chan -s $sess_name -p >$OUTPUT_DEST
547 ok $?
"Enable Python event $event_name for session $sess_name"
550 function enable_python_lttng_event_loglevel
()
553 local event_name
="$2"
555 local channel_name
=$4
557 if [ -z $channel_name ]; then
558 # default channel if none specified
561 chan
="-c $channel_name"
564 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
--loglevel $loglevel "$event_name" $chan -s $sess_name -p >$OUTPUT_DEST
565 ok $?
"Enable Python event $event_name for session $sess_name with loglevel $loglevel"
568 function enable_ust_lttng_event_filter
()
571 local event_name
="$2"
574 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" -s $sess_name -u --filter "$filter" >$OUTPUT_DEST
575 ok $?
"Enable event $event_name with filtering for session $sess_name"
578 function enable_ust_lttng_event_loglevel
()
581 local event_name
="$2"
584 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" -s $sess_name -u --loglevel $loglevel >$OUTPUT_DEST
585 ok $?
"Enable event $event_name with loglevel $loglevel"
588 function enable_ust_lttng_event_loglevel_only
()
591 local event_name
="$2"
594 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" -s $sess_name -u --loglevel-only $loglevel >$OUTPUT_DEST
595 ok $?
"Enable event $event_name with loglevel-only $loglevel"
598 function disable_ust_lttng_event
()
601 local event_name
="$2"
602 local channel_name
="$3"
604 if [ -z $channel_name ]; then
605 # default channel if none specified
608 chan
="-c $channel_name"
611 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-event
"$event_name" -s $sess_name $chan -u >$OUTPUT_DEST
612 ok $?
"Disable event $event_name for session $sess_name"
615 function disable_jul_lttng_event
()
618 local event_name
="$2"
620 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-event
"$event_name" -s $sess_name -j >/dev
/null
2>&1
621 ok $?
"Disable JUL event $event_name for session $sess_name"
624 function disable_log4j_lttng_event
()
627 local event_name
="$2"
629 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-event
"$event_name" -s $sess_name -l >/dev
/null
2>&1
630 ok $?
"Disable LOG4J event $event_name for session $sess_name"
633 function disable_python_lttng_event
()
636 local event_name
="$2"
638 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-event
"$event_name" -s $sess_name -p >$OUTPUT_DEST
639 ok $?
"Disable Python event $event_name for session $sess_name"
642 function start_lttng_tracing
()
645 local expected_to_fail
=$2
647 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN start
$sess_name >$OUTPUT_DEST
649 if [[ $expected_to_fail ]]; then
651 ok $?
"Expected fail on start tracing for session: $sess_name"
653 ok
$ret "Start tracing for session $sess_name"
657 function stop_lttng_tracing
()
660 local expected_to_fail
=$2
662 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN stop
$sess_name >$OUTPUT_DEST
664 if [[ $expected_to_fail ]]; then
666 ok $?
"Expected fail on stop tracing for session: $sess_name"
668 ok
$ret "Stop lttng tracing for session $sess_name"
672 function destroy_lttng_session
()
675 local expected_to_fail
=$2
677 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN destroy
$sess_name >$OUTPUT_DEST
679 if [[ $expected_to_fail ]]; then
681 ok $?
"Expected fail on session deletion $sess_name"
683 ok
$ret "Destroy session $sess_name"
687 function destroy_lttng_sessions
()
689 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN destroy
--all >$OUTPUT_DEST
690 ok $?
"Destroy all lttng sessions"
693 function lttng_snapshot_add_output
()
697 local expected_to_fail
=$3
699 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN snapshot add-output
-s $sess_name file://$trace_path >$OUTPUT_DEST
701 if [[ $expected_to_fail ]]; then
703 ok $?
"Failed to add a snapshot output file://$trace_path as expected"
705 ok
$ret "Added snapshot output file://$trace_path"
709 function lttng_snapshot_del_output
()
713 local expected_to_fail
=$3
715 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN snapshot del-output
-s $sess_name $id >$OUTPUT_DEST
717 if [[ $expected_to_fail ]]; then
719 ok $?
"Expect fail on deletion of snapshot output id $id"
721 ok
$ret "Deleted snapshot output id $id"
725 function lttng_snapshot_record
()
730 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN snapshot record
-s $sess_name >$OUTPUT_DEST
731 ok $?
"Snapshot recorded"
734 function lttng_snapshot_list
()
737 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN snapshot list-output
-s $sess_name >$OUTPUT_DEST
738 ok $?
"Snapshot list"
741 function lttng_save
()
746 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN save
$sess_name $opts >$OUTPUT_DEST
747 ok $?
"Session successfully saved"
750 function lttng_load
()
754 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN load
$opts >$OUTPUT_DEST
755 ok $?
"Load command successful"
758 function trace_matches
()
764 which $BABELTRACE_BIN >/dev
/null
765 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace matches"
767 local count
=$
($BABELTRACE_BIN $trace_path |
grep $event_name |
wc -l)
769 if [ "$count" -ne "$nr_iter" ]; then
771 diag
"$count events found in trace"
777 function trace_match_only
()
783 which $BABELTRACE_BIN >/dev
/null
784 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace matches"
786 local count
=$
($BABELTRACE_BIN $trace_path |
grep $event_name |
wc -l)
787 local total
=$
($BABELTRACE_BIN $trace_path |
wc -l)
789 if [ "$nr_iter" -eq "$count" ] && [ "$total" -eq "$nr_iter" ]; then
790 pass
"Trace match with $total event $event_name"
793 diag
"$total event(s) found, expecting $nr_iter of event $event_name and only found $count"
797 function validate_trace
802 which $BABELTRACE_BIN >/dev
/null
803 if [ $?
-ne 0 ]; then
804 skip
0 "Babeltrace binary not found. Skipping trace validation"
809 for i
in $event_name; do
810 traced
=$
($BABELTRACE_BIN $trace_path 2>/dev
/null |
grep $i |
wc -l)
811 if [ "$traced" -ne 0 ]; then
812 pass
"Validate trace for event $i, $traced events"
814 fail
"Validate trace for event $i"
815 diag
"Found $traced occurences of $i"
823 function validate_trace_exp
()
828 which $BABELTRACE_BIN >/dev
/null
829 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace validation"
831 traced
=$
($BABELTRACE_BIN $trace_path 2>/dev
/null |
grep ${event_exp} |
wc -l)
832 if [ "$traced" -ne 0 ]; then
833 pass
"Validate trace for expression '${event_exp}', $traced events"
835 fail
"Validate trace for expression '${event_exp}'"
836 diag
"Found $traced occurences of '${event_exp}'"
842 function validate_trace_only_exp
()
847 which $BABELTRACE_BIN >/dev
/null
848 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace matches"
850 local count
=$
($BABELTRACE_BIN $trace_path |
grep ${event_exp} |
wc -l)
851 local total
=$
($BABELTRACE_BIN $trace_path |
wc -l)
853 if [ "$count" -ne 0 ] && [ "$total" -eq "$count" ]; then
854 pass
"Trace match with $total for expression '${event_exp}"
857 diag
"$total syscall event(s) found, only syscalls matching expression '${event_exp}' ($count occurrences) are expected"
863 function validate_trace_empty
()
867 which $BABELTRACE_BIN >/dev
/null
868 if [ $?
-ne 0 ]; then
869 skip
0 "Babeltrace binary not found. Skipping trace validation"
872 traced
=$
($BABELTRACE_BIN $trace_path 2>/dev
/null |
wc -l)
873 if [ "$traced" -eq 0 ]; then
874 pass
"Validate empty trace"
876 fail
"Validate empty trace"
877 diag
"Found $traced events in trace"