arch/x86_64/kernel/setup.c

   1 /*
   2  *  linux/arch/x86-64/kernel/setup.c
   3  *
   4  *  Copyright (C) 1995  Linus Torvalds
   5  *
   6  *  Nov 2001 Dave Jones <davej@suse.de>
   7  *  Forked from i386 setup code.
   8  */
   9
  10 /*
  11  * This file handles the architecture-dependent parts of initialization
  12  */
  13
  14 #include <linux/errno.h>
  15 #include <linux/sched.h>
  16 #include <linux/kernel.h>
  17 #include <linux/mm.h>
  18 #include <linux/stddef.h>
  19 #include <linux/unistd.h>
  20 #include <linux/ptrace.h>
  21 #include <linux/slab.h>
  22 #include <linux/user.h>
  23 #include <linux/a.out.h>
  24 #include <linux/screen_info.h>
  25 #include <linux/ioport.h>
  26 #include <linux/delay.h>
  27 #include <linux/init.h>
  28 #include <linux/initrd.h>
  29 #include <linux/highmem.h>
  30 #include <linux/bootmem.h>
  31 #include <linux/module.h>
  32 #include <asm/processor.h>
  33 #include <linux/console.h>
  34 #include <linux/seq_file.h>
  35 #include <linux/crash_dump.h>
  36 #include <linux/root_dev.h>
  37 #include <linux/pci.h>
  38 #include <linux/acpi.h>
  39 #include <linux/kallsyms.h>
  40 #include <linux/edd.h>
  41 #include <linux/mmzone.h>
  42 #include <linux/kexec.h>
  43 #include <linux/cpufreq.h>
  44 #include <linux/dmi.h>
  45 #include <linux/dma-mapping.h>
  46 #include <linux/ctype.h>
  47
  48 #include <asm/mtrr.h>
  49 #include <asm/uaccess.h>
  50 #include <asm/system.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/mpspec.h>
  59 #include <asm/mmu_context.h>
  60 #include <asm/bootsetup.h>
  61 #include <asm/proto.h>
  62 #include <asm/setup.h>
  63 #include <asm/mach_apic.h>
  64 #include <asm/numa.h>
  65 #include <asm/sections.h>
  66 #include <asm/dmi.h>
  67
  68 /*
  69  * Machine setup..
  70  */
  71
  72 struct cpuinfo_x86 boot_cpu_data __read_mostly;
  73 EXPORT_SYMBOL(boot_cpu_data);
  74
  75 unsigned long mmu_cr4_features;
  76
  77 /* Boot loader ID as an integer, for the benefit of proc_dointvec */
  78 int bootloader_type;
  79
  80 unsigned long saved_video_mode;
  81
  82 int force_mwait __cpuinitdata;
  83
  84 /*
  85  * Early DMI memory
  86  */
  87 int dmi_alloc_index;
  88 char dmi_alloc_data[DMI_MAX_DATA];
  89
  90 /*
  91  * Setup options
  92  */
  93 struct screen_info screen_info;
  94 EXPORT_SYMBOL(screen_info);
  95 struct sys_desc_table_struct {
  96         unsigned short length;
  97         unsigned char table[0];
  98 };
  99
 100 struct edid_info edid_info;
 101 EXPORT_SYMBOL_GPL(edid_info);
 102
 103 extern int root_mountflags;
 104
 105 char __initdata command_line[COMMAND_LINE_SIZE];
 106
 107 struct resource standard_io_resources[] = {
 108         { .name = "dma1", .start = 0x00, .end = 0x1f,
 109                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
 110         { .name = "pic1", .start = 0x20, .end = 0x21,
 111                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
 112         { .name = "timer0", .start = 0x40, .end = 0x43,
 113                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
 114         { .name = "timer1", .start = 0x50, .end = 0x53,
 115                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
 116         { .name = "keyboard", .start = 0x60, .end = 0x6f,
 117                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
 118         { .name = "dma page reg", .start = 0x80, .end = 0x8f,
 119                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
 120         { .name = "pic2", .start = 0xa0, .end = 0xa1,
 121                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
 122         { .name = "dma2", .start = 0xc0, .end = 0xdf,
 123                 .flags = IORESOURCE_BUSY | IORESOURCE_IO },
 124         { .name = "fpu", .start = 0xf0, .end = 0xff,
 125                 .flags = IORESOURCE_BUSY | IORESOURCE_IO }
 126 };
 127
 128 #define IORESOURCE_RAM (IORESOURCE_BUSY | IORESOURCE_MEM)
 129
 130 struct resource data_resource = {
 131         .name = "Kernel data",
 132         .start = 0,
 133         .end = 0,
 134         .flags = IORESOURCE_RAM,
 135 };
 136 struct resource code_resource = {
 137         .name = "Kernel code",
 138         .start = 0,
 139         .end = 0,
 140         .flags = IORESOURCE_RAM,
 141 };
 142
 143 #ifdef CONFIG_PROC_VMCORE
 144 /* elfcorehdr= specifies the location of elf core header
 145  * stored by the crashed kernel. This option will be passed
 146  * by kexec loader to the capture kernel.
 147  */
 148 static int __init setup_elfcorehdr(char *arg)
 149 {
 150         char *end;
 151         if (!arg)
 152                 return -EINVAL;
 153         elfcorehdr_addr = memparse(arg, &end);
 154         return end > arg ? 0 : -EINVAL;
 155 }
 156 early_param("elfcorehdr", setup_elfcorehdr);
 157 #endif
 158
 159 #ifndef CONFIG_NUMA
 160 static void __init
 161 contig_initmem_init(unsigned long start_pfn, unsigned long end_pfn)
 162 {
 163         unsigned long bootmap_size, bootmap;
 164
 165         bootmap_size = bootmem_bootmap_pages(end_pfn)<<PAGE_SHIFT;
 166         bootmap = find_e820_area(0, end_pfn<<PAGE_SHIFT, bootmap_size);
 167         if (bootmap == -1L)
 168                 panic("Cannot find bootmem map of size %ld\n",bootmap_size);
 169         bootmap_size = init_bootmem(bootmap >> PAGE_SHIFT, end_pfn);
 170         e820_register_active_regions(0, start_pfn, end_pfn);
 171         free_bootmem_with_active_regions(0, end_pfn);
 172         reserve_bootmem(bootmap, bootmap_size);
 173 }
 174 #endif
 175
 176 #if defined(CONFIG_EDD) || defined(CONFIG_EDD_MODULE)
 177 struct edd edd;
 178 #ifdef CONFIG_EDD_MODULE
 179 EXPORT_SYMBOL(edd);
 180 #endif
 181 /**
 182  * copy_edd() - Copy the BIOS EDD information
 183  *              from boot_params into a safe place.
 184  *
 185  */
 186 static inline void copy_edd(void)
 187 {
 188      memcpy(edd.mbr_signature, EDD_MBR_SIGNATURE, sizeof(edd.mbr_signature));
 189      memcpy(edd.edd_info, EDD_BUF, sizeof(edd.edd_info));
 190      edd.mbr_signature_nr = EDD_MBR_SIG_NR;
 191      edd.edd_info_nr = EDD_NR;
 192 }
 193 #else
 194 static inline void copy_edd(void)
 195 {
 196 }
 197 #endif
 198
 199 #define EBDA_ADDR_POINTER 0x40E
 200
 201 unsigned __initdata ebda_addr;
 202 unsigned __initdata ebda_size;
 203
 204 static void discover_ebda(void)
 205 {
 206         /*
 207          * there is a real-mode segmented pointer pointing to the
 208          * 4K EBDA area at 0x40E
 209          */
 210         ebda_addr = *(unsigned short *)__va(EBDA_ADDR_POINTER);
 211         ebda_addr <<= 4;
 212
 213         ebda_size = *(unsigned short *)__va(ebda_addr);
 214
 215         /* Round EBDA up to pages */
 216         if (ebda_size == 0)
 217                 ebda_size = 1;
 218         ebda_size <<= 10;
 219         ebda_size = round_up(ebda_size + (ebda_addr & ~PAGE_MASK), PAGE_SIZE);
 220         if (ebda_size > 64*1024)
 221                 ebda_size = 64*1024;
 222 }
 223
 224 void __init setup_arch(char **cmdline_p)
 225 {
 226         printk(KERN_INFO "Command line: %s\n", boot_command_line);
 227
 228         ROOT_DEV = old_decode_dev(ORIG_ROOT_DEV);
 229         screen_info = SCREEN_INFO;
 230         edid_info = EDID_INFO;
 231         saved_video_mode = SAVED_VIDEO_MODE;
 232         bootloader_type = LOADER_TYPE;
 233
 234 #ifdef CONFIG_BLK_DEV_RAM
 235         rd_image_start = RAMDISK_FLAGS & RAMDISK_IMAGE_START_MASK;
 236         rd_prompt = ((RAMDISK_FLAGS & RAMDISK_PROMPT_FLAG) != 0);
 237         rd_doload = ((RAMDISK_FLAGS & RAMDISK_LOAD_FLAG) != 0);
 238 #endif
 239         setup_memory_region();
 240         copy_edd();
 241
 242         if (!MOUNT_ROOT_RDONLY)
 243                 root_mountflags &= ~MS_RDONLY;
 244         init_mm.start_code = (unsigned long) &_text;
 245         init_mm.end_code = (unsigned long) &_etext;
 246         init_mm.end_data = (unsigned long) &_edata;
 247         init_mm.brk = (unsigned long) &_end;
 248
 249         code_resource.start = virt_to_phys(&_text);
 250         code_resource.end = virt_to_phys(&_etext)-1;
 251         data_resource.start = virt_to_phys(&_etext);
 252         data_resource.end = virt_to_phys(&_edata)-1;
 253
 254         early_identify_cpu(&boot_cpu_data);
 255
 256         strlcpy(command_line, boot_command_line, COMMAND_LINE_SIZE);
 257         *cmdline_p = command_line;
 258
 259         parse_early_param();
 260
 261         finish_e820_parsing();
 262
 263         e820_register_active_regions(0, 0, -1UL);
 264         /*
 265          * partially used pages are not usable - thus
 266          * we are rounding upwards:
 267          */
 268         end_pfn = e820_end_of_ram();
 269         num_physpages = end_pfn;
 270
 271         check_efer();
 272
 273         discover_ebda();
 274
 275         init_memory_mapping(0, (end_pfn_map << PAGE_SHIFT));
 276
 277         dmi_scan_machine();
 278
 279 #ifdef CONFIG_ACPI
 280         /*
 281          * Initialize the ACPI boot-time table parser (gets the RSDP and SDT).
 282          * Call this early for SRAT node setup.
 283          */
 284         acpi_boot_table_init();
 285 #endif
 286
 287         /* How many end-of-memory variables you have, grandma! */
 288         max_low_pfn = end_pfn;
 289         max_pfn = end_pfn;
 290         high_memory = (void *)__va(end_pfn * PAGE_SIZE - 1) + 1;
 291
 292         /* Remove active ranges so rediscovery with NUMA-awareness happens */
 293         remove_all_active_ranges();
 294
 295 #ifdef CONFIG_ACPI_NUMA
 296         /*
 297          * Parse SRAT to discover nodes.
 298          */
 299         acpi_numa_init();
 300 #endif
 301
 302 #ifdef CONFIG_NUMA
 303         numa_initmem_init(0, end_pfn);
 304 #else
 305         contig_initmem_init(0, end_pfn);
 306 #endif
 307
 308         /* Reserve direct mapping */
 309         reserve_bootmem_generic(table_start << PAGE_SHIFT,
 310                                 (table_end - table_start) << PAGE_SHIFT);
 311
 312         /* reserve kernel */
 313         reserve_bootmem_generic(__pa_symbol(&_text),
 314                                 __pa_symbol(&_end) - __pa_symbol(&_text));
 315
 316         /*
 317          * reserve physical page 0 - it's a special BIOS page on many boxes,
 318          * enabling clean reboots, SMP operation, laptop functions.
 319          */
 320         reserve_bootmem_generic(0, PAGE_SIZE);
 321
 322         /* reserve ebda region */
 323         if (ebda_addr)
 324                 reserve_bootmem_generic(ebda_addr, ebda_size);
 325 #ifdef CONFIG_NUMA
 326         /* reserve nodemap region */
 327         if (nodemap_addr)
 328                 reserve_bootmem_generic(nodemap_addr, nodemap_size);
 329 #endif
 330
 331 #ifdef CONFIG_SMP
 332         /* Reserve SMP trampoline */
 333         reserve_bootmem_generic(SMP_TRAMPOLINE_BASE, 2*PAGE_SIZE);
 334 #endif
 335
 336 #ifdef CONFIG_ACPI_SLEEP
 337        /*
 338         * Reserve low memory region for sleep support.
 339         */
 340        acpi_reserve_bootmem();
 341 #endif
 342         /*
 343          * Find and reserve possible boot-time SMP configuration:
 344          */
 345         find_smp_config();
 346 #ifdef CONFIG_BLK_DEV_INITRD
 347         if (LOADER_TYPE && INITRD_START) {
 348                 if (INITRD_START + INITRD_SIZE <= (end_pfn << PAGE_SHIFT)) {
 349                         reserve_bootmem_generic(INITRD_START, INITRD_SIZE);
 350                         initrd_start = INITRD_START + PAGE_OFFSET;
 351                         initrd_end = initrd_start+INITRD_SIZE;
 352                 }
 353                 else {
 354                         printk(KERN_ERR "initrd extends beyond end of memory "
 355                             "(0x%08lx > 0x%08lx)\ndisabling initrd\n",
 356                             (unsigned long)(INITRD_START + INITRD_SIZE),
 357                             (unsigned long)(end_pfn << PAGE_SHIFT));
 358                         initrd_start = 0;
 359                 }
 360         }
 361 #endif
 362 #ifdef CONFIG_KEXEC
 363         if (crashk_res.start != crashk_res.end) {
 364                 reserve_bootmem_generic(crashk_res.start,
 365                         crashk_res.end - crashk_res.start + 1);
 366         }
 367 #endif
 368
 369         paging_init();
 370
 371 #ifdef CONFIG_PCI
 372         early_quirks();
 373 #endif
 374
 375         /*
 376          * set this early, so we dont allocate cpu0
 377          * if MADT list doesnt list BSP first
 378          * mpparse.c/MP_processor_info() allocates logical cpu numbers.
 379          */
 380         cpu_set(0, cpu_present_map);
 381 #ifdef CONFIG_ACPI
 382         /*
 383          * Read APIC and some other early information from ACPI tables.
 384          */
 385         acpi_boot_init();
 386 #endif
 387
 388         init_cpu_to_node();
 389
 390         /*
 391          * get boot-time SMP configuration:
 392          */
 393         if (smp_found_config)
 394                 get_smp_config();
 395         init_apic_mappings();
 396
 397         /*
 398          * We trust e820 completely. No explicit ROM probing in memory.
 399          */
 400         e820_reserve_resources();
 401         e820_mark_nosave_regions();
 402
 403         {
 404         unsigned i;
 405         /* request I/O space for devices used on all i[345]86 PCs */
 406         for (i = 0; i < ARRAY_SIZE(standard_io_resources); i++)
 407                 request_resource(&ioport_resource, &standard_io_resources[i]);
 408         }
 409
 410         e820_setup_gap();
 411
 412 #ifdef CONFIG_VT
 413 #if defined(CONFIG_VGA_CONSOLE)
 414         conswitchp = &vga_con;
 415 #elif defined(CONFIG_DUMMY_CONSOLE)
 416         conswitchp = &dummy_con;
 417 #endif
 418 #endif
 419 }
 420
 421 static int __cpuinit get_model_name(struct cpuinfo_x86 *c)
 422 {
 423         unsigned int *v;
 424
 425         if (c->extended_cpuid_level < 0x80000004)
 426                 return 0;
 427
 428         v = (unsigned int *) c->x86_model_id;
 429         cpuid(0x80000002, &v[0], &v[1], &v[2], &v[3]);
 430         cpuid(0x80000003, &v[4], &v[5], &v[6], &v[7]);
 431         cpuid(0x80000004, &v[8], &v[9], &v[10], &v[11]);
 432         c->x86_model_id[48] = 0;
 433         return 1;
 434 }
 435
 436
 437 static void __cpuinit display_cacheinfo(struct cpuinfo_x86 *c)
 438 {
 439         unsigned int n, dummy, eax, ebx, ecx, edx;
 440
 441         n = c->extended_cpuid_level;
 442
 443         if (n >= 0x80000005) {
 444                 cpuid(0x80000005, &dummy, &ebx, &ecx, &edx);
 445                 printk(KERN_INFO "CPU: L1 I Cache: %dK (%d bytes/line), D cache %dK (%d bytes/line)\n",
 446                         edx>>24, edx&0xFF, ecx>>24, ecx&0xFF);
 447                 c->x86_cache_size=(ecx>>24)+(edx>>24);
 448                 /* On K8 L1 TLB is inclusive, so don't count it */
 449                 c->x86_tlbsize = 0;
 450         }
 451
 452         if (n >= 0x80000006) {
 453                 cpuid(0x80000006, &dummy, &ebx, &ecx, &edx);
 454                 ecx = cpuid_ecx(0x80000006);
 455                 c->x86_cache_size = ecx >> 16;
 456                 c->x86_tlbsize += ((ebx >> 16) & 0xfff) + (ebx & 0xfff);
 457
 458                 printk(KERN_INFO "CPU: L2 Cache: %dK (%d bytes/line)\n",
 459                 c->x86_cache_size, ecx & 0xFF);
 460         }
 461
 462         if (n >= 0x80000007)
 463                 cpuid(0x80000007, &dummy, &dummy, &dummy, &c->x86_power);
 464         if (n >= 0x80000008) {
 465                 cpuid(0x80000008, &eax, &dummy, &dummy, &dummy);
 466                 c->x86_virt_bits = (eax >> 8) & 0xff;
 467                 c->x86_phys_bits = eax & 0xff;
 468         }
 469 }
 470
 471 #ifdef CONFIG_NUMA
 472 static int nearby_node(int apicid)
 473 {
 474         int i;
 475         for (i = apicid - 1; i >= 0; i--) {
 476                 int node = apicid_to_node[i];
 477                 if (node != NUMA_NO_NODE && node_online(node))
 478                         return node;
 479         }
 480         for (i = apicid + 1; i < MAX_LOCAL_APIC; i++) {
 481                 int node = apicid_to_node[i];
 482                 if (node != NUMA_NO_NODE && node_online(node))
 483                         return node;
 484         }
 485         return first_node(node_online_map); /* Shouldn't happen */
 486 }
 487 #endif
 488
 489 /*
 490  * On a AMD dual core setup the lower bits of the APIC id distingush the cores.
 491  * Assumes number of cores is a power of two.
 492  */
 493 static void __init amd_detect_cmp(struct cpuinfo_x86 *c)
 494 {
 495 #ifdef CONFIG_SMP
 496         unsigned bits;
 497 #ifdef CONFIG_NUMA
 498         int cpu = smp_processor_id();
 499         int node = 0;
 500         unsigned apicid = hard_smp_processor_id();
 501 #endif
 502         unsigned ecx = cpuid_ecx(0x80000008);
 503
 504         c->x86_max_cores = (ecx & 0xff) + 1;
 505
 506         /* CPU telling us the core id bits shift? */
 507         bits = (ecx >> 12) & 0xF;
 508
 509         /* Otherwise recompute */
 510         if (bits == 0) {
 511                 while ((1 << bits) < c->x86_max_cores)
 512                         bits++;
 513         }
 514
 515         /* Low order bits define the core id (index of core in socket) */
 516         c->cpu_core_id = c->phys_proc_id & ((1 << bits)-1);
 517         /* Convert the APIC ID into the socket ID */
 518         c->phys_proc_id = phys_pkg_id(bits);
 519
 520 #ifdef CONFIG_NUMA
 521         node = c->phys_proc_id;
 522         if (apicid_to_node[apicid] != NUMA_NO_NODE)
 523                 node = apicid_to_node[apicid];
 524         if (!node_online(node)) {
 525                 /* Two possibilities here:
 526                    - The CPU is missing memory and no node was created.
 527                    In that case try picking one from a nearby CPU
 528                    - The APIC IDs differ from the HyperTransport node IDs
 529                    which the K8 northbridge parsing fills in.
 530                    Assume they are all increased by a constant offset,
 531                    but in the same order as the HT nodeids.
 532                    If that doesn't result in a usable node fall back to the
 533                    path for the previous case.  */
 534                 int ht_nodeid = apicid - (cpu_data[0].phys_proc_id << bits);
 535                 if (ht_nodeid >= 0 &&
 536                     apicid_to_node[ht_nodeid] != NUMA_NO_NODE)
 537                         node = apicid_to_node[ht_nodeid];
 538                 /* Pick a nearby node */
 539                 if (!node_online(node))
 540                         node = nearby_node(apicid);
 541         }
 542         numa_set_node(cpu, node);
 543
 544         printk(KERN_INFO "CPU %d/%x -> Node %d\n", cpu, apicid, node);
 545 #endif
 546 #endif
 547 }
 548
 549 static void __cpuinit init_amd(struct cpuinfo_x86 *c)
 550 {
 551         unsigned level;
 552
 553 #ifdef CONFIG_SMP
 554         unsigned long value;
 555
 556         /*
 557          * Disable TLB flush filter by setting HWCR.FFDIS on K8
 558          * bit 6 of msr C001_0015
 559          *
 560          * Errata 63 for SH-B3 steppings
 561          * Errata 122 for all steppings (F+ have it disabled by default)
 562          */
 563         if (c->x86 == 15) {
 564                 rdmsrl(MSR_K8_HWCR, value);
 565                 value |= 1 << 6;
 566                 wrmsrl(MSR_K8_HWCR, value);
 567         }
 568 #endif
 569
 570         /* Bit 31 in normal CPUID used for nonstandard 3DNow ID;
 571            3DNow is IDd by bit 31 in extended CPUID (1*32+31) anyway */
 572         clear_bit(0*32+31, &c->x86_capability);
 573
 574         /* On C+ stepping K8 rep microcode works well for copy/memset */
 575         level = cpuid_eax(1);
 576         if (c->x86 == 15 && ((level >= 0x0f48 && level < 0x0f50) || level >= 0x0f58))
 577                 set_bit(X86_FEATURE_REP_GOOD, &c->x86_capability);
 578
 579         /* Enable workaround for FXSAVE leak */
 580         if (c->x86 >= 6)
 581                 set_bit(X86_FEATURE_FXSAVE_LEAK, &c->x86_capability);
 582
 583         level = get_model_name(c);
 584         if (!level) {
 585                 switch (c->x86) {
 586                 case 15:
 587                         /* Should distinguish Models here, but this is only
 588                            a fallback anyways. */
 589                         strcpy(c->x86_model_id, "Hammer");
 590                         break;
 591                 }
 592         }
 593         display_cacheinfo(c);
 594
 595         /* c->x86_power is 8000_0007 edx. Bit 8 is constant TSC */
 596         if (c->x86_power & (1<<8))
 597                 set_bit(X86_FEATURE_CONSTANT_TSC, &c->x86_capability);
 598
 599         /* Multi core CPU? */
 600         if (c->extended_cpuid_level >= 0x80000008)
 601                 amd_detect_cmp(c);
 602
 603         /* Fix cpuid4 emulation for more */
 604         num_cache_leaves = 3;
 605
 606         /* RDTSC can be speculated around */
 607         clear_bit(X86_FEATURE_SYNC_RDTSC, &c->x86_capability);
 608
 609         /* Family 10 doesn't support C states in MWAIT so don't use it */
 610         if (c->x86 == 0x10 && !force_mwait)
 611                 clear_bit(X86_FEATURE_MWAIT, &c->x86_capability);
 612 }
 613
 614 static void __cpuinit detect_ht(struct cpuinfo_x86 *c)
 615 {
 616 #ifdef CONFIG_SMP
 617         u32     eax, ebx, ecx, edx;
 618         int     index_msb, core_bits;
 619
 620         cpuid(1, &eax, &ebx, &ecx, &edx);
 621
 622
 623         if (!cpu_has(c, X86_FEATURE_HT))
 624                 return;
 625         if (cpu_has(c, X86_FEATURE_CMP_LEGACY))
 626                 goto out;
 627
 628         smp_num_siblings = (ebx & 0xff0000) >> 16;
 629
 630         if (smp_num_siblings == 1) {
 631                 printk(KERN_INFO  "CPU: Hyper-Threading is disabled\n");
 632         } else if (smp_num_siblings > 1 ) {
 633
 634                 if (smp_num_siblings > NR_CPUS) {
 635                         printk(KERN_WARNING "CPU: Unsupported number of the siblings %d", smp_num_siblings);
 636                         smp_num_siblings = 1;
 637                         return;
 638                 }
 639
 640                 index_msb = get_count_order(smp_num_siblings);
 641                 c->phys_proc_id = phys_pkg_id(index_msb);
 642
 643                 smp_num_siblings = smp_num_siblings / c->x86_max_cores;
 644
 645                 index_msb = get_count_order(smp_num_siblings) ;
 646
 647                 core_bits = get_count_order(c->x86_max_cores);
 648
 649                 c->cpu_core_id = phys_pkg_id(index_msb) &
 650                                                ((1 << core_bits) - 1);
 651         }
 652 out:
 653         if ((c->x86_max_cores * smp_num_siblings) > 1) {
 654                 printk(KERN_INFO  "CPU: Physical Processor ID: %d\n", c->phys_proc_id);
 655                 printk(KERN_INFO  "CPU: Processor Core ID: %d\n", c->cpu_core_id);
 656         }
 657
 658 #endif
 659 }
 660
 661 /*
 662  * find out the number of processor cores on the die
 663  */
 664 static int __cpuinit intel_num_cpu_cores(struct cpuinfo_x86 *c)
 665 {
 666         unsigned int eax, t;
 667
 668         if (c->cpuid_level < 4)
 669                 return 1;
 670
 671         cpuid_count(4, 0, &eax, &t, &t, &t);
 672
 673         if (eax & 0x1f)
 674                 return ((eax >> 26) + 1);
 675         else
 676                 return 1;
 677 }
 678
 679 static void srat_detect_node(void)
 680 {
 681 #ifdef CONFIG_NUMA
 682         unsigned node;
 683         int cpu = smp_processor_id();
 684         int apicid = hard_smp_processor_id();
 685
 686         /* Don't do the funky fallback heuristics the AMD version employs
 687            for now. */
 688         node = apicid_to_node[apicid];
 689         if (node == NUMA_NO_NODE)
 690                 node = first_node(node_online_map);
 691         numa_set_node(cpu, node);
 692
 693         printk(KERN_INFO "CPU %d/%x -> Node %d\n", cpu, apicid, node);
 694 #endif
 695 }
 696
 697 static void __cpuinit init_intel(struct cpuinfo_x86 *c)
 698 {
 699         /* Cache sizes */
 700         unsigned n;
 701
 702         init_intel_cacheinfo(c);
 703         if (c->cpuid_level > 9 ) {
 704                 unsigned eax = cpuid_eax(10);
 705                 /* Check for version and the number of counters */
 706                 if ((eax & 0xff) && (((eax>>8) & 0xff) > 1))
 707                         set_bit(X86_FEATURE_ARCH_PERFMON, &c->x86_capability);
 708         }
 709
 710         if (cpu_has_ds) {
 711                 unsigned int l1, l2;
 712                 rdmsr(MSR_IA32_MISC_ENABLE, l1, l2);
 713                 if (!(l1 & (1<<11)))
 714                         set_bit(X86_FEATURE_BTS, c->x86_capability);
 715                 if (!(l1 & (1<<12)))
 716                         set_bit(X86_FEATURE_PEBS, c->x86_capability);
 717         }
 718
 719         n = c->extended_cpuid_level;
 720         if (n >= 0x80000008) {
 721                 unsigned eax = cpuid_eax(0x80000008);
 722                 c->x86_virt_bits = (eax >> 8) & 0xff;
 723                 c->x86_phys_bits = eax & 0xff;
 724                 /* CPUID workaround for Intel 0F34 CPU */
 725                 if (c->x86_vendor == X86_VENDOR_INTEL &&
 726                     c->x86 == 0xF && c->x86_model == 0x3 &&
 727                     c->x86_mask == 0x4)
 728                         c->x86_phys_bits = 36;
 729         }
 730
 731         if (c->x86 == 15)
 732                 c->x86_cache_alignment = c->x86_clflush_size * 2;
 733         if ((c->x86 == 0xf && c->x86_model >= 0x03) ||
 734             (c->x86 == 0x6 && c->x86_model >= 0x0e))
 735                 set_bit(X86_FEATURE_CONSTANT_TSC, &c->x86_capability);
 736         if (c->x86 == 6)
 737                 set_bit(X86_FEATURE_REP_GOOD, &c->x86_capability);
 738         if (c->x86 == 15)
 739                 set_bit(X86_FEATURE_SYNC_RDTSC, &c->x86_capability);
 740         else
 741                 clear_bit(X86_FEATURE_SYNC_RDTSC, &c->x86_capability);
 742         c->x86_max_cores = intel_num_cpu_cores(c);
 743
 744         srat_detect_node();
 745 }
 746
 747 static void __cpuinit get_cpu_vendor(struct cpuinfo_x86 *c)
 748 {
 749         char *v = c->x86_vendor_id;
 750
 751         if (!strcmp(v, "AuthenticAMD"))
 752                 c->x86_vendor = X86_VENDOR_AMD;
 753         else if (!strcmp(v, "GenuineIntel"))
 754                 c->x86_vendor = X86_VENDOR_INTEL;
 755         else
 756                 c->x86_vendor = X86_VENDOR_UNKNOWN;
 757 }
 758
 759 struct cpu_model_info {
 760         int vendor;
 761         int family;
 762         char *model_names[16];
 763 };
 764
 765 /* Do some early cpuid on the boot CPU to get some parameter that are
 766    needed before check_bugs. Everything advanced is in identify_cpu
 767    below. */
 768 void __cpuinit early_identify_cpu(struct cpuinfo_x86 *c)
 769 {
 770         u32 tfms;
 771
 772         c->loops_per_jiffy = loops_per_jiffy;
 773         c->x86_cache_size = -1;
 774         c->x86_vendor = X86_VENDOR_UNKNOWN;
 775         c->x86_model = c->x86_mask = 0; /* So far unknown... */
 776         c->x86_vendor_id[0] = '\0'; /* Unset */
 777         c->x86_model_id[0] = '\0';  /* Unset */
 778         c->x86_clflush_size = 64;
 779         c->x86_cache_alignment = c->x86_clflush_size;
 780         c->x86_max_cores = 1;
 781         c->extended_cpuid_level = 0;
 782         memset(&c->x86_capability, 0, sizeof c->x86_capability);
 783
 784         /* Get vendor name */
 785         cpuid(0x00000000, (unsigned int *)&c->cpuid_level,
 786               (unsigned int *)&c->x86_vendor_id[0],
 787               (unsigned int *)&c->x86_vendor_id[8],
 788               (unsigned int *)&c->x86_vendor_id[4]);
 789
 790         get_cpu_vendor(c);
 791
 792         /* Initialize the standard set of capabilities */
 793         /* Note that the vendor-specific code below might override */
 794
 795         /* Intel-defined flags: level 0x00000001 */
 796         if (c->cpuid_level >= 0x00000001) {
 797                 __u32 misc;
 798                 cpuid(0x00000001, &tfms, &misc, &c->x86_capability[4],
 799                       &c->x86_capability[0]);
 800                 c->x86 = (tfms >> 8) & 0xf;
 801                 c->x86_model = (tfms >> 4) & 0xf;
 802                 c->x86_mask = tfms & 0xf;
 803                 if (c->x86 == 0xf)
 804                         c->x86 += (tfms >> 20) & 0xff;
 805                 if (c->x86 >= 0x6)
 806                         c->x86_model += ((tfms >> 16) & 0xF) << 4;
 807                 if (c->x86_capability[0] & (1<<19))
 808                         c->x86_clflush_size = ((misc >> 8) & 0xff) * 8;
 809         } else {
 810                 /* Have CPUID level 0 only - unheard of */
 811                 c->x86 = 4;
 812         }
 813
 814 #ifdef CONFIG_SMP
 815         c->phys_proc_id = (cpuid_ebx(1) >> 24) & 0xff;
 816 #endif
 817 }
 818
 819 /*
 820  * This does the hard work of actually picking apart the CPU stuff...
 821  */
 822 void __cpuinit identify_cpu(struct cpuinfo_x86 *c)
 823 {
 824         int i;
 825         u32 xlvl;
 826
 827         early_identify_cpu(c);
 828
 829         /* AMD-defined flags: level 0x80000001 */
 830         xlvl = cpuid_eax(0x80000000);
 831         c->extended_cpuid_level = xlvl;
 832         if ((xlvl & 0xffff0000) == 0x80000000) {
 833                 if (xlvl >= 0x80000001) {
 834                         c->x86_capability[1] = cpuid_edx(0x80000001);
 835                         c->x86_capability[6] = cpuid_ecx(0x80000001);
 836                 }
 837                 if (xlvl >= 0x80000004)
 838                         get_model_name(c); /* Default name */
 839         }
 840
 841         /* Transmeta-defined flags: level 0x80860001 */
 842         xlvl = cpuid_eax(0x80860000);
 843         if ((xlvl & 0xffff0000) == 0x80860000) {
 844                 /* Don't set x86_cpuid_level here for now to not confuse. */
 845                 if (xlvl >= 0x80860001)
 846                         c->x86_capability[2] = cpuid_edx(0x80860001);
 847         }
 848
 849         c->apicid = phys_pkg_id(0);
 850
 851         /*
 852          * Vendor-specific initialization.  In this section we
 853          * canonicalize the feature flags, meaning if there are
 854          * features a certain CPU supports which CPUID doesn't
 855          * tell us, CPUID claiming incorrect flags, or other bugs,
 856          * we handle them here.
 857          *
 858          * At the end of this section, c->x86_capability better
 859          * indicate the features this CPU genuinely supports!
 860          */
 861         switch (c->x86_vendor) {
 862         case X86_VENDOR_AMD:
 863                 init_amd(c);
 864                 break;
 865
 866         case X86_VENDOR_INTEL:
 867                 init_intel(c);
 868                 break;
 869
 870         case X86_VENDOR_UNKNOWN:
 871         default:
 872                 display_cacheinfo(c);
 873                 break;
 874         }
 875
 876         select_idle_routine(c);
 877         detect_ht(c);
 878
 879         /*
 880          * On SMP, boot_cpu_data holds the common feature set between
 881          * all CPUs; so make sure that we indicate which features are
 882          * common between the CPUs.  The first time this routine gets
 883          * executed, c == &boot_cpu_data.
 884          */
 885         if (c != &boot_cpu_data) {
 886                 /* AND the already accumulated flags with these */
 887                 for (i = 0 ; i < NCAPINTS ; i++)
 888                         boot_cpu_data.x86_capability[i] &= c->x86_capability[i];
 889         }
 890
 891 #ifdef CONFIG_X86_MCE
 892         mcheck_init(c);
 893 #endif
 894         if (c != &boot_cpu_data)
 895                 mtrr_ap_init();
 896 #ifdef CONFIG_NUMA
 897         numa_add_cpu(smp_processor_id());
 898 #endif
 899 }
 900
 901
 902 void __cpuinit print_cpu_info(struct cpuinfo_x86 *c)
 903 {
 904         if (c->x86_model_id[0])
 905                 printk("%s", c->x86_model_id);
 906
 907         if (c->x86_mask || c->cpuid_level >= 0)
 908                 printk(" stepping %02x\n", c->x86_mask);
 909         else
 910                 printk("\n");
 911 }
 912
 913 /*
 914  *      Get CPU information for use by the procfs.
 915  */
 916
 917 static int show_cpuinfo(struct seq_file *m, void *v)
 918 {
 919         struct cpuinfo_x86 *c = v;
 920
 921         /*
 922          * These flag bits must match the definitions in <asm/cpufeature.h>.
 923          * NULL means this bit is undefined or reserved; either way it doesn't
 924          * have meaning as far as Linux is concerned.  Note that it's important
 925          * to realize there is a difference between this table and CPUID -- if
 926          * applications want to get the raw CPUID data, they should access
 927          * /dev/cpu/<cpu_nr>/cpuid instead.
 928          */
 929         static char *x86_cap_flags[] = {
 930                 /* Intel-defined */
 931                 "fpu", "vme", "de", "pse", "tsc", "msr", "pae", "mce",
 932                 "cx8", "apic", NULL, "sep", "mtrr", "pge", "mca", "cmov",
 933                 "pat", "pse36", "pn", "clflush", NULL, "dts", "acpi", "mmx",
 934                 "fxsr", "sse", "sse2", "ss", "ht", "tm", "ia64", NULL,
 935
 936                 /* AMD-defined */
 937                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 938                 NULL, NULL, NULL, "syscall", NULL, NULL, NULL, NULL,
 939                 NULL, NULL, NULL, NULL, "nx", NULL, "mmxext", NULL,
 940                 NULL, "fxsr_opt", "pdpe1gb", "rdtscp", NULL, "lm",
 941                 "3dnowext", "3dnow",
 942
 943                 /* Transmeta-defined */
 944                 "recovery", "longrun", NULL, "lrti", NULL, NULL, NULL, NULL,
 945                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 946                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 947                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 948
 949                 /* Other (Linux-defined) */
 950                 "cxmmx", NULL, "cyrix_arr", "centaur_mcr", NULL,
 951                 "constant_tsc", NULL, NULL,
 952                 "up", NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 953                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 954                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 955
 956                 /* Intel-defined (#2) */
 957                 "pni", NULL, NULL, "monitor", "ds_cpl", "vmx", "smx", "est",
 958                 "tm2", "ssse3", "cid", NULL, NULL, "cx16", "xtpr", NULL,
 959                 NULL, NULL, "dca", NULL, NULL, NULL, NULL, "popcnt",
 960                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 961
 962                 /* VIA/Cyrix/Centaur-defined */
 963                 NULL, NULL, "rng", "rng_en", NULL, NULL, "ace", "ace_en",
 964                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 965                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 966                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 967
 968                 /* AMD-defined (#2) */
 969                 "lahf_lm", "cmp_legacy", "svm", "extapic", "cr8_legacy",
 970                 "altmovcr8", "abm", "sse4a",
 971                 "misalignsse", "3dnowprefetch",
 972                 "osvw", "ibs", NULL, NULL, NULL, NULL,
 973                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 974                 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 975         };
 976         static char *x86_power_flags[] = {
 977                 "ts",   /* temperature sensor */
 978                 "fid",  /* frequency id control */
 979                 "vid",  /* voltage id control */
 980                 "ttp",  /* thermal trip */
 981                 "tm",
 982                 "stc",
 983                 "100mhzsteps",
 984                 "hwpstate",
 985                 "",     /* tsc invariant mapped to constant_tsc */
 986                 /* nothing */
 987         };
 988
 989
 990 #ifdef CONFIG_SMP
 991         if (!cpu_online(c-cpu_data))
 992                 return 0;
 993 #endif
 994
 995         seq_printf(m,"processor\t: %u\n"
 996                      "vendor_id\t: %s\n"
 997                      "cpu family\t: %d\n"
 998                      "model\t\t: %d\n"
 999                      "model name\t: %s\n",
1000                      (unsigned)(c-cpu_data),
1001                      c->x86_vendor_id[0] ? c->x86_vendor_id : "unknown",
1002                      c->x86,
1003                      (int)c->x86_model,
1004                      c->x86_model_id[0] ? c->x86_model_id : "unknown");
1005
1006         if (c->x86_mask || c->cpuid_level >= 0)
1007                 seq_printf(m, "stepping\t: %d\n", c->x86_mask);
1008         else
1009                 seq_printf(m, "stepping\t: unknown\n");
1010
1011         if (cpu_has(c,X86_FEATURE_TSC)) {
1012                 unsigned int freq = cpufreq_quick_get((unsigned)(c-cpu_data));
1013                 if (!freq)
1014                         freq = cpu_khz;
1015                 seq_printf(m, "cpu MHz\t\t: %u.%03u\n",
1016                              freq / 1000, (freq % 1000));
1017         }
1018
1019         /* Cache size */
1020         if (c->x86_cache_size >= 0)
1021                 seq_printf(m, "cache size\t: %d KB\n", c->x86_cache_size);
1022
1023 #ifdef CONFIG_SMP
1024         if (smp_num_siblings * c->x86_max_cores > 1) {
1025                 int cpu = c - cpu_data;
1026                 seq_printf(m, "physical id\t: %d\n", c->phys_proc_id);
1027                 seq_printf(m, "siblings\t: %d\n", cpus_weight(cpu_core_map[cpu]));
1028                 seq_printf(m, "core id\t\t: %d\n", c->cpu_core_id);
1029                 seq_printf(m, "cpu cores\t: %d\n", c->booted_cores);
1030         }
1031 #endif
1032
1033         seq_printf(m,
1034                 "fpu\t\t: yes\n"
1035                 "fpu_exception\t: yes\n"
1036                 "cpuid level\t: %d\n"
1037                 "wp\t\t: yes\n"
1038                 "flags\t\t:",
1039                    c->cpuid_level);
1040
1041         {
1042                 int i;
1043                 for ( i = 0 ; i < 32*NCAPINTS ; i++ )
1044                         if (cpu_has(c, i) && x86_cap_flags[i] != NULL)
1045                                 seq_printf(m, " %s", x86_cap_flags[i]);
1046         }
1047
1048         seq_printf(m, "\nbogomips\t: %lu.%02lu\n",
1049                    c->loops_per_jiffy/(500000/HZ),
1050                    (c->loops_per_jiffy/(5000/HZ)) % 100);
1051
1052         if (c->x86_tlbsize > 0)
1053                 seq_printf(m, "TLB size\t: %d 4K pages\n", c->x86_tlbsize);
1054         seq_printf(m, "clflush size\t: %d\n", c->x86_clflush_size);
1055         seq_printf(m, "cache_alignment\t: %d\n", c->x86_cache_alignment);
1056
1057         seq_printf(m, "address sizes\t: %u bits physical, %u bits virtual\n",
1058                    c->x86_phys_bits, c->x86_virt_bits);
1059
1060         seq_printf(m, "power management:");
1061         {
1062                 unsigned i;
1063                 for (i = 0; i < 32; i++)
1064                         if (c->x86_power & (1 << i)) {
1065                                 if (i < ARRAY_SIZE(x86_power_flags) &&
1066                                         x86_power_flags[i])
1067                                         seq_printf(m, "%s%s",
1068                                                 x86_power_flags[i][0]?" ":"",
1069                                                 x86_power_flags[i]);
1070                                 else
1071                                         seq_printf(m, " [%d]", i);
1072                         }
1073         }
1074
1075         seq_printf(m, "\n\n");
1076
1077         return 0;
1078 }
1079
1080 static void *c_start(struct seq_file *m, loff_t *pos)
1081 {
1082         return *pos < NR_CPUS ? cpu_data + *pos : NULL;
1083 }
1084
1085 static void *c_next(struct seq_file *m, void *v, loff_t *pos)
1086 {
1087         ++*pos;
1088         return c_start(m, pos);
1089 }
1090
1091 static void c_stop(struct seq_file *m, void *v)
1092 {
1093 }
1094
1095 struct seq_operations cpuinfo_op = {
1096         .start =c_start,
1097         .next = c_next,
1098         .stop = c_stop,
1099         .show = show_cpuinfo,
1100 };