pt_sparcv9.c revision 2
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan/*
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * This file is part of PowerTOP
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan *
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * This program file is free software; you can redistribute it and/or modify it
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * under the terms of the GNU General Public License as published by the
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * Free Software Foundation; version 2 of the License.
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan *
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * This program is distributed in the hope that it will be useful, but WITHOUT
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * for more details.
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan *
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * You should have received a copy of the GNU General Public License
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * along with this program in a file named COPYING; if not, write to the
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * Free Software Foundation, Inc.,
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * 51 Franklin Street, Fifth Floor,
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * Boston, MA 02110-1301 USA
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan *
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * Authors:
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * Arjan van de Ven <arjan@linux.intel.com>
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * Eric C Saxe <eric.saxe@sun.com>
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * Aubrey Li <aubrey.li@intel.com>
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan */
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan/*
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * Copyright (c) 2009, Intel Corporation.
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * All Rights Reserved.
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan */
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan/*
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * Copyright (c) 2009, 2012, Oracle and/or its affiliates. All rights reserved.
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan */
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan/*
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * GPL Disclaimer
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan *
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * For the avoidance of doubt, except that if any license choice other
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * than GPL or LGPL is available it will apply instead, Sun elects to
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * use only the General Public License version 2 (GPLv2) at this time
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * for any software where a choice of GPL license versions is made
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * available with the language indicating that GPLv2 or any later
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * version may be used, or where a choice of which version of the GPL
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * is applied is otherwise unspecified.
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan */
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan/*
d380b9443b463cec3bc1bdb313452647858fd88btheAdib * DTrace scripts for observing interrupts, callouts and cyclic events
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * that cause CPU activity. Such activity prevents the processor from
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * entering lower power states and reducing power consumption.
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan *
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * g_dtp_events is the default script
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan */
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morganconst char *g_dtp_events =
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"interrupt-complete"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"/arg0 != NULL && arg3 !=0/"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"{"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" this->devi = (struct dev_info *)arg0;"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" @interrupts[stringof(`devnamesp[this->devi->devi_major].dn_name),"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" this->devi->devi_instance] = count();"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"}"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan""
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"sdt:::callout-start"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"/(caddr_t)((callout_t *)arg0)->c_func == (caddr_t)&`setrun/"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"{"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" this->thr = (kthread_t *)(((callout_t *)arg0)->c_arg);"
38e4ad89ca32c4c0a5bb2acae7e9b2e89ac210d1JazzyNico" @events_u[stringof(this->thr->t_procp->p_user.u_comm)] = count();"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"}"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan""
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"sdt:::callout-start"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"/(caddr_t)((callout_t *)arg0)->c_func != (caddr_t)&`setrun/"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"{"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" @events_k[(caddr_t)((callout_t *)arg0)->c_func] = count();"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"}"
d380b9443b463cec3bc1bdb313452647858fd88btheAdib""
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"sdt:::cyclic-start"
18d2737bb9a2e47325277e7916dea6c8a1363a1eSveinn í Felli"/(caddr_t)((cyclic_t *)arg0)->cy_handler == (caddr_t)&`clock/"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"{"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" @events_k[(caddr_t)((cyclic_t *)arg0)->cy_handler] = count();"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"}"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan""
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"fbt::xt_all:entry,"
d380b9443b463cec3bc1bdb313452647858fd88btheAdib"fbt::xc_all:entry"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"{"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" self->xc_func = arg0;"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"}"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan""
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"fbt::xt_one_unchecked:entry,"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"fbt::xt_some:entry,"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"fbt::xc_one:entry,"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"fbt::xc_some:entry"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"{"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" self->xc_func = arg1;"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"}"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan""
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"sysinfo:::xcalls"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"/pid != $pid/"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"{"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" @events_x[execname, self->xc_func] = sum(arg0);"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" self->xc_func = 0;"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"}";
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan
aea177a59b3bfda7bc8f6301cfd0c47326aa57c9JazzyNico/*
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * g_dtp_events_v is enabled through the -v option, it includes cyclic events
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan * in the report, allowing a complete view of system activity
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan */
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morganconst char *g_dtp_events_v =
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"interrupt-complete"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"/arg0 != NULL && arg3 !=0/"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"{"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" this->devi = (struct dev_info *)arg0;"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" @interrupts[stringof(`devnamesp[this->devi->devi_major].dn_name),"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan" this->devi->devi_instance] = count();"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"}"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan""
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"sdt:::callout-start"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"/(caddr_t)((callout_t *)arg0)->c_func == (caddr_t)&`setrun/"
c556b852adbbb75d16564cf48962727ac3b916b4Chris Morgan"{"
" this->thr = (kthread_t *)(((callout_t *)arg0)->c_arg);"
" @events_u[stringof(this->thr->t_procp->p_user.u_comm)] = count();"
"}"
""
"sdt:::callout-start"
"/(caddr_t)((callout_t *)arg0)->c_func != (caddr_t)&`setrun/"
"{"
" @events_k[(caddr_t)((callout_t *)arg0)->c_func] = count();"
"}"
""
"sdt:::cyclic-start"
"/(caddr_t)((cyclic_t *)arg0)->cy_handler != (caddr_t)&`dtrace_state_deadman &&"
" (caddr_t)((cyclic_t *)arg0)->cy_handler != (caddr_t)&`dtrace_state_clean/"
"{"
" @events_k[(caddr_t)((cyclic_t *)arg0)->cy_handler] = count();"
"}"
""
"fbt::xt_all:entry,"
"fbt::xc_all:entry"
"{"
" self->xc_func = arg0;"
"}"
""
"fbt::xt_one_unchecked:entry,"
"fbt::xt_some:entry,"
"fbt::xc_one:entry,"
"fbt::xc_some:entry"
"{"
" self->xc_func = arg1;"
"}"
""
"sysinfo:::xcalls"
"/pid != $pid/"
"{"
" @events_x[execname, self->xc_func] = sum(arg0);"
" self->xc_func = 0;"
"}";
/*
* This script is selected through the -c option, it takes the CPU id as
* argument and observes activity generated by that CPU
*/
const char *g_dtp_events_c =
"interrupt-complete"
"/cpu == $0 &&"
" arg0 != NULL && arg3 != 0/"
"{"
" this->devi = (struct dev_info *)arg0;"
" @interrupts[stringof(`devnamesp[this->devi->devi_major].dn_name),"
" this->devi->devi_instance] = count();"
"}"
""
"sdt:::callout-start"
"/cpu == $0 &&"
" (caddr_t)((callout_t *)arg0)->c_func == (caddr_t)&`setrun/"
"{"
" this->thr = (kthread_t *)(((callout_t *)arg0)->c_arg);"
" @events_u[stringof(this->thr->t_procp->p_user.u_comm)] = count();"
"}"
""
"sdt:::callout-start"
"/cpu == $0 &&"
" (caddr_t)((callout_t *)arg0)->c_func != (caddr_t)&`setrun/"
"{"
" @events_k[(caddr_t)((callout_t *)arg0)->c_func] = count();"
"}"
""
"sdt:::cyclic-start"
"/cpu == $0 &&"
" (caddr_t)((cyclic_t *)arg0)->cy_handler == (caddr_t)&`clock/"
"{"
" @events_k[(caddr_t)((cyclic_t *)arg0)->cy_handler] = count();"
"}"
""
/*
* xcalls to all CPUs. We're only interested in firings from other CPUs since
* the system doesn't xcall itself
*/
"fbt::xt_all:entry,"
"fbt::xc_all:entry"
"/pid != $pid &&"
" cpu != $0/"
"{"
" self->xc_func = arg0;"
" self->xc_cpu = cpu;"
" self->cpu_known = 1;"
"}"
""
/*
* xcalls to a subset of CPUs. No way of knowing if the observed CPU is in
* it, so account it in the generic @events_x aggregation. Again, we don't
* xcall the current CPU.
*/
"fbt::xt_some:entry,"
"fbt::xc_some:entry"
"/pid != $pid &&"
" cpu != $0/"
"{"
" self->xc_func = arg1;"
"}"
""
/*
* xcalls to a specific CPU, with all the necessary information
*/
"fbt::xt_one_unchecked:entry,"
"fbt::xc_one:entry"
"/arg0 == $0/"
"{"
" self->xc_func = arg1;"
" self->xc_cpu = arg0;"
" self->cpu_known = 1;"
"}"
""
"sysinfo:::xcalls"
"/pid != $pid &&"
" self->xc_func &&"
" !self->cpu_known/"
"{"
" @events_x[execname, self->xc_func] = sum(arg0);"
" self->xc_func = 0;"
"}"
""
"sysinfo:::xcalls"
"/pid != $pid &&"
" self->xc_func &&"
" self->cpu_known/"
"{"
" @events_xc[execname, self->xc_func, self->xc_cpu] = sum(arg0);"
" self->xc_func = 0;"
" self->xc_cpu = 0;"
" self->cpu_known = 0;"
"}";
/*
* sparcv9 platform specific display messages
*/
const char *g_msg_cstate = "Idle Power States";
const char *g_msg_pstate = "Frequency Levels";