s1ap_eNB_nas_procedures.c 18.4 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
125
126
127
128
129
130
131
132
133
        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 */
    ue_desc_p->mme_ref = mme_desc_p;
    ue_desc_p->rnti    = s1ap_nas_first_req_p->rnti;

    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))
134
135
136
                == 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
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
            /* 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
152
    if (s1ap_nas_first_req_p->ue_identity.presenceMask & UE_IDENTITIES_s_tmsi) {
153
        initial_ue_message_p->presenceMask |= S1AP_INITIALUEMESSAGEIES_S_TMSI_PRESENT;
Cedric Roux's avatar
Cedric Roux committed
154

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

winckel's avatar
RRC:    
winckel committed
163
164
        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
165
                          &initial_ue_message_p->gummei_id.pLMN_Identity);
winckel's avatar
RRC:    
winckel committed
166
        MME_GID_TO_OCTET_STRING(s1ap_nas_first_req_p->ue_identity.gummei.mme_group_id,
Cedric Roux's avatar
Cedric Roux committed
167
                                &initial_ue_message_p->gummei_id.mME_Group_ID);
winckel's avatar
RRC:    
winckel committed
168
        MME_CODE_TO_OCTET_STRING(s1ap_nas_first_req_p->ue_identity.gummei.mme_code,
Cedric Roux's avatar
Cedric Roux committed
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
                                 &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 */
188
        DevMessage("Failed to encode initial UE message\n");
Cedric Roux's avatar
Cedric Roux committed
189
190
191
192
193
    }

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

194
195
196
197
    /* 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
198
    /* Send encoded message over sctp */
199
200
    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
201
202
203

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

205
206
int s1ap_eNB_handle_nas_downlink(uint32_t               assoc_id,
                                 uint32_t               stream,
Cedric Roux's avatar
 
Cedric Roux committed
207
208
                                 struct s1ap_message_s *message_p)
{
209
210
211
212
213
    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
214
215
216

    DevAssert(message_p != NULL);

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

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

Cedric Roux's avatar
Cedric Roux committed
226
    if ((mme_desc_p = s1ap_eNB_get_MME(NULL, assoc_id, 0)) == NULL) {
227
        S1AP_ERROR("[SCTP %d] Received NAS downlink message for non "
Cedric Roux's avatar
Cedric Roux committed
228
229
230
231
232
233
234
235
236
                   "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)
    {
237
238
239
        S1AP_ERROR("[SCTP %d] Received NAS downlink message for non "
        "existing UE context: %06x\n", assoc_id,
        downlink_NAS_transport_p->eNB_UE_S1AP_ID);
Cedric Roux's avatar
Cedric Roux committed
240
241
        return -1;
    }
Cedric Roux's avatar
 
Cedric Roux committed
242
243
244
245

    /* 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
246
247
248
249
250
    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) {
251
            S1AP_ERROR("[SCTP %d] Mismatch in MME UE S1AP ID (0x%08x != 0x%08x)\n",
Cedric Roux's avatar
Cedric Roux committed
252
253
254
255
256
                       downlink_NAS_transport_p->mme_ue_s1ap_id,
                       ue_desc_p->mme_ue_s1ap_id,
                       assoc_id);
        }
    }
Cedric Roux's avatar
 
Cedric Roux committed
257

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

    return 0;
}

266
int s1ap_eNB_nas_uplink(instance_t instance, s1ap_uplink_nas_t *s1ap_uplink_nas_p)
Cedric Roux's avatar
Cedric Roux committed
267
268
269
{
    struct s1ap_eNB_ue_context_s *ue_context_p;
    s1ap_eNB_instance_t          *s1ap_eNB_instance_p;
270
    S1ap_UplinkNASTransportIEs_t *uplink_NAS_transport_p;
Cedric Roux's avatar
Cedric Roux committed
271
272
273
274
275
276
277
278
279

    s1ap_message  message;

    uint8_t  *buffer;
    uint32_t length;

    DevAssert(s1ap_uplink_nas_p != NULL);

    /* Retrieve the S1AP eNB instance associated with Mod_id */
280
    s1ap_eNB_instance_p = s1ap_eNB_get_instance(instance);
Cedric Roux's avatar
Cedric Roux committed
281
282
283
284
285
    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 */
286
        S1AP_WARN("Failed to find ue context associated with eNB ue s1ap id: %06x\n",
Cedric Roux's avatar
Cedric Roux committed
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
                  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));

306
307
    message.direction     = S1AP_PDU_PR_initiatingMessage;
    message.procedureCode = S1ap_ProcedureCode_id_uplinkNASTransport;
Cedric Roux's avatar
Cedric Roux committed
308

309
    uplink_NAS_transport_p = &message.msg.s1ap_UplinkNASTransportIEs;
Cedric Roux's avatar
Cedric Roux committed
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333

    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 */
334
335
    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
336
337
338
339
                                     length, ue_context_p->stream);

    return 0;
}
340

341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
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
356
357
358
    /* Retrieve the S1AP eNB instance associated with Mod_id */
    s1ap_eNB_instance_p = s1ap_eNB_get_instance(instance);

359
360
361
362
363
364
365
    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 */
366
        S1AP_WARN("Failed to find ue context associated with eNB ue s1ap id: 0x%06x\n",
367
368
369
370
371
372
373
374
375
376
377
                  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 "
378
                  "eNB ue s1ap id: %06x, current state: %d\n",
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
411
412
413
414
415
416
                  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);
    }

    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 */
417
418
    s1ap_eNB_itti_send_sctp_data_req(s1ap_eNB_instance_p->instance,
                                     ue_context_p->mme_ref->assoc_id, buffer,
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
                                     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
438
439
440
    /* Retrieve the S1AP eNB instance associated with Mod_id */
    s1ap_eNB_instance_p = s1ap_eNB_get_instance(instance);

441
442
443
444
445
446
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
    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 */
486
487
    s1ap_eNB_itti_send_sctp_data_req(s1ap_eNB_instance_p->instance,
                                     ue_context_p->mme_ref->assoc_id, buffer,
488
489
490
491
                                     length, ue_context_p->stream);

    return ret;
}