blob: 7c8ab423abe362e624401d8cf43ae740954c77bd [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * Machine check handler.
3 * K8 parts Copyright 2002,2003 Andi Kleen, SuSE Labs.
4 * Rest from unknown author(s).
5 * 2004 Andi Kleen. Rewrote most of it.
6 */
7
8#include <linux/init.h>
9#include <linux/types.h>
10#include <linux/kernel.h>
11#include <linux/sched.h>
12#include <linux/string.h>
13#include <linux/rcupdate.h>
14#include <linux/kallsyms.h>
15#include <linux/sysdev.h>
16#include <linux/miscdevice.h>
17#include <linux/fs.h>
Randy Dunlapa9415642006-01-11 12:17:48 -080018#include <linux/capability.h>
Andi Kleen91c6d402005-07-28 21:15:39 -070019#include <linux/cpu.h>
20#include <linux/percpu.h>
Tim Hockine02e68d2007-07-21 17:10:36 +020021#include <linux/poll.h>
22#include <linux/thread_info.h>
Andi Kleen8c566ef2005-09-12 18:49:24 +020023#include <linux/ctype.h>
Andi Kleena98f0dd2007-02-13 13:26:23 +010024#include <linux/kmod.h>
Christoph Hellwig1eeb66a2007-05-08 00:27:03 -070025#include <linux/kdebug.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070026#include <asm/processor.h>
27#include <asm/msr.h>
28#include <asm/mce.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070029#include <asm/uaccess.h>
Andi Kleen0a9c3ee2006-01-11 22:46:54 +010030#include <asm/smp.h>
Tim Hockine02e68d2007-07-21 17:10:36 +020031#include <asm/idle.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070032
33#define MISC_MCELOG_MINOR 227
Shaohua Li73ca5352006-01-11 22:43:06 +010034#define NR_BANKS 6
Linus Torvalds1da177e2005-04-16 15:20:36 -070035
Andi Kleen553f2652006-04-07 19:49:57 +020036atomic_t mce_entry;
37
Linus Torvalds1da177e2005-04-16 15:20:36 -070038static int mce_dont_init;
39
Tim Hockinbd784322007-07-21 17:10:37 +020040/*
41 * Tolerant levels:
42 * 0: always panic on uncorrected errors, log corrected errors
43 * 1: panic or SIGBUS on uncorrected errors, log corrected errors
44 * 2: SIGBUS or log uncorrected errors (if possible), log corrected errors
45 * 3: never panic or SIGBUS, log all errors (for testing only)
46 */
Linus Torvalds1da177e2005-04-16 15:20:36 -070047static int tolerant = 1;
48static int banks;
49static unsigned long bank[NR_BANKS] = { [0 ... NR_BANKS-1] = ~0UL };
Tim Hockine02e68d2007-07-21 17:10:36 +020050static unsigned long notify_user;
Andi Kleen94ad8472005-04-16 15:25:09 -070051static int rip_msr;
Andi Kleene5835382005-11-05 17:25:54 +010052static int mce_bootlog = 1;
Andi Kleena98f0dd2007-02-13 13:26:23 +010053static atomic_t mce_events;
54
55static char trigger[128];
56static char *trigger_argv[2] = { trigger, NULL };
Linus Torvalds1da177e2005-04-16 15:20:36 -070057
Tim Hockine02e68d2007-07-21 17:10:36 +020058static DECLARE_WAIT_QUEUE_HEAD(mce_wait);
59
Linus Torvalds1da177e2005-04-16 15:20:36 -070060/*
61 * Lockless MCE logging infrastructure.
62 * This avoids deadlocks on printk locks without having to break locks. Also
63 * separate MCEs from kernel messages to avoid bogus bug reports.
64 */
65
66struct mce_log mcelog = {
67 MCE_LOG_SIGNATURE,
68 MCE_LOG_LEN,
69};
70
71void mce_log(struct mce *mce)
72{
73 unsigned next, entry;
Andi Kleena98f0dd2007-02-13 13:26:23 +010074 atomic_inc(&mce_events);
Linus Torvalds1da177e2005-04-16 15:20:36 -070075 mce->finished = 0;
Mike Waychison76441432005-09-30 00:01:27 +020076 wmb();
Linus Torvalds1da177e2005-04-16 15:20:36 -070077 for (;;) {
78 entry = rcu_dereference(mcelog.next);
Mike Waychison76441432005-09-30 00:01:27 +020079 /* The rmb forces the compiler to reload next in each
80 iteration */
81 rmb();
Andi Kleen673242c2005-09-12 18:49:24 +020082 for (;;) {
83 /* When the buffer fills up discard new entries. Assume
84 that the earlier errors are the more interesting. */
85 if (entry >= MCE_LOG_LEN) {
86 set_bit(MCE_OVERFLOW, &mcelog.flags);
87 return;
88 }
89 /* Old left over entry. Skip. */
90 if (mcelog.entry[entry].finished) {
91 entry++;
92 continue;
93 }
Mike Waychison76441432005-09-30 00:01:27 +020094 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -070095 }
Linus Torvalds1da177e2005-04-16 15:20:36 -070096 smp_rmb();
97 next = entry + 1;
98 if (cmpxchg(&mcelog.next, entry, next) == entry)
99 break;
100 }
101 memcpy(mcelog.entry + entry, mce, sizeof(struct mce));
Mike Waychison76441432005-09-30 00:01:27 +0200102 wmb();
Linus Torvalds1da177e2005-04-16 15:20:36 -0700103 mcelog.entry[entry].finished = 1;
Mike Waychison76441432005-09-30 00:01:27 +0200104 wmb();
Linus Torvalds1da177e2005-04-16 15:20:36 -0700105
Tim Hockine02e68d2007-07-21 17:10:36 +0200106 set_bit(0, &notify_user);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700107}
108
109static void print_mce(struct mce *m)
110{
111 printk(KERN_EMERG "\n"
Andi Kleen48551702006-01-11 22:44:48 +0100112 KERN_EMERG "HARDWARE ERROR\n"
Linus Torvalds1da177e2005-04-16 15:20:36 -0700113 KERN_EMERG
114 "CPU %d: Machine Check Exception: %16Lx Bank %d: %016Lx\n",
115 m->cpu, m->mcgstatus, m->bank, m->status);
116 if (m->rip) {
117 printk(KERN_EMERG
118 "RIP%s %02x:<%016Lx> ",
119 !(m->mcgstatus & MCG_STATUS_EIPV) ? " !INEXACT!" : "",
120 m->cs, m->rip);
121 if (m->cs == __KERNEL_CS)
122 print_symbol("{%s}", m->rip);
123 printk("\n");
124 }
125 printk(KERN_EMERG "TSC %Lx ", m->tsc);
126 if (m->addr)
127 printk("ADDR %Lx ", m->addr);
128 if (m->misc)
129 printk("MISC %Lx ", m->misc);
130 printk("\n");
Andi Kleen48551702006-01-11 22:44:48 +0100131 printk(KERN_EMERG "This is not a software problem!\n");
132 printk(KERN_EMERG
133 "Run through mcelog --ascii to decode and contact your hardware vendor\n");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700134}
135
136static void mce_panic(char *msg, struct mce *backup, unsigned long start)
137{
138 int i;
Tim Hockine02e68d2007-07-21 17:10:36 +0200139
Linus Torvalds1da177e2005-04-16 15:20:36 -0700140 oops_begin();
141 for (i = 0; i < MCE_LOG_LEN; i++) {
142 unsigned long tsc = mcelog.entry[i].tsc;
143 if (time_before(tsc, start))
144 continue;
145 print_mce(&mcelog.entry[i]);
146 if (backup && mcelog.entry[i].tsc == backup->tsc)
147 backup = NULL;
148 }
149 if (backup)
150 print_mce(backup);
Tim Hockine02e68d2007-07-21 17:10:36 +0200151 panic(msg);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700152}
153
154static int mce_available(struct cpuinfo_x86 *c)
155{
Akinobu Mita3d1712c2006-03-24 03:15:11 -0800156 return cpu_has(c, X86_FEATURE_MCE) && cpu_has(c, X86_FEATURE_MCA);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700157}
158
Andi Kleen94ad8472005-04-16 15:25:09 -0700159static inline void mce_get_rip(struct mce *m, struct pt_regs *regs)
160{
161 if (regs && (m->mcgstatus & MCG_STATUS_RIPV)) {
162 m->rip = regs->rip;
163 m->cs = regs->cs;
164 } else {
165 m->rip = 0;
166 m->cs = 0;
167 }
168 if (rip_msr) {
169 /* Assume the RIP in the MSR is exact. Is this true? */
170 m->mcgstatus |= MCG_STATUS_EIPV;
171 rdmsrl(rip_msr, m->rip);
172 m->cs = 0;
173 }
174}
175
Linus Torvalds1da177e2005-04-16 15:20:36 -0700176/*
177 * The actual machine check handler
178 */
179
180void do_machine_check(struct pt_regs * regs, long error_code)
181{
182 struct mce m, panicm;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700183 u64 mcestart = 0;
184 int i;
185 int panicm_found = 0;
Tim Hockinbd784322007-07-21 17:10:37 +0200186 /*
187 * If no_way_out gets set, there is no safe way to recover from this
188 * MCE. If tolerant is cranked up, we'll try anyway.
189 */
190 int no_way_out = 0;
191 /*
192 * If kill_it gets set, there might be a way to recover from this
193 * error.
194 */
195 int kill_it = 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700196
Andi Kleen553f2652006-04-07 19:49:57 +0200197 atomic_inc(&mce_entry);
198
Linus Torvalds1da177e2005-04-16 15:20:36 -0700199 if (regs)
Jan Beulich6e3f3612006-01-11 22:42:14 +0100200 notify_die(DIE_NMI, "machine check", regs, error_code, 18, SIGKILL);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700201 if (!banks)
Andi Kleen553f2652006-04-07 19:49:57 +0200202 goto out2;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700203
204 memset(&m, 0, sizeof(struct mce));
Andi Kleen151f8cc2006-09-26 10:52:37 +0200205 m.cpu = smp_processor_id();
Linus Torvalds1da177e2005-04-16 15:20:36 -0700206 rdmsrl(MSR_IA32_MCG_STATUS, m.mcgstatus);
Tim Hockinbd784322007-07-21 17:10:37 +0200207 /* if the restart IP is not valid, we're done for */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700208 if (!(m.mcgstatus & MCG_STATUS_RIPV))
Tim Hockinbd784322007-07-21 17:10:37 +0200209 no_way_out = 1;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700210
211 rdtscll(mcestart);
212 barrier();
213
214 for (i = 0; i < banks; i++) {
215 if (!bank[i])
216 continue;
217
218 m.misc = 0;
219 m.addr = 0;
220 m.bank = i;
221 m.tsc = 0;
222
223 rdmsrl(MSR_IA32_MC0_STATUS + i*4, m.status);
224 if ((m.status & MCI_STATUS_VAL) == 0)
225 continue;
226
227 if (m.status & MCI_STATUS_EN) {
Tim Hockinbd784322007-07-21 17:10:37 +0200228 /* if PCC was set, there's no way out */
229 no_way_out |= !!(m.status & MCI_STATUS_PCC);
230 /*
231 * If this error was uncorrectable and there was
232 * an overflow, we're in trouble. If no overflow,
233 * we might get away with just killing a task.
234 */
235 if (m.status & MCI_STATUS_UC) {
236 if (tolerant < 1 || m.status & MCI_STATUS_OVER)
237 no_way_out = 1;
238 kill_it = 1;
239 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700240 }
241
242 if (m.status & MCI_STATUS_MISCV)
243 rdmsrl(MSR_IA32_MC0_MISC + i*4, m.misc);
244 if (m.status & MCI_STATUS_ADDRV)
245 rdmsrl(MSR_IA32_MC0_ADDR + i*4, m.addr);
246
Andi Kleen94ad8472005-04-16 15:25:09 -0700247 mce_get_rip(&m, regs);
Andi Kleend5172f22005-08-07 09:42:07 -0700248 if (error_code >= 0)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700249 rdtscll(m.tsc);
Andi Kleend5172f22005-08-07 09:42:07 -0700250 if (error_code != -2)
251 mce_log(&m);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700252
253 /* Did this bank cause the exception? */
254 /* Assume that the bank with uncorrectable errors did it,
255 and that there is only a single one. */
256 if ((m.status & MCI_STATUS_UC) && (m.status & MCI_STATUS_EN)) {
257 panicm = m;
258 panicm_found = 1;
259 }
260
Randy Dunlap9f158332005-09-13 01:25:16 -0700261 add_taint(TAINT_MACHINE_CHECK);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700262 }
263
264 /* Never do anything final in the polling timer */
Tim Hockine02e68d2007-07-21 17:10:36 +0200265 if (!regs)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700266 goto out;
267
268 /* If we didn't find an uncorrectable error, pick
269 the last one (shouldn't happen, just being safe). */
270 if (!panicm_found)
271 panicm = m;
Tim Hockinbd784322007-07-21 17:10:37 +0200272
273 /*
274 * If we have decided that we just CAN'T continue, and the user
275 * has not set tolerant to an insane level, give up and die.
276 */
277 if (no_way_out && tolerant < 3)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700278 mce_panic("Machine check", &panicm, mcestart);
Tim Hockinbd784322007-07-21 17:10:37 +0200279
280 /*
281 * If the error seems to be unrecoverable, something should be
282 * done. Try to kill as little as possible. If we can kill just
283 * one task, do that. If the user has set the tolerance very
284 * high, don't try to do anything at all.
285 */
286 if (kill_it && tolerant < 3) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700287 int user_space = 0;
288
Tim Hockinbd784322007-07-21 17:10:37 +0200289 /*
290 * If the EIPV bit is set, it means the saved IP is the
291 * instruction which caused the MCE.
292 */
293 if (m.mcgstatus & MCG_STATUS_EIPV)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700294 user_space = panicm.rip && (panicm.cs & 3);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700295
Tim Hockinbd784322007-07-21 17:10:37 +0200296 /*
297 * If we know that the error was in user space, send a
298 * SIGBUS. Otherwise, panic if tolerance is low.
299 *
300 * do_exit() takes an awful lot of locks and has a slight
301 * risk of deadlocking.
302 */
303 if (user_space) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700304 do_exit(SIGBUS);
Tim Hockinbd784322007-07-21 17:10:37 +0200305 } else if (panic_on_oops || tolerant < 2) {
306 mce_panic("Uncorrected machine check",
307 &panicm, mcestart);
308 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700309 }
310
Tim Hockine02e68d2007-07-21 17:10:36 +0200311 /* notify userspace ASAP */
312 set_thread_flag(TIF_MCE_NOTIFY);
313
Linus Torvalds1da177e2005-04-16 15:20:36 -0700314 out:
Tim Hockinbd784322007-07-21 17:10:37 +0200315 /* the last thing we do is clear state */
316 for (i = 0; i < banks; i++)
317 wrmsrl(MSR_IA32_MC0_STATUS+4*i, 0);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700318 wrmsrl(MSR_IA32_MCG_STATUS, 0);
Andi Kleen553f2652006-04-07 19:49:57 +0200319 out2:
320 atomic_dec(&mce_entry);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700321}
322
Dmitriy Zavin15d5f832006-09-26 10:52:42 +0200323#ifdef CONFIG_X86_MCE_INTEL
324/***
325 * mce_log_therm_throt_event - Logs the thermal throttling event to mcelog
326 * @cpu: The CPU on which the event occured.
327 * @status: Event status information
328 *
329 * This function should be called by the thermal interrupt after the
330 * event has been processed and the decision was made to log the event
331 * further.
332 *
333 * The status parameter will be saved to the 'status' field of 'struct mce'
334 * and historically has been the register value of the
335 * MSR_IA32_THERMAL_STATUS (Intel) msr.
336 */
337void mce_log_therm_throt_event(unsigned int cpu, __u64 status)
338{
339 struct mce m;
340
341 memset(&m, 0, sizeof(m));
342 m.cpu = cpu;
343 m.bank = MCE_THERMAL_BANK;
344 m.status = status;
345 rdtscll(m.tsc);
346 mce_log(&m);
347}
348#endif /* CONFIG_X86_MCE_INTEL */
349
Linus Torvalds1da177e2005-04-16 15:20:36 -0700350/*
Tim Hockin8a336b02007-05-02 19:27:19 +0200351 * Periodic polling timer for "silent" machine check errors. If the
352 * poller finds an MCE, poll 2x faster. When the poller finds no more
353 * errors, poll 2x slower (up to check_interval seconds).
Linus Torvalds1da177e2005-04-16 15:20:36 -0700354 */
355
356static int check_interval = 5 * 60; /* 5 minutes */
Tim Hockin8a336b02007-05-02 19:27:19 +0200357static int next_interval; /* in jiffies */
David Howells65f27f32006-11-22 14:55:48 +0000358static void mcheck_timer(struct work_struct *work);
359static DECLARE_DELAYED_WORK(mcheck_work, mcheck_timer);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700360
361static void mcheck_check_cpu(void *info)
362{
363 if (mce_available(&current_cpu_data))
364 do_machine_check(NULL, 0);
365}
366
David Howells65f27f32006-11-22 14:55:48 +0000367static void mcheck_timer(struct work_struct *work)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700368{
369 on_each_cpu(mcheck_check_cpu, NULL, 1, 1);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700370
371 /*
Tim Hockine02e68d2007-07-21 17:10:36 +0200372 * Alert userspace if needed. If we logged an MCE, reduce the
373 * polling interval, otherwise increase the polling interval.
Linus Torvalds1da177e2005-04-16 15:20:36 -0700374 */
Tim Hockine02e68d2007-07-21 17:10:36 +0200375 if (mce_notify_user()) {
Tim Hockin8a336b02007-05-02 19:27:19 +0200376 next_interval = max(next_interval/2, HZ/100);
Tim Hockin8a336b02007-05-02 19:27:19 +0200377 } else {
378 next_interval = min(next_interval*2, check_interval*HZ);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700379 }
Tim Hockin8a336b02007-05-02 19:27:19 +0200380
381 schedule_delayed_work(&mcheck_work, next_interval);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700382}
383
Tim Hockine02e68d2007-07-21 17:10:36 +0200384/*
385 * This is only called from process context. This is where we do
386 * anything we need to alert userspace about new MCEs. This is called
387 * directly from the poller and also from entry.S and idle, thanks to
388 * TIF_MCE_NOTIFY.
389 */
390int mce_notify_user(void)
391{
392 clear_thread_flag(TIF_MCE_NOTIFY);
393 if (test_and_clear_bit(0, &notify_user)) {
394 static unsigned long last_print;
395 unsigned long now = jiffies;
396
397 wake_up_interruptible(&mce_wait);
398 if (trigger[0])
399 call_usermodehelper(trigger, trigger_argv, NULL,
400 UMH_NO_WAIT);
401
402 if (time_after_eq(now, last_print + (check_interval*HZ))) {
403 last_print = now;
404 printk(KERN_INFO "Machine check events logged\n");
405 }
406
407 return 1;
408 }
409 return 0;
410}
411
412/* see if the idle task needs to notify userspace */
413static int
414mce_idle_callback(struct notifier_block *nfb, unsigned long action, void *junk)
415{
416 /* IDLE_END should be safe - interrupts are back on */
417 if (action == IDLE_END && test_thread_flag(TIF_MCE_NOTIFY))
418 mce_notify_user();
419
420 return NOTIFY_OK;
421}
422
423static struct notifier_block mce_idle_notifier = {
424 .notifier_call = mce_idle_callback,
425};
Linus Torvalds1da177e2005-04-16 15:20:36 -0700426
427static __init int periodic_mcheck_init(void)
428{
Tim Hockin8a336b02007-05-02 19:27:19 +0200429 next_interval = check_interval * HZ;
430 if (next_interval)
431 schedule_delayed_work(&mcheck_work, next_interval);
Tim Hockine02e68d2007-07-21 17:10:36 +0200432 idle_notifier_register(&mce_idle_notifier);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700433 return 0;
434}
435__initcall(periodic_mcheck_init);
436
437
438/*
439 * Initialize Machine Checks for a CPU.
440 */
441static void mce_init(void *dummy)
442{
443 u64 cap;
444 int i;
445
446 rdmsrl(MSR_IA32_MCG_CAP, cap);
447 banks = cap & 0xff;
448 if (banks > NR_BANKS) {
449 printk(KERN_INFO "MCE: warning: using only %d banks\n", banks);
450 banks = NR_BANKS;
451 }
Andi Kleen94ad8472005-04-16 15:25:09 -0700452 /* Use accurate RIP reporting if available. */
453 if ((cap & (1<<9)) && ((cap >> 16) & 0xff) >= 9)
454 rip_msr = MSR_IA32_MCG_EIP;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700455
456 /* Log the machine checks left over from the previous reset.
457 This also clears all registers */
Andi Kleend5172f22005-08-07 09:42:07 -0700458 do_machine_check(NULL, mce_bootlog ? -1 : -2);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700459
460 set_in_cr4(X86_CR4_MCE);
461
462 if (cap & MCG_CTL_P)
463 wrmsr(MSR_IA32_MCG_CTL, 0xffffffff, 0xffffffff);
464
465 for (i = 0; i < banks; i++) {
466 wrmsrl(MSR_IA32_MC0_CTL+4*i, bank[i]);
467 wrmsrl(MSR_IA32_MC0_STATUS+4*i, 0);
468 }
469}
470
471/* Add per CPU specific workarounds here */
Ashok Raje6982c62005-06-25 14:54:58 -0700472static void __cpuinit mce_cpu_quirks(struct cpuinfo_x86 *c)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700473{
474 /* This should be disabled by the BIOS, but isn't always */
475 if (c->x86_vendor == X86_VENDOR_AMD && c->x86 == 15) {
476 /* disable GART TBL walk error reporting, which trips off
477 incorrectly with the IOMMU & 3ware & Cerberus. */
478 clear_bit(10, &bank[4]);
Andi Kleene5835382005-11-05 17:25:54 +0100479 /* Lots of broken BIOS around that don't clear them
480 by default and leave crap in there. Don't log. */
481 mce_bootlog = 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700482 }
Andi Kleene5835382005-11-05 17:25:54 +0100483
Linus Torvalds1da177e2005-04-16 15:20:36 -0700484}
485
Ashok Raje6982c62005-06-25 14:54:58 -0700486static void __cpuinit mce_cpu_features(struct cpuinfo_x86 *c)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700487{
488 switch (c->x86_vendor) {
489 case X86_VENDOR_INTEL:
490 mce_intel_feature_init(c);
491 break;
Jacob Shin89b831e2005-11-05 17:25:53 +0100492 case X86_VENDOR_AMD:
493 mce_amd_feature_init(c);
494 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700495 default:
496 break;
497 }
498}
499
500/*
501 * Called for each booted CPU to set up machine checks.
502 * Must be called with preempt off.
503 */
Ashok Raje6982c62005-06-25 14:54:58 -0700504void __cpuinit mcheck_init(struct cpuinfo_x86 *c)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700505{
Ashok Raj7ded5682006-02-03 21:51:23 +0100506 static cpumask_t mce_cpus = CPU_MASK_NONE;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700507
508 mce_cpu_quirks(c);
509
510 if (mce_dont_init ||
511 cpu_test_and_set(smp_processor_id(), mce_cpus) ||
512 !mce_available(c))
513 return;
514
515 mce_init(NULL);
516 mce_cpu_features(c);
517}
518
519/*
520 * Character device to read and clear the MCE log.
521 */
522
Tim Hockinf528e7b2007-07-21 17:10:35 +0200523static DEFINE_SPINLOCK(mce_state_lock);
524static int open_count; /* #times opened */
525static int open_exclu; /* already open exclusive? */
526
527static int mce_open(struct inode *inode, struct file *file)
528{
529 spin_lock(&mce_state_lock);
530
531 if (open_exclu || (open_count && (file->f_flags & O_EXCL))) {
532 spin_unlock(&mce_state_lock);
533 return -EBUSY;
534 }
535
536 if (file->f_flags & O_EXCL)
537 open_exclu = 1;
538 open_count++;
539
540 spin_unlock(&mce_state_lock);
541
Tim Hockinbd784322007-07-21 17:10:37 +0200542 return nonseekable_open(inode, file);
Tim Hockinf528e7b2007-07-21 17:10:35 +0200543}
544
545static int mce_release(struct inode *inode, struct file *file)
546{
547 spin_lock(&mce_state_lock);
548
549 open_count--;
550 open_exclu = 0;
551
552 spin_unlock(&mce_state_lock);
553
554 return 0;
555}
556
Linus Torvalds1da177e2005-04-16 15:20:36 -0700557static void collect_tscs(void *data)
558{
559 unsigned long *cpu_tsc = (unsigned long *)data;
560 rdtscll(cpu_tsc[smp_processor_id()]);
561}
562
563static ssize_t mce_read(struct file *filp, char __user *ubuf, size_t usize, loff_t *off)
564{
Andi Kleenf0de53b2005-04-16 15:25:10 -0700565 unsigned long *cpu_tsc;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700566 static DECLARE_MUTEX(mce_read_sem);
567 unsigned next;
568 char __user *buf = ubuf;
569 int i, err;
570
Andi Kleenf0de53b2005-04-16 15:25:10 -0700571 cpu_tsc = kmalloc(NR_CPUS * sizeof(long), GFP_KERNEL);
572 if (!cpu_tsc)
573 return -ENOMEM;
574
Linus Torvalds1da177e2005-04-16 15:20:36 -0700575 down(&mce_read_sem);
576 next = rcu_dereference(mcelog.next);
577
578 /* Only supports full reads right now */
579 if (*off != 0 || usize < MCE_LOG_LEN*sizeof(struct mce)) {
580 up(&mce_read_sem);
Andi Kleenf0de53b2005-04-16 15:25:10 -0700581 kfree(cpu_tsc);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700582 return -EINVAL;
583 }
584
585 err = 0;
Andi Kleen673242c2005-09-12 18:49:24 +0200586 for (i = 0; i < next; i++) {
587 unsigned long start = jiffies;
588 while (!mcelog.entry[i].finished) {
Joshua Wise4f84e4b2007-06-23 17:16:45 -0700589 if (time_after_eq(jiffies, start + 2)) {
Andi Kleen673242c2005-09-12 18:49:24 +0200590 memset(mcelog.entry + i,0, sizeof(struct mce));
Joshua Wise4f84e4b2007-06-23 17:16:45 -0700591 goto timeout;
Andi Kleen673242c2005-09-12 18:49:24 +0200592 }
593 cpu_relax();
594 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700595 smp_rmb();
596 err |= copy_to_user(buf, mcelog.entry + i, sizeof(struct mce));
597 buf += sizeof(struct mce);
Joshua Wise4f84e4b2007-06-23 17:16:45 -0700598 timeout:
599 ;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700600 }
601
602 memset(mcelog.entry, 0, next * sizeof(struct mce));
603 mcelog.next = 0;
604
Paul E. McKenneyb2b18662005-06-25 14:55:38 -0700605 synchronize_sched();
Linus Torvalds1da177e2005-04-16 15:20:36 -0700606
607 /* Collect entries that were still getting written before the synchronize. */
608
609 on_each_cpu(collect_tscs, cpu_tsc, 1, 1);
610 for (i = next; i < MCE_LOG_LEN; i++) {
611 if (mcelog.entry[i].finished &&
612 mcelog.entry[i].tsc < cpu_tsc[mcelog.entry[i].cpu]) {
613 err |= copy_to_user(buf, mcelog.entry+i, sizeof(struct mce));
614 smp_rmb();
615 buf += sizeof(struct mce);
616 memset(&mcelog.entry[i], 0, sizeof(struct mce));
617 }
618 }
619 up(&mce_read_sem);
Andi Kleenf0de53b2005-04-16 15:25:10 -0700620 kfree(cpu_tsc);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700621 return err ? -EFAULT : buf - ubuf;
622}
623
Tim Hockine02e68d2007-07-21 17:10:36 +0200624static unsigned int mce_poll(struct file *file, poll_table *wait)
625{
626 poll_wait(file, &mce_wait, wait);
627 if (rcu_dereference(mcelog.next))
628 return POLLIN | POLLRDNORM;
629 return 0;
630}
631
Linus Torvalds1da177e2005-04-16 15:20:36 -0700632static int mce_ioctl(struct inode *i, struct file *f,unsigned int cmd, unsigned long arg)
633{
634 int __user *p = (int __user *)arg;
635 if (!capable(CAP_SYS_ADMIN))
636 return -EPERM;
637 switch (cmd) {
638 case MCE_GET_RECORD_LEN:
639 return put_user(sizeof(struct mce), p);
640 case MCE_GET_LOG_LEN:
641 return put_user(MCE_LOG_LEN, p);
642 case MCE_GETCLEAR_FLAGS: {
643 unsigned flags;
644 do {
645 flags = mcelog.flags;
646 } while (cmpxchg(&mcelog.flags, flags, 0) != flags);
647 return put_user(flags, p);
648 }
649 default:
650 return -ENOTTY;
651 }
652}
653
Arjan van de Ven5dfe4c92007-02-12 00:55:31 -0800654static const struct file_operations mce_chrdev_ops = {
Tim Hockinf528e7b2007-07-21 17:10:35 +0200655 .open = mce_open,
656 .release = mce_release,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700657 .read = mce_read,
Tim Hockine02e68d2007-07-21 17:10:36 +0200658 .poll = mce_poll,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700659 .ioctl = mce_ioctl,
660};
661
662static struct miscdevice mce_log_device = {
663 MISC_MCELOG_MINOR,
664 "mcelog",
665 &mce_chrdev_ops,
666};
667
668/*
669 * Old style boot options parsing. Only for compatibility.
670 */
671
672static int __init mcheck_disable(char *str)
673{
674 mce_dont_init = 1;
OGAWA Hirofumi9b410462006-03-31 02:30:33 -0800675 return 1;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700676}
677
678/* mce=off disables machine check. Note you can reenable it later
Andi Kleend5172f22005-08-07 09:42:07 -0700679 using sysfs.
Andi Kleen8c566ef2005-09-12 18:49:24 +0200680 mce=TOLERANCELEVEL (number, see above)
Andi Kleene5835382005-11-05 17:25:54 +0100681 mce=bootlog Log MCEs from before booting. Disabled by default on AMD.
682 mce=nobootlog Don't log MCEs from before booting. */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700683static int __init mcheck_enable(char *str)
684{
Andi Kleend5172f22005-08-07 09:42:07 -0700685 if (*str == '=')
686 str++;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700687 if (!strcmp(str, "off"))
688 mce_dont_init = 1;
Andi Kleene5835382005-11-05 17:25:54 +0100689 else if (!strcmp(str, "bootlog") || !strcmp(str,"nobootlog"))
690 mce_bootlog = str[0] == 'b';
Andi Kleen8c566ef2005-09-12 18:49:24 +0200691 else if (isdigit(str[0]))
692 get_option(&str, &tolerant);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700693 else
694 printk("mce= argument %s ignored. Please use /sys", str);
OGAWA Hirofumi9b410462006-03-31 02:30:33 -0800695 return 1;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700696}
697
698__setup("nomce", mcheck_disable);
699__setup("mce", mcheck_enable);
700
701/*
702 * Sysfs support
703 */
704
Andi Kleen413588c2005-09-12 18:49:24 +0200705/* On resume clear all MCE state. Don't want to see leftovers from the BIOS.
706 Only one CPU is active at this time, the others get readded later using
707 CPU hotplug. */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700708static int mce_resume(struct sys_device *dev)
709{
Andi Kleen413588c2005-09-12 18:49:24 +0200710 mce_init(NULL);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700711 return 0;
712}
713
714/* Reinit MCEs after user configuration changes */
715static void mce_restart(void)
716{
Tim Hockin8a336b02007-05-02 19:27:19 +0200717 if (next_interval)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700718 cancel_delayed_work(&mcheck_work);
719 /* Timer race is harmless here */
720 on_each_cpu(mce_init, NULL, 1, 1);
Tim Hockin8a336b02007-05-02 19:27:19 +0200721 next_interval = check_interval * HZ;
722 if (next_interval)
723 schedule_delayed_work(&mcheck_work, next_interval);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700724}
725
726static struct sysdev_class mce_sysclass = {
727 .resume = mce_resume,
728 set_kset_name("machinecheck"),
729};
730
Jacob Shinfff2e892006-06-26 13:58:50 +0200731DEFINE_PER_CPU(struct sys_device, device_mce);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700732
733/* Why are there no generic functions for this? */
734#define ACCESSOR(name, var, start) \
735 static ssize_t show_ ## name(struct sys_device *s, char *buf) { \
736 return sprintf(buf, "%lx\n", (unsigned long)var); \
737 } \
738 static ssize_t set_ ## name(struct sys_device *s,const char *buf,size_t siz) { \
739 char *end; \
740 unsigned long new = simple_strtoul(buf, &end, 0); \
741 if (end == buf) return -EINVAL; \
742 var = new; \
743 start; \
744 return end-buf; \
745 } \
746 static SYSDEV_ATTR(name, 0644, show_ ## name, set_ ## name);
747
Andi Kleena98f0dd2007-02-13 13:26:23 +0100748/* TBD should generate these dynamically based on number of available banks */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700749ACCESSOR(bank0ctl,bank[0],mce_restart())
750ACCESSOR(bank1ctl,bank[1],mce_restart())
751ACCESSOR(bank2ctl,bank[2],mce_restart())
752ACCESSOR(bank3ctl,bank[3],mce_restart())
753ACCESSOR(bank4ctl,bank[4],mce_restart())
Shaohua Li73ca5352006-01-11 22:43:06 +0100754ACCESSOR(bank5ctl,bank[5],mce_restart())
Andi Kleena98f0dd2007-02-13 13:26:23 +0100755
756static ssize_t show_trigger(struct sys_device *s, char *buf)
757{
758 strcpy(buf, trigger);
759 strcat(buf, "\n");
760 return strlen(trigger) + 1;
761}
762
763static ssize_t set_trigger(struct sys_device *s,const char *buf,size_t siz)
764{
765 char *p;
766 int len;
767 strncpy(trigger, buf, sizeof(trigger));
768 trigger[sizeof(trigger)-1] = 0;
769 len = strlen(trigger);
770 p = strchr(trigger, '\n');
771 if (*p) *p = 0;
772 return len;
773}
774
775static SYSDEV_ATTR(trigger, 0644, show_trigger, set_trigger);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700776ACCESSOR(tolerant,tolerant,)
777ACCESSOR(check_interval,check_interval,mce_restart())
Andi Kleena98f0dd2007-02-13 13:26:23 +0100778static struct sysdev_attribute *mce_attributes[] = {
779 &attr_bank0ctl, &attr_bank1ctl, &attr_bank2ctl,
780 &attr_bank3ctl, &attr_bank4ctl, &attr_bank5ctl,
781 &attr_tolerant, &attr_check_interval, &attr_trigger,
782 NULL
783};
Linus Torvalds1da177e2005-04-16 15:20:36 -0700784
Andi Kleen91c6d402005-07-28 21:15:39 -0700785/* Per cpu sysdev init. All of the cpus still share the same ctl bank */
786static __cpuinit int mce_create_device(unsigned int cpu)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700787{
788 int err;
Shaohua Li73ca5352006-01-11 22:43:06 +0100789 int i;
Andi Kleen91c6d402005-07-28 21:15:39 -0700790 if (!mce_available(&cpu_data[cpu]))
791 return -EIO;
792
793 per_cpu(device_mce,cpu).id = cpu;
794 per_cpu(device_mce,cpu).cls = &mce_sysclass;
795
796 err = sysdev_register(&per_cpu(device_mce,cpu));
797
798 if (!err) {
Andi Kleena98f0dd2007-02-13 13:26:23 +0100799 for (i = 0; mce_attributes[i]; i++)
Shaohua Li73ca5352006-01-11 22:43:06 +0100800 sysdev_create_file(&per_cpu(device_mce,cpu),
Andi Kleena98f0dd2007-02-13 13:26:23 +0100801 mce_attributes[i]);
Andi Kleen91c6d402005-07-28 21:15:39 -0700802 }
803 return err;
804}
805
Chandra Seetharamanbe6b5a32006-07-30 03:03:37 -0700806static void mce_remove_device(unsigned int cpu)
Andi Kleen91c6d402005-07-28 21:15:39 -0700807{
Shaohua Li73ca5352006-01-11 22:43:06 +0100808 int i;
809
Andi Kleena98f0dd2007-02-13 13:26:23 +0100810 for (i = 0; mce_attributes[i]; i++)
Shaohua Li73ca5352006-01-11 22:43:06 +0100811 sysdev_remove_file(&per_cpu(device_mce,cpu),
Andi Kleena98f0dd2007-02-13 13:26:23 +0100812 mce_attributes[i]);
Andi Kleen91c6d402005-07-28 21:15:39 -0700813 sysdev_unregister(&per_cpu(device_mce,cpu));
Rafael J. Wysockid4c45712006-12-07 02:14:12 +0100814 memset(&per_cpu(device_mce, cpu).kobj, 0, sizeof(struct kobject));
Andi Kleen91c6d402005-07-28 21:15:39 -0700815}
Andi Kleen91c6d402005-07-28 21:15:39 -0700816
817/* Get notified when a cpu comes on/off. Be hotplug friendly. */
Chandra Seetharamanbe6b5a32006-07-30 03:03:37 -0700818static int
Andi Kleen91c6d402005-07-28 21:15:39 -0700819mce_cpu_callback(struct notifier_block *nfb, unsigned long action, void *hcpu)
820{
821 unsigned int cpu = (unsigned long)hcpu;
822
823 switch (action) {
824 case CPU_ONLINE:
Rafael J. Wysocki8bb78442007-05-09 02:35:10 -0700825 case CPU_ONLINE_FROZEN:
Andi Kleen91c6d402005-07-28 21:15:39 -0700826 mce_create_device(cpu);
827 break;
Andi Kleen91c6d402005-07-28 21:15:39 -0700828 case CPU_DEAD:
Rafael J. Wysocki8bb78442007-05-09 02:35:10 -0700829 case CPU_DEAD_FROZEN:
Andi Kleen91c6d402005-07-28 21:15:39 -0700830 mce_remove_device(cpu);
831 break;
Andi Kleen91c6d402005-07-28 21:15:39 -0700832 }
833 return NOTIFY_OK;
834}
835
Chandra Seetharamanbe6b5a32006-07-30 03:03:37 -0700836static struct notifier_block mce_cpu_notifier = {
Andi Kleen91c6d402005-07-28 21:15:39 -0700837 .notifier_call = mce_cpu_callback,
838};
839
840static __init int mce_init_device(void)
841{
842 int err;
843 int i = 0;
844
Linus Torvalds1da177e2005-04-16 15:20:36 -0700845 if (!mce_available(&boot_cpu_data))
846 return -EIO;
847 err = sysdev_class_register(&mce_sysclass);
Andi Kleen91c6d402005-07-28 21:15:39 -0700848
849 for_each_online_cpu(i) {
850 mce_create_device(i);
851 }
852
Chandra Seetharamanbe6b5a32006-07-30 03:03:37 -0700853 register_hotcpu_notifier(&mce_cpu_notifier);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700854 misc_register(&mce_log_device);
855 return err;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700856}
Andi Kleen91c6d402005-07-28 21:15:39 -0700857
Linus Torvalds1da177e2005-04-16 15:20:36 -0700858device_initcall(mce_init_device);