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
40void *
41xcalloc(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
53void *
54xmalloc(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
67char *
68xstrdup(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
79void *
80malloc_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
98void
99free_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