forks
/
asterisk
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
asterisk/apps/app_osplookup.c

3173 lines
105 KiB
C
Raw Normal View History

v18.15.1
2023-05-25 18:45:57 +00:00
/*
* Asterisk -- An open source telephony toolkit.
*
* Copyright (C) 1999 - 2006, Digium, Inc.
*
* Mark Spencer <markster@digium.com>
*
* See http://www.asterisk.org for more information about
* the Asterisk project. Please do not directly contact
* any of the maintainers of this project for assistance;
* the project provides a web site, mailing lists and IRC
* channels for your use.
*
* This program is free software, distributed under the terms of
* the GNU General Public License Version 2. See the LICENSE file
* at the top of the source tree.
*/
/*!
* \file
* \brief Open Settlement Protocol (OSP) Applications
*
* \author Mark Spencer <markster@digium.com>
*
* \extref The OSP Toolkit: http://www.transnexus.com
* \extref OpenSSL http://www.openssl.org
*
* \ingroup applications
*/
/*** MODULEINFO
<depend>osptk</depend>
<depend>openssl</depend>
<support_level>extended</support_level>
<deprecated_in>19</deprecated_in>
<removed_in>21</removed_in>
***/
#include "asterisk.h"
#include <osp/osp.h>
#include <osp/osputils.h>
#include <osp/ospb64.h>
#include "asterisk/paths.h"
#include "asterisk/lock.h"
#include "asterisk/config.h"
#include "asterisk/utils.h"
#include "asterisk/causes.h"
#include "asterisk/channel.h"
#include "asterisk/app.h"
#include "asterisk/module.h"
#include "asterisk/pbx.h"
#include "asterisk/cli.h"
/*** DOCUMENTATION
<application name="OSPAuth" language="en_US">
<synopsis>
OSP Authentication.
</synopsis>
<syntax>
<parameter name="provider">
<para>The name of the provider that authenticates the call.</para>
</parameter>
<parameter name="options">
<para>Reserverd.</para>
</parameter>
</syntax>
<description>
<para>Authenticate a call by OSP.</para>
<para>Input variables:</para>
<variablelist>
<variable name="OSPINPEERIP">
<para>The last hop IP address.</para>
</variable>
<variable name="OSPINTOKEN">
<para>The inbound OSP token.</para>
</variable>
</variablelist>
<para>Output variables:</para>
<variablelist>
<variable name="OSPINHANDLE">
<para>The inbound call OSP transaction handle.</para>
</variable>
<variable name="OSPINTIMELIMIT">
<para>The inbound call duration limit in seconds.</para>
</variable>
</variablelist>
<para>This application sets the following channel variable upon completion:</para>
<variablelist>
<variable name="OSPAUTHSTATUS">
<para>The status of OSPAuth attempt as a text string, one of</para>
<value name="SUCCESS" />
<value name="FAILED" />
<value name="ERROR" />
</variable>
</variablelist>
</description>
<see-also>
<ref type="application">OSPLookup</ref>
<ref type="application">OSPNext</ref>
<ref type="application">OSPFinish</ref>
</see-also>
</application>
<application name="OSPLookup" language="en_US">
<synopsis>
Lookup destination by OSP.
</synopsis>
<syntax>
<parameter name="exten" required="true">
<para>The exten of the call.</para>
</parameter>
<parameter name="provider">
<para>The name of the provider that is used to route the call.</para>
</parameter>
<parameter name="options">
<enumlist>
<enum name="h">
<para>generate H323 call id for the outbound call</para>
</enum>
<enum name="s">
<para>generate SIP call id for the outbound call. Have not been implemented</para>
</enum>
<enum name="i">
<para>generate IAX call id for the outbound call. Have not been implemented</para>
</enum>
</enumlist>
</parameter>
</syntax>
<description>
<para>Looks up destination via OSP.</para>
<para>Input variables:</para>
<variablelist>
<variable name="OSPINACTUALSRC">
<para>The actual source device IP address in indirect mode.</para>
</variable>
<variable name="OSPINPEERIP">
<para>The last hop IP address.</para>
</variable>
<variable name="OSPINTECH">
<para>The inbound channel technology for the call.</para>
</variable>
<variable name="OSPINHANDLE">
<para>The inbound call OSP transaction handle.</para>
</variable>
<variable name="OSPINTIMELIMIT">
<para>The inbound call duration limit in seconds.</para>
</variable>
<variable name="OSPINNETWORKID">
<para>The inbound source network ID.</para>
</variable>
<variable name="OSPINNPRN">
<para>The inbound routing number.</para>
</variable>
<variable name="OSPINNPCIC">
<para>The inbound carrier identification code.</para>
</variable>
<variable name="OSPINNPDI">
<para>The inbound number portability database dip indicator.</para>
</variable>
<variable name="OSPINSPID">
<para>The inbound service provider identity.</para>
</variable>
<variable name="OSPINOCN">
<para>The inbound operator company number.</para>
</variable>
<variable name="OSPINSPN">
<para>The inbound service provider name.</para>
</variable>
<variable name="OSPINALTSPN">
<para>The inbound alternate service provider name.</para>
</variable>
<variable name="OSPINMCC">
<para>The inbound mobile country code.</para>
</variable>
<variable name="OSPINMNC">
<para>The inbound mobile network code.</para>
</variable>
<variable name="OSPINTOHOST">
<para>The inbound To header host part.</para>
</variable>
<variable name="OSPINRPIDUSER">
<para>The inbound Remote-Party-ID header user part.</para>
</variable>
<variable name="OSPINPAIUSER">
<para>The inbound P-Asserted-Identify header user part.</para>
</variable>
<variable name="OSPINDIVUSER">
<para>The inbound Diversion header user part.</para>
</variable>
<variable name="OSPINDIVHOST">
<para>The inbound Diversion header host part.</para>
</variable>
<variable name="OSPINPCIUSER">
<para>The inbound P-Charge-Info header user part.</para>
</variable>
<variable name="OSPINCUSTOMINFOn">
<para>The inbound custom information, where <literal>n</literal> is the index beginning with <literal>1</literal>
upto <literal>8</literal>.</para>
</variable>
</variablelist>
<para>Output variables:</para>
<variablelist>
<variable name="OSPOUTHANDLE">
<para>The outbound call OSP transaction handle.</para>
</variable>
<variable name="OSPOUTTECH">
<para>The outbound channel technology for the call.</para>
</variable>
<variable name="OSPDESTINATION">
<para>The outbound destination IP address.</para>
</variable>
<variable name="OSPOUTCALLING">
<para>The outbound calling number.</para>
</variable>
<variable name="OSPOUTCALLED">
<para>The outbound called number.</para>
</variable>
<variable name="OSPOUTNETWORKID">
<para>The outbound destination network ID.</para>
</variable>
<variable name="OSPOUTNPRN">
<para>The outbound routing number.</para>
</variable>
<variable name="OSPOUTNPCIC">
<para>The outbound carrier identification code.</para>
</variable>
<variable name="OSPOUTNPDI">
<para>The outbound number portability database dip indicator.</para>
</variable>
<variable name="OSPOUTSPID">
<para>The outbound service provider identity.</para>
</variable>
<variable name="OSPOUTOCN">
<para>The outbound operator company number.</para>
</variable>
<variable name="OSPOUTSPN">
<para>The outbound service provider name.</para>
</variable>
<variable name="OSPOUTALTSPN">
<para>The outbound alternate service provider name.</para>
</variable>
<variable name="OSPOUTMCC">
<para>The outbound mobile country code.</para>
</variable>
<variable name="OSPOUTMNC">
<para>The outbound mobile network code.</para>
</variable>
<variable name="OSPOUTTOKEN">
<para>The outbound OSP token.</para>
</variable>
<variable name="OSPDESTREMAILS">
<para>The number of remained destinations.</para>
</variable>
<variable name="OSPOUTTIMELIMIT">
<para>The outbound call duration limit in seconds.</para>
</variable>
<variable name="OSPOUTCALLIDTYPES">
<para>The outbound Call-ID types.</para>
</variable>
<variable name="OSPOUTCALLID">
<para>The outbound Call-ID. Only for H.323.</para>
</variable>
<variable name="OSPDIALSTR">
<para>The outbound Dial command string.</para>
</variable>
</variablelist>
<para>This application sets the following channel variable upon completion:</para>
<variablelist>
<variable name="OSPLOOKUPSTATUS">
<para>The status of OSPLookup attempt as a text string, one of</para>
<value name="SUCCESS" />
<value name="FAILED" />
<value name="ERROR" />
</variable>
</variablelist>
</description>
<see-also>
<ref type="application">OSPAuth</ref>
<ref type="application">OSPNext</ref>
<ref type="application">OSPFinish</ref>
</see-also>
</application>
<application name="OSPNext" language="en_US">
<synopsis>
Lookup next destination by OSP.
</synopsis>
<description>
<para>Looks up the next destination via OSP.</para>
<para>Input variables:</para>
<variablelist>
<variable name="OSPINHANDLE">
<para>The inbound call OSP transaction handle.</para>
</variable>
<variable name="OSPOUTHANDLE">
<para>The outbound call OSP transaction handle.</para>
</variable>
<variable name="OSPINTIMELIMIT">
<para>The inbound call duration limit in seconds.</para>
</variable>
<variable name="OSPOUTCALLIDTYPES">
<para>The outbound Call-ID types.</para>
</variable>
<variable name="OSPDESTREMAILS">
<para>The number of remained destinations.</para>
</variable>
</variablelist>
<para>Output variables:</para>
<variablelist>
<variable name="OSPOUTTECH">
<para>The outbound channel technology.</para>
</variable>
<variable name="OSPDESTINATION">
<para>The destination IP address.</para>
</variable>
<variable name="OSPOUTCALLING">
<para>The outbound calling number.</para>
</variable>
<variable name="OSPOUTCALLED">
<para>The outbound called number.</para>
</variable>
<variable name="OSPOUTNETWORKID">
<para>The outbound destination network ID.</para>
</variable>
<variable name="OSPOUTNPRN">
<para>The outbound routing number.</para>
</variable>
<variable name="OSPOUTNPCIC">
<para>The outbound carrier identification code.</para>
</variable>
<variable name="OSPOUTNPDI">
<para>The outbound number portability database dip indicator.</para>
</variable>
<variable name="OSPOUTSPID">
<para>The outbound service provider identity.</para>
</variable>
<variable name="OSPOUTOCN">
<para>The outbound operator company number.</para>
</variable>
<variable name="OSPOUTSPN">
<para>The outbound service provider name.</para>
</variable>
<variable name="OSPOUTALTSPN">
<para>The outbound alternate service provider name.</para>
</variable>
<variable name="OSPOUTMCC">
<para>The outbound mobile country code.</para>
</variable>
<variable name="OSPOUTMNC">
<para>The outbound mobile network code.</para>
</variable>
<variable name="OSPOUTTOKEN">
<para>The outbound OSP token.</para>
</variable>
<variable name="OSPDESTREMAILS">
<para>The number of remained destinations.</para>
</variable>
<variable name="OSPOUTTIMELIMIT">
<para>The outbound call duration limit in seconds.</para>
</variable>
<variable name="OSPOUTCALLID">
<para>The outbound Call-ID. Only for H.323.</para>
</variable>
<variable name="OSPDIALSTR">
<para>The outbound Dial command string.</para>
</variable>
</variablelist>
<para>This application sets the following channel variable upon completion:</para>
<variablelist>
<variable name="OSPNEXTSTATUS">
<para>The status of the OSPNext attempt as a text string, one of</para>
<value name="SUCCESS" />
<value name="FAILED" />
<value name="ERROR" />
</variable>
</variablelist>
</description>
<see-also>
<ref type="application">OSPAuth</ref>
<ref type="application">OSPLookup</ref>
<ref type="application">OSPFinish</ref>
</see-also>
</application>
<application name="OSPFinish" language="en_US">
<synopsis>
Report OSP entry.
</synopsis>
<syntax>
<parameter name="cause">
<para>Hangup cause.</para>
</parameter>
<parameter name="options">
<para>Reserved.</para>
</parameter>
</syntax>
<description>
<para>Report call state.</para>
<para>Input variables:</para>
<variablelist>
<variable name="OSPINHANDLE">
<para>The inbound call OSP transaction handle.</para>
</variable>
<variable name="OSPOUTHANDLE">
<para>The outbound call OSP transaction handle.</para>
</variable>
<variable name="OSPAUTHSTATUS">
<para>The OSPAuth status.</para>
</variable>
<variable name="OSPLOOKUPSTATUS">
<para>The OSPLookup status.</para>
</variable>
<variable name="OSPNEXTSTATUS">
<para>The OSPNext status.</para>
</variable>
<variable name="OSPINAUDIOQOS">
<para>The inbound call leg audio QoS string.</para>
</variable>
<variable name="OSPOUTAUDIOQOS">
<para>The outbound call leg audio QoS string.</para>
</variable>
</variablelist>
<para>This application sets the following channel variable upon completion:</para>
<variablelist>
<variable name="OSPFINISHSTATUS">
<para>The status of the OSPFinish attempt as a text string, one of</para>
<value name="SUCCESS" />
<value name="FAILED" />
<value name="ERROR" />
</variable>
</variablelist>
</description>
<see-also>
<ref type="application">OSPAuth</ref>
<ref type="application">OSPLookup</ref>
<ref type="application">OSPNext</ref>
</see-also>
</application>
***/
/* OSP Return statuses */
#define AST_OSP_SUCCESS ((char*)"SUCCESS") /* Return status, success */
#define AST_OSP_FAILED ((char*)"FAILED") /* Return status, failed */
#define AST_OSP_ERROR ((char*)"ERROR") /* Return status, error */
/* OSP Buffer Sizes */
#define OSP_SIZE_INTSTR ((unsigned int)16) /* OSP signed/unsigned int string buffer size */
#define OSP_SIZE_NORSTR ((unsigned int)256) /* OSP normal string buffer size */
#define OSP_SIZE_KEYSTR ((unsigned int)1024) /* OSP certificate string buffer size */
#define OSP_SIZE_TOKSTR ((unsigned int)4096) /* OSP token string buffer size */
#define OSP_SIZE_TECHSTR ((unsigned int)32) /* OSP signed/unsigned int string buffer size */
#define OSP_SIZE_UUID ((unsigned int)16) /* UUID size */
#define OSP_SIZE_UUIDSTR ((unsigned int)36) /* UUID string size */
#define OSP_SIZE_QOSSTR ((unsigned int)1024) /* QoS string buffer size */
#define OSP_SIZE_OUTSTR ((unsigned int)288) /* OSP out size for osp_convert_inout */
/* Call ID Type*/
#define OSP_CALLID_UNDEF ((unsigned int)0) /* Undefined */
#define OSP_CALLID_SIP ((unsigned int)(1 << 0)) /* SIP */
#define OSP_CALLID_H323 ((unsigned int)(1 << 1)) /* H.323 */
#define OSP_CALLID_IAX ((unsigned int)(1 << 2)) /* IAX2 */
#define OSP_CALLID_MAXNUM ((unsigned int)3) /* Max number of call ID types */
/* OSP Supported Destination Protocols */
#define OSP_PROT_SIP ((const char*)"SIP") /* SIP protocol name */
#define OSP_PROT_H323 ((const char*)"H323") /* H.323 Q.931 protocol name*/
#define OSP_PROT_IAX ((const char*)"IAX") /* IAX2 protocol name */
#define OSP_PROT_SKYPE ((const char*)"SKYPE") /* Skype protocol name */
/* OSP supported Destination Tech */
#define OSP_TECH_SIP ((const char*)"SIP") /* SIP tech name */
#define OSP_TECH_H323 ((const char*)"H323") /* OH323 tech name */
#define OSP_TECH_IAX ((const char*)"IAX2") /* IAX2 tech name */
#define OSP_TECH_SKYPE ((const char*)"SKYPE") /* Skype tech name */
/* SIP OSP header field name */
#define OSP_SIP_HEADER ((const char*)"P-OSP-Auth-Token")
/* OSP Authentication Policy */
enum osp_authpolicy {
OSP_AUTH_NO = 0, /* Accept any call */
OSP_AUTH_YES, /* Accept call with valid OSP token or without OSP token */
OSP_AUTH_EXC /* Only accept call with valid OSP token */
};
/* OSP Work Mode */
enum osp_workmode {
OSP_MODE_DIRECT= 0, /* Direct */
OSP_MODE_INDIRECT /* Indirect */
};
/* OSP Service Type */
enum osp_srvtype {
OSP_SRV_VOICE = 0, /* Normal voice service */
OSP_SRV_NPQUERY /* Ported number query service */
};
/* OSP Constants */
#define OSP_OK ((int)1) /* OSP function call successful */
#define OSP_FAILED ((int)0) /* OSP function call failed */
#define OSP_ERROR ((int)-1) /* OSP function call error */
#define OSP_AST_OK ((int)0) /* Asterisk function call successful */
#define OSP_AST_ERROR ((int)-1) /* Asterisk function call error */
#define OSP_INVALID_HANDLE ((int)-1) /* Invalid OSP handle, provider, transaction etc. */
#define OSP_CONFIG_FILE ((const char*)"osp.conf") /* OSP configuration file name */
#define OSP_GENERAL_CAT ((const char*)"general") /* OSP global configuration context name */
#define OSP_DEF_PROVIDER ((const char*)"default") /* OSP default provider context name */
#define OSP_MAX_CERTS ((unsigned int)10) /* OSP max number of cacerts */
#define OSP_MAX_SPOINTS ((unsigned int)10) /* OSP max number of service points */
#define OSP_DEF_MAXCONNECT ((unsigned int)20) /* OSP default max_connections */
#define OSP_MIN_MAXCONNECT ((unsigned int)1) /* OSP min max_connections */
#define OSP_MAX_MAXCONNECT ((unsigned int)1000) /* OSP max max_connections */
#define OSP_DEF_RETRYDELAY ((unsigned int)0) /* OSP default retry delay */
#define OSP_MIN_RETRYDELAY ((unsigned int)0) /* OSP min retry delay */
#define OSP_MAX_RETRYDELAY ((unsigned int)10) /* OSP max retry delay */
#define OSP_DEF_RETRYLIMIT ((unsigned int)2) /* OSP default retry times */
#define OSP_MIN_RETRYLIMIT ((unsigned int)0) /* OSP min retry times */
#define OSP_MAX_RETRYLIMIT ((unsigned int)100) /* OSP max retry times */
#define OSP_DEF_TIMEOUT ((unsigned int)500) /* OSP default timeout in ms */
#define OSP_MIN_TIMEOUT ((unsigned int)200) /* OSP min timeout in ms */
#define OSP_MAX_TIMEOUT ((unsigned int)10000) /* OSP max timeout in ms */
#define OSP_DEF_AUTHPOLICY OSP_AUTH_YES /* OSP default auth policy, yes */
#define OSP_AUDIT_URL ((const char*)"localhost") /* OSP default Audit URL */
#define OSP_LOCAL_VALIDATION ((int)1) /* Validate OSP token locally */
#define OSP_SSL_LIFETIME ((unsigned int)300) /* SSL life time, in seconds */
#define OSP_HTTP_PERSISTENCE ((int)1) /* In seconds */
#define OSP_CUSTOMER_ID ((const char*)"") /* OSP customer ID */
#define OSP_DEVICE_ID ((const char*)"") /* OSP device ID */
#define OSP_DEF_MAXDESTS ((unsigned int)12) /* OSP default max number of destinations */
#define OSP_DEF_TIMELIMIT ((unsigned int)0) /* OSP default duration limit, no limit */
#define OSP_DEF_PROTOCOL OSP_PROT_SIP /* OSP default signaling protocol, SIP */
#define OSP_DEF_WORKMODE OSP_MODE_DIRECT /* OSP default work mode, direct */
#define OSP_DEF_SRVTYPE OSP_SRV_VOICE /* OSP default service type, voice */
#define OSP_MAX_CUSTOMINFO ((unsigned int)8) /* OSP max number of custom info */
#define OSP_DEF_INTSTATS ((int)-1) /* OSP default int statistic */
#define OSP_DEF_FLOATSTATS ((float)-1) /* OSP default float statistic */
/* OSP Provider */
struct osp_provider {
OSPTPROVHANDLE handle; /* OSP provider handle */
char name[OSP_SIZE_NORSTR]; /* OSP provider context name */
char privatekey[OSP_SIZE_NORSTR]; /* OSP private key file name */
char localcert[OSP_SIZE_NORSTR]; /* OSP local cert file name */
unsigned int canum; /* Number of cacerts */
char cacerts[OSP_MAX_CERTS][OSP_SIZE_NORSTR]; /* Cacert file names */
unsigned int spnum; /* Number of service points */
char spoints[OSP_MAX_SPOINTS][OSP_SIZE_NORSTR]; /* Service point URLs */
unsigned int maxconnect; /* Max number of connections */
unsigned int retrydelay; /* Retry delay */
unsigned int retrylimit; /* Retry limit */
unsigned int timeout; /* Timeout in ms */
char source[OSP_SIZE_NORSTR]; /* IP of self */
enum osp_authpolicy authpolicy; /* OSP authentication policy */
const char* defprotocol; /* OSP default signaling protocol */
enum osp_workmode workmode; /* OSP work mode */
enum osp_srvtype srvtype; /* OSP service type */
struct osp_provider* next; /* Pointer to next OSP provider */
};
/* Call ID */
struct osp_callid {
unsigned char buf[OSP_SIZE_NORSTR]; /* Call ID string */
unsigned int len; /* Call ID length */
};
/* Number Portability Data */
struct osp_npdata {
const char* rn; /* Rounding Number */
const char* cic; /* Carrier Identification Code */
int npdi; /* NP Database Dip Indicator */
const char* opname[OSPC_OPNAME_NUMBER]; /* Operator Names */
};
/* SIP Header Parameters */
struct osp_headers {
const char* rpiduser; /* Remote-Party-ID header user info */
const char* paiuser; /* P-Asserted-Identity header user info */
const char* divuser; /* Diversion header user info */
const char* divhost; /* Diversion header host info */
const char* pciuser; /* P-Charge-Info header user info */
};
/* OSP Application In/Output Results */
struct osp_results {
int inhandle; /* Inbound transaction handle */
int outhandle; /* Outbound transaction handle */
unsigned int intimelimit; /* Inbound duration limit */
unsigned int outtimelimit; /* Outbound duration limit */
char intech[OSP_SIZE_TECHSTR]; /* Inbound Asterisk TECH string */
char outtech[OSP_SIZE_TECHSTR]; /* Outbound Asterisk TECH string */
char dest[OSP_SIZE_NORSTR]; /* Outbound destination IP address */
char calling[OSP_SIZE_NORSTR]; /* Outbound calling number, may be translated */
char called[OSP_SIZE_NORSTR]; /* Outbound called number, may be translated */
char token[OSP_SIZE_TOKSTR]; /* Outbound OSP token */
char networkid[OSP_SIZE_NORSTR]; /* Outbound network ID */
char nprn[OSP_SIZE_NORSTR]; /* Outbound NP routing number */
char npcic[OSP_SIZE_NORSTR]; /* Outbound NP carrier identification code */
int npdi; /* Outbound NP database dip indicator */
char opname[OSPC_OPNAME_NUMBER][OSP_SIZE_NORSTR]; /* Outbound Operator names */
unsigned int numdests; /* Number of remain outbound destinations */
struct osp_callid outcallid; /* Outbound call ID */
};
/* OSP Call Leg */
enum osp_callleg {
OSP_CALL_INBOUND, /* Inbound call leg */
OSP_CALL_OUTBOUND /* Outbound call leg */
};
/* OSP Media Stream Direction */
enum osp_direction {
OSP_DIR_RX = 0, /* Receive */
OSP_DIR_TX, /* Send */
OSP_DIR_NUMBER /* Number of directions */
};
/* OSP Metrics */
struct osp_metrics {
int value; /* Value */
float min; /* Minimum */
float max; /* Maximum */
float avg; /* Average */
float sdev; /* Standard deviation */
};
/* OSP Module Global Variables */
AST_MUTEX_DEFINE_STATIC(osp_lock); /* Lock of OSP provider list */
static int osp_initialized = 0; /* Init flag */
static int osp_hardware = 0; /* Hardware acceleration flag */
static int osp_security = 0; /* Using security features flag */
static struct osp_provider* osp_providers = NULL; /* OSP provider list */
static unsigned int osp_tokenformat = TOKEN_ALGO_SIGNED; /* Token format supported */
/* OSP default certificates */
const char* B64PKey = "MIIBOgIBAAJBAK8t5l+PUbTC4lvwlNxV5lpl+2dwSZGW46dowTe6y133XyVEwNiiRma2YNk3xKs/TJ3Wl9Wpns2SYEAJsFfSTukCAwEAAQJAPz13vCm2GmZ8Zyp74usTxLCqSJZNyMRLHQWBM0g44Iuy4wE3vpi7Wq+xYuSOH2mu4OddnxswCP4QhaXVQavTAQIhAOBVCKXtppEw9UaOBL4vW0Ed/6EA/1D8hDW6St0h7EXJAiEAx+iRmZKhJD6VT84dtX5ZYNVk3j3dAcIOovpzUj9a0CECIEduTCapmZQ5xqAEsLXuVlxRtQgLTUD4ZxDElPn8x0MhAiBE2HlcND0+qDbvtwJQQOUzDgqg5xk3w8capboVdzAlQQIhAMC+lDL7+gDYkNAft5Mu+NObJmQs4Cr+DkDFsKqoxqrm";
const char* B64LCert = "MIIBeTCCASMCEHqkOHVRRWr+1COq3CR/xsowDQYJKoZIhvcNAQEEBQAwOzElMCMGA1UEAxMcb3NwdGVzdHNlcnZlci50cmFuc25leHVzLmNvbTESMBAGA1UEChMJT1NQU2VydmVyMB4XDTA1MDYyMzAwMjkxOFoXDTA2MDYyNDAwMjkxOFowRTELMAkGA1UEBhMCQVUxEzARBgNVBAgTClNvbWUtU3RhdGUxITAfBgNVBAoTGEludGVybmV0IFdpZGdpdHMgUHR5IEx0ZDBcMA0GCSqGSIb3DQEBAQUAA0sAMEgCQQCvLeZfj1G0wuJb8JTcVeZaZftncEmRluOnaME3ustd918lRMDYokZmtmDZN8SrP0yd1pfVqZ7NkmBACbBX0k7pAgMBAAEwDQYJKoZIhvcNAQEEBQADQQDnV8QNFVVJx/+7IselU0wsepqMurivXZzuxOmTEmTVDzCJx1xhA8jd3vGAj7XDIYiPub1PV23eY5a2ARJuw5w9";
const char* B64CACert = "MIIBYDCCAQoCAQEwDQYJKoZIhvcNAQEEBQAwOzElMCMGA1UEAxMcb3NwdGVzdHNlcnZlci50cmFuc25leHVzLmNvbTESMBAGA1UEChMJT1NQU2VydmVyMB4XDTAyMDIwNDE4MjU1MloXDTEyMDIwMzE4MjU1MlowOzElMCMGA1UEAxMcb3NwdGVzdHNlcnZlci50cmFuc25leHVzLmNvbTESMBAGA1UEChMJT1NQU2VydmVyMFwwDQYJKoZIhvcNAQEBBQADSwAwSAJBAPGeGwV41EIhX0jEDFLRXQhDEr50OUQPq+f55VwQd0TQNts06BP29+UiNdRW3c3IRHdZcJdC1Cg68ME9cgeq0h8CAwEAATANBgkqhkiG9w0BAQQFAANBAGkzBSj1EnnmUxbaiG1N4xjIuLAWydun7o3bFk2tV8dBIhnuh445obYyk1EnQ27kI7eACCILBZqi2MHDOIMnoN0=";
/* OSP Client Wrapper APIs */
/*!
* \brief Create OSP provider handle according to configuration
* \param cfg OSP configuration
* \param name OSP provider context name
* \return OSP_OK Success, OSP_FAILED Failed, OSP_ERROR Error
*/
static int osp_create_provider(
struct ast_config* cfg,
const char* name)
{
int res = OSP_FAILED;
struct ast_variable* var;
struct osp_provider* provider;
OSPTPRIVATEKEY privatekey;
OSPT_CERT localcert;
OSPT_CERT cacerts[OSP_MAX_CERTS];
const OSPT_CERT* pcacerts[OSP_MAX_CERTS];
const char* pspoints[OSP_MAX_SPOINTS];
unsigned char privatekeydata[OSP_SIZE_KEYSTR];
unsigned char localcertdata[OSP_SIZE_KEYSTR];
unsigned char cacertdata[OSP_SIZE_KEYSTR];
int i, num, error = OSPC_ERR_NO_ERROR;
if (!(provider = ast_calloc(1, sizeof(*provider)))) {
ast_log(LOG_ERROR, "Out of memory\n");
return OSP_ERROR;
}
/* ast_calloc has set 0 in provider */
provider->handle = OSP_INVALID_HANDLE;
ast_copy_string(provider->name, name, sizeof(provider->name));
snprintf(provider->privatekey, sizeof(provider->privatekey), "%s/%s-privatekey.pem", ast_config_AST_KEY_DIR, name);
snprintf(provider->localcert, sizeof(provider->localcert), "%s/%s-localcert.pem", ast_config_AST_KEY_DIR, name);
snprintf(provider->cacerts[0], sizeof(provider->cacerts[0]), "%s/%s-cacert_0.pem", ast_config_AST_KEY_DIR, name);
provider->maxconnect = OSP_DEF_MAXCONNECT;
provider->retrydelay = OSP_DEF_RETRYDELAY;
provider->retrylimit = OSP_DEF_RETRYLIMIT;
provider->timeout = OSP_DEF_TIMEOUT;
provider->authpolicy = OSP_DEF_AUTHPOLICY;
provider->defprotocol = OSP_DEF_PROTOCOL;
provider->workmode = OSP_DEF_WORKMODE;
provider->srvtype = OSP_DEF_SRVTYPE;
for (var = ast_variable_browse(cfg, name); var != NULL; var = var->next) {
if (!strcasecmp(var->name, "privatekey")) {
if (osp_security) {
if (var->value[0] == '/') {
ast_copy_string(provider->privatekey, var->value, sizeof(provider->privatekey));
} else {
snprintf(provider->privatekey, sizeof(provider->privatekey), "%s/%s", ast_config_AST_KEY_DIR, var->value);
}
ast_debug(1, "OSP: privatekey '%s'\n", provider->privatekey);
}
} else if (!strcasecmp(var->name, "localcert")) {
if (osp_security) {
if (var->value[0] == '/') {
ast_copy_string(provider->localcert, var->value, sizeof(provider->localcert));
} else {
snprintf(provider->localcert, sizeof(provider->localcert), "%s/%s", ast_config_AST_KEY_DIR, var->value);
}
ast_debug(1, "OSP: localcert '%s'\n", provider->localcert);
}
} else if (!strcasecmp(var->name, "cacert")) {
if (osp_security) {
if (provider->canum < OSP_MAX_CERTS) {
if (var->value[0] == '/') {
ast_copy_string(provider->cacerts[provider->canum], var->value, sizeof(provider->cacerts[provider->canum]));
} else {
snprintf(provider->cacerts[provider->canum], sizeof(provider->cacerts[provider->canum]), "%s/%s", ast_config_AST_KEY_DIR, var->value);
}
ast_debug(1, "OSP: cacerts[%d]: '%s'\n", provider->canum, provider->cacerts[provider->canum]);
provider->canum++;
} else {
ast_log(LOG_WARNING, "OSP: Too many CA Certificates at line %d\n", var->lineno);
}
}
} else if (!strcasecmp(var->name, "servicepoint")) {
if (provider->spnum < OSP_MAX_SPOINTS) {
ast_copy_string(provider->spoints[provider->spnum], var->value, sizeof(provider->spoints[provider->spnum]));
ast_debug(1, "OSP: servicepoint[%d]: '%s'\n", provider->spnum, provider->spoints[provider->spnum]);
provider->spnum++;
} else {
ast_log(LOG_WARNING, "OSP: Too many Service Points at line %d\n", var->lineno);
}
} else if (!strcasecmp(var->name, "maxconnect")) {
if ((sscanf(var->value, "%30d", &num) == 1) && (num >= OSP_MIN_MAXCONNECT) && (num <= OSP_MAX_MAXCONNECT)) {
provider->maxconnect = num;
ast_debug(1, "OSP: maxconnect '%d'\n", num);
} else {
ast_log(LOG_WARNING, "OSP: maxconnect should be an integer from %d to %d, not '%s' at line %d\n",
OSP_MIN_MAXCONNECT, OSP_MAX_MAXCONNECT, var->value, var->lineno);
}
} else if (!strcasecmp(var->name, "retrydelay")) {
if ((sscanf(var->value, "%30d", &num) == 1) && (num >= OSP_MIN_RETRYDELAY) && (num <= OSP_MAX_RETRYDELAY)) {
provider->retrydelay = num;
ast_debug(1, "OSP: retrydelay '%d'\n", num);
} else {
ast_log(LOG_WARNING, "OSP: retrydelay should be an integer from %d to %d, not '%s' at line %d\n",
OSP_MIN_RETRYDELAY, OSP_MAX_RETRYDELAY, var->value, var->lineno);
}
} else if (!strcasecmp(var->name, "retrylimit")) {
if ((sscanf(var->value, "%30d", &num) == 1) && (num >= OSP_MIN_RETRYLIMIT) && (num <= OSP_MAX_RETRYLIMIT)) {
provider->retrylimit = num;
ast_debug(1, "OSP: retrylimit '%d'\n", num);
} else {
ast_log(LOG_WARNING, "OSP: retrylimit should be an integer from %d to %d, not '%s' at line %d\n",
OSP_MIN_RETRYLIMIT, OSP_MAX_RETRYLIMIT, var->value, var->lineno);
}
} else if (!strcasecmp(var->name, "timeout")) {
if ((sscanf(var->value, "%30d", &num) == 1) && (num >= OSP_MIN_TIMEOUT) && (num <= OSP_MAX_TIMEOUT)) {
provider->timeout = num;
ast_debug(1, "OSP: timeout '%d'\n", num);
} else {
ast_log(LOG_WARNING, "OSP: timeout should be an integer from %d to %d, not '%s' at line %d\n",
OSP_MIN_TIMEOUT, OSP_MAX_TIMEOUT, var->value, var->lineno);
}
} else if (!strcasecmp(var->name, "source")) {
ast_copy_string(provider->source, var->value, sizeof(provider->source));
ast_debug(1, "OSP: source '%s'\n", provider->source);
} else if (!strcasecmp(var->name, "authpolicy")) {
if ((sscanf(var->value, "%30d", &num) == 1) && ((num == OSP_AUTH_NO) || (num == OSP_AUTH_YES) || (num == OSP_AUTH_EXC))) {
provider->authpolicy = num;
ast_debug(1, "OSP: authpolicy '%d'\n", num);
} else {
ast_log(LOG_WARNING, "OSP: authpolicy should be %d, %d or %d, not '%s' at line %d\n",
OSP_AUTH_NO, OSP_AUTH_YES, OSP_AUTH_EXC, var->value, var->lineno);
}
} else if (!strcasecmp(var->name, "defprotocol")) {
if (!strcasecmp(var->value, OSP_PROT_SIP)) {
provider->defprotocol = OSP_PROT_SIP;
ast_debug(1, "OSP: default protocol SIP\n");
} else if (!strcasecmp(var->value, OSP_PROT_H323)) {
provider->defprotocol = OSP_PROT_H323;
ast_debug(1, "OSP: default protocol H.323\n");
} else if (!strcasecmp(var->value, OSP_PROT_IAX)) {
provider->defprotocol = OSP_PROT_IAX;
ast_debug(1, "OSP: default protocol IAX\n");
} else if (!strcasecmp(var->value, OSP_PROT_SKYPE)) {
provider->defprotocol = OSP_PROT_SKYPE;
ast_debug(1, "OSP: default protocol Skype\n");
} else {
ast_log(LOG_WARNING, "OSP: default protocol should be %s, %s, %s or %s not '%s' at line %d\n",
OSP_PROT_SIP, OSP_PROT_H323, OSP_PROT_IAX, OSP_PROT_SKYPE, var->value, var->lineno);
}
} else if (!strcasecmp(var->name, "workmode")) {
if ((sscanf(var->value, "%30d", &num) == 1) && ((num == OSP_MODE_DIRECT) || (num == OSP_MODE_INDIRECT))) {
provider->workmode = num;
ast_debug(1, "OSP: workmode '%d'\n", num);
} else {
ast_log(LOG_WARNING, "OSP: workmode should be %d or %d, not '%s' at line %d\n",
OSP_MODE_DIRECT, OSP_MODE_INDIRECT, var->value, var->lineno);
}
} else if (!strcasecmp(var->name, "servicetype")) {
if ((sscanf(var->value, "%30d", &num) == 1) && ((num == OSP_SRV_VOICE) || (num == OSP_SRV_NPQUERY))) {
provider->srvtype = num;
ast_debug(1, "OSP: servicetype '%d'\n", num);
} else {
ast_log(LOG_WARNING, "OSP: servicetype should be %d or %d, not '%s' at line %d\n",
OSP_SRV_VOICE, OSP_SRV_NPQUERY, var->value, var->lineno);
}
}
}
if (provider->canum == 0) {
provider->canum = 1;
}
for (i = 0; i < provider->spnum; i++) {
pspoints[i] = provider->spoints[i];
}
if (osp_security) {
privatekey.PrivateKeyData = NULL;
privatekey.PrivateKeyLength = 0;
localcert.CertData = NULL;
localcert.CertDataLength = 0;
for (i = 0; i < provider->canum; i++) {
cacerts[i].CertData = NULL;
cacerts[i].CertDataLength = 0;
}
if ((error = OSPPUtilLoadPEMPrivateKey((unsigned char*)provider->privatekey, &privatekey)) != OSPC_ERR_NO_ERROR) {
ast_log(LOG_WARNING, "OSP: Unable to load privatekey '%s', error '%d'\n", provider->privatekey, error);
} else if ((error = OSPPUtilLoadPEMCert((unsigned char*)provider->localcert, &localcert)) != OSPC_ERR_NO_ERROR) {
ast_log(LOG_WARNING, "OSP: Unable to load localcert '%s', error '%d'\n", provider->localcert, error);
} else {
for (i = 0; i < provider->canum; i++) {
if ((error = OSPPUtilLoadPEMCert((unsigned char*)provider->cacerts[i], &cacerts[i])) != OSPC_ERR_NO_ERROR) {
ast_log(LOG_WARNING, "OSP: Unable to load cacert '%s', error '%d'\n", provider->cacerts[i], error);
break;
} else {
pcacerts[i] = &cacerts[i];
}
}
}
} else {
privatekey.PrivateKeyData = privatekeydata;
privatekey.PrivateKeyLength = sizeof(privatekeydata);
localcert.CertData = localcertdata;
localcert.CertDataLength = sizeof(localcertdata);
cacerts[0].CertData = cacertdata;
cacerts[0].CertDataLength = sizeof(cacertdata);
pcacerts[0] = &cacerts[0];
if ((error = OSPPBase64Decode(B64PKey, strlen(B64PKey), privatekey.PrivateKeyData, &privatekey.PrivateKeyLength)) != OSPC_ERR_NO_ERROR) {
ast_log(LOG_WARNING, "OSP: Unable to decode private key, error '%d'\n", error);
} else if ((error = OSPPBase64Decode(B64LCert, strlen(B64LCert), localcert.CertData, &localcert.CertDataLength)) != OSPC_ERR_NO_ERROR) {
ast_log(LOG_WARNING, "OSP: Unable to decode local cert, error '%d'\n", error);
} else if ((error = OSPPBase64Decode(B64CACert, strlen(B64CACert), cacerts[0].CertData, &cacerts[0].CertDataLength)) != OSPC_ERR_NO_ERROR) {
ast_log(LOG_WARNING, "OSP: Unable to decode cacert, error '%d'\n", error);
}
}
if (error == OSPC_ERR_NO_ERROR) {
error = OSPPProviderNew(provider->spnum,
pspoints,
NULL,
OSP_AUDIT_URL,
&privatekey,
&localcert,
provider->canum,
pcacerts,
OSP_LOCAL_VALIDATION,
OSP_SSL_LIFETIME,
provider->maxconnect,
OSP_HTTP_PERSISTENCE,
provider->retrydelay,
provider->retrylimit,
provider->timeout,
OSP_CUSTOMER_ID,
OSP_DEVICE_ID,
&provider->handle);
if (error != OSPC_ERR_NO_ERROR) {
ast_log(LOG_WARNING, "OSP: Unable to create provider '%s', error '%d'\n", name, error);
res = OSP_ERROR;
} else {
ast_debug(1, "OSP: provider '%s'\n", name);
ast_mutex_lock(&osp_lock);
provider->next = osp_providers;
osp_providers = provider;
ast_mutex_unlock(&osp_lock);
res = OSP_OK;
}
}
if (osp_security) {
for (i = 0; i < provider->canum; i++) {
if (cacerts[i].CertData) {
ast_free(cacerts[i].CertData);
}
}
if (localcert.CertData) {
ast_free(localcert.CertData);
}
if (privatekey.PrivateKeyData) {
ast_free(privatekey.PrivateKeyData);
}
}
if (res != OSP_OK) {
ast_free(provider);
}
return res;
}
/*!
* \brief Get OSP provider by name
* \param name OSP provider context name
* \param provider OSP provider structure
* \return OSP_OK Success, OSP_FAILED Failed, OSP_ERROR Error
*/
static int osp_get_provider(
const char* name,
struct osp_provider** provider)
{
int res = OSP_FAILED;
struct osp_provider* p;
*provider = NULL;
ast_mutex_lock(&osp_lock);
for (p = osp_providers; p != NULL; p = p->next) {
if (!strcasecmp(p->name, name)) {
*provider = p;
ast_debug(1, "OSP: find provider '%s'\n", name);
res = OSP_OK;
break;
}
}
ast_mutex_unlock(&osp_lock);
return res;
}
/*!
* \brief Create OSP transaction handle
* \param name OSP provider context name
* \param trans OSP transaction handle, output
* \param source Source of provider, output
* \param srcsize Size of source buffer, in
* \return OSK_OK Success, OSK_FAILED Failed, OSP_ERROR Error
*/
static int osp_create_transaction(
const char* name,
int* trans,
char* source,
unsigned int srcsize)
{
int res = OSP_FAILED;
struct osp_provider* provider;
int error;
if ((trans == NULL) || (source == NULL) || (srcsize <= 0)) {
ast_log(LOG_ERROR, "Invalid parameters\n");
return OSP_ERROR;
}
*trans = OSP_INVALID_HANDLE;
*source = '\0';
ast_mutex_lock(&osp_lock);
for (provider = osp_providers; provider; provider = provider->next) {
if (!strcasecmp(provider->name, name)) {
error = OSPPTransactionNew(provider->handle, trans);
if (error == OSPC_ERR_NO_ERROR) {
ast_debug(1, "OSP: transaction '%d'\n", *trans);
ast_copy_string(source, provider->source, srcsize);
ast_debug(1, "OSP: source '%s'\n", source);
res = OSP_OK;
} else {
*trans = OSP_INVALID_HANDLE;
ast_debug(1, "OSP: Unable to create transaction handle, error '%d'\n", error);
*source = '\0';
res = OSP_ERROR;
}
break;
}
}
ast_mutex_unlock(&osp_lock);
return res;
}
/*!
* \brief Convert "address:port" to "[x.x.x.x]:port" or "hostname:port" format
* \param src Source address string
* \param dest Destination address string
* \param destsize Size of dest buffer
*/
static void osp_convert_inout(
const char* src,
char* dest,
unsigned int destsize)
{
struct in_addr inp;
char buffer[OSP_SIZE_NORSTR];
char* port;
if ((dest != NULL) && (destsize > 0)) {
if (!ast_strlen_zero(src)) {
ast_copy_string(buffer, src, sizeof(buffer));
if((port = strchr(buffer, ':')) != NULL) {
*port = '\0';
port++;
}
if (inet_pton(AF_INET, buffer, &inp) == 1) {
if (port != NULL) {
snprintf(dest, destsize, "[%s]:%s", buffer, port);
} else {
snprintf(dest, destsize, "[%s]", buffer);
}
dest[destsize - 1] = '\0';
} else {
ast_copy_string(dest, src, destsize);
}
} else {
*dest = '\0';
}
}
}
/*!
* \brief Convert "[x.x.x.x]:port" or "hostname:prot" to "address:port" format
* \param src Source address string
* \param dest Destination address string
* \param destsize Size of dest buffer
*/
static void osp_convert_outin(
const char* src,
char* dest,
unsigned int destsize)
{
char buffer[OSP_SIZE_NORSTR];
char* end;
char* port;
if ((dest != NULL) && (destsize > 0)) {
if (!ast_strlen_zero(src)) {
ast_copy_string(buffer, src, sizeof(buffer));
if (buffer[0] == '[') {
if((port = strchr(buffer + 1, ':')) != NULL) {
*port = '\0';
port++;
}
if ((end = strchr(buffer + 1, ']')) != NULL) {
*end = '\0';
}
if (port != NULL) {
snprintf(dest, destsize, "%s:%s", buffer + 1, port);
dest[destsize - 1] = '\0';
} else {
ast_copy_string(dest, buffer + 1, destsize);
}
} else {
ast_copy_string(dest, src, destsize);
}
} else {
*dest = '\0';
}
}
}
/*!
* \brief Validate OSP token of inbound call
* \param trans OSP transaction handle
* \param source Source of inbound call
* \param destination Destination of inbound call
* \param calling Calling number
* \param called Called number
* \param token OSP token, may be empty
* \param timelimit Call duration limit, output
* \return OSP_OK Success, OSP_FAILED Failed, OSP_ERROR Error
*/
static int osp_validate_token(
int trans,
const char* source,
const char* destination,
const char* calling,
const char* called,
const char* token,
unsigned int* timelimit)
{
int res;
int tokenlen;
unsigned char tokenstr[OSP_SIZE_TOKSTR];
char src[OSP_SIZE_OUTSTR];
char dest[OSP_SIZE_OUTSTR];
unsigned int authorised;
unsigned int dummy = 0;
int error;
if (timelimit == NULL) {
ast_log(LOG_ERROR, "Invalid parameters\n");
return OSP_ERROR;
}
tokenlen = ast_base64decode(tokenstr, token, strlen(token));
osp_convert_inout(source, src, sizeof(src));
osp_convert_inout(destination, dest, sizeof(dest));
error = OSPPTransactionValidateAuthorisation(trans,
src,
dest,
NULL,
NULL,
calling ? calling : "",
OSPC_NFORMAT_E164,
called,
OSPC_NFORMAT_E164,
0,
NULL,
tokenlen,
(char*)tokenstr,
&authorised,
timelimit,
&dummy,
NULL,
osp_tokenformat);
if (error != OSPC_ERR_NO_ERROR) {
ast_log(LOG_WARNING, "OSP: Unable to validate inbound token, error '%d'\n", error);
*timelimit = 0;
res = OSP_ERROR;
} else if (authorised) {
ast_debug(1, "OSP: Authorised\n");
res = OSP_OK;
} else {
ast_debug(1, "OSP: Unauthorised\n");
res = OSP_FAILED;
}
return res;
}
/*!
* \brief Choose min duration limit
* \param in Inbound duration limit
* \param out Outbound duration limit
* \return min duration limit
*/
static unsigned int osp_choose_timelimit(
unsigned int in,
unsigned int out)
{
if (in == OSP_DEF_TIMELIMIT) {
return out;
} else if (out == OSP_DEF_TIMELIMIT) {
return in;
} else {
return in < out ? in : out;
}
}
/*!
* \brief Choose min duration limit
* \param provider OSP provider
* \param calling Calling number
* \param called Called number
* \param destination Destination IP in '[x.x.x.x]' format
* \param tokenlen OSP token length
* \param token OSP token
* \param reason Failure reason, output
* \param results OSP lookup results, in/output
* \return OSP_OK Success, OSP_FAILED Failed, OSP_ERROR Error
*/
static int osp_check_destination(
struct osp_provider* provider,
const char* calling,
const char* called,
const char* destination,
unsigned int tokenlen,
const char* token,
OSPEFAILREASON* reason,
struct osp_results* results)
{
int res;
OSPE_DEST_OSPENABLED enabled;
OSPE_PROTOCOL_NAME protocol;
char dest[OSP_SIZE_NORSTR];
OSPE_OPERATOR_NAME type;
int error;
if ((provider == NULL) || (reason == NULL) || (results == NULL)) {
ast_log(LOG_ERROR, "Invalid parameters\n");
return OSP_ERROR;
}
if ((error = OSPPTransactionIsDestOSPEnabled(results->outhandle, &enabled)) != OSPC_ERR_NO_ERROR) {
ast_debug(1, "OSP: Unable to get destination OSP version, error '%d'\n", error);
*reason = OSPC_FAIL_NORMAL_UNSPECIFIED;
return OSP_ERROR;
}
if (enabled == OSPC_DOSP_FALSE) {
results->token[0] = '\0';
} else {
ast_base64encode(results->token, (const unsigned char*)token, tokenlen, sizeof(results->token) - 1);
}
if ((error = OSPPTransactionGetDestinationNetworkId(results->outhandle, sizeof(results->networkid), results->networkid)) != OSPC_ERR_NO_ERROR) {
ast_debug(1, "OSP: Unable to get destination network ID, error '%d'\n", error);
results->networkid[0] = '\0';
}
error = OSPPTransactionGetNumberPortabilityParameters(results->outhandle,
sizeof(results->nprn),
results->nprn,
sizeof(results->npcic),
results->npcic,
&results->npdi);
if (error != OSPC_ERR_NO_ERROR) {
ast_debug(1, "OSP: Unable to get number portability parameters, error '%d'\n", error);
results->nprn[0] = '\0';
results->npcic[0] = '\0';
results->npdi = 0;
}
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
error = OSPPTransactionGetOperatorName(results->outhandle, type, sizeof(results->opname[type]), results->opname[type]);
if (error != OSPC_ERR_NO_ERROR) {
ast_debug(1, "OSP: Unable to get operator name of type '%d', error '%d'\n", type, error);
results->opname[type][0] = '\0';
}
}
if ((error = OSPPTransactionGetDestProtocol(results->outhandle, &protocol)) != OSPC_ERR_NO_ERROR) {
ast_debug(1, "OSP: Unable to get destination protocol, error '%d'\n", error);
*reason = OSPC_FAIL_NORMAL_UNSPECIFIED;
results->token[0] = '\0';
results->networkid[0] = '\0';
results->nprn[0] = '\0';
results->npcic[0] = '\0';
results->npdi = 0;
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
results->opname[type][0] = '\0';
}
return OSP_ERROR;
}
res = OSP_OK;
osp_convert_outin(destination, dest, sizeof(dest));
switch(protocol) {
case OSPC_PROTNAME_SIP:
ast_debug(1, "OSP: protocol SIP\n");
ast_copy_string(results->outtech, OSP_TECH_SIP, sizeof(results->outtech));
ast_copy_string(results->dest, dest, sizeof(results->dest));
ast_copy_string(results->calling, calling, sizeof(results->calling));
ast_copy_string(results->called, called, sizeof(results->called));
break;
case OSPC_PROTNAME_Q931:
ast_debug(1, "OSP: protocol Q.931\n");
ast_copy_string(results->outtech, OSP_TECH_H323, sizeof(results->outtech));
ast_copy_string(results->dest, dest, sizeof(results->dest));
ast_copy_string(results->calling, calling, sizeof(results->calling));
ast_copy_string(results->called, called, sizeof(results->called));
break;
case OSPC_PROTNAME_IAX:
ast_debug(1, "OSP: protocol IAX\n");
ast_copy_string(results->outtech, OSP_TECH_IAX, sizeof(results->outtech));
ast_copy_string(results->dest, dest, sizeof(results->dest));
ast_copy_string(results->calling, calling, sizeof(results->calling));
ast_copy_string(results->called, called, sizeof(results->called));
break;
case OSPC_PROTNAME_SKYPE:
ast_debug(1, "OSP: protocol Skype\n");
ast_copy_string(results->outtech, OSP_TECH_SKYPE, sizeof(results->outtech));
ast_copy_string(results->dest, dest, sizeof(results->dest));
ast_copy_string(results->calling, calling, sizeof(results->calling));
ast_copy_string(results->called, called, sizeof(results->called));
break;
case OSPC_PROTNAME_UNDEFINED:
case OSPC_PROTNAME_UNKNOWN:
ast_debug(1, "OSP: unknown/undefined protocol '%d'\n", protocol);
ast_debug(1, "OSP: use default protocol '%s'\n", provider->defprotocol);
ast_copy_string(results->outtech, provider->defprotocol, sizeof(results->outtech));
ast_copy_string(results->dest, dest, sizeof(results->dest));
ast_copy_string(results->calling, calling, sizeof(results->calling));
ast_copy_string(results->called, called, sizeof(results->called));
break;
case OSPC_PROTNAME_LRQ:
case OSPC_PROTNAME_T37:
case OSPC_PROTNAME_T38:
case OSPC_PROTNAME_SMPP:
case OSPC_PROTNAME_XMPP:
default:
ast_log(LOG_WARNING, "OSP: unsupported protocol '%d'\n", protocol);
*reason = OSPC_FAIL_PROTOCOL_ERROR;
results->token[0] = '\0';
results->networkid[0] = '\0';
results->nprn[0] = '\0';
results->npcic[0] = '\0';
results->npdi = 0;
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
results->opname[type][0] = '\0';
}
res = OSP_FAILED;
break;
}
return res;
}
/*!
* \brief Convert Asterisk status to TC code
* \param cause Asterisk hangup cause
* \return OSP TC code
*/
static OSPEFAILREASON asterisk2osp(
int cause)
{
return (OSPEFAILREASON)cause;
}
/*!
* \brief OSP Authentication function
* \param name OSP provider context name
* \param trans OSP transaction handle, output
* \param source Source of inbound call
* \param calling Calling number
* \param called Called number
* \param token OSP token, may be empty
* \param timelimit Call duration limit, output
* \return OSP_OK Authenricated, OSP_FAILED Unauthenticated, OSP_ERROR Error
*/
static int osp_auth(
const char* name,
int* trans,
const char* source,
const char* calling,
const char* called,
const char* token,
unsigned int* timelimit)
{
int res;
struct osp_provider* provider = NULL;
char dest[OSP_SIZE_NORSTR];
if ((trans == NULL) || (timelimit == NULL)) {
ast_log(LOG_ERROR, "Invalid parameters\n");
return OSP_ERROR;
}
*trans = OSP_INVALID_HANDLE;
*timelimit = OSP_DEF_TIMELIMIT;
if ((res = osp_get_provider(name, &provider)) <= 0) {
ast_debug(1, "OSP: Unabe to find OSP provider '%s'\n", name);
return res;
}
switch (provider->authpolicy) {
case OSP_AUTH_NO:
res = OSP_OK;
break;
case OSP_AUTH_EXC:
if (ast_strlen_zero(token)) {
res = OSP_FAILED;
} else if ((res = osp_create_transaction(name, trans, dest, sizeof(dest))) <= 0) {
ast_debug(1, "OSP: Unable to generate transaction handle\n");
*trans = OSP_INVALID_HANDLE;
res = OSP_FAILED;
} else if((res = osp_validate_token(*trans, source, dest, calling, called, token, timelimit)) <= 0) {
OSPPTransactionRecordFailure(*trans, OSPC_FAIL_CALL_REJECTED);
}
break;
case OSP_AUTH_YES:
default:
if (ast_strlen_zero(token)) {
res = OSP_OK;
} else if ((res = osp_create_transaction(name, trans, dest, sizeof(dest))) <= 0) {
ast_debug(1, "OSP: Unable to generate transaction handle\n");
*trans = OSP_INVALID_HANDLE;
res = OSP_FAILED;
} else if((res = osp_validate_token(*trans, source, dest, calling, called, token, timelimit)) <= 0) {
OSPPTransactionRecordFailure(*trans, OSPC_FAIL_CALL_REJECTED);
}
break;
}
return res;
}
/*!
* \brief Create a UUID
* \param uuid UUID buffer
* \param bufsize UUID buffer size
* \return OSK_OK Created, OSP_ERROR Error
*/
static int osp_create_uuid(
unsigned char* uuid,
unsigned int* bufsize)
{
int i, res;
long int tmp[OSP_SIZE_UUID / sizeof(long int)];
if ((uuid != NULL) && (*bufsize >= OSP_SIZE_UUID)) {
for (i = 0; i < OSP_SIZE_UUID / sizeof(long int); i++) {
tmp[i] = ast_random();
}
memcpy(uuid, tmp, OSP_SIZE_UUID);
*bufsize = OSP_SIZE_UUID;
res = OSP_OK;
} else {
ast_log(LOG_ERROR, "Invalid parameters\n");
res = OSP_ERROR;
}
return res;
}
/*!
* \brief UUID to string
* \param uuid UUID
* \param buffer String buffer
* \param bufsize String buffer size
* \return OSP_OK Successed, OSP_ERROR Error
*/
static int osp_uuid2str(
unsigned char* uuid,
char* buffer,
unsigned int bufsize)
{
int res;
if ((uuid != NULL) && (bufsize > OSP_SIZE_UUIDSTR)) {
snprintf(buffer, bufsize, "%02hhx%02hhx%02hhx%02hhx-%02hhx%02hhx-"
"%02hhx%02hhx-%02hhx%02hhx-"
"%02hhx%02hhx%02hhx%02hhx%02hhx%02hhx",
uuid[0], uuid[1], uuid[2], uuid[3], uuid[4], uuid[5], uuid[6], uuid[7],
uuid[8], uuid[9], uuid[10], uuid[11], uuid[12], uuid[13], uuid[14], uuid[15]);
res = OSP_OK;
} else {
ast_log(LOG_ERROR, "Invalid parameters\n");
res = OSP_ERROR;
}
return res;
}
/*!
* \brief Create a call ID according to the type
* \param type Call ID type
* \param callid Call ID buffer
* \return OSK_OK Created, OSP_FAILED Not create, OSP_ERROR Error
*/
static int osp_create_callid(
unsigned int type,
struct osp_callid* callid)
{
int res;
if (callid == NULL) {
ast_log(LOG_ERROR, "Invalid parameters\n");
return OSP_ERROR;
}
callid->len = sizeof(callid->buf);
switch (type) {
case OSP_CALLID_H323:
res = osp_create_uuid(callid->buf, &callid->len);
break;
case OSP_CALLID_SIP:
case OSP_CALLID_IAX:
res = OSP_FAILED;
break;
default:
res = OSP_ERROR;
break;
}
if ((res != OSP_OK) && (callid->len != 0)) {
callid->buf[0] = '\0';
callid->len = 0;
}
return res;
}
/*!
* \brief OSP Lookup function
* \param name OSP provider context name
* \param callidtypes Call ID types
* \param actualsrc Actual source device in indirect mode
* \param srcdev Source device of outbound call
* \param calling Calling number
* \param called Called number
* \param snetid Source network ID
* \param np NP parameters
* \param headers SIP header parameters
* \param cinfo Custom info
* \param results Lookup results
* \return OSP_OK Found , OSP_FAILED No route, OSP_ERROR Error
*/
static int osp_lookup(
const char* name,
unsigned int callidtypes,
const char* actualsrc,
const char* srcdev,
const char* calling,
const char* called,
const char* snetid,
struct osp_npdata* np,
struct osp_headers* headers,
const char* cinfo[],
struct osp_results* results)
{
int res;
struct osp_provider* provider = NULL;
OSPE_PROTOCOL_NAME protocol;
char source[OSP_SIZE_NORSTR];
char callingnum[OSP_SIZE_NORSTR];
char callednum[OSP_SIZE_NORSTR];
char destination[OSP_SIZE_NORSTR];
char* tmp;
unsigned int tokenlen;
char token[OSP_SIZE_TOKSTR];
char src[OSP_SIZE_OUTSTR];
char dev[OSP_SIZE_OUTSTR];
char host[OSP_SIZE_OUTSTR];
unsigned int i, type;
struct osp_callid callid;
unsigned int callidnum;
OSPT_CALL_ID* callids[OSP_CALLID_MAXNUM];
char dest[OSP_SIZE_OUTSTR];
const char* preferred[2] = { NULL };
unsigned int dummy = 0;
OSPEFAILREASON reason;
int error;
if (results == NULL) {
ast_log(LOG_ERROR, "Invalid parameters\n");
return OSP_ERROR;
}
osp_convert_inout(results->dest, dest, sizeof(dest));
results->outhandle = OSP_INVALID_HANDLE;
results->outtech[0] = '\0';
results->calling[0] = '\0';
results->called[0] = '\0';
results->token[0] = '\0';
results->networkid[0] = '\0';
results->nprn[0] = '\0';
results->npcic[0] = '\0';
results->npdi = 0;
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
results->opname[type][0] = '\0';
}
results->numdests = 0;
results->outtimelimit = OSP_DEF_TIMELIMIT;
if ((res = osp_get_provider(name, &provider)) <= 0) {
ast_debug(1, "OSP: Unabe to find OSP provider '%s'\n", name);
return res;
}
if ((res = osp_create_transaction(name, &results->outhandle, source, sizeof(source))) <= 0) {
ast_debug(1, "OSP: Unable to generate transaction handle\n");
results->outhandle = OSP_INVALID_HANDLE;
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NORMAL_UNSPECIFIED);
}
return OSP_ERROR;
}
if (!strcasecmp(results->intech, OSP_TECH_SIP)) {
protocol = OSPC_PROTNAME_SIP;
} else if (!strcasecmp(results->intech, OSP_TECH_H323)) {
protocol = OSPC_PROTNAME_Q931;
} else if (!strcasecmp(results->intech, OSP_TECH_IAX)) {
protocol = OSPC_PROTNAME_IAX;
} else if (!strcasecmp(results->intech, OSP_TECH_SKYPE)) {
protocol = OSPC_PROTNAME_SKYPE;
} else {
protocol = OSPC_PROTNAME_SIP;
}
OSPPTransactionSetProtocol(results->outhandle, OSPC_PROTTYPE_SOURCE, protocol);
if (!ast_strlen_zero(snetid)) {
OSPPTransactionSetNetworkIds(results->outhandle, snetid, "");
}
OSPPTransactionSetNumberPortability(results->outhandle, np->rn, np->cic, np->npdi);
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
OSPPTransactionSetOperatorName(results->outhandle, type, np->opname[type]);
}
OSPPTransactionSetRemotePartyId(results->outhandle, OSPC_NFORMAT_E164, headers->rpiduser);
OSPPTransactionSetAssertedId(results->outhandle, OSPC_NFORMAT_E164, headers->paiuser);
osp_convert_inout(headers->divhost, host, sizeof(host));
OSPPTransactionSetDiversion(results->outhandle, headers->divuser, host);
OSPPTransactionSetChargeInfo(results->outhandle, OSPC_NFORMAT_E164, headers->pciuser);
if (cinfo != NULL) {
for (i = 0; i < OSP_MAX_CUSTOMINFO; i++) {
if (!ast_strlen_zero(cinfo[i])) {
OSPPTransactionSetCustomInfo(results->outhandle, i, cinfo[i]);
}
}
}
ast_copy_string(callednum, called, sizeof(callednum));
if((tmp = strchr(callednum, ';')) != NULL) {
*tmp = '\0';
}
callidnum = 0;
callids[0] = NULL;
for (i = 0; i < OSP_CALLID_MAXNUM; i++) {
type = 1 << i;
if (callidtypes & type) {
error = osp_create_callid(type, &callid);
if (error == 1) {
callids[callidnum] = OSPPCallIdNew(callid.len, callid.buf);
callidnum++;
}
}
}
if (provider->workmode == OSP_MODE_INDIRECT) {
osp_convert_inout(srcdev, src, sizeof(src));
if (ast_strlen_zero(actualsrc)) {
osp_convert_inout(srcdev, dev, sizeof(dev));
} else {
osp_convert_inout(actualsrc, dev, sizeof(dev));
}
} else {
osp_convert_inout(source, src, sizeof(src));
osp_convert_inout(srcdev, dev, sizeof(dev));
}
if (provider->srvtype == OSP_SRV_NPQUERY) {
OSPPTransactionSetServiceType(results->outhandle, OSPC_SERVICE_NPQUERY);
if (!ast_strlen_zero(dest)) {
preferred[0] = dest;
}
results->numdests = 1;
} else {
OSPPTransactionSetServiceType(results->outhandle, OSPC_SERVICE_VOICE);
results->numdests = OSP_DEF_MAXDESTS;
}
error = OSPPTransactionRequestAuthorisation(results->outhandle,
src,
dev,
calling ? calling : "",
OSPC_NFORMAT_E164,
callednum,
OSPC_NFORMAT_E164,
NULL,
callidnum,
callids,
preferred,
&results->numdests,
&dummy,
NULL);
for (i = 0; i < callidnum; i++) {
OSPPCallIdDelete(&callids[i]);
}
if (error != OSPC_ERR_NO_ERROR) {
ast_log(LOG_WARNING, "OSP: Unable to request authorization, error '%d'\n", error);
results->numdests = 0;
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NORMAL_UNSPECIFIED);
}
return OSP_ERROR;
}
if (!results->numdests) {
ast_debug(1, "OSP: No more destination\n");
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NO_ROUTE_TO_DEST);
}
return OSP_FAILED;
}
results->outcallid.len = sizeof(results->outcallid.buf);
tokenlen = sizeof(token);
error = OSPPTransactionGetFirstDestination(results->outhandle,
0,
NULL,
NULL,
&results->outtimelimit,
&results->outcallid.len,
results->outcallid.buf,
sizeof(callednum),
callednum,
sizeof(callingnum),
callingnum,
sizeof(destination),
destination,
0,
NULL,
&tokenlen,
token);
if (error != OSPC_ERR_NO_ERROR) {
ast_debug(1, "OSP: Unable to get first route, error '%d'\n", error);
results->numdests = 0;
results->outtimelimit = OSP_DEF_TIMELIMIT;
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NO_ROUTE_TO_DEST);
}
return OSP_ERROR;
}
results->numdests--;
results->outtimelimit = osp_choose_timelimit(results->intimelimit, results->outtimelimit);
ast_debug(1, "OSP: outtimelimit '%d'\n", results->outtimelimit);
ast_debug(1, "OSP: calling '%s'\n", callingnum);
ast_debug(1, "OSP: called '%s'\n", callednum);
ast_debug(1, "OSP: destination '%s'\n", destination);
ast_debug(1, "OSP: token size '%d'\n", tokenlen);
if ((res = osp_check_destination(provider, callingnum, callednum, destination, tokenlen, token, &reason, results)) > 0) {
return OSP_OK;
}
if (!results->numdests) {
ast_debug(1, "OSP: No more destination\n");
results->outtimelimit = OSP_DEF_TIMELIMIT;
OSPPTransactionRecordFailure(results->outhandle, reason);
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NO_ROUTE_TO_DEST);
}
return OSP_FAILED;
}
while(results->numdests) {
results->outcallid.len = sizeof(results->outcallid.buf);
tokenlen = sizeof(token);
error = OSPPTransactionGetNextDestination(results->outhandle,
reason,
0,
NULL,
NULL,
&results->outtimelimit,
&results->outcallid.len,
results->outcallid.buf,
sizeof(callednum),
callednum,
sizeof(callingnum),
callingnum,
sizeof(destination),
destination,
0,
NULL,
&tokenlen,
token);
if (error == OSPC_ERR_NO_ERROR) {
results->numdests--;
results->outtimelimit = osp_choose_timelimit(results->intimelimit, results->outtimelimit);
ast_debug(1, "OSP: outtimelimit '%d'\n", results->outtimelimit);
ast_debug(1, "OSP: calling '%s'\n", callingnum);
ast_debug(1, "OSP: called '%s'\n", callednum);
ast_debug(1, "OSP: destination '%s'\n", destination);
ast_debug(1, "OSP: token size '%d'\n", tokenlen);
if ((res = osp_check_destination(provider, callingnum, callednum, destination, tokenlen, token, &reason, results)) > 0) {
break;
} else if (!results->numdests) {
ast_debug(1, "OSP: No more destination\n");
OSPPTransactionRecordFailure(results->outhandle, reason);
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NO_ROUTE_TO_DEST);
}
res = OSP_FAILED;
break;
}
} else {
ast_debug(1, "OSP: Unable to get route, error '%d'\n", error);
results->numdests = 0;
results->outtimelimit = OSP_DEF_TIMELIMIT;
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NORMAL_UNSPECIFIED);
}
res = OSP_ERROR;
break;
}
}
return res;
}
/*!
* \brief OSP Lookup Next function
* \param name OSP provider name
* \param cause Asterisk hangup cause
* \param results Lookup results, in/output
* \return OSP_OK Found , OSP_FAILED No route, OSP_ERROR Error
*/
static int osp_next(
const char* name,
int cause,
struct osp_results* results)
{
int res;
struct osp_provider* provider = NULL;
char calling[OSP_SIZE_NORSTR];
char called[OSP_SIZE_NORSTR];
char dest[OSP_SIZE_NORSTR];
unsigned int tokenlen;
char token[OSP_SIZE_TOKSTR];
OSPEFAILREASON reason;
OSPE_OPERATOR_NAME type;
int error;
if (results == NULL) {
ast_log(LOG_ERROR, "Invalid parameters\n");
return OSP_ERROR;
}
results->outtech[0] = '\0';
results->dest[0] = '\0';
results->calling[0] = '\0';
results->called[0] = '\0';
results->token[0] = '\0';
results->networkid[0] = '\0';
results->nprn[0] = '\0';
results->npcic[0] = '\0';
results->npdi = 0;
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
results->opname[type][0] = '\0';
}
results->outtimelimit = OSP_DEF_TIMELIMIT;
if ((res = osp_get_provider(name, &provider)) <= 0) {
ast_debug(1, "OSP: Unabe to find OSP provider '%s'\n", name);
return res;
}
if (results->outhandle == OSP_INVALID_HANDLE) {
ast_debug(1, "OSP: Transaction handle undefined\n");
results->numdests = 0;
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NORMAL_UNSPECIFIED);
}
return OSP_ERROR;
}
reason = asterisk2osp(cause);
if (!results->numdests) {
ast_debug(1, "OSP: No more destination\n");
OSPPTransactionRecordFailure(results->outhandle, reason);
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NO_ROUTE_TO_DEST);
}
return OSP_FAILED;
}
while(results->numdests) {
results->outcallid.len = sizeof(results->outcallid.buf);
tokenlen = sizeof(token);
error = OSPPTransactionGetNextDestination(
results->outhandle,
reason,
0,
NULL,
NULL,
&results->outtimelimit,
&results->outcallid.len,
results->outcallid.buf,
sizeof(called),
called,
sizeof(calling),
calling,
sizeof(dest),
dest,
0,
NULL,
&tokenlen,
token);
if (error == OSPC_ERR_NO_ERROR) {
results->numdests--;
results->outtimelimit = osp_choose_timelimit(results->intimelimit, results->outtimelimit);
ast_debug(1, "OSP: outtimelimit '%d'\n", results->outtimelimit);
ast_debug(1, "OSP: calling '%s'\n", calling);
ast_debug(1, "OSP: called '%s'\n", called);
ast_debug(1, "OSP: destination '%s'\n", dest);
ast_debug(1, "OSP: token size '%d'\n", tokenlen);
if ((res = osp_check_destination(provider, calling, called, dest, tokenlen, token, &reason, results)) > 0) {
res = OSP_OK;
break;
} else if (!results->numdests) {
ast_debug(1, "OSP: No more destination\n");
OSPPTransactionRecordFailure(results->outhandle, reason);
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NO_ROUTE_TO_DEST);
}
res = OSP_FAILED;
break;
}
} else {
ast_debug(1, "OSP: Unable to get route, error '%d'\n", error);
results->token[0] = '\0';
results->numdests = 0;
results->outtimelimit = OSP_DEF_TIMELIMIT;
if (results->inhandle != OSP_INVALID_HANDLE) {
OSPPTransactionRecordFailure(results->inhandle, OSPC_FAIL_NORMAL_UNSPECIFIED);
}
res = OSP_ERROR;
break;
}
}
return res;
}
/*!
* \brief Get integer from variable string
* \param vstr Variable string
* \return OSP_DEF_INTSTATS Error
*/
static int osp_get_varint(
const char* vstr)
{
char* tmp;
int value = OSP_DEF_INTSTATS;
if (!ast_strlen_zero(vstr)) {
if ((tmp = strchr(vstr, '=')) != NULL) {
tmp++;
if (sscanf(tmp, "%30d", &value) != 1) {
value = OSP_DEF_INTSTATS;
}
}
}
return value;
}
/*!
* \brief Get float from variable string
* \param vstr Variable string
* \return OSP_DEF_FLOATSTATS Error
*/
static float osp_get_varfloat(
const char* vstr)
{
char* tmp;
float value = OSP_DEF_FLOATSTATS;
if (!ast_strlen_zero(vstr)) {
if ((tmp = strchr(vstr, '=')) != NULL) {
tmp++;
if (sscanf(tmp, "%30f", &value) != 1) {
value = OSP_DEF_FLOATSTATS;
}
}
}
return value;
}
/*!
* \brief Report QoS
* \param trans OSP in/outbound transaction handle
* \param leg Inbound/outbound
* \param qos QoS string
* \return OSP_OK Success, OSP_FAILED Failed, OSP_ERROR Error
*/
static int osp_report_qos(
int trans,
enum osp_callleg leg,
const char* qos)
{
int res = OSP_FAILED;
enum osp_direction dir;
char buffer[OSP_SIZE_NORSTR];
char* tmp;
char* item;
int totalpackets[OSP_DIR_NUMBER];
struct osp_metrics lost[OSP_DIR_NUMBER];
struct osp_metrics jitter[OSP_DIR_NUMBER];
struct osp_metrics rtt;
int value;
if (!ast_strlen_zero(qos)) {
for (dir = OSP_DIR_RX; dir < OSP_DIR_NUMBER; dir++) {
totalpackets[dir] = OSP_DEF_INTSTATS;
}
for (dir = OSP_DIR_RX; dir < OSP_DIR_NUMBER; dir++) {
lost[dir].value = OSP_DEF_INTSTATS;
lost[dir].min = OSP_DEF_FLOATSTATS;
lost[dir].max = OSP_DEF_FLOATSTATS;
lost[dir].avg = OSP_DEF_FLOATSTATS;
lost[dir].sdev = OSP_DEF_FLOATSTATS;
}
for (dir = OSP_DIR_RX; dir < OSP_DIR_NUMBER; dir++) {
jitter[dir].value = OSP_DEF_INTSTATS;
jitter[dir].min = OSP_DEF_FLOATSTATS;
jitter[dir].max = OSP_DEF_FLOATSTATS;
jitter[dir].avg = OSP_DEF_FLOATSTATS;
jitter[dir].sdev = OSP_DEF_FLOATSTATS;
}
rtt.value = OSP_DEF_INTSTATS;
rtt.min = OSP_DEF_FLOATSTATS;
rtt.max = OSP_DEF_FLOATSTATS;
rtt.avg = OSP_DEF_FLOATSTATS;
rtt.sdev = OSP_DEF_FLOATSTATS;
ast_copy_string(buffer, qos, sizeof(buffer));
for (item = strtok_r(buffer, ";", &tmp); item; item = strtok_r(NULL, ";", &tmp)) {
if (!strncasecmp(item, "rxcount", strlen("rxcount"))) {
totalpackets[OSP_DIR_RX] = osp_get_varint(item);
} else if (!strncasecmp(item, "txcount", strlen("txcount"))) {
totalpackets[OSP_DIR_TX] = osp_get_varint(item);
} else if (!strncasecmp(item, "lp", strlen("lp"))) {
lost[OSP_DIR_RX].value = osp_get_varint(item);
} else if (!strncasecmp(item, "minrxlost", strlen("minrxlost"))) {
lost[OSP_DIR_RX].min = osp_get_varfloat(item);
} else if (!strncasecmp(item, "maxrxlost", strlen("maxrxlost"))) {
lost[OSP_DIR_RX].max = osp_get_varfloat(item);
} else if (!strncasecmp(item, "avgrxlost", strlen("avgrxlost"))) {
lost[OSP_DIR_RX].avg = osp_get_varfloat(item);
} else if (!strncasecmp(item, "stdevrxlost", strlen("stdevrxlost"))) {
lost[OSP_DIR_RX].sdev = osp_get_varfloat(item);
} else if (!strncasecmp(item, "rlp", strlen("rlp"))) {
lost[OSP_DIR_TX].value = osp_get_varint(item);
} else if (!strncasecmp(item, "reported_minlost", strlen("reported_minlost"))) {
lost[OSP_DIR_TX].min = osp_get_varfloat(item);
} else if (!strncasecmp(item, "reported_maxlost", strlen("reported_maxlost"))) {
lost[OSP_DIR_TX].max = osp_get_varfloat(item);
} else if (!strncasecmp(item, "reported_avglost", strlen("reported_avglost"))) {
lost[OSP_DIR_TX].avg = osp_get_varfloat(item);
} else if (!strncasecmp(item, "reported_stdevlost", strlen("reported_stdevlost"))) {
lost[OSP_DIR_TX].sdev = osp_get_varfloat(item);
} else if (!strncasecmp(item, "rxjitter", strlen("rxjitter"))) {
jitter[OSP_DIR_RX].value = osp_get_varint(item);
} else if (!strncasecmp(item, "minrxjitter", strlen("minrxjitter"))) {
jitter[OSP_DIR_RX].min = osp_get_varfloat(item);
} else if (!strncasecmp(item, "maxrxjitter", strlen("maxrxjitter"))) {
jitter[OSP_DIR_RX].max = osp_get_varfloat(item);
} else if (!strncasecmp(item, "avgrxjitter", strlen("avgjitter"))) {
jitter[OSP_DIR_RX].avg = osp_get_varfloat(item);
} else if (!strncasecmp(item, "stdevrxjitter", strlen("stdevjitter"))) {
jitter[OSP_DIR_RX].sdev = osp_get_varfloat(item);
} else if (!strncasecmp(item, "txjitter", strlen("txjitter"))) {
jitter[OSP_DIR_TX].value = osp_get_varint(item);
} else if (!strncasecmp(item, "reported_minjitter", strlen("reported_minjitter"))) {
jitter[OSP_DIR_TX].min = osp_get_varfloat(item);
} else if (!strncasecmp(item, "reported_maxjitter", strlen("reported_maxjitter"))) {
jitter[OSP_DIR_TX].max = osp_get_varfloat(item);
} else if (!strncasecmp(item, "reported_avgjitter", strlen("reported_avgjitter"))) {
jitter[OSP_DIR_TX].avg = osp_get_varfloat(item);
} else if (!strncasecmp(item, "reported_stdevjitter", strlen("reported_stdevjitter"))) {
jitter[OSP_DIR_TX].sdev = osp_get_varfloat(item);
} else if (!strncasecmp(item, "rtt", strlen("rtt"))) {
rtt.value = osp_get_varint(item);
} else if (!strncasecmp(item, "minrtt", strlen("minrtt"))) {
rtt.min = osp_get_varfloat(item);
} else if (!strncasecmp(item, "maxrtt", strlen("maxrtt"))) {
rtt.max = osp_get_varfloat(item);
} else if (!strncasecmp(item, "avgrtt", strlen("avgrtt"))) {
rtt.avg = osp_get_varfloat(item);
} else if (!strncasecmp(item, "stdevrtt", strlen("stdevrtt"))) {
rtt.sdev = osp_get_varfloat(item);
}
}
ast_debug(1, "OSP: call leg '%d'\n", leg);
ast_debug(1, "OSP: rxcount '%d'\n", totalpackets[OSP_DIR_RX]);
ast_debug(1, "OSP: txcount '%d'\n", totalpackets[OSP_DIR_TX]);
ast_debug(1, "OSP: lp '%d'\n",lost[OSP_DIR_RX].value);
ast_debug(1, "OSP: minrxlost '%f'\n", lost[OSP_DIR_RX].min);
ast_debug(1, "OSP: maxrxlost '%f'\n", lost[OSP_DIR_RX].max);
ast_debug(1, "OSP: avgrxlost '%f'\n", lost[OSP_DIR_RX].avg);
ast_debug(1, "OSP: stdevrxlost '%f'\n", lost[OSP_DIR_RX].sdev);
ast_debug(1, "OSP: rlp '%d'\n", lost[OSP_DIR_TX].value);
ast_debug(1, "OSP: reported_minlost '%f'\n", lost[OSP_DIR_TX].min);
ast_debug(1, "OSP: reported_maxlost '%f'\n", lost[OSP_DIR_TX].max);
ast_debug(1, "OSP: reported_avglost '%f'\n", lost[OSP_DIR_TX].avg);
ast_debug(1, "OSP: reported_stdevlost '%f'\n", lost[OSP_DIR_TX].sdev);
ast_debug(1, "OSP: rxjitter '%d'\n", jitter[OSP_DIR_RX].value);
ast_debug(1, "OSP: minrxjitter '%f'\n", jitter[OSP_DIR_RX].min);
ast_debug(1, "OSP: maxrxjitter '%f'\n", jitter[OSP_DIR_RX].max);
ast_debug(1, "OSP: avgrxjitter '%f'\n", jitter[OSP_DIR_RX].avg);
ast_debug(1, "OSP: stdevrxjitter '%f'\n", jitter[OSP_DIR_RX].sdev);
ast_debug(1, "OSP: txjitter '%d'\n", jitter[OSP_DIR_TX].value);
ast_debug(1, "OSP: reported_minjitter '%f'\n", jitter[OSP_DIR_TX].min);
ast_debug(1, "OSP: reported_maxjitter '%f'\n", jitter[OSP_DIR_TX].max);
ast_debug(1, "OSP: reported_avgjitter '%f'\n", jitter[OSP_DIR_TX].avg);
ast_debug(1, "OSP: reported_stdevjitter '%f'\n", jitter[OSP_DIR_TX].sdev);
ast_debug(1, "OSP: rtt '%d'\n", rtt.value);
ast_debug(1, "OSP: minrtt '%f'\n", rtt.min);
ast_debug(1, "OSP: maxrtt '%f'\n", rtt.max);
ast_debug(1, "OSP: avgrtt '%f'\n", rtt.avg);
ast_debug(1, "OSP: stdevrtt '%f'\n", rtt.sdev);
if (leg == OSP_CALL_INBOUND) {
OSPPTransactionSetPackets(trans, OSPC_SMETRIC_RTP, OSPC_SDIR_SRCREP, totalpackets[OSP_DIR_RX]);
OSPPTransactionSetPackets(trans, OSPC_SMETRIC_RTCP, OSPC_SDIR_DESTREP, totalpackets[OSP_DIR_TX]);
if (lost[OSP_DIR_RX].value >= 0) {
value = lost[OSP_DIR_RX].value;
} else {
value = (int)lost[OSP_DIR_RX].avg;
}
OSPPTransactionSetLost(trans, OSPC_SMETRIC_RTP, OSPC_SDIR_SRCREP, value, OSP_DEF_INTSTATS);
if (lost[OSP_DIR_TX].value >= 0) {
value = lost[OSP_DIR_TX].value;
} else {
value = (int)lost[OSP_DIR_TX].avg;
}
OSPPTransactionSetLost(trans, OSPC_SMETRIC_RTCP, OSPC_SDIR_DESTREP, value, OSP_DEF_INTSTATS);
if (jitter[OSP_DIR_RX].value >= 0) {
value = jitter[OSP_DIR_RX].value;
} else {
value = (int)jitter[OSP_DIR_RX].avg;
}
OSPPTransactionSetJitter(trans,
OSPC_SMETRIC_RTP,
OSPC_SDIR_SRCREP,
OSP_DEF_INTSTATS,
(int)jitter[OSP_DIR_RX].min,
(int)jitter[OSP_DIR_RX].max,
value, jitter[OSP_DIR_RX].sdev);
if (jitter[OSP_DIR_TX].value >= 0) {
value = jitter[OSP_DIR_TX].value;
} else {
value = (int)jitter[OSP_DIR_TX].avg;
}
OSPPTransactionSetJitter(trans, OSPC_SMETRIC_RTCP, OSPC_SDIR_DESTREP,
OSP_DEF_INTSTATS, (int)jitter[OSP_DIR_TX].min, (int)jitter[OSP_DIR_TX].max, value, jitter[OSP_DIR_TX].sdev);
} else {
OSPPTransactionSetPackets(trans, OSPC_SMETRIC_RTP, OSPC_SDIR_DESTREP, totalpackets[OSP_DIR_RX]);
OSPPTransactionSetPackets(trans, OSPC_SMETRIC_RTCP, OSPC_SDIR_SRCREP, totalpackets[OSP_DIR_TX]);
OSPPTransactionSetLost(trans, OSPC_SMETRIC_RTP, OSPC_SDIR_DESTREP, lost[OSP_DIR_RX].value, OSP_DEF_INTSTATS);
OSPPTransactionSetLost(trans, OSPC_SMETRIC_RTCP, OSPC_SDIR_SRCREP, lost[OSP_DIR_TX].value, OSP_DEF_INTSTATS);
if (jitter[OSP_DIR_RX].value >= 0) {
value = jitter[OSP_DIR_RX].value;
} else {
value = (int)jitter[OSP_DIR_RX].avg;
}
OSPPTransactionSetJitter(trans,
OSPC_SMETRIC_RTP,
OSPC_SDIR_DESTREP,
OSP_DEF_INTSTATS,
(int)jitter[OSP_DIR_RX].min,
(int)jitter[OSP_DIR_RX].max,
value,
jitter[OSP_DIR_RX].sdev);
if (jitter[OSP_DIR_TX].value >= 0) {
value = jitter[OSP_DIR_TX].value;
} else {
value = (int)jitter[OSP_DIR_TX].avg;
}
OSPPTransactionSetJitter(trans,
OSPC_SMETRIC_RTCP,
OSPC_SDIR_SRCREP,
OSP_DEF_INTSTATS,
(int)jitter[OSP_DIR_TX].min,
(int)jitter[OSP_DIR_TX].max,
value,
jitter[OSP_DIR_TX].sdev);
}
res = OSP_OK;
}
return res;
}
/*!
* \brief OSP Finish function
* \param trans OSP in/outbound transaction handle
* \param recorded If failure reason has been recorded
* \param cause Asterisk hangup cause
* \param start Call start time
* \param connect Call connect time
* \param end Call end time
* \param release Who release first, 0 source, 1 destination
* \param inqos Inbound QoS string
* \param outqos Outbound QoS string
* \return OSP_OK Success, OSP_FAILED Failed, OSP_ERROR Error
*/
static int osp_finish(
int trans,
int recorded,
int cause,
time_t start,
time_t connect,
time_t end,
unsigned int release,
const char* inqos,
const char* outqos)
{
int res;
OSPEFAILREASON reason;
time_t alert = 0;
unsigned isPddInfoPresent = 0;
unsigned pdd = 0;
unsigned int dummy = 0;
int error;
if (trans == OSP_INVALID_HANDLE) {
return OSP_FAILED;
}
OSPPTransactionSetRoleInfo(trans, OSPC_RSTATE_STOP, OSPC_RFORMAT_OSP, OSPC_RVENDOR_ASTERISK);
if (!recorded) {
reason = asterisk2osp(cause);
OSPPTransactionRecordFailure(trans, reason);
}
osp_report_qos(trans, OSP_CALL_INBOUND, inqos);
osp_report_qos(trans, OSP_CALL_OUTBOUND, outqos);
error = OSPPTransactionReportUsage(trans,
difftime(end, connect),
start,
end,
alert,
connect,
isPddInfoPresent,
pdd,
release,
NULL,
OSP_DEF_INTSTATS,
OSP_DEF_INTSTATS,
OSP_DEF_INTSTATS,
OSP_DEF_INTSTATS,
&dummy,
NULL);
if (error == OSPC_ERR_NO_ERROR) {
ast_debug(1, "OSP: Usage reported\n");
res = OSP_OK;
} else {
ast_debug(1, "OSP: Unable to report usage, error '%d'\n", error);
res = OSP_ERROR;
}
OSPPTransactionDelete(trans);
return res;
}
/* OSP Application APIs */
/*!
* \brief OSP Application OSPAuth
* \param chan Channel
* \param data Parameter
* \return OSP_AST_OK Success, OSP_AST_ERROR Error
*/
static int ospauth_exec(
struct ast_channel *chan,
const char *data)
{
int res;
const char* provider = OSP_DEF_PROVIDER;
struct varshead* headp;
struct ast_var_t* current;
const char* source = "";
const char* token = "";
int handle;
unsigned int timelimit;
char buffer[OSP_SIZE_INTSTR];
const char* status;
char* tmp;
AST_DECLARE_APP_ARGS(args,
AST_APP_ARG(provider);
AST_APP_ARG(options);
);
tmp = ast_strdupa(data);
AST_STANDARD_APP_ARGS(args, tmp);
if (!ast_strlen_zero(args.provider)) {
provider = args.provider;
}
ast_debug(1, "OSPAuth: provider '%s'\n", provider);
headp = ast_channel_varshead(chan);
AST_LIST_TRAVERSE(headp, current, entries) {
if (!strcmp(ast_var_name(current), "OSPINPEERIP")) {
source = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINTOKEN")) {
token = ast_var_value(current);
}
}
ast_debug(1, "OSPAuth: source '%s'\n", source);
ast_debug(1, "OSPAuth: token size '%zd'\n", strlen(token));
res = osp_auth(provider, &handle, source,
S_COR(ast_channel_caller(chan)->id.number.valid, ast_channel_caller(chan)->id.number.str, NULL),
ast_channel_exten(chan), token, &timelimit);
if (res > 0) {
status = AST_OSP_SUCCESS;
} else {
timelimit = OSP_DEF_TIMELIMIT;
if (!res) {
status = AST_OSP_FAILED;
} else {
status = AST_OSP_ERROR;
}
}
snprintf(buffer, sizeof(buffer), "%d", handle);
pbx_builtin_setvar_helper(chan, "OSPINHANDLE", buffer);
ast_debug(1, "OSPAuth: OSPINHANDLE '%s'\n", buffer);
snprintf(buffer, sizeof(buffer), "%d", timelimit);
pbx_builtin_setvar_helper(chan, "OSPINTIMELIMIT", buffer);
ast_debug(1, "OSPAuth: OSPINTIMELIMIT '%s'\n", buffer);
pbx_builtin_setvar_helper(chan, "OSPAUTHSTATUS", status);
ast_debug(1, "OSPAuth: %s\n", status);
if(res != OSP_OK) {
res = OSP_AST_ERROR;
} else {
res = OSP_AST_OK;
}
return res;
}
/*!
* \brief OSP Application OSPLookup
* \param chan Channel
* \param data Parameter
* \return OSP_AST_OK Success, OSP_AST_ERROR Error
*/
static int osplookup_exec(
struct ast_channel* chan,
const char * data)
{
int res;
const char* provider = OSP_DEF_PROVIDER;
unsigned int callidtypes = OSP_CALLID_UNDEF;
struct varshead* headp;
struct ast_var_t* current;
const char* actualsrc = "";
const char* srcdev = "";
const char* snetid = "";
struct osp_npdata np;
OSPE_OPERATOR_NAME type;
struct osp_headers headers;
unsigned int i;
const char* cinfo[OSP_MAX_CUSTOMINFO] = { NULL };
char buffer[OSP_SIZE_TOKSTR + strlen(": ") + strlen(OSP_SIP_HEADER)];
struct osp_results results;
const char* status;
char* tmp;
AST_DECLARE_APP_ARGS(args,
AST_APP_ARG(exten);
AST_APP_ARG(provider);
AST_APP_ARG(options);
);
if (ast_strlen_zero(data)) {
ast_log(LOG_WARNING, "OSPLookup: Arg required, OSPLookup(exten[,provider[,options]])\n");
return OSP_AST_ERROR;
}
tmp = ast_strdupa(data);
AST_STANDARD_APP_ARGS(args, tmp);
ast_debug(1, "OSPLookup: exten '%s'\n", args.exten);
if (!ast_strlen_zero(args.provider)) {
provider = args.provider;
}
ast_debug(1, "OSPlookup: provider '%s'\n", provider);
if (args.options) {
if (strchr(args.options, 'h')) {
callidtypes |= OSP_CALLID_H323;
}
if (strchr(args.options, 's')) {
callidtypes |= OSP_CALLID_SIP;
}
if (strchr(args.options, 'i')) {
callidtypes |= OSP_CALLID_IAX;
}
}
ast_debug(1, "OSPLookup: call id types '%d'\n", callidtypes);
results.inhandle = OSP_INVALID_HANDLE;
results.intimelimit = OSP_DEF_TIMELIMIT;
results.dest[0] = '\0';
np.rn = "";
np.cic = "";
np.npdi = 0;
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
np.opname[type] = "";
}
headers.rpiduser = "";
headers.paiuser = "";
headers.divuser = "";
headers.divhost = "";
headers.pciuser = "";
headp = ast_channel_varshead(chan);
AST_LIST_TRAVERSE(headp, current, entries) {
if (!strcmp(ast_var_name(current), "OSPINACTUALSRC")) {
actualsrc = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINPEERIP")) {
srcdev = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINTECH")) {
ast_copy_string(results.intech, ast_var_value(current), sizeof(results.intech));
} else if (!strcmp(ast_var_name(current), "OSPINHANDLE")) {
if (sscanf(ast_var_value(current), "%30d", &results.inhandle) != 1) {
results.inhandle = OSP_INVALID_HANDLE;
}
} else if (!strcmp(ast_var_name(current), "OSPINTIMELIMIT")) {
if (sscanf(ast_var_value(current), "%30d", &results.intimelimit) != 1) {
results.intimelimit = OSP_DEF_TIMELIMIT;
}
} else if (!strcmp(ast_var_name(current), "OSPINNETWORKID")) {
snetid = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINNPRN")) {
np.rn = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINNPCIC")) {
np.cic = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINNPDI")) {
if (ast_true(ast_var_value(current))) {
np.npdi = 1;
}
} else if (!strcmp(ast_var_name(current), "OSPINSPID")) {
np.opname[OSPC_OPNAME_SPID] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINOCN")) {
np.opname[OSPC_OPNAME_OCN] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINSPN")) {
np.opname[OSPC_OPNAME_SPN] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINALTSPN")) {
np.opname[OSPC_OPNAME_ALTSPN] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINMCC")) {
np.opname[OSPC_OPNAME_MCC] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINMNC")) {
np.opname[OSPC_OPNAME_MNC] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINTOHOST")) {
ast_copy_string(results.dest, ast_var_value(current), sizeof(results.dest));
} else if (!strcmp(ast_var_name(current), "OSPINRPIDUSER")) {
headers.rpiduser = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINPAIUSER")) {
headers.paiuser = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINDIVUSER")) {
headers.divuser = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINDIVHOST")) {
headers.divhost = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINPCIUSER")) {
headers.pciuser = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINCUSTOMINFO1")) {
cinfo[0] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINCUSTOMINFO2")) {
cinfo[1] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINCUSTOMINFO3")) {
cinfo[2] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINCUSTOMINFO4")) {
cinfo[3] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINCUSTOMINFO5")) {
cinfo[4] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINCUSTOMINFO6")) {
cinfo[5] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINCUSTOMINFO7")) {
cinfo[6] = ast_var_value(current);
} else if (!strcmp(ast_var_name(current), "OSPINCUSTOMINFO8")) {
cinfo[7] = ast_var_value(current);
}
}
ast_debug(1, "OSPLookup: actual source device '%s'\n", actualsrc);
ast_debug(1, "OSPLookup: source device '%s'\n", srcdev);
ast_debug(1, "OSPLookup: OSPINTECH '%s'\n", results.intech);
ast_debug(1, "OSPLookup: OSPINHANDLE '%d'\n", results.inhandle);
ast_debug(1, "OSPLookup: OSPINTIMELIMIT '%d'\n", results.intimelimit);
ast_debug(1, "OSPLookup: OSPINNETWORKID '%s'\n", snetid);
ast_debug(1, "OSPLookup: OSPINNPRN '%s'\n", np.rn);
ast_debug(1, "OSPLookup: OSPINNPCIC '%s'\n", np.cic);
ast_debug(1, "OSPLookup: OSPINNPDI '%d'\n", np.npdi);
ast_debug(1, "OSPLookup: OSPINSPID '%s'\n", np.opname[OSPC_OPNAME_SPID]);
ast_debug(1, "OSPLookup: OSPINOCN '%s'\n", np.opname[OSPC_OPNAME_OCN]);
ast_debug(1, "OSPLookup: OSPINSPN '%s'\n", np.opname[OSPC_OPNAME_SPN]);
ast_debug(1, "OSPLookup: OSPINALTSPN '%s'\n", np.opname[OSPC_OPNAME_ALTSPN]);
ast_debug(1, "OSPLookup: OSPINMCC '%s'\n", np.opname[OSPC_OPNAME_MCC]);
ast_debug(1, "OSPLookup: OSPINMNC '%s'\n", np.opname[OSPC_OPNAME_MNC]);
ast_debug(1, "OSPLookup: OSPINTOHOST '%s'\n", results.dest);
ast_debug(1, "OSPLookup: OSPINRPIDUSER '%s'\n", headers.rpiduser);
ast_debug(1, "OSPLookup: OSPINPAIUSER '%s'\n", headers.paiuser);
ast_debug(1, "OSPLookup: OSPINDIVUSER '%s'\n", headers.divuser);
ast_debug(1, "OSPLookup: OSPINDIVHOST'%s'\n", headers.divhost);
ast_debug(1, "OSPLookup: OSPINPCIUSER '%s'\n", headers.pciuser);
for (i = 0; i < OSP_MAX_CUSTOMINFO; i++) {
if (!ast_strlen_zero(cinfo[i])) {
ast_debug(1, "OSPLookup: OSPINCUSTOMINFO%d '%s'\n", i, cinfo[i]);
}
}
if (ast_autoservice_start(chan) < 0) {
return OSP_AST_ERROR;
}
res = osp_lookup(provider, callidtypes, actualsrc, srcdev,
S_COR(ast_channel_caller(chan)->id.number.valid, ast_channel_caller(chan)->id.number.str, NULL),
args.exten, snetid, &np, &headers, cinfo, &results);
if (res > 0) {
status = AST_OSP_SUCCESS;
} else {
results.outtech[0] = '\0';
results.dest[0] = '\0';
results.calling[0] = '\0';
results.called[0] = '\0';
results.token[0] = '\0';
results.networkid[0] = '\0';
results.nprn[0] = '\0';
results.npcic[0] = '\0';
results.npdi = 0;
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
results.opname[type][0] = '\0';
}
results.numdests = 0;
results.outtimelimit = OSP_DEF_TIMELIMIT;
results.outcallid.buf[0] = '\0';
results.outcallid.len = 0;
if (!res) {
status = AST_OSP_FAILED;
} else {
status = AST_OSP_ERROR;
}
}
snprintf(buffer, sizeof(buffer), "%d", results.outhandle);
pbx_builtin_setvar_helper(chan, "OSPOUTHANDLE", buffer);
ast_debug(1, "OSPLookup: OSPOUTHANDLE '%s'\n", buffer);
pbx_builtin_setvar_helper(chan, "OSPOUTTECH", results.outtech);
ast_debug(1, "OSPLookup: OSPOUTTECH '%s'\n", results.outtech);
pbx_builtin_setvar_helper(chan, "OSPDESTINATION", results.dest);
ast_debug(1, "OSPLookup: OSPDESTINATION '%s'\n", results.dest);
pbx_builtin_setvar_helper(chan, "OSPOUTCALLING", results.calling);
ast_debug(1, "OSPLookup: OSPOUTCALLING '%s'\n", results.calling);
pbx_builtin_setvar_helper(chan, "OSPOUTCALLED", results.called);
ast_debug(1, "OSPLookup: OSPOUTCALLED '%s'\n", results.called);
pbx_builtin_setvar_helper(chan, "OSPOUTNETWORKID", results.networkid);
ast_debug(1, "OSPLookup: OSPOUTNETWORKID '%s'\n", results.networkid);
pbx_builtin_setvar_helper(chan, "OSPOUTNPRN", results.nprn);
ast_debug(1, "OSPLookup: OSPOUTNPRN '%s'\n", results.nprn);
pbx_builtin_setvar_helper(chan, "OSPOUTNPCIC", results.npcic);
ast_debug(1, "OSPLookup: OSPOUTNPCIC '%s'\n", results.npcic);
snprintf(buffer, sizeof(buffer), "%d", results.npdi);
pbx_builtin_setvar_helper(chan, "OSPOUTNPDI", buffer);
ast_debug(1, "OSPLookup: OSPOUTNPDI'%s'\n", buffer);
pbx_builtin_setvar_helper(chan, "OSPOUTSPID", results.opname[OSPC_OPNAME_SPID]);
ast_debug(1, "OSPLookup: OSPOUTSPID '%s'\n", results.opname[OSPC_OPNAME_SPID]);
pbx_builtin_setvar_helper(chan, "OSPOUTOCN", results.opname[OSPC_OPNAME_OCN]);
ast_debug(1, "OSPLookup: OSPOUTOCN '%s'\n", results.opname[OSPC_OPNAME_OCN]);
pbx_builtin_setvar_helper(chan, "OSPOUTSPN", results.opname[OSPC_OPNAME_SPN]);
ast_debug(1, "OSPLookup: OSPOUTSPN '%s'\n", results.opname[OSPC_OPNAME_SPN]);
pbx_builtin_setvar_helper(chan, "OSPOUTALTSPN", results.opname[OSPC_OPNAME_ALTSPN]);
ast_debug(1, "OSPLookup: OSPOUTALTSPN '%s'\n", results.opname[OSPC_OPNAME_ALTSPN]);
pbx_builtin_setvar_helper(chan, "OSPOUTMCC", results.opname[OSPC_OPNAME_MCC]);
ast_debug(1, "OSPLookup: OSPOUTMCC '%s'\n", results.opname[OSPC_OPNAME_MCC]);
pbx_builtin_setvar_helper(chan, "OSPOUTMNC", results.opname[OSPC_OPNAME_MNC]);
ast_debug(1, "OSPLookup: OSPOUTMNC '%s'\n", results.opname[OSPC_OPNAME_MNC]);
pbx_builtin_setvar_helper(chan, "OSPOUTTOKEN", results.token);
ast_debug(1, "OSPLookup: OSPOUTTOKEN size '%zd'\n", strlen(results.token));
snprintf(buffer, sizeof(buffer), "%d", results.numdests);
pbx_builtin_setvar_helper(chan, "OSPDESTREMAILS", buffer);
ast_debug(1, "OSPLookup: OSPDESTREMAILS '%s'\n", buffer);
snprintf(buffer, sizeof(buffer), "%d", results.outtimelimit);
pbx_builtin_setvar_helper(chan, "OSPOUTTIMELIMIT", buffer);
ast_debug(1, "OSPLookup: OSPOUTTIMELIMIT '%s'\n", buffer);
snprintf(buffer, sizeof(buffer), "%d", callidtypes);
pbx_builtin_setvar_helper(chan, "OSPOUTCALLIDTYPES", buffer);
ast_debug(1, "OSPLookup: OSPOUTCALLIDTYPES '%s'\n", buffer);
pbx_builtin_setvar_helper(chan, "OSPLOOKUPSTATUS", status);
ast_debug(1, "OSPLookup: %s\n", status);
if (!strcasecmp(results.outtech, OSP_TECH_SIP)) {
snprintf(buffer, sizeof(buffer), "%s/%s@%s", results.outtech, results.called, results.dest);
pbx_builtin_setvar_helper(chan, "OSPDIALSTR", buffer);
if (!ast_strlen_zero(results.token)) {
snprintf(buffer, sizeof(buffer), "%s: %s", OSP_SIP_HEADER, results.token);
pbx_builtin_setvar_helper(chan, "_SIPADDHEADER", buffer);
ast_debug(1, "OSPLookup: SIPADDHEADER size '%zd'\n", strlen(buffer));
}
} else if (!strcasecmp(results.outtech, OSP_TECH_H323)) {
if ((callidtypes & OSP_CALLID_H323) && (results.outcallid.len != 0)) {
osp_uuid2str(results.outcallid.buf, buffer, sizeof(buffer));
} else {
buffer[0] = '\0';
}
pbx_builtin_setvar_helper(chan, "OSPOUTCALLID", buffer);
snprintf(buffer, sizeof(buffer), "%s/%s@%s", results.outtech, results.called, results.dest);
pbx_builtin_setvar_helper(chan, "OSPDIALSTR", buffer);
} else if (!strcasecmp(results.outtech, OSP_TECH_IAX)) {
snprintf(buffer, sizeof(buffer), "%s/%s/%s", results.outtech, results.dest, results.called);
pbx_builtin_setvar_helper(chan, "OSPDIALSTR", buffer);
} else if (!strcasecmp(results.outtech, OSP_TECH_SKYPE)) {
snprintf(buffer, sizeof(buffer), "%s/%s", results.outtech, results.called);
pbx_builtin_setvar_helper(chan, "OSPDIALSTR", buffer);
}
if (ast_autoservice_stop(chan) < 0) {
return OSP_AST_ERROR;
}
if(res != OSP_OK) {
res = OSP_AST_ERROR;
} else {
res = OSP_AST_OK;
}
return res;
}
/*!
* \brief OSP Application OSPNext
* \param chan Channel
* \param data Parameter
* \return OSP_AST_OK Success, OSP_AST_ERROR Error
*/
static int ospnext_exec(
struct ast_channel* chan,
const char * data)
{
int res;
const char* provider = OSP_DEF_PROVIDER;
int cause = 0;
struct varshead* headp;
struct ast_var_t* current;
struct osp_results results;
OSPE_OPERATOR_NAME type;
char buffer[OSP_SIZE_TOKSTR + strlen(": ") + strlen(OSP_SIP_HEADER)];
unsigned int callidtypes = OSP_CALLID_UNDEF;
const char* status;
char* tmp;
AST_DECLARE_APP_ARGS(args,
AST_APP_ARG(cause);
AST_APP_ARG(provider);
AST_APP_ARG(options);
);
if (ast_strlen_zero(data)) {
ast_log(LOG_WARNING, "OSPNext: Arg required, OSPNext(cause[,provider[,options]])\n");
return OSP_AST_ERROR;
}
tmp = ast_strdupa(data);
AST_STANDARD_APP_ARGS(args, tmp);
if (!ast_strlen_zero(args.cause) && sscanf(args.cause, "%30d", &cause) != 1) {
cause = 0;
}
ast_debug(1, "OSPNext: cause '%d'\n", cause);
if (!ast_strlen_zero(args.provider)) {
provider = args.provider;
}
ast_debug(1, "OSPlookup: provider '%s'\n", provider);
results.inhandle = OSP_INVALID_HANDLE;
results.outhandle = OSP_INVALID_HANDLE;
results.intimelimit = OSP_DEF_TIMELIMIT;
results.numdests = 0;
headp = ast_channel_varshead(chan);
AST_LIST_TRAVERSE(headp, current, entries) {
if (!strcmp(ast_var_name(current), "OSPINHANDLE")) {
if (sscanf(ast_var_value(current), "%30d", &results.inhandle) != 1) {
results.inhandle = OSP_INVALID_HANDLE;
}
} else if (!strcmp(ast_var_name(current), "OSPOUTHANDLE")) {
if (sscanf(ast_var_value(current), "%30d", &results.outhandle) != 1) {
results.outhandle = OSP_INVALID_HANDLE;
}
} else if (!strcmp(ast_var_name(current), "OSPINTIMELIMIT")) {
if (sscanf(ast_var_value(current), "%30d", &results.intimelimit) != 1) {
results.intimelimit = OSP_DEF_TIMELIMIT;
}
} else if (!strcmp(ast_var_name(current), "OSPOUTCALLIDTYPES")) {
if (sscanf(ast_var_value(current), "%30d", &callidtypes) != 1) {
callidtypes = OSP_CALLID_UNDEF;
}
} else if (!strcmp(ast_var_name(current), "OSPDESTREMAILS")) {
if (sscanf(ast_var_value(current), "%30d", &results.numdests) != 1) {
results.numdests = 0;
}
}
}
ast_debug(1, "OSPNext: OSPINHANDLE '%d'\n", results.inhandle);
ast_debug(1, "OSPNext: OSPOUTHANDLE '%d'\n", results.outhandle);
ast_debug(1, "OSPNext: OSPINTIMELIMIT '%d'\n", results.intimelimit);
ast_debug(1, "OSPNext: OSPOUTCALLIDTYPES '%d'\n", callidtypes);
ast_debug(1, "OSPNext: OSPDESTREMAILS '%d'\n", results.numdests);
if ((res = osp_next(provider, cause, &results)) > 0) {
status = AST_OSP_SUCCESS;
} else {
results.outtech[0] = '\0';
results.dest[0] = '\0';
results.calling[0] = '\0';
results.called[0] = '\0';
results.token[0] = '\0';
results.networkid[0] = '\0';
results.nprn[0] = '\0';
results.npcic[0] = '\0';
results.npdi = 0;
for (type = OSPC_OPNAME_START; type < OSPC_OPNAME_NUMBER; type++) {
results.opname[type][0] = '\0';
}
results.numdests = 0;
results.outtimelimit = OSP_DEF_TIMELIMIT;
results.outcallid.buf[0] = '\0';
results.outcallid.len = 0;
if (!res) {
status = AST_OSP_FAILED;
} else {
status = AST_OSP_ERROR;
}
}
pbx_builtin_setvar_helper(chan, "OSPOUTTECH", results.outtech);
ast_debug(1, "OSPNext: OSPOUTTECH '%s'\n", results.outtech);
pbx_builtin_setvar_helper(chan, "OSPDESTINATION", results.dest);
ast_debug(1, "OSPNext: OSPDESTINATION '%s'\n", results.dest);
pbx_builtin_setvar_helper(chan, "OSPOUTCALLING", results.calling);
ast_debug(1, "OSPNext: OSPOUTCALLING '%s'\n", results.calling);
pbx_builtin_setvar_helper(chan, "OSPOUTCALLED", results.called);
ast_debug(1, "OSPNext: OSPOUTCALLED'%s'\n", results.called);
pbx_builtin_setvar_helper(chan, "OSPOUTNETWORKID", results.networkid);
ast_debug(1, "OSPLookup: OSPOUTNETWORKID '%s'\n", results.networkid);
pbx_builtin_setvar_helper(chan, "OSPOUTNPRN", results.nprn);
ast_debug(1, "OSPLookup: OSPOUTNPRN '%s'\n", results.nprn);
pbx_builtin_setvar_helper(chan, "OSPOUTNPCIC", results.npcic);
ast_debug(1, "OSPLookup: OSPOUTNPCIC '%s'\n", results.npcic);
snprintf(buffer, sizeof(buffer), "%d", results.npdi);
pbx_builtin_setvar_helper(chan, "OSPOUTNPDI", buffer);
ast_debug(1, "OSPLookup: OSPOUTNPDI'%s'\n", buffer);
pbx_builtin_setvar_helper(chan, "OSPOUTSPID", results.opname[OSPC_OPNAME_SPID]);
ast_debug(1, "OSPLookup: OSPOUTSPID '%s'\n", results.opname[OSPC_OPNAME_SPID]);
pbx_builtin_setvar_helper(chan, "OSPOUTOCN", results.opname[OSPC_OPNAME_OCN]);
ast_debug(1, "OSPLookup: OSPOUTOCN '%s'\n", results.opname[OSPC_OPNAME_OCN]);
pbx_builtin_setvar_helper(chan, "OSPOUTSPN", results.opname[OSPC_OPNAME_SPN]);
ast_debug(1, "OSPLookup: OSPOUTSPN '%s'\n", results.opname[OSPC_OPNAME_SPN]);
pbx_builtin_setvar_helper(chan, "OSPOUTALTSPN", results.opname[OSPC_OPNAME_ALTSPN]);
ast_debug(1, "OSPLookup: OSPOUTALTSPN '%s'\n", results.opname[OSPC_OPNAME_ALTSPN]);
pbx_builtin_setvar_helper(chan, "OSPOUTMCC", results.opname[OSPC_OPNAME_MCC]);
ast_debug(1, "OSPLookup: OSPOUTMCC '%s'\n", results.opname[OSPC_OPNAME_MCC]);
pbx_builtin_setvar_helper(chan, "OSPOUTMNC", results.opname[OSPC_OPNAME_MNC]);
ast_debug(1, "OSPLookup: OSPOUTMNC '%s'\n", results.opname[OSPC_OPNAME_MNC]);
pbx_builtin_setvar_helper(chan, "OSPOUTTOKEN", results.token);
ast_debug(1, "OSPNext: OSPOUTTOKEN size '%zd'\n", strlen(results.token));
snprintf(buffer, sizeof(buffer), "%d", results.numdests);
pbx_builtin_setvar_helper(chan, "OSPDESTREMAILS", buffer);
ast_debug(1, "OSPNext: OSPDESTREMAILS '%s'\n", buffer);
snprintf(buffer, sizeof(buffer), "%d", results.outtimelimit);
pbx_builtin_setvar_helper(chan, "OSPOUTTIMELIMIT", buffer);
ast_debug(1, "OSPNext: OSPOUTTIMELIMIT '%s'\n", buffer);
pbx_builtin_setvar_helper(chan, "OSPNEXTSTATUS", status);
ast_debug(1, "OSPNext: %s\n", status);
if (!strcasecmp(results.outtech, OSP_TECH_SIP)) {
snprintf(buffer, sizeof(buffer), "%s/%s@%s", results.outtech, results.called, results.dest);
pbx_builtin_setvar_helper(chan, "OSPDIALSTR", buffer);
if (!ast_strlen_zero(results.token)) {
snprintf(buffer, sizeof(buffer), "%s: %s", OSP_SIP_HEADER, results.token);
pbx_builtin_setvar_helper(chan, "_SIPADDHEADER", buffer);
ast_debug(1, "OSPLookup: SIPADDHEADER size '%zd'\n", strlen(buffer));
}
} else if (!strcasecmp(results.outtech, OSP_TECH_H323)) {
if ((callidtypes & OSP_CALLID_H323) && (results.outcallid.len != 0)) {
osp_uuid2str(results.outcallid.buf, buffer, sizeof(buffer));
} else {
buffer[0] = '\0';
}
pbx_builtin_setvar_helper(chan, "OSPOUTCALLID", buffer);
snprintf(buffer, sizeof(buffer), "%s/%s@%s", results.outtech, results.called, results.dest);
pbx_builtin_setvar_helper(chan, "OSPDIALSTR", buffer);
} else if (!strcasecmp(results.outtech, OSP_TECH_IAX)) {
snprintf(buffer, sizeof(buffer), "%s/%s/%s", results.outtech, results.dest, results.called);
pbx_builtin_setvar_helper(chan, "OSPDIALSTR", buffer);
} else if (!strcasecmp(results.outtech, OSP_TECH_SKYPE)) {
snprintf(buffer, sizeof(buffer), "%s/%s", results.outtech, results.called);
pbx_builtin_setvar_helper(chan, "OSPDIALSTR", buffer);
}
if(res != OSP_OK) {
res = OSP_AST_ERROR;
} else {
res = OSP_AST_OK;
}
return res;
}
/*!
* \brief OSP Application OSPFinish
* \param chan Channel
* \param data Parameter
* \return OSP_AST_OK Success, OSP_AST_ERROR Error
*/
static int ospfinished_exec(
struct ast_channel* chan,
const char * data)
{
int res = OSP_OK;
int cause = 0;
struct varshead* headp;
struct ast_var_t* current;
int inhandle = OSP_INVALID_HANDLE;
int outhandle = OSP_INVALID_HANDLE;
int recorded = 0;
time_t start = 0, connect = 0, end = 0;
unsigned int release;
char buffer[OSP_SIZE_INTSTR];
char inqos[OSP_SIZE_QOSSTR] = { 0 };
char outqos[OSP_SIZE_QOSSTR] = { 0 };
const char* status;
char* tmp;
AST_DECLARE_APP_ARGS(args,
AST_APP_ARG(cause);
AST_APP_ARG(options);
);
tmp = ast_strdupa(data);
AST_STANDARD_APP_ARGS(args, tmp);
headp = ast_channel_varshead(chan);
AST_LIST_TRAVERSE(headp, current, entries) {
if (!strcmp(ast_var_name(current), "OSPINHANDLE")) {
if (sscanf(ast_var_value(current), "%30d", &inhandle) != 1) {
inhandle = OSP_INVALID_HANDLE;
}
} else if (!strcmp(ast_var_name(current), "OSPOUTHANDLE")) {
if (sscanf(ast_var_value(current), "%30d", &outhandle) != 1) {
outhandle = OSP_INVALID_HANDLE;
}
} else if (!recorded &&
(!strcmp(ast_var_name(current), "OSPAUTHSTATUS") ||
!strcmp(ast_var_name(current), "OSPLOOKUPSTATUS") ||
!strcmp(ast_var_name(current), "OSPNEXTSTATUS")))
{
if (strcmp(ast_var_value(current), AST_OSP_SUCCESS)) {
recorded = 1;
}
} else if (!strcmp(ast_var_name(current), "OSPINAUDIOQOS")) {
ast_copy_string(inqos, ast_var_value(current), sizeof(inqos));
} else if (!strcmp(ast_var_name(current), "OSPOUTAUDIOQOS")) {
ast_copy_string(outqos, ast_var_value(current), sizeof(outqos));
}
}
ast_debug(1, "OSPFinish: OSPINHANDLE '%d'\n", inhandle);
ast_debug(1, "OSPFinish: OSPOUTHANDLE '%d'\n", outhandle);
ast_debug(1, "OSPFinish: recorded '%d'\n", recorded);
ast_debug(1, "OSPFinish: OSPINAUDIOQOS '%s'\n", inqos);
ast_debug(1, "OSPFinish: OSPOUTAUDIOQOS '%s'\n", outqos);
if (!ast_strlen_zero(args.cause) && sscanf(args.cause, "%30d", &cause) != 1) {
cause = 0;
}
ast_debug(1, "OSPFinish: cause '%d'\n", cause);
if (!ast_tvzero(ast_channel_creationtime(chan))) {
start = ast_channel_creationtime(chan).tv_sec;
}
if (!ast_tvzero(ast_channel_answertime(chan))) {
connect = ast_channel_answertime(chan).tv_sec;
}
if (connect) {
end = time(NULL);
} else {
end = connect;
}
ast_debug(1, "OSPFinish: start '%ld'\n", start);
ast_debug(1, "OSPFinish: connect '%ld'\n", connect);
ast_debug(1, "OSPFinish: end '%ld'\n", end);
release = ast_check_hangup(chan) ? 0 : 1;
if (osp_finish(outhandle, recorded, cause, start, connect, end, release, inqos, outqos) <= 0) {
ast_debug(1, "OSPFinish: Unable to report usage for outbound call\n");
}
switch (cause) {
case AST_CAUSE_NORMAL_CLEARING:
break;
default:
cause = AST_CAUSE_NO_ROUTE_DESTINATION;
break;
}
if (osp_finish(inhandle, recorded, cause, start, connect, end, release, inqos, outqos) <= 0) {
ast_debug(1, "OSPFinish: Unable to report usage for inbound call\n");
}
snprintf(buffer, sizeof(buffer), "%d", OSP_INVALID_HANDLE);
pbx_builtin_setvar_helper(chan, "OSPOUTHANDLE", buffer);
pbx_builtin_setvar_helper(chan, "OSPINHANDLE", buffer);
if (res > 0) {
status = AST_OSP_SUCCESS;
} else if (!res) {
status = AST_OSP_FAILED;
} else {
status = AST_OSP_ERROR;
}
pbx_builtin_setvar_helper(chan, "OSPFINISHSTATUS", status);
if(res != OSP_OK) {
res = OSP_AST_ERROR;
} else {
res = OSP_AST_OK;
}
return res;
}
/* OSP Module APIs */
static int osp_unload(void)
{
struct osp_provider* provider;
struct osp_provider* next;
if (osp_initialized) {
ast_mutex_lock(&osp_lock);
for (provider = osp_providers; provider; provider = next) {
next = provider->next;
OSPPProviderDelete(provider->handle, 0);
ast_free(provider);
}
osp_providers = NULL;
ast_mutex_unlock(&osp_lock);
OSPPCleanup();
osp_tokenformat = TOKEN_ALGO_SIGNED;
osp_security = 0;
osp_hardware = 0;
osp_initialized = 0;
}
return 0;
}
static int osp_load(int reload)
{
const char* cvar;
unsigned int ivar;
struct ast_config* cfg;
struct ast_flags config_flags = { reload ? CONFIG_FLAG_FILEUNCHANGED : 0 };
int error = OSPC_ERR_NO_ERROR;
if ((cfg = ast_config_load(OSP_CONFIG_FILE, config_flags)) == CONFIG_STATUS_FILEUNCHANGED) {
return 0;
} else if (cfg == CONFIG_STATUS_FILEINVALID) {
ast_log(LOG_ERROR, "Config file %s is in an invalid format. Aborting.\n", OSP_CONFIG_FILE);
return 0;
}
if (cfg) {
if (reload) {
osp_unload();
}
if ((cvar = ast_variable_retrieve(cfg, OSP_GENERAL_CAT, "accelerate")) && ast_true(cvar)) {
if ((error = OSPPInit(1)) != OSPC_ERR_NO_ERROR) {
ast_log(LOG_WARNING, "OSP: Unable to enable hardware acceleration, error='%d'\n", error);
OSPPInit(0);
} else {
osp_hardware = 1;
}
} else {
OSPPInit(0);
}
ast_debug(1, "OSP: osp_hardware '%d'\n", osp_hardware);
if ((cvar = ast_variable_retrieve(cfg, OSP_GENERAL_CAT, "securityfeatures")) && ast_true(cvar)) {
osp_security = 1;
}
ast_debug(1, "OSP: osp_security '%d'\n", osp_security);
if ((cvar = ast_variable_retrieve(cfg, OSP_GENERAL_CAT, "tokenformat"))) {
if ((sscanf(cvar, "%30d", &ivar) == 1) &&
((ivar == TOKEN_ALGO_SIGNED) || (ivar == TOKEN_ALGO_UNSIGNED) || (ivar == TOKEN_ALGO_BOTH)))
{
osp_tokenformat = ivar;
} else {
ast_log(LOG_WARNING, "tokenformat should be an integer from %d, %d or %d, not '%s'\n",
TOKEN_ALGO_SIGNED, TOKEN_ALGO_UNSIGNED, TOKEN_ALGO_BOTH, cvar);
}
}
ast_debug(1, "OSP: osp_tokenformat '%d'\n", osp_tokenformat);
for (cvar = ast_category_browse(cfg, NULL); cvar != NULL; cvar = ast_category_browse(cfg, cvar)) {
if (strcasecmp(cvar, OSP_GENERAL_CAT)) {
osp_create_provider(cfg, cvar);
}
}
osp_initialized = 1;
ast_config_destroy(cfg);
} else {
ast_log(LOG_WARNING, "OSP: Unable to find configuration. OSP support disabled\n");
return 0;
}
ast_debug(1, "OSP: osp_initialized '%d'\n", osp_initialized);
return 1;
}
static char *handle_cli_osp_show(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
{
int i;
int found = 0;
struct osp_provider* provider;
const char* name = NULL;
const char* tokenalgo;
switch (cmd) {
case CLI_INIT:
e->command = "osp show";
e->usage =
"Usage: osp show\n"
" Displays information on Open Settlement Protocol support\n";
return NULL;
case CLI_GENERATE:
return NULL;
}
if ((a->argc < 2) || (a->argc > 3)) {
return CLI_SHOWUSAGE;
}
if (a->argc > 2) {
name = a->argv[2];
}
if (!name) {
switch (osp_tokenformat) {
case TOKEN_ALGO_BOTH:
tokenalgo = "Both";
break;
case TOKEN_ALGO_UNSIGNED:
tokenalgo = "Unsigned";
break;
case TOKEN_ALGO_SIGNED:
default:
tokenalgo = "Signed";
break;
}
ast_cli(a->fd, "OSP: %s/%s/%s/%s\n",
osp_initialized ? "Initialized" : "Uninitialized",
osp_hardware ? "Accelerated" : "Normal",
osp_security ? "Enabled" : "Disabled",
tokenalgo);
}
ast_mutex_lock(&osp_lock);
for (provider = osp_providers; provider; provider = provider->next) {
if (!name || !strcasecmp(provider->name, name)) {
if (found) {
ast_cli(a->fd, "\n");
}
ast_cli(a->fd, " == OSP Provider '%s' == \n", provider->name);
if (osp_security) {
ast_cli(a->fd, "Local Private Key: %s\n", provider->privatekey);
ast_cli(a->fd, "Local Certificate: %s\n", provider->localcert);
for (i = 0; i < provider->canum; i++) {
ast_cli(a->fd, "CA Certificate %d: %s\n", i + 1, provider->cacerts[i]);
}
}
for (i = 0; i < provider->spnum; i++) {
ast_cli(a->fd, "Service Point %d: %s\n", i + 1, provider->spoints[i]);
}
ast_cli(a->fd, "Max Connections: %d\n", provider->maxconnect);
ast_cli(a->fd, "Retry Delay: %d seconds\n", provider->retrydelay);
ast_cli(a->fd, "Retry Limit: %d\n", provider->retrylimit);
ast_cli(a->fd, "Timeout: %d milliseconds\n", provider->timeout);
ast_cli(a->fd, "Source: %s\n", strlen(provider->source) ? provider->source : "<unspecified>");
ast_cli(a->fd, "Auth Policy %d\n", provider->authpolicy);
ast_cli(a->fd, "Default protocol %s\n", provider->defprotocol);
ast_cli(a->fd, "Work mode %d\n", provider->workmode);
ast_cli(a->fd, "Service type %d\n", provider->srvtype);
ast_cli(a->fd, "OSP Handle: %d\n", provider->handle);
found++;
}
}
ast_mutex_unlock(&osp_lock);
if (!found) {
if (name) {
ast_cli(a->fd, "Unable to find OSP provider '%s'\n", name);
} else {
ast_cli(a->fd, "No OSP providers configured\n");
}
}
return CLI_SUCCESS;
}
/* OSPAuth() dialplan application */
static const char app1[] = "OSPAuth";
/* OSPLookup() dialplan application */
static const char app2[] = "OSPLookup";
/* OSPNext() dialplan application */
static const char app3[] = "OSPNext";
/* OSPFinish() dialplan application */
static const char app4[] = "OSPFinish";
static struct ast_cli_entry cli_osp[] = {
AST_CLI_DEFINE(handle_cli_osp_show, "Displays OSF information")
};
static int load_module(void)
{
int res;
if (!osp_load(0))
return AST_MODULE_LOAD_DECLINE;
ast_cli_register_multiple(cli_osp, sizeof(cli_osp) / sizeof(struct ast_cli_entry));
res = ast_register_application_xml(app1, ospauth_exec);
res |= ast_register_application_xml(app2, osplookup_exec);
res |= ast_register_application_xml(app3, ospnext_exec);
res |= ast_register_application_xml(app4, ospfinished_exec);
return res;
}
static int unload_module(void)
{
int res;
res = ast_unregister_application(app4);
res |= ast_unregister_application(app3);
res |= ast_unregister_application(app2);
res |= ast_unregister_application(app1);
ast_cli_unregister_multiple(cli_osp, sizeof(cli_osp) / sizeof(struct ast_cli_entry));
osp_unload();
return res;
}
static int reload(void)
{
osp_load(1);
return 0;
}
AST_MODULE_INFO(ASTERISK_GPL_KEY, AST_MODFLAG_DEFAULT, "Open Settlement Protocol Applications",
.support_level = AST_MODULE_SUPPORT_EXTENDED,
.load = load_module,
.unload = unload_module,
.reload = reload,
);