From: jkratoch <>
Date: Thu, 8 Jul 2010 09:09:19 +0000 (+0000)
Subject: GDB-GCC regression testing.
X-Git-Url: http://git.jankratochvil.net/?a=commitdiff_plain;h=facc396400e8cec41b626e8bab085b0faa80a080;p=nethome.git

GDB-GCC regression testing.
---

diff --git a/bin/gccregression b/bin/gccregression
new file mode 100755
index 0000000..6050910
--- /dev/null
+++ b/bin/gccregression
@@ -0,0 +1,45 @@
+#! /bin/bash
+if [ $# != 3 -a $# != 4 ];then
+  echo "$0 {|44|45|head} {|44|45|head} path/testfile.exp [path/binary]"
+fi
+set -ex
+rm -rf fail
+rm -rf pass
+if [ -n "$1" ];then
+  gccold="$HOME/redhat/gcc$1-root/bin"
+else
+  gccold="/"
+fi
+if [ -n "$2" ];then
+  gccnew="$HOME/redhat/gcc$2-root/bin"
+else
+  gccnew="/"
+fi
+test -d $gccold
+test -d $gccnew
+exp=`echo $3|sed 's/\.exp$//'`.exp
+test -f $exp
+if [ -n "$4" ];then
+  bin=$4
+else
+  bin=`echo $3|sed 's/\.exp$//'`
+fi
+binbase=`basename $bin`
+if [ -e $bin ];then
+  file $bin | grep ': ELF'
+fi
+rm -f $bin
+
+PATH="$gccold:$PATH" runtest $exp || exit 1
+file $bin | grep ': ELF'
+mkdir pass
+mv gdb.sum gdb.log $bin pass
+readelf -wi pass/$binbase >pass/$binbase.d
+
+PATH="$gccnew:$PATH" runtest $exp && exit 1
+file $bin | grep ': ELF'
+mkdir fail
+mv gdb.sum gdb.log $bin fail
+readelf -wi fail/$binbase >fail/$binbase.d
+
+echo OK