/parser/parse_hname2.c
C | 293 lines | 218 code | 29 blank | 46 comment | 18 complexity | 7cbc837b0c1564d83d5d5d62f4126440 MD5 | raw file
- /*
- * Fast 32-bit Header Field Name Parser
- *
- * Copyright (C) 2001-2003 FhG Fokus
- *
- * 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
- *
- */
- /** Parser :: Fast 32-bit Header Field Name Parser.
- * @file
- * @ingroup parser
- */
- #include "../comp_defs.h"
- #include "parse_hname2.h"
- #include "keys.h"
- #include "../ut.h" /* q_memchr */
- #define LOWER_BYTE(b) ((b) | 0x20)
- #define LOWER_DWORD(d) ((d) | 0x20202020)
- /** Skip all white-chars and return position of the first non-white char.
- */
- static inline char* skip_ws(char* p, unsigned int size)
- {
- char* end;
- end = p + size;
- for(; p < end; p++) {
- if ((*p != ' ') && (*p != '\t')) return p;
- }
- return p;
- }
- /*! \name
- * Parser macros
- */
- /*@{ */
- #include "case_via.h" /* Via */
- #include "case_from.h" /* From */
- #include "case_to.h" /* To */
- #include "case_cseq.h" /* CSeq */
- #include "case_call.h" /* Call-ID */
- #include "case_cont.h" /* Contact, Content-Type, Content-Length, Content-Purpose,
- * Content-Action, Content-Disposition */
- #include "case_rout.h" /* Route */
- #include "case_max.h" /* Max-Forwards */
- #include "case_reco.h" /* Record-Route */
- #include "case_auth.h" /* Authorization */
- #include "case_expi.h" /* Expires */
- #include "case_prox.h" /* Proxy-Authorization, Proxy-Require */
- #include "case_allo.h" /* Allow */
- #include "case_unsu.h" /* Unsupported */
- #include "case_even.h" /* Event */
- #include "case_sip.h" /* Sip-If-Match */
- #include "case_acce.h" /* Accept, Accept-Language */
- #include "case_orga.h" /* Organization */
- #include "case_prio.h" /* Priority */
- #include "case_subj.h" /* Subject */
- #include "case_user.h" /* User-Agent */
- #include "case_serv.h" /* Server */
- #include "case_supp.h" /* Supported */
- #include "case_dive.h" /* Diversion */
- #include "case_remo.h" /* Remote-Party-ID */
- #include "case_refe.h" /* Refer-To */
- #include "case_sess.h" /* Session-Expires */
- #include "case_reje.h" /* Reject-Contact */
- #include "case_min.h" /* Min-SE */
- #include "case_subs.h" /* Subscription-State */
- #include "case_requ.h" /* Require */
- #include "case_www.h" /* WWW-Authenticate */
- #include "case_date.h" /* Date */
- #include "case_iden.h" /* Identity, Identity-info */
- #include "case_retr.h" /* Retry-After */
- #include "case_path.h" /* Path */
- #include "case_priv.h"
- #include "case_reas.h" /* Reason */
- #include "case_p_as.h" /* P-Asserted-Identity */
- #include "case_p_pr.h" /* P-Preferred-Identity */
- /*@} */
- #define SAFE_READ(val, len) \
- ((len) == 1 ? READ1(val) : ((len) == 2 ? READ2(val) : ((len) == 3 ? READ3(val) : ((len) > 3 ? READ4(val) : READ0(val)))))
- #define READ(val) \
- READ4(val)
- #define READ4(val) \
- (*((val) + 0) + (*((val) + 1) << 8) + (*((val) + 2) << 16) + (*((val) + 3) << 24))
- #define READ3(val) \
- (*((val) + 0) + (*((val) + 1) << 8) + (*((val) + 2) << 16))
- #define READ2(val) \
- (*((val) + 0) + (*((val) + 1) << 8))
- #define READ1(val) \
- (*((val) + 0))
- #define READ0(val) \
- (0)
- #define FIRST_QUATERNIONS \
- case _via1_: via1_CASE; \
- case _from_: from_CASE; \
- case _to12_: to12_CASE; \
- case _cseq_: cseq_CASE; \
- case _call_: call_CASE; \
- case _cont_: cont_CASE; \
- case _rout_: rout_CASE; \
- case _max__: max_CASE; \
- case _reco_: reco_CASE; \
- case _via2_: via2_CASE; \
- case _auth_: auth_CASE; \
- case _supp_: supp_CASE; \
- case _expi_: expi_CASE; \
- case _prox_: prox_CASE; \
- case _allo_: allo_CASE; \
- case _unsu_: unsu_CASE; \
- case _even_: even_CASE; \
- case _sip_ : sip_CASE; \
- case _acce_: acce_CASE; \
- case _orga_: orga_CASE; \
- case _prio_: prio_CASE; \
- case _subj_: subj_CASE; \
- case _subs_: subs_CASE; \
- case _user_: user_CASE; \
- case _serv_: serv_CASE; \
- case _dive_: dive_CASE; \
- case _remo_: remo_CASE; \
- case _refe_: refe_CASE; \
- case _sess_: sess_CASE; \
- case _reje_: reje_CASE; \
- case _min__: min_CASE; \
- case _requ_: requ_CASE; \
- case _www__: www_CASE; \
- case _date_: date_CASE; \
- case _iden_: iden_CASE; \
- case _retr_: retr_CASE; \
- case _path_: path_CASE; \
- case _priv_: priv_CASE; \
- case _reas_: reas_CASE; \
- case _p_as_: p_as_CASE; \
- case _p_pr_: p_pr_CASE;
- #define PARSE_COMPACT(id) \
- switch(*(p + 1)) { \
- case ' ': \
- hdr->type = id; \
- p += 2; \
- goto dc_end; \
- \
- case ':': \
- hdr->type = id; \
- hdr->name.len = 1; \
- return (p + 2); \
- }
- char* parse_hname2(char* const begin, const char* const end, struct hdr_field* const hdr)
- {
- register char* p;
- register unsigned int val;
- if ((end - begin) < 4) {
- hdr->type = HDR_ERROR_T;
- return begin;
- }
- p = begin;
- val = LOWER_DWORD(READ(p));
- hdr->name.s = begin;
- switch(val) {
- FIRST_QUATERNIONS;
- default:
- switch(LOWER_BYTE(*p)) {
- case 't':
- switch(LOWER_BYTE(*(p + 1))) {
- case 'o':
- case ' ':
- hdr->type = HDR_TO_T;
- p += 2;
- goto dc_end;
- case ':':
- hdr->type = HDR_TO_T;
- hdr->name.len = 1;
- return (p + 2);
- }
- break;
- case 'v': PARSE_COMPACT(HDR_VIA_T); break;
- case 'f': PARSE_COMPACT(HDR_FROM_T); break;
- case 'i': PARSE_COMPACT(HDR_CALLID_T); break;
- case 'm': PARSE_COMPACT(HDR_CONTACT_T); break;
- case 'l': PARSE_COMPACT(HDR_CONTENTLENGTH_T); break;
- case 'k': PARSE_COMPACT(HDR_SUPPORTED_T); break;
- case 'c': PARSE_COMPACT(HDR_CONTENTTYPE_T); break;
- case 'o': PARSE_COMPACT(HDR_EVENT_T); break;
- case 'x': PARSE_COMPACT(HDR_SESSIONEXPIRES_T);break;
- case 'a': PARSE_COMPACT(HDR_ACCEPTCONTACT_T); break;
- case 'u': PARSE_COMPACT(HDR_ALLOWEVENTS_T); break;
- case 'e': PARSE_COMPACT(HDR_CONTENTENCODING_T); break;
- case 'b': PARSE_COMPACT(HDR_REFERREDBY_T); break;
- case 'j': PARSE_COMPACT(HDR_REJECTCONTACT_T); break;
- case 'd': PARSE_COMPACT(HDR_REQUESTDISPOSITION_T); break;
- case 's': PARSE_COMPACT(HDR_SUBJECT_T); break;
- case 'r': PARSE_COMPACT(HDR_REFER_TO_T); break;
- case 'y': PARSE_COMPACT(HDR_IDENTITY_T); break;
- case 'n': PARSE_COMPACT(HDR_IDENTITY_INFO_T); break;
- }
- goto other;
- }
- /* Double colon hasn't been found yet */
- dc_end:
- p = skip_ws(p, end - p);
- if (*p != ':') {
- goto other;
- } else {
- hdr->name.len = p - hdr->name.s;
- return (p + 1);
- }
- /* Unknown header type */
- other:
- p = q_memchr(p, ':', end - p);
- if (!p) { /* No double colon found, error.. */
- hdr->type = HDR_ERROR_T;
- hdr->name.s = 0;
- hdr->name.len = 0;
- return 0;
- } else {
- hdr->type = HDR_OTHER_T;
- hdr->name.len = p - hdr->name.s;
- /*hdr_update_type(hdr);*/
- return (p + 1);
- }
- }
- /**
- * parse_hname2_short() - safer version to parse header name stored in short buffers
- * - parse_hanem2() reads 4 bytes at once, expecting to walk through a buffer
- * that contains more than the header name (e.g., sip msg buf, full header buf
- * with name and body)
- */
- char* parse_hname2_short(char* const begin, const char* const end, struct hdr_field* const hdr)
- {
- #define HBUF_MAX_SIZE 256
- char hbuf[HBUF_MAX_SIZE];
- char *p;
- if(end-begin>=HBUF_MAX_SIZE-4) {
- p = q_memchr(begin, ':', end - begin);
- if(p && p-4> begin) {
- /* header name termination char found and enough space in buffer after it */
- return parse_hname2(begin, end, hdr);
- }
- /* not enough space */
- LM_ERR("not enough space to parse the header name in [%.*s] (%d)\n",
- (int)(end-begin), begin, (int)(end-begin));
- return NULL;
- }
- /* pad with whitespace - tipycal char after the ':' of the header name */
- memset(hbuf, ' ', HBUF_MAX_SIZE);
- memcpy(hbuf, begin, end-begin);
- p = parse_hname2(hbuf, hbuf + 4 + (end-begin), hdr);
- if(!p) {
- LM_ERR("failed to parse the header name in [%.*s] (%d)\n",
- (int)(end-begin), begin, (int)(end-begin));
- return NULL;
- }
- return begin + (p-hbuf);
- }