xref: /freebsd/lib/libc/iconv/citrus_memstream.c (revision 734e82fe33aa764367791a7d603b383996c6b40b)
1 /*	$NetBSD: citrus_memstream.c,v 1.5 2012/03/13 21:13:31 christos Exp $	*/
2 
3 /*-
4  * SPDX-License-Identifier: BSD-2-Clause
5  *
6  * Copyright (c)2003 Citrus Project,
7  * All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
19  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
22  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28  * SUCH DAMAGE.
29  */
30 
31 #include <sys/cdefs.h>
32 
33 #include <assert.h>
34 #include <stdio.h>
35 #include <stdlib.h>
36 #include <string.h>
37 
38 #include "citrus_namespace.h"
39 #include "citrus_region.h"
40 #include "citrus_memstream.h"
41 #include "citrus_bcs.h"
42 
43 const char *
44 _citrus_memory_stream_getln(struct _citrus_memory_stream * __restrict ms,
45     size_t * __restrict rlen)
46 {
47 	const uint8_t *h, *p;
48 	size_t i, ret;
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 *
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 *
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
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