[lttng-tools.git] / tests / utils / utils.sh

#!/src/bin/bash
#
# Copyright (C) - 2012 David Goulet <dgoulet@efficios.com>
#
# This library is free software; you can redistribute it and/or modify it under
# the terms of the GNU Lesser General Public License as published by the Free
# Software Foundation; version 2.1 of the License.
#
# This library is distributed in the hope that it will be useful, but WITHOUT
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
# FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License for more
# details.
#
# You should have received a copy of the GNU Lesser General Public License
# along with this library; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301 USA

SESSIOND_BIN="lttng-sessiond"
CONSUMERD_BIN="lttng-consumerd"
RELAYD_BIN="lttng-relayd"
LTTNG_BIN="lttng"
BABELTRACE_BIN="babeltrace"
OUTPUT_DEST=/dev/null 2>&1

# Minimal kernel version supported for session daemon tests
KERNEL_MAJOR_VERSION=2
KERNEL_MINOR_VERSION=6
KERNEL_PATCHLEVEL_VERSION=27

source $TESTDIR/utils/tap/tap.sh

function print_ok ()
{
	# Check if we are a terminal
	if [ -t 1 ]; then
		echo -e "\e[1;32mOK\e[0m"
	else
		echo -e "OK"
	fi
}

function print_fail ()
{
	# Check if we are a terminal
	if [ -t 1 ]; then
		echo -e "\e[1;31mFAIL\e[0m"
	else
		echo -e "FAIL"
	fi
}

function print_test_banner ()
{
	local desc="$1"
	diag "$desc"
}

function validate_kernel_version ()
{
	local kern_version=($(uname -r | awk -F. '{ printf("%d.%d.%d\n",$1,$2,$3); }' | tr '.' '\n'))
	if [ ${kern_version[0]} -gt $KERNEL_MAJOR_VERSION ]; then
		return 0
	fi
	if [ ${kern_version[1]} -gt $KERNEL_MINOR_VERSION ]; then
		return 0
	fi
	if [ ${kern_version[2]} -ge $KERNEL_PATCHLEVEL_VERSION ]; then
		return 0
	fi
	return 1
}

# Generate a random string
#  $1 = number of characters; defaults to 16
#  $2 = include special characters; 1 = yes, 0 = no; defaults to yes
function randstring()
{
	[ "$2" == "0" ] && CHAR="[:alnum:]" || CHAR="[:graph:]"
	cat /dev/urandom | tr -cd "$CHAR" | head -c ${1:-16}
	echo
}

function lttng_enable_kernel_event
{
	local sess_name=$1
	local event_name=$2
	local channel_name=$3

	if [ -z $event_name ]; then
		# Enable all event if no event name specified
		event_name="-a"
	fi

	if [ -z $channel_name ]; then
		# default channel if none specified
		chan=""
	else
		chan="-c $channel_name"
	fi

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" $chan -s $sess_name -k >$OUTPUT_DEST
	ok $? "Enable kernel event $event_name for session $sess_name"
}

function start_lttng_relayd
{
	local opt=$1

	DIR=$(readlink -f $TESTDIR)

	if [ -z $(pidof lt-$RELAYD_BIN) ]; then
		$DIR/../src/bin/lttng-relayd/$RELAYD_BIN -b $opt >$OUTPUT_DEST
		#$DIR/../src/bin/lttng-relayd/$RELAYD_BIN $opt -vvv >>/tmp/relayd.log 2>&1 &
		if [ $? -eq 1 ]; then
			fail "Start lttng-relayd (opt: $opt)"
			return 1
		else
			pass "Start lttng-relayd (opt: $opt)"
		fi
	else
		pass "Start lttng-relayd (opt: $opt)"
	fi
}

function stop_lttng_relayd_nocheck
{
	PID_RELAYD=`pidof lt-$RELAYD_BIN`

	diag "Killing lttng-relayd (pid: $PID_RELAYD)"
	kill $PID_RELAYD >$OUTPUT_DEST
	retval=$?

	if [ $retval -eq 1 ]; then
		out=1
		while [ -n "$out" ]; do
			out=$(pidof lt-$RELAYD_BIN)
			sleep 0.5
		done
	fi
	return $retval
}

function stop_lttng_relayd
{
	stop_lttng_relayd_nocheck

	if [ $? -eq 1 ]; then
		fail "Killed lttng-relayd (pid: $PID_RELAYD)"
		return 1
	else
		pass "Killed lttng-relayd (pid: $PID_RELAYD)"
		return 0
	fi
}

#First argument: load path for automatic loading
function start_lttng_sessiond()
{

	local load_path="$1"
	if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
		# Env variable requested no session daemon
		return
	fi

	validate_kernel_version
	if [ $? -ne 0 ]; then
	    fail "Start session daemon"
	    BAIL_OUT "*** Kernel too old for session daemon tests ***"
	fi

	DIR=$(readlink -f $TESTDIR)
	: ${LTTNG_SESSION_CONFIG_XSD_PATH=${DIR}/../src/common/config/}
	export LTTNG_SESSION_CONFIG_XSD_PATH

	if [ -z $(pidof lt-$SESSIOND_BIN) ]; then
		# Have a load path ?
		if [ -n "$1" ]; then
			$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"
		else
			$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"
		fi
		#$DIR/../src/bin/lttng-sessiond/$SESSIOND_BIN --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 &
		status=$?
		ok $status "Start session daemon"
	fi
}

function stop_lttng_sessiond ()
{
	if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
		# Env variable requested no session daemon
		return
	fi

	PID_SESSIOND=`pidof lt-$SESSIOND_BIN`

	kill $PID_SESSIOND >$OUTPUT_DEST

	if [ $? -eq 1 ]; then
		fail "Kill sessions daemon"
		return 1
	else
		out=1
		while [ -n "$out" ]; do
			out=$(pidof lt-$SESSIOND_BIN)
			sleep 0.5
		done
		out=1
		while [ -n "$out" ]; do
			out=$(pidof $CONSUMERD_BIN)
			sleep 0.5
		done
		pass "Kill session daemon"
	fi
}

function list_lttng_with_opts ()
{
	local opts=$1
	$TESTDIR/../src/bin/lttng/$LTTNG_BIN list $opts >$OUTPUT_DEST
	ok $? "Lttng-tool list command with option $opts"
}

function create_lttng_session_no_output ()
{
	local sess_name=$1

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN create $sess_name --no-output >$OUTPUT_DEST
	ok $? "Create session $sess_name in no-output mode"
}

function create_lttng_session ()
{
	local sess_name=$1
	local trace_path=$2
	local expected_to_fail=$3

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN create $sess_name -o $trace_path > $OUTPUT_DEST
	ret=$?
	if [[ $expected_to_fail ]]; then
		test "$ret" -ne "0"
		ok $? "Expected fail on session creation $sess_name in $trace_path"
	else
		ok $ret "Create session $sess_name in $trace_path"
	fi
}

function enable_ust_lttng_channel()
{
	local sess_name=$1
	local channel_name=$2
	local expect_fail=$3

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-channel -u $channel_name -s $sess_name >$OUTPUT_DEST
	ret=$?
	if [[ $expect_fail ]]; then
		test "$ret" -ne "0"
		ok $? "Expected fail on ust channel creation $channel_name in $sess_name"
	else
		ok $ret "Enable channel $channel_name for session $sess_name"
	fi
}

function disable_ust_lttng_channel()
{
	local sess_name=$1
	local channel_name=$2

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN disable-channel -u $channel_name -s $sess_name >$OUTPUT_DEST
	ok $? "Disable channel $channel_name for session $sess_name"
}

function enable_lttng_mmap_overwrite_kernel_channel()
{
	local sess_name=$1
	local channel_name=$2

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-channel -s $sess_name $channel_name -k --output mmap --overwrite >$OUTPUT_DEST
	ok $? "Enable channel $channel_name for session $sess_name"
}

function enable_lttng_mmap_overwrite_ust_channel()
{
	local sess_name=$1
	local channel_name=$2

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-channel -s $sess_name $channel_name -u --output mmap --overwrite >$OUTPUT_DEST
	ok $? "Enable channel $channel_name for session $sess_name"
}

function enable_ust_lttng_event ()
{
	local sess_name=$1
	local event_name="$2"
	local channel_name=$3
	local expected_to_fail=$4

	if [ -z $channel_name ]; then
		# default channel if none specified
		chan=""
	else
		chan="-c $channel_name"
	fi

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" $chan -s $sess_name -u >$OUTPUT_DEST
	ret=$?
	if [[ $expected_to_fail ]]; then
		test $ret -ne "0"
		ok $? "Enable ust event $event_name for session $session_name on channel $channel_name failed as expected"
	else
		ok $ret "Enable event $event_name for session $sess_name"
	fi
}

function enable_jul_lttng_event()
{
	sess_name=$1
	event_name="$2"
	channel_name=$3

	if [ -z $channel_name ]; then
		# default channel if none specified
		chan=""
	else
		chan="-c $channel_name"
	fi

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" $chan -s $sess_name -j >$OUTPUT_DEST
	ok $? "Enable JUL event $event_name for session $sess_name"
}

function enable_jul_lttng_event_loglevel()
{
	local sess_name=$1
	local event_name="$2"
	local loglevel=$3
	local channel_name=$4

	if [ -z $channel_name ]; then
		# default channel if none specified
		chan=""
	else
		chan="-c $channel_name"
	fi

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event --loglevel $loglevel "$event_name" $chan -s $sess_name -j >$OUTPUT_DEST
	ok $? "Enable JUL event $event_name for session $sess_name with loglevel $loglevel"
}

function enable_log4j_lttng_event()
{
	sess_name=$1
	event_name="$2"
	channel_name=$3

	if [ -z $channel_name ]; then
		# default channel if none specified
		chan=""
	else
		chan="-c $channel_name"
	fi

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" $chan -s $sess_name -l >$OUTPUT_DEST
	ok $? "Enable LOG4J event $event_name for session $sess_name"
}

function enable_log4j_lttng_event_loglevel()
{
	local sess_name=$1
	local event_name="$2"
	local loglevel=$3
	local channel_name=$4

	if [ -z $channel_name ]; then
		# default channel if none specified
		chan=""
	else
		chan="-c $channel_name"
	fi

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event --loglevel $loglevel "$event_name" $chan -s $sess_name -l >$OUTPUT_DEST
	ok $? "Enable LOG4J event $event_name for session $sess_name with loglevel $loglevel"
}

function enable_ust_lttng_event_filter()
{
	local sess_name="$1"
	local event_name="$2"
	local filter="$3"

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" -s $sess_name -u --filter "$filter" >$OUTPUT_DEST
	ok $? "Enable event $event_name with filtering for session $sess_name"
}

function enable_ust_lttng_event_loglevel()
{
	local sess_name="$1"
	local event_name="$2"
	local loglevel="$3"

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" -s $sess_name -u --loglevel $loglevel >$OUTPUT_DEST
	ok $? "Enable event $event_name with loglevel $loglevel"
}

function enable_ust_lttng_event_loglevel_only()
{
	local sess_name="$1"
	local event_name="$2"
	local loglevel="$3"

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" -s $sess_name -u --loglevel-only $loglevel >$OUTPUT_DEST
	ok $? "Enable event $event_name with loglevel-only $loglevel"
}

function disable_ust_lttng_event ()
{
	local sess_name="$1"
	local event_name="$2"
	local channel_name="$3"

	if [ -z $channel_name ]; then
		# default channel if none specified
		chan=""
	else
		chan="-c $channel_name"
	fi

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN disable-event "$event_name" -s $sess_name $chan -u >$OUTPUT_DEST
	ok $? "Disable event $event_name for session $sess_name"
}

function disable_jul_lttng_event ()
{
	local sess_name="$1"
	local event_name="$2"

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN disable-event "$event_name" -s $sess_name -j >/dev/null 2>&1
	ok $? "Disable JUL event $event_name for session $sess_name"
}

function disable_log4j_lttng_event ()
{
	local sess_name="$1"
	local event_name="$2"

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN disable-event "$event_name" -s $sess_name -l >/dev/null 2>&1
	ok $? "Disable LOG4J event $event_name for session $sess_name"
}

function start_lttng_tracing ()
{
	local sess_name=$1
	local expected_to_fail=$2

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN start $sess_name >$OUTPUT_DEST
	ret=$?
	if [[ $expected_to_fail ]]; then
		test "$ret" -ne "0"
		ok $? "Expected fail on start tracing for session: $sess_name"
	else
		ok $ret "Start tracing for session $sess_name"
	fi
}

function stop_lttng_tracing ()
{
	local sess_name=$1
	local expected_to_fail=$2

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN stop $sess_name >$OUTPUT_DEST
	ret=$?
	if [[ $expected_to_fail ]]; then
		test "$ret" -ne "0"
		ok $? "Expected fail on stop tracing for session: $sess_name"
	else
		ok $ret "Stop lttng tracing for session $sess_name"
	fi
}

function destroy_lttng_session ()
{
	local sess_name=$1
	local expected_to_fail=$2

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN destroy $sess_name >$OUTPUT_DEST
	ret=$?
	if [[ $expected_to_fail ]]; then
		test "$ret" -ne "0"
		ok $? "Expected fail on session deletion $sess_name"
	else
		ok $ret "Destroy session $sess_name"
	fi
}

function destroy_lttng_sessions ()
{
	$TESTDIR/../src/bin/lttng/$LTTNG_BIN destroy --all >$OUTPUT_DEST
	ok $? "Destroy all lttng sessions"
}

function lttng_snapshot_add_output ()
{
	local sess_name=$1
	local trace_path=$2
	local expected_to_fail=$3

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN snapshot add-output -s $sess_name file://$trace_path >$OUTPUT_DEST
	ret=$?
	if [[ $expected_to_fail ]]; then
		test "$ret" -ne "0"
		ok $? "Failed to add a  snapshot output file://$trace_path as expected"
	else
		ok $ret "Added snapshot output file://$trace_path"
	fi
}

function lttng_snapshot_del_output ()
{
	local sess_name=$1
	local id=$2
	local expected_to_fail=$3

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN snapshot del-output -s $sess_name $id >$OUTPUT_DEST
	ret=$?
	if [[ $expected_to_fail ]]; then
		test "$ret" -ne "0"
		ok $? "Expect fail on deletion of snapshot output id $id"
	else
		ok $ret "Deleted snapshot output id $id"
	fi
}

function lttng_snapshot_record ()
{
	local sess_name=$1
	local trace_path=$2

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN snapshot record -s $sess_name >$OUTPUT_DEST
	ok $? "Snapshot recorded"
}

function lttng_snapshot_list ()
{
	local sess_name=$1
	$TESTDIR/../src/bin/lttng/$LTTNG_BIN snapshot list-output -s $sess_name >$OUTPUT_DEST
	ok $? "Snapshot list"
}

function lttng_save()
{
	local sess_name=$1
	local opts=$2

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN save $sess_name $opts >$OUTPUT_DEST
	ok $? "Session successfully saved"
}

function lttng_load()
{
	local opts=$1

	$TESTDIR/../src/bin/lttng/$LTTNG_BIN load $opts >$OUTPUT_DEST
	ok $? "Load command successful"
}

function trace_matches ()
{
	local event_name=$1
	local nr_iter=$2
	local trace_path=$3

	which $BABELTRACE_BIN >/dev/null
	skip $? -ne 0 "Babeltrace binary not found. Skipping trace matches"

	local count=$($BABELTRACE_BIN $trace_path | grep $event_name | wc -l)

	if [ "$count" -ne "$nr_iter" ]; then
		fail "Trace match"
		diag "$count events found in trace"
	else
		pass "Trace match"
	fi
}

function trace_match_only()
{
	local event_name=$1
	local nr_iter=$2
	local trace_path=$3

	which $BABELTRACE_BIN >/dev/null
	skip $? -ne 0 "Babeltrace binary not found. Skipping trace matches"

	local count=$($BABELTRACE_BIN $trace_path | grep $event_name | wc -l)
	local total=$($BABELTRACE_BIN $trace_path | wc -l)

    if [ "$nr_iter" -eq "$count" ] && [ "$total" -eq "$nr_iter" ]; then
        pass "Trace match with $total event $event_name"
    else
        fail "Trace match"
        diag "$total event(s) found, expecting $nr_iter of event $event_name and only found $count"
    fi
}

function validate_trace
{
	local event_name=$1
	local trace_path=$2

	which $BABELTRACE_BIN >/dev/null
	if [ $? -ne 0 ]; then
	    skip 0 "Babeltrace binary not found. Skipping trace validation"
	fi

	OLDIFS=$IFS
	IFS=","
	for i in $event_name; do
		traced=$($BABELTRACE_BIN $trace_path 2>/dev/null | grep $i | wc -l)
		if [ "$traced" -ne 0 ]; then
			pass "Validate trace for event $i, $traced events"
		else
			fail "Validate trace for event $i"
			diag "Found $traced occurences of $i"
		fi
	done
	ret=$?
	IFS=$OLDIFS
	return $ret
}
Commit	Line	Data
10a8a223	1	#!/src/bin/bash
d3e8f6bb DG	2	#
	3	# Copyright (C) - 2012 David Goulet <dgoulet@efficios.com>
	4	#
	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.
	8	#
	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
	12	# details.
	13	#
	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
	17
	18	SESSIOND_BIN="lttng-sessiond"
f7613992	19	CONSUMERD_BIN="lttng-consumerd"
f4e40ab6	20	RELAYD_BIN="lttng-relayd"
d3e8f6bb DG	21	LTTNG_BIN="lttng"
d3e8f6bb DG	22	BABELTRACE_BIN="babeltrace"
873c2aae	23	OUTPUT_DEST=/dev/null 2>&1
d3e8f6bb	24
fd4dfcec DG	25	# Minimal kernel version supported for session daemon tests
	26	KERNEL_MAJOR_VERSION=2
	27	KERNEL_MINOR_VERSION=6
	28	KERNEL_PATCHLEVEL_VERSION=27
	29
29655db7 CB	30	source $TESTDIR/utils/tap/tap.sh
29655db7 CB	31
fec81a7e CB	32	function print_ok ()
	33	{
	34	# Check if we are a terminal
	35	if [ -t 1 ]; then
	36	echo -e "\e[1;32mOK\e[0m"
	37	else
	38	echo -e "OK"
	39	fi
	40	}
	41
	42	function print_fail ()
	43	{
	44	# Check if we are a terminal
	45	if [ -t 1 ]; then
	46	echo -e "\e[1;31mFAIL\e[0m"
	47	else
	48	echo -e "FAIL"
	49	fi
	50	}
	51
	52	function print_test_banner ()
	53	{
7d0ad314	54	local desc="$1"
29655db7	55	diag "$desc"
fec81a7e CB	56	}
fec81a7e CB	57
fd4dfcec DG	58	function validate_kernel_version ()
fd4dfcec DG	59	{
7d0ad314	60	local kern_version=($(uname -r \| awk -F. '{ printf("%d.%d.%d\n",$1,$2,$3); }' \| tr '.' '\n'))
fd4dfcec DG	61	if [ ${kern_version[0]} -gt $KERNEL_MAJOR_VERSION ]; then
	62	return 0
	63	fi
	64	if [ ${kern_version[1]} -gt $KERNEL_MINOR_VERSION ]; then
	65	return 0
	66	fi
	67	if [ ${kern_version[2]} -ge $KERNEL_PATCHLEVEL_VERSION ]; then
	68	return 0
	69	fi
	70	return 1
	71	}
	72
9ac429ef	73	# Generate a random string
f4e40ab6 DG	74	# $1 = number of characters; defaults to 16
f4e40ab6 DG	75	# $2 = include special characters; 1 = yes, 0 = no; defaults to yes
9ac429ef	76	function randstring()
f4e40ab6 DG	77	{
	78	[ "$2" == "0" ] && CHAR="[:alnum:]" \|\| CHAR="[:graph:]"
	79	cat /dev/urandom \| tr -cd "$CHAR" \| head -c ${1:-16}
	80	echo
	81	}
	82
f4e40ab6 DG	83	function lttng_enable_kernel_event
f4e40ab6 DG	84	{
7d0ad314 JRJ	85	local sess_name=$1
	86	local event_name=$2
	87	local channel_name=$3
f4e40ab6 DG	88
	89	if [ -z $event_name ]; then
	90	# Enable all event if no event name specified
29655db7	91	event_name="-a"
f4e40ab6 DG	92	fi
f4e40ab6 DG	93
07b86b52 JD	94	if [ -z $channel_name ]; then
	95	# default channel if none specified
	96	chan=""
	97	else
	98	chan="-c $channel_name"
	99	fi
	100
873c2aae	101	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" $chan -s $sess_name -k >$OUTPUT_DEST
29655db7	102	ok $? "Enable kernel event $event_name for session $sess_name"
f4e40ab6 DG	103	}
f4e40ab6 DG	104
fb3268e3	105	function start_lttng_relayd
f4e40ab6	106	{
198e7caf	107	local opt=$1
173af62f	108
f4e40ab6 DG	109	DIR=$(readlink -f $TESTDIR)
	110
	111	if [ -z $(pidof lt-$RELAYD_BIN) ]; then
873c2aae	112	$DIR/../src/bin/lttng-relayd/$RELAYD_BIN -b $opt >$OUTPUT_DEST
25a818af	113	#$DIR/../src/bin/lttng-relayd/$RELAYD_BIN $opt -vvv >>/tmp/relayd.log 2>&1 &
f4e40ab6	114	if [ $? -eq 1 ]; then
29655db7	115	fail "Start lttng-relayd (opt: $opt)"
f4e40ab6 DG	116	return 1
f4e40ab6 DG	117	else
29655db7	118	pass "Start lttng-relayd (opt: $opt)"
f4e40ab6 DG	119	fi
f4e40ab6 DG	120	else
29655db7	121	pass "Start lttng-relayd (opt: $opt)"
f4e40ab6 DG	122	fi
	123	}
	124
1fb23888	125	function stop_lttng_relayd_nocheck
f4e40ab6 DG	126	{
	127	PID_RELAYD=`pidof lt-$RELAYD_BIN`
	128
1fb23888	129	diag "Killing lttng-relayd (pid: $PID_RELAYD)"
873c2aae	130	kill $PID_RELAYD >$OUTPUT_DEST
1fb23888	131	retval=$?
29655db7	132
1fb23888	133	if [ $retval -eq 1 ]; then
f4e40ab6 DG	134	out=1
	135	while [ -n "$out" ]; do
	136	out=$(pidof lt-$RELAYD_BIN)
	137	sleep 0.5
	138	done
1fb23888 MD	139	fi
	140	return $retval
	141	}
	142
	143	function stop_lttng_relayd
	144	{
	145	stop_lttng_relayd_nocheck
	146
	147	if [ $? -eq 1 ]; then
	148	fail "Killed lttng-relayd (pid: $PID_RELAYD)"
	149	return 1
	150	else
	151	pass "Killed lttng-relayd (pid: $PID_RELAYD)"
f4e40ab6 DG	152	return 0
	153	fi
	154	}
	155
8d51ddbc	156	#First argument: load path for automatic loading
fb3268e3	157	function start_lttng_sessiond()
355f483d	158	{
8d51ddbc JRJ	159
8d51ddbc JRJ	160	local load_path="$1"
355f483d DG	161	if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
	162	# Env variable requested no session daemon
	163	return
	164	fi
	165
29655db7 CB	166	validate_kernel_version
	167	if [ $? -ne 0 ]; then
	168	fail "Start session daemon"
	169	BAIL_OUT "* Kernel too old for session daemon tests *"
355f483d DG	170	fi
355f483d DG	171
29655db7	172	DIR=$(readlink -f $TESTDIR)
d3d97763 JG	173	: ${LTTNG_SESSION_CONFIG_XSD_PATH=${DIR}/../src/common/config/}
d3d97763 JG	174	export LTTNG_SESSION_CONFIG_XSD_PATH
29655db7 CB	175
29655db7 CB	176	if [ -z $(pidof lt-$SESSIOND_BIN) ]; then
8d51ddbc JRJ	177	# Have a load path ?
	178	if [ -n "$1" ]; then
	179	$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"
	180	else
	181	$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"
	182	fi
29655db7 CB	183	#$DIR/../src/bin/lttng-sessiond/$SESSIOND_BIN --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 &
29655db7 CB	184	status=$?
29655db7 CB	185	ok $status "Start session daemon"
29655db7 CB	186	fi
355f483d DG	187	}
355f483d DG	188
fb3268e3	189	function stop_lttng_sessiond ()
d3e8f6bb	190	{
355f483d DG	191	if [ -n $TEST_NO_SESSIOND ] && [ "$TEST_NO_SESSIOND" == "1" ]; then
	192	# Env variable requested no session daemon
	193	return
	194	fi
	195
d3e8f6bb DG	196	PID_SESSIOND=`pidof lt-$SESSIOND_BIN`
d3e8f6bb DG	197
873c2aae	198	kill $PID_SESSIOND >$OUTPUT_DEST
29655db7	199
d3e8f6bb	200	if [ $? -eq 1 ]; then
29655db7	201	fail "Kill sessions daemon"
d3e8f6bb DG	202	return 1
d3e8f6bb DG	203	else
5fa32580 DG	204	out=1
	205	while [ -n "$out" ]; do
	206	out=$(pidof lt-$SESSIOND_BIN)
	207	sleep 0.5
	208	done
f7613992 MD	209	out=1
	210	while [ -n "$out" ]; do
	211	out=$(pidof $CONSUMERD_BIN)
	212	sleep 0.5
	213	done
29655db7	214	pass "Kill session daemon"
d3e8f6bb DG	215	fi
	216	}
	217
873c2aae JRJ	218	function list_lttng_with_opts ()
873c2aae JRJ	219	{
7d0ad314	220	local opts=$1
312dabc3	221	$TESTDIR/../src/bin/lttng/$LTTNG_BIN list $opts >$OUTPUT_DEST
873c2aae JRJ	222	ok $? "Lttng-tool list command with option $opts"
	223	}
	224
07b86b52 JD	225	function create_lttng_session_no_output ()
07b86b52 JD	226	{
7d0ad314	227	local sess_name=$1
07b86b52	228
873c2aae	229	$TESTDIR/../src/bin/lttng/$LTTNG_BIN create $sess_name --no-output >$OUTPUT_DEST
07b86b52 JD	230	ok $? "Create session $sess_name in no-output mode"
	231	}
	232
d3e8f6bb DG	233	function create_lttng_session ()
d3e8f6bb DG	234	{
7d0ad314 JRJ	235	local sess_name=$1
	236	local trace_path=$2
	237	local expected_to_fail=$3
d3e8f6bb	238
873c2aae JRJ	239	$TESTDIR/../src/bin/lttng/$LTTNG_BIN create $sess_name -o $trace_path > $OUTPUT_DEST
873c2aae JRJ	240	ret=$?
312dabc3	241	if [[ $expected_to_fail ]]; then
01513c3e JRJ	242	test "$ret" -ne "0"
01513c3e JRJ	243	ok $? "Expected fail on session creation $sess_name in $trace_path"
873c2aae JRJ	244	else
	245	ok $ret "Create session $sess_name in $trace_path"
	246	fi
d4018451 DG	247	}
d4018451 DG	248
29655db7	249	function enable_ust_lttng_channel()
d4018451	250	{
7d0ad314 JRJ	251	local sess_name=$1
	252	local channel_name=$2
	253	local expect_fail=$3
d4018451	254
873c2aae	255	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-channel -u $channel_name -s $sess_name >$OUTPUT_DEST
312dabc3 JRJ	256	ret=$?
312dabc3 JRJ	257	if [[ $expect_fail ]]; then
01513c3e JRJ	258	test "$ret" -ne "0"
01513c3e JRJ	259	ok $? "Expected fail on ust channel creation $channel_name in $sess_name"
312dabc3 JRJ	260	else
	261	ok $ret "Enable channel $channel_name for session $sess_name"
	262	fi
d4018451 DG	263	}
d4018451 DG	264
29655db7	265	function disable_ust_lttng_channel()
d4018451	266	{
7d0ad314 JRJ	267	local sess_name=$1
7d0ad314 JRJ	268	local channel_name=$2
d4018451	269
873c2aae	270	$TESTDIR/../src/bin/lttng/$LTTNG_BIN disable-channel -u $channel_name -s $sess_name >$OUTPUT_DEST
29655db7	271	ok $? "Disable channel $channel_name for session $sess_name"
d3e8f6bb DG	272	}
d3e8f6bb DG	273
07b86b52 JD	274	function enable_lttng_mmap_overwrite_kernel_channel()
07b86b52 JD	275	{
7d0ad314 JRJ	276	local sess_name=$1
7d0ad314 JRJ	277	local channel_name=$2
07b86b52	278
873c2aae	279	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-channel -s $sess_name $channel_name -k --output mmap --overwrite >$OUTPUT_DEST
07b86b52 JD	280	ok $? "Enable channel $channel_name for session $sess_name"
	281	}
	282
ebaaaf5e JD	283	function enable_lttng_mmap_overwrite_ust_channel()
ebaaaf5e JD	284	{
7d0ad314 JRJ	285	local sess_name=$1
7d0ad314 JRJ	286	local channel_name=$2
ebaaaf5e	287
873c2aae	288	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-channel -s $sess_name $channel_name -u --output mmap --overwrite >$OUTPUT_DEST
ebaaaf5e JD	289	ok $? "Enable channel $channel_name for session $sess_name"
	290	}
	291
d3e8f6bb DG	292	function enable_ust_lttng_event ()
d3e8f6bb DG	293	{
7d0ad314 JRJ	294	local sess_name=$1
	295	local event_name="$2"
	296	local channel_name=$3
01513c3e	297	local expected_to_fail=$4
ebaaaf5e JD	298
	299	if [ -z $channel_name ]; then
	300	# default channel if none specified
	301	chan=""
	302	else
	303	chan="-c $channel_name"
	304	fi
d3e8f6bb	305
873c2aae	306	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" $chan -s $sess_name -u >$OUTPUT_DEST
01513c3e JRJ	307	ret=$?
	308	if [[ $expected_to_fail ]]; then
	309	test $ret -ne "0"
	310	ok $? "Enable ust event $event_name for session $session_name on channel $channel_name failed as expected"
	311	else
	312	ok $ret "Enable event $event_name for session $sess_name"
	313	fi
26b53d3b DG	314	}
26b53d3b DG	315
37175ce4 DG	316	function enable_jul_lttng_event()
	317	{
	318	sess_name=$1
	319	event_name="$2"
	320	channel_name=$3
	321
	322	if [ -z $channel_name ]; then
	323	# default channel if none specified
	324	chan=""
	325	else
	326	chan="-c $channel_name"
	327	fi
	328
873c2aae	329	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" $chan -s $sess_name -j >$OUTPUT_DEST
37175ce4 DG	330	ok $? "Enable JUL event $event_name for session $sess_name"
	331	}
	332
b2064f54 DG	333	function enable_jul_lttng_event_loglevel()
b2064f54 DG	334	{
7d0ad314 JRJ	335	local sess_name=$1
	336	local event_name="$2"
	337	local loglevel=$3
	338	local channel_name=$4
b2064f54 DG	339
	340	if [ -z $channel_name ]; then
	341	# default channel if none specified
	342	chan=""
	343	else
	344	chan="-c $channel_name"
	345	fi
	346
873c2aae	347	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event --loglevel $loglevel "$event_name" $chan -s $sess_name -j >$OUTPUT_DEST
b2064f54 DG	348	ok $? "Enable JUL event $event_name for session $sess_name with loglevel $loglevel"
	349	}
	350
504d4ace DG	351	function enable_log4j_lttng_event()
	352	{
	353	sess_name=$1
	354	event_name="$2"
	355	channel_name=$3
	356
	357	if [ -z $channel_name ]; then
	358	# default channel if none specified
	359	chan=""
	360	else
	361	chan="-c $channel_name"
	362	fi
	363
	364	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" $chan -s $sess_name -l >$OUTPUT_DEST
	365	ok $? "Enable LOG4J event $event_name for session $sess_name"
	366	}
	367
	368	function enable_log4j_lttng_event_loglevel()
	369	{
	370	local sess_name=$1
	371	local event_name="$2"
	372	local loglevel=$3
	373	local channel_name=$4
	374
	375	if [ -z $channel_name ]; then
	376	# default channel if none specified
	377	chan=""
	378	else
	379	chan="-c $channel_name"
	380	fi
	381
	382	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event --loglevel $loglevel "$event_name" $chan -s $sess_name -l >$OUTPUT_DEST
	383	ok $? "Enable LOG4J event $event_name for session $sess_name with loglevel $loglevel"
	384	}
	385
26b53d3b DG	386	function enable_ust_lttng_event_filter()
26b53d3b DG	387	{
7d0ad314 JRJ	388	local sess_name="$1"
	389	local event_name="$2"
	390	local filter="$3"
26b53d3b	391
873c2aae	392	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" -s $sess_name -u --filter "$filter" >$OUTPUT_DEST
29655db7	393	ok $? "Enable event $event_name with filtering for session $sess_name"
26b53d3b DG	394	}
	395
	396	function enable_ust_lttng_event_loglevel()
	397	{
7d0ad314 JRJ	398	local sess_name="$1"
	399	local event_name="$2"
	400	local loglevel="$3"
26b53d3b	401
873c2aae	402	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" -s $sess_name -u --loglevel $loglevel >$OUTPUT_DEST
29655db7	403	ok $? "Enable event $event_name with loglevel $loglevel"
26b53d3b DG	404	}
	405
	406	function enable_ust_lttng_event_loglevel_only()
	407	{
7d0ad314 JRJ	408	local sess_name="$1"
	409	local event_name="$2"
	410	local loglevel="$3"
26b53d3b	411
873c2aae	412	$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" -s $sess_name -u --loglevel-only $loglevel >$OUTPUT_DEST
29655db7	413	ok $? "Enable event $event_name with loglevel-only $loglevel"
26b53d3b DG	414	}
	415
	416	function disable_ust_lttng_event ()
	417	{
7d0ad314 JRJ	418	local sess_name="$1"
7d0ad314 JRJ	419	local event_name="$2"
01513c3e	420	local channel_name="$3"
26b53d3b	421
01513c3e JRJ	422	if [ -z $channel_name ]; then
	423	# default channel if none specified
	424	chan=""
	425	else
	426	chan="-c $channel_name"
	427	fi
	428
	429	$TESTDIR/../src/bin/lttng/$LTTNG_BIN disable-event "$event_name" -s $sess_name $chan -u >$OUTPUT_DEST
29655db7	430	ok $? "Disable event $event_name for session $sess_name"
d3e8f6bb DG	431	}
d3e8f6bb DG	432
1d842d5a DG	433	function disable_jul_lttng_event ()
	434	{
	435	local sess_name="$1"
	436	local event_name="$2"
	437
	438	$TESTDIR/../src/bin/lttng/$LTTNG_BIN disable-event "$event_name" -s $sess_name -j >/dev/null 2>&1
	439	ok $? "Disable JUL event $event_name for session $sess_name"
	440	}
	441
504d4ace DG	442	function disable_log4j_lttng_event ()
	443	{
	444	local sess_name="$1"
	445	local event_name="$2"
	446
	447	$TESTDIR/../src/bin/lttng/$LTTNG_BIN disable-event "$event_name" -s $sess_name -l >/dev/null 2>&1
	448	ok $? "Disable LOG4J event $event_name for session $sess_name"
	449	}
	450
fb3268e3	451	function start_lttng_tracing ()
d3e8f6bb	452	{
7d0ad314	453	local sess_name=$1
01513c3e	454	local expected_to_fail=$2
d3e8f6bb	455
873c2aae	456	$TESTDIR/../src/bin/lttng/$LTTNG_BIN start $sess_name >$OUTPUT_DEST
01513c3e JRJ	457	ret=$?
	458	if [[ $expected_to_fail ]]; then
	459	test "$ret" -ne "0"
	460	ok $? "Expected fail on start tracing for session: $sess_name"
	461	else
	462	ok $ret "Start tracing for session $sess_name"
	463	fi
d3e8f6bb DG	464	}
d3e8f6bb DG	465
fb3268e3	466	function stop_lttng_tracing ()
d3e8f6bb	467	{
7d0ad314	468	local sess_name=$1
01513c3e	469	local expected_to_fail=$2
d3e8f6bb	470
873c2aae	471	$TESTDIR/../src/bin/lttng/$LTTNG_BIN stop $sess_name >$OUTPUT_DEST
01513c3e JRJ	472	ret=$?
	473	if [[ $expected_to_fail ]]; then
	474	test "$ret" -ne "0"
	475	ok $? "Expected fail on stop tracing for session: $sess_name"
	476	else
	477	ok $ret "Stop lttng tracing for session $sess_name"
	478	fi
d3e8f6bb DG	479	}
	480
	481	function destroy_lttng_session ()
	482	{
7d0ad314	483	local sess_name=$1
01513c3e	484	local expected_to_fail=$2
d3e8f6bb	485
873c2aae	486	$TESTDIR/../src/bin/lttng/$LTTNG_BIN destroy $sess_name >$OUTPUT_DEST
01513c3e JRJ	487	ret=$?
	488	if [[ $expected_to_fail ]]; then
	489	test "$ret" -ne "0"
	490	ok $? "Expected fail on session deletion $sess_name"
	491	else
	492	ok $ret "Destroy session $sess_name"
	493	fi
d3e8f6bb DG	494	}
d3e8f6bb DG	495
873c2aae JRJ	496	function destroy_lttng_sessions ()
	497	{
	498	$TESTDIR/../src/bin/lttng/$LTTNG_BIN destroy --all >$OUTPUT_DEST
	499	ok $? "Destroy all lttng sessions"
	500	}
	501
07b86b52 JD	502	function lttng_snapshot_add_output ()
07b86b52 JD	503	{
7d0ad314 JRJ	504	local sess_name=$1
7d0ad314 JRJ	505	local trace_path=$2
01513c3e	506	local expected_to_fail=$3
07b86b52	507
873c2aae	508	$TESTDIR/../src/bin/lttng/$LTTNG_BIN snapshot add-output -s $sess_name file://$trace_path >$OUTPUT_DEST
01513c3e JRJ	509	ret=$?
	510	if [[ $expected_to_fail ]]; then
	511	test "$ret" -ne "0"
	512	ok $? "Failed to add a snapshot output file://$trace_path as expected"
	513	else
	514	ok $ret "Added snapshot output file://$trace_path"
	515	fi
07b86b52 JD	516	}
07b86b52 JD	517
26402e0c DG	518	function lttng_snapshot_del_output ()
	519	{
	520	local sess_name=$1
	521	local id=$2
01513c3e	522	local expected_to_fail=$3
26402e0c	523
873c2aae	524	$TESTDIR/../src/bin/lttng/$LTTNG_BIN snapshot del-output -s $sess_name $id >$OUTPUT_DEST
01513c3e JRJ	525	ret=$?
	526	if [[ $expected_to_fail ]]; then
	527	test "$ret" -ne "0"
	528	ok $? "Expect fail on deletion of snapshot output id $id"
	529	else
	530	ok $ret "Deleted snapshot output id $id"
	531	fi
26402e0c DG	532	}
26402e0c DG	533
07b86b52 JD	534	function lttng_snapshot_record ()
07b86b52 JD	535	{
7d0ad314 JRJ	536	local sess_name=$1
7d0ad314 JRJ	537	local trace_path=$2
07b86b52	538
873c2aae	539	$TESTDIR/../src/bin/lttng/$LTTNG_BIN snapshot record -s $sess_name >$OUTPUT_DEST
07b86b52 JD	540	ok $? "Snapshot recorded"
	541	}
	542
01513c3e JRJ	543	function lttng_snapshot_list ()
	544	{
	545	local sess_name=$1
	546	$TESTDIR/../src/bin/lttng/$LTTNG_BIN snapshot list-output -s $sess_name >$OUTPUT_DEST
	547	ok $? "Snapshot list"
	548	}
	549
e02b109b DG	550	function lttng_save()
	551	{
	552	local sess_name=$1
	553	local opts=$2
	554
873c2aae	555	$TESTDIR/../src/bin/lttng/$LTTNG_BIN save $sess_name $opts >$OUTPUT_DEST
e02b109b DG	556	ok $? "Session successfully saved"
	557	}
	558
	559	function lttng_load()
	560	{
	561	local opts=$1
	562
873c2aae	563	$TESTDIR/../src/bin/lttng/$LTTNG_BIN load $opts >$OUTPUT_DEST
e02b109b DG	564	ok $? "Load command successful"
	565	}
	566
d3e8f6bb DG	567	function trace_matches ()
d3e8f6bb DG	568	{
7d0ad314 JRJ	569	local event_name=$1
	570	local nr_iter=$2
	571	local trace_path=$3
d3e8f6bb	572
317eef93	573	which $BABELTRACE_BIN >/dev/null
29655db7	574	skip $? -ne 0 "Babeltrace binary not found. Skipping trace matches"
d3e8f6bb	575
7d0ad314	576	local count=$($BABELTRACE_BIN $trace_path \| grep $event_name \| wc -l)
29655db7	577
d3e8f6bb	578	if [ "$count" -ne "$nr_iter" ]; then
29655db7 CB	579	fail "Trace match"
29655db7 CB	580	diag "$count events found in trace"
d3e8f6bb	581	else
29655db7	582	pass "Trace match"
d3e8f6bb DG	583	fi
d3e8f6bb DG	584	}
f4e40ab6	585
d53addeb DG	586	function trace_match_only()
	587	{
	588	local event_name=$1
	589	local nr_iter=$2
	590	local trace_path=$3
	591
	592	which $BABELTRACE_BIN >/dev/null
	593	skip $? -ne 0 "Babeltrace binary not found. Skipping trace matches"
	594
	595	local count=$($BABELTRACE_BIN $trace_path \| grep $event_name \| wc -l)
	596	local total=$($BABELTRACE_BIN $trace_path \| wc -l)
	597
	598	if [ "$nr_iter" -eq "$count" ] && [ "$total" -eq "$nr_iter" ]; then
	599	pass "Trace match with $total event $event_name"
	600	else
	601	fail "Trace match"
	602	diag "$total event(s) found, expecting $nr_iter of event $event_name and only found $count"
	603	fi
	604	}
	605
f4e40ab6 DG	606	function validate_trace
f4e40ab6 DG	607	{
7d0ad314 JRJ	608	local event_name=$1
7d0ad314 JRJ	609	local trace_path=$2
f4e40ab6 DG	610
f4e40ab6 DG	611	which $BABELTRACE_BIN >/dev/null
29655db7 CB	612	if [ $? -ne 0 ]; then
29655db7 CB	613	skip 0 "Babeltrace binary not found. Skipping trace validation"
f4e40ab6 DG	614	fi
f4e40ab6 DG	615
07b86b52 JD	616	OLDIFS=$IFS
	617	IFS=","
	618	for i in $event_name; do
	619	traced=$($BABELTRACE_BIN $trace_path 2>/dev/null \| grep $i \| wc -l)
	620	if [ "$traced" -ne 0 ]; then
ebaaaf5e	621	pass "Validate trace for event $i, $traced events"
07b86b52 JD	622	else
	623	fail "Validate trace for event $i"
	624	diag "Found $traced occurences of $i"
	625	fi
	626	done
	627	ret=$?
	628	IFS=$OLDIFS
	629	return $ret
f4e40ab6	630	}