1 /* $NetBSD: fix_grouping.c,v 1.4 2009/01/11 02:46:28 christos Exp $ */ 2 3 /* 4 * Copyright (c) 2001 Alexey Zelkin <phantom@FreeBSD.org> 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 * Original version ID: 29 * FreeBSD: fix_grouping.c,v 1.8 2003/06/26 10:46:16 phantom Exp 30 */ 31 32 #if HAVE_NBTOOL_CONFIG_H 33 #include "nbtool_config.h" 34 #endif 35 36 #include <sys/cdefs.h> 37 #if defined(LIBC_SCCS) && !defined(lint) 38 __RCSID("$NetBSD: fix_grouping.c,v 1.4 2009/01/11 02:46:28 christos Exp $"); 39 #endif /* LIBC_SCCS and not lint */ 40 41 #include <ctype.h> 42 #include <limits.h> 43 #include <stddef.h> 44 45 #include "fix_grouping.h" 46 47 #ifndef NBCHAR_MAX 48 #define NBCHAR_MAX CHAR_MAX 49 #endif 50 51 #ifndef __UNCONST 52 #define __UNCONST(a) ((void *)(unsigned long)(const void *)(a)) 53 #endif 54 55 static const char nogrouping[] = { NBCHAR_MAX, '\0' }; 56 57 /* don't use libc's isdigit, it owes locale. */ 58 #undef isdigit 59 #define isdigit(c) (c >= '0' && c <= '9') 60 61 /* 62 * Internal helper used to convert grouping sequences from string 63 * representation into POSIX specified form, i.e. 64 * 65 * "3;3;-1" -> "\003\003\177\000" 66 */ 67 68 const char * 69 __fix_locale_grouping_str(const char *str) 70 { 71 char *src, *dst; 72 char n; 73 74 if (str == NULL || *str == '\0') { 75 return nogrouping; 76 } 77 78 for (src = __UNCONST(str), dst = __UNCONST(str); *src != '\0'; src++) { 79 80 /* input string examples: "3;3", "3;2;-1" */ 81 if (*src == ';') 82 continue; 83 84 if (*src == '-' && *(src+1) == '1') { 85 *dst++ = NBCHAR_MAX; 86 src++; 87 continue; 88 } 89 90 if (!isdigit((unsigned char)*src)) { 91 /* broken grouping string */ 92 return nogrouping; 93 } 94 95 /* assume all numbers <= 99 */ 96 n = *src - '0'; 97 if (isdigit((unsigned char)*(src+1))) { 98 src++; 99 n *= 10; 100 n += *src - '0'; 101 } 102 103 *dst = n; 104 /* NOTE: assume all input started with "0" as 'no grouping' */ 105 if (*dst == '\0') 106 return (dst == __UNCONST(str)) ? nogrouping : str; 107 dst++; 108 } 109 *dst = '\0'; 110 return str; 111 } 112