Mercurial > hg > sonic-annotator
annotate tests/test-include.sh @ 118:0fe5abb56a6e test-reorg
Pull more stuff up into include file
author | Chris Cannam |
---|---|
date | Wed, 08 Oct 2014 14:20:45 +0100 |
parents | 8b4924a9a072 |
children |
rev | line source |
---|---|
Chris@118 | 1 |
Chris@118 | 2 mypath=`dirname $0` |
Chris@118 | 3 r=$mypath/../sonic-annotator |
Chris@118 | 4 |
Chris@118 | 5 percplug=vamp:vamp-example-plugins:percussiononsets |
Chris@118 | 6 testplug=vamp:vamp-test-plugin:vamp-test-plugin |
Chris@30 | 7 |
Chris@30 | 8 fail() { |
Chris@30 | 9 echo "Test failed: $1" |
Chris@30 | 10 exit 1 |
Chris@30 | 11 } |
Chris@30 | 12 |
Chris@30 | 13 csvcompare() { |
Chris@30 | 14 # permit some fuzz in final few digits |
Chris@30 | 15 a="$1" |
Chris@30 | 16 b="$2" |
Chris@30 | 17 perl -p -e 's/(\d+\.\d{6})\d+/$1/' "$a" > "${a}__" |
Chris@30 | 18 perl -p -e 's/(\d+\.\d{6})\d+/$1/' "$b" > "${b}__" |
Chris@30 | 19 cmp -s "${a}__" "${b}__" |
Chris@30 | 20 rv=$? |
Chris@30 | 21 rm "${a}__" "${b}__" |
Chris@30 | 22 return $rv |
Chris@30 | 23 } |
Chris@30 | 24 |
Chris@75 | 25 csvcompare_ignorefirst() { |
Chris@75 | 26 # a bit like the above, but ignoring first column (and without temp files) |
Chris@75 | 27 out=`cat "$1" "$2" | cut -d, -f2- | perl -p -e 's/(\d+\.\d{6})\d+/$1/' | sort | uniq -c | grep -v ' 2 '` |
Chris@75 | 28 return `[ -z "$out" ]` |
Chris@75 | 29 } |
Chris@75 | 30 |
Chris@108 | 31 faildiff() { |
Chris@108 | 32 echo "Test failed: $1" |
Chris@108 | 33 if [ -n "$2" -a -n "$3" ]; then |
Chris@108 | 34 echo "Output follows:" |
Chris@108 | 35 echo "--" |
Chris@108 | 36 cat $2 |
Chris@108 | 37 echo "--" |
Chris@108 | 38 echo "Expected output follows:" |
Chris@108 | 39 echo "--" |
Chris@108 | 40 cat $3 |
Chris@108 | 41 echo "--" |
Chris@108 | 42 echo "Diff:" |
Chris@108 | 43 echo "--" |
Chris@108 | 44 sdiff -w78 $2 $3 |
Chris@108 | 45 echo "--" |
Chris@108 | 46 fi |
Chris@108 | 47 exit 1 |
Chris@108 | 48 } |
Chris@75 | 49 |
Chris@108 | 50 |