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
|
#!/bin/sh -efu
#
# Check that fault injection works properly.
#
# 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=.}/scno_tampering.sh"
#
# F
# F+
# F+S
N=100
: ${suffix=}
[ -z "${name_override-}" ] || NAME="$name_override"
check_fault_injection()
{
local trace fault err first step procs extra
trace=$1; shift
fault=$1; shift
err=$1; shift
first=$1; shift
step=$1; shift
procs=$1; shift
extra="$*"
local when=
if [ -z "$first$step" ]; then
first=1
step=1
else
case "$step" in
'') when=":when=$first"; step=0 ;;
+) when=":when=$first+"; step=1 ;;
*) when=":when=$first+$step" ;;
esac
fi
local error=
local raw=reg
set --
case "$err" in
'') ;;
[123456789]*)
error=":error=$err"
raw=raw
set -- -e raw=all
;;
*) error=":error=$err" ;;
esac
outexp="$NAME.out.exp"
outgot="$NAME.out.got"
outout="$NAME.out.out"
outpid="$NAME.pid"
run_strace -a11 -ff -e trace=$trace \
"$@" -e fault=$fault$when$error$suffix $extra \
../$NAME $raw "$err" "$first" "$step" $N \
"$procs" "$outexp" "$outgot" "$outout" "$outpid"
for i in $(seq 0 $((procs - 1)) )
do
pid=$(cat "$outpid.$i")
match_diff "$LOG.$pid" "$outout.$i"
match_diff "$outgot.$i" "$outexp.$i"
done
}
for err in '' ENOSYS 22 einval; do
for fault in writev desc,51; do
check_fault_injection \
writev $fault "$err" '' '' 1 -efault=chdir
check_fault_injection \
writev $fault "$err" '' '' 1 -efault=chdir -efault=none
for F in 1 2 3 5 7 11; do
check_fault_injection \
writev $fault "$err" $F '' 1
check_fault_injection \
writev $fault "$err" $F + 1
for S in 1 2 3 5 7 11; do
check_fault_injection \
writev $fault "$err" $F $S 1
check_fault_injection \
writev $fault "$err" $F $S 4
done
done
done
done
|
