#!/bin/bash

#

# This script will filter out output from BINDs tests

# It supports form from BIND 9.9 and BIND 9.11

# Its purpose is to display only failed tests from list of all tests

CURRENT_TEST=

CURRENT_OUTPUT=

STATUS_ONLY=

for P; do

	case "$P" in

		-s|--status)	STATUS_ONLY=yes; shift ;;

	esac

done

cat $@ | while read LINE; do

	if [ "${LINE#S:}" != "$LINE" ]; then

		CURRENT_TEST=`echo $LINE | cut -d: -f2`

		CURRENT_OUTPUT="$LINE"$'\n'

	elif [ "${LINE#R:}" != "$LINE" ]; then

		# echo "$CURRENT_TEST $LINE"

		if [ "${LINE/#R:*:*}" != "$LINE" ]; then

			# more recent results contain test name

			# R:dlz:FAIL

			CURRENT_TEST="${LINE#R:}"

			CURRENT_TEST="${CURRENT_TEST/%:*}"

			RESULT="${LINE/#*:}"

		else

			# S:dlz:time

			# R:FAIL

			RESULT="${LINE/#R*:/}"

		fi

		if [ "$RESULT" != "PASS" ]; then

			if [ -n "$STATUS_ONLY" ]; then

				echo "$RESULT $CURRENT_TEST"

			else

				CURRENT_OUTPUT+="$LINE"

				echo "$CURRENT_OUTPUT"

				echo

			fi

		fi

		CURRENT_OUTPUT=

	else

		CURRENT_OUTPUT+="$LINE"$'\n'

	fi

done