]>
Commit | Line | Data |
---|---|---|
1 | #!/usr/bin/env bash | |
2 | # | |
3 | # Copyright (C) 2009 Red Hat, Inc. | |
4 | # Copyright (c) 2000-2006 Silicon Graphics, Inc. All Rights Reserved. | |
5 | # | |
6 | # This program is free software; you can redistribute it and/or modify | |
7 | # it under the terms of the GNU General Public License as published by | |
8 | # the Free Software Foundation; either version 2 of the License, or | |
9 | # (at your option) any later version. | |
10 | # | |
11 | # This program is distributed in the hope that it will be useful, | |
12 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | # GNU General Public License for more details. | |
15 | # | |
16 | # You should have received a copy of the GNU General Public License | |
17 | # along with this program. If not, see <http://www.gnu.org/licenses/>. | |
18 | # | |
19 | ||
20 | SED= | |
21 | for sed in sed gsed; do | |
22 | ($sed --version | grep 'GNU sed') > /dev/null 2>&1 | |
23 | if [ "$?" -eq 0 ]; then | |
24 | SED=$sed | |
25 | break | |
26 | fi | |
27 | done | |
28 | if [ -z "$SED" ]; then | |
29 | echo "$0: GNU sed not found" | |
30 | exit 1 | |
31 | fi | |
32 | ||
33 | dd() | |
34 | { | |
35 | if [ "$HOSTOS" == "Linux" ] | |
36 | then | |
37 | command dd --help | grep noxfer > /dev/null 2>&1 | |
38 | ||
39 | if [ "$?" -eq 0 ] | |
40 | then | |
41 | command dd status=noxfer $@ | |
42 | else | |
43 | command dd $@ | |
44 | fi | |
45 | else | |
46 | command dd $@ | |
47 | fi | |
48 | } | |
49 | ||
50 | # poke_file 'test.img' 512 '\xff\xfe' | |
51 | poke_file() | |
52 | { | |
53 | printf "$3" | dd "of=$1" bs=1 "seek=$2" conv=notrunc &>/dev/null | |
54 | } | |
55 | ||
56 | # poke_file_le $img_filename $offset $byte_width $value | |
57 | # Example: poke_file_le "$TEST_IMG" 512 2 65534 | |
58 | poke_file_le() | |
59 | { | |
60 | local img=$1 ofs=$2 len=$3 val=$4 str='' | |
61 | ||
62 | while ((len--)); do | |
63 | str+=$(printf '\\x%02x' $((val & 0xff))) | |
64 | val=$((val >> 8)) | |
65 | done | |
66 | ||
67 | poke_file "$img" "$ofs" "$str" | |
68 | } | |
69 | ||
70 | # poke_file_be $img_filename $offset $byte_width $value | |
71 | # Example: poke_file_be "$TEST_IMG" 512 2 65279 | |
72 | poke_file_be() | |
73 | { | |
74 | local img=$1 ofs=$2 len=$3 val=$4 | |
75 | local str=$(printf "%0$((len * 2))x\n" $val | sed 's/\(..\)/\\x\1/g') | |
76 | ||
77 | poke_file "$img" "$ofs" "$str" | |
78 | } | |
79 | ||
80 | # peek_file_le 'test.img' 512 2 => 65534 | |
81 | peek_file_le() | |
82 | { | |
83 | local val=0 shift=0 byte | |
84 | ||
85 | # coreutils' od --endian is not portable, so manually assemble bytes. | |
86 | for byte in $(od -j"$2" -N"$3" -An -v -tu1 "$1"); do | |
87 | val=$(( val | (byte << shift) )) | |
88 | shift=$((shift + 8)) | |
89 | done | |
90 | printf %llu $val | |
91 | } | |
92 | ||
93 | # peek_file_be 'test.img' 512 2 => 65279 | |
94 | peek_file_be() | |
95 | { | |
96 | local val=0 byte | |
97 | ||
98 | # coreutils' od --endian is not portable, so manually assemble bytes. | |
99 | for byte in $(od -j"$2" -N"$3" -An -v -tu1 "$1"); do | |
100 | val=$(( (val << 8) | byte )) | |
101 | done | |
102 | printf %llu $val | |
103 | } | |
104 | ||
105 | # peek_file_raw 'test.img' 512 2 => '\xff\xfe'. Do not use if the raw data | |
106 | # is likely to contain \0 or trailing \n. | |
107 | peek_file_raw() | |
108 | { | |
109 | dd if="$1" bs=1 skip="$2" count="$3" status=none | |
110 | } | |
111 | ||
112 | ||
113 | if ! . ./common.config | |
114 | then | |
115 | echo "$0: failed to source common.config" | |
116 | exit 1 | |
117 | fi | |
118 | ||
119 | # Set the variables to the empty string to turn Valgrind off | |
120 | # for specific processes, e.g. | |
121 | # $ VALGRIND_QEMU_IO= ./check -qcow2 -valgrind 015 | |
122 | ||
123 | : ${VALGRIND_QEMU_VM=$VALGRIND_QEMU} | |
124 | : ${VALGRIND_QEMU_IMG=$VALGRIND_QEMU} | |
125 | : ${VALGRIND_QEMU_IO=$VALGRIND_QEMU} | |
126 | : ${VALGRIND_QEMU_NBD=$VALGRIND_QEMU} | |
127 | ||
128 | # The Valgrind own parameters may be set with | |
129 | # its environment variable VALGRIND_OPTS, e.g. | |
130 | # $ VALGRIND_OPTS="--leak-check=yes" ./check -qcow2 -valgrind 015 | |
131 | ||
132 | _qemu_proc_exec() | |
133 | { | |
134 | local VALGRIND_LOGFILE="$1" | |
135 | shift | |
136 | if [[ "${VALGRIND_QEMU}" == "y" && "${NO_VALGRIND}" != "y" ]]; then | |
137 | exec valgrind --log-file="${VALGRIND_LOGFILE}" --error-exitcode=99 "$@" | |
138 | else | |
139 | exec "$@" | |
140 | fi | |
141 | } | |
142 | ||
143 | _qemu_proc_valgrind_log() | |
144 | { | |
145 | local VALGRIND_LOGFILE="$1" | |
146 | local RETVAL="$2" | |
147 | if [[ "${VALGRIND_QEMU}" == "y" && "${NO_VALGRIND}" != "y" ]]; then | |
148 | if [ $RETVAL == 99 ]; then | |
149 | cat "${VALGRIND_LOGFILE}" | |
150 | fi | |
151 | rm -f "${VALGRIND_LOGFILE}" | |
152 | fi | |
153 | } | |
154 | ||
155 | _qemu_wrapper() | |
156 | { | |
157 | local VALGRIND_LOGFILE="${TEST_DIR}"/$$.valgrind | |
158 | ( | |
159 | if [ -n "${QEMU_NEED_PID}" ]; then | |
160 | echo $BASHPID > "${QEMU_TEST_DIR}/qemu-${_QEMU_HANDLE}.pid" | |
161 | fi | |
162 | VALGRIND_QEMU="${VALGRIND_QEMU_VM}" _qemu_proc_exec "${VALGRIND_LOGFILE}" \ | |
163 | "$QEMU_PROG" $QEMU_OPTIONS "$@" | |
164 | ) | |
165 | RETVAL=$? | |
166 | _qemu_proc_valgrind_log "${VALGRIND_LOGFILE}" $RETVAL | |
167 | return $RETVAL | |
168 | } | |
169 | ||
170 | _qemu_img_wrapper() | |
171 | { | |
172 | local VALGRIND_LOGFILE="${TEST_DIR}"/$$.valgrind | |
173 | ( | |
174 | VALGRIND_QEMU="${VALGRIND_QEMU_IMG}" _qemu_proc_exec "${VALGRIND_LOGFILE}" \ | |
175 | "$QEMU_IMG_PROG" $QEMU_IMG_OPTIONS "$@" | |
176 | ) | |
177 | RETVAL=$? | |
178 | _qemu_proc_valgrind_log "${VALGRIND_LOGFILE}" $RETVAL | |
179 | return $RETVAL | |
180 | } | |
181 | ||
182 | _qemu_io_wrapper() | |
183 | { | |
184 | local VALGRIND_LOGFILE="${TEST_DIR}"/$$.valgrind | |
185 | local QEMU_IO_ARGS="$QEMU_IO_OPTIONS" | |
186 | if [ "$IMGOPTSSYNTAX" = "true" ]; then | |
187 | QEMU_IO_ARGS="--image-opts $QEMU_IO_ARGS" | |
188 | if [ -n "$IMGKEYSECRET" ]; then | |
189 | QEMU_IO_ARGS="--object secret,id=keysec0,data=$IMGKEYSECRET $QEMU_IO_ARGS" | |
190 | fi | |
191 | fi | |
192 | ( | |
193 | VALGRIND_QEMU="${VALGRIND_QEMU_IO}" _qemu_proc_exec "${VALGRIND_LOGFILE}" \ | |
194 | "$QEMU_IO_PROG" $QEMU_IO_ARGS "$@" | |
195 | ) | |
196 | RETVAL=$? | |
197 | _qemu_proc_valgrind_log "${VALGRIND_LOGFILE}" $RETVAL | |
198 | return $RETVAL | |
199 | } | |
200 | ||
201 | _qemu_nbd_wrapper() | |
202 | { | |
203 | local VALGRIND_LOGFILE="${TEST_DIR}"/$$.valgrind | |
204 | ( | |
205 | VALGRIND_QEMU="${VALGRIND_QEMU_NBD}" _qemu_proc_exec "${VALGRIND_LOGFILE}" \ | |
206 | "$QEMU_NBD_PROG" --pid-file="${QEMU_TEST_DIR}/qemu-nbd.pid" \ | |
207 | $QEMU_NBD_OPTIONS "$@" | |
208 | ) | |
209 | RETVAL=$? | |
210 | _qemu_proc_valgrind_log "${VALGRIND_LOGFILE}" $RETVAL | |
211 | return $RETVAL | |
212 | } | |
213 | ||
214 | # Valgrind bug #409141 https://bugs.kde.org/show_bug.cgi?id=409141 | |
215 | # Until valgrind 3.16+ is ubiquitous, we must work around a hang in | |
216 | # valgrind when issuing sigkill. Disable valgrind for this invocation. | |
217 | _NO_VALGRIND() | |
218 | { | |
219 | NO_VALGRIND="y" "$@" | |
220 | } | |
221 | ||
222 | export QEMU=_qemu_wrapper | |
223 | export QEMU_IMG=_qemu_img_wrapper | |
224 | export QEMU_IO=_qemu_io_wrapper | |
225 | export QEMU_NBD=_qemu_nbd_wrapper | |
226 | ||
227 | if [ "$IMGOPTSSYNTAX" = "true" ]; then | |
228 | DRIVER="driver=$IMGFMT" | |
229 | QEMU_IMG_EXTRA_ARGS="--image-opts $QEMU_IMG_EXTRA_ARGS" | |
230 | if [ -n "$IMGKEYSECRET" ]; then | |
231 | QEMU_IMG_EXTRA_ARGS="--object secret,id=keysec0,data=$IMGKEYSECRET $QEMU_IMG_EXTRA_ARGS" | |
232 | fi | |
233 | if [ "$IMGFMT" = "luks" ]; then | |
234 | DRIVER="$DRIVER,key-secret=keysec0" | |
235 | fi | |
236 | if [ "$IMGPROTO" = "file" ]; then | |
237 | TEST_IMG_FILE=$TEST_DIR/t.$IMGFMT | |
238 | TEST_IMG="$DRIVER,file.filename=$TEST_DIR/t.$IMGFMT" | |
239 | elif [ "$IMGPROTO" = "nbd" ]; then | |
240 | TEST_IMG_FILE=$TEST_DIR/t.$IMGFMT | |
241 | TEST_IMG="$DRIVER,file.driver=nbd,file.type=unix" | |
242 | TEST_IMG="$TEST_IMG,file.path=$SOCK_DIR/nbd" | |
243 | elif [ "$IMGPROTO" = "ssh" ]; then | |
244 | TEST_IMG_FILE=$TEST_DIR/t.$IMGFMT | |
245 | TEST_IMG="$DRIVER,file.driver=ssh,file.host=127.0.0.1,file.path=$TEST_IMG_FILE" | |
246 | elif [ "$IMGPROTO" = "nfs" ]; then | |
247 | TEST_DIR="$DRIVER,file.driver=nfs,file.filename=nfs://127.0.0.1/$TEST_DIR" | |
248 | TEST_IMG=$TEST_DIR/t.$IMGFMT | |
249 | else | |
250 | TEST_IMG="$DRIVER,file.driver=$IMGPROTO,file.filename=$TEST_DIR/t.$IMGFMT" | |
251 | fi | |
252 | else | |
253 | QEMU_IMG_EXTRA_ARGS= | |
254 | if [ "$IMGPROTO" = "file" ]; then | |
255 | TEST_IMG=$TEST_DIR/t.$IMGFMT | |
256 | elif [ "$IMGPROTO" = "nbd" ]; then | |
257 | TEST_IMG_FILE=$TEST_DIR/t.$IMGFMT | |
258 | TEST_IMG="nbd+unix:///?socket=$SOCK_DIR/nbd" | |
259 | elif [ "$IMGPROTO" = "ssh" ]; then | |
260 | TEST_IMG_FILE=$TEST_DIR/t.$IMGFMT | |
261 | REMOTE_TEST_DIR="ssh://\\($USER@\\)\\?127.0.0.1\\(:[0-9]\\+\\)\\?$TEST_DIR" | |
262 | TEST_IMG="ssh://127.0.0.1$TEST_IMG_FILE" | |
263 | elif [ "$IMGPROTO" = "nfs" ]; then | |
264 | TEST_IMG_FILE=$TEST_DIR/t.$IMGFMT | |
265 | REMOTE_TEST_DIR="nfs://127.0.0.1$TEST_DIR" | |
266 | TEST_IMG="nfs://127.0.0.1$TEST_IMG_FILE" | |
267 | else | |
268 | TEST_IMG=$IMGPROTO:$TEST_DIR/t.$IMGFMT | |
269 | fi | |
270 | fi | |
271 | ORIG_TEST_IMG="$TEST_IMG" | |
272 | ||
273 | if [ -z "$TEST_DIR" ]; then | |
274 | TEST_DIR=$PWD/scratch | |
275 | fi | |
276 | ||
277 | QEMU_TEST_DIR="${TEST_DIR}" | |
278 | ||
279 | if [ ! -e "$TEST_DIR" ]; then | |
280 | mkdir "$TEST_DIR" | |
281 | fi | |
282 | ||
283 | if [ ! -d "$TEST_DIR" ]; then | |
284 | echo "common.rc: Error: \$TEST_DIR ($TEST_DIR) is not a directory" | |
285 | exit 1 | |
286 | fi | |
287 | ||
288 | if [ -z "$REMOTE_TEST_DIR" ]; then | |
289 | REMOTE_TEST_DIR="$TEST_DIR" | |
290 | fi | |
291 | ||
292 | if [ ! -d "$SAMPLE_IMG_DIR" ]; then | |
293 | echo "common.rc: Error: \$SAMPLE_IMG_DIR ($SAMPLE_IMG_DIR) is not a directory" | |
294 | exit 1 | |
295 | fi | |
296 | ||
297 | _use_sample_img() | |
298 | { | |
299 | SAMPLE_IMG_FILE="${1%\.bz2}" | |
300 | TEST_IMG="$TEST_DIR/$SAMPLE_IMG_FILE" | |
301 | bzcat "$SAMPLE_IMG_DIR/$1" > "$TEST_IMG" | |
302 | if [ $? -ne 0 ] | |
303 | then | |
304 | echo "_use_sample_img error, cannot extract '$SAMPLE_IMG_DIR/$1'" | |
305 | exit 1 | |
306 | fi | |
307 | } | |
308 | ||
309 | _stop_nbd_server() | |
310 | { | |
311 | if [ -f "${QEMU_TEST_DIR}/qemu-nbd.pid" ]; then | |
312 | local QEMU_NBD_PID | |
313 | read QEMU_NBD_PID < "${QEMU_TEST_DIR}/qemu-nbd.pid" | |
314 | kill ${QEMU_NBD_PID} | |
315 | rm -f "${QEMU_TEST_DIR}/qemu-nbd.pid" "$SOCK_DIR/nbd" | |
316 | fi | |
317 | } | |
318 | ||
319 | # Gets the data_file value from IMGOPTS and replaces the '$TEST_IMG' | |
320 | # pattern by '$1' | |
321 | # Caution: The replacement is done with sed, so $1 must be escaped | |
322 | # properly. (The delimiter is '#'.) | |
323 | _get_data_file() | |
324 | { | |
325 | if ! echo "$IMGOPTS" | grep -q 'data_file='; then | |
326 | return 1 | |
327 | fi | |
328 | ||
329 | echo "$IMGOPTS" | sed -e 's/.*data_file=\([^,]*\).*/\1/' \ | |
330 | | sed -e "s#\\\$TEST_IMG#$1#" | |
331 | } | |
332 | ||
333 | _make_test_img() | |
334 | { | |
335 | # extra qemu-img options can be added by tests | |
336 | # at least one argument (the image size) needs to be added | |
337 | local extra_img_options="" | |
338 | local optstr="" | |
339 | local img_name="" | |
340 | local use_backing=0 | |
341 | local backing_file="" | |
342 | local object_options="" | |
343 | local opts_param=false | |
344 | local misc_params=() | |
345 | ||
346 | if [ -n "$TEST_IMG_FILE" ]; then | |
347 | img_name=$TEST_IMG_FILE | |
348 | else | |
349 | img_name=$TEST_IMG | |
350 | fi | |
351 | ||
352 | if [ -n "$IMGOPTS" ]; then | |
353 | imgopts_expanded=$(echo "$IMGOPTS" | sed -e "s#\\\$TEST_IMG#$img_name#") | |
354 | optstr=$(_optstr_add "$optstr" "$imgopts_expanded") | |
355 | fi | |
356 | if [ -n "$IMGKEYSECRET" ]; then | |
357 | object_options="--object secret,id=keysec0,data=$IMGKEYSECRET" | |
358 | optstr=$(_optstr_add "$optstr" "key-secret=keysec0") | |
359 | fi | |
360 | ||
361 | for param; do | |
362 | if [ "$use_backing" = "1" -a -z "$backing_file" ]; then | |
363 | backing_file=$param | |
364 | continue | |
365 | elif $opts_param; then | |
366 | optstr=$(_optstr_add "$optstr" "$param") | |
367 | opts_param=false | |
368 | continue | |
369 | fi | |
370 | ||
371 | case "$param" in | |
372 | -b) | |
373 | use_backing=1 | |
374 | ;; | |
375 | ||
376 | -o) | |
377 | opts_param=true | |
378 | ;; | |
379 | ||
380 | --no-opts) | |
381 | optstr="" | |
382 | ;; | |
383 | ||
384 | *) | |
385 | misc_params=("${misc_params[@]}" "$param") | |
386 | ;; | |
387 | esac | |
388 | done | |
389 | ||
390 | if [ \( "$IMGFMT" = "qcow2" -o "$IMGFMT" = "qed" \) -a -n "$CLUSTER_SIZE" ]; then | |
391 | optstr=$(_optstr_add "$optstr" "cluster_size=$CLUSTER_SIZE") | |
392 | fi | |
393 | ||
394 | if [ -n "$optstr" ]; then | |
395 | extra_img_options="-o $optstr $extra_img_options" | |
396 | fi | |
397 | ||
398 | if [ $IMGPROTO = "nbd" ]; then | |
399 | _stop_nbd_server | |
400 | fi | |
401 | ||
402 | # XXX(hch): have global image options? | |
403 | ( | |
404 | if [ $use_backing = 1 ]; then | |
405 | $QEMU_IMG create $object_options -f $IMGFMT $extra_img_options -b "$backing_file" "$img_name" "${misc_params[@]}" 2>&1 | |
406 | else | |
407 | $QEMU_IMG create $object_options -f $IMGFMT $extra_img_options "$img_name" "${misc_params[@]}" 2>&1 | |
408 | fi | |
409 | ) | _filter_img_create | |
410 | ||
411 | # Start an NBD server on the image file, which is what we'll be talking to. | |
412 | # Once NBD gains resize support, we may also want to use -f raw at the | |
413 | # server and interpret format over NBD, but for now, the format is | |
414 | # interpreted at the server and raw data sent over NBD. | |
415 | if [ $IMGPROTO = "nbd" ]; then | |
416 | # Pass a sufficiently high number to -e that should be enough for all | |
417 | # tests | |
418 | eval "$QEMU_NBD -v -t -k '$SOCK_DIR/nbd' -f $IMGFMT -e 42 -x '' $TEST_IMG_FILE >/dev/null &" | |
419 | sleep 1 # FIXME: qemu-nbd needs to be listening before we continue | |
420 | fi | |
421 | } | |
422 | ||
423 | _rm_test_img() | |
424 | { | |
425 | local img=$1 | |
426 | if [ "$IMGFMT" = "vmdk" ]; then | |
427 | # Remove all the extents for vmdk | |
428 | "$QEMU_IMG" info "$img" 2>/dev/null | grep 'filename:' | cut -f 2 -d: \ | |
429 | | xargs -I {} rm -f "{}" | |
430 | elif [ "$IMGFMT" = "qcow2" ]; then | |
431 | # Remove external data file | |
432 | if data_file=$(_get_data_file "$img"); then | |
433 | rm -f "$data_file" | |
434 | fi | |
435 | fi | |
436 | rm -f "$img" | |
437 | } | |
438 | ||
439 | _cleanup_test_img() | |
440 | { | |
441 | case "$IMGPROTO" in | |
442 | ||
443 | nbd) | |
444 | _stop_nbd_server | |
445 | rm -f "$TEST_IMG_FILE" | |
446 | ;; | |
447 | ||
448 | file) | |
449 | _rm_test_img "$TEST_DIR/t.$IMGFMT" | |
450 | _rm_test_img "$TEST_DIR/t.$IMGFMT.orig" | |
451 | _rm_test_img "$TEST_DIR/t.$IMGFMT.base" | |
452 | if [ -n "$SAMPLE_IMG_FILE" ] | |
453 | then | |
454 | rm -f "$TEST_DIR/$SAMPLE_IMG_FILE" | |
455 | SAMPLE_IMG_FILE= | |
456 | TEST_IMG="$ORIG_TEST_IMG" | |
457 | fi | |
458 | ;; | |
459 | ||
460 | rbd) | |
461 | rbd --no-progress rm "$TEST_DIR/t.$IMGFMT" > /dev/null | |
462 | ;; | |
463 | ||
464 | sheepdog) | |
465 | collie vdi delete "$TEST_DIR/t.$IMGFMT" | |
466 | ;; | |
467 | ||
468 | esac | |
469 | } | |
470 | ||
471 | _check_test_img() | |
472 | { | |
473 | ( | |
474 | if [ "$IMGOPTSSYNTAX" = "true" ]; then | |
475 | $QEMU_IMG check $QEMU_IMG_EXTRA_ARGS "$@" "$TEST_IMG" 2>&1 | |
476 | else | |
477 | $QEMU_IMG check "$@" -f $IMGFMT "$TEST_IMG" 2>&1 | |
478 | fi | |
479 | ) | _filter_testdir | _filter_qemu_img_check | |
480 | ||
481 | # return real qemu_img check status, to analyze in | |
482 | # _check_test_img_ignore_leaks | |
483 | return ${PIPESTATUS[0]} | |
484 | } | |
485 | ||
486 | _check_test_img_ignore_leaks() | |
487 | { | |
488 | out=$(_check_test_img "$@") | |
489 | status=$? | |
490 | if [ $status = 3 ]; then | |
491 | # This must correspond to success output in dump_human_image_check() | |
492 | echo "No errors were found on the image." | |
493 | return 0 | |
494 | fi | |
495 | echo "$out" | |
496 | return $status | |
497 | } | |
498 | ||
499 | _img_info() | |
500 | { | |
501 | if [[ "$1" == "--format-specific" ]]; then | |
502 | local format_specific=1 | |
503 | shift | |
504 | else | |
505 | local format_specific=0 | |
506 | fi | |
507 | ||
508 | discard=0 | |
509 | regex_json_spec_start='^ *"format-specific": \{' | |
510 | $QEMU_IMG info $QEMU_IMG_EXTRA_ARGS "$@" "$TEST_IMG" 2>&1 | \ | |
511 | sed -e "s#$REMOTE_TEST_DIR#TEST_DIR#g" \ | |
512 | -e "s#$IMGPROTO:$TEST_DIR#TEST_DIR#g" \ | |
513 | -e "s#$TEST_DIR#TEST_DIR#g" \ | |
514 | -e "s#$IMGFMT#IMGFMT#g" \ | |
515 | -e "/^disk size:/ D" \ | |
516 | -e "/actual-size/ D" | \ | |
517 | while IFS='' read -r line; do | |
518 | if [[ $format_specific == 1 ]]; then | |
519 | discard=0 | |
520 | elif [[ $line == "Format specific information:" ]]; then | |
521 | discard=1 | |
522 | elif [[ $line =~ $regex_json_spec_start ]]; then | |
523 | discard=2 | |
524 | regex_json_spec_end="^${line%%[^ ]*}\\},? *$" | |
525 | fi | |
526 | if [[ $discard == 0 ]]; then | |
527 | echo "$line" | |
528 | elif [[ $discard == 1 && ! $line ]]; then | |
529 | echo | |
530 | discard=0 | |
531 | elif [[ $discard == 2 && $line =~ $regex_json_spec_end ]]; then | |
532 | discard=0 | |
533 | fi | |
534 | done | |
535 | } | |
536 | ||
537 | # bail out, setting up .notrun file | |
538 | # | |
539 | _notrun() | |
540 | { | |
541 | echo "$*" >"$OUTPUT_DIR/$seq.notrun" | |
542 | echo "$seq not run: $*" | |
543 | status=0 | |
544 | exit | |
545 | } | |
546 | ||
547 | # bail out, setting up .casenotrun file | |
548 | # The function _casenotrun() is used as a notifier. It is the | |
549 | # caller's responsibility to make skipped a particular test. | |
550 | # | |
551 | _casenotrun() | |
552 | { | |
553 | echo " [case not run] $*" >>"$OUTPUT_DIR/$seq.casenotrun" | |
554 | } | |
555 | ||
556 | # just plain bail out | |
557 | # | |
558 | _fail() | |
559 | { | |
560 | echo "$*" | tee -a "$OUTPUT_DIR/$seq.full" | |
561 | echo "(see $seq.full for details)" | |
562 | status=1 | |
563 | exit 1 | |
564 | } | |
565 | ||
566 | # tests whether $IMGFMT is one of the supported image formats for a test | |
567 | # | |
568 | _supported_fmt() | |
569 | { | |
570 | # "generic" is suitable for most image formats. For some formats it doesn't | |
571 | # work, however (most notably read-only formats), so they can opt out by | |
572 | # setting IMGFMT_GENERIC to false. | |
573 | for f; do | |
574 | if [ "$f" = "$IMGFMT" -o "$f" = "generic" -a "$IMGFMT_GENERIC" = "true" ]; then | |
575 | if [ "$IMGFMT" = "luks" ]; then | |
576 | _require_working_luks | |
577 | fi | |
578 | return | |
579 | fi | |
580 | done | |
581 | ||
582 | _notrun "not suitable for this image format: $IMGFMT" | |
583 | } | |
584 | ||
585 | # tests whether $IMGFMT is one of the unsupported image format for a test | |
586 | # | |
587 | _unsupported_fmt() | |
588 | { | |
589 | for f; do | |
590 | if [ "$f" = "$IMGFMT" ]; then | |
591 | _notrun "not suitable for this image format: $IMGFMT" | |
592 | fi | |
593 | done | |
594 | } | |
595 | ||
596 | # tests whether $IMGPROTO is one of the supported image protocols for a test | |
597 | # | |
598 | _supported_proto() | |
599 | { | |
600 | for f; do | |
601 | if [ "$f" = "$IMGPROTO" -o "$f" = "generic" ]; then | |
602 | return | |
603 | fi | |
604 | done | |
605 | ||
606 | _notrun "not suitable for this image protocol: $IMGPROTO" | |
607 | } | |
608 | ||
609 | # tests whether $IMGPROTO is specified as an unsupported image protocol for a test | |
610 | # | |
611 | _unsupported_proto() | |
612 | { | |
613 | for f; do | |
614 | if [ "$f" = "$IMGPROTO" ]; then | |
615 | _notrun "not suitable for this image protocol: $IMGPROTO" | |
616 | return | |
617 | fi | |
618 | done | |
619 | } | |
620 | ||
621 | # tests whether the host OS is one of the supported OSes for a test | |
622 | # | |
623 | _supported_os() | |
624 | { | |
625 | for h | |
626 | do | |
627 | if [ "$h" = "$HOSTOS" ] | |
628 | then | |
629 | return | |
630 | fi | |
631 | done | |
632 | ||
633 | _notrun "not suitable for this OS: $HOSTOS" | |
634 | } | |
635 | ||
636 | _supported_cache_modes() | |
637 | { | |
638 | for mode; do | |
639 | if [ "$mode" = "$CACHEMODE" ]; then | |
640 | return | |
641 | fi | |
642 | done | |
643 | _notrun "not suitable for cache mode: $CACHEMODE" | |
644 | } | |
645 | ||
646 | # Check whether the filesystem supports O_DIRECT | |
647 | _check_o_direct() | |
648 | { | |
649 | $QEMU_IMG create -f raw "$TEST_IMG".test_o_direct 1M > /dev/null | |
650 | out=$($QEMU_IO -f raw -t none -c quit "$TEST_IMG".test_o_direct 2>&1) | |
651 | rm -f "$TEST_IMG".test_o_direct | |
652 | ||
653 | [[ "$out" != *"O_DIRECT"* ]] | |
654 | } | |
655 | ||
656 | _require_o_direct() | |
657 | { | |
658 | if ! _check_o_direct; then | |
659 | _notrun "file system on $TEST_DIR does not support O_DIRECT" | |
660 | fi | |
661 | } | |
662 | ||
663 | _check_cache_mode() | |
664 | { | |
665 | if [ $CACHEMODE == "none" ] || [ $CACHEMODE == "directsync" ]; then | |
666 | _require_o_direct | |
667 | fi | |
668 | } | |
669 | ||
670 | _check_cache_mode | |
671 | ||
672 | # $1 - cache mode to use by default | |
673 | # $2 - (optional) cache mode to use by default if O_DIRECT is not supported | |
674 | _default_cache_mode() | |
675 | { | |
676 | if $CACHEMODE_IS_DEFAULT; then | |
677 | if [ -z "$2" ] || _check_o_direct; then | |
678 | CACHEMODE="$1" | |
679 | else | |
680 | CACHEMODE="$2" | |
681 | fi | |
682 | QEMU_IO="$QEMU_IO --cache $CACHEMODE" | |
683 | _check_cache_mode | |
684 | return | |
685 | fi | |
686 | } | |
687 | _supported_aio_modes() | |
688 | { | |
689 | for mode; do | |
690 | if [ "$mode" = "$AIOMODE" ]; then | |
691 | return | |
692 | fi | |
693 | done | |
694 | _notrun "not suitable for aio mode: $AIOMODE" | |
695 | } | |
696 | _default_aio_mode() | |
697 | { | |
698 | AIOMODE="$1" | |
699 | QEMU_IO="$QEMU_IO --aio $1" | |
700 | } | |
701 | ||
702 | _unsupported_imgopts() | |
703 | { | |
704 | for bad_opt | |
705 | do | |
706 | if echo "$IMGOPTS" | grep -q 2>/dev/null "$bad_opt" | |
707 | then | |
708 | _notrun "not suitable for image option: $bad_opt" | |
709 | fi | |
710 | done | |
711 | } | |
712 | ||
713 | # Caution: Overwrites $TEST_DIR/t.luks | |
714 | _require_working_luks() | |
715 | { | |
716 | file="$TEST_DIR/t.luks" | |
717 | ||
718 | output=$( | |
719 | $QEMU_IMG create -f luks \ | |
720 | --object secret,id=sec0,data=hunter0 \ | |
721 | -o key-secret=sec0 \ | |
722 | -o iter-time=10 \ | |
723 | "$file" \ | |
724 | 1M \ | |
725 | 2>&1 | |
726 | ) | |
727 | status=$? | |
728 | ||
729 | IMGFMT='luks' _rm_test_img "$file" | |
730 | ||
731 | if [ $status != 0 ]; then | |
732 | reason=$(echo "$output" | grep "$file:" | $SED -e "s#.*$file: *##") | |
733 | if [ -z "$reason" ]; then | |
734 | reason="Failed to create a LUKS image" | |
735 | fi | |
736 | _notrun "$reason" | |
737 | fi | |
738 | } | |
739 | ||
740 | # this test requires that a specified command (executable) exists | |
741 | # | |
742 | _require_command() | |
743 | { | |
744 | if [ "$1" = "QEMU" ]; then | |
745 | c=$QEMU_PROG | |
746 | elif [ "$1" = "QEMU_IMG" ]; then | |
747 | c=$QEMU_IMG_PROG | |
748 | elif [ "$1" = "QEMU_IO" ]; then | |
749 | c=$QEMU_IO_PROG | |
750 | elif [ "$1" = "QEMU_NBD" ]; then | |
751 | c=$QEMU_NBD_PROG | |
752 | else | |
753 | eval c=\$$1 | |
754 | fi | |
755 | [ -x "$c" ] || _notrun "$1 utility required, skipped this test" | |
756 | } | |
757 | ||
758 | # Check that a set of drivers has been whitelisted in the QEMU binary | |
759 | # | |
760 | _require_drivers() | |
761 | { | |
762 | available=$($QEMU -drive format=help | \ | |
763 | sed -e '/Supported formats:/!d' -e 's/Supported formats://') | |
764 | for driver | |
765 | do | |
766 | if ! echo "$available" | grep -q " $driver\( \|$\)"; then | |
767 | _notrun "$driver not available" | |
768 | fi | |
769 | done | |
770 | } | |
771 | ||
772 | # Check that we have a file system that allows huge (but very sparse) files | |
773 | # | |
774 | _require_large_file() | |
775 | { | |
776 | if ! truncate --size="$1" "$TEST_IMG"; then | |
777 | _notrun "file system on $TEST_DIR does not support large enough files" | |
778 | fi | |
779 | rm "$TEST_IMG" | |
780 | } | |
781 | ||
782 | # Check that a set of devices is available in the QEMU binary | |
783 | # | |
784 | _require_devices() | |
785 | { | |
786 | available=$($QEMU -M none -device help | \ | |
787 | grep ^name | sed -e 's/^name "//' -e 's/".*$//') | |
788 | for device | |
789 | do | |
790 | if ! echo "$available" | grep -q "$device" ; then | |
791 | _notrun "$device not available" | |
792 | fi | |
793 | done | |
794 | } | |
795 | ||
796 | # make sure this script returns success | |
797 | true |