arch/alpha/kernel/err_ev7.c

   1 /*
   2  *      linux/arch/alpha/kernel/err_ev7.c
   3  *
   4  *      Copyright (C) 2000 Jeff Wiedemeier (Compaq Computer Corporation)
   5  *
   6  *      Error handling code supporting Alpha systems
   7  */
   8
   9 #include <linux/init.h>
  10 #include <linux/pci.h>
  11 #include <linux/sched.h>
  12
  13 #include <asm/io.h>
  14 #include <asm/hwrpb.h>
  15 #include <asm/smp.h>
  16 #include <asm/err_common.h>
  17 #include <asm/err_ev7.h>
  18
  19 #include "err_impl.h"
  20 #include "proto.h"
  21
  22 struct ev7_lf_subpackets *
  23 ev7_collect_logout_frame_subpackets(struct el_subpacket *el_ptr,
  24                                     struct ev7_lf_subpackets *lf_subpackets)
  25 {
  26         struct el_subpacket *subpacket;
  27         int i;
  28
  29         /*
  30          * A Marvel machine check frame is always packaged in an
  31          * el_subpacket of class HEADER, type LOGOUT_FRAME.
  32          */
  33         if (el_ptr->class != EL_CLASS__HEADER ||
  34             el_ptr->type != EL_TYPE__HEADER__LOGOUT_FRAME)
  35                 return NULL;
  36
  37         /*
  38          * It is a logout frame header. Look at the one subpacket.
  39          */
  40         el_ptr = (struct el_subpacket *)
  41                 ((unsigned long)el_ptr + el_ptr->length);
  42
  43         /*
  44          * It has to be class PAL, type LOGOUT_FRAME.
  45          */
  46         if (el_ptr->class != EL_CLASS__PAL ||
  47             el_ptr->type != EL_TYPE__PAL__LOGOUT_FRAME)
  48                 return NULL;
  49
  50         lf_subpackets->logout = (struct ev7_pal_logout_subpacket *)
  51                 el_ptr->by_type.raw.data_start;
  52
  53         /*
  54          * Process the subpackets.
  55          */
  56         subpacket = (struct el_subpacket *)
  57                 ((unsigned long)el_ptr + el_ptr->length);
  58         for (i = 0;
  59              subpacket && i < lf_subpackets->logout->subpacket_count;
  60              subpacket = (struct el_subpacket *)
  61                      ((unsigned long)subpacket + subpacket->length), i++) {
  62                 /*
  63                  * All subpackets should be class PAL.
  64                  */
  65                 if (subpacket->class != EL_CLASS__PAL) {
  66                         printk("%s**UNEXPECTED SUBPACKET CLASS %d "
  67                                "IN LOGOUT FRAME (packet %d\n",
  68                                err_print_prefix, subpacket->class, i);
  69                         return NULL;
  70                 }
  71
  72                 /*
  73                  * Remember the subpacket.
  74                  */
  75                 switch(subpacket->type) {
  76                 case EL_TYPE__PAL__EV7_PROCESSOR:
  77                         lf_subpackets->ev7 =
  78                                 (struct ev7_pal_processor_subpacket *)
  79                                 subpacket->by_type.raw.data_start;
  80                         break;
  81
  82                 case EL_TYPE__PAL__EV7_RBOX:
  83                         lf_subpackets->rbox = (struct ev7_pal_rbox_subpacket *)
  84                                 subpacket->by_type.raw.data_start;
  85                         break;
  86
  87                 case EL_TYPE__PAL__EV7_ZBOX:
  88                         lf_subpackets->zbox = (struct ev7_pal_zbox_subpacket *)
  89                                 subpacket->by_type.raw.data_start;
  90                         break;
  91
  92                 case EL_TYPE__PAL__EV7_IO:
  93                         lf_subpackets->io = (struct ev7_pal_io_subpacket *)
  94                                 subpacket->by_type.raw.data_start;
  95                         break;
  96
  97                 case EL_TYPE__PAL__ENV__AMBIENT_TEMPERATURE:
  98                 case EL_TYPE__PAL__ENV__AIRMOVER_FAN:
  99                 case EL_TYPE__PAL__ENV__VOLTAGE:
 100                 case EL_TYPE__PAL__ENV__INTRUSION:
 101                 case EL_TYPE__PAL__ENV__POWER_SUPPLY:
 102                 case EL_TYPE__PAL__ENV__LAN:
 103                 case EL_TYPE__PAL__ENV__HOT_PLUG:
 104                         lf_subpackets->env[ev7_lf_env_index(subpacket->type)] =
 105                                 (struct ev7_pal_environmental_subpacket *)
 106                                 subpacket->by_type.raw.data_start;
 107                         break;
 108
 109                 default:
 110                         /*
 111                          * Don't know what kind of frame this is.
 112                          */
 113                         return NULL;
 114                 }
 115         }
 116
 117         return lf_subpackets;
 118 }
 119
 120 void
 121 ev7_machine_check(u64 vector, u64 la_ptr, struct pt_regs *regs)
 122 {
 123         struct el_subpacket *el_ptr = (struct el_subpacket *)la_ptr;
 124         char *saved_err_prefix = err_print_prefix;
 125
 126         /*
 127          * Sync the processor
 128          */
 129         mb();
 130         draina();
 131
 132         err_print_prefix = KERN_CRIT;
 133         printk("%s*CPU %s Error (Vector 0x%x) reported on CPU %d\n",
 134                err_print_prefix,
 135                (vector == SCB_Q_PROCERR) ? "Correctable" : "Uncorrectable",
 136                (unsigned int)vector, (int)smp_processor_id());
 137         el_process_subpacket(el_ptr);
 138         err_print_prefix = saved_err_prefix;
 139
 140         /*
 141          * Release the logout frame
 142          */
 143         wrmces(0x7);
 144         mb();
 145 }
 146
 147 static char *el_ev7_processor_subpacket_annotation[] = {
 148         "Subpacket Header",     "I_STAT",       "DC_STAT",
 149         "C_ADDR",               "C_SYNDROME_1", "C_SYNDROME_0",
 150         "C_STAT",               "C_STS",        "MM_STAT",
 151         "EXC_ADDR",             "IER_CM",       "ISUM",
 152         "PAL_BASE",             "I_CTL",        "PROCESS_CONTEXT",
 153         "CBOX_CTL",             "CBOX_STP_CTL", "CBOX_ACC_CTL",
 154         "CBOX_LCL_SET",         "CBOX_GLB_SET", "BBOX_CTL",
 155         "BBOX_ERR_STS",         "BBOX_ERR_IDX", "CBOX_DDP_ERR_STS",
 156         "BBOX_DAT_RMP",         NULL
 157 };
 158
 159 static char *el_ev7_zbox_subpacket_annotation[] = {
 160         "Subpacket Header",
 161         "ZBOX(0): DRAM_ERR_STATUS_2 / DRAM_ERR_STATUS_1",
 162         "ZBOX(0): DRAM_ERROR_CTL    / DRAM_ERR_STATUS_3",
 163         "ZBOX(0): DIFT_TIMEOUT      / DRAM_ERR_ADR",
 164         "ZBOX(0): FRC_ERR_ADR       / DRAM_MAPPER_CTL",
 165         "ZBOX(0): reserved          / DIFT_ERR_STATUS",
 166         "ZBOX(1): DRAM_ERR_STATUS_2 / DRAM_ERR_STATUS_1",
 167         "ZBOX(1): DRAM_ERROR_CTL    / DRAM_ERR_STATUS_3",
 168         "ZBOX(1): DIFT_TIMEOUT      / DRAM_ERR_ADR",
 169         "ZBOX(1): FRC_ERR_ADR       / DRAM_MAPPER_CTL",
 170         "ZBOX(1): reserved          / DIFT_ERR_STATUS",
 171         "CBOX_CTL",             "CBOX_STP_CTL",
 172         "ZBOX(0)_ERROR_PA",     "ZBOX(1)_ERROR_PA",
 173         "ZBOX(0)_ORED_SYNDROME","ZBOX(1)_ORED_SYNDROME",
 174         NULL
 175 };
 176
 177 static char *el_ev7_rbox_subpacket_annotation[] = {
 178         "Subpacket Header",     "RBOX_CFG",     "RBOX_N_CFG",
 179         "RBOX_S_CFG",           "RBOX_E_CFG",   "RBOX_W_CFG",
 180         "RBOX_N_ERR",           "RBOX_S_ERR",   "RBOX_E_ERR",
 181         "RBOX_W_ERR",           "RBOX_IO_CFG",  "RBOX_IO_ERR",
 182         "RBOX_L_ERR",           "RBOX_WHOAMI",  "RBOX_IMASL",
 183         "RBOX_INTQ",            "RBOX_INT",     NULL
 184 };
 185
 186 static char *el_ev7_io_subpacket_annotation[] = {
 187         "Subpacket Header",     "IO_ASIC_REV",  "IO_SYS_REV",
 188         "IO7_UPH",              "HPI_CTL",      "CRD_CTL",
 189         "HEI_CTL",              "PO7_ERROR_SUM","PO7_UNCRR_SYM",
 190         "PO7_CRRCT_SYM",        "PO7_UGBGE_SYM","PO7_ERR_PKT0",
 191         "PO7_ERR_PKT1",         "reserved",     "reserved",
 192         "PO0_ERR_SUM",          "PO0_TLB_ERR",  "PO0_SPL_COMPLT",
 193         "PO0_TRANS_SUM",        "PO0_FIRST_ERR","PO0_MULT_ERR",
 194         "DM CSR PH",            "DM CSR PH",    "DM CSR PH",
 195         "DM CSR PH",            "reserved",
 196         "PO1_ERR_SUM",          "PO1_TLB_ERR",  "PO1_SPL_COMPLT",
 197         "PO1_TRANS_SUM",        "PO1_FIRST_ERR","PO1_MULT_ERR",
 198         "DM CSR PH",            "DM CSR PH",    "DM CSR PH",
 199         "DM CSR PH",            "reserved",
 200         "PO2_ERR_SUM",          "PO2_TLB_ERR",  "PO2_SPL_COMPLT",
 201         "PO2_TRANS_SUM",        "PO2_FIRST_ERR","PO2_MULT_ERR",
 202         "DM CSR PH",            "DM CSR PH",    "DM CSR PH",
 203         "DM CSR PH",            "reserved",
 204         "PO3_ERR_SUM",          "PO3_TLB_ERR",  "PO3_SPL_COMPLT",
 205         "PO3_TRANS_SUM",        "PO3_FIRST_ERR","PO3_MULT_ERR",
 206         "DM CSR PH",            "DM CSR PH",    "DM CSR PH",
 207         "DM CSR PH",            "reserved",
 208         NULL
 209 };
 210
 211 static struct el_subpacket_annotation el_ev7_pal_annotations[] = {
 212         SUBPACKET_ANNOTATION(EL_CLASS__PAL,
 213                              EL_TYPE__PAL__EV7_PROCESSOR,
 214                              1,
 215                              "EV7 Processor Subpacket",
 216                              el_ev7_processor_subpacket_annotation),
 217         SUBPACKET_ANNOTATION(EL_CLASS__PAL,
 218                              EL_TYPE__PAL__EV7_ZBOX,
 219                              1,
 220                              "EV7 ZBOX Subpacket",
 221                              el_ev7_zbox_subpacket_annotation),
 222         SUBPACKET_ANNOTATION(EL_CLASS__PAL,
 223                              EL_TYPE__PAL__EV7_RBOX,
 224                              1,
 225                              "EV7 RBOX Subpacket",
 226                              el_ev7_rbox_subpacket_annotation),
 227         SUBPACKET_ANNOTATION(EL_CLASS__PAL,
 228                              EL_TYPE__PAL__EV7_IO,
 229                              1,
 230                              "EV7 IO Subpacket",
 231                              el_ev7_io_subpacket_annotation)
 232 };
 233
 234 static struct el_subpacket *
 235 ev7_process_pal_subpacket(struct el_subpacket *header)
 236 {
 237         struct ev7_pal_subpacket *packet;
 238
 239         if (header->class != EL_CLASS__PAL) {
 240                 printk("%s  ** Unexpected header CLASS %d TYPE %d, aborting\n",
 241                        err_print_prefix,
 242                        header->class, header->type);
 243                 return NULL;
 244         }
 245
 246         packet = (struct ev7_pal_subpacket *)header->by_type.raw.data_start;
 247
 248         switch(header->type) {
 249         case EL_TYPE__PAL__LOGOUT_FRAME:
 250                 printk("%s*** MCHK occurred on LPID %ld (RBOX %lx)\n",
 251                        err_print_prefix,
 252                        packet->by_type.logout.whami,
 253                        packet->by_type.logout.rbox_whami);
 254                 el_print_timestamp(&packet->by_type.logout.timestamp);
 255                 printk("%s  EXC_ADDR: %016lx\n"
 256                          "  HALT_CODE: %lx\n",
 257                        err_print_prefix,
 258                        packet->by_type.logout.exc_addr,
 259                        packet->by_type.logout.halt_code);
 260                 el_process_subpackets(header,
 261                                       packet->by_type.logout.subpacket_count);
 262                 break;
 263         default:
 264                 printk("%s  ** PAL TYPE %d SUBPACKET\n",
 265                        err_print_prefix,
 266                        header->type);
 267                 el_annotate_subpacket(header);
 268                 break;
 269         }
 270
 271         return (struct el_subpacket *)((unsigned long)header + header->length);
 272 }
 273
 274 struct el_subpacket_handler ev7_pal_subpacket_handler =
 275         SUBPACKET_HANDLER_INIT(EL_CLASS__PAL, ev7_process_pal_subpacket);
 276
 277 void
 278 ev7_register_error_handlers(void)
 279 {
 280         int i;
 281
 282         for(i = 0;
 283             i<sizeof(el_ev7_pal_annotations)/sizeof(el_ev7_pal_annotations[1]);
 284             i++) {
 285                 cdl_register_subpacket_annotation(&el_ev7_pal_annotations[i]);
 286         }
 287         cdl_register_subpacket_handler(&ev7_pal_subpacket_handler);
 288 }
 289