| /* instrumented_alloc.c -- Memory allocation instrumented to fail when |
| requested, for testing purposes. |
| Copyright (C) 2018-2024 Free Software Foundation, Inc. |
| |
| Redistribution and use in source and binary forms, with or without |
| modification, are permitted provided that the following conditions are |
| met: |
| |
| (1) Redistributions of source code must retain the above copyright |
| notice, this list of conditions and the following disclaimer. |
| |
| (2) Redistributions in binary form must reproduce the above copyright |
| notice, this list of conditions and the following disclaimer in |
| the documentation and/or other materials provided with the |
| distribution. |
| |
| (3) The name of the author may not be used to |
| endorse or promote products derived from this software without |
| specific prior written permission. |
| |
| THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
| IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED |
| WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE |
| DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, |
| INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES |
| (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR |
| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
| HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, |
| STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING |
| IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |
| POSSIBILITY OF SUCH DAMAGE. */ |
| |
| /* Include all the header files of alloc here, to make sure they're not |
| processed when including alloc.c below, such that the redefinitions of malloc |
| and realloc are only effective in alloc.c itself. This does not work for |
| config.h, because it's not wrapped in "#ifndef CONFIG_H\n#define CONFIG_H" |
| and "#endif" but that does not seem to be harmful. */ |
| |
| #include "config.h" |
| |
| #include <errno.h> |
| #include <stdlib.h> |
| #include <sys/types.h> |
| #include <inttypes.h> |
| |
| #include "backtrace.h" |
| #include "internal.h" |
| |
| extern void *instrumented_malloc (size_t size); |
| extern void *instrumented_realloc (void *ptr, size_t size); |
| |
| #define malloc instrumented_malloc |
| #define realloc instrumented_realloc |
| #include "alloc.c" |
| #undef malloc |
| #undef realloc |
| |
| static uint64_t nr_allocs = 0; |
| static uint64_t fail_at_alloc = 0; |
| |
| extern int at_fail_alloc_p (void); |
| extern uint64_t get_nr_allocs (void); |
| extern void set_fail_at_alloc (uint64_t); |
| |
| void * |
| instrumented_malloc (size_t size) |
| { |
| void *res; |
| |
| if (at_fail_alloc_p ()) |
| return NULL; |
| |
| res = malloc (size); |
| if (res != NULL) |
| nr_allocs++; |
| |
| return res; |
| } |
| |
| void * |
| instrumented_realloc (void *ptr, size_t size) |
| { |
| void *res; |
| |
| if (size != 0) |
| { |
| if (at_fail_alloc_p ()) |
| return NULL; |
| } |
| |
| res = realloc (ptr, size); |
| if (res != NULL) |
| nr_allocs++; |
| |
| return res; |
| } |
| |
| int |
| at_fail_alloc_p (void) |
| { |
| return fail_at_alloc == nr_allocs + 1; |
| } |
| |
| uint64_t |
| get_nr_allocs (void) |
| { |
| return nr_allocs; |
| } |
| |
| void |
| set_fail_at_alloc (uint64_t nr) |
| { |
| fail_at_alloc = nr; |
| } |