output: bin -- Use nasm_error helpers
[nasm.git] / nasmlib / strlist.c
blob868fa3bf3c17165c37c61c5388d8d91b01f08c7b
1 /* ----------------------------------------------------------------------- *
3 * Copyright 1996-2018 The NASM Authors - All Rights Reserved
4 * See the file AUTHORS included with the NASM distribution for
5 * the specific copyright holders.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following
9 * conditions are met:
11 * * Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * * Redistributions in binary form must reproduce the above
14 * copyright notice, this list of conditions and the following
15 * disclaimer in the documentation and/or other materials provided
16 * with the distribution.
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
19 * CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
20 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
21 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
22 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
23 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
24 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
26 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
29 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
30 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 * ----------------------------------------------------------------------- */
35 * strlist.c - list of unique, ordered strings
38 #include "strlist.h"
41 * Create a string list
43 struct strlist *strlist_alloc(void)
45 struct strlist *list = nasm_zalloc(sizeof(*list));
46 hash_init(&list->hash, HASH_MEDIUM);
47 list->tailp = &list->head;
48 return list;
52 * Append a string to a string list if and only if it isn't
53 * already there. Return true if it was added.
55 bool strlist_add(struct strlist *list, const char *str)
57 struct strlist_entry *e;
58 struct hash_insert hi;
59 size_t len;
61 if (!list)
62 return false;
64 if (hash_find(&list->hash, str, &hi))
65 return false;
67 len = strlen(str);
69 /* Structure already has char[1] as EOS */
70 e = nasm_zalloc(sizeof(*e) + len);
71 e->len = len;
72 memcpy(e->str, str, len + 1);
74 *list->tailp = e;
75 list->tailp = &e->next;
77 hash_add(&hi, e->str, (void *)e);
78 return true;
82 * Free a string list
84 void strlist_free(struct strlist *list)
86 if (list) {
87 hash_free_all(&list->hash, false);
88 nasm_free(list);