1 # Copyright (C) - 2012 David Goulet <dgoulet@efficios.com>
3 # This library is free software; you can redistribute it and/or modify it under
4 # the terms of the GNU Lesser General Public License as published by the Free
5 # Software Foundation; version 2.1 of the License.
7 # This library is distributed in the hope that it will be useful, but WITHOUT
8 # ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
9 # FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more
12 # You should have received a copy of the GNU Lesser General Public License
13 # along with this library; if not, write to the Free Software Foundation, Inc.,
14 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
16 SESSIOND_BIN
="lttng-sessiond"
17 SESSIOND_MATCH
=".*lttng-sess.*"
19 RUNAS_BIN
="lttng-runas"
20 RUNAS_MATCH
=".*lttng-runas.*"
21 CONSUMERD_BIN
="lttng-consumerd"
22 CONSUMERD_MATCH
=".*lttng-consumerd.*"
23 RELAYD_BIN
="lttng-relayd"
24 RELAYD_MATCH
=".*lttng-relayd.*"
27 BABELTRACE_BIN
="babeltrace"
29 ERROR_OUTPUT_DEST
=/dev
/null
31 # Minimal kernel version supported for session daemon tests
32 KERNEL_MAJOR_VERSION
=2
33 KERNEL_MINOR_VERSION
=6
34 KERNEL_PATCHLEVEL_VERSION
=27
36 # We set the default UST register timeout and network and app socket timeout to
37 # "wait forever", so that basic tests don't have to worry about hitting
38 # timeouts on busy systems. Specialized tests should test those corner-cases.
39 export LTTNG_UST_REGISTER_TIMEOUT
=-1
40 export LTTNG_NETWORK_SOCKET_TIMEOUT
=-1
41 export LTTNG_APP_SOCKET_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
()
389 local long_bit_value
=$
(getconf LONG_BIT
)
391 if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
392 # Env variable requested no session daemon
396 DIR
=$
(readlink
-f $TESTDIR)
398 # Get long_bit value for 32/64 consumerd
399 case "$long_bit_value" in
401 consumerd
="--consumerd32-path=$DIR/../src/bin/lttng-consumerd/lttng-consumerd"
404 consumerd
="--consumerd64-path=$DIR/../src/bin/lttng-consumerd/lttng-consumerd"
411 # Check for env. variable. Allow the use of LD_PRELOAD etc.
412 if [[ "x${LTTNG_SESSIOND_ENV_VARS}" != "x" ]]; then
413 env_vars
=${LTTNG_SESSIOND_ENV_VARS}
416 validate_kernel_version
417 if [ $?
-ne 0 ]; then
418 fail
"Start session daemon"
419 BAIL_OUT
"*** Kernel too old for session daemon tests ***"
422 : ${LTTNG_SESSION_CONFIG_XSD_PATH=${DIR}/../src/common/config/}
423 export LTTNG_SESSION_CONFIG_XSD_PATH
425 if [ -z $
(pgrep
${SESSIOND_MATCH}) ]; then
427 if [ -n "$load_path" ]; then
428 env
$env_vars $DIR/..
/src
/bin
/lttng-sessiond
/$SESSIOND_BIN --load "$load_path" --background $consumerd
430 env
$env_vars $DIR/..
/src
/bin
/lttng-sessiond
/$SESSIOND_BIN --background $consumerd
432 #$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
434 if [ $withtap -eq "1" ]; then
435 ok
$status "Start session daemon"
438 SESSIOND_PIDS
=$
(pgrep
$SESSIOND_MATCH)
441 function start_lttng_sessiond
()
443 start_lttng_sessiond_opt
1 "$@"
446 function start_lttng_sessiond_notap
()
448 start_lttng_sessiond_opt
0 "$@"
451 function stop_lttng_sessiond_opt
()
457 if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
458 # Env variable requested no session daemon
462 local pids
="${SESSIOND_PIDS} $(pgrep $RUNAS_MATCH)"
465 kill_opt
="$kill_opt -s $signal"
467 if [ $withtap -eq "1" ]; then
468 diag
"Killing $SESSIOND_BIN and lt-$SESSIOND_BIN pids: $(echo $pids | tr '\n' ' ')"
470 kill $kill_opt $pids 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
472 if [ $?
-eq 1 ]; then
473 if [ $withtap -eq "1" ]; then
474 fail
"Kill sessions daemon"
478 while [ -n "$out" ]; do
479 out
=$
(pgrep
${SESSIOND_MATCH})
483 while [ -n "$out" ]; do
484 out
=$
(pgrep
$CONSUMERD_MATCH)
489 if [ $withtap -eq "1" ]; then
490 pass
"Kill session daemon"
495 function stop_lttng_sessiond
()
497 stop_lttng_sessiond_opt
1 "$@"
500 function stop_lttng_sessiond_notap
()
502 stop_lttng_sessiond_opt
0 "$@"
505 function sigstop_lttng_sessiond_opt
()
511 if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
512 # Env variable requested no session daemon
516 PID_SESSIOND
="$(pgrep ${SESSIOND_MATCH}) $(pgrep $RUNAS_MATCH)"
518 kill_opt
="$kill_opt -s $signal"
520 if [ $withtap -eq "1" ]; then
521 diag
"Sending SIGSTOP to lt-$SESSIOND_BIN and $SESSIOND_BIN pids: $(echo $PID_SESSIOND | tr '\n' ' ')"
523 kill $kill_opt $PID_SESSIOND 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
525 if [ $?
-eq 1 ]; then
526 if [ $withtap -eq "1" ]; then
527 fail
"Sending SIGSTOP to session daemon"
531 while [ $out -ne 0 ]; do
532 pid
=$
(pgrep
$SESSIOND_MATCH)
534 # Wait until state becomes stopped for session
537 for sessiond_pid
in $pid; do
538 state
=$
(ps
-p $sessiond_pid -o state
= )
539 if [[ -n "$state" && "$state" != "T" ]]; then
545 if [ $withtap -eq "1" ]; then
546 pass
"Sending SIGSTOP to session daemon"
551 function sigstop_lttng_sessiond
()
553 sigstop_lttng_sessiond_opt
1 "$@"
556 function sigstop_lttng_sessiond_notap
()
558 sigstop_lttng_sessiond_opt
0 "$@"
561 function stop_lttng_consumerd_opt
()
567 PID_CONSUMERD
=$
(pgrep
$CONSUMERD_MATCH)
570 kill_opt
="$kill_opt -s $signal"
573 if [ $withtap -eq "1" ]; then
574 diag
"Killing $CONSUMERD_BIN pids: $(echo $PID_CONSUMERD | tr '\n' ' ')"
576 kill $kill_opt $PID_CONSUMERD 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
580 if [ $?
-eq 1 ]; then
581 if [ $withtap -eq "1" ]; then
582 fail
"Kill consumer daemon"
587 while [ $out -ne 0 ]; do
588 pid
=$
(pgrep
$CONSUMERD_MATCH)
590 # If consumerds are still present check their status.
591 # A zombie status qualifies the consumerd as *killed*
593 for consumer_pid
in $pid; do
594 state
=$
(ps
-p $consumer_pid -o state
= )
595 if [[ -n "$state" && "$state" != "Z" ]]; then
601 if [ $withtap -eq "1" ]; then
602 pass
"Kill consumer daemon"
608 function stop_lttng_consumerd
()
610 stop_lttng_consumerd_opt
1 "$@"
613 function stop_lttng_consumerd_notap
()
615 stop_lttng_consumerd_opt
0 "$@"
618 function sigstop_lttng_consumerd_opt
()
624 PID_CONSUMERD
=$
(pgrep
$CONSUMERD_MATCH)
626 kill_opt
="$kill_opt -s $signal"
628 if [ $withtap -eq "1" ]; then
629 diag
"Sending SIGSTOP to $CONSUMERD_BIN pids: $(echo $PID_CONSUMERD | tr '\n' ' ')"
631 kill $kill_opt $PID_CONSUMERD 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
635 if [ $?
-eq 1 ]; then
636 if [ $withtap -eq "1" ]; then
637 fail
"Sending SIGSTOP to consumer daemon"
642 while [ $out -ne 0 ]; do
643 pid
=$
(pgrep
$CONSUMERD_MATCH)
645 # Wait until state becomes stopped for all
648 for consumer_pid
in $pid; do
649 state
=$
(ps
-p $consumer_pid -o state
= )
650 if [[ -n "$state" && "$state" != "T" ]]; then
656 if [ $withtap -eq "1" ]; then
657 pass
"Sending SIGSTOP to consumer daemon"
663 function sigstop_lttng_consumerd
()
665 sigstop_lttng_consumerd_opt
1 "$@"
668 function sigstop_lttng_consumerd_notap
()
670 sigstop_lttng_consumerd_opt
0 "$@"
673 function list_lttng_with_opts
()
676 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN list
$opts 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
677 ok $?
"Lttng-tool list command with option $opts"
680 function create_lttng_session_no_output
()
684 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN create
$sess_name --no-output 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
685 ok $?
"Create session $sess_name in no-output mode"
688 function create_lttng_session
()
690 local expected_to_fail
=$1
695 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN create
$sess_name -o $trace_path $opt > $OUTPUT_DEST
697 if [[ $expected_to_fail -eq "1" ]]; then
699 ok $?
"Create session $sess_name in $trace_path failed as expected"
701 ok
$ret "Create session $sess_name in $trace_path"
705 function create_lttng_session_ok
()
707 create_lttng_session
0 "$@"
710 function create_lttng_session_fail
()
712 create_lttng_session
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
()
1163 local expected_to_fail
=$1
1166 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN load
$opts 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1168 if [[ $expected_to_fail -eq "1" ]]; then
1170 ok $?
"Load command failed as expected with opts: $opts"
1172 ok
$ret "Load command with opts: $opts"
1176 function lttng_load_ok
()
1181 function lttng_load_fail
()
1186 function lttng_track
()
1188 local expected_to_fail
=$1
1190 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN track
$opts >$OUTPUT_DEST
1192 if [[ $expected_to_fail -eq "1" ]]; then
1194 ok $?
"Track command failed as expected with opts: $opts"
1196 ok
$ret "Track command with opts: $opts"
1200 function lttng_track_ok
()
1205 function lttng_track_fail
()
1210 function lttng_untrack
()
1212 local expected_to_fail
=$1
1214 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN untrack
$opts >$OUTPUT_DEST
1216 if [[ $expected_to_fail -eq "1" ]]; then
1218 ok $?
"Untrack command failed as expected with opts: $opts"
1220 ok
$ret "Untrack command with opts: $opts"
1224 function lttng_untrack_ok
()
1226 lttng_untrack
0 "$@"
1229 function lttng_untrack_fail
()
1231 lttng_untrack
1 "$@"
1234 function add_context_lttng
()
1236 local expected_to_fail
="$1"
1238 local session_name
="$3"
1239 local channel_name
="$4"
1242 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN add-context
-s $session_name -c $channel_name -t $type $domain 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1244 if [[ $expected_to_fail -eq "1" ]]; then
1246 ok $?
"Add context command failed as expected for type: $type"
1248 ok
$ret "Add context command for type: $type"
1252 function add_context_ust_ok
()
1254 add_context_lttng
0 -u "$@"
1257 function add_context_ust_fail
()
1259 add_context_lttng
1 -u "$@"
1262 function add_context_kernel_ok
()
1264 add_context_lttng
0 -k "$@"
1267 function add_context_kernel_fail
()
1269 add_context_lttng
1 -k "$@"
1272 function trace_matches
()
1278 which $BABELTRACE_BIN >/dev
/null
1279 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace matches"
1281 local count
=$
($BABELTRACE_BIN $trace_path |
grep $event_name |
wc -l)
1283 if [ "$count" -ne "$nr_iter" ]; then
1285 diag
"$count matching events found in trace"
1291 function trace_match_only
()
1297 which $BABELTRACE_BIN >/dev
/null
1298 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace matches"
1300 local count
=$
($BABELTRACE_BIN $trace_path |
grep $event_name |
wc -l)
1301 local total
=$
($BABELTRACE_BIN $trace_path |
wc -l)
1303 if [ "$nr_iter" -eq "$count" ] && [ "$total" -eq "$nr_iter" ]; then
1304 pass
"Trace match with $total event $event_name"
1307 diag
"$total event(s) found, expecting $nr_iter of event $event_name and only found $count"
1311 function validate_trace
1316 which $BABELTRACE_BIN >/dev
/null
1317 if [ $?
-ne 0 ]; then
1318 skip
0 "Babeltrace binary not found. Skipping trace validation"
1323 for i
in $event_name; do
1324 traced
=$
($BABELTRACE_BIN $trace_path 2>/dev
/null |
grep $i |
wc -l)
1325 if [ "$traced" -ne 0 ]; then
1326 pass
"Validate trace for event $i, $traced events"
1328 fail
"Validate trace for event $i"
1329 diag
"Found $traced occurences of $i"
1337 function validate_trace_count
1341 local expected_count
=$3
1343 which $BABELTRACE_BIN >/dev
/null
1344 if [ $?
-ne 0 ]; then
1345 skip
0 "Babeltrace binary not found. Skipping trace validation"
1351 for i
in $event_name; do
1352 traced
=$
($BABELTRACE_BIN $trace_path 2>/dev
/null |
grep $i |
wc -l)
1353 if [ "$traced" -ne 0 ]; then
1354 pass
"Validate trace for event $i, $traced events"
1356 fail
"Validate trace for event $i"
1357 diag
"Found $traced occurences of $i"
1359 cnt
=$
(($cnt + $traced))
1362 test $cnt -eq $expected_count
1363 ok $?
"Read a total of $cnt events, expected $expected_count"
1366 function trace_first_line
1370 which $BABELTRACE_BIN >/dev
/null
1371 if [ $?
-ne 0 ]; then
1372 skip
0 "Babeltrace binary not found. Skipping trace validation"
1375 $BABELTRACE_BIN $trace_path 2>/dev
/null |
head -n 1
1378 function validate_trace_exp
()
1383 which $BABELTRACE_BIN >/dev
/null
1384 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace validation"
1386 traced
=$
($BABELTRACE_BIN $trace_path 2>/dev
/null |
grep ${event_exp} |
wc -l)
1387 if [ "$traced" -ne 0 ]; then
1388 pass
"Validate trace for expression '${event_exp}', $traced events"
1390 fail
"Validate trace for expression '${event_exp}'"
1391 diag
"Found $traced occurences of '${event_exp}'"
1397 function validate_trace_only_exp
()
1402 which $BABELTRACE_BIN >/dev
/null
1403 skip $?
-ne 0 "Babeltrace binary not found. Skipping trace matches"
1405 local count
=$
($BABELTRACE_BIN $trace_path |
grep ${event_exp} |
wc -l)
1406 local total
=$
($BABELTRACE_BIN $trace_path |
wc -l)
1408 if [ "$count" -ne 0 ] && [ "$total" -eq "$count" ]; then
1409 pass
"Trace match with $total for expression '${event_exp}"
1412 diag
"$total syscall event(s) found, only syscalls matching expression '${event_exp}' ($count occurrences) are expected"
1418 function validate_trace_empty
()
1422 which $BABELTRACE_BIN >/dev
/null
1423 if [ $?
-ne 0 ]; then
1424 skip
0 "Babeltrace binary not found. Skipping trace validation"
1427 traced
=$
($BABELTRACE_BIN $trace_path 2>/dev
/null |
wc -l)
1428 if [ "$traced" -eq 0 ]; then
1429 pass
"Validate empty trace"
1431 fail
"Validate empty trace"
1432 diag
"Found $traced events in trace"
1438 function regenerate_metadata
()
1440 local expected_to_fail
=$1
1443 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN regenerate metadata
-s $sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1445 if [[ $expected_to_fail -eq "1" ]]; then
1447 ok $?
"Expected fail on regenerate metadata $sess_name"
1449 ok
$ret "Metadata regenerate $sess_name"
1453 function regenerate_metadata_ok
()
1455 regenerate_metadata
0 "$@"
1458 function regenerate_metadata_fail
()
1460 regenerate_metadata
1 "$@"
1463 function regenerate_statedump
()
1465 local expected_to_fail
=$1
1468 $TESTDIR/..
/src
/bin
/lttng
/$LTTNG_BIN regenerate statedump
-s $sess_name 1> $OUTPUT_DEST 2> $ERROR_OUTPUT_DEST
1470 if [[ $expected_to_fail -eq "1" ]]; then
1472 ok $?
"Expected fail on regenerate statedump $sess_name"
1474 ok
$ret "Metadata regenerate $sess_name"
1478 function regenerate_statedump_ok
()
1480 regenerate_statedump
0 "$@"
1483 function regenerate_statedump_fail
()
1485 regenerate_statedump
1 "$@"
1488 function destructive_tests_enabled
()
1490 if [ ${LTTNG_ENABLE_DESTRUCTIVE_TESTS} = "will-break-my-system" ]; then