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