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