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 SESSIOND_MATCH
=".*lttng-sess.*"
21 RUNAS_BIN
="lttng-runas"
22 RUNAS_MATCH
=".*lttng-runas.*"
23 CONSUMERD_BIN
="lttng-consumerd"
24 CONSUMERD_MATCH
=".*lttng-consumerd.*"
25 RELAYD_BIN
="lttng-relayd"
26 RELAYD_MATCH
=".*lttng-relayd.*"
29 BABELTRACE_BIN
="babeltrace"
31 ERROR_OUTPUT_DEST
=/dev
/null
33 # Minimal kernel version supported for session daemon tests
34 KERNEL_MAJOR_VERSION
=2
35 KERNEL_MINOR_VERSION
=6
36 KERNEL_PATCHLEVEL_VERSION
=27
38 # We set the default UST register timeout to "wait forever", so that
39 # basic tests don't have to worry about hitting timeouts on busy
40 # systems. Specialized tests should test those corner-cases.
41 export LTTNG_UST_REGISTER_TIMEOUT
=-1
43 # We set the default lttng-sessiond path to /bin/true to prevent the spawning
44 # of a daemonized sessiond. This is necessary since 'lttng create' will spawn
45 # its own sessiond if none is running. It also ensures that 'lttng create'
46 # fails when no sessiond is running.
47 export LTTNG_SESSIOND_PATH
="/bin/true"
49 source $TESTDIR/utils
/tap
/tap.sh
51 function full_cleanup
()
53 if [ -n "${SESSIOND_PIDS}" ] ||
[ -n "${RELAYD_PIDS}" ]; then
54 kill -9 ${SESSIOND_PIDS} ${RELAYD_PIDS} > /dev
/null
2>&1
57 # Disable trap for SIGTERM since the following kill to the
58 # pidgroup will be SIGTERM. Otherwise it loops.
59 # The '-' before the pid number ($$) indicates 'kill' to signal the
60 # whole process group.
61 trap - SIGTERM
&& kill -- -$$
65 trap full_cleanup SIGINT SIGTERM
69 # Check if we are a terminal
71 echo -e "\e[1;32mOK\e[0m"
77 function print_fail
()
79 # Check if we are a terminal
81 echo -e "\e[1;31mFAIL\e[0m"
87 function print_test_banner
()
93 function validate_kernel_version
()
95 local kern_version
=($
(uname
-r |
awk -F.
'{ printf("%d.%d.%d\n",$1,$2,$3); }' |
tr '.' '\n'))
96 if [ ${kern_version[0]} -gt $KERNEL_MAJOR_VERSION ]; then
99 if [ ${kern_version[1]} -gt $KERNEL_MINOR_VERSION ]; then
102 if [ ${kern_version[2]} -ge $KERNEL_PATCHLEVEL_VERSION ]; then
108 # Generate a random string
109 # $1 = number of characters; defaults to 16
110 # $2 = include special characters; 1 = yes, 0 = no; defaults to yes
111 function randstring
()
113 [ "$2" == "0" ] && CHAR
="[:alnum:]" || CHAR
="[:graph:]"
114 cat /dev
/urandom
2>/dev
/null |
tr -cd "$CHAR" 2>/dev
/null |
head -c ${1:-16} 2>/dev
/null
118 # Return the number of _configured_ CPUs.
119 function conf_proc_count
()
121 getconf _NPROCESSORS_CONF
122 if [ $?
-ne 0 ]; then
123 diag
"Failed to get the number of configured CPUs"
128 function enable_kernel_lttng_event
130 local expected_to_fail
="$1"
132 local event_name
="$3"
133 local channel_name
="$4"
135 if [ -z "$event_name" ]; then
136 # Enable all event if no event name specified
140 if [ -z "$channel_name" ]; then
141 # default channel if none specified
144 chan
="-c $channel_name"
147 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" $chan -s $sess_name -k 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
149 if [[ $expected_to_fail -eq "1" ]]; then
151 ok $?
"Enable kernel event $event_name for session $session_name on channel $channel_name failed as expected"
153 ok
$ret "Enable kernel event $event_name for session $sess_name"
157 function enable_kernel_lttng_event_ok
()
159 enable_kernel_lttng_event
0 "$@"
162 function enable_kernel_lttng_event_fail
()
164 enable_kernel_lttng_event
1 "$@"
168 function lttng_enable_kernel_event
170 enable_kernel_lttng_event_ok
"$@"
173 function lttng_enable_kernel_syscall
()
175 local expected_to_fail
=$1
177 local syscall_name
=$3
178 local channel_name
=$4
180 if [ -z $syscall_name ]; then
181 # Enable all event if no syscall name specified
185 if [ -z $channel_name ]; then
186 # default channel if none specified
189 chan
="-c $channel_name"
192 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
--syscall "$syscall_name" $chan -s $sess_name -k 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
194 if [[ $expected_to_fail -eq "1" ]]; then
196 ok $?
"Enable kernel syscall $syscall_name for session $sess_name on channel $channel_name fail as expected"
198 ok
$ret "Enable kernel syscall $syscall_name for session $sess_name on channel $channel_name"
202 function lttng_enable_kernel_syscall_ok
()
204 lttng_enable_kernel_syscall
0 "$@"
207 function lttng_enable_kernel_syscall_fail
()
209 lttng_enable_kernel_syscall
1 "$@"
212 function lttng_disable_kernel_syscall
()
214 local expected_to_fail
=$1
216 local syscall_name
=$3
217 local channel_name
=$4
219 if [ -z $syscall_name ]; then
220 # Enable all event if no syscall name specified
224 if [ -z $channel_name ]; then
225 # default channel if none specified
228 chan
="-c $channel_name"
231 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-event
--syscall "$syscall_name" $chan -s $sess_name -k 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
234 if [[ $expected_to_fail -eq "1" ]]; then
236 ok $?
"Disable kernel syscall $syscall_name for session $sess_name on channel $channel_name failed as expected"
238 ok
$ret "Disable kernel syscall $syscall_name for session $sess_name on channel $channel_name"
242 function lttng_disable_kernel_syscall_ok
()
244 lttng_disable_kernel_syscall
0 "$@"
247 function lttng_disable_kernel_syscall_fail
()
249 lttng_disable_kernel_syscall
1 "$@"
252 function lttng_enable_kernel_channel
()
254 local expected_to_fail
=$1
256 local channel_name
=$3
258 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-channel
-k $channel_name -s $sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
260 if [[ $expected_to_fail -eq "1" ]]; then
262 ok $?
"Enable channel $channel_name for session $sess_name failed as expected"
264 ok
$ret "Enable channel $channel_name for session $sess_name"
268 function lttng_enable_kernel_channel_ok
()
270 lttng_enable_kernel_channel
0 "$@"
273 function lttng_enable_kernel_channel_fail
()
275 lttng_enable_kernel_channel
1 "$@"
278 function lttng_disable_kernel_channel
()
280 local expected_to_fail
=$1
282 local channel_name
=$3
284 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-channel
-k $channel_name -s $sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
286 if [[ $expected_to_fail -eq "1" ]]; then
288 ok $?
"Disable channel $channel_name for session $sess_name failed as expected"
290 ok
$ret "Disable channel $channel_name for session $sess_name"
294 function lttng_disable_kernel_channel_ok
()
296 lttng_disable_kernel_channel
0 "$@"
299 function lttng_disable_kernel_channel_fail
()
301 lttng_disable_kernel_channel
1 "$@"
304 function start_lttng_relayd_opt
()
309 DIR
=$
(readlink
-f $TESTDIR)
311 if [ -z $
(pgrep
$RELAYD_MATCH) ]; then
312 $DIR/..
/src
/bin
/lttng-relayd
/$RELAYD_BIN -b $opt 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
313 #$DIR/../src/bin/lttng-relayd/$RELAYD_BIN $opt -vvv >>/tmp/relayd.log 2>&1 &
314 if [ $?
-eq 1 ]; then
315 if [ $withtap -eq "1" ]; then
316 fail
"Start lttng-relayd (opt: $opt)"
320 if [ $withtap -eq "1" ]; then
321 pass
"Start lttng-relayd (opt: $opt)"
325 pass
"Start lttng-relayd (opt: $opt)"
328 RELAYD_PIDS
=$
(pgrep
$RELAYD_MATCH)
331 function start_lttng_relayd
()
333 start_lttng_relayd_opt
1 "$@"
336 function start_lttng_relayd_notap
()
338 start_lttng_relayd_opt
0 "$@"
341 function stop_lttng_relayd_opt
()
345 if [ $withtap -eq "1" ]; then
346 diag
"Killing lttng-relayd (pid: $RELAYD_PIDS)"
348 kill $RELAYD_PIDS 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
351 if [ $?
-eq 1 ]; then
352 if [ $withtap -eq "1" ]; then
353 fail
"Kill relay daemon"
358 while [ -n "$out" ]; do
359 out
=$
(pgrep
$RELAYD_MATCH)
362 if [ $withtap -eq "1" ]; then
363 pass
"Kill relay daemon"
370 function stop_lttng_relayd
()
372 stop_lttng_relayd_opt
1 "$@"
375 function stop_lttng_relayd_notap
()
377 stop_lttng_relayd_opt
0 "$@"
380 #First arg: show tap output
381 #Second argument: load path for automatic loading
382 function start_lttng_sessiond_opt
()
387 if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
388 # Env variable requested no session daemon
392 validate_kernel_version
393 if [ $?
-ne 0 ]; then
394 fail
"Start session daemon"
395 BAIL_OUT
"*** Kernel too old for session daemon tests ***"
398 DIR
=$
(readlink
-f $TESTDIR)
399 : ${LTTNG_SESSION_CONFIG_XSD_PATH=${DIR}/../src/common/config/}
400 export LTTNG_SESSION_CONFIG_XSD_PATH
402 if [ -z $
(pgrep
${SESSIOND_MATCH}) ]; then
404 if [ -n "$load_path" ]; then
405 $DIR/..
/src
/bin
/lttng-sessiond
/$SESSIOND_BIN --load "$load_path" --background --consumerd32-path="$DIR/../src/bin/lttng-consumerd/lttng-consumerd" --consumerd64-path="$DIR/../src/bin/lttng-consumerd/lttng-consumerd"
407 $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"
409 #$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
411 if [ $withtap -eq "1" ]; then
412 ok
$status "Start session daemon"
415 SESSIOND_PIDS
=$
(pgrep
$SESSIOND_MATCH)
418 function start_lttng_sessiond
()
420 start_lttng_sessiond_opt
1 "$@"
423 function start_lttng_sessiond_notap
()
425 start_lttng_sessiond_opt
0 "$@"
428 function stop_lttng_sessiond_opt
()
434 if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
435 # Env variable requested no session daemon
439 local pids
="${SESSIOND_PIDS} $(pgrep $RUNAS_MATCH)"
442 kill_opt
="$kill_opt -s $signal"
444 if [ $withtap -eq "1" ]; then
445 diag
"Killing $SESSIOND_BIN and lt-$SESSIOND_BIN pids: $(echo $pids | tr '\n' ' ')"
447 kill $kill_opt $pids 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
449 if [ $?
-eq 1 ]; then
450 if [ $withtap -eq "1" ]; then
451 fail
"Kill sessions daemon"
455 while [ -n "$out" ]; do
456 out
=$
(pgrep
${SESSIOND_MATCH})
460 while [ -n "$out" ]; do
461 out
=$
(pgrep
$CONSUMERD_MATCH)
466 if [ $withtap -eq "1" ]; then
467 pass
"Kill session daemon"
472 function stop_lttng_sessiond
()
474 stop_lttng_sessiond_opt
1 "$@"
477 function stop_lttng_sessiond_notap
()
479 stop_lttng_sessiond_opt
0 "$@"
482 function sigstop_lttng_sessiond_opt
()
488 if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
489 # Env variable requested no session daemon
493 PID_SESSIOND
="$(pgrep ${SESSIOND_MATCH}) $(pgrep $RUNAS_MATCH)"
495 kill_opt
="$kill_opt -s $signal"
497 if [ $withtap -eq "1" ]; then
498 diag
"Sending SIGSTOP to lt-$SESSIOND_BIN and $SESSIOND_BIN pids: $(echo $PID_SESSIOND | tr '\n' ' ')"
500 kill $kill_opt $PID_SESSIOND 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
502 if [ $?
-eq 1 ]; then
503 if [ $withtap -eq "1" ]; then
504 fail
"Sending SIGSTOP to session daemon"
508 while [ $out -ne 0 ]; do
509 pid
=$
(pgrep
$SESSIOND_MATCH)
511 # Wait until state becomes stopped for session
514 for sessiond_pid
in $pid; do
515 state
=$
(ps
-p $sessiond_pid -o state
= )
516 if [[ -n "$state" && "$state" != "T" ]]; then
522 if [ $withtap -eq "1" ]; then
523 pass
"Sending SIGSTOP to session daemon"
528 function sigstop_lttng_sessiond
()
530 sigstop_lttng_sessiond_opt
1 "$@"
533 function sigstop_lttng_sessiond_notap
()
535 sigstop_lttng_sessiond_opt
0 "$@"
538 function stop_lttng_consumerd_opt
()
544 PID_CONSUMERD
=$
(pgrep
$CONSUMERD_MATCH)
547 kill_opt
="$kill_opt -s $signal"
550 if [ $withtap -eq "1" ]; then
551 diag
"Killing $CONSUMERD_BIN pids: $(echo $PID_CONSUMERD | tr '\n' ' ')"
553 kill $kill_opt $PID_CONSUMERD 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
557 if [ $?
-eq 1 ]; then
558 if [ $withtap -eq "1" ]; then
559 fail
"Kill consumer daemon"
564 while [ $out -ne 0 ]; do
565 pid
=$
(pgrep
$CONSUMERD_MATCH)
567 # If consumerds are still present check their status.
568 # A zombie status qualifies the consumerd as *killed*
570 for consumer_pid
in $pid; do
571 state
=$
(ps
-p $consumer_pid -o state
= )
572 if [[ -n "$state" && "$state" != "Z" ]]; then
578 if [ $withtap -eq "1" ]; then
579 pass
"Kill consumer daemon"
585 function stop_lttng_consumerd
()
587 stop_lttng_consumerd_opt
1 "$@"
590 function stop_lttng_consumerd_notap
()
592 stop_lttng_consumerd_opt
0 "$@"
595 function sigstop_lttng_consumerd_opt
()
601 PID_CONSUMERD
=$
(pgrep
$CONSUMERD_MATCH)
603 kill_opt
="$kill_opt -s $signal"
605 if [ $withtap -eq "1" ]; then
606 diag
"Sending SIGSTOP to $CONSUMERD_BIN pids: $(echo $PID_CONSUMERD | tr '\n' ' ')"
608 kill $kill_opt $PID_CONSUMERD 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
612 if [ $?
-eq 1 ]; then
613 if [ $withtap -eq "1" ]; then
614 fail
"Sending SIGSTOP to consumer daemon"
619 while [ $out -ne 0 ]; do
620 pid
=$
(pgrep
$CONSUMERD_MATCH)
622 # Wait until state becomes stopped for all
625 for consumer_pid
in $pid; do
626 state
=$
(ps
-p $consumer_pid -o state
= )
627 if [[ -n "$state" && "$state" != "T" ]]; then
633 if [ $withtap -eq "1" ]; then
634 pass
"Sending SIGSTOP to consumer daemon"
640 function sigstop_lttng_consumerd
()
642 sigstop_lttng_consumerd_opt
1 "$@"
645 function sigstop_lttng_consumerd_notap
()
647 sigstop_lttng_consumerd_opt
0 "$@"
650 function list_lttng_with_opts
()
653 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN list
$opts 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
654 ok $?
"Lttng-tool list command with option $opts"
657 function create_lttng_session_no_output
()
661 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN create
$sess_name --no-output 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
662 ok $?
"Create session $sess_name in no-output mode"
665 function create_lttng_session
()
667 local expected_to_fail
=$1
672 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN create
$sess_name -o $trace_path $opt > $OUTPUT_DEST
674 if [[ $expected_to_fail -eq "1" ]]; then
676 ok $?
"Create session $sess_name in $trace_path failed as expected"
678 ok
$ret "Create session $sess_name in $trace_path"
682 function create_lttng_session_ok
()
684 create_lttng_session
0 "$@"
687 function create_lttng_session_fail
()
689 create_lttng_session
1 "$@"
692 function create_lttng_session_template
()
694 local expected_to_fail
=$1
695 local template_path
=$2
698 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN create
--template-path="$template_path" $opt > $OUTPUT_DEST
700 if [[ $expected_to_fail -eq "1" ]]; then
702 ok $?
"Create session from template $template_path failed as expected"
704 ok
$ret "Create session from template $template_path"
708 function create_lttng_session_template_ok
() {
709 create_lttng_session_template
0 "$@"
712 function create_lttng_session_template_fail
() {
713 create_lttng_session_template
1 "$@"
716 function enable_ust_lttng_channel
()
718 local expected_to_fail
=$1
720 local channel_name
=$3
723 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-channel
-u $channel_name -s $sess_name $opt 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
725 if [[ $expected_to_fail -eq "1" ]]; then
727 ok $?
"Enable channel $channel_name for session $sess_name failed as expected"
729 ok
$ret "Enable channel $channel_name for session $sess_name"
733 function enable_ust_lttng_channel_ok
()
735 enable_ust_lttng_channel
0 "$@"
738 function enable_ust_lttng_channel_fail
()
740 enable_ust_lttng_channel
1 "$@"
743 function disable_ust_lttng_channel
()
746 local channel_name
=$2
748 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-channel
-u $channel_name -s $sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
749 ok $?
"Disable channel $channel_name for session $sess_name"
752 function enable_lttng_mmap_overwrite_kernel_channel
()
755 local channel_name
=$2
757 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-channel
-s $sess_name $channel_name -k --output mmap
--overwrite 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
758 ok $?
"Enable channel $channel_name for session $sess_name"
761 function enable_lttng_mmap_discard_small_kernel_channel
()
764 local channel_name
=$2
766 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-channel
-s $sess_name $channel_name -k --output mmap
--discard --subbuf-size=$
(getconf PAGE_SIZE
) --num-subbuf=2 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
767 ok $?
"Enable small discard channel $channel_name for session $sess_name"
770 function enable_lttng_mmap_overwrite_small_kernel_channel
()
773 local channel_name
=$2
775 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-channel
-s $sess_name $channel_name -k --output mmap
--overwrite --subbuf-size=$
(getconf PAGE_SIZE
) --num-subbuf=2 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
776 ok $?
"Enable small discard channel $channel_name for session $sess_name"
779 function enable_lttng_mmap_overwrite_ust_channel
()
782 local channel_name
=$2
784 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-channel
-s $sess_name $channel_name -u --output mmap
--overwrite 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
785 ok $?
"Enable channel $channel_name for session $sess_name"
788 function enable_ust_lttng_event
()
790 local expected_to_fail
=$1
792 local event_name
="$3"
793 local channel_name
=$4
795 if [ -z $channel_name ]; then
796 # default channel if none specified
799 chan
="-c $channel_name"
802 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" $chan -s $sess_name -u 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
804 if [[ $expected_to_fail -eq "1" ]]; then
806 ok $?
"Enable ust event $event_name for session $session_name failed as expected"
808 ok
$ret "Enable ust event $event_name for session $sess_name"
812 function enable_ust_lttng_event_ok
()
814 enable_ust_lttng_event
0 "$@"
817 function enable_ust_lttng_event_fail
()
819 enable_ust_lttng_event
1 "$@"
822 function enable_jul_lttng_event
()
828 if [ -z $channel_name ]; then
829 # default channel if none specified
832 chan
="-c $channel_name"
835 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" $chan -s $sess_name -j 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
836 ok $?
"Enable JUL event $event_name for session $sess_name"
839 function enable_jul_lttng_event_loglevel
()
842 local event_name
="$2"
844 local channel_name
=$4
846 if [ -z $channel_name ]; then
847 # default channel if none specified
850 chan
="-c $channel_name"
853 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
--loglevel $loglevel "$event_name" $chan -s $sess_name -j 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
854 ok $?
"Enable JUL event $event_name for session $sess_name with loglevel $loglevel"
857 function enable_log4j_lttng_event
()
863 if [ -z $channel_name ]; then
864 # default channel if none specified
867 chan
="-c $channel_name"
870 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" $chan -s $sess_name -l 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
871 ok $?
"Enable LOG4J event $event_name for session $sess_name"
874 function enable_log4j_lttng_event_loglevel
()
877 local event_name
="$2"
879 local channel_name
=$4
881 if [ -z $channel_name ]; then
882 # default channel if none specified
885 chan
="-c $channel_name"
888 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
--loglevel $loglevel "$event_name" $chan -s $sess_name -l 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
889 ok $?
"Enable LOG4J event $event_name for session $sess_name with loglevel $loglevel"
892 function enable_python_lttng_event
()
898 if [ -z $channel_name ]; then
899 # default channel if none specified
902 chan
="-c $channel_name"
905 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" $chan -s $sess_name -p 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
906 ok $?
"Enable Python event $event_name for session $sess_name"
909 function enable_python_lttng_event_loglevel
()
912 local event_name
="$2"
914 local channel_name
=$4
916 if [ -z $channel_name ]; then
917 # default channel if none specified
920 chan
="-c $channel_name"
923 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
--loglevel $loglevel "$event_name" $chan -s $sess_name -p 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
924 ok $?
"Enable Python event $event_name for session $sess_name with loglevel $loglevel"
927 function enable_ust_lttng_event_filter
()
930 local event_name
="$2"
933 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" -s $sess_name -u --filter "$filter" 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
934 ok $?
"Enable event $event_name with filtering for session $sess_name"
937 function enable_ust_lttng_event_loglevel
()
940 local event_name
="$2"
943 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" -s $sess_name -u --loglevel $loglevel 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
944 ok $?
"Enable event $event_name with loglevel $loglevel"
947 function enable_ust_lttng_event_loglevel_only
()
950 local event_name
="$2"
953 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN enable-event
"$event_name" -s $sess_name -u --loglevel-only $loglevel 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
954 ok $?
"Enable event $event_name with loglevel-only $loglevel"
957 function disable_ust_lttng_event
()
960 local event_name
="$2"
961 local channel_name
="$3"
963 if [ -z $channel_name ]; then
964 # default channel if none specified
967 chan
="-c $channel_name"
970 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-event
"$event_name" -s $sess_name $chan -u 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
971 ok $?
"Disable event $event_name for session $sess_name"
974 function disable_jul_lttng_event
()
977 local event_name
="$2"
979 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-event
"$event_name" -s $sess_name -j >/dev
/null
2>&1
980 ok $?
"Disable JUL event $event_name for session $sess_name"
983 function disable_log4j_lttng_event
()
986 local event_name
="$2"
988 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-event
"$event_name" -s $sess_name -l >/dev
/null
2>&1
989 ok $?
"Disable LOG4J event $event_name for session $sess_name"
992 function disable_python_lttng_event
()
995 local event_name
="$2"
997 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN disable-event
"$event_name" -s $sess_name -p 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
998 ok $?
"Disable Python event $event_name for session $sess_name"
1001 function start_lttng_tracing
()
1003 local expected_to_fail
=$1
1006 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN start
$sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1008 if [[ $expected_to_fail -eq "1" ]]; then
1010 ok $?
"Start tracing for session $sess_name failed as expected"
1012 ok
$ret "Start tracing for session $sess_name"
1016 function start_lttng_tracing_ok
()
1018 start_lttng_tracing
0 "$@"
1021 function start_lttng_tracing_fail
()
1023 start_lttng_tracing
1 "$@"
1026 function stop_lttng_tracing
()
1028 local expected_to_fail
=$1
1031 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN stop
$sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1033 if [[ $expected_to_fail -eq "1" ]]; then
1035 ok $?
"Stop lttng tracing for session $sess_name failed as expected"
1037 ok
$ret "Stop lttng tracing for session $sess_name"
1041 function stop_lttng_tracing_ok
()
1043 stop_lttng_tracing
0 "$@"
1046 function stop_lttng_tracing_fail
()
1048 stop_lttng_tracing
1 "$@"
1051 function destroy_lttng_session
()
1053 local expected_to_fail
=$1
1056 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN destroy
$sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1058 if [[ $expected_to_fail -eq "1" ]]; then
1060 ok $?
"Destroy session $sess_name failed as expected"
1062 ok
$ret "Destroy session $sess_name"
1066 function destroy_lttng_session_ok
()
1068 destroy_lttng_session
0 "$@"
1072 function destroy_lttng_session_fail
()
1074 destroy_lttng_session
1 "$@"
1078 function destroy_lttng_sessions
()
1080 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN destroy
--all 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1081 ok $?
"Destroy all lttng sessions"
1084 function lttng_snapshot_add_output
()
1086 local expected_to_fail
=$1
1090 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN snapshot add-output
-s $sess_name file://$trace_path 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1092 if [[ $expected_to_fail -eq 1 ]]; then
1094 ok $?
"Added snapshot output file://$trace_path failed as expected"
1096 ok
$ret "Added snapshot output file://$trace_path"
1100 function lttng_snapshot_add_output_ok
()
1102 lttng_snapshot_add_output
0 "$@"
1105 function lttng_snapshot_add_output_fail
()
1107 lttng_snapshot_add_output
1 "$@"
1110 function lttng_snapshot_del_output
()
1112 local expected_to_fail
=$1
1116 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN snapshot del-output
-s $sess_name $id 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1118 if [[ $expected_to_fail -eq "1" ]]; then
1120 ok $?
"Deleted snapshot output id $id failed as expected"
1122 ok
$ret "Deleted snapshot output id $id"
1126 function lttng_snapshot_del_output_ok
()
1128 lttng_snapshot_del_output
0 "$@"
1131 function lttng_snapshot_del_output_fail
()
1133 lttng_snapshot_del_output
1 "$@"
1136 function lttng_snapshot_record
()
1141 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN snapshot record
-s $sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1142 ok $?
"Snapshot recorded"
1145 function lttng_snapshot_list
()
1148 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN snapshot list-output
-s $sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1149 ok $?
"Snapshot list"
1152 function lttng_save
()
1157 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN save
$sess_name $opts 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1158 ok $?
"Session saved"
1161 function lttng_load
()
1165 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN load
$opts 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1166 ok $?
"Load command with opts: $opts"
1169 function lttng_track
()
1171 local expected_to_fail
=$1
1173 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN track
$opts >$OUTPUT_DEST
1175 if [[ $expected_to_fail -eq "1" ]]; then
1177 ok $?
"Track command failed as expected with opts: $opts"
1179 ok
$ret "Track command with opts: $opts"
1183 function lttng_track_ok
()
1188 function lttng_track_fail
()
1193 function lttng_untrack
()
1195 local expected_to_fail
=$1
1197 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN untrack
$opts >$OUTPUT_DEST
1199 if [[ $expected_to_fail -eq "1" ]]; then
1201 ok $?
"Untrack command failed as expected with opts: $opts"
1203 ok
$ret "Untrack command with opts: $opts"
1207 function lttng_untrack_ok
()
1209 lttng_untrack
0 "$@"
1212 function lttng_untrack_fail
()
1214 lttng_untrack
1 "$@"
1217 function add_context_lttng
()
1219 local expected_to_fail
="$1"
1221 local session_name
="$3"
1222 local channel_name
="$4"
1225 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN add-context
-s $session_name -c $channel_name -t $type $domain 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1227 if [[ $expected_to_fail -eq "1" ]]; then
1229 ok $?
"Add context command failed as expected for type: $type"
1231 ok
$ret "Add context command for type: $type"
1235 function add_context_ust_ok
()
1237 add_context_lttng
0 -u "$@"
1240 function add_context_ust_fail
()
1242 add_context_lttng
1 -u "$@"
1245 function add_context_kernel_ok
()
1247 add_context_lttng
0 -k "$@"
1250 function add_context_kernel_fail
()
1252 add_context_lttng
1 -k "$@"
1255 function trace_matches
()
1261 which $BABELTRACE_BIN >/dev
/null
1262 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace matches"
1264 local count
=$
($BABELTRACE_BIN $trace_path |
grep $event_name |
wc -l)
1266 if [ "$count" -ne "$nr_iter" ]; then
1268 diag
"$count matching events found in trace"
1274 function trace_match_only
()
1280 which $BABELTRACE_BIN >/dev
/null
1281 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace matches"
1283 local count
=$
($BABELTRACE_BIN $trace_path |
grep $event_name |
wc -l)
1284 local total
=$
($BABELTRACE_BIN $trace_path |
wc -l)
1286 if [ "$nr_iter" -eq "$count" ] && [ "$total" -eq "$nr_iter" ]; then
1287 pass
"Trace match with $total event $event_name"
1290 diag
"$total event(s) found, expecting $nr_iter of event $event_name and only found $count"
1294 function validate_trace
1299 which $BABELTRACE_BIN >/dev
/null
1300 if [ $?
-ne 0 ]; then
1301 skip
0 "Babeltrace binary not found. Skipping trace validation"
1306 for i
in $event_name; do
1307 traced
=$
($BABELTRACE_BIN $trace_path 2>/dev
/null |
grep $i |
wc -l)
1308 if [ "$traced" -ne 0 ]; then
1309 pass
"Validate trace for event $i, $traced events"
1311 fail
"Validate trace for event $i"
1312 diag
"Found $traced occurences of $i"
1320 function trace_first_line
1324 which $BABELTRACE_BIN >/dev
/null
1325 if [ $?
-ne 0 ]; then
1326 skip
0 "Babeltrace binary not found. Skipping trace validation"
1329 $BABELTRACE_BIN $trace_path 2>/dev
/null |
head -n 1
1332 function validate_trace_exp
()
1337 which $BABELTRACE_BIN >/dev
/null
1338 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace validation"
1340 traced
=$
($BABELTRACE_BIN $trace_path 2>/dev
/null |
grep ${event_exp} |
wc -l)
1341 if [ "$traced" -ne 0 ]; then
1342 pass
"Validate trace for expression '${event_exp}', $traced events"
1344 fail
"Validate trace for expression '${event_exp}'"
1345 diag
"Found $traced occurences of '${event_exp}'"
1351 function validate_trace_only_exp
()
1356 which $BABELTRACE_BIN >/dev
/null
1357 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace matches"
1359 local count
=$
($BABELTRACE_BIN $trace_path |
grep ${event_exp} |
wc -l)
1360 local total
=$
($BABELTRACE_BIN $trace_path |
wc -l)
1362 if [ "$count" -ne 0 ] && [ "$total" -eq "$count" ]; then
1363 pass
"Trace match with $total for expression '${event_exp}"
1366 diag
"$total syscall event(s) found, only syscalls matching expression '${event_exp}' ($count occurrences) are expected"
1372 function validate_trace_empty
()
1376 which $BABELTRACE_BIN >/dev
/null
1377 if [ $?
-ne 0 ]; then
1378 skip
0 "Babeltrace binary not found. Skipping trace validation"
1381 traced
=$
($BABELTRACE_BIN $trace_path 2>/dev
/null |
wc -l)
1382 if [ "$traced" -eq 0 ]; then
1383 pass
"Validate empty trace"
1385 fail
"Validate empty trace"
1386 diag
"Found $traced events in trace"
1392 function metadata_regenerate
()
1394 local expected_to_fail
=$1
1397 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN metadata regenerate
-s $sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1399 if [[ $expected_to_fail -eq "1" ]]; then
1401 ok $?
"Expected fail on regenerate $sess_name"
1403 ok
$ret "Metadata regenerate $sess_name"
1407 function metadata_regenerate_ok
()
1409 metadata_regenerate
0 "$@"
1412 function metadata_regenerate_fail
()
1414 metadata_regenerate
1 "$@"
1417 function destructive_tests_enabled
()
1419 if [ ${LTTNG_ENABLE_DESTRUCTIVE_TESTS} = "will-break-my-system" ]; then