linux/arch/alpha/oprofile/common.c
<<
>>
Prefs
   1/**
   2 * @file arch/alpha/oprofile/common.c
   3 *
   4 * @remark Copyright 2002 OProfile authors
   5 * @remark Read the file COPYING
   6 *
   7 * @author Richard Henderson <rth@twiddle.net>
   8 */
   9
  10#include <linux/oprofile.h>
  11#include <linux/init.h>
  12#include <linux/smp.h>
  13#include <linux/errno.h>
  14#include <asm/ptrace.h>
  15#include <asm/system.h>
  16
  17#include "op_impl.h"
  18
  19extern struct op_axp_model op_model_ev4 __attribute__((weak));
  20extern struct op_axp_model op_model_ev5 __attribute__((weak));
  21extern struct op_axp_model op_model_pca56 __attribute__((weak));
  22extern struct op_axp_model op_model_ev6 __attribute__((weak));
  23extern struct op_axp_model op_model_ev67 __attribute__((weak));
  24
  25static struct op_axp_model *model;
  26
  27extern void (*perf_irq)(unsigned long, struct pt_regs *);
  28static void (*save_perf_irq)(unsigned long, struct pt_regs *);
  29
  30static struct op_counter_config ctr[20];
  31static struct op_system_config sys;
  32static struct op_register_config reg;
  33
  34/* Called from do_entInt to handle the performance monitor interrupt.  */
  35
  36static void
  37op_handle_interrupt(unsigned long which, struct pt_regs *regs)
  38{
  39        model->handle_interrupt(which, regs, ctr);
  40
  41        /* If the user has selected an interrupt frequency that is
  42           not exactly the width of the counter, write a new value
  43           into the counter such that it'll overflow after N more
  44           events.  */
  45        if ((reg.need_reset >> which) & 1)
  46                model->reset_ctr(&reg, which);
  47}
  48 
  49static int
  50op_axp_setup(void)
  51{
  52        unsigned long i, e;
  53
  54        /* Install our interrupt handler into the existing hook.  */
  55        save_perf_irq = perf_irq;
  56        perf_irq = op_handle_interrupt;
  57
  58        /* Compute the mask of enabled counters.  */
  59        for (i = e = 0; i < model->num_counters; ++i)
  60                if (ctr[i].enabled)
  61                        e |= 1 << i;
  62        reg.enable = e;
  63
  64        /* Pre-compute the values to stuff in the hardware registers.  */
  65        model->reg_setup(&reg, ctr, &sys);
  66
  67        /* Configure the registers on all cpus.  */
  68        (void)smp_call_function(model->cpu_setup, &reg, 1);
  69        model->cpu_setup(&reg);
  70        return 0;
  71}
  72
  73static void
  74op_axp_shutdown(void)
  75{
  76        /* Remove our interrupt handler.  We may be removing this module.  */
  77        perf_irq = save_perf_irq;
  78}
  79
  80static void
  81op_axp_cpu_start(void *dummy)
  82{
  83        wrperfmon(1, reg.enable);
  84}
  85
  86static int
  87op_axp_start(void)
  88{
  89        (void)smp_call_function(op_axp_cpu_start, NULL, 1);
  90        op_axp_cpu_start(NULL);
  91        return 0;
  92}
  93
  94static inline void
  95op_axp_cpu_stop(void *dummy)
  96{
  97        /* Disable performance monitoring for all counters.  */
  98        wrperfmon(0, -1);
  99}
 100
 101static void
 102op_axp_stop(void)
 103{
 104        (void)smp_call_function(op_axp_cpu_stop, NULL, 1);
 105        op_axp_cpu_stop(NULL);
 106}
 107
 108static int
 109op_axp_create_files(struct super_block * sb, struct dentry * root)
 110{
 111        int i;
 112
 113        for (i = 0; i < model->num_counters; ++i) {
 114                struct dentry *dir;
 115                char buf[4];
 116
 117                snprintf(buf, sizeof buf, "%d", i);
 118                dir = oprofilefs_mkdir(sb, root, buf);
 119
 120                oprofilefs_create_ulong(sb, dir, "enabled", &ctr[i].enabled);
 121                oprofilefs_create_ulong(sb, dir, "event", &ctr[i].event);
 122                oprofilefs_create_ulong(sb, dir, "count", &ctr[i].count);
 123                /* Dummies.  */
 124                oprofilefs_create_ulong(sb, dir, "kernel", &ctr[i].kernel);
 125                oprofilefs_create_ulong(sb, dir, "user", &ctr[i].user);
 126                oprofilefs_create_ulong(sb, dir, "unit_mask", &ctr[i].unit_mask);
 127        }
 128
 129        if (model->can_set_proc_mode) {
 130                oprofilefs_create_ulong(sb, root, "enable_pal",
 131                                        &sys.enable_pal);
 132                oprofilefs_create_ulong(sb, root, "enable_kernel",
 133                                        &sys.enable_kernel);
 134                oprofilefs_create_ulong(sb, root, "enable_user",
 135                                        &sys.enable_user);
 136        }
 137
 138        return 0;
 139}
 140
 141int __init
 142oprofile_arch_init(struct oprofile_operations *ops)
 143{
 144        struct op_axp_model *lmodel = NULL;
 145
 146        switch (implver()) {
 147        case IMPLVER_EV4:
 148                lmodel = &op_model_ev4;
 149                break;
 150        case IMPLVER_EV5:
 151                /* 21164PC has a slightly different set of events.
 152                   Recognize the chip by the presence of the MAX insns.  */
 153                if (!amask(AMASK_MAX))
 154                        lmodel = &op_model_pca56;
 155                else
 156                        lmodel = &op_model_ev5;
 157                break;
 158        case IMPLVER_EV6:
 159                /* 21264A supports ProfileMe.
 160                   Recognize the chip by the presence of the CIX insns.  */
 161                if (!amask(AMASK_CIX))
 162                        lmodel = &op_model_ev67;
 163                else
 164                        lmodel = &op_model_ev6;
 165                break;
 166        }
 167
 168        if (!lmodel)
 169                return -ENODEV;
 170        model = lmodel;
 171
 172        ops->create_files = op_axp_create_files;
 173        ops->setup = op_axp_setup;
 174        ops->shutdown = op_axp_shutdown;
 175        ops->start = op_axp_start;
 176        ops->stop = op_axp_stop;
 177        ops->cpu_type = lmodel->cpu_type;
 178
 179        printk(KERN_INFO "oprofile: using %s performance monitoring.\n",
 180               lmodel->cpu_type);
 181
 182        return 0;
 183}
 184
 185
 186void
 187oprofile_arch_exit(void)
 188{
 189}
 190