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
131
132
133
134
135
136
137
138
|
#!/bin/sh
#
# Check syscall set parsing syntax.
#
# Copyright (c) 2016-2018 Dmitry V. Levin <ldv@strace.io>
# Copyright (c) 2017 Nikolay Marchuk <marchuk.nikolay.a@gmail.com>
# Copyright (c) 2018-2022 The strace developers.
# All rights reserved.
#
# SPDX-License-Identifier: GPL-2.0-or-later
. "${srcdir=.}/syntax.sh"
check_syscall()
{
[ -z "$2" ] || check_e "invalid system call '$1'" -e"$2"
check_e "invalid system call '$1'" -e "$2"
check_e "invalid system call '$1'" -etrace="$2"
check_e "invalid system call '$1'" --trace="$2"
check_e "invalid system call '$1'" -e trace="$2"
check_e "invalid system call '$1'" -eabbrev="$2"
check_e "invalid system call '$1'" --abbrev="$2"
check_e "invalid system call '$1'" -e abbrev="$2"
check_e "invalid system call '$1'" -everbose="$2"
check_e "invalid system call '$1'" --verbose="$2"
check_e "invalid system call '$1'" -e verbose="$2"
check_e "invalid system call '$1'" -eraw="$2"
check_e "invalid system call '$1'" --raw="$2"
check_e "invalid system call '$1'" -e raw="$2"
check_e "invalid system call '$1'" -einject="$2"
check_e "invalid system call '$1'" --inject="$2"
check_e "invalid system call '$1'" -e inject="$2"
check_e "invalid system call '$1'" -einject="$2:"
check_e "invalid system call '$1'" -einject="$2::"
check_e "invalid system call '$1'" -einject="$2:::"
check_e "invalid system call '$1'" --inject="$2:"
check_e "invalid system call '$1'" --inject="$2::"
check_e "invalid system call '$1'" --inject="$2:::"
check_e "invalid system call '$1'" -e inject="$2:"
check_e "invalid system call '$1'" -e inject="$2::"
check_e "invalid system call '$1'" -e inject="$2:::"
check_e "invalid system call '$1'" -einject="$2:when=3"
check_e "invalid system call '$1'" --inject="$2:when=3"
check_e "invalid system call '$1'" -e inject="$2:when=3"
check_e "invalid system call '$1'" -efault="$2"
check_e "invalid system call '$1'" --fault="$2"
check_e "invalid system call '$1'" -e fault="$2"
check_e "invalid system call '$1'" -efault="$2:"
check_e "invalid system call '$1'" -efault="$2::"
check_e "invalid system call '$1'" -efault="$2:::"
check_e "invalid system call '$1'" --fault="$2:"
check_e "invalid system call '$1'" --fault="$2::"
check_e "invalid system call '$1'" --fault="$2:::"
check_e "invalid system call '$1'" -e fault="$2:"
check_e "invalid system call '$1'" -e fault="$2::"
check_e "invalid system call '$1'" -e fault="$2:::"
check_e "invalid system call '$1'" -efault="$2:when=4"
check_e "invalid system call '$1'" --fault="$2:when=4"
check_e "invalid system call '$1'" -e fault="$2:when=4"
}
pers=$(print_current_personality_designator)
for arg in '' , ,, ,,, ; do
check_syscall "$arg" "$arg"
check_syscall "!$arg" "!$arg"
done
case "$STRACE_ARCH" in
alpha) invalid_scno1=299
invalid_scno2=404
;;
*) invalid_scno1=415
invalid_scno2=501
;;
esac
case "$STRACE_ARCH" in
ia64) valid_scno=1025 ;;
*) valid_scno=1 ;;
esac
for arg in -1 -2 -3 -4 -5 \
invalid_syscall_name \
0x 0y \
32767 \
2147483647 \
2147483648 \
4294967295 \
4294967296 \
$invalid_scno1 \
$invalid_scno2 \
/non_syscall \
% %not_a_class \
; do
check_syscall "$arg" "$arg"
check_syscall "$arg" "!$arg"
check_syscall "$arg" "$valid_scno,$arg"
check_syscall "$arg@$pers" "$arg@$pers"
done
for arg in '!chdir' none; do
check_syscall "$arg" "$valid_scno,$arg"
done
# invalid syscall, multiple syscalls
for arg in %desc \
%file \
%memory \
%process \
%network \
chdir \
$valid_scno \
all \
?32767 \
?invalid \
?%not_a_class \
?/non_syscall \
; do
for pfx in '' '!'; do
for token in "$arg" "$arg@$pers"; do
check_syscall nonsense "${pfx}$token,nonsense"
check_syscall nonsense "${pfx}nonsense,$token"
done
done
done
check_e_using_grep 'regcomp: \+id: [[:alpha:]].+' -e trace='/+id'
check_e_using_grep 'regcomp: \*id: [[:alpha:]].+' -e trace='/*id'
check_e_using_grep 'regcomp: \{id: [[:alpha:]].+' -e trace='/{id'
check_e_using_grep 'regcomp: \(id: [[:alpha:]].+' -e trace='/(id'
check_e_using_grep 'regcomp: \[id: [[:alpha:]].+' -e trace='/[id'
|
