release/src-rt-6.x/linux/linux-2.6/arch/ia64/kernel/err_inject.c

   1 /*
   2  * err_inject.c -
   3  *      1.) Inject errors to a processor.
   4  *      2.) Query error injection capabilities.
   5  * This driver along with user space code can be acting as an error
   6  * injection tool.
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful, but
  14  * WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE, GOOD TITLE or
  16  * NON INFRINGEMENT.  See the GNU General Public License for more
  17  * details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22  *
  23  * Written by: Fenghua Yu <fenghua.yu@intel.com>, Intel Corporation
  24  * Copyright (C) 2006, Intel Corp.  All rights reserved.
  25  *
  26  */
  27 #include <linux/sysdev.h>
  28 #include <linux/init.h>
  29 #include <linux/mm.h>
  30 #include <linux/cpu.h>
  31 #include <linux/module.h>
  32
  33 #define ERR_INJ_DEBUG
  34
  35 #define ERR_DATA_BUFFER_SIZE 3          // Three 8-byte;
  36
  37 #define define_one_ro(name)                                             \
  38 static SYSDEV_ATTR(name, 0444, show_##name, NULL)
  39
  40 #define define_one_rw(name)                                             \
  41 static SYSDEV_ATTR(name, 0644, show_##name, store_##name)
  42
  43 static u64 call_start[NR_CPUS];
  44 static u64 phys_addr[NR_CPUS];
  45 static u64 err_type_info[NR_CPUS];
  46 static u64 err_struct_info[NR_CPUS];
  47 static struct {
  48         u64 data1;
  49         u64 data2;
  50         u64 data3;
  51 } __attribute__((__aligned__(16))) err_data_buffer[NR_CPUS];
  52 static s64 status[NR_CPUS];
  53 static u64 capabilities[NR_CPUS];
  54 static u64 resources[NR_CPUS];
  55
  56 #define show(name)                                                      \
  57 static ssize_t                                                          \
  58 show_##name(struct sys_device *dev, char *buf)                          \
  59 {                                                                       \
  60         u32 cpu=dev->id;                                                \
  61         return sprintf(buf, "%lx\n", name[cpu]);                        \
  62 }
  63
  64 #define store(name)                                                     \
  65 static ssize_t                                                          \
  66 store_##name(struct sys_device *dev, const char *buf, size_t size)      \
  67 {                                                                       \
  68         unsigned int cpu=dev->id;                                       \
  69         name[cpu] = simple_strtoull(buf, NULL, 16);                     \
  70         return size;                                                    \
  71 }
  72
  73 show(call_start)
  74
  75 /* It's user's responsibility to call the PAL procedure on a specific
  76  * processor. The cpu number in driver is only used for storing data.
  77  */
  78 static ssize_t
  79 store_call_start(struct sys_device *dev, const char *buf, size_t size)
  80 {
  81         unsigned int cpu=dev->id;
  82         unsigned long call_start = simple_strtoull(buf, NULL, 16);
  83
  84 #ifdef ERR_INJ_DEBUG
  85         printk(KERN_DEBUG "pal_mc_err_inject for cpu%d:\n", cpu);
  86         printk(KERN_DEBUG "err_type_info=%lx,\n", err_type_info[cpu]);
  87         printk(KERN_DEBUG "err_struct_info=%lx,\n", err_struct_info[cpu]);
  88         printk(KERN_DEBUG "err_data_buffer=%lx, %lx, %lx.\n",
  89                           err_data_buffer[cpu].data1,
  90                           err_data_buffer[cpu].data2,
  91                           err_data_buffer[cpu].data3);
  92 #endif
  93         switch (call_start) {
  94             case 0: /* Do nothing. */
  95                 break;
  96             case 1: /* Call pal_mc_error_inject in physical mode. */
  97                 status[cpu]=ia64_pal_mc_error_inject_phys(err_type_info[cpu],
  98                                         err_struct_info[cpu],
  99                                         ia64_tpa(&err_data_buffer[cpu]),
 100                                         &capabilities[cpu],
 101                                         &resources[cpu]);
 102                 break;
 103             case 2: /* Call pal_mc_error_inject in virtual mode. */
 104                 status[cpu]=ia64_pal_mc_error_inject_virt(err_type_info[cpu],
 105                                         err_struct_info[cpu],
 106                                         ia64_tpa(&err_data_buffer[cpu]),
 107                                         &capabilities[cpu],
 108                                         &resources[cpu]);
 109                 break;
 110             default:
 111                 status[cpu] = -EINVAL;
 112                 break;
 113         }
 114
 115 #ifdef ERR_INJ_DEBUG
 116         printk(KERN_DEBUG "Returns: status=%d,\n", (int)status[cpu]);
 117         printk(KERN_DEBUG "capapbilities=%lx,\n", capabilities[cpu]);
 118         printk(KERN_DEBUG "resources=%lx\n", resources[cpu]);
 119 #endif
 120         return size;
 121 }
 122
 123 show(err_type_info)
 124 store(err_type_info)
 125
 126 static ssize_t
 127 show_virtual_to_phys(struct sys_device *dev, char *buf)
 128 {
 129         unsigned int cpu=dev->id;
 130         return sprintf(buf, "%lx\n", phys_addr[cpu]);
 131 }
 132
 133 static ssize_t
 134 store_virtual_to_phys(struct sys_device *dev, const char *buf, size_t size)
 135 {
 136         unsigned int cpu=dev->id;
 137         u64 virt_addr=simple_strtoull(buf, NULL, 16);
 138         int ret;
 139
 140         ret = get_user_pages(current, current->mm, virt_addr,
 141                         1, VM_READ, 0, NULL, NULL);
 142         if (ret<=0) {
 143 #ifdef ERR_INJ_DEBUG
 144                 printk("Virtual address %lx is not existing.\n",virt_addr);
 145 #endif
 146                 return -EINVAL;
 147         }
 148
 149         phys_addr[cpu] = ia64_tpa(virt_addr);
 150         return size;
 151 }
 152
 153 show(err_struct_info)
 154 store(err_struct_info)
 155
 156 static ssize_t
 157 show_err_data_buffer(struct sys_device *dev, char *buf)
 158 {
 159         unsigned int cpu=dev->id;
 160
 161         return sprintf(buf, "%lx, %lx, %lx\n",
 162                         err_data_buffer[cpu].data1,
 163                         err_data_buffer[cpu].data2,
 164                         err_data_buffer[cpu].data3);
 165 }
 166
 167 static ssize_t
 168 store_err_data_buffer(struct sys_device *dev, const char *buf, size_t size)
 169 {
 170         unsigned int cpu=dev->id;
 171         int ret;
 172
 173 #ifdef ERR_INJ_DEBUG
 174         printk("write err_data_buffer=[%lx,%lx,%lx] on cpu%d\n",
 175                  err_data_buffer[cpu].data1,
 176                  err_data_buffer[cpu].data2,
 177                  err_data_buffer[cpu].data3,
 178                  cpu);
 179 #endif
 180         ret=sscanf(buf, "%lx, %lx, %lx",
 181                         &err_data_buffer[cpu].data1,
 182                         &err_data_buffer[cpu].data2,
 183                         &err_data_buffer[cpu].data3);
 184         if (ret!=ERR_DATA_BUFFER_SIZE)
 185                 return -EINVAL;
 186
 187         return size;
 188 }
 189
 190 show(status)
 191 show(capabilities)
 192 show(resources)
 193
 194 define_one_rw(call_start);
 195 define_one_rw(err_type_info);
 196 define_one_rw(err_struct_info);
 197 define_one_rw(err_data_buffer);
 198 define_one_rw(virtual_to_phys);
 199 define_one_ro(status);
 200 define_one_ro(capabilities);
 201 define_one_ro(resources);
 202
 203 static struct attribute *default_attrs[] = {
 204         &attr_call_start.attr,
 205         &attr_virtual_to_phys.attr,
 206         &attr_err_type_info.attr,
 207         &attr_err_struct_info.attr,
 208         &attr_err_data_buffer.attr,
 209         &attr_status.attr,
 210         &attr_capabilities.attr,
 211         &attr_resources.attr,
 212         NULL
 213 };
 214
 215 static struct attribute_group err_inject_attr_group = {
 216         .attrs = default_attrs,
 217         .name = "err_inject"
 218 };
 219 /* Add/Remove err_inject interface for CPU device */
 220 static int __cpuinit err_inject_add_dev(struct sys_device * sys_dev)
 221 {
 222         return sysfs_create_group(&sys_dev->kobj, &err_inject_attr_group);
 223 }
 224
 225 static int __cpuinit err_inject_remove_dev(struct sys_device * sys_dev)
 226 {
 227         sysfs_remove_group(&sys_dev->kobj, &err_inject_attr_group);
 228         return 0;
 229 }
 230 static int __cpuinit err_inject_cpu_callback(struct notifier_block *nfb,
 231                 unsigned long action, void *hcpu)
 232 {
 233         unsigned int cpu = (unsigned long)hcpu;
 234         struct sys_device *sys_dev;
 235
 236         sys_dev = get_cpu_sysdev(cpu);
 237         switch (action) {
 238         case CPU_ONLINE:
 239         case CPU_ONLINE_FROZEN:
 240                 err_inject_add_dev(sys_dev);
 241                 break;
 242         case CPU_DEAD:
 243         case CPU_DEAD_FROZEN:
 244                 err_inject_remove_dev(sys_dev);
 245                 break;
 246         }
 247
 248         return NOTIFY_OK;
 249 }
 250
 251 static struct notifier_block __cpuinitdata err_inject_cpu_notifier =
 252 {
 253         .notifier_call = err_inject_cpu_callback,
 254 };
 255
 256 static int __init
 257 err_inject_init(void)
 258 {
 259         int i;
 260
 261 #ifdef ERR_INJ_DEBUG
 262         printk(KERN_INFO "Enter error injection driver.\n");
 263 #endif
 264         for_each_online_cpu(i) {
 265                 err_inject_cpu_callback(&err_inject_cpu_notifier, CPU_ONLINE,
 266                                 (void *)(long)i);
 267         }
 268
 269         register_hotcpu_notifier(&err_inject_cpu_notifier);
 270
 271         return 0;
 272 }
 273
 274 static void __exit
 275 err_inject_exit(void)
 276 {
 277         int i;
 278         struct sys_device *sys_dev;
 279
 280 #ifdef ERR_INJ_DEBUG
 281         printk(KERN_INFO "Exit error injection driver.\n");
 282 #endif
 283         for_each_online_cpu(i) {
 284                 sys_dev = get_cpu_sysdev(i);
 285                 sysfs_remove_group(&sys_dev->kobj, &err_inject_attr_group);
 286         }
 287         unregister_hotcpu_notifier(&err_inject_cpu_notifier);
 288 }
 289
 290 module_init(err_inject_init);
 291 module_exit(err_inject_exit);
 292
 293 MODULE_AUTHOR("Fenghua Yu <fenghua.yu@intel.com>");
 294 MODULE_DESCRIPTION("MC error injection kernel sysfs interface");
 295 MODULE_LICENSE("GPL");