Merge branch 'collectd-4.10' into collectd-5.0
[collectd.git] / src / utils_llist.c
1 /**
2  * collectd - src/utils_llist.c
3  * Copyright (C) 2006 Florian Forster <octo at verplant.org>
4  *
5  * This program is free software; you can redistribute it and/
6  * or modify it under the terms of the GNU General Public Li-
7  * cence as published by the Free Software Foundation; only
8  * version 2 of the Licence is applicable.
9  *
10  * This program is distributed in the hope that it will be use-
11  * ful, but WITHOUT ANY WARRANTY; without even the implied war-
12  * ranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
13  * See the GNU General Public Licence for more details.
14  *
15  * You should have received a copy of the GNU General Public
16  * Licence along with this program; if not, write to the Free
17  * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139,
18  * USA.
19  *
20  * Authors:
21  *   Florian Forster <octo at verplant.org>
22  */
23
24 #include "config.h"
25
26 #include <stdlib.h>
27 #include <string.h>
28
29 #include "utils_llist.h"
30
31 /*
32  * Private data types
33  */
34 struct llist_s
35 {
36         llentry_t *head;
37         llentry_t *tail;
38         int size;
39 };
40
41 /*
42  * Public functions
43  */
44 llist_t *llist_create (void)
45 {
46         llist_t *ret;
47
48         ret = (llist_t *) malloc (sizeof (llist_t));
49         if (ret == NULL)
50                 return (NULL);
51
52         memset (ret, '\0', sizeof (llist_t));
53
54         return (ret);
55 }
56
57 void llist_destroy (llist_t *l)
58 {
59         llentry_t *e_this;
60         llentry_t *e_next;
61
62         if (l == NULL)
63                 return;
64
65         for (e_this = l->head; e_this != NULL; e_this = e_next)
66         {
67                 e_next = e_this->next;
68                 llentry_destroy (e_this);
69         }
70
71         free (l);
72 }
73
74 llentry_t *llentry_create (char *key, void *value)
75 {
76         llentry_t *e;
77
78         e = (llentry_t *) malloc (sizeof (llentry_t));
79         if (e)
80         {
81                 e->key   = key;
82                 e->value = value;
83                 e->next  = NULL;
84         }
85
86         return (e);
87 }
88
89 void llentry_destroy (llentry_t *e)
90 {
91         free (e);
92 }
93
94 void llist_append (llist_t *l, llentry_t *e)
95 {
96         e->next = NULL;
97
98         if (l->tail == NULL)
99                 l->head = e;
100         else
101                 l->tail->next = e;
102
103         l->tail = e;
104
105         ++(l->size);
106 }
107
108 void llist_prepend (llist_t *l, llentry_t *e)
109 {
110         e->next = l->head;
111         l->head = e;
112
113         if (l->tail == NULL)
114                 l->tail = e;
115
116         ++(l->size);
117 }
118
119 void llist_remove (llist_t *l, llentry_t *e)
120 {
121         llentry_t *prev;
122
123         prev = l->head;
124         while ((prev != NULL) && (prev->next != e))
125                 prev = prev->next;
126
127         if (prev != NULL)
128                 prev->next = e->next;
129         if (l->head == e)
130                 l->head = e->next;
131         if (l->tail == e)
132                 l->tail = prev;
133
134         --(l->size);
135 }
136
137 int llist_size (llist_t *l)
138 {
139         return (l ? l->size : 0);
140 }
141
142 static int llist_strcmp (llentry_t *e, void *ud)
143 {
144         if ((e == NULL) || (ud == NULL))
145                 return (-1);
146         return (strcmp (e->key, (const char *)ud));
147 }
148
149 llentry_t *llist_search (llist_t *l, const char *key)
150 {
151         return (llist_search_custom (l, llist_strcmp, (void *)key));
152 }
153
154 llentry_t *llist_search_custom (llist_t *l,
155                 int (*compare) (llentry_t *, void *), void *user_data)
156 {
157         llentry_t *e;
158
159         if (l == NULL)
160                 return (NULL);
161
162         e = l->head;
163         while (e != NULL) {
164                 llentry_t *next = e->next;
165
166                 if (compare (e, user_data) == 0)
167                         break;
168
169                 e = next;
170         }
171
172         return (e);
173 }
174
175 llentry_t *llist_head (llist_t *l)
176 {
177         if (l == NULL)
178                 return (NULL);
179         return (l->head);
180 }
181
182 llentry_t *llist_tail (llist_t *l)
183 {
184         if (l == NULL)
185                 return (NULL);
186         return (l->tail);
187 }