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 <sys/param.h>
31 #include <stddef.h>
32 #include <stdlib.h>
33 #include <string.h>
34 #include <unistd.h>
35 #include "rtld.h"
36 #include "rtld_printf.h"
37 #include "rtld_malloc.h"
38 #include "rtld_libc.h"
39
40 void *
xcalloc(size_t number,size_t size)41 xcalloc(size_t number, size_t size)
42 {
43 void *p;
44
45 p = __crt_calloc(number, size);
46 if (p == NULL) {
47 rtld_fdputstr(STDERR_FILENO, "Out of memory\n");
48 _exit(1);
49 }
50 return (p);
51 }
52
53 void *
xmalloc(size_t size)54 xmalloc(size_t size)
55 {
56
57 void *p;
58
59 p = __crt_malloc(size);
60 if (p == NULL) {
61 rtld_fdputstr(STDERR_FILENO, "Out of memory\n");
62 _exit(1);
63 }
64 return (p);
65 }
66
67 char *
xstrdup(const char * str)68 xstrdup(const char *str)
69 {
70 char *copy;
71 size_t len;
72
73 len = strlen(str) + 1;
74 copy = xmalloc(len);
75 memcpy(copy, str, len);
76 return (copy);
77 }
78
79 void *
malloc_aligned(size_t size,size_t align,size_t offset)80 malloc_aligned(size_t size, size_t align, size_t offset)
81 {
82 char *mem, *res;
83 uintptr_t x;
84
85 offset &= align - 1;
86 if (align < sizeof(void *))
87 align = sizeof(void *);
88
89 mem = xmalloc(size + 3 * align + offset);
90 x = roundup((uintptr_t)mem + sizeof(void *), align);
91 x += offset;
92 res = (void *)x;
93 x -= sizeof(void *);
94 memcpy((void *)x, &mem, sizeof(mem));
95 return (res);
96 }
97
98 void
free_aligned(void * ptr)99 free_aligned(void *ptr)
100 {
101 void *mem;
102 uintptr_t x;
103
104 if (ptr == NULL)
105 return;
106 x = (uintptr_t)ptr;
107 x -= sizeof(void *);
108 memcpy(&mem, (void *)x, sizeof(mem));
109 free(mem);
110 }
111