xref: /freebsd/libexec/rtld-elf/xmalloc.c (revision 206b73d0)
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 #include "rtld_libc.h"
38 
39 void *
40 xcalloc(size_t number, size_t size)
41 {
42 	void *p;
43 
44 	p = __crt_calloc(number, size);
45 	if (p == NULL) {
46 		rtld_fdputstr(STDERR_FILENO, "Out of memory\n");
47 		_exit(1);
48 	}
49 	return (p);
50 }
51 
52 void *
53 xmalloc(size_t size)
54 {
55 
56 	void *p;
57 
58 	p = __crt_malloc(size);
59 	if (p == NULL) {
60 		rtld_fdputstr(STDERR_FILENO, "Out of memory\n");
61 		_exit(1);
62 	}
63 	return (p);
64 }
65 
66 char *
67 xstrdup(const char *str)
68 {
69 	char *copy;
70 	size_t len;
71 
72 	len = strlen(str) + 1;
73 	copy = xmalloc(len);
74 	memcpy(copy, str, len);
75 	return (copy);
76 }
77 
78 void *
79 malloc_aligned(size_t size, size_t align)
80 {
81 	void *mem, *res;
82 
83 	if (align < sizeof(void *))
84 		align = sizeof(void *);
85 
86 	mem = xmalloc(size + sizeof(void *) + align - 1);
87 	res = (void *)round((uintptr_t)mem + sizeof(void *), align);
88 	*(void **)((uintptr_t)res - sizeof(void *)) = mem;
89 	return (res);
90 }
91 
92 void
93 free_aligned(void *ptr)
94 {
95 	void *mem;
96 	uintptr_t x;
97 
98 	if (ptr == NULL)
99 		return;
100 	x = (uintptr_t)ptr;
101 	x -= sizeof(void *);
102 	mem = *(void **)x;
103 	free(mem);
104 }
105