string-list.con commit Merge branch 'dl/credential-cache-socket-in-xdg-cache' (78cf8ef)
   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                REALLOC_ARRAY(list->items, list->alloc);
  47        }
  48        if (index < list->nr)
  49                memmove(list->items + index + 1, list->items + index,
  50                                (list->nr - index)
  51                                * sizeof(struct string_list_item));
  52        list->items[index].string = list->strdup_strings ?
  53                xstrdup(string) : (char *)string;
  54        list->items[index].util = NULL;
  55        list->nr++;
  56
  57        return index;
  58}
  59
  60struct string_list_item *string_list_insert(struct string_list *list, const char *string)
  61{
  62        int index = add_entry(-1, list, string);
  63
  64        if (index < 0)
  65                index = -1 - index;
  66
  67        return list->items + index;
  68}
  69
  70int string_list_has_string(const struct string_list *list, const char *string)
  71{
  72        int exact_match;
  73        get_entry_index(list, string, &exact_match);
  74        return exact_match;
  75}
  76
  77int string_list_find_insert_index(const struct string_list *list, const char *string,
  78                                  int negative_existing_index)
  79{
  80        int exact_match;
  81        int index = get_entry_index(list, string, &exact_match);
  82        if (exact_match)
  83                index = -1 - (negative_existing_index ? index : 0);
  84        return index;
  85}
  86
  87struct string_list_item *string_list_lookup(struct string_list *list, const char *string)
  88{
  89        int exact_match, i = get_entry_index(list, string, &exact_match);
  90        if (!exact_match)
  91                return NULL;
  92        return list->items + i;
  93}
  94
  95void string_list_remove_duplicates(struct string_list *list, int free_util)
  96{
  97        if (list->nr > 1) {
  98                int src, dst;
  99                compare_strings_fn cmp = list->cmp ? list->cmp : strcmp;
 100                for (src = dst = 1; src < list->nr; src++) {
 101                        if (!cmp(list->items[dst - 1].string, list->items[src].string)) {
 102                                if (list->strdup_strings)
 103                                        free(list->items[src].string);
 104                                if (free_util)
 105                                        free(list->items[src].util);
 106                        } else
 107                                list->items[dst++] = list->items[src];
 108                }
 109                list->nr = dst;
 110        }
 111}
 112
 113int for_each_string_list(struct string_list *list,
 114                         string_list_each_func_t fn, void *cb_data)
 115{
 116        int i, ret = 0;
 117        for (i = 0; i < list->nr; i++)
 118                if ((ret = fn(&list->items[i], cb_data)))
 119                        break;
 120        return ret;
 121}
 122
 123void filter_string_list(struct string_list *list, int free_util,
 124                        string_list_each_func_t want, void *cb_data)
 125{
 126        int src, dst = 0;
 127        for (src = 0; src < list->nr; src++) {
 128                if (want(&list->items[src], cb_data)) {
 129                        list->items[dst++] = list->items[src];
 130                } else {
 131                        if (list->strdup_strings)
 132                                free(list->items[src].string);
 133                        if (free_util)
 134                                free(list->items[src].util);
 135                }
 136        }
 137        list->nr = dst;
 138}
 139
 140static int item_is_not_empty(struct string_list_item *item, void *unused)
 141{
 142        return *item->string != '\0';
 143}
 144
 145void string_list_remove_empty_items(struct string_list *list, int free_util) {
 146        filter_string_list(list, free_util, item_is_not_empty, NULL);
 147}
 148
 149void string_list_clear(struct string_list *list, int free_util)
 150{
 151        if (list->items) {
 152                int i;
 153                if (list->strdup_strings) {
 154                        for (i = 0; i < list->nr; i++)
 155                                free(list->items[i].string);
 156                }
 157                if (free_util) {
 158                        for (i = 0; i < list->nr; i++)
 159                                free(list->items[i].util);
 160                }
 161                free(list->items);
 162        }
 163        list->items = NULL;
 164        list->nr = list->alloc = 0;
 165}
 166
 167void string_list_clear_func(struct string_list *list, string_list_clear_func_t clearfunc)
 168{
 169        if (list->items) {
 170                int i;
 171                if (clearfunc) {
 172                        for (i = 0; i < list->nr; i++)
 173                                clearfunc(list->items[i].util, list->items[i].string);
 174                }
 175                if (list->strdup_strings) {
 176                        for (i = 0; i < list->nr; i++)
 177                                free(list->items[i].string);
 178                }
 179                free(list->items);
 180        }
 181        list->items = NULL;
 182        list->nr = list->alloc = 0;
 183}
 184
 185
 186void print_string_list(const struct string_list *p, const char *text)
 187{
 188        int i;
 189        if ( text )
 190                printf("%s\n", text);
 191        for (i = 0; i < p->nr; i++)
 192                printf("%s:%p\n", p->items[i].string, p->items[i].util);
 193}
 194
 195struct string_list_item *string_list_append_nodup(struct string_list *list,
 196                                                  char *string)
 197{
 198        struct string_list_item *retval;
 199        ALLOC_GROW(list->items, list->nr + 1, list->alloc);
 200        retval = &list->items[list->nr++];
 201        retval->string = string;
 202        retval->util = NULL;
 203        return retval;
 204}
 205
 206struct string_list_item *string_list_append(struct string_list *list,
 207                                            const char *string)
 208{
 209        return string_list_append_nodup(
 210                        list,
 211                        list->strdup_strings ? xstrdup(string) : (char *)string);
 212}
 213
 214static int cmp_items(const void *a, const void *b, void *ctx)
 215{
 216        compare_strings_fn cmp = ctx;
 217        const struct string_list_item *one = a;
 218        const struct string_list_item *two = b;
 219        return cmp(one->string, two->string);
 220}
 221
 222void string_list_sort(struct string_list *list)
 223{
 224        QSORT_S(list->items, list->nr, cmp_items,
 225                list->cmp ? list->cmp : strcmp);
 226}
 227
 228struct string_list_item *unsorted_string_list_lookup(struct string_list *list,
 229                                                     const char *string)
 230{
 231        struct string_list_item *item;
 232        compare_strings_fn cmp = list->cmp ? list->cmp : strcmp;
 233
 234        for_each_string_list_item(item, list)
 235                if (!cmp(string, item->string))
 236                        return item;
 237        return NULL;
 238}
 239
 240int unsorted_string_list_has_string(struct string_list *list,
 241                                    const char *string)
 242{
 243        return unsorted_string_list_lookup(list, string) != NULL;
 244}
 245
 246void unsorted_string_list_delete_item(struct string_list *list, int i, int free_util)
 247{
 248        if (list->strdup_strings)
 249                free(list->items[i].string);
 250        if (free_util)
 251                free(list->items[i].util);
 252        list->items[i] = list->items[list->nr-1];
 253        list->nr--;
 254}
 255
 256int string_list_split(struct string_list *list, const char *string,
 257                      int delim, int maxsplit)
 258{
 259        int count = 0;
 260        const char *p = string, *end;
 261
 262        if (!list->strdup_strings)
 263                die("internal error in string_list_split(): "
 264                    "list->strdup_strings must be set");
 265        for (;;) {
 266                count++;
 267                if (maxsplit >= 0 && count > maxsplit) {
 268                        string_list_append(list, p);
 269                        return count;
 270                }
 271                end = strchr(p, delim);
 272                if (end) {
 273                        string_list_append_nodup(list, xmemdupz(p, end - p));
 274                        p = end + 1;
 275                } else {
 276                        string_list_append(list, p);
 277                        return count;
 278                }
 279        }
 280}
 281
 282int string_list_split_in_place(struct string_list *list, char *string,
 283                               int delim, int maxsplit)
 284{
 285        int count = 0;
 286        char *p = string, *end;
 287
 288        if (list->strdup_strings)
 289                die("internal error in string_list_split_in_place(): "
 290                    "list->strdup_strings must not be set");
 291        for (;;) {
 292                count++;
 293                if (maxsplit >= 0 && count > maxsplit) {
 294                        string_list_append(list, p);
 295                        return count;
 296                }
 297                end = strchr(p, delim);
 298                if (end) {
 299                        *end = '\0';
 300                        string_list_append(list, p);
 301                        p = end + 1;
 302                } else {
 303                        string_list_append(list, p);
 304                        return count;
 305                }
 306        }
 307}