2 * Copyright (c) 2006, 2008 Stanislav Sedov <stas@FreeBSD.org>.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
15 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
18 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
19 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
20 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
21 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
22 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
23 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 #include <sys/cdefs.h>
27 __FBSDID("$FreeBSD: release/10.0.0/usr.sbin/cpucontrol/intel.c 245491 2013-01-16 05:00:51Z eadler $");
38 #include <sys/types.h>
41 #include <sys/ioctl.h>
42 #include <sys/ioccom.h>
43 #include <sys/cpuctl.h>
45 #include <machine/cpufunc.h>
46 #include <machine/specialreg.h>
48 #include "cpucontrol.h"
51 #define DEFAULT_UCODE_SIZE 2000 /* Size of update data if not specified. */
58 cpuctl_cpuid_args_t idargs
= {
62 error
= ioctl(fd
, CPUCTL_CPUID
, &idargs
);
67 ((uint32_t *)vendor
)[0] = idargs
.data
[1];
68 ((uint32_t *)vendor
)[1] = idargs
.data
[3];
69 ((uint32_t *)vendor
)[2] = idargs
.data
[2];
71 if (strncmp(vendor
, INTEL_VENDOR_ID
, sizeof(INTEL_VENDOR_ID
)) != 0)
77 intel_update(const char *dev
, const char *path
)
86 intel_fw_header_t
*fw_header
;
87 intel_cpu_signature_t
*ext_table
;
88 intel_ext_header_t
*ext_header
;
89 uint32_t signature
, flags
;
92 size_t ext_table_size
;
94 size_t data_size
, total_size
;
95 cpuctl_msr_args_t msrargs
= {
96 .msr
= MSR_IA32_PLATFORM_ID
,
98 cpuctl_cpuid_args_t idargs
= {
99 .level
= 1, /* Signature. */
101 cpuctl_update_args_t args
;
108 fw_image
= MAP_FAILED
;
111 devfd
= open(dev
, O_RDWR
);
113 WARN(0, "could not open %s for writing", dev
);
116 error
= ioctl(devfd
, CPUCTL_CPUID
, &idargs
);
118 WARN(0, "ioctl(%s)", dev
);
121 signature
= idargs
.data
[0];
122 error
= ioctl(devfd
, CPUCTL_RDMSR
, &msrargs
);
124 WARN(0, "ioctl(%s)", dev
);
129 * MSR_IA32_PLATFORM_ID contains flag in BCD in bits 52-50.
131 flags
= 1 << ((msrargs
.data
>> 50) & 7);
132 msrargs
.msr
= MSR_BIOS_SIGN
;
133 error
= ioctl(devfd
, CPUCTL_RDMSR
, &msrargs
);
135 WARN(0, "ioctl(%s)", dev
);
138 revision
= msrargs
.data
>> 32; /* Revision in the high dword. */
139 WARNX(2, "found cpu type %#x family %#x model %#x stepping %#x.",
140 (signature
>> 12) & 0x03, (signature
>> 8) & 0x0f,
141 (signature
>> 4) & 0x0f, (signature
>> 0) & 0x0f);
143 * Open firmware image.
145 fd
= open(path
, O_RDONLY
, 0);
147 WARN(0, "open(%s)", path
);
150 error
= fstat(fd
, &st
);
152 WARN(0, "fstat(%s)", path
);
155 if (st
.st_size
< 0 || (unsigned)st
.st_size
< sizeof(*fw_header
)) {
156 WARNX(2, "file too short: %s", path
);
161 * mmap the whole image.
163 fw_image
= (uint32_t *)mmap(NULL
, st
.st_size
, PROT_READ
,
165 if (fw_image
== MAP_FAILED
) {
166 WARN(0, "mmap(%s)", path
);
169 fw_header
= (intel_fw_header_t
*)fw_image
;
170 if (fw_header
->header_version
!= INTEL_HEADER_VERSION
||
171 fw_header
->loader_revision
!= INTEL_LOADER_REVISION
) {
172 WARNX(2, "%s is not a valid intel firmware: version mismatch",
177 * According to spec, if data_size == 0, then size of ucode = 2000.
179 if (fw_header
->data_size
== 0)
180 data_size
= DEFAULT_UCODE_SIZE
;
182 data_size
= fw_header
->data_size
;
183 if (fw_header
->total_size
== 0)
184 total_size
= data_size
+ sizeof(*fw_header
);
186 total_size
= fw_header
->total_size
;
187 if (total_size
> (unsigned)st
.st_size
|| st
.st_size
< 0) {
188 WARNX(2, "file too short: %s", path
);
191 payload_size
= data_size
+ sizeof(*fw_header
);
194 * Check the primary checksum.
197 for (i
= 0; i
< (payload_size
/ sizeof(uint32_t)); i
++)
198 sum
+= *((uint32_t *)fw_image
+ i
);
200 WARNX(2, "%s: update data checksum invalid", path
);
205 * Check if there is an extended signature table.
207 ext_size
= total_size
- payload_size
;
210 if (ext_size
> (signed)sizeof(*ext_header
)) {
212 (intel_ext_header_t
*)((char *)fw_image
+ payload_size
);
213 ext_table
= (intel_cpu_signature_t
*)(ext_header
+ 1);
216 * Check the extended table size.
218 ext_table_size
= sizeof(*ext_header
) +
219 ext_header
->sig_count
* sizeof(*ext_table
);
220 if (ext_table_size
+ payload_size
> total_size
) {
221 WARNX(2, "%s: broken extended signature table", path
);
226 * Check the extended table signature.
229 for (i
= 0; i
< (ext_table_size
/ sizeof(uint32_t)); i
++)
230 sum
+= *((uint32_t *)ext_header
+ i
);
232 WARNX(2, "%s: extended signature table checksum invalid",
240 fw_data
= fw_header
+ 1; /* Pointer to the update data. */
243 * Check if the given image is ok for this cpu.
245 if (signature
== fw_header
->cpu_signature
&&
246 (flags
& fw_header
->cpu_flags
) != 0)
248 else if (have_ext_table
!= 0) {
249 for (i
= 0; i
< ext_header
->sig_count
; i
++) {
250 uint32_t sig
= ext_table
[i
].cpu_signature
;
251 if (signature
== sig
&&
252 (flags
& ext_table
[i
].cpu_flags
) != 0)
259 if (revision
>= fw_header
->revision
) {
260 WARNX(1, "skipping %s of rev %#x: up to date",
261 path
, fw_header
->revision
);
264 fprintf(stderr
, "%s: updating cpu %s from rev %#x to rev %#x... ",
265 path
, dev
, revision
, fw_header
->revision
);
267 args
.size
= data_size
;
268 error
= ioctl(devfd
, CPUCTL_UPDATE
, &args
);
271 fprintf(stderr
, "failed.\n");
276 fprintf(stderr
, "done.\n");
279 if (fw_image
!= MAP_FAILED
)
280 if (munmap(fw_image
, st
.st_size
) != 0)
281 warn("munmap(%s)", path
);