/*******************************************************************************
OpenAirInterface
Copyright(c) 1999 - 2014 Eurecom
OpenAirInterface is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
OpenAirInterface is distributed in the hope that 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 OpenAirInterface.The full GNU General Public License is
included in this distribution in the file called "COPYING". If not,
see .
Contact Information
OpenAirInterface Admin: openair_admin@eurecom.fr
OpenAirInterface Tech : openair_tech@eurecom.fr
OpenAirInterface Dev : openair4g-devel@eurecom.fr
Address : Eurecom, Compus SophiaTech 450, route des chappes, 06451 Biot, France.
*******************************************************************************/
#include
#include
#include "mme_config.h"
#include "assertions.h"
#include "conversions.h"
#include "intertask_interface.h"
#include "s6a_defs.h"
#include "s6a_messages.h"
int s6a_ula_cb(
struct msg **msg_pP,
struct avp *paramavp_pP,
struct session *sess_pP,
void *opaque_pP,
enum disp_action *act_pP)
{
struct msg *ans_p = NULL;
struct msg *qry_p = NULL;
struct avp *avp_p = NULL;
struct avp_hdr *hdr_p = NULL;
MessageDef *message_p = NULL;
s6a_update_location_ans_t *s6a_update_location_ans_p = NULL;
DevAssert(msg_pP != NULL);
ans_p = *msg_pP;
/* Retrieve the original query associated with the asnwer */
CHECK_FCT(fd_msg_answ_getq(ans_p, &qry_p));
DevAssert(qry_p != NULL);
message_p = itti_alloc_new_message(TASK_S6A, S6A_UPDATE_LOCATION_ANS);
s6a_update_location_ans_p = &message_p->ittiMsg.s6a_update_location_ans;
CHECK_FCT(fd_msg_search_avp(qry_p, s6a_fd_cnf.dataobj_s6a_user_name, &avp_p));
if (avp_p) {
CHECK_FCT(fd_msg_avp_hdr(avp_p, &hdr_p));
memcpy(s6a_update_location_ans_p->imsi, hdr_p->avp_value->os.data, hdr_p->avp_value->os.len);
s6a_update_location_ans_p->imsi[hdr_p->avp_value->os.len] = '\0';
s6a_update_location_ans_p->imsi_length = hdr_p->avp_value->os.len;
S6A_DEBUG("Received s6a ula for imsi=%*s\n",
(int)hdr_p->avp_value->os.len,
hdr_p->avp_value->os.data);
} else {
DevMessage("Query has been freed before we received the answer\n");
}
/* Retrieve the result-code */
CHECK_FCT(fd_msg_search_avp(ans_p, s6a_fd_cnf.dataobj_s6a_result_code, &avp_p));
if (avp_p) {
CHECK_FCT(fd_msg_avp_hdr(avp_p, &hdr_p));
s6a_update_location_ans_p->result.present = S6A_RESULT_BASE;
s6a_update_location_ans_p->result.choice.base = hdr_p->avp_value->u32;
if (hdr_p->avp_value->u32 != ER_DIAMETER_SUCCESS) {
S6A_ERROR("Got error %u:%s\n", hdr_p->avp_value->u32,
retcode_2_string(hdr_p->avp_value->u32));
goto err;
}
} else {
/* The result-code is not present, may be it is an experimental result
* avp_p indicating a 3GPP specific failure.
*/
CHECK_FCT(fd_msg_search_avp(ans_p, s6a_fd_cnf.dataobj_s6a_experimental_result, &avp_p));
if (avp_p) {
/* The procedure has failed within the HSS.
* NOTE: contrary to result-code, the experimental-result is a grouped
* AVP and requires parsing its childs to get the code back.
*/
s6a_update_location_ans_p->result.present = S6A_RESULT_EXPERIMENTAL;
s6a_parse_experimental_result(avp_p, &s6a_update_location_ans_p->result.choice.experimental);
goto err;
} else {
/* Neither result-code nor experimental-result is present ->
* totally incorrect behaviour here.
*/
S6A_ERROR("Experimental-Result and Result-Code are absent: "
"This is not a correct behaviour\n");
goto err;
}
}
/* Retrieving the ULA flags */
CHECK_FCT(fd_msg_search_avp(ans_p, s6a_fd_cnf.dataobj_s6a_ula_flags, &avp_p));
if (avp_p) {
CHECK_FCT(fd_msg_avp_hdr(avp_p, &hdr_p));
/* This bit, when set, indicates that the HSS stores SGSN number
* and MME number in separate memory. A Rel-8 HSS shall set
* the bit.
*/
if (!FLAG_IS_SET(hdr_p->avp_value->u32, ULA_SEPARATION_IND)) {
S6A_ERROR("ULA-Flags does not indicate the HSS is post Rel.8: "
"This behaviour is not compliant\n");
goto err;
}
} else {
/* ULA-Flags is absent while the error code indicates DIAMETER_SUCCESS:
* this is not a compliant behaviour...
* TODO: handle this case.
*/
S6A_ERROR("ULA-Flags AVP is absent while result code indicates "
"DIAMETER_SUCCESS\n");
goto err;
}
CHECK_FCT(fd_msg_search_avp(ans_p, s6a_fd_cnf.dataobj_s6a_subscription_data, &avp_p));
if (avp_p) {
CHECK_FCT(s6a_parse_subscription_data(avp_p, &s6a_update_location_ans_p->subscription_data));
#if defined(DISABLE_USE_NAS)
#else
// LG COMMENTED THIS (2014/04/01)-> DevParam(0, 0, 0);
#endif
}
err:
ans_p = NULL;
itti_send_msg_to_task(TASK_MME_APP, INSTANCE_DEFAULT, message_p);
S6A_DEBUG("Sending S6A_UPDATE_LOCATION_ANS to task MME_APP\n");
return 0;
}
int s6a_generate_update_location(s6a_update_location_req_t *ulr_pP)
{
struct avp *avp_p = NULL;
struct msg *msg_p = NULL;
struct session *sess_p = NULL;
union avp_value value;
DevAssert(ulr_pP != NULL);
/* Create the new update location request message */
CHECK_FCT(fd_msg_new(s6a_fd_cnf.dataobj_s6a_ulr, 0, &msg_p));
/* Create a new session */
CHECK_FCT(fd_sess_new(&sess_p, fd_g_config->cnf_diamid,
fd_g_config->cnf_diamid_len, (os0_t)"apps6a", 6));
{
os0_t sid;
size_t sidlen;
CHECK_FCT(fd_sess_getsid(sess_p, &sid, &sidlen));
CHECK_FCT(fd_msg_avp_new(s6a_fd_cnf.dataobj_s6a_session_id, 0, &avp_p));
value.os.data = sid;
value.os.len = sidlen;
CHECK_FCT(fd_msg_avp_setvalue(avp_p, &value));
CHECK_FCT(fd_msg_avp_add(msg_p, MSG_BRW_FIRST_CHILD, avp_p));
}
CHECK_FCT(fd_msg_avp_new(s6a_fd_cnf.dataobj_s6a_auth_session_state, 0, &avp_p));
/* No State maintained */
value.i32 = 1;
CHECK_FCT(fd_msg_avp_setvalue(avp_p, &value));
CHECK_FCT(fd_msg_avp_add(msg_p, MSG_BRW_LAST_CHILD, avp_p));
/* Add Origin_Host & Origin_Realm */
CHECK_FCT(fd_msg_add_origin(msg_p, 0));
config_read_lock(&mme_config);
/* Destination Host */
{
char host[40] = "hss.";
size_t hostlen;
strcat(host, mme_config.realm);
hostlen = strlen(host);
CHECK_FCT(fd_msg_avp_new(s6a_fd_cnf.dataobj_s6a_destination_host, 0, &avp_p));
value.os.data = (unsigned char *)host;
value.os.len = hostlen;
CHECK_FCT(fd_msg_avp_setvalue(avp_p, &value));
CHECK_FCT(fd_msg_avp_add(msg_p, MSG_BRW_LAST_CHILD, avp_p));
}
/* Destination_Realm */
{
char *realm = mme_config.realm;
size_t realmlen = strlen(realm);
CHECK_FCT(fd_msg_avp_new(s6a_fd_cnf.dataobj_s6a_destination_realm, 0, &avp_p));
value.os.data = (unsigned char *)realm;
value.os.len = realmlen;
CHECK_FCT(fd_msg_avp_setvalue(avp_p, &value));
CHECK_FCT(fd_msg_avp_add(msg_p, MSG_BRW_LAST_CHILD, avp_p));
}
config_unlock(&mme_config);
/* Adding the User-Name (IMSI) */
CHECK_FCT(fd_msg_avp_new(s6a_fd_cnf.dataobj_s6a_user_name, 0, &avp_p));
value.os.data = (unsigned char *)ulr_pP->imsi;
value.os.len = strlen(ulr_pP->imsi);
CHECK_FCT(fd_msg_avp_setvalue(avp_p, &value));
CHECK_FCT(fd_msg_avp_add(msg_p, MSG_BRW_LAST_CHILD, avp_p));
/* Adding the visited plmn id */
{
uint8_t plmn[3];
CHECK_FCT(fd_msg_avp_new(s6a_fd_cnf.dataobj_s6a_visited_plmn_id, 0, &avp_p));
PLMN_T_TO_TBCD(ulr_pP->visited_plmn,
plmn,
mme_config_find_mnc_length(ulr_pP->visited_plmn.MCCdigit1,
ulr_pP->visited_plmn.MCCdigit2,
ulr_pP->visited_plmn.MCCdigit3,
ulr_pP->visited_plmn.MNCdigit1,
ulr_pP->visited_plmn.MNCdigit2,
ulr_pP->visited_plmn.MNCdigit3
)
);
printf("PLMN: %3s\n", plmn);
value.os.data = plmn;
value.os.len = 3;
CHECK_FCT(fd_msg_avp_setvalue(avp_p, &value));
CHECK_FCT(fd_msg_avp_add(msg_p, MSG_BRW_LAST_CHILD, avp_p));
}
/* Adding the RAT-Type */
CHECK_FCT(fd_msg_avp_new(s6a_fd_cnf.dataobj_s6a_rat_type, 0, &avp_p));
DevCheck(ulr_pP->rat_type == RAT_EUTRAN, ulr_pP->rat_type, 0, 0);
value.u32 = ulr_pP->rat_type;
CHECK_FCT(fd_msg_avp_setvalue(avp_p, &value));
CHECK_FCT(fd_msg_avp_add(msg_p, MSG_BRW_LAST_CHILD, avp_p));
/* Adding ULR-Flags */
CHECK_FCT(fd_msg_avp_new(s6a_fd_cnf.dataobj_s6a_ulr_flags, 0, &avp_p));
value.u32 = 0;
/* Identify the ULR as coming from S6A interface (i.e. from MME) */
FLAGS_SET(value.u32, ULR_S6A_S6D_INDICATOR);
/* Set the ulr-flags as indicated by upper layer */
if (ulr_pP->skip_subscriber_data) {
FLAGS_SET(value.u32, ULR_SKIP_SUBSCRIBER_DATA);
}
if (ulr_pP->initial_attach) {
FLAGS_SET(value.u32, ULR_INITIAL_ATTACH_IND);
}
CHECK_FCT(fd_msg_avp_setvalue(avp_p, &value));
CHECK_FCT(fd_msg_avp_add(msg_p, MSG_BRW_LAST_CHILD, avp_p));
CHECK_FCT(fd_msg_send(&msg_p, NULL, NULL));
S6A_DEBUG("Sending s6a ulr for imsi=%s\n", ulr_pP->imsi);
return 0;
}