1 /* $NetBSD: fix_grouping.c,v 1.7 2024/06/07 13:53:12 riastradh 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.7 2024/06/07 13:53:12 riastradh Exp $");
39 #endif /* LIBC_SCCS and not lint */
40
41 #include <limits.h>
42 #include <stddef.h>
43
44 #include "fix_grouping.h"
45
46 #ifndef NBCHAR_MAX
47 #define NBCHAR_MAX CHAR_MAX
48 #endif
49
50 #ifndef __UNCONST
51 #define __UNCONST(a) ((void *)(unsigned long)(const void *)(a))
52 #endif
53
54 static const char nogrouping[] = { NBCHAR_MAX, '\0' };
55
56 /* don't use libc's isdigit, it owes locale. */
57 #define isdigit(c) (c >= '0' && c <= '9')
58
59 /*
60 * Internal helper used to convert grouping sequences from string
61 * representation into POSIX specified form, i.e.
62 *
63 * "3;3;-1" -> "\003\003\177\000"
64 */
65
66 const char *
__fix_locale_grouping_str(const char * str)67 __fix_locale_grouping_str(const char *str)
68 {
69 char *src, *dst;
70 char n;
71
72 if (str == NULL || *str == '\0') {
73 return nogrouping;
74 }
75
76 for (src = __UNCONST(str), dst = __UNCONST(str); *src != '\0'; src++) {
77
78 /* input string examples: "3;3", "3;2;-1" */
79 if (*src == ';')
80 continue;
81
82 if (*src == '-' && *(src+1) == '1') {
83 *dst++ = NBCHAR_MAX;
84 src++;
85 continue;
86 }
87
88 if (!isdigit((unsigned char)*src)) {
89 /* broken grouping string */
90 return nogrouping;
91 }
92
93 /* assume all numbers <= 99 */
94 n = *src - '0';
95 if (isdigit((unsigned char)*(src+1))) {
96 src++;
97 n *= 10;
98 n += *src - '0';
99 }
100
101 *dst = n;
102 /* NOTE: assume all input started with "0" as 'no grouping' */
103 if (*dst == '\0')
104 return (dst == __UNCONST(str)) ? nogrouping : str;
105 dst++;
106 }
107 *dst = '\0';
108 return str;
109 }
110