Jason Evans | e12eaf9 | 2014-12-08 14:40:14 -0800 | [diff] [blame^] | 1 | /* List definitions. */ |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 2 | #define ql_head(a_type) \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 3 | struct { \ |
| 4 | a_type *qlh_first; \ |
| 5 | } |
| 6 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 7 | #define ql_head_initializer(a_head) {NULL} |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 8 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 9 | #define ql_elm(a_type) qr(a_type) |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 10 | |
| 11 | /* List functions. */ |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 12 | #define ql_new(a_head) do { \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 13 | (a_head)->qlh_first = NULL; \ |
| 14 | } while (0) |
| 15 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 16 | #define ql_elm_new(a_elm, a_field) qr_new((a_elm), a_field) |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 17 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 18 | #define ql_first(a_head) ((a_head)->qlh_first) |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 19 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 20 | #define ql_last(a_head, a_field) \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 21 | ((ql_first(a_head) != NULL) \ |
| 22 | ? qr_prev(ql_first(a_head), a_field) : NULL) |
| 23 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 24 | #define ql_next(a_head, a_elm, a_field) \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 25 | ((ql_last(a_head, a_field) != (a_elm)) \ |
| 26 | ? qr_next((a_elm), a_field) : NULL) |
| 27 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 28 | #define ql_prev(a_head, a_elm, a_field) \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 29 | ((ql_first(a_head) != (a_elm)) ? qr_prev((a_elm), a_field) \ |
| 30 | : NULL) |
| 31 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 32 | #define ql_before_insert(a_head, a_qlelm, a_elm, a_field) do { \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 33 | qr_before_insert((a_qlelm), (a_elm), a_field); \ |
| 34 | if (ql_first(a_head) == (a_qlelm)) { \ |
| 35 | ql_first(a_head) = (a_elm); \ |
| 36 | } \ |
| 37 | } while (0) |
| 38 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 39 | #define ql_after_insert(a_qlelm, a_elm, a_field) \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 40 | qr_after_insert((a_qlelm), (a_elm), a_field) |
| 41 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 42 | #define ql_head_insert(a_head, a_elm, a_field) do { \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 43 | if (ql_first(a_head) != NULL) { \ |
| 44 | qr_before_insert(ql_first(a_head), (a_elm), a_field); \ |
| 45 | } \ |
| 46 | ql_first(a_head) = (a_elm); \ |
| 47 | } while (0) |
| 48 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 49 | #define ql_tail_insert(a_head, a_elm, a_field) do { \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 50 | if (ql_first(a_head) != NULL) { \ |
| 51 | qr_before_insert(ql_first(a_head), (a_elm), a_field); \ |
| 52 | } \ |
| 53 | ql_first(a_head) = qr_next((a_elm), a_field); \ |
| 54 | } while (0) |
| 55 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 56 | #define ql_remove(a_head, a_elm, a_field) do { \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 57 | if (ql_first(a_head) == (a_elm)) { \ |
| 58 | ql_first(a_head) = qr_next(ql_first(a_head), a_field); \ |
| 59 | } \ |
| 60 | if (ql_first(a_head) != (a_elm)) { \ |
| 61 | qr_remove((a_elm), a_field); \ |
| 62 | } else { \ |
| 63 | ql_first(a_head) = NULL; \ |
| 64 | } \ |
| 65 | } while (0) |
| 66 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 67 | #define ql_head_remove(a_head, a_type, a_field) do { \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 68 | a_type *t = ql_first(a_head); \ |
| 69 | ql_remove((a_head), t, a_field); \ |
| 70 | } while (0) |
| 71 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 72 | #define ql_tail_remove(a_head, a_type, a_field) do { \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 73 | a_type *t = ql_last(a_head, a_field); \ |
| 74 | ql_remove((a_head), t, a_field); \ |
| 75 | } while (0) |
| 76 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 77 | #define ql_foreach(a_var, a_head, a_field) \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 78 | qr_foreach((a_var), ql_first(a_head), a_field) |
| 79 | |
Jason Evans | a4f124f | 2013-12-08 22:28:27 -0800 | [diff] [blame] | 80 | #define ql_reverse_foreach(a_var, a_head, a_field) \ |
Jason Evans | 84cbbcb | 2009-12-29 00:09:15 -0800 | [diff] [blame] | 81 | qr_reverse_foreach((a_var), ql_first(a_head), a_field) |