#define TRACE_MODULE _esm_handler

#include "core_debug.h"

#include "nas_message.h"

#include "mme_context.h"
#include "mme_event.h"
#include "esm_build.h"
#include "s1ap_build.h"
#include "s1ap_path.h"
#include "nas_path.h"

void esm_handle_pdn_connectivity_request(mme_bearer_t *bearer, 
        nas_pdn_connectivity_request_t *pdn_connectivity_request)
{
    if (pdn_connectivity_request->presencemask &
            NAS_PDN_CONNECTIVITY_REQUEST_PROTOCOL_CONFIGURATION_OPTIONS_PRESENT)
    {
        nas_protocol_configuration_options_t *protocol_configuration_options = 
            &pdn_connectivity_request->protocol_configuration_options;
        bearer->ue_pco_len = protocol_configuration_options->length;
        d_assert(bearer->ue_pco_len <= MAX_PCO_LEN, return, 
                "length(%d) exceeds MAX:%d", bearer->ue_pco_len, MAX_PCO_LEN);
        memcpy(bearer->ue_pco, protocol_configuration_options->buffer, 
                bearer->ue_pco_len);
    }
}

void esm_handle_information_request(mme_sess_t *sess)
{
    status_t rv;
    pkbuf_t *esmbuf = NULL;
    mme_ue_t *mme_ue = NULL;
    mme_bearer_t *bearer = NULL;

    d_assert(sess, return, "Null param");
    mme_ue = sess->mme_ue;
    d_assert(mme_ue, return, "Null param");
    bearer = mme_default_bearer_in_sess(sess);
    d_assert(bearer, return, "Null param");

    rv = esm_build_information_request(&esmbuf, bearer);
    d_assert(rv == CORE_OK && esmbuf, return, "esm_build failed");
    d_assert(nas_send_to_downlink_nas_transport(mme_ue, esmbuf) == CORE_OK,,);
}


void esm_handle_information_response(mme_bearer_t *bearer, 
        nas_esm_information_response_t *esm_information_response)
{
    mme_ue_t *mme_ue = NULL;
    mme_sess_t *sess = NULL;

    d_assert(bearer, return, "Null param");
    mme_ue = bearer->mme_ue;
    d_assert(mme_ue, return, "Null param");
    sess = bearer->sess;
    d_assert(sess, return, "Null param");

    if (esm_information_response->presencemask &
            NAS_ESM_INFORMATION_RESPONSE_ACCESS_POINT_NAME_PRESENT)
    {
        sess->pdn = mme_pdn_find_by_apn(mme_ue, 
                esm_information_response->access_point_name.apn);
        d_assert(sess->pdn, return, "No PDN Context[APN:%s])", 
            esm_information_response->access_point_name.apn);
    }

    if (esm_information_response->presencemask &
            NAS_ESM_INFORMATION_RESPONSE_PROTOCOL_CONFIGURATION_OPTIONS_PRESENT)
    {
        nas_protocol_configuration_options_t *protocol_configuration_options = 
            &esm_information_response->protocol_configuration_options;
        bearer->ue_pco_len = protocol_configuration_options->length;
        d_assert(bearer->ue_pco_len <= MAX_PCO_LEN, return, 
                "length(%d) exceeds MAX:%d", bearer->ue_pco_len, MAX_PCO_LEN);
        memcpy(bearer->ue_pco, protocol_configuration_options->buffer, 
                bearer->ue_pco_len);
    }
}