From c1f566cc857fdc74a56c793370d3780b2d184e5f Mon Sep 17 00:00:00 2001
From: Harald Welte <laforge@gnumonks.org>
Date: Sun, 9 Apr 2017 19:46:57 +0200
Subject: [PATCH] libosmo-sigtran test config + script

---
 dotguile                |  2 +-
 m3ua-param-testtool.scm | 18 ++++++++---------
 run-all-sgp-tests       | 43 +++++++++++++++++++++++++++++++++++++++++
 3 files changed, 53 insertions(+), 10 deletions(-)
 create mode 100755 run-all-sgp-tests

diff --git a/dotguile b/dotguile
index 7e28755..fde813a 100644
--- a/dotguile
+++ b/dotguile
@@ -26,7 +26,7 @@
 ;;; $Id: dotguile,v 1.1 2012/08/26 21:06:27 tuexen Exp $
 
 ;;; Change the following line to reflect where the files are located.
-(define dir "/Users/tuexen/Documents/m3ua-testtool/")
+(define dir "/home/laforge/projects/git/m3ua-testtool/")
 (define files (list "common.scm"
                     "m3ua.scm"
                     "m3ua-asp-tests.scm"
diff --git a/m3ua-param-testtool.scm b/m3ua-param-testtool.scm
index 81ce204..4f849d7 100644
--- a/m3ua-param-testtool.scm
+++ b/m3ua-param-testtool.scm
@@ -37,21 +37,21 @@
 
 ;;; Define a transport address of the system under test
 (define sut-addr "127.0.0.1")
-(define sut-port   0)
-(define sut-port-1 0)
-(define sut-port-2 0)
+(define sut-port   m3ua-port)
+(define sut-port-1 m3ua-port)
+(define sut-port-2 m3ua-port)
 
 ;;; Define the transport address of the tester
-(define tester-addr "127.0.0.1")
-(define tester-port  m3ua-port)
+(define tester-addr "127.0.0.2")
+(define tester-port  3333)
 (define tester-port-1 3000)
 (define tester-port-2 3001)
 
 ;;; Define the point code of the IUT
-(define iut-pc 4001)
+(define iut-pc 1)
 
 ;;; Define the point code of the tester
-(define tester-pc 100)
+(define tester-pc 23)
 (define tester-pc-1 100)
 (define tester-pc-2 101)
 (define tester-invalid-pc 102)
@@ -79,7 +79,7 @@
 (define invalid-network-appearance 2)
 
 ;;; Define an routing context
-(define tester-rc-valid 1)
+(define tester-rc-valid 23)
 (define tester-rc-valid-1 1)
 (define tester-rc-valid-2 2)
 
@@ -124,7 +124,7 @@
 ;;;data-message-parameters
 
 ;;; Define parameter for DATA message
-(define rc  1)
+(define rc  23)
 (define opc 1)
 (define dpc 2)
 (define si  0)
diff --git a/run-all-sgp-tests b/run-all-sgp-tests
new file mode 100755
index 0000000..08e3c86
--- /dev/null
+++ b/run-all-sgp-tests
@@ -0,0 +1,43 @@
+#!/usr/bin/env tcsh
+
+set timeout = 10
+set sleeptime = 1
+
+set testcases = (m3ua-sgp-aspsm-v-001 \
+                 m3ua-sgp-aspsm-v-003 \
+                 m3ua-sgp-aspsm-v-005 \
+                 m3ua-sgp-aspsm-i-001 \
+                 m3ua-sgp-aspsm-i-002 \
+                 m3ua-sgp-aspsm-i-003 \
+                 m3ua-sgp-aspsm-i-004 \
+                 m3ua-sgp-aspsm-o-001 \
+                 m3ua-sgp-aspsm-o-003 \
+                 m3ua-sgp-aspsm-o-004 \
+                 m3ua-sgp-asptm-v-001 \
+                 m3ua-sgp-asptm-v-003 \
+                 m3ua-sgp-asptm-v-006 \
+                 m3ua-sgp-asptm-v-008 \
+                 m3ua-sgp-asptm-v-010 \
+                 m3ua-sgp-asptm-v-011 \
+                 m3ua-sgp-asptm-i-001 \
+                 m3ua-sgp-asptm-i-004 \
+                 m3ua-sgp-asptm-i-005 \
+                 m3ua-sgp-asptm-i-006 \
+                 m3ua-sgp-asptm-i-008 \
+                 m3ua-sgp-asptm-i-010 \
+                 m3ua-sgp-asptm-o-001 \
+                 m3ua-sgp-asptm-o-003 \
+                 m3ua-sgp-mtr-v-002-alternate \
+                 m3ua-sgp-mtr-v-003-alternate \
+                 m3ua-sgp-mtr-i-001 \
+                 m3ua-sgp-mtr-i-002 \
+                 m3ua-sgp-mtr-i-003 \
+                 m3ua-sgp-rkm-v-001 \
+                 m3ua-sgp-rkm-v-002 \
+                 m3ua-sgp-rkm-v-003 \
+                 )
+
+foreach testcase ($testcases)
+  (runm3uatest -t $timeout $testcase > /dev/tty) >& /dev/null
+  sleep $sleeptime
+end