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