2000-10-20 16:49:20 +00:00
|
|
|
/*
|
|
|
|
list.c -- functions to deal with double linked lists
|
2006-04-26 13:52:58 +00:00
|
|
|
Copyright (C) 2000-2005 Ivo Timmermans
|
|
|
|
2000-2006 Guus Sliepen <guus@tinc-vpn.org>
|
2000-10-20 16:49:20 +00:00
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
2009-09-24 22:01:00 +00:00
|
|
|
You should have received a copy of the GNU General Public License along
|
|
|
|
with this program; if not, write to the Free Software Foundation, Inc.,
|
|
|
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
2000-10-20 16:49:20 +00:00
|
|
|
*/
|
|
|
|
|
2003-07-17 15:06:27 +00:00
|
|
|
#include "system.h"
|
2000-10-20 16:49:20 +00:00
|
|
|
|
2001-01-07 15:24:52 +00:00
|
|
|
#include "list.h"
|
2003-07-17 15:06:27 +00:00
|
|
|
#include "xalloc.h"
|
2000-10-20 16:49:20 +00:00
|
|
|
|
2001-01-07 15:24:52 +00:00
|
|
|
/* (De)constructors */
|
|
|
|
|
|
|
|
list_t *list_alloc(list_action_t delete)
|
2000-10-20 16:49:20 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
list_t *list;
|
2000-10-20 16:49:20 +00:00
|
|
|
|
2002-09-09 21:49:16 +00:00
|
|
|
list = xmalloc_and_zero(sizeof(list_t));
|
|
|
|
list->delete = delete;
|
2001-01-07 15:24:52 +00:00
|
|
|
|
2002-09-09 21:49:16 +00:00
|
|
|
return list;
|
2000-10-20 16:49:20 +00:00
|
|
|
}
|
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void list_free(list_t *list)
|
2001-01-07 15:24:52 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
free(list);
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
2000-10-20 16:49:20 +00:00
|
|
|
|
2001-01-07 15:24:52 +00:00
|
|
|
list_node_t *list_alloc_node(void)
|
2000-10-20 16:49:20 +00:00
|
|
|
{
|
2003-08-28 21:05:11 +00:00
|
|
|
return xmalloc_and_zero(sizeof(list_node_t));
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
2000-10-20 16:49:20 +00:00
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void list_free_node(list_t *list, list_node_t *node)
|
2001-01-07 15:24:52 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
if(node->data && list->delete)
|
|
|
|
list->delete(node->data);
|
|
|
|
|
|
|
|
free(node);
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Insertion and deletion */
|
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
list_node_t *list_insert_head(list_t *list, void *data)
|
2001-01-07 15:24:52 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
list_node_t *node;
|
|
|
|
|
|
|
|
node = list_alloc_node();
|
|
|
|
|
|
|
|
node->data = data;
|
|
|
|
node->prev = NULL;
|
|
|
|
node->next = list->head;
|
|
|
|
list->head = node;
|
|
|
|
|
|
|
|
if(node->next)
|
|
|
|
node->next->prev = node;
|
|
|
|
else
|
|
|
|
list->tail = node;
|
|
|
|
|
|
|
|
list->count++;
|
|
|
|
|
|
|
|
return node;
|
2000-10-20 16:49:20 +00:00
|
|
|
}
|
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
list_node_t *list_insert_tail(list_t *list, void *data)
|
2001-01-07 15:24:52 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
list_node_t *node;
|
|
|
|
|
|
|
|
node = list_alloc_node();
|
|
|
|
|
|
|
|
node->data = data;
|
|
|
|
node->next = NULL;
|
|
|
|
node->prev = list->tail;
|
|
|
|
list->tail = node;
|
|
|
|
|
|
|
|
if(node->prev)
|
|
|
|
node->prev->next = node;
|
|
|
|
else
|
|
|
|
list->head = node;
|
|
|
|
|
|
|
|
list->count++;
|
|
|
|
|
|
|
|
return node;
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void list_unlink_node(list_t *list, list_node_t *node)
|
2000-10-20 16:49:20 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
if(node->prev)
|
|
|
|
node->prev->next = node->next;
|
|
|
|
else
|
|
|
|
list->head = node->next;
|
|
|
|
|
|
|
|
if(node->next)
|
|
|
|
node->next->prev = node->prev;
|
|
|
|
else
|
|
|
|
list->tail = node->prev;
|
|
|
|
|
|
|
|
list->count--;
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void list_delete_node(list_t *list, list_node_t *node)
|
2001-01-07 15:24:52 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
list_unlink_node(list, node);
|
|
|
|
list_free_node(list, node);
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void list_delete_head(list_t *list)
|
2001-01-07 15:24:52 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
list_delete_node(list, list->head);
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void list_delete_tail(list_t *list)
|
2001-01-07 15:24:52 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
list_delete_node(list, list->tail);
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Head/tail lookup */
|
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void *list_get_head(list_t *list)
|
2001-01-07 15:24:52 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
if(list->head)
|
|
|
|
return list->head->data;
|
|
|
|
else
|
|
|
|
return NULL;
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void *list_get_tail(list_t *list)
|
2001-01-07 15:24:52 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
if(list->tail)
|
|
|
|
return list->tail->data;
|
|
|
|
else
|
|
|
|
return NULL;
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Fast list deletion */
|
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void list_delete_list(list_t *list)
|
2001-01-07 15:24:52 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
list_node_t *node, *next;
|
|
|
|
|
|
|
|
for(node = list->head; node; node = next) {
|
|
|
|
next = node->next;
|
|
|
|
list_free_node(list, node);
|
|
|
|
}
|
|
|
|
|
|
|
|
list_free(list);
|
2000-10-20 16:49:20 +00:00
|
|
|
}
|
|
|
|
|
2001-01-07 15:24:52 +00:00
|
|
|
/* Traversing */
|
2000-10-20 16:49:20 +00:00
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void list_foreach_node(list_t *list, list_action_node_t action)
|
2000-10-20 16:49:20 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
list_node_t *node, *next;
|
2000-10-20 16:49:20 +00:00
|
|
|
|
2002-09-09 21:49:16 +00:00
|
|
|
for(node = list->head; node; node = next) {
|
|
|
|
next = node->next;
|
|
|
|
action(node);
|
|
|
|
}
|
2001-01-07 15:24:52 +00:00
|
|
|
}
|
2000-10-20 16:49:20 +00:00
|
|
|
|
2002-09-09 22:33:31 +00:00
|
|
|
void list_foreach(list_t *list, list_action_t action)
|
2000-10-20 16:49:20 +00:00
|
|
|
{
|
2002-09-09 21:49:16 +00:00
|
|
|
list_node_t *node, *next;
|
|
|
|
|
|
|
|
for(node = list->head; node; node = next) {
|
|
|
|
next = node->next;
|
|
|
|
if(node->data)
|
|
|
|
action(node->data);
|
|
|
|
}
|
2000-10-20 16:49:20 +00:00
|
|
|
}
|