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