1 /* This only handles 32bit MTRR on 32bit hosts. This is strictly wrong
2 because MTRRs can span upto 40 bits (36bits on most modern x86) */
3 #include <linux/init.h>
4 #include <linux/slab.h>
6 #include <linux/module.h>
10 #include <asm/system.h>
11 #include <asm/cpufeature.h>
12 #include <asm/processor-flags.h>
13 #include <asm/tlbflush.h>
18 struct mtrr_var_range var_ranges[MAX_VAR_RANGES];
19 mtrr_type fixed_ranges[NUM_FIXED_RANGES];
20 unsigned char enabled;
21 unsigned char have_fixed;
25 struct fixed_range_block {
26 int base_msr; /* start address of an MTRR block */
27 int ranges; /* number of MTRRs in this block */
30 static struct fixed_range_block fixed_range_blocks[] = {
31 { MTRRfix64K_00000_MSR, 1 }, /* one 64k MTRR */
32 { MTRRfix16K_80000_MSR, 2 }, /* two 16k MTRRs */
33 { MTRRfix4K_C0000_MSR, 8 }, /* eight 4k MTRRs */
37 static unsigned long smp_changes_mask;
38 static struct mtrr_state mtrr_state = {};
39 static int mtrr_state_set;
42 #undef MODULE_PARAM_PREFIX
43 #define MODULE_PARAM_PREFIX "mtrr."
46 module_param_named(show, mtrr_show, bool, 0);
49 * Returns the effective MTRR type for the region
51 * - 0xFE - when the range is "not entirely covered" by _any_ var range MTRR
52 * - 0xFF - when MTRR is not enabled
54 u8 mtrr_type_lookup(u64 start, u64 end)
58 u8 prev_match, curr_match;
63 if (!mtrr_state.enabled)
66 /* Make end inclusive end, instead of exclusive */
69 /* Look in fixed ranges. Just return the type as per start */
70 if (mtrr_state.have_fixed && (start < 0x100000)) {
73 if (start < 0x80000) {
76 return mtrr_state.fixed_ranges[idx];
77 } else if (start < 0xC0000) {
79 idx += ((start - 0x80000) >> 14);
80 return mtrr_state.fixed_ranges[idx];
81 } else if (start < 0x1000000) {
83 idx += ((start - 0xC0000) >> 12);
84 return mtrr_state.fixed_ranges[idx];
89 * Look in variable ranges
90 * Look of multiple ranges matching this address and pick type
91 * as per MTRR precedence
93 if (!(mtrr_state.enabled & 2)) {
94 return mtrr_state.def_type;
98 for (i = 0; i < num_var_ranges; ++i) {
99 unsigned short start_state, end_state;
101 if (!(mtrr_state.var_ranges[i].mask_lo & (1 << 11)))
104 base = (((u64)mtrr_state.var_ranges[i].base_hi) << 32) +
105 (mtrr_state.var_ranges[i].base_lo & PAGE_MASK);
106 mask = (((u64)mtrr_state.var_ranges[i].mask_hi) << 32) +
107 (mtrr_state.var_ranges[i].mask_lo & PAGE_MASK);
109 start_state = ((start & mask) == (base & mask));
110 end_state = ((end & mask) == (base & mask));
111 if (start_state != end_state)
114 if ((start & mask) != (base & mask)) {
118 curr_match = mtrr_state.var_ranges[i].base_lo & 0xff;
119 if (prev_match == 0xFF) {
120 prev_match = curr_match;
124 if (prev_match == MTRR_TYPE_UNCACHABLE ||
125 curr_match == MTRR_TYPE_UNCACHABLE) {
126 return MTRR_TYPE_UNCACHABLE;
129 if ((prev_match == MTRR_TYPE_WRBACK &&
130 curr_match == MTRR_TYPE_WRTHROUGH) ||
131 (prev_match == MTRR_TYPE_WRTHROUGH &&
132 curr_match == MTRR_TYPE_WRBACK)) {
133 prev_match = MTRR_TYPE_WRTHROUGH;
134 curr_match = MTRR_TYPE_WRTHROUGH;
137 if (prev_match != curr_match) {
138 return MTRR_TYPE_UNCACHABLE;
143 if (start >= (1ULL<<32) && (end < mtrr_tom2))
144 return MTRR_TYPE_WRBACK;
147 if (prev_match != 0xFF)
150 return mtrr_state.def_type;
153 /* Get the MSR pair relating to a var range */
155 get_mtrr_var_range(unsigned int index, struct mtrr_var_range *vr)
157 rdmsr(MTRRphysBase_MSR(index), vr->base_lo, vr->base_hi);
158 rdmsr(MTRRphysMask_MSR(index), vr->mask_lo, vr->mask_hi);
161 /* fill the MSR pair relating to a var range */
162 void fill_mtrr_var_range(unsigned int index,
163 u32 base_lo, u32 base_hi, u32 mask_lo, u32 mask_hi)
165 struct mtrr_var_range *vr;
167 vr = mtrr_state.var_ranges;
169 vr[index].base_lo = base_lo;
170 vr[index].base_hi = base_hi;
171 vr[index].mask_lo = mask_lo;
172 vr[index].mask_hi = mask_hi;
176 get_fixed_ranges(mtrr_type * frs)
178 unsigned int *p = (unsigned int *) frs;
181 rdmsr(MTRRfix64K_00000_MSR, p[0], p[1]);
183 for (i = 0; i < 2; i++)
184 rdmsr(MTRRfix16K_80000_MSR + i, p[2 + i * 2], p[3 + i * 2]);
185 for (i = 0; i < 8; i++)
186 rdmsr(MTRRfix4K_C0000_MSR + i, p[6 + i * 2], p[7 + i * 2]);
189 void mtrr_save_fixed_ranges(void *info)
192 get_fixed_ranges(mtrr_state.fixed_ranges);
195 static void print_fixed(unsigned base, unsigned step, const mtrr_type*types)
199 for (i = 0; i < 8; ++i, ++types, base += step)
200 printk(KERN_INFO "MTRR %05X-%05X %s\n",
201 base, base + step - 1, mtrr_attrib_to_str(*types));
204 static void prepare_set(void);
205 static void post_set(void);
207 /* Grab all of the MTRR state for this CPU into *state */
208 void __init get_mtrr_state(void)
211 struct mtrr_var_range *vrs;
215 vrs = mtrr_state.var_ranges;
217 rdmsr(MTRRcap_MSR, lo, dummy);
218 mtrr_state.have_fixed = (lo >> 8) & 1;
220 for (i = 0; i < num_var_ranges; i++)
221 get_mtrr_var_range(i, &vrs[i]);
222 if (mtrr_state.have_fixed)
223 get_fixed_ranges(mtrr_state.fixed_ranges);
225 rdmsr(MTRRdefType_MSR, lo, dummy);
226 mtrr_state.def_type = (lo & 0xff);
227 mtrr_state.enabled = (lo & 0xc00) >> 10;
229 if (amd_special_default_mtrr()) {
232 rdmsr(MSR_K8_TOP_MEM2, low, high);
236 mtrr_tom2 &= 0xffffff800000ULL;
241 printk(KERN_INFO "MTRR default type: %s\n", mtrr_attrib_to_str(mtrr_state.def_type));
242 if (mtrr_state.have_fixed) {
243 printk(KERN_INFO "MTRR fixed ranges %sabled:\n",
244 mtrr_state.enabled & 1 ? "en" : "dis");
245 print_fixed(0x00000, 0x10000, mtrr_state.fixed_ranges + 0);
246 for (i = 0; i < 2; ++i)
247 print_fixed(0x80000 + i * 0x20000, 0x04000, mtrr_state.fixed_ranges + (i + 1) * 8);
248 for (i = 0; i < 8; ++i)
249 print_fixed(0xC0000 + i * 0x08000, 0x01000, mtrr_state.fixed_ranges + (i + 3) * 8);
251 printk(KERN_INFO "MTRR variable ranges %sabled:\n",
252 mtrr_state.enabled & 2 ? "en" : "dis");
253 high_width = ((size_or_mask ? ffs(size_or_mask) - 1 : 32) - (32 - PAGE_SHIFT) + 3) / 4;
254 for (i = 0; i < num_var_ranges; ++i) {
255 if (mtrr_state.var_ranges[i].mask_lo & (1 << 11))
256 printk(KERN_INFO "MTRR %u base %0*X%05X000 mask %0*X%05X000 %s\n",
259 mtrr_state.var_ranges[i].base_hi,
260 mtrr_state.var_ranges[i].base_lo >> 12,
262 mtrr_state.var_ranges[i].mask_hi,
263 mtrr_state.var_ranges[i].mask_lo >> 12,
264 mtrr_attrib_to_str(mtrr_state.var_ranges[i].base_lo & 0xff));
266 printk(KERN_INFO "MTRR %u disabled\n", i);
269 printk(KERN_INFO "TOM2: %016llx aka %lldM\n",
270 mtrr_tom2, mtrr_tom2>>20);
275 /* PAT setup for BP. We need to go through sync steps here */
276 local_irq_save(flags);
282 local_irq_restore(flags);
286 /* Some BIOS's are fucked and don't set all MTRRs the same! */
287 void __init mtrr_state_warn(void)
289 unsigned long mask = smp_changes_mask;
293 if (mask & MTRR_CHANGE_MASK_FIXED)
294 printk(KERN_WARNING "mtrr: your CPUs had inconsistent fixed MTRR settings\n");
295 if (mask & MTRR_CHANGE_MASK_VARIABLE)
296 printk(KERN_WARNING "mtrr: your CPUs had inconsistent variable MTRR settings\n");
297 if (mask & MTRR_CHANGE_MASK_DEFTYPE)
298 printk(KERN_WARNING "mtrr: your CPUs had inconsistent MTRRdefType settings\n");
299 printk(KERN_INFO "mtrr: probably your BIOS does not setup all CPUs.\n");
300 printk(KERN_INFO "mtrr: corrected configuration.\n");
303 /* Doesn't attempt to pass an error out to MTRR users
304 because it's quite complicated in some cases and probably not
305 worth it because the best error handling is to ignore it. */
306 void mtrr_wrmsr(unsigned msr, unsigned a, unsigned b)
308 if (wrmsr_safe(msr, a, b) < 0)
310 "MTRR: CPU %u: Writing MSR %x to %x:%x failed\n",
311 smp_processor_id(), msr, a, b);
315 * Enable and allow read/write of extended fixed-range MTRR bits on K8 CPUs
316 * see AMD publication no. 24593, chapter 3.2.1 for more information
318 static inline void k8_enable_fixed_iorrs(void)
322 rdmsr(MSR_K8_SYSCFG, lo, hi);
323 mtrr_wrmsr(MSR_K8_SYSCFG, lo
324 | K8_MTRRFIXRANGE_DRAM_ENABLE
325 | K8_MTRRFIXRANGE_DRAM_MODIFY, hi);
329 * set_fixed_range - checks & updates a fixed-range MTRR if it differs from the value it should have
330 * @msr: MSR address of the MTTR which should be checked and updated
331 * @changed: pointer which indicates whether the MTRR needed to be changed
332 * @msrwords: pointer to the MSR values which the MSR should have
334 * If K8 extentions are wanted, update the K8 SYSCFG MSR also.
335 * See AMD publication no. 24593, chapter 7.8.1, page 233 for more information.
337 static void set_fixed_range(int msr, bool *changed, unsigned int *msrwords)
343 if (lo != msrwords[0] || hi != msrwords[1]) {
344 if (boot_cpu_data.x86_vendor == X86_VENDOR_AMD &&
345 (boot_cpu_data.x86 >= 0x0f && boot_cpu_data.x86 <= 0x11) &&
346 ((msrwords[0] | msrwords[1]) & K8_MTRR_RDMEM_WRMEM_MASK))
347 k8_enable_fixed_iorrs();
348 mtrr_wrmsr(msr, msrwords[0], msrwords[1]);
354 * generic_get_free_region - Get a free MTRR.
355 * @base: The starting (base) address of the region.
356 * @size: The size (in bytes) of the region.
357 * @replace_reg: mtrr index to be replaced; set to invalid value if none.
359 * Returns: The index of the region on success, else negative on error.
361 int generic_get_free_region(unsigned long base, unsigned long size, int replace_reg)
365 unsigned long lbase, lsize;
367 max = num_var_ranges;
368 if (replace_reg >= 0 && replace_reg < max)
370 for (i = 0; i < max; ++i) {
371 mtrr_if->get(i, &lbase, &lsize, <ype);
378 static void generic_get_mtrr(unsigned int reg, unsigned long *base,
379 unsigned long *size, mtrr_type *type)
381 unsigned int mask_lo, mask_hi, base_lo, base_hi;
382 unsigned int tmp, hi;
384 rdmsr(MTRRphysMask_MSR(reg), mask_lo, mask_hi);
385 if ((mask_lo & 0x800) == 0) {
386 /* Invalid (i.e. free) range */
393 rdmsr(MTRRphysBase_MSR(reg), base_lo, base_hi);
395 /* Work out the shifted address mask. */
396 tmp = mask_hi << (32 - PAGE_SHIFT) | mask_lo >> PAGE_SHIFT;
397 mask_lo = size_or_mask | tmp;
398 /* Expand tmp with high bits to all 1s*/
401 tmp |= ~((1<<(hi - 1)) - 1);
403 if (tmp != mask_lo) {
404 WARN_ONCE(1, KERN_INFO "mtrr: your BIOS has set up an incorrect mask, fixing it up.\n");
409 /* This works correctly if size is a power of two, i.e. a
412 *base = base_hi << (32 - PAGE_SHIFT) | base_lo >> PAGE_SHIFT;
413 *type = base_lo & 0xff;
417 * set_fixed_ranges - checks & updates the fixed-range MTRRs if they differ from the saved set
418 * @frs: pointer to fixed-range MTRR values, saved by get_fixed_ranges()
420 static int set_fixed_ranges(mtrr_type * frs)
422 unsigned long long *saved = (unsigned long long *) frs;
423 bool changed = false;
426 while (fixed_range_blocks[++block].ranges)
427 for (range=0; range < fixed_range_blocks[block].ranges; range++)
428 set_fixed_range(fixed_range_blocks[block].base_msr + range,
429 &changed, (unsigned int *) saved++);
434 /* Set the MSR pair relating to a var range. Returns TRUE if
436 static bool set_mtrr_var_ranges(unsigned int index, struct mtrr_var_range *vr)
439 bool changed = false;
441 rdmsr(MTRRphysBase_MSR(index), lo, hi);
442 if ((vr->base_lo & 0xfffff0ffUL) != (lo & 0xfffff0ffUL)
443 || (vr->base_hi & (size_and_mask >> (32 - PAGE_SHIFT))) !=
444 (hi & (size_and_mask >> (32 - PAGE_SHIFT)))) {
445 mtrr_wrmsr(MTRRphysBase_MSR(index), vr->base_lo, vr->base_hi);
449 rdmsr(MTRRphysMask_MSR(index), lo, hi);
451 if ((vr->mask_lo & 0xfffff800UL) != (lo & 0xfffff800UL)
452 || (vr->mask_hi & (size_and_mask >> (32 - PAGE_SHIFT))) !=
453 (hi & (size_and_mask >> (32 - PAGE_SHIFT)))) {
454 mtrr_wrmsr(MTRRphysMask_MSR(index), vr->mask_lo, vr->mask_hi);
460 static u32 deftype_lo, deftype_hi;
463 * set_mtrr_state - Set the MTRR state for this CPU.
465 * NOTE: The CPU must already be in a safe state for MTRR changes.
466 * RETURNS: 0 if no changes made, else a mask indicating what was changed.
468 static unsigned long set_mtrr_state(void)
471 unsigned long change_mask = 0;
473 for (i = 0; i < num_var_ranges; i++)
474 if (set_mtrr_var_ranges(i, &mtrr_state.var_ranges[i]))
475 change_mask |= MTRR_CHANGE_MASK_VARIABLE;
477 if (mtrr_state.have_fixed && set_fixed_ranges(mtrr_state.fixed_ranges))
478 change_mask |= MTRR_CHANGE_MASK_FIXED;
480 /* Set_mtrr_restore restores the old value of MTRRdefType,
481 so to set it we fiddle with the saved value */
482 if ((deftype_lo & 0xff) != mtrr_state.def_type
483 || ((deftype_lo & 0xc00) >> 10) != mtrr_state.enabled) {
484 deftype_lo = (deftype_lo & ~0xcff) | mtrr_state.def_type | (mtrr_state.enabled << 10);
485 change_mask |= MTRR_CHANGE_MASK_DEFTYPE;
492 static unsigned long cr4 = 0;
493 static DEFINE_SPINLOCK(set_atomicity_lock);
496 * Since we are disabling the cache don't allow any interrupts - they
497 * would run extremely slow and would only increase the pain. The caller must
498 * ensure that local interrupts are disabled and are reenabled after post_set()
502 static void prepare_set(void) __acquires(set_atomicity_lock)
506 /* Note that this is not ideal, since the cache is only flushed/disabled
507 for this CPU while the MTRRs are changed, but changing this requires
508 more invasive changes to the way the kernel boots */
510 spin_lock(&set_atomicity_lock);
512 /* Enter the no-fill (CD=1, NW=0) cache mode and flush caches. */
513 cr0 = read_cr0() | X86_CR0_CD;
517 /* Save value of CR4 and clear Page Global Enable (bit 7) */
520 write_cr4(cr4 & ~X86_CR4_PGE);
523 /* Flush all TLBs via a mov %cr3, %reg; mov %reg, %cr3 */
526 /* Save MTRR state */
527 rdmsr(MTRRdefType_MSR, deftype_lo, deftype_hi);
529 /* Disable MTRRs, and set the default type to uncached */
530 mtrr_wrmsr(MTRRdefType_MSR, deftype_lo & ~0xcff, deftype_hi);
533 static void post_set(void) __releases(set_atomicity_lock)
535 /* Flush TLBs (no need to flush caches - they are disabled) */
538 /* Intel (P6) standard MTRRs */
539 mtrr_wrmsr(MTRRdefType_MSR, deftype_lo, deftype_hi);
542 write_cr0(read_cr0() & 0xbfffffff);
544 /* Restore value of CR4 */
547 spin_unlock(&set_atomicity_lock);
550 static void generic_set_all(void)
552 unsigned long mask, count;
555 local_irq_save(flags);
558 /* Actually set the state */
559 mask = set_mtrr_state();
565 local_irq_restore(flags);
567 /* Use the atomic bitops to update the global mask */
568 for (count = 0; count < sizeof mask * 8; ++count) {
570 set_bit(count, &smp_changes_mask);
576 static void generic_set_mtrr(unsigned int reg, unsigned long base,
577 unsigned long size, mtrr_type type)
578 /* [SUMMARY] Set variable MTRR register on the local CPU.
579 <reg> The register to set.
580 <base> The base address of the region.
581 <size> The size of the region. If this is 0 the region is disabled.
582 <type> The type of the region.
587 struct mtrr_var_range *vr;
589 vr = &mtrr_state.var_ranges[reg];
591 local_irq_save(flags);
595 /* The invalid bit is kept in the mask, so we simply clear the
596 relevant mask register to disable a range. */
597 mtrr_wrmsr(MTRRphysMask_MSR(reg), 0, 0);
598 memset(vr, 0, sizeof(struct mtrr_var_range));
600 vr->base_lo = base << PAGE_SHIFT | type;
601 vr->base_hi = (base & size_and_mask) >> (32 - PAGE_SHIFT);
602 vr->mask_lo = -size << PAGE_SHIFT | 0x800;
603 vr->mask_hi = (-size & size_and_mask) >> (32 - PAGE_SHIFT);
605 mtrr_wrmsr(MTRRphysBase_MSR(reg), vr->base_lo, vr->base_hi);
606 mtrr_wrmsr(MTRRphysMask_MSR(reg), vr->mask_lo, vr->mask_hi);
610 local_irq_restore(flags);
613 int generic_validate_add_page(unsigned long base, unsigned long size, unsigned int type)
615 unsigned long lbase, last;
617 /* For Intel PPro stepping <= 7, must be 4 MiB aligned
618 and not touch 0x70000000->0x7003FFFF */
619 if (is_cpu(INTEL) && boot_cpu_data.x86 == 6 &&
620 boot_cpu_data.x86_model == 1 &&
621 boot_cpu_data.x86_mask <= 7) {
622 if (base & ((1 << (22 - PAGE_SHIFT)) - 1)) {
623 printk(KERN_WARNING "mtrr: base(0x%lx000) is not 4 MiB aligned\n", base);
626 if (!(base + size < 0x70000 || base > 0x7003F) &&
627 (type == MTRR_TYPE_WRCOMB
628 || type == MTRR_TYPE_WRBACK)) {
629 printk(KERN_WARNING "mtrr: writable mtrr between 0x70000000 and 0x7003FFFF may hang the CPU.\n");
634 /* Check upper bits of base and last are equal and lower bits are 0
635 for base and 1 for last */
636 last = base + size - 1;
637 for (lbase = base; !(lbase & 1) && (last & 1);
638 lbase = lbase >> 1, last = last >> 1) ;
640 printk(KERN_WARNING "mtrr: base(0x%lx000) is not aligned on a size(0x%lx000) boundary\n",
648 static int generic_have_wrcomb(void)
650 unsigned long config, dummy;
651 rdmsr(MTRRcap_MSR, config, dummy);
652 return (config & (1 << 10));
655 int positive_have_wrcomb(void)
660 /* generic structure...
662 struct mtrr_ops generic_mtrr_ops = {
664 .set_all = generic_set_all,
665 .get = generic_get_mtrr,
666 .get_free_region = generic_get_free_region,
667 .set = generic_set_mtrr,
668 .validate_add_page = generic_validate_add_page,
669 .have_wrcomb = generic_have_wrcomb,