external/bsd/bind/dist/contrib/zkt-1.1.3/strlist.c

   1 /*      $NetBSD: strlist.c,v 1.1.1.1 2015/07/08 15:37:48 christos Exp $ */
   2
   3 /*****************************************************************
   4 **
   5 **      @(#) strlist.c (c) Mar 2005  Holger Zuleger
   6 **
   7 **      TODO:   Maybe we should use a special type for the list:
   8 **              typedef struct { char cnt; char list[0+1]; } strlist__t;
   9 **              This results in better type control of the function parameters
  10 **
  11 **      Copyright (c) Mar 2005, Holger Zuleger HZnet. All rights reserved.
  12 **
  13 **      This software is open source.
  14 **
  15 **      Redistribution and use in source and binary forms, with or without
  16 **      modification, are permitted provided that the following conditions
  17 **      are met:
  18 **
  19 **      Redistributions of source code must retain the above copyright notice,
  20 **      this list of conditions and the following disclaimer.
  21 **
  22 **      Redistributions in binary form must reproduce the above copyright notice,
  23 **      this list of conditions and the following disclaimer in the documentation
  24 **      and/or other materials provided with the distribution.
  25 **
  26 **      Neither the name of Holger Zuleger HZnet nor the names of its contributors may
  27 **      be used to endorse or promote products derived from this software without
  28 **      specific prior written permission.
  29 **
  30 **      THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  31 **      "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  32 **      TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  33 **      PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE
  34 **      LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  35 **      CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  36 **      SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  37 **      INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  38 **      CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  39 **      ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  40 **      POSSIBILITY OF SUCH DAMAGE.
  41 **
  42 *****************************************************************/
  43
  44 #ifdef TEST
  45 # include <stdio.h>
  46 #endif
  47 #include <string.h>
  48 #include <stdlib.h>
  49 #include "strlist.h"
  50
  51
  52 /*****************************************************************
  53 **      prepstrlist (str, delim)
  54 **      prepare a string with delimiters to a so called strlist.
  55 **      'str' is a list of substrings delimited by 'delim'
  56 **      The # of strings is stored at the first byte of the allocated
  57 **      memory. Every substring is stored as a '\0' terminated C-String.
  58 **      The function returns a pointer to dynamic allocated memory
  59 *****************************************************************/
  60 char    *prepstrlist (const char *str, const char *delim)
  61 {
  62         char    *p;
  63         char    *new;
  64         int     len;
  65         int     cnt;
  66
  67         if ( str == NULL )
  68                 return NULL;
  69
  70         len = strlen (str);
  71         if ( (new = malloc (len + 2)) == NULL )
  72                 return new;
  73
  74         cnt = 0;
  75         p = new;
  76         for ( *p++ = '\0'; *str; str++ )
  77         {
  78                 if ( strchr (delim, *str) == NULL )
  79                         *p++ = *str;
  80                 else if ( p[-1] != '\0' )
  81                 {
  82                         *p++ = '\0';
  83                         cnt++;
  84                 }
  85         }
  86         *p = '\0';      /*terminate string */
  87         if ( p[-1] != '\0' )
  88                 cnt++;
  89         *new = cnt & 0xFF;
  90
  91         return new;
  92 }
  93
  94 /*****************************************************************
  95 **      isinlist (str, list)
  96 **      check if 'list' contains 'str'
  97 *****************************************************************/
  98 int     isinlist (const char *str, const char *list)
  99 {
 100         int     cnt;
 101
 102         if ( list == NULL || *list == '\0' )
 103                 return 1;
 104         if ( str == NULL || *str == '\0' )
 105                 return 0;
 106
 107         cnt = *list;
 108         while ( cnt-- > 0 )
 109         {
 110                 list++;
 111                 if ( strcmp (str, list) == 0 )
 112                         return 1;
 113                 list += strlen (list);
 114         }
 115
 116         return 0;
 117 }
 118
 119 /*****************************************************************
 120 **      unprepstrlist (list, delimc)
 121 *****************************************************************/
 122 char    *unprepstrlist (char *list, char delimc)
 123 {
 124         char    *p;
 125         int     cnt;
 126
 127         cnt = *list & 0xFF;
 128         p = list;
 129         for ( *p++ = delimc; cnt > 1; p++ )
 130                 if ( *p == '\0' )
 131                 {
 132                         *p = delimc;
 133                         cnt--;
 134                 }
 135
 136         return list;
 137 }
 138
 139 #ifdef TEST
 140 main (int argc, char *argv[])
 141 {
 142         FILE    *fp;
 143         char    *p;
 144         char    *searchlist = NULL;
 145         char    group[255];
 146
 147         if ( argc > 1 )
 148                 searchlist = prepstrlist (argv[1], LISTDELIM);
 149
 150         printf ("searchlist: %d entrys: \n", searchlist[0]);
 151         if ( (fp = fopen ("/etc/group", "r")) == NULL )
 152                 exit (fprintf (stderr, "can't open file\n"));
 153
 154         while ( fscanf (fp, "%[^:]:%*[^\n]\n", group) != EOF )
 155                 if ( isinlist (group, searchlist) )
 156                         printf ("%s\n", group);
 157
 158         fclose (fp);
 159
 160         printf ("searchlist: \"%s\"\n", unprepstrlist  (searchlist, *LISTDELIM));
 161         for ( p = searchlist; *p; p++ )
 162                 if ( *p < 32 )
 163                         printf ("<%d>", *p);
 164                 else
 165                         printf ("%c", *p);
 166         printf ("\n");
 167 }
 168 #endif