Archipelago » qemu

#!/bin/bash

#

# Copyright (C) 2009 Red Hat, Inc.

# Copyright (c) 2000-2001 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.

#

# This program is distributed in the hope that it would 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/>.

#

#

# standard filters

#

# Checks that given_value is in range of correct_value +/- tolerance.

# Tolerance can be an absolute value or a percentage of the correct value

# (see examples with tolerances below).

# Outputs suitable message to stdout if it's not in range.

#

# A verbose option, -v, may be used as the LAST argument

#

# e.g.

# foo: 0.0298 = 0.03 +/- 5%

# _within_tolerance "foo" 0.0298 0.03 5%

#

# foo: 0.0298 = 0.03 +/- 0.01

# _within_tolerance "foo" 0.0298 0.03 0.01

#

# foo: 0.0298 = 0.03 -0.01 +0.002

# _within_tolerance "foo" 0.0298 0.03 0.01 0.002

#

# foo: verbose output of 0.0298 = 0.03 +/- 5%

# _within_tolerance "foo" 0.0298 0.03 5% -v

_within_tolerance()

{

  _name=$1

  _given_val=$2

  _correct_val=$3

  _mintol=$4

  _maxtol=$_mintol

  _verbose=0

  _debug=false

  # maxtol arg is optional

  # verbose arg is optional

  if [ $# -ge 5 ]

  then

     if [ "$5" = "-v" ]

     then

        _verbose=1

     else

        _maxtol=$5

     fi

  fi

  if [ $# -ge 6 ]

  then

     [ "$6" = "-v" ] && _verbose=1

  fi

  # find min with or without %

  _mintolerance=`echo $_mintol | sed -e 's/%//'`

  if [ $_mintol = $_mintolerance ]

  then

      _min=`echo "scale=5; $_correct_val-$_mintolerance" | bc`

  else

      _min=`echo "scale=5; $_correct_val-$_mintolerance*0.01*$_correct_val" | bc`

  fi

  # find max with or without %

  _maxtolerance=`echo $_maxtol | sed -e 's/%//'`

  if [ $_maxtol = $_maxtolerance ]

  then

      _max=`echo "scale=5; $_correct_val+$_maxtolerance" | bc`

  else

      _max=`echo "scale=5; $_correct_val+$_maxtolerance*0.01*$_correct_val" | bc`

  fi

  $_debug && echo "min = $_min"

  $_debug && echo "max = $_max"

  cat <<EOF >$tmp.bc.1

scale=5;

if ($_min <= $_given_val) 1;

if ($_min > $_given_val) 0;

EOF

  cat <<EOF >$tmp.bc.2

scale=5;

if ($_given_val <= $_max) 1;

if ($_given_val > $_max) 0;

EOF

  _above_min=`bc <$tmp.bc.1`

  _below_max=`bc <$tmp.bc.2`

  rm -f $tmp.bc.[12]

  _in_range=`expr $_above_min \& $_below_max`

  # fix up min, max precision for output

  # can vary for 5.3, 6.2

  _min=`echo $_min | sed -e 's/0*$//'` # get rid of trailling zeroes

  _max=`echo $_max | sed -e 's/0*$//'` # get rid of trailling zeroes

  if [ $_in_range -eq 1 ]

  then

        [ $_verbose -eq 1 ] && echo $_name is in range

        return 0

  else

        [ $_verbose -eq 1 ] && echo $_name has value of $_given_val

        [ $_verbose -eq 1 ] && echo $_name is NOT in range $_min .. $_max

        return 1

  fi

}

# ctime(3) dates

#

_filter_date()

{

    sed \

        -e 's/[A-Z][a-z][a-z] [A-z][a-z][a-z]  *[0-9][0-9]* [0-9][0-9]:[0-9][0-9]:[0-9][0-9] [0-9][0-9][0-9][0-9]$/DATE/'

}

# replace occurrences of the actual TEST_DIR value with TEST_DIR

_filter_testdir()

{

    sed -e "s#$TEST_DIR#TEST_DIR#g"

}

# replace occurrences of the actual IMGFMT value with IMGFMT

_filter_imgfmt()

{

    sed -e "s#$IMGFMT#IMGFMT#g"

}

# Removes \r from messages

_filter_win32()

{

    sed -e 's/\r//g'

}

# sanitize qemu-io output

_filter_qemu_io()

{

    _filter_win32 | sed -e "s/[0-9]* ops\; [0-9/:. sec]* ([0-9/.inf]* [EPTGMKiBbytes]*\/sec and [0-9/.inf]* ops\/sec)/X ops\; XX:XX:XX.X (XXX YYY\/sec and XXX ops\/sec)/" \

        -e "s/qemu-io> //g"

}

# replace occurrences of QEMU_PROG with "qemu"

_filter_qemu()

{

    sed -e "s#\\(^\\|(qemu) \\)$(basename $QEMU_PROG):#\1QEMU_PROG:#" \

        -e 's#^QEMU [0-9]\+\.[0-9]\+\.[0-9]\+ monitor#QEMU X.Y.Z monitor#' \

        -e $'s#\r##' # QEMU monitor uses \r\n line endings

}

# replace problematic QMP output like timestamps

_filter_qmp()

{

    _filter_win32 | \

    sed -e 's#\("\(micro\)\?seconds": \)[0-9]\+#\1 TIMESTAMP#g' \

        -e 's#^{"QMP":.*}$#QMP_VERSION#'

}

# make sure this script returns success

/bin/true