function print_test_banner ()
{
- desc="$1"
+ local desc="$1"
diag "$desc"
}
function validate_kernel_version ()
{
- kern_version=($(uname -r | awk -F. '{ printf("%d.%d.%d\n",$1,$2,$3); }' | tr '.' '\n'))
+ 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
function lttng_enable_kernel_event
{
- sess_name=$1
- event_name=$2
- channel_name=$3
+ 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
function list_lttng_with_opts ()
{
- opts=$1
- $TESTDIR/../src/bin/lttng/$LTTNG_BIN $opts >$OUTPUT_DEST
+ 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 ()
{
- sess_name=$1
+ 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 ()
{
- sess_name=$1
- trace_path=$2
- expected_to_fail=$3
+ 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 && $ret ]]; then
- ok 0 "Expected fail on session creation $sess_name in $trace_path"
+ 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()
{
- sess_name=$1
- channel_name=$2
+ 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
- ok $? "Enable channel $channel_name for session $sess_name"
+ 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()
{
- sess_name=$1
- channel_name=$2
+ 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()
{
- sess_name=$1
- channel_name=$2
+ 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()
{
- sess_name=$1
- channel_name=$2
+ 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 ()
{
- sess_name=$1
- event_name="$2"
- channel_name=$3
+ 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
fi
$TESTDIR/../src/bin/lttng/$LTTNG_BIN enable-event "$event_name" $chan -s $sess_name -u >$OUTPUT_DEST
- ok $? "Enable event $event_name for session $sess_name"
+ 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()
function enable_jul_lttng_event_loglevel()
{
- sess_name=$1
- event_name="$2"
- loglevel=$3
- channel_name=$4
+ 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
function enable_ust_lttng_event_filter()
{
- sess_name="$1"
- event_name="$2"
- filter="$3"
+ 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()
{
- sess_name="$1"
- event_name="$2"
- loglevel="$3"
+ 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()
{
- sess_name="$1"
- event_name="$2"
- loglevel="$3"
+ 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 ()
{
- sess_name="$1"
- event_name="$2"
+ 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 -u >$OUTPUT_DEST
+ $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 start_lttng_tracing ()
{
- sess_name=$1
+ local sess_name=$1
+ local expected_to_fail=$2
$TESTDIR/../src/bin/lttng/$LTTNG_BIN start $sess_name >$OUTPUT_DEST
- ok $? "Start tracing for session $sess_name"
+ 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 ()
{
- sess_name=$1
+ local sess_name=$1
+ local expected_to_fail=$2
$TESTDIR/../src/bin/lttng/$LTTNG_BIN stop $sess_name >$OUTPUT_DEST
- ok $? "Stop lttng tracing for session $sess_name"
+ 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 ()
{
- sess_name=$1
+ local sess_name=$1
+ local expected_to_fail=$2
$TESTDIR/../src/bin/lttng/$LTTNG_BIN destroy $sess_name >$OUTPUT_DEST
- ok $? "Destroy lttng session $sess_name"
+ 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 ()
function lttng_snapshot_add_output ()
{
- sess_name=$1
- trace_path=$2
+ 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
- ok $? "Added snapshot output file://$trace_path"
+ 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
- ok $? "Deleted snapshot output id $id"
+ 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 ()
{
- sess_name=$1
- trace_path=$2
+ 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
function trace_matches ()
{
- event_name=$1
- nr_iter=$2
- trace_path=$3
+ 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"
- count=$($BABELTRACE_BIN $trace_path | grep $event_name | wc -l)
+ local count=$($BABELTRACE_BIN $trace_path | grep $event_name | wc -l)
if [ "$count" -ne "$nr_iter" ]; then
fail "Trace match"
function validate_trace
{
- event_name=$1
- trace_path=$2
+ local event_name=$1
+ local trace_path=$2
which $BABELTRACE_BIN >/dev/null
if [ $? -ne 0 ]; then
projects / lttng-tools.git / blobdiff