i386.c revision 1.19 1 /* $NetBSD: i386.c,v 1.19 2009/05/14 20:16:10 pgoyette Exp $ */
2
3 /*-
4 * Copyright (c) 1999, 2000, 2001, 2006, 2007, 2008 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Frank van der Linden, and by Jason R. Thorpe.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 /*-
33 * Copyright (c)2008 YAMAMOTO Takashi,
34 * All rights reserved.
35 *
36 * Redistribution and use in source and binary forms, with or without
37 * modification, are permitted provided that the following conditions
38 * are met:
39 * 1. Redistributions of source code must retain the above copyright
40 * notice, this list of conditions and the following disclaimer.
41 * 2. Redistributions in binary form must reproduce the above copyright
42 * notice, this list of conditions and the following disclaimer in the
43 * documentation and/or other materials provided with the distribution.
44 *
45 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
46 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
47 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
48 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
49 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
50 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
51 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
52 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
53 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
54 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
55 * SUCH DAMAGE.
56 */
57
58 #include <sys/cdefs.h>
59 #ifndef lint
60 __RCSID("$NetBSD: i386.c,v 1.19 2009/05/14 20:16:10 pgoyette Exp $");
61 #endif /* not lint */
62
63 #include <sys/types.h>
64 #include <sys/param.h>
65 #include <sys/bitops.h>
66 #include <sys/sysctl.h>
67
68 #include <string.h>
69 #include <stdio.h>
70 #include <stdlib.h>
71 #include <err.h>
72 #include <assert.h>
73 #include <math.h>
74 #include <util.h>
75
76 #include <machine/specialreg.h>
77 #include <machine/cpu.h>
78
79 #include <x86/cpuvar.h>
80 #include <x86/cputypes.h>
81 #include <x86/cacheinfo.h>
82
83 #include "../cpuctl.h"
84
85 /* Size of buffer for printing humanized numbers */
86 #define HUMAN_BUFSIZE sizeof("999KB")
87
88 #define x86_cpuid(a,b) x86_cpuid2((a),0,(b))
89
90 void x86_cpuid2(uint32_t, uint32_t, uint32_t *);
91 void x86_identify(void);
92
93 struct cpu_info {
94 const char *ci_dev;
95 int32_t ci_cpuid_level;
96 uint32_t ci_signature; /* X86 cpuid type */
97 uint32_t ci_feat_val[5]; /* X86 CPUID feature bits
98 * [0] basic features %edx
99 * [1] basic features %ecx
100 * [2] extended features %edx
101 * [3] extended features %ecx
102 * [4] VIA padlock features
103 */
104 uint32_t ci_cpu_class; /* CPU class */
105 uint32_t ci_brand_id; /* Intel brand id */
106 uint32_t ci_vendor[4]; /* vendor string */
107 uint32_t ci_cpu_serial[3]; /* PIII serial number */
108 uint64_t ci_tsc_freq; /* cpu cycles/second */
109 uint8_t ci_packageid;
110 uint8_t ci_coreid;
111 uint8_t ci_smtid;
112 uint32_t ci_initapicid;
113 struct x86_cache_info ci_cinfo[CAI_COUNT];
114 void (*ci_info)(struct cpu_info *);
115 };
116
117 struct cpu_nocpuid_nameclass {
118 int cpu_vendor;
119 const char *cpu_vendorname;
120 const char *cpu_name;
121 int cpu_class;
122 void (*cpu_setup)(struct cpu_info *);
123 void (*cpu_cacheinfo)(struct cpu_info *);
124 void (*cpu_info)(struct cpu_info *);
125 };
126
127 struct cpu_extend_nameclass {
128 int ext_model;
129 const char *cpu_models[CPU_MAXMODEL+1];
130 };
131
132 struct cpu_cpuid_nameclass {
133 const char *cpu_id;
134 int cpu_vendor;
135 const char *cpu_vendorname;
136 struct cpu_cpuid_family {
137 int cpu_class;
138 const char *cpu_models[CPU_MAXMODEL+2];
139 void (*cpu_setup)(struct cpu_info *);
140 void (*cpu_probe)(struct cpu_info *);
141 void (*cpu_info)(struct cpu_info *);
142 struct cpu_extend_nameclass *cpu_extended_names;
143 } cpu_family[CPU_MAXFAMILY - CPU_MINFAMILY + 1];
144 };
145
146 static const struct x86_cache_info intel_cpuid_cache_info[] = INTEL_CACHE_INFO;
147
148 /*
149 * Map Brand ID from cpuid instruction to brand name.
150 * Source: Intel Processor Identification and the CPUID Instruction, AP-485
151 */
152 static const char * const i386_intel_brand[] = {
153 "", /* Unsupported */
154 "Celeron", /* Intel (R) Celeron (TM) processor */
155 "Pentium III", /* Intel (R) Pentium (R) III processor */
156 "Pentium III Xeon", /* Intel (R) Pentium (R) III Xeon (TM) processor */
157 "Pentium III", /* Intel (R) Pentium (R) III processor */
158 "", /* Reserved */
159 "Mobile Pentium III", /* Mobile Intel (R) Pentium (R) III processor-M */
160 "Mobile Celeron", /* Mobile Intel (R) Celeron (R) processor */
161 "Pentium 4", /* Intel (R) Pentium (R) 4 processor */
162 "Pentium 4", /* Intel (R) Pentium (R) 4 processor */
163 "Celeron", /* Intel (R) Celeron (TM) processor */
164 "Xeon", /* Intel (R) Xeon (TM) processor */
165 "Xeon MP", /* Intel (R) Xeon (TM) processor MP */
166 "", /* Reserved */
167 "Mobile Pentium 4", /* Mobile Intel (R) Pentium (R) 4 processor-M */
168 "Mobile Celeron", /* Mobile Intel (R) Celeron (R) processor */
169 };
170
171 /*
172 * AMD processors don't have Brand IDs, so we need these names for probe.
173 */
174 static const char * const amd_brand[] = {
175 "",
176 "Duron", /* AMD Duron(tm) */
177 "MP", /* AMD Athlon(tm) MP */
178 "XP", /* AMD Athlon(tm) XP */
179 "4" /* AMD Athlon(tm) 4 */
180 };
181
182 static int cpu_vendor;
183 static char cpu_brand_string[49];
184 static char amd_brand_name[48];
185
186 static void via_cpu_probe(struct cpu_info *);
187 static void amd_family6_probe(struct cpu_info *);
188 static void intel_family_new_probe(struct cpu_info *);
189 static const char *intel_family6_name(struct cpu_info *);
190 static const char *amd_amd64_name(struct cpu_info *);
191 static void amd_family5_setup(struct cpu_info *);
192 static void transmeta_cpu_info(struct cpu_info *);
193 static const char *print_cache_config(struct cpu_info *, int, const char *,
194 const char *);
195 static const char *print_tlb_config(struct cpu_info *, int, const char *,
196 const char *);
197 static void amd_cpu_cacheinfo(struct cpu_info *);
198 static void via_cpu_cacheinfo(struct cpu_info *);
199 static void x86_print_cacheinfo(struct cpu_info *);
200 static const struct x86_cache_info *cache_info_lookup(
201 const struct x86_cache_info *, uint8_t);
202 static void cyrix6x86_cpu_setup(struct cpu_info *);
203 static void winchip_cpu_setup(struct cpu_info *);
204 static void amd_family5_setup(struct cpu_info *);
205 static void powernow_probe(struct cpu_info *);
206
207 /*
208 * Info for CTL_HW
209 */
210 static char cpu_model[120];
211
212 /*
213 * Note: these are just the ones that may not have a cpuid instruction.
214 * We deal with the rest in a different way.
215 */
216 const struct cpu_nocpuid_nameclass i386_nocpuid_cpus[] = {
217 { CPUVENDOR_INTEL, "Intel", "386SX", CPUCLASS_386,
218 NULL, NULL, NULL }, /* CPU_386SX */
219 { CPUVENDOR_INTEL, "Intel", "386DX", CPUCLASS_386,
220 NULL, NULL, NULL }, /* CPU_386 */
221 { CPUVENDOR_INTEL, "Intel", "486SX", CPUCLASS_486,
222 NULL, NULL, NULL }, /* CPU_486SX */
223 { CPUVENDOR_INTEL, "Intel", "486DX", CPUCLASS_486,
224 NULL, NULL, NULL }, /* CPU_486 */
225 { CPUVENDOR_CYRIX, "Cyrix", "486DLC", CPUCLASS_486,
226 NULL, NULL, NULL }, /* CPU_486DLC */
227 { CPUVENDOR_CYRIX, "Cyrix", "6x86", CPUCLASS_486,
228 NULL, NULL, NULL }, /* CPU_6x86 */
229 { CPUVENDOR_NEXGEN,"NexGen","586", CPUCLASS_386,
230 NULL, NULL, NULL }, /* CPU_NX586 */
231 };
232
233 const char *classnames[] = {
234 "386",
235 "486",
236 "586",
237 "686"
238 };
239
240 const char *modifiers[] = {
241 "",
242 "OverDrive",
243 "Dual",
244 ""
245 };
246
247 struct cpu_extend_nameclass intel_family6_ext_models[] = {
248 { /* Extended models 1x */
249 0x01, { NULL, NULL,
250 NULL, NULL,
251 NULL, "EP80579 Integrated Processor",
252 "Celeron (45nm)", "Core 2 Extreme",
253 NULL, NULL,
254 "Core i7 (Nehalem)", NULL,
255 "Atom", "XeonMP (Nehalem)",
256 NULL, NULL} },
257 { /* End of list */
258 0x00, { NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
259 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL} }
260 };
261
262 const struct cpu_cpuid_nameclass i386_cpuid_cpus[] = {
263 {
264 "GenuineIntel",
265 CPUVENDOR_INTEL,
266 "Intel",
267 /* Family 4 */
268 { {
269 CPUCLASS_486,
270 {
271 "486DX", "486DX", "486SX", "486DX2", "486SL",
272 "486SX2", 0, "486DX2 W/B Enhanced",
273 "486DX4", 0, 0, 0, 0, 0, 0, 0,
274 "486" /* Default */
275 },
276 NULL,
277 NULL,
278 NULL,
279 NULL,
280 },
281 /* Family 5 */
282 {
283 CPUCLASS_586,
284 {
285 "Pentium (P5 A-step)", "Pentium (P5)",
286 "Pentium (P54C)", "Pentium (P24T)",
287 "Pentium/MMX", "Pentium", 0,
288 "Pentium (P54C)", "Pentium/MMX (Tillamook)",
289 0, 0, 0, 0, 0, 0, 0,
290 "Pentium" /* Default */
291 },
292 NULL,
293 NULL,
294 NULL,
295 NULL,
296 },
297 /* Family 6 */
298 {
299 CPUCLASS_686,
300 {
301 "Pentium Pro (A-step)", "Pentium Pro", 0,
302 "Pentium II (Klamath)", "Pentium Pro",
303 "Pentium II/Celeron (Deschutes)",
304 "Celeron (Mendocino)",
305 "Pentium III (Katmai)",
306 "Pentium III (Coppermine)",
307 "Pentium M (Banias)",
308 "Pentium III Xeon (Cascades)",
309 "Pentium III (Tualatin)", 0,
310 "Pentium M (Dothan)",
311 "Pentium M (Yonah)",
312 "Core 2 (Merom)",
313 "Pentium Pro, II or III" /* Default */
314 },
315 NULL,
316 intel_family_new_probe,
317 NULL,
318 &intel_family6_ext_models[0],
319 },
320 /* Family > 6 */
321 {
322 CPUCLASS_686,
323 {
324 0, 0, 0, 0, 0, 0, 0, 0,
325 0, 0, 0, 0, 0, 0, 0, 0,
326 "Pentium 4" /* Default */
327 },
328 NULL,
329 intel_family_new_probe,
330 NULL,
331 NULL,
332 } }
333 },
334 {
335 "AuthenticAMD",
336 CPUVENDOR_AMD,
337 "AMD",
338 /* Family 4 */
339 { {
340 CPUCLASS_486,
341 {
342 0, 0, 0, "Am486DX2 W/T",
343 0, 0, 0, "Am486DX2 W/B",
344 "Am486DX4 W/T or Am5x86 W/T 150",
345 "Am486DX4 W/B or Am5x86 W/B 150", 0, 0,
346 0, 0, "Am5x86 W/T 133/160",
347 "Am5x86 W/B 133/160",
348 "Am486 or Am5x86" /* Default */
349 },
350 NULL,
351 NULL,
352 NULL,
353 NULL,
354 },
355 /* Family 5 */
356 {
357 CPUCLASS_586,
358 {
359 "K5", "K5", "K5", "K5", 0, 0, "K6",
360 "K6", "K6-2", "K6-III", "Geode LX", 0, 0,
361 "K6-2+/III+", 0, 0,
362 "K5 or K6" /* Default */
363 },
364 amd_family5_setup,
365 NULL,
366 amd_cpu_cacheinfo,
367 NULL,
368 },
369 /* Family 6 */
370 {
371 CPUCLASS_686,
372 {
373 0, "Athlon Model 1", "Athlon Model 2",
374 "Duron", "Athlon Model 4 (Thunderbird)",
375 0, "Athlon", "Duron", "Athlon", 0,
376 "Athlon", 0, 0, 0, 0, 0,
377 "K7 (Athlon)" /* Default */
378 },
379 NULL,
380 amd_family6_probe,
381 amd_cpu_cacheinfo,
382 NULL,
383 },
384 /* Family > 6 */
385 {
386 CPUCLASS_686,
387 {
388 0, 0, 0, 0, 0, 0, 0, 0,
389 0, 0, 0, 0, 0, 0, 0, 0,
390 "Unknown K8 (Athlon)" /* Default */
391 },
392 NULL,
393 amd_family6_probe,
394 amd_cpu_cacheinfo,
395 NULL,
396 } }
397 },
398 {
399 "CyrixInstead",
400 CPUVENDOR_CYRIX,
401 "Cyrix",
402 /* Family 4 */
403 { {
404 CPUCLASS_486,
405 {
406 0, 0, 0,
407 "MediaGX",
408 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
409 "486" /* Default */
410 },
411 cyrix6x86_cpu_setup, /* XXX ?? */
412 NULL,
413 NULL,
414 NULL,
415 },
416 /* Family 5 */
417 {
418 CPUCLASS_586,
419 {
420 0, 0, "6x86", 0,
421 "MMX-enhanced MediaGX (GXm)", /* or Geode? */
422 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
423 "6x86" /* Default */
424 },
425 cyrix6x86_cpu_setup,
426 NULL,
427 NULL,
428 NULL,
429 },
430 /* Family 6 */
431 {
432 CPUCLASS_686,
433 {
434 "6x86MX", 0, 0, 0, 0, 0, 0, 0,
435 0, 0, 0, 0, 0, 0, 0, 0,
436 "6x86MX" /* Default */
437 },
438 cyrix6x86_cpu_setup,
439 NULL,
440 NULL,
441 NULL,
442 },
443 /* Family > 6 */
444 {
445 CPUCLASS_686,
446 {
447 0, 0, 0, 0, 0, 0, 0, 0,
448 0, 0, 0, 0, 0, 0, 0, 0,
449 "Unknown 6x86MX" /* Default */
450 },
451 NULL,
452 NULL,
453 NULL,
454 NULL,
455 } }
456 },
457 { /* MediaGX is now owned by National Semiconductor */
458 "Geode by NSC",
459 CPUVENDOR_CYRIX, /* XXX */
460 "National Semiconductor",
461 /* Family 4, NSC never had any of these */
462 { {
463 CPUCLASS_486,
464 {
465 0, 0, 0, 0, 0, 0, 0, 0,
466 0, 0, 0, 0, 0, 0, 0, 0,
467 "486 compatible" /* Default */
468 },
469 NULL,
470 NULL,
471 NULL,
472 NULL,
473 },
474 /* Family 5: Geode family, formerly MediaGX */
475 {
476 CPUCLASS_586,
477 {
478 0, 0, 0, 0,
479 "Geode GX1",
480 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
481 "Geode" /* Default */
482 },
483 cyrix6x86_cpu_setup,
484 NULL,
485 amd_cpu_cacheinfo,
486 NULL,
487 },
488 /* Family 6, not yet available from NSC */
489 {
490 CPUCLASS_686,
491 {
492 0, 0, 0, 0, 0, 0, 0, 0,
493 0, 0, 0, 0, 0, 0, 0, 0,
494 "Pentium Pro compatible" /* Default */
495 },
496 NULL,
497 NULL,
498 NULL,
499 NULL,
500 },
501 /* Family > 6, not yet available from NSC */
502 {
503 CPUCLASS_686,
504 {
505 0, 0, 0, 0, 0, 0, 0, 0,
506 0, 0, 0, 0, 0, 0, 0, 0,
507 "Pentium Pro compatible" /* Default */
508 },
509 NULL,
510 NULL,
511 NULL,
512 NULL,
513 } }
514 },
515 {
516 "CentaurHauls",
517 CPUVENDOR_IDT,
518 "IDT",
519 /* Family 4, IDT never had any of these */
520 { {
521 CPUCLASS_486,
522 {
523 0, 0, 0, 0, 0, 0, 0, 0,
524 0, 0, 0, 0, 0, 0, 0, 0,
525 "486 compatible" /* Default */
526 },
527 NULL,
528 NULL,
529 NULL,
530 NULL,
531 },
532 /* Family 5 */
533 {
534 CPUCLASS_586,
535 {
536 0, 0, 0, 0, "WinChip C6", 0, 0, 0,
537 "WinChip 2", "WinChip 3", 0, 0, 0, 0, 0, 0,
538 "WinChip" /* Default */
539 },
540 winchip_cpu_setup,
541 NULL,
542 NULL,
543 NULL,
544 },
545 /* Family 6, VIA acquired IDT Centaur design subsidiary */
546 {
547 CPUCLASS_686,
548 {
549 0, 0, 0, 0, 0, 0, "C3 Samuel",
550 "C3 Samuel 2/Ezra", "C3 Ezra-T",
551 "C3 Nehemiah", "C7 Esther", 0, 0, 0, 0, 0,
552 "C3" /* Default */
553 },
554 NULL,
555 via_cpu_probe,
556 via_cpu_cacheinfo,
557 NULL,
558 },
559 /* Family > 6, not yet available from VIA */
560 {
561 CPUCLASS_686,
562 {
563 0, 0, 0, 0, 0, 0, 0, 0,
564 0, 0, 0, 0, 0, 0, 0, 0,
565 "Pentium Pro compatible" /* Default */
566 },
567 NULL,
568 NULL,
569 NULL,
570 NULL,
571 } }
572 },
573 {
574 "GenuineTMx86",
575 CPUVENDOR_TRANSMETA,
576 "Transmeta",
577 /* Family 4, Transmeta never had any of these */
578 { {
579 CPUCLASS_486,
580 {
581 0, 0, 0, 0, 0, 0, 0, 0,
582 0, 0, 0, 0, 0, 0, 0, 0,
583 "486 compatible" /* Default */
584 },
585 NULL,
586 NULL,
587 NULL,
588 NULL,
589 },
590 /* Family 5 */
591 {
592 CPUCLASS_586,
593 {
594 0, 0, 0, 0, 0, 0, 0, 0,
595 0, 0, 0, 0, 0, 0, 0, 0,
596 "Crusoe" /* Default */
597 },
598 NULL,
599 NULL,
600 transmeta_cpu_info,
601 NULL,
602 },
603 /* Family 6, not yet available from Transmeta */
604 {
605 CPUCLASS_686,
606 {
607 0, 0, 0, 0, 0, 0, 0, 0,
608 0, 0, 0, 0, 0, 0, 0, 0,
609 "Pentium Pro compatible" /* Default */
610 },
611 NULL,
612 NULL,
613 NULL,
614 NULL,
615 },
616 /* Family > 6, not yet available from Transmeta */
617 {
618 CPUCLASS_686,
619 {
620 0, 0, 0, 0, 0, 0, 0, 0,
621 0, 0, 0, 0, 0, 0, 0, 0,
622 "Pentium Pro compatible" /* Default */
623 },
624 NULL,
625 NULL,
626 NULL,
627 NULL,
628 } }
629 }
630 };
631
632 /*
633 * disable the TSC such that we don't use the TSC in microtime(9)
634 * because some CPUs got the implementation wrong.
635 */
636 static void
637 disable_tsc(struct cpu_info *ci)
638 {
639 if (ci->ci_feat_val[0] & CPUID_TSC) {
640 ci->ci_feat_val[0] &= ~CPUID_TSC;
641 aprint_error("WARNING: broken TSC disabled\n");
642 }
643 }
644
645 static void
646 cyrix6x86_cpu_setup(struct cpu_info *ci)
647 {
648
649 /*
650 * Do not disable the TSC on the Geode GX, it's reported to
651 * work fine.
652 */
653 if (ci->ci_signature != 0x552)
654 disable_tsc(ci);
655 }
656
657 void
658 winchip_cpu_setup(struct cpu_info *ci)
659 {
660 switch (CPUID2MODEL(ci->ci_signature)) { /* model */
661 case 4: /* WinChip C6 */
662 disable_tsc(ci);
663 }
664 }
665
666
667 static void
668 identifycpu_cpuids(struct cpu_info *ci)
669 {
670 const char *cpuname = ci->ci_dev;
671 u_int lp_max = 1; /* logical processors per package */
672 u_int smt_max; /* smt per core */
673 u_int core_max = 1; /* core per package */
674 u_int smt_bits, core_bits;
675 uint32_t descs[4];
676
677 aprint_verbose("%s: Initial APIC ID %u\n", cpuname, ci->ci_initapicid);
678 ci->ci_packageid = ci->ci_initapicid;
679 ci->ci_coreid = 0;
680 ci->ci_smtid = 0;
681 if (cpu_vendor != CPUVENDOR_INTEL) {
682 return;
683 }
684
685 /*
686 * 253668.pdf 7.10.2
687 */
688
689 if ((ci->ci_feat_val[0] & CPUID_HTT) != 0) {
690 x86_cpuid(1, descs);
691 lp_max = (descs[1] >> 16) & 0xff;
692 }
693 x86_cpuid(0, descs);
694 if (descs[0] >= 4) {
695 x86_cpuid2(4, 0, descs);
696 core_max = (descs[0] >> 26) + 1;
697 }
698 assert(lp_max >= core_max);
699 smt_max = lp_max / core_max;
700 smt_bits = ilog2(smt_max - 1) + 1;
701 core_bits = ilog2(core_max - 1) + 1;
702 if (smt_bits + core_bits) {
703 ci->ci_packageid = ci->ci_initapicid >> (smt_bits + core_bits);
704 }
705 aprint_verbose("%s: Cluster/Package ID %u\n", cpuname,
706 ci->ci_packageid);
707 if (core_bits) {
708 u_int core_mask = __BITS(smt_bits, smt_bits + core_bits - 1);
709
710 ci->ci_coreid =
711 __SHIFTOUT(ci->ci_initapicid, core_mask);
712 aprint_verbose("%s: Core ID %u\n", cpuname, ci->ci_coreid);
713 }
714 if (smt_bits) {
715 u_int smt_mask = __BITS((int)0, (int)(smt_bits - 1));
716
717 ci->ci_smtid = __SHIFTOUT(ci->ci_initapicid, smt_mask);
718 aprint_verbose("%s: SMT ID %u\n", cpuname, ci->ci_smtid);
719 }
720 }
721
722 static void
723 via_cpu_probe(struct cpu_info *ci)
724 {
725 u_int model = CPUID2MODEL(ci->ci_signature);
726 u_int stepping = CPUID2STEPPING(ci->ci_signature);
727 u_int descs[4];
728 u_int lfunc;
729
730 /*
731 * Determine the largest extended function value.
732 */
733 x86_cpuid(0x80000000, descs);
734 lfunc = descs[0];
735
736 /*
737 * Determine the extended feature flags.
738 */
739 if (lfunc >= 0x80000001) {
740 x86_cpuid(0x80000001, descs);
741 ci->ci_feat_val[2] |= descs[3];
742 }
743
744 if (model < 0x9)
745 return;
746
747 /* Nehemiah or Esther */
748 x86_cpuid(0xc0000000, descs);
749 lfunc = descs[0];
750 if (lfunc < 0xc0000001) /* no ACE, no RNG */
751 return;
752
753 x86_cpuid(0xc0000001, descs);
754 lfunc = descs[3];
755 if (model > 0x9 || stepping >= 8) { /* ACE */
756 if (lfunc & CPUID_VIA_HAS_ACE) {
757 ci->ci_feat_val[4] = lfunc;
758 }
759 }
760 }
761
762 static const char *
763 intel_family6_name(struct cpu_info *ci)
764 {
765 int model = CPUID2MODEL(ci->ci_signature);
766 const char *ret = NULL;
767 u_int l2cache = ci->ci_cinfo[CAI_L2CACHE].cai_totalsize;
768
769 if (model == 5) {
770 switch (l2cache) {
771 case 0:
772 case 128 * 1024:
773 ret = "Celeron (Covington)";
774 break;
775 case 256 * 1024:
776 ret = "Mobile Pentium II (Dixon)";
777 break;
778 case 512 * 1024:
779 ret = "Pentium II";
780 break;
781 case 1 * 1024 * 1024:
782 case 2 * 1024 * 1024:
783 ret = "Pentium II Xeon";
784 break;
785 }
786 } else if (model == 6) {
787 switch (l2cache) {
788 case 256 * 1024:
789 case 512 * 1024:
790 ret = "Mobile Pentium II";
791 break;
792 }
793 } else if (model == 7) {
794 switch (l2cache) {
795 case 512 * 1024:
796 ret = "Pentium III";
797 break;
798 case 1 * 1024 * 1024:
799 case 2 * 1024 * 1024:
800 ret = "Pentium III Xeon";
801 break;
802 }
803 } else if (model >= 8) {
804 if (ci->ci_brand_id && ci->ci_brand_id < 0x10) {
805 switch (ci->ci_brand_id) {
806 case 0x3:
807 if (ci->ci_signature == 0x6B1)
808 ret = "Celeron";
809 break;
810 case 0x8:
811 if (ci->ci_signature >= 0xF13)
812 ret = "genuine processor";
813 break;
814 case 0xB:
815 if (ci->ci_signature >= 0xF13)
816 ret = "Xeon MP";
817 break;
818 case 0xE:
819 if (ci->ci_signature < 0xF13)
820 ret = "Xeon";
821 break;
822 }
823 if (ret == NULL)
824 ret = i386_intel_brand[ci->ci_brand_id];
825 }
826 }
827
828 return ret;
829 }
830
831 /*
832 * Identify AMD64 CPU names from cpuid.
833 *
834 * Based on:
835 * "Revision Guide for AMD Athlon 64 and AMD Opteron Processors"
836 * http://www.amd.com/us-en/assets/content_type/white_papers_and_tech_docs/25759.pdf
837 * "Revision Guide for AMD NPT Family 0Fh Processors"
838 * http://www.amd.com/us-en/assets/content_type/white_papers_and_tech_docs/33610.pdf
839 * and other miscellaneous reports.
840 */
841 static const char *
842 amd_amd64_name(struct cpu_info *ci)
843 {
844 int extfamily, extmodel, model;
845 const char *ret = NULL;
846
847 model = CPUID2MODEL(ci->ci_signature);
848 extfamily = CPUID2EXTFAMILY(ci->ci_signature);
849 extmodel = CPUID2EXTMODEL(ci->ci_signature);
850
851 switch (extfamily) {
852 case 0x00:
853 switch (model) {
854 case 0x1:
855 switch (extmodel) {
856 case 0x2: /* rev JH-E1/E6 */
857 case 0x4: /* rev JH-F2 */
858 ret = "Dual-Core Opteron";
859 break;
860 }
861 break;
862 case 0x3:
863 switch (extmodel) {
864 case 0x2: /* rev JH-E6 (Toledo) */
865 ret = "Dual-Core Opteron or Athlon 64 X2";
866 break;
867 case 0x4: /* rev JH-F2 (Windsor) */
868 ret = "Athlon 64 FX or Athlon 64 X2";
869 break;
870 }
871 break;
872 case 0x4:
873 switch (extmodel) {
874 case 0x0: /* rev SH-B0/C0/CG (ClawHammer) */
875 case 0x1: /* rev SH-D0 */
876 ret = "Athlon 64";
877 break;
878 case 0x2: /* rev SH-E5 (Lancaster?) */
879 ret = "Mobile Athlon 64 or Turion 64";
880 break;
881 }
882 break;
883 case 0x5:
884 switch (extmodel) {
885 case 0x0: /* rev SH-B0/B3/C0/CG (SledgeHammer?) */
886 ret = "Opteron or Athlon 64 FX";
887 break;
888 case 0x1: /* rev SH-D0 */
889 case 0x2: /* rev SH-E4 */
890 ret = "Opteron";
891 break;
892 }
893 break;
894 case 0x7:
895 switch (extmodel) {
896 case 0x0: /* rev SH-CG (ClawHammer) */
897 case 0x1: /* rev SH-D0 */
898 ret = "Athlon 64";
899 break;
900 case 0x2: /* rev DH-E4, SH-E4 */
901 ret = "Athlon 64 or Athlon 64 FX or Opteron";
902 break;
903 }
904 break;
905 case 0x8:
906 switch (extmodel) {
907 case 0x0: /* rev CH-CG */
908 case 0x1: /* rev CH-D0 */
909 ret = "Athlon 64 or Sempron";
910 break;
911 case 0x4: /* rev BH-F2 */
912 ret = "Turion 64 X2";
913 break;
914 }
915 break;
916 case 0xb:
917 switch (extmodel) {
918 case 0x0: /* rev CH-CG */
919 case 0x1: /* rev CH-D0 */
920 ret = "Athlon 64";
921 break;
922 case 0x2: /* rev BH-E4 (Manchester) */
923 case 0x4: /* rev BH-F2 (Windsor) */
924 ret = "Athlon 64 X2";
925 break;
926 case 0x6: /* rev BH-G1 (Brisbane) */
927 ret = "Athlon X2 or Athlon 64 X2";
928 break;
929 }
930 break;
931 case 0xc:
932 switch (extmodel) {
933 case 0x0: /* rev DH-CG (Newcastle) */
934 case 0x1: /* rev DH-D0 (Winchester) */
935 case 0x2: /* rev DH-E3/E6 */
936 ret = "Athlon 64 or Sempron";
937 break;
938 }
939 break;
940 case 0xe:
941 switch (extmodel) {
942 case 0x0: /* rev DH-CG (Newcastle?) */
943 ret = "Athlon 64 or Sempron";
944 break;
945 }
946 break;
947 case 0xf:
948 switch (extmodel) {
949 case 0x0: /* rev DH-CG (Newcastle/Paris) */
950 case 0x1: /* rev DH-D0 (Winchester/Victoria) */
951 case 0x2: /* rev DH-E3/E6 (Venice/Palermo) */
952 case 0x4: /* rev DH-F2 (Orleans/Manila) */
953 case 0x5: /* rev DH-F2 (Orleans/Manila) */
954 case 0x6: /* rev DH-G1 */
955 ret = "Athlon 64 or Sempron";
956 break;
957 }
958 break;
959 default:
960 ret = "Unknown AMD64 CPU";
961 }
962 break;
963 case 0x01:
964 switch (model) {
965 case 0x02:
966 ret = "Family 10h";
967 break;
968 default:
969 ret = "Unknown AMD64 CPU";
970 break;
971 }
972 break;
973 }
974
975 return ret;
976 }
977
978 static void
979 cpu_probe_base_features(struct cpu_info *ci)
980 {
981 const struct x86_cache_info *cai;
982 u_int descs[4];
983 int iterations, i, j;
984 uint8_t desc;
985 uint32_t miscbytes;
986 uint32_t brand[12];
987
988 if (ci->ci_cpuid_level < 0)
989 return;
990
991 x86_cpuid(0, descs);
992 ci->ci_cpuid_level = descs[0];
993 ci->ci_vendor[0] = descs[1];
994 ci->ci_vendor[2] = descs[2];
995 ci->ci_vendor[1] = descs[3];
996 ci->ci_vendor[3] = 0;
997
998 x86_cpuid(0x80000000, brand);
999 if (brand[0] >= 0x80000004) {
1000 x86_cpuid(0x80000002, brand);
1001 x86_cpuid(0x80000003, brand + 4);
1002 x86_cpuid(0x80000004, brand + 8);
1003 for (i = 0; i < 48; i++)
1004 if (((char *) brand)[i] != ' ')
1005 break;
1006 memcpy(cpu_brand_string, ((char *) brand) + i, 48 - i);
1007 }
1008
1009 if (ci->ci_cpuid_level < 1)
1010 return;
1011
1012 x86_cpuid(1, descs);
1013 ci->ci_signature = descs[0];
1014 miscbytes = descs[1];
1015 ci->ci_feat_val[1] = descs[2];
1016 ci->ci_feat_val[0] = descs[3];
1017
1018 /* Brand is low order 8 bits of ebx */
1019 ci->ci_brand_id = miscbytes & 0xff;
1020 ci->ci_initapicid = (miscbytes >> 24) & 0xff;
1021 if (ci->ci_cpuid_level < 2)
1022 return;
1023
1024 /*
1025 * Parse the cache info from `cpuid', if we have it.
1026 * XXX This is kinda ugly, but hey, so is the architecture...
1027 */
1028
1029 x86_cpuid(2, descs);
1030
1031 iterations = descs[0] & 0xff;
1032 while (iterations-- > 0) {
1033 for (i = 0; i < 4; i++) {
1034 if (descs[i] & 0x80000000)
1035 continue;
1036 for (j = 0; j < 4; j++) {
1037 if (i == 0 && j == 0)
1038 continue;
1039 desc = (descs[i] >> (j * 8)) & 0xff;
1040 if (desc == 0)
1041 continue;
1042 cai = cache_info_lookup(intel_cpuid_cache_info,
1043 desc);
1044 if (cai != NULL)
1045 ci->ci_cinfo[cai->cai_index] = *cai;
1046 }
1047 }
1048 x86_cpuid(2, descs);
1049 }
1050
1051 if (ci->ci_cpuid_level < 3)
1052 return;
1053
1054 /*
1055 * If the processor serial number misfeature is present and supported,
1056 * extract it here.
1057 */
1058 if ((ci->ci_feat_val[0] & CPUID_PN) != 0) {
1059 ci->ci_cpu_serial[0] = ci->ci_signature;
1060 x86_cpuid(3, descs);
1061 ci->ci_cpu_serial[2] = descs[2];
1062 ci->ci_cpu_serial[1] = descs[3];
1063 }
1064 }
1065
1066 static void
1067 cpu_probe_features(struct cpu_info *ci)
1068 {
1069 const struct cpu_cpuid_nameclass *cpup = NULL;
1070 int i, xmax, family;
1071
1072 cpu_probe_base_features(ci);
1073
1074 if (ci->ci_cpuid_level < 1)
1075 return;
1076
1077 xmax = __arraycount(i386_cpuid_cpus);
1078 for (i = 0; i < xmax; i++) {
1079 if (!strncmp((char *)ci->ci_vendor,
1080 i386_cpuid_cpus[i].cpu_id, 12)) {
1081 cpup = &i386_cpuid_cpus[i];
1082 break;
1083 }
1084 }
1085
1086 if (cpup == NULL)
1087 return;
1088
1089 family = (ci->ci_signature >> 8) & 0xf;
1090
1091 if (family > CPU_MAXFAMILY) {
1092 family = CPU_MAXFAMILY;
1093 }
1094 i = family - CPU_MINFAMILY;
1095
1096 if (cpup->cpu_family[i].cpu_probe == NULL)
1097 return;
1098
1099 (*cpup->cpu_family[i].cpu_probe)(ci);
1100 }
1101
1102 static void
1103 intel_family_new_probe(struct cpu_info *ci)
1104 {
1105 uint32_t descs[4];
1106
1107 x86_cpuid(0x80000000, descs);
1108
1109 /*
1110 * Determine extended feature flags.
1111 */
1112 if (descs[0] >= 0x80000001) {
1113 x86_cpuid(0x80000001, descs);
1114 ci->ci_feat_val[2] |= descs[3];
1115 ci->ci_feat_val[3] |= descs[2];
1116 }
1117 }
1118
1119 static void
1120 amd_family6_probe(struct cpu_info *ci)
1121 {
1122 uint32_t descs[4];
1123 char *p;
1124 size_t i;
1125
1126 x86_cpuid(0x80000000, descs);
1127
1128 /*
1129 * Determine the extended feature flags.
1130 */
1131 if (descs[0] >= 0x80000001) {
1132 x86_cpuid(0x80000001, descs);
1133 ci->ci_feat_val[2] |= descs[3]; /* %edx */
1134 ci->ci_feat_val[3] = descs[2]; /* %ecx */
1135 }
1136
1137 if (*cpu_brand_string == '\0')
1138 return;
1139
1140 for (i = 1; i < __arraycount(amd_brand); i++)
1141 if ((p = strstr(cpu_brand_string, amd_brand[i])) != NULL) {
1142 ci->ci_brand_id = i;
1143 strlcpy(amd_brand_name, p, sizeof(amd_brand_name));
1144 break;
1145 }
1146 }
1147
1148 static void
1149 amd_family5_setup(struct cpu_info *ci)
1150 {
1151
1152 switch (CPUID2MODEL(ci->ci_signature)) {
1153 case 0: /* AMD-K5 Model 0 */
1154 /*
1155 * According to the AMD Processor Recognition App Note,
1156 * the AMD-K5 Model 0 uses the wrong bit to indicate
1157 * support for global PTEs, instead using bit 9 (APIC)
1158 * rather than bit 13 (i.e. "0x200" vs. 0x2000". Oops!).
1159 */
1160 if (ci->ci_feat_val[0] & CPUID_APIC)
1161 ci->ci_feat_val[0] =
1162 (ci->ci_feat_val[0] & ~CPUID_APIC) | CPUID_PGE;
1163 /*
1164 * XXX But pmap_pg_g is already initialized -- need to kick
1165 * XXX the pmap somehow. How does the MP branch do this?
1166 */
1167 break;
1168 }
1169 }
1170
1171 static void
1172 tmx86_get_longrun_status(u_int *frequency, u_int *voltage, u_int *percentage)
1173 {
1174 u_int descs[4];
1175
1176 x86_cpuid(0x80860007, descs);
1177 *frequency = descs[0];
1178 *voltage = descs[1];
1179 *percentage = descs[2];
1180 }
1181
1182 static void
1183 transmeta_cpu_info(struct cpu_info *ci)
1184 {
1185 u_int descs[4], nreg;
1186 u_int frequency, voltage, percentage;
1187
1188 x86_cpuid(0x80860000, descs);
1189 nreg = descs[0];
1190 if (nreg >= 0x80860001) {
1191 x86_cpuid(0x80860001, descs);
1192 aprint_verbose_dev(ci->ci_dev, "Processor revision %u.%u.%u.%u\n",
1193 (descs[1] >> 24) & 0xff,
1194 (descs[1] >> 16) & 0xff,
1195 (descs[1] >> 8) & 0xff,
1196 descs[1] & 0xff);
1197 }
1198 if (nreg >= 0x80860002) {
1199 x86_cpuid(0x80860002, descs);
1200 aprint_verbose_dev(ci->ci_dev, "Code Morphing Software Rev: %u.%u.%u-%u-%u\n",
1201 (descs[1] >> 24) & 0xff,
1202 (descs[1] >> 16) & 0xff,
1203 (descs[1] >> 8) & 0xff,
1204 descs[1] & 0xff,
1205 descs[2]);
1206 }
1207 if (nreg >= 0x80860006) {
1208 union {
1209 char text[65];
1210 u_int descs[4][4];
1211 } info;
1212 int i;
1213
1214 for (i=0; i<4; i++) {
1215 x86_cpuid(0x80860003 + i, info.descs[i]);
1216 }
1217 info.text[64] = '\0';
1218 aprint_verbose_dev(ci->ci_dev, "%s\n", info.text);
1219 }
1220
1221 if (nreg >= 0x80860007) {
1222 tmx86_get_longrun_status(&frequency,
1223 &voltage, &percentage);
1224 aprint_verbose_dev(ci->ci_dev, "LongRun <%dMHz %dmV %d%%>\n",
1225 frequency, voltage, percentage);
1226 }
1227 }
1228
1229 void
1230 identifycpu(const char *cpuname)
1231 {
1232 const char *name = "", *modifier, *vendorname, *brand = "";
1233 int class = CPUCLASS_386, i, xmax;
1234 int modif, family, model, ext_model;
1235 const struct cpu_extend_nameclass *modlist;
1236 const struct cpu_cpuid_nameclass *cpup = NULL;
1237 const struct cpu_cpuid_family *cpufam;
1238 const char *feature_str[5];
1239 struct cpu_info *ci, cistore;
1240 extern int cpu;
1241 extern int cpu_info_level;
1242 size_t sz;
1243 char buf[512];
1244 char *bp;
1245
1246 ci = &cistore;
1247 memset(ci, 0, sizeof(*ci));
1248 ci->ci_dev = cpuname;
1249
1250 x86_identify();
1251 ci->ci_cpuid_level = cpu_info_level;
1252 cpu_probe_features(ci);
1253
1254 if (ci->ci_cpuid_level == -1) {
1255 if ((size_t)cpu >= __arraycount(i386_nocpuid_cpus))
1256 errx(1, "unknown cpu type %d", cpu);
1257 name = i386_nocpuid_cpus[cpu].cpu_name;
1258 cpu_vendor = i386_nocpuid_cpus[cpu].cpu_vendor;
1259 vendorname = i386_nocpuid_cpus[cpu].cpu_vendorname;
1260 class = i386_nocpuid_cpus[cpu].cpu_class;
1261 ci->ci_info = i386_nocpuid_cpus[cpu].cpu_info;
1262 modifier = "";
1263 } else {
1264 xmax = __arraycount(i386_cpuid_cpus);
1265 modif = (ci->ci_signature >> 12) & 0x3;
1266 family = CPUID2FAMILY(ci->ci_signature);
1267 if (family < CPU_MINFAMILY)
1268 errx(1, "identifycpu: strange family value");
1269 model = CPUID2MODEL(ci->ci_signature);
1270 ext_model = CPUID2EXTMODEL(ci->ci_signature);
1271
1272 for (i = 0; i < xmax; i++) {
1273 if (!strncmp((char *)ci->ci_vendor,
1274 i386_cpuid_cpus[i].cpu_id, 12)) {
1275 cpup = &i386_cpuid_cpus[i];
1276 break;
1277 }
1278 }
1279
1280 if (cpup == NULL) {
1281 cpu_vendor = CPUVENDOR_UNKNOWN;
1282 if (ci->ci_vendor[0] != '\0')
1283 vendorname = (char *)&ci->ci_vendor[0];
1284 else
1285 vendorname = "Unknown";
1286 if (family >= CPU_MAXFAMILY)
1287 family = CPU_MINFAMILY;
1288 class = family - 3;
1289 modifier = "";
1290 name = "";
1291 ci->ci_info = NULL;
1292 } else {
1293 cpu_vendor = cpup->cpu_vendor;
1294 vendorname = cpup->cpu_vendorname;
1295 modifier = modifiers[modif];
1296 if (family > CPU_MAXFAMILY) {
1297 family = CPU_MAXFAMILY;
1298 model = CPU_DEFMODEL;
1299 } else if (model > CPU_MAXMODEL) {
1300 model = CPU_DEFMODEL;
1301 ext_model = 0;
1302 }
1303 cpufam = &cpup->cpu_family[family - CPU_MINFAMILY];
1304 if (cpufam->cpu_extended_names == NULL ||
1305 ext_model == 0)
1306 name = cpufam->cpu_models[model];
1307 else {
1308 /*
1309 * Scan list(s) of extended model names
1310 */
1311 modlist = cpufam->cpu_extended_names;
1312 while (modlist->ext_model != 0) {
1313 if (modlist->ext_model == ext_model) {
1314 name =
1315 modlist->cpu_models[model];
1316 break;
1317 }
1318 modlist++;
1319 }
1320 }
1321 if (name == NULL || *name == '\0')
1322 name = cpufam->cpu_models[CPU_DEFMODEL];
1323 class = cpufam->cpu_class;
1324 ci->ci_info = cpufam->cpu_info;
1325
1326 if (cpu_vendor == CPUVENDOR_INTEL) {
1327 if (family == 6 && model >= 5) {
1328 const char *tmp;
1329 tmp = intel_family6_name(ci);
1330 if (tmp != NULL)
1331 name = tmp;
1332 }
1333 if (family == CPU_MAXFAMILY &&
1334 ci->ci_brand_id <
1335 __arraycount(i386_intel_brand) &&
1336 i386_intel_brand[ci->ci_brand_id])
1337 name =
1338 i386_intel_brand[ci->ci_brand_id];
1339 }
1340
1341 if (cpu_vendor == CPUVENDOR_AMD) {
1342 if (family == 6 && model >= 6) {
1343 if (ci->ci_brand_id == 1)
1344 /*
1345 * It's Duron. We override the
1346 * name, since it might have
1347 * been misidentified as Athlon.
1348 */
1349 name =
1350 amd_brand[ci->ci_brand_id];
1351 else
1352 brand = amd_brand_name;
1353 }
1354 if (CPUID2FAMILY(ci->ci_signature) == 0xf) {
1355 /*
1356 * Identify AMD64 CPU names.
1357 * Note family value is clipped by
1358 * CPU_MAXFAMILY.
1359 */
1360 const char *tmp;
1361 tmp = amd_amd64_name(ci);
1362 if (tmp != NULL)
1363 name = tmp;
1364 }
1365 }
1366
1367 if (cpu_vendor == CPUVENDOR_IDT && family >= 6)
1368 vendorname = "VIA";
1369 }
1370 }
1371
1372 ci->ci_cpu_class = class;
1373
1374 sz = sizeof(ci->ci_tsc_freq);
1375 (void)sysctlbyname("machdep.tsc_freq", &ci->ci_tsc_freq, &sz, NULL, 0);
1376
1377 snprintf(cpu_model, sizeof(cpu_model), "%s%s%s%s%s%s%s (%s-class)",
1378 vendorname,
1379 *modifier ? " " : "", modifier,
1380 *name ? " " : "", name,
1381 *brand ? " " : "", brand,
1382 classnames[class]);
1383 aprint_normal("%s: %s", cpuname, cpu_model);
1384
1385 if (ci->ci_tsc_freq != 0)
1386 aprint_normal(", %qd.%02qd MHz",
1387 (ci->ci_tsc_freq + 4999) / 1000000,
1388 ((ci->ci_tsc_freq + 4999) / 10000) % 100);
1389 if (ci->ci_signature != 0)
1390 aprint_normal(", id 0x%x", ci->ci_signature);
1391 aprint_normal("\n");
1392
1393 if (ci->ci_info)
1394 (*ci->ci_info)(ci);
1395
1396 /*
1397 * display CPU feature flags
1398 */
1399
1400 #define MAX_FEATURE_LEN 60 /* XXX Need to find a better way to set this */
1401
1402 feature_str[0] = CPUID_FLAGS1;
1403 feature_str[1] = CPUID2_FLAGS1;
1404 feature_str[2] = CPUID_EXT_FLAGS;
1405 feature_str[3] = NULL;
1406 feature_str[4] = NULL;
1407
1408 switch (cpu_vendor) {
1409 case CPUVENDOR_AMD:
1410 feature_str[3] = CPUID_AMD_FLAGS4;
1411 break;
1412 case CPUVENDOR_INTEL:
1413 feature_str[2] = CPUID_INTEL_EXT_FLAGS;
1414 feature_str[3] = CPUID_INTEL_FLAGS4;
1415 break;
1416 case CPUVENDOR_CYRIX:
1417 feature_str[4] = CPUID_FLAGS_PADLOCK;
1418 /* FALLTHRU */
1419 default:
1420 break;
1421 }
1422
1423 for (i = 0; i <= 4; i++) {
1424 if (ci->ci_feat_val[i] && feature_str[i] != NULL) {
1425 snprintb_m(buf, sizeof(buf), feature_str[i],
1426 ci->ci_feat_val[i], MAX_FEATURE_LEN);
1427 bp = buf;
1428 while (*bp != '\0') {
1429 aprint_verbose("%s: %sfeatures%c %s\n",
1430 cpuname, (i == 4)?"padlock ":"",
1431 (i == 4 || i == 0)?' ':'1' + i, bp);
1432 bp += strlen(bp) + 1;
1433 }
1434 }
1435 }
1436
1437 if (*cpu_brand_string != '\0')
1438 aprint_normal("%s: \"%s\"\n", cpuname, cpu_brand_string);
1439
1440 x86_print_cacheinfo(ci);
1441
1442 if (ci->ci_cpuid_level >= 3 && (ci->ci_feat_val[0] & CPUID_PN)) {
1443 aprint_verbose("%s: serial number %04X-%04X-%04X-%04X-%04X-%04X\n",
1444 cpuname,
1445 ci->ci_cpu_serial[0] / 65536, ci->ci_cpu_serial[0] % 65536,
1446 ci->ci_cpu_serial[1] / 65536, ci->ci_cpu_serial[1] % 65536,
1447 ci->ci_cpu_serial[2] / 65536, ci->ci_cpu_serial[2] % 65536);
1448 }
1449
1450 if (ci->ci_cpu_class == CPUCLASS_386) {
1451 errx(1, "NetBSD requires an 80486 or later processor");
1452 }
1453
1454 if (cpu == CPU_486DLC) {
1455 #ifndef CYRIX_CACHE_WORKS
1456 aprint_error("WARNING: CYRIX 486DLC CACHE UNCHANGED.\n");
1457 #else
1458 #ifndef CYRIX_CACHE_REALLY_WORKS
1459 aprint_error("WARNING: CYRIX 486DLC CACHE ENABLED IN HOLD-FLUSH MODE.\n");
1460 #else
1461 aprint_error("WARNING: CYRIX 486DLC CACHE ENABLED.\n");
1462 #endif
1463 #endif
1464 }
1465
1466 /*
1467 * Everything past this point requires a Pentium or later.
1468 */
1469 if (ci->ci_cpuid_level < 0)
1470 return;
1471
1472 identifycpu_cpuids(ci);
1473
1474 #ifdef INTEL_CORETEMP
1475 if (cpu_vendor == CPUVENDOR_INTEL && ci->ci_cpuid_level >= 0x06)
1476 coretemp_register(ci);
1477 #endif
1478
1479 if (cpu_vendor == CPUVENDOR_AMD) {
1480 powernow_probe(ci);
1481
1482 if ((ci->ci_feat_val[3] & CPUID_SVM) != 0) {
1483 uint32_t data[4];
1484
1485 x86_cpuid(0x8000000a, data);
1486 aprint_verbose("%s: SVM Rev. %d\n", cpuname,
1487 data[0] & 0xf);
1488 aprint_verbose("%s: SVM NASID %d\n", cpuname, data[1]);
1489 snprintb(buf, sizeof(buf), CPUID_AMD_SVM_FLAGS,
1490 data[3]);
1491 aprint_verbose("%s: SVM features %s\n", cpuname, buf);
1492 }
1493 }
1494
1495 #ifdef INTEL_ONDEMAND_CLOCKMOD
1496 clockmod_init();
1497 #endif
1498
1499 aprint_normal_dev(ci->ci_dev, "family %02x model %02x "
1500 "extfamily %02x extmodel %02x\n", CPUID2FAMILY(ci->ci_signature),
1501 CPUID2MODEL(ci->ci_signature), CPUID2EXTFAMILY(ci->ci_signature),
1502 CPUID2EXTMODEL(ci->ci_signature));
1503 }
1504
1505 static const char *
1506 print_cache_config(struct cpu_info *ci, int cache_tag, const char *name,
1507 const char *sep)
1508 {
1509 struct x86_cache_info *cai = &ci->ci_cinfo[cache_tag];
1510 char human_num[HUMAN_BUFSIZE];
1511
1512 if (cai->cai_totalsize == 0)
1513 return sep;
1514
1515 if (sep == NULL)
1516 aprint_verbose_dev(ci->ci_dev, "");
1517 else
1518 aprint_verbose("%s", sep);
1519 if (name != NULL)
1520 aprint_verbose("%s ", name);
1521
1522 if (cai->cai_string != NULL) {
1523 aprint_verbose("%s ", cai->cai_string);
1524 } else {
1525 (void)humanize_number(human_num, sizeof(human_num),
1526 cai->cai_totalsize, "B", HN_AUTOSCALE, HN_NOSPACE);
1527 aprint_verbose("%s %dB/line ", human_num, cai->cai_linesize);
1528 }
1529 switch (cai->cai_associativity) {
1530 case 0:
1531 aprint_verbose("disabled");
1532 break;
1533 case 1:
1534 aprint_verbose("direct-mapped");
1535 break;
1536 case 0xff:
1537 aprint_verbose("fully associative");
1538 break;
1539 default:
1540 aprint_verbose("%d-way", cai->cai_associativity);
1541 break;
1542 }
1543 return ", ";
1544 }
1545
1546 static const char *
1547 print_tlb_config(struct cpu_info *ci, int cache_tag, const char *name,
1548 const char *sep)
1549 {
1550 struct x86_cache_info *cai = &ci->ci_cinfo[cache_tag];
1551 char human_num[HUMAN_BUFSIZE];
1552
1553 if (cai->cai_totalsize == 0)
1554 return sep;
1555
1556 if (sep == NULL)
1557 aprint_verbose_dev(ci->ci_dev, "");
1558 else
1559 aprint_verbose("%s", sep);
1560 if (name != NULL)
1561 aprint_verbose("%s ", name);
1562
1563 if (cai->cai_string != NULL) {
1564 aprint_verbose("%s", cai->cai_string);
1565 } else {
1566 (void)humanize_number(human_num, sizeof(human_num),
1567 cai->cai_linesize, "B", HN_AUTOSCALE, HN_NOSPACE);
1568 aprint_verbose("%d %s entries ", cai->cai_totalsize,
1569 human_num);
1570 switch (cai->cai_associativity) {
1571 case 0:
1572 aprint_verbose("disabled");
1573 break;
1574 case 1:
1575 aprint_verbose("direct-mapped");
1576 break;
1577 case 0xff:
1578 aprint_verbose("fully associative");
1579 break;
1580 default:
1581 aprint_verbose("%d-way", cai->cai_associativity);
1582 break;
1583 }
1584 }
1585 return ", ";
1586 }
1587
1588 static const struct x86_cache_info *
1589 cache_info_lookup(const struct x86_cache_info *cai, uint8_t desc)
1590 {
1591 int i;
1592
1593 for (i = 0; cai[i].cai_desc != 0; i++) {
1594 if (cai[i].cai_desc == desc)
1595 return (&cai[i]);
1596 }
1597
1598 return (NULL);
1599 }
1600
1601 static const struct x86_cache_info amd_cpuid_l2cache_assoc_info[] =
1602 AMD_L2CACHE_INFO;
1603
1604 static const struct x86_cache_info amd_cpuid_l3cache_assoc_info[] =
1605 AMD_L3CACHE_INFO;
1606
1607 static void
1608 amd_cpu_cacheinfo(struct cpu_info *ci)
1609 {
1610 const struct x86_cache_info *cp;
1611 struct x86_cache_info *cai;
1612 int family, model;
1613 u_int descs[4];
1614 u_int lfunc;
1615
1616 family = (ci->ci_signature >> 8) & 15;
1617 model = CPUID2MODEL(ci->ci_signature);
1618
1619 /*
1620 * K5 model 0 has none of this info.
1621 */
1622 if (family == 5 && model == 0)
1623 return;
1624
1625 /*
1626 * Get extended values for K8 and up.
1627 */
1628 if (family == 0xf) {
1629 family += CPUID2EXTFAMILY(ci->ci_signature);
1630 model += CPUID2EXTMODEL(ci->ci_signature);
1631 }
1632
1633 /*
1634 * Determine the largest extended function value.
1635 */
1636 x86_cpuid(0x80000000, descs);
1637 lfunc = descs[0];
1638
1639 /*
1640 * Determine L1 cache/TLB info.
1641 */
1642 if (lfunc < 0x80000005) {
1643 /* No L1 cache info available. */
1644 return;
1645 }
1646
1647 x86_cpuid(0x80000005, descs);
1648
1649 /*
1650 * K6-III and higher have large page TLBs.
1651 */
1652 if ((family == 5 && model >= 9) || family >= 6) {
1653 cai = &ci->ci_cinfo[CAI_ITLB2];
1654 cai->cai_totalsize = AMD_L1_EAX_ITLB_ENTRIES(descs[0]);
1655 cai->cai_associativity = AMD_L1_EAX_ITLB_ASSOC(descs[0]);
1656 cai->cai_linesize = (4 * 1024 * 1024);
1657
1658 cai = &ci->ci_cinfo[CAI_DTLB2];
1659 cai->cai_totalsize = AMD_L1_EAX_DTLB_ENTRIES(descs[0]);
1660 cai->cai_associativity = AMD_L1_EAX_DTLB_ASSOC(descs[0]);
1661 cai->cai_linesize = (4 * 1024 * 1024);
1662 }
1663
1664 cai = &ci->ci_cinfo[CAI_ITLB];
1665 cai->cai_totalsize = AMD_L1_EBX_ITLB_ENTRIES(descs[1]);
1666 cai->cai_associativity = AMD_L1_EBX_ITLB_ASSOC(descs[1]);
1667 cai->cai_linesize = (4 * 1024);
1668
1669 cai = &ci->ci_cinfo[CAI_DTLB];
1670 cai->cai_totalsize = AMD_L1_EBX_DTLB_ENTRIES(descs[1]);
1671 cai->cai_associativity = AMD_L1_EBX_DTLB_ASSOC(descs[1]);
1672 cai->cai_linesize = (4 * 1024);
1673
1674 cai = &ci->ci_cinfo[CAI_DCACHE];
1675 cai->cai_totalsize = AMD_L1_ECX_DC_SIZE(descs[2]);
1676 cai->cai_associativity = AMD_L1_ECX_DC_ASSOC(descs[2]);
1677 cai->cai_linesize = AMD_L1_EDX_IC_LS(descs[2]);
1678
1679 cai = &ci->ci_cinfo[CAI_ICACHE];
1680 cai->cai_totalsize = AMD_L1_EDX_IC_SIZE(descs[3]);
1681 cai->cai_associativity = AMD_L1_EDX_IC_ASSOC(descs[3]);
1682 cai->cai_linesize = AMD_L1_EDX_IC_LS(descs[3]);
1683
1684 /*
1685 * Determine L2 cache/TLB info.
1686 */
1687 if (lfunc < 0x80000006) {
1688 /* No L2 cache info available. */
1689 return;
1690 }
1691
1692 x86_cpuid(0x80000006, descs);
1693
1694 cai = &ci->ci_cinfo[CAI_L2CACHE];
1695 cai->cai_totalsize = AMD_L2_ECX_C_SIZE(descs[2]);
1696 cai->cai_associativity = AMD_L2_ECX_C_ASSOC(descs[2]);
1697 cai->cai_linesize = AMD_L2_ECX_C_LS(descs[2]);
1698
1699 cp = cache_info_lookup(amd_cpuid_l2cache_assoc_info,
1700 cai->cai_associativity);
1701 if (cp != NULL)
1702 cai->cai_associativity = cp->cai_associativity;
1703 else
1704 cai->cai_associativity = 0; /* XXX Unknown/reserved */
1705
1706 /*
1707 * Determine L3 cache info on AMD Family 10h processors
1708 */
1709 if (family == 0x10) {
1710 cai = &ci->ci_cinfo[CAI_L3CACHE];
1711 cai->cai_totalsize = AMD_L3_EDX_C_SIZE(descs[3]);
1712 cai->cai_associativity = AMD_L3_EDX_C_ASSOC(descs[3]);
1713 cai->cai_linesize = AMD_L3_EDX_C_LS(descs[3]);
1714
1715 cp = cache_info_lookup(amd_cpuid_l3cache_assoc_info,
1716 cai->cai_associativity);
1717 if (cp != NULL)
1718 cai->cai_associativity = cp->cai_associativity;
1719 else
1720 cai->cai_associativity = 0; /* XXX Unkn/Rsvd */
1721 }
1722 }
1723
1724 static void
1725 via_cpu_cacheinfo(struct cpu_info *ci)
1726 {
1727 struct x86_cache_info *cai;
1728 int family, model, stepping;
1729 u_int descs[4];
1730 u_int lfunc;
1731
1732 family = (ci->ci_signature >> 8) & 15;
1733 model = CPUID2MODEL(ci->ci_signature);
1734 stepping = CPUID2STEPPING(ci->ci_signature);
1735
1736 /*
1737 * Determine the largest extended function value.
1738 */
1739 x86_cpuid(0x80000000, descs);
1740 lfunc = descs[0];
1741
1742 /*
1743 * Determine L1 cache/TLB info.
1744 */
1745 if (lfunc < 0x80000005) {
1746 /* No L1 cache info available. */
1747 return;
1748 }
1749
1750 x86_cpuid(0x80000005, descs);
1751
1752 cai = &ci->ci_cinfo[CAI_ITLB];
1753 cai->cai_totalsize = VIA_L1_EBX_ITLB_ENTRIES(descs[1]);
1754 cai->cai_associativity = VIA_L1_EBX_ITLB_ASSOC(descs[1]);
1755 cai->cai_linesize = (4 * 1024);
1756
1757 cai = &ci->ci_cinfo[CAI_DTLB];
1758 cai->cai_totalsize = VIA_L1_EBX_DTLB_ENTRIES(descs[1]);
1759 cai->cai_associativity = VIA_L1_EBX_DTLB_ASSOC(descs[1]);
1760 cai->cai_linesize = (4 * 1024);
1761
1762 cai = &ci->ci_cinfo[CAI_DCACHE];
1763 cai->cai_totalsize = VIA_L1_ECX_DC_SIZE(descs[2]);
1764 cai->cai_associativity = VIA_L1_ECX_DC_ASSOC(descs[2]);
1765 cai->cai_linesize = VIA_L1_EDX_IC_LS(descs[2]);
1766 if (model == 9 && stepping == 8) {
1767 /* Erratum: stepping 8 reports 4 when it should be 2 */
1768 cai->cai_associativity = 2;
1769 }
1770
1771 cai = &ci->ci_cinfo[CAI_ICACHE];
1772 cai->cai_totalsize = VIA_L1_EDX_IC_SIZE(descs[3]);
1773 cai->cai_associativity = VIA_L1_EDX_IC_ASSOC(descs[3]);
1774 cai->cai_linesize = VIA_L1_EDX_IC_LS(descs[3]);
1775 if (model == 9 && stepping == 8) {
1776 /* Erratum: stepping 8 reports 4 when it should be 2 */
1777 cai->cai_associativity = 2;
1778 }
1779
1780 /*
1781 * Determine L2 cache/TLB info.
1782 */
1783 if (lfunc < 0x80000006) {
1784 /* No L2 cache info available. */
1785 return;
1786 }
1787
1788 x86_cpuid(0x80000006, descs);
1789
1790 cai = &ci->ci_cinfo[CAI_L2CACHE];
1791 if (model >= 9) {
1792 cai->cai_totalsize = VIA_L2N_ECX_C_SIZE(descs[2]);
1793 cai->cai_associativity = VIA_L2N_ECX_C_ASSOC(descs[2]);
1794 cai->cai_linesize = VIA_L2N_ECX_C_LS(descs[2]);
1795 } else {
1796 cai->cai_totalsize = VIA_L2_ECX_C_SIZE(descs[2]);
1797 cai->cai_associativity = VIA_L2_ECX_C_ASSOC(descs[2]);
1798 cai->cai_linesize = VIA_L2_ECX_C_LS(descs[2]);
1799 }
1800 }
1801
1802 static void
1803 x86_print_cacheinfo(struct cpu_info *ci)
1804 {
1805 const char *sep;
1806
1807 if (ci->ci_cinfo[CAI_ICACHE].cai_totalsize != 0 ||
1808 ci->ci_cinfo[CAI_DCACHE].cai_totalsize != 0) {
1809 sep = print_cache_config(ci, CAI_ICACHE, "I-cache", NULL);
1810 sep = print_cache_config(ci, CAI_DCACHE, "D-cache", sep);
1811 if (sep != NULL)
1812 aprint_verbose("\n");
1813 }
1814 if (ci->ci_cinfo[CAI_L2CACHE].cai_totalsize != 0) {
1815 sep = print_cache_config(ci, CAI_L2CACHE, "L2 cache", NULL);
1816 if (sep != NULL)
1817 aprint_verbose("\n");
1818 }
1819 if (ci->ci_cinfo[CAI_ITLB].cai_totalsize != 0) {
1820 sep = print_tlb_config(ci, CAI_ITLB, "ITLB", NULL);
1821 sep = print_tlb_config(ci, CAI_ITLB2, NULL, sep);
1822 if (sep != NULL)
1823 aprint_verbose("\n");
1824 }
1825 if (ci->ci_cinfo[CAI_DTLB].cai_totalsize != 0) {
1826 sep = print_tlb_config(ci, CAI_DTLB, "DTLB", NULL);
1827 sep = print_tlb_config(ci, CAI_DTLB2, NULL, sep);
1828 if (sep != NULL)
1829 aprint_verbose("\n");
1830 }
1831 if (ci->ci_cinfo[CAI_L3CACHE].cai_totalsize != 0) {
1832 sep = print_cache_config(ci, CAI_L3CACHE, "L3 cache", NULL);
1833 if (sep != NULL)
1834 aprint_verbose("\n");
1835 }
1836 }
1837
1838 static void
1839 powernow_probe(struct cpu_info *ci)
1840 {
1841 uint32_t regs[4];
1842 char buf[256];
1843
1844 x86_cpuid(0x80000000, regs);
1845
1846 /* We need CPUID(0x80000007) */
1847 if (regs[0] < 0x80000007)
1848 return;
1849 x86_cpuid(0x80000007, regs);
1850
1851 snprintb(buf, sizeof(buf), CPUID_APM_FLAGS, regs[3]);
1852 aprint_normal_dev(ci->ci_dev, "AMD Power Management features: %s\n",
1853 buf);
1854 }
1855