Merge branch 'timers-for-linus-ntp' of git://git.kernel.org/pub/scm/linux/kernel...
[linux-2.6] / arch / x86 / kernel / cpu / mcheck / mce-inject.c
1 /*
2  * Machine check injection support.
3  * Copyright 2008 Intel Corporation.
4  *
5  * This program is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU General Public License
7  * as published by the Free Software Foundation; version 2
8  * of the License.
9  *
10  * Authors:
11  * Andi Kleen
12  * Ying Huang
13  */
14 #include <linux/uaccess.h>
15 #include <linux/module.h>
16 #include <linux/timer.h>
17 #include <linux/kernel.h>
18 #include <linux/string.h>
19 #include <linux/fs.h>
20 #include <linux/smp.h>
21 #include <asm/mce.h>
22
23 /* Update fake mce registers on current CPU. */
24 static void inject_mce(struct mce *m)
25 {
26         struct mce *i = &per_cpu(injectm, m->extcpu);
27
28         /* Make sure noone reads partially written injectm */
29         i->finished = 0;
30         mb();
31         m->finished = 0;
32         /* First set the fields after finished */
33         i->extcpu = m->extcpu;
34         mb();
35         /* Now write record in order, finished last (except above) */
36         memcpy(i, m, sizeof(struct mce));
37         /* Finally activate it */
38         mb();
39         i->finished = 1;
40 }
41
42 struct delayed_mce {
43         struct timer_list timer;
44         struct mce m;
45 };
46
47 /* Inject mce on current CPU */
48 static void raise_mce(unsigned long data)
49 {
50         struct delayed_mce *dm = (struct delayed_mce *)data;
51         struct mce *m = &dm->m;
52         int cpu = m->extcpu;
53
54         inject_mce(m);
55         if (m->status & MCI_STATUS_UC) {
56                 struct pt_regs regs;
57                 memset(&regs, 0, sizeof(struct pt_regs));
58                 regs.ip = m->ip;
59                 regs.cs = m->cs;
60                 printk(KERN_INFO "Triggering MCE exception on CPU %d\n", cpu);
61                 do_machine_check(&regs, 0);
62                 printk(KERN_INFO "MCE exception done on CPU %d\n", cpu);
63         } else {
64                 mce_banks_t b;
65                 memset(&b, 0xff, sizeof(mce_banks_t));
66                 printk(KERN_INFO "Starting machine check poll CPU %d\n", cpu);
67                 machine_check_poll(0, &b);
68                 mce_notify_irq();
69                 printk(KERN_INFO "Finished machine check poll on CPU %d\n",
70                        cpu);
71         }
72         kfree(dm);
73 }
74
75 /* Error injection interface */
76 static ssize_t mce_write(struct file *filp, const char __user *ubuf,
77                          size_t usize, loff_t *off)
78 {
79         struct delayed_mce *dm;
80         struct mce m;
81
82         if (!capable(CAP_SYS_ADMIN))
83                 return -EPERM;
84         /*
85          * There are some cases where real MSR reads could slip
86          * through.
87          */
88         if (!boot_cpu_has(X86_FEATURE_MCE) || !boot_cpu_has(X86_FEATURE_MCA))
89                 return -EIO;
90
91         if ((unsigned long)usize > sizeof(struct mce))
92                 usize = sizeof(struct mce);
93         if (copy_from_user(&m, ubuf, usize))
94                 return -EFAULT;
95
96         if (m.extcpu >= num_possible_cpus() || !cpu_online(m.extcpu))
97                 return -EINVAL;
98
99         dm = kmalloc(sizeof(struct delayed_mce), GFP_KERNEL);
100         if (!dm)
101                 return -ENOMEM;
102
103         /*
104          * Need to give user space some time to set everything up,
105          * so do it a jiffie or two later everywhere.
106          * Should we use a hrtimer here for better synchronization?
107          */
108         memcpy(&dm->m, &m, sizeof(struct mce));
109         setup_timer(&dm->timer, raise_mce, (unsigned long)dm);
110         dm->timer.expires = jiffies + 2;
111         add_timer_on(&dm->timer, m.extcpu);
112         return usize;
113 }
114
115 static int inject_init(void)
116 {
117         printk(KERN_INFO "Machine check injector initialized\n");
118         mce_chrdev_ops.write = mce_write;
119         return 0;
120 }
121
122 module_init(inject_init);
123 /*
124  * Cannot tolerate unloading currently because we cannot
125  * guarantee all openers of mce_chrdev will get a reference to us.
126  */
127 MODULE_LICENSE("GPL");