e6439d783c
Show how many clusters are compressed. This can be used to monitor how many compressed clusters remain and whether to recompress the image. Suggested-by: Cole Robinson <crobinso@redhat.com> Signed-off-by: Stefan Hajnoczi <stefanha@redhat.com>
401 lines
8.8 KiB
Bash
401 lines
8.8 KiB
Bash
#!/bin/bash
|
|
#
|
|
# Copyright (C) 2009 Red Hat, Inc.
|
|
# Copyright (c) 2000-2006 Silicon Graphics, Inc. All Rights Reserved.
|
|
#
|
|
# This program is free software; you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 2 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# This program is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
#
|
|
|
|
dd()
|
|
{
|
|
if [ "$HOSTOS" == "Linux" ]
|
|
then
|
|
command dd --help | grep noxfer > /dev/null 2>&1
|
|
|
|
if [ "$?" -eq 0 ]
|
|
then
|
|
command dd status=noxfer $@
|
|
else
|
|
command dd $@
|
|
fi
|
|
else
|
|
command dd $@
|
|
fi
|
|
}
|
|
|
|
# we need common.config
|
|
if [ "$iam" != "check" ]
|
|
then
|
|
if ! . ./common.config
|
|
then
|
|
echo "$iam: failed to source common.config"
|
|
exit 1
|
|
fi
|
|
fi
|
|
|
|
# make sure we have a standard umask
|
|
umask 022
|
|
|
|
if [ "$IMGPROTO" = "file" ]; then
|
|
TEST_IMG=$TEST_DIR/t.$IMGFMT
|
|
elif [ "$IMGPROTO" = "nbd" ]; then
|
|
TEST_IMG_FILE=$TEST_DIR/t.$IMGFMT
|
|
TEST_IMG="nbd:127.0.0.1:10810"
|
|
else
|
|
TEST_IMG=$IMGPROTO:$TEST_DIR/t.$IMGFMT
|
|
fi
|
|
|
|
function valgrind_qemu_io()
|
|
{
|
|
valgrind --log-file=/tmp/$$.valgrind --error-exitcode=99 $REAL_QEMU_IO "$@"
|
|
if [ $? != 0 ]; then
|
|
cat /tmp/$$.valgrind
|
|
fi
|
|
rm -f /tmp/$$.valgrind
|
|
}
|
|
|
|
|
|
_optstr_add()
|
|
{
|
|
if [ -n "$1" ]; then
|
|
echo "$1,$2"
|
|
else
|
|
echo "$2"
|
|
fi
|
|
}
|
|
|
|
_set_default_imgopts()
|
|
{
|
|
if [ "$IMGFMT" == "qcow2" ] && ! (echo "$IMGOPTS" | grep "compat=" > /dev/null); then
|
|
IMGOPTS=$(_optstr_add "$IMGOPTS" "compat=1.1")
|
|
fi
|
|
}
|
|
|
|
_make_test_img()
|
|
{
|
|
# extra qemu-img options can be added by tests
|
|
# at least one argument (the image size) needs to be added
|
|
local extra_img_options=""
|
|
local image_size=$*
|
|
local optstr=""
|
|
local img_name=""
|
|
|
|
if [ -n "$TEST_IMG_FILE" ]; then
|
|
img_name=$TEST_IMG_FILE
|
|
else
|
|
img_name=$TEST_IMG
|
|
fi
|
|
|
|
if [ -n "$IMGOPTS" ]; then
|
|
optstr=$(_optstr_add "$optstr" "$IMGOPTS")
|
|
fi
|
|
|
|
if [ "$1" = "-b" ]; then
|
|
extra_img_options="$1 $2"
|
|
image_size=$3
|
|
fi
|
|
if [ \( "$IMGFMT" = "qcow2" -o "$IMGFMT" = "qed" \) -a -n "$CLUSTER_SIZE" ]; then
|
|
optstr=$(_optstr_add "$optstr" "cluster_size=$CLUSTER_SIZE")
|
|
fi
|
|
|
|
if [ -n "$optstr" ]; then
|
|
extra_img_options="-o $optstr $extra_img_options"
|
|
fi
|
|
|
|
# XXX(hch): have global image options?
|
|
$QEMU_IMG create -f $IMGFMT $extra_img_options $img_name $image_size | \
|
|
sed -e "s#$IMGPROTO:$TEST_DIR#TEST_DIR#g" \
|
|
-e "s#$TEST_DIR#TEST_DIR#g" \
|
|
-e "s#$IMGFMT#IMGFMT#g" \
|
|
-e "s# encryption=off##g" \
|
|
-e "s# cluster_size=[0-9]\\+##g" \
|
|
-e "s# table_size=[0-9]\\+##g" \
|
|
-e "s# compat='[^']*'##g" \
|
|
-e "s# compat6=\\(on\\|off\\)##g" \
|
|
-e "s# static=\\(on\\|off\\)##g" \
|
|
-e "s# lazy_refcounts=\\(on\\|off\\)##g"
|
|
|
|
# Start an NBD server on the image file, which is what we'll be talking to
|
|
if [ $IMGPROTO = "nbd" ]; then
|
|
eval "$QEMU_NBD -v -t -b 127.0.0.1 -p 10810 $TEST_IMG_FILE &"
|
|
QEMU_NBD_PID=$!
|
|
sleep 1 # FIXME: qemu-nbd needs to be listening before we continue
|
|
fi
|
|
}
|
|
|
|
_cleanup_test_img()
|
|
{
|
|
case "$IMGPROTO" in
|
|
|
|
nbd)
|
|
kill $QEMU_NBD_PID
|
|
rm -f $TEST_IMG_FILE
|
|
;;
|
|
file)
|
|
rm -f $TEST_DIR/t.$IMGFMT
|
|
rm -f $TEST_DIR/t.$IMGFMT.orig
|
|
rm -f $TEST_DIR/t.$IMGFMT.base
|
|
;;
|
|
|
|
rbd)
|
|
rbd rm $TEST_DIR/t.$IMGFMT > /dev/null
|
|
;;
|
|
|
|
sheepdog)
|
|
collie vdi delete $TEST_DIR/t.$IMGFMT
|
|
;;
|
|
|
|
esac
|
|
}
|
|
|
|
_check_test_img()
|
|
{
|
|
$QEMU_IMG check "$@" -f $IMGFMT $TEST_IMG 2>&1 | \
|
|
sed -e '/allocated.*fragmented.*compressed clusters/d' \
|
|
-e 's/qemu-img: This image format does not support checks/No errors were found on the image./' \
|
|
-e '/Image end offset: [0-9]\+/d'
|
|
}
|
|
|
|
_img_info()
|
|
{
|
|
$QEMU_IMG info "$@" $TEST_IMG 2>&1 | \
|
|
sed -e "s#$IMGPROTO:$TEST_DIR#TEST_DIR#g" \
|
|
-e "s#$TEST_DIR#TEST_DIR#g" \
|
|
-e "s#$IMGFMT#IMGFMT#g" \
|
|
-e "/^disk size:/ D" \
|
|
-e "/actual-size/ D"
|
|
}
|
|
|
|
_get_pids_by_name()
|
|
{
|
|
if [ $# -ne 1 ]
|
|
then
|
|
echo "Usage: _get_pids_by_name process-name" 1>&2
|
|
exit 1
|
|
fi
|
|
|
|
# Algorithm ... all ps(1) variants have a time of the form MM:SS or
|
|
# HH:MM:SS before the psargs field, use this as the search anchor.
|
|
#
|
|
# Matches with $1 (process-name) occur if the first psarg is $1
|
|
# or ends in /$1 ... the matching uses sed's regular expressions,
|
|
# so passing a regex into $1 will work.
|
|
|
|
ps $PS_ALL_FLAGS \
|
|
| sed -n \
|
|
-e 's/$/ /' \
|
|
-e 's/[ ][ ]*/ /g' \
|
|
-e 's/^ //' \
|
|
-e 's/^[^ ]* //' \
|
|
-e "/[0-9]:[0-9][0-9] *[^ ]*\/$1 /s/ .*//p" \
|
|
-e "/[0-9]:[0-9][0-9] *$1 /s/ .*//p"
|
|
}
|
|
|
|
# fqdn for localhost
|
|
#
|
|
_get_fqdn()
|
|
{
|
|
host=`hostname`
|
|
$NSLOOKUP_PROG $host | $AWK_PROG '{ if ($1 == "Name:") print $2 }'
|
|
}
|
|
|
|
# check if run as root
|
|
#
|
|
_need_to_be_root()
|
|
{
|
|
id=`id | $SED_PROG -e 's/(.*//' -e 's/.*=//'`
|
|
if [ "$id" -ne 0 ]
|
|
then
|
|
echo "Arrgh ... you need to be root (not uid=$id) to run this test"
|
|
exit 1
|
|
fi
|
|
}
|
|
|
|
|
|
# Do a command, log it to $seq.full, optionally test return status
|
|
# and die if command fails. If called with one argument _do executes the
|
|
# command, logs it, and returns its exit status. With two arguments _do
|
|
# first prints the message passed in the first argument, and then "done"
|
|
# or "fail" depending on the return status of the command passed in the
|
|
# second argument. If the command fails and the variable _do_die_on_error
|
|
# is set to "always" or the two argument form is used and _do_die_on_error
|
|
# is set to "message_only" _do will print an error message to
|
|
# $seq.out and exit.
|
|
|
|
_do()
|
|
{
|
|
if [ $# -eq 1 ]; then
|
|
_cmd=$1
|
|
elif [ $# -eq 2 ]; then
|
|
_note=$1
|
|
_cmd=$2
|
|
echo -n "$_note... "
|
|
else
|
|
echo "Usage: _do [note] cmd" 1>&2
|
|
status=1; exit
|
|
fi
|
|
|
|
(eval "echo '---' \"$_cmd\"") >>$here/$seq.full
|
|
(eval "$_cmd") >$tmp._out 2>&1; ret=$?
|
|
cat $tmp._out >>$here/$seq.full
|
|
if [ $# -eq 2 ]; then
|
|
if [ $ret -eq 0 ]; then
|
|
echo "done"
|
|
else
|
|
echo "fail"
|
|
fi
|
|
fi
|
|
if [ $ret -ne 0 ] \
|
|
&& [ "$_do_die_on_error" = "always" \
|
|
-o \( $# -eq 2 -a "$_do_die_on_error" = "message_only" \) ]
|
|
then
|
|
[ $# -ne 2 ] && echo
|
|
eval "echo \"$_cmd\" failed \(returned $ret\): see $seq.full"
|
|
status=1; exit
|
|
fi
|
|
|
|
return $ret
|
|
}
|
|
|
|
# bail out, setting up .notrun file
|
|
#
|
|
_notrun()
|
|
{
|
|
echo "$*" >$seq.notrun
|
|
echo "$seq not run: $*"
|
|
status=0
|
|
exit
|
|
}
|
|
|
|
# just plain bail out
|
|
#
|
|
_fail()
|
|
{
|
|
echo "$*" | tee -a $here/$seq.full
|
|
echo "(see $seq.full for details)"
|
|
status=1
|
|
exit 1
|
|
}
|
|
|
|
# tests whether $IMGFMT is one of the supported image formats for a test
|
|
#
|
|
_supported_fmt()
|
|
{
|
|
for f; do
|
|
if [ "$f" = "$IMGFMT" -o "$f" = "generic" ]; then
|
|
return
|
|
fi
|
|
done
|
|
|
|
_notrun "not suitable for this image format: $IMGFMT"
|
|
}
|
|
|
|
# tests whether $IMGPROTO is one of the supported image protocols for a test
|
|
#
|
|
_supported_proto()
|
|
{
|
|
for f; do
|
|
if [ "$f" = "$IMGPROTO" -o "$f" = "generic" ]; then
|
|
return
|
|
fi
|
|
done
|
|
|
|
_notrun "not suitable for this image protocol: $IMGPROTO"
|
|
}
|
|
|
|
# tests whether the host OS is one of the supported OSes for a test
|
|
#
|
|
_supported_os()
|
|
{
|
|
for h
|
|
do
|
|
if [ "$h" = "$HOSTOS" ]
|
|
then
|
|
return
|
|
fi
|
|
done
|
|
|
|
_notrun "not suitable for this OS: $HOSTOS"
|
|
}
|
|
|
|
_unsupported_qemu_io_options()
|
|
{
|
|
for bad_opt
|
|
do
|
|
for opt in $QEMU_IO_OPTIONS
|
|
do
|
|
if [ "$bad_opt" = "$opt" ]
|
|
then
|
|
_notrun "not suitable for qemu-io option: $bad_opt"
|
|
fi
|
|
done
|
|
done
|
|
}
|
|
|
|
# this test requires that a specified command (executable) exists
|
|
#
|
|
_require_command()
|
|
{
|
|
[ -x "$1" ] || _notrun "$1 utility required, skipped this test"
|
|
}
|
|
|
|
_full_imgfmt_details()
|
|
{
|
|
if [ -n "$IMGOPTS" ]; then
|
|
echo "$IMGFMT ($IMGOPTS)"
|
|
else
|
|
echo "$IMGFMT"
|
|
fi
|
|
}
|
|
|
|
_full_imgproto_details()
|
|
{
|
|
echo "$IMGPROTO"
|
|
}
|
|
|
|
_full_platform_details()
|
|
{
|
|
os=`uname -s`
|
|
host=`hostname -s`
|
|
kernel=`uname -r`
|
|
platform=`uname -m`
|
|
echo "$os/$platform $host $kernel"
|
|
}
|
|
|
|
_link_out_file()
|
|
{
|
|
if [ -z "$1" ]; then
|
|
echo Error must pass \$seq.
|
|
exit
|
|
fi
|
|
rm -f $1
|
|
if [ "`uname`" == "IRIX64" ] || [ "`uname`" == "IRIX" ]; then
|
|
ln -s $1.irix $1
|
|
elif [ "`uname`" == "Linux" ]; then
|
|
ln -s $1.linux $1
|
|
else
|
|
echo Error test $seq does not run on the operating system: `uname`
|
|
exit
|
|
fi
|
|
}
|
|
|
|
_die()
|
|
{
|
|
echo $@
|
|
exit 1
|
|
}
|
|
|
|
# make sure this script returns success
|
|
/bin/true
|