From 77bec93a3d7794def293360e6796c1db06d2d5c9 Mon Sep 17 00:00:00 2001
From: Neels Hofmeyr <neels@hofmeyr.de>
Date: Wed, 3 Jun 2020 15:43:02 +0200
Subject: hlr mslookup tmp debug

Change-Id: Ica136ec3846b226d42912ddea71d2ac489534285
---
 hlr/HLR_Tests.ttcn | 40 +++++++++++++++++++++++++---------------
 1 file changed, 25 insertions(+), 15 deletions(-)

diff --git a/hlr/HLR_Tests.ttcn b/hlr/HLR_Tests.ttcn
index 36e28b8a..c796d37a 100644
--- a/hlr/HLR_Tests.ttcn
+++ b/hlr/HLR_Tests.ttcn
@@ -55,7 +55,7 @@ type component test_CT extends CTRL_Adapter_CT {
 	var IPA_Emulation_CT vc_IPA_server;
 	var GSUP_Emulation_CT vc_GSUP_server;
 
-	timer g_Tguard := 10.0;
+	timer g_Tguard := 10000.0;
 };
 
 modulepar {
@@ -1742,19 +1742,26 @@ private function f_TC_MSLookup_mDNS_service_other_home() runs on HLR_ConnHdlr {
 
 	/* Location update */
 	f_perform_UL(g_pars.sub.imsi, msisdn, dom := OSMO_GSUP_CN_DOMAIN_CS);
+	f_sleep(1.0);
 
 	/* Send mDNS query again, expect result */
-	mDNS.send(ts_MSLookup_mDNS_query(id, domain));
-	T.start(1.0);
-	alt {
-	[] mDNS.receive(tr_MSLookup_mDNS_result_IPv4(id, domain, '42424242'O, 5060)) {
-		setverdict(pass);
-		}
-	[] mDNS.receive(MSLookup_mDNS:?) -> value vl_rmsg {
-		repeat;
-		}
-	[] T.timeout {
-		setverdict(fail, "OsmoHLR did not answer to mDNS query");
+	for (var integer i := 0; i < 1000; i := i+1) {
+		mDNS.send(ts_MSLookup_mDNS_query(id, domain));
+
+		T.start(1.0);
+		alt {
+		[] mDNS.receive(tr_MSLookup_mDNS_result_IPv4(id, domain, '42424242'O, 5060)) {
+			log("GOT AN ANSWER!!");
+			setverdict(pass);
+			}
+		[] mDNS.receive(MSLookup_mDNS:?) -> value vl_rmsg {
+			log("GOT AN ANSWER!!", vl_rmsg);
+			repeat;
+			}
+		[] T.timeout {
+			//setverdict(fail, "OsmoHLR did not answer to mDNS query");
+			log("OsmoHLR did not answer to mDNS query");
+			}
 		}
 	}
 
@@ -1937,7 +1944,8 @@ testcase TC_MSLookup_mDNS_service_other_proxy() runs on test_CT {
  */
 
 control {
-	execute( TC_gsup_sai_err_invalid_imsi() );
+	//execute( TC_gsup_sai_err_invalid_imsi() );
+	/*
 	execute( TC_gsup_sai() );
 	execute( TC_gsup_sai_num_auth_vectors() );
 	execute( TC_gsup_sai_eps() );
@@ -1962,7 +1970,6 @@ control {
 	execute( TC_mo_ussd_euse_continue() );
 	execute( TC_mo_ussd_euse_defaultroute() );
 
-	/* "Structured" Supplementary Services */
 	execute( TC_mo_sss_reject() );
 
 	execute( TC_gsup_check_imei() );
@@ -1971,14 +1978,17 @@ control {
 	execute( TC_gsup_check_imei_unknown_imsi() );
 	execute( TC_subscr_create_on_demand_check_imei_early() );
 	execute( TC_subscr_create_on_demand_ul() );
-	execute( TC_subscr_create_on_demand_sai() );
+	*/
+	//execute( TC_subscr_create_on_demand_sai() );
 
 	if (mp_hlr_supports_dgsm) {
 		execute( TC_MSLookup_mDNS_service_other_home() );
+		/*
 		execute( TC_MSLookup_GSUP_proxy() );
 		execute( TC_MSLookup_mDNS_service_GSUP_HLR_home() );
 		execute( TC_MSLookup_mDNS_service_GSUP_HLR_proxy() );
 		execute( TC_MSLookup_mDNS_service_other_proxy() );
+		*/
 	}
 };
 
-- 
cgit v1.2.3