test/list.h

   1 #define MAIN_(x) A_CAST_2(x, _list)
   2 #include "test.h"
   3 #include "a/list.h"
   4
   5 static a_size a_list_len(a_list const *ctx)
   6 {
   7     a_size count = 0;
   8     if (!ctx) {}
   9     else if (ctx != ctx->next)
  10     {
  11         a_list_foreach_next(it, ctx)
  12         {
  13             if (it == it->next)
  14             {
  15                 printf("\nwarning endless loop!\n");
  16                 break;
  17             }
  18             ++count;
  19         }
  20     }
  21     else if (ctx != ctx->prev)
  22     {
  23         a_list_foreach_prev(it, ctx)
  24         {
  25             if (it == it->prev)
  26             {
  27                 printf("\nwarning endless loop!\n");
  28                 break;
  29             }
  30             ++count;
  31         }
  32     }
  33     return count;
  34 }
  35
  36 typedef struct
  37 {
  38     a_list node;
  39     a_cast data;
  40 } data;
  41
  42 static void test_next(void)
  43 {
  44     a_list *list1 = a_new(a_list, A_NULL, 1);
  45     a_list_ctor(list1);
  46     for (int i = 0; i != 10; ++i)
  47     {
  48         data *node = a_new(data, A_NULL, 1);
  49         node->data.i = i;
  50         a_list_add_prev(list1, &node->node);
  51     }
  52     a_list_rot_prev(list1);
  53     a_list *list2 = a_new(a_list, A_NULL, 1);
  54     a_list_ctor(list2);
  55     for (int i = 10; i != 21; ++i)
  56     {
  57         data *node = a_new(data, A_NULL, 1);
  58         node->data.i = i;
  59         a_list_add_prev(list2, &node->node);
  60     }
  61     {
  62         data *node = a_list_entry_prev(list2, data, node); // NOLINT(performance-no-int-to-ptr)
  63         a_list_del_prev(list2);
  64         a_die(node);
  65     }
  66     a_list_mov_prev(list2, list1);
  67     a_list_init(list2);
  68     a_list_foreach_next(it, list1)
  69     {
  70         data *node = a_list_entry(it, data, node); // NOLINT(performance-no-int-to-ptr)
  71         printf("%i ", node->data.i);
  72     }
  73     printf("%" PRIz "u", a_list_len(list1));
  74     a_list_forsafe_next(it, pre, list1)
  75     {
  76         data *node = a_list_entry(it, data, node); // NOLINT(performance-no-int-to-ptr)
  77         a_list_del_node(&node->node);
  78         a_die(node);
  79     }
  80     if (list1->next == list1 && list2->next == list2)
  81     {
  82         printf(" ok");
  83     }
  84     putchar('\n');
  85     a_die(list1);
  86     a_die(list2);
  87 }
  88
  89 static void test_prev(void)
  90 {
  91     a_list *list1 = a_new(a_list, A_NULL, 1);
  92     a_list_ctor(list1);
  93     for (int i = 0; i != 10; ++i)
  94     {
  95         data *node = a_new(data, A_NULL, 1);
  96         node->data.i = i;
  97         a_list_add_next(list1, &node->node);
  98     }
  99     a_list_rot_next(list1);
 100     a_list *list2 = a_new(a_list, A_NULL, 1);
 101     a_list_ctor(list2);
 102     for (int i = 10; i != 21; ++i)
 103     {
 104         data *node = a_new(data, A_NULL, 1);
 105         node->data.i = i;
 106         a_list_add_next(list2, &node->node);
 107     }
 108     {
 109         data *node = a_list_entry_next(list2, data, node); // NOLINT(performance-no-int-to-ptr)
 110         a_list_del_next(list2);
 111         a_die(node);
 112     }
 113     a_list_mov_next(list2, list1);
 114     a_list_init(list2);
 115     a_list_foreach_prev(it, list1)
 116     {
 117         data *node = a_list_entry(it, data, node); // NOLINT(performance-no-int-to-ptr)
 118         printf("%i ", node->data.i);
 119     }
 120     printf("%" PRIz "u", a_list_len(list1));
 121     a_list_forsafe_prev(it, pre, list1)
 122     {
 123         data *node = a_list_entry(it, data, node); // NOLINT(performance-no-int-to-ptr)
 124         a_list_del_node(&node->node);
 125         a_die(node);
 126     }
 127     if (list1->prev == list1 && list2->prev == list2)
 128     {
 129         printf(" ok");
 130     }
 131     putchar('\n');
 132     a_die(list1);
 133     a_die(list2);
 134 }
 135
 136 static void test_func(void)
 137 {
 138     a_list *list1 = a_new(a_list, A_NULL, 1);
 139     a_list_ctor(list1);
 140     for (int i = 0; i != 10; ++i)
 141     {
 142         data *node = a_new(data, A_NULL, 1);
 143         node->data.i = i;
 144         a_list_add_prev(list1, &node->node);
 145     }
 146     a_list *list2 = a_new(a_list, A_NULL, 1);
 147     a_list_ctor(list2);
 148     for (int i = 10; i != 20; ++i)
 149     {
 150         data *node = a_new(data, A_NULL, 1);
 151         node->data.i = i;
 152         a_list_add_prev(list2, &node->node);
 153     }
 154     data *ctx = a_new(data, A_NULL, 1);
 155     ctx->data.i = -1;
 156     {
 157         a_list *ptr = list2->prev;
 158         a_list_shift_node(list2->prev, &ctx->node);
 159         ctx = a_list_entry(ptr, data, node); // NOLINT(performance-no-int-to-ptr)
 160     }
 161     a_list_swap_node(list2->prev, list2->next);
 162     a_list_foreach_next(it, list1)
 163     {
 164         data *node = a_list_entry(it, data, node); // NOLINT(performance-no-int-to-ptr)
 165         printf("%i ", node->data.i);
 166     }
 167     a_list_foreach_next(it, list2)
 168     {
 169         data *node = a_list_entry(it, data, node); // NOLINT(performance-no-int-to-ptr)
 170         printf("%i ", node->data.i);
 171     }
 172     printf("%" PRIz "u", a_list_len(list1) + a_list_len(list2));
 173     a_list_forsafe_next(it, at, list1)
 174     {
 175         data *node = a_list_entry(it, data, node); // NOLINT(performance-no-int-to-ptr)
 176         a_list_del_node(&node->node);
 177         a_die(node);
 178     }
 179     a_list_forsafe_next(it, at, list2)
 180     {
 181         data *node = a_list_entry(it, data, node); // NOLINT(performance-no-int-to-ptr)
 182         a_list_del_node(&node->node);
 183         a_die(node);
 184     }
 185     if (list1->next == list1 && list2->next == list2)
 186     {
 187         printf(" ok");
 188     }
 189     putchar('\n');
 190     a_die(list1);
 191     a_die(list2);
 192     a_die(ctx);
 193 }
 194
 195 static void test_null(void)
 196 {
 197     static a_list list1 = A_LIST_INIT(list1);
 198     static a_list list2 = A_LIST_INIT(list2);
 199     a_size len = a_list_len(&list1) + a_list_len(&list2);
 200
 201     a_list_add_next(&list1, &list1);
 202     len = a_list_len(&list1) + a_list_len(&list2);
 203     if (len != 0)
 204     {
 205         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 206     }
 207
 208     a_list_add_prev(&list1, &list1);
 209     len = a_list_len(&list1) + a_list_len(&list2);
 210     if (len != 0)
 211     {
 212         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 213     }
 214
 215     a_list_add_next(&list1, &list2);
 216     len = a_list_len(&list1) + a_list_len(&list2);
 217     if (len != 2)
 218     {
 219         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 220     }
 221
 222     a_list_add_prev(&list1, &list2);
 223     len = a_list_len(&list1) + a_list_len(&list2);
 224     if (len != 2)
 225     {
 226         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 227     }
 228
 229     a_list_del_node(&list1);
 230     a_list_del_node(&list1);
 231     a_list_del_next(&list1);
 232     a_list_del_prev(&list1);
 233     a_list_ctor(&list1);
 234     len = a_list_len(&list1) + a_list_len(&list2);
 235     if (len != 0)
 236     {
 237         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 238     }
 239
 240     a_list_rot_next(&list1);
 241     a_list_rot_prev(&list1);
 242     len = a_list_len(&list1) + a_list_len(&list2);
 243     if (len != 0)
 244     {
 245         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 246     }
 247
 248     a_list_link(&list1, &list2);
 249     a_list_loop(&list1, &list2);
 250     len = a_list_len(&list1) + a_list_len(&list2);
 251     if (len != 2)
 252     {
 253         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 254     }
 255
 256     a_list_rot_next(&list1);
 257     a_list_rot_prev(&list1);
 258     a_list_rot_prev(&list1);
 259     len = a_list_len(&list1) + a_list_len(&list2);
 260     if (len != 2)
 261     {
 262         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 263     }
 264
 265     a_list_swap_node(&list1, &list1);
 266     a_list_swap_node(&list2, &list2);
 267     len = a_list_len(&list1) + a_list_len(&list2);
 268     if (len != 2)
 269     {
 270         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 271     }
 272
 273     a_list_swap_node(&list1, &list2);
 274     len = a_list_len(&list1) + a_list_len(&list2);
 275     if (len != 0)
 276     {
 277         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 278     }
 279
 280     a_list_swap_node(&list2, &list1);
 281     len = a_list_len(&list1) + a_list_len(&list2);
 282     if (len != 2)
 283     {
 284         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 285     }
 286
 287     a_list_shift_node(&list1, &list1);
 288     a_list_shift_node(&list2, &list2);
 289     len = a_list_len(&list1) + a_list_len(&list2);
 290     if (len != 2)
 291     {
 292         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 293     }
 294
 295     a_list_shift_node(&list2, &list1);
 296     a_list_init(&list2);
 297     len = a_list_len(&list1) + a_list_len(&list2);
 298     if (len != 0)
 299     {
 300         printf("failure in %s %i %" PRIz "u\n", __FILE__, __LINE__, len);
 301     }
 302 }
 303
 304 int MAIN(int argc, char *argv[]) // NOLINT(misc-definitions-in-headers)
 305 {
 306     (void)(argc);
 307     (void)(argv);
 308     printf("%s\n", A_FUNC);
 309     test_next();
 310     test_prev();
 311     test_func();
 312     test_null();
 313     return 0;
 314 }