1 /* Test for memalign chunk reuse.
2 Copyright (C) 2022 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
24 #include <array_length.h>
25 #include <libc-pointer-arith.h>
26 #include <support/check.h>
28 typedef struct TestCase
{
35 static TestCase tcache_allocs
[] = {
36 { 24, 8, NULL
, NULL
},
37 { 24, 16, NULL
, NULL
},
38 { 128, 32, NULL
, NULL
}
40 #define TN array_length (tcache_allocs)
42 static TestCase large_allocs
[] = {
43 { 23450, 64, NULL
, NULL
},
44 { 23450, 64, NULL
, NULL
},
45 { 23550, 64, NULL
, NULL
},
46 { 23550, 64, NULL
, NULL
},
47 { 23650, 64, NULL
, NULL
},
48 { 23650, 64, NULL
, NULL
},
49 { 33650, 64, NULL
, NULL
},
50 { 33650, 64, NULL
, NULL
}
52 #define LN array_length (large_allocs)
56 /* Sanity checks, ancillary to the actual test. */
58 if (p == NULL || !PTR_IS_ALIGNED (p, a)) \
59 FAIL_EXIT1 ("NULL or misaligned memory detected.\n");
71 for (i
= 0; i
< TN
; ++ i
)
73 tcache_allocs
[i
].ptr1
= memalign (tcache_allocs
[i
].alignment
, tcache_allocs
[i
].size
);
74 CHECK (tcache_allocs
[i
].ptr1
, tcache_allocs
[i
].alignment
);
75 free (tcache_allocs
[i
].ptr1
);
76 /* This should return the same chunk as was just free'd. */
77 tcache_allocs
[i
].ptr2
= memalign (tcache_allocs
[i
].alignment
, tcache_allocs
[i
].size
);
78 CHECK (tcache_allocs
[i
].ptr2
, tcache_allocs
[i
].alignment
);
79 free (tcache_allocs
[i
].ptr2
);
81 TEST_VERIFY (tcache_allocs
[i
].ptr1
== tcache_allocs
[i
].ptr2
);
84 /* Test for non-head tcache hits. */
85 for (i
= 0; i
< array_length (ptr
); ++ i
)
89 ptr
[i
] = memalign (64, 256);
94 ptr
[i
] = malloc (256);
98 for (i
= 0; i
< array_length (ptr
); ++ i
)
101 p
= memalign (64, 256);
105 for (i
= 0; i
< 10; ++ i
)
109 TEST_VERIFY (count
> 0);
111 /* Large bins test. */
113 for (i
= 0; i
< LN
; ++ i
)
115 large_allocs
[i
].ptr1
= memalign (large_allocs
[i
].alignment
, large_allocs
[i
].size
);
116 CHECK (large_allocs
[i
].ptr1
, large_allocs
[i
].alignment
);
117 /* Keep chunks from combining by fragmenting the heap. */
122 for (i
= 0; i
< LN
; ++ i
)
123 free (large_allocs
[i
].ptr1
);
125 /* Force the unsorted bins to be scanned and moved to small/large
129 for (i
= 0; i
< LN
; ++ i
)
131 large_allocs
[i
].ptr2
= memalign (large_allocs
[i
].alignment
, large_allocs
[i
].size
);
132 CHECK (large_allocs
[i
].ptr2
, large_allocs
[i
].alignment
);
136 for (i
= 0; i
< LN
; ++ i
)
139 for (j
= 0; j
< LN
; ++ j
)
140 if (large_allocs
[i
].ptr1
== large_allocs
[j
].ptr2
)
146 /* The allocation algorithm is complicated outside of the memalign
147 logic, so just make sure it's working for most of the
148 allocations. This avoids possible boundary conditions with
150 TEST_VERIFY (count
> LN
/ 2);
155 #include <support/test-driver.c>