void _cfgt_get_obj_xavp_val(sr_xavp_t *avp, srjson_doc_t *jdoc, srjson_t **jobj)
{
static char _pv_xavp_buf[128];
int result = 0;
switch(avp->val.type) {
case SR_XTYPE_NULL:
*jobj = srjson_CreateNull(jdoc);
break;
case SR_XTYPE_INT:
*jobj = srjson_CreateNumber(jdoc, avp->val.v.i);
break;
case SR_XTYPE_STR:
*jobj = srjson_CreateStr(jdoc, avp->val.v.s.s, avp->val.v.s.len);
break;
case SR_XTYPE_TIME:
result = snprintf(_pv_xavp_buf, 128, "%lu", (long unsigned)avp->val.v.t);
break;
case SR_XTYPE_LONG:
result = snprintf(_pv_xavp_buf, 128, "%ld", (long unsigned)avp->val.v.l);
break;
case SR_XTYPE_LLONG:
result = snprintf(_pv_xavp_buf, 128, "%lld", avp->val.v.ll);
break;
case SR_XTYPE_XAVP:
result = snprintf(_pv_xavp_buf, 128, "<<xavp:%p>>", avp->val.v.xavp);
break;
case SR_XTYPE_DATA:
result = snprintf(_pv_xavp_buf, 128, "<<data:%p>>", avp->val.v.data);
break;
default:
LM_WARN("unknown data type\n");
*jobj = srjson_CreateNull(jdoc);
}
if(result<0)
{
LM_ERR("cannot convert to str\n");
*jobj = srjson_CreateNull(jdoc);
}
else if(*jobj==NULL)
{
*jobj = srjson_CreateStr(jdoc, _pv_xavp_buf, 128);
}
}
int _cfgt_get_array_avp_vals(struct sip_msg *msg,
pv_param_t *param, srjson_doc_t *jdoc, srjson_t **jobj,
str *item_name)
{
struct usr_avp *avp;
unsigned short name_type;
int_str avp_name;
int_str avp_value;
struct search_state state;
srjson_t *jobjt;
memset(&state, 0, sizeof(struct search_state));
if(pv_get_avp_name(msg, param, &avp_name, &name_type)!=0)
{
LM_ERR("invalid name\n");
return -1;
}
*jobj = srjson_CreateArray(jdoc);
if(*jobj==NULL)
{
LM_ERR("cannot create json object\n");
return -1;
}
if ((avp=search_first_avp(name_type, avp_name, &avp_value, &state))==0)
{
goto ok;
}
do
{
if(avp->flags & AVP_VAL_STR)
{
jobjt = srjson_CreateStr(jdoc, avp_value.s.s, avp_value.s.len);
if(jobjt==NULL)
{
LM_ERR("cannot create json object\n");
return -1;
}
} else {
jobjt = srjson_CreateNumber(jdoc, avp_value.n);
if(jobjt==NULL)
{
LM_ERR("cannot create json object\n");
return -1;
}
}
srjson_AddItemToArray(jdoc, *jobj, jobjt);
} while ((avp=search_next_avp(&state, &avp_value))!=0);
ok:
item_name->s = avp_name.s.s;
item_name->len = avp_name.s.len;
return 0;
}
/** Converts the variables provided in parameter ap according to formatting
* string provided in parameter fmt into HTML format.
*
* This function takes the parameters provided in ap parameter and creates
* HTML formatted parameters that will be put in the html document.
* The format of input parameters is described in formatting string
* fmt which follows the syntax of the management API. In the case of
* an error the function will generate an error reply in err_reply parameter
* instead.
* @param ctx An error reply document will be generated here if the
* function encounters a problem while processing input
* parameters.
* @param fmt Formatting string of the management API.
* @param ap A pointer to the array of input parameters.
*
*/
static srjson_t* jsonrpc_print_value(jsonrpc_ctx_t* ctx, char fmt, va_list* ap)
{
srjson_t *nj = NULL;
char buf[JSONRPC_PRINT_VALUE_BUF_LEN];
time_t dt;
struct tm* t;
str *sp;
switch(fmt) {
case 'd':
nj = srjson_CreateNumber(ctx->jrpl, va_arg(*ap, int));
break;
case 'u':
nj = srjson_CreateNumber(ctx->jrpl, va_arg(*ap, unsigned int));
break;
case 'f':
nj = srjson_CreateNumber(ctx->jrpl, va_arg(*ap, double));
break;
case 'b':
nj = srjson_CreateBool(ctx->jrpl, ((va_arg(*ap, int)==0)?0:1));
break;
case 't':
dt = va_arg(*ap, time_t);
t = gmtime(&dt);
if (strftime(buf, JSONRPC_PRINT_VALUE_BUF_LEN,
"%Y%m%dT%H:%M:%S", t) == 0) {
LM_ERR("Error while converting time\n");
return NULL;
}
nj = srjson_CreateString(ctx->jrpl, buf);
break;
case 's':
nj = srjson_CreateString(ctx->jrpl, va_arg(*ap, char*));
break;
case 'S':
sp = va_arg(*ap, str*);
nj = srjson_CreateStr(ctx->jrpl, sp->s, sp->len);
break;
default:
LM_ERR("Invalid formatting character [%c]\n", fmt);
return NULL;
}
return nj;
}
int cfgt_get_json(struct sip_msg* msg, unsigned int mask, srjson_doc_t *jdoc,
srjson_t *head)
{
int i;
pv_value_t value;
pv_cache_t **_pv_cache = pv_cache_get_table();
pv_cache_t *el = NULL;
srjson_t *jobj = NULL;
str item_name = STR_NULL;
static char iname[128];
if(_pv_cache==NULL)
{
LM_ERR("cannot access pv_cache\n");
return -1;
}
if(jdoc==NULL){
LM_ERR("jdoc is null\n");
return -1;
}
if(head==NULL){
LM_ERR("head is null\n");
return -1;
}
memset(_cfgt_xavp_dump, 0, sizeof(str*)*CFGT_XAVP_DUMP_SIZE);
for(i=0;i<PV_CACHE_SIZE;i++)
{
el = _pv_cache[i];
while(el)
{
if(!(el->spec.type==PVT_AVP||
el->spec.type==PVT_SCRIPTVAR||
el->spec.type==PVT_XAVP||
el->spec.type==PVT_OTHER)||
!((el->spec.type==PVT_AVP&&mask&CFGT_DP_AVP)||
(el->spec.type==PVT_XAVP&&mask&CFGT_DP_XAVP)||
(el->spec.type==PVT_SCRIPTVAR&&mask&CFGT_DP_SCRIPTVAR)||
(el->spec.type==PVT_OTHER&&mask&CFGT_DP_OTHER))||
(el->spec.trans!=NULL))
{
el = el->next;
continue;
}
jobj = NULL;
item_name.len = 0;
item_name.s = 0;
iname[0] = '\0';
if(el->spec.type==PVT_AVP)
{
if(el->spec.pvp.pvi.type==PV_IDX_ALL||
(el->spec.pvp.pvi.type==PV_IDX_INT&&el->spec.pvp.pvi.u.ival!=0))
{
el = el->next;
continue;
}
else
{
if(_cfgt_get_array_avp_vals(msg, &el->spec.pvp, jdoc, &jobj, &item_name)!=0)
{
LM_WARN("can't get value[%.*s]\n", el->pvname.len, el->pvname.s);
el = el->next;
continue;
}
if(srjson_GetArraySize(jdoc, jobj)==0 && !(mask&CFGT_DP_NULL))
{
el = el->next;
continue;
}
snprintf(iname, 128, "$avp(%.*s)", item_name.len, item_name.s);
}
}
else if(el->spec.type==PVT_XAVP)
{
if(_cfgt_xavp_dump_lookup(&el->spec.pvp)!=0)
{
el = el->next;
continue;
}
if(_cfgt_get_obj_xavp_vals(msg, &el->spec.pvp, jdoc, &jobj, &item_name)!=0)
{
LM_WARN("can't get value[%.*s]\n", el->pvname.len, el->pvname.s);
el = el->next;
continue;
}
if(srjson_GetArraySize(jdoc, jobj)==0 && !(mask&CFGT_DP_NULL))
{
el = el->next;
continue;
}
snprintf(iname, 128, "$xavp(%.*s)", item_name.len, item_name.s);
}
else
{
if(pv_get_spec_value(msg, &el->spec, &value)!=0)
{
LM_WARN("can't get value[%.*s]\n", el->pvname.len, el->pvname.s);
el = el->next;
continue;
}
if(value.flags&(PV_VAL_NULL|PV_VAL_EMPTY|PV_VAL_NONE))
{
if(mask&CFGT_DP_NULL)
{
jobj = srjson_CreateNull(jdoc);
}
else
{
el = el->next;
continue;
}
}else if(value.flags&(PV_VAL_INT)){
jobj = srjson_CreateNumber(jdoc, value.ri);
}else if(value.flags&(PV_VAL_STR)){
jobj = srjson_CreateStr(jdoc, value.rs.s, value.rs.len);
}else {
LM_WARN("el->pvname[%.*s] value[%d] unhandled\n", el->pvname.len, el->pvname.s,
value.flags);
el = el->next;
continue;
}
if(jobj==NULL)
{
LM_ERR("el->pvname[%.*s] empty json object\n", el->pvname.len,
el->pvname.s);
goto error;
}
snprintf(iname, 128, "%.*s", el->pvname.len, el->pvname.s);
}
if(jobj!=NULL)
{
srjson_AddItemToObject(jdoc, head, iname, jobj);
}
el = el->next;
}
}
return 0;
error:
srjson_Delete(jdoc, head);
return -1;
}
/**
* json serialization of dialog profiles
*/
int dlg_profiles_to_json(dlg_cell_t *dlg, srjson_doc_t *jdoc)
{
dlg_profile_link_t *l;
srjson_t *sj = NULL;
srjson_t *dj = NULL;
LM_DBG("serializing profiles for dlg[%u:%u]\n",
dlg->h_entry, dlg->h_id);
if(dlg==NULL || dlg->profile_links==NULL)
return -1;
LM_DBG("start of serializing profiles for dlg[%u:%u]\n",
dlg->h_entry, dlg->h_id);
for (l = dlg->profile_links ; l ; l=l->next) {
if(l->profile->has_value)
{
if(dj==NULL)
{
dj = srjson_CreateObject(jdoc);
if(dj==NULL)
{
LM_ERR("cannot create json dynamic profiles obj\n");
goto error;
}
}
srjson_AddStrStrToObject(jdoc, dj,
l->profile->name.s, l->profile->name.len,
l->hash_linker.value.s, l->hash_linker.value.len);
} else {
if(sj==NULL)
{
sj = srjson_CreateArray(jdoc);
if(sj==NULL)
{
LM_ERR("cannot create json static profiles obj\n");
goto error;
}
}
srjson_AddItemToArray(jdoc, sj,
srjson_CreateStr(jdoc, l->profile->name.s, l->profile->name.len));
}
}
if(jdoc->root==NULL)
{
jdoc->root = srjson_CreateObject(jdoc);
if(jdoc->root==NULL)
{
LM_ERR("cannot create json root\n");
goto error;
}
}
if(dj!=NULL)
srjson_AddItemToObject(jdoc, jdoc->root, "dprofiles", dj);
if(sj!=NULL)
srjson_AddItemToObject(jdoc, jdoc->root, "sprofiles", sj);
if(jdoc->buf.s != NULL)
{
jdoc->free_fn(jdoc->buf.s);
jdoc->buf.s = NULL;
jdoc->buf.len = 0;
}
jdoc->buf.s = srjson_PrintUnformatted(jdoc, jdoc->root);
if(jdoc->buf.s!=NULL)
{
jdoc->buf.len = strlen(jdoc->buf.s);
LM_DBG("serialized profiles for dlg[%u:%u] = [[%.*s]]\n",
dlg->h_entry, dlg->h_id, jdoc->buf.len, jdoc->buf.s);
return 0;
}
return -1;
error:
srjson_Delete(jdoc, dj);
srjson_Delete(jdoc, sj);
return -1;
}
int dbg_dump_json(struct sip_msg* msg, unsigned int mask, int level)
{
int i;
pv_value_t value;
pv_cache_t **_pv_cache = pv_cache_get_table();
pv_cache_t *el = NULL;
srjson_doc_t jdoc;
srjson_t *jobj = NULL;
char *output = NULL;
str item_name = STR_NULL;
static char iname[128];
int result = -1;
if(_pv_cache==NULL)
{
LM_ERR("cannot access pv_cache\n");
return -1;
}
memset(_dbg_xavp_dump, 0, sizeof(str*)*DBG_XAVP_DUMP_SIZE);
srjson_InitDoc(&jdoc, NULL);
if(jdoc.root==NULL)
{
jdoc.root = srjson_CreateObject(&jdoc);
if(jdoc.root==NULL)
{
LM_ERR("cannot create json root\n");
goto error;
}
}
for(i=0;i<PV_CACHE_SIZE;i++)
{
el = _pv_cache[i];
while(el)
{
if(!(el->spec.type==PVT_AVP||
el->spec.type==PVT_SCRIPTVAR||
el->spec.type==PVT_XAVP||
el->spec.type==PVT_OTHER)||
!((el->spec.type==PVT_AVP&&mask&DBG_DP_AVP)||
(el->spec.type==PVT_XAVP&&mask&DBG_DP_XAVP)||
(el->spec.type==PVT_SCRIPTVAR&&mask&DBG_DP_SCRIPTVAR)||
(el->spec.type==PVT_OTHER&&mask&DBG_DP_OTHER))||
(el->spec.trans!=NULL))
{
el = el->next;
continue;
}
jobj = NULL;
item_name.len = 0;
item_name.s = 0;
iname[0] = '\0';
if(el->spec.type==PVT_AVP)
{
if(el->spec.pvp.pvi.type==PV_IDX_ALL||
(el->spec.pvp.pvi.type==PV_IDX_INT&&el->spec.pvp.pvi.u.ival!=0))
{
el = el->next;
continue;
}
else
{
if(_dbg_get_array_avp_vals(msg, &el->spec.pvp, &jdoc, &jobj, &item_name)!=0)
{
LM_WARN("can't get value[%.*s]\n", el->pvname.len, el->pvname.s);
el = el->next;
continue;
}
if(srjson_GetArraySize(&jdoc, jobj)==0 && !(mask&DBG_DP_NULL))
{
el = el->next;
continue;
}
snprintf(iname, 128, "$avp(%.*s)", item_name.len, item_name.s);
}
}
else if(el->spec.type==PVT_XAVP)
{
if(_dbg_xavp_dump_lookup(&el->spec.pvp)!=0)
{
el = el->next;
continue;
}
if(_dbg_get_obj_xavp_vals(msg, &el->spec.pvp, &jdoc, &jobj, &item_name)!=0)
{
LM_WARN("can't get value[%.*s]\n", el->pvname.len, el->pvname.s);
el = el->next;
continue;
}
if(srjson_GetArraySize(&jdoc, jobj)==0 && !(mask&DBG_DP_NULL))
{
el = el->next;
continue;
}
snprintf(iname, 128, "$xavp(%.*s)", item_name.len, item_name.s);
}
else
{
if(pv_get_spec_value(msg, &el->spec, &value)!=0)
{
LM_WARN("can't get value[%.*s]\n", el->pvname.len, el->pvname.s);
el = el->next;
continue;
}
if(value.flags&(PV_VAL_NULL|PV_VAL_EMPTY|PV_VAL_NONE))
{
if(mask&DBG_DP_NULL)
{
jobj = srjson_CreateNull(&jdoc);
}
else
{
el = el->next;
continue;
}
}else if(value.flags&(PV_VAL_INT)){
jobj = srjson_CreateNumber(&jdoc, value.ri);
}else if(value.flags&(PV_VAL_STR)){
jobj = srjson_CreateStr(&jdoc, value.rs.s, value.rs.len);
}else {
LM_WARN("el->pvname[%.*s] value[%d] unhandled\n", el->pvname.len, el->pvname.s,
value.flags);
el = el->next;
continue;
}
if(jobj==NULL)
{
LM_ERR("el->pvname[%.*s] empty json object\n", el->pvname.len,
el->pvname.s);
goto error;
}
snprintf(iname, 128, "%.*s", el->pvname.len, el->pvname.s);
}
if(jobj!=NULL)
{
srjson_AddItemToObject(&jdoc, jdoc.root, iname, jobj);
}
el = el->next;
}
}
output = srjson_PrintUnformatted(&jdoc, jdoc.root);
if(output==NULL)
{
LM_ERR("cannot print json doc\n");
goto error;
}
LOG(level, "%s\n", output);
result = 0;
error:
if(output!=NULL) jdoc.free_fn(output);
srjson_DestroyDoc(&jdoc);
return result;
}