Change in osmo-ttcn3-hacks[master]: RAN_Emulation: Support for PS domain

This is merely a historical archive of years 2008-2021, before the migration to mailman3.

A maintained and still updated list archive can be found at https://lists.osmocom.org/hyperkitty/list/gerrit-log@lists.osmocom.org/.

Harald Welte gerrit-no-reply at lists.osmocom.org
Thu May 2 17:12:16 UTC 2019


Harald Welte has uploaded this change for review. ( https://gerrit.osmocom.org/13854


Change subject: RAN_Emulation: Support for PS domain
......................................................................

RAN_Emulation: Support for PS domain

So far, the RAN_Emulation only supported the CS domain, and not PS. Let's
change that so we can start having IuPS related tests.

Change-Id: I7ba4662e5a7ba31a2582b0c133b3140c8057678f
---
M library/RAN_Emulation.ttcnpp
1 file changed, 92 insertions(+), 14 deletions(-)



  git pull ssh://gerrit.osmocom.org:29418/osmo-ttcn3-hacks refs/changes/54/13854/1

diff --git a/library/RAN_Emulation.ttcnpp b/library/RAN_Emulation.ttcnpp
index d6d74e2..7c5a18d 100644
--- a/library/RAN_Emulation.ttcnpp
+++ b/library/RAN_Emulation.ttcnpp
@@ -88,6 +88,17 @@
 	PDU_ML3_NW_MS		dtap
 }
 
+type record PDU_DTAP_PS_MO {
+	OCT1			dlci optional,
+	boolean			skip_seq_patching optional,
+	PDU_L3_MS_SGSN          dtap
+}
+
+type record PDU_DTAP_PS_MT {
+	OCT1			dlci optional,
+	PDU_L3_SGSN_MS          dtap
+}
+
 template PDU_DTAP_MT ts_PDU_DTAP_MT(template PDU_ML3_NW_MS dtap, template OCT1 dlci := omit) := {
 	dlci := dlci,
 	dtap := dtap
@@ -110,6 +121,29 @@
 	dtap := dtap
 }
 
+template (value) PDU_DTAP_PS_MT ts_PDU_DTAP_PS_MT(template (value) PDU_L3_SGSN_MS dtap, template (omit) OCT1 dlci := omit) := {
+	dlci := dlci,
+	dtap := dtap
+}
+
+template (value) PDU_DTAP_PS_MO ts_PDU_DTAP_PS_MO(template (value) PDU_L3_MS_SGSN dtap, template (value) OCT1 dlci := '00'O,
+						  boolean skip_seq_patching := false) := {
+	dlci := dlci,
+	skip_seq_patching := skip_seq_patching,
+	dtap := dtap
+}
+
+template PDU_DTAP_PS_MT tr_PDU_DTAP_PS_MT(template PDU_L3_SGSN_MS dtap, template OCT1 dlci := *) := {
+	dlci := dlci,
+	dtap := dtap
+}
+
+template PDU_DTAP_PS_MO tr_PDU_DTAP_PS_MO(template PDU_L3_MS_SGSN dtap, template OCT1 dlci := *) := {
+	dlci := dlci,
+	skip_seq_patching := ?,
+	dtap := dtap
+}
+
 /* port between individual per-connection components and this dispatcher */
 type port RAN_Conn_PT message {
 	inout
@@ -129,6 +163,7 @@
 #endif
 		/* direct DTAP messages from/to clients */
 		PDU_DTAP_MO, PDU_DTAP_MT,
+		PDU_DTAP_PS_MO, PDU_DTAP_PS_MT,
 		/* misc indications / requests between SCCP and client */
 		RAN_Conn_Prim;
 } with { extension "internal" };
@@ -536,24 +571,46 @@
 		var template (omit) OCT1 dlci := fake_dlci_from_sapi(sapi);
 		if (g_ran_ops.role_ms) {
 			/* we are the MS, so any message to us must be MT */
-			var PDU_DTAP_MT mt := {
-				dlci := omit,
-				dtap := dec_PDU_ML3_NW_MS(valueof(l3))
-			};
-			if (isvalue(dlci)) {
-				mt.dlci := valueof(dlci)
+			if (g_ran_ops.ps_domain) {
+				var PDU_DTAP_PS_MT mt := {
+					dlci := omit,
+					dtap := dec_PDU_L3_SGSN_MS(valueof(l3))
+				};
+				if (isvalue(dlci)) {
+					mt.dlci := valueof(dlci);
+				}
+				CLIENT.send(mt) to client;
+			} else {
+				var PDU_DTAP_MT mt := {
+					dlci := omit,
+					dtap := dec_PDU_ML3_NW_MS(valueof(l3))
+				};
+				if (isvalue(dlci)) {
+					mt.dlci := valueof(dlci)
+				}
+				CLIENT.send(mt) to client;
 			}
-			CLIENT.send(mt) to client;
 		} else {
 			/* we are the Network, so any message to us must be MO */
-			var PDU_DTAP_MO mo := {
-				dlci := omit,
-				dtap := dec_PDU_ML3_MS_NW(valueof(l3))
-			};
-			if (isvalue(dlci)) {
-				mo.dlci := valueof(dlci)
+			if (g_ran_ops.ps_domain) {
+				var PDU_DTAP_PS_MO mo := {
+					dlci := omit,
+					dtap := dec_PDU_L3_MS_SGSN(valueof(l3))
+				};
+				if (isvalue(dlci)) {
+					mo.dlci := valueof(dlci);
+				}
+				CLIENT.send(mo) to client;
+			} else {
+				var PDU_DTAP_MO mo := {
+					dlci := omit,
+					dtap := dec_PDU_ML3_MS_NW(valueof(l3))
+				};
+				if (isvalue(dlci)) {
+					mo.dlci := valueof(dlci)
+				}
+				CLIENT.send(mo) to client;
 			}
-			CLIENT.send(mo) to client;
 		}
 	}
 }
@@ -840,6 +897,8 @@
 		var RANAP_Conn_Req creq;
 		var RANAP_PDU ranap;
 		var RAN_ConnHdlr vc_conn;
+		var PDU_DTAP_PS_MO ps_mo;
+		var PDU_DTAP_PS_MT ps_mt;
 
 		/* SCCP -> Client: UNIT-DATA (connectionless SCCP) from a BSC */
 		[] RANAP.receive(RANAP_N_UNITDATA_ind:?) -> value rud_ind {
@@ -934,6 +993,25 @@
 			}
 			}
 
+		[g_ran_ops.role_ms] CLIENT.receive(PDU_DTAP_PS_MO:?) -> value ps_mo sender vc_conn {
+			var integer idx := f_idx_by_comp(vc_conn);
+			/* convert from decoded DTAP to encoded DTAP */
+			var octetstring l3_enc := enc_PDU_L3_MS_SGSN(ps_mo.dtap);
+			/* patch correct L3 send sequence number N(SD) into l3_enc */
+			if (ps_mo.skip_seq_patching == false) {
+				//f_ML3_patch_seq(ConnectionTable[idx], ps_mo.dtap, l3_enc);
+			}
+			f_xmit_raw_l3(ConnectionTable[idx].sccp_conn_id, ps_mo.dlci, l3_enc);
+			}
+
+		[not g_ran_ops.role_ms] CLIENT.receive(PDU_DTAP_PS_MT:?) -> value ps_mt sender vc_conn {
+			var integer idx := f_idx_by_comp(vc_conn);
+			/* convert from decoded DTAP to encoded DTAP */
+			var octetstring l3_enc := enc_PDU_L3_SGSN_MS(ps_mt.dtap);
+			f_xmit_raw_l3(ConnectionTable[idx].sccp_conn_id, ps_mt.dlci, l3_enc);
+			}
+
+
 #else
 		[false] CLIENT.receive {}
 #endif

-- 
To view, visit https://gerrit.osmocom.org/13854
To unsubscribe, or for help writing mail filters, visit https://gerrit.osmocom.org/settings

Gerrit-Project: osmo-ttcn3-hacks
Gerrit-Branch: master
Gerrit-MessageType: newchange
Gerrit-Change-Id: I7ba4662e5a7ba31a2582b0c133b3140c8057678f
Gerrit-Change-Number: 13854
Gerrit-PatchSet: 1
Gerrit-Owner: Harald Welte <laforge at gnumonks.org>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.osmocom.org/pipermail/gerrit-log/attachments/20190502/dc65992b/attachment.htm>


More information about the gerrit-log mailing list