discover/grub2: Clean lexer.[ch]
[petitboot] / test / lib / list-test.c
1 /*
2  *  Copyright Geoff Levand <geoff@infradead.org>
3  *
4  *  This program is free software; you can redistribute it and/or modify
5  *  it under the terms of the GNU General Public License as published by
6  *  the Free Software Foundation; version 2 of the License.
7  *
8  *  This program is distributed in the hope that it will be useful,
9  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
10  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11  *  GNU General Public License for more details.
12  *
13  *  You should have received a copy of the GNU General Public License
14  *  along with this program; if not, write to the Free Software
15  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
16  */
17
18 #if defined(HAVE_CONFIG_H)
19 #include "config.h"
20 #endif
21
22 #define _GNU_SOURCE
23
24 #include <stdio.h>
25 #include <stdlib.h>
26
27 #include <list/list.h>
28 #include <talloc/talloc.h>
29
30
31 int main(void)
32 {
33         struct item {
34                 struct list_item list;
35                 int value;
36         };
37         STATIC_LIST(tester);
38         struct item *item;
39         struct item *tmp;
40         void *ctx;
41         int i;
42
43         ctx = talloc_new(NULL);
44
45         for (i = 0; i < 5; i++) {
46                 struct item *item = talloc(ctx, struct item);
47
48                 item->value = i;
49
50                 list_add_tail(&tester, &item->list);
51         }
52         
53         i = 0;
54         fprintf(stderr, "-- list_for_each_entry --\n");
55         list_for_each_entry(&tester, item, list) {
56                 fprintf(stderr, "%d: %d: %p -> %p\n", i++, item->value, item, item->list.next);
57         }
58         
59         i = 0;
60         fprintf(stderr, "-- list_for_each_entry_safe --\n");
61         list_for_each_entry_safe(&tester, item, tmp, list) {
62                 fprintf(stderr, "pos: %d: %d: %p -> %p\n", i++, item->value, item, item->list.next);
63                 fprintf(stderr, "tmp:       %p -> %p\n", tmp, (tmp ? tmp->list.next : NULL));
64                 list_remove(&item->list);
65         }
66
67         /* we should see that the list is empty */
68         i = 0;
69         fprintf(stderr, "-- list_for_each_entry(empty) --\n");
70         list_for_each_entry(&tester, item, list) {
71                 fprintf(stderr, "%d: %d: %p -> %p\n", i++, item->value, item, item->list.next);
72         }
73
74         if (i) {
75                 fprintf(stderr, "Error: list should be empty\n");
76                 return EXIT_FAILURE;
77         }
78
79         i = 0;
80         fprintf(stderr, "-- list_for_each_entry_safe(empty) --\n");
81         list_for_each_entry_safe(&tester, item, tmp, list) {
82                 fprintf(stderr, "%d: %d: %p -> %p\n", i++, item->value, item, item->list.next);
83         }
84
85         if (i) {
86                 fprintf(stderr, "Error: list should be empty\n");
87                 return EXIT_FAILURE;
88         }
89         fprintf(stderr, "-- done --\n");
90
91         talloc_free(ctx);
92
93         return EXIT_SUCCESS;
94 }