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