dist/ntp/include/isc/list.h

   1 /*      $NetBSD$        */
   2
   3 /*
   4  * Copyright (C) 1997-2001  Internet Software Consortium.
   5  *
   6  * Permission to use, copy, modify, and distribute this software for any
   7  * purpose with or without fee is hereby granted, provided that the above
   8  * copyright notice and this permission notice appear in all copies.
   9  *
  10  * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM
  11  * DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL
  12  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL
  13  * INTERNET SOFTWARE CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT,
  14  * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING
  15  * FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT,
  16  * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
  17  * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  18  */
  19
  20 /* Id: list.h,v 1.19 2002/05/09 07:09:30 marka Exp */
  21
  22 #ifndef ISC_LIST_H
  23 #define ISC_LIST_H 1
  24 #include <isc/boolean.h>
  25 #include <isc/assertions.h>
  26
  27 #ifdef ISC_LIST_CHECKINIT
  28 #define ISC_LINK_INSIST(x) ISC_INSIST(x)
  29 #else
  30 #define ISC_LINK_INSIST(x)
  31 #endif
  32
  33 #define ISC_LIST(type) struct { type *head, *tail; }
  34 #define ISC_LIST_INIT(list) \
  35         do { (list).head = NULL; (list).tail = NULL; } while (0)
  36
  37 #define ISC_LINK(type) struct { type *prev, *next; }
  38 #define ISC_LINK_INIT_TYPE(elt, link, type) \
  39         do { \
  40                 (elt)->link.prev = (type *)(-1); \
  41                 (elt)->link.next = (type *)(-1); \
  42         } while (0)
  43 #define ISC_LINK_INIT(elt, link) \
  44         ISC_LINK_INIT_TYPE(elt, link, void)
  45 #define ISC_LINK_LINKED(elt, link) ((void *)((elt)->link.prev) != (void *)(-1))
  46
  47 #define ISC_LIST_HEAD(list) ((list).head)
  48 #define ISC_LIST_TAIL(list) ((list).tail)
  49 #define ISC_LIST_EMPTY(list) ISC_TF((list).head == NULL)
  50
  51 #define __ISC_LIST_PREPENDUNSAFE(list, elt, link) \
  52         do { \
  53                 if ((list).head != NULL) \
  54                         (list).head->link.prev = (elt); \
  55                 else \
  56                         (list).tail = (elt); \
  57                 (elt)->link.prev = NULL; \
  58                 (elt)->link.next = (list).head; \
  59                 (list).head = (elt); \
  60         } while (0)
  61
  62 #define ISC_LIST_PREPEND(list, elt, link) \
  63         do { \
  64                 ISC_LINK_INSIST(!ISC_LINK_LINKED(elt, link)); \
  65                 __ISC_LIST_PREPENDUNSAFE(list, elt, link); \
  66         } while (0)
  67
  68 #define ISC_LIST_INITANDPREPEND(list, elt, link) \
  69                 __ISC_LIST_PREPENDUNSAFE(list, elt, link)
  70
  71 #define __ISC_LIST_APPENDUNSAFE(list, elt, link) \
  72         do { \
  73                 if ((list).tail != NULL) \
  74                         (list).tail->link.next = (elt); \
  75                 else \
  76                         (list).head = (elt); \
  77                 (elt)->link.prev = (list).tail; \
  78                 (elt)->link.next = NULL; \
  79                 (list).tail = (elt); \
  80         } while (0)
  81
  82 #define ISC_LIST_APPEND(list, elt, link) \
  83         do { \
  84                 ISC_LINK_INSIST(!ISC_LINK_LINKED(elt, link)); \
  85                 __ISC_LIST_APPENDUNSAFE(list, elt, link); \
  86         } while (0)
  87
  88 #define ISC_LIST_INITANDAPPEND(list, elt, link) \
  89                 __ISC_LIST_APPENDUNSAFE(list, elt, link)
  90
  91 #define __ISC_LIST_UNLINKUNSAFE_TYPE(list, elt, link, type) \
  92         do { \
  93                 if ((elt)->link.next != NULL) \
  94                         (elt)->link.next->link.prev = (elt)->link.prev; \
  95                 else \
  96                         (list).tail = (elt)->link.prev; \
  97                 if ((elt)->link.prev != NULL) \
  98                         (elt)->link.prev->link.next = (elt)->link.next; \
  99                 else \
 100                         (list).head = (elt)->link.next; \
 101                 (elt)->link.prev = (type *)(-1); \
 102                 (elt)->link.next = (type *)(-1); \
 103         } while (0)
 104
 105 #define __ISC_LIST_UNLINKUNSAFE(list, elt, link) \
 106         __ISC_LIST_UNLINKUNSAFE_TYPE(list, elt, link, void)
 107
 108 #define ISC_LIST_UNLINK_TYPE(list, elt, link, type) \
 109         do { \
 110                 ISC_LINK_INSIST(ISC_LINK_LINKED(elt, link)); \
 111                 __ISC_LIST_UNLINKUNSAFE_TYPE(list, elt, link, type); \
 112         } while (0)
 113 #define ISC_LIST_UNLINK(list, elt, link) \
 114         ISC_LIST_UNLINK_TYPE(list, elt, link, void)
 115
 116 #define ISC_LIST_PREV(elt, link) ((elt)->link.prev)
 117 #define ISC_LIST_NEXT(elt, link) ((elt)->link.next)
 118
 119 #define __ISC_LIST_INSERTBEFOREUNSAFE(list, before, elt, link) \
 120         do { \
 121                 if ((before)->link.prev == NULL) \
 122                         ISC_LIST_PREPEND(list, elt, link); \
 123                 else { \
 124                         (elt)->link.prev = (before)->link.prev; \
 125                         (before)->link.prev = (elt); \
 126                         (elt)->link.prev->link.next = (elt); \
 127                         (elt)->link.next = (before); \
 128                 } \
 129         } while (0)
 130
 131 #define ISC_LIST_INSERTBEFORE(list, before, elt, link) \
 132         do { \
 133                 ISC_LINK_INSIST(ISC_LINK_LINKED(before, link)); \
 134                 ISC_LINK_INSIST(!ISC_LINK_LINKED(elt, link)); \
 135                 __ISC_LIST_INSERTBEFOREUNSAFE(list, before, elt, link); \
 136         } while (0)
 137
 138 #define __ISC_LIST_INSERTAFTERUNSAFE(list, after, elt, link) \
 139         do { \
 140                 if ((after)->link.next == NULL) \
 141                         ISC_LIST_APPEND(list, elt, link); \
 142                 else { \
 143                         (elt)->link.next = (after)->link.next; \
 144                         (after)->link.next = (elt); \
 145                         (elt)->link.next->link.prev = (elt); \
 146                         (elt)->link.prev = (after); \
 147                 } \
 148         } while (0)
 149
 150 #define ISC_LIST_INSERTAFTER(list, after, elt, link) \
 151         do { \
 152                 ISC_LINK_INSIST(ISC_LINK_LINKED(after, link)); \
 153                 ISC_LINK_INSIST(!ISC_LINK_LINKED(elt, link)); \
 154                 __ISC_LIST_INSERTAFTERUNSAFE(list, after, elt, link); \
 155         } while (0)
 156
 157 #define ISC_LIST_APPENDLIST(list1, list2, link) \
 158         do { \
 159                 if (ISC_LIST_EMPTY(list1)) \
 160                         (list1) = (list2); \
 161                 else if (!ISC_LIST_EMPTY(list2)) { \
 162                         (list1).tail->link.next = (list2).head; \
 163                         (list2).head->link.prev = (list1).tail; \
 164                         (list1).tail = (list2).tail; \
 165                 } \
 166                 (list2).head = NULL; \
 167                 (list2).tail = NULL; \
 168         } while (0)
 169
 170 #define ISC_LIST_ENQUEUE(list, elt, link) ISC_LIST_APPEND(list, elt, link)
 171 #define __ISC_LIST_ENQUEUEUNSAFE(list, elt, link) \
 172         __ISC_LIST_APPENDUNSAFE(list, elt, link)
 173 #define ISC_LIST_DEQUEUE(list, elt, link) \
 174          ISC_LIST_UNLINK_TYPE(list, elt, link, void)
 175 #define ISC_LIST_DEQUEUE_TYPE(list, elt, link, type) \
 176          ISC_LIST_UNLINK_TYPE(list, elt, link, type)
 177 #define __ISC_LIST_DEQUEUEUNSAFE(list, elt, link) \
 178         __ISC_LIST_UNLINKUNSAFE_TYPE(list, elt, link, void)
 179 #define __ISC_LIST_DEQUEUEUNSAFE_TYPE(list, elt, link, type) \
 180         __ISC_LIST_UNLINKUNSAFE_TYPE(list, elt, link, type)
 181
 182 #endif /* ISC_LIST_H */