1 /* $Id: sbus.c,v 1.19 2002/01/23 11:27:32 davem Exp $
2 * sbus.c: UltraSparc SBUS controller support.
4 * Copyright (C) 1999 David S. Miller (davem@redhat.com)
7 #include <linux/kernel.h>
8 #include <linux/types.h>
10 #include <linux/spinlock.h>
11 #include <linux/slab.h>
12 #include <linux/init.h>
13 #include <linux/interrupt.h>
19 #include <asm/cache.h>
23 #include <asm/starfire.h>
25 #include "iommu_common.h"
27 #define MAP_BASE ((u32)0xc0000000)
34 /* Offsets from iommu_regs */
35 #define SYSIO_IOMMUREG_BASE 0x2400UL
36 #define IOMMU_CONTROL (0x2400UL - 0x2400UL) /* IOMMU control register */
37 #define IOMMU_TSBBASE (0x2408UL - 0x2400UL) /* TSB base address register */
38 #define IOMMU_FLUSH (0x2410UL - 0x2400UL) /* IOMMU flush register */
39 #define IOMMU_VADIAG (0x4400UL - 0x2400UL) /* SBUS virtual address diagnostic */
40 #define IOMMU_TAGCMP (0x4408UL - 0x2400UL) /* TLB tag compare diagnostics */
41 #define IOMMU_LRUDIAG (0x4500UL - 0x2400UL) /* IOMMU LRU queue diagnostics */
42 #define IOMMU_TAGDIAG (0x4580UL - 0x2400UL) /* TLB tag diagnostics */
43 #define IOMMU_DRAMDIAG (0x4600UL - 0x2400UL) /* TLB data RAM diagnostics */
45 #define IOMMU_DRAM_VALID (1UL << 30UL)
47 static void __iommu_flushall(struct iommu
*iommu
)
52 tag
= iommu
->iommu_control
+ (IOMMU_TAGDIAG
- IOMMU_CONTROL
);
53 for (entry
= 0; entry
< 16; entry
++) {
57 upa_readq(iommu
->write_complete_reg
);
60 /* Offsets from strbuf_regs */
61 #define SYSIO_STRBUFREG_BASE 0x2800UL
62 #define STRBUF_CONTROL (0x2800UL - 0x2800UL) /* Control */
63 #define STRBUF_PFLUSH (0x2808UL - 0x2800UL) /* Page flush/invalidate */
64 #define STRBUF_FSYNC (0x2810UL - 0x2800UL) /* Flush synchronization */
65 #define STRBUF_DRAMDIAG (0x5000UL - 0x2800UL) /* data RAM diagnostic */
66 #define STRBUF_ERRDIAG (0x5400UL - 0x2800UL) /* error status diagnostics */
67 #define STRBUF_PTAGDIAG (0x5800UL - 0x2800UL) /* Page tag diagnostics */
68 #define STRBUF_LTAGDIAG (0x5900UL - 0x2800UL) /* Line tag diagnostics */
70 #define STRBUF_TAG_VALID 0x02UL
72 static void sbus_strbuf_flush(struct iommu
*iommu
, struct strbuf
*strbuf
, u32 base
, unsigned long npages
, int direction
)
79 upa_writeq(base
+ (n
<< IO_PAGE_SHIFT
), strbuf
->strbuf_pflush
);
81 /* If the device could not have possibly put dirty data into
82 * the streaming cache, no flush-flag synchronization needs
85 if (direction
== SBUS_DMA_TODEVICE
)
88 *(strbuf
->strbuf_flushflag
) = 0UL;
90 /* Whoopee cushion! */
91 upa_writeq(strbuf
->strbuf_flushflag_pa
, strbuf
->strbuf_fsync
);
92 upa_readq(iommu
->write_complete_reg
);
95 while (*(strbuf
->strbuf_flushflag
) == 0UL) {
103 printk(KERN_WARNING
"sbus_strbuf_flush: flushflag timeout "
104 "vaddr[%08x] npages[%ld]\n",
108 /* Based largely upon the ppc64 iommu allocator. */
109 static long sbus_arena_alloc(struct iommu
*iommu
, unsigned long npages
)
111 struct iommu_arena
*arena
= &iommu
->arena
;
112 unsigned long n
, i
, start
, end
, limit
;
115 limit
= arena
->limit
;
120 n
= find_next_zero_bit(arena
->map
, limit
, start
);
122 if (unlikely(end
>= limit
)) {
123 if (likely(pass
< 1)) {
126 __iommu_flushall(iommu
);
130 /* Scanned the whole thing, give up. */
135 for (i
= n
; i
< end
; i
++) {
136 if (test_bit(i
, arena
->map
)) {
142 for (i
= n
; i
< end
; i
++)
143 __set_bit(i
, arena
->map
);
150 static void sbus_arena_free(struct iommu_arena
*arena
, unsigned long base
, unsigned long npages
)
154 for (i
= base
; i
< (base
+ npages
); i
++)
155 __clear_bit(i
, arena
->map
);
158 static void sbus_iommu_table_init(struct iommu
*iommu
, unsigned int tsbsize
)
160 unsigned long tsbbase
, order
, sz
, num_tsb_entries
;
162 num_tsb_entries
= tsbsize
/ sizeof(iopte_t
);
164 /* Setup initial software IOMMU state. */
165 spin_lock_init(&iommu
->lock
);
166 iommu
->page_table_map_base
= MAP_BASE
;
168 /* Allocate and initialize the free area map. */
169 sz
= num_tsb_entries
/ 8;
170 sz
= (sz
+ 7UL) & ~7UL;
171 iommu
->arena
.map
= kzalloc(sz
, GFP_KERNEL
);
172 if (!iommu
->arena
.map
) {
173 prom_printf("SBUS_IOMMU: Error, kmalloc(arena.map) failed.\n");
176 iommu
->arena
.limit
= num_tsb_entries
;
178 /* Now allocate and setup the IOMMU page table itself. */
179 order
= get_order(tsbsize
);
180 tsbbase
= __get_free_pages(GFP_KERNEL
, order
);
182 prom_printf("IOMMU: Error, gfp(tsb) failed.\n");
185 iommu
->page_table
= (iopte_t
*)tsbbase
;
186 memset(iommu
->page_table
, 0, tsbsize
);
189 static inline iopte_t
*alloc_npages(struct iommu
*iommu
, unsigned long npages
)
193 entry
= sbus_arena_alloc(iommu
, npages
);
194 if (unlikely(entry
< 0))
197 return iommu
->page_table
+ entry
;
200 static inline void free_npages(struct iommu
*iommu
, dma_addr_t base
, unsigned long npages
)
202 sbus_arena_free(&iommu
->arena
, base
>> IO_PAGE_SHIFT
, npages
);
205 void *sbus_alloc_consistent(struct sbus_dev
*sdev
, size_t size
, dma_addr_t
*dvma_addr
)
207 struct sbus_info
*info
;
210 unsigned long flags
, order
, first_page
;
214 size
= IO_PAGE_ALIGN(size
);
215 order
= get_order(size
);
219 first_page
= __get_free_pages(GFP_KERNEL
|__GFP_COMP
, order
);
220 if (first_page
== 0UL)
222 memset((char *)first_page
, 0, PAGE_SIZE
<< order
);
224 info
= sdev
->bus
->iommu
;
225 iommu
= &info
->iommu
;
227 spin_lock_irqsave(&iommu
->lock
, flags
);
228 iopte
= alloc_npages(iommu
, size
>> IO_PAGE_SHIFT
);
229 spin_unlock_irqrestore(&iommu
->lock
, flags
);
231 if (unlikely(iopte
== NULL
)) {
232 free_pages(first_page
, order
);
236 *dvma_addr
= (iommu
->page_table_map_base
+
237 ((iopte
- iommu
->page_table
) << IO_PAGE_SHIFT
));
238 ret
= (void *) first_page
;
239 npages
= size
>> IO_PAGE_SHIFT
;
240 first_page
= __pa(first_page
);
242 iopte_val(*iopte
) = (IOPTE_VALID
| IOPTE_CACHE
|
244 (first_page
& IOPTE_PAGE
));
246 first_page
+= IO_PAGE_SIZE
;
252 void sbus_free_consistent(struct sbus_dev
*sdev
, size_t size
, void *cpu
, dma_addr_t dvma
)
254 struct sbus_info
*info
;
257 unsigned long flags
, order
, npages
;
259 npages
= IO_PAGE_ALIGN(size
) >> IO_PAGE_SHIFT
;
260 info
= sdev
->bus
->iommu
;
261 iommu
= &info
->iommu
;
262 iopte
= iommu
->page_table
+
263 ((dvma
- iommu
->page_table_map_base
) >> IO_PAGE_SHIFT
);
265 spin_lock_irqsave(&iommu
->lock
, flags
);
267 free_npages(iommu
, dvma
- iommu
->page_table_map_base
, npages
);
269 spin_unlock_irqrestore(&iommu
->lock
, flags
);
271 order
= get_order(size
);
273 free_pages((unsigned long)cpu
, order
);
276 dma_addr_t
sbus_map_single(struct sbus_dev
*sdev
, void *ptr
, size_t sz
, int direction
)
278 struct sbus_info
*info
;
281 unsigned long flags
, npages
, oaddr
;
282 unsigned long i
, base_paddr
;
284 unsigned long iopte_protection
;
286 info
= sdev
->bus
->iommu
;
287 iommu
= &info
->iommu
;
289 if (unlikely(direction
== SBUS_DMA_NONE
))
292 oaddr
= (unsigned long)ptr
;
293 npages
= IO_PAGE_ALIGN(oaddr
+ sz
) - (oaddr
& IO_PAGE_MASK
);
294 npages
>>= IO_PAGE_SHIFT
;
296 spin_lock_irqsave(&iommu
->lock
, flags
);
297 base
= alloc_npages(iommu
, npages
);
298 spin_unlock_irqrestore(&iommu
->lock
, flags
);
303 bus_addr
= (iommu
->page_table_map_base
+
304 ((base
- iommu
->page_table
) << IO_PAGE_SHIFT
));
305 ret
= bus_addr
| (oaddr
& ~IO_PAGE_MASK
);
306 base_paddr
= __pa(oaddr
& IO_PAGE_MASK
);
308 iopte_protection
= IOPTE_VALID
| IOPTE_STBUF
| IOPTE_CACHE
;
309 if (direction
!= SBUS_DMA_TODEVICE
)
310 iopte_protection
|= IOPTE_WRITE
;
312 for (i
= 0; i
< npages
; i
++, base
++, base_paddr
+= IO_PAGE_SIZE
)
313 iopte_val(*base
) = iopte_protection
| base_paddr
;
318 void sbus_unmap_single(struct sbus_dev
*sdev
, dma_addr_t bus_addr
, size_t sz
, int direction
)
320 struct sbus_info
*info
= sdev
->bus
->iommu
;
321 struct iommu
*iommu
= &info
->iommu
;
322 struct strbuf
*strbuf
= &info
->strbuf
;
324 unsigned long flags
, npages
, i
;
326 if (unlikely(direction
== SBUS_DMA_NONE
))
329 npages
= IO_PAGE_ALIGN(bus_addr
+ sz
) - (bus_addr
& IO_PAGE_MASK
);
330 npages
>>= IO_PAGE_SHIFT
;
331 base
= iommu
->page_table
+
332 ((bus_addr
- iommu
->page_table_map_base
) >> IO_PAGE_SHIFT
);
334 bus_addr
&= IO_PAGE_MASK
;
336 spin_lock_irqsave(&iommu
->lock
, flags
);
337 sbus_strbuf_flush(iommu
, strbuf
, bus_addr
, npages
, direction
);
338 for (i
= 0; i
< npages
; i
++)
339 iopte_val(base
[i
]) = 0UL;
340 free_npages(iommu
, bus_addr
- iommu
->page_table_map_base
, npages
);
341 spin_unlock_irqrestore(&iommu
->lock
, flags
);
344 #define SG_ENT_PHYS_ADDRESS(SG) \
345 (__pa(page_address((SG)->page)) + (SG)->offset)
347 static inline void fill_sg(iopte_t
*iopte
, struct scatterlist
*sg
,
348 int nused
, int nelems
, unsigned long iopte_protection
)
350 struct scatterlist
*dma_sg
= sg
;
351 struct scatterlist
*sg_end
= sg
+ nelems
;
354 for (i
= 0; i
< nused
; i
++) {
355 unsigned long pteval
= ~0UL;
358 dma_npages
= ((dma_sg
->dma_address
& (IO_PAGE_SIZE
- 1UL)) +
360 ((IO_PAGE_SIZE
- 1UL))) >> IO_PAGE_SHIFT
;
362 unsigned long offset
;
365 /* If we are here, we know we have at least one
366 * more page to map. So walk forward until we
367 * hit a page crossing, and begin creating new
368 * mappings from that spot.
373 tmp
= SG_ENT_PHYS_ADDRESS(sg
);
375 if (((tmp
^ pteval
) >> IO_PAGE_SHIFT
) != 0UL) {
376 pteval
= tmp
& IO_PAGE_MASK
;
377 offset
= tmp
& (IO_PAGE_SIZE
- 1UL);
380 if (((tmp
^ (tmp
+ len
- 1UL)) >> IO_PAGE_SHIFT
) != 0UL) {
381 pteval
= (tmp
+ IO_PAGE_SIZE
) & IO_PAGE_MASK
;
383 len
-= (IO_PAGE_SIZE
- (tmp
& (IO_PAGE_SIZE
- 1UL)));
389 pteval
= iopte_protection
| (pteval
& IOPTE_PAGE
);
391 *iopte
++ = __iopte(pteval
);
392 pteval
+= IO_PAGE_SIZE
;
393 len
-= (IO_PAGE_SIZE
- offset
);
398 pteval
= (pteval
& IOPTE_PAGE
) + len
;
401 /* Skip over any tail mappings we've fully mapped,
402 * adjusting pteval along the way. Stop when we
403 * detect a page crossing event.
405 while (sg
< sg_end
&&
406 (pteval
<< (64 - IO_PAGE_SHIFT
)) != 0UL &&
407 (pteval
== SG_ENT_PHYS_ADDRESS(sg
)) &&
409 (SG_ENT_PHYS_ADDRESS(sg
) + sg
->length
- 1UL)) >> IO_PAGE_SHIFT
) == 0UL) {
410 pteval
+= sg
->length
;
413 if ((pteval
<< (64 - IO_PAGE_SHIFT
)) == 0UL)
415 } while (dma_npages
!= 0);
420 int sbus_map_sg(struct sbus_dev
*sdev
, struct scatterlist
*sglist
, int nelems
, int direction
)
422 struct sbus_info
*info
;
424 unsigned long flags
, npages
, iopte_protection
;
427 struct scatterlist
*sgtmp
;
430 /* Fast path single entry scatterlists. */
432 sglist
->dma_address
=
433 sbus_map_single(sdev
,
434 (page_address(sglist
->page
) + sglist
->offset
),
435 sglist
->length
, direction
);
436 sglist
->dma_length
= sglist
->length
;
440 info
= sdev
->bus
->iommu
;
441 iommu
= &info
->iommu
;
443 if (unlikely(direction
== SBUS_DMA_NONE
))
446 npages
= prepare_sg(sglist
, nelems
);
448 spin_lock_irqsave(&iommu
->lock
, flags
);
449 base
= alloc_npages(iommu
, npages
);
450 spin_unlock_irqrestore(&iommu
->lock
, flags
);
452 if (unlikely(base
== NULL
))
455 dma_base
= iommu
->page_table_map_base
+
456 ((base
- iommu
->page_table
) << IO_PAGE_SHIFT
);
458 /* Normalize DVMA addresses. */
462 while (used
&& sgtmp
->dma_length
) {
463 sgtmp
->dma_address
+= dma_base
;
467 used
= nelems
- used
;
469 iopte_protection
= IOPTE_VALID
| IOPTE_STBUF
| IOPTE_CACHE
;
470 if (direction
!= SBUS_DMA_TODEVICE
)
471 iopte_protection
|= IOPTE_WRITE
;
473 fill_sg(base
, sglist
, used
, nelems
, iopte_protection
);
476 verify_sglist(sglist
, nelems
, base
, npages
);
482 void sbus_unmap_sg(struct sbus_dev
*sdev
, struct scatterlist
*sglist
, int nelems
, int direction
)
484 struct sbus_info
*info
;
486 struct strbuf
*strbuf
;
488 unsigned long flags
, i
, npages
;
491 if (unlikely(direction
== SBUS_DMA_NONE
))
494 info
= sdev
->bus
->iommu
;
495 iommu
= &info
->iommu
;
496 strbuf
= &info
->strbuf
;
498 bus_addr
= sglist
->dma_address
& IO_PAGE_MASK
;
500 for (i
= 1; i
< nelems
; i
++)
501 if (sglist
[i
].dma_length
== 0)
504 npages
= (IO_PAGE_ALIGN(sglist
[i
].dma_address
+ sglist
[i
].dma_length
) -
505 bus_addr
) >> IO_PAGE_SHIFT
;
507 base
= iommu
->page_table
+
508 ((bus_addr
- iommu
->page_table_map_base
) >> IO_PAGE_SHIFT
);
510 spin_lock_irqsave(&iommu
->lock
, flags
);
511 sbus_strbuf_flush(iommu
, strbuf
, bus_addr
, npages
, direction
);
512 for (i
= 0; i
< npages
; i
++)
513 iopte_val(base
[i
]) = 0UL;
514 free_npages(iommu
, bus_addr
- iommu
->page_table_map_base
, npages
);
515 spin_unlock_irqrestore(&iommu
->lock
, flags
);
518 void sbus_dma_sync_single_for_cpu(struct sbus_dev
*sdev
, dma_addr_t bus_addr
, size_t sz
, int direction
)
520 struct sbus_info
*info
;
522 struct strbuf
*strbuf
;
523 unsigned long flags
, npages
;
525 info
= sdev
->bus
->iommu
;
526 iommu
= &info
->iommu
;
527 strbuf
= &info
->strbuf
;
529 npages
= IO_PAGE_ALIGN(bus_addr
+ sz
) - (bus_addr
& IO_PAGE_MASK
);
530 npages
>>= IO_PAGE_SHIFT
;
531 bus_addr
&= IO_PAGE_MASK
;
533 spin_lock_irqsave(&iommu
->lock
, flags
);
534 sbus_strbuf_flush(iommu
, strbuf
, bus_addr
, npages
, direction
);
535 spin_unlock_irqrestore(&iommu
->lock
, flags
);
538 void sbus_dma_sync_single_for_device(struct sbus_dev
*sdev
, dma_addr_t base
, size_t size
, int direction
)
542 void sbus_dma_sync_sg_for_cpu(struct sbus_dev
*sdev
, struct scatterlist
*sglist
, int nelems
, int direction
)
544 struct sbus_info
*info
;
546 struct strbuf
*strbuf
;
547 unsigned long flags
, npages
, i
;
550 info
= sdev
->bus
->iommu
;
551 iommu
= &info
->iommu
;
552 strbuf
= &info
->strbuf
;
554 bus_addr
= sglist
[0].dma_address
& IO_PAGE_MASK
;
555 for (i
= 0; i
< nelems
; i
++) {
556 if (!sglist
[i
].dma_length
)
560 npages
= (IO_PAGE_ALIGN(sglist
[i
].dma_address
+ sglist
[i
].dma_length
)
561 - bus_addr
) >> IO_PAGE_SHIFT
;
563 spin_lock_irqsave(&iommu
->lock
, flags
);
564 sbus_strbuf_flush(iommu
, strbuf
, bus_addr
, npages
, direction
);
565 spin_unlock_irqrestore(&iommu
->lock
, flags
);
568 void sbus_dma_sync_sg_for_device(struct sbus_dev
*sdev
, struct scatterlist
*sg
, int nents
, int direction
)
572 /* Enable 64-bit DVMA mode for the given device. */
573 void sbus_set_sbus64(struct sbus_dev
*sdev
, int bursts
)
575 struct sbus_info
*info
= sdev
->bus
->iommu
;
576 struct iommu
*iommu
= &info
->iommu
;
577 int slot
= sdev
->slot
;
578 unsigned long cfg_reg
;
581 cfg_reg
= iommu
->write_complete_reg
;
609 val
= upa_readq(cfg_reg
);
610 if (val
& (1UL << 14UL)) {
611 /* Extended transfer mode already enabled. */
615 val
|= (1UL << 14UL);
617 if (bursts
& DMA_BURST8
)
619 if (bursts
& DMA_BURST16
)
621 if (bursts
& DMA_BURST32
)
623 if (bursts
& DMA_BURST64
)
625 upa_writeq(val
, cfg_reg
);
628 /* INO number to IMAP register offset for SYSIO external IRQ's.
629 * This should conform to both Sunfire/Wildfire server and Fusion
632 #define SYSIO_IMAP_SLOT0 0x2c00UL
633 #define SYSIO_IMAP_SLOT1 0x2c08UL
634 #define SYSIO_IMAP_SLOT2 0x2c10UL
635 #define SYSIO_IMAP_SLOT3 0x2c18UL
636 #define SYSIO_IMAP_SCSI 0x3000UL
637 #define SYSIO_IMAP_ETH 0x3008UL
638 #define SYSIO_IMAP_BPP 0x3010UL
639 #define SYSIO_IMAP_AUDIO 0x3018UL
640 #define SYSIO_IMAP_PFAIL 0x3020UL
641 #define SYSIO_IMAP_KMS 0x3028UL
642 #define SYSIO_IMAP_FLPY 0x3030UL
643 #define SYSIO_IMAP_SHW 0x3038UL
644 #define SYSIO_IMAP_KBD 0x3040UL
645 #define SYSIO_IMAP_MS 0x3048UL
646 #define SYSIO_IMAP_SER 0x3050UL
647 #define SYSIO_IMAP_TIM0 0x3060UL
648 #define SYSIO_IMAP_TIM1 0x3068UL
649 #define SYSIO_IMAP_UE 0x3070UL
650 #define SYSIO_IMAP_CE 0x3078UL
651 #define SYSIO_IMAP_SBERR 0x3080UL
652 #define SYSIO_IMAP_PMGMT 0x3088UL
653 #define SYSIO_IMAP_GFX 0x3090UL
654 #define SYSIO_IMAP_EUPA 0x3098UL
656 #define bogon ((unsigned long) -1)
657 static unsigned long sysio_irq_offsets
[] = {
658 /* SBUS Slot 0 --> 3, level 1 --> 7 */
659 SYSIO_IMAP_SLOT0
, SYSIO_IMAP_SLOT0
, SYSIO_IMAP_SLOT0
, SYSIO_IMAP_SLOT0
,
660 SYSIO_IMAP_SLOT0
, SYSIO_IMAP_SLOT0
, SYSIO_IMAP_SLOT0
, SYSIO_IMAP_SLOT0
,
661 SYSIO_IMAP_SLOT1
, SYSIO_IMAP_SLOT1
, SYSIO_IMAP_SLOT1
, SYSIO_IMAP_SLOT1
,
662 SYSIO_IMAP_SLOT1
, SYSIO_IMAP_SLOT1
, SYSIO_IMAP_SLOT1
, SYSIO_IMAP_SLOT1
,
663 SYSIO_IMAP_SLOT2
, SYSIO_IMAP_SLOT2
, SYSIO_IMAP_SLOT2
, SYSIO_IMAP_SLOT2
,
664 SYSIO_IMAP_SLOT2
, SYSIO_IMAP_SLOT2
, SYSIO_IMAP_SLOT2
, SYSIO_IMAP_SLOT2
,
665 SYSIO_IMAP_SLOT3
, SYSIO_IMAP_SLOT3
, SYSIO_IMAP_SLOT3
, SYSIO_IMAP_SLOT3
,
666 SYSIO_IMAP_SLOT3
, SYSIO_IMAP_SLOT3
, SYSIO_IMAP_SLOT3
, SYSIO_IMAP_SLOT3
,
668 /* Onboard devices (not relevant/used on SunFire). */
697 #define NUM_SYSIO_OFFSETS ARRAY_SIZE(sysio_irq_offsets)
699 /* Convert Interrupt Mapping register pointer to associated
700 * Interrupt Clear register pointer, SYSIO specific version.
702 #define SYSIO_ICLR_UNUSED0 0x3400UL
703 #define SYSIO_ICLR_SLOT0 0x3408UL
704 #define SYSIO_ICLR_SLOT1 0x3448UL
705 #define SYSIO_ICLR_SLOT2 0x3488UL
706 #define SYSIO_ICLR_SLOT3 0x34c8UL
707 static unsigned long sysio_imap_to_iclr(unsigned long imap
)
709 unsigned long diff
= SYSIO_ICLR_UNUSED0
- SYSIO_IMAP_SLOT0
;
713 unsigned int sbus_build_irq(void *buscookie
, unsigned int ino
)
715 struct sbus_bus
*sbus
= (struct sbus_bus
*)buscookie
;
716 struct sbus_info
*info
= sbus
->iommu
;
717 struct iommu
*iommu
= &info
->iommu
;
718 unsigned long reg_base
= iommu
->write_complete_reg
- 0x2000UL
;
719 unsigned long imap
, iclr
;
722 imap
= sysio_irq_offsets
[ino
];
723 if (imap
== ((unsigned long)-1)) {
724 prom_printf("get_irq_translations: Bad SYSIO INO[%x]\n",
730 /* SYSIO inconsistency. For external SLOTS, we have to select
731 * the right ICLR register based upon the lower SBUS irq level
735 iclr
= sysio_imap_to_iclr(imap
);
737 int sbus_slot
= (ino
& 0x18)>>3;
739 sbus_level
= ino
& 0x7;
743 iclr
= reg_base
+ SYSIO_ICLR_SLOT0
;
746 iclr
= reg_base
+ SYSIO_ICLR_SLOT1
;
749 iclr
= reg_base
+ SYSIO_ICLR_SLOT2
;
753 iclr
= reg_base
+ SYSIO_ICLR_SLOT3
;
757 iclr
+= ((unsigned long)sbus_level
- 1UL) * 8UL;
759 return build_irq(sbus_level
, iclr
, imap
);
762 /* Error interrupt handling. */
763 #define SYSIO_UE_AFSR 0x0030UL
764 #define SYSIO_UE_AFAR 0x0038UL
765 #define SYSIO_UEAFSR_PPIO 0x8000000000000000UL /* Primary PIO cause */
766 #define SYSIO_UEAFSR_PDRD 0x4000000000000000UL /* Primary DVMA read cause */
767 #define SYSIO_UEAFSR_PDWR 0x2000000000000000UL /* Primary DVMA write cause */
768 #define SYSIO_UEAFSR_SPIO 0x1000000000000000UL /* Secondary PIO is cause */
769 #define SYSIO_UEAFSR_SDRD 0x0800000000000000UL /* Secondary DVMA read cause */
770 #define SYSIO_UEAFSR_SDWR 0x0400000000000000UL /* Secondary DVMA write cause*/
771 #define SYSIO_UEAFSR_RESV1 0x03ff000000000000UL /* Reserved */
772 #define SYSIO_UEAFSR_DOFF 0x0000e00000000000UL /* Doubleword Offset */
773 #define SYSIO_UEAFSR_SIZE 0x00001c0000000000UL /* Bad transfer size 2^SIZE */
774 #define SYSIO_UEAFSR_MID 0x000003e000000000UL /* UPA MID causing the fault */
775 #define SYSIO_UEAFSR_RESV2 0x0000001fffffffffUL /* Reserved */
776 static irqreturn_t
sysio_ue_handler(int irq
, void *dev_id
)
778 struct sbus_bus
*sbus
= dev_id
;
779 struct sbus_info
*info
= sbus
->iommu
;
780 struct iommu
*iommu
= &info
->iommu
;
781 unsigned long reg_base
= iommu
->write_complete_reg
- 0x2000UL
;
782 unsigned long afsr_reg
, afar_reg
;
783 unsigned long afsr
, afar
, error_bits
;
786 afsr_reg
= reg_base
+ SYSIO_UE_AFSR
;
787 afar_reg
= reg_base
+ SYSIO_UE_AFAR
;
789 /* Latch error status. */
790 afsr
= upa_readq(afsr_reg
);
791 afar
= upa_readq(afar_reg
);
793 /* Clear primary/secondary error status bits. */
795 (SYSIO_UEAFSR_PPIO
| SYSIO_UEAFSR_PDRD
| SYSIO_UEAFSR_PDWR
|
796 SYSIO_UEAFSR_SPIO
| SYSIO_UEAFSR_SDRD
| SYSIO_UEAFSR_SDWR
);
797 upa_writeq(error_bits
, afsr_reg
);
800 printk("SYSIO[%x]: Uncorrectable ECC Error, primary error type[%s]\n",
802 (((error_bits
& SYSIO_UEAFSR_PPIO
) ?
804 ((error_bits
& SYSIO_UEAFSR_PDRD
) ?
806 ((error_bits
& SYSIO_UEAFSR_PDWR
) ?
807 "DVMA Write" : "???")))));
808 printk("SYSIO[%x]: DOFF[%lx] SIZE[%lx] MID[%lx]\n",
810 (afsr
& SYSIO_UEAFSR_DOFF
) >> 45UL,
811 (afsr
& SYSIO_UEAFSR_SIZE
) >> 42UL,
812 (afsr
& SYSIO_UEAFSR_MID
) >> 37UL);
813 printk("SYSIO[%x]: AFAR[%016lx]\n", sbus
->portid
, afar
);
814 printk("SYSIO[%x]: Secondary UE errors [", sbus
->portid
);
816 if (afsr
& SYSIO_UEAFSR_SPIO
) {
820 if (afsr
& SYSIO_UEAFSR_SDRD
) {
822 printk("(DVMA Read)");
824 if (afsr
& SYSIO_UEAFSR_SDWR
) {
826 printk("(DVMA Write)");
835 #define SYSIO_CE_AFSR 0x0040UL
836 #define SYSIO_CE_AFAR 0x0048UL
837 #define SYSIO_CEAFSR_PPIO 0x8000000000000000UL /* Primary PIO cause */
838 #define SYSIO_CEAFSR_PDRD 0x4000000000000000UL /* Primary DVMA read cause */
839 #define SYSIO_CEAFSR_PDWR 0x2000000000000000UL /* Primary DVMA write cause */
840 #define SYSIO_CEAFSR_SPIO 0x1000000000000000UL /* Secondary PIO cause */
841 #define SYSIO_CEAFSR_SDRD 0x0800000000000000UL /* Secondary DVMA read cause */
842 #define SYSIO_CEAFSR_SDWR 0x0400000000000000UL /* Secondary DVMA write cause*/
843 #define SYSIO_CEAFSR_RESV1 0x0300000000000000UL /* Reserved */
844 #define SYSIO_CEAFSR_ESYND 0x00ff000000000000UL /* Syndrome Bits */
845 #define SYSIO_CEAFSR_DOFF 0x0000e00000000000UL /* Double Offset */
846 #define SYSIO_CEAFSR_SIZE 0x00001c0000000000UL /* Bad transfer size 2^SIZE */
847 #define SYSIO_CEAFSR_MID 0x000003e000000000UL /* UPA MID causing the fault */
848 #define SYSIO_CEAFSR_RESV2 0x0000001fffffffffUL /* Reserved */
849 static irqreturn_t
sysio_ce_handler(int irq
, void *dev_id
)
851 struct sbus_bus
*sbus
= dev_id
;
852 struct sbus_info
*info
= sbus
->iommu
;
853 struct iommu
*iommu
= &info
->iommu
;
854 unsigned long reg_base
= iommu
->write_complete_reg
- 0x2000UL
;
855 unsigned long afsr_reg
, afar_reg
;
856 unsigned long afsr
, afar
, error_bits
;
859 afsr_reg
= reg_base
+ SYSIO_CE_AFSR
;
860 afar_reg
= reg_base
+ SYSIO_CE_AFAR
;
862 /* Latch error status. */
863 afsr
= upa_readq(afsr_reg
);
864 afar
= upa_readq(afar_reg
);
866 /* Clear primary/secondary error status bits. */
868 (SYSIO_CEAFSR_PPIO
| SYSIO_CEAFSR_PDRD
| SYSIO_CEAFSR_PDWR
|
869 SYSIO_CEAFSR_SPIO
| SYSIO_CEAFSR_SDRD
| SYSIO_CEAFSR_SDWR
);
870 upa_writeq(error_bits
, afsr_reg
);
872 printk("SYSIO[%x]: Correctable ECC Error, primary error type[%s]\n",
874 (((error_bits
& SYSIO_CEAFSR_PPIO
) ?
876 ((error_bits
& SYSIO_CEAFSR_PDRD
) ?
878 ((error_bits
& SYSIO_CEAFSR_PDWR
) ?
879 "DVMA Write" : "???")))));
881 /* XXX Use syndrome and afar to print out module string just like
882 * XXX UDB CE trap handler does... -DaveM
884 printk("SYSIO[%x]: DOFF[%lx] ECC Syndrome[%lx] Size[%lx] MID[%lx]\n",
886 (afsr
& SYSIO_CEAFSR_DOFF
) >> 45UL,
887 (afsr
& SYSIO_CEAFSR_ESYND
) >> 48UL,
888 (afsr
& SYSIO_CEAFSR_SIZE
) >> 42UL,
889 (afsr
& SYSIO_CEAFSR_MID
) >> 37UL);
890 printk("SYSIO[%x]: AFAR[%016lx]\n", sbus
->portid
, afar
);
892 printk("SYSIO[%x]: Secondary CE errors [", sbus
->portid
);
894 if (afsr
& SYSIO_CEAFSR_SPIO
) {
898 if (afsr
& SYSIO_CEAFSR_SDRD
) {
900 printk("(DVMA Read)");
902 if (afsr
& SYSIO_CEAFSR_SDWR
) {
904 printk("(DVMA Write)");
913 #define SYSIO_SBUS_AFSR 0x2010UL
914 #define SYSIO_SBUS_AFAR 0x2018UL
915 #define SYSIO_SBAFSR_PLE 0x8000000000000000UL /* Primary Late PIO Error */
916 #define SYSIO_SBAFSR_PTO 0x4000000000000000UL /* Primary SBUS Timeout */
917 #define SYSIO_SBAFSR_PBERR 0x2000000000000000UL /* Primary SBUS Error ACK */
918 #define SYSIO_SBAFSR_SLE 0x1000000000000000UL /* Secondary Late PIO Error */
919 #define SYSIO_SBAFSR_STO 0x0800000000000000UL /* Secondary SBUS Timeout */
920 #define SYSIO_SBAFSR_SBERR 0x0400000000000000UL /* Secondary SBUS Error ACK */
921 #define SYSIO_SBAFSR_RESV1 0x03ff000000000000UL /* Reserved */
922 #define SYSIO_SBAFSR_RD 0x0000800000000000UL /* Primary was late PIO read */
923 #define SYSIO_SBAFSR_RESV2 0x0000600000000000UL /* Reserved */
924 #define SYSIO_SBAFSR_SIZE 0x00001c0000000000UL /* Size of transfer */
925 #define SYSIO_SBAFSR_MID 0x000003e000000000UL /* MID causing the error */
926 #define SYSIO_SBAFSR_RESV3 0x0000001fffffffffUL /* Reserved */
927 static irqreturn_t
sysio_sbus_error_handler(int irq
, void *dev_id
)
929 struct sbus_bus
*sbus
= dev_id
;
930 struct sbus_info
*info
= sbus
->iommu
;
931 struct iommu
*iommu
= &info
->iommu
;
932 unsigned long afsr_reg
, afar_reg
, reg_base
;
933 unsigned long afsr
, afar
, error_bits
;
936 reg_base
= iommu
->write_complete_reg
- 0x2000UL
;
937 afsr_reg
= reg_base
+ SYSIO_SBUS_AFSR
;
938 afar_reg
= reg_base
+ SYSIO_SBUS_AFAR
;
940 afsr
= upa_readq(afsr_reg
);
941 afar
= upa_readq(afar_reg
);
943 /* Clear primary/secondary error status bits. */
945 (SYSIO_SBAFSR_PLE
| SYSIO_SBAFSR_PTO
| SYSIO_SBAFSR_PBERR
|
946 SYSIO_SBAFSR_SLE
| SYSIO_SBAFSR_STO
| SYSIO_SBAFSR_SBERR
);
947 upa_writeq(error_bits
, afsr_reg
);
950 printk("SYSIO[%x]: SBUS Error, primary error type[%s] read(%d)\n",
952 (((error_bits
& SYSIO_SBAFSR_PLE
) ?
954 ((error_bits
& SYSIO_SBAFSR_PTO
) ?
956 ((error_bits
& SYSIO_SBAFSR_PBERR
) ?
957 "Error Ack" : "???")))),
958 (afsr
& SYSIO_SBAFSR_RD
) ? 1 : 0);
959 printk("SYSIO[%x]: size[%lx] MID[%lx]\n",
961 (afsr
& SYSIO_SBAFSR_SIZE
) >> 42UL,
962 (afsr
& SYSIO_SBAFSR_MID
) >> 37UL);
963 printk("SYSIO[%x]: AFAR[%016lx]\n", sbus
->portid
, afar
);
964 printk("SYSIO[%x]: Secondary SBUS errors [", sbus
->portid
);
966 if (afsr
& SYSIO_SBAFSR_SLE
) {
968 printk("(Late PIO Error)");
970 if (afsr
& SYSIO_SBAFSR_STO
) {
972 printk("(Time Out)");
974 if (afsr
& SYSIO_SBAFSR_SBERR
) {
976 printk("(Error Ack)");
982 /* XXX check iommu/strbuf for further error status XXX */
987 #define ECC_CONTROL 0x0020UL
988 #define SYSIO_ECNTRL_ECCEN 0x8000000000000000UL /* Enable ECC Checking */
989 #define SYSIO_ECNTRL_UEEN 0x4000000000000000UL /* Enable UE Interrupts */
990 #define SYSIO_ECNTRL_CEEN 0x2000000000000000UL /* Enable CE Interrupts */
992 #define SYSIO_UE_INO 0x34
993 #define SYSIO_CE_INO 0x35
994 #define SYSIO_SBUSERR_INO 0x36
996 static void __init
sysio_register_error_handlers(struct sbus_bus
*sbus
)
998 struct sbus_info
*info
= sbus
->iommu
;
999 struct iommu
*iommu
= &info
->iommu
;
1000 unsigned long reg_base
= iommu
->write_complete_reg
- 0x2000UL
;
1004 irq
= sbus_build_irq(sbus
, SYSIO_UE_INO
);
1005 if (request_irq(irq
, sysio_ue_handler
, 0,
1006 "SYSIO_UE", sbus
) < 0) {
1007 prom_printf("SYSIO[%x]: Cannot register UE interrupt.\n",
1012 irq
= sbus_build_irq(sbus
, SYSIO_CE_INO
);
1013 if (request_irq(irq
, sysio_ce_handler
, 0,
1014 "SYSIO_CE", sbus
) < 0) {
1015 prom_printf("SYSIO[%x]: Cannot register CE interrupt.\n",
1020 irq
= sbus_build_irq(sbus
, SYSIO_SBUSERR_INO
);
1021 if (request_irq(irq
, sysio_sbus_error_handler
, 0,
1022 "SYSIO_SBERR", sbus
) < 0) {
1023 prom_printf("SYSIO[%x]: Cannot register SBUS Error interrupt.\n",
1028 /* Now turn the error interrupts on and also enable ECC checking. */
1029 upa_writeq((SYSIO_ECNTRL_ECCEN
|
1032 reg_base
+ ECC_CONTROL
);
1034 control
= upa_readq(iommu
->write_complete_reg
);
1035 control
|= 0x100UL
; /* SBUS Error Interrupt Enable */
1036 upa_writeq(control
, iommu
->write_complete_reg
);
1039 /* Boot time initialization. */
1040 static void __init
sbus_iommu_init(int __node
, struct sbus_bus
*sbus
)
1042 const struct linux_prom64_registers
*pr
;
1043 struct device_node
*dp
;
1044 struct sbus_info
*info
;
1045 struct iommu
*iommu
;
1046 struct strbuf
*strbuf
;
1047 unsigned long regs
, reg_base
;
1051 dp
= of_find_node_by_phandle(__node
);
1053 sbus
->portid
= of_getintprop_default(dp
, "upa-portid", -1);
1055 pr
= of_get_property(dp
, "reg", NULL
);
1057 prom_printf("sbus_iommu_init: Cannot map SYSIO control registers.\n");
1060 regs
= pr
->phys_addr
;
1062 info
= kzalloc(sizeof(*info
), GFP_ATOMIC
);
1064 prom_printf("sbus_iommu_init: Fatal error, "
1065 "kmalloc(info) failed\n");
1069 iommu
= &info
->iommu
;
1070 strbuf
= &info
->strbuf
;
1072 reg_base
= regs
+ SYSIO_IOMMUREG_BASE
;
1073 iommu
->iommu_control
= reg_base
+ IOMMU_CONTROL
;
1074 iommu
->iommu_tsbbase
= reg_base
+ IOMMU_TSBBASE
;
1075 iommu
->iommu_flush
= reg_base
+ IOMMU_FLUSH
;
1077 reg_base
= regs
+ SYSIO_STRBUFREG_BASE
;
1078 strbuf
->strbuf_control
= reg_base
+ STRBUF_CONTROL
;
1079 strbuf
->strbuf_pflush
= reg_base
+ STRBUF_PFLUSH
;
1080 strbuf
->strbuf_fsync
= reg_base
+ STRBUF_FSYNC
;
1082 strbuf
->strbuf_enabled
= 1;
1084 strbuf
->strbuf_flushflag
= (volatile unsigned long *)
1085 ((((unsigned long)&strbuf
->__flushflag_buf
[0])
1088 strbuf
->strbuf_flushflag_pa
= (unsigned long)
1089 __pa(strbuf
->strbuf_flushflag
);
1091 /* The SYSIO SBUS control register is used for dummy reads
1092 * in order to ensure write completion.
1094 iommu
->write_complete_reg
= regs
+ 0x2000UL
;
1096 /* Link into SYSIO software state. */
1099 printk("SYSIO: UPA portID %x, at %016lx\n",
1100 sbus
->portid
, regs
);
1102 /* Setup for TSB_SIZE=7, TBW_SIZE=0, MMU_DE=1, MMU_EN=1 */
1103 sbus_iommu_table_init(iommu
, IO_TSB_SIZE
);
1105 control
= upa_readq(iommu
->iommu_control
);
1106 control
= ((7UL << 16UL) |
1110 upa_writeq(control
, iommu
->iommu_control
);
1112 /* Clean out any cruft in the IOMMU using
1113 * diagnostic accesses.
1115 for (i
= 0; i
< 16; i
++) {
1116 unsigned long dram
, tag
;
1118 dram
= iommu
->iommu_control
+ (IOMMU_DRAMDIAG
- IOMMU_CONTROL
);
1119 tag
= iommu
->iommu_control
+ (IOMMU_TAGDIAG
- IOMMU_CONTROL
);
1121 dram
+= (unsigned long)i
* 8UL;
1122 tag
+= (unsigned long)i
* 8UL;
1123 upa_writeq(0, dram
);
1126 upa_readq(iommu
->write_complete_reg
);
1128 /* Give the TSB to SYSIO. */
1129 upa_writeq(__pa(iommu
->page_table
), iommu
->iommu_tsbbase
);
1131 /* Setup streaming buffer, DE=1 SB_EN=1 */
1132 control
= (1UL << 1UL) | (1UL << 0UL);
1133 upa_writeq(control
, strbuf
->strbuf_control
);
1135 /* Clear out the tags using diagnostics. */
1136 for (i
= 0; i
< 16; i
++) {
1137 unsigned long ptag
, ltag
;
1139 ptag
= strbuf
->strbuf_control
+
1140 (STRBUF_PTAGDIAG
- STRBUF_CONTROL
);
1141 ltag
= strbuf
->strbuf_control
+
1142 (STRBUF_LTAGDIAG
- STRBUF_CONTROL
);
1143 ptag
+= (unsigned long)i
* 8UL;
1144 ltag
+= (unsigned long)i
* 8UL;
1146 upa_writeq(0UL, ptag
);
1147 upa_writeq(0UL, ltag
);
1150 /* Enable DVMA arbitration for all devices/slots. */
1151 control
= upa_readq(iommu
->write_complete_reg
);
1153 upa_writeq(control
, iommu
->write_complete_reg
);
1155 /* Now some Xfire specific grot... */
1156 if (this_is_starfire
)
1157 starfire_hookup(sbus
->portid
);
1159 sysio_register_error_handlers(sbus
);
1162 void sbus_fill_device_irq(struct sbus_dev
*sdev
)
1164 struct device_node
*dp
= of_find_node_by_phandle(sdev
->prom_node
);
1165 const struct linux_prom_irqs
*irqs
;
1167 irqs
= of_get_property(dp
, "interrupts", NULL
);
1172 unsigned int pri
= irqs
[0].pri
;
1176 pri
+= sdev
->slot
* 8;
1178 sdev
->irqs
[0] = sbus_build_irq(sdev
->bus
, pri
);
1182 void __init
sbus_arch_bus_ranges_init(struct device_node
*pn
, struct sbus_bus
*sbus
)
1186 void __init
sbus_setup_iommu(struct sbus_bus
*sbus
, struct device_node
*dp
)
1188 sbus_iommu_init(dp
->node
, sbus
);
1191 void __init
sbus_setup_arch_props(struct sbus_bus
*sbus
, struct device_node
*dp
)
1195 int __init
sbus_arch_preinit(void)
1200 void __init
sbus_arch_postinit(void)
1202 extern void firetruck_init(void);