1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3 *
4 * Copyright 1996-1998 John D. Polstra.
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 *
27 * $FreeBSD$
28 */
29
30 #include <stddef.h>
31 #include <stdlib.h>
32 #include <string.h>
33 #include <unistd.h>
34 #include "rtld.h"
35 #include "rtld_printf.h"
36 #include "rtld_malloc.h"
37
38 void *
xcalloc(size_t number,size_t size)39 xcalloc(size_t number, size_t size)
40 {
41 void *p;
42
43 p = __crt_calloc(number, size);
44 if (p == NULL) {
45 rtld_fdputstr(STDERR_FILENO, "Out of memory\n");
46 _exit(1);
47 }
48 return (p);
49 }
50
51 void *
xmalloc(size_t size)52 xmalloc(size_t size)
53 {
54
55 void *p;
56
57 p = __crt_malloc(size);
58 if (p == NULL) {
59 rtld_fdputstr(STDERR_FILENO, "Out of memory\n");
60 _exit(1);
61 }
62 return (p);
63 }
64
65 char *
xstrdup(const char * str)66 xstrdup(const char *str)
67 {
68 char *copy;
69 size_t len;
70
71 len = strlen(str) + 1;
72 copy = xmalloc(len);
73 memcpy(copy, str, len);
74 return (copy);
75 }
76
77 void *
malloc_aligned(size_t size,size_t align)78 malloc_aligned(size_t size, size_t align)
79 {
80 void *mem, *res;
81
82 if (align < sizeof(void *))
83 align = sizeof(void *);
84
85 mem = xmalloc(size + sizeof(void *) + align - 1);
86 res = (void *)round((uintptr_t)mem + sizeof(void *), align);
87 *(void **)((uintptr_t)res - sizeof(void *)) = mem;
88 return (res);
89 }
90
91 void
free_aligned(void * ptr)92 free_aligned(void *ptr)
93 {
94 void *mem;
95 uintptr_t x;
96
97 if (ptr == NULL)
98 return;
99 x = (uintptr_t)ptr;
100 x -= sizeof(void *);
101 mem = *(void **)x;
102 free(mem);
103 }
104