1 /* $NetBSD: citrus_memstream.c,v 1.5 2012/03/13 21:13:31 christos Exp $ */
2
3 /*-
4 * Copyright (c)2003 Citrus Project,
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30 #if defined(LIBC_SCCS) && !defined(lint)
31 __RCSID("$NetBSD: citrus_memstream.c,v 1.5 2012/03/13 21:13:31 christos Exp $");
32 #endif /* LIBC_SCCS and not lint */
33
34 #include "namespace.h"
35 #include <assert.h>
36 #include <stdio.h>
37 #include <stdlib.h>
38 #include <string.h>
39
40 #include "citrus_namespace.h"
41 #include "citrus_region.h"
42 #include "citrus_memstream.h"
43 #include "citrus_bcs.h"
44
45 const char *
_citrus_memory_stream_getln(struct _citrus_memory_stream * __restrict ms,size_t * __restrict rlen)46 _citrus_memory_stream_getln(struct _citrus_memory_stream * __restrict ms,
47 size_t * __restrict rlen)
48 {
49 size_t i;
50 const uint8_t *h, *p;
51 size_t ret;
52
53 if (ms->ms_pos>=_region_size(&ms->ms_region))
54 return (NULL);
55
56 h = p = (uint8_t *)_region_offset(&ms->ms_region, ms->ms_pos);
57 ret = 0;
58 for (i = _region_size(&ms->ms_region) - ms->ms_pos; i > 0; i--) {
59 ret++;
60 if (_bcs_iseol(*p))
61 break;
62 p++;
63 }
64
65 ms->ms_pos += ret;
66 *rlen = ret;
67 return ((const char *)h);
68 }
69
70 #define T_COMM '#'
71
72 const char *
_citrus_memory_stream_matchline(struct _citrus_memory_stream * __restrict ms,const char * __restrict key,size_t * __restrict rlen,int iscasesensitive)73 _citrus_memory_stream_matchline(struct _citrus_memory_stream * __restrict ms,
74 const char * __restrict key,
75 size_t * __restrict rlen,
76 int iscasesensitive)
77 {
78 const char *p, *q;
79 size_t len, keylen;
80
81 keylen = strlen(key);
82 while (/*CONSTCOND*/ 1) {
83 p = _citrus_memory_stream_getln(ms, &len);
84 if (p == NULL)
85 return (NULL);
86
87 /* ignore comment */
88 q = memchr(p, T_COMM, len);
89 if (q) {
90 len = q-p;
91 }
92 /* ignore trailing white space and newline */
93 _bcs_trunc_rws_len(p, &len);
94 if (len == 0)
95 continue; /* ignore null line */
96
97 /* skip white spaces at the head of the line */
98 p = _bcs_skip_ws_len(p, &len);
99 q = _bcs_skip_nonws_len(p, &len);
100
101 if ((size_t)(q-p) == keylen) {
102 if (iscasesensitive) {
103 if (memcmp(key, p, keylen) == 0)
104 break; /* match */
105 } else {
106 if (_bcs_strncasecmp(key, p, keylen) == 0)
107 break; /* match */
108 }
109 }
110 }
111
112 p = _bcs_skip_ws_len(q, &len);
113 *rlen = len;
114
115 return (p);
116 }
117
118 void *
_citrus_memory_stream_chr(struct _citrus_memory_stream * ms,struct _citrus_region * r,char ch)119 _citrus_memory_stream_chr(struct _citrus_memory_stream *ms,
120 struct _citrus_region *r, char ch)
121 {
122 void *head, *chr;
123 size_t sz;
124
125 if (ms->ms_pos >= _region_size(&ms->ms_region))
126 return NULL;
127
128 head = _region_offset(&ms->ms_region, ms->ms_pos);
129 chr = memchr(head, ch, _memstream_remainder(ms));
130 if (chr == NULL) {
131 _region_init(r, head, _memstream_remainder(ms));
132 ms->ms_pos = _region_size(&ms->ms_region);
133 return NULL;
134 }
135 sz = (char *)chr - (char *)head;
136
137 _region_init(r, head, sz);
138 ms->ms_pos += sz+1;
139
140 return chr;
141 }
142
143 void
_citrus_memory_stream_skip_ws(struct _citrus_memory_stream * ms)144 _citrus_memory_stream_skip_ws(struct _citrus_memory_stream *ms)
145 {
146 int ch;
147
148 while ((ch = _memstream_peek(ms)) != EOF) {
149 if (!_bcs_isspace(ch))
150 break;
151 _memstream_getc(ms);
152 }
153 }
154