git.sur5r.net Git - openldap/blob - libraries/libldap/charray.c

   1 /* $OpenLDAP$ */
   2 /*
   3  * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
   4  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   5  */
   6 /* charray.c - routines for dealing with char * arrays */
   7
   8 #include "portable.h"
   9
  10 #include <stdio.h>
  11
  12 #include <ac/string.h>
  13 #include <ac/socket.h>
  14
  15 #include "ldap-int.h"
  16
  17 int
  18 ldap_charray_add(
  19     char        ***a,
  20     char        *s
  21 )
  22 {
  23         int     n;
  24
  25         if ( *a == NULL ) {
  26                 *a = (char **) LDAP_MALLOC( 2 * sizeof(char *) );
  27                 n = 0;
  28
  29                 if( *a == NULL ) {
  30                         return -1;
  31                 }
  32
  33         } else {
  34                 char **new;
  35
  36                 for ( n = 0; *a != NULL && (*a)[n] != NULL; n++ ) {
  37                         ;       /* NULL */
  38                 }
  39
  40                 new = (char **) LDAP_REALLOC( (char *) *a,
  41                     (n + 2) * sizeof(char *) );
  42
  43                 if( new == NULL ) {
  44                         /* caller is required to call ldap_charray_free(*a) */
  45                         return -1;
  46                 }
  47
  48                 *a = new;
  49         }
  50
  51         (*a)[n] = LDAP_STRDUP(s);
  52
  53         if( (*a)[n] == NULL ) {
  54                 return 1;
  55         }
  56
  57         (*a)[++n] = NULL;
  58
  59         return 0;
  60 }
  61
  62 int
  63 ldap_charray_merge(
  64     char        ***a,
  65     char        **s
  66 )
  67 {
  68         int     i, n, nn;
  69         char **aa;
  70
  71         for ( n = 0; *a != NULL && (*a)[n] != NULL; n++ ) {
  72                 ;       /* NULL */
  73         }
  74         for ( nn = 0; s[nn] != NULL; nn++ ) {
  75                 ;       /* NULL */
  76         }
  77
  78         aa = (char **) LDAP_REALLOC( (char *) *a, (n + nn + 1) * sizeof(char *) );
  79
  80         if( aa == NULL ) {
  81                 return -1;
  82         }
  83
  84         *a = aa;
  85
  86         for ( i = 0; i < nn; i++ ) {
  87                 (*a)[n + i] = LDAP_STRDUP(s[i]);
  88
  89                 if( (*a)[n + i] == NULL ) {
  90                         for( --i ; i >= 0 ; i-- ) {
  91                                 LDAP_FREE( (*a)[n + i] );
  92                                 (*a)[n + i] = NULL;
  93                         }
  94                         return -1;
  95                 }
  96         }
  97
  98         (*a)[n + nn] = NULL;
  99         return 0;
 100 }
 101
 102 void
 103 ldap_charray_free( char **a )
 104 {
 105         char    **p;
 106
 107         if ( a == NULL ) {
 108                 return;
 109         }
 110
 111         for ( p = a; *p != NULL; p++ ) {
 112                 if ( *p != NULL ) {
 113                         LDAP_FREE( *p );
 114                 }
 115         }
 116
 117         LDAP_FREE( (char *) a );
 118 }
 119
 120 int
 121 ldap_charray_inlist(
 122     char        **a,
 123     char        *s
 124 )
 125 {
 126         int     i;
 127
 128         for ( i = 0; a[i] != NULL; i++ ) {
 129                 if ( strcasecmp( s, a[i] ) == 0 ) {
 130                         return( 1 );
 131                 }
 132         }
 133
 134         return( 0 );
 135 }
 136
 137 char **
 138 ldap_charray_dup( char **a )
 139 {
 140         int     i;
 141         char    **new;
 142
 143         for ( i = 0; a[i] != NULL; i++ )
 144                 ;       /* NULL */
 145
 146         new = (char **) LDAP_MALLOC( (i + 1) * sizeof(char *) );
 147
 148         if( new == NULL ) {
 149                 return NULL;
 150         }
 151
 152         for ( i = 0; a[i] != NULL; i++ ) {
 153                 new[i] = LDAP_STRDUP( a[i] );
 154
 155                 if( new[i] == NULL ) {
 156                         for( --i ; i >= 0 ; i-- ) {
 157                                 LDAP_FREE( new[i] );
 158                         }
 159                         LDAP_FREE( new );
 160                         return NULL;
 161                 }
 162         }
 163         new[i] = NULL;
 164
 165         return( new );
 166 }
 167
 168 char **
 169 ldap_str2charray( const char *str_in, const char *brkstr )
 170 {
 171         char    **res;
 172         char    *str, *s;
 173         char    *lasts;
 174         int     i;
 175
 176         /* protect the input string from strtok */
 177         str = LDAP_STRDUP( str_in );
 178         if( str == NULL ) {
 179                 return NULL;
 180         }
 181
 182         i = 1;
 183         for ( s = str; *s; s++ ) {
 184                 if ( ldap_utf8_strchr( brkstr, s ) != NULL ) {
 185                         i++;
 186                 }
 187         }
 188
 189         res = (char **) LDAP_MALLOC( (i + 1) * sizeof(char *) );
 190
 191         if( res == NULL ) {
 192                 LDAP_FREE( str );
 193                 return NULL;
 194         }
 195
 196         i = 0;
 197
 198         for ( s = ldap_utf8_strtok( str, brkstr, &lasts );
 199                 s != NULL;
 200                 s = ldap_utf8_strtok( NULL, brkstr, &lasts ) )
 201         {
 202                 res[i] = LDAP_STRDUP( s );
 203
 204                 if(res[i] == NULL) {
 205                         for( --i ; i >= 0 ; i-- ) {
 206                                 LDAP_FREE( res[i] );
 207                         }
 208                         LDAP_FREE( res );
 209                         LDAP_FREE( str );
 210                         return NULL;
 211                 }
 212
 213                 i++;
 214         }
 215
 216         res[i] = NULL;
 217
 218         LDAP_FREE( str );
 219         return( res );
 220 }
 221
 222 char * ldap_charray2str( char **a, const char *sep )
 223 {
 224         char *s, **v, *p;
 225         int len;
 226         int slen;
 227
 228         if( sep == NULL ) sep = " ";
 229
 230         slen = strlen( sep );
 231         len = 0;
 232
 233         for ( v = a; *v != NULL; v++ ) {
 234                 len += strlen( *v ) + slen;
 235         }
 236
 237         if ( len == 0 ) {
 238                 return NULL;
 239         }
 240
 241         /* trim extra sep len */
 242         len -= slen;
 243
 244         s = LDAP_MALLOC ( len + 1 );
 245
 246         if ( s == NULL ) {
 247                 return NULL;
 248         }
 249
 250         p = s;
 251         for ( v = a; *v != NULL; v++ ) {
 252                 if ( v != a ) {
 253                         strncpy( p, sep, slen );
 254                         p += slen;
 255                 }
 256
 257                 len = strlen( *v );
 258                 strncpy( p, *v, len );
 259                 p += len;
 260         }
 261
 262         *p = '\0';
 263         return s;
 264 }