You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
kamailio/modules/pv/pv.c

817 lines
22 KiB

/*
* Copyright (C) 2008 Daniel-Constantin Mierla (asipto.com)
*
* This file is part of Kamailio, a free SIP server.
*
* Kamailio is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version
*
* Kamailio is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include "../../sr_module.h"
#include "../../pvar.h"
#include "../../mod_fix.h"
#include "../../lib/kmi/mi.h"
#include "../../rpc.h"
#include "../../rpc_lookup.h"
#include "pv_branch.h"
#include "pv_core.h"
#include "pv_stats.h"
#include "pv_shv.h"
#include "pv_time.h"
#include "pv_trans.h"
#include "pv_select.h"
#ifdef WITH_XAVP
#include "pv_xavp.h"
#endif
#include "pv_api.h"
MODULE_VERSION
static tr_export_t mod_trans[] = {
{ {"s", sizeof("s")-1}, /* string class */
tr_parse_string },
{ {"nameaddr", sizeof("nameaddr")-1}, /* nameaddr class */
tr_parse_nameaddr },
{ {"uri", sizeof("uri")-1}, /* uri class */
tr_parse_uri },
{ {"param", sizeof("param")-1}, /* param class */
tr_parse_paramlist },
{ {"tobody", sizeof("tobody")-1}, /* param class */
tr_parse_tobody },
{ {"line", sizeof("line")-1}, /* line class */
tr_parse_line },
{ { 0, 0 }, 0 }
};
static pv_export_t mod_pvs[] = {
{ {"_s", (sizeof("_s")-1)}, PVT_OTHER, pv_get__s, 0,
pv_parse__s_name, 0, 0, 0 },
{ {"af", (sizeof("af")-1)}, PVT_OTHER, pv_get_af, 0,
pv_parse_af_name, 0, 0, 0 },
{ {"branch", sizeof("branch")-1}, /* branch attributes */
PVT_CONTEXT, pv_get_branchx, pv_set_branchx,
pv_parse_branchx_name, pv_parse_index, 0, 0 },
{ {"sbranch", sizeof("sbranch")-1}, /* static branch attributes */
PVT_CONTEXT, pv_get_sbranch, pv_set_sbranch,
pv_parse_branchx_name, 0, 0, 0 },
{ {"mi", (sizeof("mi")-1)}, /* message id */
PVT_OTHER, pv_get_msgid, 0,
0, 0, 0, 0},
{ {"stat", sizeof("stat")-1}, /* statistics */
PVT_OTHER, pv_get_stat, 0,
pv_parse_stat_name, 0, 0, 0 },
{ {"sel", sizeof("sel")-1}, /* select */
PVT_OTHER, pv_get_select, 0,
pv_parse_select_name, 0, 0, 0 },
{ {"snd", (sizeof("snd")-1)}, PVT_OTHER, pv_get_sndto, 0,
pv_parse_snd_name, 0, 0, 0 },
{ {"sndto", (sizeof("sndto")-1)}, PVT_OTHER, pv_get_sndto, 0,
pv_parse_snd_name, 0, 0, 0 },
{ {"sndfrom", (sizeof("sndfrom")-1)}, PVT_OTHER, pv_get_sndfrom, 0,
pv_parse_snd_name, 0, 0, 0 },
#ifdef WITH_XAVP
{ {"xavp", sizeof("xavp")-1}, /* xavp */
PVT_XAVP, pv_get_xavp, pv_set_xavp,
pv_parse_xavp_name, 0, 0, 0 },
#endif
{{"avp", (sizeof("avp")-1)}, PVT_AVP, pv_get_avp, pv_set_avp,
pv_parse_avp_name, pv_parse_index, 0, 0},
{{"hdr", (sizeof("hdr")-1)}, PVT_HDR, pv_get_hdr, 0, pv_parse_hdr_name,
pv_parse_index, 0, 0},
{{"var", (sizeof("var")-1)}, PVT_SCRIPTVAR, pv_get_scriptvar,
pv_set_scriptvar, pv_parse_scriptvar_name, 0, 0, 0},
{{"vz", (sizeof("vz")-1)}, PVT_SCRIPTVAR, pv_get_scriptvar,
pv_set_scriptvar, pv_parse_scriptvar_name, 0, 0, 0},
{{"vn", (sizeof("vn")-1)}, PVT_SCRIPTVAR, pv_get_scriptvar,
pv_set_scriptvar, pv_parse_scriptvarnull_name, 0, 0, 0},
{{"ai", (sizeof("ai")-1)}, /* */
PVT_OTHER, pv_get_pai, 0,
0, pv_parse_index, 0, 0},
{{"adu", (sizeof("adu")-1)}, /* auth digest uri */
PVT_OTHER, pv_get_authattr, 0,
0, 0, pv_init_iname, 3},
{{"ar", (sizeof("ar")-1)}, /* auth realm */
PVT_OTHER, pv_get_authattr, 0,
0, 0, pv_init_iname, 2},
{{"au", (sizeof("au")-1)}, /* */
PVT_OTHER, pv_get_authattr, 0,
0, 0, pv_init_iname, 1},
{{"ad", (sizeof("ad")-1)}, /* */
PVT_OTHER, pv_get_authattr, 0,
0, 0, pv_init_iname, 4},
{{"aU", (sizeof("aU")-1)}, /* */
PVT_OTHER, pv_get_authattr, 0,
0, 0, pv_init_iname, 5},
{{"aa", (sizeof("aa")-1)}, /* auth algorithm */
PVT_OTHER, pv_get_authattr, 0,
0, 0, pv_init_iname, 6},
{{"adn", (sizeof("adn")-1)}, /* auth nonce */
PVT_OTHER, pv_get_authattr, 0,
0, 0, pv_init_iname, 7},
{{"adc", (sizeof("adc")-1)}, /* auth cnonce */
PVT_OTHER, pv_get_authattr, 0,
0, 0, pv_init_iname, 8},
{{"adr", (sizeof("adr")-1)}, /* auth response */
PVT_OTHER, pv_get_authattr, 0,
0, 0, pv_init_iname, 9},
{{"ado", (sizeof("ado")-1)}, /* auth opaque */
PVT_OTHER, pv_get_authattr, 0,
0, 0, pv_init_iname, 10},
{{"Au", (sizeof("Au")-1)}, /* */
PVT_OTHER, pv_get_acc_username, 0,
0, 0, pv_init_iname, 1},
{{"bf", (sizeof("bf")-1)}, /* */
PVT_CONTEXT, pv_get_bflags, pv_set_bflags,
0, 0, 0, 0},
{{"bF", (sizeof("bF")-1)}, /* */
PVT_CONTEXT, pv_get_hexbflags, pv_set_bflags,
0, 0, 0, 0},
{{"Bf", (sizeof("Bf")-1)}, /* */
PVT_CONTEXT, pv_get_bflag, pv_set_bflag,
pv_parse_flag_param, 0, 0, 0},
{{"br", (sizeof("br")-1)}, /* */
PVT_BRANCH, pv_get_branch, pv_set_branch,
0, 0, 0, 0},
{{"bR", (sizeof("bR")-1)}, /* */
PVT_CONTEXT, pv_get_branches, 0,
0, 0, 0, 0},
{{"bs", (sizeof("bs")-1)}, /* */
PVT_OTHER, pv_get_body_size, 0,
0, 0, 0, 0},
{{"ci", (sizeof("ci")-1)}, /* */
PVT_OTHER, pv_get_callid, 0,
0, 0, 0, 0},
{{"cl", (sizeof("cl")-1)}, /* */
PVT_OTHER, pv_get_content_length, 0,
0, 0, 0, 0},
{{"cnt", sizeof("cnt")-1},
PVT_OTHER, pv_get_cnt, 0,
pv_parse_cnt_name, 0, 0, 0 },
{{"conid", (sizeof("conid")-1)}, /* */
PVT_OTHER, pv_get_tcpconn_id, 0,
0, 0, 0, 0},
{{"cs", (sizeof("cs")-1)}, /* */
PVT_OTHER, pv_get_cseq, 0,
0, 0, 0, 0},
{{"ct", (sizeof("ct")-1)}, /* */
PVT_OTHER, pv_get_contact, 0,
0, 0, 0, 0},
{{"cT", (sizeof("cT")-1)}, /* */
PVT_OTHER, pv_get_content_type, 0,
0, 0, 0, 0},
{{"dd", (sizeof("dd")-1)}, /* */
PVT_OTHER, pv_get_dsturi_attr, 0,
0, 0, pv_init_iname, 1},
{{"di", (sizeof("di")-1)}, /* */
PVT_OTHER, pv_get_diversion, 0,
0, 0, pv_init_iname, 1},
{{"dir", (sizeof("dir")-1)}, /* */
PVT_OTHER, pv_get_diversion, 0,
0, 0, pv_init_iname, 2},
{{"dip", (sizeof("dis")-1)}, /* */
PVT_OTHER, pv_get_diversion, 0,
0, 0, pv_init_iname, 3},
{{"dic", (sizeof("dic")-1)}, /* */
PVT_OTHER, pv_get_diversion, 0,
0, 0, pv_init_iname, 4},
{{"dp", (sizeof("dp")-1)}, /* */
PVT_OTHER, pv_get_dsturi_attr, 0,
0, 0, pv_init_iname, 2},
{{"dP", (sizeof("dP")-1)}, /* */
PVT_OTHER, pv_get_dsturi_attr, 0,
0, 0, pv_init_iname, 3},
{{"ds", (sizeof("ds")-1)}, /* */
PVT_CONTEXT, pv_get_dset, 0,
0, 0, 0, 0},
{{"du", (sizeof("du")-1)}, /* */
PVT_DSTURI, pv_get_dsturi, pv_set_dsturi,
0, 0, 0, 0},
{{"duri", (sizeof("duri")-1)}, /* */
PVT_DSTURI, pv_get_dsturi, pv_set_dsturi,
0, 0, 0, 0},
{{"err.class", (sizeof("err.class")-1)}, /* */
PVT_OTHER, pv_get_errinfo_attr, 0,
0, 0, 0, 0},
{{"err.level", (sizeof("err.level")-1)}, /* */
PVT_OTHER, pv_get_errinfo_attr, 0,
0, 0, pv_init_iname, 1},
{{"err.info", (sizeof("err.info")-1)}, /* */
PVT_OTHER, pv_get_errinfo_attr, 0,
0, 0, pv_init_iname, 2},
{{"err.rcode", (sizeof("err.rcode")-1)}, /* */
PVT_OTHER, pv_get_errinfo_attr, 0,
0, 0, pv_init_iname, 3},
{{"err.rreason", (sizeof("err.rreason")-1)}, /* */
PVT_OTHER, pv_get_errinfo_attr, 0,
0, 0, pv_init_iname, 4},
{{"fd", (sizeof("fd")-1)}, /* */
PVT_OTHER, pv_get_from_attr, pv_set_from_domain,
0, 0, pv_init_iname, 3},
{{"from.domain", (sizeof("from.domain")-1)}, /* */
PVT_OTHER, pv_get_from_attr, pv_set_from_domain,
0, 0, pv_init_iname, 3},
{{"fn", (sizeof("fn")-1)}, /* */
PVT_OTHER, pv_get_from_attr, pv_set_from_display,
0, 0, pv_init_iname, 5},
{{"fs", (sizeof("fs")-1)}, /* */
PVT_OTHER, pv_get_force_sock, pv_set_force_sock,
0, 0, 0, 0},
{{"ft", (sizeof("ft")-1)}, /* */
PVT_OTHER, pv_get_from_attr, 0,
0, 0, pv_init_iname, 4},
{{"fu", (sizeof("fu")-1)}, /* */
PVT_FROM, pv_get_from_attr, pv_set_from_uri,
0, 0, pv_init_iname, 1},
{{"from", (sizeof("from")-1)}, /* */
PVT_FROM, pv_get_from_attr, pv_set_from_uri,
0, 0, pv_init_iname, 1},
{{"fU", (sizeof("fU")-1)}, /* */
PVT_OTHER, pv_get_from_attr, pv_set_from_username,
0, 0, pv_init_iname, 2},
{{"from.user", (sizeof("from.user")-1)}, /* */
PVT_OTHER, pv_get_from_attr, pv_set_from_username,
0, 0, pv_init_iname, 2},
{{"mb", (sizeof("mb")-1)}, /* */
PVT_OTHER, pv_get_msg_buf, 0,
0, 0, 0, 0},
{{"mf", (sizeof("mf")-1)}, /* */
PVT_OTHER, pv_get_flags, pv_set_mflags,
0, 0, 0, 0},
{{"mF", (sizeof("mF")-1)}, /* */
PVT_OTHER, pv_get_hexflags, pv_set_mflags,
0, 0, 0, 0},
{{"Mf", (sizeof("mf")-1)}, /* */
PVT_OTHER, pv_get_flag, pv_set_mflag,
pv_parse_flag_param, 0, 0, 0},
{{"ml", (sizeof("ml")-1)}, /* */
PVT_OTHER, pv_get_msg_len, 0,
0, 0, 0, 0},
{{"mt", (sizeof("mt")-1)}, /* */
PVT_OTHER, pv_get_msgtype, 0,
0, 0, 0, 0},
{{"od", (sizeof("od")-1)}, /* */
PVT_OTHER, pv_get_ouri_attr, 0,
0, 0, pv_init_iname, 2},
{{"op", (sizeof("op")-1)}, /* */
PVT_OTHER, pv_get_ouri_attr, 0,
0, 0, pv_init_iname, 3},
{{"oP", (sizeof("oP")-1)}, /* */
PVT_OTHER, pv_get_ouri_attr, 0,
0, 0, pv_init_iname, 4},
{{"ou", (sizeof("ou")-1)}, /* */
PVT_OURI, pv_get_ouri, 0,
0, 0, 0, 0},
{{"ouri", (sizeof("ouri")-1)}, /* */
PVT_OURI, pv_get_ouri, 0,
0, 0, 0, 0},
{{"oU", (sizeof("oU")-1)}, /* */
PVT_OTHER, pv_get_ouri_attr, 0,
0, 0, pv_init_iname, 1},
{{"pd", (sizeof("pd")-1)}, /* */
PVT_OTHER, pv_get_ppi_attr, 0,
0, pv_parse_index, pv_init_iname, 3},
{{"pn", (sizeof("pn")-1)}, /* */
PVT_OTHER, pv_get_ppi_attr, 0,
0, pv_parse_index, pv_init_iname, 4},
{{"pp", (sizeof("pp")-1)}, /* */
PVT_OTHER, pv_get_pid, 0,
0, 0, 0, 0},
{{"pr", (sizeof("pr")-1)}, /* */
PVT_OTHER, pv_get_proto, 0,
0, 0, 0, 0},
{{"proto", (sizeof("proto")-1)}, /* */
PVT_OTHER, pv_get_proto, 0,
0, 0, 0, 0},
{{"pu", (sizeof("pu")-1)}, /* */
PVT_OTHER, pv_get_ppi_attr, 0,
0, pv_parse_index, pv_init_iname, 1},
{{"pU", (sizeof("pU")-1)}, /* */
PVT_OTHER, pv_get_ppi_attr, 0,
0, pv_parse_index, pv_init_iname, 2},
{{"rb", (sizeof("rb")-1)}, /* */
PVT_MSG_BODY, pv_get_msg_body, 0,
0, 0, 0, 0},
/* {{"rc", (sizeof("rc")-1)},
PVT_OTHER, pv_get_return_code, 0,
0, 0, 0, 0},
{{"retcode", (sizeof("retcode")-1)},
PVT_OTHER, pv_get_return_code, 0,
0, 0, 0, 0}, */
{{"rd", (sizeof("rd")-1)}, /* */
PVT_RURI_DOMAIN, pv_get_ruri_attr, pv_set_ruri_host,
0, 0, pv_init_iname, 2},
{{"ruri.domain", (sizeof("ruri.domain")-1)}, /* */
PVT_RURI_DOMAIN, pv_get_ruri_attr, pv_set_ruri_host,
0, 0, pv_init_iname, 2},
{{"re", (sizeof("re")-1)}, /* */
PVT_OTHER, pv_get_rpid, 0,
0, 0, 0, 0},
{{"rm", (sizeof("rm")-1)}, /* */
PVT_OTHER, pv_get_method, 0,
0, 0, 0, 0},
{{"rmid", (sizeof("rmid")-1)}, /* */
PVT_OTHER, pv_get_methodid, 0,
0, 0, 0, 0},
{{"rp", (sizeof("rp")-1)}, /* */
PVT_OTHER, pv_get_ruri_attr, pv_set_ruri_port,
0, 0, pv_init_iname, 3},
{{"rP", (sizeof("rP")-1)}, /* */
PVT_OTHER, pv_get_ruri_attr, 0,
0, 0, pv_init_iname, 4},
{{"rr", (sizeof("rr")-1)}, /* */
PVT_OTHER, pv_get_reason, 0,
0, 0, 0, 0},
{{"rs", (sizeof("rs")-1)}, /* */
PVT_OTHER, pv_get_status, 0,
0, 0, 0, 0},
{{"rt", (sizeof("rt")-1)}, /* */
PVT_OTHER, pv_get_refer_to, 0,
0, 0, 0, 0},
{{"ru", (sizeof("ru")-1)}, /* */
PVT_RURI, pv_get_ruri, pv_set_ruri,
0, 0, 0, 0},
{{"ruri", (sizeof("ruri")-1)}, /* */
PVT_RURI, pv_get_ruri, pv_set_ruri,
0, 0, 0, 0},
{{"rU", (sizeof("rU")-1)}, /* */
PVT_RURI_USERNAME, pv_get_ruri_attr, pv_set_ruri_user,
0, 0, pv_init_iname, 1},
{{"ruri.user", (sizeof("ruri.user")-1)}, /* */
PVT_RURI_USERNAME, pv_get_ruri_attr, pv_set_ruri_user,
0, 0, pv_init_iname, 1},
{{"rv", (sizeof("rv")-1)}, /* */
PVT_OTHER, pv_get_version, 0,
0, 0, 0, 0},
{{"rz", (sizeof("rz")-1)}, /* */
PVT_OTHER, pv_get_ruri_attr, 0,
0, 0, pv_init_iname, 5},
{{"Ri", (sizeof("Ri")-1)}, /* */
PVT_OTHER, pv_get_rcvip, 0,
0, 0, 0, 0},
{{"Rp", (sizeof("Rp")-1)}, /* */
PVT_OTHER, pv_get_rcvport, 0,
0, 0, 0, 0},
{{"sf", (sizeof("sf")-1)}, /* */
PVT_OTHER, pv_get_sflags, pv_set_sflags,
0, 0, 0, 0},
{{"sF", (sizeof("sF")-1)}, /* */
PVT_OTHER, pv_get_hexsflags, pv_set_sflags,
0, 0, 0, 0},
{{"Sf", (sizeof("sf")-1)}, /* */
PVT_OTHER, pv_get_sflag, pv_set_sflag,
pv_parse_flag_param, 0, 0, 0},
{{"src_ip", (sizeof("src_ip")-1)}, /* */
PVT_OTHER, pv_get_srcip, 0,
0, 0, 0, 0},
{{"si", (sizeof("si")-1)}, /* */
PVT_OTHER, pv_get_srcip, 0,
0, 0, 0, 0},
{ {"sid", (sizeof("sid")-1)}, /* server id */
PVT_OTHER, pv_get_server_id, 0,
0, 0, 0, 0},
{{"sp", (sizeof("sp")-1)}, /* */
PVT_OTHER, pv_get_srcport, 0,
0, 0, 0, 0},
{{"su", (sizeof("su")-1)}, /* */
PVT_OTHER, pv_get_srcaddr_uri, 0,
0, 0, 0, 0},
{{"td", (sizeof("td")-1)}, /* */
PVT_OTHER, pv_get_to_attr, pv_set_to_domain,
0, 0, pv_init_iname, 3},
{{"sut", (sizeof("sut")-1)}, /* */
PVT_OTHER, pv_get_srcaddr_uri_full, 0,
0, 0, 0, 0},
{{"to.domain", (sizeof("to.domain")-1)}, /* */
PVT_OTHER, pv_get_to_attr, pv_set_to_domain,
0, 0, pv_init_iname, 3},
{{"tn", (sizeof("tn")-1)}, /* */
PVT_OTHER, pv_get_to_attr, pv_set_to_display,
0, 0, pv_init_iname, 5},
{{"tt", (sizeof("tt")-1)}, /* */
PVT_OTHER, pv_get_to_attr, 0,
0, 0, pv_init_iname, 4},
{{"tu", (sizeof("tu")-1)}, /* */
PVT_TO, pv_get_to_attr, pv_set_to_uri,
0, 0, pv_init_iname, 1},
{{"to", (sizeof("to")-1)}, /* */
PVT_TO, pv_get_to_attr, pv_set_to_uri,
0, 0, pv_init_iname, 1},
{{"tU", (sizeof("tU")-1)}, /* */
PVT_OTHER, pv_get_to_attr, pv_set_to_username,
0, 0, pv_init_iname, 2},
{{"to.user", (sizeof("to.user")-1)}, /* */
PVT_OTHER, pv_get_to_attr, pv_set_to_username,
0, 0, pv_init_iname, 2},
{{"true", (sizeof("true")-1)}, /* */
PVT_OTHER, pv_get_true, 0,
0, 0, 0, 0},
{{"Tb", (sizeof("Tb")-1)}, /* */
PVT_OTHER, pv_get_timeb, 0,
0, 0, 0, 0},
{{"Tf", (sizeof("Tf")-1)}, /* */
PVT_CONTEXT, pv_get_timef, 0,
0, 0, 0, 0},
{{"TF", (sizeof("TF")-1)}, /* */
PVT_OTHER, pv_get_timenowf, 0,
0, 0, 0, 0},
{{"Ts", (sizeof("Ts")-1)}, /* */
PVT_CONTEXT, pv_get_times, 0,
0, 0, 0, 0},
{{"TS", (sizeof("TS")-1)}, /* */
PVT_OTHER, pv_get_timenows, 0,
0, 0, 0, 0},
{{"ua", (sizeof("ua")-1)}, /* */
PVT_OTHER, pv_get_useragent, 0,
0, 0, 0, 0},
{{"ruid", (sizeof("ruid")-1)}, /* */
PVT_OTHER, pv_get_ruid, 0,
0, 0, 0, 0},
{{"location_ua", (sizeof("location_ua")-1)}, /* */
PVT_OTHER, pv_get_location_ua, 0,
0, 0, 0, 0},
{ {"shv", (sizeof("shv")-1)}, PVT_OTHER, pv_get_shvar,
pv_set_shvar, pv_parse_shvar_name, 0, 0, 0},
{ {"time", (sizeof("time")-1)}, PVT_CONTEXT, pv_get_local_time,
0, pv_parse_time_name, 0, 0, 0},
{ {"timef", (sizeof("timef")-1)}, PVT_CONTEXT, pv_get_local_strftime,
0, pv_parse_strftime_name, 0, 0, 0},
{ {"utime", (sizeof("utime")-1)}, PVT_CONTEXT, pv_get_utc_time,
0, pv_parse_time_name, 0, 0, 0},
{ {"utimef", (sizeof("utimef")-1)}, PVT_CONTEXT, pv_get_utc_strftime,
0, pv_parse_strftime_name, 0, 0, 0},
{ {"TV", (sizeof("TV")-1)}, PVT_OTHER, pv_get_timeval,
0, pv_parse_timeval_name, 0, 0, 0},
{ {"nh", (sizeof("nh")-1)}, PVT_OTHER, pv_get_nh,
0, pv_parse_nh_name, 0, 0, 0},
{ {"version", (sizeof("version")-1)}, PVT_OTHER, pv_get_sr_version,
0, pv_parse_sr_version_name, 0, 0, 0},
{ {"K", (sizeof("K")-1)}, PVT_OTHER, pv_get_K, 0,
pv_parse_K_name, 0, 0, 0 },
{ {"expires", (sizeof("expires")-1)}, PVT_OTHER, pv_get_expires, 0,
pv_parse_expires_name, 0, 0, 0 },
{ {0, 0}, 0, 0, 0, 0, 0, 0, 0 }
};
static int add_avp_aliases(modparam_t type, void* val);
static param_export_t params[]={
{"shvset", PARAM_STRING|USE_FUNC_PARAM, (void*)param_set_shvar },
{"varset", PARAM_STRING|USE_FUNC_PARAM, (void*)param_set_var },
{"avp_aliases", PARAM_STRING|USE_FUNC_PARAM, (void*)add_avp_aliases },
{0,0,0}
};
static mi_export_t mi_cmds[] = {
{ "shv_get", mi_shvar_get, 0, 0, 0 },
{ "shv_set" , mi_shvar_set, 0, 0, 0 },
{ 0, 0, 0, 0, 0}
};
static int mod_init(void);
static void mod_destroy(void);
static int pv_isset(struct sip_msg* msg, char* pvid, char *foo);
static int pv_unset(struct sip_msg* msg, char* pvid, char *foo);
static int is_int(struct sip_msg* msg, char* pvar, char* s2);
static int pv_typeof(sip_msg_t *msg, char *pv, char *t);
static int pv_not_empty(sip_msg_t *msg, char *pv, char *s2);
static int w_xavp_params_explode(sip_msg_t *msg, char *pparams, char *pxname);
static int w_sbranch_set_ruri(sip_msg_t *msg, char p1, char *p2);
static int w_sbranch_append(sip_msg_t *msg, char p1, char *p2);
static int w_sbranch_reset(sip_msg_t *msg, char p1, char *p2);
static int w_var_to_xavp(sip_msg_t *msg, char *p1, char *p2);
static int w_xavp_to_var(sip_msg_t *msg, char *p1);
static int pv_init_rpc(void);
int pv_register_api(pv_api_t*);
static cmd_export_t cmds[]={
{"pv_isset", (cmd_function)pv_isset, 1, fixup_pvar_null, 0,
ANY_ROUTE },
{"pv_unset", (cmd_function)pv_unset, 1, fixup_pvar_null, 0,
ANY_ROUTE },
#ifdef WITH_XAVP
{"pv_xavp_print", (cmd_function)pv_xavp_print, 0, 0, 0,
ANY_ROUTE },
{"pv_var_to_xavp", (cmd_function)w_var_to_xavp, 2, 0, 0,
ANY_ROUTE },
{"pv_xavp_to_var", (cmd_function)w_xavp_to_var, 1, 0, 0,
ANY_ROUTE },
#endif
{"is_int", (cmd_function)is_int, 1, fixup_pvar_null, fixup_free_pvar_null,
ANY_ROUTE},
{"typeof", (cmd_function)pv_typeof, 2, fixup_pvar_none,
fixup_free_pvar_none,
ANY_ROUTE},
{"not_empty", (cmd_function)pv_not_empty, 1, fixup_pvar_null,
fixup_free_pvar_null,
ANY_ROUTE},
{"xavp_params_explode", (cmd_function)w_xavp_params_explode,
2, fixup_spve_spve, fixup_free_spve_spve,
ANY_ROUTE},
{"sbranch_set_ruri", (cmd_function)w_sbranch_set_ruri, 0, 0, 0,
ANY_ROUTE },
{"sbranch_append", (cmd_function)w_sbranch_append, 0, 0, 0,
ANY_ROUTE },
{"sbranch_reset", (cmd_function)w_sbranch_reset, 0, 0, 0,
ANY_ROUTE },
/* API exports */
{"pv_register_api", (cmd_function)pv_register_api, NO_SCRIPT, 0, 0},
{0,0,0,0,0,0}
};
/** module exports */
struct module_exports exports= {
"pv",
DEFAULT_DLFLAGS, /* dlopen flags */
cmds,
params,
0, /* exported statistics */
mi_cmds, /* exported MI functions */
mod_pvs, /* exported pseudo-variables */
0, /* extra processes */
mod_init, /* module initialization function */
0,
mod_destroy,
0 /* per-child init function */
};
static int mod_init(void)
{
if(register_mi_mod(exports.name, mi_cmds)!=0)
{
LM_ERR("failed to register MI commands\n");
return -1;
}
if(pv_init_rpc()!=0)
{
LM_ERR("failed to register RPC commands\n");
return -1;
}
pv_init_sbranch();
return 0;
}
static void mod_destroy(void)
{
shvar_destroy_locks();
destroy_shvars();
}
int mod_register(char *path, int *dlflags, void *p1, void *p2)
{
if(tr_init_buffers()<0)
{
LM_ERR("failed to initialize transformations buffers\n");
return -1;
}
return register_trans_mod(path, mod_trans);
}
static int pv_isset(struct sip_msg* msg, char* pvid, char *foo)
{
pv_spec_t *sp;
pv_value_t value;
int ret;
sp = (pv_spec_t*)pvid;
if(pv_get_spec_value(msg, sp, &value)!=0)
return -1;
ret =1;
if(value.flags & (PV_VAL_EMPTY|PV_VAL_NULL))
ret = -1;
pv_value_destroy(&value);
return ret;
}
static int pv_unset(struct sip_msg* msg, char* pvid, char *foo)
{
pv_spec_t *sp;
sp = (pv_spec_t*)pvid;
if(pv_set_spec_value(msg, sp, 0, NULL)<0) {
LM_ERR("faile to unset variable\n");
return -1;
}
return 1;
}
static int add_avp_aliases(modparam_t type, void* val)
{
if (val!=0 && ((char*)val)[0]!=0)
{
if ( add_avp_galias_str((char*)val)!=0 )
return -1;
}
return 0;
}
/**
* match the type of the variable value
*/
static int pv_typeof(sip_msg_t *msg, char *pv, char *t)
{
pv_value_t val;
if (pv==NULL || t==NULL)
return -1;
if(pv_get_spec_value(msg, (pv_spec_t*)pv, &val) != 0)
return -1;
switch(t[0]) {
case 'i':
case 'I':
if(val.flags & PV_TYPE_INT)
return 1;
return -1;
case 'n':
case 'N':
if(val.flags & PV_VAL_NULL)
return 1;
return -1;
case 's':
case 'S':
if(!(val.flags & PV_VAL_STR))
return -1;
if(val.flags & PV_TYPE_INT)
return -1;
return 1;
default:
return -1;
}
}
/**
* return true if the type is string and value not empty
*/
static int pv_not_empty(sip_msg_t *msg, char *pv, char *s2)
{
pv_value_t val;
if (pv==NULL)
return -1;
if(pv_get_spec_value(msg, (pv_spec_t*)pv, &val) != 0)
return -1;
if(!(val.flags & PV_VAL_STR))
return -1;
if(val.flags & PV_TYPE_INT)
return -1;
if(val.rs.len>0)
return 1;
return -1;
}
/**
* Copyright (C) 2011 Juha Heinanen
*
* Checks if pvar argument contains int value
*/
static int is_int(struct sip_msg* msg, char* pvar, char* s2)
{
pv_spec_t *pvar_sp;
pv_value_t pv_val;
pvar_sp = (pv_spec_t *)pvar;
if (pvar_sp && (pv_get_spec_value(msg, pvar_sp, &pv_val) == 0)) {
return (pv_val.flags & PV_VAL_INT)?1:-1;
}
return -1;
}
static int w_var_to_xavp(sip_msg_t *msg, char *s1, char *s2)
{
str xname, varname;
if(s1 == NULL || s2 == NULL) {
LM_ERR("wrong parameters\n");
return -1;
}
varname.len = strlen(s1); varname.s = s1;
xname.s = s2; xname.len = strlen(s2);
return pv_var_to_xavp(&varname, &xname);
}
static int w_xavp_to_var(sip_msg_t *msg, char *s1)
{
str xname;
if(s1 == NULL) {
LM_ERR("wrong parameters\n");
return -1;
}
xname.s = s1; xname.len = strlen(s1);
return pv_xavp_to_var(&xname);
}
/**
*
*/
static int w_xavp_params_explode(sip_msg_t *msg, char *pparams, char *pxname)
{
str sparams;
str sxname;
if(fixup_get_svalue(msg, (gparam_t*)pparams, &sparams)!=0) {
LM_ERR("cannot get the params\n");
return -1;
}
if(fixup_get_svalue(msg, (gparam_t*)pxname, &sxname)!=0) {
LM_ERR("cannot get the xavp name\n");
return -1;
}
if(xavp_params_explode(&sparams, &sxname)<0)
return -1;
return 1;
}
/**
*
*/
static int w_sbranch_set_ruri(sip_msg_t *msg, char p1, char *p2)
{
if(sbranch_set_ruri(msg)<0)
return -1;
return 1;
}
/**
*
*/
static int w_sbranch_append(sip_msg_t *msg, char p1, char *p2)
{
if(sbranch_append(msg)<0)
return -1;
return 1;
}
/**
*
*/
static int w_sbranch_reset(sip_msg_t *msg, char p1, char *p2)
{
if(sbranch_reset()<0)
return -1;
return 1;
}
static const char* rpc_shv_set_doc[2] = {
"Set a shared variable (args: name type value)",
0
};
static const char* rpc_shv_get_doc[2] = {
"Get the value of a shared variable. If no argument, dumps all",
0
};
rpc_export_t pv_rpc[] = {
{"pv.shvSet", rpc_shv_set, rpc_shv_set_doc, 0},
{"pv.shvGet", rpc_shv_get, rpc_shv_get_doc, 0},
{0, 0, 0, 0}
};
static int pv_init_rpc(void)
{
if (rpc_register_array(pv_rpc)!=0)
{
LM_ERR("failed to register RPC commands\n");
return -1;
}
return 0;
}