1/*
2 * Copyright (c) 2000-2013 Apple Inc. All rights reserved.
3 *
4 * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
5 *
6 * This file contains Original Code and/or Modifications of Original Code
7 * as defined in and that are subject to the Apple Public Source License
8 * Version 2.0 (the 'License'). You may not use this file except in
9 * compliance with the License. The rights granted to you under the License
10 * may not be used to create, or enable the creation or redistribution of,
11 * unlawful or unlicensed copies of an Apple operating system, or to
12 * circumvent, violate, or enable the circumvention or violation of, any
13 * terms of an Apple operating system software license agreement.
14 *
15 * Please obtain a copy of the License at
16 * http://www.opensource.apple.com/apsl/ and read it before using this file.
17 *
18 * The Original Code and all software distributed under the License are
19 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
20 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
21 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
22 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
23 * Please see the License for the specific language governing rights and
24 * limitations under the License.
25 *
26 * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
27 */
28/* Copyright (c) 1995, 1997 Apple Computer, Inc. All Rights Reserved */
29/*
30 * Copyright (c) 1987, 1991, 1993
31 *	The Regents of the University of California.  All rights reserved.
32 *
33 * Redistribution and use in source and binary forms, with or without
34 * modification, are permitted provided that the following conditions
35 * are met:
36 * 1. Redistributions of source code must retain the above copyright
37 *    notice, this list of conditions and the following disclaimer.
38 * 2. Redistributions in binary form must reproduce the above copyright
39 *    notice, this list of conditions and the following disclaimer in the
40 *    documentation and/or other materials provided with the distribution.
41 * 3. All advertising materials mentioning features or use of this software
42 *    must display the following acknowledgement:
43 *	This product includes software developed by the University of
44 *	California, Berkeley and its contributors.
45 * 4. Neither the name of the University nor the names of its contributors
46 *    may be used to endorse or promote products derived from this software
47 *    without specific prior written permission.
48 *
49 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
50 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
51 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
52 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
53 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
54 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
55 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
56 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
57 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
58 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
59 * SUCH DAMAGE.
60 *
61 *	@(#)kern_malloc.c	8.4 (Berkeley) 5/20/95
62 */
63/*
64 * NOTICE: This file was modified by SPARTA, Inc. in 2005 to introduce
65 * support for mandatory and extensible security protections.  This notice
66 * is included in support of clause 2.2 (b) of the Apple Public License,
67 * Version 2.0.
68 */
69
70#include <sys/param.h>
71#include <sys/malloc.h>
72
73#include <sys/socket.h>
74#include <sys/socketvar.h>
75
76#include <net/route.h>
77
78#include <netinet/in.h>
79#include <netinet/in_systm.h>
80#include <netinet/ip.h>
81#include <netinet/in_pcb.h>
82#include <netinet/flow_divert.h>
83
84#include <sys/event.h>
85#include <sys/eventvar.h>
86
87#include <sys/proc_internal.h>
88#include <sys/mount_internal.h>
89#include <sys/vnode_internal.h>
90#include <sys/ubc_internal.h>
91#include <sys/namei.h>
92#include <sys/file_internal.h>
93#include <sys/filedesc.h>
94#include <sys/tty.h>
95#include <sys/quota.h>
96#include <sys/uio_internal.h>
97#include <sys/resourcevar.h>
98#include <sys/signalvar.h>
99
100#include <hfs/hfs_cnode.h>
101
102#include <miscfs/specfs/specdev.h>
103
104#include <nfs/rpcv2.h>
105#include <nfs/nfsproto.h>
106#include <nfs/nfsnode.h>
107#include <nfs/nfsmount.h>
108
109#include <vfs/vfs_journal.h>
110
111#include <mach/mach_types.h>
112
113#include <kern/zalloc.h>
114#include <kern/kalloc.h>
115
116void kmeminit(void);
117
118/* Strings corresponding to types of memory.
119 * Must be in synch with the #defines is sys/malloc.h
120 * NOTE - the reason we pass null strings in some cases is to reduce of foot
121 * print as much as possible for systems where a tiny kernel is needed.
122 * todo - We should probably redsign this and use enums for our types and only
123 * include types needed for that configuration of the kernel.  This can't be
124 * done without some kind of kpi since several types are hardwired and exported
125 * (for example see types M_HFSMNT, M_UDFMNT, M_TEMP, etc in sys/malloc.h)
126 */
127const char *memname[] = {
128	"free",		/* 0 M_FREE */
129	"mbuf",		/* 1 M_MBUF */
130	"devbuf",	/* 2 M_DEVBUF */
131	"socket",	/* 3 M_SOCKET */
132	"pcb",		/* 4 M_PCB */
133	"routetbl",	/* 5 M_RTABLE */
134	"hosttbl",	/* 6 M_HTABLE */
135	"fragtbl",	/* 7 M_FTABLE */
136	"zombie",	/* 8 M_ZOMBIE */
137	"ifaddr",	/* 9 M_IFADDR */
138	"soopts",	/* 10 M_SOOPTS */
139	"soname",	/* 11 M_SONAME */
140	"namei",	/* 12 M_NAMEI */
141	"gprof",	/* 13 M_GPROF */
142	"ioctlops",	/* 14 M_IOCTLOPS */
143	"mapmem",	/* 15 M_MAPMEM */
144	"cred",		/* 16 M_CRED */
145	"pgrp",		/* 17 M_PGRP */
146	"session",	/* 18 M_SESSION */
147	"iov32",	/* 19 M_IOV32 */
148	"mount",	/* 20 M_MOUNT */
149	"fhandle",		/* 21 M_FHANDLE */
150#if (NFSCLIENT || NFSSERVER)
151	"NFS req",		/* 22 M_NFSREQ */
152	"NFS mount",	/* 23 M_NFSMNT */
153	"NFS node",		/* 24 M_NFSNODE */
154#else
155	"",				/* 22 M_NFSREQ */
156	"",				/* 23 M_NFSMNT */
157	"",				/* 24 M_NFSNODE */
158#endif
159	"vnodes",		/* 25 M_VNODE */
160	"namecache",	/* 26 M_CACHE */
161#if QUOTA
162	"UFS quota",	/* 27 M_DQUOT */
163#else
164	"",				/* 27 M_DQUOT */
165#endif
166	"proc uuid policy",		/* 28 M_PROC_UUID_POLICY */
167#if (SYSV_SEM || SYSV_MSG || SYSV_SHM)
168	"shm",			/* 29 M_SHM */
169#else
170	"",				/* 29 M_SHM */
171#endif
172	"plimit",		/* 30 M_VMMAP */
173	"sigacts",	/* 31 M_VMMAPENT */
174	"VM object",	/* 32 M_VMOBJ */
175	"VM objhash",	/* 33 M_VMOBJHASH */
176	"VM pmap",		/* 34 M_VMPMAP */
177	"VM pvmap",		/* 35 M_VMPVENT */
178	"VM pager",		/* 36 M_VMPAGER */
179	"VM pgdata",	/* 37 M_VMPGDATA */
180	"fileproc",		/* 38 M_FILEPROC */
181	"file desc",	/* 39 M_FILEDESC */
182	"lockf",		/* 40 M_LOCKF */
183	"proc",			/* 41 M_PROC */
184	"pstats",		/* 42 M_SUBPROC */
185	"LFS segment",	/* 43 M_SEGMENT */
186	"LFS node",		/* 44 M_LFSNODE */
187	"",				/* 45 M_FFSNODE */
188	"MFS node",		/* 46 M_MFSNODE */
189	"NQNFS Lease",	/* 47 M_NQLEASE */
190	"NQNFS Host",	/* 48 M_NQMHOST */
191	"Export Host",	/* 49 M_NETADDR */
192#if (NFSCLIENT || NFSSERVER)
193	"NFS srvsock",	/* 50 M_NFSSVC */
194	"NFS uid",		/* 51 M_NFSUID */
195	"NFS daemon",	/* 52 M_NFSD */
196#else
197	"",				/* 50 M_NFSSVC */
198	"",				/* 51 M_NFSUID */
199	"",				/* 52 M_NFSD */
200#endif
201	"ip_moptions",	/* 53 M_IPMOPTS */
202	"in_multi",		/* 54 M_IPMADDR */
203	"ether_multi",	/* 55 M_IFMADDR */
204	"mrt",			/* 56 M_MRTABLE */
205	"",		/* 57 unused entry */
206	"",		/* 58 unused entry */
207#if (NFSCLIENT || NFSSERVER)
208	"NFSV3 srvdesc",/* 59 M_NFSRVDESC */
209	"NFSV3 diroff",	/* 60 M_NFSDIROFF */
210	"NFSV3 bigfh",	/* 61 M_NFSBIGFH */
211#else
212	"",				/* 59 M_NFSRVDESC */
213	"",				/* 60 M_NFSDIROFF */
214	"",				/* 61 M_NFSBIGFH */
215#endif
216	"MSDOSFS mount",/* 62 M_MSDOSFSMNT */
217	"MSDOSFS fat",	/* 63 M_MSDOSFSFAT */
218	"MSDOSFS node",	/* 64 M_MSDOSFSNODE */
219	"ttys",			/* 65 M_TTYS */
220	"exec",			/* 66 M_EXEC */
221	"miscfs mount",	/* 67 M_MISCFSMNT */
222	"miscfs node",	/* 68 M_MISCFSNODE */
223	"adosfs mount",	/* 69 M_ADOSFSMNT */
224	"adosfs node",	/* 70 M_ADOSFSNODE */
225	"adosfs anode",	/* 71 M_ANODE */
226	"buf hdrs",		/* 72 M_BUFHDR */
227	"ofile tabl",	/* 73 M_OFILETABL */
228	"mbuf clust",	/* 74 M_MCLUST */
229#if HFS
230	"HFS mount",	/* 75 M_HFSMNT */
231	"HFS node",		/* 76 M_HFSNODE */
232	"HFS fork",		/* 77 M_HFSFORK */
233#else
234	"",				/* 75 M_HFSMNT */
235	"",				/* 76 M_HFSNODE */
236	"",				/* 77 M_HFSFORK */
237#endif
238	"", 	/* 78 unused */
239	"", 	/* 79 unused */
240	"temp",			/* 80 M_TEMP */
241	"key mgmt",		/* 81 M_SECA */
242	"DEVFS",		/* 82 M_DEVFS */
243	"IpFw/IpAcct",	/* 83 M_IPFW */
244	"UDF node",		/* 84 M_UDFNODE */
245	"UDF mount",	/* 85 M_UDFMNT */
246#if INET6
247	"IPv6 NDP",		/* 86 M_IP6NDP */
248	"IPv6 options",	/* 87 M_IP6OPT */
249	"IPv6 Misc",	/* 88 M_IP6MISC */
250#else
251	"",				/* 86 M_IP6NDP */
252	"",				/* 87 M_IP6OPT */
253	"",				/* 88 M_IP6MISC */
254#endif
255	"TCP Segment Q",/* 89 M_TSEGQ */
256	"IGMP state",	/* 90 M_IGMP */
257#if JOURNALING
258	"Journal",		/* 91 M_JNL_JNL */
259	"Transaction",	/* 92 M_JNL_TR */
260#else
261	"",    			/* 91 M_JNL_JNL */
262	"",    			/* 92 M_JNL_TR */
263#endif
264	"specinfo",		/* 93 M_SPECINFO */
265	"kqueue",		/* 94 M_KQUEUE */
266#if HFS
267	"HFS dirhint",	/* 95 M_HFSDIRHINT */
268#else
269	"",				/* 95 M_HFSDIRHINT */
270#endif
271	"cluster_read",	/* 96 M_CLRDAHEAD */
272	"cluster_write",/* 97 M_CLWRBEHIND */
273	"iov64",		/* 98 M_IOV64 */
274	"fileglob",		/* 99 M_FILEGLOB */
275	"kauth",		/* 100 M_KAUTH */
276	"dummynet",		/* 101 M_DUMMYNET */
277	"",			/* 102 M_UNSAFEFS */
278	"macpipelabel", /* 103 M_MACPIPELABEL */
279	"mactemp",      /* 104 M_MACTEMP */
280	"sbuf",         /* 105 M_SBUF */
281	"extattr",      /* 106 M_EXTATTR */
282	"lctx",         /* 107 M_LCTX */
283#if TRAFFIC_MGT
284	"traffic_mgt",   /* 108 M_TRAFFIC_MGT */
285#else
286	"", /* 108 M_TRAFFIC_MGT */
287#endif
288#if HFS_COMPRESSION
289	"decmpfs_cnode",/* 109 M_DECMPFS_CNODE */
290#else
291	"",             /* 109 M_DECMPFS_CNODE */
292#endif /* HFS_COMPRESSION */
293	"ipmfilter",	/* 110 M_INMFILTER */
294	"ipmsource",	/* 111 M_IPMSOURCE */
295	"in6mfilter", 	/* 112 M_IN6MFILTER */
296	"ip6mopts",	/* 113 M_IP6MOPTS */
297	"ip6msource",	/* 114 M_IP6MSOURCE */
298#if FLOW_DIVERT
299	"flow_divert_pcb",	/* 115 M_FLOW_DIVERT_PCB */
300	"flow_divert_group",	/* 116 M_FLOW_DIVERT_GROUP */
301#else
302	"",					/* 115 M_FLOW_DIVERT_PCB */
303	"",					/* 116 M_FLOW_DIVERT_GROUP */
304#endif
305	"ip6cga",	/* 117 M_IP6CGA */
306};
307
308/* for use with kmzones.kz_zalloczone */
309#define KMZ_CREATEZONE_ACCT	((void *)-3)
310#define	KMZ_CREATEZONE		((void *)-2)
311#define KMZ_LOOKUPZONE		((void *)-1)
312#define KMZ_MALLOC			((void *)0)
313#define	KMZ_SHAREZONE		((void *)1)
314
315struct kmzones {
316	size_t		kz_elemsize;
317	void		*kz_zalloczone;
318	boolean_t	kz_noencrypt;
319} kmzones[M_LAST] = {
320#define	SOS(sname)	sizeof (struct sname)
321#define SOX(sname)	-1
322	{ -1,		0, FALSE },			/* 0 M_FREE */
323	{ MSIZE,	KMZ_CREATEZONE, FALSE },	/* 1 M_MBUF */
324	{ 0,		KMZ_MALLOC, FALSE },		/* 2 M_DEVBUF */
325	{ SOS(socket),	KMZ_CREATEZONE, TRUE },		/* 3 M_SOCKET */
326	{ SOS(inpcb),	KMZ_LOOKUPZONE, TRUE },		/* 4 M_PCB */
327	{ M_MBUF,	KMZ_SHAREZONE, FALSE },		/* 5 M_RTABLE */
328	{ M_MBUF,	KMZ_SHAREZONE, FALSE },		/* 6 M_HTABLE */
329	{ M_MBUF,	KMZ_SHAREZONE, FALSE },		/* 7 M_FTABLE */
330	{ SOS(rusage),	KMZ_CREATEZONE, TRUE },		/* 8 M_ZOMBIE */
331	{ 0,		KMZ_MALLOC, FALSE },		/* 9 M_IFADDR */
332	{ M_MBUF,	KMZ_SHAREZONE, FALSE },		/* 10 M_SOOPTS */
333	{ 0,		KMZ_MALLOC, FALSE },		/* 11 M_SONAME */
334	{ MAXPATHLEN,	KMZ_CREATEZONE, FALSE },	/* 12 M_NAMEI */
335	{ 0,		KMZ_MALLOC, FALSE },		/* 13 M_GPROF */
336	{ 0,		KMZ_MALLOC, FALSE },		/* 14 M_IOCTLOPS */
337	{ 0,		KMZ_MALLOC, FALSE },		/* 15 M_MAPMEM */
338	{ SOS(ucred),	KMZ_CREATEZONE, FALSE },	/* 16 M_CRED */
339	{ SOS(pgrp),	KMZ_CREATEZONE, FALSE },	/* 17 M_PGRP */
340	{ SOS(session),	KMZ_CREATEZONE, FALSE },	/* 18 M_SESSION */
341	{ SOS(user32_iovec),	KMZ_LOOKUPZONE, FALSE },/* 19 M_IOV32 */
342	{ SOS(mount),	KMZ_CREATEZONE, FALSE },	/* 20 M_MOUNT */
343	{ 0,		KMZ_MALLOC, FALSE },		/* 21 M_FHANDLE */
344#if (NFSCLIENT || NFSSERVER)
345	{ SOS(nfsreq),	KMZ_CREATEZONE, FALSE },	/* 22 M_NFSREQ */
346	{ SOS(nfsmount),KMZ_CREATEZONE, FALSE },	/* 23 M_NFSMNT */
347	{ SOS(nfsnode),	KMZ_CREATEZONE, FALSE },	/* 24 M_NFSNODE */
348#else
349	{ 0,		KMZ_MALLOC, FALSE },		/* 22 M_NFSREQ */
350	{ 0,		KMZ_MALLOC, FALSE },		/* 23 M_NFSMNT */
351	{ 0,		KMZ_MALLOC, FALSE },		/* 24 M_NFSNODE */
352#endif
353	{ SOS(vnode),	KMZ_CREATEZONE, TRUE },		/* 25 M_VNODE */
354	{ SOS(namecache), KMZ_CREATEZONE, FALSE },	/* 26 M_CACHE */
355#if QUOTA
356	{ SOX(dquot),	KMZ_LOOKUPZONE, FALSE },	/* 27 M_DQUOT */
357#else
358	{ 0,		KMZ_MALLOC, FALSE },		/* 27 M_DQUOT */
359#endif
360	{ 0,		KMZ_MALLOC, FALSE },		/* 28 M_PROC_UUID_POLICY */
361	{ 0,		KMZ_MALLOC, FALSE },		/* 29 M_SHM */
362	{ SOS(plimit),	KMZ_CREATEZONE, TRUE },		/* 30 M_PLIMIT */
363	{ SOS(sigacts),	KMZ_CREATEZONE_ACCT, TRUE },	/* 31 M_SIGACTS */
364	{ 0,		KMZ_MALLOC, FALSE },		/* 32 M_VMOBJ */
365	{ 0,		KMZ_MALLOC, FALSE },		/* 33 M_VMOBJHASH */
366	{ 0,		KMZ_MALLOC, FALSE },		/* 34 M_VMPMAP */
367	{ 0,		KMZ_MALLOC, FALSE },		/* 35 M_VMPVENT */
368	{ 0,		KMZ_MALLOC, FALSE },		/* 36 M_VMPAGER */
369	{ 0,		KMZ_MALLOC, FALSE },		/* 37 M_VMPGDATA */
370	{ SOS(fileproc),KMZ_CREATEZONE_ACCT, TRUE },	/* 38 M_FILEPROC */
371	{ SOS(filedesc),KMZ_CREATEZONE_ACCT, TRUE },	/* 39 M_FILEDESC */
372	{ SOX(lockf),	KMZ_CREATEZONE_ACCT, TRUE },	/* 40 M_LOCKF */
373	{ SOS(proc),	KMZ_CREATEZONE, FALSE },	/* 41 M_PROC */
374	{ SOS(pstats),	KMZ_CREATEZONE, TRUE },		/* 42 M_PSTATS */
375	{ 0,		KMZ_MALLOC, FALSE },		/* 43 M_SEGMENT */
376	{ M_FFSNODE,	KMZ_SHAREZONE, FALSE },		/* 44 M_LFSNODE */
377	{ 0,		KMZ_MALLOC, FALSE },		/* 45 M_FFSNODE */
378	{ M_FFSNODE,	KMZ_SHAREZONE, FALSE },		/* 46 M_MFSNODE */
379	{ 0,		KMZ_MALLOC, FALSE },		/* 47 M_NQLEASE */
380	{ 0,		KMZ_MALLOC, FALSE },		/* 48 M_NQMHOST */
381	{ 0,		KMZ_MALLOC, FALSE },		/* 49 M_NETADDR */
382#if (NFSCLIENT || NFSSERVER)
383	{ SOX(nfsrv_sock),
384	                KMZ_CREATEZONE_ACCT, FALSE },	/* 50 M_NFSSVC */
385	{ 0,		KMZ_MALLOC, FALSE },		/* 51 M_NFSUID */
386	{ SOX(nfsrvcache),
387	                KMZ_CREATEZONE_ACCT, FALSE },	/* 52 M_NFSD */
388#else
389	{ 0,		KMZ_MALLOC, FALSE },		/* 50 M_NFSSVC */
390	{ 0,		KMZ_MALLOC, FALSE },		/* 51 M_NFSUID */
391	{ 0,		KMZ_MALLOC, FALSE },		/* 52 M_NFSD */
392#endif
393	{ SOX(ip_moptions),
394	                KMZ_LOOKUPZONE, FALSE },	/* 53 M_IPMOPTS */
395	{ SOX(in_multi),KMZ_LOOKUPZONE, FALSE },	/* 54 M_IPMADDR */
396	{ SOX(ether_multi),
397	                KMZ_LOOKUPZONE, FALSE },	/* 55 M_IFMADDR */
398	{ SOX(mrt),	KMZ_CREATEZONE, TRUE },		/* 56 M_MRTABLE */
399	{ 0,		KMZ_MALLOC, FALSE },		/* 57 unused entry */
400	{ 0,		KMZ_MALLOC, FALSE },		/* 58 unused entry */
401#if (NFSCLIENT || NFSSERVER)
402	{ SOS(nfsrv_descript),
403	                KMZ_CREATEZONE_ACCT, FALSE },	/* 59 M_NFSRVDESC */
404	{ SOS(nfsdmap),	KMZ_CREATEZONE, FALSE },	/* 60 M_NFSDIROFF */
405	{ SOS(fhandle),	KMZ_LOOKUPZONE, FALSE },	/* 61 M_NFSBIGFH */
406#else
407	{ 0,		KMZ_MALLOC, FALSE },		/* 59 M_NFSRVDESC */
408	{ 0,		KMZ_MALLOC, FALSE },		/* 60 M_NFSDIROFF */
409	{ 0,		KMZ_MALLOC, FALSE },		/* 61 M_NFSBIGFH */
410#endif
411	{ 0,		KMZ_MALLOC, FALSE },		/* 62 M_MSDOSFSMNT */
412	{ 0,		KMZ_MALLOC, FALSE },		/* 63 M_MSDOSFSFAT */
413	{ 0,		KMZ_MALLOC, FALSE },		/* 64 M_MSDOSFSNODE */
414	{ SOS(tty),	KMZ_CREATEZONE, FALSE },	/* 65 M_TTYS */
415	{ 0,		KMZ_MALLOC, FALSE },		/* 66 M_EXEC */
416	{ 0,		KMZ_MALLOC, FALSE },		/* 67 M_MISCFSMNT */
417	{ 0,		KMZ_MALLOC, FALSE },		/* 68 M_MISCFSNODE */
418	{ 0,		KMZ_MALLOC, FALSE },		/* 69 M_ADOSFSMNT */
419	{ 0,		KMZ_MALLOC, FALSE },		/* 70 M_ADOSFSNODE */
420	{ 0,		KMZ_MALLOC, FALSE },		/* 71 M_ANODE */
421	{ 0,		KMZ_MALLOC, TRUE },		/* 72 M_BUFHDR */
422	{ (NDFILE * OFILESIZE),
423	                KMZ_CREATEZONE_ACCT, FALSE },	/* 73 M_OFILETABL */
424	{ MCLBYTES,	KMZ_CREATEZONE, FALSE },	/* 74 M_MCLUST */
425#if HFS
426	{ SOX(hfsmount),KMZ_LOOKUPZONE, FALSE },	/* 75 M_HFSMNT */
427	{ SOS(cnode),	KMZ_CREATEZONE, TRUE },		/* 76 M_HFSNODE */
428	{ SOS(filefork),KMZ_CREATEZONE, TRUE },		/* 77 M_HFSFORK */
429#else
430	{ 0,		KMZ_MALLOC, FALSE },		/* 75 M_HFSMNT */
431	{ 0,		KMZ_MALLOC, FALSE },		/* 76 M_HFSNODE */
432	{ 0,		KMZ_MALLOC, FALSE },		/* 77 M_HFSFORK */
433#endif
434	{ 0,		KMZ_MALLOC, FALSE },		/* 78 unused */
435	{ 0,		KMZ_MALLOC, FALSE },		/* 79 unused */
436	{ 0,		KMZ_MALLOC, FALSE },		/* 80 M_TEMP */
437	{ 0,		KMZ_MALLOC, FALSE },		/* 81 M_SECA */
438	{ 0,		KMZ_MALLOC, FALSE },		/* 82 M_DEVFS */
439	{ 0,		KMZ_MALLOC, FALSE },		/* 83 M_IPFW */
440	{ 0,		KMZ_MALLOC, FALSE },		/* 84 M_UDFNODE */
441	{ 0,		KMZ_MALLOC, FALSE },		/* 85 M_UDFMOUNT */
442	{ 0,		KMZ_MALLOC, FALSE },		/* 86 M_IP6NDP */
443	{ 0,		KMZ_MALLOC, FALSE },		/* 87 M_IP6OPT */
444	{ 0,		KMZ_MALLOC, FALSE },		/* 88 M_IP6MISC */
445	{ 0,		KMZ_MALLOC, FALSE },		/* 89 M_TSEGQ */
446	{ 0,		KMZ_MALLOC, FALSE },		/* 90 M_IGMP */
447#if JOURNALING
448	{ SOS(journal), KMZ_CREATEZONE, FALSE },	/* 91 M_JNL_JNL */
449	{ SOS(transaction), KMZ_CREATEZONE, FALSE },	/* 92 M_JNL_TR */
450#else
451	{ 0,	 	KMZ_MALLOC, FALSE },		/* 91 M_JNL_JNL */
452	{ 0,	 	KMZ_MALLOC, FALSE },		/* 92 M_JNL_TR */
453#endif
454	{ SOS(specinfo),KMZ_CREATEZONE, TRUE },		/* 93 M_SPECINFO */
455	{ SOS(kqueue),	KMZ_CREATEZONE, FALSE },	/* 94 M_KQUEUE */
456#if HFS
457	{ SOS(directoryhint), KMZ_CREATEZONE, TRUE },	/* 95 M_HFSDIRHINT */
458#else
459	{ 0,		KMZ_MALLOC, FALSE },		/* 95 M_HFSDIRHINT */
460#endif
461	{ SOS(cl_readahead),  KMZ_CREATEZONE, TRUE },	/* 96 M_CLRDAHEAD */
462	{ SOS(cl_writebehind),KMZ_CREATEZONE, TRUE },	/* 97 M_CLWRBEHIND */
463	{ SOS(user64_iovec),	KMZ_LOOKUPZONE, FALSE },/* 98 M_IOV64 */
464	{ SOS(fileglob),	KMZ_CREATEZONE, TRUE },	/* 99 M_FILEGLOB */
465	{ 0,		KMZ_MALLOC, FALSE },		/* 100 M_KAUTH */
466	{ 0,		KMZ_MALLOC, FALSE },		/* 101 M_DUMMYNET */
467	{ 0,		KMZ_MALLOC, FALSE },		/* 102 M_UNSAFEFS */
468	{ 0,		KMZ_MALLOC, FALSE },		/* 103 M_MACPIPELABEL */
469	{ 0,		KMZ_MALLOC, FALSE },		/* 104 M_MACTEMP */
470	{ 0,		KMZ_MALLOC, FALSE },		/* 105 M_SBUF */
471	{ 0,		KMZ_MALLOC, FALSE },		/* 106 M_HFS_EXTATTR */
472	{ 0,		KMZ_MALLOC, FALSE },		/* 107 M_LCTX */
473	{ 0,		KMZ_MALLOC, FALSE },		/* 108 M_TRAFFIC_MGT */
474#if HFS_COMPRESSION
475	{ SOS(decmpfs_cnode),KMZ_CREATEZONE , FALSE},	/* 109 M_DECMPFS_CNODE */
476#else
477	{ 0,		KMZ_MALLOC, FALSE },		/* 109 M_DECMPFS_CNODE */
478#endif /* HFS_COMPRESSION */
479 	{ 0,		KMZ_MALLOC, FALSE },		/* 110 M_INMFILTER */
480	{ 0,		KMZ_MALLOC, FALSE },		/* 111 M_IPMSOURCE */
481	{ 0,		KMZ_MALLOC, FALSE },		/* 112 M_IN6MFILTER */
482	{ 0,		KMZ_MALLOC, FALSE },		/* 113 M_IP6MOPTS */
483	{ 0,		KMZ_MALLOC, FALSE },		/* 114 M_IP6MSOURCE */
484#if FLOW_DIVERT
485	{ SOS(flow_divert_pcb),		KMZ_CREATEZONE, TRUE },	/* 115 M_FLOW_DIVERT_PCB */
486	{ SOS(flow_divert_group),	KMZ_CREATEZONE, TRUE },	/* 116 M_FLOW_DIVERT_GROUP */
487#else
488	{ 0,		KMZ_MALLOC, FALSE },		/* 115 M_FLOW_DIVERT_PCB */
489	{ 0,		KMZ_MALLOC, FALSE },		/* 116 M_FLOW_DIVERT_GROUP */
490#endif	/* FLOW_DIVERT */
491	{ 0,		KMZ_MALLOC, FALSE },		/* 117 M_IP6CGA */
492#undef	SOS
493#undef	SOX
494};
495
496extern zone_t kalloc_zone(vm_size_t);	/* XXX */
497
498/*
499 * Initialize the kernel memory allocator
500 */
501void
502kmeminit(void)
503{
504	struct kmzones	*kmz;
505
506	if ((sizeof(kmzones)/sizeof(kmzones[0])) != (sizeof(memname)/sizeof(memname[0]))) {
507		panic("kmeminit: kmzones has %lu elements but memname has %lu\n",
508			  (sizeof(kmzones)/sizeof(kmzones[0])), (sizeof(memname)/sizeof(memname[0])));
509	}
510
511	kmz = kmzones;
512	while (kmz < &kmzones[M_LAST]) {
513/* XXX */
514		if (kmz->kz_elemsize == (size_t)(-1))
515			;
516		else
517/* XXX */
518		if (kmz->kz_zalloczone == KMZ_CREATEZONE ||
519		    kmz->kz_zalloczone == KMZ_CREATEZONE_ACCT) {
520			kmz->kz_zalloczone = zinit(kmz->kz_elemsize,
521						1024 * 1024, PAGE_SIZE,
522						memname[kmz - kmzones]);
523			zone_change(kmz->kz_zalloczone, Z_CALLERACCT,
524				    (kmz->kz_zalloczone == KMZ_CREATEZONE_ACCT));
525
526			if (kmz->kz_noencrypt == TRUE)
527				zone_change(kmz->kz_zalloczone, Z_NOENCRYPT, TRUE);
528		}
529		else if (kmz->kz_zalloczone == KMZ_LOOKUPZONE)
530			kmz->kz_zalloczone = kalloc_zone(kmz->kz_elemsize);
531
532		kmz++;
533	}
534
535	kmz = kmzones;
536	while (kmz < &kmzones[M_LAST]) {
537/* XXX */
538		if (kmz->kz_elemsize == (size_t)(-1))
539			;
540		else
541/* XXX */
542		if (kmz->kz_zalloczone == KMZ_SHAREZONE) {
543			kmz->kz_zalloczone =
544				kmzones[kmz->kz_elemsize].kz_zalloczone;
545			kmz->kz_elemsize =
546				kmzones[kmz->kz_elemsize].kz_elemsize;
547		}
548
549		kmz++;
550	}
551}
552
553struct _mhead {
554	size_t	mlen;
555	char	dat[0];
556};
557
558void *
559_MALLOC(
560	size_t		size,
561	int		type,
562	int		flags)
563{
564	struct _mhead	*hdr = NULL;
565	size_t		memsize = sizeof (*hdr) + size;
566
567	if (type >= M_LAST)
568		panic("_malloc TYPE");
569
570	if (size == 0)
571		return (NULL);
572
573	if (flags & M_NOWAIT) {
574               if (size > memsize)   /* overflow detected */
575                       return (NULL);
576               else
577                       hdr = (void *)kalloc_noblock(memsize);
578	} else {
579               if (size > memsize) {
580                       /*
581                        * We get here when the caller told us to block, waiting for memory but an overflow
582                        * has been detected.  The caller isn't expecting a NULL return code so we panic
583                        * with a descriptive message.
584                        */
585                       panic("_MALLOC: overflow detected, size %llu ", (uint64_t) size);
586               }
587               else
588                       hdr = (void *)kalloc(memsize);
589
590	       if (hdr == NULL) {
591
592			/*
593			 * We get here when the caller told us to block waiting for memory, but
594			 * kalloc said there's no memory left to get.  Generally, this means there's a
595			 * leak or the caller asked for an impossibly large amount of memory.  Since there's
596			 * nothing left to wait for and the caller isn't expecting a NULL return code, we
597			 * just panic.  This is less than ideal, but returning NULL doesn't help since the
598			 * majority of callers don't check the return value and will just dereference the pointer and
599			 * trap anyway.  We may as well get a more descriptive message out while we can.
600			 */
601
602			panic("_MALLOC: kalloc returned NULL (potential leak), size %llu", (uint64_t) size);
603		}
604	}
605	if (!hdr)
606		return (0);
607
608	hdr->mlen = memsize;
609
610	if (flags & M_ZERO)
611		bzero(hdr->dat, size);
612
613	return  (hdr->dat);
614}
615
616void
617_FREE(
618	void		*addr,
619	int		type)
620{
621	struct _mhead	*hdr;
622
623	if (type >= M_LAST)
624		panic("_free TYPE");
625
626	if (!addr)
627		return; /* correct (convenient bsd kernel legacy) */
628
629	hdr = addr; hdr--;
630	kfree(hdr, hdr->mlen);
631}
632
633void *
634_REALLOC(
635	void		*addr,
636	size_t		size,
637	int		type,
638	int		flags)
639{
640	struct _mhead	*hdr;
641	void		*newaddr;
642	size_t		alloc;
643
644	/* realloc(NULL, ...) is equivalent to malloc(...) */
645	if (addr == NULL)
646		return (_MALLOC(size, type, flags));
647
648	/* Allocate a new, bigger (or smaller) block */
649	if ((newaddr = _MALLOC(size, type, flags)) == NULL)
650		return (NULL);
651
652	hdr = addr;
653	--hdr;
654	alloc = hdr->mlen - sizeof (*hdr);
655
656	/* Copy over original contents */
657	bcopy(addr, newaddr, MIN(size, alloc));
658	_FREE(addr, type);
659
660	return (newaddr);
661}
662
663void *
664_MALLOC_ZONE(
665	size_t		size,
666	int		type,
667	int		flags)
668{
669	struct kmzones	*kmz;
670	void		*elem;
671
672	if (type >= M_LAST)
673		panic("_malloc_zone TYPE");
674
675	kmz = &kmzones[type];
676	if (kmz->kz_zalloczone == KMZ_MALLOC)
677		panic("_malloc_zone ZONE: type = %d", type);
678
679/* XXX */
680	if (kmz->kz_elemsize == (size_t)(-1))
681		panic("_malloc_zone XXX");
682/* XXX */
683	if (size == kmz->kz_elemsize)
684		if (flags & M_NOWAIT) {
685	  		elem = (void *)zalloc_noblock(kmz->kz_zalloczone);
686		} else {
687	  		elem = (void *)zalloc(kmz->kz_zalloczone);
688		}
689	else
690		if (flags & M_NOWAIT) {
691			elem = (void *)kalloc_noblock(size);
692		} else {
693			elem = (void *)kalloc(size);
694		}
695
696	return (elem);
697}
698
699void
700_FREE_ZONE(
701	void		*elem,
702	size_t		size,
703	int		type)
704{
705	struct kmzones	*kmz;
706
707	if (type >= M_LAST)
708		panic("FREE_SIZE");
709
710	kmz = &kmzones[type];
711	if (kmz->kz_zalloczone == KMZ_MALLOC)
712		panic("free_zone ZONE");
713
714/* XXX */
715	if (kmz->kz_elemsize == (size_t)(-1))
716		panic("FREE_SIZE XXX");
717/* XXX */
718	if (size == kmz->kz_elemsize)
719		zfree(kmz->kz_zalloczone, elem);
720	else
721		kfree(elem, size);
722}
723
724#if CONFIG_ZLEAKS
725
726SYSCTL_DECL(_kern_zleak);
727SYSCTL_NODE(_kern, OID_AUTO, zleak, CTLFLAG_RW | CTLFLAG_LOCKED, 0, "zleak");
728
729/*
730 * kern.zleak.active
731 *
732 * Show the status of the zleak subsystem (0 = enabled, 1 = active,
733 * and -1 = failed), and if enabled, allow it to be activated immediately.
734 */
735static int
736sysctl_zleak_active SYSCTL_HANDLER_ARGS
737{
738#pragma unused(arg1, arg2)
739	int oldval, val, error;
740
741	val = oldval = get_zleak_state();
742	error = sysctl_handle_int(oidp, &val, 0, req);
743	if (error || !req->newptr)
744		return (error);
745	/*
746	 * Can only be activated if it's off (and not failed.)
747	 * Cannot be deactivated once it's on.
748	 */
749	if (val == 1 && oldval == 0) {
750		kern_return_t kr = zleak_activate();
751
752		if (KERN_SUCCESS != kr)
753			printf("zleak_active: failed to activate "
754			    "live zone leak debugging (%d).\n", kr);
755	} if (val == 0 && oldval == 1) {
756		printf("zleak_active: active, cannot be disabled.\n");
757		return (EINVAL);
758	}
759	return (0);
760}
761
762SYSCTL_PROC(_kern_zleak, OID_AUTO, active,
763    CTLTYPE_INT | CTLFLAG_RW | CTLFLAG_LOCKED,
764    0, 0, sysctl_zleak_active, "I", "zleak activity");
765
766/*
767 * kern.zleak.max_zonemap_size
768 *
769 * Read the value of the maximum zonemap size in bytes; useful
770 * as the maximum size that zleak.global_threshold and
771 * zleak.zone_threshold should be set to.
772 */
773static int
774sysctl_zleak_max_zonemap_size SYSCTL_HANDLER_ARGS
775{
776	uint64_t zmap_max_size = *(vm_size_t *)arg1;
777
778	return sysctl_handle_quad(oidp, &zmap_max_size, arg2, req);
779}
780
781SYSCTL_PROC(_kern_zleak, OID_AUTO, max_zonemap_size,
782    CTLTYPE_QUAD | CTLFLAG_RD | CTLFLAG_LOCKED,
783    &zleak_max_zonemap_size, 0,
784    sysctl_zleak_max_zonemap_size, "Q", "zleak max zonemap size");
785
786
787static int
788sysctl_zleak_threshold SYSCTL_HANDLER_ARGS
789{
790#pragma unused(oidp, arg2)
791	int error;
792	uint64_t value = *(vm_size_t *)arg1;
793
794	error = sysctl_io_number(req, value, sizeof (value), &value, NULL);
795
796	if (error || !req->newptr)
797		return (error);
798
799	if (value > (uint64_t)zleak_max_zonemap_size)
800		return (ERANGE);
801
802	*(vm_size_t *)arg1 = value;
803	return (0);
804}
805
806/*
807 * kern.zleak.global_threshold
808 *
809 * Set the global zleak threshold size (in bytes).  If the zone map
810 * grows larger than this value, zleaks are automatically activated.
811 *
812 * The default value is set in zleak_init().
813 */
814SYSCTL_PROC(_kern_zleak, OID_AUTO, global_threshold,
815    CTLTYPE_QUAD | CTLFLAG_RW | CTLFLAG_LOCKED,
816    &zleak_global_tracking_threshold, 0,
817    sysctl_zleak_threshold, "Q", "zleak global threshold");
818
819/*
820 * kern.zleak.zone_threshold
821 *
822 * Set the per-zone threshold size (in bytes) above which any
823 * zone will automatically start zleak tracking.
824 *
825 * The default value is set in zleak_init().
826 *
827 * Setting this variable will have no effect until zleak tracking is
828 * activated (See above.)
829 */
830SYSCTL_PROC(_kern_zleak, OID_AUTO, zone_threshold,
831    CTLTYPE_QUAD | CTLFLAG_RW | CTLFLAG_LOCKED,
832    &zleak_per_zone_tracking_threshold, 0,
833    sysctl_zleak_threshold, "Q", "zleak per-zone threshold");
834
835#endif	/* CONFIG_ZLEAKS */
836