Home | History | Annotate | Line # | Download | only in citrus 
      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
     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
     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 *
     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 *
     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 *
    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 *
    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
    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
    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
    165 _citrus_bcs_convert_to_upper(char *s)
    166 {
    167 	while (*s) {
    168 		*s = _bcs_toupper(*s);
    169 		s++;
    170 	}
    171 }
    172