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