|
Packit |
d28291 |
|
|
Packit |
d28291 |
#include <stdlib.h>
|
|
Packit |
d28291 |
#include <limits.h>
|
|
Packit |
d28291 |
#include <stdio.h>
|
|
Packit |
d28291 |
|
|
Packit |
d28291 |
#ifndef GC_IGNORE_WARN
|
|
Packit |
d28291 |
/* Ignore misleading "Out of Memory!" warning (which is printed on */
|
|
Packit |
d28291 |
/* every GC_MALLOC call below) by defining this macro before "gc.h" */
|
|
Packit |
d28291 |
/* inclusion. */
|
|
Packit |
d28291 |
# define GC_IGNORE_WARN
|
|
Packit |
d28291 |
#endif
|
|
Packit |
d28291 |
|
|
Packit |
d28291 |
#ifndef GC_MAXIMUM_HEAP_SIZE
|
|
Packit |
d28291 |
# define GC_MAXIMUM_HEAP_SIZE 100 * 1024 * 1024
|
|
Packit |
d28291 |
# define GC_INITIAL_HEAP_SIZE GC_MAXIMUM_HEAP_SIZE / 20
|
|
Packit |
d28291 |
/* Otherwise heap expansion aborts when deallocating large block. */
|
|
Packit |
d28291 |
/* That's OK. We test this corner case mostly to make sure that */
|
|
Packit |
d28291 |
/* it fails predictably. */
|
|
Packit |
d28291 |
#endif
|
|
Packit |
d28291 |
|
|
Packit |
d28291 |
#ifndef GC_ATTR_ALLOC_SIZE
|
|
Packit |
d28291 |
/* Omit alloc_size attribute to avoid compiler warnings about */
|
|
Packit |
d28291 |
/* exceeding maximum object size when values close to GC_SWORD_MAX */
|
|
Packit |
d28291 |
/* are passed to GC_MALLOC. */
|
|
Packit |
d28291 |
# define GC_ATTR_ALLOC_SIZE(argnum) /* empty */
|
|
Packit |
d28291 |
#endif
|
|
Packit |
d28291 |
|
|
Packit |
d28291 |
#include "gc.h"
|
|
Packit |
d28291 |
|
|
Packit |
d28291 |
/*
|
|
Packit |
d28291 |
* Check that very large allocation requests fail. "Success" would usually
|
|
Packit |
d28291 |
* indicate that the size was somehow converted to a negative
|
|
Packit |
d28291 |
* number. Clients shouldn't do this, but we should fail in the
|
|
Packit |
d28291 |
* expected manner.
|
|
Packit |
d28291 |
*/
|
|
Packit |
d28291 |
|
|
Packit |
d28291 |
#define CHECK_ALLOC_FAILED(r, sz_str) \
|
|
Packit |
d28291 |
do { \
|
|
Packit |
d28291 |
if (NULL != (r)) { \
|
|
Packit |
d28291 |
fprintf(stderr, \
|
|
Packit |
d28291 |
"Size " sz_str " allocation unexpectedly succeeded\n"); \
|
|
Packit |
d28291 |
exit(1); \
|
|
Packit |
d28291 |
} \
|
|
Packit |
d28291 |
} while (0)
|
|
Packit |
d28291 |
|
|
Packit |
d28291 |
#define GC_WORD_MAX ((GC_word)-1)
|
|
Packit |
d28291 |
#define GC_SWORD_MAX ((GC_signed_word)(GC_WORD_MAX >> 1))
|
|
Packit |
d28291 |
|
|
Packit |
d28291 |
int main(void)
|
|
Packit |
d28291 |
{
|
|
Packit |
d28291 |
GC_INIT();
|
|
Packit |
d28291 |
|
|
Packit |
d28291 |
CHECK_ALLOC_FAILED(GC_MALLOC(GC_SWORD_MAX - 1024), "SWORD_MAX-1024");
|
|
Packit |
d28291 |
CHECK_ALLOC_FAILED(GC_MALLOC(GC_SWORD_MAX), "SWORD_MAX");
|
|
Packit |
d28291 |
CHECK_ALLOC_FAILED(GC_MALLOC((GC_word)GC_SWORD_MAX + 1), "SWORD_MAX+1");
|
|
Packit |
d28291 |
CHECK_ALLOC_FAILED(GC_MALLOC((GC_word)GC_SWORD_MAX + 1024),
|
|
Packit |
d28291 |
"SWORD_MAX+1024");
|
|
Packit |
d28291 |
CHECK_ALLOC_FAILED(GC_MALLOC(GC_WORD_MAX - 1024), "WORD_MAX-1024");
|
|
Packit |
d28291 |
CHECK_ALLOC_FAILED(GC_MALLOC(GC_WORD_MAX - 16), "WORD_MAX-16");
|
|
Packit |
d28291 |
CHECK_ALLOC_FAILED(GC_MALLOC(GC_WORD_MAX - 8), "WORD_MAX-8");
|
|
Packit |
d28291 |
CHECK_ALLOC_FAILED(GC_MALLOC(GC_WORD_MAX - 4), "WORD_MAX-4");
|
|
Packit |
d28291 |
CHECK_ALLOC_FAILED(GC_MALLOC(GC_WORD_MAX), "WORD_MAX");
|
|
Packit |
d28291 |
return 0;
|
|
Packit |
d28291 |
}
|