gen/FreeBSD/stringlist.c

   1 /*
   2  * Copyright (c) 1994 Christos Zoulas
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by Christos Zoulas.
  16  * 4. The name of the author may not be used to endorse or promote products
  17  *    derived from this software without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
  20  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  21  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
  23  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  29  * SUCH DAMAGE.
  30  */
  31
  32 #if defined(LIBC_SCCS) && !defined(lint)
  33 static char *rcsid = "$NetBSD: stringlist.c,v 1.2 1997/01/17 07:26:20 lukem Exp $";
  34 #endif /* LIBC_SCCS and not lint */
  35 #include <sys/cdefs.h>
  36 __FBSDID("$FreeBSD: src/lib/libc/gen/stringlist.c,v 1.7 2003/01/19 01:16:01 obrien Exp $");
  37
  38 #include "namespace.h"
  39 #include <stdio.h>
  40 #include <string.h>
  41 #include <err.h>
  42 #include <stdlib.h>
  43 #include <stringlist.h>
  44 #include "un-namespace.h"
  45
  46 #define _SL_CHUNKSIZE   20
  47
  48 /*
  49  * sl_init(): Initialize a string list
  50  */
  51 StringList *
  52 sl_init()
  53 {
  54         StringList *sl;
  55
  56         sl = malloc(sizeof(StringList));
  57         if (sl == NULL)
  58                 _err(1, "stringlist: %m");
  59
  60         sl->sl_cur = 0;
  61         sl->sl_max = _SL_CHUNKSIZE;
  62         sl->sl_str = malloc(sl->sl_max * sizeof(char *));
  63         if (sl->sl_str == NULL)
  64                 _err(1, "stringlist: %m");
  65         return sl;
  66 }
  67
  68
  69 /*
  70  * sl_add(): Add an item to the string list
  71  */
  72 int
  73 sl_add(sl, name)
  74         StringList *sl;
  75         char *name;
  76 {
  77         if (sl->sl_cur == sl->sl_max - 1) {
  78                 sl->sl_max += _SL_CHUNKSIZE;
  79                 sl->sl_str = reallocf(sl->sl_str, sl->sl_max * sizeof(char *));
  80                 if (sl->sl_str == NULL)
  81                         return (-1);
  82         }
  83         sl->sl_str[sl->sl_cur++] = name;
  84         return (0);
  85 }
  86
  87
  88 /*
  89  * sl_free(): Free a stringlist
  90  */
  91 void
  92 sl_free(sl, all)
  93         StringList *sl;
  94         int all;
  95 {
  96         size_t i;
  97
  98         if (sl == NULL)
  99                 return;
 100         if (sl->sl_str) {
 101                 if (all)
 102                         for (i = 0; i < sl->sl_cur; i++)
 103                                 free(sl->sl_str[i]);
 104                 free(sl->sl_str);
 105         }
 106         free(sl);
 107 }
 108
 109
 110 /*
 111  * sl_find(): Find a name in the string list
 112  */
 113 char *
 114 sl_find(sl, name)
 115         StringList *sl;
 116         char *name;
 117 {
 118         size_t i;
 119
 120         for (i = 0; i < sl->sl_cur; i++)
 121                 if (strcmp(sl->sl_str[i], name) == 0)
 122                         return sl->sl_str[i];
 123
 124         return NULL;
 125 }