1
2
3
4
5
6
7
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
35
36static void
37op_handle_interrupt(unsigned long which, struct pt_regs *regs)
38{
39 model->handle_interrupt(which, regs, ctr);
40
41
42
43
44
45 if ((reg.need_reset >> which) & 1)
46 model->reset_ctr(®, which);
47}
48
49static int
50op_axp_setup(void)
51{
52 unsigned long i, e;
53
54
55 save_perf_irq = perf_irq;
56 perf_irq = op_handle_interrupt;
57
58
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
65 model->reg_setup(®, ctr, &sys);
66
67
68 smp_call_function(model->cpu_setup, ®, 1);
69 model->cpu_setup(®);
70 return 0;
71}
72
73static void
74op_axp_shutdown(void)
75{
76
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 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
98 wrperfmon(0, -1);
99}
100
101static void
102op_axp_stop(void)
103{
104 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
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
152
153 if (!amask(AMASK_MAX))
154 lmodel = &op_model_pca56;
155 else
156 lmodel = &op_model_ev5;
157 break;
158 case IMPLVER_EV6:
159
160
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