x64, x2apic/intr-remap: support for x2apic physical mode support
[linux-2.6] / arch / x86 / kernel / aperture_64.c
1 /*
2  * Firmware replacement code.
3  *
4  * Work around broken BIOSes that don't set an aperture or only set the
5  * aperture in the AGP bridge.
6  * If all fails map the aperture over some low memory.  This is cheaper than
7  * doing bounce buffering. The memory is lost. This is done at early boot
8  * because only the bootmem allocator can allocate 32+MB.
9  *
10  * Copyright 2002 Andi Kleen, SuSE Labs.
11  */
12 #include <linux/kernel.h>
13 #include <linux/types.h>
14 #include <linux/init.h>
15 #include <linux/bootmem.h>
16 #include <linux/mmzone.h>
17 #include <linux/pci_ids.h>
18 #include <linux/pci.h>
19 #include <linux/bitops.h>
20 #include <linux/ioport.h>
21 #include <linux/suspend.h>
22 #include <asm/e820.h>
23 #include <asm/io.h>
24 #include <asm/gart.h>
25 #include <asm/pci-direct.h>
26 #include <asm/dma.h>
27 #include <asm/k8.h>
28
29 int gart_iommu_aperture;
30 int gart_iommu_aperture_disabled __initdata;
31 int gart_iommu_aperture_allowed __initdata;
32
33 int fallback_aper_order __initdata = 1; /* 64MB */
34 int fallback_aper_force __initdata;
35
36 int fix_aperture __initdata = 1;
37
38 struct bus_dev_range {
39         int bus;
40         int dev_base;
41         int dev_limit;
42 };
43
44 static struct bus_dev_range bus_dev_ranges[] __initdata = {
45         { 0x00, 0x18, 0x20},
46         { 0xff, 0x00, 0x20},
47         { 0xfe, 0x00, 0x20}
48 };
49
50 static struct resource gart_resource = {
51         .name   = "GART",
52         .flags  = IORESOURCE_MEM,
53 };
54
55 static void __init insert_aperture_resource(u32 aper_base, u32 aper_size)
56 {
57         gart_resource.start = aper_base;
58         gart_resource.end = aper_base + aper_size - 1;
59         insert_resource(&iomem_resource, &gart_resource);
60 }
61
62 /* This code runs before the PCI subsystem is initialized, so just
63    access the northbridge directly. */
64
65 static u32 __init allocate_aperture(void)
66 {
67         u32 aper_size;
68         void *p;
69
70         /* aper_size should <= 1G */
71         if (fallback_aper_order > 5)
72                 fallback_aper_order = 5;
73         aper_size = (32 * 1024 * 1024) << fallback_aper_order;
74
75         /*
76          * Aperture has to be naturally aligned. This means a 2GB aperture
77          * won't have much chance of finding a place in the lower 4GB of
78          * memory. Unfortunately we cannot move it up because that would
79          * make the IOMMU useless.
80          */
81         /*
82          * using 512M as goal, in case kexec will load kernel_big
83          * that will do the on position decompress, and  could overlap with
84          * that positon with gart that is used.
85          * sequende:
86          * kernel_small
87          * ==> kexec (with kdump trigger path or previous doesn't shutdown gart)
88          * ==> kernel_small(gart area become e820_reserved)
89          * ==> kexec (with kdump trigger path or previous doesn't shutdown gart)
90          * ==> kerne_big (uncompressed size will be big than 64M or 128M)
91          * so don't use 512M below as gart iommu, leave the space for kernel
92          * code for safe
93          */
94         p = __alloc_bootmem_nopanic(aper_size, aper_size, 512ULL<<20);
95         if (!p || __pa(p)+aper_size > 0xffffffff) {
96                 printk(KERN_ERR
97                         "Cannot allocate aperture memory hole (%p,%uK)\n",
98                                 p, aper_size>>10);
99                 if (p)
100                         free_bootmem(__pa(p), aper_size);
101                 return 0;
102         }
103         printk(KERN_INFO "Mapping aperture over %d KB of RAM @ %lx\n",
104                         aper_size >> 10, __pa(p));
105         insert_aperture_resource((u32)__pa(p), aper_size);
106         register_nosave_region((u32)__pa(p) >> PAGE_SHIFT,
107                                 (u32)__pa(p+aper_size) >> PAGE_SHIFT);
108
109         return (u32)__pa(p);
110 }
111
112
113 /* Find a PCI capability */
114 static u32 __init find_cap(int bus, int slot, int func, int cap)
115 {
116         int bytes;
117         u8 pos;
118
119         if (!(read_pci_config_16(bus, slot, func, PCI_STATUS) &
120                                                 PCI_STATUS_CAP_LIST))
121                 return 0;
122
123         pos = read_pci_config_byte(bus, slot, func, PCI_CAPABILITY_LIST);
124         for (bytes = 0; bytes < 48 && pos >= 0x40; bytes++) {
125                 u8 id;
126
127                 pos &= ~3;
128                 id = read_pci_config_byte(bus, slot, func, pos+PCI_CAP_LIST_ID);
129                 if (id == 0xff)
130                         break;
131                 if (id == cap)
132                         return pos;
133                 pos = read_pci_config_byte(bus, slot, func,
134                                                 pos+PCI_CAP_LIST_NEXT);
135         }
136         return 0;
137 }
138
139 /* Read a standard AGPv3 bridge header */
140 static u32 __init read_agp(int bus, int slot, int func, int cap, u32 *order)
141 {
142         u32 apsize;
143         u32 apsizereg;
144         int nbits;
145         u32 aper_low, aper_hi;
146         u64 aper;
147         u32 old_order;
148
149         printk(KERN_INFO "AGP bridge at %02x:%02x:%02x\n", bus, slot, func);
150         apsizereg = read_pci_config_16(bus, slot, func, cap + 0x14);
151         if (apsizereg == 0xffffffff) {
152                 printk(KERN_ERR "APSIZE in AGP bridge unreadable\n");
153                 return 0;
154         }
155
156         /* old_order could be the value from NB gart setting */
157         old_order = *order;
158
159         apsize = apsizereg & 0xfff;
160         /* Some BIOS use weird encodings not in the AGPv3 table. */
161         if (apsize & 0xff)
162                 apsize |= 0xf00;
163         nbits = hweight16(apsize);
164         *order = 7 - nbits;
165         if ((int)*order < 0) /* < 32MB */
166                 *order = 0;
167
168         aper_low = read_pci_config(bus, slot, func, 0x10);
169         aper_hi = read_pci_config(bus, slot, func, 0x14);
170         aper = (aper_low & ~((1<<22)-1)) | ((u64)aper_hi << 32);
171
172         /*
173          * On some sick chips, APSIZE is 0. It means it wants 4G
174          * so let double check that order, and lets trust AMD NB settings:
175          */
176         printk(KERN_INFO "Aperture from AGP @ %Lx old size %u MB\n",
177                         aper, 32 << old_order);
178         if (aper + (32ULL<<(20 + *order)) > 0x100000000ULL) {
179                 printk(KERN_INFO "Aperture size %u MB (APSIZE %x) is not right, using settings from NB\n",
180                                 32 << *order, apsizereg);
181                 *order = old_order;
182         }
183
184         printk(KERN_INFO "Aperture from AGP @ %Lx size %u MB (APSIZE %x)\n",
185                         aper, 32 << *order, apsizereg);
186
187         if (!aperture_valid(aper, (32*1024*1024) << *order, 32<<20))
188                 return 0;
189         return (u32)aper;
190 }
191
192 /*
193  * Look for an AGP bridge. Windows only expects the aperture in the
194  * AGP bridge and some BIOS forget to initialize the Northbridge too.
195  * Work around this here.
196  *
197  * Do an PCI bus scan by hand because we're running before the PCI
198  * subsystem.
199  *
200  * All K8 AGP bridges are AGPv3 compliant, so we can do this scan
201  * generically. It's probably overkill to always scan all slots because
202  * the AGP bridges should be always an own bus on the HT hierarchy,
203  * but do it here for future safety.
204  */
205 static u32 __init search_agp_bridge(u32 *order, int *valid_agp)
206 {
207         int bus, slot, func;
208
209         /* Poor man's PCI discovery */
210         for (bus = 0; bus < 256; bus++) {
211                 for (slot = 0; slot < 32; slot++) {
212                         for (func = 0; func < 8; func++) {
213                                 u32 class, cap;
214                                 u8 type;
215                                 class = read_pci_config(bus, slot, func,
216                                                         PCI_CLASS_REVISION);
217                                 if (class == 0xffffffff)
218                                         break;
219
220                                 switch (class >> 16) {
221                                 case PCI_CLASS_BRIDGE_HOST:
222                                 case PCI_CLASS_BRIDGE_OTHER: /* needed? */
223                                         /* AGP bridge? */
224                                         cap = find_cap(bus, slot, func,
225                                                         PCI_CAP_ID_AGP);
226                                         if (!cap)
227                                                 break;
228                                         *valid_agp = 1;
229                                         return read_agp(bus, slot, func, cap,
230                                                         order);
231                                 }
232
233                                 /* No multi-function device? */
234                                 type = read_pci_config_byte(bus, slot, func,
235                                                                PCI_HEADER_TYPE);
236                                 if (!(type & 0x80))
237                                         break;
238                         }
239                 }
240         }
241         printk(KERN_INFO "No AGP bridge found\n");
242
243         return 0;
244 }
245
246 static int gart_fix_e820 __initdata = 1;
247
248 static int __init parse_gart_mem(char *p)
249 {
250         if (!p)
251                 return -EINVAL;
252
253         if (!strncmp(p, "off", 3))
254                 gart_fix_e820 = 0;
255         else if (!strncmp(p, "on", 2))
256                 gart_fix_e820 = 1;
257
258         return 0;
259 }
260 early_param("gart_fix_e820", parse_gart_mem);
261
262 void __init early_gart_iommu_check(void)
263 {
264         /*
265          * in case it is enabled before, esp for kexec/kdump,
266          * previous kernel already enable that. memset called
267          * by allocate_aperture/__alloc_bootmem_nopanic cause restart.
268          * or second kernel have different position for GART hole. and new
269          * kernel could use hole as RAM that is still used by GART set by
270          * first kernel
271          * or BIOS forget to put that in reserved.
272          * try to update e820 to make that region as reserved.
273          */
274         int i, fix, slot;
275         u32 ctl;
276         u32 aper_size = 0, aper_order = 0, last_aper_order = 0;
277         u64 aper_base = 0, last_aper_base = 0;
278         int aper_enabled = 0, last_aper_enabled = 0, last_valid = 0;
279
280         if (!early_pci_allowed())
281                 return;
282
283         /* This is mostly duplicate of iommu_hole_init */
284         fix = 0;
285         for (i = 0; i < ARRAY_SIZE(bus_dev_ranges); i++) {
286                 int bus;
287                 int dev_base, dev_limit;
288
289                 bus = bus_dev_ranges[i].bus;
290                 dev_base = bus_dev_ranges[i].dev_base;
291                 dev_limit = bus_dev_ranges[i].dev_limit;
292
293                 for (slot = dev_base; slot < dev_limit; slot++) {
294                         if (!early_is_k8_nb(read_pci_config(bus, slot, 3, 0x00)))
295                                 continue;
296
297                         ctl = read_pci_config(bus, slot, 3, AMD64_GARTAPERTURECTL);
298                         aper_enabled = ctl & AMD64_GARTEN;
299                         aper_order = (ctl >> 1) & 7;
300                         aper_size = (32 * 1024 * 1024) << aper_order;
301                         aper_base = read_pci_config(bus, slot, 3, AMD64_GARTAPERTUREBASE) & 0x7fff;
302                         aper_base <<= 25;
303
304                         if (last_valid) {
305                                 if ((aper_order != last_aper_order) ||
306                                     (aper_base != last_aper_base) ||
307                                     (aper_enabled != last_aper_enabled)) {
308                                         fix = 1;
309                                         break;
310                                 }
311                         }
312
313                         last_aper_order = aper_order;
314                         last_aper_base = aper_base;
315                         last_aper_enabled = aper_enabled;
316                         last_valid = 1;
317                 }
318         }
319
320         if (!fix && !aper_enabled)
321                 return;
322
323         if (!aper_base || !aper_size || aper_base + aper_size > 0x100000000UL)
324                 fix = 1;
325
326         if (gart_fix_e820 && !fix && aper_enabled) {
327                 if (e820_any_mapped(aper_base, aper_base + aper_size,
328                                     E820_RAM)) {
329                         /* reserve it, so we can reuse it in second kernel */
330                         printk(KERN_INFO "update e820 for GART\n");
331                         e820_add_region(aper_base, aper_size, E820_RESERVED);
332                         update_e820();
333                 }
334         }
335
336         if (!fix)
337                 return;
338
339         /* different nodes have different setting, disable them all at first*/
340         for (i = 0; i < ARRAY_SIZE(bus_dev_ranges); i++) {
341                 int bus;
342                 int dev_base, dev_limit;
343
344                 bus = bus_dev_ranges[i].bus;
345                 dev_base = bus_dev_ranges[i].dev_base;
346                 dev_limit = bus_dev_ranges[i].dev_limit;
347
348                 for (slot = dev_base; slot < dev_limit; slot++) {
349                         if (!early_is_k8_nb(read_pci_config(bus, slot, 3, 0x00)))
350                                 continue;
351
352                         ctl = read_pci_config(bus, slot, 3, AMD64_GARTAPERTURECTL);
353                         ctl &= ~AMD64_GARTEN;
354                         write_pci_config(bus, slot, 3, AMD64_GARTAPERTURECTL, ctl);
355                 }
356         }
357
358 }
359
360 static int __initdata printed_gart_size_msg;
361
362 void __init gart_iommu_hole_init(void)
363 {
364         u32 agp_aper_base = 0, agp_aper_order = 0;
365         u32 aper_size, aper_alloc = 0, aper_order = 0, last_aper_order = 0;
366         u64 aper_base, last_aper_base = 0;
367         int fix, slot, valid_agp = 0;
368         int i, node;
369
370         if (gart_iommu_aperture_disabled || !fix_aperture ||
371             !early_pci_allowed())
372                 return;
373
374         printk(KERN_INFO  "Checking aperture...\n");
375
376         if (!fallback_aper_force)
377                 agp_aper_base = search_agp_bridge(&agp_aper_order, &valid_agp);
378
379         fix = 0;
380         node = 0;
381         for (i = 0; i < ARRAY_SIZE(bus_dev_ranges); i++) {
382                 int bus;
383                 int dev_base, dev_limit;
384
385                 bus = bus_dev_ranges[i].bus;
386                 dev_base = bus_dev_ranges[i].dev_base;
387                 dev_limit = bus_dev_ranges[i].dev_limit;
388
389                 for (slot = dev_base; slot < dev_limit; slot++) {
390                         if (!early_is_k8_nb(read_pci_config(bus, slot, 3, 0x00)))
391                                 continue;
392
393                         iommu_detected = 1;
394                         gart_iommu_aperture = 1;
395
396                         aper_order = (read_pci_config(bus, slot, 3, AMD64_GARTAPERTURECTL) >> 1) & 7;
397                         aper_size = (32 * 1024 * 1024) << aper_order;
398                         aper_base = read_pci_config(bus, slot, 3, AMD64_GARTAPERTUREBASE) & 0x7fff;
399                         aper_base <<= 25;
400
401                         printk(KERN_INFO "Node %d: aperture @ %Lx size %u MB\n",
402                                         node, aper_base, aper_size >> 20);
403                         node++;
404
405                         if (!aperture_valid(aper_base, aper_size, 64<<20)) {
406                                 if (valid_agp && agp_aper_base &&
407                                     agp_aper_base == aper_base &&
408                                     agp_aper_order == aper_order) {
409                                         /* the same between two setting from NB and agp */
410                                         if (!no_iommu &&
411                                             max_pfn > MAX_DMA32_PFN &&
412                                             !printed_gart_size_msg) {
413                                                 printk(KERN_ERR "you are using iommu with agp, but GART size is less than 64M\n");
414                                                 printk(KERN_ERR "please increase GART size in your BIOS setup\n");
415                                                 printk(KERN_ERR "if BIOS doesn't have that option, contact your HW vendor!\n");
416                                                 printed_gart_size_msg = 1;
417                                         }
418                                 } else {
419                                         fix = 1;
420                                         goto out;
421                                 }
422                         }
423
424                         if ((last_aper_order && aper_order != last_aper_order) ||
425                             (last_aper_base && aper_base != last_aper_base)) {
426                                 fix = 1;
427                                 goto out;
428                         }
429                         last_aper_order = aper_order;
430                         last_aper_base = aper_base;
431                 }
432         }
433
434 out:
435         if (!fix && !fallback_aper_force) {
436                 if (last_aper_base) {
437                         unsigned long n = (32 * 1024 * 1024) << last_aper_order;
438
439                         insert_aperture_resource((u32)last_aper_base, n);
440                 }
441                 return;
442         }
443
444         if (!fallback_aper_force) {
445                 aper_alloc = agp_aper_base;
446                 aper_order = agp_aper_order;
447         }
448
449         if (aper_alloc) {
450                 /* Got the aperture from the AGP bridge */
451         } else if (swiotlb && !valid_agp) {
452                 /* Do nothing */
453         } else if ((!no_iommu && max_pfn > MAX_DMA32_PFN) ||
454                    force_iommu ||
455                    valid_agp ||
456                    fallback_aper_force) {
457                 printk(KERN_ERR
458                         "Your BIOS doesn't leave a aperture memory hole\n");
459                 printk(KERN_ERR
460                         "Please enable the IOMMU option in the BIOS setup\n");
461                 printk(KERN_ERR
462                         "This costs you %d MB of RAM\n",
463                                 32 << fallback_aper_order);
464
465                 aper_order = fallback_aper_order;
466                 aper_alloc = allocate_aperture();
467                 if (!aper_alloc) {
468                         /*
469                          * Could disable AGP and IOMMU here, but it's
470                          * probably not worth it. But the later users
471                          * cannot deal with bad apertures and turning
472                          * on the aperture over memory causes very
473                          * strange problems, so it's better to panic
474                          * early.
475                          */
476                         panic("Not enough memory for aperture");
477                 }
478         } else {
479                 return;
480         }
481
482         /* Fix up the north bridges */
483         for (i = 0; i < ARRAY_SIZE(bus_dev_ranges); i++) {
484                 int bus;
485                 int dev_base, dev_limit;
486
487                 bus = bus_dev_ranges[i].bus;
488                 dev_base = bus_dev_ranges[i].dev_base;
489                 dev_limit = bus_dev_ranges[i].dev_limit;
490                 for (slot = dev_base; slot < dev_limit; slot++) {
491                         if (!early_is_k8_nb(read_pci_config(bus, slot, 3, 0x00)))
492                                 continue;
493
494                         /* Don't enable translation yet. That is done later.
495                            Assume this BIOS didn't initialise the GART so
496                            just overwrite all previous bits */
497                         write_pci_config(bus, slot, 3, AMD64_GARTAPERTURECTL, aper_order << 1);
498                         write_pci_config(bus, slot, 3, AMD64_GARTAPERTUREBASE, aper_alloc >> 25);
499                 }
500         }
501
502         set_up_gart_resume(aper_order, aper_alloc);
503 }