#!/bin/bash
#
# Copyright (C) 2015 LoVullo Associates, Inc.
#
# 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 3 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 .
#
# FIXME: This guy needs some cleanup.
# TODO: Duplicated in hoxsl; can we extract?
# #
declare -r oldwd="$( pwd )"
cd "$( dirname "$0" )"
outdir=xspec
index="index.html"
htmlindex()
{
cat >> "$index"
}
get-test-list()
{
if [ $# -eq 0 ]; then
find . -name '*.xspec'
else
(
cd "$oldwd" \
&& for spec in "$@"; do
echo "$( readlink -f "$spec" )"
done
)
fi
}
process-results()
{
awk '
BEGIN { status = 0 }
{ print }
/^ FAILED$/ { status = 1 }
END { exit status }
'
}
# xspec's output dir
mkdir -p "$outdir"
rm -f "$index"
htmlindex <
Test Index
Test Index
EOH
declare -i status=0
while read spec; do
echo "$spec"
../tools/xspec/bin/xspec.sh "$spec" 2>&1 \
| process-results
test ${PIPESTATUS[0]} -eq 0 -a ${PIPESTATUS[1]} -eq 0 \
|| status=1
spec_path="$( dirname "$spec" )/xspec"
result="$spec_path/$( basename "$spec" .xspec )-result.html"
printf ' - %s
' "$result" "$spec" \
| htmlindex
done < <( get-test-list "$@" )
htmlindex <