xref: /netbsd-src/lib/libc/gen/stringlist.c (revision 3b435a73967be44dfb4a27315acd72bfacde430c)
1 /*	$NetBSD: stringlist.c,v 1.6 1999/09/16 11:45:05 lukem Exp $	*/
2 
3 /*
4  * Copyright (c) 1994 Christos Zoulas
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  * 3. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *	This product includes software developed by Christos Zoulas.
18  * 4. The name of the author may not be used to endorse or promote products
19  *    derived from this software without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
22  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
23  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
25  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33 
34 #include <sys/cdefs.h>
35 #if defined(LIBC_SCCS) && !defined(lint)
36 __RCSID("$NetBSD: stringlist.c,v 1.6 1999/09/16 11:45:05 lukem Exp $");
37 #endif /* LIBC_SCCS and not lint */
38 
39 #include "namespace.h"
40 
41 #include <assert.h>
42 #include <err.h>
43 #include <stdio.h>
44 #include <stdlib.h>
45 #include <string.h>
46 #include <stringlist.h>
47 
48 #ifdef __weak_alias
49 __weak_alias(sl_add,_sl_add);
50 __weak_alias(sl_find,_sl_find);
51 __weak_alias(sl_free,_sl_free);
52 __weak_alias(sl_init,_sl_init);
53 #endif
54 
55 #define _SL_CHUNKSIZE	20
56 
57 /*
58  * sl_init(): Initialize a string list
59  */
60 StringList *
61 sl_init()
62 {
63 	StringList *sl;
64 
65 	sl = malloc(sizeof(StringList));
66 	if (sl == NULL)
67 		err(1, "stringlist");
68 
69 	sl->sl_cur = 0;
70 	sl->sl_max = _SL_CHUNKSIZE;
71 	sl->sl_str = malloc(sl->sl_max * sizeof(char *));
72 	if (sl->sl_str == NULL)
73 		err(1, "stringlist");
74 	return sl;
75 }
76 
77 
78 /*
79  * sl_add(): Add an item to the string list
80  */
81 void
82 sl_add(sl, name)
83 	StringList *sl;
84 	char *name;
85 {
86 
87 	_DIAGASSERT(sl != NULL);
88 
89 	if (sl->sl_cur == sl->sl_max - 1) {
90 		sl->sl_max += _SL_CHUNKSIZE;
91 		sl->sl_str = realloc(sl->sl_str, sl->sl_max * sizeof(char *));
92 		if (sl->sl_str == NULL)
93 			err(1, "stringlist");
94 	}
95 	sl->sl_str[sl->sl_cur++] = name;
96 }
97 
98 
99 /*
100  * sl_free(): Free a stringlist
101  */
102 void
103 sl_free(sl, all)
104 	StringList *sl;
105 	int all;
106 {
107 	size_t i;
108 
109 	if (sl == NULL)
110 		return;
111 	if (sl->sl_str) {
112 		if (all)
113 			for (i = 0; i < sl->sl_cur; i++)
114 				free(sl->sl_str[i]);
115 		free(sl->sl_str);
116 	}
117 	free(sl);
118 }
119 
120 
121 /*
122  * sl_find(): Find a name in the string list
123  */
124 char *
125 sl_find(sl, name)
126 	StringList *sl;
127 	char *name;
128 {
129 	size_t i;
130 
131 	_DIAGASSERT(sl != NULL);
132 
133 	for (i = 0; i < sl->sl_cur; i++)
134 			/*
135 			 * XXX check sl->sl_str[i] != NULL?
136 			 */
137 		if (strcmp(sl->sl_str[i], name) == 0)
138 			return sl->sl_str[i];
139 
140 	return NULL;
141 }
142