xref: /openbmc/linux/arch/alpha/kernel/err_ev7.c (revision 1da177e4c3f41524e886b7f1b8a0c1fc7321cac2)
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