string-list.con commit Merge branch 'maint-2.0' into maint-2.1 (3c84ac8)
   1#include "cache.h"
   2#include "string-list.h"
   3
   4void 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 */
  12static 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 */
  36static 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
  61struct 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
  66struct 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
  77int 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
  84int 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
  94struct 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
 102void 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
 120int 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
 130void 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
 147static int item_is_not_empty(struct string_list_item *item, void *unused)
 148{
 149        return *item->string != '\0';
 150}
 151
 152void 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
 156void 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
 174void 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
 193void 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
 202struct 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
 213struct 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 */
 222static compare_strings_fn compare_for_qsort;
 223
 224/* Only call this from inside sort_string_list! */
 225static 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
 232void 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
 238struct 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
 250int 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
 256void 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
 266int 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
 292int 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}