xref: /titanic_50/usr/src/uts/sun4u/io/pci/pcisch.c (revision c77a61a72b5ecdc507d6cf104142edd371a16c84)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 /*
22  * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
23  * Use is subject to license terms.
24  */
25 
26 #pragma ident	"%Z%%M%	%I%	%E% SMI"
27 
28 /*
29  * Schizo specifics implementation:
30  *	interrupt mapping register
31  *	PBM configuration
32  *	ECC and PBM error handling
33  *	Iommu mapping handling
34  *	Streaming Cache flushing
35  */
36 
37 #include <sys/types.h>
38 #include <sys/kmem.h>
39 #include <sys/sysmacros.h>
40 #include <sys/async.h>
41 #include <sys/systm.h>
42 #include <sys/ivintr.h>
43 #include <sys/machsystm.h>	/* lddphys() */
44 #include <sys/machsystm.h>	/* lddphys, intr_dist_add */
45 #include <sys/iommutsb.h>
46 #include <sys/promif.h>		/* prom_printf */
47 #include <sys/map.h>
48 #include <sys/ddi.h>
49 #include <sys/sunddi.h>
50 #include <sys/sunndi.h>
51 #include <sys/spl.h>
52 #include <sys/fm/util.h>
53 #include <sys/ddi_impldefs.h>
54 #include <sys/fm/protocol.h>
55 #include <sys/fm/io/sun4upci.h>
56 #include <sys/fm/io/ddi.h>
57 #include <sys/fm/io/pci.h>
58 #include <sys/pci/pci_obj.h>
59 #include <sys/pci/pcisch.h>
60 #include <sys/pci/pcisch_asm.h>
61 #include <sys/x_call.h>		/* XCALL_PIL */
62 
63 /*LINTLIBRARY*/
64 
65 extern uint8_t ldstub(uint8_t *);
66 
67 #define	IOMMU_CTX_BITMAP_SIZE	(1 << (12 - 3))
68 static void iommu_ctx_free(iommu_t *);
69 static int iommu_tlb_scrub(iommu_t *, int);
70 static uint32_t pci_identity_init(pci_t *);
71 
72 static void pci_cb_clear_error(cb_t *, cb_errstate_t *);
73 static void pci_clear_error(pci_t *, pbm_errstate_t *);
74 static uint32_t pci_identity_init(pci_t *pci_p);
75 static int pci_intr_setup(pci_t *pci_p);
76 static void iommu_ereport_post(dev_info_t *, uint64_t, pbm_errstate_t *);
77 static void cb_ereport_post(dev_info_t *, uint64_t, cb_errstate_t *);
78 static void pcix_ereport_post(dev_info_t *, uint64_t, pbm_errstate_t *);
79 static void pci_format_ecc_addr(dev_info_t *dip, uint64_t *afar,
80 		ecc_region_t region);
81 static void pci_pbm_errstate_get(pci_t *pci_p, pbm_errstate_t *pbm_err_p);
82 static void tm_vmem_free(ddi_dma_impl_t *mp, iommu_t *iommu_p,
83 		dvma_addr_t dvma_pg, int npages);
84 
85 static int pcix_ma_behind_bridge(pbm_errstate_t *pbm_err_p);
86 
87 static pci_ksinfo_t	*pci_name_kstat;
88 static pci_ksinfo_t	*saf_name_kstat;
89 
90 extern void pcix_set_cmd_reg(dev_info_t *child, uint16_t value);
91 
92 /* called by pci_attach() DDI_ATTACH to initialize pci objects */
93 int
94 pci_obj_setup(pci_t *pci_p)
95 {
96 	pci_common_t *cmn_p;
97 	uint32_t chip_id = pci_identity_init(pci_p);
98 	uint32_t cmn_id = PCI_CMN_ID(ID_CHIP_TYPE(chip_id), pci_p->pci_id);
99 	int ret;
100 
101 	/* Perform allocations first to avoid delicate unwinding. */
102 	if (pci_alloc_tsb(pci_p) != DDI_SUCCESS)
103 		return (DDI_FAILURE);
104 
105 	mutex_enter(&pci_global_mutex);
106 	cmn_p = get_pci_common_soft_state(cmn_id);
107 	if (cmn_p == NULL) {
108 		if (alloc_pci_common_soft_state(cmn_id) != DDI_SUCCESS) {
109 			mutex_exit(&pci_global_mutex);
110 			pci_free_tsb(pci_p);
111 			return (DDI_FAILURE);
112 		}
113 		cmn_p = get_pci_common_soft_state(cmn_id);
114 		cmn_p->pci_common_id = cmn_id;
115 		cmn_p->pci_common_tsb_cookie = IOMMU_TSB_COOKIE_NONE;
116 	}
117 
118 	ASSERT((pci_p->pci_side == 0) || (pci_p->pci_side == 1));
119 	if (cmn_p->pci_p[pci_p->pci_side]) {
120 		/* second side attach */
121 		pci_p->pci_side = PCI_OTHER_SIDE(pci_p->pci_side);
122 		ASSERT(cmn_p->pci_p[pci_p->pci_side] == NULL);
123 	}
124 
125 	cmn_p->pci_p[pci_p->pci_side] = pci_p;
126 	pci_p->pci_common_p = cmn_p;
127 
128 	if (cmn_p->pci_common_refcnt == 0)
129 		cmn_p->pci_chip_id = chip_id;
130 
131 	ib_create(pci_p);
132 
133 	/*
134 	 * The initialization of cb internal interrupts depends on ib
135 	 */
136 	if (cmn_p->pci_common_refcnt == 0) {
137 		cb_create(pci_p);
138 		cmn_p->pci_common_cb_p = pci_p->pci_cb_p;
139 	} else
140 		pci_p->pci_cb_p = cmn_p->pci_common_cb_p;
141 
142 	iommu_create(pci_p);
143 
144 	if (cmn_p->pci_common_refcnt == 0) {
145 		ecc_create(pci_p);
146 		cmn_p->pci_common_ecc_p = pci_p->pci_ecc_p;
147 	} else
148 		pci_p->pci_ecc_p = cmn_p->pci_common_ecc_p;
149 
150 	pbm_create(pci_p);
151 	sc_create(pci_p);
152 
153 	pci_fm_create(pci_p);
154 
155 	if ((ret = pci_intr_setup(pci_p)) != DDI_SUCCESS)
156 		goto done;
157 
158 	pci_kstat_create(pci_p);
159 
160 	cmn_p->pci_common_attachcnt++;
161 	cmn_p->pci_common_refcnt++;
162 done:
163 	mutex_exit(&pci_global_mutex);
164 	if (ret != DDI_SUCCESS)
165 		cmn_err(CE_WARN, "pci_obj_setup failed %x", ret);
166 	return (ret);
167 }
168 
169 /* called by pci_detach() DDI_DETACH to destroy pci objects */
170 void
171 pci_obj_destroy(pci_t *pci_p)
172 {
173 	pci_common_t *cmn_p;
174 	mutex_enter(&pci_global_mutex);
175 
176 	cmn_p = pci_p->pci_common_p;
177 	cmn_p->pci_common_refcnt--;
178 	cmn_p->pci_common_attachcnt--;
179 
180 	pci_kstat_destroy(pci_p);
181 
182 	/* schizo non-shared objects */
183 	pci_fm_destroy(pci_p);
184 
185 	sc_destroy(pci_p);
186 	pbm_destroy(pci_p);
187 	iommu_destroy(pci_p);
188 	ib_destroy(pci_p);
189 
190 	if (cmn_p->pci_common_refcnt != 0) {
191 		pci_intr_teardown(pci_p);
192 		cmn_p->pci_p[pci_p->pci_side] = NULL;
193 		mutex_exit(&pci_global_mutex);
194 		return;
195 	}
196 
197 	/* schizo shared objects - uses cmn_p, must be destroyed before cmn */
198 	ecc_destroy(pci_p);
199 	cb_destroy(pci_p);
200 
201 	free_pci_common_soft_state(cmn_p->pci_common_id);
202 	pci_intr_teardown(pci_p);
203 	mutex_exit(&pci_global_mutex);
204 }
205 
206 /* called by pci_attach() DDI_RESUME to (re)initialize pci objects */
207 void
208 pci_obj_resume(pci_t *pci_p)
209 {
210 	pci_common_t *cmn_p = pci_p->pci_common_p;
211 
212 	mutex_enter(&pci_global_mutex);
213 
214 	ib_configure(pci_p->pci_ib_p);
215 	iommu_configure(pci_p->pci_iommu_p);
216 
217 	if (cmn_p->pci_common_attachcnt == 0)
218 		ecc_configure(pci_p);
219 
220 	ib_resume(pci_p->pci_ib_p);
221 
222 	pbm_configure(pci_p->pci_pbm_p);
223 	sc_configure(pci_p->pci_sc_p);
224 
225 	if (cmn_p->pci_common_attachcnt == 0)
226 		cb_resume(pci_p->pci_cb_p);
227 
228 	pbm_resume(pci_p->pci_pbm_p);
229 
230 	cmn_p->pci_common_attachcnt++;
231 	mutex_exit(&pci_global_mutex);
232 }
233 
234 /* called by pci_detach() DDI_SUSPEND to suspend pci objects */
235 void
236 pci_obj_suspend(pci_t *pci_p)
237 {
238 	mutex_enter(&pci_global_mutex);
239 
240 	pbm_suspend(pci_p->pci_pbm_p);
241 	ib_suspend(pci_p->pci_ib_p);
242 
243 	if (!--pci_p->pci_common_p->pci_common_attachcnt)
244 		cb_suspend(pci_p->pci_cb_p);
245 
246 	mutex_exit(&pci_global_mutex);
247 }
248 
249 /*
250  * add an additional 0x35 or 0x36 ino interrupt on platforms don't have them
251  * This routine has multiple places that assumes interrupt takes one cell
252  * each and cell size is same as integer size.
253  */
254 static int
255 pci_intr_setup(pci_t *pci_p)
256 {
257 	dev_info_t *dip = pci_p->pci_dip;
258 	pbm_t *pbm_p = pci_p->pci_pbm_p;
259 	cb_t *cb_p = pci_p->pci_cb_p;
260 	uint32_t *intr_buf, *new_intr_buf;
261 	int intr_len, intr_cnt, ret;
262 
263 	if (ddi_getlongprop(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS,
264 		"interrupts", (caddr_t)&intr_buf, &intr_len) != DDI_SUCCESS)
265 		cmn_err(CE_PANIC, "%s%d: no interrupts property\n",
266 			ddi_driver_name(dip), ddi_get_instance(dip));
267 
268 	intr_cnt = BYTES_TO_1275_CELLS(intr_len);
269 	if (intr_cnt < CBNINTR_CDMA)	/* CBNINTR_CDMA is 0 based */
270 		cmn_err(CE_PANIC, "%s%d: <%d interrupts", ddi_driver_name(dip),
271 			ddi_get_instance(dip), CBNINTR_CDMA);
272 
273 	if (intr_cnt == CBNINTR_CDMA)
274 		intr_cnt++;
275 
276 	new_intr_buf = kmem_alloc(CELLS_1275_TO_BYTES(intr_cnt), KM_SLEEP);
277 	bcopy(intr_buf, new_intr_buf, intr_len);
278 	kmem_free(intr_buf, intr_len);
279 
280 	new_intr_buf[CBNINTR_CDMA] = PBM_CDMA_INO_BASE + pci_p->pci_side;
281 	pci_p->pci_inos = new_intr_buf;
282 	pci_p->pci_inos_len = CELLS_1275_TO_BYTES(intr_cnt);
283 
284 	if (ndi_prop_update_int_array(DDI_DEV_T_NONE, dip, "interrupts",
285 		(int *)new_intr_buf, intr_cnt))
286 		cmn_err(CE_PANIC, "%s%d: cannot update interrupts property\n",
287 			ddi_driver_name(dip), ddi_get_instance(dip));
288 
289 	if (pci_p->pci_common_p->pci_common_refcnt == 0) {
290 		cb_p->cb_no_of_inos = intr_cnt;
291 		if (ret = cb_register_intr(pci_p))
292 			goto teardown;
293 		if (ret = ecc_register_intr(pci_p))
294 			goto teardown;
295 
296 		intr_dist_add(cb_intr_dist, cb_p);
297 		cb_enable_intr(pci_p);
298 		ecc_enable_intr(pci_p);
299 	}
300 
301 	if (CHIP_TYPE(pci_p) != PCI_CHIP_SCHIZO)
302 		pbm_p->pbm_sync_ino = pci_p->pci_inos[CBNINTR_PBM];
303 	if (ret = pbm_register_intr(pbm_p)) {
304 		if (pci_p->pci_common_p->pci_common_refcnt == 0)
305 			intr_dist_rem(cb_intr_dist, cb_p);
306 		goto teardown;
307 	}
308 	intr_dist_add(pbm_intr_dist, pbm_p);
309 	ib_intr_enable(pci_p, pci_p->pci_inos[CBNINTR_PBM]);
310 	ib_intr_enable(pci_p, pci_p->pci_inos[CBNINTR_CDMA]);
311 
312 	intr_dist_add_weighted(ib_intr_dist_all, pci_p->pci_ib_p);
313 	return (DDI_SUCCESS);
314 teardown:
315 	pci_intr_teardown(pci_p);
316 	return (ret);
317 }
318 
319 uint64_t
320 pci_sc_configure(pci_t *pci_p)
321 {
322 	int instance;
323 	dev_info_t *dip = pci_p->pci_dip;
324 
325 	instance = ddi_get_instance(dip);
326 	if ((pci_xmits_sc_max_prf & (1 << instance)) &&
327 	    (CHIP_TYPE(pci_p) == PCI_CHIP_XMITS))
328 		return (XMITS_SC_MAX_PRF);
329 	else
330 		return (0);
331 }
332 
333 static void
334 pci_schizo_cdma_sync(pbm_t *pbm_p)
335 {
336 	pci_t *pci_p = pbm_p->pbm_pci_p;
337 	hrtime_t start_time;
338 	volatile uint64_t *clr_p = ib_clear_intr_reg_addr(pci_p->pci_ib_p,
339 		pci_p->pci_inos[CBNINTR_CDMA]);
340 	uint32_t fail_cnt = pci_cdma_intr_count;
341 
342 	mutex_enter(&pbm_p->pbm_sync_mutex);
343 #ifdef PBM_CDMA_DEBUG
344 	pbm_p->pbm_cdma_req_cnt++;
345 #endif /* PBM_CDMA_DEBUG */
346 	pbm_p->pbm_cdma_flag = PBM_CDMA_PEND;
347 	IB_INO_INTR_TRIG(clr_p);
348 wait:
349 	start_time = gethrtime();
350 	while (pbm_p->pbm_cdma_flag != PBM_CDMA_DONE) {
351 		if (gethrtime() - start_time <= pci_cdma_intr_timeout)
352 			continue;
353 		if (--fail_cnt > 0)
354 			goto wait;
355 		if (pbm_p->pbm_cdma_flag == PBM_CDMA_DONE)
356 			break;
357 		cmn_err(CE_PANIC, "%s (%s): consistent dma sync timeout",
358 		    pbm_p->pbm_nameinst_str, pbm_p->pbm_nameaddr_str);
359 	}
360 #ifdef PBM_CDMA_DEBUG
361 	if (pbm_p->pbm_cdma_flag != PBM_CDMA_DONE)
362 		pbm_p->pbm_cdma_to_cnt++;
363 	else {
364 		start_time = gethrtime() - start_time;
365 		pbm_p->pbm_cdma_success_cnt++;
366 		pbm_p->pbm_cdma_latency_sum += start_time;
367 		if (start_time > pbm_p->pbm_cdma_latency_max)
368 			pbm_p->pbm_cdma_latency_max = start_time;
369 	}
370 #endif /* PBM_CDMA_DEBUG */
371 	mutex_exit(&pbm_p->pbm_sync_mutex);
372 }
373 
374 #if !defined(lint)
375 #include <sys/cpuvar.h>
376 #endif
377 
378 #define	SYNC_HW_BUSY(pa, mask)	(lddphysio(pa) & (mask))
379 
380 /*
381  * Consistent DMA Sync/Flush
382  *
383  * XMITS and Tomatillo use multi-threaded sync/flush register.
384  * Called from interrupt wrapper: the associated ino is used to index
385  *	the distinctive register bit.
386  * Called from pci_dma_sync(): the bit belongs to PBM is shared
387  *	for all calls from pci_dma_sync(). Xmits requires serialization
388  *	while Tomatillo does not.
389  */
390 void
391 pci_pbm_dma_sync(pbm_t *pbm_p, ib_ino_t ino)
392 {
393 	pci_t *pci_p = pbm_p->pbm_pci_p;
394 	hrtime_t start_time;
395 	uint64_t ino_mask, sync_reg_pa;
396 	volatile uint64_t flag_val;
397 	uint32_t locked, chip_type = CHIP_TYPE(pci_p);
398 	int	i;
399 
400 	if (chip_type == PCI_CHIP_SCHIZO) {
401 		pci_schizo_cdma_sync(pbm_p);
402 		return;
403 	}
404 
405 	sync_reg_pa = pbm_p->pbm_sync_reg_pa;
406 
407 	locked = 0;
408 	if (((chip_type == PCI_CHIP_XMITS) && (ino == pbm_p->pbm_sync_ino)) ||
409 	    pci_sync_lock) {
410 		locked = 1;
411 		mutex_enter(&pbm_p->pbm_sync_mutex);
412 	}
413 	ino_mask = 1ull << ino;
414 	stdphysio(sync_reg_pa, ino_mask);
415 
416 	for (i = 0; i < 5; i++) {
417 		if ((flag_val = SYNC_HW_BUSY(sync_reg_pa, ino_mask)) == 0)
418 			goto done;
419 	}
420 
421 	start_time = gethrtime();
422 	for (; (flag_val = SYNC_HW_BUSY(sync_reg_pa, ino_mask)) != 0; i++) {
423 		if (gethrtime() - start_time > pci_sync_buf_timeout)
424 			break;
425 	}
426 
427 	if (flag_val && SYNC_HW_BUSY(sync_reg_pa, ino_mask) && !panicstr)
428 		cmn_err(CE_PANIC, "%s: pbm dma sync %lx,%lx timeout!",
429 			pbm_p->pbm_nameaddr_str, sync_reg_pa, flag_val);
430 done:
431 	/* optional: stdphysio(sync_reg_pa - 8, ino_mask); */
432 	if (locked)
433 		mutex_exit(&pbm_p->pbm_sync_mutex);
434 
435 	if (tomatillo_store_store_wrka) {
436 #if !defined(lint)
437 		kpreempt_disable();
438 #endif
439 		tomatillo_store_store_order();
440 #if !defined(lint)
441 		kpreempt_enable();
442 #endif
443 	}
444 
445 }
446 
447 /*ARGSUSED*/
448 void
449 pci_fix_ranges(pci_ranges_t *rng_p, int rng_entries)
450 {
451 }
452 
453 /*
454  * map_pci_registers
455  *
456  * This function is called from the attach routine to map the registers
457  * accessed by this driver.
458  *
459  * used by: pci_attach()
460  *
461  * return value: DDI_FAILURE on failure
462  */
463 int
464 map_pci_registers(pci_t *pci_p, dev_info_t *dip)
465 {
466 	ddi_device_acc_attr_t attr;
467 	int len;
468 
469 	attr.devacc_attr_version = DDI_DEVICE_ATTR_V0;
470 	attr.devacc_attr_dataorder = DDI_STRICTORDER_ACC;
471 
472 	attr.devacc_attr_endian_flags = DDI_NEVERSWAP_ACC;
473 
474 	/*
475 	 * Register set 0 is PCI CSR Base
476 	 */
477 	if (ddi_regs_map_setup(dip, 0, &pci_p->pci_address[0], 0, 0,
478 	    &attr, &pci_p->pci_ac[0]) != DDI_SUCCESS) {
479 		len = 0;
480 		goto fail;
481 	}
482 	/*
483 	 * Register set 1 is Schizo CSR Base
484 	 */
485 	if (ddi_regs_map_setup(dip, 1, &pci_p->pci_address[1], 0, 0,
486 	    &attr, &pci_p->pci_ac[1]) != DDI_SUCCESS) {
487 		len = 1;
488 		goto fail;
489 	}
490 
491 	/*
492 	 * The third register set contains the bridge's configuration
493 	 * header.  This header is at the very beginning of the bridge's
494 	 * configuration space.  This space has litte-endian byte order.
495 	 */
496 	attr.devacc_attr_endian_flags = DDI_STRUCTURE_LE_ACC;
497 	if (ddi_regs_map_setup(dip, 2, &pci_p->pci_address[2], 0,
498 	    PCI_CONF_HDR_SIZE, &attr, &pci_p->pci_ac[2]) != DDI_SUCCESS) {
499 		len = 2;
500 		goto fail;
501 	}
502 
503 	if (ddi_getproplen(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS,
504 	    "reg", &len) || (len / sizeof (pci_nexus_regspec_t) < 4))
505 		goto done;
506 
507 	/*
508 	 * The optional fourth register bank points to the
509 	 * interrupt concentrator registers.
510 	 */
511 	attr.devacc_attr_endian_flags = DDI_NEVERSWAP_ACC;
512 	if (ddi_regs_map_setup(dip, 3, &pci_p->pci_address[3], 0,
513 	    0, &attr, &pci_p->pci_ac[3]) != DDI_SUCCESS) {
514 		len = 3;
515 		goto fail;
516 	}
517 
518 done:
519 	DEBUG4(DBG_ATTACH, dip, "address (%p,%p,%p,%p)\n",
520 	    pci_p->pci_address[0], pci_p->pci_address[1],
521 	    pci_p->pci_address[2], pci_p->pci_address[3]);
522 
523 	return (DDI_SUCCESS);
524 
525 
526 fail:
527 	cmn_err(CE_WARN, "%s%d: unable to map reg entry %d\n",
528 		ddi_driver_name(dip), ddi_get_instance(dip), len);
529 	for (; len--; ddi_regs_map_free(&pci_p->pci_ac[len]));
530 	return (DDI_FAILURE);
531 }
532 
533 /*
534  * unmap_pci_registers:
535  *
536  * This routine unmap the registers mapped by map_pci_registers.
537  *
538  * used by: pci_detach()
539  *
540  * return value: none
541  */
542 void
543 unmap_pci_registers(pci_t *pci_p)
544 {
545 	int i;
546 
547 	for (i = 0; i < 4; i++) {
548 		if (pci_p->pci_ac[i])
549 			ddi_regs_map_free(&pci_p->pci_ac[i]);
550 	}
551 }
552 
553 uint64_t
554 ib_get_map_reg(ib_mondo_t mondo, uint32_t cpu_id)
555 {
556 	uint32_t agent_id;
557 	uint32_t node_id;
558 
559 	/* ensure that cpu_id is only 10 bits. */
560 	ASSERT((cpu_id & ~0x3ff) == 0);
561 
562 	agent_id = cpu_id & 0x1f;
563 	node_id = (cpu_id >> 5) & 0x1f;
564 
565 	return ((mondo) | (agent_id << COMMON_INTR_MAP_REG_TID_SHIFT) |
566 	    (node_id << SCHIZO_INTR_MAP_REG_NID_SHIFT) |
567 	    COMMON_INTR_MAP_REG_VALID);
568 }
569 
570 uint32_t
571 ib_map_reg_get_cpu(volatile uint64_t reg)
572 {
573 	return (((reg & COMMON_INTR_MAP_REG_TID) >>
574 		COMMON_INTR_MAP_REG_TID_SHIFT) |
575 			((reg & SCHIZO_INTR_MAP_REG_NID) >>
576 			(SCHIZO_INTR_MAP_REG_NID_SHIFT-5)));
577 }
578 
579 uint64_t *
580 ib_intr_map_reg_addr(ib_t *ib_p, ib_ino_t ino)
581 {
582 	/*
583 	 * Schizo maps all interrupts in one contiguous area.
584 	 * (PCI_CSRBase + 0x00.1000 + INO * 8).
585 	 */
586 	return ((uint64_t *)(ib_p->ib_intr_map_regs) + (ino & 0x3f));
587 }
588 
589 uint64_t *
590 ib_clear_intr_reg_addr(ib_t *ib_p, ib_ino_t ino)	/* XXX - needs work */
591 {
592 	/*
593 	 * Schizo maps clear intr. registers in contiguous area.
594 	 * (PCI_CSRBase + 0x00.1400 + INO * 8).
595 	 */
596 	return ((uint64_t *)(ib_p->ib_slot_clear_intr_regs) + (ino & 0x3f));
597 }
598 
599 /*
600  * schizo does not have mapping register per slot, so no sharing
601  * is done.
602  */
603 /*ARGSUSED*/
604 void
605 ib_ino_map_reg_share(ib_t *ib_p, ib_ino_t ino, ib_ino_info_t *ino_p)
606 {
607 }
608 
609 /*
610  * return true if there are interrupts using this mapping register
611  */
612 /*ARGSUSED*/
613 int
614 ib_ino_map_reg_unshare(ib_t *ib_p, ib_ino_t ino, ib_ino_info_t *ino_p)
615 {
616 	return (ino_p->ino_ipil_size);
617 }
618 
619 void
620 pci_pbm_intr_dist(pbm_t *pbm_p)
621 {
622 	pci_t *pci_p = pbm_p->pbm_pci_p;
623 	ib_t *ib_p = pci_p->pci_ib_p;
624 	ib_ino_t ino = IB_MONDO_TO_INO(pci_p->pci_inos[CBNINTR_CDMA]);
625 
626 	mutex_enter(&pbm_p->pbm_sync_mutex);
627 	ib_intr_dist_nintr(ib_p, ino, ib_intr_map_reg_addr(ib_p, ino));
628 	mutex_exit(&pbm_p->pbm_sync_mutex);
629 }
630 
631 uint32_t
632 pci_xlate_intr(dev_info_t *dip, dev_info_t *rdip, ib_t *ib_p, uint32_t intr)
633 {
634 	return (IB_INO_TO_MONDO(ib_p, intr));
635 }
636 
637 
638 /*
639  * Return the cpuid to to be used for an ino.  We have no special cpu
640  * assignment constraints for this nexus, so just call intr_dist_cpuid().
641  */
642 /* ARGSUSED */
643 uint32_t
644 pci_intr_dist_cpuid(ib_t *ib_p, ib_ino_info_t *ino_p)
645 {
646 	return (intr_dist_cpuid());
647 }
648 
649 void
650 pci_cb_teardown(pci_t *pci_p)
651 {
652 	cb_t 	*cb_p = pci_p->pci_cb_p;
653 	uint32_t mondo;
654 
655 	if (!pci_buserr_interrupt)
656 		return;
657 
658 	mondo = ((pci_p->pci_cb_p->cb_ign  << PCI_INO_BITS) |
659 	    pci_p->pci_inos[CBNINTR_BUS_ERROR]);
660 	mondo = CB_MONDO_TO_XMONDO(pci_p->pci_cb_p, mondo);
661 
662 	cb_disable_nintr(cb_p, CBNINTR_BUS_ERROR, IB_INTR_WAIT);
663 	VERIFY(rem_ivintr(mondo, pci_pil[CBNINTR_BUS_ERROR]) == 0);
664 }
665 
666 int
667 cb_register_intr(pci_t *pci_p)
668 {
669 	uint32_t mondo;
670 
671 	if (!pci_buserr_interrupt)
672 		return (DDI_SUCCESS);
673 
674 	mondo = ((pci_p->pci_cb_p->cb_ign << PCI_INO_BITS) |
675 	    pci_p->pci_inos[CBNINTR_BUS_ERROR]);
676 	mondo = CB_MONDO_TO_XMONDO(pci_p->pci_cb_p, mondo);
677 
678 	VERIFY(add_ivintr(mondo, pci_pil[CBNINTR_BUS_ERROR],
679 	    (intrfunc)cb_buserr_intr, (caddr_t)pci_p->pci_cb_p,
680 	    NULL, NULL) == 0);
681 
682 	return (PCI_ATTACH_RETCODE(PCI_CB_OBJ, PCI_OBJ_INTR_ADD, DDI_SUCCESS));
683 }
684 
685 void
686 cb_enable_intr(pci_t *pci_p)
687 {
688 	if (pci_buserr_interrupt)
689 		cb_enable_nintr(pci_p, CBNINTR_BUS_ERROR);
690 }
691 
692 uint64_t
693 cb_ino_to_map_pa(cb_t *cb_p, ib_ino_t ino)
694 {
695 	return (cb_p->cb_map_pa + (ino << 3));
696 }
697 
698 uint64_t
699 cb_ino_to_clr_pa(cb_t *cb_p, ib_ino_t ino)
700 {
701 	return (cb_p->cb_clr_pa + (ino << 3));
702 }
703 
704 /*
705  * Useful on psycho only.
706  */
707 int
708 cb_remove_xintr(pci_t *pci_p, dev_info_t *dip, dev_info_t *rdip, ib_ino_t ino,
709 ib_mondo_t mondo)
710 {
711 	return (DDI_FAILURE);
712 }
713 
714 void
715 pbm_configure(pbm_t *pbm_p)
716 {
717 	pci_t *pci_p = pbm_p->pbm_pci_p;
718 	dev_info_t *dip = pbm_p->pbm_pci_p->pci_dip;
719 	int instance = ddi_get_instance(dip);
720 	uint64_t l;
721 	uint64_t mask = 1ll << instance;
722 	ushort_t s = 0;
723 
724 	l = *pbm_p->pbm_ctrl_reg;	/* save control register state */
725 	DEBUG1(DBG_ATTACH, dip, "pbm_configure: ctrl reg=%llx\n", l);
726 
727 	/*
728 	 * See if any SERR# signals are asserted.  We'll clear them later.
729 	 */
730 	if (l & COMMON_PCI_CTRL_SERR)
731 		cmn_err(CE_WARN, "%s%d: SERR asserted on pci bus\n",
732 		    ddi_driver_name(dip), instance);
733 
734 	/*
735 	 * Determine if PCI bus is running at 33 or 66 mhz.
736 	 */
737 	if (l & COMMON_PCI_CTRL_SPEED)
738 		pbm_p->pbm_speed = PBM_SPEED_66MHZ;
739 	else
740 		pbm_p->pbm_speed = PBM_SPEED_33MHZ;
741 	DEBUG1(DBG_ATTACH, dip, "pbm_configure: %d mhz\n",
742 	    pbm_p->pbm_speed  == PBM_SPEED_66MHZ ? 66 : 33);
743 
744 	if (pci_set_dto_value & mask) {
745 		l &= ~(3ull << SCHIZO_PCI_CTRL_PTO_SHIFT);
746 		l |= pci_dto_value << SCHIZO_PCI_CTRL_PTO_SHIFT;
747 	} else if (PCI_CHIP_ID(pci_p) >= TOMATILLO_VER_21) {
748 		l |= (3ull << SCHIZO_PCI_CTRL_PTO_SHIFT);
749 	}
750 
751 	/*
752 	 * Enable error interrupts.
753 	 */
754 	if (pci_error_intr_enable & mask)
755 		l |= SCHIZO_PCI_CTRL_ERR_INT_EN;
756 	else
757 		l &= ~SCHIZO_PCI_CTRL_ERR_INT_EN;
758 
759 	/*
760 	 * Enable pci streaming byte errors and error interrupts.
761 	 */
762 	if (pci_sbh_error_intr_enable & mask)
763 		l |= SCHIZO_PCI_CTRL_SBH_INT_EN;
764 	else
765 		l &= ~SCHIZO_PCI_CTRL_SBH_INT_EN;
766 
767 	/*
768 	 * Enable pci discard timeout error interrupt.
769 	 */
770 	if (pci_mmu_error_intr_enable & mask)
771 		l |= SCHIZO_PCI_CTRL_MMU_INT_EN;
772 	else
773 		l &= ~SCHIZO_PCI_CTRL_MMU_INT_EN;
774 
775 	/*
776 	 * Enable PCI-X error interrupts.
777 	 */
778 	if (CHIP_TYPE(pci_p) == PCI_CHIP_XMITS) {
779 
780 		if (xmits_error_intr_enable & mask)
781 			l |= XMITS_PCI_CTRL_X_ERRINT_EN;
782 		else
783 			l &= ~XMITS_PCI_CTRL_X_ERRINT_EN;
784 		/*
785 		 * Panic if older XMITS hardware is found.
786 		 */
787 		if (*pbm_p->pbm_ctrl_reg & XMITS_PCI_CTRL_X_MODE)
788 			if (PCI_CHIP_ID(pci_p) <= XMITS_VER_10)
789 				cmn_err(CE_PANIC, "%s (%s): PCIX mode "
790 				"unsupported on XMITS version %d\n",
791 				    pbm_p->pbm_nameinst_str,
792 				    pbm_p->pbm_nameaddr_str, CHIP_VER(pci_p));
793 
794 		if (xmits_perr_recov_int_enable) {
795 			if (PCI_CHIP_ID(pci_p) >= XMITS_VER_30) {
796 				uint64_t pcix_err;
797 				/*
798 				 * Enable interrupt on PERR
799 				 */
800 				pcix_err = *pbm_p->pbm_pcix_err_stat_reg;
801 				pcix_err |= XMITS_PCIX_STAT_PERR_RECOV_INT_EN;
802 				pcix_err &= ~XMITS_PCIX_STAT_SERR_ON_PERR;
803 				*pbm_p->pbm_pcix_err_stat_reg = pcix_err;
804 			}
805 		}
806 
807 		/*
808 		 * Enable parity error detection on internal memories
809 		 */
810 		*pbm_p->pbm_pci_ped_ctrl = 0x3fff;
811 	}
812 
813 	/*
814 	 * Enable/disable bus parking.
815 	 */
816 	if ((pci_bus_parking_enable & mask) &&
817 	    !ddi_prop_exists(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS,
818 	    "no-bus-parking"))
819 		l |= SCHIZO_PCI_CTRL_ARB_PARK;
820 	else
821 		l &= ~SCHIZO_PCI_CTRL_ARB_PARK;
822 
823 	/*
824 	 * Enable arbitration.
825 	 */
826 	l |= PCI_CHIP_ID(pci_p) == XMITS_VER_10 ? XMITS10_PCI_CTRL_ARB_EN_MASK :
827 		SCHIZO_PCI_CTRL_ARB_EN_MASK;
828 
829 	/*
830 	 * Make sure SERR is clear
831 	 */
832 	l |= COMMON_PCI_CTRL_SERR;
833 
834 
835 	/*
836 	 * Enable DTO interrupt, if desired.
837 	 */
838 
839 	if (PCI_CHIP_ID(pci_p) <= TOMATILLO_VER_20 || (pci_dto_intr_enable &
840 	    mask))
841 		l |=	 (TOMATILLO_PCI_CTRL_DTO_INT_EN);
842 	else
843 		l &=	 ~(TOMATILLO_PCI_CTRL_DTO_INT_EN);
844 
845 	l |= TOMATILLO_PCI_CTRL_PEN_RD_MLTPL |
846 		TOMATILLO_PCI_CTRL_PEN_RD_ONE |
847 		TOMATILLO_PCI_CTRL_PEN_RD_LINE;
848 
849 	/*
850 	 * Now finally write the control register with the appropriate value.
851 	 */
852 	DEBUG1(DBG_ATTACH, dip, "pbm_configure: ctrl reg=%llx\n", l);
853 	*pbm_p->pbm_ctrl_reg = l;
854 
855 	/*
856 	 * Enable IO Prefetch on Tomatillo
857 	 */
858 	if (CHIP_TYPE(pci_p) == PCI_CHIP_TOMATILLO) {
859 		volatile uint64_t *ioc_csr_p = pbm_p->pbm_ctrl_reg +
860 			((TOMATILLO_IOC_CSR_OFF -
861 			SCHIZO_PCI_CTRL_REG_OFFSET) >> 3);
862 		*ioc_csr_p = TOMATILLO_WRT_PEN |
863 			(1 << TOMATILLO_POFFSET_SHIFT) |
864 			TOMATILLO_C_PEN_RD_MLTPL |
865 			TOMATILLO_C_PEN_RD_ONE |
866 			TOMATILLO_C_PEN_RD_LINE;
867 	}
868 
869 	/*
870 	 * Allow DMA write parity errors to generate an interrupt.
871 	 * This is implemented on Schizo 2.5 and greater and XMITS 3.0
872 	 * and greater.  Setting this on earlier versions of XMITS 3.0
873 	 * has no affect.
874 	 */
875 	if (((CHIP_TYPE(pci_p) == PCI_CHIP_SCHIZO) &&
876 	    PCI_CHIP_ID(pci_p) >= SCHIZO_VER_25) ||
877 	    (CHIP_TYPE(pci_p) == PCI_CHIP_XMITS)) {
878 		volatile uint64_t *pbm_icd = pbm_p->pbm_ctrl_reg +
879 		    ((SCHIZO_PERF_PCI_ICD_OFFSET -
880 		    SCHIZO_PCI_CTRL_REG_OFFSET) >> 3);
881 
882 		*pbm_icd |= SCHIZO_PERF_PCI_ICD_DMAW_PARITY_INT_ENABLE;
883 	}
884 
885 	/*
886 	 * Clear any PBM errors.
887 	 */
888 	l = (SCHIZO_PCI_AFSR_E_MASK << SCHIZO_PCI_AFSR_PE_SHIFT) |
889 		(SCHIZO_PCI_AFSR_E_MASK << SCHIZO_PCI_AFSR_SE_SHIFT);
890 	*pbm_p->pbm_async_flt_status_reg = l;
891 
892 	/*
893 	 * Allow the diag register to be set based upon variable that
894 	 * can be configured via /etc/system.
895 	 */
896 	l = *pbm_p->pbm_diag_reg;
897 	DEBUG1(DBG_ATTACH, dip, "pbm_configure: PCI diag reg=%llx\n", l);
898 
899 	/*
900 	 * Enable/disable retry limit.
901 	 */
902 	if (pci_retry_disable & mask)
903 		l |= COMMON_PCI_DIAG_DIS_RETRY;
904 	else
905 		l &= ~COMMON_PCI_DIAG_DIS_RETRY;
906 
907 	/*
908 	 * Enable/disable DMA write/interrupt synchronization.
909 	 */
910 	if (pci_intsync_disable & mask)
911 		l |= COMMON_PCI_DIAG_DIS_INTSYNC;
912 	else
913 		l &= ~COMMON_PCI_DIAG_DIS_INTSYNC;
914 
915 	/*
916 	 * Enable/disable retry arbitration priority.
917 	 */
918 	if (pci_enable_retry_arb & mask)
919 		l &= ~SCHIZO_PCI_DIAG_DIS_RTRY_ARB;
920 	else
921 		l |= SCHIZO_PCI_DIAG_DIS_RTRY_ARB;
922 
923 	DEBUG1(DBG_ATTACH, dip, "pbm_configure: PCI diag reg=%llx\n", l);
924 	*pbm_p->pbm_diag_reg = l;
925 
926 	/*
927 	 * Enable SERR# and parity reporting via command register.
928 	 */
929 	s = pci_perr_enable & mask ? PCI_COMM_PARITY_DETECT : 0;
930 	s |= pci_serr_enable & mask ? PCI_COMM_SERR_ENABLE : 0;
931 
932 	DEBUG1(DBG_ATTACH, dip, "pbm_configure: conf command reg=%x\n", s);
933 	pbm_p->pbm_config_header->ch_command_reg = s;
934 
935 	/*
936 	 * Clear error bits in configuration status register.
937 	 */
938 	s = PCI_STAT_PERROR | PCI_STAT_S_PERROR |
939 		PCI_STAT_R_MAST_AB | PCI_STAT_R_TARG_AB |
940 		PCI_STAT_S_TARG_AB | PCI_STAT_S_PERROR;
941 	DEBUG1(DBG_ATTACH, dip, "pbm_configure: conf status reg=%x\n", s);
942 	pbm_p->pbm_config_header->ch_status_reg = s;
943 
944 	/*
945 	 * The current versions of the obp are suppose to set the latency
946 	 * timer register but do not.  Bug 1234181 is open against this
947 	 * problem.  Until this bug is fixed we check to see if the obp
948 	 * has attempted to set the latency timer register by checking
949 	 * for the existence of a "latency-timer" property.
950 	 */
951 	if (pci_set_latency_timer_register) {
952 		DEBUG1(DBG_ATTACH, dip,
953 		    "pbm_configure: set schizo latency timer to %x\n",
954 			pci_latency_timer);
955 		pbm_p->pbm_config_header->ch_latency_timer_reg =
956 			pci_latency_timer;
957 	}
958 
959 	(void) ndi_prop_update_int(DDI_DEV_T_ANY, dip, "latency-timer",
960 		(int)pbm_p->pbm_config_header->ch_latency_timer_reg);
961 
962 	/*
963 	 * Adjust xmits_upper_retry_counter if set in /etc/system
964 	 *
965 	 * NOTE: current implementation resets UPPR_RTRY counter for
966 	 * _all_ XMITS' PBMs and does not support tuning per PBM.
967 	 */
968 	if (CHIP_TYPE(pci_p) == PCI_CHIP_XMITS) {
969 		uint_t xurc = xmits_upper_retry_counter &
970 		    XMITS_UPPER_RETRY_MASK;
971 
972 		if (xurc) {
973 			*pbm_p->pbm_upper_retry_counter_reg = (uint64_t)xurc;
974 			DEBUG1(DBG_ATTACH, dip, "pbm_configure: Setting XMITS"
975 			    " uppr_rtry counter = 0x%lx\n",
976 			    *pbm_p->pbm_upper_retry_counter_reg);
977 		}
978 	}
979 }
980 
981 uint_t
982 pbm_disable_pci_errors(pbm_t *pbm_p)
983 {
984 	pci_t *pci_p = pbm_p->pbm_pci_p;
985 	ib_t *ib_p = pci_p->pci_ib_p;
986 
987 	/*
988 	 * Disable error and streaming byte hole interrupts via the
989 	 * PBM control register.
990 	 */
991 	*pbm_p->pbm_ctrl_reg &=
992 		~(SCHIZO_PCI_CTRL_ERR_INT_EN | SCHIZO_PCI_CTRL_SBH_INT_EN |
993 		SCHIZO_PCI_CTRL_MMU_INT_EN);
994 
995 	/*
996 	 * Disable error interrupts via the interrupt mapping register.
997 	 */
998 	ib_intr_disable(ib_p, pci_p->pci_inos[CBNINTR_PBM], IB_INTR_NOWAIT);
999 	return (BF_NONE);
1000 }
1001 
1002 /*
1003  * Layout of the dvma context bucket bitmap entry:
1004  *
1005  *	63 - 56		55 - 0
1006  *	8-bit lock	56-bit, each represent one context
1007  *	DCB_LOCK_BITS	DCB_BMAP_BITS
1008  */
1009 #define	DCB_LOCK_BITS	8
1010 #define	DCB_BMAP_BITS	(64 - DCB_LOCK_BITS)
1011 
1012 dvma_context_t
1013 pci_iommu_get_dvma_context(iommu_t *iommu_p, dvma_addr_t dvma_pg_index)
1014 {
1015 	dvma_context_t ctx;
1016 	int i = (dvma_pg_index >> 6) & 0x1f;	/* 5 bit index within bucket */
1017 	uint64_t ctx_mask, test = 1ull << i;
1018 	uint32_t bucket_no = dvma_pg_index & 0x3f;
1019 	uint64_t *bucket_ptr = iommu_p->iommu_ctx_bitmap + bucket_no;
1020 
1021 	uint32_t spl = ddi_enter_critical();	/* block interrupts */
1022 	if (ldstub((uint8_t *)bucket_ptr)) {	/* try lock */
1023 		ddi_exit_critical(spl);		/* unblock interrupt */
1024 		pci_iommu_ctx_lock_failure++;
1025 		return (0);
1026 	}
1027 
1028 	/* clear lock bits */
1029 	ctx_mask = (*bucket_ptr << DCB_LOCK_BITS) >> DCB_LOCK_BITS;
1030 	ASSERT(*bucket_ptr >> DCB_BMAP_BITS == 0xff);
1031 	ASSERT(ctx_mask >> DCB_BMAP_BITS == 0);
1032 
1033 	if (ctx_mask & test)			/* quick check i bit */
1034 		for (i = 0, test = 1ull; test & ctx_mask; test <<= 1, i++);
1035 	if (i < DCB_BMAP_BITS)
1036 		ctx_mask |= test;
1037 	*bucket_ptr = ctx_mask;			/* unlock */
1038 	ddi_exit_critical(spl);			/* unblock interrupts */
1039 
1040 	ctx = i < DCB_BMAP_BITS ? (bucket_no << 6) | i : 0;
1041 	DEBUG3(DBG_DMA_MAP, iommu_p->iommu_pci_p->pci_dip,
1042 		"get_dvma_context: ctx_mask=0x%x.%x ctx=0x%x\n",
1043 		(uint32_t)(ctx_mask >> 32), (uint32_t)ctx_mask, ctx);
1044 	return (ctx);
1045 }
1046 
1047 void
1048 pci_iommu_free_dvma_context(iommu_t *iommu_p, dvma_context_t ctx)
1049 {
1050 	uint64_t ctx_mask;
1051 	uint32_t spl, bucket_no = ctx >> 6;
1052 	int bit_no = ctx & 0x3f;
1053 	uint64_t *bucket_ptr = iommu_p->iommu_ctx_bitmap + bucket_no;
1054 
1055 	DEBUG1(DBG_DMA_MAP, iommu_p->iommu_pci_p->pci_dip,
1056 		"free_dvma_context: ctx=0x%x\n", ctx);
1057 
1058 	spl = ddi_enter_critical();			/* block interrupts */
1059 	while (ldstub((uint8_t *)bucket_ptr));		/* spin lock */
1060 	ctx_mask = (*bucket_ptr << DCB_LOCK_BITS) >> DCB_LOCK_BITS;
1061 							/* clear lock bits */
1062 	ASSERT(ctx_mask & (1ull << bit_no));
1063 	*bucket_ptr = ctx_mask ^ (1ull << bit_no);	/* clear & unlock */
1064 	ddi_exit_critical(spl);				/* unblock interrupt */
1065 }
1066 
1067 int
1068 pci_sc_ctx_inv(dev_info_t *dip, sc_t *sc_p, ddi_dma_impl_t *mp)
1069 {
1070 	dvma_context_t ctx = MP2CTX(mp);
1071 	volatile uint64_t *reg_addr = sc_p->sc_ctx_match_reg + ctx;
1072 	uint64_t matchreg;
1073 
1074 	if (!*reg_addr) {
1075 		DEBUG1(DBG_SC, dip, "ctx=%x no match\n", ctx);
1076 		return (DDI_SUCCESS);
1077 	}
1078 
1079 	*sc_p->sc_ctx_invl_reg = ctx;	/* 1st flush write */
1080 	matchreg = *reg_addr;		/* re-fetch after 1st flush */
1081 	if (!matchreg)
1082 		return (DDI_SUCCESS);
1083 
1084 	matchreg = (matchreg << SC_ENT_SHIFT) >> SC_ENT_SHIFT;	/* low 16-bit */
1085 	do {
1086 		if (matchreg & 1)
1087 			*sc_p->sc_ctx_invl_reg = ctx;
1088 		matchreg >>= 1;
1089 	} while (matchreg);
1090 
1091 	if (pci_ctx_no_compat || !*reg_addr)	/* compat: active ctx flush */
1092 		return (DDI_SUCCESS);
1093 
1094 	pci_ctx_unsuccess_count++;
1095 	if (pci_ctx_flush_warn)
1096 		cmn_err(pci_ctx_flush_warn, "%s%d: ctx flush unsuccessful\n",
1097 			NAMEINST(dip));
1098 	return (DDI_FAILURE);
1099 }
1100 
1101 void
1102 pci_cb_setup(pci_t *pci_p)
1103 {
1104 	dev_info_t *dip = pci_p->pci_dip;
1105 	cb_t *cb_p = pci_p->pci_cb_p;
1106 	uint64_t pa;
1107 	uint32_t chip_id = PCI_CHIP_ID(pci_p);
1108 	DEBUG1(DBG_ATTACH, dip, "cb_create: chip id %d\n", chip_id);
1109 
1110 	if (CHIP_TYPE(pci_p) == PCI_CHIP_TOMATILLO) {
1111 		if ((!tm_mtlb_gc_manual) &&
1112 		    (PCI_CHIP_ID(pci_p) <= TOMATILLO_VER_24))
1113 			tm_mtlb_gc = 1;
1114 
1115 		if (PCI_CHIP_ID(pci_p) <= TOMATILLO_VER_23) {
1116 			tomatillo_store_store_wrka = 1;
1117 			tomatillo_disallow_bypass = 1;
1118 			if (pci_spurintr_msgs == PCI_SPURINTR_MSG_DEFAULT)
1119 				pci_spurintr_msgs = 0;
1120 		}
1121 	}
1122 
1123 	if (chip_id == TOMATILLO_VER_20 || chip_id == TOMATILLO_VER_21)
1124 		cmn_err(CE_WARN, "Unsupported Tomatillo rev (%x)", chip_id);
1125 
1126 	if (chip_id < SCHIZO_VER_23)
1127 		pci_ctx_no_active_flush = 1;
1128 
1129 	cb_p->cb_node_id = PCI_ID_TO_NODEID(pci_p->pci_id);
1130 	cb_p->cb_ign	 = PCI_ID_TO_IGN(pci_p->pci_id);
1131 
1132 	/*
1133 	 * schizo control status reg bank is on the 2nd "reg" property entry
1134 	 * interrupt mapping/clear/state regs are on the 1st "reg" entry.
1135 	 *
1136 	 * ALL internal interrupts except pbm interrupts are shared by both
1137 	 * sides, 1st-side-attached is used as *the* owner.
1138 	 */
1139 	pa = (uint64_t)hat_getpfnum(kas.a_hat, pci_p->pci_address[1]);
1140 	cb_p->cb_base_pa = pa << MMU_PAGESHIFT;
1141 
1142 	pa = pci_p->pci_address[3] ?
1143 		(uint64_t)hat_getpfnum(kas.a_hat, pci_p->pci_address[3]) : 0;
1144 	cb_p->cb_icbase_pa = (pa == PFN_INVALID) ? 0 : pa << MMU_PAGESHIFT;
1145 
1146 	pa = (uint64_t)hat_getpfnum(kas.a_hat, pci_p->pci_address[0])
1147 		<< MMU_PAGESHIFT;
1148 	cb_p->cb_map_pa = pa + SCHIZO_IB_INTR_MAP_REG_OFFSET;
1149 	cb_p->cb_clr_pa = pa + SCHIZO_IB_CLEAR_INTR_REG_OFFSET;
1150 	cb_p->cb_obsta_pa = pa + COMMON_IB_OBIO_INTR_STATE_DIAG_REG;
1151 }
1152 
1153 void
1154 pci_ecc_setup(ecc_t *ecc_p)
1155 {
1156 	ecc_p->ecc_ue.ecc_errpndg_mask = SCHIZO_ECC_UE_AFSR_ERRPNDG;
1157 	ecc_p->ecc_ue.ecc_offset_mask = SCHIZO_ECC_UE_AFSR_QW_OFFSET;
1158 	ecc_p->ecc_ue.ecc_offset_shift = SCHIZO_ECC_UE_AFSR_QW_OFFSET_SHIFT;
1159 	ecc_p->ecc_ue.ecc_size_log2 = 4;
1160 
1161 	ecc_p->ecc_ce.ecc_errpndg_mask = SCHIZO_ECC_CE_AFSR_ERRPNDG;
1162 	ecc_p->ecc_ce.ecc_offset_mask = SCHIZO_ECC_CE_AFSR_QW_OFFSET;
1163 	ecc_p->ecc_ce.ecc_offset_shift = SCHIZO_ECC_CE_AFSR_QW_OFFSET_SHIFT;
1164 	ecc_p->ecc_ce.ecc_size_log2 = 4;
1165 }
1166 
1167 ushort_t
1168 pci_ecc_get_synd(uint64_t afsr)
1169 {
1170 	return ((ushort_t)((afsr & SCHIZO_ECC_CE_AFSR_SYND) >>
1171 	    SCHIZO_ECC_CE_AFSR_SYND_SHIFT));
1172 }
1173 
1174 /*
1175  * overwrite dvma end address (only on virtual-dma systems)
1176  * initialize tsb size
1177  * reset context bits
1178  * return: IOMMU CSR bank base address (VA)
1179  */
1180 
1181 uintptr_t
1182 pci_iommu_setup(iommu_t *iommu_p)
1183 {
1184 	pci_dvma_range_prop_t *dvma_prop;
1185 	int dvma_prop_len;
1186 
1187 	uintptr_t a;
1188 	pci_t *pci_p = iommu_p->iommu_pci_p;
1189 	dev_info_t *dip = pci_p->pci_dip;
1190 	uint_t tsb_size = iommu_tsb_cookie_to_size(pci_p->pci_tsb_cookie);
1191 	uint_t tsb_size_prop;
1192 
1193 	/*
1194 	 * Initializations for Tomatillo's micro TLB bug. errata #82
1195 	 */
1196 	if (tm_mtlb_gc) {
1197 		iommu_p->iommu_mtlb_nreq = 0;
1198 		iommu_p->iommu_mtlb_npgs = 0;
1199 		iommu_p->iommu_mtlb_maxpgs = tm_mtlb_maxpgs;
1200 		iommu_p->iommu_mtlb_req_p = (dvma_unbind_req_t *)
1201 		    kmem_zalloc(sizeof (dvma_unbind_req_t) *
1202 		    (tm_mtlb_maxpgs + 1), KM_SLEEP);
1203 		mutex_init(&iommu_p->iommu_mtlb_lock, NULL, MUTEX_DRIVER, NULL);
1204 	}
1205 
1206 	if (ddi_getlongprop(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS,
1207 		"virtual-dma", (caddr_t)&dvma_prop, &dvma_prop_len) !=
1208 		DDI_PROP_SUCCESS)
1209 		goto tsb_done;
1210 
1211 	if (dvma_prop_len != sizeof (pci_dvma_range_prop_t)) {
1212 		cmn_err(CE_WARN, "%s%d: invalid virtual-dma property",
1213 			ddi_driver_name(dip), ddi_get_instance(dip));
1214 		goto tsb_end;
1215 	}
1216 	iommu_p->iommu_dvma_end = dvma_prop->dvma_base +
1217 		(dvma_prop->dvma_len - 1);
1218 	tsb_size_prop = IOMMU_BTOP(dvma_prop->dvma_len) * sizeof (uint64_t);
1219 	tsb_size = MIN(tsb_size_prop, tsb_size);
1220 tsb_end:
1221 	kmem_free(dvma_prop, dvma_prop_len);
1222 tsb_done:
1223 	iommu_p->iommu_tsb_size = iommu_tsb_size_encode(tsb_size);
1224 	iommu_p->iommu_ctx_bitmap =
1225 		kmem_zalloc(IOMMU_CTX_BITMAP_SIZE, KM_SLEEP);
1226 	*iommu_p->iommu_ctx_bitmap = 1ull;	/* reserve context 0 */
1227 
1228 	/*
1229 	 * Determine the virtual address of the register block
1230 	 * containing the iommu control registers and determine
1231 	 * the virtual address of schizo specific iommu registers.
1232 	 */
1233 	a = (uintptr_t)pci_p->pci_address[0];
1234 	iommu_p->iommu_flush_ctx_reg =
1235 		(uint64_t *)(a + SCHIZO_IOMMU_FLUSH_CTX_REG_OFFSET);
1236 	if (CHIP_TYPE(pci_p) == PCI_CHIP_TOMATILLO)
1237 		iommu_p->iommu_tfar_reg =
1238 			(uint64_t *)(a + TOMATILLO_IOMMU_ERR_TFAR_OFFSET);
1239 	return (a);	/* PCICSRBase */
1240 }
1241 
1242 void
1243 pci_iommu_teardown(iommu_t *iommu_p)
1244 {
1245 	if (pci_use_contexts)
1246 		iommu_ctx_free(iommu_p);
1247 	if (iommu_p->iommu_mtlb_req_p) {
1248 		kmem_free(iommu_p->iommu_mtlb_req_p,
1249 		    sizeof (dvma_unbind_req_t) * (tm_mtlb_maxpgs + 1));
1250 		mutex_destroy(&iommu_p->iommu_mtlb_lock);
1251 		iommu_p->iommu_mtlb_req_p = NULL;
1252 		iommu_p->iommu_mtlb_nreq = 0;
1253 		iommu_p->iommu_mtlb_npgs = iommu_p->iommu_mtlb_maxpgs = 0;
1254 	}
1255 }
1256 
1257 uintptr_t
1258 get_pbm_reg_base(pci_t *pci_p)
1259 {
1260 	return ((uintptr_t)
1261 		(pci_p->pci_address[0] + SCHIZO_PCI_CTRL_REG_OFFSET));
1262 }
1263 
1264 /* ARGSUSED */
1265 static boolean_t
1266 pci_pbm_panic_callb(void *arg, int code)
1267 {
1268 	pbm_t *pbm_p = (pbm_t *)arg;
1269 	volatile uint64_t *ctrl_reg_p;
1270 
1271 	if (pbm_p->pbm_quiesce_count > 0) {
1272 		ctrl_reg_p = pbm_p->pbm_ctrl_reg;
1273 		*ctrl_reg_p = pbm_p->pbm_saved_ctrl_reg;
1274 	}
1275 
1276 	return (B_TRUE);
1277 }
1278 
1279 static boolean_t
1280 pci_pbm_debug_callb(void *arg, int code)
1281 {
1282 	pbm_t *pbm_p = (pbm_t *)arg;
1283 	volatile uint64_t *ctrl_reg_p;
1284 	uint64_t ctrl_reg;
1285 
1286 	if (pbm_p->pbm_quiesce_count > 0) {
1287 		ctrl_reg_p = pbm_p->pbm_ctrl_reg;
1288 		if (code == 0) {
1289 			*ctrl_reg_p = pbm_p->pbm_saved_ctrl_reg;
1290 		} else {
1291 			ctrl_reg = pbm_p->pbm_saved_ctrl_reg;
1292 			ctrl_reg &= ~(SCHIZO_PCI_CTRL_ARB_EN_MASK |
1293 			    SCHIZO_PCI_CTRL_ARB_PARK);
1294 			*ctrl_reg_p = ctrl_reg;
1295 		}
1296 	}
1297 
1298 	return (B_TRUE);
1299 }
1300 
1301 void
1302 pci_pbm_setup(pbm_t *pbm_p)
1303 {
1304 	pci_t *pci_p = pbm_p->pbm_pci_p;
1305 	caddr_t a = pci_p->pci_address[0]; /* PBM block base VA */
1306 	uint64_t pa = va_to_pa(a);
1307 	extern int segkmem_reloc;
1308 
1309 	mutex_init(&pbm_p->pbm_sync_mutex, NULL, MUTEX_DRIVER,
1310 	    (void *)ipltospl(XCALL_PIL));
1311 
1312 	pbm_p->pbm_config_header = (config_header_t *)pci_p->pci_address[2];
1313 	pbm_p->pbm_ctrl_reg = (uint64_t *)(a + SCHIZO_PCI_CTRL_REG_OFFSET);
1314 	pbm_p->pbm_diag_reg = (uint64_t *)(a + SCHIZO_PCI_DIAG_REG_OFFSET);
1315 	pbm_p->pbm_async_flt_status_reg =
1316 		(uint64_t *)(a + SCHIZO_PCI_ASYNC_FLT_STATUS_REG_OFFSET);
1317 	pbm_p->pbm_async_flt_addr_reg =
1318 		(uint64_t *)(a + SCHIZO_PCI_ASYNC_FLT_ADDR_REG_OFFSET);
1319 	pbm_p->pbm_estar_reg = (uint64_t *)(a + SCHIZO_PCI_ESTAR_REG_OFFSET);
1320 	pbm_p->pbm_pcix_err_stat_reg = (uint64_t *)(a +
1321 	    XMITS_PCI_X_ERROR_STATUS_REG_OFFSET);
1322 	pbm_p->pbm_pci_ped_ctrl = (uint64_t *)(a +
1323 	    XMITS_PARITY_DETECT_REG_OFFSET);
1324 
1325 	/*
1326 	 * Create a property to indicate that this node supports DVMA
1327 	 * page relocation.
1328 	 */
1329 	if (CHIP_TYPE(pci_p) != PCI_CHIP_TOMATILLO && segkmem_reloc != 0) {
1330 		pci_dvma_remap_enabled = 1;
1331 		(void) ndi_prop_create_boolean(DDI_DEV_T_NONE,
1332 		    pci_p->pci_dip, "dvma-remap-supported");
1333 	}
1334 
1335 	/*
1336 	 * Register a panic callback so we can unquiesce this bus
1337 	 * if it has been placed in the quiesced state.
1338 	 */
1339 	pbm_p->pbm_panic_cb_id = callb_add(pci_pbm_panic_callb,
1340 	    (void *)pbm_p, CB_CL_PANIC, "pci_panic");
1341 	pbm_p->pbm_debug_cb_id = callb_add(pci_pbm_panic_callb,
1342 	    (void *)pbm_p, CB_CL_ENTER_DEBUGGER, "pci_debug_enter");
1343 
1344 	if (CHIP_TYPE(pci_p) != PCI_CHIP_SCHIZO)
1345 		goto non_schizo;
1346 
1347 	if (PCI_CHIP_ID(pci_p) >= SCHIZO_VER_23) {
1348 
1349 		pbm_p->pbm_sync_reg_pa = pa + SCHIZO_PBM_DMA_SYNC_REG_OFFSET;
1350 
1351 		/*
1352 		 * This is a software workaround to fix schizo hardware bug.
1353 		 * Create a boolean property and its existence means consistent
1354 		 * dma sync should not be done while in prom. The usb polled
1355 		 * code (OHCI,EHCI) will check for this property and will not
1356 		 * do dma sync if this property exist.
1357 		 */
1358 		(void) ndi_prop_create_boolean(DDI_DEV_T_NONE,
1359 		    pci_p->pci_dip, "no-prom-cdma-sync");
1360 	}
1361 	return;
1362 non_schizo:
1363 	if (CHIP_TYPE(pci_p) == PCI_CHIP_TOMATILLO) {
1364 		pci_dvma_sync_before_unmap = 1;
1365 		pa = pci_p->pci_cb_p->cb_icbase_pa;
1366 	}
1367 	if (CHIP_TYPE(pci_p) == PCI_CHIP_XMITS)
1368 		pbm_p->pbm_upper_retry_counter_reg =
1369 		    (uint64_t *)(a + XMITS_UPPER_RETRY_COUNTER_REG_OFFSET);
1370 
1371 	pbm_p->pbm_sync_reg_pa = pa + PBM_DMA_SYNC_PEND_REG_OFFSET;
1372 }
1373 
1374 void
1375 pci_pbm_teardown(pbm_t *pbm_p)
1376 {
1377 	(void) callb_delete(pbm_p->pbm_panic_cb_id);
1378 	(void) callb_delete(pbm_p->pbm_debug_cb_id);
1379 }
1380 
1381 uintptr_t
1382 pci_ib_setup(ib_t *ib_p)
1383 {
1384 	/*
1385 	 * Determine virtual addresses of bridge specific registers,
1386 	 */
1387 	pci_t *pci_p = ib_p->ib_pci_p;
1388 	uintptr_t a = (uintptr_t)pci_p->pci_address[0];
1389 
1390 	ib_p->ib_ign = PCI_ID_TO_IGN(pci_p->pci_id);
1391 	ib_p->ib_max_ino = SCHIZO_MAX_INO;
1392 	ib_p->ib_slot_intr_map_regs = a + SCHIZO_IB_SLOT_INTR_MAP_REG_OFFSET;
1393 	ib_p->ib_intr_map_regs = a + SCHIZO_IB_INTR_MAP_REG_OFFSET;
1394 	ib_p->ib_slot_clear_intr_regs =
1395 		a + SCHIZO_IB_CLEAR_INTR_REG_OFFSET;
1396 	return (a);
1397 }
1398 
1399 void
1400 pci_sc_setup(sc_t *sc_p)
1401 {
1402 	pci_t *pci_p = sc_p->sc_pci_p;
1403 	uintptr_t a;
1404 
1405 	/*
1406 	 * Determine the virtual addresses of the stream cache
1407 	 * control/status and flush registers.
1408 	 */
1409 	a = (uintptr_t)pci_p->pci_address[0];	/* PCICSRBase */
1410 	sc_p->sc_ctrl_reg = (uint64_t *)(a + SCHIZO_SC_CTRL_REG_OFFSET);
1411 	sc_p->sc_invl_reg = (uint64_t *)(a + SCHIZO_SC_INVL_REG_OFFSET);
1412 	sc_p->sc_sync_reg = (uint64_t *)(a + SCHIZO_SC_SYNC_REG_OFFSET);
1413 	sc_p->sc_ctx_invl_reg = (uint64_t *)(a + SCHIZO_SC_CTX_INVL_REG_OFFSET);
1414 	sc_p->sc_ctx_match_reg =
1415 		(uint64_t *)(a + SCHIZO_SC_CTX_MATCH_REG_OFFSET);
1416 
1417 	/*
1418 	 * Determine the virtual addresses of the streaming cache
1419 	 * diagnostic access registers.
1420 	 */
1421 	sc_p->sc_data_diag_acc = (uint64_t *)(a + SCHIZO_SC_DATA_DIAG_OFFSET);
1422 	sc_p->sc_tag_diag_acc = (uint64_t *)(a + SCHIZO_SC_TAG_DIAG_OFFSET);
1423 	sc_p->sc_ltag_diag_acc = (uint64_t *)(a + SCHIZO_SC_LTAG_DIAG_OFFSET);
1424 }
1425 
1426 /*ARGSUSED*/
1427 int
1428 pci_get_numproxy(dev_info_t *dip)
1429 {
1430 	/*
1431 	 * Schizo does not support interrupt proxies.
1432 	 */
1433 	return (0);
1434 }
1435 
1436 /*
1437  * pcisch error handling 101:
1438  *
1439  * The various functions below are responsible for error handling. Given
1440  * a particular error, they must gather the appropriate state, report all
1441  * errors with correct payload, and attempt recovery where ever possible.
1442  *
1443  * Recovery in the context of this driver is being able notify a leaf device
1444  * of the failed transaction. This leaf device may either be the master or
1445  * target for this transaction and may have already received an error
1446  * notification via a PCI interrupt. Notification is done via DMA and access
1447  * handles. If we capture an address for the transaction then we can map it
1448  * to a handle(if the leaf device is fma-compliant) and fault the handle as
1449  * well as call the device driver registered callback.
1450  *
1451  * The hardware can either interrupt or trap upon detection of an error, in
1452  * some rare cases it also causes a fatal reset.
1453  *
1454  * cb_buserr_intr() is responsible for handling control block
1455  * errors(errors which stem from the host bus side of the bridge). Since
1456  * we support multiple chips and host bus standards, cb_buserr_intr will
1457  * call a bus specific error handler to report and handle the detected
1458  * error. Since this error can either affect or orginate from either of the
1459  * two PCI busses which are connected to the bridge, we need to call
1460  * pci_pbm_err_handler() for each bus as well to report their errors. We
1461  * also need to gather possible errors which have been detected by their
1462  * compliant children(via ndi_fm_handler_dispatch()).
1463  *
1464  * pbm_error_intr() and ecc_intr() are responsible for PCI Block Module
1465  * errors(generic PCI + bridge specific) and ECC errors, respectively. They
1466  * are common between pcisch and pcipsy and therefore exist in pci_pbm.c and
1467  * pci_ecc.c. To support error handling certain chip specific handlers
1468  * must exist and they are defined below.
1469  *
1470  * cpu_deferred_error() and cpu_async_error(), handle the traps that may
1471  * have originated from IO space. They call into the registered IO callbacks
1472  * to report and handle errors that may have caused the trap.
1473  *
1474  * pci_pbm_err_handler() is called by pbm_error_intr() or pci_err_callback()
1475  * (generic fma callback for pcipsy/pcisch, pci_fm.c). pci_err_callback() is
1476  * called when the CPU has trapped because of a possible IO error(TO/BERR/UE).
1477  * It will call pci_pbm_err_handler() to report and handle all PCI/PBM/IOMMU
1478  * related errors which are detected by the chip.
1479  *
1480  * pci_pbm_err_handler() calls a generic interface pbm_afsr_report()(pci_pbm.c)
1481  * to report the pbm specific errors and attempt to map the failed address
1482  * (if captured) to a device instance. pbm_afsr_report() calls a chip specific
1483  * interface to interpret the afsr bits pci_pbm_classify()(pcisch.c/pcipsy.c).
1484  * pci_pbm_err_handler() also calls iommu_err_handler() to handle IOMMU related
1485  * errors.
1486  *
1487  * iommu_err_handler() can recover from most errors, as long as the requesting
1488  * device is notified and the iommu can be flushed. If an IOMMU error occurs
1489  * due to a UE then it will be passed on to the ecc_err_handler() for
1490  * subsequent handling.
1491  *
1492  * ecc_err_handler()(pci_ecc.c) also calls a chip specific interface to
1493  * interpret the afsr, pci_ecc_classify(). ecc_err_handler() also calls
1494  * pci_pbm_err_handler() to report any pbm errors detected.
1495  *
1496  * To make sure that the trap code and the interrupt code are not going
1497  * to step on each others toes we have a per chip pci_fm_mutex. This also
1498  * makes it necessary for us to be caution while we are at a high PIL, so
1499  * that we do not cause a subsequent trap that causes us to hang.
1500  *
1501  * The attempt to commonize code was meant to keep in line with the current
1502  * pci driver implementation and it was not meant to confuse. If you are
1503  * confused then don't worry, I was too.
1504  *
1505  */
1506 static void
1507 pci_cb_errstate_get(cb_t *cb_p, cb_errstate_t *cb_err_p)
1508 {
1509 	uint64_t pa = cb_p->cb_base_pa;
1510 	int	i;
1511 
1512 	bzero(cb_err_p, sizeof (cb_errstate_t));
1513 
1514 	ASSERT(MUTEX_HELD(&cb_p->cb_pci_cmn_p->pci_fm_mutex));
1515 
1516 	cb_err_p->cb_bridge_type = PCI_BRIDGE_TYPE(cb_p->cb_pci_cmn_p);
1517 
1518 	cb_err_p->cb_csr = lddphysio(pa + SCHIZO_CB_CSR_OFFSET);
1519 	cb_err_p->cb_err = lddphysio(pa + SCHIZO_CB_ERRCTRL_OFFSET);
1520 	cb_err_p->cb_intr = lddphysio(pa + SCHIZO_CB_INTCTRL_OFFSET);
1521 	cb_err_p->cb_elog = lddphysio(pa + SCHIZO_CB_ERRLOG_OFFSET);
1522 	cb_err_p->cb_ecc = lddphysio(pa + SCHIZO_CB_ECCCTRL_OFFSET);
1523 	cb_err_p->cb_ue_afsr = lddphysio(pa + SCHIZO_CB_UEAFSR_OFFSET);
1524 	cb_err_p->cb_ue_afar = lddphysio(pa + SCHIZO_CB_UEAFAR_OFFSET);
1525 	cb_err_p->cb_ce_afsr = lddphysio(pa + SCHIZO_CB_CEAFSR_OFFSET);
1526 	cb_err_p->cb_ce_afar = lddphysio(pa + SCHIZO_CB_CEAFAR_OFFSET);
1527 
1528 	if ((CB_CHIP_TYPE((cb_t *)cb_p)) == PCI_CHIP_XMITS) {
1529 		cb_err_p->cb_first_elog = lddphysio(pa +
1530 				XMITS_CB_FIRST_ERROR_LOG);
1531 		cb_err_p->cb_first_eaddr = lddphysio(pa +
1532 				XMITS_CB_FIRST_ERROR_ADDR);
1533 		cb_err_p->cb_leaf_status = lddphysio(pa +
1534 				XMITS_CB_FIRST_ERROR_ADDR);
1535 	}
1536 
1537 	/* Gather PBM state information for both sides of this chip */
1538 	for (i = 0; i < 2; i++) {
1539 		if (cb_p->cb_pci_cmn_p->pci_p[i] == NULL)
1540 			continue;
1541 		pci_pbm_errstate_get(((cb_t *)cb_p)->cb_pci_cmn_p->
1542 					    pci_p[i], &cb_err_p->cb_pbm[i]);
1543 	}
1544 }
1545 
1546 static void
1547 pci_cb_clear_error(cb_t *cb_p, cb_errstate_t *cb_err_p)
1548 {
1549 	uint64_t pa = ((cb_t *)cb_p)->cb_base_pa;
1550 
1551 	stdphysio(pa + SCHIZO_CB_ERRLOG_OFFSET, cb_err_p->cb_elog);
1552 }
1553 
1554 static cb_fm_err_t safari_err_tbl[] = {
1555 	SAFARI_BAD_CMD,		SCHIZO_CB_ELOG_BAD_CMD,		CB_FATAL,
1556 	SAFARI_SSM_DIS,		SCHIZO_CB_ELOG_SSM_DIS,		CB_FATAL,
1557 	SAFARI_BAD_CMD_PCIA, 	SCHIZO_CB_ELOG_BAD_CMD_PCIA,	CB_FATAL,
1558 	SAFARI_BAD_CMD_PCIB, 	SCHIZO_CB_ELOG_BAD_CMD_PCIB,	CB_FATAL,
1559 	SAFARI_PAR_ERR_INT_PCIB, XMITS_CB_ELOG_PAR_ERR_INT_PCIB, CB_FATAL,
1560 	SAFARI_PAR_ERR_INT_PCIA, XMITS_CB_ELOG_PAR_ERR_INT_PCIA, CB_FATAL,
1561 	SAFARI_PAR_ERR_INT_SAF,	XMITS_CB_ELOG_PAR_ERR_INT_SAF,	CB_FATAL,
1562 	SAFARI_PLL_ERR_PCIB,	XMITS_CB_ELOG_PLL_ERR_PCIB,	CB_FATAL,
1563 	SAFARI_PLL_ERR_PCIA,	XMITS_CB_ELOG_PLL_ERR_PCIA,	CB_FATAL,
1564 	SAFARI_PLL_ERR_SAF,	XMITS_CB_ELOG_PLL_ERR_SAF,	CB_FATAL,
1565 	SAFARI_SAF_CIQ_TO,	SCHIZO_CB_ELOG_SAF_CIQ_TO,	CB_FATAL,
1566 	SAFARI_SAF_LPQ_TO,	SCHIZO_CB_ELOG_SAF_LPQ_TO,	CB_FATAL,
1567 	SAFARI_SAF_SFPQ_TO,	SCHIZO_CB_ELOG_SAF_SFPQ_TO,	CB_FATAL,
1568 	SAFARI_APERR,		SCHIZO_CB_ELOG_ADDR_PAR_ERR,	CB_FATAL,
1569 	SAFARI_UNMAP_ERR,	SCHIZO_CB_ELOG_UNMAP_ERR,	CB_FATAL,
1570 	SAFARI_BUS_ERR,		SCHIZO_CB_ELOG_BUS_ERR,		CB_FATAL,
1571 	SAFARI_TO_ERR,		SCHIZO_CB_ELOG_TO_ERR,		CB_FATAL,
1572 	SAFARI_DSTAT_ERR,	SCHIZO_CB_ELOG_DSTAT_ERR,	CB_FATAL,
1573 	SAFARI_SAF_UFPQ_TO,	SCHIZO_CB_ELOG_SAF_UFPQ_TO,	CB_FATAL,
1574 	SAFARI_CPU0_PAR_SINGLE,	SCHIZO_CB_ELOG_CPU0_PAR_SINGLE,	CB_FATAL,
1575 	SAFARI_CPU0_PAR_BIDI,	SCHIZO_CB_ELOG_CPU0_PAR_BIDI,	CB_FATAL,
1576 	SAFARI_CPU1_PAR_SINGLE,	SCHIZO_CB_ELOG_CPU1_PAR_SINGLE,	CB_FATAL,
1577 	SAFARI_CPU1_PAR_BIDI,	SCHIZO_CB_ELOG_CPU1_PAR_BIDI,	CB_FATAL,
1578 	NULL,			NULL,				NULL,
1579 };
1580 
1581 /*
1582  * Function used to handle and log Safari bus errors.
1583  */
1584 static int
1585 safari_err_handler(dev_info_t *dip, uint64_t fme_ena,
1586 		cb_errstate_t *cb_err_p)
1587 {
1588 	int	i;
1589 	int	fatal = 0;
1590 	pci_t *pci_p = get_pci_soft_state(ddi_get_instance(dip));
1591 	pci_common_t *cmn_p = pci_p->pci_common_p;
1592 
1593 	ASSERT(MUTEX_HELD(&cmn_p->pci_fm_mutex));
1594 
1595 	for (i = 0; safari_err_tbl[i].cb_err_class != NULL; i++) {
1596 		if (cb_err_p->cb_elog & safari_err_tbl[i].cb_reg_bit) {
1597 			cb_err_p->cb_err_class = safari_err_tbl[i].cb_err_class;
1598 			cb_ereport_post(dip, fme_ena, cb_err_p);
1599 			fatal += safari_err_tbl[i].cb_fatal;
1600 		}
1601 	}
1602 
1603 	if (fatal)
1604 		return (DDI_FM_FATAL);
1605 	return (DDI_FM_OK);
1606 
1607 }
1608 
1609 /*
1610  * Check pbm va log register for captured errant address, and fail handle
1611  * if in per device cache.
1612  * Called from jbus_err_handler.
1613  */
1614 static int
1615 jbus_check_va_log(cb_t *cb_p, uint64_t fme_ena,
1616     cb_errstate_t *cb_err_p)
1617 {
1618 	int i;
1619 	int ret = DDI_FM_FATAL;
1620 	pci_common_t *cmn_p = cb_p->cb_pci_cmn_p;
1621 
1622 	ASSERT(MUTEX_HELD(&cmn_p->pci_fm_mutex));
1623 	/*
1624 	 * Check VA log register for address associated with error,
1625 	 * if no address is registered then return failure
1626 	 */
1627 	for (i = 0; i < 2; i++) {
1628 
1629 		if (cb_p->cb_pci_cmn_p->pci_p[i] == NULL)
1630 			continue;
1631 		/*
1632 		 * Look up and fault handle associated with
1633 		 * logged DMA address
1634 		 */
1635 		if (cb_err_p->cb_pbm[i].pbm_va_log) {
1636 			void *addr = (void *)&cb_err_p->cb_pbm[i].pbm_va_log;
1637 			ret = ndi_fmc_error(cb_p->cb_pci_cmn_p->pci_p[i]->
1638 					pci_dip, NULL, DMA_HANDLE, fme_ena,
1639 					(void *)addr);
1640 			if (ret == DDI_FM_NONFATAL)
1641 				break;
1642 		}
1643 	}
1644 	return (ret);
1645 }
1646 
1647 static cb_fm_err_t jbus_err_tbl[] = {
1648 	JBUS_APERR,		SCHIZO_CB_ELOG_ADDR_PAR_ERR,	CB_FATAL,
1649 	JBUS_PWR_DATA_PERR,	TOMATILLO_CB_ELOG_WR_DATA_PAR_ERR, CB_FATAL,
1650 	JBUS_DRD_DATA_PERR,	TOMATILLO_CB_ELOG_RD_DATA_PAR_ERR, CB_NONFATAL,
1651 	JBUS_CTL_PERR,		TOMATILLO_CB_ELOG_CTL_PAR_ERR,	CB_FATAL,
1652 	JBUS_ILL_BYTE_EN,	TOMATILLO_CB_ELOG_ILL_BYTE_EN,	CB_FATAL,
1653 	JBUS_ILL_COH_IN,	TOMATILLO_CB_ELOG_ILL_COH_IN,	CB_FATAL,
1654 	JBUS_SNOOP_ERR_RD,	TOMATILLO_CB_ELOG_SNOOP_ERR_RD,	CB_FATAL,
1655 	JBUS_SNOOP_ERR_RDS,	TOMATILLO_CB_ELOG_SNOOP_ERR_RDS, CB_FATAL,
1656 	JBUS_SNOOP_ERR_RDSA,	TOMATILLO_CB_ELOG_SNOOP_ERR_RDSA, CB_FATAL,
1657 	JBUS_SNOOP_ERR_OWN,	TOMATILLO_CB_ELOG_SNOOP_ERR_OWN, CB_FATAL,
1658 	JBUS_SNOOP_ERR_RDO,	TOMATILLO_CB_ELOG_SNOOP_ERR_RDO, CB_FATAL,
1659 	JBUS_SNOOP_ERR_PCI,	TOMATILLO_CB_ELOG_SNOOP_ERR_PCI, CB_FATAL,
1660 	JBUS_SNOOP_ERR_GR,	TOMATILLO_CB_ELOG_SNOOP_ERR_GR,	CB_FATAL,
1661 	JBUS_SNOOP_ERR,		TOMATILLO_CB_ELOG_SNOOP_ERR,	CB_FATAL,
1662 	JBUS_BAD_CMD,		SCHIZO_CB_ELOG_BAD_CMD,		CB_FATAL,
1663 	JBUS_UNMAP_ERR,		SCHIZO_CB_ELOG_UNMAP_ERR,	CB_NONFATAL,
1664 	JBUS_TO_EXP_ERR,	TOMATILLO_CB_ELOG_TO_EXP_ERR,	CB_NONFATAL,
1665 	JBUS_TO_ERR,		SCHIZO_CB_ELOG_TO_ERR,		CB_NONFATAL,
1666 	JBUS_BUS_ERR,		SCHIZO_CB_ELOG_BUS_ERR,		CB_NONFATAL,
1667 	NULL,			NULL,				NULL,
1668 };
1669 
1670 /*
1671  * Function used to handle and log Jbus errors.
1672  */
1673 static int
1674 jbus_err_handler(dev_info_t *dip, uint64_t fme_ena,
1675     cb_errstate_t *cb_err_p)
1676 {
1677 	int	fatal = 0;
1678 	int	nonfatal = 0;
1679 	int	i;
1680 	pci_t	*pci_p = get_pci_soft_state(ddi_get_instance(dip));
1681 	cb_t	*cb_p = pci_p->pci_cb_p;
1682 
1683 	ASSERT(MUTEX_HELD(&pci_p->pci_common_p->pci_fm_mutex));
1684 
1685 	for (i = 0; jbus_err_tbl[i].cb_err_class != NULL; i++) {
1686 		if (!(cb_err_p->cb_elog & jbus_err_tbl[i].cb_reg_bit))
1687 			continue;
1688 		cb_err_p->cb_err_class = jbus_err_tbl[i].cb_err_class;
1689 		if (jbus_err_tbl[i].cb_fatal) {
1690 			fatal += jbus_err_tbl[i].cb_fatal;
1691 			continue;
1692 		}
1693 		if (jbus_check_va_log(cb_p, fme_ena, cb_err_p)
1694 				!= DDI_FM_NONFATAL) {
1695 			fatal++;
1696 		}
1697 		cb_ereport_post(dip, fme_ena, cb_err_p);
1698 	}
1699 
1700 	return (fatal ? DDI_FM_FATAL : (nonfatal ? DDI_FM_NONFATAL :
1701 				DDI_FM_OK));
1702 }
1703 
1704 /*
1705  * Control Block error interrupt handler.
1706  */
1707 uint_t
1708 cb_buserr_intr(caddr_t a)
1709 {
1710 	cb_t *cb_p = (cb_t *)a;
1711 	pci_common_t *cmn_p = cb_p->cb_pci_cmn_p;
1712 	pci_t *pci_p = cmn_p->pci_p[0];
1713 	cb_errstate_t cb_err;
1714 	ddi_fm_error_t derr;
1715 	int ret = DDI_FM_FATAL;
1716 	int i;
1717 
1718 	if (pci_p == NULL)
1719 		pci_p = cmn_p->pci_p[1];
1720 
1721 	bzero(&derr, sizeof (ddi_fm_error_t));
1722 	derr.fme_version = DDI_FME_VERSION;
1723 	derr.fme_ena = fm_ena_generate(0, FM_ENA_FMT1);
1724 
1725 	mutex_enter(&cmn_p->pci_fm_mutex);
1726 
1727 	pci_cb_errstate_get(cb_p, &cb_err);
1728 
1729 	if (CB_CHIP_TYPE(cb_p) == PCI_CHIP_TOMATILLO)
1730 		ret = jbus_err_handler(pci_p->pci_dip, derr.fme_ena, &cb_err);
1731 	else if ((CB_CHIP_TYPE(cb_p) == PCI_CHIP_SCHIZO) ||
1732 			(CB_CHIP_TYPE(cb_p) == PCI_CHIP_XMITS))
1733 		ret = safari_err_handler(pci_p->pci_dip, derr.fme_ena,
1734 		    &cb_err);
1735 
1736 	/*
1737 	 * Check for related errors in PBM and IOMMU. The IOMMU could cause
1738 	 * a timeout on the jbus due to an IOMMU miss, so we need to check and
1739 	 * log the IOMMU error registers.
1740 	 */
1741 	for (i = 0; i < 2; i++) {
1742 		if (cmn_p->pci_p[i] == NULL)
1743 			continue;
1744 		if (pci_pbm_err_handler(cmn_p->pci_p[i]->pci_dip, &derr,
1745 		    (void *)cmn_p->pci_p[i], PCI_CB_CALL) == DDI_FM_FATAL)
1746 			ret = DDI_FM_FATAL;
1747 	}
1748 
1749 	/* Cleanup and reset error bits */
1750 	(void) pci_cb_clear_error(cb_p, &cb_err);
1751 	mutex_exit(&cmn_p->pci_fm_mutex);
1752 
1753 	if (ret == DDI_FM_FATAL) {
1754 		fm_panic("Fatal System Bus Error has occurred\n");
1755 	}
1756 
1757 	return (DDI_INTR_CLAIMED);
1758 }
1759 
1760 static ecc_fm_err_t ecc_err_tbl[] = {
1761 	PCI_ECC_PIO_UE, COMMON_ECC_UE_AFSR_E_PIO, CBNINTR_UE,
1762 	PBM_PRIMARY, SCHIZO_ECC_AFAR_PIOW_UPA64S, SCH_REG_UPA,
1763 	ACC_HANDLE,
1764 
1765 	PCI_ECC_PIO_UE, COMMON_ECC_UE_AFSR_E_PIO, CBNINTR_UE,
1766 	PBM_PRIMARY, SCHIZO_ECC_AFAR_PIOW_PCIA_REG, SCH_REG_PCIA_REG,
1767 	ACC_HANDLE,
1768 
1769 	PCI_ECC_PIO_UE, COMMON_ECC_UE_AFSR_E_PIO, CBNINTR_UE,
1770 	PBM_PRIMARY, SCHIZO_ECC_AFAR_PIOW_PCIA_MEM, SCH_REG_PCIA_MEM,
1771 	ACC_HANDLE,
1772 
1773 	PCI_ECC_PIO_UE, COMMON_ECC_UE_AFSR_E_PIO, CBNINTR_UE,
1774 	PBM_PRIMARY, SCHIZO_ECC_AFAR_PIOW_PCIA_CFGIO, SCH_REG_PCIA_CFGIO,
1775 	ACC_HANDLE,
1776 
1777 	PCI_ECC_PIO_UE, COMMON_ECC_UE_AFSR_E_PIO, CBNINTR_UE,
1778 	PBM_PRIMARY, SCHIZO_ECC_AFAR_PIOW_PCIB_REG, SCH_REG_PCIB_REG,
1779 	ACC_HANDLE,
1780 
1781 	PCI_ECC_PIO_UE, COMMON_ECC_UE_AFSR_E_PIO, CBNINTR_UE,
1782 	PBM_PRIMARY, SCHIZO_ECC_AFAR_PIOW_PCIB_MEM, SCH_REG_PCIB_MEM,
1783 	ACC_HANDLE,
1784 
1785 	PCI_ECC_PIO_UE, COMMON_ECC_UE_AFSR_E_PIO, CBNINTR_UE,
1786 	PBM_PRIMARY, SCHIZO_ECC_AFAR_PIOW_PCIB_CFGIO, SCH_REG_PCIB_CFGIO,
1787 	ACC_HANDLE,
1788 
1789 	PCI_ECC_PIO_UE, COMMON_ECC_UE_AFSR_E_PIO, CBNINTR_UE,
1790 	PBM_PRIMARY, SCHIZO_ECC_AFAR_PIOW_SAFARI_REGS, SCH_REG_SAFARI_REGS,
1791 	ACC_HANDLE,
1792 
1793 	PCI_ECC_SEC_PIO_UE, COMMON_ECC_UE_AFSR_E_PIO,  CBNINTR_UE,
1794 	PBM_SECONDARY, NULL, NULL, ACC_HANDLE,
1795 
1796 	PCI_ECC_PIO_CE, COMMON_ECC_UE_AFSR_E_PIO,  CBNINTR_CE,
1797 	PBM_PRIMARY, NULL, NULL, ACC_HANDLE,
1798 
1799 	PCI_ECC_SEC_PIO_CE, COMMON_ECC_UE_AFSR_E_PIO,  CBNINTR_CE,
1800 	PBM_SECONDARY, NULL, NULL, ACC_HANDLE,
1801 
1802 	PCI_ECC_DRD_UE, COMMON_ECC_UE_AFSR_E_DRD, CBNINTR_UE,
1803 	PBM_PRIMARY, NULL, NULL, DMA_HANDLE,
1804 
1805 	PCI_ECC_SEC_DRD_UE, COMMON_ECC_UE_AFSR_E_DRD, CBNINTR_UE,
1806 	PBM_SECONDARY, NULL, NULL, DMA_HANDLE,
1807 
1808 	PCI_ECC_DRD_CE, COMMON_ECC_UE_AFSR_E_DRD, CBNINTR_CE,
1809 	PBM_PRIMARY, NULL, NULL, DMA_HANDLE,
1810 
1811 	PCI_ECC_SEC_DRD_CE, COMMON_ECC_UE_AFSR_E_DRD, CBNINTR_CE,
1812 	PBM_SECONDARY, NULL, NULL, DMA_HANDLE,
1813 
1814 	PCI_ECC_DWR_UE, COMMON_ECC_UE_AFSR_E_DWR, CBNINTR_UE,
1815 	PBM_PRIMARY, NULL, NULL, DMA_HANDLE,
1816 
1817 	PCI_ECC_SEC_DWR_UE, COMMON_ECC_UE_AFSR_E_DWR, CBNINTR_UE,
1818 	PBM_SECONDARY, NULL, NULL, DMA_HANDLE,
1819 
1820 	PCI_ECC_DWR_CE, COMMON_ECC_UE_AFSR_E_DWR, CBNINTR_CE,
1821 	PBM_PRIMARY, NULL, NULL, DMA_HANDLE,
1822 
1823 	PCI_ECC_SEC_DWR_CE, COMMON_ECC_UE_AFSR_E_DWR, CBNINTR_CE,
1824 	PBM_SECONDARY, NULL, NULL, DMA_HANDLE,
1825 
1826 	NULL, NULL, NULL, NULL, NULL, NULL,
1827 };
1828 
1829 /*
1830  * pci_ecc_classify, called by ecc_handler to classify ecc errors
1831  * and determine if we should panic or not.
1832  */
1833 void
1834 pci_ecc_classify(uint64_t err, ecc_errstate_t *ecc_err_p)
1835 {
1836 	struct async_flt *ecc_p = &ecc_err_p->ecc_aflt;
1837 	uint64_t region, afar = ecc_p->flt_addr;
1838 	int i, j, ret = 0;
1839 	int flag, fatal = 0;
1840 	pci_common_t *cmn_p = ecc_err_p->ecc_ii_p.ecc_p->ecc_pci_cmn_p;
1841 	pci_t *pci_p = cmn_p->pci_p[0];
1842 
1843 	ASSERT(MUTEX_HELD(&cmn_p->pci_fm_mutex));
1844 
1845 	ecc_err_p->ecc_bridge_type = PCI_BRIDGE_TYPE(cmn_p);
1846 
1847 	if (pci_p == NULL)
1848 		pci_p = cmn_p->pci_p[1];
1849 
1850 	ecc_err_p->ecc_ctrl = lddphysio(ecc_err_p->ecc_ii_p.ecc_p->ecc_csr_pa);
1851 	ecc_err_p->ecc_err_addr = afar;
1852 	region = afar & SCHIZO_ECC_AFAR_PIOW_MASK;
1853 
1854 	for (i = 0; ecc_err_tbl[i].ecc_err_class != NULL; i++) {
1855 		if (!(err & ecc_err_tbl[i].ecc_reg_bit) ||
1856 			(ecc_err_p->ecc_ii_p.ecc_type !=
1857 			    ecc_err_tbl[i].ecc_type) ||
1858 			(ecc_err_p->ecc_pri != ecc_err_tbl[i].ecc_pri))
1859 			continue;
1860 
1861 		ecc_p->flt_erpt_class = ecc_err_tbl[i].ecc_err_class;
1862 		flag = ecc_err_tbl[i].ecc_flag;
1863 
1864 		if (!ecc_err_tbl[i].ecc_pri ||
1865 				(ecc_err_tbl[i].ecc_type == CBNINTR_CE)) {
1866 			fatal += (ecc_err_tbl[i].ecc_type == CBNINTR_UE) ?
1867 				1 : 0;
1868 			break;
1869 		}
1870 
1871 		if (flag == ACC_HANDLE &&
1872 			(region & ecc_err_tbl[i].ecc_region_bits)) {
1873 			ecc_err_p->ecc_region = ecc_err_tbl[i].ecc_region;
1874 			pci_format_ecc_addr(pci_p->pci_dip,
1875 					&ecc_err_p->ecc_err_addr,
1876 					ecc_err_p->ecc_region);
1877 		}
1878 
1879 		/*
1880 		 * Lookup and fault errant handle
1881 		 */
1882 		for (j = 0; j < 2; ++j) {
1883 			ret = DDI_FM_UNKNOWN;
1884 			if (cmn_p->pci_p[j] == NULL)
1885 				continue;
1886 			ret = ndi_fmc_error(cmn_p->pci_p[j]->pci_dip, NULL,
1887 					flag, ecc_err_p->ecc_ena,
1888 					(void *)&ecc_err_p->ecc_err_addr);
1889 			if (ret == DDI_FM_NONFATAL) {
1890 				fatal = 0;
1891 				break;
1892 			} else
1893 				fatal++;
1894 		}
1895 		break;
1896 	}
1897 
1898 	if (fatal)
1899 		ecc_p->flt_panic = 1;
1900 	else if (flag != ACC_HANDLE)
1901 		ecc_err_p->ecc_pg_ret = 1;
1902 }
1903 
1904 /*
1905  * Tables to define PCI-X Split Completion errors
1906  */
1907 
1908 pcix_err_msg_rec_t pcix_completer_errs[] = {
1909 	{PCIX_CPLT_OUT_OF_RANGE,	"pcix", "oor"	},
1910 };
1911 
1912 pcix_err_tbl_t pcix_split_errs_tbl[] = {
1913 	{PCIX_CLASS_CPLT,
1914 		sizeof (pcix_completer_errs)/sizeof (pcix_err_msg_rec_t),
1915 		pcix_completer_errs		},
1916 };
1917 
1918 /*
1919  * Tables for the PCI-X error status messages
1920  */
1921 pcix_err_msg_rec_t pcix_stat_errs[] = {
1922 	{XMITS_PCIX_STAT_SC_DSCRD,	"pcix", "discard"  	},
1923 	{XMITS_PCIX_STAT_SC_TTO,	"xmits.pbmx", "tato" 	},
1924 	{XMITS_PCIX_STAT_SMMU,		"xmits.pbmx", "stmmu"	},
1925 	{XMITS_PCIX_STAT_SDSTAT,	"xmits.pbmx", "stdst"	},
1926 	{XMITS_PCIX_STAT_CMMU,		"xmits.pbmx", "cnmmu"	},
1927 	{XMITS_PCIX_STAT_CDSTAT,	"xmits.pbmx", "cndst"	}
1928 };
1929 
1930 pcix_err_tbl_t pcix_stat_errs_tbl =
1931 	{PCIX_NO_CLASS,
1932 		sizeof (pcix_stat_errs)/sizeof (pcix_err_msg_rec_t),
1933 		pcix_stat_errs		};
1934 
1935 
1936 /*
1937  * walk thru a table of error messages, printing as appropriate
1938  *
1939  * t - the table of messages to parse
1940  * err - the error to match against
1941  * multi - flag, sometimes multiple error bits may be set/desired
1942  */
1943 static int
1944 pcix_lookup_err_msgs(dev_info_t *dip, uint64_t ena, pcix_err_tbl_t t,
1945 		pbm_errstate_t *pbm_err_p)
1946 {
1947 	uint32_t err_bits  = pbm_err_p->pbm_err & XMITS_PCIX_MSG_INDEX_MASK;
1948 	int nerr = 0;
1949 	int j;
1950 	char buf[FM_MAX_CLASS];
1951 
1952 	for (j = 0; j < t.err_rec_num; j++)  {
1953 		uint32_t msg_key = t.err_msg_tbl[j].msg_key;
1954 		if (pbm_err_p->pbm_multi ? !(err_bits & msg_key) : err_bits
1955 				!= msg_key)
1956 			continue;
1957 
1958 		(void) snprintf(buf, FM_MAX_CLASS, "%s.%s%s",
1959 		    t.err_msg_tbl[j].msg_class,
1960 		    pbm_err_p->pbm_pri ? "" : PCIX_SECONDARY,
1961 		    t.err_msg_tbl[j].msg_str);
1962 
1963 		pbm_err_p->pbm_err_class = buf;
1964 		pcix_ereport_post(dip, ena, pbm_err_p);
1965 		nerr++;
1966 	}
1967 	return (nerr ? DDI_FM_FATAL : DDI_FM_OK);
1968 }
1969 
1970 /*
1971  * Decodes primary(bit 27-24) or secondary(bit 15-12) PCI-X split
1972  * completion error message class and index in PBM AFSR.
1973  */
1974 static void
1975 pcix_log_split_err(dev_info_t *dip, uint64_t ena, pbm_errstate_t *pbm_err_p)
1976 {
1977 	uint32_t class  = pbm_err_p->pbm_err & XMITS_PCIX_MSG_CLASS_MASK;
1978 	uint32_t num_classes = sizeof (pcix_split_errs_tbl) /
1979 	    sizeof (struct pcix_err_tbl);
1980 	int i;
1981 
1982 	for (i = 0; i < num_classes; i++) {
1983 		if (class == pcix_split_errs_tbl[i].err_class) {
1984 			pbm_err_p->pbm_multi = PCIX_SINGLE_ERR;
1985 			(void) pcix_lookup_err_msgs(dip, ena,
1986 			    pcix_split_errs_tbl[i], pbm_err_p);
1987 			break;
1988 		}
1989 	}
1990 }
1991 
1992 /*
1993  * Report PBM PCI-X Error Status Register if in PCI-X mode
1994  *
1995  * Once a PCI-X fault tree is constructed, the code below may need to
1996  * change.
1997  */
1998 static int
1999 pcix_log_pbm(pci_t *pci_p, uint64_t ena, pbm_errstate_t *pbm_err_p)
2000 {
2001 	int fatal = 0;
2002 	int nonfatal = 0;
2003 	uint32_t e;
2004 
2005 	ASSERT(MUTEX_HELD(&pci_p->pci_common_p->pci_fm_mutex));
2006 
2007 	DEBUG3(DBG_ERR_INTR, pci_p->pci_dip, "pcix_log_pbm: chip_type=%d "
2008 	    "ctr_stat=%lx afsr = 0x%lx", CHIP_TYPE(pci_p),
2009 	    pbm_err_p->pbm_ctl_stat, pbm_err_p->pbm_afsr);
2010 
2011 	if (!(CHIP_TYPE(pci_p) == PCI_CHIP_XMITS) ||
2012 	    !(pbm_err_p->pbm_ctl_stat & XMITS_PCI_CTRL_X_MODE))
2013 		return (DDI_FM_OK);
2014 
2015 	if (pbm_err_p->pbm_afsr & XMITS_PCI_X_AFSR_P_SC_ERR) {
2016 		pbm_err_p->pbm_err = PBM_AFSR_TO_PRISPLIT(pbm_err_p->pbm_afsr);
2017 		pbm_err_p->pbm_pri = PBM_PRIMARY;
2018 		pcix_log_split_err(pci_p->pci_dip, ena, pbm_err_p);
2019 		nonfatal++;
2020 	}
2021 	if (pbm_err_p->pbm_afsr & XMITS_PCI_X_AFSR_S_SC_ERR) {
2022 		pbm_err_p->pbm_err = PBM_AFSR_TO_PRISPLIT(pbm_err_p->pbm_afsr);
2023 		pbm_err_p->pbm_pri = PBM_PRIMARY;
2024 		pcix_log_split_err(pci_p->pci_dip, ena, pbm_err_p);
2025 		nonfatal++;
2026 	}
2027 
2028 	e = PBM_PCIX_TO_PRIERR(pbm_err_p->pbm_pcix_stat);
2029 	if (e) {
2030 		pbm_err_p->pbm_pri = PBM_PRIMARY;
2031 		pbm_err_p->pbm_err = e;
2032 		pbm_err_p->pbm_multi = PCIX_MULTI_ERR;
2033 		if (pcix_lookup_err_msgs(pci_p->pci_dip, ena,
2034 		    pcix_stat_errs_tbl, pbm_err_p) == DDI_FM_FATAL)
2035 			fatal++;
2036 		else
2037 			nonfatal++;
2038 	}
2039 
2040 	e = PBM_PCIX_TO_SECERR(pbm_err_p->pbm_pcix_stat);
2041 	if (e) {
2042 		pbm_err_p->pbm_pri = PBM_SECONDARY;
2043 		pbm_err_p->pbm_err = e;
2044 		pbm_err_p->pbm_multi = PCIX_MULTI_ERR;
2045 		if (pcix_lookup_err_msgs(pci_p->pci_dip, ena,
2046 		    pcix_stat_errs_tbl, pbm_err_p) == DDI_FM_FATAL)
2047 			fatal++;
2048 		else
2049 			nonfatal++;
2050 	}
2051 
2052 	if (!fatal && !nonfatal)
2053 		return (DDI_FM_OK);
2054 	else if (fatal)
2055 		return (DDI_FM_FATAL);
2056 	return (DDI_FM_NONFATAL);
2057 }
2058 
2059 static pbm_fm_err_t pbm_err_tbl[] = {
2060 	PCI_MA,			SCHIZO_PCI_AFSR_E_MA,	PBM_PRIMARY,
2061 	FM_LOG_PCI,	PCI_TARG_MA,
2062 
2063 	PCI_SEC_MA,		SCHIZO_PCI_AFSR_E_MA,	PBM_SECONDARY,
2064 	FM_LOG_PBM,	NULL,
2065 
2066 	PCI_REC_TA,		SCHIZO_PCI_AFSR_E_TA,	PBM_PRIMARY,
2067 	FM_LOG_PCI,	PCI_TARG_REC_TA,
2068 
2069 	PCI_SEC_REC_TA,		SCHIZO_PCI_AFSR_E_TA,	PBM_SECONDARY,
2070 	FM_LOG_PBM,	NULL,
2071 
2072 	PCI_PBM_RETRY,		SCHIZO_PCI_AFSR_E_RTRY,	PBM_PRIMARY,
2073 	FM_LOG_PBM,	PCI_PBM_TARG_RETRY,
2074 
2075 	PCI_SEC_PBM_RETRY,	SCHIZO_PCI_AFSR_E_RTRY,	PBM_SECONDARY,
2076 	FM_LOG_PBM,	NULL,
2077 
2078 	PCI_MDPE,		SCHIZO_PCI_AFSR_E_PERR,	PBM_PRIMARY,
2079 	FM_LOG_PCI,	PCI_TARG_MDPE,
2080 
2081 	PCI_SEC_MDPE,		SCHIZO_PCI_AFSR_E_PERR,	PBM_SECONDARY,
2082 	FM_LOG_PBM,	NULL,
2083 
2084 	PCI_PBM_TTO,		SCHIZO_PCI_AFSR_E_TTO,	PBM_PRIMARY,
2085 	FM_LOG_PBM,	PCI_PBM_TARG_TTO,
2086 
2087 	PCI_SEC_PBM_TTO,	SCHIZO_PCI_AFSR_E_TTO,	PBM_SECONDARY,
2088 	FM_LOG_PBM,	NULL,
2089 
2090 	PCI_SCH_BUS_UNUSABLE_ERR, SCHIZO_PCI_AFSR_E_UNUSABLE, PBM_PRIMARY,
2091 	FM_LOG_PBM,	NULL,
2092 
2093 	PCI_SEC_SCH_BUS_UNUSABLE_ERR, SCHIZO_PCI_AFSR_E_UNUSABLE, PBM_SECONDARY,
2094 	FM_LOG_PBM,	NULL,
2095 
2096 	NULL,			NULL,			NULL,
2097 	NULL,		NULL,
2098 };
2099 
2100 
2101 /*
2102  * pci_pbm_classify, called by pbm_afsr_report to classify piow afsr.
2103  */
2104 int
2105 pci_pbm_classify(pbm_errstate_t *pbm_err_p)
2106 {
2107 	uint32_t err;
2108 	int nerr = 0;
2109 	int i;
2110 
2111 	err = pbm_err_p->pbm_pri ? PBM_AFSR_TO_PRIERR(pbm_err_p->pbm_afsr):
2112 		PBM_AFSR_TO_SECERR(pbm_err_p->pbm_afsr);
2113 
2114 	for (i = 0; pbm_err_tbl[i].pbm_err_class != NULL; i++) {
2115 		if ((err & pbm_err_tbl[i].pbm_reg_bit) &&
2116 		    (pbm_err_p->pbm_pri == pbm_err_tbl[i].pbm_pri)) {
2117 			if (pbm_err_tbl[i].pbm_flag == FM_LOG_PCI)
2118 				pbm_err_p->pbm_pci.pci_err_class =
2119 					pbm_err_tbl[i].pbm_err_class;
2120 			else
2121 				pbm_err_p->pbm_err_class =
2122 				    pbm_err_tbl[i].pbm_err_class;
2123 
2124 			pbm_err_p->pbm_terr_class =
2125 			    pbm_err_tbl[i].pbm_terr_class;
2126 			pbm_err_p->pbm_log = pbm_err_tbl[i].pbm_flag;
2127 			nerr++;
2128 			break;
2129 		}
2130 	}
2131 
2132 	return (nerr);
2133 }
2134 
2135 /*
2136  * Function used to handle and log IOMMU errors. Called by pci_pbm_err_handler,
2137  * with pci_fm_mutex held.
2138  */
2139 static int
2140 iommu_err_handler(dev_info_t *dip, uint64_t ena, pbm_errstate_t *pbm_err_p)
2141 {
2142 	pci_t *pci_p = get_pci_soft_state(ddi_get_instance(dip));
2143 	iommu_t *iommu_p = pci_p->pci_iommu_p;
2144 	ecc_t *ecc_p = pci_p->pci_ecc_p;
2145 	uint64_t stat;
2146 	ushort_t ta_signalled;
2147 	int err = 0;
2148 	int fatal = 0;
2149 	int nonfatal = 0;
2150 	int ret;
2151 
2152 	ASSERT(MUTEX_HELD(&ecc_p->ecc_pci_cmn_p->pci_fm_mutex));
2153 	if (!((stat = *iommu_p->iommu_ctrl_reg) & TOMATILLO_IOMMU_ERR)) {
2154 		pbm_err_p->pbm_err_class = PCI_SCH_MMU_ERR;
2155 		iommu_ereport_post(dip, ena, pbm_err_p);
2156 		return (DDI_FM_NONFATAL);
2157 	}
2158 
2159 	/*
2160 	 * Need to make sure a Target Abort was signalled to the device if
2161 	 * we have any hope of recovering. Tomatillo does not send a TA for
2162 	 * DMA Writes that result in a Translation Error, thus fooling the
2163 	 * device into believing everything is as it expects. Ignorance
2164 	 * is bliss, but knowledge is power.
2165 	 */
2166 	ta_signalled = pbm_err_p->pbm_pci.pci_cfg_stat &
2167 		PCI_STAT_S_TARG_AB;
2168 
2169 	if (stat & TOMATILLO_IOMMU_ERR_ILLTSBTBW) {
2170 		pbm_err_p->pbm_err_class = PCI_TOM_MMU_BAD_TSBTBW;
2171 		err = 1;
2172 		iommu_ereport_post(dip, ena, pbm_err_p);
2173 		if (!ta_signalled)
2174 			fatal++;
2175 		else
2176 			nonfatal++;
2177 	}
2178 
2179 	if (stat & TOMATILLO_IOMMU_ERR_BAD_VA) {
2180 		pbm_err_p->pbm_err_class = PCI_TOM_MMU_BAD_VA;
2181 		err = 1;
2182 		iommu_ereport_post(dip, ena, pbm_err_p);
2183 		if (!ta_signalled)
2184 			fatal++;
2185 		else
2186 			nonfatal++;
2187 	}
2188 
2189 	if (!err) {
2190 		stat = ((stat & TOMATILLO_IOMMU_ERRSTS) >>
2191 		    TOMATILLO_IOMMU_ERRSTS_SHIFT);
2192 		switch (stat) {
2193 		case TOMATILLO_IOMMU_PROTECTION_ERR:
2194 			pbm_err_p->pbm_err_class = PCI_TOM_MMU_PROT_ERR;
2195 			iommu_ereport_post(dip, ena, pbm_err_p);
2196 			fatal++;
2197 			break;
2198 		case TOMATILLO_IOMMU_INVALID_ERR:
2199 			pbm_err_p->pbm_err_class = PCI_TOM_MMU_INVAL_ERR;
2200 			/*
2201 			 * Fault the address in iommu_tfar
2202 			 * register to inform target driver of error
2203 			 */
2204 			ret = ndi_fmc_error(pci_p->pci_dip, NULL, DMA_HANDLE,
2205 				ena, (void *)&pbm_err_p->pbm_iommu.iommu_tfar);
2206 
2207 			if (ret != DDI_FM_NONFATAL)
2208 				if (ta_signalled)
2209 					nonfatal++;
2210 				else
2211 					fatal++;
2212 			else
2213 				nonfatal++;
2214 
2215 			iommu_ereport_post(dip, ena, pbm_err_p);
2216 			break;
2217 		case TOMATILLO_IOMMU_TIMEOUT_ERR:
2218 			pbm_err_p->pbm_err_class = PCI_TOM_MMU_TO_ERR;
2219 			fatal++;
2220 			iommu_ereport_post(dip, ena, pbm_err_p);
2221 			break;
2222 		case TOMATILLO_IOMMU_ECC_ERR:
2223 			pbm_err_p->pbm_err_class = PCI_TOM_MMU_UE;
2224 			iommu_ereport_post(dip, ena, pbm_err_p);
2225 			break;
2226 		}
2227 	}
2228 
2229 	if (fatal)
2230 		return (DDI_FM_FATAL);
2231 	else if (nonfatal)
2232 		return (DDI_FM_NONFATAL);
2233 
2234 	return (DDI_FM_OK);
2235 }
2236 
2237 int
2238 pci_check_error(pci_t *pci_p)
2239 {
2240 	pbm_t *pbm_p = pci_p->pci_pbm_p;
2241 	uint16_t pci_cfg_stat;
2242 	uint64_t pbm_ctl_stat, pbm_afsr, pbm_pcix_stat;
2243 	caddr_t a = pci_p->pci_address[0];
2244 	uint64_t *pbm_pcix_stat_reg;
2245 
2246 	ASSERT(MUTEX_HELD(&pci_p->pci_common_p->pci_fm_mutex));
2247 
2248 	pci_cfg_stat = pbm_p->pbm_config_header->ch_status_reg;
2249 	pbm_ctl_stat = *pbm_p->pbm_ctrl_reg;
2250 	pbm_afsr = *pbm_p->pbm_async_flt_status_reg;
2251 
2252 	if ((pci_cfg_stat & (PCI_STAT_S_PERROR | PCI_STAT_S_TARG_AB |
2253 				PCI_STAT_R_TARG_AB | PCI_STAT_R_MAST_AB |
2254 				PCI_STAT_S_SYSERR | PCI_STAT_PERROR)) ||
2255 			(pbm_ctl_stat & (SCHIZO_PCI_CTRL_BUS_UNUSABLE |
2256 				TOMATILLO_PCI_CTRL_PCI_DTO_ERR |
2257 				SCHIZO_PCI_CTRL_PCI_TTO_ERR |
2258 				SCHIZO_PCI_CTRL_PCI_RTRY_ERR |
2259 				SCHIZO_PCI_CTRL_PCI_MMU_ERR |
2260 				COMMON_PCI_CTRL_SBH_ERR |
2261 				COMMON_PCI_CTRL_SERR)) ||
2262 			(PBM_AFSR_TO_PRIERR(pbm_afsr)))
2263 		return (1);
2264 
2265 	if ((CHIP_TYPE(pci_p) == PCI_CHIP_XMITS) &&
2266 			(pbm_ctl_stat & XMITS_PCI_CTRL_X_MODE)) {
2267 
2268 		pbm_pcix_stat_reg = (uint64_t *)(a +
2269 		    XMITS_PCI_X_ERROR_STATUS_REG_OFFSET);
2270 
2271 		pbm_pcix_stat = *pbm_pcix_stat_reg;
2272 
2273 		if (PBM_PCIX_TO_PRIERR(pbm_pcix_stat))
2274 			return (1);
2275 
2276 		if (pbm_pcix_stat & XMITS_PCIX_STAT_PERR_RECOV_INT)
2277 			return (1);
2278 	}
2279 
2280 	return (0);
2281 
2282 }
2283 
2284 static pbm_fm_err_t pci_pbm_err_tbl[] = {
2285 	PCI_PBM_RETRY,			SCHIZO_PCI_CTRL_PCI_RTRY_ERR,
2286 	NULL,	PBM_NONFATAL,	PCI_PBM_TARG_RETRY,
2287 
2288 	PCI_PBM_TTO,			SCHIZO_PCI_CTRL_PCI_TTO_ERR,
2289 	NULL,	PBM_NONFATAL,	PCI_PBM_TARG_TTO,
2290 
2291 	PCI_SCH_BUS_UNUSABLE_ERR,	SCHIZO_PCI_CTRL_BUS_UNUSABLE,
2292 	NULL,	PBM_NONFATAL,	NULL,
2293 
2294 	NULL,				NULL,
2295 	NULL,	NULL,		NULL
2296 };
2297 
2298 /*
2299  * Function used to log all PCI/PBM/IOMMU errors found in the system.
2300  * It is called by the pbm_error_intr as well as the pci_err_callback(trap
2301  * callback). To protect access we hold the pci_fm_mutex when calling
2302  * this function.
2303  */
2304 int
2305 pci_pbm_err_handler(dev_info_t *dip, ddi_fm_error_t *derr,
2306 		const void *impl_data, int caller)
2307 {
2308 	int fatal = 0;
2309 	int nonfatal = 0;
2310 	int unknown = 0;
2311 	uint32_t prierr, secerr;
2312 	pbm_errstate_t pbm_err;
2313 	char buf[FM_MAX_CLASS];
2314 	pci_t *pci_p = (pci_t *)impl_data;
2315 	pbm_t *pbm_p = pci_p->pci_pbm_p;
2316 	int i, ret = 0;
2317 
2318 	ASSERT(MUTEX_HELD(&pci_p->pci_common_p->pci_fm_mutex));
2319 	pci_pbm_errstate_get(pci_p, &pbm_err);
2320 
2321 	derr->fme_ena = derr->fme_ena ? derr->fme_ena :
2322 	    fm_ena_generate(0, FM_ENA_FMT1);
2323 
2324 	prierr = PBM_AFSR_TO_PRIERR(pbm_err.pbm_afsr);
2325 	secerr = PBM_AFSR_TO_SECERR(pbm_err.pbm_afsr);
2326 
2327 	if (derr->fme_flag == DDI_FM_ERR_EXPECTED) {
2328 		if (caller == PCI_TRAP_CALL) {
2329 			/*
2330 			 * For ddi_caut_get treat all events as nonfatal.
2331 			 * The trampoline will set err_ena = 0, err_status =
2332 			 * NONFATAL. We only really call this function so that
2333 			 * pci_clear_error() and ndi_fm_handler_dispatch() will
2334 			 * get called.
2335 			 */
2336 			derr->fme_status = DDI_FM_NONFATAL;
2337 			nonfatal++;
2338 			goto done;
2339 		} else {
2340 			/*
2341 			 * For ddi_caut_put treat all events as nonfatal. Here
2342 			 * we have the handle and can call ndi_fm_acc_err_set().
2343 			 */
2344 			derr->fme_status = DDI_FM_NONFATAL;
2345 			ndi_fm_acc_err_set(pbm_p->pbm_excl_handle, derr);
2346 			nonfatal++;
2347 			goto done;
2348 		}
2349 	} else if (derr->fme_flag == DDI_FM_ERR_PEEK) {
2350 		/*
2351 		 * For ddi_peek treat all events as nonfatal. We only
2352 		 * really call this function so that pci_clear_error()
2353 		 * and ndi_fm_handler_dispatch() will get called.
2354 		 */
2355 		nonfatal++;
2356 		goto done;
2357 	} else if (derr->fme_flag == DDI_FM_ERR_POKE) {
2358 		/*
2359 		 * For ddi_poke we can treat as nonfatal if the
2360 		 * following conditions are met :
2361 		 * 1. Make sure only primary error is MA/TA
2362 		 * 2. Make sure no secondary error bits set
2363 		 * 3. check pci config header stat reg to see MA/TA is
2364 		 *    logged. We cannot verify only MA/TA is recorded
2365 		 *    since it gets much more complicated when a
2366 		 *    PCI-to-PCI bridge is present.
2367 		 */
2368 		if ((prierr == SCHIZO_PCI_AFSR_E_MA) && !secerr &&
2369 		    (pbm_err.pbm_pci.pci_cfg_stat & PCI_STAT_R_MAST_AB)) {
2370 			nonfatal++;
2371 			goto done;
2372 		} else if ((*pbm_p->pbm_ctrl_reg & XMITS_PCI_CTRL_X_MODE) &&
2373 		    pcix_ma_behind_bridge(&pbm_err)) {
2374 			/*
2375 			 * MAs behind a PCI-X bridge get sent back to
2376 			 * the host as a Split Completion Error Message.
2377 			 * We handle this the same as the above check.
2378 			 */
2379 			nonfatal++;
2380 			goto done;
2381 		}
2382 		if ((prierr == SCHIZO_PCI_AFSR_E_TA) && !secerr &&
2383 		    (pbm_err.pbm_pci.pci_cfg_stat & PCI_STAT_R_TARG_AB)) {
2384 			nonfatal++;
2385 			goto done;
2386 		}
2387 	}
2388 
2389 	DEBUG2(DBG_ERR_INTR, dip, "pci_pbm_err_handler: prierr=0x%x "
2390 	    "secerr=0x%x", prierr, secerr);
2391 
2392 	if (prierr || secerr) {
2393 		ret = pbm_afsr_report(dip, derr->fme_ena, &pbm_err);
2394 		if (ret == DDI_FM_FATAL)
2395 			fatal++;
2396 		else
2397 			nonfatal++;
2398 	}
2399 	if ((ret = pcix_log_pbm(pci_p, derr->fme_ena, &pbm_err))
2400 			== DDI_FM_FATAL)
2401 		fatal++;
2402 	else if (ret == DDI_FM_NONFATAL)
2403 		nonfatal++;
2404 
2405 	if ((ret = pci_cfg_report(dip, derr, &pbm_err.pbm_pci, caller, prierr))
2406 			== DDI_FM_FATAL)
2407 		fatal++;
2408 	else if (ret == DDI_FM_NONFATAL)
2409 		nonfatal++;
2410 
2411 	for (i = 0; pci_pbm_err_tbl[i].pbm_err_class != NULL; i++) {
2412 		if ((pbm_err.pbm_ctl_stat & pci_pbm_err_tbl[i].pbm_reg_bit) &&
2413 		    !prierr) {
2414 			pbm_err.pbm_err_class =
2415 				pci_pbm_err_tbl[i].pbm_err_class;
2416 			pbm_ereport_post(dip, derr->fme_ena, &pbm_err);
2417 			if (pci_pbm_err_tbl[i].pbm_flag)
2418 				fatal++;
2419 			else
2420 				nonfatal++;
2421 			if (caller == PCI_TRAP_CALL &&
2422 			    pci_pbm_err_tbl[i].pbm_terr_class)
2423 				pci_target_enqueue(derr->fme_ena,
2424 				    pci_pbm_err_tbl[i].pbm_terr_class,
2425 				    pbm_err.pbm_bridge_type,
2426 				    (uint64_t)derr->fme_bus_specific);
2427 		}
2428 	}
2429 
2430 	if ((pbm_err.pbm_ctl_stat & COMMON_PCI_CTRL_SBH_ERR) &&
2431 	    (CHIP_TYPE(pci_p) != PCI_CHIP_TOMATILLO)) {
2432 		pbm_err.pbm_err_class = PCI_SCH_SBH;
2433 		pbm_ereport_post(dip, derr->fme_ena, &pbm_err);
2434 		if (pci_panic_on_sbh_errors)
2435 			fatal++;
2436 		else
2437 			nonfatal++;
2438 	}
2439 
2440 	/*
2441 	 * PBM Received System Error - During any transaction, or
2442 	 * at any point on the bus, some device may detect a critical
2443 	 * error and signal a system error to the system.
2444 	 */
2445 	if (pbm_err.pbm_ctl_stat & COMMON_PCI_CTRL_SERR) {
2446 		/*
2447 		 * may be expected (master abort from pci-pci bridge during
2448 		 * poke will generate SERR)
2449 		 */
2450 		if (derr->fme_flag != DDI_FM_ERR_POKE) {
2451 			DEBUG1(DBG_ERR_INTR, dip, "pci_pbm_err_handler: "
2452 			    "ereport_post: %s", buf);
2453 			(void) snprintf(buf, FM_MAX_CLASS, "%s.%s",
2454 				PCI_ERROR_SUBCLASS, PCI_REC_SERR);
2455 			ddi_fm_ereport_post(dip, buf, derr->fme_ena,
2456 			    DDI_NOSLEEP, FM_VERSION, DATA_TYPE_UINT8, 0,
2457 			    PCI_CONFIG_STATUS, DATA_TYPE_UINT16,
2458 			    pbm_err.pbm_pci.pci_cfg_stat, PCI_CONFIG_COMMAND,
2459 			    DATA_TYPE_UINT16, pbm_err.pbm_pci.pci_cfg_comm,
2460 			    PCI_PA, DATA_TYPE_UINT64, (uint64_t)0, NULL);
2461 		}
2462 		unknown++;
2463 	}
2464 
2465 	/*
2466 	 * PCI Retry Timeout - Device fails to retry deferred
2467 	 * transaction within timeout. Only Tomatillo
2468 	 */
2469 	if (pbm_err.pbm_ctl_stat & TOMATILLO_PCI_CTRL_PCI_DTO_ERR) {
2470 		if (pci_dto_fault_warn == CE_PANIC)
2471 			fatal++;
2472 		else
2473 			nonfatal++;
2474 
2475 		(void) snprintf(buf, FM_MAX_CLASS, "%s.%s",
2476 			PCI_ERROR_SUBCLASS, PCI_DTO);
2477 		ddi_fm_ereport_post(dip, buf, derr->fme_ena, DDI_NOSLEEP,
2478 		    FM_VERSION, DATA_TYPE_UINT8, 0,
2479 		    PCI_CONFIG_STATUS, DATA_TYPE_UINT16,
2480 		    pbm_err.pbm_pci.pci_cfg_stat,
2481 		    PCI_CONFIG_COMMAND, DATA_TYPE_UINT16,
2482 		    pbm_err.pbm_pci.pci_cfg_comm,
2483 		    PCI_PA, DATA_TYPE_UINT64, (uint64_t)0, NULL);
2484 	}
2485 
2486 	/*
2487 	 * PBM Detected Data Parity Error - DPE detected during a DMA Write
2488 	 * or PIO Read. Later case is taken care of by cpu_deferred_error
2489 	 * and sent here to be logged.
2490 	 */
2491 	if ((pbm_err.pbm_pci.pci_cfg_stat & PCI_STAT_PERROR) &&
2492 			!(pbm_err.pbm_pci.pci_cfg_stat & PCI_STAT_S_SYSERR)) {
2493 		/*
2494 		 * If we have an address then fault
2495 		 * it, if not probe for errant device
2496 		 */
2497 		ret = DDI_FM_FATAL;
2498 		if (caller != PCI_TRAP_CALL) {
2499 			if (pbm_err.pbm_va_log) {
2500 				ret = ndi_fmc_error(dip, NULL, DMA_HANDLE,
2501 				    derr->fme_ena, (void *)&pbm_err.pbm_va_log);
2502 			}
2503 			if (ret == DDI_FM_NONFATAL)
2504 				nonfatal++;
2505 			else
2506 				fatal++;
2507 		} else
2508 			nonfatal++;
2509 
2510 	}
2511 
2512 	/* PBM Detected IOMMU Error */
2513 	if (pbm_err.pbm_ctl_stat & SCHIZO_PCI_CTRL_PCI_MMU_ERR) {
2514 		if (iommu_err_handler(dip, derr->fme_ena, &pbm_err)
2515 				== DDI_FM_FATAL)
2516 			fatal++;
2517 		else
2518 			nonfatal++;
2519 	}
2520 
2521 done:
2522 	ret = ndi_fm_handler_dispatch(dip, NULL, derr);
2523 	if (ret == DDI_FM_FATAL) {
2524 		fatal++;
2525 	} else if (ret == DDI_FM_NONFATAL) {
2526 		nonfatal++;
2527 	} else if (ret == DDI_FM_UNKNOWN) {
2528 		unknown++;
2529 	}
2530 
2531 	/*
2532 	 * RSERR not claimed as nonfatal by a child is considered fatal
2533 	 */
2534 	if (unknown && !fatal && !nonfatal)
2535 		fatal++;
2536 
2537 	/* Cleanup and reset error bits */
2538 	pci_clear_error(pci_p, &pbm_err);
2539 
2540 	return (fatal ? DDI_FM_FATAL : (nonfatal ? DDI_FM_NONFATAL :
2541 	    (unknown ? DDI_FM_UNKNOWN : DDI_FM_OK)));
2542 }
2543 
2544 /*
2545  * Function returns TRUE if a Primary error is Split Completion Error
2546  * that indicates a Master Abort occured behind a PCI-X bridge.
2547  * This function should only be called for busses running in PCI-X mode.
2548  */
2549 static int
2550 pcix_ma_behind_bridge(pbm_errstate_t *pbm_err_p)
2551 {
2552 	uint64_t msg;
2553 
2554 	if (pbm_err_p->pbm_afsr & XMITS_PCI_X_AFSR_S_SC_ERR)
2555 		return (0);
2556 
2557 	if (pbm_err_p->pbm_afsr & XMITS_PCI_X_AFSR_P_SC_ERR) {
2558 		msg = (pbm_err_p->pbm_afsr >> XMITS_PCI_X_P_MSG_SHIFT) &
2559 		    XMITS_PCIX_MSG_MASK;
2560 		if (msg & PCIX_CLASS_BRIDGE)
2561 			if (msg & PCIX_BRIDGE_MASTER_ABORT) {
2562 				return (1);
2563 			}
2564 	}
2565 
2566 	return (0);
2567 }
2568 
2569 /*
2570  * Function used to gather PBM/PCI/IOMMU error state for the
2571  * pci_pbm_err_handler and the cb_buserr_intr. This function must be
2572  * called while pci_fm_mutex is held.
2573  */
2574 static void
2575 pci_pbm_errstate_get(pci_t *pci_p, pbm_errstate_t *pbm_err_p)
2576 {
2577 	pbm_t *pbm_p = pci_p->pci_pbm_p;
2578 	iommu_t *iommu_p = pci_p->pci_iommu_p;
2579 	caddr_t a = pci_p->pci_address[0];
2580 	uint64_t *pbm_pcix_stat_reg;
2581 
2582 	ASSERT(MUTEX_HELD(&pci_p->pci_common_p->pci_fm_mutex));
2583 	bzero(pbm_err_p, sizeof (pbm_errstate_t));
2584 
2585 	/*
2586 	 * Capture all pbm error state for later logging
2587 	 */
2588 	pbm_err_p->pbm_bridge_type = PCI_BRIDGE_TYPE(pci_p->pci_common_p);
2589 
2590 	pbm_err_p->pbm_pci.pci_cfg_stat =
2591 		pbm_p->pbm_config_header->ch_status_reg;
2592 	pbm_err_p->pbm_ctl_stat = *pbm_p->pbm_ctrl_reg;
2593 	pbm_err_p->pbm_afsr = *pbm_p->pbm_async_flt_status_reg;
2594 	pbm_err_p->pbm_afar = *pbm_p->pbm_async_flt_addr_reg;
2595 	pbm_err_p->pbm_iommu.iommu_stat = *iommu_p->iommu_ctrl_reg;
2596 	pbm_err_p->pbm_pci.pci_cfg_comm =
2597 		pbm_p->pbm_config_header->ch_command_reg;
2598 	pbm_err_p->pbm_pci.pci_pa = *pbm_p->pbm_async_flt_addr_reg;
2599 
2600 	/*
2601 	 * Record errant slot for Xmits and Schizo
2602 	 * Not stored in Tomatillo
2603 	 */
2604 	if (CHIP_TYPE(pci_p) == PCI_CHIP_XMITS ||
2605 			CHIP_TYPE(pci_p) == PCI_CHIP_SCHIZO) {
2606 		pbm_err_p->pbm_err_sl = (pbm_err_p->pbm_ctl_stat &
2607 				SCHIZO_PCI_CTRL_ERR_SLOT) >>
2608 			SCHIZO_PCI_CTRL_ERR_SLOT_SHIFT;
2609 
2610 		/*
2611 		 * The bit 51 on XMITS rev1.0 is same as
2612 		 * SCHIZO_PCI_CTRL_ERR_SLOT_LOCK on schizo2.3. But
2613 		 * this bit needs to be cleared to be able to latch
2614 		 * the slot info on next fault.
2615 		 * But in XMITS Rev2.0, this bit indicates a DMA Write
2616 		 * Parity error.
2617 		 */
2618 		if (pbm_err_p->pbm_ctl_stat & XMITS_PCI_CTRL_DMA_WR_PERR) {
2619 			if ((PCI_CHIP_ID(pci_p) == XMITS_VER_10) ||
2620 				(PCI_CHIP_ID(pci_p) <= SCHIZO_VER_23)) {
2621 				/*
2622 				 * top 32 bits are W1C and we just want to
2623 				 * clear SLOT_LOCK. Leave bottom 32 bits
2624 				 * unchanged
2625 				 */
2626 				*pbm_p->pbm_ctrl_reg =
2627 					pbm_err_p->pbm_ctl_stat &
2628 					(SCHIZO_PCI_CTRL_ERR_SLOT_LOCK |
2629 					0xffffffff);
2630 				pbm_err_p->pbm_ctl_stat =
2631 					*pbm_p->pbm_ctrl_reg;
2632 			}
2633 		}
2634 	}
2635 
2636 	/*
2637 	 * Tomatillo specific registers
2638 	 */
2639 	if (CHIP_TYPE(pci_p) == PCI_CHIP_TOMATILLO) {
2640 		pbm_err_p->pbm_va_log = (uint64_t)va_to_pa(
2641 		    (void *)(uintptr_t)*(a + TOMATILLO_TGT_ERR_VALOG_OFFSET));
2642 		pbm_err_p->pbm_iommu.iommu_tfar = *iommu_p->iommu_tfar_reg;
2643 	}
2644 
2645 	/*
2646 	 * Xmits PCI-X register
2647 	 */
2648 	if ((CHIP_TYPE(pci_p) == PCI_CHIP_XMITS) &&
2649 			(pbm_err_p->pbm_ctl_stat & XMITS_PCI_CTRL_X_MODE)) {
2650 
2651 		pbm_pcix_stat_reg = (uint64_t *)(a +
2652 		    XMITS_PCI_X_ERROR_STATUS_REG_OFFSET);
2653 
2654 		pbm_err_p->pbm_pcix_stat = *pbm_pcix_stat_reg;
2655 		pbm_err_p->pbm_pcix_pfar = pbm_err_p->pbm_pcix_stat &
2656 				XMITS_PCI_X_STATUS_PFAR_MASK;
2657 	}
2658 }
2659 
2660 /*
2661  * Function used to clear PBM/PCI/IOMMU error state after error handling
2662  * is complete. Only clearing error bits which have been logged. Called by
2663  * pci_pbm_err_handler and pci_bus_exit.
2664  */
2665 static void
2666 pci_clear_error(pci_t *pci_p, pbm_errstate_t *pbm_err_p)
2667 {
2668 	pbm_t *pbm_p = pci_p->pci_pbm_p;
2669 	iommu_t *iommu_p = pci_p->pci_iommu_p;
2670 
2671 	ASSERT(MUTEX_HELD(&pbm_p->pbm_pci_p->pci_common_p->pci_fm_mutex));
2672 
2673 	if (*pbm_p->pbm_ctrl_reg & SCHIZO_PCI_CTRL_PCI_MMU_ERR) {
2674 		iommu_tlb_scrub(pci_p->pci_iommu_p, 1);
2675 	}
2676 	pbm_p->pbm_config_header->ch_status_reg =
2677 		pbm_err_p->pbm_pci.pci_cfg_stat;
2678 	*pbm_p->pbm_ctrl_reg = pbm_err_p->pbm_ctl_stat;
2679 	*pbm_p->pbm_async_flt_status_reg = pbm_err_p->pbm_afsr;
2680 	*iommu_p->iommu_ctrl_reg = pbm_err_p->pbm_iommu.iommu_stat;
2681 }
2682 
2683 void
2684 pbm_clear_error(pbm_t *pbm_p)
2685 {
2686 	uint64_t pbm_afsr, pbm_ctl_stat;
2687 
2688 	/*
2689 	 * for poke() support - called from POKE_FLUSH. Spin waiting
2690 	 * for MA, TA or SERR to be cleared by a pbm_error_intr().
2691 	 * We have to wait for SERR too in case the device is beyond
2692 	 * a pci-pci bridge.
2693 	 */
2694 	pbm_ctl_stat = *pbm_p->pbm_ctrl_reg;
2695 	pbm_afsr = *pbm_p->pbm_async_flt_status_reg;
2696 	while (((pbm_afsr >> SCHIZO_PCI_AFSR_PE_SHIFT) &
2697 	    (SCHIZO_PCI_AFSR_E_MA | SCHIZO_PCI_AFSR_E_TA)) ||
2698 	    (pbm_ctl_stat & COMMON_PCI_CTRL_SERR)) {
2699 		pbm_ctl_stat = *pbm_p->pbm_ctrl_reg;
2700 		pbm_afsr = *pbm_p->pbm_async_flt_status_reg;
2701 	}
2702 }
2703 
2704 /*
2705  * Function used to convert the 32 bit captured PCI error address
2706  * to the full Safari or Jbus address. This is so we can look this address
2707  * up in our handle caches.
2708  */
2709 void
2710 pci_format_addr(dev_info_t *dip, uint64_t *afar, uint64_t afsr)
2711 {
2712 	pci_t *pci_p = get_pci_soft_state(ddi_get_instance(dip));
2713 	pci_ranges_t *io_range, *mem_range;
2714 	uint64_t err_pa = 0;
2715 
2716 	if (afsr & SCHIZO_PCI_AFSR_CONF_SPACE) {
2717 		err_pa |= pci_p->pci_ranges->parent_high;
2718 		err_pa = err_pa << 32;
2719 		err_pa |= pci_p->pci_ranges->parent_low;
2720 	} else if (afsr & SCHIZO_PCI_AFSR_IO_SPACE) {
2721 		io_range = pci_p->pci_ranges + 1;
2722 		err_pa |= io_range->parent_high;
2723 		err_pa = err_pa << 32;
2724 		err_pa |= io_range->parent_low;
2725 	} else if (afsr & SCHIZO_PCI_AFSR_MEM_SPACE) {
2726 		mem_range = pci_p->pci_ranges + 2;
2727 		err_pa |= mem_range->parent_high;
2728 		err_pa = err_pa << 32;
2729 		err_pa |= mem_range->parent_low;
2730 	}
2731 	*afar |= err_pa;
2732 }
2733 
2734 static ecc_format_t ecc_format_tbl[] = {
2735 	SCH_REG_UPA,		NULL,				NULL,
2736 	SCH_REG_PCIA_REG,	SCHIZO_PCI_AFSR_CONF_SPACE,	PCI_SIDEA,
2737 	SCH_REG_PCIA_MEM,	SCHIZO_PCI_AFSR_MEM_SPACE,	PCI_SIDEA,
2738 	SCH_REG_PCIA_CFGIO,	SCHIZO_PCI_AFSR_IO_SPACE,	PCI_SIDEA,
2739 	SCH_REG_PCIB_REG,	SCHIZO_PCI_AFSR_CONF_SPACE,	PCI_SIDEB,
2740 	SCH_REG_PCIB_MEM,	SCHIZO_PCI_AFSR_MEM_SPACE,	PCI_SIDEB,
2741 	SCH_REG_PCIB_CFGIO,	SCHIZO_PCI_AFSR_IO_SPACE,	PCI_SIDEB,
2742 	SCH_REG_SAFARI_REGS,	NULL,				NULL,
2743 	NULL,			NULL,				NULL,
2744 };
2745 
2746 /*
2747  * Function used to convert the 32 bit PIO address captured for a
2748  * Safari Bus UE(during PIO Rd/Wr) to a full Safari Bus Address.
2749  */
2750 static void
2751 pci_format_ecc_addr(dev_info_t *dip, uint64_t *afar, ecc_region_t region)
2752 {
2753 	pci_t *pci_p = get_pci_soft_state(ddi_get_instance(dip));
2754 	pci_common_t *cmn_p = pci_p->pci_common_p;
2755 	cb_t *cb_p = pci_p->pci_cb_p;
2756 	int i, pci_side = 0;
2757 	int swap = 0;
2758 	uint64_t pa = cb_p->cb_base_pa;
2759 	uint64_t flag, schizo_base, pci_csr_base;
2760 
2761 	if (pci_p == NULL)
2762 		return;
2763 
2764 	pci_csr_base = va_to_pa(pci_p->pci_address[0]);
2765 
2766 	/*
2767 	 * Using the csr_base address to determine which side
2768 	 * we are on.
2769 	 */
2770 	if (pci_csr_base & PCI_SIDE_ADDR_MASK)
2771 		pci_side = 1;
2772 	else
2773 		pci_side = 0;
2774 
2775 	schizo_base = pa - PBM_CTRL_OFFSET;
2776 
2777 	for (i = 0; ecc_format_tbl[i].ecc_region != NULL; i++) {
2778 		if (region == ecc_format_tbl[i].ecc_region) {
2779 			flag = ecc_format_tbl[i].ecc_space;
2780 			if (ecc_format_tbl[i].ecc_side != pci_side)
2781 				swap = 1;
2782 			if (region == SCH_REG_SAFARI_REGS)
2783 				*afar |= schizo_base;
2784 			break;
2785 		}
2786 	}
2787 
2788 	if (swap) {
2789 		pci_p = cmn_p->pci_p[PCI_OTHER_SIDE(pci_p->pci_side)];
2790 
2791 		if (pci_p == NULL)
2792 			return;
2793 	}
2794 	pci_format_addr(pci_p->pci_dip, afar, flag);
2795 }
2796 
2797 /*
2798  * Function used to post control block specific ereports.
2799  */
2800 static void
2801 cb_ereport_post(dev_info_t *dip, uint64_t ena, cb_errstate_t *cb_err)
2802 {
2803 	pci_t *pci_p = get_pci_soft_state(ddi_get_instance(dip));
2804 	char buf[FM_MAX_CLASS], dev_path[MAXPATHLEN], *ptr;
2805 	struct i_ddi_fmhdl *fmhdl = DEVI(dip)->devi_fmhdl;
2806 	nvlist_t *ereport, *detector;
2807 	errorq_elem_t *eqep;
2808 	nv_alloc_t *nva;
2809 
2810 	DEBUG1(DBG_ATTACH, dip, "cb_ereport_post: elog 0x%lx",
2811 	    cb_err->cb_elog);
2812 
2813 	/*
2814 	 * We do not use ddi_fm_ereport_post because we need to set a
2815 	 * special detector here. Since we do not have a device path for
2816 	 * the bridge chip we use what we think it should be to aid in
2817 	 * diagnosis.
2818 	 */
2819 	(void) snprintf(buf, FM_MAX_CLASS, "%s.%s.%s", DDI_IO_CLASS,
2820 	    cb_err->cb_bridge_type, cb_err->cb_err_class);
2821 
2822 	ena = ena ? ena : fm_ena_generate(0, FM_ENA_FMT1);
2823 
2824 	eqep = errorq_reserve(fmhdl->fh_errorq);
2825 	if (eqep == NULL)
2826 		return;
2827 
2828 	ereport = errorq_elem_nvl(fmhdl->fh_errorq, eqep);
2829 	nva = errorq_elem_nva(fmhdl->fh_errorq, eqep);
2830 	detector = fm_nvlist_create(nva);
2831 
2832 	ASSERT(ereport);
2833 	ASSERT(nva);
2834 	ASSERT(detector);
2835 
2836 	ddi_pathname(dip, dev_path);
2837 	ptr = strrchr(dev_path, (int)',');
2838 
2839 	if (ptr)
2840 		*ptr = '\0';
2841 
2842 	fm_fmri_dev_set(detector, FM_DEV_SCHEME_VERSION, NULL, dev_path, NULL);
2843 
2844 	DEBUG1(DBG_ERR_INTR, dip, "cb_ereport_post: ereport_set: %s", buf);
2845 
2846 	if (CHIP_TYPE(pci_p) == PCI_CHIP_SCHIZO ||
2847 	    CHIP_TYPE(pci_p) == PCI_CHIP_XMITS) {
2848 		fm_ereport_set(ereport, FM_EREPORT_VERSION, buf, ena, detector,
2849 		    SAFARI_CSR, DATA_TYPE_UINT64, cb_err->cb_csr,
2850 		    SAFARI_ERR, DATA_TYPE_UINT64, cb_err->cb_err,
2851 		    SAFARI_INTR, DATA_TYPE_UINT64, cb_err->cb_intr,
2852 		    SAFARI_ELOG, DATA_TYPE_UINT64, cb_err->cb_elog,
2853 		    SAFARI_PCR, DATA_TYPE_UINT64, cb_err->cb_pcr,
2854 		    NULL);
2855 	} else if (CHIP_TYPE(pci_p) == PCI_CHIP_TOMATILLO) {
2856 		fm_ereport_set(ereport, FM_EREPORT_VERSION, buf, ena, detector,
2857 		    JBUS_CSR, DATA_TYPE_UINT64, cb_err->cb_csr,
2858 		    JBUS_ERR, DATA_TYPE_UINT64, cb_err->cb_err,
2859 		    JBUS_INTR, DATA_TYPE_UINT64, cb_err->cb_intr,
2860 		    JBUS_ELOG, DATA_TYPE_UINT64, cb_err->cb_elog,
2861 		    JBUS_PCR, DATA_TYPE_UINT64, cb_err->cb_pcr,
2862 		    NULL);
2863 	}
2864 	errorq_commit(fmhdl->fh_errorq, eqep, ERRORQ_ASYNC);
2865 }
2866 
2867 /*
2868  * Function used to post IOMMU specific ereports.
2869  */
2870 static void
2871 iommu_ereport_post(dev_info_t *dip, uint64_t ena, pbm_errstate_t *pbm_err)
2872 {
2873 	char buf[FM_MAX_CLASS];
2874 
2875 	(void) snprintf(buf, FM_MAX_CLASS, "%s.%s",
2876 		    pbm_err->pbm_bridge_type, pbm_err->pbm_err_class);
2877 
2878 	ena = ena ? ena : fm_ena_generate(0, FM_ENA_FMT1);
2879 
2880 	DEBUG1(DBG_ERR_INTR, dip, "iommu_ereport_post: ereport_set: %s", buf);
2881 
2882 	ddi_fm_ereport_post(dip, buf, ena, DDI_NOSLEEP,
2883 	    FM_VERSION, DATA_TYPE_UINT8, 0,
2884 	    PCI_CONFIG_STATUS, DATA_TYPE_UINT16, pbm_err->pbm_pci.pci_cfg_stat,
2885 	    PCI_CONFIG_COMMAND, DATA_TYPE_UINT16, pbm_err->pbm_pci.pci_cfg_comm,
2886 	    PCI_PBM_CSR, DATA_TYPE_UINT64, pbm_err->pbm_ctl_stat,
2887 	    PCI_PBM_IOMMU_CTRL, DATA_TYPE_UINT64, pbm_err->pbm_iommu.iommu_stat,
2888 	    PCI_PBM_IOMMU_TFAR, DATA_TYPE_UINT64, pbm_err->pbm_iommu.iommu_tfar,
2889 	    PCI_PBM_SLOT, DATA_TYPE_UINT64, pbm_err->pbm_err_sl,
2890 	    PCI_PBM_VALOG, DATA_TYPE_UINT64, pbm_err->pbm_va_log,
2891 	    NULL);
2892 }
2893 
2894 /*
2895  * Function used to post PCI-X generic ereports.
2896  * This function needs to be fixed once the Fault Boundary Analysis
2897  * for PCI-X is conducted. The payload should be made more generic.
2898  */
2899 static void
2900 pcix_ereport_post(dev_info_t *dip, uint64_t ena, pbm_errstate_t *pbm_err)
2901 {
2902 	char buf[FM_MAX_CLASS];
2903 
2904 	(void) snprintf(buf, FM_MAX_CLASS, "%s.%s",
2905 		    pbm_err->pbm_bridge_type, pbm_err->pbm_err_class);
2906 
2907 	ena = ena ? ena : fm_ena_generate(0, FM_ENA_FMT1);
2908 
2909 	DEBUG1(DBG_ERR_INTR, dip, "pcix_ereport_post: ereport_post: %s", buf);
2910 
2911 	ddi_fm_ereport_post(dip, buf, ena, DDI_NOSLEEP,
2912 	    FM_VERSION, DATA_TYPE_UINT8, 0,
2913 	    PCI_CONFIG_STATUS, DATA_TYPE_UINT16, pbm_err->pbm_pci.pci_cfg_stat,
2914 	    PCI_CONFIG_COMMAND, DATA_TYPE_UINT16, pbm_err->pbm_pci.pci_cfg_comm,
2915 	    PCI_PBM_CSR, DATA_TYPE_UINT64, pbm_err->pbm_ctl_stat,
2916 	    PCI_PBM_AFSR, DATA_TYPE_UINT64, pbm_err->pbm_afsr,
2917 	    PCI_PBM_AFAR, DATA_TYPE_UINT64, pbm_err->pbm_afar,
2918 	    PCI_PBM_SLOT, DATA_TYPE_UINT64, pbm_err->pbm_err_sl,
2919 	    PCIX_STAT, DATA_TYPE_UINT64, pbm_err->pbm_pcix_stat,
2920 	    PCIX_PFAR, DATA_TYPE_UINT32, pbm_err->pbm_pcix_pfar,
2921 	    NULL);
2922 }
2923 
2924 static void
2925 iommu_ctx_free(iommu_t *iommu_p)
2926 {
2927 	kmem_free(iommu_p->iommu_ctx_bitmap, IOMMU_CTX_BITMAP_SIZE);
2928 }
2929 
2930 /*
2931  * iommu_tlb_scrub():
2932  *	Exam TLB entries through TLB diagnostic registers and look for errors.
2933  *	scrub = 1 : cleanup all error bits in tlb, called in FAULT_RESET case
2934  *	scrub = 0 : log all error conditions to console, FAULT_LOG case
2935  *	In both cases, it returns number of errors found in tlb entries.
2936  */
2937 static int
2938 iommu_tlb_scrub(iommu_t *iommu_p, int scrub)
2939 {
2940 	int i, nerr = 0;
2941 	dev_info_t *dip = iommu_p->iommu_pci_p->pci_dip;
2942 	char *neg = "not ";
2943 
2944 	uint64_t base = (uint64_t)iommu_p->iommu_ctrl_reg -
2945 		COMMON_IOMMU_CTRL_REG_OFFSET;
2946 
2947 	volatile uint64_t *tlb_tag = (volatile uint64_t *)
2948 		(base + COMMON_IOMMU_TLB_TAG_DIAG_ACC_OFFSET);
2949 	volatile uint64_t *tlb_data = (volatile uint64_t *)
2950 		(base + COMMON_IOMMU_TLB_DATA_DIAG_ACC_OFFSET);
2951 	for (i = 0; i < IOMMU_TLB_ENTRIES; i++) {
2952 		uint64_t tag = tlb_tag[i];
2953 		uint64_t data = tlb_data[i];
2954 		uint32_t errstat;
2955 		iopfn_t pfn;
2956 
2957 		if (!(tag & TLBTAG_ERR_BIT))
2958 			continue;
2959 
2960 		pfn = (iopfn_t)(data & TLBDATA_MEMPA_BITS);
2961 		errstat = (uint32_t)
2962 			((tag & TLBTAG_ERRSTAT_BITS) >> TLBTAG_ERRSTAT_SHIFT);
2963 		if (errstat == TLBTAG_ERRSTAT_INVALID) {
2964 			if (scrub)
2965 				tlb_tag[i] = tlb_data[i] = 0ull;
2966 		} else
2967 			nerr++;
2968 
2969 		if (scrub)
2970 			continue;
2971 
2972 		cmn_err(CE_CONT, "%s%d: Error %x on IOMMU TLB entry %x:\n"
2973 		"\tContext=%lx %sWritable %sStreamable\n"
2974 		"\tPCI Page Size=%sk Address in page %lx\n",
2975 			ddi_driver_name(dip), ddi_get_instance(dip), errstat, i,
2976 			(tag & TLBTAG_CONTEXT_BITS) >> TLBTAG_CONTEXT_SHIFT,
2977 			(tag & TLBTAG_WRITABLE_BIT) ? "" : neg,
2978 			(tag & TLBTAG_STREAM_BIT) ? "" : neg,
2979 			(tag & TLBTAG_PGSIZE_BIT) ? "64" : "8",
2980 			(tag & TLBTAG_PCIVPN_BITS) << 13);
2981 		cmn_err(CE_CONT, "Memory: %sValid %sCacheable Page Frame=%lx\n",
2982 			(data & TLBDATA_VALID_BIT) ? "" : neg,
2983 			(data & TLBDATA_CACHE_BIT) ? "" : neg, pfn);
2984 	}
2985 	return (nerr);
2986 }
2987 
2988 /*
2989  * pci_iommu_disp: calculates the displacement needed in tomatillo's
2990  *	iommu control register and modifies the control value template
2991  *	from caller. It also clears any error status bit that are new
2992  *	in tomatillo.
2993  * return value: an 8-bit mask to enable corresponding 512 MB segments
2994  *	suitable for tomatillo's target address register.
2995  *	0x00: no programming is needed, use existing value from prom
2996  *	0x60: use segment 5 and 6 to form a 1GB dvma range
2997  */
2998 static uint64_t
2999 pci_iommu_disp(iommu_t *iommu_p, uint64_t *ctl_p)
3000 {
3001 	uint64_t ctl_old;
3002 	if (CHIP_TYPE(iommu_p->iommu_pci_p) != PCI_CHIP_TOMATILLO)
3003 		return (0);
3004 
3005 	ctl_old = *iommu_p->iommu_ctrl_reg;
3006 	/* iommu ctrl reg error bits are W1C */
3007 	if (ctl_old >> TOMATIILO_IOMMU_ERR_REG_SHIFT) {
3008 		cmn_err(CE_WARN, "Tomatillo iommu err: %lx", ctl_old);
3009 		*ctl_p |= (ctl_old >> TOMATIILO_IOMMU_ERR_REG_SHIFT)
3010 		    << TOMATIILO_IOMMU_ERR_REG_SHIFT;
3011 	}
3012 
3013 	if (iommu_p->iommu_tsb_size != TOMATILLO_IOMMU_TSB_MAX)
3014 		return (0);
3015 
3016 	/* Tomatillo 2.0 and later, and 1GB DVMA range */
3017 	*ctl_p |= 1 << TOMATILLO_IOMMU_SEG_DISP_SHIFT;
3018 	return (3 << (iommu_p->iommu_dvma_base >> (32 - 3)));
3019 }
3020 
3021 void
3022 pci_iommu_config(iommu_t *iommu_p, uint64_t iommu_ctl, uint64_t cfgpa)
3023 {
3024 	uintptr_t pbm_regbase = get_pbm_reg_base(iommu_p->iommu_pci_p);
3025 	volatile uint64_t *pbm_csr_p = (volatile uint64_t *)pbm_regbase;
3026 	volatile uint64_t *tgt_space_p = (volatile uint64_t *)(pbm_regbase |
3027 		(TOMATILLO_TGT_ADDR_SPACE_OFFSET - SCHIZO_PCI_CTRL_REG_OFFSET));
3028 	volatile uint64_t pbm_ctl = *pbm_csr_p;
3029 
3030 	volatile uint64_t *iommu_ctl_p = iommu_p->iommu_ctrl_reg;
3031 	volatile uint64_t tsb_bar_val = iommu_p->iommu_tsb_paddr;
3032 	volatile uint64_t *tsb_bar_p = iommu_p->iommu_tsb_base_addr_reg;
3033 	uint64_t mask = pci_iommu_disp(iommu_p, &iommu_ctl);
3034 
3035 	DEBUG2(DBG_ATTACH, iommu_p->iommu_pci_p->pci_dip,
3036 		"\npci_iommu_config: pbm_csr_p=%llx pbm_ctl=%llx",
3037 		pbm_csr_p, pbm_ctl);
3038 	DEBUG2(DBG_ATTACH|DBG_CONT, iommu_p->iommu_pci_p->pci_dip,
3039 		"\n\tiommu_ctl_p=%llx iommu_ctl=%llx",
3040 		iommu_ctl_p, iommu_ctl);
3041 	DEBUG4(DBG_ATTACH|DBG_CONT, iommu_p->iommu_pci_p->pci_dip,
3042 		"\n\tcfgpa=%llx tgt_space_p=%llx mask=%x tsb=%llx\n",
3043 		cfgpa, tgt_space_p, mask, tsb_bar_val);
3044 
3045 	if (!cfgpa)
3046 		goto reprog;
3047 
3048 	/* disable PBM arbiters - turn off bits 0-7 */
3049 	*pbm_csr_p = (pbm_ctl >> 8) << 8;
3050 
3051 	/*
3052 	 * For non-XMITS, flush any previous writes. This is only
3053 	 * necessary for host bridges that may have a USB keywboard
3054 	 * attached.  XMITS does not.
3055 	 */
3056 	if (!(CHIP_TYPE(iommu_p->iommu_pci_p) == PCI_CHIP_XMITS))
3057 		(void) ldphysio(cfgpa);
3058 
3059 reprog:
3060 	if (mask)
3061 		*tgt_space_p = mask;
3062 
3063 	*tsb_bar_p = tsb_bar_val;
3064 	*iommu_ctl_p = iommu_ctl;
3065 
3066 	*pbm_csr_p = pbm_ctl;	/* re-enable bus arbitration */
3067 	pbm_ctl = *pbm_csr_p;	/* flush all prev writes */
3068 }
3069 
3070 
3071 int
3072 pci_get_portid(dev_info_t *dip)
3073 {
3074 	return (ddi_getprop(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS,
3075 	    "portid", -1));
3076 }
3077 
3078 /*
3079  * Schizo Safari Performance Events.
3080  */
3081 pci_kev_mask_t
3082 schizo_saf_events[] = {
3083 	{"saf_bus_cycles", 0x1},	{"saf_pause_asserted_cycles", 0x2},
3084 	{"saf_frn_coherent_cmds", 0x3},	{"saf_frn_coherent_hits", 0x4},
3085 	{"saf_my_coherent_cmds", 0x5},	{"saf_my_coherent_hits", 0x6},
3086 	{"saf_frn_io_cmds", 0x7}, 	{"saf_frn_io_hits", 0x8},
3087 	{"merge_buffer", 0x9}, 		{"interrupts", 0xa},
3088 	{"csr_pios", 0xc}, 		{"upa_pios", 0xd},
3089 	{"pcia_pios", 0xe}, 		{"pcib_pios", 0xf},
3090 	{"saf_pause_seen_cycles", 0x11}, 	{"dvma_reads", 0x12},
3091 	{"dvma_writes", 0x13},		{"saf_orq_full_cycles", 0x14},
3092 	{"saf_data_in_cycles", 0x15},	{"saf_data_out_cycles", 0x16},
3093 	{"clear_pic", 0x1f}
3094 };
3095 
3096 
3097 /*
3098  * Schizo PCI Performance Events.
3099  */
3100 pci_kev_mask_t
3101 schizo_pci_events[] = {
3102 	{"dvma_stream_rd", 0x0}, 	{"dvma_stream_wr", 0x1},
3103 	{"dvma_const_rd", 0x2},		{"dvma_const_wr", 0x3},
3104 	{"dvma_stream_buf_mis", 0x4},	{"dvma_cycles", 0x5},
3105 	{"dvma_wd_xfr", 0x6},		{"pio_cycles", 0x7},
3106 	{"dvma_tlb_misses", 0x10},	{"interrupts", 0x11},
3107 	{"saf_inter_nack", 0x12},	{"pio_reads", 0x13},
3108 	{"pio_writes", 0x14},		{"dvma_rd_buf_timeout", 0x15},
3109 	{"dvma_rd_rtry_stc", 0x16},	{"dvma_wr_rtry_stc", 0x17},
3110 	{"dvma_rd_rtry_nonstc", 0x18},	{"dvma_wr_rtry_nonstc", 0x19},
3111 	{"E*_slow_transitions", 0x1a},	{"E*_slow_cycles_per_64", 0x1b},
3112 	{"clear_pic", 0x1f}
3113 };
3114 
3115 
3116 /*
3117  * Create the picN kstats for the pci
3118  * and safari events.
3119  */
3120 void
3121 pci_kstat_init()
3122 {
3123 	pci_name_kstat = (pci_ksinfo_t *)kmem_alloc(sizeof (pci_ksinfo_t),
3124 		KM_NOSLEEP);
3125 
3126 	if (pci_name_kstat == NULL) {
3127 		cmn_err(CE_WARN, "pcisch : no space for kstat\n");
3128 	} else {
3129 		pci_name_kstat->pic_no_evs =
3130 			sizeof (schizo_pci_events) / sizeof (pci_kev_mask_t);
3131 		pci_name_kstat->pic_shift[0] = SCHIZO_SHIFT_PIC0;
3132 		pci_name_kstat->pic_shift[1] = SCHIZO_SHIFT_PIC1;
3133 		pci_create_name_kstat("pcis",
3134 			pci_name_kstat, schizo_pci_events);
3135 	}
3136 
3137 	saf_name_kstat = (pci_ksinfo_t *)kmem_alloc(sizeof (pci_ksinfo_t),
3138 		KM_NOSLEEP);
3139 	if (saf_name_kstat == NULL) {
3140 		cmn_err(CE_WARN, "pcisch : no space for kstat\n");
3141 	} else {
3142 		saf_name_kstat->pic_no_evs =
3143 			sizeof (schizo_saf_events) / sizeof (pci_kev_mask_t);
3144 		saf_name_kstat->pic_shift[0] = SCHIZO_SHIFT_PIC0;
3145 		saf_name_kstat->pic_shift[1] = SCHIZO_SHIFT_PIC1;
3146 		pci_create_name_kstat("saf", saf_name_kstat, schizo_saf_events);
3147 	}
3148 }
3149 
3150 void
3151 pci_kstat_fini()
3152 {
3153 	if (pci_name_kstat != NULL) {
3154 		pci_delete_name_kstat(pci_name_kstat);
3155 		kmem_free(pci_name_kstat, sizeof (pci_ksinfo_t));
3156 		pci_name_kstat = NULL;
3157 	}
3158 
3159 	if (saf_name_kstat != NULL) {
3160 		pci_delete_name_kstat(saf_name_kstat);
3161 		kmem_free(saf_name_kstat, sizeof (pci_ksinfo_t));
3162 		saf_name_kstat = NULL;
3163 	}
3164 }
3165 
3166 /*
3167  * Create 'counters' kstat for pci events.
3168  */
3169 void
3170 pci_add_pci_kstat(pci_t *pci_p)
3171 {
3172 	pci_cntr_addr_t *cntr_addr_p = &pci_p->pci_ks_addr;
3173 	uintptr_t regbase = (uintptr_t)pci_p->pci_address[0];
3174 
3175 	cntr_addr_p->pcr_addr = (uint64_t *)
3176 		(regbase + SCHIZO_PERF_PCI_PCR_OFFSET);
3177 	cntr_addr_p->pic_addr = (uint64_t *)
3178 		(regbase + SCHIZO_PERF_PCI_PIC_OFFSET);
3179 
3180 	pci_p->pci_ksp = pci_create_cntr_kstat(pci_p, "pcis",
3181 		NUM_OF_PICS, pci_cntr_kstat_update, cntr_addr_p);
3182 
3183 	if (pci_p->pci_ksp == NULL) {
3184 		cmn_err(CE_WARN, "pcisch : cannot create counter kstat");
3185 	}
3186 }
3187 
3188 void
3189 pci_rem_pci_kstat(pci_t *pci_p)
3190 {
3191 	if (pci_p->pci_ksp != NULL)
3192 		kstat_delete(pci_p->pci_ksp);
3193 	pci_p->pci_ksp = NULL;
3194 }
3195 
3196 void
3197 pci_add_upstream_kstat(pci_t *pci_p)
3198 {
3199 	pci_common_t	*cmn_p = pci_p->pci_common_p;
3200 	pci_cntr_pa_t	*cntr_pa_p = &cmn_p->pci_cmn_uks_pa;
3201 	uint64_t regbase = va_to_pa(pci_p->pci_address[1]);
3202 
3203 	cntr_pa_p->pcr_pa =
3204 		regbase + SCHIZO_PERF_SAF_PCR_OFFSET;
3205 	cntr_pa_p->pic_pa =
3206 		regbase + SCHIZO_PERF_SAF_PIC_OFFSET;
3207 
3208 	cmn_p->pci_common_uksp = pci_create_cntr_kstat(pci_p, "saf",
3209 		NUM_OF_PICS, pci_cntr_kstat_pa_update, cntr_pa_p);
3210 }
3211 
3212 /*
3213  * Extract the drivers binding name to identify which chip
3214  * we're binding to.  Whenever a new bus bridge is created, the driver alias
3215  * entry should be added here to identify the device if needed.  If a device
3216  * isn't added, the identity defaults to PCI_CHIP_UNIDENTIFIED.
3217  */
3218 static uint32_t
3219 pci_identity_init(pci_t *pci_p)
3220 {
3221 	dev_info_t *dip = pci_p->pci_dip;
3222 	char *name = ddi_binding_name(dip);
3223 	uint32_t ver = ddi_prop_get_int(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS,
3224 		"version#", 0);
3225 
3226 	if (strcmp(name, "pci108e,a801") == 0)
3227 		return (CHIP_ID(PCI_CHIP_TOMATILLO, ver, 0x00));
3228 
3229 	if (strcmp(name, "pci108e,8001") == 0)
3230 		return (CHIP_ID(PCI_CHIP_SCHIZO, ver, 0x00));
3231 
3232 	if (strcmp(name, "pci108e,8002") == 0) {
3233 		uint32_t mod_rev = ddi_prop_get_int(DDI_DEV_T_ANY, dip,
3234 			DDI_PROP_DONTPASS, "module-revision#", 0);
3235 		return (CHIP_ID(PCI_CHIP_XMITS, ver, mod_rev));
3236 	}
3237 
3238 	cmn_err(CE_WARN, "%s%d: Unknown PCI Host bridge %s %x\n",
3239 		ddi_driver_name(dip), ddi_get_instance(dip), name, ver);
3240 
3241 	return (PCI_CHIP_UNIDENTIFIED);
3242 }
3243 
3244 /*
3245  * Setup a physical pointer to one leaf config space area. This
3246  * is used in several places in order to do a dummy read which
3247  * guarantees the nexus (and not a bus master) has gained control
3248  * of the bus.
3249  */
3250 static void
3251 pci_setup_cfgpa(pci_t *pci_p)
3252 {
3253 	dev_info_t *dip = pci_p->pci_dip;
3254 	dev_info_t *cdip;
3255 	pbm_t *pbm_p = pci_p->pci_pbm_p;
3256 	uint64_t cfgpa = pci_get_cfg_pabase(pci_p);
3257 	uint32_t *reg_p;
3258 	int reg_len;
3259 
3260 	for (cdip = ddi_get_child(dip); cdip != NULL;
3261 	    cdip = ddi_get_next_sibling(cdip)) {
3262 		if (ddi_getlongprop(DDI_DEV_T_ANY, cdip, DDI_PROP_DONTPASS,
3263 		    "reg", (caddr_t)&reg_p, &reg_len) != DDI_PROP_SUCCESS)
3264 			continue;
3265 		cfgpa += (*reg_p) & (PCI_CONF_ADDR_MASK ^ PCI_REG_REG_M);
3266 		kmem_free(reg_p, reg_len);
3267 		break;
3268 	}
3269 	pbm_p->pbm_anychild_cfgpa = cfgpa;
3270 }
3271 
3272 void
3273 pci_post_init_child(pci_t *pci_p, dev_info_t *child)
3274 {
3275 	volatile uint64_t *ctrl_reg_p;
3276 	pbm_t *pbm_p = pci_p->pci_pbm_p;
3277 
3278 	pci_setup_cfgpa(pci_p);
3279 
3280 	/*
3281 	 * This is a hack for skyhawk/casinni combination to address
3282 	 * hardware problems between the request and grant signals which
3283 	 * causes a bus hang.  One workaround, which is applied here,
3284 	 * is to disable bus parking if the child contains the property
3285 	 * pci-req-removal.  Note that if the bus is quiesced we must mask
3286 	 * off the parking bit in the saved control registers, since the
3287 	 * quiesce operation temporarily turns off PCI bus parking.
3288 	 */
3289 	if (ddi_prop_exists(DDI_DEV_T_ANY, child, DDI_PROP_DONTPASS,
3290 		"pci-req-removal") == 1) {
3291 
3292 		if (pbm_p->pbm_quiesce_count > 0) {
3293 			pbm_p->pbm_saved_ctrl_reg &= ~SCHIZO_PCI_CTRL_ARB_PARK;
3294 		} else {
3295 			ctrl_reg_p = pbm_p->pbm_ctrl_reg;
3296 			*ctrl_reg_p &= ~SCHIZO_PCI_CTRL_ARB_PARK;
3297 		}
3298 	}
3299 
3300 	if (CHIP_TYPE(pci_p) == PCI_CHIP_XMITS) {
3301 		if (*pbm_p->pbm_ctrl_reg & XMITS_PCI_CTRL_X_MODE) {
3302 			int value;
3303 
3304 			/*
3305 			 * Due to a XMITS bug, we need to set the outstanding
3306 			 * split transactions to 1 for all PCI-X functions
3307 			 * behind the leaf.
3308 			 */
3309 			value = (xmits_max_transactions << 4) |
3310 			    (xmits_max_read_bytes << 2);
3311 
3312 			DEBUG1(DBG_INIT_CLD, child, "Turning on XMITS NCPQ "
3313 			    "Workaround: value = %x\n", value);
3314 
3315 			pcix_set_cmd_reg(child, value);
3316 
3317 			(void) ndi_prop_update_int(DDI_DEV_T_NONE,
3318 			    child, "pcix-update-cmd-reg", value);
3319 		}
3320 
3321 		if (PCI_CHIP_ID(pci_p) >= XMITS_VER_30) {
3322 			uint64_t *pbm_pcix_diag_reg =
3323 			    (uint64_t *)(pci_p->pci_address[0] +
3324 			    XMITS_PCI_X_DIAG_REG_OFFSET);
3325 			uint64_t bugcntl = (*pbm_pcix_diag_reg >>
3326 			    XMITS_PCI_X_DIAG_BUGCNTL_SHIFT) &
3327 			    XMITS_PCI_X_DIAG_BUGCNTL_MASK;
3328 			uint64_t tunable = (*pbm_p->pbm_ctrl_reg &
3329 			    XMITS_PCI_CTRL_X_MODE ?
3330 			    xmits_pcix_diag_bugcntl_pcix :
3331 			    xmits_pcix_diag_bugcntl_pci)
3332 			    & XMITS_PCI_X_DIAG_BUGCNTL_MASK;
3333 
3334 			DEBUG4(DBG_INIT_CLD, pci_p->pci_dip, "%s: XMITS "
3335 			    "pcix diag bugcntl=0x%lx, tunable=0x%lx, mode=%s\n",
3336 			    ddi_driver_name(child), bugcntl, tunable,
3337 			    ((*pbm_p->pbm_ctrl_reg & XMITS_PCI_CTRL_X_MODE)?
3338 			    "PCI-X":"PCI"));
3339 
3340 			DEBUG2(DBG_INIT_CLD, pci_p->pci_dip, "%s: XMITS "
3341 			    "pcix diag reg=0x%lx (CUR)\n",
3342 			    ddi_driver_name(child), *pbm_pcix_diag_reg);
3343 
3344 			/*
3345 			 * Due to a XMITS 3.x hw bug, we need to
3346 			 * read PBM's xmits pci ctrl status register to
3347 			 * determine mode (PCI or PCI-X) and then update
3348 			 * PBM's pcix diag register with new BUG_FIX_CNTL
3349 			 * bits (47:32) _if_ different from tunable's mode
3350 			 * based value. This update is performed only once
3351 			 * during the PBM's first child init.
3352 			 *
3353 			 * Per instructions from xmits hw engineering,
3354 			 * non-BUG_FIX_CNTL bits should not be preserved
3355 			 * when updating the pcix diag register. Such bits
3356 			 * should be written as 0s.
3357 			 */
3358 
3359 			if (bugcntl != tunable) {
3360 				*pbm_pcix_diag_reg = tunable <<
3361 				    XMITS_PCI_X_DIAG_BUGCNTL_SHIFT;
3362 
3363 				DEBUG2(DBG_INIT_CLD, pci_p->pci_dip, "%s: XMITS"
3364 				    " pcix diag reg=0x%lx (NEW)\n",
3365 				    ddi_driver_name(child), *pbm_pcix_diag_reg);
3366 			}
3367 		}
3368 	}
3369 }
3370 
3371 void
3372 pci_post_uninit_child(pci_t *pci_p)
3373 {
3374 	pci_setup_cfgpa(pci_p);
3375 }
3376 
3377 static int
3378 pci_tom_nbintr_op(pci_t *pci_p, uint32_t inum, intrfunc f, caddr_t arg,
3379     int flag)
3380 {
3381 	uint32_t ino = pci_p->pci_inos[inum];
3382 	uint32_t mondo = IB_INO_TO_NBMONDO(pci_p->pci_ib_p, ino);
3383 	int ret = DDI_SUCCESS;
3384 
3385 	mondo = CB_MONDO_TO_XMONDO(pci_p->pci_cb_p, mondo); /* no op on tom */
3386 
3387 	switch (flag) {
3388 	case PCI_OBJ_INTR_ADD:
3389 		VERIFY(add_ivintr(mondo, pci_pil[inum], f,
3390 		    arg, NULL, NULL) == 0);
3391 		break;
3392 	case PCI_OBJ_INTR_REMOVE:
3393 		VERIFY(rem_ivintr(mondo, pci_pil[inum]) == 0);
3394 		break;
3395 	default:
3396 		ret = DDI_FAILURE;
3397 		break;
3398 	}
3399 
3400 	return (ret);
3401 }
3402 
3403 int
3404 pci_ecc_add_intr(pci_t *pci_p, int inum, ecc_intr_info_t *eii_p)
3405 {
3406 	uint32_t mondo;
3407 	int	r;
3408 
3409 	mondo = ((pci_p->pci_cb_p->cb_ign << PCI_INO_BITS) |
3410 	    pci_p->pci_inos[inum]);
3411 	mondo = CB_MONDO_TO_XMONDO(pci_p->pci_cb_p, mondo);
3412 
3413 	VERIFY(add_ivintr(mondo, pci_pil[inum], (intrfunc)ecc_intr,
3414 	    (caddr_t)eii_p, NULL, NULL) == 0);
3415 
3416 	if (CHIP_TYPE(pci_p) != PCI_CHIP_TOMATILLO)
3417 		return (PCI_ATTACH_RETCODE(PCI_ECC_OBJ, PCI_OBJ_INTR_ADD,
3418 		    DDI_SUCCESS));
3419 
3420 	r = pci_tom_nbintr_op(pci_p, inum, (intrfunc)ecc_intr,
3421 	    (caddr_t)eii_p, PCI_OBJ_INTR_ADD);
3422 	return (PCI_ATTACH_RETCODE(PCI_ECC_OBJ, PCI_OBJ_INTR_ADD, r));
3423 }
3424 
3425 void
3426 pci_ecc_rem_intr(pci_t *pci_p, int inum, ecc_intr_info_t *eii_p)
3427 {
3428 	uint32_t mondo;
3429 
3430 	mondo = ((pci_p->pci_cb_p->cb_ign << PCI_INO_BITS) |
3431 	    pci_p->pci_inos[inum]);
3432 	mondo = CB_MONDO_TO_XMONDO(pci_p->pci_cb_p, mondo);
3433 
3434 	VERIFY(rem_ivintr(mondo, pci_pil[inum]) == 0);
3435 
3436 	if (CHIP_TYPE(pci_p) == PCI_CHIP_TOMATILLO)
3437 		pci_tom_nbintr_op(pci_p, inum, (intrfunc)ecc_intr,
3438 			(caddr_t)eii_p, PCI_OBJ_INTR_REMOVE);
3439 }
3440 
3441 static uint_t
3442 pci_pbm_cdma_intr(caddr_t a)
3443 {
3444 	pbm_t *pbm_p = (pbm_t *)a;
3445 	pbm_p->pbm_cdma_flag = PBM_CDMA_DONE;
3446 #ifdef PBM_CDMA_DEBUG
3447 	pbm_p->pbm_cdma_intr_cnt++;
3448 #endif /* PBM_CDMA_DEBUG */
3449 	return (DDI_INTR_CLAIMED);
3450 }
3451 
3452 int
3453 pci_pbm_add_intr(pci_t *pci_p)
3454 {
3455 	uint32_t mondo;
3456 
3457 	mondo = IB_INO_TO_MONDO(pci_p->pci_ib_p, pci_p->pci_inos[CBNINTR_CDMA]);
3458 	mondo = CB_MONDO_TO_XMONDO(pci_p->pci_cb_p, mondo);
3459 
3460 	VERIFY(add_ivintr(mondo, pci_pil[CBNINTR_CDMA],
3461 	    (intrfunc)pci_pbm_cdma_intr, (caddr_t)pci_p->pci_pbm_p,
3462 	    NULL, NULL) == 0);
3463 
3464 	return (DDI_SUCCESS);
3465 }
3466 
3467 void
3468 pci_pbm_rem_intr(pci_t *pci_p)
3469 {
3470 	ib_t		*ib_p = pci_p->pci_ib_p;
3471 	uint32_t	mondo;
3472 
3473 	mondo = IB_INO_TO_MONDO(pci_p->pci_ib_p, pci_p->pci_inos[CBNINTR_CDMA]);
3474 	mondo = CB_MONDO_TO_XMONDO(pci_p->pci_cb_p, mondo);
3475 
3476 	ib_intr_disable(ib_p, pci_p->pci_inos[CBNINTR_CDMA], IB_INTR_NOWAIT);
3477 	VERIFY(rem_ivintr(mondo, pci_pil[CBNINTR_CDMA]) == 0);
3478 }
3479 
3480 void
3481 pci_pbm_suspend(pci_t *pci_p)
3482 {
3483 	pbm_t		*pbm_p = pci_p->pci_pbm_p;
3484 	ib_ino_t	ino = pci_p->pci_inos[CBNINTR_CDMA];
3485 
3486 	/* Save CDMA interrupt state */
3487 	pbm_p->pbm_cdma_imr_save = *ib_intr_map_reg_addr(pci_p->pci_ib_p, ino);
3488 }
3489 
3490 void
3491 pci_pbm_resume(pci_t *pci_p)
3492 {
3493 	pbm_t		*pbm_p = pci_p->pci_pbm_p;
3494 	ib_ino_t	ino = pci_p->pci_inos[CBNINTR_CDMA];
3495 
3496 	/* Restore CDMA interrupt state */
3497 	*ib_intr_map_reg_addr(pci_p->pci_ib_p, ino) = pbm_p->pbm_cdma_imr_save;
3498 }
3499 
3500 /*
3501  * pci_bus_quiesce
3502  *
3503  * This function is called as the corresponding control ops routine
3504  * to a DDI_CTLOPS_QUIESCE command.  Its mission is to halt all DMA
3505  * activity on the bus by disabling arbitration/parking.
3506  */
3507 int
3508 pci_bus_quiesce(pci_t *pci_p, dev_info_t *dip, void *result)
3509 {
3510 	volatile uint64_t *ctrl_reg_p;
3511 	volatile uint64_t ctrl_reg;
3512 	pbm_t *pbm_p;
3513 
3514 	pbm_p = pci_p->pci_pbm_p;
3515 	ctrl_reg_p = pbm_p->pbm_ctrl_reg;
3516 
3517 	if (pbm_p->pbm_quiesce_count++ == 0) {
3518 
3519 		DEBUG0(DBG_PWR, dip, "quiescing bus\n");
3520 
3521 		ctrl_reg = *ctrl_reg_p;
3522 		pbm_p->pbm_saved_ctrl_reg = ctrl_reg;
3523 		ctrl_reg &= ~(SCHIZO_PCI_CTRL_ARB_EN_MASK |
3524 		    SCHIZO_PCI_CTRL_ARB_PARK);
3525 		*ctrl_reg_p = ctrl_reg;
3526 #ifdef	DEBUG
3527 		ctrl_reg = *ctrl_reg_p;
3528 		if ((ctrl_reg & (SCHIZO_PCI_CTRL_ARB_EN_MASK |
3529 		    SCHIZO_PCI_CTRL_ARB_PARK)) != 0)
3530 			panic("ctrl_reg didn't quiesce: 0x%lx\n", ctrl_reg);
3531 #endif
3532 		if (pbm_p->pbm_anychild_cfgpa)
3533 			(void) ldphysio(pbm_p->pbm_anychild_cfgpa);
3534 	}
3535 
3536 	return (DDI_SUCCESS);
3537 }
3538 
3539 /*
3540  * pci_bus_unquiesce
3541  *
3542  * This function is called as the corresponding control ops routine
3543  * to a DDI_CTLOPS_UNQUIESCE command.  Its mission is to resume paused
3544  * DMA activity on the bus by re-enabling arbitration (and maybe parking).
3545  */
3546 int
3547 pci_bus_unquiesce(pci_t *pci_p, dev_info_t *dip, void *result)
3548 {
3549 	volatile uint64_t *ctrl_reg_p;
3550 	pbm_t *pbm_p;
3551 #ifdef	DEBUG
3552 	volatile uint64_t ctrl_reg;
3553 #endif
3554 
3555 	pbm_p = pci_p->pci_pbm_p;
3556 	ctrl_reg_p = pbm_p->pbm_ctrl_reg;
3557 
3558 	ASSERT(pbm_p->pbm_quiesce_count > 0);
3559 	if (--pbm_p->pbm_quiesce_count == 0) {
3560 		*ctrl_reg_p = pbm_p->pbm_saved_ctrl_reg;
3561 #ifdef	DEBUG
3562 		ctrl_reg = *ctrl_reg_p;
3563 		if ((ctrl_reg & (SCHIZO_PCI_CTRL_ARB_EN_MASK |
3564 		    SCHIZO_PCI_CTRL_ARB_PARK)) == 0)
3565 			panic("ctrl_reg didn't unquiesce: 0x%lx\n", ctrl_reg);
3566 #endif
3567 	}
3568 
3569 	return (DDI_SUCCESS);
3570 }
3571 
3572 int
3573 pci_reloc_getkey(void)
3574 {
3575 	return (0x200);
3576 }
3577 
3578 static void
3579 tm_vmem_free(ddi_dma_impl_t *mp, iommu_t *iommu_p, dvma_addr_t dvma_pg,
3580 	int npages)
3581 {
3582 	uint32_t dur_max, dur_base;
3583 	dvma_unbind_req_t *req_p, *req_max_p;
3584 	dvma_unbind_req_t *req_base_p = iommu_p->iommu_mtlb_req_p;
3585 	uint32_t tlb_vpn[IOMMU_TLB_ENTRIES];
3586 	caddr_t reg_base;
3587 	volatile uint64_t *tag_p;
3588 	int i, preserv_count = 0;
3589 
3590 	mutex_enter(&iommu_p->iommu_mtlb_lock);
3591 
3592 	iommu_p->iommu_mtlb_npgs += npages;
3593 	req_max_p = req_base_p + iommu_p->iommu_mtlb_nreq++;
3594 	req_max_p->dur_npg = npages;
3595 	req_max_p->dur_base = dvma_pg;
3596 	req_max_p->dur_flags = mp->dmai_flags & DMAI_FLAGS_VMEMCACHE;
3597 
3598 
3599 	if (iommu_p->iommu_mtlb_npgs <= iommu_p->iommu_mtlb_maxpgs)
3600 		goto done;
3601 
3602 	/* read TLB */
3603 	reg_base = iommu_p->iommu_pci_p->pci_address[0];
3604 	tag_p = (volatile uint64_t *)
3605 	    (reg_base + COMMON_IOMMU_TLB_TAG_DIAG_ACC_OFFSET);
3606 
3607 	for (i = 0; i < IOMMU_TLB_ENTRIES; i++)
3608 		tlb_vpn[i] = tag_p[i] & SCHIZO_VPN_MASK;
3609 
3610 	/* for each request search the TLB for a matching address */
3611 	for (req_p = req_base_p; req_p <= req_max_p; req_p++) {
3612 		dur_base = req_p->dur_base;
3613 		dur_max = req_p->dur_base + req_p->dur_npg;
3614 
3615 		for (i = 0; i < IOMMU_TLB_ENTRIES; i++) {
3616 			uint_t vpn = tlb_vpn[i];
3617 			if (vpn >= dur_base && vpn < dur_max)
3618 				break;
3619 		}
3620 		if (i >= IOMMU_TLB_ENTRIES) {
3621 			pci_vmem_do_free(iommu_p,
3622 			    (void *)IOMMU_PTOB(req_p->dur_base),
3623 			    req_p->dur_npg, req_p->dur_flags);
3624 			iommu_p->iommu_mtlb_npgs -= req_p->dur_npg;
3625 			continue;
3626 		}
3627 		/* if an empty slot exists */
3628 		if ((req_p - req_base_p) != preserv_count)
3629 			*(req_base_p + preserv_count) = *req_p;
3630 		preserv_count++;
3631 	}
3632 
3633 	iommu_p->iommu_mtlb_nreq = preserv_count;
3634 done:
3635 	mutex_exit(&iommu_p->iommu_mtlb_lock);
3636 }
3637 
3638 void
3639 pci_vmem_free(iommu_t *iommu_p, ddi_dma_impl_t *mp, void *dvma_addr,
3640     size_t npages)
3641 {
3642 	if (tm_mtlb_gc)
3643 		tm_vmem_free(mp, iommu_p,
3644 		    (dvma_addr_t)IOMMU_BTOP((dvma_addr_t)dvma_addr), npages);
3645 	else
3646 		pci_vmem_do_free(iommu_p, dvma_addr, npages,
3647 		    (mp->dmai_flags & DMAI_FLAGS_VMEMCACHE));
3648 }
3649 
3650 /*
3651  * pci_iommu_bypass_end_configure
3652  *
3653  * Support for 42-bit bus width to SAFARI and JBUS in DVMA and
3654  * iommu bypass transfers:
3655  */
3656 
3657 dma_bypass_addr_t
3658 pci_iommu_bypass_end_configure(void)
3659 {
3660 
3661 	return ((dma_bypass_addr_t)SAFARI_JBUS_IOMMU_BYPASS_END);
3662 }
3663