1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
|
module RANAP_CodecPort {
/* Simple RANAP Codec Port, translating between raw SCCP primitives with
* octetstring payload towards the SCCP provider, and RANAP-SCCP primitives
* which carry the decoded RANAP data types as payload.
*
* (C) 2017-2018 by Harald Welte <laforge@gnumonks.org>
* All rights reserved.
*
* Released under the terms of GNU General Public License, Version 2 or
* (at your option) any later version.
*/
import from General_Types all;
import from Osmocom_Types all;
import from SCCPasp_Types all;
import from SCCP_Types all;
import from RANAP_PDU_Descriptions all;
import from RANAP_Types all;
type record RANAP_N_CONNECT_req
{
SCCP_PAR_Address calledAddress,
SCCP_PAR_Address callingAddress optional,
SCCP_PAR_Expedited_Data_Sel expeditedDataSel optional,
SCCP_PAR_Quality_Of_Service qualityOfService optional,
RANAP_PDU userData optional,
SCCP_PAR_Connection_Id connectionId optional,
SCCP_PAR_Importance importance optional
}
template RANAP_N_CONNECT_req ts_RANAP_CONNECT_req(SCCP_PAR_Address called,
SCCP_PAR_Address calling,
SCCP_PAR_Connection_Id conn_id,
template RANAP_PDU ranap := omit) := {
calledAddress := called,
callingAddress := calling,
expeditedDataSel := omit,
qualityOfService := omit,
userData := ranap,
connectionId := conn_id,
importance := omit
}
type record RANAP_N_CONNECT_ind
{
SCCP_PAR_Address calledAddress,
SCCP_PAR_Address callingAddress optional,
SCCP_PAR_Quality_Of_Service qualityOfService optional,
RANAP_PDU userData optional,
SCCP_PAR_Connection_Id connectionId optional,
SCCP_PAR_Importance importance optional
}
template RANAP_N_CONNECT_ind tr_RANAP_CONNECT_ind(template SCCP_PAR_Address called,
template SCCP_PAR_Address calling,
template RANAP_PDU payload := *) := {
calledAddress := called,
callingAddress := calling,
qualityOfService := *,
userData := payload,
connectionId := *,
importance := *
}
type record RANAP_N_CONNECT_res
{
SCCP_PAR_Address respondingAddress optional,
SCCP_PAR_Expedited_Data_Sel expeditedDataSel optional,
SCCP_PAR_Quality_Of_Service qualityOfService optional,
RANAP_PDU userData optional,
SCCP_PAR_Connection_Id connectionId optional,
SCCP_PAR_Importance importance optional
}
template RANAP_N_CONNECT_res ts_RANAP_CONNECT_res(SCCP_PAR_Connection_Id conn_id,
template RANAP_PDU ranap := omit) := {
respondingAddress := omit,
expeditedDataSel := omit,
qualityOfService := omit,
userData := ranap,
connectionId := conn_id,
importance := omit
}
type record RANAP_N_CONNECT_cfm
{
SCCP_PAR_Address respondingAddress optional,
SCCP_PAR_Quality_Of_Service qualityOfService optional,
RANAP_PDU userData optional,
SCCP_PAR_Connection_Id connectionId optional,
SCCP_PAR_Importance importance optional
}
template RANAP_N_CONNECT_cfm tr_RANAP_CONNECT_cfm(template SCCP_PAR_Connection_Id conn_id,
template RANAP_PDU ranap := *) := {
respondingAddress := *,
qualityOfService := *,
userData := ranap,
connectionId := conn_id,
importance := *
}
type record RANAP_N_DATA_req
{
RANAP_PDU userData ,
SCCP_PAR_Connection_Id connectionId optional ,
SCCP_PAR_Importance importance optional
}
template RANAP_N_DATA_req ts_RANAP_DATA_req(SCCP_PAR_Connection_Id conn_id,
template RANAP_PDU ranap) := {
userData := ranap,
connectionId := conn_id,
importance := omit
}
type record RANAP_N_DATA_ind
{
RANAP_PDU userData ,
SCCP_PAR_Connection_Id connectionId optional ,
SCCP_PAR_Importance importance optional
}
template RANAP_N_DATA_ind tr_RANAP_DATA_ind(SCCP_PAR_Connection_Id conn_id,
template RANAP_PDU ranap := *) := {
userData := ranap,
connectionId := conn_id,
importance := *
}
type record RANAP_N_DISCONNECT_req
{
SCCP_PAR_Address respondingAddress optional,
SCCP_PAR_Reason reason ,
RANAP_PDU userData optional ,
SCCP_PAR_Connection_Id connectionId optional ,
SCCP_PAR_Importance importance optional
}
template RANAP_N_DISCONNECT_req ts_RANAP_DISC_req(SCCP_PAR_Connection_Id conn_id,
template SCCP_PAR_Reason reason,
template RANAP_PDU ranap := omit) := {
respondingAddress := omit,
reason := reason,
userData := ranap,
connectionId := conn_id,
importance := omit
}
type record RANAP_N_DISCONNECT_ind
{
SCCP_PAR_Originator originator ,
SCCP_PAR_Address respondingAddress optional ,
SCCP_PAR_Reason reason ,
RANAP_PDU userData optional ,
SCCP_PAR_Connection_Id connectionId optional ,
SCCP_PAR_Importance importance optional
}
template RANAP_N_DISCONNECT_ind tr_RANAP_DISC_ind(template SCCP_PAR_Connection_Id conn_id,
template SCCP_PAR_Originator originator,
template SCCP_PAR_Reason reason,
template RANAP_PDU ranap := *) := {
originator := originator,
respondingAddress:= *,
reason := reason,
userData := ranap,
connectionId := conn_id,
importance := *
}
type record RANAP_N_UNITDATA_req
{
SCCP_PAR_Address calledAddress ,
SCCP_PAR_Address callingAddress ,
SCCP_PAR_Sequence_Control sequenceControl optional ,
SCCP_PAR_Return_Option returnOption optional ,
RANAP_PDU userData ,
SCCP_PAR_Importance importance optional
}
template RANAP_N_UNITDATA_req ts_RANAP_UNITDATA_req(SCCP_PAR_Address called, SCCP_PAR_Address calling, template RANAP_PDU payload) := {
calledAddress := called,
callingAddress := calling,
sequenceControl := omit,
returnOption := omit,
userData := payload,
importance := omit
}
type record RANAP_N_UNITDATA_ind
{
SCCP_PAR_Address calledAddress ,
SCCP_PAR_Address callingAddress ,
SCCP_PAR_Sequence_Control sequenceControl optional ,
SCCP_PAR_Return_Option returnOption optional ,
RANAP_PDU userData ,
SCCP_PAR_Importance importance optional
}
template RANAP_N_UNITDATA_ind tr_RANAP_UNITDATA_ind(template SCCP_PAR_Address called, template SCCP_PAR_Address calling, template RANAP_PDU payload) := {
calledAddress := called,
callingAddress := calling,
sequenceControl := *,
returnOption := *,
userData := payload,
importance := *
}
type record RANAP_N_NOTICE_ind
{
SCCP_PAR_Address calledAddress ,
SCCP_PAR_Address callingAddress ,
SCCP_PAR_Reason_For_Return reasonForReturn ,
RANAP_PDU userData ,
SCCP_PAR_Importance importance optional
}
private function f_dec_ConnectInd(in ASP_SCCP_N_CONNECT_ind pin, out RANAP_N_CONNECT_ind pout) {
pout.calledAddress := pin.calledAddress;
pout.callingAddress := pin.callingAddress;
pout.qualityOfService := pin.qualityOfService;
if (ispresent(pin.userData)) {
pout.userData := dec_RANAP_PDU(pin.userData);
} else {
pout.userData := omit;
}
pout.connectionId := pin.connectionId;
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
private function f_dec_ConnectCfm(in ASP_SCCP_N_CONNECT_cfm pin, out RANAP_N_CONNECT_cfm pout) {
pout.respondingAddress := pin.respondingAddress;
pout.qualityOfService := pin.qualityOfService;
if (ispresent(pin.userData)) {
pout.userData := dec_RANAP_PDU(pin.userData);
} else {
pout.userData := omit;
}
pout.connectionId := pin.connectionId;
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
private function f_dec_DataInd(in ASP_SCCP_N_DATA_ind pin, out RANAP_N_DATA_ind pout) {
pout.userData := dec_RANAP_PDU(pin.userData);
pout.connectionId := pin.connectionId;
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
private function f_dec_DisconnectInd(in ASP_SCCP_N_DISCONNECT_ind pin, out RANAP_N_DISCONNECT_ind pout) {
pout.originator := pin.originator;
pout.respondingAddress := pin.respondingAddress;
pout.reason := pin.reason;
if (ispresent(pin.userData)) {
pout.userData := dec_RANAP_PDU(pin.userData);
} else {
pout.userData := omit;
}
pout.connectionId := pin.connectionId;
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
private function f_dec_UnitdataInd(in ASP_SCCP_N_UNITDATA_ind pin, out RANAP_N_UNITDATA_ind pout) {
pout.calledAddress := pin.calledAddress;
pout.callingAddress := pin.callingAddress;
pout.sequenceControl := pin.sequenceControl;
pout.returnOption := pin.returnOption;
pout.userData := dec_RANAP_PDU(pin.userData);
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
private function f_dec_NoticeInd(in ASP_SCCP_N_NOTICE_ind pin, out RANAP_N_NOTICE_ind pout) {
pout.calledAddress := pin.calledAddress;
pout.callingAddress := pin.callingAddress;
pout.reasonForReturn := pin.reasonForReturn;
pout.userData := dec_RANAP_PDU(pin.userData);
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
private function f_enc_ConnectReq(in RANAP_N_CONNECT_req pin, out ASP_SCCP_N_CONNECT_req pout) {
pout.calledAddress := pin.calledAddress;
pout.callingAddress := pin.callingAddress;
pout.expeditedDataSel := pin.expeditedDataSel;
pout.qualityOfService := pin.qualityOfService;
if (ispresent(pin.userData)) {
pout.userData := enc_RANAP_PDU(pin.userData);
} else {
pout.userData := omit;
}
pout.connectionId := pin.connectionId;
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
private function f_enc_ConnectRes(in RANAP_N_CONNECT_res pin, out ASP_SCCP_N_CONNECT_res pout) {
pout.respondingAddress := pin.respondingAddress;
pout.expeditedDataSel := pin.expeditedDataSel;
pout.qualityOfService := pin.qualityOfService;
if (ispresent(pin.userData)) {
pout.userData := enc_RANAP_PDU(pin.userData);
} else {
pout.userData := omit;
}
pout.connectionId := pin.connectionId;
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
private function f_enc_DataReq(in RANAP_N_DATA_req pin, out ASP_SCCP_N_DATA_req pout) {
pout.userData := enc_RANAP_PDU(pin.userData);
pout.connectionId := pin.connectionId;
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
private function f_enc_DisconnectReq(in RANAP_N_DISCONNECT_req pin, out ASP_SCCP_N_DISCONNECT_req pout) {
pout.respondingAddress := pin.respondingAddress;
pout.reason := pin.reason;
if (ispresent(pin.userData)) {
pout.userData := enc_RANAP_PDU(pin.userData);
} else {
pout.userData := omit;
}
pout.connectionId := pin.connectionId;
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
private function f_enc_UnitdataReq(in RANAP_N_UNITDATA_req pin, out ASP_SCCP_N_UNITDATA_req pout) {
pout.calledAddress := pin.calledAddress;
pout.callingAddress := pin.callingAddress;
pout.userData := enc_RANAP_PDU(pin.userData);
pout.sequenceControl := pin.sequenceControl;
pout.returnOption := pin.returnOption;
pout.importance := pin.importance;
//port.setstate(0);
} with {extension "prototype(fast)" }
/*
type port RANAP_CODEC_PT message map to SCCPasp_PT {
out RANAP_N_CONNECT_req to ASP_SCCP_N_CONNECT_req with f_enc_ConnectReq(),
RANAP_N_CONNECT_res to ASP_SCCP_N_CONNECT_res with f_enc_ConnectRes(),
RANAP_N_DATA_req to ASP_SCCP_N_DATA_req with f_enc_DataReq(),
RANAP_N_DISCONNECT_req to ASP_SCCP_N_DISCONNECT_req with f_enc_DisconnectReq(),
RANAP_N_UNITDATA_req to ASP_SCCP_N_UNITDATA_req with f_enc_UnitdataReq(),
ASP_SCCP_N_RESET_req, ASP_SCCP_N_RESET_resp;
in RANAP_N_CONNECT_ind from ASP_SCCP_N_CONNECT_ind with f_dec_ConnectInd(),
RANAP_N_CONNECT_cfm from ASP_SCCP_N_CONNECT_cfm with f_dec_ConnectCfm(),
RANAP_N_DATA_ind from ASP_SCCP_N_DATA_ind with f_dec_DataInd(),
RANAP_N_DISCONNECT_ind from ASP_SCCP_N_DISCONNECT_ind with f_dec_DisconnectInd(),
RANAP_N_UNITDATA_ind from ASP_SCCP_N_UNITDATA_ind with f_dec_UnitdataInd(),
RANAP_N_NOTICE_ind from ASP_SCCP_N_NOTICE_ind with f_dec_NoticeInd(),
ASP_SCCP_N_STATE_ind, ASP_SCCP_N_RESET_ind, ASP_SCCP_N_RESET_cfm;
} with {extension "internal"}
*/
type port RANAP_CODEC_PT message {
out RANAP_N_CONNECT_req,
RANAP_N_CONNECT_res,
RANAP_N_DATA_req,
RANAP_N_DISCONNECT_req,
RANAP_N_UNITDATA_req,
ASP_SCCP_N_RESET_req;
in RANAP_N_CONNECT_ind,
RANAP_N_CONNECT_cfm,
RANAP_N_DATA_ind,
RANAP_N_DISCONNECT_ind,
RANAP_N_UNITDATA_ind,
RANAP_N_NOTICE_ind,
ASP_SCCP_N_RESET_ind,
ASP_SCCP_N_RESET_cfm,
ASP_SCCP_N_STATE_ind;
} with { extension "internal user SCCPasp_PT
out(RANAP_N_CONNECT_req -> ASP_SCCP_N_CONNECT_req: function(f_enc_ConnectReq);
RANAP_N_CONNECT_res -> ASP_SCCP_N_CONNECT_res: function(f_enc_ConnectRes);
RANAP_N_DATA_req -> ASP_SCCP_N_DATA_req: function(f_enc_DataReq);
RANAP_N_DISCONNECT_req -> ASP_SCCP_N_DISCONNECT_req: function(f_enc_DisconnectReq);
RANAP_N_UNITDATA_req -> ASP_SCCP_N_UNITDATA_req: function(f_enc_UnitdataReq);
ASP_SCCP_N_RESET_req -> ASP_SCCP_N_RESET_req: simple)
in(ASP_SCCP_N_CONNECT_ind -> RANAP_N_CONNECT_ind: function(f_dec_ConnectInd);
ASP_SCCP_N_CONNECT_cfm -> RANAP_N_CONNECT_cfm: function(f_dec_ConnectCfm);
ASP_SCCP_N_DATA_ind -> RANAP_N_DATA_ind: function(f_dec_DataInd);
ASP_SCCP_N_DISCONNECT_ind -> RANAP_N_DISCONNECT_ind: function(f_dec_DisconnectInd);
ASP_SCCP_N_UNITDATA_ind -> RANAP_N_UNITDATA_ind: function(f_dec_UnitdataInd);
ASP_SCCP_N_NOTICE_ind -> RANAP_N_NOTICE_ind: function(f_dec_NoticeInd);
ASP_SCCP_N_RESET_ind -> ASP_SCCP_N_RESET_ind: simple;
ASP_SCCP_N_RESET_cfm -> ASP_SCCP_N_RESET_cfm: simple;
ASP_SCCP_N_STATE_ind -> ASP_SCCP_N_STATE_ind: simple)"
}
}
|
