You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
kamailio/parser/parse_hname2.c

279 lines
7.9 KiB

/*
* $Id$
*
* Fast 32-bit Header Field Name Parser
*
* Copyright (C) 2001-2003 FhG Fokus
*
* This file is part of ser, a free SIP server.
*
* ser 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
*
* For a license to use the ser software under conditions
* other than those described here, or to purchase support for this
* software, please contact iptel.org by e-mail at the following addresses:
* info@iptel.org
*
* ser 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
*
* History:
* --------
* 2003-02-28 scratchpad compatibility abandoned (jiri)
* 2003-01-27 next baby-step to removing ZT - PRESERVE_ZT (jiri)
* 2003-05-01 added support for Accept HF (janakj)
* 2007-01-26 Date, Identity, Identity_info HF support added (gergo)
* 2007-07-27 added support for Retry-After (andrei)
*/
/** 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 READ(val) \
(*(val + 0) + (*(val + 1) << 8) + (*(val + 2) << 16) + (*(val + 3) << 24))
#define READ3(val) \
(*(val + 0) + (*(val + 1) << 8) + (*(val + 2) << 16))
#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); \
}
#if 0
int hdr_update_type(struct hdr_field* hdr)
{
if(hdr==0 || hdr->name.s==0)
return -1;
switch(hdr->name.len) {
case 19:
if(strncasecmp(hdr->name.s, "P-Asserted-Identity", 19)==0)
hdr->type = HDR_PAI_T;
break;
case 20:
if(strncasecmp(hdr->name.s, "P-Preferred-Identity", 20)==0)
hdr->type = HDR_PPI_T;
break;
}
return 0;
}
#endif
char* parse_hname2(char* begin, char* end, struct hdr_field* 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);
}
}