]> git.saurik.com Git - apple/xnu.git/blob - bsd/kern/kern_malloc.c
xnu-6153.141.1.tar.gz
[apple/xnu.git] / bsd / kern / kern_malloc.c
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 #include <net/necp.h>
78
79 #include <netinet/in.h>
80 #include <netinet/in_systm.h>
81 #include <netinet/ip.h>
82 #include <netinet/in_pcb.h>
83 #include <netinet/flow_divert.h>
84
85 #include <sys/event.h>
86 #include <sys/eventvar.h>
87
88 #include <sys/proc_internal.h>
89 #include <sys/mount_internal.h>
90 #include <sys/vnode_internal.h>
91 #include <sys/ubc_internal.h>
92 #include <sys/namei.h>
93 #include <sys/file_internal.h>
94 #include <sys/filedesc.h>
95 #include <sys/tty.h>
96 #include <sys/quota.h>
97 #include <sys/uio_internal.h>
98 #include <sys/resourcevar.h>
99 #include <sys/signalvar.h>
100 #include <sys/decmpfs.h>
101
102 #include <miscfs/specfs/specdev.h>
103
104 #include <nfs/nfs_conf.h>
105 #include <nfs/rpcv2.h>
106 #include <nfs/nfsproto.h>
107 #include <nfs/nfsnode.h>
108 #include <nfs/nfsmount.h>
109
110 #include <mach/mach_types.h>
111
112 #include <kern/zalloc.h>
113 #include <kern/kalloc.h>
114
115 void kmeminit(void);
116
117 /* Strings corresponding to types of memory.
118 * Must be in synch with the #defines is sys/malloc.h
119 * NOTE - the reason we pass null strings in some cases is to reduce of foot
120 * print as much as possible for systems where a tiny kernel is needed.
121 * todo - We should probably redesign this and use enums for our types and only
122 * include types needed for that configuration of the kernel. This can't be
123 * done without some kind of kpi since several types are hardwired and exported
124 * (for example see types M_UDFMNT, M_TEMP, etc in sys/malloc.h)
125 */
126 const char *memname[] = {
127 "free", /* 0 M_FREE */
128 "mbuf", /* 1 M_MBUF */
129 "devbuf", /* 2 M_DEVBUF */
130 "socket", /* 3 M_SOCKET */
131 "pcb", /* 4 M_PCB */
132 "routetbl", /* 5 M_RTABLE */
133 "hosttbl", /* 6 M_HTABLE */
134 "fragtbl", /* 7 M_FTABLE */
135 "zombie", /* 8 M_ZOMBIE */
136 "ifaddr", /* 9 M_IFADDR */
137 "soopts", /* 10 M_SOOPTS */
138 "soname", /* 11 M_SONAME */
139 "namei", /* 12 M_NAMEI */
140 "gprof", /* 13 M_GPROF */
141 "ioctlops", /* 14 M_IOCTLOPS */
142 "mapmem", /* 15 M_MAPMEM */
143 "cred", /* 16 M_CRED */
144 "pgrp", /* 17 M_PGRP */
145 "session", /* 18 M_SESSION */
146 "iov32", /* 19 M_IOV32 */
147 "mount", /* 20 M_MOUNT */
148 "fhandle", /* 21 M_FHANDLE */
149 #if CONFIG_NFS
150 "NFS req", /* 22 M_NFSREQ */
151 "NFS mount", /* 23 M_NFSMNT */
152 "NFS node", /* 24 M_NFSNODE */
153 #else
154 "", /* 22 M_NFSREQ */
155 "", /* 23 M_NFSMNT */
156 "", /* 24 M_NFSNODE */
157 #endif
158 "vnodes", /* 25 M_VNODE */
159 "namecache", /* 26 M_CACHE */
160 #if QUOTA
161 "UFS quota", /* 27 M_DQUOT */
162 #else
163 "", /* 27 M_DQUOT */
164 #endif
165 "proc uuid policy", /* 28 M_PROC_UUID_POLICY */
166 #if (SYSV_SEM || SYSV_MSG || SYSV_SHM)
167 "shm", /* 29 M_SHM */
168 #else
169 "", /* 29 M_SHM */
170 #endif
171 "plimit", /* 30 M_VMMAP */
172 "sigacts", /* 31 M_VMMAPENT */
173 "VM object", /* 32 M_VMOBJ */
174 "VM objhash", /* 33 M_VMOBJHASH */
175 "VM pmap", /* 34 M_VMPMAP */
176 "VM pvmap", /* 35 M_VMPVENT */
177 "VM pager", /* 36 M_VMPAGER */
178 "VM pgdata", /* 37 M_VMPGDATA */
179 "fileproc", /* 38 M_FILEPROC */
180 "file desc", /* 39 M_FILEDESC */
181 "lockf", /* 40 M_LOCKF */
182 "proc", /* 41 M_PROC */
183 "pstats", /* 42 M_SUBPROC */
184 "LFS segment", /* 43 M_SEGMENT */
185 "LFS node", /* 44 M_LFSNODE */
186 "", /* 45 M_FFSNODE */
187 "MFS node", /* 46 M_MFSNODE */
188 "NQNFS Lease", /* 47 M_NQLEASE */
189 "NQNFS Host", /* 48 M_NQMHOST */
190 "Export Host", /* 49 M_NETADDR */
191 #if CONFIG_NFS
192 "NFS srvsock", /* 50 M_NFSSVC */
193 "NFS uid", /* 51 M_NFSUID */
194 "NFS daemon", /* 52 M_NFSD */
195 #else
196 "", /* 50 M_NFSSVC */
197 "", /* 51 M_NFSUID */
198 "", /* 52 M_NFSD */
199 #endif
200 "ip_moptions", /* 53 M_IPMOPTS */
201 "in_multi", /* 54 M_IPMADDR */
202 "ether_multi", /* 55 M_IFMADDR */
203 "mrt", /* 56 M_MRTABLE */
204 "", /* 57 unused entry */
205 "", /* 58 unused entry */
206 #if CONFIG_NFS
207 "NFSV3 srvdesc",/* 59 M_NFSRVDESC */
208 "NFSV3 diroff", /* 60 M_NFSDIROFF */
209 "NFSV3 bigfh", /* 61 M_NFSBIGFH */
210 #else
211 "", /* 59 M_NFSRVDESC */
212 "", /* 60 M_NFSDIROFF */
213 "", /* 61 M_NFSBIGFH */
214 #endif
215 "MSDOSFS mount",/* 62 M_MSDOSFSMNT */
216 "MSDOSFS fat", /* 63 M_MSDOSFSFAT */
217 "MSDOSFS node", /* 64 M_MSDOSFSNODE */
218 "ttys", /* 65 M_TTYS */
219 "exec", /* 66 M_EXEC */
220 "miscfs mount", /* 67 M_MISCFSMNT */
221 "miscfs node", /* 68 M_MISCFSNODE */
222 "adosfs mount", /* 69 M_ADOSFSMNT */
223 "adosfs node", /* 70 M_ADOSFSNODE */
224 "adosfs anode", /* 71 M_ANODE */
225 "buf hdrs", /* 72 M_BUFHDR */
226 "ofile tabl", /* 73 M_OFILETABL */
227 "mbuf clust", /* 74 M_MCLUST */
228 "", /* 75 unused */
229 "", /* 76 unused */
230 "", /* 77 unused */
231 "", /* 78 unused */
232 "", /* 79 unused */
233 "temp", /* 80 M_TEMP */
234 "key mgmt", /* 81 M_SECA */
235 "DEVFS", /* 82 M_DEVFS */
236 "IpFw/IpAcct", /* 83 M_IPFW */
237 "UDF node", /* 84 M_UDFNODE */
238 "UDF mount", /* 85 M_UDFMNT */
239 #if INET6
240 "IPv6 NDP", /* 86 M_IP6NDP */
241 "IPv6 options", /* 87 M_IP6OPT */
242 "IPv6 Misc", /* 88 M_IP6MISC */
243 #else
244 "", /* 86 M_IP6NDP */
245 "", /* 87 M_IP6OPT */
246 "", /* 88 M_IP6MISC */
247 #endif
248 "TCP Segment Q",/* 89 M_TSEGQ */
249 "IGMP state", /* 90 M_IGMP */
250 "", /* 91 unused */
251 "", /* 92 unused */
252 "specinfo", /* 93 M_SPECINFO */
253 "kqueue", /* 94 M_KQUEUE */
254 "", /* 95 unused */
255 "cluster_read", /* 96 M_CLRDAHEAD */
256 "cluster_write",/* 97 M_CLWRBEHIND */
257 "iov64", /* 98 M_IOV64 */
258 "fileglob", /* 99 M_FILEGLOB */
259 "kauth", /* 100 M_KAUTH */
260 "dummynet", /* 101 M_DUMMYNET */
261 "", /* 102 M_UNSAFEFS */
262 "macpipelabel", /* 103 M_MACPIPELABEL */
263 "mactemp", /* 104 M_MACTEMP */
264 "sbuf", /* 105 M_SBUF */
265 "extattr", /* 106 M_EXTATTR */
266 "select", /* 107 M_SELECT */
267 #if TRAFFIC_MGT
268 "traffic_mgt", /* 108 M_TRAFFIC_MGT */
269 #else
270 "", /* 108 M_TRAFFIC_MGT */
271 #endif
272 #if FS_COMPRESSION
273 "decmpfs_cnode",/* 109 M_DECMPFS_CNODE */
274 #else
275 "", /* 109 M_DECMPFS_CNODE */
276 #endif /* FS_COMPRESSION */
277 "ipmfilter", /* 110 M_INMFILTER */
278 "ipmsource", /* 111 M_IPMSOURCE */
279 "in6mfilter", /* 112 M_IN6MFILTER */
280 "ip6mopts", /* 113 M_IP6MOPTS */
281 "ip6msource", /* 114 M_IP6MSOURCE */
282 #if FLOW_DIVERT
283 "flow_divert_pcb", /* 115 M_FLOW_DIVERT_PCB */
284 "flow_divert_group", /* 116 M_FLOW_DIVERT_GROUP */
285 #else
286 "", /* 115 M_FLOW_DIVERT_PCB */
287 "", /* 116 M_FLOW_DIVERT_GROUP */
288 #endif
289 "ip6cga", /* 117 M_IP6CGA */
290 #if NECP
291 "necp", /* 118 M_NECP */
292 "necp_session_policy", /* 119 M_NECP_SESSION_POLICY */
293 "necp_socket_policy", /* 120 M_NECP_SOCKET_POLICY */
294 "necp_ip_policy", /* 121 M_NECP_IP_POLICY */
295 #else
296 "", /* 118 M_NECP */
297 "", /* 119 M_NECP_SESSION_POLICY */
298 "", /* 120 M_NECP_SOCKET_POLICY */
299 "", /* 121 M_NECP_IP_POLICY */
300 #endif
301 "fdvnodedata" /* 122 M_FD_VN_DATA */
302 "fddirbuf", /* 123 M_FD_DIRBUF */
303 "netagent", /* 124 M_NETAGENT */
304 "Event Handler",/* 125 M_EVENTHANDLER */
305 "Link Layer Table", /* 126 M_LLTABLE */
306 "Network Work Queue", /* 127 M_NWKWQ */
307 "Content Filter", /* 128 M_CFIL */
308 ""
309 };
310
311 /* for use with kmzones.kz_zalloczone */
312 #define KMZ_CREATEZONE_ACCT ((void *)-3)
313 #define KMZ_CREATEZONE ((void *)-2)
314 #define KMZ_LOOKUPZONE ((void *)-1)
315 #define KMZ_MALLOC ((void *)0)
316 #define KMZ_SHAREZONE ((void *)1)
317
318 struct kmzones {
319 size_t kz_elemsize;
320 void *kz_zalloczone;
321 boolean_t kz_noencrypt;
322 } kmzones[M_LAST] = {
323 #define SOS(sname) sizeof (struct sname)
324 #define SOX(sname) -1
325 { -1, 0, FALSE }, /* 0 M_FREE */
326 { MSIZE, KMZ_CREATEZONE, FALSE }, /* 1 M_MBUF */
327 { 0, KMZ_MALLOC, FALSE }, /* 2 M_DEVBUF */
328 { SOS(socket), KMZ_CREATEZONE, TRUE }, /* 3 M_SOCKET */
329 { SOS(inpcb), KMZ_LOOKUPZONE, TRUE }, /* 4 M_PCB */
330 { M_MBUF, KMZ_SHAREZONE, FALSE }, /* 5 M_RTABLE */
331 { M_MBUF, KMZ_SHAREZONE, FALSE }, /* 6 M_HTABLE */
332 { M_MBUF, KMZ_SHAREZONE, FALSE }, /* 7 M_FTABLE */
333 { SOS(rusage), KMZ_CREATEZONE, TRUE }, /* 8 M_ZOMBIE */
334 { 0, KMZ_MALLOC, FALSE }, /* 9 M_IFADDR */
335 { M_MBUF, KMZ_SHAREZONE, FALSE }, /* 10 M_SOOPTS */
336 { 0, KMZ_MALLOC, FALSE }, /* 11 M_SONAME */
337 { MAXPATHLEN, KMZ_CREATEZONE, FALSE }, /* 12 M_NAMEI */
338 { 0, KMZ_MALLOC, FALSE }, /* 13 M_GPROF */
339 { 0, KMZ_MALLOC, FALSE }, /* 14 M_IOCTLOPS */
340 { 0, KMZ_MALLOC, FALSE }, /* 15 M_MAPMEM */
341 { SOS(ucred), KMZ_CREATEZONE, FALSE }, /* 16 M_CRED */
342 { SOS(pgrp), KMZ_CREATEZONE, FALSE }, /* 17 M_PGRP */
343 { SOS(session), KMZ_CREATEZONE, FALSE }, /* 18 M_SESSION */
344 { SOS(user32_iovec), KMZ_LOOKUPZONE, FALSE }, /* 19 M_IOV32 */
345 { SOS(mount), KMZ_CREATEZONE, FALSE }, /* 20 M_MOUNT */
346 { 0, KMZ_MALLOC, FALSE }, /* 21 M_FHANDLE */
347 #if CONFIG_NFS
348 { SOS(nfsreq), KMZ_CREATEZONE, FALSE }, /* 22 M_NFSREQ */
349 { SOS(nfsmount), KMZ_CREATEZONE, FALSE }, /* 23 M_NFSMNT */
350 { SOS(nfsnode), KMZ_CREATEZONE, FALSE }, /* 24 M_NFSNODE */
351 #else
352 { 0, KMZ_MALLOC, FALSE }, /* 22 M_NFSREQ */
353 { 0, KMZ_MALLOC, FALSE }, /* 23 M_NFSMNT */
354 { 0, KMZ_MALLOC, FALSE }, /* 24 M_NFSNODE */
355 #endif
356 { SOS(vnode), KMZ_CREATEZONE, TRUE }, /* 25 M_VNODE */
357 { SOS(namecache), KMZ_CREATEZONE, FALSE }, /* 26 M_CACHE */
358 #if QUOTA
359 { SOX(dquot), KMZ_LOOKUPZONE, FALSE }, /* 27 M_DQUOT */
360 #else
361 { 0, KMZ_MALLOC, FALSE }, /* 27 M_DQUOT */
362 #endif
363 { 0, KMZ_MALLOC, FALSE }, /* 28 M_PROC_UUID_POLICY */
364 { 0, KMZ_MALLOC, FALSE }, /* 29 M_SHM */
365 { SOS(plimit), KMZ_CREATEZONE, TRUE }, /* 30 M_PLIMIT */
366 { SOS(sigacts), KMZ_CREATEZONE_ACCT, TRUE }, /* 31 M_SIGACTS */
367 { 0, KMZ_MALLOC, FALSE }, /* 32 M_VMOBJ */
368 { 0, KMZ_MALLOC, FALSE }, /* 33 M_VMOBJHASH */
369 { 0, KMZ_MALLOC, FALSE }, /* 34 M_VMPMAP */
370 { 0, KMZ_MALLOC, FALSE }, /* 35 M_VMPVENT */
371 { 0, KMZ_MALLOC, FALSE }, /* 36 M_VMPAGER */
372 { 0, KMZ_MALLOC, FALSE }, /* 37 M_VMPGDATA */
373 { SOS(fileproc), KMZ_CREATEZONE_ACCT, TRUE }, /* 38 M_FILEPROC */
374 { SOS(filedesc), KMZ_CREATEZONE_ACCT, TRUE }, /* 39 M_FILEDESC */
375 { SOX(lockf), KMZ_CREATEZONE_ACCT, TRUE }, /* 40 M_LOCKF */
376 { SOS(proc), KMZ_CREATEZONE, FALSE }, /* 41 M_PROC */
377 { SOS(pstats), KMZ_CREATEZONE, TRUE }, /* 42 M_PSTATS */
378 { 0, KMZ_MALLOC, FALSE }, /* 43 M_SEGMENT */
379 { M_FFSNODE, KMZ_SHAREZONE, FALSE }, /* 44 M_LFSNODE */
380 { 0, KMZ_MALLOC, FALSE }, /* 45 M_FFSNODE */
381 { M_FFSNODE, KMZ_SHAREZONE, FALSE }, /* 46 M_MFSNODE */
382 { 0, KMZ_MALLOC, FALSE }, /* 47 M_NQLEASE */
383 { 0, KMZ_MALLOC, FALSE }, /* 48 M_NQMHOST */
384 { 0, KMZ_MALLOC, FALSE }, /* 49 M_NETADDR */
385 #if CONFIG_NFS
386 { SOX(nfsrv_sock),
387 KMZ_CREATEZONE_ACCT, FALSE }, /* 50 M_NFSSVC */
388 { 0, KMZ_MALLOC, FALSE }, /* 51 M_NFSUID */
389 { SOX(nfsrvcache),
390 KMZ_CREATEZONE_ACCT, FALSE }, /* 52 M_NFSD */
391 #else
392 { 0, KMZ_MALLOC, FALSE }, /* 50 M_NFSSVC */
393 { 0, KMZ_MALLOC, FALSE }, /* 51 M_NFSUID */
394 { 0, KMZ_MALLOC, FALSE }, /* 52 M_NFSD */
395 #endif
396 { SOX(ip_moptions),
397 KMZ_LOOKUPZONE, FALSE }, /* 53 M_IPMOPTS */
398 { SOX(in_multi), KMZ_LOOKUPZONE, FALSE }, /* 54 M_IPMADDR */
399 { SOX(ether_multi),
400 KMZ_LOOKUPZONE, FALSE }, /* 55 M_IFMADDR */
401 { SOX(mrt), KMZ_CREATEZONE, TRUE }, /* 56 M_MRTABLE */
402 { 0, KMZ_MALLOC, FALSE }, /* 57 unused entry */
403 { 0, KMZ_MALLOC, FALSE }, /* 58 unused entry */
404 #if CONFIG_NFS
405 { SOS(nfsrv_descript),
406 KMZ_CREATEZONE_ACCT, FALSE }, /* 59 M_NFSRVDESC */
407 { SOS(nfsdmap), KMZ_CREATEZONE, FALSE }, /* 60 M_NFSDIROFF */
408 { SOS(fhandle), KMZ_LOOKUPZONE, FALSE }, /* 61 M_NFSBIGFH */
409 #else
410 { 0, KMZ_MALLOC, FALSE }, /* 59 M_NFSRVDESC */
411 { 0, KMZ_MALLOC, FALSE }, /* 60 M_NFSDIROFF */
412 { 0, KMZ_MALLOC, FALSE }, /* 61 M_NFSBIGFH */
413 #endif
414 { 0, KMZ_MALLOC, FALSE }, /* 62 M_MSDOSFSMNT */
415 { 0, KMZ_MALLOC, FALSE }, /* 63 M_MSDOSFSFAT */
416 { 0, KMZ_MALLOC, FALSE }, /* 64 M_MSDOSFSNODE */
417 { SOS(tty), KMZ_CREATEZONE, FALSE }, /* 65 M_TTYS */
418 { 0, KMZ_MALLOC, FALSE }, /* 66 M_EXEC */
419 { 0, KMZ_MALLOC, FALSE }, /* 67 M_MISCFSMNT */
420 { 0, KMZ_MALLOC, FALSE }, /* 68 M_MISCFSNODE */
421 { 0, KMZ_MALLOC, FALSE }, /* 69 M_ADOSFSMNT */
422 { 0, KMZ_MALLOC, FALSE }, /* 70 M_ADOSFSNODE */
423 { 0, KMZ_MALLOC, FALSE }, /* 71 M_ANODE */
424 { 0, KMZ_MALLOC, TRUE }, /* 72 M_BUFHDR */
425 { (NDFILE * OFILESIZE),
426 KMZ_CREATEZONE_ACCT, FALSE }, /* 73 M_OFILETABL */
427 { MCLBYTES, KMZ_CREATEZONE, FALSE }, /* 74 M_MCLUST */
428 { 0, KMZ_MALLOC, FALSE }, /* 75 unused */
429 { 0, KMZ_MALLOC, FALSE }, /* 76 unused */
430 { 0, KMZ_MALLOC, FALSE }, /* 77 unused */
431 { 0, KMZ_MALLOC, FALSE }, /* 78 unused */
432 { 0, KMZ_MALLOC, FALSE }, /* 79 unused */
433 { 0, KMZ_MALLOC, FALSE }, /* 80 M_TEMP */
434 { 0, KMZ_MALLOC, FALSE }, /* 81 M_SECA */
435 { 0, KMZ_MALLOC, FALSE }, /* 82 M_DEVFS */
436 { 0, KMZ_MALLOC, FALSE }, /* 83 M_IPFW */
437 { 0, KMZ_MALLOC, FALSE }, /* 84 M_UDFNODE */
438 { 0, KMZ_MALLOC, FALSE }, /* 85 M_UDFMOUNT */
439 { 0, KMZ_MALLOC, FALSE }, /* 86 M_IP6NDP */
440 { 0, KMZ_MALLOC, FALSE }, /* 87 M_IP6OPT */
441 { 0, KMZ_MALLOC, FALSE }, /* 88 M_IP6MISC */
442 { 0, KMZ_MALLOC, FALSE }, /* 89 M_TSEGQ */
443 { 0, KMZ_MALLOC, FALSE }, /* 90 M_IGMP */
444 { 0, KMZ_MALLOC, FALSE }, /* 91 unused */
445 { 0, KMZ_MALLOC, FALSE }, /* 92 unused */
446 { SOS(specinfo), KMZ_CREATEZONE, TRUE }, /* 93 M_SPECINFO */
447 { SOS(kqueue), KMZ_CREATEZONE, FALSE }, /* 94 M_KQUEUE */
448 { 0, KMZ_MALLOC, FALSE }, /* 95 unused */
449 { SOS(cl_readahead), KMZ_CREATEZONE, TRUE }, /* 96 M_CLRDAHEAD */
450 { SOS(cl_writebehind), KMZ_CREATEZONE, TRUE }, /* 97 M_CLWRBEHIND */
451 { SOS(user64_iovec), KMZ_LOOKUPZONE, FALSE }, /* 98 M_IOV64 */
452 { SOS(fileglob), KMZ_CREATEZONE, TRUE }, /* 99 M_FILEGLOB */
453 { 0, KMZ_MALLOC, FALSE }, /* 100 M_KAUTH */
454 { 0, KMZ_MALLOC, FALSE }, /* 101 M_DUMMYNET */
455 { 0, KMZ_MALLOC, FALSE }, /* 102 M_UNSAFEFS */
456 { 0, KMZ_MALLOC, FALSE }, /* 103 M_MACPIPELABEL */
457 { 0, KMZ_MALLOC, FALSE }, /* 104 M_MACTEMP */
458 { 0, KMZ_MALLOC, FALSE }, /* 105 M_SBUF */
459 { 0, KMZ_MALLOC, FALSE }, /* 106 M_HFS_EXTATTR */
460 { 0, KMZ_MALLOC, FALSE }, /* 107 M_SELECT */
461 { 0, KMZ_MALLOC, FALSE }, /* 108 M_TRAFFIC_MGT */
462 #if FS_COMPRESSION
463 { SOS(decmpfs_cnode), KMZ_CREATEZONE, FALSE}, /* 109 M_DECMPFS_CNODE */
464 #else
465 { 0, KMZ_MALLOC, FALSE }, /* 109 M_DECMPFS_CNODE */
466 #endif /* FS_COMPRESSION */
467 { 0, KMZ_MALLOC, FALSE }, /* 110 M_INMFILTER */
468 { 0, KMZ_MALLOC, FALSE }, /* 111 M_IPMSOURCE */
469 { 0, KMZ_MALLOC, FALSE }, /* 112 M_IN6MFILTER */
470 { 0, KMZ_MALLOC, FALSE }, /* 113 M_IP6MOPTS */
471 { 0, KMZ_MALLOC, FALSE }, /* 114 M_IP6MSOURCE */
472 #if FLOW_DIVERT
473 { SOS(flow_divert_pcb), KMZ_CREATEZONE, TRUE }, /* 115 M_FLOW_DIVERT_PCB */
474 { SOS(flow_divert_group), KMZ_CREATEZONE, TRUE }, /* 116 M_FLOW_DIVERT_GROUP */
475 #else
476 { 0, KMZ_MALLOC, FALSE }, /* 115 M_FLOW_DIVERT_PCB */
477 { 0, KMZ_MALLOC, FALSE }, /* 116 M_FLOW_DIVERT_GROUP */
478 #endif /* FLOW_DIVERT */
479 { 0, KMZ_MALLOC, FALSE }, /* 117 M_IP6CGA */
480 { 0, KMZ_MALLOC, FALSE }, /* 118 M_NECP */
481 #if NECP
482 { SOS(necp_session_policy), KMZ_CREATEZONE, TRUE }, /* 119 M_NECP_SESSION_POLICY */
483 { SOS(necp_kernel_socket_policy), KMZ_CREATEZONE, TRUE }, /* 120 M_NECP_SOCKET_POLICY */
484 { SOS(necp_kernel_ip_output_policy), KMZ_CREATEZONE, TRUE }, /* 121 M_NECP_IP_POLICY */
485 #else
486 { 0, KMZ_MALLOC, FALSE }, /* 119 M_NECP_SESSION_POLICY */
487 { 0, KMZ_MALLOC, FALSE }, /* 120 M_NECP_SOCKET_POLICY */
488 { 0, KMZ_MALLOC, FALSE }, /* 121 M_NECP_IP_POLICY */
489 #endif /* NECP */
490 { 0, KMZ_MALLOC, FALSE }, /* 122 M_FD_VN_DATA */
491 { 0, KMZ_MALLOC, FALSE }, /* 123 M_FD_DIRBUF */
492 { 0, KMZ_MALLOC, FALSE }, /* 124 M_NETAGENT */
493 { 0, KMZ_MALLOC, FALSE }, /* 125 M_EVENTHANDLER */
494 { 0, KMZ_MALLOC, FALSE }, /* 126 M_LLTABLE */
495 { 0, KMZ_MALLOC, FALSE }, /* 127 M_NWKWQ */
496 { 0, KMZ_MALLOC, FALSE }, /* 128 M_CFIL */
497 #undef SOS
498 #undef SOX
499 };
500
501 extern zone_t kalloc_zone(vm_size_t); /* XXX */
502
503 /*
504 * Initialize the kernel memory allocator
505 */
506 void
507 kmeminit(void)
508 {
509 struct kmzones *kmz;
510
511 if ((sizeof(kmzones) / sizeof(kmzones[0])) != (sizeof(memname) / sizeof(memname[0]))) {
512 panic("kmeminit: kmzones has %lu elements but memname has %lu\n",
513 (sizeof(kmzones) / sizeof(kmzones[0])), (sizeof(memname) / sizeof(memname[0])));
514 }
515
516 kmz = kmzones;
517 while (kmz < &kmzones[M_LAST]) {
518 /* XXX */
519 if (kmz->kz_elemsize == (size_t)(-1)) {
520 ;
521 } else
522 /* XXX */
523 if (kmz->kz_zalloczone == KMZ_CREATEZONE ||
524 kmz->kz_zalloczone == KMZ_CREATEZONE_ACCT) {
525 kmz->kz_zalloczone = zinit(kmz->kz_elemsize,
526 1024 * 1024, PAGE_SIZE,
527 memname[kmz - kmzones]);
528 zone_change(kmz->kz_zalloczone, Z_CALLERACCT,
529 (kmz->kz_zalloczone == KMZ_CREATEZONE_ACCT));
530
531 if (kmz->kz_noencrypt == TRUE) {
532 zone_change(kmz->kz_zalloczone, Z_NOENCRYPT, TRUE);
533 }
534 } else if (kmz->kz_zalloczone == KMZ_LOOKUPZONE) {
535 kmz->kz_zalloczone = kalloc_zone(kmz->kz_elemsize);
536 }
537
538 kmz++;
539 }
540
541 kmz = kmzones;
542 while (kmz < &kmzones[M_LAST]) {
543 /* XXX */
544 if (kmz->kz_elemsize == (size_t)(-1)) {
545 ;
546 } else
547 /* XXX */
548 if (kmz->kz_zalloczone == KMZ_SHAREZONE) {
549 kmz->kz_zalloczone =
550 kmzones[kmz->kz_elemsize].kz_zalloczone;
551 kmz->kz_elemsize =
552 kmzones[kmz->kz_elemsize].kz_elemsize;
553 }
554
555 kmz++;
556 }
557 }
558
559 void *
560 _MALLOC_external(
561 size_t size,
562 int type,
563 int flags);
564 void *
565 _MALLOC_external(
566 size_t size,
567 int type,
568 int flags)
569 {
570 static vm_allocation_site_t site = { .tag = VM_KERN_MEMORY_KALLOC, .flags = VM_TAG_BT };
571 return __MALLOC(size, type, flags, &site);
572 }
573
574 void *
575 __MALLOC(
576 size_t size,
577 int type,
578 int flags,
579 vm_allocation_site_t *site)
580 {
581 void *addr = NULL;
582 vm_size_t msize = size;
583
584 if (type >= M_LAST) {
585 panic("_malloc TYPE");
586 }
587
588 if (size == 0) {
589 return NULL;
590 }
591
592 if (msize != size) {
593 panic("Requested size to __MALLOC is too large (%llx)!\n", (uint64_t)size);
594 }
595
596 if (flags & M_NOWAIT) {
597 addr = (void *)kalloc_canblock(&msize, FALSE, site);
598 } else {
599 addr = (void *)kalloc_canblock(&msize, TRUE, site);
600 if (addr == NULL) {
601 /*
602 * We get here when the caller told us to block waiting for memory, but
603 * kalloc said there's no memory left to get. Generally, this means there's a
604 * leak or the caller asked for an impossibly large amount of memory. If the caller
605 * is expecting a NULL return code then it should explicitly set the flag M_NULL.
606 * If the caller isn't expecting a NULL return code, we just panic. This is less
607 * than ideal, but returning NULL when the caller isn't expecting it doesn't help
608 * since the majority of callers don't check the return value and will just
609 * dereference the pointer and trap anyway. We may as well get a more
610 * descriptive message out while we can.
611 */
612 if (flags & M_NULL) {
613 return NULL;
614 }
615 panic("_MALLOC: kalloc returned NULL (potential leak), size %llu", (uint64_t) size);
616 }
617 }
618 if (!addr) {
619 return 0;
620 }
621
622 if (flags & M_ZERO) {
623 bzero(addr, size);
624 }
625
626 return addr;
627 }
628
629 void
630 _FREE(
631 void *addr,
632 int type)
633 {
634 if (type >= M_LAST) {
635 panic("_free TYPE");
636 }
637
638 if (!addr) {
639 return; /* correct (convenient bsd kernel legacy) */
640 }
641 kfree_addr(addr);
642 }
643
644 void *
645 __REALLOC(
646 void *addr,
647 size_t size,
648 int type,
649 int flags,
650 vm_allocation_site_t *site)
651 {
652 void *newaddr;
653 size_t alloc;
654
655 /* realloc(NULL, ...) is equivalent to malloc(...) */
656 if (addr == NULL) {
657 return __MALLOC(size, type, flags, site);
658 }
659
660 alloc = kalloc_size(addr);
661 /*
662 * Find out the size of the bucket in which the new sized allocation
663 * would land. If it matches the bucket of the original allocation,
664 * simply return the address.
665 */
666 if (kalloc_bucket_size(size) == alloc) {
667 if (flags & M_ZERO) {
668 if (alloc < size) {
669 bzero(addr + alloc, (size - alloc));
670 } else {
671 bzero(addr + size, (alloc - size));
672 }
673 }
674 return addr;
675 }
676
677 /* Allocate a new, bigger (or smaller) block */
678 if ((newaddr = __MALLOC(size, type, flags, site)) == NULL) {
679 return NULL;
680 }
681
682 /* Copy over original contents */
683 bcopy(addr, newaddr, MIN(size, alloc));
684 _FREE(addr, type);
685
686 return newaddr;
687 }
688
689 void *
690 _MALLOC_ZONE_external(
691 size_t size,
692 int type,
693 int flags);
694 void *
695 _MALLOC_ZONE_external(
696 size_t size,
697 int type,
698 int flags)
699 {
700 return __MALLOC_ZONE(size, type, flags, NULL);
701 }
702
703 void *
704 __MALLOC_ZONE(
705 size_t size,
706 int type,
707 int flags,
708 vm_allocation_site_t *site)
709 {
710 struct kmzones *kmz;
711 void *elem;
712
713 if (type >= M_LAST) {
714 panic("_malloc_zone TYPE");
715 }
716
717 kmz = &kmzones[type];
718 if (kmz->kz_zalloczone == KMZ_MALLOC) {
719 panic("_malloc_zone ZONE: type = %d", type);
720 }
721
722 /* XXX */
723 if (kmz->kz_elemsize == (size_t)(-1)) {
724 panic("_malloc_zone XXX");
725 }
726 /* XXX */
727 if (size == kmz->kz_elemsize) {
728 if (flags & M_NOWAIT) {
729 elem = (void *)zalloc_noblock(kmz->kz_zalloczone);
730 } else {
731 elem = (void *)zalloc(kmz->kz_zalloczone);
732 }
733 } else {
734 vm_size_t kalloc_size = size;
735 if (size > kalloc_size) {
736 elem = NULL;
737 } else if (flags & M_NOWAIT) {
738 elem = (void *)kalloc_canblock(&kalloc_size, FALSE, site);
739 } else {
740 elem = (void *)kalloc_canblock(&kalloc_size, TRUE, site);
741 }
742 }
743
744 if (elem && (flags & M_ZERO)) {
745 bzero(elem, size);
746 }
747
748 return elem;
749 }
750
751 void
752 _FREE_ZONE(
753 void *elem,
754 size_t size,
755 int type)
756 {
757 struct kmzones *kmz;
758
759 if (type >= M_LAST) {
760 panic("FREE_SIZE");
761 }
762
763 kmz = &kmzones[type];
764 if (kmz->kz_zalloczone == KMZ_MALLOC) {
765 panic("free_zone ZONE");
766 }
767
768 /* XXX */
769 if (kmz->kz_elemsize == (size_t)(-1)) {
770 panic("FREE_SIZE XXX");
771 }
772 /* XXX */
773 if (size == kmz->kz_elemsize) {
774 zfree(kmz->kz_zalloczone, elem);
775 } else {
776 kfree(elem, size);
777 }
778 }
779
780 #if DEBUG || DEVELOPMENT
781
782 extern unsigned int zone_map_jetsam_limit;
783
784 static int
785 sysctl_zone_map_jetsam_limit SYSCTL_HANDLER_ARGS
786 {
787 #pragma unused(oidp, arg1, arg2)
788 int oldval = 0, val = 0, error = 0;
789
790 oldval = zone_map_jetsam_limit;
791 error = sysctl_io_number(req, oldval, sizeof(int), &val, NULL);
792 if (error || !req->newptr) {
793 return error;
794 }
795
796 if (val <= 0 || val > 100) {
797 printf("sysctl_zone_map_jetsam_limit: new jetsam limit value is invalid.\n");
798 return EINVAL;
799 }
800
801 zone_map_jetsam_limit = val;
802 return 0;
803 }
804
805 SYSCTL_PROC(_kern, OID_AUTO, zone_map_jetsam_limit, CTLTYPE_INT | CTLFLAG_RW, 0, 0,
806 sysctl_zone_map_jetsam_limit, "I", "Zone map jetsam limit");
807
808
809 extern void get_zone_map_size(uint64_t *current_size, uint64_t *capacity);
810
811 static int
812 sysctl_zone_map_size_and_capacity SYSCTL_HANDLER_ARGS
813 {
814 #pragma unused(oidp, arg1, arg2)
815 uint64_t zstats[2];
816 get_zone_map_size(&zstats[0], &zstats[1]);
817
818 return SYSCTL_OUT(req, &zstats, sizeof(zstats));
819 }
820
821 SYSCTL_PROC(_kern, OID_AUTO, zone_map_size_and_capacity,
822 CTLTYPE_QUAD | CTLFLAG_RD | CTLFLAG_MASKED | CTLFLAG_LOCKED,
823 0, 0, &sysctl_zone_map_size_and_capacity, "Q", "Current size and capacity of the zone map");
824
825
826 extern boolean_t run_zone_test(void);
827
828 static int
829 sysctl_run_zone_test SYSCTL_HANDLER_ARGS
830 {
831 #pragma unused(oidp, arg1, arg2)
832 /* require setting this sysctl to prevent sysctl -a from running this */
833 if (!req->newptr) {
834 return 0;
835 }
836
837 int ret_val = run_zone_test();
838 return SYSCTL_OUT(req, &ret_val, sizeof(ret_val));
839 }
840
841 SYSCTL_PROC(_kern, OID_AUTO, run_zone_test,
842 CTLTYPE_INT | CTLFLAG_WR | CTLFLAG_MASKED | CTLFLAG_LOCKED,
843 0, 0, &sysctl_run_zone_test, "I", "Test zone allocator KPI");
844
845 #endif /* DEBUG || DEVELOPMENT */
846
847 #if CONFIG_ZLEAKS
848
849 SYSCTL_DECL(_kern_zleak);
850 SYSCTL_NODE(_kern, OID_AUTO, zleak, CTLFLAG_RW | CTLFLAG_LOCKED, 0, "zleak");
851
852 /*
853 * kern.zleak.active
854 *
855 * Show the status of the zleak subsystem (0 = enabled, 1 = active,
856 * and -1 = failed), and if enabled, allow it to be activated immediately.
857 */
858 static int
859 sysctl_zleak_active SYSCTL_HANDLER_ARGS
860 {
861 #pragma unused(arg1, arg2)
862 int oldval, val, error;
863
864 val = oldval = get_zleak_state();
865 error = sysctl_handle_int(oidp, &val, 0, req);
866 if (error || !req->newptr) {
867 return error;
868 }
869 /*
870 * Can only be activated if it's off (and not failed.)
871 * Cannot be deactivated once it's on.
872 */
873 if (val == 1 && oldval == 0) {
874 kern_return_t kr = zleak_activate();
875
876 if (KERN_SUCCESS != kr) {
877 printf("zleak_active: failed to activate "
878 "live zone leak debugging (%d).\n", kr);
879 }
880 }
881 if (val == 0 && oldval == 1) {
882 printf("zleak_active: active, cannot be disabled.\n");
883 return EINVAL;
884 }
885 return 0;
886 }
887
888 SYSCTL_PROC(_kern_zleak, OID_AUTO, active,
889 CTLTYPE_INT | CTLFLAG_RW | CTLFLAG_LOCKED,
890 0, 0, sysctl_zleak_active, "I", "zleak activity");
891
892 /*
893 * kern.zleak.max_zonemap_size
894 *
895 * Read the value of the maximum zonemap size in bytes; useful
896 * as the maximum size that zleak.global_threshold and
897 * zleak.zone_threshold should be set to.
898 */
899 static int
900 sysctl_zleak_max_zonemap_size SYSCTL_HANDLER_ARGS
901 {
902 uint64_t zmap_max_size = *(vm_size_t *)arg1;
903
904 return sysctl_handle_quad(oidp, &zmap_max_size, arg2, req);
905 }
906
907 SYSCTL_PROC(_kern_zleak, OID_AUTO, max_zonemap_size,
908 CTLTYPE_QUAD | CTLFLAG_RD | CTLFLAG_LOCKED,
909 &zleak_max_zonemap_size, 0,
910 sysctl_zleak_max_zonemap_size, "Q", "zleak max zonemap size");
911
912
913 static int
914 sysctl_zleak_threshold SYSCTL_HANDLER_ARGS
915 {
916 #pragma unused(oidp, arg2)
917 int error;
918 uint64_t value = *(vm_size_t *)arg1;
919
920 error = sysctl_io_number(req, value, sizeof(value), &value, NULL);
921
922 if (error || !req->newptr) {
923 return error;
924 }
925
926 if (value > (uint64_t)zleak_max_zonemap_size) {
927 return ERANGE;
928 }
929
930 *(vm_size_t *)arg1 = value;
931 return 0;
932 }
933
934 /*
935 * kern.zleak.global_threshold
936 *
937 * Set the global zleak threshold size (in bytes). If the zone map
938 * grows larger than this value, zleaks are automatically activated.
939 *
940 * The default value is set in zleak_init().
941 */
942 SYSCTL_PROC(_kern_zleak, OID_AUTO, global_threshold,
943 CTLTYPE_QUAD | CTLFLAG_RW | CTLFLAG_LOCKED,
944 &zleak_global_tracking_threshold, 0,
945 sysctl_zleak_threshold, "Q", "zleak global threshold");
946
947 /*
948 * kern.zleak.zone_threshold
949 *
950 * Set the per-zone threshold size (in bytes) above which any
951 * zone will automatically start zleak tracking.
952 *
953 * The default value is set in zleak_init().
954 *
955 * Setting this variable will have no effect until zleak tracking is
956 * activated (See above.)
957 */
958 SYSCTL_PROC(_kern_zleak, OID_AUTO, zone_threshold,
959 CTLTYPE_QUAD | CTLFLAG_RW | CTLFLAG_LOCKED,
960 &zleak_per_zone_tracking_threshold, 0,
961 sysctl_zleak_threshold, "Q", "zleak per-zone threshold");
962
963 #endif /* CONFIG_ZLEAKS */
964
965 extern uint64_t get_zones_collectable_bytes(void);
966
967 static int
968 sysctl_zones_collectable_bytes SYSCTL_HANDLER_ARGS
969 {
970 #pragma unused(oidp, arg1, arg2)
971 uint64_t zones_free_mem = get_zones_collectable_bytes();
972
973 return SYSCTL_OUT(req, &zones_free_mem, sizeof(zones_free_mem));
974 }
975
976 SYSCTL_PROC(_kern, OID_AUTO, zones_collectable_bytes,
977 CTLTYPE_QUAD | CTLFLAG_RD | CTLFLAG_MASKED | CTLFLAG_LOCKED,
978 0, 0, &sysctl_zones_collectable_bytes, "Q", "Collectable memory in zones");