/*
* Report OSP usage
* SER uses AVP to add RR pararmters
* param msg SIP message
* param ignore1
* param ignore2
* return MODULE_RETURNCODE_TRUE success, MODULE_RETURNCODE_FALSE failure
*/
int ospReportUsage(
struct sip_msg* msg,
char* ignore1,
char* ignore2)
{
int_str cookieval;
struct usr_avp* cookieavp = NULL;
static const int FROMFLAGS = AVP_TRACK_FROM | AVP_CLASS_URI | AVP_NAME_STR | AVP_VAL_STR;
static const int TOFLAGS = AVP_TRACK_TO | AVP_CLASS_URI | AVP_NAME_STR | AVP_VAL_STR;
char buffer[OSP_HEADERBUF_SIZE];
OSPTCALLID* callid = NULL;
int result = MODULE_RETURNCODE_FALSE;
LOG(L_DBG, "osp: ospReportUsage\n");
ospGetCallId(msg, &callid);
if (callid != NULL) {
if ((cookieavp = search_first_avp(FROMFLAGS, (int_str)OSP_ORIGCOOKIE_NAME, &cookieval, NULL)) != 0 ||
(cookieavp = search_first_avp(TOFLAGS, (int_str)OSP_ORIGCOOKIE_NAME, &cookieval, NULL)) != 0)
{
ospCopyStrToBuffer(&cookieval.s, buffer, sizeof(buffer));
LOG(L_DBG, "orig cookie '%s'\n", buffer);
LOG(L_INFO,
"osp: report orig duration for call_id '%.*s'\n",
callid->ospmCallIdLen,
callid->ospmCallIdVal);
ospReportUsageFromCookie(msg, buffer, callid, OSPC_SOURCE);
result = MODULE_RETURNCODE_TRUE;
}
if ((cookieavp = search_first_avp(FROMFLAGS, (int_str)OSP_TERMCOOKIE_NAME, &cookieval, NULL)) != 0 ||
(cookieavp = search_first_avp(TOFLAGS, (int_str)OSP_TERMCOOKIE_NAME, &cookieval, NULL)) != 0)
{
ospCopyStrToBuffer(&cookieval.s, buffer, sizeof(buffer));
LOG(L_DBG, "term cookie '%s'\n", buffer);
LOG(L_INFO,
"osp: report term duration for call_id '%.*s'\n",
callid->ospmCallIdLen,
callid->ospmCallIdVal);
ospReportUsageFromCookie(msg, buffer, callid, OSPC_DESTINATION);
result = MODULE_RETURNCODE_TRUE;
}
if (result == MODULE_RETURNCODE_FALSE) {
LOG(L_DBG, "without orig or term OSP information\n");
LOG(L_INFO, "report other duration for call_id '%.*s'\n",
callid->ospmCallIdLen,
callid->ospmCallIdVal);
ospReportUsageFromCookie(msg, NULL, callid, OSPC_SOURCE);
result = MODULE_RETURNCODE_TRUE;
}
OSPPCallIdDelete(&callid);
}
if (result == MODULE_RETURNCODE_FALSE) {
LOG(L_DBG, "osp: failed to report usage\n");
}
return result;
}
/*
* Report OSP usage
* param msg SIP message
* param whorelease Who releases the call first, 0 orig, 1 term
* param ignore2
* return MODULE_RETURNCODE_TRUE success, MODULE_RETURNCODE_FALSE failure
*/
int ospReportUsage(
struct sip_msg* msg,
char* whorelease,
char* ignore2)
{
OSPE_RELEASE release;
char* tmp;
char* token;
char parameters[OSP_HEADERBUF_SIZE];
OSPT_CALL_ID* callid = NULL;
int result = MODULE_RETURNCODE_FALSE;
ospGetCallId(msg, &callid);
if (callid != NULL) {
/* Who releases the call first, 0 orig, 1 term */
if (sscanf(whorelease, "%d", &release) != 1 || ((release != OSPC_RELEASE_SOURCE) && (release != OSPC_RELEASE_DESTINATION))) {
release = OSPC_RELEASE_UNKNOWN;
}
LM_DBG("who releases the call first '%d'\n", release);
if (ospGetRouteParameters(msg, parameters, sizeof(parameters)) == 0) {
for (token = strtok_r(parameters, ";", &tmp);
token;
token = strtok_r(NULL, ";", &tmp))
{
if ((strncmp(token, OSP_ORIG_COOKIE, strlen(OSP_ORIG_COOKIE)) == 0) &&
(token[strlen(OSP_ORIG_COOKIE)] == '='))
{
LM_INFO("report orig duration for call_id '%.*s'\n",
callid->Length,
callid->Value);
ospReportUsageFromCookie(msg, token + strlen(OSP_ORIG_COOKIE) + 1, callid, release, OSPC_ROLE_SOURCE);
result = MODULE_RETURNCODE_TRUE;
} else if ((strncmp(token, OSP_TERM_COOKIE, strlen(OSP_TERM_COOKIE)) == 0) &&
(token[strlen(OSP_TERM_COOKIE)] == '='))
{
LM_INFO("report term duration for call_id '%.*s'\n",
callid->Length,
callid->Value);
ospReportUsageFromCookie(msg, token + strlen(OSP_TERM_COOKIE) + 1, callid, release, OSPC_ROLE_DESTINATION);
result = MODULE_RETURNCODE_TRUE;
} else {
LM_DBG("ignoring parameter '%s'\n", token);
}
}
}
if (result == MODULE_RETURNCODE_FALSE) {
LM_DBG("without orig or term OSP information\n");
LM_INFO("report other duration for call_id '%.*s'\n",
callid->Length,
callid->Value);
ospReportUsageFromCookie(msg, NULL, callid, release, OSPC_ROLE_SOURCE);
result = MODULE_RETURNCODE_TRUE;
}
OSPPCallIdDelete(&callid);
}
if (result == MODULE_RETURNCODE_FALSE) {
LM_ERR("failed to report usage\n");
}
return result;
}
/*
* Request OSP authorization and routeing
* param msg SIP message
* param ignore1
* param ignore2
* return MODULE_RETURNCODE_TRUE success, MODULE_RETURNCODE_FALSE failure, others error
*/
int ospRequestRouting(
struct sip_msg* msg,
char* ignore1,
char* ignore2)
{
int i, errcode;
char rn[OSP_STRBUF_SIZE];
char cic[OSP_STRBUF_SIZE];
int npdi;
OSPE_OPERATOR_NAME type;
char opname[OSPC_OPNAME_NUMBER][OSP_STRBUF_SIZE];
osp_inbound inbound;
char sourcebuf[OSP_STRBUF_SIZE];
char srcdevbuf[OSP_STRBUF_SIZE];
char divhostbuf[OSP_STRBUF_SIZE];
char useragent[OSP_STRBUF_SIZE];
struct usr_avp* avp = NULL;
int_str avpval;
unsigned int cinfonum = 0;
char cinfo[OSP_DEF_CINFONUM][OSP_STRBUF_SIZE];
char cinfostr[OSP_STRBUF_SIZE];
unsigned int callidnumber = 1;
OSPT_CALL_ID* callids[callidnumber];
unsigned int logsize = 0;
char* detaillog = NULL;
char tohost[OSP_STRBUF_SIZE];
char tohostbuf[OSP_STRBUF_SIZE];
const char* preferred[2] = { NULL };
unsigned int destcount;
struct timeval ts, te, td;
char datebuf[OSP_STRBUF_SIZE];
unsigned int sdpfpnum = 0;
char sdpfp[OSP_DEF_SDPFPNUM][OSP_STRBUF_SIZE];
char* sdpfpstr[OSP_DEF_SDPFPNUM];
OSPTTRANHANDLE trans = -1;
int result = MODULE_RETURNCODE_FALSE;
ospInitInboundInfo(&inbound);
if ((errcode = OSPPTransactionNew(_osp_provider, &trans)) != OSPC_ERR_NO_ERROR) {
LM_ERR("failed to create new OSP transaction (%d)\n", errcode);
} else if (ospGetCallId(msg, &(callids[0])) != 0) {
LM_ERR("failed to extract call id\n");
} else if (ospGetFromUser(msg, inbound.calling, sizeof(inbound.calling)) != 0) {
LM_ERR("failed to extract calling number\n");
} else if ((ospGetUriUser(msg, inbound.called, sizeof(inbound.called)) != 0) && (ospGetToUser(msg, inbound.called, sizeof(inbound.called)) != 0)) {
LM_ERR("failed to extract called number\n");
} else if (ospGetSource(msg, inbound.source, sizeof(inbound.source)) != 0) {
LM_ERR("failed to extract source address\n");
} else if (ospGetSrcDev(msg, inbound.srcdev, sizeof(inbound.srcdev)) != 0) {
LM_ERR("failed to extract source deivce address\n");
} else {
inbound.authtime = time(NULL);
if(msg->rcv.bind_address && msg->rcv.bind_address->address_str.s) {
ospCopyStrToBuffer(&msg->rcv.bind_address->address_str, inbound.ingressaddr, sizeof(inbound.ingressaddr));
}
ospConvertToOutAddress(inbound.source, sourcebuf, sizeof(sourcebuf));
ospConvertToOutAddress(inbound.srcdev, srcdevbuf, sizeof(srcdevbuf));
switch (_osp_service_type) {
case 1:
case 2:
OSPPTransactionSetServiceType(trans, (_osp_service_type == 1) ? OSPC_SERVICE_NPQUERY : OSPC_SERVICE_CNAMQUERY);
ospGetToHost(msg, tohost, sizeof(tohost));
ospConvertToOutAddress(tohost, tohostbuf, sizeof(tohostbuf));
preferred[0] = tohostbuf;
destcount = 1;
break;
case 0:
default:
OSPPTransactionSetServiceType(trans, OSPC_SERVICE_VOICE);
destcount = _osp_max_dests;
break;
}
if (ospGetNpParam(msg, rn, sizeof(rn), cic, sizeof(cic), &npdi) == 0) {
OSPPTransactionSetNumberPortability(trans, rn, cic, npdi);
}
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
if (ospGetOperatorName(msg, type, opname[type], sizeof(opname[type])) == 0) {
OSPPTransactionSetOperatorName(trans, type, opname[type]);
}
}
if (ospGetFromDisplay(msg, inbound.fromdisplay, sizeof(inbound.fromdisplay)) == 0) {
OSPPTransactionSetFrom(trans, OSPC_NFORMAT_DISPLAYNAME, inbound.fromdisplay);
}
if (ospGetFromUri(msg, inbound.fromuri, sizeof(inbound.fromuri)) == 0) {
OSPPTransactionSetFrom(trans, OSPC_NFORMAT_URL, inbound.fromuri);
}
if (ospGetToUri(msg, inbound.touri, sizeof(inbound.touri)) == 0) {
OSPPTransactionSetTo(trans, OSPC_NFORMAT_URL, inbound.touri);
}
if (ospGetPaiUser(msg, inbound.paiuser, sizeof(inbound.paiuser)) == 0) {
OSPPTransactionSetAssertedId(trans, OSPC_NFORMAT_E164, inbound.paiuser);
}
if (ospGetRpidUser(msg, inbound.rpiduser, sizeof(inbound.rpiduser)) == 0) {
OSPPTransactionSetRemotePartyId(trans, OSPC_NFORMAT_E164, inbound.rpiduser);
}
if (ospGetPciUser(msg, inbound.pciuser, sizeof(inbound.pciuser)) == 0) {
OSPPTransactionSetChargeInfo(trans, OSPC_NFORMAT_E164, inbound.pciuser);
}
if (ospGetDiversion(msg, inbound.divuser, sizeof(inbound.divuser), inbound.divhost, sizeof(inbound.divhost)) == 0) {
ospConvertToOutAddress(inbound.divhost, divhostbuf, sizeof(divhostbuf));
} else {
divhostbuf[0] = '\0';
}
OSPPTransactionSetDiversion(trans, inbound.divuser, divhostbuf);
if (ospGetUserAgent(msg, useragent, sizeof(useragent)) == 0) {
OSPPTransactionSetUserAgent(trans, useragent);
}
OSPPTransactionSetProtocol(trans, OSPC_PROTTYPE_SOURCE, OSPC_PROTNAME_SIP);
if (ospGetAVP(_osp_snid_avpid, _osp_snid_avptype, inbound.snid, sizeof(inbound.snid)) == 0) {
OSPPTransactionSetNetworkIds(trans, inbound.snid, "");
} else {
inbound.snid[0] = '\0';
}
if (_osp_cinfo_avpid >= 0) {
for (i = 0, avp = search_first_avp(_osp_cinfo_avptype, _osp_cinfo_avpid, NULL, 0);
((i < OSP_DEF_CINFONUM) && (avp != NULL));
i++, avp = search_next_avp(avp, NULL))
{
get_avp_val(avp, &avpval);
if ((avp->flags & AVP_VAL_STR) && (avpval.s.s && avpval.s.len)) {
snprintf(cinfo[i], sizeof(cinfo[i]), "%.*s", avpval.s.len, avpval.s.s);
} else {
cinfo[i][0] = '\0';
}
}
cinfonum = i;
cinfostr[0] = '\0';
for (i = 0; i < cinfonum; i++) {
if (cinfo[cinfonum - i - 1][0] != '\0') {
OSPPTransactionSetCustomInfo(trans, i, cinfo[cinfonum - i - 1]);
snprintf(cinfostr + strlen(cinfostr), sizeof(cinfostr) - strlen(cinfostr), "custom_info%d '%s' ", i + 1, cinfo[cinfonum - i - 1]);
}
}
}
if (ospGetAVP(_osp_srcmedia_avpid, _osp_srcmedia_avptype, inbound.srcmedia, sizeof(inbound.srcmedia)) == 0) {
OSPPTransactionSetSrcAudioAddr(trans, inbound.srcmedia);
} else {
inbound.srcmedia[0] = '\0';
}
inbound.date = 0;
if (ospGetAVP(_osp_reqdate_avpid, _osp_reqdate_avptype, datebuf, sizeof(datebuf)) == 0) {
if (ospStrToTime(datebuf, &inbound.date) == 0) {
OSPPTransactionSetRequestDate(trans, inbound.date);
}
}
if (_osp_sdpfp_avpid >= 0) {
for (i = 0, avp = search_first_avp(_osp_sdpfp_avptype, _osp_sdpfp_avpid, NULL, 0);
((i < OSP_DEF_SDPFPNUM) && (avp != NULL));
i++, avp = search_next_avp(avp, NULL))
{
get_avp_val(avp, &avpval);
if ((avp->flags & AVP_VAL_STR) && (avpval.s.s && avpval.s.len)) {
snprintf(sdpfp[i], sizeof(sdpfp[i]), "%.*s", avpval.s.len, avpval.s.s);
} else {
sdpfp[i][0] = '\0';
}
}
sdpfpnum = i;
for (i = 0; i < sdpfpnum; i++) {
sdpfpstr[i] = sdpfp[sdpfpnum - i - 1];
}
OSPPTransactionSetFingerPrint(trans, sdpfpnum, (const char**)sdpfpstr);
}
ospReportIdentity(trans);
LM_INFO("request auth and routing for: "
"service '%d' "
"source '%s' "
"srcdev '%s' "
"snid '%s' "
"calling '%s' "
"called '%s' "
"preferred '%s' "
"nprn '%s' "
"npcic '%s' "
"npdi '%d' "
/*
"spid '%s' "
"ocn '%s' "
"spn '%s' "
"altspn '%s' "
"mcc '%s' "
"mnc '%s' "
*/
"fromdisplay '%s' "
"paiuser '%s' "
"rpiduser '%s' "
"pciuser '%s' "
"divuser '%s' "
"divhost '%s' "
"srcmedia '%s' "
"callid '%.*s' "
"destcount '%d' "
"%s\n",
_osp_service_type,
sourcebuf,
srcdevbuf,
inbound.snid,
inbound.calling,
inbound.called,
(preferred[0] == NULL) ? "" : preferred[0],
rn,
cic,
npdi,
/*
opname[OSPC_OPNAME_SPID],
opname[OSPC_OPNAME_OCN],
opname[OSPC_OPNAME_SPN],
opname[OSPC_OPNAME_ALTSPN],
opname[OSPC_OPNAME_MCC],
opname[OSPC_OPNAME_MNC],
*/
inbound.fromdisplay,
inbound.paiuser,
inbound.rpiduser,
inbound.pciuser,
inbound.divuser,
divhostbuf,
inbound.srcmedia,
callids[0]->Length,
callids[0]->Value,
destcount,
cinfostr);
gettimeofday(&ts, NULL);
/* try to request authorization */
errcode = OSPPTransactionRequestAuthorisation(
trans, /* transaction handle */
sourcebuf, /* from the configuration file */
srcdevbuf, /* source device of call, protocol specific, in OSP format */
inbound.calling, /* calling number in nodotted e164 notation */
OSPC_NFORMAT_E164, /* calling number format */
inbound.called, /* called number */
OSPC_NFORMAT_E164, /* called number format */
"", /* optional username string, used if no number */
callidnumber, /* number of call ids, here always 1 */
callids, /* sized-1 array of call ids */
preferred, /* preferred destinations */
&destcount, /* max destinations, after call dest_count */
&logsize, /* size allocated for detaillog (next param) 0=no log */
detaillog); /* memory location for detaillog to be stored */
gettimeofday(&te, NULL);
timersub(&te, &ts, &td);
LM_INFO("authreq cost = %lu.%06lu for call-id '%.*s'\n", td.tv_sec, td.tv_usec, callids[0]->Length, callids[0]->Value);
if ((errcode == OSPC_ERR_NO_ERROR) &&
(ospLoadRoutes(trans, destcount, &inbound) == 0))
{
LM_INFO("there are '%d' OSP routes, call_id '%.*s'\n",
destcount,
callids[0]->Length,
callids[0]->Value);
result = MODULE_RETURNCODE_TRUE;
} else {
LM_ERR("failed to request auth and routing (%d), call_id '%.*s'\n",
errcode,
callids[0]->Length,
callids[0]->Value);
switch (errcode) {
case OSPC_ERR_HTTP_BAD_REQUEST:
result = -4000;
break;
case OSPC_ERR_TRAN_BAD_REQUEST:
result = -4001;
break;
case OSPC_ERR_HTTP_UNAUTHORIZED:
result = -4010;
break;
case OSPC_ERR_TRAN_UNAUTHORIZED:
result = -4011;
break;
case OSPC_ERR_TRAN_ROUTE_BLOCKED:
result = -4030;
break;
case OSPC_ERR_TRAN_ROUTE_NOT_FOUND:
result = -4040;
break;
case OSPC_ERR_TRAN_MAY_NOT_ORIGINATE:
result = -4050;
break;
case OSPC_ERR_TRAN_CALLING_INVALID:
result = -4280;
break;
case OSPC_ERR_SOCK_CONNECT_FAILED:
result = -4800;
break;
case OSPC_ERR_SOCK_SELECT_FAILED:
result = -4801;
break;
case OSPC_ERR_HTTP_SERVER_NOT_READY:
result = -4802;
break;
case OSPC_ERR_TRAN_CALLED_FILTERING:
result = -4840;
break;
case OSPC_ERR_HTTP_SERVICE_UNAVAILABLE:
result = -5030;
break;
case OSPC_ERR_TRAN_DECLINE:
result = -6030;
break;
case OSPC_ERR_NO_ERROR:
/* AuthRsp ok but ospLoadRoutes fails */
result = MODULE_RETURNCODE_ERROR;
break;
default:
result = MODULE_RETURNCODE_FALSE;
break;
}
}
}
if (callids[0] != NULL) {
OSPPCallIdDelete(&(callids[0]));
}
if (trans != -1) {
OSPPTransactionDelete(trans);
}
return result;
}
/*
* Request OSP authorization and routeing
* param msg SIP message
* param ignore1
* param ignore2
* return MODULE_RETURNCODE_TRUE success, MODULE_RETURNCODE_FALSE failure, MODULE_RETURNCODE_ERROR error
*/
int ospRequestRouting(
struct sip_msg* msg,
char* ignore1,
char* ignore2)
{
int errcode;
time_t authtime;
char calling[OSP_STRBUF_SIZE];
char called[OSP_STRBUF_SIZE];
char rn[OSP_STRBUF_SIZE];
char cic[OSP_STRBUF_SIZE];
int npdi;
OSPE_OPERATOR_NAME type;
char opname[OSPC_OPNAME_NUMBER][OSP_STRBUF_SIZE];
char source[OSP_STRBUF_SIZE];
char sourcebuf[OSP_STRBUF_SIZE];
char srcdev[OSP_STRBUF_SIZE];
char srcdevbuf[OSP_STRBUF_SIZE];
char rpid[OSP_STRBUF_SIZE];
char pai[OSP_STRBUF_SIZE];
char divuser[OSP_STRBUF_SIZE];
char divhost[OSP_STRBUF_SIZE];
char divhostbuf[OSP_STRBUF_SIZE];
char pci[OSP_STRBUF_SIZE];
struct usr_avp* snidavp = NULL;
int_str snidval;
char snid[OSP_STRBUF_SIZE];
struct usr_avp* cinfoavp = NULL;
int_str cinfoval;
unsigned int cinfonum = 0, i;
char cinfo[OSP_DEF_CINFOS][OSP_STRBUF_SIZE];
char cinfostr[OSP_STRBUF_SIZE];
unsigned int callidnumber = 1;
OSPT_CALL_ID* callids[callidnumber];
unsigned int logsize = 0;
char* detaillog = NULL;
char tohost[OSP_STRBUF_SIZE];
char tohostbuf[OSP_STRBUF_SIZE];
const char* preferred[2] = { NULL };
unsigned int destcount;
OSPTTRANHANDLE trans = -1;
int result = MODULE_RETURNCODE_FALSE;
if ((errcode = OSPPTransactionNew(_osp_provider, &trans)) != OSPC_ERR_NO_ERROR) {
LM_ERR("failed to create new OSP transaction (%d)\n", errcode);
} else if (ospGetFromUserpart(msg, calling, sizeof(calling)) != 0) {
LM_ERR("failed to extract calling number\n");
} else if ((ospGetUriUserpart(msg, called, sizeof(called)) != 0) && (ospGetToUserpart(msg, called, sizeof(called)) != 0)) {
LM_ERR("failed to extract called number\n");
} else if (ospGetCallId(msg, &(callids[0])) != 0) {
LM_ERR("failed to extract call id\n");
} else if (ospGetSource(msg, source, sizeof(source)) != 0) {
LM_ERR("failed to extract source address\n");
} else if (ospGetSourceDevice(msg, srcdev, sizeof(srcdev)) != 0) {
LM_ERR("failed to extract source deivce address\n");
} else {
authtime = time(NULL);
ospConvertToOutAddress(source, sourcebuf, sizeof(sourcebuf));
ospConvertToOutAddress(srcdev, srcdevbuf, sizeof(srcdevbuf));
switch (_osp_service_type) {
case 1:
OSPPTransactionSetServiceType(trans, OSPC_SERVICE_NPQUERY);
ospGetToHostpart(msg, tohost, sizeof(tohost));
ospConvertToOutAddress(tohost, tohostbuf, sizeof(tohostbuf));
preferred[0] = tohostbuf;
destcount = 1;
break;
case 0:
default:
OSPPTransactionSetServiceType(trans, OSPC_SERVICE_VOICE);
destcount = _osp_max_dests;
break;
}
if (ospGetNpParameters(msg, rn, sizeof(rn), cic, sizeof(cic), &npdi) == 0) {
OSPPTransactionSetNumberPortability(trans, rn, cic, npdi);
}
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
if (ospGetOperatorName(msg, type, opname[type], sizeof(opname[type])) == 0) {
OSPPTransactionSetOperatorName(trans, type, opname[type]);
}
}
if (ospGetRpidUserpart(msg, rpid, sizeof(rpid)) == 0) {
OSPPTransactionSetRemotePartyId(trans, OSPC_NFORMAT_E164, rpid);
}
if (ospGetPaiUserpart(msg, pai, sizeof(pai)) == 0) {
OSPPTransactionSetAssertedId(trans, OSPC_NFORMAT_E164, pai);
}
if (ospGetDiversion(msg, divuser, sizeof(divuser), divhost, sizeof(divhost)) == 0) {
ospConvertToOutAddress(divhost, divhostbuf, sizeof(divhostbuf));
} else {
divhostbuf[0] = '\0';
}
OSPPTransactionSetDiversion(trans, divuser, divhostbuf);
OSPPTransactionSetProtocol(trans, OSPC_PROTTYPE_SOURCE, OSPC_PROTNAME_SIP);
if (ospGetPChargeInfoUserpart(msg, pci, sizeof(pci)) == 0) {
OSPPTransactionSetChargeInfo(trans, OSPC_NFORMAT_E164, pci);
}
if ((_osp_snid_avpid >= 0) &&
((snidavp = search_first_avp(_osp_snid_avptype, _osp_snid_avpid, &snidval, 0)) != NULL) &&
(snidavp->flags & AVP_VAL_STR) && (snidval.s.s && snidval.s.len))
{
snprintf(snid, sizeof(snid), "%.*s", snidval.s.len, snidval.s.s);
snid[sizeof(snid) - 1] = '\0';
OSPPTransactionSetNetworkIds(trans, snid, "");
} else {
snid[0] = '\0';
}
if (_osp_cinfo_avpid >= 0) {
for (i = 0, cinfoavp = search_first_avp(_osp_cinfo_avptype, _osp_cinfo_avpid, NULL, 0);
((i < OSP_DEF_CINFOS) && (cinfoavp != NULL));
i++, cinfoavp = search_next_avp(cinfoavp, NULL))
{
get_avp_val(cinfoavp, &cinfoval);
if ((cinfoavp->flags & AVP_VAL_STR) && (cinfoval.s.s && cinfoval.s.len)) {
snprintf(cinfo[i], sizeof(cinfo[i]), "%.*s", cinfoval.s.len, cinfoval.s.s);
cinfo[i][sizeof(cinfo[i]) - 1] = '\0';
} else {
cinfo[i][0] = '\0';
}
}
cinfonum = i;
cinfostr[0] = '\0';
for (i = 0; i < cinfonum; i++) {
if (cinfo[cinfonum - i - 1][0] != '\0') {
OSPPTransactionSetCustomInfo(trans, i, cinfo[cinfonum - i - 1]);
snprintf(cinfostr + strlen(cinfostr), sizeof(cinfostr) - strlen(cinfostr), "custom_info%d '%s' ", i + 1, cinfo[cinfonum - i - 1]);
}
}
cinfostr[sizeof(cinfostr) - 1] = '\0';
}
LM_INFO("request auth and routing for: "
"service_type '%d' "
"source '%s' "
"source_dev '%s' "
"source_networkid '%s' "
"calling '%s' "
"called '%s' "
"preferred '%s' "
"nprn '%s' "
"npcic '%s' "
"npdi '%d' "
/*
"spid '%s' "
"ocn '%s' "
"spn '%s' "
"altspn '%s' "
"mcc '%s' "
"mnc '%s' "
*/
"rpid '%s' "
"pai '%s' "
"div_user '%s' "
"div_host '%s' "
"pci '%s' "
"call_id '%.*s' "
"dest_count '%d' "
"%s\n",
_osp_service_type,
sourcebuf,
srcdevbuf,
snid,
calling,
called,
(preferred[0] == NULL) ? "" : preferred[0],
rn,
cic,
npdi,
/*
opname[OSPC_OPNAME_SPID],
opname[OSPC_OPNAME_OCN],
opname[OSPC_OPNAME_SPN],
opname[OSPC_OPNAME_ALTSPN],
opname[OSPC_OPNAME_MCC],
opname[OSPC_OPNAME_MNC],
*/
rpid,
pai,
divuser,
divhostbuf,
pci,
callids[0]->Length,
callids[0]->Value,
destcount,
cinfostr);
/* try to request authorization */
errcode = OSPPTransactionRequestAuthorisation(
trans, /* transaction handle */
sourcebuf, /* from the configuration file */
srcdevbuf, /* source device of call, protocol specific, in OSP format */
calling, /* calling number in nodotted e164 notation */
OSPC_NFORMAT_E164, /* calling number format */
called, /* called number */
OSPC_NFORMAT_E164, /* called number format */
"", /* optional username string, used if no number */
callidnumber, /* number of call ids, here always 1 */
callids, /* sized-1 array of call ids */
preferred, /* preferred destinations */
&destcount, /* max destinations, after call dest_count */
&logsize, /* size allocated for detaillog (next param) 0=no log */
detaillog); /* memory location for detaillog to be stored */
if ((errcode == OSPC_ERR_NO_ERROR) &&
(ospLoadRoutes(trans, destcount, source, srcdev, called, authtime, rpid, pai, divuser, divhostbuf, pci) == 0))
{
LM_INFO("there are '%d' OSP routes, call_id '%.*s'\n",
destcount,
callids[0]->Length,
callids[0]->Value);
result = MODULE_RETURNCODE_TRUE;
} else {
LM_ERR("failed to request auth and routing (%d), call_id '%.*s'\n",
errcode,
callids[0]->Length,
callids[0]->Value);
switch (errcode) {
case OSPC_ERR_TRAN_ROUTE_BLOCKED:
result = -403;
break;
case OSPC_ERR_TRAN_ROUTE_NOT_FOUND:
result = -404;
break;
case OSPC_ERR_TRAN_CALLING_INVALID:
result = -428;
break;
case OSPC_ERR_TRAN_CALLED_FILTERING:
result = -484;
break;
case OSPC_ERR_NO_ERROR:
/* AuthRsp ok but ospLoadRoutes fails */
result = MODULE_RETURNCODE_ERROR;
break;
default:
result = MODULE_RETURNCODE_FALSE;
break;
}
}
}
if (callids[0] != NULL) {
OSPPCallIdDelete(&(callids[0]));
}
if (trans != -1) {
OSPPTransactionDelete(trans);
}
return result;
}
/*
* Validate OSP token
* param ignore1
* param ignore2
* return MODULE_RETURNCODE_TRUE success, MODULE_RETURNCODE_FALSE failure
*/
int ospValidateHeader (
struct sip_msg* msg,
char* ignore1,
char* ignore2)
{
int errorcode;
OSPTTRANHANDLE transaction = -1;
unsigned int authorized = 0;
unsigned int timelimit = 0;
void* detaillog = NULL;
unsigned int logsize = 0;
unsigned char* callidval = (unsigned char*)"";
OSPTCALLID* callid = NULL;
unsigned callidsize = 0;
unsigned char token[OSP_TOKENBUF_SIZE];
unsigned int tokensize = sizeof(token);
osp_dest dest;
int result = MODULE_RETURNCODE_FALSE;
LOG(L_DBG, "osp: ospValidateHeader\n");
ospInitDestination(&dest);
if ((errorcode = OSPPTransactionNew(_osp_provider, &transaction) != 0)) {
LOG(L_ERR, "osp: ERROR: failed to create a new OSP transaction handle (%d)\n", errorcode);
} else if ((ospGetRpidUserpart(msg, dest.calling, sizeof(dest.calling)) != 0) &&
(ospGetFromUserpart(msg, dest.calling, sizeof(dest.calling)) != 0))
{
LOG(L_ERR, "osp: ERROR: failed to extract calling number\n");
} else if ((ospGetUriUserpart(msg, dest.called, sizeof(dest.called)) != 0) &&
(ospGetToUserpart(msg, dest.called, sizeof(dest.called)) != 0))
{
LOG(L_ERR, "osp: ERROR: failed to extract called number\n");
} else if (ospGetCallId(msg, &callid) != 0) {
LOG(L_ERR, "osp: ERROR: failed to extract call id\n");
} else if (ospGetSourceAddress(msg, dest.source, sizeof(dest.source)) != 0) {
LOG(L_ERR, "osp: ERROR: failed to extract source address\n");
} else if (ospGetOspHeader(msg, token, &tokensize) != 0) {
LOG(L_ERR, "osp: ERROR: failed to extract OSP authorization token\n");
} else {
LOG(L_INFO,
"osp: validate token for: "
"transaction_handle '%i' "
"e164_source '%s' "
"e164_dest '%s' "
"validate_call_id '%s' "
"call_id '%.*s'\n",
transaction,
dest.calling,
dest.called,
_osp_validate_callid == 0 ? "No" : "Yes",
callid->ospmCallIdLen,
callid->ospmCallIdVal);
if (_osp_validate_callid != 0) {
callidsize = callid->ospmCallIdLen;
callidval = callid->ospmCallIdVal;
}
errorcode = OSPPTransactionValidateAuthorisation(
transaction,
"",
"",
"",
"",
dest.calling,
OSPC_E164,
dest.called,
OSPC_E164,
callidsize,
callidval,
tokensize,
token,
&authorized,
&timelimit,
&logsize,
detaillog,
_osp_token_format);
if (callid->ospmCallIdLen > sizeof(dest.callid) - 1) {
dest.callidsize = sizeof(dest.callid) - 1;
} else {
dest.callidsize = callid->ospmCallIdLen;
}
memcpy(dest.callid, callid->ospmCallIdVal, dest.callidsize);
dest.callid[dest.callidsize] = 0;
dest.tid = ospGetTransactionId(transaction);
dest.type = OSPC_DESTINATION;
dest.authtime = time(NULL);
strcpy(dest.host, _osp_device_ip);
ospSaveTermDestination(&dest);
if ((errorcode == 0) && (authorized == 1)) {
LOG(L_DBG,
"osp: call is authorized for %d seconds, call_id '%.*s' transaction_id '%lld'",
timelimit,
dest.callidsize,
dest.callid,
dest.tid);
ospRecordTermTransaction(msg, transaction, dest.source, dest.calling, dest.called, dest.authtime);
result = MODULE_RETURNCODE_TRUE;
} else {
LOG(L_ERR, "osp: ERROR: token is invalid (%i)\n", errorcode);
/*
* Update terminating status code to 401 and report terminating setup usage.
* We may need to make 401 configurable, just in case a user decides to reply with
* a different code. Other options - trigger call setup usage reporting from the cpl
* (after replying with an error code), or maybe use a different tm callback.
*/
ospRecordEvent(0, 401);
}
}
if (transaction != -1) {
OSPPTransactionDelete(transaction);
}
if (callid != NULL) {
OSPPCallIdDelete(&callid);
}
return result;
}
/*
* Request OSP authorization and routeing
* param msg SIP message
* param ignore1
* param ignore2
* return MODULE_RETURNCODE_TRUE success, MODULE_RETURNCODE_FALSE failure
*/
int ospRequestRouting(
struct sip_msg* msg,
char* ignore1,
char* ignore2)
{
int errorcode;
time_t authtime;
char source[OSP_E164BUF_SIZE];
char sourcedev[OSP_STRBUF_SIZE];
char src[OSP_STRBUF_SIZE];
char destination[OSP_E164BUF_SIZE];
unsigned int callidnumber = 1;
OSPTCALLID* callids[callidnumber];
unsigned int logsize = 0;
char* detaillog = NULL;
const char** preferred = NULL;
unsigned int destcount;
OSPTTRANHANDLE transaction = -1;
int result = MODULE_RETURNCODE_FALSE;
LOG(L_DBG, "osp: ospRequestRouting\n");
authtime = time(NULL);
destcount = _osp_max_dests;
if ((errorcode = OSPPTransactionNew(_osp_provider, &transaction)) != OSPC_ERR_NO_ERROR) {
LOG(L_ERR, "osp: ERROR: failed to create new OSP transaction (%d)\n", errorcode);
} else if ((ospGetRpidUserpart(msg, source, sizeof(source)) != 0) &&
(ospGetFromUserpart(msg, source, sizeof(source)) != 0))
{
LOG(L_ERR, "osp: ERROR: failed to extract calling number\n");
} else if ((ospGetUriUserpart(msg, destination, sizeof(destination)) != 0) &&
(ospGetToUserpart(msg, destination, sizeof(destination)) != 0))
{
LOG(L_ERR, "osp: ERROR: failed to extract called number\n");
} else if (ospGetCallId(msg, &(callids[0])) != 0) {
LOG(L_ERR, "osp: ERROR: failed to extract call id\n");
} else if (ospGetSourceAddress(msg, sourcedev, sizeof(sourcedev)) != 0) {
LOG(L_ERR, "osp: ERROR: failed to extract source address\n");
} else {
ospConvertAddress(sourcedev, src, sizeof(src));
LOG(L_INFO,
"osp: request auth and routing for: "
"source '%s' "
"source_port '%s' "
"source_dev '%s' "
"e164_source '%s' "
"e164_dest '%s' "
"call_id '%.*s' "
"dest_count '%i'\n",
_osp_device_ip,
_osp_device_port,
src, /* sourcedev in "[x.x.x.x]" or host.domain format */
source,
destination,
callids[0]->ospmCallIdLen,
callids[0]->ospmCallIdVal,
destcount
);
/* try to request authorization */
errorcode = OSPPTransactionRequestAuthorisation(
transaction, /* transaction handle */
_osp_device_ip, /* from the configuration file */
src, /* source of call, protocol specific, in OSP format */
source, /* calling number in nodotted e164 notation */
OSPC_E164, /* calling number format */
destination, /* called number */
OSPC_E164, /* called number format */
"", /* optional username string, used if no number */
callidnumber, /* number of call ids, here always 1 */
callids, /* sized-1 array of call ids */
preferred, /* preferred destinations, here always NULL */
&destcount, /* max destinations, after call dest_count */
&logsize, /* size allocated for detaillog (next param) 0=no log */
detaillog); /* memory location for detaillog to be stored */
if ((errorcode == OSPC_ERR_NO_ERROR) &&
(ospLoadRoutes(transaction, destcount, _osp_device_ip, sourcedev, destination, authtime) == 0))
{
LOG(L_INFO,
"osp: there are '%d' OSP routes, call_id '%.*s'\n",
destcount,
callids[0]->ospmCallIdLen,
callids[0]->ospmCallIdVal);
result = MODULE_RETURNCODE_TRUE;
} else {
LOG(L_ERR,
"osp: ERROR: failed to request auth and routing (%i), call_id '%.*s\n",
errorcode,
callids[0]->ospmCallIdLen,
callids[0]->ospmCallIdVal);
switch (errorcode) {
case OSPC_ERR_TRAN_ROUTE_BLOCKED:
result = -403;
break;
case OSPC_ERR_TRAN_ROUTE_NOT_FOUND:
result = -404;
break;
case OSPC_ERR_NO_ERROR:
/* AuthRsp ok but ospLoadRoutes fails */
result = -500;
break;
default:
result = MODULE_RETURNCODE_FALSE;
break;
}
}
}
if (callids[0] != NULL) {
OSPPCallIdDelete(&(callids[0]));
}
if (transaction != -1) {
OSPPTransactionDelete(transaction);
}
return result;
}
