1 #include <linux/init.h> 2 #include <linux/kernel.h> 3 4 #include <linux/string.h> 5 #include <linux/bitops.h> 6 #include <linux/smp.h> 7 #include <linux/thread_info.h> 8 #include <linux/module.h> 9 10 #include <asm/processor.h> 11 #include <asm/pgtable.h> 12 #include <asm/msr.h> 13 #include <asm/uaccess.h> 14 #include <asm/ptrace.h> 15 #include <asm/ds.h> 16 #include <asm/bugs.h> 17 18 #include "cpu.h" 19 20 #ifdef CONFIG_X86_LOCAL_APIC 21 #include <asm/mpspec.h> 22 #include <asm/apic.h> 23 #include <mach_apic.h> 24 #endif 25 26 #ifdef CONFIG_X86_INTEL_USERCOPY 27 /* 28 * Alignment at which movsl is preferred for bulk memory copies. 29 */ 30 struct movsl_mask movsl_mask __read_mostly; 31 #endif 32 33 static void __cpuinit early_init_intel(struct cpuinfo_x86 *c) 34 { 35 /* Netburst reports 64 bytes clflush size, but does IO in 128 bytes */ 36 if (c->x86 == 15 && c->x86_cache_alignment == 64) 37 c->x86_cache_alignment = 128; 38 if ((c->x86 == 0xf && c->x86_model >= 0x03) || 39 (c->x86 == 0x6 && c->x86_model >= 0x0e)) 40 set_cpu_cap(c, X86_FEATURE_CONSTANT_TSC); 41 } 42 43 /* 44 * Early probe support logic for ppro memory erratum #50 45 * 46 * This is called before we do cpu ident work 47 */ 48 49 int __cpuinit ppro_with_ram_bug(void) 50 { 51 /* Uses data from early_cpu_detect now */ 52 if (boot_cpu_data.x86_vendor == X86_VENDOR_INTEL && 53 boot_cpu_data.x86 == 6 && 54 boot_cpu_data.x86_model == 1 && 55 boot_cpu_data.x86_mask < 8) { 56 printk(KERN_INFO "Pentium Pro with Errata#50 detected. Taking evasive action.\n"); 57 return 1; 58 } 59 return 0; 60 } 61 62 63 /* 64 * P4 Xeon errata 037 workaround. 65 * Hardware prefetcher may cause stale data to be loaded into the cache. 66 */ 67 static void __cpuinit Intel_errata_workarounds(struct cpuinfo_x86 *c) 68 { 69 unsigned long lo, hi; 70 71 if ((c->x86 == 15) && (c->x86_model == 1) && (c->x86_mask == 1)) { 72 rdmsr(MSR_IA32_MISC_ENABLE, lo, hi); 73 if ((lo & (1<<9)) == 0) { 74 printk (KERN_INFO "CPU: C0 stepping P4 Xeon detected.\n"); 75 printk (KERN_INFO "CPU: Disabling hardware prefetching (Errata 037)\n"); 76 lo |= (1<<9); /* Disable hw prefetching */ 77 wrmsr (MSR_IA32_MISC_ENABLE, lo, hi); 78 } 79 } 80 } 81 82 83 /* 84 * find out the number of processor cores on the die 85 */ 86 static int __cpuinit num_cpu_cores(struct cpuinfo_x86 *c) 87 { 88 unsigned int eax, ebx, ecx, edx; 89 90 if (c->cpuid_level < 4) 91 return 1; 92 93 /* Intel has a non-standard dependency on %ecx for this CPUID level. */ 94 cpuid_count(4, 0, &eax, &ebx, &ecx, &edx); 95 if (eax & 0x1f) 96 return ((eax >> 26) + 1); 97 else 98 return 1; 99 } 100 101 #ifdef CONFIG_X86_F00F_BUG 102 static void __cpuinit trap_init_f00f_bug(void) 103 { 104 __set_fixmap(FIX_F00F_IDT, __pa(&idt_table), PAGE_KERNEL_RO); 105 106 /* 107 * Update the IDT descriptor and reload the IDT so that 108 * it uses the read-only mapped virtual address. 109 */ 110 idt_descr.address = fix_to_virt(FIX_F00F_IDT); 111 load_idt(&idt_descr); 112 } 113 #endif 114 115 static void __cpuinit init_intel(struct cpuinfo_x86 *c) 116 { 117 unsigned int l2 = 0; 118 char *p = NULL; 119 120 early_init_intel(c); 121 122 #ifdef CONFIG_X86_F00F_BUG 123 /* 124 * All current models of Pentium and Pentium with MMX technology CPUs 125 * have the F0 0F bug, which lets nonprivileged users lock up the system. 126 * Note that the workaround only should be initialized once... 127 */ 128 c->f00f_bug = 0; 129 if (!paravirt_enabled() && c->x86 == 5) { 130 static int f00f_workaround_enabled; 131 132 c->f00f_bug = 1; 133 if (!f00f_workaround_enabled) { 134 trap_init_f00f_bug(); 135 printk(KERN_NOTICE "Intel Pentium with F0 0F bug - workaround enabled.\n"); 136 f00f_workaround_enabled = 1; 137 } 138 } 139 #endif 140 141 l2 = init_intel_cacheinfo(c); 142 if (c->cpuid_level > 9) { 143 unsigned eax = cpuid_eax(10); 144 /* Check for version and the number of counters */ 145 if ((eax & 0xff) && (((eax>>8) & 0xff) > 1)) 146 set_cpu_cap(c, X86_FEATURE_ARCH_PERFMON); 147 } 148 149 /* SEP CPUID bug: Pentium Pro reports SEP but doesn't have it until model 3 mask 3 */ 150 if ((c->x86<<8 | c->x86_model<<4 | c->x86_mask) < 0x633) 151 clear_cpu_cap(c, X86_FEATURE_SEP); 152 153 /* 154 * Names for the Pentium II/Celeron processors 155 * detectable only by also checking the cache size. 156 * Dixon is NOT a Celeron. 157 */ 158 if (c->x86 == 6) { 159 switch (c->x86_model) { 160 case 5: 161 if (c->x86_mask == 0) { 162 if (l2 == 0) 163 p = "Celeron (Covington)"; 164 else if (l2 == 256) 165 p = "Mobile Pentium II (Dixon)"; 166 } 167 break; 168 169 case 6: 170 if (l2 == 128) 171 p = "Celeron (Mendocino)"; 172 else if (c->x86_mask == 0 || c->x86_mask == 5) 173 p = "Celeron-A"; 174 break; 175 176 case 8: 177 if (l2 == 128) 178 p = "Celeron (Coppermine)"; 179 break; 180 } 181 } 182 183 if (p) 184 strcpy(c->x86_model_id, p); 185 186 c->x86_max_cores = num_cpu_cores(c); 187 188 detect_ht(c); 189 190 /* Work around errata */ 191 Intel_errata_workarounds(c); 192 193 #ifdef CONFIG_X86_INTEL_USERCOPY 194 /* 195 * Set up the preferred alignment for movsl bulk memory moves 196 */ 197 switch (c->x86) { 198 case 4: /* 486: untested */ 199 break; 200 case 5: /* Old Pentia: untested */ 201 break; 202 case 6: /* PII/PIII only like movsl with 8-byte alignment */ 203 movsl_mask.mask = 7; 204 break; 205 case 15: /* P4 is OK down to 8-byte alignment */ 206 movsl_mask.mask = 7; 207 break; 208 } 209 #endif 210 211 if (cpu_has_xmm2) 212 set_cpu_cap(c, X86_FEATURE_LFENCE_RDTSC); 213 if (c->x86 == 15) { 214 set_cpu_cap(c, X86_FEATURE_P4); 215 } 216 if (c->x86 == 6) 217 set_cpu_cap(c, X86_FEATURE_P3); 218 if (cpu_has_ds) { 219 unsigned int l1; 220 rdmsr(MSR_IA32_MISC_ENABLE, l1, l2); 221 if (!(l1 & (1<<11))) 222 set_cpu_cap(c, X86_FEATURE_BTS); 223 if (!(l1 & (1<<12))) 224 set_cpu_cap(c, X86_FEATURE_PEBS); 225 ds_init_intel(c); 226 } 227 228 if (cpu_has_bts) 229 ptrace_bts_init_intel(c); 230 231 /* 232 * See if we have a good local APIC by checking for buggy Pentia, 233 * i.e. all B steppings and the C2 stepping of P54C when using their 234 * integrated APIC (see 11AP erratum in "Pentium Processor 235 * Specification Update"). 236 */ 237 if (cpu_has_apic && (c->x86<<8 | c->x86_model<<4) == 0x520 && 238 (c->x86_mask < 0x6 || c->x86_mask == 0xb)) 239 set_cpu_cap(c, X86_FEATURE_11AP); 240 241 #ifdef CONFIG_X86_NUMAQ 242 numaq_tsc_disable(); 243 #endif 244 } 245 246 static unsigned int __cpuinit intel_size_cache(struct cpuinfo_x86 *c, unsigned int size) 247 { 248 /* 249 * Intel PIII Tualatin. This comes in two flavours. 250 * One has 256kb of cache, the other 512. We have no way 251 * to determine which, so we use a boottime override 252 * for the 512kb model, and assume 256 otherwise. 253 */ 254 if ((c->x86 == 6) && (c->x86_model == 11) && (size == 0)) 255 size = 256; 256 return size; 257 } 258 259 static struct cpu_dev intel_cpu_dev __cpuinitdata = { 260 .c_vendor = "Intel", 261 .c_ident = { "GenuineIntel" }, 262 .c_models = { 263 { .vendor = X86_VENDOR_INTEL, .family = 4, .model_names = 264 { 265 [0] = "486 DX-25/33", 266 [1] = "486 DX-50", 267 [2] = "486 SX", 268 [3] = "486 DX/2", 269 [4] = "486 SL", 270 [5] = "486 SX/2", 271 [7] = "486 DX/2-WB", 272 [8] = "486 DX/4", 273 [9] = "486 DX/4-WB" 274 } 275 }, 276 { .vendor = X86_VENDOR_INTEL, .family = 5, .model_names = 277 { 278 [0] = "Pentium 60/66 A-step", 279 [1] = "Pentium 60/66", 280 [2] = "Pentium 75 - 200", 281 [3] = "OverDrive PODP5V83", 282 [4] = "Pentium MMX", 283 [7] = "Mobile Pentium 75 - 200", 284 [8] = "Mobile Pentium MMX" 285 } 286 }, 287 { .vendor = X86_VENDOR_INTEL, .family = 6, .model_names = 288 { 289 [0] = "Pentium Pro A-step", 290 [1] = "Pentium Pro", 291 [3] = "Pentium II (Klamath)", 292 [4] = "Pentium II (Deschutes)", 293 [5] = "Pentium II (Deschutes)", 294 [6] = "Mobile Pentium II", 295 [7] = "Pentium III (Katmai)", 296 [8] = "Pentium III (Coppermine)", 297 [10] = "Pentium III (Cascades)", 298 [11] = "Pentium III (Tualatin)", 299 } 300 }, 301 { .vendor = X86_VENDOR_INTEL, .family = 15, .model_names = 302 { 303 [0] = "Pentium 4 (Unknown)", 304 [1] = "Pentium 4 (Willamette)", 305 [2] = "Pentium 4 (Northwood)", 306 [4] = "Pentium 4 (Foster)", 307 [5] = "Pentium 4 (Foster)", 308 } 309 }, 310 }, 311 .c_early_init = early_init_intel, 312 .c_init = init_intel, 313 .c_size_cache = intel_size_cache, 314 }; 315 316 cpu_vendor_dev_register(X86_VENDOR_INTEL, &intel_cpu_dev); 317 318 #ifndef CONFIG_X86_CMPXCHG 319 unsigned long cmpxchg_386_u8(volatile void *ptr, u8 old, u8 new) 320 { 321 u8 prev; 322 unsigned long flags; 323 324 /* Poor man's cmpxchg for 386. Unsuitable for SMP */ 325 local_irq_save(flags); 326 prev = *(u8 *)ptr; 327 if (prev == old) 328 *(u8 *)ptr = new; 329 local_irq_restore(flags); 330 return prev; 331 } 332 EXPORT_SYMBOL(cmpxchg_386_u8); 333 334 unsigned long cmpxchg_386_u16(volatile void *ptr, u16 old, u16 new) 335 { 336 u16 prev; 337 unsigned long flags; 338 339 /* Poor man's cmpxchg for 386. Unsuitable for SMP */ 340 local_irq_save(flags); 341 prev = *(u16 *)ptr; 342 if (prev == old) 343 *(u16 *)ptr = new; 344 local_irq_restore(flags); 345 return prev; 346 } 347 EXPORT_SYMBOL(cmpxchg_386_u16); 348 349 unsigned long cmpxchg_386_u32(volatile void *ptr, u32 old, u32 new) 350 { 351 u32 prev; 352 unsigned long flags; 353 354 /* Poor man's cmpxchg for 386. Unsuitable for SMP */ 355 local_irq_save(flags); 356 prev = *(u32 *)ptr; 357 if (prev == old) 358 *(u32 *)ptr = new; 359 local_irq_restore(flags); 360 return prev; 361 } 362 EXPORT_SYMBOL(cmpxchg_386_u32); 363 #endif 364 365 #ifndef CONFIG_X86_CMPXCHG64 366 unsigned long long cmpxchg_486_u64(volatile void *ptr, u64 old, u64 new) 367 { 368 u64 prev; 369 unsigned long flags; 370 371 /* Poor man's cmpxchg8b for 386 and 486. Unsuitable for SMP */ 372 local_irq_save(flags); 373 prev = *(u64 *)ptr; 374 if (prev == old) 375 *(u64 *)ptr = new; 376 local_irq_restore(flags); 377 return prev; 378 } 379 EXPORT_SYMBOL(cmpxchg_486_u64); 380 #endif 381 382 /* arch_initcall(intel_cpu_init); */ 383 384