4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
21 * Portions Copyright 2006-2008 John Birrell jb@freebsd.org
27 #include <sys/cdefs.h>
28 #include <sys/param.h>
29 #include <sys/systm.h>
31 #include <sys/ctype.h>
32 #include <sys/kernel.h>
33 #include <sys/malloc.h>
34 #include <sys/module.h>
36 #include <sys/dtrace.h>
37 #include <sys/dtrace_bsd.h>
39 extern bool dtrace_malloc_enabled;
40 static uint32_t dtrace_malloc_enabled_count;
42 static d_open_t dtmalloc_open;
43 static int dtmalloc_unload(void);
44 static void dtmalloc_getargdesc(void *, dtrace_id_t, void *, dtrace_argdesc_t *);
45 static void dtmalloc_provide(void *, dtrace_probedesc_t *);
46 static void dtmalloc_destroy(void *, dtrace_id_t, void *);
47 static void dtmalloc_enable(void *, dtrace_id_t, void *);
48 static void dtmalloc_disable(void *, dtrace_id_t, void *);
49 static void dtmalloc_load(void *);
51 static struct cdevsw dtmalloc_cdevsw = {
52 .d_version = D_VERSION,
53 .d_open = dtmalloc_open,
57 static dtrace_pattr_t dtmalloc_attr = {
58 { DTRACE_STABILITY_STABLE, DTRACE_STABILITY_STABLE, DTRACE_CLASS_COMMON },
59 { DTRACE_STABILITY_PRIVATE, DTRACE_STABILITY_PRIVATE, DTRACE_CLASS_UNKNOWN },
60 { DTRACE_STABILITY_PRIVATE, DTRACE_STABILITY_PRIVATE, DTRACE_CLASS_UNKNOWN },
61 { DTRACE_STABILITY_STABLE, DTRACE_STABILITY_STABLE, DTRACE_CLASS_COMMON },
62 { DTRACE_STABILITY_STABLE, DTRACE_STABILITY_STABLE, DTRACE_CLASS_COMMON },
65 static dtrace_pops_t dtmalloc_pops = {
66 .dtps_provide = dtmalloc_provide,
67 .dtps_provide_module = NULL,
68 .dtps_enable = dtmalloc_enable,
69 .dtps_disable = dtmalloc_disable,
72 .dtps_getargdesc = dtmalloc_getargdesc,
73 .dtps_getargval = NULL,
74 .dtps_usermode = NULL,
75 .dtps_destroy = dtmalloc_destroy
78 static struct cdev *dtmalloc_cdev;
79 static dtrace_provider_id_t dtmalloc_id;
82 dtmalloc_getargdesc(void *arg, dtrace_id_t id, void *parg, dtrace_argdesc_t *desc)
86 switch (desc->dtargd_ndx) {
88 p = "struct malloc_type *";
91 p = "struct malloc_type_internal *";
94 p = "struct malloc_type_stats *";
103 desc->dtargd_ndx = DTRACE_ARGNONE;
108 strlcpy(desc->dtargd_native, p, sizeof(desc->dtargd_native));
114 dtmalloc_type_cb(struct malloc_type *mtp, void *arg __unused)
116 char name[DTRACE_FUNCNAMELEN];
117 struct malloc_type_internal *mtip = mtp->ks_handle;
121 * malloc_type descriptions are allowed to contain whitespace, but
122 * DTrace probe identifiers are not, so replace the whitespace with
125 strlcpy(name, mtp->ks_shortdesc, sizeof(name));
126 for (i = 0; name[i] != 0; i++)
127 if (isspace(name[i]))
130 if (dtrace_probe_lookup(dtmalloc_id, NULL, name, "malloc") != 0)
133 (void) dtrace_probe_create(dtmalloc_id, NULL, name, "malloc", 0,
134 &mtip->mti_probes[DTMALLOC_PROBE_MALLOC]);
135 (void) dtrace_probe_create(dtmalloc_id, NULL, name, "free", 0,
136 &mtip->mti_probes[DTMALLOC_PROBE_FREE]);
140 dtmalloc_provide(void *arg, dtrace_probedesc_t *desc)
145 malloc_type_list(dtmalloc_type_cb, desc);
149 dtmalloc_destroy(void *arg, dtrace_id_t id, void *parg)
154 dtmalloc_enable(void *arg, dtrace_id_t id, void *parg)
158 dtrace_malloc_enabled_count++;
159 if (dtrace_malloc_enabled_count == 1)
160 dtrace_malloc_enabled = true;
164 dtmalloc_disable(void *arg, dtrace_id_t id, void *parg)
168 dtrace_malloc_enabled_count--;
169 if (dtrace_malloc_enabled_count == 0)
170 dtrace_malloc_enabled = false;
174 dtmalloc_load(void *dummy)
176 /* Create the /dev/dtrace/dtmalloc entry. */
177 dtmalloc_cdev = make_dev(&dtmalloc_cdevsw, 0, UID_ROOT, GID_WHEEL, 0600,
180 if (dtrace_register("dtmalloc", &dtmalloc_attr, DTRACE_PRIV_USER,
181 NULL, &dtmalloc_pops, NULL, &dtmalloc_id) != 0)
184 dtrace_malloc_probe = dtrace_probe;
193 dtrace_malloc_probe = NULL;
195 if ((error = dtrace_unregister(dtmalloc_id)) != 0)
198 destroy_dev(dtmalloc_cdev);
204 dtmalloc_modevent(module_t mod __unused, int type, void *data __unused)
228 dtmalloc_open(struct cdev *dev __unused, int oflags __unused, int devtype __unused, struct thread *td __unused)
233 SYSINIT(dtmalloc_load, SI_SUB_DTRACE_PROVIDER, SI_ORDER_ANY, dtmalloc_load, NULL);
234 SYSUNINIT(dtmalloc_unload, SI_SUB_DTRACE_PROVIDER, SI_ORDER_ANY, dtmalloc_unload, NULL);
236 DEV_MODULE(dtmalloc, dtmalloc_modevent, NULL);
237 MODULE_VERSION(dtmalloc, 1);
238 MODULE_DEPEND(dtmalloc, dtrace, 1, 1, 1);
239 MODULE_DEPEND(dtmalloc, opensolaris, 1, 1, 1);