intel.c 21.0 KB
Newer Older
L
Linus Torvalds 已提交
1
/*
2
 * Intel CPU Microcode Update Driver for Linux
L
Linus Torvalds 已提交
3
 *
4 5
 * Copyright (C) 2000-2006 Tigran Aivazian <tigran@aivazian.fsnet.co.uk>
 *		 2006 Shaohua Li <shaohua.li@intel.com>
L
Linus Torvalds 已提交
6
 *
7 8 9 10 11
 * Intel CPU microcode early update for Linux
 *
 * Copyright (C) 2012 Fenghua Yu <fenghua.yu@intel.com>
 *		      H Peter Anvin" <hpa@zytor.com>
 *
12 13 14 15
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version
 * 2 of the License, or (at your option) any later version.
L
Linus Torvalds 已提交
16
 */
17

18 19 20 21 22 23
/*
 * This needs to be before all headers so that pr_debug in printk.h doesn't turn
 * printk calls into no_printk().
 *
 *#define DEBUG
 */
24
#define pr_fmt(fmt) "microcode: " fmt
25

26
#include <linux/earlycpio.h>
I
Ingo Molnar 已提交
27 28
#include <linux/firmware.h>
#include <linux/uaccess.h>
29 30
#include <linux/vmalloc.h>
#include <linux/initrd.h>
I
Ingo Molnar 已提交
31
#include <linux/kernel.h>
32 33 34
#include <linux/slab.h>
#include <linux/cpu.h>
#include <linux/mm.h>
L
Linus Torvalds 已提交
35

36
#include <asm/microcode_intel.h>
I
Ingo Molnar 已提交
37
#include <asm/processor.h>
38 39
#include <asm/tlbflush.h>
#include <asm/setup.h>
I
Ingo Molnar 已提交
40
#include <asm/msr.h>
L
Linus Torvalds 已提交
41

42
static const char ucode_path[] = "kernel/x86/microcode/GenuineIntel.bin";
43

44 45
/* Current microcode patch used in early patching */
struct microcode_intel *intel_ucode_patch;
46

47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101
static inline bool cpu_signatures_match(unsigned int s1, unsigned int p1,
					unsigned int s2, unsigned int p2)
{
	if (s1 != s2)
		return false;

	/* Processor flags are either both 0 ... */
	if (!p1 && !p2)
		return true;

	/* ... or they intersect. */
	return p1 & p2;
}

/*
 * Returns 1 if update has been found, 0 otherwise.
 */
static int find_matching_signature(void *mc, unsigned int csig, int cpf)
{
	struct microcode_header_intel *mc_hdr = mc;
	struct extended_sigtable *ext_hdr;
	struct extended_signature *ext_sig;
	int i;

	if (cpu_signatures_match(csig, cpf, mc_hdr->sig, mc_hdr->pf))
		return 1;

	/* Look for ext. headers: */
	if (get_totalsize(mc_hdr) <= get_datasize(mc_hdr) + MC_HEADER_SIZE)
		return 0;

	ext_hdr = mc + get_datasize(mc_hdr) + MC_HEADER_SIZE;
	ext_sig = (void *)ext_hdr + EXT_HEADER_SIZE;

	for (i = 0; i < ext_hdr->count; i++) {
		if (cpu_signatures_match(csig, cpf, ext_sig->sig, ext_sig->pf))
			return 1;
		ext_sig++;
	}
	return 0;
}

/*
 * Returns 1 if update has been found, 0 otherwise.
 */
static int has_newer_microcode(void *mc, unsigned int csig, int cpf, int new_rev)
{
	struct microcode_header_intel *mc_hdr = mc;

	if (mc_hdr->rev <= new_rev)
		return 0;

	return find_matching_signature(mc, csig, cpf);
}

102 103 104
/*
 * Given CPU signature and a microcode patch, this function finds if the
 * microcode patch has matching family and model with the CPU.
105 106 107
 *
 * %true - if there's a match
 * %false - otherwise
108
 */
109 110
static bool microcode_matches(struct microcode_header_intel *mc_header,
			      unsigned long sig)
111 112 113
{
	unsigned long total_size = get_totalsize(mc_header);
	unsigned long data_size = get_datasize(mc_header);
114 115
	struct extended_sigtable *ext_header;
	unsigned int fam_ucode, model_ucode;
116
	struct extended_signature *ext_sig;
117 118
	unsigned int fam, model;
	int ext_sigcount, i;
119

120
	fam   = x86_family(sig);
121 122
	model = x86_model(sig);

123
	fam_ucode   = x86_family(mc_header->sig);
124 125 126
	model_ucode = x86_model(mc_header->sig);

	if (fam == fam_ucode && model == model_ucode)
127
		return true;
128 129 130

	/* Look for ext. headers: */
	if (total_size <= data_size + MC_HEADER_SIZE)
131
		return false;
132 133 134 135 136 137

	ext_header   = (void *) mc_header + data_size + MC_HEADER_SIZE;
	ext_sig      = (void *)ext_header + EXT_HEADER_SIZE;
	ext_sigcount = ext_header->count;

	for (i = 0; i < ext_sigcount; i++) {
138
		fam_ucode   = x86_family(ext_sig->sig);
139 140 141
		model_ucode = x86_model(ext_sig->sig);

		if (fam == fam_ucode && model == model_ucode)
142
			return true;
143 144 145

		ext_sig++;
	}
146
	return false;
147 148
}

149
static struct ucode_patch *__alloc_microcode_buf(void *data, unsigned int size)
150
{
151
	struct ucode_patch *p;
152

153
	p = kzalloc(sizeof(struct ucode_patch), GFP_KERNEL);
154 155
	if (!p)
		return ERR_PTR(-ENOMEM);
156

157 158 159 160
	p->data = kmemdup(data, size, GFP_KERNEL);
	if (!p->data) {
		kfree(p);
		return ERR_PTR(-ENOMEM);
161 162
	}

163
	return p;
164 165
}

166
static void save_microcode_patch(void *data, unsigned int size)
167 168
{
	struct microcode_header_intel *mc_hdr, *mc_saved_hdr;
169 170
	struct ucode_patch *iter, *tmp, *p;
	bool prev_found = false;
171 172
	unsigned int sig, pf;

173
	mc_hdr = (struct microcode_header_intel *)data;
174

175 176
	list_for_each_entry_safe(iter, tmp, &microcode_cache, plist) {
		mc_saved_hdr = (struct microcode_header_intel *)iter->data;
177 178 179
		sig	     = mc_saved_hdr->sig;
		pf	     = mc_saved_hdr->pf;

180 181
		if (find_matching_signature(data, sig, pf)) {
			prev_found = true;
182

183 184
			if (mc_hdr->rev <= mc_saved_hdr->rev)
				continue;
185

186 187 188 189 190 191
			p = __alloc_microcode_buf(data, size);
			if (IS_ERR(p))
				pr_err("Error allocating buffer %p\n", data);
			else
				list_replace(&iter->plist, &p->plist);
		}
192 193
	}

194 195 196 197 198 199 200 201 202 203 204
	/*
	 * There weren't any previous patches found in the list cache; save the
	 * newly found.
	 */
	if (!prev_found) {
		p = __alloc_microcode_buf(data, size);
		if (IS_ERR(p))
			pr_err("Error allocating buffer for %p\n", data);
		else
			list_add_tail(&p->plist, &microcode_cache);
	}
205 206
}

207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304
static int microcode_sanity_check(void *mc, int print_err)
{
	unsigned long total_size, data_size, ext_table_size;
	struct microcode_header_intel *mc_header = mc;
	struct extended_sigtable *ext_header = NULL;
	u32 sum, orig_sum, ext_sigcount = 0, i;
	struct extended_signature *ext_sig;

	total_size = get_totalsize(mc_header);
	data_size = get_datasize(mc_header);

	if (data_size + MC_HEADER_SIZE > total_size) {
		if (print_err)
			pr_err("Error: bad microcode data file size.\n");
		return -EINVAL;
	}

	if (mc_header->ldrver != 1 || mc_header->hdrver != 1) {
		if (print_err)
			pr_err("Error: invalid/unknown microcode update format.\n");
		return -EINVAL;
	}

	ext_table_size = total_size - (MC_HEADER_SIZE + data_size);
	if (ext_table_size) {
		u32 ext_table_sum = 0;
		u32 *ext_tablep;

		if ((ext_table_size < EXT_HEADER_SIZE)
		 || ((ext_table_size - EXT_HEADER_SIZE) % EXT_SIGNATURE_SIZE)) {
			if (print_err)
				pr_err("Error: truncated extended signature table.\n");
			return -EINVAL;
		}

		ext_header = mc + MC_HEADER_SIZE + data_size;
		if (ext_table_size != exttable_size(ext_header)) {
			if (print_err)
				pr_err("Error: extended signature table size mismatch.\n");
			return -EFAULT;
		}

		ext_sigcount = ext_header->count;

		/*
		 * Check extended table checksum: the sum of all dwords that
		 * comprise a valid table must be 0.
		 */
		ext_tablep = (u32 *)ext_header;

		i = ext_table_size / sizeof(u32);
		while (i--)
			ext_table_sum += ext_tablep[i];

		if (ext_table_sum) {
			if (print_err)
				pr_warn("Bad extended signature table checksum, aborting.\n");
			return -EINVAL;
		}
	}

	/*
	 * Calculate the checksum of update data and header. The checksum of
	 * valid update data and header including the extended signature table
	 * must be 0.
	 */
	orig_sum = 0;
	i = (MC_HEADER_SIZE + data_size) / sizeof(u32);
	while (i--)
		orig_sum += ((u32 *)mc)[i];

	if (orig_sum) {
		if (print_err)
			pr_err("Bad microcode data checksum, aborting.\n");
		return -EINVAL;
	}

	if (!ext_table_size)
		return 0;

	/*
	 * Check extended signature checksum: 0 => valid.
	 */
	for (i = 0; i < ext_sigcount; i++) {
		ext_sig = (void *)ext_header + EXT_HEADER_SIZE +
			  EXT_SIGNATURE_SIZE * i;

		sum = (mc_header->sig + mc_header->pf + mc_header->cksum) -
		      (ext_sig->sig + ext_sig->pf + ext_sig->cksum);
		if (sum) {
			if (print_err)
				pr_err("Bad extended signature checksum, aborting.\n");
			return -EINVAL;
		}
	}
	return 0;
}

305 306 307 308
/*
 * Get microcode matching with BSP's model. Only CPUs with the same model as
 * BSP can stay in the platform.
 */
309 310
static struct microcode_intel *
scan_microcode(void *data, size_t size, struct ucode_cpu_info *uci, bool save)
311
{
312
	struct microcode_header_intel *mc_header;
313
	struct microcode_intel *patch = NULL;
314
	unsigned int mc_size;
315

316 317
	while (size) {
		if (size < sizeof(struct microcode_header_intel))
318 319
			break;

320
		mc_header = (struct microcode_header_intel *)data;
321 322

		mc_size = get_totalsize(mc_header);
323 324 325
		if (!mc_size ||
		    mc_size > size ||
		    microcode_sanity_check(data, 0) < 0)
326 327
			break;

328
		size -= mc_size;
329

330 331
		if (!microcode_matches(mc_header, uci->cpu_sig.sig)) {
			data += mc_size;
332 333 334
			continue;
		}

335 336 337 338
		if (save) {
			save_microcode_patch(data, mc_size);
			goto next;
		}
339 340


341 342 343 344 345 346
		if (!patch) {
			if (!has_newer_microcode(data,
						 uci->cpu_sig.sig,
						 uci->cpu_sig.pf,
						 uci->cpu_sig.rev))
				goto next;
347

348 349 350 351 352 353 354 355 356
		} else {
			struct microcode_header_intel *phdr = &patch->hdr;

			if (!has_newer_microcode(data,
						 phdr->sig,
						 phdr->pf,
						 phdr->rev))
				goto next;
		}
357

358 359
		/* We have a newer patch, save it. */
		patch = data;
360

361 362 363
next:
		data += mc_size;
	}
364

365 366 367 368
	if (size)
		return NULL;

	return patch;
369 370 371 372 373 374
}

static int collect_cpu_info_early(struct ucode_cpu_info *uci)
{
	unsigned int val[2];
	unsigned int family, model;
375
	struct cpu_signature csig = { 0 };
376 377 378 379 380 381 382 383 384
	unsigned int eax, ebx, ecx, edx;

	memset(uci, 0, sizeof(*uci));

	eax = 0x00000001;
	ecx = 0;
	native_cpuid(&eax, &ebx, &ecx, &edx);
	csig.sig = eax;

385 386
	family = x86_family(eax);
	model  = x86_model(eax);
387 388 389 390 391 392 393

	if ((model >= 5) || (family > 6)) {
		/* get processor flags from MSR 0x17 */
		native_rdmsr(MSR_IA32_PLATFORM_ID, val[0], val[1]);
		csig.pf = 1 << ((val[1] >> 18) & 7);
	}

394
	csig.rev = intel_get_microcode_revision();
395 396 397 398 399 400 401 402 403

	uci->cpu_sig = csig;
	uci->valid = 1;

	return 0;
}

static void show_saved_mc(void)
{
404
#ifdef DEBUG
405
	int i = 0, j;
406 407
	unsigned int sig, pf, rev, total_size, data_size, date;
	struct ucode_cpu_info uci;
408
	struct ucode_patch *p;
409

410
	if (list_empty(&microcode_cache)) {
411 412 413 414 415 416
		pr_debug("no microcode data saved.\n");
		return;
	}

	collect_cpu_info_early(&uci);

417 418 419
	sig	= uci.cpu_sig.sig;
	pf	= uci.cpu_sig.pf;
	rev	= uci.cpu_sig.rev;
420 421
	pr_debug("CPU: sig=0x%x, pf=0x%x, rev=0x%x\n", sig, pf, rev);

422
	list_for_each_entry(p, &microcode_cache, plist) {
423 424 425
		struct microcode_header_intel *mc_saved_header;
		struct extended_sigtable *ext_header;
		struct extended_signature *ext_sig;
426 427 428 429 430 431 432 433
		int ext_sigcount;

		mc_saved_header = (struct microcode_header_intel *)p->data;

		sig	= mc_saved_header->sig;
		pf	= mc_saved_header->pf;
		rev	= mc_saved_header->rev;
		date	= mc_saved_header->date;
434

435 436
		total_size	= get_totalsize(mc_saved_header);
		data_size	= get_datasize(mc_saved_header);
437

M
Masanari Iida 已提交
438
		pr_debug("mc_saved[%d]: sig=0x%x, pf=0x%x, rev=0x%x, total size=0x%x, date = %04x-%02x-%02x\n",
439
			 i++, sig, pf, rev, total_size,
440 441 442 443 444 445 446 447
			 date & 0xffff,
			 date >> 24,
			 (date >> 16) & 0xff);

		/* Look for ext. headers: */
		if (total_size <= data_size + MC_HEADER_SIZE)
			continue;

448
		ext_header = (void *)mc_saved_header + data_size + MC_HEADER_SIZE;
449 450 451 452 453 454 455 456 457 458 459 460 461 462
		ext_sigcount = ext_header->count;
		ext_sig = (void *)ext_header + EXT_HEADER_SIZE;

		for (j = 0; j < ext_sigcount; j++) {
			sig = ext_sig->sig;
			pf = ext_sig->pf;

			pr_debug("\tExtended[%d]: sig=0x%x, pf=0x%x\n",
				 j, sig, pf);

			ext_sig++;
		}
	}
#endif
463
}
464 465

/*
466 467
 * Save this microcode patch. It will be loaded early when a CPU is
 * hot-added or resumes.
468
 */
469
static void save_mc_for_early(u8 *mc, unsigned int size)
470
{
471
#ifdef CONFIG_HOTPLUG_CPU
472
	/* Synchronization during CPU hotplug. */
473 474
	static DEFINE_MUTEX(x86_cpu_microcode_mutex);

475 476
	mutex_lock(&x86_cpu_microcode_mutex);

477
	save_microcode_patch(mc, size);
478 479 480 481
	show_saved_mc();

	mutex_unlock(&x86_cpu_microcode_mutex);
#endif
482
}
483

484
static bool load_builtin_intel_microcode(struct cpio_data *cp)
485
{
486
	unsigned int eax = 1, ebx, ecx = 0, edx;
487 488
	char name[30];

489 490 491
	if (IS_ENABLED(CONFIG_X86_32))
		return false;

492 493
	native_cpuid(&eax, &ebx, &ecx, &edx);

494 495
	sprintf(name, "intel-ucode/%02x-%02x-%02x",
		      x86_family(eax), x86_model(eax), x86_stepping(eax));
496 497 498 499 500 501 502 503 504 505

	return get_builtin_firmware(cp, name);
}

/*
 * Print ucode update info.
 */
static void
print_ucode_info(struct ucode_cpu_info *uci, unsigned int date)
{
506 507 508 509 510
	pr_info_once("microcode updated early to revision 0x%x, date = %04x-%02x-%02x\n",
		     uci->cpu_sig.rev,
		     date & 0xffff,
		     date >> 24,
		     (date >> 16) & 0xff);
511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532
}

#ifdef CONFIG_X86_32

static int delay_ucode_info;
static int current_mc_date;

/*
 * Print early updated ucode info after printk works. This is delayed info dump.
 */
void show_ucode_info_early(void)
{
	struct ucode_cpu_info uci;

	if (delay_ucode_info) {
		collect_cpu_info_early(&uci);
		print_ucode_info(&uci, current_mc_date);
		delay_ucode_info = 0;
	}
}

/*
533
 * At this point, we can not call printk() yet. Delay printing microcode info in
534 535 536 537
 * show_ucode_info_early() until printk() works.
 */
static void print_ucode(struct ucode_cpu_info *uci)
{
538
	struct microcode_intel *mc;
539 540 541
	int *delay_ucode_info_p;
	int *current_mc_date_p;

542 543
	mc = uci->mc;
	if (!mc)
544 545 546 547 548 549
		return;

	delay_ucode_info_p = (int *)__pa_nodebug(&delay_ucode_info);
	current_mc_date_p = (int *)__pa_nodebug(&current_mc_date);

	*delay_ucode_info_p = 1;
550
	*current_mc_date_p = mc->hdr.date;
551 552 553 554 555 556 557 558 559 560 561 562 563 564
}
#else

/*
 * Flush global tlb. We only do this in x86_64 where paging has been enabled
 * already and PGE should be enabled as well.
 */
static inline void flush_tlb_early(void)
{
	__native_flush_tlb_global_irq_disabled();
}

static inline void print_ucode(struct ucode_cpu_info *uci)
{
565
	struct microcode_intel *mc;
566

567 568
	mc = uci->mc;
	if (!mc)
569 570
		return;

571
	print_ucode_info(uci, mc->hdr.date);
572 573 574 575 576
}
#endif

static int apply_microcode_early(struct ucode_cpu_info *uci, bool early)
{
577
	struct microcode_intel *mc;
578
	u32 rev;
579

580 581
	mc = uci->mc;
	if (!mc)
582 583 584
		return 0;

	/* write microcode via MSR 0x79 */
585
	native_wrmsrl(MSR_IA32_UCODE_WRITE, (unsigned long)mc->bits);
586

587 588
	rev = intel_get_microcode_revision();
	if (rev != mc->hdr.rev)
589 590 591 592 593 594
		return -1;

#ifdef CONFIG_X86_64
	/* Flush global tlb. This is precaution. */
	flush_tlb_early();
#endif
595
	uci->cpu_sig.rev = rev;
596 597 598 599

	if (early)
		print_ucode(uci);
	else
600
		print_ucode_info(uci, mc->hdr.date);
601 602 603 604 605 606

	return 0;
}

int __init save_microcode_in_initrd_intel(void)
{
607 608
	struct ucode_cpu_info uci;
	struct cpio_data cp;
609

610
	/*
611
	 * AP loading didn't find any microcode patch, no need to save anything.
612
	 */
613 614
	if (!intel_ucode_patch || IS_ERR(intel_ucode_patch))
		return 0;
615

616 617
	if (!load_builtin_intel_microcode(&cp))
		cp = find_microcode_in_initrd(ucode_path, false);
618

619 620
	if (!(cp.data && cp.size))
		return 0;
621

622
	collect_cpu_info_early(&uci);
623

624
	scan_microcode(cp.data, cp.size, &uci, true);
625

626
	show_saved_mc();
627

628 629
	return 0;
}
630 631


632 633 634 635 636 637 638 639
/*
 * @res_patch, output: a pointer to the patch we found.
 */
static struct microcode_intel *__load_ucode_intel(struct ucode_cpu_info *uci)
{
	static const char *path;
	struct cpio_data cp;
	bool use_pa;
640

641 642 643 644 645 646
	if (IS_ENABLED(CONFIG_X86_32)) {
		path	  = (const char *)__pa_nodebug(ucode_path);
		use_pa	  = true;
	} else {
		path	  = ucode_path;
		use_pa	  = false;
647 648
	}

649 650 651
	/* try built-in microcode first */
	if (!load_builtin_intel_microcode(&cp))
		cp = find_microcode_in_initrd(path, use_pa);
652

653 654
	if (!(cp.data && cp.size))
		return NULL;
655

656
	collect_cpu_info_early(uci);
657

658
	return scan_microcode(cp.data, cp.size, uci, false);
659 660
}

661
void __init load_ucode_intel_bsp(void)
662
{
663
	struct microcode_intel *patch;
664 665
	struct ucode_cpu_info uci;

666 667
	patch = __load_ucode_intel(&uci);
	if (!patch)
668 669
		return;

670
	uci.mc = patch;
671 672 673 674

	apply_microcode_early(&uci, true);
}

675
void load_ucode_intel_ap(void)
676
{
677 678
	struct microcode_intel *patch, **iup;
	struct ucode_cpu_info uci;
679

680 681 682 683 684 685 686 687 688 689
	if (IS_ENABLED(CONFIG_X86_32))
		iup = (struct microcode_intel **) __pa_nodebug(&intel_ucode_patch);
	else
		iup = &intel_ucode_patch;

reget:
	if (!*iup) {
		patch = __load_ucode_intel(&uci);
		if (!patch)
			return;
690

691 692 693 694 695 696 697 698 699 700 701
		*iup = patch;
	}

	uci.mc = *iup;

	if (apply_microcode_early(&uci, true)) {
		/* Mixed-silicon system? Try to refetch the proper patch: */
		*iup = NULL;

		goto reget;
	}
702 703
}

704
static struct microcode_intel *find_patch(struct ucode_cpu_info *uci)
705
{
706 707
	struct microcode_header_intel *phdr;
	struct ucode_patch *iter, *tmp;
708

709
	list_for_each_entry_safe(iter, tmp, &microcode_cache, plist) {
710

711
		phdr = (struct microcode_header_intel *)iter->data;
712

713 714
		if (phdr->rev <= uci->cpu_sig.rev)
			continue;
715

716 717 718 719
		if (!find_matching_signature(phdr,
					     uci->cpu_sig.sig,
					     uci->cpu_sig.pf))
			continue;
720

721 722 723
		return iter->data;
	}
	return NULL;
724 725 726 727
}

void reload_ucode_intel(void)
{
728
	struct microcode_intel *p;
729 730 731 732
	struct ucode_cpu_info uci;

	collect_cpu_info_early(&uci);

733 734
	p = find_patch(&uci);
	if (!p)
735 736
		return;

737 738
	uci.mc = p;

739 740 741
	apply_microcode_early(&uci, false);
}

742
static int collect_cpu_info(int cpu_num, struct cpu_signature *csig)
L
Linus Torvalds 已提交
743
{
744
	static struct cpu_signature prev;
745
	struct cpuinfo_x86 *c = &cpu_data(cpu_num);
L
Linus Torvalds 已提交
746 747
	unsigned int val[2];

748
	memset(csig, 0, sizeof(*csig));
L
Linus Torvalds 已提交
749

750
	csig->sig = cpuid_eax(0x00000001);
751 752 753 754

	if ((c->x86_model >= 5) || (c->x86 > 6)) {
		/* get processor flags from MSR 0x17 */
		rdmsr(MSR_IA32_PLATFORM_ID, val[0], val[1]);
755
		csig->pf = 1 << ((val[1] >> 18) & 7);
L
Linus Torvalds 已提交
756 757
	}

758
	csig->rev = c->microcode;
759 760 761 762 763 764 765

	/* No extra locking on prev, races are harmless. */
	if (csig->sig != prev.sig || csig->pf != prev.pf || csig->rev != prev.rev) {
		pr_info("sig=0x%x, pf=0x%x, revision=0x%x\n",
			csig->sig, csig->pf, csig->rev);
		prev = *csig;
	}
766 767

	return 0;
L
Linus Torvalds 已提交
768 769
}

770
static int apply_microcode_intel(int cpu)
L
Linus Torvalds 已提交
771
{
772
	struct microcode_intel *mc;
I
Ingo Molnar 已提交
773
	struct ucode_cpu_info *uci;
774
	struct cpuinfo_x86 *c;
775
	static int prev_rev;
776
	u32 rev;
I
Ingo Molnar 已提交
777

778
	/* We should bind the task to the CPU */
779
	if (WARN_ON(raw_smp_processor_id() != cpu))
780
		return -1;
781

782 783
	uci = ucode_cpu_info + cpu;
	mc = uci->mc;
784 785 786 787 788 789
	if (!mc) {
		/* Look for a newer patch in our cache: */
		mc = find_patch(uci);
		if (!mc)
			return 0;
	}
790

L
Linus Torvalds 已提交
791
	/* write microcode via MSR 0x79 */
792
	wrmsrl(MSR_IA32_UCODE_WRITE, (unsigned long)mc->bits);
793

794
	rev = intel_get_microcode_revision();
L
Linus Torvalds 已提交
795

796
	if (rev != mc->hdr.rev) {
797
		pr_err("CPU%d update to revision 0x%x failed\n",
798
		       cpu, mc->hdr.rev);
799
		return -1;
800
	}
801

802
	if (rev != prev_rev) {
803
		pr_info("updated to revision 0x%x, date = %04x-%02x-%02x\n",
804
			rev,
805 806 807
			mc->hdr.date & 0xffff,
			mc->hdr.date >> 24,
			(mc->hdr.date >> 16) & 0xff);
808
		prev_rev = rev;
809
	}
I
Ingo Molnar 已提交
810

811 812
	c = &cpu_data(cpu);

813 814
	uci->cpu_sig.rev = rev;
	c->microcode = rev;
815 816

	return 0;
L
Linus Torvalds 已提交
817 818
}

819 820
static enum ucode_state generic_load_microcode(int cpu, void *data, size_t size,
				int (*get_ucode_data)(void *, const void *, size_t))
821
{
D
Dmitry Adamushko 已提交
822
	struct ucode_cpu_info *uci = ucode_cpu_info + cpu;
823
	u8 *ucode_ptr = data, *new_mc = NULL, *mc = NULL;
D
Dmitry Adamushko 已提交
824 825
	int new_rev = uci->cpu_sig.rev;
	unsigned int leftover = size;
826
	unsigned int curr_mc_size = 0, new_mc_size = 0;
827
	unsigned int csig, cpf;
828

D
Dmitry Adamushko 已提交
829 830 831
	while (leftover) {
		struct microcode_header_intel mc_header;
		unsigned int mc_size;
832

833 834 835 836 837
		if (leftover < sizeof(mc_header)) {
			pr_err("error! Truncated header in microcode data file\n");
			break;
		}

D
Dmitry Adamushko 已提交
838 839
		if (get_ucode_data(&mc_header, ucode_ptr, sizeof(mc_header)))
			break;
840

D
Dmitry Adamushko 已提交
841 842
		mc_size = get_totalsize(&mc_header);
		if (!mc_size || mc_size > leftover) {
843
			pr_err("error! Bad data in microcode data file\n");
D
Dmitry Adamushko 已提交
844 845
			break;
		}
846

847 848
		/* For performance reasons, reuse mc area when possible */
		if (!mc || mc_size > curr_mc_size) {
849
			vfree(mc);
850 851 852 853 854
			mc = vmalloc(mc_size);
			if (!mc)
				break;
			curr_mc_size = mc_size;
		}
D
Dmitry Adamushko 已提交
855 856

		if (get_ucode_data(mc, ucode_ptr, mc_size) ||
857
		    microcode_sanity_check(mc, 1) < 0) {
D
Dmitry Adamushko 已提交
858 859 860
			break;
		}

861 862
		csig = uci->cpu_sig.sig;
		cpf = uci->cpu_sig.pf;
863
		if (has_newer_microcode(mc, csig, cpf, new_rev)) {
864
			vfree(new_mc);
D
Dmitry Adamushko 已提交
865 866
			new_rev = mc_header.rev;
			new_mc  = mc;
867
			new_mc_size = mc_size;
868 869
			mc = NULL;	/* trigger new vmalloc */
		}
D
Dmitry Adamushko 已提交
870 871 872

		ucode_ptr += mc_size;
		leftover  -= mc_size;
873 874
	}

875
	vfree(mc);
876

877
	if (leftover) {
878
		vfree(new_mc);
879
		return UCODE_ERROR;
880
	}
I
Ingo Molnar 已提交
881

882 883
	if (!new_mc)
		return UCODE_NFOUND;
D
Dmitry Adamushko 已提交
884

885
	vfree(uci->mc);
I
Ingo Molnar 已提交
886 887
	uci->mc = (struct microcode_intel *)new_mc;

888 889 890 891 892
	/*
	 * If early loading microcode is supported, save this mc into
	 * permanent memory. So it will be loaded early when a CPU is hot added
	 * or resumes.
	 */
893
	save_mc_for_early(new_mc, new_mc_size);
894

895 896
	pr_debug("CPU%d found a matching microcode update with version 0x%x (current=0x%x)\n",
		 cpu, new_rev, uci->cpu_sig.rev);
897 898

	return UCODE_OK;
899 900
}

D
Dmitry Adamushko 已提交
901 902 903 904 905
static int get_ucode_fw(void *to, const void *from, size_t n)
{
	memcpy(to, from, n);
	return 0;
}
906

907 908
static enum ucode_state request_microcode_fw(int cpu, struct device *device,
					     bool refresh_fw)
909 910
{
	char name[30];
911
	struct cpuinfo_x86 *c = &cpu_data(cpu);
912
	const struct firmware *firmware;
913
	enum ucode_state ret;
914

P
Peter Oruba 已提交
915
	sprintf(name, "intel-ucode/%02x-%02x-%02x",
916
		c->x86, c->x86_model, c->x86_mask);
917

918
	if (request_firmware_direct(&firmware, name, device)) {
919
		pr_debug("data file %s load failed\n", name);
920
		return UCODE_NFOUND;
921
	}
D
Dmitry Adamushko 已提交
922

923 924
	ret = generic_load_microcode(cpu, (void *)firmware->data,
				     firmware->size, &get_ucode_fw);
D
Dmitry Adamushko 已提交
925

926 927
	release_firmware(firmware);

D
Dmitry Adamushko 已提交
928 929 930 931 932 933 934 935
	return ret;
}

static int get_ucode_user(void *to, const void *from, size_t n)
{
	return copy_from_user(to, from, n);
}

936 937
static enum ucode_state
request_microcode_user(int cpu, const void __user *buf, size_t size)
D
Dmitry Adamushko 已提交
938
{
939
	return generic_load_microcode(cpu, (void *)buf, size, &get_ucode_user);
940 941
}

H
Hannes Eder 已提交
942
static struct microcode_ops microcode_intel_ops = {
D
Dmitry Adamushko 已提交
943 944
	.request_microcode_user		  = request_microcode_user,
	.request_microcode_fw             = request_microcode_fw,
P
Peter Oruba 已提交
945
	.collect_cpu_info                 = collect_cpu_info,
946
	.apply_microcode                  = apply_microcode_intel,
P
Peter Oruba 已提交
947 948
};

949
struct microcode_ops * __init init_intel_microcode(void)
P
Peter Oruba 已提交
950
{
951
	struct cpuinfo_x86 *c = &boot_cpu_data;
952 953 954 955 956 957 958

	if (c->x86_vendor != X86_VENDOR_INTEL || c->x86 < 6 ||
	    cpu_has(c, X86_FEATURE_IA64)) {
		pr_err("Intel CPU family 0x%x not supported\n", c->x86);
		return NULL;
	}

959
	return &microcode_intel_ops;
P
Peter Oruba 已提交
960
}