arch/powerpc/platforms/cell/pmu.c

   1 /*
   2  * Cell Broadband Engine Performance Monitor
   3  *
   4  * (C) Copyright IBM Corporation 2001,2006
   5  *
   6  * Author:
   7  *    David Erb (djerb@us.ibm.com)
   8  *    Kevin Corry (kevcorry@us.ibm.com)
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; either version 2, or (at your option)
  13  * any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; if not, write to the Free Software
  22  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  23  */
  24
  25 #include <linux/interrupt.h>
  26 #include <linux/types.h>
  27 #include <linux/export.h>
  28 #include <asm/io.h>
  29 #include <asm/irq_regs.h>
  30 #include <asm/machdep.h>
  31 #include <asm/pmc.h>
  32 #include <asm/reg.h>
  33 #include <asm/spu.h>
  34 #include <asm/cell-regs.h>
  35
  36 #include "interrupt.h"
  37
  38 /*
  39  * When writing to write-only mmio addresses, save a shadow copy. All of the
  40  * registers are 32-bit, but stored in the upper-half of a 64-bit field in
  41  * pmd_regs.
  42  */
  43
  44 #define WRITE_WO_MMIO(reg, x)                                   \
  45         do {                                                    \
  46                 u32 _x = (x);                                   \
  47                 struct cbe_pmd_regs __iomem *pmd_regs;          \
  48                 struct cbe_pmd_shadow_regs *shadow_regs;        \
  49                 pmd_regs = cbe_get_cpu_pmd_regs(cpu);           \
  50                 shadow_regs = cbe_get_cpu_pmd_shadow_regs(cpu); \
  51                 out_be64(&(pmd_regs->reg), (((u64)_x) << 32));  \
  52                 shadow_regs->reg = _x;                          \
  53         } while (0)
  54
  55 #define READ_SHADOW_REG(val, reg)                               \
  56         do {                                                    \
  57                 struct cbe_pmd_shadow_regs *shadow_regs;        \
  58                 shadow_regs = cbe_get_cpu_pmd_shadow_regs(cpu); \
  59                 (val) = shadow_regs->reg;                       \
  60         } while (0)
  61
  62 #define READ_MMIO_UPPER32(val, reg)                             \
  63         do {                                                    \
  64                 struct cbe_pmd_regs __iomem *pmd_regs;          \
  65                 pmd_regs = cbe_get_cpu_pmd_regs(cpu);           \
  66                 (val) = (u32)(in_be64(&pmd_regs->reg) >> 32);   \
  67         } while (0)
  68
  69 /*
  70  * Physical counter registers.
  71  * Each physical counter can act as one 32-bit counter or two 16-bit counters.
  72  */
  73
  74 u32 cbe_read_phys_ctr(u32 cpu, u32 phys_ctr)
  75 {
  76         u32 val_in_latch, val = 0;
  77
  78         if (phys_ctr < NR_PHYS_CTRS) {
  79                 READ_SHADOW_REG(val_in_latch, counter_value_in_latch);
  80
  81                 /* Read the latch or the actual counter, whichever is newer. */
  82                 if (val_in_latch & (1 << phys_ctr)) {
  83                         READ_SHADOW_REG(val, pm_ctr[phys_ctr]);
  84                 } else {
  85                         READ_MMIO_UPPER32(val, pm_ctr[phys_ctr]);
  86                 }
  87         }
  88
  89         return val;
  90 }
  91 EXPORT_SYMBOL_GPL(cbe_read_phys_ctr);
  92
  93 void cbe_write_phys_ctr(u32 cpu, u32 phys_ctr, u32 val)
  94 {
  95         struct cbe_pmd_shadow_regs *shadow_regs;
  96         u32 pm_ctrl;
  97
  98         if (phys_ctr < NR_PHYS_CTRS) {
  99                 /* Writing to a counter only writes to a hardware latch.
 100                  * The new value is not propagated to the actual counter
 101                  * until the performance monitor is enabled.
 102                  */
 103                 WRITE_WO_MMIO(pm_ctr[phys_ctr], val);
 104
 105                 pm_ctrl = cbe_read_pm(cpu, pm_control);
 106                 if (pm_ctrl & CBE_PM_ENABLE_PERF_MON) {
 107                         /* The counters are already active, so we need to
 108                          * rewrite the pm_control register to "re-enable"
 109                          * the PMU.
 110                          */
 111                         cbe_write_pm(cpu, pm_control, pm_ctrl);
 112                 } else {
 113                         shadow_regs = cbe_get_cpu_pmd_shadow_regs(cpu);
 114                         shadow_regs->counter_value_in_latch |= (1 << phys_ctr);
 115                 }
 116         }
 117 }
 118 EXPORT_SYMBOL_GPL(cbe_write_phys_ctr);
 119
 120 /*
 121  * "Logical" counter registers.
 122  * These will read/write 16-bits or 32-bits depending on the
 123  * current size of the counter. Counters 4 - 7 are always 16-bit.
 124  */
 125
 126 u32 cbe_read_ctr(u32 cpu, u32 ctr)
 127 {
 128         u32 val;
 129         u32 phys_ctr = ctr & (NR_PHYS_CTRS - 1);
 130
 131         val = cbe_read_phys_ctr(cpu, phys_ctr);
 132
 133         if (cbe_get_ctr_size(cpu, phys_ctr) == 16)
 134                 val = (ctr < NR_PHYS_CTRS) ? (val >> 16) : (val & 0xffff);
 135
 136         return val;
 137 }
 138 EXPORT_SYMBOL_GPL(cbe_read_ctr);
 139
 140 void cbe_write_ctr(u32 cpu, u32 ctr, u32 val)
 141 {
 142         u32 phys_ctr;
 143         u32 phys_val;
 144
 145         phys_ctr = ctr & (NR_PHYS_CTRS - 1);
 146
 147         if (cbe_get_ctr_size(cpu, phys_ctr) == 16) {
 148                 phys_val = cbe_read_phys_ctr(cpu, phys_ctr);
 149
 150                 if (ctr < NR_PHYS_CTRS)
 151                         val = (val << 16) | (phys_val & 0xffff);
 152                 else
 153                         val = (val & 0xffff) | (phys_val & 0xffff0000);
 154         }
 155
 156         cbe_write_phys_ctr(cpu, phys_ctr, val);
 157 }
 158 EXPORT_SYMBOL_GPL(cbe_write_ctr);
 159
 160 /*
 161  * Counter-control registers.
 162  * Each "logical" counter has a corresponding control register.
 163  */
 164
 165 u32 cbe_read_pm07_control(u32 cpu, u32 ctr)
 166 {
 167         u32 pm07_control = 0;
 168
 169         if (ctr < NR_CTRS)
 170                 READ_SHADOW_REG(pm07_control, pm07_control[ctr]);
 171
 172         return pm07_control;
 173 }
 174 EXPORT_SYMBOL_GPL(cbe_read_pm07_control);
 175
 176 void cbe_write_pm07_control(u32 cpu, u32 ctr, u32 val)
 177 {
 178         if (ctr < NR_CTRS)
 179                 WRITE_WO_MMIO(pm07_control[ctr], val);
 180 }
 181 EXPORT_SYMBOL_GPL(cbe_write_pm07_control);
 182
 183 /*
 184  * Other PMU control registers. Most of these are write-only.
 185  */
 186
 187 u32 cbe_read_pm(u32 cpu, enum pm_reg_name reg)
 188 {
 189         u32 val = 0;
 190
 191         switch (reg) {
 192         case group_control:
 193                 READ_SHADOW_REG(val, group_control);
 194                 break;
 195
 196         case debug_bus_control:
 197                 READ_SHADOW_REG(val, debug_bus_control);
 198                 break;
 199
 200         case trace_address:
 201                 READ_MMIO_UPPER32(val, trace_address);
 202                 break;
 203
 204         case ext_tr_timer:
 205                 READ_SHADOW_REG(val, ext_tr_timer);
 206                 break;
 207
 208         case pm_status:
 209                 READ_MMIO_UPPER32(val, pm_status);
 210                 break;
 211
 212         case pm_control:
 213                 READ_SHADOW_REG(val, pm_control);
 214                 break;
 215
 216         case pm_interval:
 217                 READ_MMIO_UPPER32(val, pm_interval);
 218                 break;
 219
 220         case pm_start_stop:
 221                 READ_SHADOW_REG(val, pm_start_stop);
 222                 break;
 223         }
 224
 225         return val;
 226 }
 227 EXPORT_SYMBOL_GPL(cbe_read_pm);
 228
 229 void cbe_write_pm(u32 cpu, enum pm_reg_name reg, u32 val)
 230 {
 231         switch (reg) {
 232         case group_control:
 233                 WRITE_WO_MMIO(group_control, val);
 234                 break;
 235
 236         case debug_bus_control:
 237                 WRITE_WO_MMIO(debug_bus_control, val);
 238                 break;
 239
 240         case trace_address:
 241                 WRITE_WO_MMIO(trace_address, val);
 242                 break;
 243
 244         case ext_tr_timer:
 245                 WRITE_WO_MMIO(ext_tr_timer, val);
 246                 break;
 247
 248         case pm_status:
 249                 WRITE_WO_MMIO(pm_status, val);
 250                 break;
 251
 252         case pm_control:
 253                 WRITE_WO_MMIO(pm_control, val);
 254                 break;
 255
 256         case pm_interval:
 257                 WRITE_WO_MMIO(pm_interval, val);
 258                 break;
 259
 260         case pm_start_stop:
 261                 WRITE_WO_MMIO(pm_start_stop, val);
 262                 break;
 263         }
 264 }
 265 EXPORT_SYMBOL_GPL(cbe_write_pm);
 266
 267 /*
 268  * Get/set the size of a physical counter to either 16 or 32 bits.
 269  */
 270
 271 u32 cbe_get_ctr_size(u32 cpu, u32 phys_ctr)
 272 {
 273         u32 pm_ctrl, size = 0;
 274
 275         if (phys_ctr < NR_PHYS_CTRS) {
 276                 pm_ctrl = cbe_read_pm(cpu, pm_control);
 277                 size = (pm_ctrl & CBE_PM_16BIT_CTR(phys_ctr)) ? 16 : 32;
 278         }
 279
 280         return size;
 281 }
 282 EXPORT_SYMBOL_GPL(cbe_get_ctr_size);
 283
 284 void cbe_set_ctr_size(u32 cpu, u32 phys_ctr, u32 ctr_size)
 285 {
 286         u32 pm_ctrl;
 287
 288         if (phys_ctr < NR_PHYS_CTRS) {
 289                 pm_ctrl = cbe_read_pm(cpu, pm_control);
 290                 switch (ctr_size) {
 291                 case 16:
 292                         pm_ctrl |= CBE_PM_16BIT_CTR(phys_ctr);
 293                         break;
 294
 295                 case 32:
 296                         pm_ctrl &= ~CBE_PM_16BIT_CTR(phys_ctr);
 297                         break;
 298                 }
 299                 cbe_write_pm(cpu, pm_control, pm_ctrl);
 300         }
 301 }
 302 EXPORT_SYMBOL_GPL(cbe_set_ctr_size);
 303
 304 /*
 305  * Enable/disable the entire performance monitoring unit.
 306  * When we enable the PMU, all pending writes to counters get committed.
 307  */
 308
 309 void cbe_enable_pm(u32 cpu)
 310 {
 311         struct cbe_pmd_shadow_regs *shadow_regs;
 312         u32 pm_ctrl;
 313
 314         shadow_regs = cbe_get_cpu_pmd_shadow_regs(cpu);
 315         shadow_regs->counter_value_in_latch = 0;
 316
 317         pm_ctrl = cbe_read_pm(cpu, pm_control) | CBE_PM_ENABLE_PERF_MON;
 318         cbe_write_pm(cpu, pm_control, pm_ctrl);
 319 }
 320 EXPORT_SYMBOL_GPL(cbe_enable_pm);
 321
 322 void cbe_disable_pm(u32 cpu)
 323 {
 324         u32 pm_ctrl;
 325         pm_ctrl = cbe_read_pm(cpu, pm_control) & ~CBE_PM_ENABLE_PERF_MON;
 326         cbe_write_pm(cpu, pm_control, pm_ctrl);
 327 }
 328 EXPORT_SYMBOL_GPL(cbe_disable_pm);
 329
 330 /*
 331  * Reading from the trace_buffer.
 332  * The trace buffer is two 64-bit registers. Reading from
 333  * the second half automatically increments the trace_address.
 334  */
 335
 336 void cbe_read_trace_buffer(u32 cpu, u64 *buf)
 337 {
 338         struct cbe_pmd_regs __iomem *pmd_regs = cbe_get_cpu_pmd_regs(cpu);
 339
 340         *buf++ = in_be64(&pmd_regs->trace_buffer_0_63);
 341         *buf++ = in_be64(&pmd_regs->trace_buffer_64_127);
 342 }
 343 EXPORT_SYMBOL_GPL(cbe_read_trace_buffer);
 344
 345 /*
 346  * Enabling/disabling interrupts for the entire performance monitoring unit.
 347  */
 348
 349 u32 cbe_get_and_clear_pm_interrupts(u32 cpu)
 350 {
 351         /* Reading pm_status clears the interrupt bits. */
 352         return cbe_read_pm(cpu, pm_status);
 353 }
 354 EXPORT_SYMBOL_GPL(cbe_get_and_clear_pm_interrupts);
 355
 356 void cbe_enable_pm_interrupts(u32 cpu, u32 thread, u32 mask)
 357 {
 358         /* Set which node and thread will handle the next interrupt. */
 359         iic_set_interrupt_routing(cpu, thread, 0);
 360
 361         /* Enable the interrupt bits in the pm_status register. */
 362         if (mask)
 363                 cbe_write_pm(cpu, pm_status, mask);
 364 }
 365 EXPORT_SYMBOL_GPL(cbe_enable_pm_interrupts);
 366
 367 void cbe_disable_pm_interrupts(u32 cpu)
 368 {
 369         cbe_get_and_clear_pm_interrupts(cpu);
 370         cbe_write_pm(cpu, pm_status, 0);
 371 }
 372 EXPORT_SYMBOL_GPL(cbe_disable_pm_interrupts);
 373
 374 static irqreturn_t cbe_pm_irq(int irq, void *dev_id)
 375 {
 376         perf_irq(get_irq_regs());
 377         return IRQ_HANDLED;
 378 }
 379
 380 static int __init cbe_init_pm_irq(void)
 381 {
 382         unsigned int irq;
 383         int rc, node;
 384
 385         for_each_node(node) {
 386                 irq = irq_create_mapping(NULL, IIC_IRQ_IOEX_PMI |
 387                                                (node << IIC_IRQ_NODE_SHIFT));
 388                 if (irq == NO_IRQ) {
 389                         printk("ERROR: Unable to allocate irq for node %d\n",
 390                                node);
 391                         return -EINVAL;
 392                 }
 393
 394                 rc = request_irq(irq, cbe_pm_irq,
 395                                  IRQF_DISABLED, "cbe-pmu-0", NULL);
 396                 if (rc) {
 397                         printk("ERROR: Request for irq on node %d failed\n",
 398                                node);
 399                         return rc;
 400                 }
 401         }
 402
 403         return 0;
 404 }
 405 machine_arch_initcall(cell, cbe_init_pm_irq);
 406
 407 void cbe_sync_irq(int node)
 408 {
 409         unsigned int irq;
 410
 411         irq = irq_find_mapping(NULL,
 412                                IIC_IRQ_IOEX_PMI
 413                                | (node << IIC_IRQ_NODE_SHIFT));
 414
 415         if (irq == NO_IRQ) {
 416                 printk(KERN_WARNING "ERROR, unable to get existing irq %d " \
 417                 "for node %d\n", irq, node);
 418                 return;
 419         }
 420
 421         synchronize_irq(irq);
 422 }
 423 EXPORT_SYMBOL_GPL(cbe_sync_irq);
 424