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