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