1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130
|
#!/bin/sh
#
# Check strace options syntax.
#
# Copyright (c) 2016 Dmitry V. Levin <ldv@altlinux.org>
# Copyright (c) 2016-2018 The strace developers.
# All rights reserved.
#
# SPDX-License-Identifier: GPL-2.0-or-later
. "${srcdir=.}/syntax.sh"
check_e "Invalid process id: '0'" -p 0
check_e "Invalid process id: '-42'" -p -42
check_e "Invalid process id: '$$.'" -p $$.
check_e "Invalid process id: 'a'" -p 1,a
check_e "Syscall 'chdir' for -b isn't supported" -b chdir
check_e "Syscall 'chdir' for -b isn't supported" -b execve -b chdir
check_e_using_grep 'exec: File *name too long' "$(printf '%4096s' ' ')"
ff_name="$(printf '%4084s' ' ')"
check_e_using_grep "$ff_name: File *name too long" -ff -o "$ff_name" true
check_h 'must have PROG [ARGS] or -p PID'
check_h 'PROG [ARGS] must be specified with -D' -D -p $$
check_h '-c and -C are mutually exclusive' -c -C true
check_h '-c and -C are mutually exclusive' -C -c true
check_h '(-c or -C) and -ff are mutually exclusive' -c -ff true
check_h '(-c or -C) and -ff are mutually exclusive' -C -ff true
check_h '-w must be given with (-c or -C)' -w true
check_h 'piping the output and -ff are mutually exclusive' -o '|' -ff true
check_h 'piping the output and -ff are mutually exclusive' -o '!' -ff true
check_h "invalid -a argument: '-42'" -a -42
check_h "invalid -O argument: '-42'" -O -42
check_h "invalid -s argument: '-42'" -s -42
check_h "invalid -s argument: '1073741824'" -s 1073741824
check_h "invalid -I argument: '5'" -I 5
check_h "invalid -X argument: 'test'" -Xtest
check_h "invalid -X argument: 'a'" -Xa
check_h "invalid -X argument: 'abbreviated'" -X abbreviated
check_h "incorrect personality designator '' in qualification 'getcwd@'" -e trace=getcwd@
check_h "incorrect personality designator '42' in qualification 'getcwd@42'" -e trace=getcwd@42
check_h "incorrect personality designator '42' in qualification 'getcwd@42'" -e trace=gettid,getcwd@42
check_h "incorrect personality designator '42' in qualification '23@42'" -e trace=23@42,123
check_e "invalid system call '/getcwd@ohmy'" -e trace=/getcwd@ohmy
check_e "invalid -e kvm= argument: 'chdir'" -e kvm=chdir
case "$STRACE_NATIVE_ARCH" in
x86_64)
check_h "must have PROG [ARGS] or -p PID" -e trace=getcwd@64
check_h "must have PROG [ARGS] or -p PID" -e trace=getcwd@32
check_h "must have PROG [ARGS] or -p PID" -e trace=getcwd@x32
;;
x32)
check_h "incorrect personality designator '64' in qualification 'getcwd@64'" -e trace=getcwd@64
check_h "must have PROG [ARGS] or -p PID" -e trace=getcwd@32
check_h "must have PROG [ARGS] or -p PID" -e trace=getcwd@x32
;;
aarch64|powerpc64|riscv|s390x|sparc64|tile)
check_h "must have PROG [ARGS] or -p PID" -e trace=getcwd@64
check_h "must have PROG [ARGS] or -p PID" -e trace=getcwd@32
check_h "incorrect personality designator 'x32' in qualification 'getcwd@x32'" -e trace=getcwd@x32
;;
*)
pers="$((SIZEOF_LONG * 8))"
inv_pers="$((96 - pers))"
check_h "must have PROG [ARGS] or -p PID" -e trace=getcwd@"$pers"
check_h "incorrect personality designator '$inv_pers' in qualification 'getcwd@$inv_pers'" -e trace=getcwd@"$inv_pers"
check_h "incorrect personality designator 'x32' in qualification 'getcwd@x32'" -e trace=getcwd@x32
esac
../zeroargc "$STRACE_EXE" /bin/true 2> "$LOG" &&
dump_log_and_fail_with \
'zeroargc strace failed to handle the error properly'
cat > "$EXP" << __EOF__
$STRACE_EXE: must have PROG [ARGS] or -p PID
Try '$STRACE_EXE -h' for more information.
__EOF__
diff -u -- "$EXP" "$LOG" > /dev/null || {
cat > "$EXP" <<- '__EOF__'
strace: must have PROG [ARGS] or -p PID
Try 'strace -h' for more information.
__EOF__
match_diff "$LOG" "$EXP" \
"zeroargc $STRACE $args output mismatch"
}
uid="${UID:-`id -u`}"
if [ "$uid" -ge 0 ]; then
if [ "$uid" -eq 0 ]; then
umsg="Cannot find user ':nosuchuser:'"
else
umsg='You must be root to use the -u option'
fi
check_e "$umsg" -u :nosuchuser: true
for c in i r t T y; do
check_e "-$c has no effect with -c
$STRACE_EXE: $umsg" -u :nosuchuser: -c -$c true
done
check_e "-i has no effect with -c
$STRACE_EXE: -r has no effect with -c
$STRACE_EXE: -t has no effect with -c
$STRACE_EXE: -T has no effect with -c
$STRACE_EXE: -y has no effect with -c
$STRACE_EXE: $umsg" -u :nosuchuser: -cirtTy true
fi
args='-p 2147483647'
$STRACE $args 2> "$LOG" &&
dump_log_and_fail_with \
"strace $args failed to handle the error properly"
for cmd in PTRACE_SEIZE PTRACE_ATTACH; do
cat > "$EXP" << __EOF__
$STRACE_EXE: attach: ptrace($cmd, 2147483647): No such process
__EOF__
diff -- "$EXP" "$LOG" ||
continue
args=
break
done
[ -z "$args" ] ||
dump_log_and_fail_with \
"strace $args failed to print expected diagnostics"
|