xref: /netbsd-src/usr.bin/xlint/common/mem.c (revision 4b896b232495b7a9b8b94a1cf1e21873296d53b8)
1 /*	$NetBSD: mem.c,v 1.6 2003/10/22 16:10:03 christos 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 #include <sys/cdefs.h>
35 #if defined(__RCSID) && !defined(lint)
36 __RCSID("$NetBSD: mem.c,v 1.6 2003/10/22 16:10:03 christos Exp $");
37 #endif
38 
39 #include <sys/param.h>
40 #include <sys/types.h>
41 #include <sys/mman.h>
42 #include <stdlib.h>
43 #include <string.h>
44 
45 #include "lint.h"
46 
47 void *
48 xmalloc(size_t s)
49 {
50 	void	*p;
51 
52 	if ((p = malloc(s)) == NULL)
53 		nomem();
54 	return (p);
55 }
56 
57 void *
58 xcalloc(size_t n, size_t s)
59 {
60 	void	*p;
61 
62 	if ((p = calloc(n, s)) == NULL)
63 		nomem();
64 	return (p);
65 }
66 
67 void *
68 xrealloc(void *p, size_t s)
69 {
70 	void *n;
71 
72 	if ((n = realloc(p, s)) == NULL) {
73 		free(p);
74 		nomem();
75 	}
76 	p = n;
77 	return (p);
78 }
79 
80 char *
81 xstrdup(const char *s)
82 {
83 	char	*s2;
84 
85 	if ((s2 = strdup(s)) == NULL)
86 		nomem();
87 	return (s2);
88 }
89 
90 void
91 nomem(void)
92 {
93 
94 	errx(1, "virtual memory exhausted");
95 }
96 
97 #if defined(MAP_ANONYMOUS) && !defined(MAP_ANON)
98 #define	MAP_ANON	MAP_ANONYMOUS
99 #endif
100 
101 void *
102 xmapalloc(size_t len)
103 {
104 	static const int prot = PROT_READ | PROT_WRITE;
105 	static int fd = -1;
106 	void *p;
107 #ifdef MAP_ANON
108 	static const int flags = MAP_ANON | MAP_PRIVATE;
109 #else
110 	static const int flags = MAP_PRIVATE;
111 
112 	if (fd == -1) {
113 		if ((fd = open("/dev/zero", O_RDWR)) == -1)
114 			err(1, "Cannot open `/dev/zero'");
115 	}
116 #endif
117 	p = mmap(NULL, len, prot, flags, fd, (off_t)0);
118 	if (p == (void *)-1)
119 		err(1, "Cannot map memory for %lu bytes", (unsigned long)len);
120 	return p;
121 }
122