/* $Id$ */ /* * 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 #include #include PJ_DEF_DATA(const pjsip_method) pjsip_invite_method = { PJSIP_INVITE_METHOD, { "INVITE",6 }}; PJ_DEF_DATA(const pjsip_method) pjsip_cancel_method = { PJSIP_CANCEL_METHOD, { "CANCEL",6 }}; PJ_DEF_DATA(const pjsip_method) pjsip_ack_method = { PJSIP_ACK_METHOD, { "ACK",3}}; PJ_DEF_DATA(const pjsip_method) pjsip_bye_method = { PJSIP_BYE_METHOD, { "BYE",3}}; PJ_DEF_DATA(const pjsip_method) pjsip_register_method = { PJSIP_REGISTER_METHOD, { "REGISTER", 8}}; PJ_DEF_DATA(const pjsip_method) pjsip_options_method = { PJSIP_OPTIONS_METHOD, { "OPTIONS",7}}; /** INVITE method constant. */ PJ_DEF(const pjsip_method*) pjsip_get_invite_method(void) { return &pjsip_invite_method; } /** CANCEL method constant. */ PJ_DEF(const pjsip_method*) pjsip_get_cancel_method(void) { return &pjsip_cancel_method; } /** ACK method constant. */ PJ_DEF(const pjsip_method*) pjsip_get_ack_method(void) { return &pjsip_ack_method; } /** BYE method constant. */ PJ_DEF(const pjsip_method*) pjsip_get_bye_method(void) { return &pjsip_bye_method; } /** REGISTER method constant.*/ PJ_DEF(const pjsip_method*) pjsip_get_register_method(void) { return &pjsip_register_method; } /** OPTIONS method constant. */ PJ_DEF(const pjsip_method*) pjsip_get_options_method(void) { return &pjsip_options_method; } static const pj_str_t *method_names[] = { &pjsip_invite_method.name, &pjsip_cancel_method.name, &pjsip_ack_method.name, &pjsip_bye_method.name, &pjsip_register_method.name, &pjsip_options_method.name }; const pjsip_hdr_name_info_t pjsip_hdr_names[] = { { "Accept", 6, NULL }, // PJSIP_H_ACCEPT, { "Accept-Encoding", 15, NULL }, // PJSIP_H_ACCEPT_ENCODING, { "Accept-Language", 15, NULL }, // PJSIP_H_ACCEPT_LANGUAGE, { "Alert-Info", 10, NULL }, // PJSIP_H_ALERT_INFO, { "Allow", 5, NULL }, // PJSIP_H_ALLOW, { "Authentication-Info",19, NULL }, // PJSIP_H_AUTHENTICATION_INFO, { "Authorization", 13, NULL }, // PJSIP_H_AUTHORIZATION, { "Call-ID", 7, "i" }, // PJSIP_H_CALL_ID, { "Call-Info", 9, NULL }, // PJSIP_H_CALL_INFO, { "Contact", 7, "m" }, // PJSIP_H_CONTACT, { "Content-Disposition",19, NULL }, // PJSIP_H_CONTENT_DISPOSITION, { "Content-Encoding", 16, "e" }, // PJSIP_H_CONTENT_ENCODING, { "Content-Language", 16, NULL }, // PJSIP_H_CONTENT_LANGUAGE, { "Content-Length", 14, "l" }, // PJSIP_H_CONTENT_LENGTH, { "Content-Type", 12, "c" }, // PJSIP_H_CONTENT_TYPE, { "CSeq", 4, NULL }, // PJSIP_H_CSEQ, { "Date", 4, NULL }, // PJSIP_H_DATE, { "Error-Info", 10, NULL }, // PJSIP_H_ERROR_INFO, { "Expires", 7, NULL }, // PJSIP_H_EXPIRES, { "From", 4, "f" }, // PJSIP_H_FROM, { "In-Reply-To", 11, NULL }, // PJSIP_H_IN_REPLY_TO, { "Max-Forwards", 12, NULL }, // PJSIP_H_MAX_FORWARDS, { "MIME-Version", 12, NULL }, // PJSIP_H_MIME_VERSION, { "Min-Expires", 11, NULL }, // PJSIP_H_MIN_EXPIRES, { "Organization", 12, NULL }, // PJSIP_H_ORGANIZATION, { "Priority", 8, NULL }, // PJSIP_H_PRIORITY, { "Proxy-Authenticate", 18, NULL }, // PJSIP_H_PROXY_AUTHENTICATE, { "Proxy-Authorization",19, NULL }, // PJSIP_H_PROXY_AUTHORIZATION, { "Proxy-Require", 13, NULL }, // PJSIP_H_PROXY_REQUIRE, { "Record-Route", 12, NULL }, // PJSIP_H_RECORD_ROUTE, { "Reply-To", 8, NULL }, // PJSIP_H_REPLY_TO, { "Require", 7, NULL }, // PJSIP_H_REQUIRE, { "Retry-After", 11, NULL }, // PJSIP_H_RETRY_AFTER, { "Route", 5, NULL }, // PJSIP_H_ROUTE, { "Server", 6, NULL }, // PJSIP_H_SERVER, { "Subject", 7, "s" }, // PJSIP_H_SUBJECT, { "Supported", 9, "k" }, // PJSIP_H_SUPPORTED, { "Timestamp", 9, NULL }, // PJSIP_H_TIMESTAMP, { "To", 2, "t" }, // PJSIP_H_TO, { "Unsupported", 11, NULL }, // PJSIP_H_UNSUPPORTED, { "User-Agent", 10, NULL }, // PJSIP_H_USER_AGENT, { "Via", 3, "v" }, // PJSIP_H_VIA, { "Warning", 7, NULL }, // PJSIP_H_WARNING, { "WWW-Authenticate", 16, NULL }, // PJSIP_H_WWW_AUTHENTICATE, { "_Unknown-Header", 15, NULL }, // PJSIP_H_OTHER, }; static pj_str_t status_phrase[710]; static int print_media_type(char *buf, unsigned len, const pjsip_media_type *media); static int init_status_phrase() { unsigned i; pj_str_t default_reason_phrase = { "Default status message", 22}; for (i=0; iid = me; m->name = *method_names[me]; } PJ_DEF(void) pjsip_method_init_np(pjsip_method *m, pj_str_t *str) { unsigned i; for (i=0; iid = (pjsip_method_e)i; m->name = *method_names[i]; return; } } m->id = PJSIP_OTHER_METHOD; m->name = *str; } PJ_DEF(void) pjsip_method_copy( pj_pool_t *pool, pjsip_method *method, const pjsip_method *rhs ) { method->id = rhs->id; if (rhs->id != PJSIP_OTHER_METHOD) { method->name = rhs->name; } else { pj_strdup(pool, &method->name, &rhs->name); } } PJ_DEF(int) pjsip_method_cmp( const pjsip_method *m1, const pjsip_method *m2) { if (m1->id == m2->id) { if (m1->id != PJSIP_OTHER_METHOD) return 0; /* Method comparison is case sensitive! */ return pj_strcmp(&m1->name, &m2->name); } return ( m1->id < m2->id ) ? -1 : 1; } /////////////////////////////////////////////////////////////////////////////// /* * Message. */ PJ_DEF(pjsip_msg*) pjsip_msg_create( pj_pool_t *pool, pjsip_msg_type_e type) { pjsip_msg *msg = PJ_POOL_ALLOC_T(pool, pjsip_msg); pj_list_init(&msg->hdr); msg->type = type; msg->body = NULL; return msg; } PJ_DEF(pjsip_msg*) pjsip_msg_clone( pj_pool_t *pool, const pjsip_msg *src) { pjsip_msg *dst; const pjsip_hdr *sh; dst = pjsip_msg_create(pool, src->type); /* Clone request/status line */ if (src->type == PJSIP_REQUEST_MSG) { pjsip_method_copy(pool, &dst->line.req.method, &src->line.req.method); dst->line.req.uri = (pjsip_uri*) pjsip_uri_clone(pool, src->line.req.uri); } else { dst->line.status.code = src->line.status.code; pj_strdup(pool, &dst->line.status.reason, &src->line.status.reason); } /* Clone headers */ sh = src->hdr.next; while (sh != &src->hdr) { pjsip_hdr *dh = (pjsip_hdr*) pjsip_hdr_clone(pool, sh); pjsip_msg_add_hdr(dst, dh); sh = sh->next; } /* Clone message body */ if (src->body) { dst->body = pjsip_msg_body_clone(pool, src->body); } return dst; } PJ_DEF(void*) pjsip_msg_find_hdr( const pjsip_msg *msg, pjsip_hdr_e hdr_type, const void *start) { const pjsip_hdr *hdr=(const pjsip_hdr*) start, *end=&msg->hdr; if (hdr == NULL) { hdr = msg->hdr.next; } for (; hdr!=end; hdr = hdr->next) { if (hdr->type == hdr_type) return (void*)hdr; } return NULL; } PJ_DEF(void*) pjsip_msg_find_hdr_by_name( const pjsip_msg *msg, const pj_str_t *name, const void *start) { const pjsip_hdr *hdr=(const pjsip_hdr*)start, *end=&msg->hdr; if (hdr == NULL) { hdr = msg->hdr.next; } for (; hdr!=end; hdr = hdr->next) { if (pj_stricmp(&hdr->name, name) == 0) return (void*)hdr; } return NULL; } PJ_DEF(void*) pjsip_msg_find_hdr_by_names( const pjsip_msg *msg, const pj_str_t *name, const pj_str_t *sname, const void *start) { const pjsip_hdr *hdr=(const pjsip_hdr*)start, *end=&msg->hdr; if (hdr == NULL) { hdr = msg->hdr.next; } for (; hdr!=end; hdr = hdr->next) { if (pj_stricmp(&hdr->name, name) == 0) return (void*)hdr; if (pj_stricmp(&hdr->name, sname) == 0) return (void*)hdr; } return NULL; } PJ_DEF(void*) pjsip_msg_find_remove_hdr( pjsip_msg *msg, pjsip_hdr_e hdr_type, void *start) { pjsip_hdr *hdr = (pjsip_hdr*) pjsip_msg_find_hdr(msg, hdr_type, start); if (hdr) { pj_list_erase(hdr); } return hdr; } PJ_DEF(pj_ssize_t) pjsip_msg_print( const pjsip_msg *msg, char *buf, pj_size_t size) { char *p=buf, *end=buf+size; pj_ssize_t len; pjsip_hdr *hdr; pj_str_t clen_hdr = { "Content-Length: ", 16}; if (pjsip_cfg()->endpt.use_compact_form) { clen_hdr.ptr = "l: "; clen_hdr.slen = 3; } /* Get a wild guess on how many bytes are typically needed. * We'll check this later in detail, but this serves as a quick check. */ if (size < 256) return -1; /* Print request line or status line depending on message type */ if (msg->type == PJSIP_REQUEST_MSG) { pjsip_uri *uri; /* Add method. */ len = msg->line.req.method.name.slen; pj_memcpy(p, msg->line.req.method.name.ptr, len); p += len; *p++ = ' '; /* Add URI */ uri = (pjsip_uri*) pjsip_uri_get_uri(msg->line.req.uri); len = pjsip_uri_print( PJSIP_URI_IN_REQ_URI, uri, p, end-p); if (len < 1) return -1; p += len; /* Add ' SIP/2.0' */ if (end-p < 16) return -1; pj_memcpy(p, " SIP/2.0\r\n", 10); p += 10; } else { /* Add 'SIP/2.0 ' */ pj_memcpy(p, "SIP/2.0 ", 8); p += 8; /* Add status code. */ len = pj_utoa(msg->line.status.code, p); p += len; *p++ = ' '; /* Add reason text. */ len = msg->line.status.reason.slen; pj_memcpy(p, msg->line.status.reason.ptr, len ); p += len; /* Add newline. */ *p++ = '\r'; *p++ = '\n'; } /* Print each of the headers. */ for (hdr=msg->hdr.next; hdr!=&msg->hdr; hdr=hdr->next) { len = pjsip_hdr_print_on(hdr, p, end-p); if (len < 0) { if (len == -2) { PJ_LOG(5, ("sip_msg", "Header with no vptr encountered!! "\ "Current buffer: %.*s", (int)(p-buf), buf)); } return len; } if (len > 0) { p += len; if (p+3 >= end) return -1; *p++ = '\r'; *p++ = '\n'; } } /* Process message body. */ if (msg->body) { enum { CLEN_SPACE = 5 }; char *clen_pos = NULL; /* Automaticly adds Content-Type and Content-Length headers, only * if content_type is set in the message body. */ if (msg->body->content_type.type.slen) { pj_str_t ctype_hdr = { "Content-Type: ", 14}; const pjsip_media_type *media = &msg->body->content_type; if (pjsip_cfg()->endpt.use_compact_form) { ctype_hdr.ptr = "c: "; ctype_hdr.slen = 3; } /* Add Content-Type header. */ if ( (end-p) < 24 + media->type.slen + media->subtype.slen) { return -1; } pj_memcpy(p, ctype_hdr.ptr, ctype_hdr.slen); p += ctype_hdr.slen; p += print_media_type(p, (unsigned)(end-p), media); *p++ = '\r'; *p++ = '\n'; /* Add Content-Length header. */ if ((end-p) < clen_hdr.slen + 12 + 2) { return -1; } pj_memcpy(p, clen_hdr.ptr, clen_hdr.slen); p += clen_hdr.slen; /* Print blanks after "Content-Length:", this is where we'll put * the content length value after we know the length of the * body. */ pj_memset(p, ' ', CLEN_SPACE); clen_pos = p; p += CLEN_SPACE; *p++ = '\r'; *p++ = '\n'; } /* Add blank newline. */ *p++ = '\r'; *p++ = '\n'; /* Print the message body itself. */ len = (*msg->body->print_body)(msg->body, p, end-p); if (len < 0) { return -1; } p += len; /* Now that we have the length of the body, print this to the * Content-Length header. */ if (clen_pos) { char tmp[16]; len = pj_utoa((unsigned long)len, tmp); if (len > CLEN_SPACE) len = CLEN_SPACE; pj_memcpy(clen_pos+CLEN_SPACE-len, tmp, len); } } else { /* There's no message body. * Add Content-Length with zero value. */ if ((end-p) < clen_hdr.slen+8) { return -1; } pj_memcpy(p, clen_hdr.ptr, clen_hdr.slen); p += clen_hdr.slen; *p++ = ' '; *p++ = '0'; *p++ = '\r'; *p++ = '\n'; *p++ = '\r'; *p++ = '\n'; } *p = '\0'; return p-buf; } /////////////////////////////////////////////////////////////////////////////// PJ_DEF(void*) pjsip_hdr_clone( pj_pool_t *pool, const void *hdr_ptr ) { const pjsip_hdr *hdr = (const pjsip_hdr*) hdr_ptr; return (*hdr->vptr->clone)(pool, hdr_ptr); } PJ_DEF(void*) pjsip_hdr_shallow_clone( pj_pool_t *pool, const void *hdr_ptr ) { const pjsip_hdr *hdr = (const pjsip_hdr*) hdr_ptr; return (*hdr->vptr->shallow_clone)(pool, hdr_ptr); } PJ_DEF(int) pjsip_hdr_print_on( void *hdr_ptr, char *buf, pj_size_t len) { pjsip_hdr *hdr = (pjsip_hdr*) hdr_ptr; PJ_ASSERT_RETURN(hdr->vptr, -2); return (*hdr->vptr->print_on)(hdr_ptr, buf, len); } /////////////////////////////////////////////////////////////////////////////// /* * Status/Reason Phrase */ PJ_DEF(const pj_str_t*) pjsip_get_status_text(int code) { static int is_initialized; if (is_initialized == 0) { is_initialized = 1; init_status_phrase(); } return (code>=100 && code<(int)(sizeof(status_phrase)/sizeof(status_phrase[0]))) ? &status_phrase[code] : &status_phrase[0]; } /////////////////////////////////////////////////////////////////////////////// /* * Media type */ /* * Init media type. */ PJ_DEF(void) pjsip_media_type_init( pjsip_media_type *mt, pj_str_t *type, pj_str_t *subtype) { pj_bzero(mt, sizeof(*mt)); pj_list_init(&mt->param); if (type) mt->type = *type; if (subtype) mt->subtype = *subtype; } PJ_DEF(void) pjsip_media_type_init2( pjsip_media_type *mt, char *type, char *subtype) { pj_str_t s_type, s_subtype; if (type) { s_type = pj_str(type); } else { s_type.ptr = NULL; s_type.slen = 0; } if (subtype) { s_subtype = pj_str(subtype); } else { s_subtype.ptr = NULL; s_subtype.slen = 0; } pjsip_media_type_init(mt, &s_type, &s_subtype); } /* * Compare two media types. */ PJ_DEF(int) pjsip_media_type_cmp( const pjsip_media_type *mt1, const pjsip_media_type *mt2, pj_bool_t cmp_param) { int rc; PJ_ASSERT_RETURN(mt1 && mt2, 1); rc = pj_stricmp(&mt1->type, &mt2->type); if (rc) return rc; rc = pj_stricmp(&mt1->subtype, &mt2->subtype); if (rc) return rc; if (cmp_param) { rc = pjsip_param_cmp(&mt1->param, &mt2->param, (cmp_param==1)); } return rc; } PJ_DEF(void) pjsip_media_type_cp( pj_pool_t *pool, pjsip_media_type *dst, const pjsip_media_type *src) { PJ_ASSERT_ON_FAIL(pool && dst && src, return); pj_strdup(pool, &dst->type, &src->type); pj_strdup(pool, &dst->subtype, &src->subtype); pjsip_param_clone(pool, &dst->param, &src->param); } /////////////////////////////////////////////////////////////////////////////// /* * Generic pjsip_hdr_names/hvalue header. */ static int pjsip_generic_string_hdr_print( pjsip_generic_string_hdr *hdr, char *buf, pj_size_t size); static pjsip_generic_string_hdr* pjsip_generic_string_hdr_clone( pj_pool_t *pool, const pjsip_generic_string_hdr *hdr); static pjsip_generic_string_hdr* pjsip_generic_string_hdr_shallow_clone( pj_pool_t *pool, const pjsip_generic_string_hdr *hdr ); static pjsip_hdr_vptr generic_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_generic_string_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_generic_string_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_generic_string_hdr_print, }; PJ_DEF(void) pjsip_generic_string_hdr_init2(pjsip_generic_string_hdr *hdr, pj_str_t *hname, pj_str_t *hvalue) { init_hdr(hdr, PJSIP_H_OTHER, &generic_hdr_vptr); if (hname) { hdr->name = *hname; hdr->sname = *hname; } if (hvalue) { hdr->hvalue = *hvalue; } else { hdr->hvalue.ptr = NULL; hdr->hvalue.slen = 0; } } PJ_DEF(pjsip_generic_string_hdr*) pjsip_generic_string_hdr_init(pj_pool_t *pool, void *mem, const pj_str_t *hnames, const pj_str_t *hvalue) { pjsip_generic_string_hdr *hdr = (pjsip_generic_string_hdr*) mem; pj_str_t dup_hname, dup_hval; if (hnames) { pj_strdup(pool, &dup_hname, hnames); } else { dup_hname.slen = 0; } if (hvalue) { pj_strdup(pool, &dup_hval, hvalue); } else { dup_hval.slen = 0; } pjsip_generic_string_hdr_init2(hdr, &dup_hname, &dup_hval); return hdr; } PJ_DEF(pjsip_generic_string_hdr*) pjsip_generic_string_hdr_create(pj_pool_t *pool, const pj_str_t *hnames, const pj_str_t *hvalue) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_generic_string_hdr)); return pjsip_generic_string_hdr_init(pool, mem, hnames, hvalue); } static int pjsip_generic_string_hdr_print( pjsip_generic_string_hdr *hdr, char *buf, pj_size_t size) { char *p = buf; const pj_str_t *hname = pjsip_cfg()->endpt.use_compact_form? &hdr->sname : &hdr->name; if ((pj_ssize_t)size < hname->slen + hdr->hvalue.slen + 5) return -1; pj_memcpy(p, hname->ptr, hname->slen); p += hname->slen; *p++ = ':'; *p++ = ' '; pj_memcpy(p, hdr->hvalue.ptr, hdr->hvalue.slen); p += hdr->hvalue.slen; *p = '\0'; return (int)(p - buf); } static pjsip_generic_string_hdr* pjsip_generic_string_hdr_clone( pj_pool_t *pool, const pjsip_generic_string_hdr *rhs) { pjsip_generic_string_hdr *hdr; hdr = pjsip_generic_string_hdr_create(pool, &rhs->name, &rhs->hvalue); hdr->type = rhs->type; pj_strdup(pool, &hdr->sname, &rhs->sname); return hdr; } static pjsip_generic_string_hdr* pjsip_generic_string_hdr_shallow_clone( pj_pool_t *pool, const pjsip_generic_string_hdr *rhs ) { pjsip_generic_string_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_generic_string_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * Generic pjsip_hdr_names/integer value header. */ static int pjsip_generic_int_hdr_print( pjsip_generic_int_hdr *hdr, char *buf, pj_size_t size); static pjsip_generic_int_hdr* pjsip_generic_int_hdr_clone( pj_pool_t *pool, const pjsip_generic_int_hdr *hdr); static pjsip_generic_int_hdr* pjsip_generic_int_hdr_shallow_clone( pj_pool_t *pool, const pjsip_generic_int_hdr *hdr ); static pjsip_hdr_vptr generic_int_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_generic_int_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_generic_int_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_generic_int_hdr_print, }; PJ_DEF(pjsip_generic_int_hdr*) pjsip_generic_int_hdr_init( pj_pool_t *pool, void *mem, const pj_str_t *hnames, unsigned value) { pjsip_generic_int_hdr *hdr = (pjsip_generic_int_hdr*) mem; init_hdr(hdr, PJSIP_H_OTHER, &generic_int_hdr_vptr); if (hnames) { pj_strdup(pool, &hdr->name, hnames); hdr->sname = hdr->name; } hdr->ivalue = value; return hdr; } PJ_DEF(pjsip_generic_int_hdr*) pjsip_generic_int_hdr_create( pj_pool_t *pool, const pj_str_t *hnames, unsigned value) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_generic_int_hdr)); return pjsip_generic_int_hdr_init(pool, mem, hnames, value); } static int pjsip_generic_int_hdr_print( pjsip_generic_int_hdr *hdr, char *buf, pj_size_t size) { char *p = buf; const pj_str_t *hname = pjsip_cfg()->endpt.use_compact_form? &hdr->sname : &hdr->name; if ((pj_ssize_t)size < hname->slen + 15) return -1; pj_memcpy(p, hname->ptr, hname->slen); p += hname->slen; *p++ = ':'; *p++ = ' '; p += pj_utoa(hdr->ivalue, p); return (int)(p - buf); } static pjsip_generic_int_hdr* pjsip_generic_int_hdr_clone( pj_pool_t *pool, const pjsip_generic_int_hdr *rhs) { pjsip_generic_int_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_generic_int_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); return hdr; } static pjsip_generic_int_hdr* pjsip_generic_int_hdr_shallow_clone( pj_pool_t *pool, const pjsip_generic_int_hdr *rhs ) { pjsip_generic_int_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_generic_int_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * Generic array header. */ static int pjsip_generic_array_hdr_print( pjsip_generic_array_hdr *hdr, char *buf, pj_size_t size); static pjsip_generic_array_hdr* pjsip_generic_array_hdr_clone( pj_pool_t *pool, const pjsip_generic_array_hdr *hdr); static pjsip_generic_array_hdr* pjsip_generic_array_hdr_shallow_clone( pj_pool_t *pool, const pjsip_generic_array_hdr *hdr); static pjsip_hdr_vptr generic_array_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_generic_array_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_generic_array_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_generic_array_hdr_print, }; PJ_DEF(pjsip_generic_array_hdr*) pjsip_generic_array_hdr_init( pj_pool_t *pool, void *mem, const pj_str_t *hnames) { pjsip_generic_array_hdr *hdr = (pjsip_generic_array_hdr*) mem; init_hdr(hdr, PJSIP_H_OTHER, &generic_array_hdr_vptr); if (hnames) { pj_strdup(pool, &hdr->name, hnames); hdr->sname = hdr->name; } hdr->count = 0; return hdr; } PJ_DEF(pjsip_generic_array_hdr*) pjsip_generic_array_hdr_create( pj_pool_t *pool, const pj_str_t *hnames) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_generic_array_hdr)); return pjsip_generic_array_hdr_init(pool, mem, hnames); } static int pjsip_generic_array_hdr_print( pjsip_generic_array_hdr *hdr, char *buf, pj_size_t size) { char *p = buf, *endbuf = buf+size; const pj_str_t *hname = pjsip_cfg()->endpt.use_compact_form? &hdr->sname : &hdr->name; copy_advance(p, (*hname)); *p++ = ':'; *p++ = ' '; if (hdr->count > 0) { unsigned i; int printed; copy_advance(p, hdr->values[0]); for (i=1; icount; ++i) { copy_advance_pair(p, ", ", 2, hdr->values[i]); } } return (int)(p - buf); } static pjsip_generic_array_hdr* pjsip_generic_array_hdr_clone( pj_pool_t *pool, const pjsip_generic_array_hdr *rhs) { unsigned i; pjsip_generic_array_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_generic_array_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); for (i=0; icount; ++i) { pj_strdup(pool, &hdr->values[i], &rhs->values[i]); } return hdr; } static pjsip_generic_array_hdr* pjsip_generic_array_hdr_shallow_clone( pj_pool_t *pool, const pjsip_generic_array_hdr *rhs) { pjsip_generic_array_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_generic_array_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * Accept header. */ PJ_DEF(pjsip_accept_hdr*) pjsip_accept_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_accept_hdr *hdr = (pjsip_accept_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_ACCEPT, &generic_array_hdr_vptr); hdr->count = 0; return hdr; } PJ_DEF(pjsip_accept_hdr*) pjsip_accept_hdr_create(pj_pool_t *pool) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_accept_hdr)); return pjsip_accept_hdr_init(pool, mem); } /////////////////////////////////////////////////////////////////////////////// /* * Allow header. */ PJ_DEF(pjsip_allow_hdr*) pjsip_allow_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_allow_hdr *hdr = (pjsip_allow_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_ALLOW, &generic_array_hdr_vptr); hdr->count = 0; return hdr; } PJ_DEF(pjsip_allow_hdr*) pjsip_allow_hdr_create(pj_pool_t *pool) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_allow_hdr)); return pjsip_allow_hdr_init(pool, mem); } /////////////////////////////////////////////////////////////////////////////// /* * Call-ID header. */ PJ_DEF(pjsip_cid_hdr*) pjsip_cid_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_cid_hdr *hdr = (pjsip_cid_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_CALL_ID, &generic_hdr_vptr); return hdr; } PJ_DEF(pjsip_cid_hdr*) pjsip_cid_hdr_create( pj_pool_t *pool ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_cid_hdr)); return pjsip_cid_hdr_init(pool, mem); } /////////////////////////////////////////////////////////////////////////////// /* * Content-Length header. */ static int pjsip_clen_hdr_print( pjsip_clen_hdr *hdr, char *buf, pj_size_t size); static pjsip_clen_hdr* pjsip_clen_hdr_clone( pj_pool_t *pool, const pjsip_clen_hdr *hdr); #define pjsip_clen_hdr_shallow_clone pjsip_clen_hdr_clone static pjsip_hdr_vptr clen_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_clen_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_clen_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_clen_hdr_print, }; PJ_DEF(pjsip_clen_hdr*) pjsip_clen_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_clen_hdr *hdr = (pjsip_clen_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_CONTENT_LENGTH, &clen_hdr_vptr); hdr->len = 0; return hdr; } PJ_DEF(pjsip_clen_hdr*) pjsip_clen_hdr_create( pj_pool_t *pool ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_clen_hdr)); return pjsip_clen_hdr_init(pool, mem); } static int pjsip_clen_hdr_print( pjsip_clen_hdr *hdr, char *buf, pj_size_t size) { char *p = buf; int len; const pj_str_t *hname = pjsip_cfg()->endpt.use_compact_form? &hdr->sname : &hdr->name; if ((pj_ssize_t)size < hname->slen + 14) return -1; pj_memcpy(p, hname->ptr, hname->slen); p += hname->slen; *p++ = ':'; *p++ = ' '; len = pj_utoa(hdr->len, p); p += len; *p = '\0'; return (int)(p-buf); } static pjsip_clen_hdr* pjsip_clen_hdr_clone( pj_pool_t *pool, const pjsip_clen_hdr *rhs) { pjsip_clen_hdr *hdr = pjsip_clen_hdr_create(pool); hdr->len = rhs->len; return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * CSeq header. */ static int pjsip_cseq_hdr_print( pjsip_cseq_hdr *hdr, char *buf, pj_size_t size); static pjsip_cseq_hdr* pjsip_cseq_hdr_clone( pj_pool_t *pool, const pjsip_cseq_hdr *hdr); static pjsip_cseq_hdr* pjsip_cseq_hdr_shallow_clone( pj_pool_t *pool, const pjsip_cseq_hdr *hdr ); static pjsip_hdr_vptr cseq_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_cseq_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_cseq_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_cseq_hdr_print, }; PJ_DEF(pjsip_cseq_hdr*) pjsip_cseq_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_cseq_hdr *hdr = (pjsip_cseq_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_CSEQ, &cseq_hdr_vptr); hdr->cseq = 0; hdr->method.id = PJSIP_OTHER_METHOD; hdr->method.name.ptr = NULL; hdr->method.name.slen = 0; return hdr; } PJ_DEF(pjsip_cseq_hdr*) pjsip_cseq_hdr_create( pj_pool_t *pool ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_cseq_hdr)); return pjsip_cseq_hdr_init(pool, mem); } static int pjsip_cseq_hdr_print( pjsip_cseq_hdr *hdr, char *buf, pj_size_t size) { char *p = buf; int len; /* CSeq doesn't have compact form */ if ((pj_ssize_t)size < hdr->name.slen + hdr->method.name.slen + 15) return -1; pj_memcpy(p, hdr->name.ptr, hdr->name.slen); p += hdr->name.slen; *p++ = ':'; *p++ = ' '; len = pj_utoa(hdr->cseq, p); p += len; *p++ = ' '; pj_memcpy(p, hdr->method.name.ptr, hdr->method.name.slen); p += hdr->method.name.slen; *p = '\0'; return (int)(p-buf); } static pjsip_cseq_hdr* pjsip_cseq_hdr_clone( pj_pool_t *pool, const pjsip_cseq_hdr *rhs) { pjsip_cseq_hdr *hdr = pjsip_cseq_hdr_create(pool); hdr->cseq = rhs->cseq; pjsip_method_copy(pool, &hdr->method, &rhs->method); return hdr; } static pjsip_cseq_hdr* pjsip_cseq_hdr_shallow_clone( pj_pool_t *pool, const pjsip_cseq_hdr *rhs ) { pjsip_cseq_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_cseq_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * Contact header. */ static int pjsip_contact_hdr_print( pjsip_contact_hdr *hdr, char *buf, pj_size_t size); static pjsip_contact_hdr* pjsip_contact_hdr_clone( pj_pool_t *pool, const pjsip_contact_hdr *hdr); static pjsip_contact_hdr* pjsip_contact_hdr_shallow_clone( pj_pool_t *pool, const pjsip_contact_hdr *); static pjsip_hdr_vptr contact_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_contact_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_contact_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_contact_hdr_print, }; PJ_DEF(pjsip_contact_hdr*) pjsip_contact_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_contact_hdr *hdr = (pjsip_contact_hdr*) mem; PJ_UNUSED_ARG(pool); pj_bzero(mem, sizeof(pjsip_contact_hdr)); init_hdr(hdr, PJSIP_H_CONTACT, &contact_hdr_vptr); hdr->expires = PJSIP_EXPIRES_NOT_SPECIFIED; pj_list_init(&hdr->other_param); return hdr; } PJ_DEF(pjsip_contact_hdr*) pjsip_contact_hdr_create( pj_pool_t *pool ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_contact_hdr)); return pjsip_contact_hdr_init(pool, mem); } static int pjsip_contact_hdr_print( pjsip_contact_hdr *hdr, char *buf, pj_size_t size) { const pj_str_t *hname = pjsip_cfg()->endpt.use_compact_form? &hdr->sname : &hdr->name; const pjsip_parser_const_t *pc = pjsip_parser_const(); if (hdr->star) { char *p = buf; if ((pj_ssize_t)size < hname->slen + 6) return -1; pj_memcpy(p, hname->ptr, hname->slen); p += hname->slen; *p++ = ':'; *p++ = ' '; *p++ = '*'; return (int)(p - buf); } else { int printed; char *startbuf = buf; char *endbuf = buf + size; copy_advance(buf, (*hname)); copy_advance_char_check(buf, ':'); copy_advance_char_check(buf, ' '); printed = pjsip_uri_print(PJSIP_URI_IN_CONTACT_HDR, hdr->uri, buf, endbuf-buf); if (printed < 1) return -1; buf += printed; if (hdr->q1000) { unsigned frac; if (buf+19 >= endbuf) return -1; /* printed = sprintf(buf, ";q=%u.%03u", hdr->q1000/1000, hdr->q1000 % 1000); */ pj_memcpy(buf, ";q=", 3); printed = pj_utoa(hdr->q1000/1000, buf+3); buf += printed + 3; frac = hdr->q1000 % 1000; if (frac != 0) { *buf++ = '.'; if ((frac % 100)==0) frac /= 100; if ((frac % 10)==0) frac /= 10; printed = pj_utoa(frac, buf); buf += printed; } } if (hdr->expires != PJSIP_EXPIRES_NOT_SPECIFIED) { if (buf+23 >= endbuf) return -1; pj_memcpy(buf, ";expires=", 9); printed = pj_utoa(hdr->expires, buf+9); buf += printed + 9; } printed = (int)pjsip_param_print_on(&hdr->other_param, buf, endbuf-buf, &pc->pjsip_TOKEN_SPEC, &pc->pjsip_TOKEN_SPEC, ';'); if (printed < 0) return printed; buf += printed; return (int)(buf-startbuf); } } static pjsip_contact_hdr* pjsip_contact_hdr_clone(pj_pool_t *pool, const pjsip_contact_hdr *rhs) { pjsip_contact_hdr *hdr = pjsip_contact_hdr_create(pool); hdr->star = rhs->star; if (hdr->star) return hdr; hdr->uri = (pjsip_uri*) pjsip_uri_clone(pool, rhs->uri); hdr->q1000 = rhs->q1000; hdr->expires = rhs->expires; pjsip_param_clone(pool, &hdr->other_param, &rhs->other_param); return hdr; } static pjsip_contact_hdr* pjsip_contact_hdr_shallow_clone( pj_pool_t *pool, const pjsip_contact_hdr *rhs) { pjsip_contact_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_contact_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); pjsip_param_shallow_clone(pool, &hdr->other_param, &rhs->other_param); return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * Content-Type header.. */ static int pjsip_ctype_hdr_print( pjsip_ctype_hdr *hdr, char *buf, pj_size_t size); static pjsip_ctype_hdr* pjsip_ctype_hdr_clone(pj_pool_t *pool, const pjsip_ctype_hdr *hdr); #define pjsip_ctype_hdr_shallow_clone pjsip_ctype_hdr_clone static pjsip_hdr_vptr ctype_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_ctype_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_ctype_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_ctype_hdr_print, }; PJ_DEF(pjsip_ctype_hdr*) pjsip_ctype_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_ctype_hdr *hdr = (pjsip_ctype_hdr*) mem; PJ_UNUSED_ARG(pool); pj_bzero(mem, sizeof(pjsip_ctype_hdr)); init_hdr(hdr, PJSIP_H_CONTENT_TYPE, &ctype_hdr_vptr); pj_list_init(&hdr->media.param); return hdr; } PJ_DEF(pjsip_ctype_hdr*) pjsip_ctype_hdr_create( pj_pool_t *pool ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_ctype_hdr)); return pjsip_ctype_hdr_init(pool, mem); } static int print_media_type(char *buf, unsigned len, const pjsip_media_type *media) { char *p = buf; pj_ssize_t printed; const pjsip_parser_const_t *pc; pj_memcpy(p, media->type.ptr, media->type.slen); p += media->type.slen; *p++ = '/'; pj_memcpy(p, media->subtype.ptr, media->subtype.slen); p += media->subtype.slen; pc = pjsip_parser_const(); printed = pjsip_param_print_on(&media->param, p, buf+len-p, &pc->pjsip_TOKEN_SPEC, &pc->pjsip_TOKEN_SPEC, ';'); if (printed < 0) return -1; p += printed; return (int)(p-buf); } PJ_DEF(int) pjsip_media_type_print(char *buf, unsigned len, const pjsip_media_type *media) { return print_media_type(buf, len, media); } static int pjsip_ctype_hdr_print( pjsip_ctype_hdr *hdr, char *buf, pj_size_t size) { char *p = buf; int len; const pj_str_t *hname = pjsip_cfg()->endpt.use_compact_form? &hdr->sname : &hdr->name; if ((pj_ssize_t)size < hname->slen + hdr->media.type.slen + hdr->media.subtype.slen + 8) { return -1; } pj_memcpy(p, hname->ptr, hname->slen); p += hname->slen; *p++ = ':'; *p++ = ' '; len = print_media_type(p, (unsigned)(buf+size-p), &hdr->media); p += len; *p = '\0'; return (int)(p-buf); } static pjsip_ctype_hdr* pjsip_ctype_hdr_clone( pj_pool_t *pool, const pjsip_ctype_hdr *rhs) { pjsip_ctype_hdr *hdr = pjsip_ctype_hdr_create(pool); pj_strdup(pool, &hdr->media.type, &rhs->media.type); pj_strdup(pool, &hdr->media.subtype, &rhs->media.subtype); pjsip_param_clone(pool, &hdr->media.param, &rhs->media.param); return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * Expires header. */ PJ_DEF(pjsip_expires_hdr*) pjsip_expires_hdr_init( pj_pool_t *pool, void *mem, unsigned value) { pjsip_expires_hdr *hdr = (pjsip_expires_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_EXPIRES, &generic_int_hdr_vptr); hdr->ivalue = value; return hdr; } PJ_DEF(pjsip_expires_hdr*) pjsip_expires_hdr_create( pj_pool_t *pool, unsigned value ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_expires_hdr)); return pjsip_expires_hdr_init(pool, mem, value); } /////////////////////////////////////////////////////////////////////////////// /* * To or From header. */ static int pjsip_fromto_hdr_print( pjsip_fromto_hdr *hdr, char *buf, pj_size_t size); static pjsip_fromto_hdr* pjsip_fromto_hdr_clone( pj_pool_t *pool, const pjsip_fromto_hdr *hdr); static pjsip_fromto_hdr* pjsip_fromto_hdr_shallow_clone( pj_pool_t *pool, const pjsip_fromto_hdr *hdr); static pjsip_hdr_vptr fromto_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_fromto_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_fromto_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_fromto_hdr_print, }; PJ_DEF(pjsip_from_hdr*) pjsip_from_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_from_hdr *hdr = (pjsip_from_hdr*) mem; PJ_UNUSED_ARG(pool); pj_bzero(mem, sizeof(pjsip_from_hdr)); init_hdr(hdr, PJSIP_H_FROM, &fromto_hdr_vptr); pj_list_init(&hdr->other_param); return hdr; } PJ_DEF(pjsip_from_hdr*) pjsip_from_hdr_create( pj_pool_t *pool ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_from_hdr)); return pjsip_from_hdr_init(pool, mem); } PJ_DEF(pjsip_to_hdr*) pjsip_to_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_to_hdr *hdr = (pjsip_to_hdr*) mem; PJ_UNUSED_ARG(pool); pj_bzero(mem, sizeof(pjsip_to_hdr)); init_hdr(hdr, PJSIP_H_TO, &fromto_hdr_vptr); pj_list_init(&hdr->other_param); return hdr; } PJ_DEF(pjsip_to_hdr*) pjsip_to_hdr_create( pj_pool_t *pool ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_to_hdr)); return pjsip_to_hdr_init(pool, mem); } PJ_DEF(pjsip_from_hdr*) pjsip_fromto_hdr_set_from( pjsip_fromto_hdr *hdr ) { hdr->type = PJSIP_H_FROM; hdr->name.ptr = pjsip_hdr_names[PJSIP_H_FROM].name; hdr->name.slen = pjsip_hdr_names[PJSIP_H_FROM].name_len; hdr->sname.ptr = pjsip_hdr_names[PJSIP_H_FROM].sname; hdr->sname.slen = 1; return hdr; } PJ_DEF(pjsip_to_hdr*) pjsip_fromto_hdr_set_to( pjsip_fromto_hdr *hdr ) { hdr->type = PJSIP_H_TO; hdr->name.ptr = pjsip_hdr_names[PJSIP_H_TO].name; hdr->name.slen = pjsip_hdr_names[PJSIP_H_TO].name_len; hdr->sname.ptr = pjsip_hdr_names[PJSIP_H_TO].sname; hdr->sname.slen = 1; return hdr; } static int pjsip_fromto_hdr_print( pjsip_fromto_hdr *hdr, char *buf, pj_size_t size) { pj_ssize_t printed; char *startbuf = buf; char *endbuf = buf + size; const pj_str_t *hname = pjsip_cfg()->endpt.use_compact_form? &hdr->sname : &hdr->name; const pjsip_parser_const_t *pc = pjsip_parser_const(); copy_advance(buf, (*hname)); *buf++ = ':'; *buf++ = ' '; printed = pjsip_uri_print(PJSIP_URI_IN_FROMTO_HDR, hdr->uri, buf, endbuf-buf); if (printed < 1) return -1; buf += printed; copy_advance_pair_escape(buf, ";tag=", 5, hdr->tag, pc->pjsip_TOKEN_SPEC); printed = pjsip_param_print_on(&hdr->other_param, buf, endbuf-buf, &pc->pjsip_TOKEN_SPEC, &pc->pjsip_TOKEN_SPEC, ';'); if (printed < 0) return -1; buf += printed; return (int)(buf-startbuf); } static pjsip_fromto_hdr* pjsip_fromto_hdr_clone( pj_pool_t *pool, const pjsip_fromto_hdr *rhs) { pjsip_fromto_hdr *hdr = pjsip_from_hdr_create(pool); hdr->type = rhs->type; hdr->name = rhs->name; hdr->sname = rhs->sname; hdr->uri = (pjsip_uri*) pjsip_uri_clone(pool, rhs->uri); pj_strdup( pool, &hdr->tag, &rhs->tag); pjsip_param_clone( pool, &hdr->other_param, &rhs->other_param); return hdr; } static pjsip_fromto_hdr* pjsip_fromto_hdr_shallow_clone( pj_pool_t *pool, const pjsip_fromto_hdr *rhs) { pjsip_fromto_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_fromto_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); pjsip_param_shallow_clone( pool, &hdr->other_param, &rhs->other_param); return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * Max-Forwards header. */ PJ_DEF(pjsip_max_fwd_hdr*) pjsip_max_fwd_hdr_init( pj_pool_t *pool, void *mem, unsigned value) { pjsip_max_fwd_hdr *hdr = (pjsip_max_fwd_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_MAX_FORWARDS, &generic_int_hdr_vptr); hdr->ivalue = value; return hdr; } PJ_DEF(pjsip_max_fwd_hdr*) pjsip_max_fwd_hdr_create(pj_pool_t *pool, unsigned value) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_max_fwd_hdr)); return pjsip_max_fwd_hdr_init(pool, mem, value); } /////////////////////////////////////////////////////////////////////////////// /* * Min-Expires header. */ PJ_DEF(pjsip_min_expires_hdr*) pjsip_min_expires_hdr_init( pj_pool_t *pool, void *mem, unsigned value ) { pjsip_min_expires_hdr *hdr = (pjsip_min_expires_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_MIN_EXPIRES, &generic_int_hdr_vptr); hdr->ivalue = value; return hdr; } PJ_DEF(pjsip_min_expires_hdr*) pjsip_min_expires_hdr_create(pj_pool_t *pool, unsigned value ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_min_expires_hdr)); return pjsip_min_expires_hdr_init(pool, mem, value ); } /////////////////////////////////////////////////////////////////////////////// /* * Record-Route and Route header. */ static int pjsip_routing_hdr_print( pjsip_routing_hdr *r, char *buf, pj_size_t size ); static pjsip_routing_hdr* pjsip_routing_hdr_clone( pj_pool_t *pool, const pjsip_routing_hdr *r ); static pjsip_routing_hdr* pjsip_routing_hdr_shallow_clone( pj_pool_t *pool, const pjsip_routing_hdr *r ); static pjsip_hdr_vptr routing_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_routing_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_routing_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_routing_hdr_print, }; PJ_DEF(pjsip_rr_hdr*) pjsip_rr_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_rr_hdr *hdr = (pjsip_rr_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_RECORD_ROUTE, &routing_hdr_vptr); pjsip_name_addr_init(&hdr->name_addr); pj_list_init(&hdr->other_param); return hdr; } PJ_DEF(pjsip_rr_hdr*) pjsip_rr_hdr_create( pj_pool_t *pool ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_rr_hdr)); return pjsip_rr_hdr_init(pool, mem); } PJ_DEF(pjsip_route_hdr*) pjsip_route_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_route_hdr *hdr = (pjsip_route_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_ROUTE, &routing_hdr_vptr); pjsip_name_addr_init(&hdr->name_addr); pj_list_init(&hdr->other_param); return hdr; } PJ_DEF(pjsip_route_hdr*) pjsip_route_hdr_create( pj_pool_t *pool ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_route_hdr)); return pjsip_route_hdr_init(pool, mem); } PJ_DEF(pjsip_rr_hdr*) pjsip_routing_hdr_set_rr( pjsip_routing_hdr *hdr ) { hdr->type = PJSIP_H_RECORD_ROUTE; hdr->name.ptr = pjsip_hdr_names[PJSIP_H_RECORD_ROUTE].name; hdr->name.slen = pjsip_hdr_names[PJSIP_H_RECORD_ROUTE].name_len; hdr->sname = hdr->name; return hdr; } PJ_DEF(pjsip_route_hdr*) pjsip_routing_hdr_set_route( pjsip_routing_hdr *hdr ) { hdr->type = PJSIP_H_ROUTE; hdr->name.ptr = pjsip_hdr_names[PJSIP_H_ROUTE].name; hdr->name.slen = pjsip_hdr_names[PJSIP_H_ROUTE].name_len; hdr->sname = hdr->name; return hdr; } static int pjsip_routing_hdr_print( pjsip_routing_hdr *hdr, char *buf, pj_size_t size ) { pj_ssize_t printed; char *startbuf = buf; char *endbuf = buf + size; const pjsip_parser_const_t *pc = pjsip_parser_const(); pjsip_sip_uri *sip_uri; pjsip_param *p; /* Check the proprietary param 'hide', don't print this header * if it exists in the route URI. */ if (PJSIP_URI_SCHEME_IS_SIPS(hdr->name_addr.uri) || PJSIP_URI_SCHEME_IS_SIP(hdr->name_addr.uri)) { sip_uri = (pjsip_sip_uri*) pjsip_uri_get_uri(hdr->name_addr.uri); p = sip_uri->other_param.next; while (p != &sip_uri->other_param) { const pj_str_t st_hide = {"hide", 4}; if (pj_stricmp(&p->name, &st_hide) == 0) { /* Check if param 'hide' is specified without 'lr'. */ pj_assert(sip_uri->lr_param != 0); return 0; } p = p->next; } } /* Route and Record-Route don't compact forms */ copy_advance(buf, hdr->name); *buf++ = ':'; *buf++ = ' '; printed = pjsip_uri_print(PJSIP_URI_IN_ROUTING_HDR, &hdr->name_addr, buf, endbuf-buf); if (printed < 1) return -1; buf += printed; printed = pjsip_param_print_on(&hdr->other_param, buf, endbuf-buf, &pc->pjsip_TOKEN_SPEC, &pc->pjsip_TOKEN_SPEC, ';'); if (printed < 0) return -1; buf += printed; return (int)(buf-startbuf); } static pjsip_routing_hdr* pjsip_routing_hdr_clone( pj_pool_t *pool, const pjsip_routing_hdr *rhs ) { pjsip_routing_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_routing_hdr); init_hdr(hdr, rhs->type, rhs->vptr); pjsip_name_addr_init(&hdr->name_addr); pjsip_name_addr_assign(pool, &hdr->name_addr, &rhs->name_addr); pjsip_param_clone( pool, &hdr->other_param, &rhs->other_param); return hdr; } static pjsip_routing_hdr* pjsip_routing_hdr_shallow_clone( pj_pool_t *pool, const pjsip_routing_hdr *rhs ) { pjsip_routing_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_routing_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); pjsip_param_shallow_clone( pool, &hdr->other_param, &rhs->other_param); return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * Require header. */ PJ_DEF(pjsip_require_hdr*) pjsip_require_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_require_hdr *hdr = (pjsip_require_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_REQUIRE, &generic_array_hdr_vptr); hdr->count = 0; return hdr; } PJ_DEF(pjsip_require_hdr*) pjsip_require_hdr_create(pj_pool_t *pool) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_require_hdr)); return pjsip_require_hdr_init(pool, mem); } /////////////////////////////////////////////////////////////////////////////// /* * Retry-After header. */ static int pjsip_retry_after_hdr_print(pjsip_retry_after_hdr *r, char *buf, pj_size_t size ); static pjsip_retry_after_hdr* pjsip_retry_after_hdr_clone(pj_pool_t *pool, const pjsip_retry_after_hdr *r); static pjsip_retry_after_hdr* pjsip_retry_after_hdr_shallow_clone(pj_pool_t *pool, const pjsip_retry_after_hdr *r ); static pjsip_hdr_vptr retry_after_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_retry_after_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_retry_after_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_retry_after_hdr_print, }; PJ_DEF(pjsip_retry_after_hdr*) pjsip_retry_after_hdr_init( pj_pool_t *pool, void *mem, int value ) { pjsip_retry_after_hdr *hdr = (pjsip_retry_after_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_RETRY_AFTER, &retry_after_hdr_vptr); hdr->ivalue = value; hdr->comment.slen = 0; pj_list_init(&hdr->param); return hdr; } PJ_DEF(pjsip_retry_after_hdr*) pjsip_retry_after_hdr_create(pj_pool_t *pool, int value ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_retry_after_hdr)); return pjsip_retry_after_hdr_init(pool, mem, value ); } static int pjsip_retry_after_hdr_print(pjsip_retry_after_hdr *hdr, char *buf, pj_size_t size) { char *p = buf; char *endbuf = buf + size; const pj_str_t *hname = &hdr->name; const pjsip_parser_const_t *pc = pjsip_parser_const(); pj_ssize_t printed; if ((pj_ssize_t)size < hdr->name.slen + 2+11) return -1; pj_memcpy(p, hdr->name.ptr, hdr->name.slen); p += hname->slen; *p++ = ':'; *p++ = ' '; p += pj_utoa(hdr->ivalue, p); if (hdr->comment.slen) { pj_bool_t enclosed; if (endbuf-p < hdr->comment.slen + 3) return -1; enclosed = (*hdr->comment.ptr == '('); if (!enclosed) *p++ = '('; pj_memcpy(p, hdr->comment.ptr, hdr->comment.slen); p += hdr->comment.slen; if (!enclosed) *p++ = ')'; if (!pj_list_empty(&hdr->param)) *p++ = ' '; } printed = pjsip_param_print_on(&hdr->param, p, endbuf-p, &pc->pjsip_TOKEN_SPEC, &pc->pjsip_TOKEN_SPEC, ';'); if (printed < 0) return (int)printed; p += printed; return (int)(p - buf); } static pjsip_retry_after_hdr* pjsip_retry_after_hdr_clone(pj_pool_t *pool, const pjsip_retry_after_hdr *rhs) { pjsip_retry_after_hdr *hdr = pjsip_retry_after_hdr_create(pool, rhs->ivalue); pj_strdup(pool, &hdr->comment, &rhs->comment); pjsip_param_clone(pool, &hdr->param, &rhs->param); return hdr; } static pjsip_retry_after_hdr* pjsip_retry_after_hdr_shallow_clone(pj_pool_t *pool, const pjsip_retry_after_hdr *rhs) { pjsip_retry_after_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_retry_after_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); pjsip_param_shallow_clone(pool, &hdr->param, &rhs->param); return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * Supported header. */ PJ_DEF(pjsip_supported_hdr*) pjsip_supported_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_supported_hdr *hdr = (pjsip_supported_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_SUPPORTED, &generic_array_hdr_vptr); hdr->count = 0; return hdr; } PJ_DEF(pjsip_supported_hdr*) pjsip_supported_hdr_create(pj_pool_t *pool) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_supported_hdr)); return pjsip_supported_hdr_init(pool, mem); } /////////////////////////////////////////////////////////////////////////////// /* * Unsupported header. */ PJ_DEF(pjsip_unsupported_hdr*) pjsip_unsupported_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_unsupported_hdr *hdr = (pjsip_unsupported_hdr*) mem; PJ_UNUSED_ARG(pool); init_hdr(hdr, PJSIP_H_UNSUPPORTED, &generic_array_hdr_vptr); hdr->count = 0; return hdr; } PJ_DEF(pjsip_unsupported_hdr*) pjsip_unsupported_hdr_create(pj_pool_t *pool) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_unsupported_hdr)); return pjsip_unsupported_hdr_init(pool, mem); } /////////////////////////////////////////////////////////////////////////////// /* * Via header. */ static int pjsip_via_hdr_print( pjsip_via_hdr *hdr, char *buf, pj_size_t size); static pjsip_via_hdr* pjsip_via_hdr_clone( pj_pool_t *pool, const pjsip_via_hdr *hdr); static pjsip_via_hdr* pjsip_via_hdr_shallow_clone( pj_pool_t *pool, const pjsip_via_hdr *hdr ); static pjsip_hdr_vptr via_hdr_vptr = { (pjsip_hdr_clone_fptr) &pjsip_via_hdr_clone, (pjsip_hdr_clone_fptr) &pjsip_via_hdr_shallow_clone, (pjsip_hdr_print_fptr) &pjsip_via_hdr_print, }; PJ_DEF(pjsip_via_hdr*) pjsip_via_hdr_init( pj_pool_t *pool, void *mem ) { pjsip_via_hdr *hdr = (pjsip_via_hdr*) mem; PJ_UNUSED_ARG(pool); pj_bzero(mem, sizeof(pjsip_via_hdr)); init_hdr(hdr, PJSIP_H_VIA, &via_hdr_vptr); hdr->ttl_param = -1; hdr->rport_param = -1; pj_list_init(&hdr->other_param); return hdr; } PJ_DEF(pjsip_via_hdr*) pjsip_via_hdr_create( pj_pool_t *pool ) { void *mem = pj_pool_alloc(pool, sizeof(pjsip_via_hdr)); return pjsip_via_hdr_init(pool, mem); } static int pjsip_via_hdr_print( pjsip_via_hdr *hdr, char *buf, pj_size_t size) { pj_ssize_t printed; char *startbuf = buf; char *endbuf = buf + size; pj_str_t sip_ver = { "SIP/2.0/", 8 }; const pj_str_t *hname = pjsip_cfg()->endpt.use_compact_form? &hdr->sname : &hdr->name; const pjsip_parser_const_t *pc = pjsip_parser_const(); if ((pj_ssize_t)size < hname->slen + sip_ver.slen + hdr->transport.slen + hdr->sent_by.host.slen + 12) { return -1; } /* pjsip_hdr_names */ copy_advance(buf, (*hname)); *buf++ = ':'; *buf++ = ' '; /* SIP/2.0/transport host:port */ pj_memcpy(buf, sip_ver.ptr, sip_ver.slen); buf += sip_ver.slen; //pj_memcpy(buf, hdr->transport.ptr, hdr->transport.slen); /* Convert transport type to UPPERCASE (some endpoints want that) */ { int i; for (i=0; itransport.slen; ++i) { buf[i] = (char)pj_toupper(hdr->transport.ptr[i]); } } buf += hdr->transport.slen; *buf++ = ' '; /* Check if host contains IPv6 */ if (pj_strchr(&hdr->sent_by.host, ':')) { copy_advance_pair_quote_cond(buf, "", 0, hdr->sent_by.host, '[', ']'); } else { copy_advance_check(buf, hdr->sent_by.host); } if (hdr->sent_by.port != 0) { *buf++ = ':'; printed = pj_utoa(hdr->sent_by.port, buf); buf += printed; } if (hdr->ttl_param >= 0) { size = endbuf-buf; if (size < 14) return -1; pj_memcpy(buf, ";ttl=", 5); printed = pj_utoa(hdr->ttl_param, buf+5); buf += printed + 5; } if (hdr->rport_param >= 0) { size = endbuf-buf; if (size < 14) return -1; pj_memcpy(buf, ";rport", 6); buf += 6; if (hdr->rport_param > 0) { *buf++ = '='; buf += pj_utoa(hdr->rport_param, buf); } } if (hdr->maddr_param.slen) { /* Detect IPv6 IP address */ if (pj_memchr(hdr->maddr_param.ptr, ':', hdr->maddr_param.slen)) { copy_advance_pair_quote_cond(buf, ";maddr=", 7, hdr->maddr_param, '[', ']'); } else { copy_advance_pair(buf, ";maddr=", 7, hdr->maddr_param); } } copy_advance_pair(buf, ";received=", 10, hdr->recvd_param); copy_advance_pair_escape(buf, ";branch=", 8, hdr->branch_param, pc->pjsip_TOKEN_SPEC); printed = pjsip_param_print_on(&hdr->other_param, buf, endbuf-buf, &pc->pjsip_TOKEN_SPEC, &pc->pjsip_TOKEN_SPEC, ';'); if (printed < 0) return -1; buf += printed; return (int)(buf-startbuf); } static pjsip_via_hdr* pjsip_via_hdr_clone( pj_pool_t *pool, const pjsip_via_hdr *rhs) { pjsip_via_hdr *hdr = pjsip_via_hdr_create(pool); pj_strdup(pool, &hdr->transport, &rhs->transport); pj_strdup(pool, &hdr->sent_by.host, &rhs->sent_by.host); hdr->sent_by.port = rhs->sent_by.port; hdr->ttl_param = rhs->ttl_param; hdr->rport_param = rhs->rport_param; pj_strdup(pool, &hdr->maddr_param, &rhs->maddr_param); pj_strdup(pool, &hdr->recvd_param, &rhs->recvd_param); pj_strdup(pool, &hdr->branch_param, &rhs->branch_param); pjsip_param_clone(pool, &hdr->other_param, &rhs->other_param); return hdr; } static pjsip_via_hdr* pjsip_via_hdr_shallow_clone( pj_pool_t *pool, const pjsip_via_hdr *rhs ) { pjsip_via_hdr *hdr = PJ_POOL_ALLOC_T(pool, pjsip_via_hdr); pj_memcpy(hdr, rhs, sizeof(*hdr)); pjsip_param_shallow_clone(pool, &hdr->other_param, &rhs->other_param); return hdr; } /////////////////////////////////////////////////////////////////////////////// /* * Warning header. */ PJ_DEF(pjsip_warning_hdr*) pjsip_warning_hdr_create( pj_pool_t *pool, int code, const pj_str_t *host, const pj_str_t *text) { const pj_str_t str_warning = { "Warning", 7 }; pj_str_t hvalue; hvalue.ptr = (char*) pj_pool_alloc(pool, 10 + /* code */ host->slen + 2 + /* host */ text->slen + 2); /* text */ hvalue.slen = pj_ansi_sprintf(hvalue.ptr, "%u %.*s \"%.*s\"", code, (int)host->slen, host->ptr, (int)text->slen, text->ptr); return pjsip_generic_string_hdr_create(pool, &str_warning, &hvalue); } PJ_DEF(pjsip_warning_hdr*) pjsip_warning_hdr_create_from_status(pj_pool_t *pool, const pj_str_t *host, pj_status_t status) { char errbuf[PJ_ERR_MSG_SIZE]; pj_str_t text; text = pj_strerror(status, errbuf, sizeof(errbuf)); return pjsip_warning_hdr_create(pool, 399, host, &text); } /////////////////////////////////////////////////////////////////////////////// /* * Message body manipulations. */ PJ_DEF(int) pjsip_print_text_body(pjsip_msg_body *msg_body, char *buf, pj_size_t size) { if (size < msg_body->len) return -1; pj_memcpy(buf, msg_body->data, msg_body->len); return msg_body->len; } PJ_DEF(void*) pjsip_clone_text_data( pj_pool_t *pool, const void *data, unsigned len) { char *newdata = ""; if (len) { newdata = (char*) pj_pool_alloc(pool, len); pj_memcpy(newdata, data, len); } return newdata; } PJ_DEF(pj_status_t) pjsip_msg_body_copy( pj_pool_t *pool, pjsip_msg_body *dst_body, const pjsip_msg_body *src_body ) { /* First check if clone_data field is initialized. */ PJ_ASSERT_RETURN( src_body->clone_data!=NULL, PJ_EINVAL ); /* Duplicate content-type */ pjsip_media_type_cp(pool, &dst_body->content_type, &src_body->content_type); /* Duplicate data. */ dst_body->data = (*src_body->clone_data)(pool, src_body->data, src_body->len ); /* Length. */ dst_body->len = src_body->len; /* Function pointers. */ dst_body->print_body = src_body->print_body; dst_body->clone_data = src_body->clone_data; return PJ_SUCCESS; } PJ_DEF(pjsip_msg_body*) pjsip_msg_body_clone( pj_pool_t *pool, const pjsip_msg_body *body ) { pjsip_msg_body *new_body; pj_status_t status; new_body = PJ_POOL_ALLOC_T(pool, pjsip_msg_body); PJ_ASSERT_RETURN(new_body, NULL); status = pjsip_msg_body_copy(pool, new_body, body); return (status==PJ_SUCCESS) ? new_body : NULL; } PJ_DEF(pjsip_msg_body*) pjsip_msg_body_create( pj_pool_t *pool, const pj_str_t *type, const pj_str_t *subtype, const pj_str_t *text ) { pjsip_msg_body *body; PJ_ASSERT_RETURN(pool && type && subtype && text, NULL); body = PJ_POOL_ZALLOC_T(pool, pjsip_msg_body); PJ_ASSERT_RETURN(body != NULL, NULL); pj_strdup(pool, &body->content_type.type, type); pj_strdup(pool, &body->content_type.subtype, subtype); pj_list_init(&body->content_type.param); body->data = pj_pool_alloc(pool, text->slen); pj_memcpy(body->data, text->ptr, text->slen); body->len = (unsigned)text->slen; body->clone_data = &pjsip_clone_text_data; body->print_body = &pjsip_print_text_body; return body; }