more useful list primitives
[apps/madmutt.git] / lib-lib / list.c
1 /*
2  *  This program is free software; you can redistribute it and/or modify
3  *  it under the terms of the GNU General Public License as published by
4  *  the Free Software Foundation; either version 2 of the License, or (at
5  *  your option) any later version.
6  *
7  *  This program is distributed in the hope that it will be useful, but
8  *  WITHOUT ANY WARRANTY; without even the implied warranty of
9  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
10  *  General Public License for more details.
11  *
12  *  You should have received a copy of the GNU General Public License
13  *  along with this program; if not, write to the Free Software
14  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
15  *  MA 02110-1301, USA.
16  *
17  *  Copyright © 2006 Pierre Habouzit
18  */
19
20 /*
21  * Copyright notice from original mutt:
22  * Copyright (C) 1996-2000 Michael R. Elkins <me@mutt.org>
23  */
24
25 #include <stdlib.h>
26 #include <string.h>
27
28 #include "mem.h"
29 #include "str.h"
30 #include "list.h"
31
32 LIST *mutt_copy_list(LIST *p) {
33     LIST *t, *r = NULL, *l = NULL;
34
35     for (; p; p = p->next) {
36         t = p_new(LIST, 1);
37         t->data = m_strdup(p->data);
38         t->next = NULL;
39         if (l) {
40             r->next = t;
41             r = r->next;
42         } else {
43             l = r = t;
44         }
45     }
46     return l;
47 }
48
49 LIST *mutt_add_list_n(LIST *head, const void *data, size_t len) {
50     LIST *tmp;
51
52     for (tmp = head; tmp && tmp->next; tmp = tmp->next);
53
54     if (tmp) {
55         tmp->next = p_new(LIST, 1);
56         tmp = tmp->next;
57     } else {
58         head = tmp = p_new(LIST, 1);
59     }
60
61     tmp->data = p_dup((const char *)data, len);
62     tmp->next = NULL;
63     return head;
64 }
65
66 void mutt_free_list(LIST **list) {
67     LIST *p;
68
69     if (list) {
70         while (*list) {
71             p = *list;
72             *list = (*list)->next;
73             p_delete(&p->data);
74             p_delete(&p);
75         }
76     }
77 }