xref: /netbsd-src/usr.bin/xlint/common/mem.c (revision b1c86f5f087524e68db12794ee9c3e3da1ab17a0)
1 /*	$NetBSD: mem.c,v 1.7 2004/06/20 22:20:16 jmc Exp $	*/
2 
3 /*
4  * Copyright (c) 1994, 1995 Jochen Pohl
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  * 3. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *      This product includes software developed by Jochen Pohl for
18  *	The NetBSD Project.
19  * 4. The name of the author may not be used to endorse or promote products
20  *    derived from this software without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32  */
33 
34 #if HAVE_NBTOOL_CONFIG_H
35 #include "nbtool_config.h"
36 #endif
37 
38 #include <sys/cdefs.h>
39 #if defined(__RCSID) && !defined(lint)
40 __RCSID("$NetBSD: mem.c,v 1.7 2004/06/20 22:20:16 jmc Exp $");
41 #endif
42 
43 #include <sys/param.h>
44 #include <sys/types.h>
45 #include <sys/mman.h>
46 #include <stdlib.h>
47 #include <string.h>
48 
49 #include "lint.h"
50 
51 void *
52 xmalloc(size_t s)
53 {
54 	void	*p;
55 
56 	if ((p = malloc(s)) == NULL)
57 		nomem();
58 	return (p);
59 }
60 
61 void *
62 xcalloc(size_t n, size_t s)
63 {
64 	void	*p;
65 
66 	if ((p = calloc(n, s)) == NULL)
67 		nomem();
68 	return (p);
69 }
70 
71 void *
72 xrealloc(void *p, size_t s)
73 {
74 	void *n;
75 
76 	if ((n = realloc(p, s)) == NULL) {
77 		free(p);
78 		nomem();
79 	}
80 	p = n;
81 	return (p);
82 }
83 
84 char *
85 xstrdup(const char *s)
86 {
87 	char	*s2;
88 
89 	if ((s2 = strdup(s)) == NULL)
90 		nomem();
91 	return (s2);
92 }
93 
94 void
95 nomem(void)
96 {
97 
98 	errx(1, "virtual memory exhausted");
99 }
100 
101 #if defined(MAP_ANONYMOUS) && !defined(MAP_ANON)
102 #define	MAP_ANON	MAP_ANONYMOUS
103 #endif
104 
105 void *
106 xmapalloc(size_t len)
107 {
108 	static const int prot = PROT_READ | PROT_WRITE;
109 	static int fd = -1;
110 	void *p;
111 #ifdef MAP_ANON
112 	static const int flags = MAP_ANON | MAP_PRIVATE;
113 #else
114 	static const int flags = MAP_PRIVATE;
115 
116 	if (fd == -1) {
117 		if ((fd = open("/dev/zero", O_RDWR)) == -1)
118 			err(1, "Cannot open `/dev/zero'");
119 	}
120 #endif
121 	p = mmap(NULL, len, prot, flags, fd, (off_t)0);
122 	if (p == (void *)-1)
123 		err(1, "Cannot map memory for %lu bytes", (unsigned long)len);
124 	return p;
125 }
126