Loading...
1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * Intel CPU Microcode Update Driver for Linux
4 *
5 * Copyright (C) 2000-2006 Tigran Aivazian <aivazian.tigran@gmail.com>
6 * 2006 Shaohua Li <shaohua.li@intel.com>
7 *
8 * Intel CPU microcode early update for Linux
9 *
10 * Copyright (C) 2012 Fenghua Yu <fenghua.yu@intel.com>
11 * H Peter Anvin" <hpa@zytor.com>
12 */
13#define pr_fmt(fmt) "microcode: " fmt
14#include <linux/earlycpio.h>
15#include <linux/firmware.h>
16#include <linux/uaccess.h>
17#include <linux/initrd.h>
18#include <linux/kernel.h>
19#include <linux/slab.h>
20#include <linux/cpu.h>
21#include <linux/uio.h>
22#include <linux/mm.h>
23
24#include <asm/cpu_device_id.h>
25#include <asm/processor.h>
26#include <asm/tlbflush.h>
27#include <asm/setup.h>
28#include <asm/msr.h>
29
30#include "internal.h"
31
32static const char ucode_path[] = "kernel/x86/microcode/GenuineIntel.bin";
33
34#define UCODE_BSP_LOADED ((struct microcode_intel *)0x1UL)
35
36/* Current microcode patch used in early patching on the APs. */
37static struct microcode_intel *ucode_patch_va __read_mostly;
38static struct microcode_intel *ucode_patch_late __read_mostly;
39
40/* last level cache size per core */
41static unsigned int llc_size_per_core __ro_after_init;
42
43/* microcode format is extended from prescott processors */
44struct extended_signature {
45 unsigned int sig;
46 unsigned int pf;
47 unsigned int cksum;
48};
49
50struct extended_sigtable {
51 unsigned int count;
52 unsigned int cksum;
53 unsigned int reserved[3];
54 struct extended_signature sigs[];
55};
56
57#define DEFAULT_UCODE_TOTALSIZE (DEFAULT_UCODE_DATASIZE + MC_HEADER_SIZE)
58#define EXT_HEADER_SIZE (sizeof(struct extended_sigtable))
59#define EXT_SIGNATURE_SIZE (sizeof(struct extended_signature))
60
61static inline unsigned int get_totalsize(struct microcode_header_intel *hdr)
62{
63 return hdr->datasize ? hdr->totalsize : DEFAULT_UCODE_TOTALSIZE;
64}
65
66static inline unsigned int exttable_size(struct extended_sigtable *et)
67{
68 return et->count * EXT_SIGNATURE_SIZE + EXT_HEADER_SIZE;
69}
70
71void intel_collect_cpu_info(struct cpu_signature *sig)
72{
73 sig->sig = cpuid_eax(1);
74 sig->pf = 0;
75 sig->rev = intel_get_microcode_revision();
76
77 if (x86_model(sig->sig) >= 5 || x86_family(sig->sig) > 6) {
78 unsigned int val[2];
79
80 /* get processor flags from MSR 0x17 */
81 native_rdmsr(MSR_IA32_PLATFORM_ID, val[0], val[1]);
82 sig->pf = 1 << ((val[1] >> 18) & 7);
83 }
84}
85EXPORT_SYMBOL_GPL(intel_collect_cpu_info);
86
87static inline bool cpu_signatures_match(struct cpu_signature *s1, unsigned int sig2,
88 unsigned int pf2)
89{
90 if (s1->sig != sig2)
91 return false;
92
93 /* Processor flags are either both 0 or they intersect. */
94 return ((!s1->pf && !pf2) || (s1->pf & pf2));
95}
96
97bool intel_find_matching_signature(void *mc, struct cpu_signature *sig)
98{
99 struct microcode_header_intel *mc_hdr = mc;
100 struct extended_signature *ext_sig;
101 struct extended_sigtable *ext_hdr;
102 int i;
103
104 if (cpu_signatures_match(sig, mc_hdr->sig, mc_hdr->pf))
105 return true;
106
107 /* Look for ext. headers: */
108 if (get_totalsize(mc_hdr) <= intel_microcode_get_datasize(mc_hdr) + MC_HEADER_SIZE)
109 return false;
110
111 ext_hdr = mc + intel_microcode_get_datasize(mc_hdr) + MC_HEADER_SIZE;
112 ext_sig = (void *)ext_hdr + EXT_HEADER_SIZE;
113
114 for (i = 0; i < ext_hdr->count; i++) {
115 if (cpu_signatures_match(sig, ext_sig->sig, ext_sig->pf))
116 return true;
117 ext_sig++;
118 }
119 return 0;
120}
121EXPORT_SYMBOL_GPL(intel_find_matching_signature);
122
123/**
124 * intel_microcode_sanity_check() - Sanity check microcode file.
125 * @mc: Pointer to the microcode file contents.
126 * @print_err: Display failure reason if true, silent if false.
127 * @hdr_type: Type of file, i.e. normal microcode file or In Field Scan file.
128 * Validate if the microcode header type matches with the type
129 * specified here.
130 *
131 * Validate certain header fields and verify if computed checksum matches
132 * with the one specified in the header.
133 *
134 * Return: 0 if the file passes all the checks, -EINVAL if any of the checks
135 * fail.
136 */
137int intel_microcode_sanity_check(void *mc, bool print_err, int hdr_type)
138{
139 unsigned long total_size, data_size, ext_table_size;
140 struct microcode_header_intel *mc_header = mc;
141 struct extended_sigtable *ext_header = NULL;
142 u32 sum, orig_sum, ext_sigcount = 0, i;
143 struct extended_signature *ext_sig;
144
145 total_size = get_totalsize(mc_header);
146 data_size = intel_microcode_get_datasize(mc_header);
147
148 if (data_size + MC_HEADER_SIZE > total_size) {
149 if (print_err)
150 pr_err("Error: bad microcode data file size.\n");
151 return -EINVAL;
152 }
153
154 if (mc_header->ldrver != 1 || mc_header->hdrver != hdr_type) {
155 if (print_err)
156 pr_err("Error: invalid/unknown microcode update format. Header type %d\n",
157 mc_header->hdrver);
158 return -EINVAL;
159 }
160
161 ext_table_size = total_size - (MC_HEADER_SIZE + data_size);
162 if (ext_table_size) {
163 u32 ext_table_sum = 0;
164 u32 *ext_tablep;
165
166 if (ext_table_size < EXT_HEADER_SIZE ||
167 ((ext_table_size - EXT_HEADER_SIZE) % EXT_SIGNATURE_SIZE)) {
168 if (print_err)
169 pr_err("Error: truncated extended signature table.\n");
170 return -EINVAL;
171 }
172
173 ext_header = mc + MC_HEADER_SIZE + data_size;
174 if (ext_table_size != exttable_size(ext_header)) {
175 if (print_err)
176 pr_err("Error: extended signature table size mismatch.\n");
177 return -EFAULT;
178 }
179
180 ext_sigcount = ext_header->count;
181
182 /*
183 * Check extended table checksum: the sum of all dwords that
184 * comprise a valid table must be 0.
185 */
186 ext_tablep = (u32 *)ext_header;
187
188 i = ext_table_size / sizeof(u32);
189 while (i--)
190 ext_table_sum += ext_tablep[i];
191
192 if (ext_table_sum) {
193 if (print_err)
194 pr_warn("Bad extended signature table checksum, aborting.\n");
195 return -EINVAL;
196 }
197 }
198
199 /*
200 * Calculate the checksum of update data and header. The checksum of
201 * valid update data and header including the extended signature table
202 * must be 0.
203 */
204 orig_sum = 0;
205 i = (MC_HEADER_SIZE + data_size) / sizeof(u32);
206 while (i--)
207 orig_sum += ((u32 *)mc)[i];
208
209 if (orig_sum) {
210 if (print_err)
211 pr_err("Bad microcode data checksum, aborting.\n");
212 return -EINVAL;
213 }
214
215 if (!ext_table_size)
216 return 0;
217
218 /*
219 * Check extended signature checksum: 0 => valid.
220 */
221 for (i = 0; i < ext_sigcount; i++) {
222 ext_sig = (void *)ext_header + EXT_HEADER_SIZE +
223 EXT_SIGNATURE_SIZE * i;
224
225 sum = (mc_header->sig + mc_header->pf + mc_header->cksum) -
226 (ext_sig->sig + ext_sig->pf + ext_sig->cksum);
227 if (sum) {
228 if (print_err)
229 pr_err("Bad extended signature checksum, aborting.\n");
230 return -EINVAL;
231 }
232 }
233 return 0;
234}
235EXPORT_SYMBOL_GPL(intel_microcode_sanity_check);
236
237static void update_ucode_pointer(struct microcode_intel *mc)
238{
239 kvfree(ucode_patch_va);
240
241 /*
242 * Save the virtual address for early loading and for eventual free
243 * on late loading.
244 */
245 ucode_patch_va = mc;
246}
247
248static void save_microcode_patch(struct microcode_intel *patch)
249{
250 unsigned int size = get_totalsize(&patch->hdr);
251 struct microcode_intel *mc;
252
253 mc = kvmemdup(patch, size, GFP_KERNEL);
254 if (mc)
255 update_ucode_pointer(mc);
256 else
257 pr_err("Unable to allocate microcode memory size: %u\n", size);
258}
259
260/* Scan blob for microcode matching the boot CPUs family, model, stepping */
261static __init struct microcode_intel *scan_microcode(void *data, size_t size,
262 struct ucode_cpu_info *uci,
263 bool save)
264{
265 struct microcode_header_intel *mc_header;
266 struct microcode_intel *patch = NULL;
267 u32 cur_rev = uci->cpu_sig.rev;
268 unsigned int mc_size;
269
270 for (; size >= sizeof(struct microcode_header_intel); size -= mc_size, data += mc_size) {
271 mc_header = (struct microcode_header_intel *)data;
272
273 mc_size = get_totalsize(mc_header);
274 if (!mc_size || mc_size > size ||
275 intel_microcode_sanity_check(data, false, MC_HEADER_TYPE_MICROCODE) < 0)
276 break;
277
278 if (!intel_find_matching_signature(data, &uci->cpu_sig))
279 continue;
280
281 /*
282 * For saving the early microcode, find the matching revision which
283 * was loaded on the BSP.
284 *
285 * On the BSP during early boot, find a newer revision than
286 * actually loaded in the CPU.
287 */
288 if (save) {
289 if (cur_rev != mc_header->rev)
290 continue;
291 } else if (cur_rev >= mc_header->rev) {
292 continue;
293 }
294
295 patch = data;
296 cur_rev = mc_header->rev;
297 }
298
299 return size ? NULL : patch;
300}
301
302static enum ucode_state __apply_microcode(struct ucode_cpu_info *uci,
303 struct microcode_intel *mc,
304 u32 *cur_rev)
305{
306 u32 rev;
307
308 if (!mc)
309 return UCODE_NFOUND;
310
311 /*
312 * Save us the MSR write below - which is a particular expensive
313 * operation - when the other hyperthread has updated the microcode
314 * already.
315 */
316 *cur_rev = intel_get_microcode_revision();
317 if (*cur_rev >= mc->hdr.rev) {
318 uci->cpu_sig.rev = *cur_rev;
319 return UCODE_OK;
320 }
321
322 /* write microcode via MSR 0x79 */
323 native_wrmsrl(MSR_IA32_UCODE_WRITE, (unsigned long)mc->bits);
324
325 rev = intel_get_microcode_revision();
326 if (rev != mc->hdr.rev)
327 return UCODE_ERROR;
328
329 uci->cpu_sig.rev = rev;
330 return UCODE_UPDATED;
331}
332
333static enum ucode_state apply_microcode_early(struct ucode_cpu_info *uci)
334{
335 struct microcode_intel *mc = uci->mc;
336 u32 cur_rev;
337
338 return __apply_microcode(uci, mc, &cur_rev);
339}
340
341static __init bool load_builtin_intel_microcode(struct cpio_data *cp)
342{
343 unsigned int eax = 1, ebx, ecx = 0, edx;
344 struct firmware fw;
345 char name[30];
346
347 if (IS_ENABLED(CONFIG_X86_32))
348 return false;
349
350 native_cpuid(&eax, &ebx, &ecx, &edx);
351
352 sprintf(name, "intel-ucode/%02x-%02x-%02x",
353 x86_family(eax), x86_model(eax), x86_stepping(eax));
354
355 if (firmware_request_builtin(&fw, name)) {
356 cp->size = fw.size;
357 cp->data = (void *)fw.data;
358 return true;
359 }
360 return false;
361}
362
363static __init struct microcode_intel *get_microcode_blob(struct ucode_cpu_info *uci, bool save)
364{
365 struct cpio_data cp;
366
367 intel_collect_cpu_info(&uci->cpu_sig);
368
369 if (!load_builtin_intel_microcode(&cp))
370 cp = find_microcode_in_initrd(ucode_path);
371
372 if (!(cp.data && cp.size))
373 return NULL;
374
375 return scan_microcode(cp.data, cp.size, uci, save);
376}
377
378/*
379 * Invoked from an early init call to save the microcode blob which was
380 * selected during early boot when mm was not usable. The microcode must be
381 * saved because initrd is going away. It's an early init call so the APs
382 * just can use the pointer and do not have to scan initrd/builtin firmware
383 * again.
384 */
385static int __init save_builtin_microcode(void)
386{
387 struct ucode_cpu_info uci;
388
389 if (xchg(&ucode_patch_va, NULL) != UCODE_BSP_LOADED)
390 return 0;
391
392 if (dis_ucode_ldr || boot_cpu_data.x86_vendor != X86_VENDOR_INTEL)
393 return 0;
394
395 uci.mc = get_microcode_blob(&uci, true);
396 if (uci.mc)
397 save_microcode_patch(uci.mc);
398 return 0;
399}
400early_initcall(save_builtin_microcode);
401
402/* Load microcode on BSP from initrd or builtin blobs */
403void __init load_ucode_intel_bsp(struct early_load_data *ed)
404{
405 struct ucode_cpu_info uci;
406
407 uci.mc = get_microcode_blob(&uci, false);
408 ed->old_rev = uci.cpu_sig.rev;
409
410 if (uci.mc && apply_microcode_early(&uci) == UCODE_UPDATED) {
411 ucode_patch_va = UCODE_BSP_LOADED;
412 ed->new_rev = uci.cpu_sig.rev;
413 }
414}
415
416void load_ucode_intel_ap(void)
417{
418 struct ucode_cpu_info uci;
419
420 uci.mc = ucode_patch_va;
421 if (uci.mc)
422 apply_microcode_early(&uci);
423}
424
425/* Reload microcode on resume */
426void reload_ucode_intel(void)
427{
428 struct ucode_cpu_info uci = { .mc = ucode_patch_va, };
429
430 if (uci.mc)
431 apply_microcode_early(&uci);
432}
433
434static int collect_cpu_info(int cpu_num, struct cpu_signature *csig)
435{
436 intel_collect_cpu_info(csig);
437 return 0;
438}
439
440static enum ucode_state apply_microcode_late(int cpu)
441{
442 struct ucode_cpu_info *uci = ucode_cpu_info + cpu;
443 struct microcode_intel *mc = ucode_patch_late;
444 enum ucode_state ret;
445 u32 cur_rev;
446
447 if (WARN_ON_ONCE(smp_processor_id() != cpu))
448 return UCODE_ERROR;
449
450 ret = __apply_microcode(uci, mc, &cur_rev);
451 if (ret != UCODE_UPDATED && ret != UCODE_OK)
452 return ret;
453
454 cpu_data(cpu).microcode = uci->cpu_sig.rev;
455 if (!cpu)
456 boot_cpu_data.microcode = uci->cpu_sig.rev;
457
458 return ret;
459}
460
461static bool ucode_validate_minrev(struct microcode_header_intel *mc_header)
462{
463 int cur_rev = boot_cpu_data.microcode;
464
465 /*
466 * When late-loading, ensure the header declares a minimum revision
467 * required to perform a late-load. The previously reserved field
468 * is 0 in older microcode blobs.
469 */
470 if (!mc_header->min_req_ver) {
471 pr_info("Unsafe microcode update: Microcode header does not specify a required min version\n");
472 return false;
473 }
474
475 /*
476 * Check whether the current revision is either greater or equal to
477 * to the minimum revision specified in the header.
478 */
479 if (cur_rev < mc_header->min_req_ver) {
480 pr_info("Unsafe microcode update: Current revision 0x%x too old\n", cur_rev);
481 pr_info("Current should be at 0x%x or higher. Use early loading instead\n", mc_header->min_req_ver);
482 return false;
483 }
484 return true;
485}
486
487static enum ucode_state parse_microcode_blobs(int cpu, struct iov_iter *iter)
488{
489 struct ucode_cpu_info *uci = ucode_cpu_info + cpu;
490 bool is_safe, new_is_safe = false;
491 int cur_rev = uci->cpu_sig.rev;
492 unsigned int curr_mc_size = 0;
493 u8 *new_mc = NULL, *mc = NULL;
494
495 while (iov_iter_count(iter)) {
496 struct microcode_header_intel mc_header;
497 unsigned int mc_size, data_size;
498 u8 *data;
499
500 if (!copy_from_iter_full(&mc_header, sizeof(mc_header), iter)) {
501 pr_err("error! Truncated or inaccessible header in microcode data file\n");
502 goto fail;
503 }
504
505 mc_size = get_totalsize(&mc_header);
506 if (mc_size < sizeof(mc_header)) {
507 pr_err("error! Bad data in microcode data file (totalsize too small)\n");
508 goto fail;
509 }
510 data_size = mc_size - sizeof(mc_header);
511 if (data_size > iov_iter_count(iter)) {
512 pr_err("error! Bad data in microcode data file (truncated file?)\n");
513 goto fail;
514 }
515
516 /* For performance reasons, reuse mc area when possible */
517 if (!mc || mc_size > curr_mc_size) {
518 kvfree(mc);
519 mc = kvmalloc(mc_size, GFP_KERNEL);
520 if (!mc)
521 goto fail;
522 curr_mc_size = mc_size;
523 }
524
525 memcpy(mc, &mc_header, sizeof(mc_header));
526 data = mc + sizeof(mc_header);
527 if (!copy_from_iter_full(data, data_size, iter) ||
528 intel_microcode_sanity_check(mc, true, MC_HEADER_TYPE_MICROCODE) < 0)
529 goto fail;
530
531 if (cur_rev >= mc_header.rev)
532 continue;
533
534 if (!intel_find_matching_signature(mc, &uci->cpu_sig))
535 continue;
536
537 is_safe = ucode_validate_minrev(&mc_header);
538 if (force_minrev && !is_safe)
539 continue;
540
541 kvfree(new_mc);
542 cur_rev = mc_header.rev;
543 new_mc = mc;
544 new_is_safe = is_safe;
545 mc = NULL;
546 }
547
548 if (iov_iter_count(iter))
549 goto fail;
550
551 kvfree(mc);
552 if (!new_mc)
553 return UCODE_NFOUND;
554
555 ucode_patch_late = (struct microcode_intel *)new_mc;
556 return new_is_safe ? UCODE_NEW_SAFE : UCODE_NEW;
557
558fail:
559 kvfree(mc);
560 kvfree(new_mc);
561 return UCODE_ERROR;
562}
563
564static bool is_blacklisted(unsigned int cpu)
565{
566 struct cpuinfo_x86 *c = &cpu_data(cpu);
567
568 /*
569 * Late loading on model 79 with microcode revision less than 0x0b000021
570 * and LLC size per core bigger than 2.5MB may result in a system hang.
571 * This behavior is documented in item BDX90, #334165 (Intel Xeon
572 * Processor E7-8800/4800 v4 Product Family).
573 */
574 if (c->x86_vfm == INTEL_BROADWELL_X &&
575 c->x86_stepping == 0x01 &&
576 llc_size_per_core > 2621440 &&
577 c->microcode < 0x0b000021) {
578 pr_err_once("Erratum BDX90: late loading with revision < 0x0b000021 (0x%x) disabled.\n", c->microcode);
579 pr_err_once("Please consider either early loading through initrd/built-in or a potential BIOS update.\n");
580 return true;
581 }
582
583 return false;
584}
585
586static enum ucode_state request_microcode_fw(int cpu, struct device *device)
587{
588 struct cpuinfo_x86 *c = &cpu_data(cpu);
589 const struct firmware *firmware;
590 struct iov_iter iter;
591 enum ucode_state ret;
592 struct kvec kvec;
593 char name[30];
594
595 if (is_blacklisted(cpu))
596 return UCODE_NFOUND;
597
598 sprintf(name, "intel-ucode/%02x-%02x-%02x",
599 c->x86, c->x86_model, c->x86_stepping);
600
601 if (request_firmware_direct(&firmware, name, device)) {
602 pr_debug("data file %s load failed\n", name);
603 return UCODE_NFOUND;
604 }
605
606 kvec.iov_base = (void *)firmware->data;
607 kvec.iov_len = firmware->size;
608 iov_iter_kvec(&iter, ITER_SOURCE, &kvec, 1, firmware->size);
609 ret = parse_microcode_blobs(cpu, &iter);
610
611 release_firmware(firmware);
612
613 return ret;
614}
615
616static void finalize_late_load(int result)
617{
618 if (!result)
619 update_ucode_pointer(ucode_patch_late);
620 else
621 kvfree(ucode_patch_late);
622 ucode_patch_late = NULL;
623}
624
625static struct microcode_ops microcode_intel_ops = {
626 .request_microcode_fw = request_microcode_fw,
627 .collect_cpu_info = collect_cpu_info,
628 .apply_microcode = apply_microcode_late,
629 .finalize_late_load = finalize_late_load,
630 .use_nmi = IS_ENABLED(CONFIG_X86_64),
631};
632
633static __init void calc_llc_size_per_core(struct cpuinfo_x86 *c)
634{
635 u64 llc_size = c->x86_cache_size * 1024ULL;
636
637 do_div(llc_size, topology_num_cores_per_package());
638 llc_size_per_core = (unsigned int)llc_size;
639}
640
641struct microcode_ops * __init init_intel_microcode(void)
642{
643 struct cpuinfo_x86 *c = &boot_cpu_data;
644
645 if (c->x86_vendor != X86_VENDOR_INTEL || c->x86 < 6 ||
646 cpu_has(c, X86_FEATURE_IA64)) {
647 pr_err("Intel CPU family 0x%x not supported\n", c->x86);
648 return NULL;
649 }
650
651 calc_llc_size_per_core(c);
652
653 return µcode_intel_ops;
654}
1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * Intel CPU Microcode Update Driver for Linux
4 *
5 * Copyright (C) 2000-2006 Tigran Aivazian <aivazian.tigran@gmail.com>
6 * 2006 Shaohua Li <shaohua.li@intel.com>
7 *
8 * Intel CPU microcode early update for Linux
9 *
10 * Copyright (C) 2012 Fenghua Yu <fenghua.yu@intel.com>
11 * H Peter Anvin" <hpa@zytor.com>
12 */
13
14/*
15 * This needs to be before all headers so that pr_debug in printk.h doesn't turn
16 * printk calls into no_printk().
17 *
18 *#define DEBUG
19 */
20#define pr_fmt(fmt) "microcode: " fmt
21
22#include <linux/earlycpio.h>
23#include <linux/firmware.h>
24#include <linux/uaccess.h>
25#include <linux/vmalloc.h>
26#include <linux/initrd.h>
27#include <linux/kernel.h>
28#include <linux/slab.h>
29#include <linux/cpu.h>
30#include <linux/uio.h>
31#include <linux/mm.h>
32
33#include <asm/microcode_intel.h>
34#include <asm/intel-family.h>
35#include <asm/processor.h>
36#include <asm/tlbflush.h>
37#include <asm/setup.h>
38#include <asm/msr.h>
39
40static const char ucode_path[] = "kernel/x86/microcode/GenuineIntel.bin";
41
42/* Current microcode patch used in early patching on the APs. */
43static struct microcode_intel *intel_ucode_patch;
44
45/* last level cache size per core */
46static int llc_size_per_core;
47
48/*
49 * Returns 1 if update has been found, 0 otherwise.
50 */
51static int has_newer_microcode(void *mc, unsigned int csig, int cpf, int new_rev)
52{
53 struct microcode_header_intel *mc_hdr = mc;
54
55 if (mc_hdr->rev <= new_rev)
56 return 0;
57
58 return intel_find_matching_signature(mc, csig, cpf);
59}
60
61static struct ucode_patch *memdup_patch(void *data, unsigned int size)
62{
63 struct ucode_patch *p;
64
65 p = kzalloc(sizeof(struct ucode_patch), GFP_KERNEL);
66 if (!p)
67 return NULL;
68
69 p->data = kmemdup(data, size, GFP_KERNEL);
70 if (!p->data) {
71 kfree(p);
72 return NULL;
73 }
74
75 return p;
76}
77
78static void save_microcode_patch(struct ucode_cpu_info *uci, void *data, unsigned int size)
79{
80 struct microcode_header_intel *mc_hdr, *mc_saved_hdr;
81 struct ucode_patch *iter, *tmp, *p = NULL;
82 bool prev_found = false;
83 unsigned int sig, pf;
84
85 mc_hdr = (struct microcode_header_intel *)data;
86
87 list_for_each_entry_safe(iter, tmp, µcode_cache, plist) {
88 mc_saved_hdr = (struct microcode_header_intel *)iter->data;
89 sig = mc_saved_hdr->sig;
90 pf = mc_saved_hdr->pf;
91
92 if (intel_find_matching_signature(data, sig, pf)) {
93 prev_found = true;
94
95 if (mc_hdr->rev <= mc_saved_hdr->rev)
96 continue;
97
98 p = memdup_patch(data, size);
99 if (!p)
100 pr_err("Error allocating buffer %p\n", data);
101 else {
102 list_replace(&iter->plist, &p->plist);
103 kfree(iter->data);
104 kfree(iter);
105 }
106 }
107 }
108
109 /*
110 * There weren't any previous patches found in the list cache; save the
111 * newly found.
112 */
113 if (!prev_found) {
114 p = memdup_patch(data, size);
115 if (!p)
116 pr_err("Error allocating buffer for %p\n", data);
117 else
118 list_add_tail(&p->plist, µcode_cache);
119 }
120
121 if (!p)
122 return;
123
124 if (!intel_find_matching_signature(p->data, uci->cpu_sig.sig, uci->cpu_sig.pf))
125 return;
126
127 /*
128 * Save for early loading. On 32-bit, that needs to be a physical
129 * address as the APs are running from physical addresses, before
130 * paging has been enabled.
131 */
132 if (IS_ENABLED(CONFIG_X86_32))
133 intel_ucode_patch = (struct microcode_intel *)__pa_nodebug(p->data);
134 else
135 intel_ucode_patch = p->data;
136}
137
138/*
139 * Get microcode matching with BSP's model. Only CPUs with the same model as
140 * BSP can stay in the platform.
141 */
142static struct microcode_intel *
143scan_microcode(void *data, size_t size, struct ucode_cpu_info *uci, bool save)
144{
145 struct microcode_header_intel *mc_header;
146 struct microcode_intel *patch = NULL;
147 unsigned int mc_size;
148
149 while (size) {
150 if (size < sizeof(struct microcode_header_intel))
151 break;
152
153 mc_header = (struct microcode_header_intel *)data;
154
155 mc_size = get_totalsize(mc_header);
156 if (!mc_size ||
157 mc_size > size ||
158 intel_microcode_sanity_check(data, false, MC_HEADER_TYPE_MICROCODE) < 0)
159 break;
160
161 size -= mc_size;
162
163 if (!intel_find_matching_signature(data, uci->cpu_sig.sig,
164 uci->cpu_sig.pf)) {
165 data += mc_size;
166 continue;
167 }
168
169 if (save) {
170 save_microcode_patch(uci, data, mc_size);
171 goto next;
172 }
173
174
175 if (!patch) {
176 if (!has_newer_microcode(data,
177 uci->cpu_sig.sig,
178 uci->cpu_sig.pf,
179 uci->cpu_sig.rev))
180 goto next;
181
182 } else {
183 struct microcode_header_intel *phdr = &patch->hdr;
184
185 if (!has_newer_microcode(data,
186 phdr->sig,
187 phdr->pf,
188 phdr->rev))
189 goto next;
190 }
191
192 /* We have a newer patch, save it. */
193 patch = data;
194
195next:
196 data += mc_size;
197 }
198
199 if (size)
200 return NULL;
201
202 return patch;
203}
204
205static void show_saved_mc(void)
206{
207#ifdef DEBUG
208 int i = 0, j;
209 unsigned int sig, pf, rev, total_size, data_size, date;
210 struct ucode_cpu_info uci;
211 struct ucode_patch *p;
212
213 if (list_empty(µcode_cache)) {
214 pr_debug("no microcode data saved.\n");
215 return;
216 }
217
218 intel_cpu_collect_info(&uci);
219
220 sig = uci.cpu_sig.sig;
221 pf = uci.cpu_sig.pf;
222 rev = uci.cpu_sig.rev;
223 pr_debug("CPU: sig=0x%x, pf=0x%x, rev=0x%x\n", sig, pf, rev);
224
225 list_for_each_entry(p, µcode_cache, plist) {
226 struct microcode_header_intel *mc_saved_header;
227 struct extended_sigtable *ext_header;
228 struct extended_signature *ext_sig;
229 int ext_sigcount;
230
231 mc_saved_header = (struct microcode_header_intel *)p->data;
232
233 sig = mc_saved_header->sig;
234 pf = mc_saved_header->pf;
235 rev = mc_saved_header->rev;
236 date = mc_saved_header->date;
237
238 total_size = get_totalsize(mc_saved_header);
239 data_size = get_datasize(mc_saved_header);
240
241 pr_debug("mc_saved[%d]: sig=0x%x, pf=0x%x, rev=0x%x, total size=0x%x, date = %04x-%02x-%02x\n",
242 i++, sig, pf, rev, total_size,
243 date & 0xffff,
244 date >> 24,
245 (date >> 16) & 0xff);
246
247 /* Look for ext. headers: */
248 if (total_size <= data_size + MC_HEADER_SIZE)
249 continue;
250
251 ext_header = (void *)mc_saved_header + data_size + MC_HEADER_SIZE;
252 ext_sigcount = ext_header->count;
253 ext_sig = (void *)ext_header + EXT_HEADER_SIZE;
254
255 for (j = 0; j < ext_sigcount; j++) {
256 sig = ext_sig->sig;
257 pf = ext_sig->pf;
258
259 pr_debug("\tExtended[%d]: sig=0x%x, pf=0x%x\n",
260 j, sig, pf);
261
262 ext_sig++;
263 }
264 }
265#endif
266}
267
268/*
269 * Save this microcode patch. It will be loaded early when a CPU is
270 * hot-added or resumes.
271 */
272static void save_mc_for_early(struct ucode_cpu_info *uci, u8 *mc, unsigned int size)
273{
274 /* Synchronization during CPU hotplug. */
275 static DEFINE_MUTEX(x86_cpu_microcode_mutex);
276
277 mutex_lock(&x86_cpu_microcode_mutex);
278
279 save_microcode_patch(uci, mc, size);
280 show_saved_mc();
281
282 mutex_unlock(&x86_cpu_microcode_mutex);
283}
284
285static bool load_builtin_intel_microcode(struct cpio_data *cp)
286{
287 unsigned int eax = 1, ebx, ecx = 0, edx;
288 struct firmware fw;
289 char name[30];
290
291 if (IS_ENABLED(CONFIG_X86_32))
292 return false;
293
294 native_cpuid(&eax, &ebx, &ecx, &edx);
295
296 sprintf(name, "intel-ucode/%02x-%02x-%02x",
297 x86_family(eax), x86_model(eax), x86_stepping(eax));
298
299 if (firmware_request_builtin(&fw, name)) {
300 cp->size = fw.size;
301 cp->data = (void *)fw.data;
302 return true;
303 }
304
305 return false;
306}
307
308/*
309 * Print ucode update info.
310 */
311static void
312print_ucode_info(struct ucode_cpu_info *uci, unsigned int date)
313{
314 pr_info_once("microcode updated early to revision 0x%x, date = %04x-%02x-%02x\n",
315 uci->cpu_sig.rev,
316 date & 0xffff,
317 date >> 24,
318 (date >> 16) & 0xff);
319}
320
321#ifdef CONFIG_X86_32
322
323static int delay_ucode_info;
324static int current_mc_date;
325
326/*
327 * Print early updated ucode info after printk works. This is delayed info dump.
328 */
329void show_ucode_info_early(void)
330{
331 struct ucode_cpu_info uci;
332
333 if (delay_ucode_info) {
334 intel_cpu_collect_info(&uci);
335 print_ucode_info(&uci, current_mc_date);
336 delay_ucode_info = 0;
337 }
338}
339
340/*
341 * At this point, we can not call printk() yet. Delay printing microcode info in
342 * show_ucode_info_early() until printk() works.
343 */
344static void print_ucode(struct ucode_cpu_info *uci)
345{
346 struct microcode_intel *mc;
347 int *delay_ucode_info_p;
348 int *current_mc_date_p;
349
350 mc = uci->mc;
351 if (!mc)
352 return;
353
354 delay_ucode_info_p = (int *)__pa_nodebug(&delay_ucode_info);
355 current_mc_date_p = (int *)__pa_nodebug(¤t_mc_date);
356
357 *delay_ucode_info_p = 1;
358 *current_mc_date_p = mc->hdr.date;
359}
360#else
361
362static inline void print_ucode(struct ucode_cpu_info *uci)
363{
364 struct microcode_intel *mc;
365
366 mc = uci->mc;
367 if (!mc)
368 return;
369
370 print_ucode_info(uci, mc->hdr.date);
371}
372#endif
373
374static int apply_microcode_early(struct ucode_cpu_info *uci, bool early)
375{
376 struct microcode_intel *mc;
377 u32 rev;
378
379 mc = uci->mc;
380 if (!mc)
381 return 0;
382
383 /*
384 * Save us the MSR write below - which is a particular expensive
385 * operation - when the other hyperthread has updated the microcode
386 * already.
387 */
388 rev = intel_get_microcode_revision();
389 if (rev >= mc->hdr.rev) {
390 uci->cpu_sig.rev = rev;
391 return UCODE_OK;
392 }
393
394 /*
395 * Writeback and invalidate caches before updating microcode to avoid
396 * internal issues depending on what the microcode is updating.
397 */
398 native_wbinvd();
399
400 /* write microcode via MSR 0x79 */
401 native_wrmsrl(MSR_IA32_UCODE_WRITE, (unsigned long)mc->bits);
402
403 rev = intel_get_microcode_revision();
404 if (rev != mc->hdr.rev)
405 return -1;
406
407 uci->cpu_sig.rev = rev;
408
409 if (early)
410 print_ucode(uci);
411 else
412 print_ucode_info(uci, mc->hdr.date);
413
414 return 0;
415}
416
417int __init save_microcode_in_initrd_intel(void)
418{
419 struct ucode_cpu_info uci;
420 struct cpio_data cp;
421
422 /*
423 * initrd is going away, clear patch ptr. We will scan the microcode one
424 * last time before jettisoning and save a patch, if found. Then we will
425 * update that pointer too, with a stable patch address to use when
426 * resuming the cores.
427 */
428 intel_ucode_patch = NULL;
429
430 if (!load_builtin_intel_microcode(&cp))
431 cp = find_microcode_in_initrd(ucode_path, false);
432
433 if (!(cp.data && cp.size))
434 return 0;
435
436 intel_cpu_collect_info(&uci);
437
438 scan_microcode(cp.data, cp.size, &uci, true);
439
440 show_saved_mc();
441
442 return 0;
443}
444
445/*
446 * @res_patch, output: a pointer to the patch we found.
447 */
448static struct microcode_intel *__load_ucode_intel(struct ucode_cpu_info *uci)
449{
450 static const char *path;
451 struct cpio_data cp;
452 bool use_pa;
453
454 if (IS_ENABLED(CONFIG_X86_32)) {
455 path = (const char *)__pa_nodebug(ucode_path);
456 use_pa = true;
457 } else {
458 path = ucode_path;
459 use_pa = false;
460 }
461
462 /* try built-in microcode first */
463 if (!load_builtin_intel_microcode(&cp))
464 cp = find_microcode_in_initrd(path, use_pa);
465
466 if (!(cp.data && cp.size))
467 return NULL;
468
469 intel_cpu_collect_info(uci);
470
471 return scan_microcode(cp.data, cp.size, uci, false);
472}
473
474void __init load_ucode_intel_bsp(void)
475{
476 struct microcode_intel *patch;
477 struct ucode_cpu_info uci;
478
479 patch = __load_ucode_intel(&uci);
480 if (!patch)
481 return;
482
483 uci.mc = patch;
484
485 apply_microcode_early(&uci, true);
486}
487
488void load_ucode_intel_ap(void)
489{
490 struct microcode_intel *patch, **iup;
491 struct ucode_cpu_info uci;
492
493 if (IS_ENABLED(CONFIG_X86_32))
494 iup = (struct microcode_intel **) __pa_nodebug(&intel_ucode_patch);
495 else
496 iup = &intel_ucode_patch;
497
498 if (!*iup) {
499 patch = __load_ucode_intel(&uci);
500 if (!patch)
501 return;
502
503 *iup = patch;
504 }
505
506 uci.mc = *iup;
507
508 apply_microcode_early(&uci, true);
509}
510
511static struct microcode_intel *find_patch(struct ucode_cpu_info *uci)
512{
513 struct microcode_header_intel *phdr;
514 struct ucode_patch *iter, *tmp;
515
516 list_for_each_entry_safe(iter, tmp, µcode_cache, plist) {
517
518 phdr = (struct microcode_header_intel *)iter->data;
519
520 if (phdr->rev <= uci->cpu_sig.rev)
521 continue;
522
523 if (!intel_find_matching_signature(phdr,
524 uci->cpu_sig.sig,
525 uci->cpu_sig.pf))
526 continue;
527
528 return iter->data;
529 }
530 return NULL;
531}
532
533void reload_ucode_intel(void)
534{
535 struct microcode_intel *p;
536 struct ucode_cpu_info uci;
537
538 intel_cpu_collect_info(&uci);
539
540 p = find_patch(&uci);
541 if (!p)
542 return;
543
544 uci.mc = p;
545
546 apply_microcode_early(&uci, false);
547}
548
549static int collect_cpu_info(int cpu_num, struct cpu_signature *csig)
550{
551 struct cpuinfo_x86 *c = &cpu_data(cpu_num);
552 unsigned int val[2];
553
554 memset(csig, 0, sizeof(*csig));
555
556 csig->sig = cpuid_eax(0x00000001);
557
558 if ((c->x86_model >= 5) || (c->x86 > 6)) {
559 /* get processor flags from MSR 0x17 */
560 rdmsr(MSR_IA32_PLATFORM_ID, val[0], val[1]);
561 csig->pf = 1 << ((val[1] >> 18) & 7);
562 }
563
564 csig->rev = c->microcode;
565
566 return 0;
567}
568
569static enum ucode_state apply_microcode_intel(int cpu)
570{
571 struct ucode_cpu_info *uci = ucode_cpu_info + cpu;
572 struct cpuinfo_x86 *c = &cpu_data(cpu);
573 bool bsp = c->cpu_index == boot_cpu_data.cpu_index;
574 struct microcode_intel *mc;
575 enum ucode_state ret;
576 static int prev_rev;
577 u32 rev;
578
579 /* We should bind the task to the CPU */
580 if (WARN_ON(raw_smp_processor_id() != cpu))
581 return UCODE_ERROR;
582
583 /* Look for a newer patch in our cache: */
584 mc = find_patch(uci);
585 if (!mc) {
586 mc = uci->mc;
587 if (!mc)
588 return UCODE_NFOUND;
589 }
590
591 /*
592 * Save us the MSR write below - which is a particular expensive
593 * operation - when the other hyperthread has updated the microcode
594 * already.
595 */
596 rev = intel_get_microcode_revision();
597 if (rev >= mc->hdr.rev) {
598 ret = UCODE_OK;
599 goto out;
600 }
601
602 /*
603 * Writeback and invalidate caches before updating microcode to avoid
604 * internal issues depending on what the microcode is updating.
605 */
606 native_wbinvd();
607
608 /* write microcode via MSR 0x79 */
609 wrmsrl(MSR_IA32_UCODE_WRITE, (unsigned long)mc->bits);
610
611 rev = intel_get_microcode_revision();
612
613 if (rev != mc->hdr.rev) {
614 pr_err("CPU%d update to revision 0x%x failed\n",
615 cpu, mc->hdr.rev);
616 return UCODE_ERROR;
617 }
618
619 if (bsp && rev != prev_rev) {
620 pr_info("updated to revision 0x%x, date = %04x-%02x-%02x\n",
621 rev,
622 mc->hdr.date & 0xffff,
623 mc->hdr.date >> 24,
624 (mc->hdr.date >> 16) & 0xff);
625 prev_rev = rev;
626 }
627
628 ret = UCODE_UPDATED;
629
630out:
631 uci->cpu_sig.rev = rev;
632 c->microcode = rev;
633
634 /* Update boot_cpu_data's revision too, if we're on the BSP: */
635 if (bsp)
636 boot_cpu_data.microcode = rev;
637
638 return ret;
639}
640
641static enum ucode_state generic_load_microcode(int cpu, struct iov_iter *iter)
642{
643 struct ucode_cpu_info *uci = ucode_cpu_info + cpu;
644 unsigned int curr_mc_size = 0, new_mc_size = 0;
645 enum ucode_state ret = UCODE_OK;
646 int new_rev = uci->cpu_sig.rev;
647 u8 *new_mc = NULL, *mc = NULL;
648 unsigned int csig, cpf;
649
650 while (iov_iter_count(iter)) {
651 struct microcode_header_intel mc_header;
652 unsigned int mc_size, data_size;
653 u8 *data;
654
655 if (!copy_from_iter_full(&mc_header, sizeof(mc_header), iter)) {
656 pr_err("error! Truncated or inaccessible header in microcode data file\n");
657 break;
658 }
659
660 mc_size = get_totalsize(&mc_header);
661 if (mc_size < sizeof(mc_header)) {
662 pr_err("error! Bad data in microcode data file (totalsize too small)\n");
663 break;
664 }
665 data_size = mc_size - sizeof(mc_header);
666 if (data_size > iov_iter_count(iter)) {
667 pr_err("error! Bad data in microcode data file (truncated file?)\n");
668 break;
669 }
670
671 /* For performance reasons, reuse mc area when possible */
672 if (!mc || mc_size > curr_mc_size) {
673 vfree(mc);
674 mc = vmalloc(mc_size);
675 if (!mc)
676 break;
677 curr_mc_size = mc_size;
678 }
679
680 memcpy(mc, &mc_header, sizeof(mc_header));
681 data = mc + sizeof(mc_header);
682 if (!copy_from_iter_full(data, data_size, iter) ||
683 intel_microcode_sanity_check(mc, true, MC_HEADER_TYPE_MICROCODE) < 0) {
684 break;
685 }
686
687 csig = uci->cpu_sig.sig;
688 cpf = uci->cpu_sig.pf;
689 if (has_newer_microcode(mc, csig, cpf, new_rev)) {
690 vfree(new_mc);
691 new_rev = mc_header.rev;
692 new_mc = mc;
693 new_mc_size = mc_size;
694 mc = NULL; /* trigger new vmalloc */
695 ret = UCODE_NEW;
696 }
697 }
698
699 vfree(mc);
700
701 if (iov_iter_count(iter)) {
702 vfree(new_mc);
703 return UCODE_ERROR;
704 }
705
706 if (!new_mc)
707 return UCODE_NFOUND;
708
709 vfree(uci->mc);
710 uci->mc = (struct microcode_intel *)new_mc;
711
712 /*
713 * If early loading microcode is supported, save this mc into
714 * permanent memory. So it will be loaded early when a CPU is hot added
715 * or resumes.
716 */
717 save_mc_for_early(uci, new_mc, new_mc_size);
718
719 pr_debug("CPU%d found a matching microcode update with version 0x%x (current=0x%x)\n",
720 cpu, new_rev, uci->cpu_sig.rev);
721
722 return ret;
723}
724
725static bool is_blacklisted(unsigned int cpu)
726{
727 struct cpuinfo_x86 *c = &cpu_data(cpu);
728
729 /*
730 * Late loading on model 79 with microcode revision less than 0x0b000021
731 * and LLC size per core bigger than 2.5MB may result in a system hang.
732 * This behavior is documented in item BDF90, #334165 (Intel Xeon
733 * Processor E7-8800/4800 v4 Product Family).
734 */
735 if (c->x86 == 6 &&
736 c->x86_model == INTEL_FAM6_BROADWELL_X &&
737 c->x86_stepping == 0x01 &&
738 llc_size_per_core > 2621440 &&
739 c->microcode < 0x0b000021) {
740 pr_err_once("Erratum BDF90: late loading with revision < 0x0b000021 (0x%x) disabled.\n", c->microcode);
741 pr_err_once("Please consider either early loading through initrd/built-in or a potential BIOS update.\n");
742 return true;
743 }
744
745 return false;
746}
747
748static enum ucode_state request_microcode_fw(int cpu, struct device *device)
749{
750 struct cpuinfo_x86 *c = &cpu_data(cpu);
751 const struct firmware *firmware;
752 struct iov_iter iter;
753 enum ucode_state ret;
754 struct kvec kvec;
755 char name[30];
756
757 if (is_blacklisted(cpu))
758 return UCODE_NFOUND;
759
760 sprintf(name, "intel-ucode/%02x-%02x-%02x",
761 c->x86, c->x86_model, c->x86_stepping);
762
763 if (request_firmware_direct(&firmware, name, device)) {
764 pr_debug("data file %s load failed\n", name);
765 return UCODE_NFOUND;
766 }
767
768 kvec.iov_base = (void *)firmware->data;
769 kvec.iov_len = firmware->size;
770 iov_iter_kvec(&iter, ITER_SOURCE, &kvec, 1, firmware->size);
771 ret = generic_load_microcode(cpu, &iter);
772
773 release_firmware(firmware);
774
775 return ret;
776}
777
778static struct microcode_ops microcode_intel_ops = {
779 .request_microcode_fw = request_microcode_fw,
780 .collect_cpu_info = collect_cpu_info,
781 .apply_microcode = apply_microcode_intel,
782};
783
784static int __init calc_llc_size_per_core(struct cpuinfo_x86 *c)
785{
786 u64 llc_size = c->x86_cache_size * 1024ULL;
787
788 do_div(llc_size, c->x86_max_cores);
789
790 return (int)llc_size;
791}
792
793struct microcode_ops * __init init_intel_microcode(void)
794{
795 struct cpuinfo_x86 *c = &boot_cpu_data;
796
797 if (c->x86_vendor != X86_VENDOR_INTEL || c->x86 < 6 ||
798 cpu_has(c, X86_FEATURE_IA64)) {
799 pr_err("Intel CPU family 0x%x not supported\n", c->x86);
800 return NULL;
801 }
802
803 llc_size_per_core = calc_llc_size_per_core(c);
804
805 return µcode_intel_ops;
806}