open5gs/src/pcrf/pcrf-rx-path.c

893 lines
31 KiB
C

/*
* Copyright (C) 2019 by Sukchan Lee <acetcom@gmail.com>
*
* This file is part of Open5GS.
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU Affero General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program 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 this program. If not, see <https://www.gnu.org/licenses/>.
*/
#include "pcrf-context.h"
#include "pcrf-fd-path.h"
struct sess_state {
os0_t rx_sid; /* Rx Session-Id */
os0_t gx_sid; /* Gx Session-Id */
os0_t peer_host; /* Peer Host */
#define SESSION_ABORTED 1
int state;
int abort_cause;
int termination_cause;
struct timespec ts; /* Time of sending the message */
};
static OGS_POOL(sess_state_pool, struct sess_state);
static ogs_thread_mutex_t sess_state_mutex;
static struct session_handler *pcrf_rx_reg = NULL;
static struct disp_hdl *hdl_rx_fb = NULL;
static struct disp_hdl *hdl_rx_aar = NULL;
static struct disp_hdl *hdl_rx_str = NULL;
static void pcrf_rx_asa_cb(void *data, struct msg **msg);
static __inline__ struct sess_state *new_state(os0_t sid)
{
struct sess_state *new = NULL;
ogs_thread_mutex_lock(&sess_state_mutex);
ogs_pool_alloc(&sess_state_pool, &new);
ogs_expect_or_return_val(new, NULL);
memset(new, 0, sizeof(*new));
ogs_thread_mutex_unlock(&sess_state_mutex);
new->rx_sid = (os0_t)ogs_strdup((char *)sid);
ogs_expect_or_return_val(new->rx_sid, NULL);
return new;
}
static void state_cleanup(struct sess_state *sess_data, os0_t sid, void *opaque)
{
ogs_assert(sess_data);
if (sess_data->rx_sid)
ogs_free((char *)sess_data->rx_sid);
if (sess_data->gx_sid)
ogs_free((char *)sess_data->gx_sid);
if (sess_data->peer_host)
ogs_free(sess_data->peer_host);
ogs_thread_mutex_lock(&sess_state_mutex);
ogs_pool_free(&sess_state_pool, sess_data);
ogs_thread_mutex_unlock(&sess_state_mutex);
}
static int pcrf_rx_fb_cb(struct msg **msg, struct avp *avp,
struct session *sess, void *opaque, enum disp_action *act)
{
/* This CB should never be called */
ogs_warn("Unexpected message received!");
return ENOTSUP;
}
static int pcrf_rx_aar_cb( struct msg **msg, struct avp *avp,
struct session *sess, void *opaque, enum disp_action *act)
{
int rv;
int ret;
int len;
char *from_str, *to_str, *rx_flow, *to_port, *to_ip, *from_ip, *from_port;
struct msg *ans, *qry;
struct avp *avpch1, *avpch2, *avpch3;
struct avp_hdr *hdr;
union avp_value val;
struct sess_state *sess_data = NULL;
size_t sidlen;
ogs_diam_rx_message_t rx_message;
ogs_media_component_t *media_component = NULL;
ogs_media_sub_component_t *sub = NULL;
ogs_flow_t *flow = NULL;
char buf[OGS_ADDRSTRLEN];
os0_t gx_sid = NULL;
uint32_t result_code = OGS_DIAM_RX_DIAMETER_IP_CAN_SESSION_NOT_AVAILABLE;
ogs_debug("[PCRF] AA-Request");
ogs_assert(msg);
ogs_assert(sess);
ret = fd_sess_state_retrieve(pcrf_rx_reg, sess, &sess_data);
ogs_assert(ret == 0);
if (!sess_data) {
os0_t sid = NULL;
ret = fd_sess_getsid(sess, &sid, &sidlen);
ogs_assert(ret == 0);
sess_data = new_state(sid);
ogs_assert(sess_data);
}
/* Initialize Message */
memset(&rx_message, 0, sizeof(ogs_diam_rx_message_t));
rx_message.cmd_code = OGS_DIAM_RX_CMD_CODE_AA;
/* Create answer header */
qry = *msg;
ret = fd_msg_new_answer_from_req(fd_g_config->cnf_dict, msg, 0);
ogs_assert(ret == 0);
ans = *msg;
/* Set the Auth-Application-Id AVP */
ret = fd_msg_avp_new(ogs_diam_auth_application_id, 0, &avp);
ogs_assert(ret == 0);
val.i32 = OGS_DIAM_RX_APPLICATION_ID;
ret = fd_msg_avp_setvalue(avp, &val);
ogs_assert(ret == 0);
ret = fd_msg_avp_add(ans, MSG_BRW_LAST_CHILD, avp);
ogs_assert(ret == 0);
/* Set the Auth-Request-Type AVP */
ret = fd_msg_avp_new(ogs_diam_auth_request_type, 0, &avp);
ogs_assert(ret == 0);
val.i32 = OGS_DIAM_AUTH_REQUEST_TYPE_AUTHENTICATE_ONLY;
ret = fd_msg_avp_setvalue(avp, &val);
ogs_assert(ret == 0);
ret = fd_msg_avp_add(ans, MSG_BRW_LAST_CHILD, avp);
ogs_assert(ret == 0);
/* Get Framed-IP-Address */
ret = fd_msg_search_avp(qry, ogs_diam_rx_framed_ip_address, &avp);
ogs_assert(ret == 0);
if (avp) {
ret = fd_msg_avp_hdr(avp, &hdr);
ogs_assert(ret == 0);
gx_sid = (os0_t)pcrf_sess_find_by_ipv4(hdr->avp_value->os.data);
if (!gx_sid) {
ogs_warn("Cannot find Gx Sesson for IPv4:%s",
OGS_INET_NTOP(hdr->avp_value->os.data, buf));
}
}
if (!gx_sid) {
/* Get Framed-IPv6-Prefix */
ret = fd_msg_search_avp(qry, ogs_diam_rx_framed_ipv6_prefix, &avp);
ogs_assert(ret == 0);
if (avp) {
ogs_paa_t *paa = NULL;
ret = fd_msg_avp_hdr(avp, &hdr);
ogs_assert(ret == 0);
paa = (ogs_paa_t *)hdr->avp_value->os.data;
ogs_assert(paa);
ogs_assert(paa->len == OGS_IPV6_LEN * 8 /* 128bit */);
gx_sid = (os0_t)pcrf_sess_find_by_ipv6(paa->addr6);
if (!gx_sid) {
ogs_warn("Cannot find Gx Sesson for IPv6:%s",
OGS_INET6_NTOP(hdr->avp_value->os.data, buf));
}
}
}
if (!gx_sid) {
ogs_error("No Gx Session");
goto out;
}
ret = fd_msg_browse(qry, MSG_BRW_FIRST_CHILD, &avpch1, NULL);
ogs_assert(ret == 0);
while (avpch1) {
ret = fd_msg_avp_hdr(avpch1, &hdr);
ogs_assert(ret == 0);
switch(hdr->avp_code) {
case AC_SESSION_ID:
case AC_ORIGIN_HOST:
if (sess_data->peer_host)
ogs_free(sess_data->peer_host);
sess_data->peer_host =
(os0_t)ogs_strdup((char *)hdr->avp_value->os.data);
ogs_assert(sess_data->peer_host);
break;
case AC_ORIGIN_REALM:
case AC_DESTINATION_REALM:
case AC_ROUTE_RECORD:
case AC_PROXY_INFO:
case AC_AUTH_APPLICATION_ID:
case OGS_DIAM_AVP_CODE_FRAME_IP_ADDRESS:
case OGS_DIAM_AVP_CODE_FRAME_IPV6_PREFIX:
case OGS_DIAM_RX_AVP_CODE_SUBSCRIPTION_ID:
break;
/* Gwt Specific-Action */
case OGS_DIAM_RX_AVP_CODE_SPECIFIC_ACTION:
break;
/* Gwt Media-Component-Description */
case OGS_DIAM_RX_AVP_CODE_MEDIA_COMPONENT_DESCRIPTION:
media_component = &rx_message.ims_data.
media_component[rx_message.ims_data.num_of_media_component];
ret = fd_msg_browse(avpch1, MSG_BRW_FIRST_CHILD, &avpch2, NULL);
ogs_assert(ret == 0);
while (avpch2) {
ret = fd_msg_avp_hdr(avpch2, &hdr);
ogs_assert(ret == 0);
switch (hdr->avp_code) {
case OGS_DIAM_RX_AVP_CODE_MEDIA_COMPONENT_NUMBER:
media_component->media_component_number =
hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_MEDIA_TYPE:
media_component->media_type = hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_MAX_REQUESTED_BANDWIDTH_DL:
media_component->max_requested_bandwidth_dl =
hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_MAX_REQUESTED_BANDWIDTH_UL:
media_component->max_requested_bandwidth_ul =
hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_RR_BANDWIDTH:
media_component->rr_bandwidth = hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_RS_BANDWIDTH:
media_component->rs_bandwidth = hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_MIN_REQUESTED_BANDWIDTH_DL:
media_component->min_requested_bandwidth_dl =
hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_MIN_REQUESTED_BANDWIDTH_UL:
media_component->min_requested_bandwidth_ul =
hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_FLOW_STATUS:
media_component->flow_status = hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_MEDIA_SUB_COMPONENT:
sub = &media_component->sub[media_component->num_of_sub];
ret = fd_msg_browse(avpch2, MSG_BRW_FIRST_CHILD,
&avpch3, NULL);
ogs_assert(ret == 0);
while (avpch3) {
ret = fd_msg_avp_hdr(avpch3, &hdr);
ogs_assert(ret == 0);
switch (hdr->avp_code) {
case OGS_DIAM_RX_AVP_CODE_FLOW_NUMBER:
sub->flow_number =
hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_FLOW_USAGE:
sub->flow_usage =
hdr->avp_value->i32;
break;
case OGS_DIAM_RX_AVP_CODE_FLOW_DESCRIPTION:
flow = &sub->flow[sub->num_of_flow];
/* IE (IPV4-local-addr field ) is not supported on
* the LTE pre release-11 UEs. In order for the call
* to work the local address in packet filter must
* be replaced by 'any local port'.
*/
if (ogs_app()->
parameter.no_ipv4v6_local_addr_in_packet_filter
== true) {
rx_flow = NULL;
rx_flow = (char*)hdr->avp_value->os.data;
len = hdr->avp_value->os.len;
from_str = NULL;
to_str = NULL;
to_ip = NULL;
to_port = NULL;
from_ip = NULL;
from_port = NULL;
from_str = strstr(rx_flow, "from");
ogs_assert(from_str);
to_str = strstr(rx_flow, "to");
ogs_assert(to_str);
if (!strncmp(rx_flow,
"permit out", strlen("permit out"))) {
to_ip = strstr(to_str, " ");
if (to_ip != NULL) {
// Exclude the starting whitespace
to_ip += 1;
to_port = strstr(to_ip, " ");
// Test for no port
if (to_port != NULL) {
flow->description = ogs_malloc(len
- strlen(to_str) +
strlen("to any")
+ strlen(to_port) + 1);
ogs_assert(flow->description);
} else {
flow->description = ogs_malloc(len
- strlen(to_str) +
strlen("to any") + 1);
ogs_assert(flow->description);
}
}
strncat(flow->description,
rx_flow,
len - strlen(to_str));
strcat(flow->description, "to any");
if (to_port != NULL) {
strncat(flow->description,
to_port, strlen(to_port));
}
} else if (!strncmp(rx_flow,
"permit in", strlen("permit in"))) {
from_ip = strstr(from_str, " ");
if (from_ip != NULL) {
/* Exclude the starting whitespace */
from_ip += 1;
from_port = strstr(from_ip, " ");
/* Test for no port +
* whether from_port is at "to"
* without any from port */
if (from_port != NULL &&
strncmp(from_port, " to", 3)) {
flow->description = ogs_malloc(
len - strlen(from_str) +
strlen(to_str)
+ strlen("from any") + 1
+ (strlen(from_port) -
strlen(to_str)));
ogs_assert(flow->description);
} else {
flow->description = ogs_malloc(
len - strlen(from_str) +
strlen(to_str)
+ strlen("from any ") + 1);
ogs_assert(flow->description);
}
}
strncat(flow->description,
rx_flow,
len - strlen(from_str));
if (from_port != NULL &&
strncmp(from_port, " to", 3)) {
strcat(flow->description, "from any");
strncat(flow->description,
from_port,
strlen(from_port) - strlen(to_str));
} else {
strcat(flow->description, "from any ");
}
strncat(flow->description,
to_str,
strlen(to_str));
}
} else {
flow->description = ogs_malloc(
hdr->avp_value->os.len+1);
ogs_assert(flow->description);
ogs_cpystrn(
flow->description,
(char*)hdr->avp_value->os.data,
hdr->avp_value->os.len+1);
}
sub->num_of_flow++;
break;
default:
ogs_error("Not supported(%d)",
hdr->avp_code);
break;
}
fd_msg_browse(avpch3, MSG_BRW_NEXT, &avpch3, NULL);
}
media_component->num_of_sub++;
break;
default:
ogs_warn("Not supported(%d)", hdr->avp_code);
break;
}
fd_msg_browse(avpch2, MSG_BRW_NEXT, &avpch2, NULL);
}
rx_message.ims_data.num_of_media_component++;
break;
default:
ogs_warn("Not supported(%d)", hdr->avp_code);
break;
}
fd_msg_browse(avpch1, MSG_BRW_NEXT, &avpch1, NULL);
}
/* Send Re-Auth Request */
rv = pcrf_gx_send_rar(gx_sid, sess_data->rx_sid, &rx_message);
if (rv != OGS_OK) {
result_code = rx_message.result_code;
if (result_code != ER_DIAMETER_SUCCESS) {
ogs_error("pcrf_gx_send_rar() failed");
goto out;
}
}
/* Store Gx Session-Id in this session */
if (!sess_data->gx_sid)
sess_data->gx_sid = (os0_t)ogs_strdup((char *)gx_sid);
ogs_assert(sess_data->gx_sid);
/* Set IP-Can-Type */
ret = fd_msg_avp_new(ogs_diam_rx_ip_can_type, 0, &avp);
ogs_assert(ret == 0);
val.i32 = OGS_DIAM_RX_IP_CAN_TYPE_3GPP_EPS;
ret = fd_msg_avp_setvalue(avp, &val);
ogs_assert(ret == 0);
ret = fd_msg_avp_add(ans, MSG_BRW_LAST_CHILD, avp);
ogs_assert(ret == 0);
/* Set RAT-Type */
ret = fd_msg_avp_new(ogs_diam_rat_type, 0, &avp);
ogs_assert(ret == 0);
val.i32 = OGS_DIAM_RAT_TYPE_EUTRAN;
ret = fd_msg_avp_setvalue(avp, &val);
ogs_assert(ret == 0);
ret = fd_msg_avp_add(ans, MSG_BRW_LAST_CHILD, avp);
ogs_assert(ret == 0);
/* Set the Origin-Host, Origin-Realm, andResult-Code AVPs */
ret = fd_msg_rescode_set(ans, (char *)"DIAMETER_SUCCESS", NULL, NULL, 1);
ogs_assert(ret == 0);
/* Store this value in the session */
ret = fd_sess_state_store(pcrf_rx_reg, sess, &sess_data);
ogs_assert(ret == 0);
ogs_assert(sess_data == NULL);
/* Send the answer */
ret = fd_msg_send(msg, NULL, NULL);
ogs_assert(ret == 0);
ogs_debug("[PCRF] AA-Answer");
/* Add this value to the stats */
ogs_assert(pthread_mutex_lock(&ogs_diam_logger_self()->stats_lock) == 0);
ogs_diam_logger_self()->stats.nb_echoed++;
ogs_assert(pthread_mutex_unlock(&ogs_diam_logger_self()->stats_lock) == 0);
ogs_ims_data_free(&rx_message.ims_data);
return 0;
out:
if (result_code == OGS_DIAM_AVP_UNSUPPORTED) {
ret = fd_msg_rescode_set(ans,
(char *)"DIAMETER_AVP_UNSUPPORTED", NULL, NULL, 1);
ogs_assert(ret == 0);
} else if (result_code == OGS_DIAM_UNKNOWN_SESSION_ID) {
ret = fd_msg_rescode_set(ans,
(char *)"DIAMETER_UNKNOWN_SESSION_ID", NULL, NULL, 1);
ogs_assert(ret == 0);
} else if (result_code == OGS_DIAM_MISSING_AVP) {
ret = fd_msg_rescode_set(ans,
(char *)"DIAMETER_MISSING_AVP", NULL, NULL, 1);
ogs_assert(ret == 0);
} else {
ret = ogs_diam_message_experimental_rescode_set(ans, result_code);
ogs_assert(ret == 0);
}
ret = fd_msg_send(msg, NULL, NULL);
ogs_assert(ret == 0);
state_cleanup(sess_data, NULL, NULL);
ogs_ims_data_free(&rx_message.ims_data);
return 0;
}
int pcrf_rx_send_asr(uint8_t *rx_sid, uint32_t abort_cause)
{
int ret;
struct msg *req = NULL;
struct avp *avp;
union avp_value val;
struct sess_state *sess_data = NULL, *svg;
struct session *session = NULL;
int new;
size_t sidlen;
ogs_assert(rx_sid);
ogs_debug("[PCRF] Abort-Session-Request");
/* Create the request */
ret = fd_msg_new(ogs_diam_rx_cmd_asr, MSGFL_ALLOC_ETEID, &req);
ogs_assert(ret == 0);
{
struct msg_hdr * h;
ret = fd_msg_hdr( req, &h );
ogs_assert(ret == 0);
h->msg_appl = OGS_DIAM_RX_APPLICATION_ID;
}
/* Retrieve session by Session-Id */
sidlen = strlen((char *)rx_sid);
ret = fd_sess_fromsid_msg((os0_t)(rx_sid), sidlen, &session, &new);
ogs_assert(ret == 0);
ogs_assert(new == 0);
/* Add Session-Id to the message */
ret = ogs_diam_message_session_id_set(req, (os0_t)(rx_sid), sidlen);
ogs_assert(ret == 0);
/* Save the session associated with the message */
ret = fd_msg_sess_set(req, session);
/* Retrieve session state in this session */
ret = fd_sess_state_retrieve(pcrf_rx_reg, session, &sess_data);
ogs_assert(sess_data);
/* Update State */
sess_data->state = SESSION_ABORTED;
sess_data->abort_cause = abort_cause;
/* Set Origin-Host & Origin-Realm */
ret = fd_msg_add_origin(req, 0);
ogs_assert(ret == 0);
/* Set the Destination-Host AVP */
ret = fd_msg_avp_new(ogs_diam_destination_host, 0, &avp);
ogs_assert(ret == 0);
val.os.data = sess_data->peer_host;
val.os.len = strlen((char *)sess_data->peer_host);
ret = fd_msg_avp_setvalue(avp, &val);
ogs_assert(ret == 0);
ret = fd_msg_avp_add(req, MSG_BRW_LAST_CHILD, avp);
ogs_assert(ret == 0);
/* Set the Destination-Realm AVP */
ret = fd_msg_avp_new(ogs_diam_destination_realm, 0, &avp);
ogs_assert(ret == 0);
val.os.data = (unsigned char *)(fd_g_config->cnf_diamrlm);
val.os.len = strlen(fd_g_config->cnf_diamrlm);
ret = fd_msg_avp_setvalue(avp, &val);
ogs_assert(ret == 0);
ret = fd_msg_avp_add(req, MSG_BRW_LAST_CHILD, avp);
ogs_assert(ret == 0);
/* Set the Auth-Application-Id AVP */
ret = fd_msg_avp_new(ogs_diam_auth_application_id, 0, &avp);
ogs_assert(ret == 0);
val.i32 = OGS_DIAM_RX_APPLICATION_ID;
ret = fd_msg_avp_setvalue(avp, &val);
ogs_assert(ret == 0);
ret = fd_msg_avp_add(req, MSG_BRW_LAST_CHILD, avp);
ogs_assert(ret == 0);
/* Set the Abort-Cause AVP */
ret = fd_msg_avp_new(ogs_diam_rx_abort_cause, 0, &avp);
ogs_assert(ret == 0);
val.i32 = sess_data->abort_cause;
ret = fd_msg_avp_setvalue(avp, &val);
ogs_assert(ret == 0);
ret = fd_msg_avp_add(req, MSG_BRW_LAST_CHILD, avp);
ogs_assert(ret == 0);
/* Keep a pointer to the session data for debug purpose,
* in real life we would not need it */
svg = sess_data;
/* Store this value in the session */
ret = fd_sess_state_store(pcrf_rx_reg, session, &sess_data);
ogs_assert(ret == 0);
ogs_assert(sess_data == NULL);
/* Send the request */
ret = fd_msg_send(&req, pcrf_rx_asa_cb, svg);
ogs_assert(ret == 0);
/* Increment the counter */
ogs_assert(pthread_mutex_lock(&ogs_diam_logger_self()->stats_lock) == 0);
ogs_diam_logger_self()->stats.nb_sent++;
ogs_assert(pthread_mutex_unlock(&ogs_diam_logger_self()->stats_lock) == 0);
return OGS_OK;
}
static void pcrf_rx_asa_cb(void *data, struct msg **msg)
{
int ret;
struct session *session;
struct avp *avp, *avpch1;
struct avp_hdr *hdr;
int new;
int result_code = 0;
ogs_debug("[PCRF] Abort-Session-Answer");
/* Search the session, retrieve its data */
ret = fd_msg_sess_get(fd_g_config->cnf_dict, *msg, &session, &new);
ogs_assert(ret == 0);
ogs_assert(new == 0);
/* Value of Result Code */
ret = fd_msg_search_avp(*msg, ogs_diam_result_code, &avp);
ogs_assert(ret == 0);
if (avp) {
ret = fd_msg_avp_hdr(avp, &hdr);
ogs_assert(ret == 0);
result_code = hdr->avp_value->i32;
ogs_debug(" Result Code: %d", hdr->avp_value->i32);
} else {
ret = fd_msg_search_avp(*msg, ogs_diam_experimental_result, &avp);
ogs_assert(ret == 0);
if (avp) {
ret = fd_avp_search_avp(avp, ogs_diam_experimental_result_code, &avpch1);
ogs_assert(ret == 0);
if (avpch1) {
ret = fd_msg_avp_hdr(avpch1, &hdr);
ogs_assert(ret == 0);
result_code = hdr->avp_value->i32;
ogs_debug(" Experimental Result Code: %d",
result_code);
}
} else {
ogs_error("no Result-Code");
}
}
/* Value of Origin-Host */
ret = fd_msg_search_avp(*msg, ogs_diam_origin_host, &avp);
ogs_assert(ret == 0);
if (avp) {
ret = fd_msg_avp_hdr(avp, &hdr);
ogs_assert(ret == 0);
ogs_debug(" From '%.*s'",
(int)hdr->avp_value->os.len, hdr->avp_value->os.data);
} else {
ogs_error("no_Origin-Host ");
}
/* Value of Origin-Realm */
ret = fd_msg_search_avp(*msg, ogs_diam_origin_realm, &avp);
ogs_assert(ret == 0);
if (avp) {
ret = fd_msg_avp_hdr(avp, &hdr);
ogs_assert(ret == 0);
ogs_debug(" ('%.*s')",
(int)hdr->avp_value->os.len, hdr->avp_value->os.data);
} else {
ogs_error("no_Origin-Realm ");
}
if (result_code != ER_DIAMETER_SUCCESS) {
ogs_error("ERROR DIAMETER Result Code(%d)", result_code);
}
ret = fd_msg_free(*msg);
ogs_assert(ret == 0);
*msg = NULL;
return;
}
static int pcrf_rx_str_cb( struct msg **msg, struct avp *avp,
struct session *sess, void *opaque, enum disp_action *act)
{
int rv;
int ret;
struct msg *ans, *qry;
struct avp_hdr *hdr;
union avp_value val;
struct sess_state *sess_data = NULL;
ogs_diam_rx_message_t rx_message;
uint32_t result_code = OGS_DIAM_RX_DIAMETER_IP_CAN_SESSION_NOT_AVAILABLE;
ogs_debug("[PCRF] Session-Termination-Request");
ogs_assert(msg);
ogs_assert(sess);
ret = fd_sess_state_retrieve(pcrf_rx_reg, sess, &sess_data);
ogs_assert(ret == 0);
ogs_assert(sess_data);
ogs_assert(sess_data->rx_sid);
ogs_assert(sess_data->gx_sid);
/* Initialize Message */
memset(&rx_message, 0, sizeof(ogs_diam_rx_message_t));
rx_message.cmd_code = OGS_DIAM_RX_CMD_CODE_SESSION_TERMINATION;
/* Create answer header */
qry = *msg;
ret = fd_msg_new_answer_from_req(fd_g_config->cnf_dict, msg, 0);
ogs_assert(ret == 0);
ans = *msg;
/* Set the Auth-Application-Id AVP */
ret = fd_msg_avp_new(ogs_diam_auth_application_id, 0, &avp);
ogs_assert(ret == 0);
val.i32 = OGS_DIAM_RX_APPLICATION_ID;
ret = fd_msg_avp_setvalue(avp, &val);
ogs_assert(ret == 0);
ret = fd_msg_avp_add(ans, MSG_BRW_LAST_CHILD, avp);
ogs_assert(ret == 0);
/* Set the Auth-Request-Type AVP */
ret = fd_msg_avp_new(ogs_diam_auth_request_type, 0, &avp);
ogs_assert(ret == 0);
val.i32 = OGS_DIAM_AUTH_REQUEST_TYPE_AUTHENTICATE_ONLY;
ret = fd_msg_avp_setvalue(avp, &val);
ogs_assert(ret == 0);
ret = fd_msg_avp_add(ans, MSG_BRW_LAST_CHILD, avp);
ogs_assert(ret == 0);
/* Get Termination-Cause */
ret = fd_msg_search_avp(qry, ogs_diam_rx_termination_cause, &avp);
ogs_assert(ret == 0);
if (avp) {
ret = fd_msg_avp_hdr(avp, &hdr);
ogs_assert(ret == 0);
sess_data->termination_cause = hdr->avp_value->i32;
switch (sess_data->termination_cause) {
case OGS_DIAM_RX_TERMINATION_CAUSE_DIAMETER_LOGOUT:
break;
default:
ogs_error("Termination-Cause Error : [%d]",
sess_data->termination_cause);
break;
}
} else {
ogs_error("no_Termination-Cause");
}
if (sess_data->state != SESSION_ABORTED) {
/* Send Re-Auth Request if Abort-Session-Request is not initaited */
rv = pcrf_gx_send_rar(
sess_data->gx_sid, sess_data->rx_sid, &rx_message);
if (rv != OGS_OK) {
result_code = rx_message.result_code;
if (result_code != ER_DIAMETER_SUCCESS) {
ogs_error("pcrf_gx_send_rar() failed");
goto out;
}
}
}
/* Set the Origin-Host, Origin-Realm, andResult-Code AVPs */
ret = fd_msg_rescode_set(ans, (char *)"DIAMETER_SUCCESS", NULL, NULL, 1);
ogs_assert(ret == 0);
/* Send the answer */
ret = fd_msg_send(msg, NULL, NULL);
ogs_assert(ret == 0);
ogs_debug("[PCRF] Session-Termination-Answer");
/* Add this value to the stats */
ogs_assert(pthread_mutex_lock(&ogs_diam_logger_self()->stats_lock) == 0);
ogs_diam_logger_self()->stats.nb_echoed++;
ogs_assert(pthread_mutex_unlock(&ogs_diam_logger_self()->stats_lock) == 0);
state_cleanup(sess_data, NULL, NULL);
ogs_ims_data_free(&rx_message.ims_data);
return 0;
out:
if (result_code == OGS_DIAM_AVP_UNSUPPORTED) {
ret = fd_msg_rescode_set(ans,
(char *)"DIAMETER_AVP_UNSUPPORTED", NULL, NULL, 1);
ogs_assert(ret == 0);
} else if (result_code == OGS_DIAM_UNKNOWN_SESSION_ID) {
ret = fd_msg_rescode_set(ans,
(char *)"DIAMETER_UNKNOWN_SESSION_ID", NULL, NULL, 1);
ogs_assert(ret == 0);
} else if (result_code == OGS_DIAM_MISSING_AVP) {
ret = fd_msg_rescode_set(ans,
(char *)"DIAMETER_MISSING_AVP", NULL, NULL, 1);
ogs_assert(ret == 0);
} else {
ret = fd_msg_rescode_set(ans,
(char *)"DIAMETER_MISSING_AVP", NULL, NULL, 1);
ogs_assert(ret == 0);
}
ret = fd_msg_send(msg, NULL, NULL);
ogs_assert(ret == 0);
ogs_debug("[PCRF] Session-Termination-Answer");
state_cleanup(sess_data, NULL, NULL);
ogs_ims_data_free(&rx_message.ims_data);
return 0;
}
int pcrf_rx_init(void)
{
int ret;
struct disp_when data;
ogs_thread_mutex_init(&sess_state_mutex);
ogs_pool_init(&sess_state_pool, ogs_app()->pool.sess);
/* Install objects definitions for this application */
ret = ogs_diam_rx_init();
ogs_assert(ret == 0);
/* Create handler for sessions */
ret = fd_sess_handler_create(&pcrf_rx_reg, state_cleanup, NULL, NULL);
ogs_assert(ret == 0);
/* Fallback CB if command != unexpected message received */
memset(&data, 0, sizeof(data));
data.app = ogs_diam_rx_application;
ret = fd_disp_register(pcrf_rx_fb_cb, DISP_HOW_APPID, &data, NULL,
&hdl_rx_fb);
ogs_assert(ret == 0);
/* Specific handler for AA-Request */
data.command = ogs_diam_rx_cmd_aar;
ret = fd_disp_register(pcrf_rx_aar_cb, DISP_HOW_CC, &data, NULL,
&hdl_rx_aar);
ogs_assert(ret == 0);
/* Specific handler for STR-Request */
data.command = ogs_diam_rx_cmd_str;
ret = fd_disp_register(pcrf_rx_str_cb, DISP_HOW_CC, &data, NULL,
&hdl_rx_str);
ogs_assert(ret == 0);
/* Advertise the support for the application in the peer */
ret = fd_disp_app_support(ogs_diam_rx_application, ogs_diam_vendor, 1, 0);
ogs_assert(ret == 0);
return OGS_OK;
}
void pcrf_rx_final(void)
{
int ret;
ret = fd_sess_handler_destroy(&pcrf_rx_reg, NULL);
ogs_assert(ret == 0);
if (hdl_rx_fb)
(void) fd_disp_unregister(&hdl_rx_fb, NULL);
if (hdl_rx_aar)
(void) fd_disp_unregister(&hdl_rx_aar, NULL);
if (hdl_rx_str)
(void) fd_disp_unregister(&hdl_rx_str, NULL);
ogs_pool_final(&sess_state_pool);
ogs_thread_mutex_destroy(&sess_state_mutex);
}