bsd/dev/dtrace/scripts/sched.d

   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