release/src-rt-6.x/linux/linux-2.6/arch/powerpc/platforms/cell/ras.c

   1 #define DEBUG
   2
   3 #include <linux/types.h>
   4 #include <linux/kernel.h>
   5 #include <linux/smp.h>
   6 #include <linux/reboot.h>
   7
   8 #include <asm/reg.h>
   9 #include <asm/io.h>
  10 #include <asm/prom.h>
  11 #include <asm/machdep.h>
  12 #include <asm/rtas.h>
  13
  14 #include "ras.h"
  15 #include "cbe_regs.h"
  16
  17
  18 static void dump_fir(int cpu)
  19 {
  20         struct cbe_pmd_regs __iomem *pregs = cbe_get_cpu_pmd_regs(cpu);
  21         struct cbe_iic_regs __iomem *iregs = cbe_get_cpu_iic_regs(cpu);
  22
  23         if (pregs == NULL)
  24                 return;
  25
  26         /* Todo: do some nicer parsing of bits and based on them go down
  27          * to other sub-units FIRs and not only IIC
  28          */
  29         printk(KERN_ERR "Global Checkstop FIR    : 0x%016lx\n",
  30                in_be64(&pregs->checkstop_fir));
  31         printk(KERN_ERR "Global Recoverable FIR  : 0x%016lx\n",
  32                in_be64(&pregs->checkstop_fir));
  33         printk(KERN_ERR "Global MachineCheck FIR : 0x%016lx\n",
  34                in_be64(&pregs->spec_att_mchk_fir));
  35
  36         if (iregs == NULL)
  37                 return;
  38         printk(KERN_ERR "IOC FIR                 : 0x%016lx\n",
  39                in_be64(&iregs->ioc_fir));
  40
  41 }
  42
  43 void cbe_system_error_exception(struct pt_regs *regs)
  44 {
  45         int cpu = smp_processor_id();
  46
  47         printk(KERN_ERR "System Error Interrupt on CPU %d !\n", cpu);
  48         dump_fir(cpu);
  49         dump_stack();
  50 }
  51
  52 void cbe_maintenance_exception(struct pt_regs *regs)
  53 {
  54         int cpu = smp_processor_id();
  55
  56         /*
  57          * Nothing implemented for the maintenance interrupt at this point
  58          */
  59
  60         printk(KERN_ERR "Unhandled Maintenance interrupt on CPU %d !\n", cpu);
  61         dump_stack();
  62 }
  63
  64 void cbe_thermal_exception(struct pt_regs *regs)
  65 {
  66         int cpu = smp_processor_id();
  67
  68         /*
  69          * Nothing implemented for the thermal interrupt at this point
  70          */
  71
  72         printk(KERN_ERR "Unhandled Thermal interrupt on CPU %d !\n", cpu);
  73         dump_stack();
  74 }
  75
  76 static int cbe_machine_check_handler(struct pt_regs *regs)
  77 {
  78         int cpu = smp_processor_id();
  79
  80         printk(KERN_ERR "Machine Check Interrupt on CPU %d !\n", cpu);
  81         dump_fir(cpu);
  82
  83         /* No recovery from this code now, lets continue */
  84         return 0;
  85 }
  86
  87 struct ptcal_area {
  88         struct list_head list;
  89         int nid;
  90         int order;
  91         struct page *pages;
  92 };
  93
  94 static LIST_HEAD(ptcal_list);
  95
  96 static int ptcal_start_tok, ptcal_stop_tok;
  97
  98 static int __init cbe_ptcal_enable_on_node(int nid, int order)
  99 {
 100         struct ptcal_area *area;
 101         int ret = -ENOMEM;
 102         unsigned long addr;
 103
 104 #ifdef CONFIG_CRASH_DUMP
 105         rtas_call(ptcal_stop_tok, 1, 1, NULL, nid);
 106 #endif
 107
 108         area = kmalloc(sizeof(*area), GFP_KERNEL);
 109         if (!area)
 110                 goto out_err;
 111
 112         area->nid = nid;
 113         area->order = order;
 114         area->pages = alloc_pages_node(area->nid, GFP_KERNEL, area->order);
 115
 116         if (!area->pages)
 117                 goto out_free_area;
 118
 119         addr = __pa(page_address(area->pages));
 120
 121         ret = -EIO;
 122         if (rtas_call(ptcal_start_tok, 3, 1, NULL, area->nid,
 123                                 (unsigned int)(addr >> 32),
 124                                 (unsigned int)(addr & 0xffffffff))) {
 125                 printk(KERN_ERR "%s: error enabling PTCAL on node %d!\n",
 126                                 __FUNCTION__, nid);
 127                 goto out_free_pages;
 128         }
 129
 130         list_add(&area->list, &ptcal_list);
 131
 132         return 0;
 133
 134 out_free_pages:
 135         __free_pages(area->pages, area->order);
 136 out_free_area:
 137         kfree(area);
 138 out_err:
 139         return ret;
 140 }
 141
 142 static int __init cbe_ptcal_enable(void)
 143 {
 144         const u32 *size;
 145         struct device_node *np;
 146         int order, found_mic = 0;
 147
 148         np = of_find_node_by_path("/rtas");
 149         if (!np)
 150                 return -ENODEV;
 151
 152         size = of_get_property(np, "ibm,cbe-ptcal-size", NULL);
 153         if (!size)
 154                 return -ENODEV;
 155
 156         pr_debug("%s: enabling PTCAL, size = 0x%x\n", __FUNCTION__, *size);
 157         order = get_order(*size);
 158         of_node_put(np);
 159
 160         /* support for malta device trees, with be@/mic@ nodes */
 161         for_each_node_by_type(np, "mic-tm") {
 162                 cbe_ptcal_enable_on_node(of_node_to_nid(np), order);
 163                 found_mic = 1;
 164         }
 165
 166         if (found_mic)
 167                 return 0;
 168
 169         /* support for older device tree - use cpu nodes */
 170         for_each_node_by_type(np, "cpu") {
 171                 const u32 *nid = of_get_property(np, "node-id", NULL);
 172                 if (!nid) {
 173                         printk(KERN_ERR "%s: node %s is missing node-id?\n",
 174                                         __FUNCTION__, np->full_name);
 175                         continue;
 176                 }
 177                 cbe_ptcal_enable_on_node(*nid, order);
 178                 found_mic = 1;
 179         }
 180
 181         return found_mic ? 0 : -ENODEV;
 182 }
 183
 184 static int cbe_ptcal_disable(void)
 185 {
 186         struct ptcal_area *area, *tmp;
 187         int ret = 0;
 188
 189         pr_debug("%s: disabling PTCAL\n", __FUNCTION__);
 190
 191         list_for_each_entry_safe(area, tmp, &ptcal_list, list) {
 192                 /* disable ptcal on this node */
 193                 if (rtas_call(ptcal_stop_tok, 1, 1, NULL, area->nid)) {
 194                         printk(KERN_ERR "%s: error disabling PTCAL "
 195                                         "on node %d!\n", __FUNCTION__,
 196                                         area->nid);
 197                         ret = -EIO;
 198                         continue;
 199                 }
 200
 201                 /* ensure we can access the PTCAL area */
 202                 memset(page_address(area->pages), 0,
 203                                 1 << (area->order + PAGE_SHIFT));
 204
 205                 /* clean up */
 206                 list_del(&area->list);
 207                 __free_pages(area->pages, area->order);
 208                 kfree(area);
 209         }
 210
 211         return ret;
 212 }
 213
 214 static int cbe_ptcal_notify_reboot(struct notifier_block *nb,
 215                 unsigned long code, void *data)
 216 {
 217         return cbe_ptcal_disable();
 218 }
 219
 220 static struct notifier_block cbe_ptcal_reboot_notifier = {
 221         .notifier_call = cbe_ptcal_notify_reboot
 222 };
 223
 224 int __init cbe_ptcal_init(void)
 225 {
 226         int ret;
 227         ptcal_start_tok = rtas_token("ibm,cbe-start-ptcal");
 228         ptcal_stop_tok = rtas_token("ibm,cbe-stop-ptcal");
 229
 230         if (ptcal_start_tok == RTAS_UNKNOWN_SERVICE
 231                         || ptcal_stop_tok == RTAS_UNKNOWN_SERVICE)
 232                 return -ENODEV;
 233
 234         ret = register_reboot_notifier(&cbe_ptcal_reboot_notifier);
 235         if (ret) {
 236                 printk(KERN_ERR "Can't disable PTCAL, so not enabling\n");
 237                 return ret;
 238         }
 239
 240         return cbe_ptcal_enable();
 241 }
 242
 243 arch_initcall(cbe_ptcal_init);
 244
 245 void __init cbe_ras_init(void)
 246 {
 247         unsigned long hid0;
 248
 249         /*
 250          * Enable System Error & thermal interrupts and wakeup conditions
 251          */
 252
 253         hid0 = mfspr(SPRN_HID0);
 254         hid0 |= HID0_CBE_THERM_INT_EN | HID0_CBE_THERM_WAKEUP |
 255                 HID0_CBE_SYSERR_INT_EN | HID0_CBE_SYSERR_WAKEUP;
 256         mtspr(SPRN_HID0, hid0);
 257         mb();
 258
 259         /*
 260          * Install machine check handler. Leave setting of precise mode to
 261          * what the firmware did for now
 262          */
 263         ppc_md.machine_check_exception = cbe_machine_check_handler;
 264         mb();
 265
 266         /*
 267          * For now, we assume that IOC_FIR is already set to forward some
 268          * error conditions to the System Error handler. If that is not true
 269          * then it will have to be fixed up here.
 270          */
 271 }