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