RELAYD_BIN="lttng-relayd"
RELAYD_MATCH=".*lttng-relayd.*"
LTTNG_BIN="lttng"
-BABELTRACE_BIN="babeltrace"
+BABELTRACE_BIN="babeltrace2"
OUTPUT_DEST=/dev/null
ERROR_OUTPUT_DEST=/dev/null
MI_XSD_MAJOR_VERSION=4
while IFS= read -r pid ; do
# /proc/pid/cmdline is null separated.
- if full_command_no_argument=$(cut -d '' -f 1 2>/dev/null < /proc/"$pid"/cmdline); then
+ if full_command_no_argument=$(tr '\0' '\n' < /proc/"$pid"/cmdline 2>/dev/null | head -n1); then
command_basename=$(basename "$full_command_no_argument")
if grep -q "$pattern" <<< "$command_basename"; then
echo "$pid"
# $2 = include special characters; 1 = yes, 0 = no; defaults to yes
function randstring()
{
+ local len="${1:-16}"
+
[ "$2" == "0" ] && CHAR="[:alnum:]" || CHAR="[:graph:]"
- cat /dev/urandom 2>/dev/null | tr -cd "$CHAR" 2>/dev/null | head -c ${1:-16} 2>/dev/null
+ # /dev/urandom isn't guaranteed to generate valid multi-byte characters.
+ # Specifying the C locale eliminates the "Illegal byte sequence" error
+ # that 'tr' outputs in such cases.
+ LC_CTYPE=C tr -cd "$CHAR" < /dev/urandom 2>/dev/null | head -c "$len" 2>/dev/null
echo
}
+# Helpers for get_possible_cpus.
+function get_possible_cpus_count_from_sysfs_possible_mask()
+{
+ local max_possible_cpu_id
+
+ # The Awk script extracts the highest CPU id from the possible CPU
+ # mask. Assuming a numerical order, a field separator '-' and a record
+ # separator ','. The last value parsed is the highest id.
+ if [ -f /sys/devices/system/cpu/possible ]; then
+ max_possible_cpu_id=$(awk -F '-' 'BEGIN { RS = ","} { last = $NF } END { printf("%d\n", last) }' \
+ /sys/devices/system/cpu/possible)
+ echo "$((max_possible_cpu_id+1))"
+ else
+ echo "0"
+ fi
+}
+
+# This is a fallback if the possible CPU mask is not available. This will not
+# take into account unplugged CPUs.
+function get_max_cpus_count_from_sysfs_cpu_directories()
+{
+ local max_possible_cpu_id=0
+ local current_cpu_id
+
+ for i in /sys/devices/system/cpu/cpu[0-9]*; do
+ current_cpu_id="${i#/sys/devices/system/cpu/cpu}"
+ if [ "$current_cpu_id" -gt "$max_possible_cpu_id" ]; then
+ max_possible_cpu_id="$current_cpu_id"
+ fi
+ done
+
+ echo "$((max_possible_cpu_id+1))"
+}
+
+# Return the number of possible CPUs.
+function get_possible_cpus_count()
+{
+ local possible_cpus_count
+ possible_cpus_count=$(get_possible_cpus_count_from_sysfs_possible_mask)
+
+ if [ "$possible_cpus_count" -eq "0" ]; then
+ local configured_cpus_count
+ configured_cpus_count=$(getconf _NPROCESSORS_CONF)
+ possible_cpus_count=$(get_max_cpus_count_from_sysfs_cpu_directories)
+ possible_cpus_count=$((configured_cpus_count > possible_cpus_count \
+ ? configured_cpus_count \
+ : possible_cpus_count))
+ fi
+
+ echo "$possible_cpus_count"
+}
+
+# Return the list of exposed CPU.
+#
+# NOTE! Use it like so:
+#
+# IFS=" " read -r -a VARIABLE <<< "$(get_exposed_cpus_list)"
+function get_exposed_cpus_list()
+{
+ local list=()
+
+ for i in /sys/devices/system/cpu/cpu[0-9]*; do
+ list+=("${i#/sys/devices/system/cpu/cpu}")
+ done
+
+ echo "${list[@]}"
+}
+
+# Return any available CPU found. Do not make assumption about the returned
+# value, e.g. that it could be 0.
+function get_any_available_cpu()
+{
+ for cpu in /sys/devices/system/cpu/cpu[0-9]*; do
+ echo "${cpu#/sys/devices/system/cpu/cpu}"
+ break;
+ done
+}
+
# Return the number of _configured_ CPUs.
function conf_proc_count()
{
LTTNG_BAIL_OUT "*** Kernel too old for session daemon tests ***"
fi
- diag "export LTTNG_SESSION_CONFIG_XSD_PATH=${DIR}/../src/common/config/"
- : "${LTTNG_SESSION_CONFIG_XSD_PATH="${DIR}/../src/common/config/"}"
+ diag "export LTTNG_SESSION_CONFIG_XSD_PATH=${DIR}/../src/common/"
+ : "${LTTNG_SESSION_CONFIG_XSD_PATH="${DIR}/../src/common/"}"
export LTTNG_SESSION_CONFIG_XSD_PATH
if [ -z "$(lttng_pgrep "${SESSIOND_MATCH}")" ]; then
function list_lttng_with_opts ()
{
+ local ret
+ local withtap=$1
+ shift
local opts=$1
_run_lttng_cmd "$OUTPUT_DEST" "$ERROR_OUTPUT_DEST" \
list $opts
- ok $? "Lttng-tool list command with option $opts"
+ ret=$?
+ if [ $withtap -eq "1" ]; then
+ ok $ret "Lttng-tool list command with option $opts"
+ fi
+}
+
+function list_lttng_ok ()
+{
+ list_lttng_with_opts 1 "$@"
+}
+
+function list_lttng_notap ()
+{
+ list_lttng_with_opts 0 "$@"
}
function create_lttng_session_no_output ()
function enable_log4j_lttng_event()
{
- sess_name=$1
- event_name="$2"
- channel_name=$3
+ 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"
+ local chan_opt=()
+
+ # default channel if none specified
+ if [ -n "$channel_name" ]; then
+ chan_opt=("-c" "$channel_name")
fi
_run_lttng_cmd "$OUTPUT_DEST" "$ERROR_OUTPUT_DEST" \
- enable-event "$event_name" $chan -s $sess_name -l
- ok $? "Enable LOG4J event $event_name for session $sess_name"
+ enable-event "$event_name" "${chan_opt[@]}" -s "$sess_name" --log4j
+ ok $? "Enable LOG4J event '$event_name' for session '$sess_name'"
+}
+
+function enable_log4j_lttng_event_filter()
+{
+ local sess_name=$1
+ local event_name=$2
+ local filter=$3
+
+ _run_lttng_cmd "$OUTPUT_DEST" "$ERROR_OUTPUT_DEST" \
+ enable-event "$event_name" -s "$sess_name" --log4j --filter "$filter"
+ ok $? "Enable LOG4J event '$event_name' with filter '$filter' for session '$sess_name'"
+}
+
+function enable_log4j_lttng_event_filter_loglevel_only()
+{
+ local sess_name=$1
+ local event_name=$2
+ local filter=$3
+ local loglevel=$4
+
+ _run_lttng_cmd "$OUTPUT_DEST" "$ERROR_OUTPUT_DEST" \
+ enable-event --loglevel-only "$loglevel" "$event_name" -s "$sess_name" -l --filter "$filter"
+ ok $? "Enable LOG4J event '$event_name' with filter '$filter' and loglevel-only '$loglevel' for session '$sess_name'"
}
function enable_log4j_lttng_event_loglevel()
{
local sess_name=$1
- local event_name="$2"
+ 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"
+
+ # default channel if none specified
+ if [ -n "$channel_name" ]; then
+ chan_opt=("-c" "$channel_name")
fi
_run_lttng_cmd "$OUTPUT_DEST" "$ERROR_OUTPUT_DEST" \
- enable-event --loglevel $loglevel "$event_name" $chan -s $sess_name -l
- ok $? "Enable LOG4J event $event_name for session $sess_name with loglevel $loglevel"
+ enable-event --loglevel "$loglevel" "$event_name" "${chan_opt[@]}" -s "$sess_name" --log4j
+ ok $? "Enable LOG4J event '$event_name' for session '$sess_name' with loglevel '$loglevel'"
+}
+
+function enable_log4j_lttng_event_loglevel_only()
+{
+ local sess_name=$1
+ local event_name=$2
+ local loglevel=$3
+ local channel_name=$4
+
+ local chan_opt=()
+
+ # default channel if none specified
+ if [ -n "$channel_name" ]; then
+ chan_opt=("-c" "$channel_name")
+ fi
+
+ _run_lttng_cmd "$OUTPUT_DEST" "$ERROR_OUTPUT_DEST" \
+ enable-event --loglevel-only "$loglevel" "$event_name" "${chan_opt[@]}" -s "$sess_name" --log4j
+ ok $? "Enable LOG4J event '$event_name' for session '$sess_name' with loglevel-only '$loglevel'"
}
function enable_python_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"
+ _run_lttng_cmd "$OUTPUT_DEST" "$ERROR_OUTPUT_DEST" \
+ disable-event "$event_name" -s "$sess_name" --log4j
+ ok $? "Disable LOG4J event '$event_name' for session '$sess_name'"
}
function disable_python_lttng_event ()
pass "Waiting for live viewers on url: $url"
}
-function validate_metadata_event ()
+function bail_out_if_no_babeltrace()
+{
+ which "$BABELTRACE_BIN" >/dev/null
+ if [ $? -ne 0 ]; then
+ LTTNG_BAIL_OUT "\"$BABELTRACE_BIN\" binary not found. Skipping tests"
+ fi
+}
+
+# Check that the trace metadata contains '$expected' event ids matching '$event_name'.
+function validate_metadata_event()
{
local event_name=$1
- local nr_event_id=$2
+ local expected=$2
local trace_path=$3
- local metadata_file=$(find $trace_path -name "metadata")
- local metadata_path=$(dirname $metadata_file)
+ local metadata_file
+ local metadata_path
+ local count
- which $BABELTRACE_BIN >/dev/null
- skip $? -ne 0 "Babeltrace binary not found. Skipping trace matches"
+ metadata_file=$(find "$trace_path" -name "metadata")
+ metadata_path=$(dirname "$metadata_file")
- local count=$($BABELTRACE_BIN --output-format=ctf-metadata $metadata_path | grep $event_name | wc -l)
+ bail_out_if_no_babeltrace
- if [ "$count" -ne "$nr_event_id" ]; then
- fail "Metadata match with the metadata of $count event(s) named $event_name"
- diag "$count matching event id found in metadata"
- else
- pass "Metadata match with the metadata of $count event(s) named $event_name"
- fi
+ count=$($BABELTRACE_BIN --output-format=ctf-metadata "$metadata_path" | grep -c "$event_name")
+ test "$count" -eq "$expected"
+ ok $? "Found $count / $expected metadata event id matching '$event_name'"
}
-function trace_matches ()
+# Check that the trace contains '$expected' events matching '$event_name', other
+# events not matching '$event_name' can be present.
+function trace_matches()
{
local event_name=$1
- local nr_iter=$2
+ local expected=$2
local trace_path=$3
- which $BABELTRACE_BIN >/dev/null
- skip $? -ne 0 "Babeltrace binary not found. Skipping trace matches"
+ local count
+ local total
- local count=$($BABELTRACE_BIN $trace_path | grep $event_name | wc -l)
+ bail_out_if_no_babeltrace
- if [ "$count" -ne "$nr_iter" ]; then
- fail "Trace match"
- diag "$count matching events found in trace"
- else
- pass "Trace match"
- fi
+ count=$($BABELTRACE_BIN "$trace_path" | grep -c "$event_name")
+ total=$($BABELTRACE_BIN "$trace_path" | wc -l)
+
+ test "$count" -eq "$expected"
+
+ ok $? "Found $count / $expected events matching '$event_name' out of $total events"
}
+# Check that the trace contains '$expected' events matching '$event_name' and no
+# other events.
function trace_match_only()
{
local event_name=$1
- local nr_iter=$2
+ local expected=$2
local trace_path=$3
- which $BABELTRACE_BIN >/dev/null
- skip $? -ne 0 "Babeltrace binary not found. Skipping trace matches"
+ local count
+ local total
- local count=$($BABELTRACE_BIN $trace_path | grep $event_name | wc -l)
- local total=$($BABELTRACE_BIN $trace_path | wc -l)
+ bail_out_if_no_babeltrace
- 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
+ count=$($BABELTRACE_BIN "$trace_path" | grep -c "$event_name")
+ total=$($BABELTRACE_BIN "$trace_path" | wc -l)
+
+ test "$expected" -eq "$count" && test "$total" -eq "$expected"
+
+ ok $? "Found $count / $expected events matching '$event_name' amongst $total events"
}
-function validate_trace
+# Check that the trace contains at least 1 event matching each name in the
+# comma separated list '$event_names'.
+function validate_trace()
{
- local event_name=$1
+ local event_names=$1
local trace_path=$2
- which $BABELTRACE_BIN >/dev/null
- if [ $? -ne 0 ]; then
- skip 0 "Babeltrace binary not found. Skipping trace validation"
- fi
+ local count
+
+ bail_out_if_no_babeltrace
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 occurrences of $i"
- fi
+ for event_name in $event_names; do
+ # trace_path is unquoted since callers make use of globbing
+ count=$($BABELTRACE_BIN $trace_path | grep -c "$event_name")
+ test "$count" -gt 0
+ ok $? "Found $count events matching '$event_name'"
done
- ret=$?
IFS=$OLDIFS
- return $ret
}
-function validate_trace_count
+# Check that the trace contains at least 1 event matching each name in the
+# comma separated list '$event_names' and a total of '$expected' events.
+function validate_trace_count()
{
- local event_name=$1
+ local event_names=$1
local trace_path=$2
- local expected_count=$3
+ local expected=$3
- which $BABELTRACE_BIN >/dev/null
- if [ $? -ne 0 ]; then
- skip 0 "Babeltrace binary not found. Skipping trace validation"
- fi
+ local count
+ local total=0
+
+ bail_out_if_no_babeltrace
- cnt=0
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 occurrences of $i"
- fi
- cnt=$(($cnt + $traced))
+ for event_name in $event_names; do
+ count=$($BABELTRACE_BIN "$trace_path" | grep -c "$event_name")
+ test "$count" -gt 0
+ ok $? "Found '$count' events matching '$event_name'"
+ total=$(( total + count ))
done
IFS=$OLDIFS
- test $cnt -eq $expected_count
- ok $? "Read a total of $cnt events, expected $expected_count"
+ test $total -eq "$expected"
+ ok $? "Found $total events, expected $expected events"
}
-function validate_trace_count_range_incl_min_excl_max
+# Check that the trace contains at least '$expected_min' event matching each
+# name in the comma separated list '$event_names' and a total at least
+# '$expected_min' and less than '$expected_max' events.
+function validate_trace_count_range_incl_min_excl_max()
{
- local event_name=$1
+ local event_names=$1
local trace_path=$2
local expected_min=$3
local expected_max=$4
- which $BABELTRACE_BIN >/dev/null
- if [ $? -ne 0 ]; then
- skip 0 "Babeltrace binary not found. Skipping trace validation"
- fi
+ local count
+ local total=0
+
+ bail_out_if_no_babeltrace
- cnt=0
OLDIFS=$IFS
IFS=","
- for i in $event_name; do
- traced=$($BABELTRACE_BIN $trace_path 2>/dev/null | grep $i | wc -l)
- if [ "$traced" -ge $expected_min ]; then
- pass "Validate trace for event $i, $traced events"
- else
- fail "Validate trace for event $i"
- diag "Found $traced occurrences of $i"
- fi
- cnt=$(($cnt + $traced))
+ for event_name in $event_names; do
+ count=$($BABELTRACE_BIN "$trace_path" | grep -c "$event_name")
+ test "$count" -ge "$expected_min"
+ ok $? "Found $count events matching '$event_name', expected at least $expected_min"
+ total=$(( total + count ))
done
IFS=$OLDIFS
- test $cnt -lt $expected_max
- ok $? "Read a total of $cnt events, expected between [$expected_min, $expected_max["
+ test $total -ge "$expected_min" && test $total -lt "$expected_max"
+ ok $? "Found a total of $total events, expected at least $expected_min and less than $expected_max"
}
-function trace_first_line
+function trace_first_line()
{
local trace_path=$1
- which $BABELTRACE_BIN >/dev/null
- if [ $? -ne 0 ]; then
- skip 0 "Babeltrace binary not found. Skipping trace validation"
- fi
-
- $BABELTRACE_BIN $trace_path 2>/dev/null | head -n 1
+ $BABELTRACE_BIN "$trace_path" | head -n 1
}
+# Check that the trace contains at least 1 event matching the grep extended
+# regexp '$event_exp'.
function validate_trace_exp()
{
local event_exp=$1
local trace_path=$2
- which $BABELTRACE_BIN >/dev/null
- skip $? -ne 0 "Babeltrace binary not found. Skipping trace validation"
+ local count
- traced=$($BABELTRACE_BIN $trace_path 2>/dev/null | grep --extended-regexp ${event_exp} | wc -l)
- if [ "$traced" -ne 0 ]; then
- pass "Validate trace for expression '${event_exp}', $traced events"
- else
- fail "Validate trace for expression '${event_exp}'"
- diag "Found $traced occurrences of '${event_exp}'"
- fi
- ret=$?
- return $ret
+ bail_out_if_no_babeltrace
+
+ # event_exp is unquoted since it contains multiple grep arguments
+ count=$($BABELTRACE_BIN "$trace_path" | grep -c --extended-regexp $event_exp)
+ test "$count" -gt 0
+ ok $? "Found $count events matching expression '$event_exp'"
}
+# Check that the trace contains at least 1 event matching the grep extended
+# regexp '$event_exp' and zero event not matching it.
function validate_trace_only_exp()
{
local event_exp=$1
local trace_path=$2
- which $BABELTRACE_BIN >/dev/null
- skip $? -ne 0 "Babeltrace binary not found. Skipping trace matches"
+ local count
+ local total
- local count=$($BABELTRACE_BIN $trace_path | grep --extended-regexp ${event_exp} | wc -l)
- local total=$($BABELTRACE_BIN $trace_path | wc -l)
+ bail_out_if_no_babeltrace
- if [ "$count" -ne 0 ] && [ "$total" -eq "$count" ]; then
- pass "Trace match with $total for expression '${event_exp}'"
- else
- fail "Trace match"
- diag "$total syscall event(s) found, only syscalls matching expression '${event_exp}' ($count occurrences) are expected"
- fi
- ret=$?
- return $ret
+ # event_exp is unquoted since it contains multiple grep arguments
+ count=$($BABELTRACE_BIN "$trace_path" | grep -c --extended-regexp $event_exp)
+ total=$($BABELTRACE_BIN "$trace_path" | wc -l)
+
+ test "$count" -gt 0 && test "$total" -eq "$count"
+ ok $? "Found $count events matching expression '$event_exp' amongst $total events"
}
+# Check that the trace is valid and contains 0 event.
function validate_trace_empty()
{
local trace_path=$1
- which $BABELTRACE_BIN >/dev/null
- if [ $? -ne 0 ]; then
- skip 0 "Babeltrace binary not found. Skipping trace validation"
- fi
+ local ret
+ local count
- events=$($BABELTRACE_BIN $trace_path 2>/dev/null)
+ bail_out_if_no_babeltrace
+
+ events=$($BABELTRACE_BIN "$trace_path")
ret=$?
if [ $ret -ne 0 ]; then
fail "Failed to parse trace"
return $ret
fi
- traced=$(echo -n "$events" | wc -l)
- if [ "$traced" -eq 0 ]; then
- pass "Validate empty trace"
- else
- fail "Validate empty trace"
- diag "Found $traced events in trace"
- fi
- ret=$?
- return $ret
+ count=$(echo -n "$events" | wc -l)
+ test "$count" -eq 0
+ ok $? "Validate trace is empty, found $count events"
}
function validate_directory_empty ()
{
local trace_path="$1"
+ local files
+ local ret
+ local nb_files
+
# Do not double quote `$trace_path` below as we want wildcards to be
# expanded.
files="$(ls -A $trace_path)"
fi
nb_files="$(echo -n "$files" | wc -l)"
- ok $nb_files "Directory \"$trace_path\" is empty"
+ test "$nb_files" -eq 0
+ ok $? "Directory \"$trace_path\" is empty"
}
function validate_trace_session_ust_empty()
ret=$?
if [[ $expected_to_fail -eq "1" ]]; then
test "$ret" -ne "0"
- ok $? "Expected fail on rotate session $sess_name"
+ ok $? "Expected to fail to set a periodic rotation of session $sess_name" "every " $size " bytes"
else
- ok $ret "Rotate session $sess_name"
+ ok $ret "Set a scheduled rotation of session $sess_name" "every " $size " bytes"
fi
}
function list_triggers_matches_ok ()
{
- local tmp_stdout=$(mktemp --tmpdir -t "tmp.${FUNCNAME[0]}_stdout.XXXXXX")
- local tmp_stderr=$(mktemp --tmpdir -t "tmp.${FUNCNAME[0]}_stderr.XXXXXX")
+ local tmp_stdout=$(mktemp -t "tmp.${FUNCNAME[0]}_stdout.XXXXXX")
+ local tmp_stderr=$(mktemp -t "tmp.${FUNCNAME[0]}_stderr.XXXXXX")
local test_name="$1"
local expected_stdout_file="$2"
local test_name="$1"
local expected_stdout_file="$2"
- tmp_stdout_raw=$(mktemp --tmpdir -t "tmp.${FUNCNAME[0]}_stdout.XXXXXX")
- tmp_stdout=$(mktemp --tmpdir -t "tmp.${FUNCNAME[0]}_stdout.XXXXXX")
- tmp_stderr=$(mktemp --tmpdir -t "tmp.${FUNCNAME[0]}_stderr.XXXXXX")
+ tmp_stdout_raw=$(mktemp -t "tmp.${FUNCNAME[0]}_stdout.XXXXXX")
+ tmp_stdout=$(mktemp -t "tmp.${FUNCNAME[0]}_stdout.XXXXXX")
+ tmp_stderr=$(mktemp -t "tmp.${FUNCNAME[0]}_stderr.XXXXXX")
diag "$TESTDIR/../src/bin/lttng/$LTTNG_BIN --mi xml list-triggers"