static void parse_media(pj_scanner *scanner, pjmedia_sdp_media *med,
parse_context *ctx)
{
pj_str_t str;
ctx->last_error = PJMEDIA_SDP_EINMEDIA;
/* check the equal sign */
if (*(scanner->curptr+1) != '=') {
on_scanner_error(scanner);
return;
}
/* m= */
pj_scan_advance_n(scanner, 2, SKIP_WS);
/* type */
pj_scan_get_until_ch(scanner, ' ', &med->desc.media);
pj_scan_get_char(scanner);
/* port */
pj_scan_get(scanner, &cs_token, &str);
med->desc.port = (unsigned short)pj_strtoul(&str);
if (*scanner->curptr == '/') {
/* port count */
pj_scan_get_char(scanner);
pj_scan_get(scanner, &cs_token, &str);
med->desc.port_count = pj_strtoul(&str);
} else {
med->desc.port_count = 0;
}
if (pj_scan_get_char(scanner) != ' ') {
PJ_THROW(SYNTAX_ERROR);
}
/* transport */
pj_scan_get_until_ch(scanner, ' ', &med->desc.transport);
/* format list */
med->desc.fmt_count = 0;
while (*scanner->curptr == ' ') {
pj_scan_get_char(scanner);
/* Check again for the end of the line */
if ((*scanner->curptr == '\r') || (*scanner->curptr == '\n'))
break;
pj_scan_get(scanner, &cs_token, &med->desc.fmt[med->desc.fmt_count++]);
}
/* We've got what we're looking for, skip anything until newline */
pj_scan_skip_line(scanner);
}
/*
* Parse Replaces header.
*/
static pjsip_hdr *parse_hdr_replaces(pjsip_parse_ctx *ctx)
{
pjsip_replaces_hdr *hdr = pjsip_replaces_hdr_create(ctx->pool);
const pj_str_t to_tag = { "to-tag", 6 };
const pj_str_t from_tag = { "from-tag", 8 };
const pj_str_t early_only_tag = { "early-only", 10 };
/*pj_scan_get(ctx->scanner, &pjsip_TOKEN_SPEC, &hdr->call_id);*/
/* Get Call-ID (until ';' is found). using pjsip_TOKEN_SPEC doesn't work
* because it stops parsing when '@' character is found.
*/
pj_scan_get_until_ch(ctx->scanner, ';', &hdr->call_id);
while (*ctx->scanner->curptr == ';') {
pj_str_t pname, pvalue;
pj_scan_get_char(ctx->scanner);
pjsip_parse_param_imp(ctx->scanner, ctx->pool, &pname, &pvalue, 0);
if (pj_stricmp(&pname, &to_tag)==0) {
hdr->to_tag = pvalue;
} else if (pj_stricmp(&pname, &from_tag)==0) {
hdr->from_tag = pvalue;
} else if (pj_stricmp(&pname, &early_only_tag)==0) {
hdr->early_only = PJ_TRUE;
} else {
pjsip_param *param = PJ_POOL_ALLOC_T(ctx->pool, pjsip_param);
param->name = pname;
param->value = pvalue;
pj_list_push_back(&hdr->other_param, param);
}
}
pjsip_parse_end_hdr_imp( ctx->scanner );
return (pjsip_hdr*)hdr;
}
static void parse_time(pj_scanner *scanner, pjmedia_sdp_session *ses,
parse_context *ctx)
{
pj_str_t str;
ctx->last_error = PJMEDIA_SDP_EINTIME;
/* check equal sign */
if (*(scanner->curptr+1) != '=') {
on_scanner_error(scanner);
return;
}
/* t= */
pj_scan_advance_n(scanner, 2, SKIP_WS);
/* start time */
pj_scan_get_until_ch(scanner, ' ', &str);
ses->time.start = pj_strtoul(&str);
pj_scan_get_char(scanner);
/* stop time */
pj_scan_get_until_chr(scanner, " \t\r", &str);
ses->time.stop = pj_strtoul(&str);
/* We've got what we're looking for, skip anything until newline */
pj_scan_skip_line(scanner);
}
static void parse_origin(pj_scanner *scanner, pjmedia_sdp_session *ses,
parse_context *ctx)
{
pj_str_t str;
ctx->last_error = PJMEDIA_SDP_EINORIGIN;
/* check equal sign */
if (*(scanner->curptr+1) != '=') {
on_scanner_error(scanner);
return;
}
/* o= */
pj_scan_advance_n(scanner, 2, SKIP_WS);
/* username. */
pj_scan_get_until_ch(scanner, ' ', &ses->origin.user);
pj_scan_get_char(scanner);
/* id */
pj_scan_get_until_ch(scanner, ' ', &str);
ses->origin.id = pj_strtoul(&str);
pj_scan_get_char(scanner);
/* version */
pj_scan_get_until_ch(scanner, ' ', &str);
ses->origin.version = pj_strtoul(&str);
pj_scan_get_char(scanner);
/* network-type */
pj_scan_get_until_ch(scanner, ' ', &ses->origin.net_type);
pj_scan_get_char(scanner);
/* addr-type */
pj_scan_get_until_ch(scanner, ' ', &ses->origin.addr_type);
pj_scan_get_char(scanner);
/* address */
pj_scan_get_until_chr(scanner, " \t\r", &ses->origin.addr);
/* We've got what we're looking for, skip anything until newline */
pj_scan_skip_line(scanner);
}
static void parse_connection_info(pj_scanner *scanner, pjmedia_sdp_conn *conn,
parse_context *ctx)
{
ctx->last_error = PJMEDIA_SDP_EINCONN;
/* c= */
pj_scan_advance_n(scanner, 2, SKIP_WS);
/* network-type */
pj_scan_get_until_ch(scanner, ' ', &conn->net_type);
pj_scan_get_char(scanner);
/* addr-type */
pj_scan_get_until_ch(scanner, ' ', &conn->addr_type);
pj_scan_get_char(scanner);
/* address. */
pj_scan_get_until_chr(scanner, " \t\r", &conn->addr);
/* We've got what we're looking for, skip anything until newline */
pj_scan_skip_line(scanner);
}
static pjmedia_sdp_attr *parse_attr( pj_pool_t *pool, pj_scanner *scanner,
parse_context *ctx)
{
pjmedia_sdp_attr *attr;
ctx->last_error = PJMEDIA_SDP_EINATTR;
attr = pj_pool_alloc(pool, sizeof(pjmedia_sdp_attr));
/* check equal sign */
if (*(scanner->curptr+1) != '=') {
on_scanner_error(scanner);
return NULL;
}
/* skip a= */
pj_scan_advance_n(scanner, 2, SKIP_WS);
/* get attr name. */
pj_scan_get(scanner, &cs_token, &attr->name);
if (*scanner->curptr != '\r' && *scanner->curptr != '\n') {
/* skip ':' if present. */
if (*scanner->curptr == ':')
pj_scan_get_char(scanner);
/* get value */
if (*scanner->curptr != '\r') {
pj_scan_get_until_ch(scanner, '\r', &attr->value);
} else {
attr->value.ptr = NULL;
attr->value.slen = 0;
}
} else {
attr->value.ptr = NULL;
attr->value.slen = 0;
}
/* We've got what we're looking for, skip anything until newline */
pj_scan_skip_line(scanner);
return attr;
}
static void parse_generic_line(pj_scanner *scanner, pj_str_t *str,
parse_context *ctx)
{
ctx->last_error = PJMEDIA_SDP_EINSDP;
/* check equal sign */
if (*(scanner->curptr+1) != '=') {
on_scanner_error(scanner);
return;
}
/* x= */
pj_scan_advance_n(scanner, 2, SKIP_WS);
/* get anything until newline (including whitespaces). */
pj_scan_get_until_ch(scanner, '\r', str);
/* newline. */
pj_scan_get_newline(scanner);
}
static void parse_bandwidth_info(pj_scanner *scanner, pjmedia_sdp_bandw *bandw,
parse_context *ctx)
{
pj_str_t str;
ctx->last_error = PJMEDIA_SDP_EINBANDW;
/* b= */
pj_scan_advance_n(scanner, 2, SKIP_WS);
/* modifier */
pj_scan_get_until_ch(scanner, ':', &bandw->modifier);
pj_scan_get_char(scanner);
/* value */
pj_scan_get_until_chr(scanner, " \t\r\n", &str);
bandw->value = pj_strtoul(&str);
/* We've got what we're looking for, skip anything until newline */
pj_scan_skip_line(scanner);
}
/* This is a recursive function! */
static pj_xml_node *xml_parse_node( pj_pool_t *pool, pj_scanner *scanner)
{
pj_xml_node *node;
pj_str_t end_name;
PJ_CHECK_STACK();
if (*scanner->curptr != '<')
on_syntax_error(scanner);
/* Handle Processing Instructino (PI) construct (i.e. "<?") */
if (*scanner->curptr == '<' && *(scanner->curptr+1) == '?') {
pj_scan_advance_n(scanner, 2, PJ_FALSE);
for (;;) {
pj_str_t dummy;
pj_scan_get_until_ch(scanner, '?', &dummy);
if (*scanner->curptr=='?' && *(scanner->curptr+1)=='>') {
pj_scan_advance_n(scanner, 2, PJ_TRUE);
break;
} else {
pj_scan_advance_n(scanner, 1, PJ_FALSE);
}
}
return xml_parse_node(pool, scanner);
}
/* Handle comments construct (i.e. "<!") */
if (pj_scan_strcmp(scanner, "<!", 2) == 0) {
pj_scan_advance_n(scanner, 2, PJ_FALSE);
for (;;) {
pj_str_t dummy;
pj_scan_get_until_ch(scanner, '>', &dummy);
if (pj_scan_strcmp(scanner, ">", 1) == 0) {
pj_scan_advance_n(scanner, 1, PJ_TRUE);
break;
} else {
pj_scan_advance_n(scanner, 1, PJ_FALSE);
}
}
return xml_parse_node(pool, scanner);
}
/* Alloc node. */
node = alloc_node(pool);
/* Get '<' */
pj_scan_get_char(scanner);
/* Get node name. */
pj_scan_get_until_chr( scanner, " />\t", &node->name);
/* Get attributes. */
while (*scanner->curptr != '>' && *scanner->curptr != '/') {
pj_xml_attr *attr = alloc_attr(pool);
pj_scan_get_until_chr( scanner, "=> \t", &attr->name);
if (*scanner->curptr == '=') {
pj_scan_get_char( scanner );
pj_scan_get_quotes(scanner, "\"'", "\"'", 2, &attr->value);
/* remove quote characters */
++attr->value.ptr;
attr->value.slen -= 2;
}
pj_list_push_back( &node->attr_head, attr );
}
if (*scanner->curptr == '/') {
pj_scan_get_char(scanner);
if (pj_scan_get_char(scanner) != '>')
on_syntax_error(scanner);
return node;
}
/* Enclosing bracket. */
if (pj_scan_get_char(scanner) != '>')
on_syntax_error(scanner);
/* Sub nodes. */
while (*scanner->curptr == '<' && *(scanner->curptr+1) != '/') {
pj_xml_node *sub_node = xml_parse_node(pool, scanner);
pj_list_push_back( &node->node_head, sub_node );
}
/* Content. */
if (!pj_scan_is_eof(scanner) && *scanner->curptr != '<') {
pj_scan_get_until_ch(scanner, '<', &node->content);
}
/* Enclosing node. */
if (pj_scan_get_char(scanner) != '<' || pj_scan_get_char(scanner) != '/')
on_syntax_error(scanner);
pj_scan_get_until_chr(scanner, " \t>", &end_name);
/* Compare name. */
if (pj_stricmp(&node->name, &end_name) != 0)
on_syntax_error(scanner);
/* Enclosing '>' */
if (pj_scan_get_char(scanner) != '>')
on_syntax_error(scanner);
return node;
}
static pj_json_elem* parse_elem_throw(struct parse_state *st,
pj_json_elem *elem)
{
pj_str_t name = {NULL, 0}, value = {NULL, 0};
pj_str_t token;
if (!elem)
elem = pj_pool_alloc(st->pool, sizeof(*elem));
/* Parse name */
if (*st->scanner.curptr == '"') {
pj_scan_get_char(&st->scanner);
pj_scan_get_until_ch(&st->scanner, '"', &token);
pj_scan_get_char(&st->scanner);
if (*st->scanner.curptr == ':') {
pj_scan_get_char(&st->scanner);
name = token;
} else {
value = token;
}
}
if (value.slen) {
/* Element with string value and no name */
pj_json_elem_string(elem, &name, &value);
return elem;
}
/* Parse value */
if (pj_cis_match(&st->float_spec, *st->scanner.curptr) ||
*st->scanner.curptr == '-')
{
float val;
pj_bool_t neg = PJ_FALSE;
if (*st->scanner.curptr == '-') {
pj_scan_get_char(&st->scanner);
neg = PJ_TRUE;
}
pj_scan_get(&st->scanner, &st->float_spec, &token);
val = pj_strtof(&token);
if (neg) val = -val;
pj_json_elem_number(elem, &name, val);
} else if (*st->scanner.curptr == '"') {
unsigned err;
char *start = st->scanner.curptr;
err = parse_quoted_string(st, &token);
if (err) {
st->scanner.curptr = start + err;
return NULL;
}
pj_json_elem_string(elem, &name, &token);
} else if (pj_isalpha(*st->scanner.curptr)) {
if (pj_scan_strcmp(&st->scanner, "false", 5)==0) {
pj_json_elem_bool(elem, &name, PJ_FALSE);
pj_scan_advance_n(&st->scanner, 5, PJ_TRUE);
} else if (pj_scan_strcmp(&st->scanner, "true", 4)==0) {
pj_json_elem_bool(elem, &name, PJ_TRUE);
pj_scan_advance_n(&st->scanner, 4, PJ_TRUE);
} else if (pj_scan_strcmp(&st->scanner, "null", 4)==0) {
pj_json_elem_null(elem, &name);
pj_scan_advance_n(&st->scanner, 4, PJ_TRUE);
} else {
return NULL;
}
} else if (*st->scanner.curptr == '[') {
pj_json_elem_array(elem, &name);
if (parse_children(st, elem) != PJ_SUCCESS)
return NULL;
} else if (*st->scanner.curptr == '{') {
pj_json_elem_obj(elem, &name);
if (parse_children(st, elem) != PJ_SUCCESS)
return NULL;
} else {
return NULL;
}
return elem;
}
/**
* This method is to parse and add the command attribute to command structure.
**/
static pj_status_t add_cmd_node(pj_cli_t *cli,
pj_cli_cmd_spec *group,
pj_xml_node *xml_node,
pj_cli_cmd_handler handler,
pj_cli_cmd_spec **p_cmd,
pj_cli_get_dyn_choice get_choice)
{
pj_xml_node *root = xml_node;
pj_xml_attr *attr;
pj_xml_node *sub_node;
pj_cli_cmd_spec *cmd;
pj_cli_arg_spec args[PJ_CLI_MAX_ARGS];
pj_str_t sc[PJ_CLI_MAX_SHORTCUTS];
pj_status_t status = PJ_SUCCESS;
if (pj_stricmp2(&root->name, "CMD"))
return PJ_EINVAL;
/* Initialize the command spec */
cmd = PJ_POOL_ZALLOC_T(cli->pool, struct pj_cli_cmd_spec);
/* Get the command attributes */
attr = root->attr_head.next;
while (attr != &root->attr_head) {
if (!pj_stricmp2(&attr->name, "name")) {
pj_strltrim(&attr->value);
if (!attr->value.slen ||
cmd_name_exists(cli, group, &attr->value))
{
return PJ_CLI_EBADNAME;
}
pj_strdup(cli->pool, &cmd->name, &attr->value);
} else if (!pj_stricmp2(&attr->name, "id")) {
pj_bool_t is_valid = PJ_FALSE;
if (attr->value.slen) {
pj_cli_cmd_id cmd_id = pj_strtol(&attr->value);
if (!pj_hash_get(cli->cmd_id_hash, &cmd_id,
sizeof(pj_cli_cmd_id), NULL))
is_valid = PJ_TRUE;
}
if (!is_valid)
return PJ_CLI_EBADID;
cmd->id = (pj_cli_cmd_id)pj_strtol(&attr->value);
} else if (!pj_stricmp2(&attr->name, "sc")) {
pj_scanner scanner;
pj_str_t str;
PJ_USE_EXCEPTION;
pj_scan_init(&scanner, attr->value.ptr, attr->value.slen,
PJ_SCAN_AUTOSKIP_WS, &on_syntax_error);
PJ_TRY {
while (!pj_scan_is_eof(&scanner)) {
pj_scan_get_until_ch(&scanner, ',', &str);
pj_strrtrim(&str);
if (!pj_scan_is_eof(&scanner))
pj_scan_advance_n(&scanner, 1, PJ_TRUE);
if (!str.slen)
continue;
if (cmd->sc_cnt >= PJ_CLI_MAX_SHORTCUTS) {
PJ_THROW(PJ_CLI_ETOOMANYARGS);
}
/* Check whether the shortcuts are already used */
if (cmd_name_exists(cli, group, &str)) {
PJ_THROW(PJ_CLI_EBADNAME);
}
pj_strassign(&sc[cmd->sc_cnt++], &str);
}
}
PJ_CATCH_ANY {
pj_scan_fini(&scanner);
return (PJ_GET_EXCEPTION());
}
PJ_END;
} else if (!pj_stricmp2(&attr->name, "desc")) {
void get_until_ch(int until_ch, Pj_String *out)
{
pj_scan_get_until_ch(&scanner_, until_ch, out);
}