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->key);
  92         free (e);
  93 }
  94
  95 void llist_append (llist_t *l, llentry_t *e)
  96 {
  97         e->next = NULL;
  98
  99         if (l->tail == NULL)
 100                 l->head = e;
 101         else
 102                 l->tail->next = e;
 103
 104         l->tail = e;
 105
 106         ++(l->size);
 107 }
 108
 109 void llist_prepend (llist_t *l, llentry_t *e)
 110 {
 111         e->next = l->head;
 112         l->head = e;
 113
 114         if (l->tail == NULL)
 115                 l->tail = e;
 116
 117         ++(l->size);
 118 }
 119
 120 void llist_remove (llist_t *l, llentry_t *e)
 121 {
 122         llentry_t *prev;
 123
 124         if ((l == NULL) || (e == NULL))
 125                 return;
 126
 127         prev = l->head;
 128         while ((prev != NULL) && (prev->next != e))
 129                 prev = prev->next;
 130
 131         if (prev != NULL)
 132                 prev->next = e->next;
 133         if (l->head == e)
 134                 l->head = e->next;
 135         if (l->tail == e)
 136                 l->tail = prev;
 137
 138         --(l->size);
 139 }
 140
 141 int llist_size (llist_t *l)
 142 {
 143         return (l ? l->size : 0);
 144 }
 145
 146 static int llist_strcmp (llentry_t *e, void *ud)
 147 {
 148         if ((e == NULL) || (ud == NULL))
 149                 return (-1);
 150         return (strcmp (e->key, (const char *)ud));
 151 }
 152
 153 llentry_t *llist_search (llist_t *l, const char *key)
 154 {
 155         return (llist_search_custom (l, llist_strcmp, (void *)key));
 156 }
 157
 158 llentry_t *llist_search_custom (llist_t *l,
 159                 int (*compare) (llentry_t *, void *), void *user_data)
 160 {
 161         llentry_t *e;
 162
 163         if (l == NULL)
 164                 return (NULL);
 165
 166         e = l->head;
 167         while (e != NULL) {
 168                 llentry_t *next = e->next;
 169
 170                 if (compare (e, user_data) == 0)
 171                         break;
 172
 173                 e = next;
 174         }
 175
 176         return (e);
 177 }
 178
 179 llentry_t *llist_head (llist_t *l)
 180 {
 181         if (l == NULL)
 182                 return (NULL);
 183         return (l->head);
 184 }
 185
 186 llentry_t *llist_tail (llist_t *l)
 187 {
 188         if (l == NULL)
 189                 return (NULL);
 190         return (l->tail);
 191 }