mem.c revision 1.15 1 1.15 rillig /* $NetBSD: mem.c,v 1.15 2021/08/01 18:13:53 rillig Exp $ */
2 1.1 thorpej
3 1.1 thorpej /*
4 1.1 thorpej * Copyright (c) 1994, 1995 Jochen Pohl
5 1.1 thorpej * All Rights Reserved.
6 1.1 thorpej *
7 1.1 thorpej * Redistribution and use in source and binary forms, with or without
8 1.1 thorpej * modification, are permitted provided that the following conditions
9 1.1 thorpej * are met:
10 1.1 thorpej * 1. Redistributions of source code must retain the above copyright
11 1.1 thorpej * notice, this list of conditions and the following disclaimer.
12 1.1 thorpej * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 thorpej * notice, this list of conditions and the following disclaimer in the
14 1.1 thorpej * documentation and/or other materials provided with the distribution.
15 1.1 thorpej * 3. All advertising materials mentioning features or use of this software
16 1.1 thorpej * must display the following acknowledgement:
17 1.1 thorpej * This product includes software developed by Jochen Pohl for
18 1.1 thorpej * The NetBSD Project.
19 1.1 thorpej * 4. The name of the author may not be used to endorse or promote products
20 1.1 thorpej * derived from this software without specific prior written permission.
21 1.1 thorpej *
22 1.1 thorpej * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23 1.1 thorpej * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 1.1 thorpej * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 1.1 thorpej * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26 1.1 thorpej * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27 1.1 thorpej * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28 1.1 thorpej * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 1.1 thorpej * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30 1.1 thorpej * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31 1.1 thorpej * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 1.1 thorpej */
33 1.1 thorpej
34 1.7 jmc #if HAVE_NBTOOL_CONFIG_H
35 1.7 jmc #include "nbtool_config.h"
36 1.7 jmc #endif
37 1.7 jmc
38 1.1 thorpej #include <sys/cdefs.h>
39 1.3 tv #if defined(__RCSID) && !defined(lint)
40 1.15 rillig __RCSID("$NetBSD: mem.c,v 1.15 2021/08/01 18:13:53 rillig Exp $");
41 1.1 thorpej #endif
42 1.1 thorpej
43 1.8 christos #include <stdarg.h>
44 1.1 thorpej #include <stdlib.h>
45 1.1 thorpej #include <string.h>
46 1.1 thorpej
47 1.1 thorpej #include "lint.h"
48 1.1 thorpej
49 1.14 rillig static void __attribute__((noreturn))
50 1.14 rillig nomem(void)
51 1.14 rillig {
52 1.14 rillig
53 1.14 rillig errx(1, "virtual memory exhausted");
54 1.14 rillig }
55 1.14 rillig
56 1.1 thorpej void *
57 1.1 thorpej xmalloc(size_t s)
58 1.1 thorpej {
59 1.1 thorpej void *p;
60 1.1 thorpej
61 1.1 thorpej if ((p = malloc(s)) == NULL)
62 1.1 thorpej nomem();
63 1.11 rillig return p;
64 1.1 thorpej }
65 1.1 thorpej
66 1.1 thorpej void *
67 1.1 thorpej xcalloc(size_t n, size_t s)
68 1.1 thorpej {
69 1.1 thorpej void *p;
70 1.1 thorpej
71 1.1 thorpej if ((p = calloc(n, s)) == NULL)
72 1.1 thorpej nomem();
73 1.11 rillig return p;
74 1.1 thorpej }
75 1.1 thorpej
76 1.1 thorpej void *
77 1.1 thorpej xrealloc(void *p, size_t s)
78 1.1 thorpej {
79 1.4 itojun void *n;
80 1.1 thorpej
81 1.4 itojun if ((n = realloc(p, s)) == NULL) {
82 1.4 itojun free(p);
83 1.1 thorpej nomem();
84 1.4 itojun }
85 1.15 rillig return n;
86 1.1 thorpej }
87 1.1 thorpej
88 1.1 thorpej char *
89 1.1 thorpej xstrdup(const char *s)
90 1.1 thorpej {
91 1.1 thorpej char *s2;
92 1.1 thorpej
93 1.1 thorpej if ((s2 = strdup(s)) == NULL)
94 1.1 thorpej nomem();
95 1.11 rillig return s2;
96 1.1 thorpej }
97 1.1 thorpej
98 1.15 rillig char *
99 1.15 rillig xasprintf(const char *fmt, ...)
100 1.8 christos {
101 1.15 rillig char *str;
102 1.8 christos int e;
103 1.8 christos va_list ap;
104 1.8 christos
105 1.8 christos va_start(ap, fmt);
106 1.15 rillig e = vasprintf(&str, fmt, ap);
107 1.8 christos va_end(ap);
108 1.8 christos if (e < 0)
109 1.8 christos nomem();
110 1.15 rillig return str;
111 1.8 christos }
112