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/special_insns.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 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(root, buf);
119
120		oprofilefs_create_ulong(dir, "enabled", &ctr[i].enabled);
121                oprofilefs_create_ulong(dir, "event", &ctr[i].event);
122		oprofilefs_create_ulong(dir, "count", &ctr[i].count);
123		/* Dummies.  */
124		oprofilefs_create_ulong(dir, "kernel", &ctr[i].kernel);
125		oprofilefs_create_ulong(dir, "user", &ctr[i].user);
126		oprofilefs_create_ulong(dir, "unit_mask", &ctr[i].unit_mask);
127	}
128
129	if (model->can_set_proc_mode) {
130		oprofilefs_create_ulong(root, "enable_pal",
131					&sys.enable_pal);
132		oprofilefs_create_ulong(root, "enable_kernel",
133					&sys.enable_kernel);
134		oprofilefs_create_ulong(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}