/*
* Build OSP usage from destination
* param transaction OSP transaction handle
* param inbound Inbound info
* param dest Destination
* param lastcode Destination status
* return 0 success, others failure
*/
static int ospBuildUsageFromDestination(
OSPTTRANHANDLE transaction,
osp_inbound* inbound,
osp_dest* dest,
int lastcode)
{
int errorcode;
char srcdev[OSP_STRBUF_SIZE];
char source[OSP_STRBUF_SIZE];
char host[OSP_STRBUF_SIZE];
char destdev[OSP_STRBUF_SIZE];
ospConvertToOutAddress(inbound->srcdev, srcdev, sizeof(srcdev));
ospConvertToOutAddress(inbound->source, source, sizeof(source));
ospConvertToOutAddress(dest->host, host, sizeof(host));
ospConvertToOutAddress(dest->destdev, destdev, sizeof(destdev));
errorcode = OSPPTransactionBuildUsageFromScratch(
transaction,
dest->transid,
dest->type,
source,
host,
srcdev,
destdev,
dest->calling,
OSPC_NFORMAT_E164,
inbound->called, /* Report original called number */
OSPC_NFORMAT_E164,
dest->callidsize,
dest->callid,
lastcode,
NULL,
NULL);
OSPPTransactionSetSrcNetworkId(transaction, inbound->snid);
OSPPTransactionSetDestNetworkId(transaction, dest->dnid);
OSPPTransactionSetDestAudioAddr(transaction, dest->destmedia);
OSPPTransactionSetProxyEgressAddr(transaction, dest->egress);
if (dest->starttime && dest->endtime && (dest->starttime <= dest->endtime)) {
OSPPTransactionSetProviderPDD(transaction, (dest->endtime - dest->starttime) * 1000);
}
return errorcode;
}
/*
* Build OSP usage from destination
* param transaction OSP transaction handle
* param dest Destination
* param lastcode Destination status
* return 0 success, others failure
*/
static int ospBuildUsageFromDestination(
OSPTTRANHANDLE transaction,
osp_dest* dest,
int lastcode)
{
int errorcode;
char srcdev[OSP_STRBUF_SIZE];
char source[OSP_STRBUF_SIZE];
char host[OSP_STRBUF_SIZE];
char destdev[OSP_STRBUF_SIZE];
ospConvertToOutAddress(dest->srcdev, srcdev, sizeof(srcdev));
ospConvertToOutAddress(dest->source, source, sizeof(source));
ospConvertToOutAddress(dest->host, host, sizeof(host));
ospConvertToOutAddress(dest->destdev, destdev, sizeof(destdev));
errorcode = OSPPTransactionBuildUsageFromScratch(
transaction,
dest->transid,
dest->type,
source,
host,
srcdev,
destdev,
dest->calling,
OSPC_NFORMAT_E164,
dest->origcalled, /* Report original called number */
OSPC_NFORMAT_E164,
dest->callidsize,
dest->callid,
lastcode,
NULL,
NULL);
OSPPTransactionSetSrcNetworkId(transaction, dest->snid);
OSPPTransactionSetDestNetworkId(transaction, dest->dnid);
return errorcode;
}
/*
* Report OSP usage from OSP cookie
* param msg SIP message
* param cookie OSP cookie (buffer owned by ospReportUsage, can be modified)
* param callid Call ID
* param release Who releases the call first. 0 orig, 1 term
* param type Usage type
* return
*/
static int ospReportUsageFromCookie(
struct sip_msg* msg,
char* cookie,
OSPT_CALL_ID* callid,
OSPE_RELEASE release,
OSPE_ROLE type)
{
char* tmp;
char* token;
char tag;
char* value;
unsigned long long transid = 0;
time_t authtime = 0;
unsigned destcount = 0;
time_t duration = 0;
time_t endtime = time(NULL);
int cookieflags = 0;
unsigned releasecode;
char firstvia[OSP_STRBUF_SIZE];
char from[OSP_STRBUF_SIZE];
char rpid[OSP_STRBUF_SIZE];
char pai[OSP_STRBUF_SIZE];
char divuser[OSP_STRBUF_SIZE];
char divhost[OSP_STRBUF_SIZE];
char pci[OSP_STRBUF_SIZE];
char to[OSP_STRBUF_SIZE];
char nexthop[OSP_STRBUF_SIZE];
char* snid = NULL;
char* dnid = NULL;
char* calling;
char* called;
char* originator = NULL;
char* terminator;
char source[OSP_STRBUF_SIZE];
char dest[OSP_STRBUF_SIZE];
char srcdev[OSP_STRBUF_SIZE];
OSPTTRANHANDLE transaction = -1;
int errorcode;
LM_DBG("cookie '%s' type '%d'\n", cookie == NULL ? "NULL" : cookie, type);
if (cookie != NULL) {
for (token = strtok_r(cookie, "_", &tmp);
token;
token = strtok_r(NULL, "_", &tmp))
{
tag = *token;
value= token + 1;
switch (tag) {
case OSP_COOKIE_TRANSID:
case OSP_COOKIE_TRANSIDUP:
transid = atoll(value);
cookieflags |= OSP_COOKIEHAS_TRANSID;
break;
case OSP_COOKIE_AUTHTIME:
case OSP_COOKIE_AUTHTIMEUP:
authtime = atoi(value);
duration = endtime - authtime;
cookieflags |= OSP_COOKIEHAS_AUTHTIME;
break;
case OSP_COOKIE_SRCIP:
case OSP_COOKIE_SRCIPUP:
originator = value;
cookieflags |= OSP_COOKIEHAS_SRCIP;
break;
case OSP_COOKIE_DCOUNT:
case OSP_COOKIE_DCOUNTUP:
destcount = (unsigned)atoi(value);
cookieflags |= OSP_COOKIEHAS_DSTCOUNT;
break;
case OSP_COOKIE_SNID:
case OSP_COOKIE_SNIDUP:
snid = value;
break;
case OSP_COOKIE_DNID:
case OSP_COOKIE_DNIDUP:
dnid = value;
break;
default:
LM_ERR("unexpected tag '%c' / value '%s'\n", tag, value);
break;
}
}
}
switch (type) {
case OSPC_ROLE_DESTINATION:
if (cookieflags == OSP_COOKIEHAS_TERMALL) {
releasecode = 10016;
} else {
releasecode = 9016;
}
break;
case OSPC_ROLE_SOURCE:
case OSPC_ROLE_OTHER:
case OSPC_ROLE_UNDEFINED:
default:
if (cookieflags == OSP_COOKIEHAS_ORIGALL) {
releasecode = 10016;
} else {
releasecode = 9016;
}
break;
}
if (releasecode == 9016) {
transid = 0;
originator = NULL;
authtime = 0;
duration = 0;
destcount = 0;
}
ospGetViaAddress(msg, firstvia, sizeof(firstvia));
ospGetFromUserpart(msg, from, sizeof(from));
ospGetRpidUserpart(msg, rpid, sizeof(rpid));
ospGetPaiUserpart(msg, pai, sizeof(pai));
ospGetDiversion(msg, divuser, sizeof(divuser), divhost, sizeof(divhost));
ospGetPChargeInfoUserpart(msg, pci, sizeof(pci));
ospGetToUserpart(msg, to, sizeof(to));
ospGetNextHop(msg, nexthop, sizeof(nexthop));
LM_DBG("first via '%s' from '%s' to '%s' next hop '%s'\n",
firstvia,
from,
to,
nexthop);
if (release == OSPC_RELEASE_DESTINATION) {
LM_DBG("term '%s' released the call, call_id '%.*s' transaction_id '%llu'\n",
firstvia,
callid->Length,
callid->Value,
transid);
if (originator == NULL) {
originator = nexthop;
}
calling = to;
called = from;
terminator = firstvia;
} else {
if (release == OSPC_RELEASE_SOURCE) {
LM_DBG("orig '%s' released the call, call_id '%.*s' transaction_id '%llu'\n",
firstvia,
callid->Length,
callid->Value,
transid);
} else {
LM_DBG("unknown '%s' released the call, call_id '%.*s' transaction_id '%llu'\n",
firstvia,
callid->Length,
callid->Value,
transid);
}
if (originator == NULL) {
originator = firstvia;
}
calling = from;
called = to;
terminator = nexthop;
}
errorcode = OSPPTransactionNew(_osp_provider, &transaction);
LM_DBG("created transaction handle '%d' (%d)\n", transaction, errorcode);
switch (type) {
case OSPC_ROLE_DESTINATION:
srcdev[0] = '\0';
ospConvertToOutAddress(originator, source, sizeof(source));
strncpy(dest, _osp_out_device, sizeof(dest));
dest[sizeof(dest) - 1] = '\0';
break;
case OSPC_ROLE_SOURCE:
case OSPC_ROLE_OTHER:
case OSPC_ROLE_UNDEFINED:
default:
ospConvertToOutAddress(originator, srcdev, sizeof(srcdev));
strncpy(source, _osp_out_device, sizeof(source));
source[sizeof(source) - 1] = '\0';
ospConvertToOutAddress(terminator, dest, sizeof(dest));
break;
}
/* RoleInfo must be set before BuildUsageFromScratch */
OSPPTransactionSetRoleInfo(transaction, OSPC_RSTATE_STOP, OSPC_RFORMAT_OSP, OSPC_RVENDOR_OPENSIPS);
errorcode = OSPPTransactionBuildUsageFromScratch(
transaction,
transid,
type,
source,
dest,
srcdev,
"",
calling,
OSPC_NFORMAT_E164,
called,
OSPC_NFORMAT_E164,
callid->Length,
callid->Value,
0,
NULL,
NULL);
LM_DBG("built usage handle '%d' (%d)\n", transaction, errorcode);
if ((errorcode == OSPC_ERR_NO_ERROR) && (destcount > 0)) {
errorcode = OSPPTransactionSetDestinationCount(
transaction,
destcount);
}
if (errorcode == OSPC_ERR_NO_ERROR) {
OSPPTransactionSetProtocol(transaction, OSPC_PROTTYPE_SOURCE, OSPC_PROTNAME_SIP);
OSPPTransactionSetProtocol(transaction, OSPC_PROTTYPE_DESTINATION, OSPC_PROTNAME_SIP);
OSPPTransactionSetSrcNetworkId(transaction, snid);
OSPPTransactionSetDestNetworkId(transaction, dnid);
OSPPTransactionSetRemotePartyId(transaction, OSPC_NFORMAT_E164, rpid);
OSPPTransactionSetAssertedId(transaction, OSPC_NFORMAT_E164, pai);
OSPPTransactionSetDiversion(transaction, divuser, divhost);
OSPPTransactionSetChargeInfo(transaction, OSPC_NFORMAT_E164, pci);
ospReportUsageWrapper(
transaction,
releasecode,
duration,
authtime,
endtime,
0,
0,
0,
0,
release);
}
return errorcode;
}
/*
* 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;
}
/*
* Verify parameters for OSP module
* return 0 success, -1 failure
*/
static int ospVerifyParameters(void)
{
int i;
char hostname[OSP_STRBUF_SIZE];
int result = 0;
if ((_osp_work_mode < 0) || (_osp_work_mode > 1)) {
_osp_work_mode = OSP_DEF_MODE;
LM_WARN("work mode is out of range, reset to %d\n", OSP_DEF_MODE);
}
if ((_osp_service_type < 0) || (_osp_service_type > 3)) {
_osp_service_type = OSP_DEF_SERVICE;
LM_WARN("service type is out of range, reset to %d\n", OSP_DEF_SERVICE);
}
_osp_sp_number = 0;
for (i = 0; i < OSP_DEF_SPS; i++) {
if (_osp_sp_uris[i] != NULL) {
if (_osp_sp_number != i) {
_osp_sp_uris[_osp_sp_number] = _osp_sp_uris[i];
_osp_sp_weights[_osp_sp_number] = _osp_sp_weights[i];
_osp_sp_uris[i] = NULL;
_osp_sp_weights[i] = OSP_DEF_WEIGHT;
}
osp_index[_osp_sp_number] = i + 1;
_osp_sp_number++;
}
}
if (_osp_sp_number == 0) {
LM_ERR("at least one service point uri must be configured\n");
result = -1;
}
if (_osp_device_ip == NULL) {
gethostname(hostname, sizeof(hostname));
_osp_device_ip = hostname;
}
ospConvertToOutAddress(_osp_device_ip, _osp_out_device, sizeof(_osp_out_device));
ospConvertToInAddress(_osp_device_ip, _osp_in_device, sizeof(_osp_in_device));
/* If use_security_features is 0, ignroe the certificate files */
if (_osp_use_security != 0) {
/* Default location for the cert files is in the compile time variable CFG_DIR */
if (_osp_private_key == NULL) {
sprintf(_osp_PRIVATE_KEY, "%spkey.pem", CFG_DIR);
_osp_private_key = _osp_PRIVATE_KEY;
}
if (_osp_local_certificate == NULL) {
sprintf(_osp_LOCAL_CERTIFICATE, "%slocalcert.pem", CFG_DIR);
_osp_local_certificate = _osp_LOCAL_CERTIFICATE;
}
if (_osp_ca_certificate == NULL) {
sprintf(_osp_CA_CERTIFICATE, "%scacert_0.pem", CFG_DIR);
_osp_ca_certificate = _osp_CA_CERTIFICATE;
}
}
if (_osp_token_format < 0 || _osp_token_format > 2) {
_osp_token_format = OSP_DEF_TOKEN;
LM_WARN("token_format is out of range, reset to %d\n", OSP_DEF_TOKEN);
}
if (_osp_max_dests > OSP_DEF_DESTS || _osp_max_dests < 1) {
_osp_max_dests = OSP_DEF_DESTS;
LM_WARN("max_destinations is out of range, reset to %d\n", OSP_DEF_DESTS);
}
if (_osp_report_nid < 0 || _osp_report_nid > 3) {
_osp_report_nid = OSP_DEF_REPORTNID;
LM_WARN("report_networkid is out of range, reset to %d\n", OSP_DEF_REPORTNID);
}
if (_osp_use_np < 0 || _osp_use_np > 1) {
_osp_use_np = OSP_DEF_USENP;
LM_WARN("use_number_portability is out of range, reset to %d\n", OSP_DEF_USENP);
}
if (_osp_export_np < 0 || _osp_export_np > 1) {
_osp_export_np = OSP_DEF_EXPORTNP;
LM_WARN("export_npparameter_order is out of range, reset to %d\n", OSP_DEF_EXPORTNP);
}
if (_osp_append_userphone < 0 || _osp_append_userphone > 1) {
_osp_append_userphone = OSP_DEF_USERPHONE;
LM_WARN("append_userphone is out of range, reset to %d\n", OSP_DEF_USERPHONE);
}
if ((_osp_dnid_location < 0) || (_osp_dnid_location > 2)) {
_osp_dnid_location = OSP_DEF_DNIDLOC;
LM_WARN("networkid_location is out of range, reset to %d\n", OSP_DEF_DNIDLOC);
}
if (!(_osp_dnid_param && *_osp_dnid_param)) {
_osp_dnid_param = OSP_DEF_DNIDPARAM;
}
if ((_osp_swid_location < 0) || (_osp_swid_location > 2)) {
_osp_swid_location = OSP_DEF_SWIDLOC;
LM_WARN("switchid_location is out of range, reset to %d\n", OSP_DEF_SWIDLOC);
}
if (!(_osp_swid_param && *_osp_swid_param)) {
_osp_swid_param = OSP_DEF_SWIDPARAM;
}
if ((_osp_paramstr_location < 0) || (_osp_paramstr_location > 2)) {
_osp_paramstr_location = OSP_DEF_PARAMSTRLOC;
LM_WARN("parameterstring_location is out of range, reset to %d\n", OSP_DEF_PARAMSTRLOC);
}
if (!(_osp_paramstr_value && *_osp_paramstr_value)) {
_osp_paramstr_value = OSP_DEF_PARAMSTRVAL;
}
ospCheckAVP(_osp_srcdev_avp, &_osp_srcdev_avpid, &_osp_srcdev_avptype);
ospCheckAVP(_osp_snid_avp, &_osp_snid_avpid, &_osp_snid_avptype);
ospCheckAVP(_osp_swid_avp, &_osp_swid_avpid, &_osp_swid_avptype);
ospCheckAVP(_osp_cinfo_avp, &_osp_cinfo_avpid, &_osp_cinfo_avptype);
ospCheckAVP(_osp_cnam_avp, &_osp_cnam_avpid, &_osp_cnam_avptype);
if (!(_osp_extraheaders_value && *_osp_extraheaders_value)) {
_osp_extraheaders_value = OSP_DEF_EXTHEADERVAL;
}
ospCheckAVP(_osp_srcmedia_avp, &_osp_srcmedia_avpid, &_osp_srcmedia_avptype);
ospCheckAVP(_osp_destmedia_avp, &_osp_destmedia_avpid, &_osp_destmedia_avptype);
ospCheckAVP(_osp_reqdate_avp, &_osp_reqdate_avpid, &_osp_reqdate_avptype);
ospCheckAVP(_osp_sdpfp_avp, &_osp_sdpfp_avpid, &_osp_sdpfp_avptype);
ospCheckAVP(_osp_identity_avp, &_osp_identity_avpid, &_osp_identity_avptype);
ospCheckAVP(_osp_sp_avp, &_osp_sp_avpid, &_osp_sp_avptype);
ospCheckAVP(_osp_usergroup_avp, &_osp_usergroup_avpid, &_osp_usergroup_avptype);
ospCheckAVP(_osp_userid_avp, &_osp_userid_avpid, &_osp_userid_avptype);
ospCheckAVP(_osp_dest_avp, &_osp_dest_avpid, &_osp_dest_avptype);
ospCheckAVP(_osp_reasontype_avp, &_osp_reasontype_avpid, &_osp_reasontype_avptype);
ospCheckAVP(_osp_reasoncause_avp, &_osp_reasoncause_avpid, &_osp_reasoncause_avptype);
ospCheckAVP(_osp_reasontext_avp, &_osp_reasontext_avpid, &_osp_reasontext_avptype);
ospDumpParameters();
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;
}
/*
* Verify parameters for OSP module
* return 0 success, -1 failure
*/
static int ospVerifyParameters(void)
{
int i;
pv_spec_t avp_spec;
str avp_str;
int result = 0;
if ((_osp_work_mode < 0) || (_osp_work_mode > 1)) {
_osp_work_mode = OSP_DEF_MODE;
LM_WARN("work mode is out of range, reset to %d\n", OSP_DEF_MODE);
}
if ((_osp_service_type < 0) || (_osp_service_type > 1)) {
_osp_service_type = OSP_DEF_SERVICE;
LM_WARN("service type is out of range, reset to %d\n", OSP_DEF_SERVICE);
}
/* If use_security_features is 0, ignroe the certificate files */
if (_osp_use_security != 0) {
/* Default location for the cert files is in the compile time variable CFG_DIR */
if (_osp_private_key == NULL) {
sprintf(_osp_PRIVATE_KEY, "%spkey.pem", CFG_DIR);
_osp_private_key = _osp_PRIVATE_KEY;
}
if (_osp_local_certificate == NULL) {
sprintf(_osp_LOCAL_CERTIFICATE, "%slocalcert.pem", CFG_DIR);
_osp_local_certificate = _osp_LOCAL_CERTIFICATE;
}
if (_osp_ca_certificate == NULL) {
sprintf(_osp_CA_CERTIFICATE, "%scacert_0.pem", CFG_DIR);
_osp_ca_certificate = _osp_CA_CERTIFICATE;
}
}
if (_osp_device_ip != NULL) {
ospConvertToInAddress(_osp_device_ip, _osp_in_device, sizeof(_osp_in_device));
ospConvertToOutAddress(_osp_device_ip, _osp_out_device, sizeof(_osp_out_device));
} else {
_osp_in_device[0] = '\0';
_osp_out_device[0] = '\0';
}
if (_osp_max_dests > OSP_MAX_DESTS || _osp_max_dests < 1) {
_osp_max_dests = OSP_DEF_DESTS;
LM_WARN("max_destinations is out of range, reset to %d\n", OSP_DEF_DESTS);
}
if (_osp_report_nid < 0 || _osp_report_nid > 3) {
_osp_report_nid = OSP_DEF_REPORTNID;
LM_WARN("report_networkid is out of range, reset to %d\n", OSP_DEF_REPORTNID);
}
if (_osp_token_format < 0 || _osp_token_format > 2) {
_osp_token_format = OSP_DEF_TOKEN;
LM_WARN("token_format is out of range, reset to %d\n", OSP_DEF_TOKEN);
}
_osp_sp_number = 0;
for (i = 0; i < OSP_DEF_SPS; i++) {
if (_osp_sp_uris[i] != NULL) {
if (_osp_sp_number != i) {
_osp_sp_uris[_osp_sp_number] = _osp_sp_uris[i];
_osp_sp_weights[_osp_sp_number] = _osp_sp_weights[i];
_osp_sp_uris[i] = NULL;
_osp_sp_weights[i] = OSP_DEF_WEIGHT;
}
osp_index[_osp_sp_number] = i + 1;
_osp_sp_number++;
}
}
if (_osp_sp_number == 0) {
LM_ERR("at least one service point uri must be configured\n");
result = -1;
}
if ((_osp_dnid_location < 0) || (_osp_dnid_location > 3)) {
_osp_dnid_location = OSP_DEF_DNIDLOC;
LM_WARN("networkid_location is out of range, reset to %d\n", OSP_DEF_DNIDLOC);
}
if (!(_osp_dnid_param && *_osp_dnid_param)) {
_osp_dnid_param = OSP_DEF_DNIDPARAM;
}
if ((_osp_work_mode == 1) && _osp_srcdev_avp && *_osp_srcdev_avp) {
avp_str.s = _osp_srcdev_avp;
avp_str.len = strlen(_osp_srcdev_avp);
if ((pv_parse_spec(&avp_str, &avp_spec) == NULL) ||
avp_spec.type != PVT_AVP ||
pv_get_avp_name(0, &(avp_spec.pvp), &_osp_srcdev_avpid, &_osp_srcdev_avptype) != 0)
{
LM_WARN("'%s' invalid AVP definition\n", _osp_srcdev_avp);
_osp_srcdev_avpid = OSP_DEF_AVP;
_osp_srcdev_avptype = 0;
}
} else {
_osp_srcdev_avpid = OSP_DEF_AVP;
_osp_srcdev_avptype = 0;
}
if (_osp_snid_avp && *_osp_snid_avp) {
avp_str.s = _osp_snid_avp;
avp_str.len = strlen(_osp_snid_avp);
if (pv_parse_spec(&avp_str, &avp_spec) == NULL ||
avp_spec.type != PVT_AVP ||
pv_get_avp_name(0, &(avp_spec.pvp), &_osp_snid_avpid, &_osp_snid_avptype) != 0)
{
LM_WARN("'%s' invalid AVP definition\n", _osp_snid_avp);
_osp_snid_avpid = OSP_DEF_AVP;
_osp_snid_avptype = 0;
}
} else {
_osp_snid_avpid = OSP_DEF_AVP;
_osp_snid_avptype = 0;
}
if (_osp_cinfo_avp && *_osp_cinfo_avp) {
avp_str.s = _osp_cinfo_avp;
avp_str.len = strlen(_osp_cinfo_avp);
if (pv_parse_spec(&avp_str, &avp_spec) == NULL ||
avp_spec.type != PVT_AVP ||
pv_get_avp_name(0, &(avp_spec.pvp), &_osp_cinfo_avpid, &_osp_cinfo_avptype) != 0)
{
LM_WARN("'%s' invalid AVP definition\n", _osp_cinfo_avp);
_osp_cinfo_avpid = OSP_DEF_AVP;
_osp_cinfo_avptype = 0;
}
} else {
_osp_cinfo_avpid = OSP_DEF_AVP;
_osp_cinfo_avptype = 0;
}
ospDumpParameters();
return result;
}
