xref: /netbsd-src/lib/libc/gen/stringlist.c (revision 2a399c6883d870daece976daec6ffa7bb7f934ce)
1 /*	$NetBSD: stringlist.c,v 1.5 1997/09/29 06:52:40 enami 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.5 1997/09/29 06:52:40 enami Exp $");
37 #endif /* LIBC_SCCS and not lint */
38 
39 #include "namespace.h"
40 #include <stdio.h>
41 #include <string.h>
42 #include <err.h>
43 #include <stdlib.h>
44 #include <stringlist.h>
45 
46 #ifdef __weak_alias
47 __weak_alias(sl_add,_sl_add);
48 __weak_alias(sl_find,_sl_find);
49 __weak_alias(sl_free,_sl_free);
50 __weak_alias(sl_init,_sl_init);
51 #endif
52 
53 #define _SL_CHUNKSIZE	20
54 
55 /*
56  * sl_init(): Initialize a string list
57  */
58 StringList *
59 sl_init()
60 {
61 	StringList *sl = malloc(sizeof(StringList));
62 	if (sl == NULL)
63 		err(1, "stringlist");
64 
65 	sl->sl_cur = 0;
66 	sl->sl_max = _SL_CHUNKSIZE;
67 	sl->sl_str = malloc(sl->sl_max * sizeof(char *));
68 	if (sl->sl_str == NULL)
69 		err(1, "stringlist");
70 	return sl;
71 }
72 
73 
74 /*
75  * sl_add(): Add an item to the string list
76  */
77 void
78 sl_add(sl, name)
79 	StringList *sl;
80 	char *name;
81 {
82 	if (sl->sl_cur == sl->sl_max - 1) {
83 		sl->sl_max += _SL_CHUNKSIZE;
84 		sl->sl_str = realloc(sl->sl_str, sl->sl_max * sizeof(char *));
85 		if (sl->sl_str == NULL)
86 			err(1, "stringlist");
87 	}
88 	sl->sl_str[sl->sl_cur++] = name;
89 }
90 
91 
92 /*
93  * sl_free(): Free a stringlist
94  */
95 void
96 sl_free(sl, all)
97 	StringList *sl;
98 	int all;
99 {
100 	size_t i;
101 
102 	if (sl == NULL)
103 		return;
104 	if (sl->sl_str) {
105 		if (all)
106 			for (i = 0; i < sl->sl_cur; i++)
107 				free(sl->sl_str[i]);
108 		free(sl->sl_str);
109 	}
110 	free(sl);
111 }
112 
113 
114 /*
115  * sl_find(): Find a name in the string list
116  */
117 char *
118 sl_find(sl, name)
119 	StringList *sl;
120 	char *name;
121 {
122 	size_t i;
123 
124 	for (i = 0; i < sl->sl_cur; i++)
125 		if (strcmp(sl->sl_str[i], name) == 0)
126 			return sl->sl_str[i];
127 
128 	return NULL;
129 }
130