1/* $FreeBSD$ */
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
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 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
69const 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
113void *
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
138void
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