1/* $FreeBSD$ */
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
42const char *
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
68const char *
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
112void *
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
137void
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