1 /* $NetBSD: citrus_bcs.c,v 1.5 2005/05/14 17:55:42 tshiozak Exp $ */
2
3 /*-
4 * Copyright (c)2003 Citrus Project,
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #if HAVE_NBTOOL_CONFIG_H
30 #include "nbtool_config.h"
31 #endif
32
33 #include <sys/cdefs.h>
34 #if defined(LIBC_SCCS) && !defined(lint)
35 __RCSID("$NetBSD: citrus_bcs.c,v 1.5 2005/05/14 17:55:42 tshiozak Exp $");
36 #endif /* LIBC_SCCS and not lint */
37
38 #ifndef HOSTPROG
39 #include "namespace.h"
40 #endif
41 #include <assert.h>
42 #include <stdlib.h>
43
44 #include "citrus_namespace.h"
45 #include "citrus_bcs.h"
46
47 /*
48 * case insensitive comparison between two C strings.
49 */
50 int
_citrus_bcs_strcasecmp(const char * __restrict str1,const char * __restrict str2)51 _citrus_bcs_strcasecmp(const char * __restrict str1,
52 const char * __restrict str2)
53 {
54 int c1 = 1, c2 = 1;
55
56 while (c1 && c2 && c1 == c2) {
57 c1 = _bcs_toupper(*str1++);
58 c2 = _bcs_toupper(*str2++);
59 }
60
61 return ((c1 == c2) ? 0 : ((c1 > c2) ? 1 : -1));
62 }
63
64 /*
65 * case insensitive comparison between two C strings with limitation of length.
66 */
67 int
_citrus_bcs_strncasecmp(const char * __restrict str1,const char * __restrict str2,size_t sz)68 _citrus_bcs_strncasecmp(const char * __restrict str1,
69 const char * __restrict str2, size_t sz)
70 {
71 int c1 = 1, c2 = 1;
72
73 while (c1 && c2 && c1 == c2 && sz != 0) {
74 c1 = _bcs_toupper(*str1++);
75 c2 = _bcs_toupper(*str2++);
76 sz--;
77 }
78
79 return ((c1 == c2) ? 0 : ((c1 > c2) ? 1 : -1));
80 }
81
82 /*
83 * skip white space characters.
84 */
85 const char *
_citrus_bcs_skip_ws(const char * p)86 _citrus_bcs_skip_ws(const char *p)
87 {
88
89 while (*p && _bcs_isspace(*p))
90 p++;
91
92 return (p);
93 }
94
95 /*
96 * skip non white space characters.
97 */
98 const char *
_citrus_bcs_skip_nonws(const char * p)99 _citrus_bcs_skip_nonws(const char *p)
100 {
101
102 while (*p && !_bcs_isspace(*p))
103 p++;
104
105 return (p);
106 }
107
108 /*
109 * skip white space characters with limitation of length.
110 */
111 const char *
_citrus_bcs_skip_ws_len(const char * __restrict p,size_t * __restrict len)112 _citrus_bcs_skip_ws_len(const char * __restrict p, size_t * __restrict len)
113 {
114
115 while (*p && *len > 0 && _bcs_isspace(*p)) {
116 p++;
117 (*len)--;
118 }
119
120 return (p);
121 }
122
123 /*
124 * skip non white space characters with limitation of length.
125 */
126 const char *
_citrus_bcs_skip_nonws_len(const char * __restrict p,size_t * __restrict len)127 _citrus_bcs_skip_nonws_len(const char * __restrict p, size_t * __restrict len)
128 {
129
130 while (*p && *len > 0 && !_bcs_isspace(*p)) {
131 p++;
132 (*len)--;
133 }
134
135 return (p);
136 }
137
138 /*
139 * truncate trailing white space characters.
140 */
141 void
_citrus_bcs_trunc_rws_len(const char * __restrict p,size_t * __restrict len)142 _citrus_bcs_trunc_rws_len(const char * __restrict p, size_t * __restrict len)
143 {
144
145 while (*len > 0 && _bcs_isspace(p[*len - 1]))
146 (*len)--;
147 }
148
149 /*
150 * destructive transliterate to lowercase.
151 */
152 void
_citrus_bcs_convert_to_lower(char * s)153 _citrus_bcs_convert_to_lower(char *s)
154 {
155 while (*s) {
156 *s = _bcs_tolower(*s);
157 s++;
158 }
159 }
160
161 /*
162 * destructive transliterate to uppercase.
163 */
164 void
_citrus_bcs_convert_to_upper(char * s)165 _citrus_bcs_convert_to_upper(char *s)
166 {
167 while (*s) {
168 *s = _bcs_toupper(*s);
169 s++;
170 }
171 }
172