| #include <stdio.h> |
| #include <stdlib.h> |
| #include <stdint.h> |
| |
| #define JEMALLOC_MANGLE |
| #include "jemalloc_test.h" |
| |
| #define CHUNK 0x400000 |
| /* #define MAXALIGN ((size_t)0x80000000000LLU) */ |
| #define MAXALIGN ((size_t)0x2000000LLU) |
| #define NITER 4 |
| |
| int |
| main(void) |
| { |
| int r; |
| void *p; |
| size_t nsz, rsz, sz, alignment, total; |
| unsigned i; |
| void *ps[NITER]; |
| |
| fprintf(stderr, "Test begin\n"); |
| |
| sz = 42; |
| nsz = 0; |
| r = nallocm(&nsz, sz, 0); |
| if (r != ALLOCM_SUCCESS) { |
| fprintf(stderr, "Unexpected nallocm() error\n"); |
| abort(); |
| } |
| rsz = 0; |
| r = allocm(&p, &rsz, sz, 0); |
| if (r != ALLOCM_SUCCESS) { |
| fprintf(stderr, "Unexpected allocm() error\n"); |
| abort(); |
| } |
| if (rsz < sz) |
| fprintf(stderr, "Real size smaller than expected\n"); |
| if (nsz != rsz) |
| fprintf(stderr, "nallocm()/allocm() rsize mismatch\n"); |
| if (dallocm(p, 0) != ALLOCM_SUCCESS) |
| fprintf(stderr, "Unexpected dallocm() error\n"); |
| |
| r = allocm(&p, NULL, sz, 0); |
| if (r != ALLOCM_SUCCESS) { |
| fprintf(stderr, "Unexpected allocm() error\n"); |
| abort(); |
| } |
| if (dallocm(p, 0) != ALLOCM_SUCCESS) |
| fprintf(stderr, "Unexpected dallocm() error\n"); |
| |
| nsz = 0; |
| r = nallocm(&nsz, sz, ALLOCM_ZERO); |
| if (r != ALLOCM_SUCCESS) { |
| fprintf(stderr, "Unexpected nallocm() error\n"); |
| abort(); |
| } |
| rsz = 0; |
| r = allocm(&p, &rsz, sz, ALLOCM_ZERO); |
| if (r != ALLOCM_SUCCESS) { |
| fprintf(stderr, "Unexpected allocm() error\n"); |
| abort(); |
| } |
| if (nsz != rsz) |
| fprintf(stderr, "nallocm()/allocm() rsize mismatch\n"); |
| if (dallocm(p, 0) != ALLOCM_SUCCESS) |
| fprintf(stderr, "Unexpected dallocm() error\n"); |
| |
| #if LG_SIZEOF_PTR == 3 |
| alignment = 0x8000000000000000LLU; |
| sz = 0x8000000000000000LLU; |
| #else |
| alignment = 0x80000000LU; |
| sz = 0x80000000LU; |
| #endif |
| nsz = 0; |
| r = nallocm(&nsz, sz, ALLOCM_ALIGN(alignment)); |
| if (r == ALLOCM_SUCCESS) { |
| fprintf(stderr, |
| "Expected error for nallocm(&nsz, %zu, 0x%x)\n", |
| sz, ALLOCM_ALIGN(alignment)); |
| } |
| rsz = 0; |
| r = allocm(&p, &rsz, sz, ALLOCM_ALIGN(alignment)); |
| if (r == ALLOCM_SUCCESS) { |
| fprintf(stderr, |
| "Expected error for allocm(&p, %zu, 0x%x)\n", |
| sz, ALLOCM_ALIGN(alignment)); |
| } |
| if (nsz != rsz) |
| fprintf(stderr, "nallocm()/allocm() rsize mismatch\n"); |
| |
| #if LG_SIZEOF_PTR == 3 |
| alignment = 0x4000000000000000LLU; |
| sz = 0x8400000000000001LLU; |
| #else |
| alignment = 0x40000000LU; |
| sz = 0x84000001LU; |
| #endif |
| nsz = 0; |
| r = nallocm(&nsz, sz, ALLOCM_ALIGN(alignment)); |
| if (r != ALLOCM_SUCCESS) |
| fprintf(stderr, "Unexpected nallocm() error\n"); |
| rsz = 0; |
| r = allocm(&p, &rsz, sz, ALLOCM_ALIGN(alignment)); |
| if (r == ALLOCM_SUCCESS) { |
| fprintf(stderr, |
| "Expected error for allocm(&p, %zu, 0x%x)\n", |
| sz, ALLOCM_ALIGN(alignment)); |
| } |
| |
| alignment = 0x10LLU; |
| #if LG_SIZEOF_PTR == 3 |
| sz = 0xfffffffffffffff0LLU; |
| #else |
| sz = 0xfffffff0LU; |
| #endif |
| nsz = 0; |
| r = nallocm(&nsz, sz, ALLOCM_ALIGN(alignment)); |
| if (r == ALLOCM_SUCCESS) { |
| fprintf(stderr, |
| "Expected error for nallocm(&nsz, %zu, 0x%x)\n", |
| sz, ALLOCM_ALIGN(alignment)); |
| } |
| rsz = 0; |
| r = allocm(&p, &rsz, sz, ALLOCM_ALIGN(alignment)); |
| if (r == ALLOCM_SUCCESS) { |
| fprintf(stderr, |
| "Expected error for allocm(&p, %zu, 0x%x)\n", |
| sz, ALLOCM_ALIGN(alignment)); |
| } |
| if (nsz != rsz) |
| fprintf(stderr, "nallocm()/allocm() rsize mismatch\n"); |
| |
| for (i = 0; i < NITER; i++) |
| ps[i] = NULL; |
| |
| for (alignment = 8; |
| alignment <= MAXALIGN; |
| alignment <<= 1) { |
| total = 0; |
| fprintf(stderr, "Alignment: %zu\n", alignment); |
| for (sz = 1; |
| sz < 3 * alignment && sz < (1U << 31); |
| sz += (alignment >> (LG_SIZEOF_PTR-1)) - 1) { |
| for (i = 0; i < NITER; i++) { |
| nsz = 0; |
| r = nallocm(&nsz, sz, |
| ALLOCM_ALIGN(alignment) | ALLOCM_ZERO); |
| if (r != ALLOCM_SUCCESS) { |
| fprintf(stderr, |
| "nallocm() error for size %zu" |
| " (0x%zx): %d\n", |
| sz, sz, r); |
| exit(1); |
| } |
| rsz = 0; |
| r = allocm(&ps[i], &rsz, sz, |
| ALLOCM_ALIGN(alignment) | ALLOCM_ZERO); |
| if (r != ALLOCM_SUCCESS) { |
| fprintf(stderr, |
| "allocm() error for size %zu" |
| " (0x%zx): %d\n", |
| sz, sz, r); |
| exit(1); |
| } |
| if (rsz < sz) { |
| fprintf(stderr, |
| "Real size smaller than" |
| " expected\n"); |
| } |
| if (nsz != rsz) { |
| fprintf(stderr, |
| "nallocm()/allocm() rsize" |
| " mismatch\n"); |
| } |
| if ((uintptr_t)p & (alignment-1)) { |
| fprintf(stderr, |
| "%p inadequately aligned for" |
| " alignment: %zu\n", p, alignment); |
| } |
| sallocm(ps[i], &rsz, 0); |
| total += rsz; |
| if (total >= (MAXALIGN << 1)) |
| break; |
| } |
| for (i = 0; i < NITER; i++) { |
| if (ps[i] != NULL) { |
| dallocm(ps[i], 0); |
| ps[i] = NULL; |
| } |
| } |
| } |
| } |
| |
| fprintf(stderr, "Test end\n"); |
| return (0); |
| } |