citrus_memstream.c revision 264497
1/* $FreeBSD: stable/10/lib/libc/iconv/citrus_memstream.c 264497 2014-04-15 09:49:44Z 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 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