1 /* $FreeBSD: head/lib/libc/iconv/citrus_memstream.c 263986 2014-04-01 10:36:11Z tijl $ */
2 /* $NetBSD: citrus_memstream.c,v 1.5 2012/03/13 21:13:31 christos 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 i, ret;
48
49 if (ms->ms_pos>=_region_size(&ms->ms_region))
50 return (NULL);
51
52 h = p = (uint8_t *)_region_offset(&ms->ms_region, ms->ms_pos);
53 ret = 0;
54 for (i = _region_size(&ms->ms_region) - ms->ms_pos; i > 0; i--) {
55 ret++;
56 if (_bcs_iseol(*p))
57 break;
58 p++;
59 }
60
61 ms->ms_pos += ret;
62 *rlen = ret;
63 return ((const char *)h);
64 }
65
66 #define T_COMM '#'
67
68 const char *
_citrus_memory_stream_matchline(struct _citrus_memory_stream * __restrict ms,const char * __restrict key,size_t * __restrict rlen,int iscasesensitive)69 _citrus_memory_stream_matchline(struct _citrus_memory_stream * __restrict ms,
70 const char * __restrict key, size_t * __restrict rlen, int iscasesensitive)
71 {
72 const char *p, *q;
73 size_t keylen, len;
74
75 keylen = strlen(key);
76 for(;;) {
77 p = _citrus_memory_stream_getln(ms, &len);
78 if (p == NULL)
79 return (NULL);
80
81 /* ignore comment */
82 q = memchr(p, T_COMM, len);
83 if (q) {
84 len = q - p;
85 }
86 /* ignore trailing white space and newline */
87 _bcs_trunc_rws_len(p, &len);
88 if (len == 0)
89 continue; /* ignore null line */
90
91 /* skip white spaces at the head of the line */
92 p = _bcs_skip_ws_len(p, &len);
93 q = _bcs_skip_nonws_len(p, &len);
94
95 if ((size_t)(q - p) == keylen) {
96 if (iscasesensitive) {
97 if (memcmp(key, p, keylen) == 0)
98 break; /* match */
99 } else {
100 if (_bcs_strncasecmp(key, p, keylen) == 0)
101 break; /* match */
102 }
103 }
104 }
105
106 p = _bcs_skip_ws_len(q, &len);
107 *rlen = len;
108
109 return (p);
110 }
111
112 void *
_citrus_memory_stream_chr(struct _citrus_memory_stream * ms,struct _citrus_region * r,char ch)113 _citrus_memory_stream_chr(struct _citrus_memory_stream *ms,
114 struct _citrus_region *r, char ch)
115 {
116 void *chr, *head;
117 size_t sz;
118
119 if (ms->ms_pos >= _region_size(&ms->ms_region))
120 return (NULL);
121
122 head = _region_offset(&ms->ms_region, ms->ms_pos);
123 chr = memchr(head, ch, _memstream_remainder(ms));
124 if (chr == NULL) {
125 _region_init(r, head, _memstream_remainder(ms));
126 ms->ms_pos = _region_size(&ms->ms_region);
127 return (NULL);
128 }
129 sz = (char *)chr - (char *)head;
130
131 _region_init(r, head, sz);
132 ms->ms_pos += sz + 1;
133
134 return (chr);
135 }
136
137 void
_citrus_memory_stream_skip_ws(struct _citrus_memory_stream * ms)138 _citrus_memory_stream_skip_ws(struct _citrus_memory_stream *ms)
139 {
140 int ch;
141
142 while ((ch = _memstream_peek(ms)) != EOF) {
143 if (!_bcs_isspace(ch))
144 break;
145 _memstream_getc(ms);
146 }
147 }
148