xref: /xnu-11417.121.6/bsd/dev/dtrace/scripts/sched.d (revision a1e26a70f38d1d7daa7b49b258e2f8538ad81650)
1*a1e26a70SApple OSS Distributions /*
2*a1e26a70SApple OSS Distributions  * Copyright (c) 2006-2008 Apple Computer, Inc.  All Rights Reserved.
3*a1e26a70SApple OSS Distributions  *
4*a1e26a70SApple OSS Distributions  * @APPLE_LICENSE_HEADER_START@
5*a1e26a70SApple OSS Distributions  *
6*a1e26a70SApple OSS Distributions  * This file contains Original Code and/or Modifications of Original Code
7*a1e26a70SApple OSS Distributions  * as defined in and that are subject to the Apple Public Source License
8*a1e26a70SApple OSS Distributions  * Version 2.0 (the 'License'). You may not use this file except in
9*a1e26a70SApple OSS Distributions  * compliance with the License. Please obtain a copy of the License at
10*a1e26a70SApple OSS Distributions  * http://www.opensource.apple.com/apsl/ and read it before using this
11*a1e26a70SApple OSS Distributions  * file.
12*a1e26a70SApple OSS Distributions  *
13*a1e26a70SApple OSS Distributions  * The Original Code and all software distributed under the License are
14*a1e26a70SApple OSS Distributions  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
15*a1e26a70SApple OSS Distributions  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
16*a1e26a70SApple OSS Distributions  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
17*a1e26a70SApple OSS Distributions  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
18*a1e26a70SApple OSS Distributions  * Please see the License for the specific language governing rights and
19*a1e26a70SApple OSS Distributions  * limitations under the License.
20*a1e26a70SApple OSS Distributions  *
21*a1e26a70SApple OSS Distributions  * @APPLE_LICENSE_HEADER_END@
22*a1e26a70SApple OSS Distributions  */
23*a1e26a70SApple OSS Distributions 
24*a1e26a70SApple OSS Distributions #pragma D depends_on library darwin.d
25*a1e26a70SApple OSS Distributions #pragma D depends_on module mach_kernel
26*a1e26a70SApple OSS Distributions #pragma D depends_on provider sched
27*a1e26a70SApple OSS Distributions 
28*a1e26a70SApple OSS Distributions struct _processor_info {
29*a1e26a70SApple OSS Distributions     int pi_state;           /* processor state, see above */
30*a1e26a70SApple OSS Distributions     char    pi_processor_type[32];  /* ASCII CPU type */
31*a1e26a70SApple OSS Distributions     char    pi_fputypes[32];    /* ASCII FPU types */
32*a1e26a70SApple OSS Distributions     int pi_clock;           /* CPU clock freq in MHz */
33*a1e26a70SApple OSS Distributions };
34*a1e26a70SApple OSS Distributions 
35*a1e26a70SApple OSS Distributions typedef struct _processor_info _processor_info_t;
36*a1e26a70SApple OSS Distributions 
37*a1e26a70SApple OSS Distributions typedef int chipid_t;
38*a1e26a70SApple OSS Distributions typedef int lgrp_id_t;
39*a1e26a70SApple OSS Distributions 
40*a1e26a70SApple OSS Distributions struct cpuinfo {
41*a1e26a70SApple OSS Distributions 	processorid_t cpu_id;		/* CPU identifier */
42*a1e26a70SApple OSS Distributions 	psetid_t cpu_pset;		/* processor set identifier */
43*a1e26a70SApple OSS Distributions 	chipid_t cpu_chip;		/* chip identifier */
44*a1e26a70SApple OSS Distributions 	lgrp_id_t cpu_lgrp;		/* locality group identifer */
45*a1e26a70SApple OSS Distributions 	_processor_info_t cpu_info;	/* CPU information */
46*a1e26a70SApple OSS Distributions };
47*a1e26a70SApple OSS Distributions 
48*a1e26a70SApple OSS Distributions typedef struct cpuinfo cpuinfo_t;
49*a1e26a70SApple OSS Distributions 
50*a1e26a70SApple OSS Distributions translator cpuinfo_t < processor_t P > {
51*a1e26a70SApple OSS Distributions 	cpu_id = P->cpu_id;
52*a1e26a70SApple OSS Distributions 	cpu_pset = -1; /* Darwin does not partition processors. */
53*a1e26a70SApple OSS Distributions 	cpu_chip = P->cpu_id; /* XXX */
54*a1e26a70SApple OSS Distributions 	cpu_lgrp = 0; /* XXX */
55*a1e26a70SApple OSS Distributions 	cpu_info = *((_processor_info_t *)`dtrace_zero); /* ` */ /* XXX */
56*a1e26a70SApple OSS Distributions };
57*a1e26a70SApple OSS Distributions 
58*a1e26a70SApple OSS Distributions inline cpuinfo_t *curcpu = xlate <cpuinfo_t *> (curthread->last_processor);
59*a1e26a70SApple OSS Distributions #pragma D attributes Stable/Stable/Common curcpu
60*a1e26a70SApple OSS Distributions #pragma D binding "1.0" curcpu
61*a1e26a70SApple OSS Distributions 
62*a1e26a70SApple OSS Distributions /*
63*a1e26a70SApple OSS Distributions  * XXX: 'cpu' is now a built-in variable in dtrace.
64*a1e26a70SApple OSS Distributions  */
65*a1e26a70SApple OSS Distributions 
66*a1e26a70SApple OSS Distributions inline psetid_t pset = curcpu->cpu_pset;
67*a1e26a70SApple OSS Distributions #pragma D attributes Stable/Stable/Common pset
68*a1e26a70SApple OSS Distributions #pragma D binding "1.0" pset
69*a1e26a70SApple OSS Distributions 
70*a1e26a70SApple OSS Distributions inline chipid_t chip = curcpu->cpu_chip;
71*a1e26a70SApple OSS Distributions #pragma D attributes Stable/Stable/Common chip
72*a1e26a70SApple OSS Distributions #pragma D binding "1.0" chip
73*a1e26a70SApple OSS Distributions 
74*a1e26a70SApple OSS Distributions inline lgrp_id_t lgrp = curcpu->cpu_lgrp;
75*a1e26a70SApple OSS Distributions #pragma D attributes Stable/Stable/Common lgrp
76*a1e26a70SApple OSS Distributions #pragma D binding "1.0" lgrp
77*a1e26a70SApple OSS Distributions 
78