blob: a6c01e121266c8f521e1e7336c42cf41735e4afa [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * Dynamic DMA mapping support for AMD Hammer.
3 *
4 * Use the integrated AGP GART in the Hammer northbridge as an IOMMU for PCI.
5 * This allows to use PCI devices that only support 32bit addresses on systems
6 * with more than 4GB.
7 *
8 * See Documentation/DMA-mapping.txt for the interface specification.
9 *
10 * Copyright 2002 Andi Kleen, SuSE Labs.
11 */
12
13#include <linux/config.h>
14#include <linux/types.h>
15#include <linux/ctype.h>
16#include <linux/agp_backend.h>
17#include <linux/init.h>
18#include <linux/mm.h>
19#include <linux/string.h>
20#include <linux/spinlock.h>
21#include <linux/pci.h>
22#include <linux/module.h>
23#include <linux/topology.h>
24#include <linux/interrupt.h>
25#include <linux/bitops.h>
26#include <asm/atomic.h>
27#include <asm/io.h>
28#include <asm/mtrr.h>
29#include <asm/pgtable.h>
30#include <asm/proto.h>
31#include <asm/cacheflush.h>
32#include <asm/kdebug.h>
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +010033#include <asm/swiotlb.h>
34#include <asm/dma.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070035
36unsigned long iommu_bus_base; /* GART remapping area (physical) */
37static unsigned long iommu_size; /* size of remapping area bytes */
38static unsigned long iommu_pages; /* .. and in pages */
39
40u32 *iommu_gatt_base; /* Remapping table */
41
Linus Torvalds1da177e2005-04-16 15:20:36 -070042/* If this is disabled the IOMMU will use an optimized flushing strategy
43 of only flushing when an mapping is reused. With it true the GART is flushed
44 for every mapping. Problem is that doing the lazy flush seems to trigger
45 bugs with some popular PCI cards, in particular 3ware (but has been also
46 also seen with Qlogic at least). */
47int iommu_fullflush = 1;
48
Linus Torvalds1da177e2005-04-16 15:20:36 -070049#define MAX_NB 8
50
51/* Allocation bitmap for the remapping area */
52static DEFINE_SPINLOCK(iommu_bitmap_lock);
53static unsigned long *iommu_gart_bitmap; /* guarded by iommu_bitmap_lock */
54
55static u32 gart_unmapped_entry;
56
57#define GPTE_VALID 1
58#define GPTE_COHERENT 2
59#define GPTE_ENCODE(x) \
60 (((x) & 0xfffff000) | (((x) >> 32) << 4) | GPTE_VALID | GPTE_COHERENT)
61#define GPTE_DECODE(x) (((x) & 0xfffff000) | (((u64)(x) & 0xff0) << 28))
62
63#define to_pages(addr,size) \
64 (round_up(((addr) & ~PAGE_MASK) + (size), PAGE_SIZE) >> PAGE_SHIFT)
65
66#define for_all_nb(dev) \
67 dev = NULL; \
Navin Boppuri9c01dda2006-03-25 16:31:40 +010068 while ((dev = pci_get_device(PCI_VENDOR_ID_AMD, 0x1103, dev))!=NULL)
Linus Torvalds1da177e2005-04-16 15:20:36 -070069
70static struct pci_dev *northbridges[MAX_NB];
71static u32 northbridge_flush_word[MAX_NB];
72
73#define EMERGENCY_PAGES 32 /* = 128KB */
74
75#ifdef CONFIG_AGP
76#define AGPEXTERN extern
77#else
78#define AGPEXTERN
79#endif
80
81/* backdoor interface to AGP driver */
82AGPEXTERN int agp_memory_reserved;
83AGPEXTERN __u32 *agp_gatt_table;
84
85static unsigned long next_bit; /* protected by iommu_bitmap_lock */
86static int need_flush; /* global flush state. set for each gart wrap */
Linus Torvalds1da177e2005-04-16 15:20:36 -070087
88static unsigned long alloc_iommu(int size)
89{
90 unsigned long offset, flags;
91
92 spin_lock_irqsave(&iommu_bitmap_lock, flags);
93 offset = find_next_zero_string(iommu_gart_bitmap,next_bit,iommu_pages,size);
94 if (offset == -1) {
95 need_flush = 1;
96 offset = find_next_zero_string(iommu_gart_bitmap,0,next_bit,size);
97 }
98 if (offset != -1) {
99 set_bit_string(iommu_gart_bitmap, offset, size);
100 next_bit = offset+size;
101 if (next_bit >= iommu_pages) {
102 next_bit = 0;
103 need_flush = 1;
104 }
105 }
106 if (iommu_fullflush)
107 need_flush = 1;
108 spin_unlock_irqrestore(&iommu_bitmap_lock, flags);
109 return offset;
110}
111
112static void free_iommu(unsigned long offset, int size)
113{
114 unsigned long flags;
115 if (size == 1) {
116 clear_bit(offset, iommu_gart_bitmap);
117 return;
118 }
119 spin_lock_irqsave(&iommu_bitmap_lock, flags);
120 __clear_bit_string(iommu_gart_bitmap, offset, size);
121 spin_unlock_irqrestore(&iommu_bitmap_lock, flags);
122}
123
124/*
125 * Use global flush state to avoid races with multiple flushers.
126 */
127static void flush_gart(struct device *dev)
128{
129 unsigned long flags;
130 int flushed = 0;
131 int i, max;
132
133 spin_lock_irqsave(&iommu_bitmap_lock, flags);
134 if (need_flush) {
135 max = 0;
136 for (i = 0; i < MAX_NB; i++) {
137 if (!northbridges[i])
138 continue;
139 pci_write_config_dword(northbridges[i], 0x9c,
140 northbridge_flush_word[i] | 1);
141 flushed++;
142 max = i;
143 }
144 for (i = 0; i <= max; i++) {
145 u32 w;
146 if (!northbridges[i])
147 continue;
148 /* Make sure the hardware actually executed the flush. */
Andi Kleen85f9eebc2006-03-25 16:29:37 +0100149 for (;;) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700150 pci_read_config_dword(northbridges[i], 0x9c, &w);
Andi Kleen85f9eebc2006-03-25 16:29:37 +0100151 if (!(w & 1))
152 break;
153 cpu_relax();
154 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700155 }
156 if (!flushed)
157 printk("nothing to flush?\n");
158 need_flush = 0;
159 }
160 spin_unlock_irqrestore(&iommu_bitmap_lock, flags);
161}
162
Linus Torvalds1da177e2005-04-16 15:20:36 -0700163
Linus Torvalds1da177e2005-04-16 15:20:36 -0700164
165#ifdef CONFIG_IOMMU_LEAK
166
167#define SET_LEAK(x) if (iommu_leak_tab) \
168 iommu_leak_tab[x] = __builtin_return_address(0);
169#define CLEAR_LEAK(x) if (iommu_leak_tab) \
170 iommu_leak_tab[x] = NULL;
171
172/* Debugging aid for drivers that don't free their IOMMU tables */
173static void **iommu_leak_tab;
174static int leak_trace;
175int iommu_leak_pages = 20;
176void dump_leak(void)
177{
178 int i;
179 static int dump;
180 if (dump || !iommu_leak_tab) return;
181 dump = 1;
182 show_stack(NULL,NULL);
183 /* Very crude. dump some from the end of the table too */
184 printk("Dumping %d pages from end of IOMMU:\n", iommu_leak_pages);
185 for (i = 0; i < iommu_leak_pages; i+=2) {
186 printk("%lu: ", iommu_pages-i);
187 printk_address((unsigned long) iommu_leak_tab[iommu_pages-i]);
188 printk("%c", (i+1)%2 == 0 ? '\n' : ' ');
189 }
190 printk("\n");
191}
192#else
193#define SET_LEAK(x)
194#define CLEAR_LEAK(x)
195#endif
196
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100197static void iommu_full(struct device *dev, size_t size, int dir)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700198{
199 /*
200 * Ran out of IOMMU space for this operation. This is very bad.
201 * Unfortunately the drivers cannot handle this operation properly.
202 * Return some non mapped prereserved space in the aperture and
203 * let the Northbridge deal with it. This will result in garbage
204 * in the IO operation. When the size exceeds the prereserved space
205 * memory corruption will occur or random memory will be DMAed
206 * out. Hopefully no network devices use single mappings that big.
207 */
208
209 printk(KERN_ERR
210 "PCI-DMA: Out of IOMMU space for %lu bytes at device %s\n",
211 size, dev->bus_id);
212
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100213 if (size > PAGE_SIZE*EMERGENCY_PAGES) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700214 if (dir == PCI_DMA_FROMDEVICE || dir == PCI_DMA_BIDIRECTIONAL)
215 panic("PCI-DMA: Memory would be corrupted\n");
216 if (dir == PCI_DMA_TODEVICE || dir == PCI_DMA_BIDIRECTIONAL)
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100217 panic(KERN_ERR "PCI-DMA: Random memory would be DMAed\n");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700218 }
219
220#ifdef CONFIG_IOMMU_LEAK
221 dump_leak();
222#endif
223}
224
225static inline int need_iommu(struct device *dev, unsigned long addr, size_t size)
226{
227 u64 mask = *dev->dma_mask;
228 int high = addr + size >= mask;
229 int mmu = high;
230 if (force_iommu)
231 mmu = 1;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700232 return mmu;
233}
234
235static inline int nonforced_iommu(struct device *dev, unsigned long addr, size_t size)
236{
237 u64 mask = *dev->dma_mask;
238 int high = addr + size >= mask;
239 int mmu = high;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700240 return mmu;
241}
242
243/* Map a single continuous physical area into the IOMMU.
244 * Caller needs to check if the iommu is needed and flush.
245 */
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100246static dma_addr_t dma_map_area(struct device *dev, dma_addr_t phys_mem,
247 size_t size, int dir)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700248{
249 unsigned long npages = to_pages(phys_mem, size);
250 unsigned long iommu_page = alloc_iommu(npages);
251 int i;
252 if (iommu_page == -1) {
253 if (!nonforced_iommu(dev, phys_mem, size))
254 return phys_mem;
255 if (panic_on_overflow)
256 panic("dma_map_area overflow %lu bytes\n", size);
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100257 iommu_full(dev, size, dir);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700258 return bad_dma_address;
259 }
260
261 for (i = 0; i < npages; i++) {
262 iommu_gatt_base[iommu_page + i] = GPTE_ENCODE(phys_mem);
263 SET_LEAK(iommu_page + i);
264 phys_mem += PAGE_SIZE;
265 }
266 return iommu_bus_base + iommu_page*PAGE_SIZE + (phys_mem & ~PAGE_MASK);
267}
268
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100269static dma_addr_t gart_map_simple(struct device *dev, char *buf,
270 size_t size, int dir)
271{
272 dma_addr_t map = dma_map_area(dev, virt_to_bus(buf), size, dir);
273 flush_gart(dev);
274 return map;
275}
276
Linus Torvalds1da177e2005-04-16 15:20:36 -0700277/* Map a single area into the IOMMU */
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100278dma_addr_t gart_map_single(struct device *dev, void *addr, size_t size, int dir)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700279{
280 unsigned long phys_mem, bus;
281
282 BUG_ON(dir == DMA_NONE);
283
Linus Torvalds1da177e2005-04-16 15:20:36 -0700284 if (!dev)
285 dev = &fallback_dev;
286
287 phys_mem = virt_to_phys(addr);
288 if (!need_iommu(dev, phys_mem, size))
289 return phys_mem;
290
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100291 bus = gart_map_simple(dev, addr, size, dir);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700292 return bus;
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100293}
294
295/*
296 * Wrapper for pci_unmap_single working with scatterlists.
297 */
298void gart_unmap_sg(struct device *dev, struct scatterlist *sg, int nents, int dir)
299{
300 int i;
301
302 for (i = 0; i < nents; i++) {
303 struct scatterlist *s = &sg[i];
Jon Mason60b08c62006-02-26 04:18:22 +0100304 if (!s->dma_length || !s->length)
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100305 break;
306 dma_unmap_single(dev, s->dma_address, s->dma_length, dir);
307 }
308}
Linus Torvalds1da177e2005-04-16 15:20:36 -0700309
310/* Fallback for dma_map_sg in case of overflow */
311static int dma_map_sg_nonforce(struct device *dev, struct scatterlist *sg,
312 int nents, int dir)
313{
314 int i;
315
316#ifdef CONFIG_IOMMU_DEBUG
317 printk(KERN_DEBUG "dma_map_sg overflow\n");
318#endif
319
320 for (i = 0; i < nents; i++ ) {
321 struct scatterlist *s = &sg[i];
322 unsigned long addr = page_to_phys(s->page) + s->offset;
323 if (nonforced_iommu(dev, addr, s->length)) {
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100324 addr = dma_map_area(dev, addr, s->length, dir);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700325 if (addr == bad_dma_address) {
326 if (i > 0)
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100327 gart_unmap_sg(dev, sg, i, dir);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700328 nents = 0;
329 sg[0].dma_length = 0;
330 break;
331 }
332 }
333 s->dma_address = addr;
334 s->dma_length = s->length;
335 }
336 flush_gart(dev);
337 return nents;
338}
339
340/* Map multiple scatterlist entries continuous into the first. */
341static int __dma_map_cont(struct scatterlist *sg, int start, int stopat,
342 struct scatterlist *sout, unsigned long pages)
343{
344 unsigned long iommu_start = alloc_iommu(pages);
345 unsigned long iommu_page = iommu_start;
346 int i;
347
348 if (iommu_start == -1)
349 return -1;
350
351 for (i = start; i < stopat; i++) {
352 struct scatterlist *s = &sg[i];
353 unsigned long pages, addr;
354 unsigned long phys_addr = s->dma_address;
355
356 BUG_ON(i > start && s->offset);
357 if (i == start) {
Jon Mason60b08c62006-02-26 04:18:22 +0100358 *sout = *s;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700359 sout->dma_address = iommu_bus_base;
360 sout->dma_address += iommu_page*PAGE_SIZE + s->offset;
361 sout->dma_length = s->length;
362 } else {
363 sout->dma_length += s->length;
364 }
365
366 addr = phys_addr;
367 pages = to_pages(s->offset, s->length);
368 while (pages--) {
369 iommu_gatt_base[iommu_page] = GPTE_ENCODE(addr);
370 SET_LEAK(iommu_page);
371 addr += PAGE_SIZE;
372 iommu_page++;
Andi Kleen0d5410642006-02-12 14:34:59 -0800373 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700374 }
375 BUG_ON(iommu_page - iommu_start != pages);
376 return 0;
377}
378
379static inline int dma_map_cont(struct scatterlist *sg, int start, int stopat,
380 struct scatterlist *sout,
381 unsigned long pages, int need)
382{
383 if (!need) {
384 BUG_ON(stopat - start != 1);
Jon Mason60b08c62006-02-26 04:18:22 +0100385 *sout = sg[start];
Linus Torvalds1da177e2005-04-16 15:20:36 -0700386 sout->dma_length = sg[start].length;
387 return 0;
388 }
389 return __dma_map_cont(sg, start, stopat, sout, pages);
390}
391
392/*
393 * DMA map all entries in a scatterlist.
394 * Merge chunks that have page aligned sizes into a continuous mapping.
395 */
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100396int gart_map_sg(struct device *dev, struct scatterlist *sg, int nents, int dir)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700397{
398 int i;
399 int out;
400 int start;
401 unsigned long pages = 0;
402 int need = 0, nextneed;
403
404 BUG_ON(dir == DMA_NONE);
405 if (nents == 0)
406 return 0;
407
Linus Torvalds1da177e2005-04-16 15:20:36 -0700408 if (!dev)
409 dev = &fallback_dev;
410
411 out = 0;
412 start = 0;
413 for (i = 0; i < nents; i++) {
414 struct scatterlist *s = &sg[i];
415 dma_addr_t addr = page_to_phys(s->page) + s->offset;
416 s->dma_address = addr;
417 BUG_ON(s->length == 0);
418
419 nextneed = need_iommu(dev, addr, s->length);
420
421 /* Handle the previous not yet processed entries */
422 if (i > start) {
423 struct scatterlist *ps = &sg[i-1];
424 /* Can only merge when the last chunk ends on a page
425 boundary and the new one doesn't have an offset. */
426 if (!iommu_merge || !nextneed || !need || s->offset ||
427 (ps->offset + ps->length) % PAGE_SIZE) {
428 if (dma_map_cont(sg, start, i, sg+out, pages,
429 need) < 0)
430 goto error;
431 out++;
432 pages = 0;
433 start = i;
434 }
435 }
436
437 need = nextneed;
438 pages += to_pages(s->offset, s->length);
439 }
440 if (dma_map_cont(sg, start, i, sg+out, pages, need) < 0)
441 goto error;
442 out++;
443 flush_gart(dev);
444 if (out < nents)
445 sg[out].dma_length = 0;
446 return out;
447
448error:
449 flush_gart(NULL);
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100450 gart_unmap_sg(dev, sg, nents, dir);
Kevin VanMarena1002a42006-02-03 21:51:32 +0100451 /* When it was forced or merged try again in a dumb way */
452 if (force_iommu || iommu_merge) {
453 out = dma_map_sg_nonforce(dev, sg, nents, dir);
454 if (out > 0)
455 return out;
456 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700457 if (panic_on_overflow)
458 panic("dma_map_sg: overflow on %lu pages\n", pages);
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100459 iommu_full(dev, pages << PAGE_SHIFT, dir);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700460 for (i = 0; i < nents; i++)
461 sg[i].dma_address = bad_dma_address;
462 return 0;
463}
464
465/*
466 * Free a DMA mapping.
467 */
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100468void gart_unmap_single(struct device *dev, dma_addr_t dma_addr,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700469 size_t size, int direction)
470{
471 unsigned long iommu_page;
472 int npages;
473 int i;
474
Linus Torvalds1da177e2005-04-16 15:20:36 -0700475 if (dma_addr < iommu_bus_base + EMERGENCY_PAGES*PAGE_SIZE ||
476 dma_addr >= iommu_bus_base + iommu_size)
477 return;
478 iommu_page = (dma_addr - iommu_bus_base)>>PAGE_SHIFT;
479 npages = to_pages(dma_addr, size);
480 for (i = 0; i < npages; i++) {
481 iommu_gatt_base[iommu_page + i] = gart_unmapped_entry;
482 CLEAR_LEAK(iommu_page + i);
483 }
484 free_iommu(iommu_page, npages);
485}
486
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100487static int no_agp;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700488
489static __init unsigned long check_iommu_size(unsigned long aper, u64 aper_size)
490{
491 unsigned long a;
492 if (!iommu_size) {
493 iommu_size = aper_size;
494 if (!no_agp)
495 iommu_size /= 2;
496 }
497
498 a = aper + iommu_size;
499 iommu_size -= round_up(a, LARGE_PAGE_SIZE) - a;
500
501 if (iommu_size < 64*1024*1024)
502 printk(KERN_WARNING
503 "PCI-DMA: Warning: Small IOMMU %luMB. Consider increasing the AGP aperture in BIOS\n",iommu_size>>20);
504
505 return iommu_size;
506}
507
508static __init unsigned read_aperture(struct pci_dev *dev, u32 *size)
509{
510 unsigned aper_size = 0, aper_base_32;
511 u64 aper_base;
512 unsigned aper_order;
513
514 pci_read_config_dword(dev, 0x94, &aper_base_32);
515 pci_read_config_dword(dev, 0x90, &aper_order);
516 aper_order = (aper_order >> 1) & 7;
517
518 aper_base = aper_base_32 & 0x7fff;
519 aper_base <<= 25;
520
521 aper_size = (32 * 1024 * 1024) << aper_order;
522 if (aper_base + aper_size >= 0xffffffff || !aper_size)
523 aper_base = 0;
524
525 *size = aper_size;
526 return aper_base;
527}
528
529/*
530 * Private Northbridge GATT initialization in case we cannot use the
531 * AGP driver for some reason.
532 */
533static __init int init_k8_gatt(struct agp_kern_info *info)
534{
535 struct pci_dev *dev;
536 void *gatt;
537 unsigned aper_base, new_aper_base;
538 unsigned aper_size, gatt_size, new_aper_size;
539
540 printk(KERN_INFO "PCI-DMA: Disabling AGP.\n");
541 aper_size = aper_base = info->aper_size = 0;
542 for_all_nb(dev) {
543 new_aper_base = read_aperture(dev, &new_aper_size);
544 if (!new_aper_base)
545 goto nommu;
546
547 if (!aper_base) {
548 aper_size = new_aper_size;
549 aper_base = new_aper_base;
550 }
551 if (aper_size != new_aper_size || aper_base != new_aper_base)
552 goto nommu;
553 }
554 if (!aper_base)
555 goto nommu;
556 info->aper_base = aper_base;
557 info->aper_size = aper_size>>20;
558
559 gatt_size = (aper_size >> PAGE_SHIFT) * sizeof(u32);
560 gatt = (void *)__get_free_pages(GFP_KERNEL, get_order(gatt_size));
561 if (!gatt)
562 panic("Cannot allocate GATT table");
563 memset(gatt, 0, gatt_size);
564 agp_gatt_table = gatt;
565
566 for_all_nb(dev) {
567 u32 ctl;
568 u32 gatt_reg;
569
570 gatt_reg = __pa(gatt) >> 12;
571 gatt_reg <<= 4;
572 pci_write_config_dword(dev, 0x98, gatt_reg);
573 pci_read_config_dword(dev, 0x90, &ctl);
574
575 ctl |= 1;
576 ctl &= ~((1<<4) | (1<<5));
577
578 pci_write_config_dword(dev, 0x90, ctl);
579 }
580 flush_gart(NULL);
581
582 printk("PCI-DMA: aperture base @ %x size %u KB\n",aper_base, aper_size>>10);
583 return 0;
584
585 nommu:
586 /* Should not happen anymore */
587 printk(KERN_ERR "PCI-DMA: More than 4GB of RAM and no IOMMU\n"
Andi Kleenf46ace62006-01-11 22:43:27 +0100588 KERN_ERR "PCI-DMA: 32bit PCI IO may malfunction.\n");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700589 return -1;
590}
591
592extern int agp_amd64_init(void);
593
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100594static struct dma_mapping_ops gart_dma_ops = {
595 .mapping_error = NULL,
596 .map_single = gart_map_single,
597 .map_simple = gart_map_simple,
598 .unmap_single = gart_unmap_single,
599 .sync_single_for_cpu = NULL,
600 .sync_single_for_device = NULL,
601 .sync_single_range_for_cpu = NULL,
602 .sync_single_range_for_device = NULL,
603 .sync_sg_for_cpu = NULL,
604 .sync_sg_for_device = NULL,
605 .map_sg = gart_map_sg,
606 .unmap_sg = gart_unmap_sg,
607};
608
Linus Torvalds1da177e2005-04-16 15:20:36 -0700609static int __init pci_iommu_init(void)
610{
611 struct agp_kern_info info;
612 unsigned long aper_size;
613 unsigned long iommu_start;
614 struct pci_dev *dev;
615 unsigned long scratch;
616 long i;
617
618#ifndef CONFIG_AGP_AMD64
619 no_agp = 1;
620#else
621 /* Makefile puts PCI initialization via subsys_initcall first. */
622 /* Add other K8 AGP bridge drivers here */
623 no_agp = no_agp ||
624 (agp_amd64_init() < 0) ||
625 (agp_copy_info(agp_bridge, &info) < 0);
626#endif
627
Jon Mason60b08c62006-02-26 04:18:22 +0100628 if (swiotlb)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700629 return -1;
Jon Mason60b08c62006-02-26 04:18:22 +0100630
Linus Torvalds1da177e2005-04-16 15:20:36 -0700631 if (no_iommu ||
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100632 (!force_iommu && end_pfn <= MAX_DMA32_PFN) ||
Linus Torvalds1da177e2005-04-16 15:20:36 -0700633 !iommu_aperture ||
634 (no_agp && init_k8_gatt(&info) < 0)) {
Jon Mason5b7b6442006-02-03 21:51:59 +0100635 printk(KERN_INFO "PCI-DMA: Disabling IOMMU.\n");
636 if (end_pfn > MAX_DMA32_PFN) {
637 printk(KERN_ERR "WARNING more than 4GB of memory "
638 "but IOMMU not compiled in.\n"
639 KERN_ERR "WARNING 32bit PCI may malfunction.\n"
640 KERN_ERR "You might want to enable "
641 "CONFIG_GART_IOMMU\n");
642 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700643 return -1;
644 }
645
Jon Mason5b7b6442006-02-03 21:51:59 +0100646 printk(KERN_INFO "PCI-DMA: using GART IOMMU.\n");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700647 aper_size = info.aper_size * 1024 * 1024;
648 iommu_size = check_iommu_size(info.aper_base, aper_size);
649 iommu_pages = iommu_size >> PAGE_SHIFT;
650
651 iommu_gart_bitmap = (void*)__get_free_pages(GFP_KERNEL,
652 get_order(iommu_pages/8));
653 if (!iommu_gart_bitmap)
654 panic("Cannot allocate iommu bitmap\n");
655 memset(iommu_gart_bitmap, 0, iommu_pages/8);
656
657#ifdef CONFIG_IOMMU_LEAK
658 if (leak_trace) {
659 iommu_leak_tab = (void *)__get_free_pages(GFP_KERNEL,
660 get_order(iommu_pages*sizeof(void *)));
661 if (iommu_leak_tab)
662 memset(iommu_leak_tab, 0, iommu_pages * 8);
663 else
664 printk("PCI-DMA: Cannot allocate leak trace area\n");
665 }
666#endif
667
668 /*
669 * Out of IOMMU space handling.
670 * Reserve some invalid pages at the beginning of the GART.
671 */
672 set_bit_string(iommu_gart_bitmap, 0, EMERGENCY_PAGES);
673
674 agp_memory_reserved = iommu_size;
675 printk(KERN_INFO
676 "PCI-DMA: Reserving %luMB of IOMMU area in the AGP aperture\n",
677 iommu_size>>20);
678
679 iommu_start = aper_size - iommu_size;
680 iommu_bus_base = info.aper_base + iommu_start;
681 bad_dma_address = iommu_bus_base;
682 iommu_gatt_base = agp_gatt_table + (iommu_start>>PAGE_SHIFT);
683
684 /*
685 * Unmap the IOMMU part of the GART. The alias of the page is
686 * always mapped with cache enabled and there is no full cache
687 * coherency across the GART remapping. The unmapping avoids
688 * automatic prefetches from the CPU allocating cache lines in
689 * there. All CPU accesses are done via the direct mapping to
690 * the backing memory. The GART address is only used by PCI
691 * devices.
692 */
693 clear_kernel_mapping((unsigned long)__va(iommu_bus_base), iommu_size);
694
695 /*
696 * Try to workaround a bug (thanks to BenH)
697 * Set unmapped entries to a scratch page instead of 0.
698 * Any prefetches that hit unmapped entries won't get an bus abort
699 * then.
700 */
701 scratch = get_zeroed_page(GFP_KERNEL);
702 if (!scratch)
703 panic("Cannot allocate iommu scratch page");
704 gart_unmapped_entry = GPTE_ENCODE(__pa(scratch));
705 for (i = EMERGENCY_PAGES; i < iommu_pages; i++)
706 iommu_gatt_base[i] = gart_unmapped_entry;
707
708 for_all_nb(dev) {
709 u32 flag;
710 int cpu = PCI_SLOT(dev->devfn) - 24;
711 if (cpu >= MAX_NB)
712 continue;
713 northbridges[cpu] = dev;
714 pci_read_config_dword(dev, 0x9c, &flag); /* cache flush word */
715 northbridge_flush_word[cpu] = flag;
716 }
717
718 flush_gart(NULL);
719
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100720 dma_ops = &gart_dma_ops;
721
Linus Torvalds1da177e2005-04-16 15:20:36 -0700722 return 0;
723}
724
725/* Must execute after PCI subsystem */
726fs_initcall(pci_iommu_init);
727
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100728void gart_parse_options(char *p)
729{
730 int arg;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700731
Linus Torvalds1da177e2005-04-16 15:20:36 -0700732#ifdef CONFIG_IOMMU_LEAK
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100733 if (!strncmp(p,"leak",4)) {
734 leak_trace = 1;
735 p += 4;
736 if (*p == '=') ++p;
737 if (isdigit(*p) && get_option(&p, &arg))
738 iommu_leak_pages = arg;
739 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700740#endif
Muli Ben-Yehuda17a941d2006-01-11 22:44:42 +0100741 if (isdigit(*p) && get_option(&p, &arg))
742 iommu_size = arg;
743 if (!strncmp(p, "fullflush",8))
744 iommu_fullflush = 1;
745 if (!strncmp(p, "nofullflush",11))
746 iommu_fullflush = 0;
747 if (!strncmp(p,"noagp",5))
748 no_agp = 1;
749 if (!strncmp(p, "noaperture",10))
750 fix_aperture = 0;
751 /* duplicated from pci-dma.c */
752 if (!strncmp(p,"force",5))
753 iommu_aperture_allowed = 1;
754 if (!strncmp(p,"allowed",7))
755 iommu_aperture_allowed = 1;
756 if (!strncmp(p, "memaper", 7)) {
757 fallback_aper_force = 1;
758 p += 7;
759 if (*p == '=') {
760 ++p;
761 if (get_option(&p, &arg))
762 fallback_aper_order = arg;
763 }
764 }
765}