1#!/bin/sh -efu
2#
3# Check that fault injection works properly.
4#
5# Copyright (c) 2016 Dmitry V. Levin <ldv@altlinux.org>
6# Copyright (c) 2016-2018 The strace developers.
7# All rights reserved.
8#
9# Redistribution and use in source and binary forms, with or without
10# modification, are permitted provided that the following conditions
11# are met:
12# 1. Redistributions of source code must retain the above copyright
13#    notice, this list of conditions and the following disclaimer.
14# 2. Redistributions in binary form must reproduce the above copyright
15#    notice, this list of conditions and the following disclaimer in the
16#    documentation and/or other materials provided with the distribution.
17# 3. The name of the author may not be used to endorse or promote products
18#    derived from this software without specific prior written permission.
19#
20# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21# IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22# OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23# IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
24# INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25# NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26# DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27# THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
29# THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30
31. "${srcdir=.}/scno_tampering.sh"
32
33#
34# F
35# F+
36# F+S
37
38N=100
39
40: ${suffix=}
41[ -z "${name_override-}" ] || NAME="$name_override"
42
43check_fault_injection()
44{
45	local trace fault err first step procs extra
46	trace=$1; shift
47	fault=$1; shift
48	err=$1; shift
49	first=$1; shift
50	step=$1; shift
51	procs=$1; shift
52	extra="$*"
53
54	local when=
55	if [ -z "$first$step" ]; then
56		first=1
57		step=1
58	else
59		case "$step" in
60			'') when=":when=$first"; step=0 ;;
61			+) when=":when=$first+"; step=1 ;;
62			*) when=":when=$first+$step" ;;
63		esac
64	fi
65
66	local error=
67	local raw=reg
68	set --
69	case "$err" in
70		'') ;;
71		[123456789]*)
72			error=":error=$err"
73			raw=raw
74			set -- -e raw=all
75			;;
76		*) error=":error=$err" ;;
77	esac
78
79	outexp="$NAME.out.exp"
80	outgot="$NAME.out.got"
81	outout="$NAME.out.out"
82	outpid="$NAME.pid"
83
84	run_strace -a11 -ff -e trace=$trace \
85		"$@" -e fault=$fault$when$error$suffix $extra \
86		../$NAME $raw "$err" "$first" "$step" $N \
87		"$procs" "$outexp" "$outgot" "$outout" "$outpid"
88
89	for i in $(seq 0 $((procs - 1)) )
90	do
91		pid=$(cat "$outpid.$i")
92
93		match_diff "$LOG.$pid" "$outout.$i"
94		match_diff "$outgot.$i" "$outexp.$i"
95	done
96}
97
98for err in '' ENOSYS 22 einval; do
99	for fault in writev desc,51; do
100		check_fault_injection \
101			writev $fault "$err" '' '' 1 -efault=chdir
102		check_fault_injection \
103			writev $fault "$err" '' '' 1 -efault=chdir -efault=none
104		for F in 1 2 3 5 7 11; do
105			check_fault_injection \
106				writev $fault "$err" $F '' 1
107			check_fault_injection \
108				writev $fault "$err" $F + 1
109			for S in 1 2 3 5 7 11; do
110				check_fault_injection \
111					writev $fault "$err" $F $S 1
112				check_fault_injection \
113					writev $fault "$err" $F $S 4
114			done
115		done
116	done
117done
118