From f3ab456a17af1c89a6e3be4d20c5944853df1cb0 Mon Sep 17 00:00:00 2001 From: "David M. Lee" Date: Mon, 7 Jan 2013 14:24:28 -0600 Subject: Import pjproject-2.0.1 --- pjsip/src/pjsip-simple/presence_body.c | 288 +++++++++++++++++++++++++++++++++ 1 file changed, 288 insertions(+) create mode 100644 pjsip/src/pjsip-simple/presence_body.c (limited to 'pjsip/src/pjsip-simple/presence_body.c') diff --git a/pjsip/src/pjsip-simple/presence_body.c b/pjsip/src/pjsip-simple/presence_body.c new file mode 100644 index 0000000..e692f47 --- /dev/null +++ b/pjsip/src/pjsip-simple/presence_body.c @@ -0,0 +1,288 @@ +/* $Id: presence_body.c 3553 2011-05-05 06:14:19Z nanang $ */ +/* + * Copyright (C) 2008-2011 Teluu Inc. (http://www.teluu.com) + * Copyright (C) 2003-2008 Benny Prijono + * + * This program 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. + * + * This program 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ +#include +#include +#include +#include +#include +#include +#include +#include +#include + + +#define THIS_FILE "presence_body.c" + + +static const pj_str_t STR_APPLICATION = { "application", 11 }; +static const pj_str_t STR_PIDF_XML = { "pidf+xml", 8 }; +static const pj_str_t STR_XPIDF_XML = { "xpidf+xml", 9 }; + + + + +/* + * Function to print XML message body. + */ +static int pres_print_body(struct pjsip_msg_body *msg_body, + char *buf, pj_size_t size) +{ + return pj_xml_print((const pj_xml_node*)msg_body->data, buf, size, + PJ_TRUE); +} + + +/* + * Function to clone XML document. + */ +static void* xml_clone_data(pj_pool_t *pool, const void *data, unsigned len) +{ + PJ_UNUSED_ARG(len); + return pj_xml_clone( pool, (const pj_xml_node*) data); +} + + +/* + * This is a utility function to create PIDF message body from PJSIP + * presence status (pjsip_pres_status). + */ +PJ_DEF(pj_status_t) pjsip_pres_create_pidf( pj_pool_t *pool, + const pjsip_pres_status *status, + const pj_str_t *entity, + pjsip_msg_body **p_body ) +{ + pjpidf_pres *pidf; + pjsip_msg_body *body; + unsigned i; + + /* Create . */ + pidf = pjpidf_create(pool, entity); + + /* Create */ + for (i=0; iinfo_cnt; ++i) { + + pjpidf_tuple *pidf_tuple; + pjpidf_status *pidf_status; + pj_str_t id; + + /* Add tuple id. */ + if (status->info[i].id.slen == 0) { + /* xs:ID must start with letter */ + //pj_create_unique_string(pool, &id); + id.ptr = (char*)pj_pool_alloc(pool, PJ_GUID_STRING_LENGTH+2); + id.ptr += 2; + pj_generate_unique_string(&id); + id.ptr -= 2; + id.ptr[0] = 'p'; + id.ptr[1] = 'j'; + id.slen += 2; + } else { + id = status->info[i].id; + } + + pidf_tuple = pjpidf_pres_add_tuple(pool, pidf, &id); + + /* Set */ + if (status->info[i].contact.slen) + pjpidf_tuple_set_contact(pool, pidf_tuple, + &status->info[i].contact); + + + /* Set basic status */ + pidf_status = pjpidf_tuple_get_status(pidf_tuple); + pjpidf_status_set_basic_open(pidf_status, + status->info[i].basic_open); + + /* Add if configured */ +#if defined(PJSIP_PRES_PIDF_ADD_TIMESTAMP) && PJSIP_PRES_PIDF_ADD_TIMESTAMP + if (PJSIP_PRES_PIDF_ADD_TIMESTAMP) { + char buf[50]; + int tslen = 0; + pj_time_val tv; + pj_parsed_time pt; + + pj_gettimeofday(&tv); + /* TODO: convert time to GMT! (unsupported by pjlib) */ + pj_time_decode( &tv, &pt); + + tslen = pj_ansi_snprintf(buf, sizeof(buf), + "%04d-%02d-%02dT%02d:%02d:%02d.%03dZ", + pt.year, pt.mon+1, pt.day, + pt.hour, pt.min, pt.sec, pt.msec); + if (tslen > 0 && tslen < (int)sizeof(buf)) { + pj_str_t time = pj_str(buf); + pjpidf_tuple_set_timestamp(pool, pidf_tuple, &time); + } + } +#endif + } + + /* Create (RPID) */ + if (status->info_cnt) { + pjrpid_add_element(pidf, pool, 0, &status->info[0].rpid); + } + + body = PJ_POOL_ZALLOC_T(pool, pjsip_msg_body); + body->data = pidf; + body->content_type.type = STR_APPLICATION; + body->content_type.subtype = STR_PIDF_XML; + body->print_body = &pres_print_body; + body->clone_data = &xml_clone_data; + + *p_body = body; + + return PJ_SUCCESS; +} + + +/* + * This is a utility function to create X-PIDF message body from PJSIP + * presence status (pjsip_pres_status). + */ +PJ_DEF(pj_status_t) pjsip_pres_create_xpidf( pj_pool_t *pool, + const pjsip_pres_status *status, + const pj_str_t *entity, + pjsip_msg_body **p_body ) +{ + /* Note: PJSIP implementation of XPIDF is not complete! + */ + pjxpidf_pres *xpidf; + pjsip_msg_body *body; + + PJ_LOG(4,(THIS_FILE, "Warning: XPIDF format is not fully supported " + "by PJSIP")); + + /* Create XPIDF document. */ + xpidf = pjxpidf_create(pool, entity); + + /* Set basic status. */ + if (status->info_cnt > 0) + pjxpidf_set_status( xpidf, status->info[0].basic_open); + else + pjxpidf_set_status( xpidf, PJ_FALSE); + + body = PJ_POOL_ZALLOC_T(pool, pjsip_msg_body); + body->data = xpidf; + body->content_type.type = STR_APPLICATION; + body->content_type.subtype = STR_XPIDF_XML; + body->print_body = &pres_print_body; + body->clone_data = &xml_clone_data; + + *p_body = body; + + return PJ_SUCCESS; +} + + + +/* + * This is a utility function to parse PIDF body into PJSIP presence status. + */ +PJ_DEF(pj_status_t) pjsip_pres_parse_pidf( pjsip_rx_data *rdata, + pj_pool_t *pool, + pjsip_pres_status *pres_status) +{ + return pjsip_pres_parse_pidf2((char*)rdata->msg_info.msg->body->data, + rdata->msg_info.msg->body->len, + pool, pres_status); +} + +PJ_DEF(pj_status_t) pjsip_pres_parse_pidf2(char *body, unsigned body_len, + pj_pool_t *pool, + pjsip_pres_status *pres_status) +{ + pjpidf_pres *pidf; + pjpidf_tuple *pidf_tuple; + + pidf = pjpidf_parse(pool, body, body_len); + if (pidf == NULL) + return PJSIP_SIMPLE_EBADPIDF; + + pres_status->info_cnt = 0; + + pidf_tuple = pjpidf_pres_get_first_tuple(pidf); + while (pidf_tuple && pres_status->info_cnt < PJSIP_PRES_STATUS_MAX_INFO) { + pjpidf_status *pidf_status; + + pres_status->info[pres_status->info_cnt].tuple_node = + pj_xml_clone(pool, pidf_tuple); + + pj_strdup(pool, + &pres_status->info[pres_status->info_cnt].id, + pjpidf_tuple_get_id(pidf_tuple)); + + pj_strdup(pool, + &pres_status->info[pres_status->info_cnt].contact, + pjpidf_tuple_get_contact(pidf_tuple)); + + pidf_status = pjpidf_tuple_get_status(pidf_tuple); + if (pidf_status) { + pres_status->info[pres_status->info_cnt].basic_open = + pjpidf_status_is_basic_open(pidf_status); + } else { + pres_status->info[pres_status->info_cnt].basic_open = PJ_FALSE; + } + + pidf_tuple = pjpidf_pres_get_next_tuple( pidf, pidf_tuple ); + pres_status->info_cnt++; + } + + /* Parse (RPID) */ + pjrpid_get_element(pidf, pool, &pres_status->info[0].rpid); + + return PJ_SUCCESS; +} + + +/* + * This is a utility function to parse X-PIDF body into PJSIP presence status. + */ +PJ_DEF(pj_status_t) pjsip_pres_parse_xpidf(pjsip_rx_data *rdata, + pj_pool_t *pool, + pjsip_pres_status *pres_status) +{ + return pjsip_pres_parse_xpidf2((char*)rdata->msg_info.msg->body->data, + rdata->msg_info.msg->body->len, + pool, pres_status); +} + +PJ_DEF(pj_status_t) pjsip_pres_parse_xpidf2(char *body, unsigned body_len, + pj_pool_t *pool, + pjsip_pres_status *pres_status) +{ + pjxpidf_pres *xpidf; + + xpidf = pjxpidf_parse(pool, body, body_len); + if (xpidf == NULL) + return PJSIP_SIMPLE_EBADXPIDF; + + pres_status->info_cnt = 1; + + pj_strdup(pool, + &pres_status->info[0].contact, + pjxpidf_get_uri(xpidf)); + pres_status->info[0].basic_open = pjxpidf_get_status(xpidf); + pres_status->info[0].id.slen = 0; + pres_status->info[0].tuple_node = NULL; + + return PJ_SUCCESS; +} + + -- cgit v1.2.3