1 #include <ccan/tal/tal.h>
2 #include <ccan/tal/tal.c>
3 #include <ccan/tap/tap.h>
5 static int error_count;
7 static void my_error(const char *msg)
19 tal_set_backend(NULL, NULL, NULL, my_error);
21 p = tal_arr(NULL, int, (size_t)-1);
23 ok1(error_count == 1);
25 p = tal_arr(NULL, char, (size_t)-2);
27 ok1(error_count == 2);
29 /* Now try overflow cases for tal_dup. */
31 origpi = tal_arr(NULL, int, 100);
33 ok1(error_count == 0);
34 pi = tal_dup(NULL, int, origpi, (size_t)-1, 0);
36 ok1(error_count == 1);
37 pi = tal_dup(NULL, int, origpi, 0, (size_t)-1);
39 ok1(error_count == 2);
41 pi = tal_dup(NULL, int, origpi, (size_t)-1UL / sizeof(int),
42 (size_t)-1UL / sizeof(int));
44 ok1(error_count == 3);
45 /* This will still overflow when tal_hdr is added. */
46 pi = tal_dup(NULL, int, origpi, (size_t)-1UL / sizeof(int) / 2,
47 (size_t)-1UL / sizeof(int) / 2);
49 ok1(error_count == 4);
50 ok1(tal_first(NULL) == origpi && !tal_next(NULL, origpi));
53 /* Now, check that with taltk() we free old one on failure. */
54 origpi = tal_arr(NULL, int, 100);
56 pi = tal_dup(NULL, int, take(origpi), (size_t)-1, 0);
58 ok1(error_count == 1);
60 origpi = tal_arr(NULL, int, 100);
62 pi = tal_dup(NULL, int, take(origpi), 0, (size_t)-1);
64 ok1(error_count == 1);
65 ok1(!tal_first(NULL));
67 origpi = tal_arr(NULL, int, 100);
69 pi = tal_dup(NULL, int, take(origpi), (size_t)-1UL / sizeof(int),
70 (size_t)-1UL / sizeof(int));
72 ok1(error_count == 1);
73 ok1(!tal_first(NULL));
75 origpi = tal_arr(NULL, int, 100);
77 /* This will still overflow when tal_hdr is added. */
78 pi = tal_dup(NULL, int, take(origpi), (size_t)-1UL / sizeof(int) / 2,
79 (size_t)-1UL / sizeof(int) / 2);
81 ok1(error_count == 1);
82 ok1(!tal_first(NULL));