string-list.c

   1 #include "cache.h"
   2 #include "string-list.h"
   3
   4 void string_list_init(struct string_list *list, int strdup_strings)
   5 {
   6         memset(list, 0, sizeof(*list));
   7         list->strdup_strings = strdup_strings;
   8 }
   9
  10 /* if there is no exact match, point to the index where the entry could be
  11  * inserted */
  12 static int get_entry_index(const struct string_list *list, const char *string,
  13                 int *exact_match)
  14 {
  15         int left = -1, right = list->nr;
  16         compare_strings_fn cmp = list->cmp ? list->cmp : strcmp;
  17
  18         while (left + 1 < right) {
  19                 int middle = (left + right) / 2;
  20                 int compare = cmp(string, list->items[middle].string);
  21                 if (compare < 0)
  22                         right = middle;
  23                 else if (compare > 0)
  24                         left = middle;
  25                 else {
  26                         *exact_match = 1;
  27                         return middle;
  28                 }
  29         }
  30
  31         *exact_match = 0;
  32         return right;
  33 }
  34
  35 /* returns -1-index if already exists */
  36 static int add_entry(int insert_at, struct string_list *list, const char *string)
  37 {
  38         int exact_match = 0;
  39         int index = insert_at != -1 ? insert_at : get_entry_index(list, string, &exact_match);
  40
  41         if (exact_match)
  42                 return -1 - index;
  43
  44         if (list->nr + 1 >= list->alloc) {
  45                 list->alloc += 32;
  46                 list->items = xrealloc(list->items, list->alloc
  47                                 * sizeof(struct string_list_item));
  48         }
  49         if (index < list->nr)
  50                 memmove(list->items + index + 1, list->items + index,
  51                                 (list->nr - index)
  52                                 * sizeof(struct string_list_item));
  53         list->items[index].string = list->strdup_strings ?
  54                 xstrdup(string) : (char *)string;
  55         list->items[index].util = NULL;
  56         list->nr++;
  57
  58         return index;
  59 }
  60
  61 struct string_list_item *string_list_insert(struct string_list *list, const char *string)
  62 {
  63         return string_list_insert_at_index(list, -1, string);
  64 }
  65
  66 struct string_list_item *string_list_insert_at_index(struct string_list *list,
  67                                                      int insert_at, const char *string)
  68 {
  69         int index = add_entry(insert_at, list, string);
  70
  71         if (index < 0)
  72                 index = -1 - index;
  73
  74         return list->items + index;
  75 }
  76
  77 int string_list_has_string(const struct string_list *list, const char *string)
  78 {
  79         int exact_match;
  80         get_entry_index(list, string, &exact_match);
  81         return exact_match;
  82 }
  83
  84 int string_list_find_insert_index(const struct string_list *list, const char *string,
  85                                   int negative_existing_index)
  86 {
  87         int exact_match;
  88         int index = get_entry_index(list, string, &exact_match);
  89         if (exact_match)
  90                 index = -1 - (negative_existing_index ? index : 0);
  91         return index;
  92 }
  93
  94 struct string_list_item *string_list_lookup(struct string_list *list, const char *string)
  95 {
  96         int exact_match, i = get_entry_index(list, string, &exact_match);
  97         if (!exact_match)
  98                 return NULL;
  99         return list->items + i;
 100 }
 101
 102 void string_list_remove_duplicates(struct string_list *list, int free_util)
 103 {
 104         if (list->nr > 1) {
 105                 int src, dst;
 106                 compare_strings_fn cmp = list->cmp ? list->cmp : strcmp;
 107                 for (src = dst = 1; src < list->nr; src++) {
 108                         if (!cmp(list->items[dst - 1].string, list->items[src].string)) {
 109                                 if (list->strdup_strings)
 110                                         free(list->items[src].string);
 111                                 if (free_util)
 112                                         free(list->items[src].util);
 113                         } else
 114                                 list->items[dst++] = list->items[src];
 115                 }
 116                 list->nr = dst;
 117         }
 118 }
 119
 120 int for_each_string_list(struct string_list *list,
 121                          string_list_each_func_t fn, void *cb_data)
 122 {
 123         int i, ret = 0;
 124         for (i = 0; i < list->nr; i++)
 125                 if ((ret = fn(&list->items[i], cb_data)))
 126                         break;
 127         return ret;
 128 }
 129
 130 void filter_string_list(struct string_list *list, int free_util,
 131                         string_list_each_func_t want, void *cb_data)
 132 {
 133         int src, dst = 0;
 134         for (src = 0; src < list->nr; src++) {
 135                 if (want(&list->items[src], cb_data)) {
 136                         list->items[dst++] = list->items[src];
 137                 } else {
 138                         if (list->strdup_strings)
 139                                 free(list->items[src].string);
 140                         if (free_util)
 141                                 free(list->items[src].util);
 142                 }
 143         }
 144         list->nr = dst;
 145 }
 146
 147 static int item_is_not_empty(struct string_list_item *item, void *unused)
 148 {
 149         return *item->string != '\0';
 150 }
 151
 152 void string_list_remove_empty_items(struct string_list *list, int free_util) {
 153         filter_string_list(list, free_util, item_is_not_empty, NULL);
 154 }
 155
 156 void string_list_clear(struct string_list *list, int free_util)
 157 {
 158         if (list->items) {
 159                 int i;
 160                 if (list->strdup_strings) {
 161                         for (i = 0; i < list->nr; i++)
 162                                 free(list->items[i].string);
 163                 }
 164                 if (free_util) {
 165                         for (i = 0; i < list->nr; i++)
 166                                 free(list->items[i].util);
 167                 }
 168                 free(list->items);
 169         }
 170         list->items = NULL;
 171         list->nr = list->alloc = 0;
 172 }
 173
 174 void string_list_clear_func(struct string_list *list, string_list_clear_func_t clearfunc)
 175 {
 176         if (list->items) {
 177                 int i;
 178                 if (clearfunc) {
 179                         for (i = 0; i < list->nr; i++)
 180                                 clearfunc(list->items[i].util, list->items[i].string);
 181                 }
 182                 if (list->strdup_strings) {
 183                         for (i = 0; i < list->nr; i++)
 184                                 free(list->items[i].string);
 185                 }
 186                 free(list->items);
 187         }
 188         list->items = NULL;
 189         list->nr = list->alloc = 0;
 190 }
 191
 192
 193 void print_string_list(const struct string_list *p, const char *text)
 194 {
 195         int i;
 196         if ( text )
 197                 printf("%s\n", text);
 198         for (i = 0; i < p->nr; i++)
 199                 printf("%s:%p\n", p->items[i].string, p->items[i].util);
 200 }
 201
 202 struct string_list_item *string_list_append_nodup(struct string_list *list,
 203                                                   char *string)
 204 {
 205         struct string_list_item *retval;
 206         ALLOC_GROW(list->items, list->nr + 1, list->alloc);
 207         retval = &list->items[list->nr++];
 208         retval->string = string;
 209         retval->util = NULL;
 210         return retval;
 211 }
 212
 213 struct string_list_item *string_list_append(struct string_list *list,
 214                                             const char *string)
 215 {
 216         return string_list_append_nodup(
 217                         list,
 218                         list->strdup_strings ? xstrdup(string) : (char *)string);
 219 }
 220
 221 /* Yuck */
 222 static compare_strings_fn compare_for_qsort;
 223
 224 /* Only call this from inside sort_string_list! */
 225 static int cmp_items(const void *a, const void *b)
 226 {
 227         const struct string_list_item *one = a;
 228         const struct string_list_item *two = b;
 229         return compare_for_qsort(one->string, two->string);
 230 }
 231
 232 void sort_string_list(struct string_list *list)
 233 {
 234         compare_for_qsort = list->cmp ? list->cmp : strcmp;
 235         qsort(list->items, list->nr, sizeof(*list->items), cmp_items);
 236 }
 237
 238 struct string_list_item *unsorted_string_list_lookup(struct string_list *list,
 239                                                      const char *string)
 240 {
 241         int i;
 242         compare_strings_fn cmp = list->cmp ? list->cmp : strcmp;
 243
 244         for (i = 0; i < list->nr; i++)
 245                 if (!cmp(string, list->items[i].string))
 246                         return list->items + i;
 247         return NULL;
 248 }
 249
 250 int unsorted_string_list_has_string(struct string_list *list,
 251                                     const char *string)
 252 {
 253         return unsorted_string_list_lookup(list, string) != NULL;
 254 }
 255
 256 void unsorted_string_list_delete_item(struct string_list *list, int i, int free_util)
 257 {
 258         if (list->strdup_strings)
 259                 free(list->items[i].string);
 260         if (free_util)
 261                 free(list->items[i].util);
 262         list->items[i] = list->items[list->nr-1];
 263         list->nr--;
 264 }
 265
 266 int string_list_split(struct string_list *list, const char *string,
 267                       int delim, int maxsplit)
 268 {
 269         int count = 0;
 270         const char *p = string, *end;
 271
 272         if (!list->strdup_strings)
 273                 die("internal error in string_list_split(): "
 274                     "list->strdup_strings must be set");
 275         for (;;) {
 276                 count++;
 277                 if (maxsplit >= 0 && count > maxsplit) {
 278                         string_list_append(list, p);
 279                         return count;
 280                 }
 281                 end = strchr(p, delim);
 282                 if (end) {
 283                         string_list_append_nodup(list, xmemdupz(p, end - p));
 284                         p = end + 1;
 285                 } else {
 286                         string_list_append(list, p);
 287                         return count;
 288                 }
 289         }
 290 }
 291
 292 int string_list_split_in_place(struct string_list *list, char *string,
 293                                int delim, int maxsplit)
 294 {
 295         int count = 0;
 296         char *p = string, *end;
 297
 298         if (list->strdup_strings)
 299                 die("internal error in string_list_split_in_place(): "
 300                     "list->strdup_strings must not be set");
 301         for (;;) {
 302                 count++;
 303                 if (maxsplit >= 0 && count > maxsplit) {
 304                         string_list_append(list, p);
 305                         return count;
 306                 }
 307                 end = strchr(p, delim);
 308                 if (end) {
 309                         *end = '\0';
 310                         string_list_append(list, p);
 311                         p = end + 1;
 312                 } else {
 313                         string_list_append(list, p);
 314                         return count;
 315                 }
 316         }
 317 }