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