s1ap_eNB_nas_procedures.c 18.7 KB
Newer Older
Cedric Roux's avatar
 
Cedric Roux committed
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
/*******************************************************************************

  Eurecom OpenAirInterface
  Copyright(c) 1999 - 2013 Eurecom

  This program is free software; you can redistribute it and/or modify it
  under the terms and conditions of the GNU General Public License,
  version 2, as published by the Free Software Foundation.

  This program is distributed in the hope it will be useful, but WITHOUT
  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  more details.

  You should have received a copy of the GNU General Public License along with
  this program; if not, write to the Free Software Foundation, Inc.,
  51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.

  The full GNU General Public License is included in this distribution in
  the file called "COPYING".

  Contact Information
  Openair Admin: openair_admin@eurecom.fr
  Openair Tech : openair_tech@eurecom.fr
  Forums       : http://forums.eurecom.fr/openairinterface
  Address      : EURECOM, Campus SophiaTech, 450 Route des Chappes
                 06410 Biot FRANCE

*******************************************************************************/

#include <stdio.h>
#include <stdlib.h>
#include <stdint.h>

35
36
37
38
#include "assertions.h"
#include "conversions.h"

#include "intertask_interface.h"
Cedric Roux's avatar
 
Cedric Roux committed
39
40
41
42

#include "s1ap_common.h"
#include "s1ap_eNB_defs.h"

Cedric Roux's avatar
Cedric Roux committed
43
44
#include "s1ap_eNB_itti_messaging.h"

45
#include "s1ap_ies_defs.h"
Cedric Roux's avatar
 
Cedric Roux committed
46
#include "s1ap_eNB_encoder.h"
Cedric Roux's avatar
Cedric Roux committed
47
#include "s1ap_eNB_nnsf.h"
48
#include "s1ap_eNB_ue_context.h"
Cedric Roux's avatar
 
Cedric Roux committed
49
#include "s1ap_eNB_nas_procedures.h"
Cedric Roux's avatar
Cedric Roux committed
50
51
#include "s1ap_eNB_management_procedures.h"

52
53
int s1ap_eNB_handle_nas_first_req(
    instance_t instance, s1ap_nas_first_req_t *s1ap_nas_first_req_p)
Cedric Roux's avatar
Cedric Roux committed
54
55
{
    s1ap_eNB_instance_t          *instance_p;
Cedric Roux's avatar
Cedric Roux committed
56
    struct s1ap_eNB_mme_data_s   *mme_desc_p = NULL;
Cedric Roux's avatar
Cedric Roux committed
57
58
    struct s1ap_eNB_ue_context_s *ue_desc_p;

59
60
61
    s1ap_message message;

    S1ap_InitialUEMessageIEs_t *initial_ue_message_p;
Cedric Roux's avatar
Cedric Roux committed
62
63
64
65
66
67
68

    uint8_t  *buffer;
    uint32_t  length;

    DevAssert(s1ap_nas_first_req_p != NULL);

    /* Retrieve the S1AP eNB instance associated with Mod_id */
69
    instance_p = s1ap_eNB_get_instance(instance);
Cedric Roux's avatar
Cedric Roux committed
70
71
72
    DevAssert(instance_p != NULL);

    memset(&message, 0, sizeof(s1ap_message));
Cedric Roux's avatar
 
Cedric Roux committed
73

74
75
    message.direction     = S1AP_PDU_PR_initiatingMessage;
    message.procedureCode = S1ap_ProcedureCode_id_initialUEMessage;
Cedric Roux's avatar
Cedric Roux committed
76

77
    initial_ue_message_p = &message.msg.s1ap_InitialUEMessageIEs;
Cedric Roux's avatar
Cedric Roux committed
78

winckel's avatar
RRC:    
winckel committed
79
80
    /* Select the MME corresponding to the provided GUMMEI. */
    if (s1ap_nas_first_req_p->ue_identity.presenceMask & UE_IDENTITIES_gummei) {
Cedric Roux's avatar
Cedric Roux committed
81
82
83
        mme_desc_p = s1ap_eNB_nnsf_select_mme_by_gummei(
            instance_p,
            s1ap_nas_first_req_p->establishment_cause,
winckel's avatar
RRC:    
winckel committed
84
            s1ap_nas_first_req_p->ue_identity.gummei);
Cedric Roux's avatar
Cedric Roux committed
85
    }
winckel's avatar
RRC:    
winckel committed
86

Cedric Roux's avatar
Cedric Roux committed
87
    if (mme_desc_p == NULL) {
winckel's avatar
RRC:    
winckel committed
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
        /* Select the MME corresponding to the provided s-TMSI. */
        if (s1ap_nas_first_req_p->ue_identity.presenceMask & UE_IDENTITIES_s_tmsi) {
            mme_desc_p = s1ap_eNB_nnsf_select_mme_by_mme_code(
                instance_p,
                s1ap_nas_first_req_p->establishment_cause,
                s1ap_nas_first_req_p->ue_identity.s_tmsi.mme_code);
        }
    }

    if (mme_desc_p == NULL) {
        /*
         * If no MME corresponds to the GUMMEI or the s-TMSI, selects the MME with the
         * highest capacity.
         */
        mme_desc_p = s1ap_eNB_nnsf_select_mme(
                        instance_p,
                        s1ap_nas_first_req_p->establishment_cause);
    }

    if (mme_desc_p == NULL) {
        /*
         * In case eNB has no MME associated, the eNB should inform RRC and discard
         * this request.
         */

Cedric Roux's avatar
Cedric Roux committed
113
114
115
116
117
118
119
120
121
122
123
124
        S1AP_WARN("No MME is associated to the eNB\n");
        // TODO: Inform RRC
        return -1;
    }

    /* The eNB should allocate a unique eNB UE S1AP ID for this UE. The value
     * will be used for the duration of the connectivity.
     */
    ue_desc_p = s1ap_eNB_allocate_new_UE_context();
    DevAssert(ue_desc_p != NULL);

    /* Keep a reference to the selected MME */
125
126
127
    ue_desc_p->mme_ref       = mme_desc_p;
    ue_desc_p->ue_initial_id = s1ap_nas_first_req_p->ue_initial_id;
    ue_desc_p->eNB_instance  = instance_p;
Cedric Roux's avatar
Cedric Roux committed
128
129
130
131
132
133
134

    do {
        struct s1ap_eNB_ue_context_s *collision_p;

        /* Peek a random value for the eNB_ue_s1ap_id */
        ue_desc_p->eNB_ue_s1ap_id = (random() + random()) & 0x00ffffff;
        if ((collision_p = RB_INSERT(s1ap_ue_map, &instance_p->s1ap_ue_head, ue_desc_p))
135
136
137
                == NULL)
        {
            S1AP_DEBUG("Found usable eNB_ue_s1ap_id: 0x%06x\n", ue_desc_p->eNB_ue_s1ap_id);
Cedric Roux's avatar
Cedric Roux committed
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
            /* Break the loop as the id is not already used by another UE */
            break;
        }
    } while(1);

    initial_ue_message_p->eNB_UE_S1AP_ID = ue_desc_p->eNB_ue_s1ap_id;
    /* Prepare the NAS PDU */
    initial_ue_message_p->nas_pdu.buf  = s1ap_nas_first_req_p->nas_pdu.buffer;
    initial_ue_message_p->nas_pdu.size = s1ap_nas_first_req_p->nas_pdu.length;

    /* Set the establishment cause according to those provided by RRC */
    DevCheck(s1ap_nas_first_req_p->establishment_cause < RRC_CAUSE_LAST,
             s1ap_nas_first_req_p->establishment_cause, RRC_CAUSE_LAST, 0);
    initial_ue_message_p->rrC_Establishment_Cause = s1ap_nas_first_req_p->establishment_cause;

winckel's avatar
RRC:    
winckel committed
153
    if (s1ap_nas_first_req_p->ue_identity.presenceMask & UE_IDENTITIES_s_tmsi) {
154
        initial_ue_message_p->presenceMask |= S1AP_INITIALUEMESSAGEIES_S_TMSI_PRESENT;
Cedric Roux's avatar
Cedric Roux committed
155

winckel's avatar
RRC:    
winckel committed
156
        MME_CODE_TO_OCTET_STRING(s1ap_nas_first_req_p->ue_identity.s_tmsi.mme_code,
Cedric Roux's avatar
Cedric Roux committed
157
                                 &initial_ue_message_p->s_tmsi.mMEC);
winckel's avatar
RRC:    
winckel committed
158
        M_TMSI_TO_OCTET_STRING(s1ap_nas_first_req_p->ue_identity.s_tmsi.m_tmsi,
Cedric Roux's avatar
Cedric Roux committed
159
                               &initial_ue_message_p->s_tmsi.m_TMSI);
winckel's avatar
RRC:    
winckel committed
160
161
    }
    if (s1ap_nas_first_req_p->ue_identity.presenceMask & UE_IDENTITIES_gummei) {
162
        initial_ue_message_p->presenceMask |= S1AP_INITIALUEMESSAGEIES_GUMMEI_ID_PRESENT;
Cedric Roux's avatar
Cedric Roux committed
163

winckel's avatar
RRC:    
winckel committed
164
165
        MCC_MNC_TO_PLMNID(s1ap_nas_first_req_p->ue_identity.gummei.mcc,
                          s1ap_nas_first_req_p->ue_identity.gummei.mnc,
Cedric Roux's avatar
Cedric Roux committed
166
                          &initial_ue_message_p->gummei_id.pLMN_Identity);
winckel's avatar
RRC:    
winckel committed
167
        MME_GID_TO_OCTET_STRING(s1ap_nas_first_req_p->ue_identity.gummei.mme_group_id,
Cedric Roux's avatar
Cedric Roux committed
168
                                &initial_ue_message_p->gummei_id.mME_Group_ID);
winckel's avatar
RRC:    
winckel committed
169
        MME_CODE_TO_OCTET_STRING(s1ap_nas_first_req_p->ue_identity.gummei.mme_code,
Cedric Roux's avatar
Cedric Roux committed
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
                                 &initial_ue_message_p->gummei_id.mME_Code);
    }

    /* Assuming TAI is the TAI from the cell */
    INT16_TO_OCTET_STRING(instance_p->tac, &initial_ue_message_p->tai.tAC);
    MCC_MNC_TO_PLMNID(instance_p->mcc, instance_p->mnc,
                      &initial_ue_message_p->tai.pLMNidentity);

    /* Set the EUTRAN CGI
     * The cell identity is defined on 28 bits but as we use macro enb id,
     * we have to pad.
     */
    MACRO_ENB_ID_TO_CELL_IDENTITY(instance_p->eNB_id,
                                  &initial_ue_message_p->eutran_cgi.cell_ID);
    MCC_MNC_TO_TBCD(instance_p->mcc, instance_p->mnc,
                    &initial_ue_message_p->eutran_cgi.pLMNidentity);

    if (s1ap_eNB_encode_pdu(&message, &buffer, &length) < 0) {
        /* Failed to encode message */
189
        DevMessage("Failed to encode initial UE message\n");
Cedric Roux's avatar
Cedric Roux committed
190
191
192
193
194
    }

    /* Update the current S1AP UE state */
    ue_desc_p->ue_state = S1AP_UE_WAITING_CSR;

195
196
197
198
    /* Assign a stream for this UE */
    mme_desc_p->nextstream %= mme_desc_p->out_streams;
    ue_desc_p->stream = ++mme_desc_p->nextstream;

Cedric Roux's avatar
Cedric Roux committed
199
    /* Send encoded message over sctp */
200
201
    s1ap_eNB_itti_send_sctp_data_req(instance_p->instance, mme_desc_p->assoc_id,
                                     buffer, length, ue_desc_p->stream);
Cedric Roux's avatar
Cedric Roux committed
202
203
204

    return 0;
}
Cedric Roux's avatar
 
Cedric Roux committed
205

206
207
int s1ap_eNB_handle_nas_downlink(uint32_t               assoc_id,
                                 uint32_t               stream,
Cedric Roux's avatar
 
Cedric Roux committed
208
209
                                 struct s1ap_message_s *message_p)
{
210
211
212
213
214
    S1ap_DownlinkNASTransportIEs_t *downlink_NAS_transport_p;

    s1ap_eNB_mme_data_t   *mme_desc_p;
    s1ap_eNB_ue_context_t *ue_desc_p;
    s1ap_eNB_instance_t   *s1ap_eNB_instance;
Cedric Roux's avatar
 
Cedric Roux committed
215
216
217

    DevAssert(message_p != NULL);

218
    downlink_NAS_transport_p = &message_p->msg.s1ap_DownlinkNASTransportIEs;
Cedric Roux's avatar
 
Cedric Roux committed
219
220

    /* UE-related procedure -> stream != 0 */
221
222
223
    if (stream == 0) {
        S1AP_ERROR("[SCTP %d] Received UE-related procedure on stream == 0\n",
                   assoc_id);
Cedric Roux's avatar
 
Cedric Roux committed
224
225
226
        return -1;
    }

Cedric Roux's avatar
Cedric Roux committed
227
    if ((mme_desc_p = s1ap_eNB_get_MME(NULL, assoc_id, 0)) == NULL) {
228
        S1AP_ERROR("[SCTP %d] Received NAS downlink message for non "
Cedric Roux's avatar
Cedric Roux committed
229
230
231
232
233
234
235
236
237
                   "existing MME context\n", assoc_id);
        return -1;
    }

    s1ap_eNB_instance = mme_desc_p->s1ap_eNB_instance;

    if ((ue_desc_p = s1ap_eNB_get_ue_context(s1ap_eNB_instance,
         downlink_NAS_transport_p->eNB_UE_S1AP_ID)) == NULL)
    {
238
        S1AP_ERROR("[SCTP %d] Received NAS downlink message for non "
239
        "existing UE context: 0x%06x\n", assoc_id,
240
        downlink_NAS_transport_p->eNB_UE_S1AP_ID);
Cedric Roux's avatar
Cedric Roux committed
241
242
        return -1;
    }
Cedric Roux's avatar
 
Cedric Roux committed
243
244
245
246

    /* Is it the first outcome of the MME for this UE ? If so store the mme
     * UE s1ap id.
     */
Cedric Roux's avatar
Cedric Roux committed
247
248
249
250
251
    if (ue_desc_p->mme_ue_s1ap_id == 0) {
        ue_desc_p->mme_ue_s1ap_id = downlink_NAS_transport_p->mme_ue_s1ap_id;
    } else {
        /* We already have a mme ue s1ap id check the received is the same */
        if (ue_desc_p->mme_ue_s1ap_id != downlink_NAS_transport_p->mme_ue_s1ap_id) {
252
            S1AP_ERROR("[SCTP %d] Mismatch in MME UE S1AP ID (0x%08x != 0x%08x)\n",
Cedric Roux's avatar
Cedric Roux committed
253
254
255
256
257
                       downlink_NAS_transport_p->mme_ue_s1ap_id,
                       ue_desc_p->mme_ue_s1ap_id,
                       assoc_id);
        }
    }
Cedric Roux's avatar
 
Cedric Roux committed
258

Cedric Roux's avatar
Cedric Roux committed
259
    /* Forward the NAS PDU to RRC */
260
    s1ap_eNB_itti_send_nas_downlink_ind(s1ap_eNB_instance->instance,
261
262
                                        ue_desc_p->ue_initial_id,
                                        ue_desc_p->eNB_ue_s1ap_id,
Cedric Roux's avatar
Cedric Roux committed
263
264
                                        downlink_NAS_transport_p->nas_pdu.buf,
                                        downlink_NAS_transport_p->nas_pdu.size);
Cedric Roux's avatar
 
Cedric Roux committed
265

266
267
    ue_desc_p->ue_initial_id = 0;

Cedric Roux's avatar
 
Cedric Roux committed
268
269
270
    return 0;
}

271
int s1ap_eNB_nas_uplink(instance_t instance, s1ap_uplink_nas_t *s1ap_uplink_nas_p)
Cedric Roux's avatar
Cedric Roux committed
272
273
274
{
    struct s1ap_eNB_ue_context_s *ue_context_p;
    s1ap_eNB_instance_t          *s1ap_eNB_instance_p;
275
    S1ap_UplinkNASTransportIEs_t *uplink_NAS_transport_p;
Cedric Roux's avatar
Cedric Roux committed
276
277
278
279
280
281
282
283
284

    s1ap_message  message;

    uint8_t  *buffer;
    uint32_t length;

    DevAssert(s1ap_uplink_nas_p != NULL);

    /* Retrieve the S1AP eNB instance associated with Mod_id */
285
    s1ap_eNB_instance_p = s1ap_eNB_get_instance(instance);
Cedric Roux's avatar
Cedric Roux committed
286
287
288
289
290
    DevAssert(s1ap_eNB_instance_p != NULL);

    if ((ue_context_p = s1ap_eNB_get_ue_context(s1ap_eNB_instance_p, s1ap_uplink_nas_p->eNB_ue_s1ap_id)) == NULL)
    {
        /* The context for this eNB ue s1ap id doesn't exist in the map of eNB UEs */
291
        S1AP_WARN("Failed to find ue context associated with eNB ue s1ap id: %06x\n",
Cedric Roux's avatar
Cedric Roux committed
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
                  s1ap_uplink_nas_p->eNB_ue_s1ap_id);
        return -1;
    }

    /* Uplink NAS transport can occur either during an s1ap connected state
     * or during initial attach (for example: NAS authentication).
     */
    if (!(ue_context_p->ue_state == S1AP_UE_CONNECTED ||
        ue_context_p->ue_state == S1AP_UE_WAITING_CSR))
    {
        S1AP_WARN("You are attempting to send NAS data over non-connected "
                  "eNB ue s1ap id: %u, current state: %d\n",
                  s1ap_uplink_nas_p->eNB_ue_s1ap_id, ue_context_p->ue_state);
        return -1;
    }

    /* Prepare the S1AP message to encode */
    memset(&message, 0, sizeof(s1ap_message));

311
312
    message.direction     = S1AP_PDU_PR_initiatingMessage;
    message.procedureCode = S1ap_ProcedureCode_id_uplinkNASTransport;
Cedric Roux's avatar
Cedric Roux committed
313

314
    uplink_NAS_transport_p = &message.msg.s1ap_UplinkNASTransportIEs;
Cedric Roux's avatar
Cedric Roux committed
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338

    uplink_NAS_transport_p->mme_ue_s1ap_id = ue_context_p->mme_ue_s1ap_id;
    uplink_NAS_transport_p->eNB_UE_S1AP_ID = ue_context_p->eNB_ue_s1ap_id;

    uplink_NAS_transport_p->nas_pdu.buf  = s1ap_uplink_nas_p->nas_pdu.buffer;
    uplink_NAS_transport_p->nas_pdu.size = s1ap_uplink_nas_p->nas_pdu.length;

    MCC_MNC_TO_PLMNID(s1ap_eNB_instance_p->mcc, s1ap_eNB_instance_p->mnc,
                      &uplink_NAS_transport_p->eutran_cgi.pLMNidentity);
    MACRO_ENB_ID_TO_CELL_IDENTITY(s1ap_eNB_instance_p->eNB_id,
                                  &uplink_NAS_transport_p->eutran_cgi.cell_ID);

    /* MCC/MNC should be repeated in TAI and EUTRAN CGI */
    MCC_MNC_TO_PLMNID(s1ap_eNB_instance_p->mcc, s1ap_eNB_instance_p->mnc,
                      &uplink_NAS_transport_p->tai.pLMNidentity);
    TAC_TO_ASN1(s1ap_eNB_instance_p->tac, &uplink_NAS_transport_p->tai.tAC);

    if (s1ap_eNB_encode_pdu(&message, &buffer, &length) < 0) {
        S1AP_ERROR("Failed to encode uplink NAS transport\n");
        /* Encode procedure has failed... */
        return -1;
    }

    /* UE associated signalling -> use the allocated stream */
339
340
    s1ap_eNB_itti_send_sctp_data_req(s1ap_eNB_instance_p->instance,
                                     ue_context_p->mme_ref->assoc_id, buffer,
Cedric Roux's avatar
Cedric Roux committed
341
342
343
344
                                     length, ue_context_p->stream);

    return 0;
}
345

346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
int s1ap_eNB_initial_ctxt_resp(
    instance_t instance, s1ap_initial_context_setup_resp_t *initial_ctxt_resp_p)
{
    s1ap_eNB_instance_t          *s1ap_eNB_instance_p;
    struct s1ap_eNB_ue_context_s *ue_context_p;

    S1ap_InitialContextSetupResponseIEs_t *initial_ies_p;

    s1ap_message  message;

    uint8_t  *buffer;
    uint32_t length;
    int      ret = -1;
    int      i;

winckel's avatar
RRC:    
winckel committed
361
362
363
    /* Retrieve the S1AP eNB instance associated with Mod_id */
    s1ap_eNB_instance_p = s1ap_eNB_get_instance(instance);

364
365
366
367
368
369
370
    DevAssert(initial_ctxt_resp_p != NULL);
    DevAssert(s1ap_eNB_instance_p != NULL);

    if ((ue_context_p = s1ap_eNB_get_ue_context(s1ap_eNB_instance_p,
        initial_ctxt_resp_p->eNB_ue_s1ap_id)) == NULL)
    {
        /* The context for this eNB ue s1ap id doesn't exist in the map of eNB UEs */
371
        S1AP_WARN("Failed to find ue context associated with eNB ue s1ap id: 0x%06x\n",
372
373
374
375
376
377
378
379
380
381
382
                  initial_ctxt_resp_p->eNB_ue_s1ap_id);
        return -1;
    }

    /* Uplink NAS transport can occur either during an s1ap connected state
     * or during initial attach (for example: NAS authentication).
     */
    if (!(ue_context_p->ue_state == S1AP_UE_CONNECTED ||
        ue_context_p->ue_state == S1AP_UE_WAITING_CSR))
    {
        S1AP_WARN("You are attempting to send NAS data over non-connected "
383
                  "eNB ue s1ap id: %06x, current state: %d\n",
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
411
412
413
414
                  initial_ctxt_resp_p->eNB_ue_s1ap_id, ue_context_p->ue_state);
        return -1;
    }

    /* Prepare the S1AP message to encode */
    memset(&message, 0, sizeof(s1ap_message));

    message.direction     = S1AP_PDU_PR_successfulOutcome;
    message.procedureCode = S1ap_ProcedureCode_id_InitialContextSetup;

    initial_ies_p = &message.msg.s1ap_InitialContextSetupResponseIEs;

    initial_ies_p->eNB_UE_S1AP_ID = initial_ctxt_resp_p->eNB_ue_s1ap_id;
    initial_ies_p->mme_ue_s1ap_id = ue_context_p->mme_ue_s1ap_id;

    for (i = 0; i < initial_ctxt_resp_p->nb_of_e_rabs; i++)
    {
        S1ap_E_RABSetupItemCtxtSURes_t *new_item;

        new_item = calloc(1, sizeof(S1ap_E_RABSetupItemCtxtSURes_t));

        new_item->e_RAB_ID = initial_ctxt_resp_p->e_rabs[i].e_rab_id;
        GTP_TEID_TO_ASN1(initial_ctxt_resp_p->e_rabs[i].gtp_teid, &new_item->gTP_TEID);
        new_item->transportLayerAddress.buf = initial_ctxt_resp_p->e_rabs[i].eNB_addr.buffer;
        new_item->transportLayerAddress.size = initial_ctxt_resp_p->e_rabs[i].eNB_addr.length;
        new_item->transportLayerAddress.bits_unused = 0;

        ASN_SEQUENCE_ADD(&initial_ies_p->e_RABSetupListCtxtSURes.s1ap_E_RABSetupItemCtxtSURes,
                         new_item);
    }

415
416
    if (s1ap_eNB_encode_pdu(&message, &buffer, &length) < 0)
    {
417
418
419
420
421
422
        S1AP_ERROR("Failed to encode uplink NAS transport\n");
        /* Encode procedure has failed... */
        return -1;
    }

    /* UE associated signalling -> use the allocated stream */
423
424
    s1ap_eNB_itti_send_sctp_data_req(s1ap_eNB_instance_p->instance,
                                     ue_context_p->mme_ref->assoc_id, buffer,
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
                                     length, ue_context_p->stream);

    return ret;
}

int s1ap_eNB_ue_capabilities(instance_t instance,
                             s1ap_ue_cap_info_ind_t *ue_cap_info_ind_p)
{
    s1ap_eNB_instance_t          *s1ap_eNB_instance_p;
    struct s1ap_eNB_ue_context_s *ue_context_p;

    S1ap_UECapabilityInfoIndicationIEs_t *ue_cap_info_ind_ies_p;

    s1ap_message  message;

    uint8_t  *buffer;
    uint32_t length;
    int      ret = -1;

winckel's avatar
RRC:    
winckel committed
444
445
446
    /* Retrieve the S1AP eNB instance associated with Mod_id */
    s1ap_eNB_instance_p = s1ap_eNB_get_instance(instance);

447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
    DevAssert(ue_cap_info_ind_p != NULL);
    DevAssert(s1ap_eNB_instance_p != NULL);

    if ((ue_context_p = s1ap_eNB_get_ue_context(s1ap_eNB_instance_p,
        ue_cap_info_ind_p->eNB_ue_s1ap_id)) == NULL)
    {
        /* The context for this eNB ue s1ap id doesn't exist in the map of eNB UEs */
        S1AP_WARN("Failed to find ue context associated with eNB ue s1ap id: %u\n",
                  ue_cap_info_ind_p->eNB_ue_s1ap_id);
        return -1;
    }

    /* UE capabilities message can occur either during an s1ap connected state
     * or during initial attach (for example: NAS authentication).
     */
    if (!(ue_context_p->ue_state == S1AP_UE_CONNECTED ||
        ue_context_p->ue_state == S1AP_UE_WAITING_CSR))
    {
        S1AP_WARN("You are attempting to send NAS data over non-connected "
        "eNB ue s1ap id: %u, current state: %d\n",
        ue_cap_info_ind_p->eNB_ue_s1ap_id, ue_context_p->ue_state);
        return -1;
    }

    /* Prepare the S1AP message to encode */
    memset(&message, 0, sizeof(s1ap_message));

    message.direction     = S1AP_PDU_PR_initiatingMessage;
    message.procedureCode = S1ap_ProcedureCode_id_UECapabilityInfoIndication;

    ue_cap_info_ind_ies_p = &message.msg.s1ap_UECapabilityInfoIndicationIEs;

    ue_cap_info_ind_ies_p->ueRadioCapability.buf = ue_cap_info_ind_p->ue_radio_cap.buffer;
    ue_cap_info_ind_ies_p->ueRadioCapability.size = ue_cap_info_ind_p->ue_radio_cap.length;

    ue_cap_info_ind_ies_p->eNB_UE_S1AP_ID = ue_cap_info_ind_p->eNB_ue_s1ap_id;
    ue_cap_info_ind_ies_p->mme_ue_s1ap_id = ue_context_p->mme_ue_s1ap_id;

    if (s1ap_eNB_encode_pdu(&message, &buffer, &length) < 0) {
        /* Encode procedure has failed... */
        S1AP_ERROR("Failed to encode UE capabilities indication\n");
        return -1;
    }

    /* UE associated signalling -> use the allocated stream */
492
493
    s1ap_eNB_itti_send_sctp_data_req(s1ap_eNB_instance_p->instance,
                                     ue_context_p->mme_ref->assoc_id, buffer,
494
495
496
497
                                     length, ue_context_p->stream);

    return ret;
}