1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
|
/*-
* Copyright (c) 2006 Verdens Gang AS
* Copyright (c) 2006-2009 Varnish Software AS
* All rights reserved.
*
* Author: Poul-Henning Kamp <phk@phk.freebsd.dk>
*
* SPDX-License-Identifier: BSD-2-Clause
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
*/
/* from libvarnish/vct.c */
#include "vas.h"
#define VCT_OWS (1<<0)
#define VCT_CRLF (1<<1)
#define VCT_LWS (VCT_CRLF | VCT_OWS)
#define VCT_CTL (1<<2)
#define VCT_ALPHA (1<<3)
#define VCT_SEPARATOR (1<<4)
#define VCT_DIGIT (1<<5)
#define VCT_HEX (1<<6)
#define VCT_XMLNAMESTART (1<<7)
#define VCT_XMLNAME (1<<8)
#define VCT_TCHAR (1<<9)
#define VCT_ID (1<<10)
#define VCT_IDENT (VCT_ALPHA | VCT_DIGIT | VCT_ID)
#define VCT_BASE64 (1<<11)
#define VCT_VT (1<<12)
#define VCT_SPACE (VCT_LWS | VCT_VT)
#define VCT_UPPER (1<<13)
#define VCT_LOWER (1<<14)
extern const uint16_t vct_typtab[256];
extern const uint8_t vct_lowertab[256];
const char *VCT_invalid_name(const char *b, const char *e);
static inline int
vct_is(int x, uint16_t y)
{
x &= 0xff;
return (vct_typtab[x] & (y));
}
#define vct_isows(x) vct_is(x, VCT_OWS)
#define vct_issp(x) vct_is(x, VCT_OWS)
#define vct_ishex(x) vct_is(x, VCT_HEX)
#define vct_islws(x) vct_is(x, VCT_LWS)
#define vct_isctl(x) vct_is(x, VCT_CTL)
#define vct_isspace(x) vct_is(x, VCT_SPACE)
#define vct_isdigit(x) vct_is(x, VCT_DIGIT)
#define vct_isalpha(x) vct_is(x, VCT_ALPHA)
#define vct_islower(x) vct_is(x, VCT_LOWER)
#define vct_isupper(x) vct_is(x, VCT_UPPER)
#define vct_isalnum(x) vct_is(x, VCT_ALPHA | VCT_DIGIT)
#define vct_isbase64(x) vct_is(x, VCT_BASE64)
#define vct_issep(x) vct_is(x, VCT_SEPARATOR)
#define vct_issepctl(x) vct_is(x, VCT_SEPARATOR | VCT_CTL)
#define vct_isident1(x) vct_isalpha(x)
#define vct_isident(x) vct_is(x, VCT_IDENT)
#define vct_isxmlnamestart(x) vct_is(x, VCT_XMLNAMESTART)
#define vct_isxmlname(x) vct_is(x, VCT_XMLNAMESTART | VCT_XMLNAME)
#define vct_istchar(x) vct_is(x, VCT_ALPHA | VCT_DIGIT | VCT_TCHAR)
#define vct_ishdrval(x) \
(((uint8_t)(x) >= 0x20 && (uint8_t)(x) != 0x7f) ||(uint8_t)(x) == 0x09)
static inline int
vct_iscrlf(const char* p, const char* end)
{
assert(p <= end);
if (p == end)
return (0);
if ((p[0] == 0x0d && (p+1 < end) && p[1] == 0x0a)) // CR LF
return (2);
if (p[0] == 0x0a) // LF
return (1);
return (0);
}
/* NB: VCT always operate in ASCII, don't replace 0x0d with \r etc. */
static inline char*
vct_skipcrlf(char* p, const char* end)
{
return (p + vct_iscrlf(p, end));
}
static inline int
vct_casecmp(const void *a, const void *b)
{
const uint8_t *aa = a;
const uint8_t *bb = b;
while (*aa && vct_lowertab[*aa] == vct_lowertab[*bb]) {
aa++;
bb++;
}
if (!*aa && !*bb)
return (0);
if (!*aa)
return (-1);
if (!*bb)
return (1);
return ((int)vct_lowertab[*aa] - (int)vct_lowertab[*bb]);
}
static inline int
vct_caselencmp(const void *a, const void *b, ssize_t sz)
{
const uint8_t *aa = a;
const uint8_t *bb = b;
assert(sz >= 0);
while (sz > 0 && *aa && vct_lowertab[*aa] == vct_lowertab[*bb]) {
aa++;
bb++;
sz--;
}
if (!sz || (!*aa && !*bb))
return (0);
if (!*aa)
return (-1);
if (!*bb)
return (1);
return ((int)vct_lowertab[*aa] - (int)vct_lowertab[*bb]);
}
|
