xref: /netbsd-src/external/cddl/osnet/lib/libdtrace/sched.d (revision ba2539a9805a0544ff82c0003cc02fe1eee5603d)
1 /*	$NetBSD: sched.d,v 1.3 2018/05/28 21:05:09 chs Exp $	*/
2 
3 /*
4  * CDDL HEADER START
5  *
6  * The contents of this file are subject to the terms of the
7  * Common Development and Distribution License (the "License").
8  * You may not use this file except in compliance with the License.
9  *
10  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
11  * or http://www.opensolaris.org/os/licensing.
12  * See the License for the specific language governing permissions
13  * and limitations under the License.
14  *
15  * When distributing Covered Code, include this CDDL HEADER in each
16  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
17  * If applicable, add the following below this CDDL HEADER, with the
18  * fields enclosed by brackets "[]" replaced with your own identifying
19  * information: Portions Copyright [yyyy] [name of copyright owner]
20  *
21  * CDDL HEADER END
22  *
23  * Portions Copyright 2006-2008 John Birrell jb@freebsd.org
24  *
25  * $FreeBSD: head/cddl/lib/libdtrace/sched.d 286420 2015-08-07 19:56:22Z markj $
26  */
27 /*
28  * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
29  * Use is subject to license terms.
30  */
31 
32 #pragma D depends_on module unix
33 #pragma D depends_on provider sched
34 
35 struct cpuinfo {
36 	processorid_t cpu_id;		/* CPU identifier */
37 	psetid_t cpu_pset;		/* processor set identifier */
38 	chipid_t cpu_chip;		/* chip identifier */
39 	lgrp_id_t cpu_lgrp;		/* locality group identifer */
40 	processor_info_t cpu_info;	/* CPU information */
41 };
42 
43 typedef struct cpuinfo cpuinfo_t;
44 
45 translator cpuinfo_t < cpu_t *C > {
46 	cpu_id = C->cpu_id;
47 	cpu_pset = C->cpu_part->cp_id;
48 	cpu_chip = C->cpu_physid->cpu_chipid;
49 	cpu_lgrp = C->cpu_lpl->lpl_lgrpid;
50 	cpu_info = (processor_info_t)C->cpu_type_info;
51 };
52 
53 translator cpuinfo_t < disp_t *D > {
54 	cpu_id = D->disp_cpu == NULL ? -1 :
55 	    xlate <cpuinfo_t> (D->disp_cpu).cpu_id;
56 	cpu_pset = D->disp_cpu == NULL ? -1 :
57 	    xlate <cpuinfo_t> (D->disp_cpu).cpu_pset;
58 	cpu_chip = D->disp_cpu == NULL ? -1 :
59 	    xlate <cpuinfo_t> (D->disp_cpu).cpu_chip;
60 	cpu_lgrp = D->disp_cpu == NULL ? -1 :
61 	    xlate <cpuinfo_t> (D->disp_cpu).cpu_lgrp;
62 	cpu_info = D->disp_cpu == NULL ?
63 	    *((processor_info_t *)dtrace`dtrace_zero) :
64 	    (processor_info_t)xlate <cpuinfo_t> (D->disp_cpu).cpu_info;
65 };
66 
67 inline cpuinfo_t *curcpu = xlate <cpuinfo_t *> (curthread->t_cpu);
68 #pragma D attributes Stable/Stable/Common curcpu
69 #pragma D binding "1.0" curcpu
70 
71 inline processorid_t cpu = curcpu->cpu_id;
72 #pragma D attributes Stable/Stable/Common cpu
73 #pragma D binding "1.0" cpu
74 
75 inline psetid_t pset = curcpu->cpu_pset;
76 #pragma D attributes Stable/Stable/Common pset
77 #pragma D binding "1.0" pset
78 
79 inline chipid_t chip = curcpu->cpu_chip;
80 #pragma D attributes Stable/Stable/Common chip
81 #pragma D binding "1.0" chip
82 
83 inline lgrp_id_t lgrp = curcpu->cpu_lgrp;
84 #pragma D attributes Stable/Stable/Common lgrp
85 #pragma D binding "1.0" lgrp
86 
87