xref: /netbsd/external/cddl/osnet/sys/kern/string.c (revision 6550d01e)
1 /*	$NetBSD: string.c,v 1.2 2010/12/14 01:01:40 haad Exp $	*/
2 
3 /*
4  * CDDL HEADER START
5  *
6  * The contents of this file are subject to the terms of the
7  * Common Development and Distribution License (the "License").
8  * You may not use this file except in compliance with the License.
9  *
10  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
11  * or http://www.opensolaris.org/os/licensing.
12  * See the License for the specific language governing permissions
13  * and limitations under the License.
14  *
15  * When distributing Covered Code, include this CDDL HEADER in each
16  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
17  * If applicable, add the following below this CDDL HEADER, with the
18  * fields enclosed by brackets "[]" replaced with your own identifying
19  * information: Portions Copyright [yyyy] [name of copyright owner]
20  *
21  * CDDL HEADER END
22  */
23 /*
24  * Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
25  * Use is subject to license terms.
26  */
27 
28 #include <sys/param.h>
29 #include <sys/string.h>
30 
31 #define	IS_DIGIT(c)	((c) >= '0' && (c) <= '9')
32 
33 #define	IS_ALPHA(c)	\
34 	(((c) >= 'a' && (c) <= 'z') || ((c) >= 'A' && (c) <= 'Z'))
35 
36 char *
37 strpbrk(const char *s, const char *b)
38 {
39 	const char *p;
40 
41 	do {
42 		for (p = b; *p != '\0' && *p != *s; ++p)
43 			;
44 		if (*p != '\0')
45 			return ((char *)s);
46 	} while (*s++);
47 
48 	return (NULL);
49 }
50 
51 /*
52  * Convert a string into a valid C identifier by replacing invalid
53  * characters with '_'.  Also makes sure the string is nul-terminated
54  * and takes up at most n bytes.
55  */
56 void
57 strident_canon(char *s, size_t n)
58 {
59 	char c;
60 	char *end = s + n - 1;
61 
62 	if ((c = *s) == 0)
63 		return;
64 
65 	if (!IS_ALPHA(c) && c != '_')
66 		*s = '_';
67 
68 	while (s < end && ((c = *(++s)) != 0)) {
69 		if (!IS_ALPHA(c) && !IS_DIGIT(c) && c != '_')
70 			*s = '_';
71 	}
72 	*s = 0;
73 }
74 
75 /*
76  * Simple-minded conversion of a long into a null-terminated character
77  * string.  Caller must ensure there's enough space to hold the result.
78  */
79 void
80 numtos(unsigned long num, char *s)
81 {
82 	char prbuf[40];
83 
84 	char *cp = prbuf;
85 
86 	do {
87 		*cp++ = "0123456789"[num % 10];
88 		num /= 10;
89 	} while (num);
90 
91 	do {
92 		*s++ = *--cp;
93 	} while (cp > prbuf);
94 	*s = '\0';
95 }
96