# Common helper routines for test shell scripts -- intended to be sourced by them

output_md5()
{
  @MD5SUM@ $* | @MD5FMT@
}

test_skip ()
{
  WHY="$1"
  echo "$Test $0 SKIP ($WHY)"
  exit 120
}

# portable implementation of 'which' utility
findprog()
{
  FOUND=
  PROG="$1"
  IFS_SAVE="$IFS"
  IFS=:
  for D in $PATH; do
    if [ -z "$D" ]; then
      D=.
    fi
    if [ -f "$D/$PROG" ] && [ -x "$D/$PROG" ]; then
      printf '%s\n' "$D/$PROG"
      break
    fi
  done
  IFS="$IFS_SAVE"
}

require_prog ()
{
  if [ -z "$(findprog $1)" ]; then
    test_skip "missing $1"
  fi
}

# Some stuff for doing silly progress indicators
progress_update ()
{
  THIS="$1"
  FIRST="$2"
  LAST="$3"
  RANGE="$(($LAST - $FIRST))"
  PROG="$(($THIS - $FIRST))"
  # this automatically rounds to nearest integer
  PERC="$(((100 * $PROG) / $RANGE))"
  # note \r so next update will overwrite
  printf "%3d%%\r" $PERC
}

progress_done ()
{
  printf "100%%\n"
}