x86: KVM guest: paravirtualized clocksource
[safe/jmp/linux-2.6] / arch / x86 / kernel / setup_64.c
1 /*
2  *  Copyright (C) 1995  Linus Torvalds
3  */
4
5 /*
6  * This file handles the architecture-dependent parts of initialization
7  */
8
9 #include <linux/errno.h>
10 #include <linux/sched.h>
11 #include <linux/kernel.h>
12 #include <linux/mm.h>
13 #include <linux/stddef.h>
14 #include <linux/unistd.h>
15 #include <linux/ptrace.h>
16 #include <linux/slab.h>
17 #include <linux/user.h>
18 #include <linux/screen_info.h>
19 #include <linux/ioport.h>
20 #include <linux/delay.h>
21 #include <linux/init.h>
22 #include <linux/initrd.h>
23 #include <linux/highmem.h>
24 #include <linux/bootmem.h>
25 #include <linux/module.h>
26 #include <asm/processor.h>
27 #include <linux/console.h>
28 #include <linux/seq_file.h>
29 #include <linux/crash_dump.h>
30 #include <linux/root_dev.h>
31 #include <linux/pci.h>
32 #include <linux/efi.h>
33 #include <linux/acpi.h>
34 #include <linux/kallsyms.h>
35 #include <linux/edd.h>
36 #include <linux/iscsi_ibft.h>
37 #include <linux/mmzone.h>
38 #include <linux/kexec.h>
39 #include <linux/cpufreq.h>
40 #include <linux/dmi.h>
41 #include <linux/dma-mapping.h>
42 #include <linux/ctype.h>
43 #include <linux/uaccess.h>
44 #include <linux/init_ohci1394_dma.h>
45 #include <linux/kvm_para.h>
46
47 #include <asm/mtrr.h>
48 #include <asm/uaccess.h>
49 #include <asm/system.h>
50 #include <asm/vsyscall.h>
51 #include <asm/io.h>
52 #include <asm/smp.h>
53 #include <asm/msr.h>
54 #include <asm/desc.h>
55 #include <video/edid.h>
56 #include <asm/e820.h>
57 #include <asm/dma.h>
58 #include <asm/gart.h>
59 #include <asm/mpspec.h>
60 #include <asm/mmu_context.h>
61 #include <asm/proto.h>
62 #include <asm/setup.h>
63 #include <asm/numa.h>
64 #include <asm/sections.h>
65 #include <asm/dmi.h>
66 #include <asm/cacheflush.h>
67 #include <asm/mce.h>
68 #include <asm/ds.h>
69 #include <asm/topology.h>
70 #include <asm/trampoline.h>
71
72 #include <mach_apic.h>
73 #ifdef CONFIG_PARAVIRT
74 #include <asm/paravirt.h>
75 #else
76 #define ARCH_SETUP
77 #endif
78
79 /*
80  * Machine setup..
81  */
82
83 struct cpuinfo_x86 boot_cpu_data __read_mostly;
84 EXPORT_SYMBOL(boot_cpu_data);
85
86 __u32 cleared_cpu_caps[NCAPINTS] __cpuinitdata;
87
88 unsigned long mmu_cr4_features;
89
90 /* Boot loader ID as an integer, for the benefit of proc_dointvec */
91 int bootloader_type;
92
93 unsigned long saved_video_mode;
94
95 int force_mwait __cpuinitdata;
96
97 /*
98  * Early DMI memory
99  */
100 int dmi_alloc_index;
101 char dmi_alloc_data[DMI_MAX_DATA];
102
103 /*
104  * Setup options
105  */
106 struct screen_info screen_info;
107 EXPORT_SYMBOL(screen_info);
108 struct sys_desc_table_struct {
109         unsigned short length;
110         unsigned char table[0];
111 };
112
113 struct edid_info edid_info;
114 EXPORT_SYMBOL_GPL(edid_info);
115
116 extern int root_mountflags;
117
118 char __initdata command_line[COMMAND_LINE_SIZE];
119
120 static struct resource standard_io_resources[] = {
121         { .name = "dma1", .start = 0x00, .end = 0x1f,
122                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
123         { .name = "pic1", .start = 0x20, .end = 0x21,
124                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
125         { .name = "timer0", .start = 0x40, .end = 0x43,
126                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
127         { .name = "timer1", .start = 0x50, .end = 0x53,
128                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
129         { .name = "keyboard", .start = 0x60, .end = 0x6f,
130                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
131         { .name = "dma page reg", .start = 0x80, .end = 0x8f,
132                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
133         { .name = "pic2", .start = 0xa0, .end = 0xa1,
134                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
135         { .name = "dma2", .start = 0xc0, .end = 0xdf,
136                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
137         { .name = "fpu", .start = 0xf0, .end = 0xff,
138                 .flags = IORESOURCE_BUSY | IORESOURCE_IO }
139 };
140
141 #define IORESOURCE_RAM (IORESOURCE_BUSY | IORESOURCE_MEM)
142
143 static struct resource data_resource = {
144         .name = "Kernel data",
145         .start = 0,
146         .end = 0,
147         .flags = IORESOURCE_RAM,
148 };
149 static struct resource code_resource = {
150         .name = "Kernel code",
151         .start = 0,
152         .end = 0,
153         .flags = IORESOURCE_RAM,
154 };
155 static struct resource bss_resource = {
156         .name = "Kernel bss",
157         .start = 0,
158         .end = 0,
159         .flags = IORESOURCE_RAM,
160 };
161
162 static void __cpuinit early_identify_cpu(struct cpuinfo_x86 *c);
163
164 #ifdef CONFIG_PROC_VMCORE
165 /* elfcorehdr= specifies the location of elf core header
166  * stored by the crashed kernel. This option will be passed
167  * by kexec loader to the capture kernel.
168  */
169 static int __init setup_elfcorehdr(char *arg)
170 {
171         char *end;
172         if (!arg)
173                 return -EINVAL;
174         elfcorehdr_addr = memparse(arg, &end);
175         return end > arg ? 0 : -EINVAL;
176 }
177 early_param("elfcorehdr", setup_elfcorehdr);
178 #endif
179
180 #ifndef CONFIG_NUMA
181 static void __init
182 contig_initmem_init(unsigned long start_pfn, unsigned long end_pfn)
183 {
184         unsigned long bootmap_size, bootmap;
185
186         bootmap_size = bootmem_bootmap_pages(end_pfn)<<PAGE_SHIFT;
187         bootmap = find_e820_area(0, end_pfn<<PAGE_SHIFT, bootmap_size,
188                                  PAGE_SIZE);
189         if (bootmap == -1L)
190                 panic("Cannot find bootmem map of size %ld\n", bootmap_size);
191         bootmap_size = init_bootmem(bootmap >> PAGE_SHIFT, end_pfn);
192         e820_register_active_regions(0, start_pfn, end_pfn);
193         free_bootmem_with_active_regions(0, end_pfn);
194         early_res_to_bootmem(0, end_pfn<<PAGE_SHIFT);
195         reserve_bootmem(bootmap, bootmap_size, BOOTMEM_DEFAULT);
196 }
197 #endif
198
199 #if defined(CONFIG_EDD) || defined(CONFIG_EDD_MODULE)
200 struct edd edd;
201 #ifdef CONFIG_EDD_MODULE
202 EXPORT_SYMBOL(edd);
203 #endif
204 /**
205  * copy_edd() - Copy the BIOS EDD information
206  *              from boot_params into a safe place.
207  *
208  */
209 static inline void copy_edd(void)
210 {
211      memcpy(edd.mbr_signature, boot_params.edd_mbr_sig_buffer,
212             sizeof(edd.mbr_signature));
213      memcpy(edd.edd_info, boot_params.eddbuf, sizeof(edd.edd_info));
214      edd.mbr_signature_nr = boot_params.edd_mbr_sig_buf_entries;
215      edd.edd_info_nr = boot_params.eddbuf_entries;
216 }
217 #else
218 static inline void copy_edd(void)
219 {
220 }
221 #endif
222
223 #ifdef CONFIG_KEXEC
224 static void __init reserve_crashkernel(void)
225 {
226         unsigned long long total_mem;
227         unsigned long long crash_size, crash_base;
228         int ret;
229
230         total_mem = ((unsigned long long)max_low_pfn - min_low_pfn) << PAGE_SHIFT;
231
232         ret = parse_crashkernel(boot_command_line, total_mem,
233                         &crash_size, &crash_base);
234         if (ret == 0 && crash_size) {
235                 if (crash_base <= 0) {
236                         printk(KERN_INFO "crashkernel reservation failed - "
237                                         "you have to specify a base address\n");
238                         return;
239                 }
240
241                 if (reserve_bootmem(crash_base, crash_size,
242                                         BOOTMEM_EXCLUSIVE) < 0) {
243                         printk(KERN_INFO "crashkernel reservation failed - "
244                                         "memory is in use\n");
245                         return;
246                 }
247
248                 printk(KERN_INFO "Reserving %ldMB of memory at %ldMB "
249                                 "for crashkernel (System RAM: %ldMB)\n",
250                                 (unsigned long)(crash_size >> 20),
251                                 (unsigned long)(crash_base >> 20),
252                                 (unsigned long)(total_mem >> 20));
253                 crashk_res.start = crash_base;
254                 crashk_res.end   = crash_base + crash_size - 1;
255                 insert_resource(&iomem_resource, &crashk_res);
256         }
257 }
258 #else
259 static inline void __init reserve_crashkernel(void)
260 {}
261 #endif
262
263 /* Overridden in paravirt.c if CONFIG_PARAVIRT */
264 void __attribute__((weak)) __init memory_setup(void)
265 {
266        machine_specific_memory_setup();
267 }
268
269 static void __init parse_setup_data(void)
270 {
271         struct setup_data *data;
272         unsigned long pa_data;
273
274         if (boot_params.hdr.version < 0x0209)
275                 return;
276         pa_data = boot_params.hdr.setup_data;
277         while (pa_data) {
278                 data = early_ioremap(pa_data, PAGE_SIZE);
279                 switch (data->type) {
280                 default:
281                         break;
282                 }
283 #ifndef CONFIG_DEBUG_BOOT_PARAMS
284                 free_early(pa_data, pa_data+sizeof(*data)+data->len);
285 #endif
286                 pa_data = data->next;
287                 early_iounmap(data, PAGE_SIZE);
288         }
289 }
290
291 /*
292  * setup_arch - architecture-specific boot-time initializations
293  *
294  * Note: On x86_64, fixmaps are ready for use even before this is called.
295  */
296 void __init setup_arch(char **cmdline_p)
297 {
298         unsigned i;
299
300         printk(KERN_INFO "Command line: %s\n", boot_command_line);
301
302         ROOT_DEV = old_decode_dev(boot_params.hdr.root_dev);
303         screen_info = boot_params.screen_info;
304         edid_info = boot_params.edid_info;
305         saved_video_mode = boot_params.hdr.vid_mode;
306         bootloader_type = boot_params.hdr.type_of_loader;
307
308 #ifdef CONFIG_BLK_DEV_RAM
309         rd_image_start = boot_params.hdr.ram_size & RAMDISK_IMAGE_START_MASK;
310         rd_prompt = ((boot_params.hdr.ram_size & RAMDISK_PROMPT_FLAG) != 0);
311         rd_doload = ((boot_params.hdr.ram_size & RAMDISK_LOAD_FLAG) != 0);
312 #endif
313 #ifdef CONFIG_EFI
314         if (!strncmp((char *)&boot_params.efi_info.efi_loader_signature,
315                      "EL64", 4))
316                 efi_enabled = 1;
317 #endif
318
319         ARCH_SETUP
320
321         memory_setup();
322         copy_edd();
323
324         if (!boot_params.hdr.root_flags)
325                 root_mountflags &= ~MS_RDONLY;
326         init_mm.start_code = (unsigned long) &_text;
327         init_mm.end_code = (unsigned long) &_etext;
328         init_mm.end_data = (unsigned long) &_edata;
329         init_mm.brk = (unsigned long) &_end;
330
331         code_resource.start = virt_to_phys(&_text);
332         code_resource.end = virt_to_phys(&_etext)-1;
333         data_resource.start = virt_to_phys(&_etext);
334         data_resource.end = virt_to_phys(&_edata)-1;
335         bss_resource.start = virt_to_phys(&__bss_start);
336         bss_resource.end = virt_to_phys(&__bss_stop)-1;
337
338         early_identify_cpu(&boot_cpu_data);
339
340         strlcpy(command_line, boot_command_line, COMMAND_LINE_SIZE);
341         *cmdline_p = command_line;
342
343         parse_setup_data();
344
345         parse_early_param();
346
347 #ifdef CONFIG_PROVIDE_OHCI1394_DMA_INIT
348         if (init_ohci1394_dma_early)
349                 init_ohci1394_dma_on_all_controllers();
350 #endif
351
352         finish_e820_parsing();
353
354         /* after parse_early_param, so could debug it */
355         insert_resource(&iomem_resource, &code_resource);
356         insert_resource(&iomem_resource, &data_resource);
357         insert_resource(&iomem_resource, &bss_resource);
358
359         early_gart_iommu_check();
360
361         e820_register_active_regions(0, 0, -1UL);
362         /*
363          * partially used pages are not usable - thus
364          * we are rounding upwards:
365          */
366         end_pfn = e820_end_of_ram();
367         /* update e820 for memory not covered by WB MTRRs */
368         mtrr_bp_init();
369         if (mtrr_trim_uncached_memory(end_pfn)) {
370                 e820_register_active_regions(0, 0, -1UL);
371                 end_pfn = e820_end_of_ram();
372         }
373
374         num_physpages = end_pfn;
375
376         check_efer();
377
378         max_pfn_mapped = init_memory_mapping(0, (max_pfn_mapped << PAGE_SHIFT));
379         if (efi_enabled)
380                 efi_init();
381
382         vsmp_init();
383
384         dmi_scan_machine();
385
386         io_delay_init();
387
388 #ifdef CONFIG_KVM_CLOCK
389         kvmclock_init();
390 #endif
391
392 #ifdef CONFIG_SMP
393         /* setup to use the early static init tables during kernel startup */
394         x86_cpu_to_apicid_early_ptr = (void *)x86_cpu_to_apicid_init;
395         x86_bios_cpu_apicid_early_ptr = (void *)x86_bios_cpu_apicid_init;
396 #ifdef CONFIG_NUMA
397         x86_cpu_to_node_map_early_ptr = (void *)x86_cpu_to_node_map_init;
398 #endif
399 #endif
400
401 #ifdef CONFIG_ACPI
402         /*
403          * Initialize the ACPI boot-time table parser (gets the RSDP and SDT).
404          * Call this early for SRAT node setup.
405          */
406         acpi_boot_table_init();
407 #endif
408
409         /* How many end-of-memory variables you have, grandma! */
410         max_low_pfn = end_pfn;
411         max_pfn = end_pfn;
412         high_memory = (void *)__va(end_pfn * PAGE_SIZE - 1) + 1;
413
414         /* Remove active ranges so rediscovery with NUMA-awareness happens */
415         remove_all_active_ranges();
416
417 #ifdef CONFIG_ACPI_NUMA
418         /*
419          * Parse SRAT to discover nodes.
420          */
421         acpi_numa_init();
422 #endif
423
424 #ifdef CONFIG_NUMA
425         numa_initmem_init(0, end_pfn);
426 #else
427         contig_initmem_init(0, end_pfn);
428 #endif
429
430         dma32_reserve_bootmem();
431
432 #ifdef CONFIG_ACPI_SLEEP
433         /*
434          * Reserve low memory region for sleep support.
435          */
436        acpi_reserve_bootmem();
437 #endif
438
439         if (efi_enabled)
440                 efi_reserve_bootmem();
441
442        /*
443         * Find and reserve possible boot-time SMP configuration:
444         */
445         find_smp_config();
446 #ifdef CONFIG_BLK_DEV_INITRD
447         if (boot_params.hdr.type_of_loader && boot_params.hdr.ramdisk_image) {
448                 unsigned long ramdisk_image = boot_params.hdr.ramdisk_image;
449                 unsigned long ramdisk_size  = boot_params.hdr.ramdisk_size;
450                 unsigned long ramdisk_end   = ramdisk_image + ramdisk_size;
451                 unsigned long end_of_mem    = end_pfn << PAGE_SHIFT;
452
453                 if (ramdisk_end <= end_of_mem) {
454                         /*
455                          * don't need to reserve again, already reserved early
456                          * in x86_64_start_kernel, and early_res_to_bootmem
457                          * convert that to reserved in bootmem
458                          */
459                         initrd_start = ramdisk_image + PAGE_OFFSET;
460                         initrd_end = initrd_start+ramdisk_size;
461                 } else {
462                         free_bootmem(ramdisk_image, ramdisk_size);
463                         printk(KERN_ERR "initrd extends beyond end of memory "
464                                "(0x%08lx > 0x%08lx)\ndisabling initrd\n",
465                                ramdisk_end, end_of_mem);
466                         initrd_start = 0;
467                 }
468         }
469 #endif
470         reserve_crashkernel();
471
472         reserve_ibft_region();
473
474         paging_init();
475         map_vsyscall();
476
477         early_quirks();
478
479 #ifdef CONFIG_ACPI
480         /*
481          * Read APIC and some other early information from ACPI tables.
482          */
483         acpi_boot_init();
484 #endif
485
486         init_cpu_to_node();
487
488         /*
489          * get boot-time SMP configuration:
490          */
491         if (smp_found_config)
492                 get_smp_config();
493         init_apic_mappings();
494         ioapic_init_mappings();
495
496         /*
497          * We trust e820 completely. No explicit ROM probing in memory.
498          */
499         e820_reserve_resources();
500         e820_mark_nosave_regions();
501
502         /* request I/O space for devices used on all i[345]86 PCs */
503         for (i = 0; i < ARRAY_SIZE(standard_io_resources); i++)
504                 request_resource(&ioport_resource, &standard_io_resources[i]);
505
506         e820_setup_gap();
507
508 #ifdef CONFIG_VT
509 #if defined(CONFIG_VGA_CONSOLE)
510         if (!efi_enabled || (efi_mem_type(0xa0000) != EFI_CONVENTIONAL_MEMORY))
511                 conswitchp = &vga_con;
512 #elif defined(CONFIG_DUMMY_CONSOLE)
513         conswitchp = &dummy_con;
514 #endif
515 #endif
516 }
517
518 static int __cpuinit get_model_name(struct cpuinfo_x86 *c)
519 {
520         unsigned int *v;
521
522         if (c->extended_cpuid_level < 0x80000004)
523                 return 0;
524
525         v = (unsigned int *) c->x86_model_id;
526         cpuid(0x80000002, &v[0], &v[1], &v[2], &v[3]);
527         cpuid(0x80000003, &v[4], &v[5], &v[6], &v[7]);
528         cpuid(0x80000004, &v[8], &v[9], &v[10], &v[11]);
529         c->x86_model_id[48] = 0;
530         return 1;
531 }
532
533
534 static void __cpuinit display_cacheinfo(struct cpuinfo_x86 *c)
535 {
536         unsigned int n, dummy, eax, ebx, ecx, edx;
537
538         n = c->extended_cpuid_level;
539
540         if (n >= 0x80000005) {
541                 cpuid(0x80000005, &dummy, &ebx, &ecx, &edx);
542                 printk(KERN_INFO "CPU: L1 I Cache: %dK (%d bytes/line), "
543                        "D cache %dK (%d bytes/line)\n",
544                        edx>>24, edx&0xFF, ecx>>24, ecx&0xFF);
545                 c->x86_cache_size = (ecx>>24) + (edx>>24);
546                 /* On K8 L1 TLB is inclusive, so don't count it */
547                 c->x86_tlbsize = 0;
548         }
549
550         if (n >= 0x80000006) {
551                 cpuid(0x80000006, &dummy, &ebx, &ecx, &edx);
552                 ecx = cpuid_ecx(0x80000006);
553                 c->x86_cache_size = ecx >> 16;
554                 c->x86_tlbsize += ((ebx >> 16) & 0xfff) + (ebx & 0xfff);
555
556                 printk(KERN_INFO "CPU: L2 Cache: %dK (%d bytes/line)\n",
557                 c->x86_cache_size, ecx & 0xFF);
558         }
559         if (n >= 0x80000008) {
560                 cpuid(0x80000008, &eax, &dummy, &dummy, &dummy);
561                 c->x86_virt_bits = (eax >> 8) & 0xff;
562                 c->x86_phys_bits = eax & 0xff;
563         }
564 }
565
566 #ifdef CONFIG_NUMA
567 static int __cpuinit nearby_node(int apicid)
568 {
569         int i, node;
570
571         for (i = apicid - 1; i >= 0; i--) {
572                 node = apicid_to_node[i];
573                 if (node != NUMA_NO_NODE && node_online(node))
574                         return node;
575         }
576         for (i = apicid + 1; i < MAX_LOCAL_APIC; i++) {
577                 node = apicid_to_node[i];
578                 if (node != NUMA_NO_NODE && node_online(node))
579                         return node;
580         }
581         return first_node(node_online_map); /* Shouldn't happen */
582 }
583 #endif
584
585 /*
586  * On a AMD dual core setup the lower bits of the APIC id distingush the cores.
587  * Assumes number of cores is a power of two.
588  */
589 static void __cpuinit amd_detect_cmp(struct cpuinfo_x86 *c)
590 {
591 #ifdef CONFIG_SMP
592         unsigned bits;
593 #ifdef CONFIG_NUMA
594         int cpu = smp_processor_id();
595         int node = 0;
596         unsigned apicid = hard_smp_processor_id();
597 #endif
598         bits = c->x86_coreid_bits;
599
600         /* Low order bits define the core id (index of core in socket) */
601         c->cpu_core_id = c->initial_apicid & ((1 << bits)-1);
602         /* Convert the initial APIC ID into the socket ID */
603         c->phys_proc_id = c->initial_apicid >> bits;
604
605 #ifdef CONFIG_NUMA
606         node = c->phys_proc_id;
607         if (apicid_to_node[apicid] != NUMA_NO_NODE)
608                 node = apicid_to_node[apicid];
609         if (!node_online(node)) {
610                 /* Two possibilities here:
611                    - The CPU is missing memory and no node was created.
612                    In that case try picking one from a nearby CPU
613                    - The APIC IDs differ from the HyperTransport node IDs
614                    which the K8 northbridge parsing fills in.
615                    Assume they are all increased by a constant offset,
616                    but in the same order as the HT nodeids.
617                    If that doesn't result in a usable node fall back to the
618                    path for the previous case.  */
619
620                 int ht_nodeid = c->initial_apicid;
621
622                 if (ht_nodeid >= 0 &&
623                     apicid_to_node[ht_nodeid] != NUMA_NO_NODE)
624                         node = apicid_to_node[ht_nodeid];
625                 /* Pick a nearby node */
626                 if (!node_online(node))
627                         node = nearby_node(apicid);
628         }
629         numa_set_node(cpu, node);
630
631         printk(KERN_INFO "CPU %d/%x -> Node %d\n", cpu, apicid, node);
632 #endif
633 #endif
634 }
635
636 static void __cpuinit early_init_amd_mc(struct cpuinfo_x86 *c)
637 {
638 #ifdef CONFIG_SMP
639         unsigned bits, ecx;
640
641         /* Multi core CPU? */
642         if (c->extended_cpuid_level < 0x80000008)
643                 return;
644
645         ecx = cpuid_ecx(0x80000008);
646
647         c->x86_max_cores = (ecx & 0xff) + 1;
648
649         /* CPU telling us the core id bits shift? */
650         bits = (ecx >> 12) & 0xF;
651
652         /* Otherwise recompute */
653         if (bits == 0) {
654                 while ((1 << bits) < c->x86_max_cores)
655                         bits++;
656         }
657
658         c->x86_coreid_bits = bits;
659
660 #endif
661 }
662
663 #define ENABLE_C1E_MASK         0x18000000
664 #define CPUID_PROCESSOR_SIGNATURE       1
665 #define CPUID_XFAM              0x0ff00000
666 #define CPUID_XFAM_K8           0x00000000
667 #define CPUID_XFAM_10H          0x00100000
668 #define CPUID_XFAM_11H          0x00200000
669 #define CPUID_XMOD              0x000f0000
670 #define CPUID_XMOD_REV_F        0x00040000
671
672 /* AMD systems with C1E don't have a working lAPIC timer. Check for that. */
673 static __cpuinit int amd_apic_timer_broken(void)
674 {
675         u32 lo, hi, eax = cpuid_eax(CPUID_PROCESSOR_SIGNATURE);
676
677         switch (eax & CPUID_XFAM) {
678         case CPUID_XFAM_K8:
679                 if ((eax & CPUID_XMOD) < CPUID_XMOD_REV_F)
680                         break;
681         case CPUID_XFAM_10H:
682         case CPUID_XFAM_11H:
683                 rdmsr(MSR_K8_ENABLE_C1E, lo, hi);
684                 if (lo & ENABLE_C1E_MASK)
685                         return 1;
686                 break;
687         default:
688                 /* err on the side of caution */
689                 return 1;
690         }
691         return 0;
692 }
693
694 static void __cpuinit early_init_amd(struct cpuinfo_x86 *c)
695 {
696         early_init_amd_mc(c);
697
698         /* c->x86_power is 8000_0007 edx. Bit 8 is constant TSC */
699         if (c->x86_power & (1<<8))
700                 set_cpu_cap(c, X86_FEATURE_CONSTANT_TSC);
701 }
702
703 static void __cpuinit init_amd(struct cpuinfo_x86 *c)
704 {
705         unsigned level;
706
707 #ifdef CONFIG_SMP
708         unsigned long value;
709
710         /*
711          * Disable TLB flush filter by setting HWCR.FFDIS on K8
712          * bit 6 of msr C001_0015
713          *
714          * Errata 63 for SH-B3 steppings
715          * Errata 122 for all steppings (F+ have it disabled by default)
716          */
717         if (c->x86 == 15) {
718                 rdmsrl(MSR_K8_HWCR, value);
719                 value |= 1 << 6;
720                 wrmsrl(MSR_K8_HWCR, value);
721         }
722 #endif
723
724         /* Bit 31 in normal CPUID used for nonstandard 3DNow ID;
725            3DNow is IDd by bit 31 in extended CPUID (1*32+31) anyway */
726         clear_cpu_cap(c, 0*32+31);
727
728         /* On C+ stepping K8 rep microcode works well for copy/memset */
729         level = cpuid_eax(1);
730         if (c->x86 == 15 && ((level >= 0x0f48 && level < 0x0f50) ||
731                              level >= 0x0f58))
732                 set_cpu_cap(c, X86_FEATURE_REP_GOOD);
733         if (c->x86 == 0x10 || c->x86 == 0x11)
734                 set_cpu_cap(c, X86_FEATURE_REP_GOOD);
735
736         /* Enable workaround for FXSAVE leak */
737         if (c->x86 >= 6)
738                 set_cpu_cap(c, X86_FEATURE_FXSAVE_LEAK);
739
740         level = get_model_name(c);
741         if (!level) {
742                 switch (c->x86) {
743                 case 15:
744                         /* Should distinguish Models here, but this is only
745                            a fallback anyways. */
746                         strcpy(c->x86_model_id, "Hammer");
747                         break;
748                 }
749         }
750         display_cacheinfo(c);
751
752         /* Multi core CPU? */
753         if (c->extended_cpuid_level >= 0x80000008)
754                 amd_detect_cmp(c);
755
756         if (c->extended_cpuid_level >= 0x80000006 &&
757                 (cpuid_edx(0x80000006) & 0xf000))
758                 num_cache_leaves = 4;
759         else
760                 num_cache_leaves = 3;
761
762         if (c->x86 == 0xf || c->x86 == 0x10 || c->x86 == 0x11)
763                 set_cpu_cap(c, X86_FEATURE_K8);
764
765         /* MFENCE stops RDTSC speculation */
766         set_cpu_cap(c, X86_FEATURE_MFENCE_RDTSC);
767
768         if (amd_apic_timer_broken())
769                 disable_apic_timer = 1;
770
771         if (c == &boot_cpu_data && c->x86 >= 0xf && c->x86 <= 0x11) {
772                 unsigned long long tseg;
773
774                 /*
775                  * Split up direct mapping around the TSEG SMM area.
776                  * Don't do it for gbpages because there seems very little
777                  * benefit in doing so.
778                  */
779                 if (!rdmsrl_safe(MSR_K8_TSEG_ADDR, &tseg) &&
780                 (tseg >> PMD_SHIFT) < (max_pfn_mapped >> (PMD_SHIFT-PAGE_SHIFT)))
781                         set_memory_4k((unsigned long)__va(tseg), 1);
782         }
783 }
784
785 void __cpuinit detect_ht(struct cpuinfo_x86 *c)
786 {
787 #ifdef CONFIG_SMP
788         u32 eax, ebx, ecx, edx;
789         int index_msb, core_bits;
790
791         cpuid(1, &eax, &ebx, &ecx, &edx);
792
793
794         if (!cpu_has(c, X86_FEATURE_HT))
795                 return;
796         if (cpu_has(c, X86_FEATURE_CMP_LEGACY))
797                 goto out;
798
799         smp_num_siblings = (ebx & 0xff0000) >> 16;
800
801         if (smp_num_siblings == 1) {
802                 printk(KERN_INFO  "CPU: Hyper-Threading is disabled\n");
803         } else if (smp_num_siblings > 1) {
804
805                 if (smp_num_siblings > NR_CPUS) {
806                         printk(KERN_WARNING "CPU: Unsupported number of "
807                                "siblings %d", smp_num_siblings);
808                         smp_num_siblings = 1;
809                         return;
810                 }
811
812                 index_msb = get_count_order(smp_num_siblings);
813                 c->phys_proc_id = phys_pkg_id(index_msb);
814
815                 smp_num_siblings = smp_num_siblings / c->x86_max_cores;
816
817                 index_msb = get_count_order(smp_num_siblings);
818
819                 core_bits = get_count_order(c->x86_max_cores);
820
821                 c->cpu_core_id = phys_pkg_id(index_msb) &
822                                                ((1 << core_bits) - 1);
823         }
824 out:
825         if ((c->x86_max_cores * smp_num_siblings) > 1) {
826                 printk(KERN_INFO  "CPU: Physical Processor ID: %d\n",
827                        c->phys_proc_id);
828                 printk(KERN_INFO  "CPU: Processor Core ID: %d\n",
829                        c->cpu_core_id);
830         }
831
832 #endif
833 }
834
835 /*
836  * find out the number of processor cores on the die
837  */
838 static int __cpuinit intel_num_cpu_cores(struct cpuinfo_x86 *c)
839 {
840         unsigned int eax, t;
841
842         if (c->cpuid_level < 4)
843                 return 1;
844
845         cpuid_count(4, 0, &eax, &t, &t, &t);
846
847         if (eax & 0x1f)
848                 return ((eax >> 26) + 1);
849         else
850                 return 1;
851 }
852
853 static void __cpuinit srat_detect_node(void)
854 {
855 #ifdef CONFIG_NUMA
856         unsigned node;
857         int cpu = smp_processor_id();
858         int apicid = hard_smp_processor_id();
859
860         /* Don't do the funky fallback heuristics the AMD version employs
861            for now. */
862         node = apicid_to_node[apicid];
863         if (node == NUMA_NO_NODE || !node_online(node))
864                 node = first_node(node_online_map);
865         numa_set_node(cpu, node);
866
867         printk(KERN_INFO "CPU %d/%x -> Node %d\n", cpu, apicid, node);
868 #endif
869 }
870
871 static void __cpuinit early_init_intel(struct cpuinfo_x86 *c)
872 {
873         if ((c->x86 == 0xf && c->x86_model >= 0x03) ||
874             (c->x86 == 0x6 && c->x86_model >= 0x0e))
875                 set_cpu_cap(c, X86_FEATURE_CONSTANT_TSC);
876 }
877
878 static void __cpuinit init_intel(struct cpuinfo_x86 *c)
879 {
880         /* Cache sizes */
881         unsigned n;
882
883         init_intel_cacheinfo(c);
884         if (c->cpuid_level > 9) {
885                 unsigned eax = cpuid_eax(10);
886                 /* Check for version and the number of counters */
887                 if ((eax & 0xff) && (((eax>>8) & 0xff) > 1))
888                         set_cpu_cap(c, X86_FEATURE_ARCH_PERFMON);
889         }
890
891         if (cpu_has_ds) {
892                 unsigned int l1, l2;
893                 rdmsr(MSR_IA32_MISC_ENABLE, l1, l2);
894                 if (!(l1 & (1<<11)))
895                         set_cpu_cap(c, X86_FEATURE_BTS);
896                 if (!(l1 & (1<<12)))
897                         set_cpu_cap(c, X86_FEATURE_PEBS);
898         }
899
900
901         if (cpu_has_bts)
902                 ds_init_intel(c);
903
904         n = c->extended_cpuid_level;
905         if (n >= 0x80000008) {
906                 unsigned eax = cpuid_eax(0x80000008);
907                 c->x86_virt_bits = (eax >> 8) & 0xff;
908                 c->x86_phys_bits = eax & 0xff;
909                 /* CPUID workaround for Intel 0F34 CPU */
910                 if (c->x86_vendor == X86_VENDOR_INTEL &&
911                     c->x86 == 0xF && c->x86_model == 0x3 &&
912                     c->x86_mask == 0x4)
913                         c->x86_phys_bits = 36;
914         }
915
916         if (c->x86 == 15)
917                 c->x86_cache_alignment = c->x86_clflush_size * 2;
918         if (c->x86 == 6)
919                 set_cpu_cap(c, X86_FEATURE_REP_GOOD);
920         set_cpu_cap(c, X86_FEATURE_LFENCE_RDTSC);
921         c->x86_max_cores = intel_num_cpu_cores(c);
922
923         srat_detect_node();
924 }
925
926 static void __cpuinit early_init_centaur(struct cpuinfo_x86 *c)
927 {
928         if (c->x86 == 0x6 && c->x86_model >= 0xf)
929                 set_bit(X86_FEATURE_CONSTANT_TSC, &c->x86_capability);
930 }
931
932 static void __cpuinit init_centaur(struct cpuinfo_x86 *c)
933 {
934         /* Cache sizes */
935         unsigned n;
936
937         n = c->extended_cpuid_level;
938         if (n >= 0x80000008) {
939                 unsigned eax = cpuid_eax(0x80000008);
940                 c->x86_virt_bits = (eax >> 8) & 0xff;
941                 c->x86_phys_bits = eax & 0xff;
942         }
943
944         if (c->x86 == 0x6 && c->x86_model >= 0xf) {
945                 c->x86_cache_alignment = c->x86_clflush_size * 2;
946                 set_cpu_cap(c, X86_FEATURE_CONSTANT_TSC);
947                 set_cpu_cap(c, X86_FEATURE_REP_GOOD);
948         }
949         set_cpu_cap(c, X86_FEATURE_LFENCE_RDTSC);
950 }
951
952 static void __cpuinit get_cpu_vendor(struct cpuinfo_x86 *c)
953 {
954         char *v = c->x86_vendor_id;
955
956         if (!strcmp(v, "AuthenticAMD"))
957                 c->x86_vendor = X86_VENDOR_AMD;
958         else if (!strcmp(v, "GenuineIntel"))
959                 c->x86_vendor = X86_VENDOR_INTEL;
960         else if (!strcmp(v, "CentaurHauls"))
961                 c->x86_vendor = X86_VENDOR_CENTAUR;
962         else
963                 c->x86_vendor = X86_VENDOR_UNKNOWN;
964 }
965
966 /* Do some early cpuid on the boot CPU to get some parameter that are
967    needed before check_bugs. Everything advanced is in identify_cpu
968    below. */
969 static void __cpuinit early_identify_cpu(struct cpuinfo_x86 *c)
970 {
971         u32 tfms, xlvl;
972
973         c->loops_per_jiffy = loops_per_jiffy;
974         c->x86_cache_size = -1;
975         c->x86_vendor = X86_VENDOR_UNKNOWN;
976         c->x86_model = c->x86_mask = 0; /* So far unknown... */
977         c->x86_vendor_id[0] = '\0'; /* Unset */
978         c->x86_model_id[0] = '\0';  /* Unset */
979         c->x86_clflush_size = 64;
980         c->x86_cache_alignment = c->x86_clflush_size;
981         c->x86_max_cores = 1;
982         c->x86_coreid_bits = 0;
983         c->extended_cpuid_level = 0;
984         memset(&c->x86_capability, 0, sizeof c->x86_capability);
985
986         /* Get vendor name */
987         cpuid(0x00000000, (unsigned int *)&c->cpuid_level,
988               (unsigned int *)&c->x86_vendor_id[0],
989               (unsigned int *)&c->x86_vendor_id[8],
990               (unsigned int *)&c->x86_vendor_id[4]);
991
992         get_cpu_vendor(c);
993
994         /* Initialize the standard set of capabilities */
995         /* Note that the vendor-specific code below might override */
996
997         /* Intel-defined flags: level 0x00000001 */
998         if (c->cpuid_level >= 0x00000001) {
999                 __u32 misc;
1000                 cpuid(0x00000001, &tfms, &misc, &c->x86_capability[4],
1001                       &c->x86_capability[0]);
1002                 c->x86 = (tfms >> 8) & 0xf;
1003                 c->x86_model = (tfms >> 4) & 0xf;
1004                 c->x86_mask = tfms & 0xf;
1005                 if (c->x86 == 0xf)
1006                         c->x86 += (tfms >> 20) & 0xff;
1007                 if (c->x86 >= 0x6)
1008                         c->x86_model += ((tfms >> 16) & 0xF) << 4;
1009                 if (test_cpu_cap(c, X86_FEATURE_CLFLSH))
1010                         c->x86_clflush_size = ((misc >> 8) & 0xff) * 8;
1011         } else {
1012                 /* Have CPUID level 0 only - unheard of */
1013                 c->x86 = 4;
1014         }
1015
1016         c->initial_apicid = (cpuid_ebx(1) >> 24) & 0xff;
1017 #ifdef CONFIG_SMP
1018         c->phys_proc_id = c->initial_apicid;
1019 #endif
1020         /* AMD-defined flags: level 0x80000001 */
1021         xlvl = cpuid_eax(0x80000000);
1022         c->extended_cpuid_level = xlvl;
1023         if ((xlvl & 0xffff0000) == 0x80000000) {
1024                 if (xlvl >= 0x80000001) {
1025                         c->x86_capability[1] = cpuid_edx(0x80000001);
1026                         c->x86_capability[6] = cpuid_ecx(0x80000001);
1027                 }
1028                 if (xlvl >= 0x80000004)
1029                         get_model_name(c); /* Default name */
1030         }
1031
1032         /* Transmeta-defined flags: level 0x80860001 */
1033         xlvl = cpuid_eax(0x80860000);
1034         if ((xlvl & 0xffff0000) == 0x80860000) {
1035                 /* Don't set x86_cpuid_level here for now to not confuse. */
1036                 if (xlvl >= 0x80860001)
1037                         c->x86_capability[2] = cpuid_edx(0x80860001);
1038         }
1039
1040         c->extended_cpuid_level = cpuid_eax(0x80000000);
1041         if (c->extended_cpuid_level >= 0x80000007)
1042                 c->x86_power = cpuid_edx(0x80000007);
1043
1044
1045         clear_cpu_cap(c, X86_FEATURE_PAT);
1046
1047         switch (c->x86_vendor) {
1048         case X86_VENDOR_AMD:
1049                 early_init_amd(c);
1050                 if (c->x86 >= 0xf && c->x86 <= 0x11)
1051                         set_cpu_cap(c, X86_FEATURE_PAT);
1052                 break;
1053         case X86_VENDOR_INTEL:
1054                 early_init_intel(c);
1055                 if (c->x86 == 0xF || (c->x86 == 6 && c->x86_model >= 15))
1056                         set_cpu_cap(c, X86_FEATURE_PAT);
1057                 break;
1058         case X86_VENDOR_CENTAUR:
1059                 early_init_centaur(c);
1060                 break;
1061         }
1062
1063 }
1064
1065 /*
1066  * This does the hard work of actually picking apart the CPU stuff...
1067  */
1068 void __cpuinit identify_cpu(struct cpuinfo_x86 *c)
1069 {
1070         int i;
1071
1072         early_identify_cpu(c);
1073
1074         init_scattered_cpuid_features(c);
1075
1076         c->apicid = phys_pkg_id(0);
1077
1078         /*
1079          * Vendor-specific initialization.  In this section we
1080          * canonicalize the feature flags, meaning if there are
1081          * features a certain CPU supports which CPUID doesn't
1082          * tell us, CPUID claiming incorrect flags, or other bugs,
1083          * we handle them here.
1084          *
1085          * At the end of this section, c->x86_capability better
1086          * indicate the features this CPU genuinely supports!
1087          */
1088         switch (c->x86_vendor) {
1089         case X86_VENDOR_AMD:
1090                 init_amd(c);
1091                 break;
1092
1093         case X86_VENDOR_INTEL:
1094                 init_intel(c);
1095                 break;
1096
1097         case X86_VENDOR_CENTAUR:
1098                 init_centaur(c);
1099                 break;
1100
1101         case X86_VENDOR_UNKNOWN:
1102         default:
1103                 display_cacheinfo(c);
1104                 break;
1105         }
1106
1107         detect_ht(c);
1108
1109         /*
1110          * On SMP, boot_cpu_data holds the common feature set between
1111          * all CPUs; so make sure that we indicate which features are
1112          * common between the CPUs.  The first time this routine gets
1113          * executed, c == &boot_cpu_data.
1114          */
1115         if (c != &boot_cpu_data) {
1116                 /* AND the already accumulated flags with these */
1117                 for (i = 0; i < NCAPINTS; i++)
1118                         boot_cpu_data.x86_capability[i] &= c->x86_capability[i];
1119         }
1120
1121         /* Clear all flags overriden by options */
1122         for (i = 0; i < NCAPINTS; i++)
1123                 c->x86_capability[i] &= ~cleared_cpu_caps[i];
1124
1125 #ifdef CONFIG_X86_MCE
1126         mcheck_init(c);
1127 #endif
1128         select_idle_routine(c);
1129
1130 #ifdef CONFIG_NUMA
1131         numa_add_cpu(smp_processor_id());
1132 #endif
1133
1134 }
1135
1136 void __cpuinit identify_boot_cpu(void)
1137 {
1138         identify_cpu(&boot_cpu_data);
1139 }
1140
1141 void __cpuinit identify_secondary_cpu(struct cpuinfo_x86 *c)
1142 {
1143         BUG_ON(c == &boot_cpu_data);
1144         identify_cpu(c);
1145         mtrr_ap_init();
1146 }
1147
1148 static __init int setup_noclflush(char *arg)
1149 {
1150         setup_clear_cpu_cap(X86_FEATURE_CLFLSH);
1151         return 1;
1152 }
1153 __setup("noclflush", setup_noclflush);
1154
1155 void __cpuinit print_cpu_info(struct cpuinfo_x86 *c)
1156 {
1157         if (c->x86_model_id[0])
1158                 printk(KERN_CONT "%s", c->x86_model_id);
1159
1160         if (c->x86_mask || c->cpuid_level >= 0)
1161                 printk(KERN_CONT " stepping %02x\n", c->x86_mask);
1162         else
1163                 printk(KERN_CONT "\n");
1164 }
1165
1166 static __init int setup_disablecpuid(char *arg)
1167 {
1168         int bit;
1169         if (get_option(&arg, &bit) && bit < NCAPINTS*32)
1170                 setup_clear_cpu_cap(bit);
1171         else
1172                 return 0;
1173         return 1;
1174 }
1175 __setup("clearcpuid=", setup_disablecpuid);