xref: /freebsd/sbin/nvmecontrol/firmware.c (revision e17f5b1d)
1 /*-
2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3  *
4  * Copyright (c) 2013 EMC Corp.
5  * All rights reserved.
6  *
7  * Copyright (C) 2012-2013 Intel Corporation
8  * All rights reserved.
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 AUTHOR AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 #include <sys/cdefs.h>
33 __FBSDID("$FreeBSD$");
34 
35 #include <sys/param.h>
36 #include <sys/ioccom.h>
37 #include <sys/stat.h>
38 #include <sys/types.h>
39 
40 #include <ctype.h>
41 #include <err.h>
42 #include <fcntl.h>
43 #include <inttypes.h>
44 #include <stdbool.h>
45 #include <stddef.h>
46 #include <stdio.h>
47 #include <stdlib.h>
48 #include <string.h>
49 #include <unistd.h>
50 
51 #include "nvmecontrol.h"
52 
53 /* Tables for command line parsing */
54 
55 static cmd_fn_t firmware;
56 
57 #define NONE 0xffffffffu
58 static struct options {
59 	bool		activate;
60 	uint32_t	slot;
61 	const char	*fw_img;
62 	const char	*dev;
63 } opt = {
64 	.activate = false,
65 	.slot = NONE,
66 	.fw_img = NULL,
67 	.dev = NULL,
68 };
69 
70 static const struct opts firmware_opts[] = {
71 #define OPT(l, s, t, opt, addr, desc) { l, s, t, &opt.addr, desc }
72 	OPT("activate", 'a', arg_none, opt, activate,
73 	    "Attempt to activate firmware"),
74 	OPT("slot", 's', arg_uint32, opt, slot,
75 	    "Slot to activate and/or download firmware to"),
76 	OPT("firmware", 'f', arg_path, opt, fw_img,
77 	    "Firmware image to download"),
78 	{ NULL, 0, arg_none, NULL, NULL }
79 };
80 #undef OPT
81 
82 static const struct args firmware_args[] = {
83 	{ arg_string, &opt.dev, "controller-id|namespace-id" },
84 	{ arg_none, NULL, NULL },
85 };
86 
87 static struct cmd firmware_cmd = {
88 	.name = "firmware",
89 	.fn = firmware,
90 	.descr = "Download firmware image to controller",
91 	.ctx_size = sizeof(opt),
92 	.opts = firmware_opts,
93 	.args = firmware_args,
94 };
95 
96 CMD_COMMAND(firmware_cmd);
97 
98 /* End of tables for command line parsing */
99 
100 static int
101 slot_has_valid_firmware(int fd, int slot)
102 {
103 	struct nvme_firmware_page	fw;
104 	int				has_fw = false;
105 
106 	read_logpage(fd, NVME_LOG_FIRMWARE_SLOT,
107 	    NVME_GLOBAL_NAMESPACE_TAG, 0, 0, 0, &fw, sizeof(fw));
108 
109 	if (fw.revision[slot-1] != 0LLU)
110 		has_fw = true;
111 
112 	return (has_fw);
113 }
114 
115 static void
116 read_image_file(const char *path, void **buf, int32_t *size)
117 {
118 	struct stat	sb;
119 	int32_t		filesize;
120 	int		fd;
121 
122 	*size = 0;
123 	*buf = NULL;
124 
125 	if ((fd = open(path, O_RDONLY)) < 0)
126 		err(1, "unable to open '%s'", path);
127 	if (fstat(fd, &sb) < 0)
128 		err(1, "unable to stat '%s'", path);
129 
130 	/*
131 	 * The NVMe spec does not explicitly state a maximum firmware image
132 	 *  size, although one can be inferred from the dword size limitation
133 	 *  for the size and offset fields in the Firmware Image Download
134 	 *  command.
135 	 *
136 	 * Technically, the max is UINT32_MAX * sizeof(uint32_t), since the
137 	 *  size and offsets are specified in terms of dwords (not bytes), but
138 	 *  realistically INT32_MAX is sufficient here and simplifies matters
139 	 *  a bit.
140 	 */
141 	if (sb.st_size > INT32_MAX)
142 		errx(1, "size of file '%s' is too large (%jd bytes)",
143 		    path, (intmax_t)sb.st_size);
144 	filesize = (int32_t)sb.st_size;
145 	if ((*buf = malloc(filesize)) == NULL)
146 		errx(1, "unable to malloc %d bytes", filesize);
147 	if ((*size = read(fd, *buf, filesize)) < 0)
148 		err(1, "error reading '%s'", path);
149 	/* XXX assuming no short reads */
150 	if (*size != filesize)
151 		errx(1,
152 		    "error reading '%s' (read %d bytes, requested %d bytes)",
153 		    path, *size, filesize);
154 	close(fd);
155 }
156 
157 static void
158 update_firmware(int fd, uint8_t *payload, int32_t payload_size)
159 {
160 	struct nvme_pt_command	pt;
161 	int32_t			off, resid, size;
162 	void			*chunk;
163 
164 	off = 0;
165 	resid = payload_size;
166 
167 	if ((chunk = aligned_alloc(PAGE_SIZE, NVME_MAX_XFER_SIZE)) == NULL)
168 		errx(1, "unable to malloc %d bytes", NVME_MAX_XFER_SIZE);
169 
170 	while (resid > 0) {
171 		size = (resid >= NVME_MAX_XFER_SIZE) ?
172 		    NVME_MAX_XFER_SIZE : resid;
173 		memcpy(chunk, payload + off, size);
174 
175 		memset(&pt, 0, sizeof(pt));
176 		pt.cmd.opc = NVME_OPC_FIRMWARE_IMAGE_DOWNLOAD;
177 		pt.cmd.cdw10 = htole32((size / sizeof(uint32_t)) - 1);
178 		pt.cmd.cdw11 = htole32(off / sizeof(uint32_t));
179 		pt.buf = chunk;
180 		pt.len = size;
181 		pt.is_read = 0;
182 
183 		if (ioctl(fd, NVME_PASSTHROUGH_CMD, &pt) < 0)
184 			err(1, "firmware download request failed");
185 
186 		if (nvme_completion_is_error(&pt.cpl))
187 			errx(1, "firmware download request returned error");
188 
189 		resid -= size;
190 		off += size;
191 	}
192 	free(chunk);
193 }
194 
195 static int
196 activate_firmware(int fd, int slot, int activate_action)
197 {
198 	struct nvme_pt_command	pt;
199 	uint16_t sct, sc;
200 
201 	memset(&pt, 0, sizeof(pt));
202 	pt.cmd.opc = NVME_OPC_FIRMWARE_ACTIVATE;
203 	pt.cmd.cdw10 = htole32((activate_action << 3) | slot);
204 	pt.is_read = 0;
205 
206 	if (ioctl(fd, NVME_PASSTHROUGH_CMD, &pt) < 0)
207 		err(1, "firmware activate request failed");
208 
209 	sct = NVME_STATUS_GET_SCT(pt.cpl.status);
210 	sc = NVME_STATUS_GET_SC(pt.cpl.status);
211 
212 	if (sct == NVME_SCT_COMMAND_SPECIFIC &&
213 	    sc == NVME_SC_FIRMWARE_REQUIRES_RESET)
214 		return 1;
215 
216 	if (nvme_completion_is_error(&pt.cpl))
217 		errx(1, "firmware activate request returned error");
218 
219 	return 0;
220 }
221 
222 static void
223 firmware(const struct cmd *f, int argc, char *argv[])
224 {
225 	int				fd = -1;
226 	int				activate_action, reboot_required;
227 	char				prompt[64];
228 	void				*buf = NULL;
229 	char				*path;
230 	int32_t				size = 0, nsid;
231 	uint16_t			oacs_fw;
232 	uint8_t				fw_slot1_ro, fw_num_slots;
233 	struct nvme_controller_data	cdata;
234 
235 	if (arg_parse(argc, argv, f))
236 		return;
237 
238 	if (opt.slot == 0) {
239 		fprintf(stderr,
240 		    "0 is not a valid slot number. "
241 		    "Slot numbers start at 1.\n");
242 		arg_help(argc, argv, f);
243 	} else if (opt.slot > 7 && opt.slot != NONE) {
244 		fprintf(stderr,
245 		    "Slot number %s specified which is "
246 		    "greater than max allowed slot number of "
247 		    "7.\n", optarg);
248 		arg_help(argc, argv, f);
249 	}
250 
251 	if (!opt.activate && opt.fw_img == NULL) {
252 		fprintf(stderr,
253 		    "Neither a replace ([-f path_to_firmware]) nor "
254 		    "activate ([-a]) firmware image action\n"
255 		    "was specified.\n");
256 		arg_help(argc, argv, f);
257 	}
258 
259 	if (opt.activate && opt.fw_img == NULL && opt.slot == 0) {
260 		fprintf(stderr,
261 		    "Slot number to activate not specified.\n");
262 		arg_help(argc, argv, f);
263 	}
264 
265 	open_dev(opt.dev, &fd, 1, 1);
266 	get_nsid(fd, &path, &nsid);
267 	if (nsid != 0) {
268 		close(fd);
269 		open_dev(path, &fd, 1, 1);
270 	}
271 	free(path);
272 
273 	read_controller_data(fd, &cdata);
274 
275 	oacs_fw = (cdata.oacs >> NVME_CTRLR_DATA_OACS_FIRMWARE_SHIFT) &
276 		NVME_CTRLR_DATA_OACS_FIRMWARE_MASK;
277 
278 	if (oacs_fw == 0)
279 		errx(1,
280 		    "controller does not support firmware activate/download");
281 
282 	fw_slot1_ro = (cdata.frmw >> NVME_CTRLR_DATA_FRMW_SLOT1_RO_SHIFT) &
283 		NVME_CTRLR_DATA_FRMW_SLOT1_RO_MASK;
284 
285 	if (opt.fw_img && opt.slot == 1 && fw_slot1_ro)
286 		errx(1, "slot %d is marked as read only", opt.slot);
287 
288 	fw_num_slots = (cdata.frmw >> NVME_CTRLR_DATA_FRMW_NUM_SLOTS_SHIFT) &
289 		NVME_CTRLR_DATA_FRMW_NUM_SLOTS_MASK;
290 
291 	if (opt.slot > fw_num_slots)
292 		errx(1,
293 		    "slot %d specified but controller only supports %d slots",
294 		    opt.slot, fw_num_slots);
295 
296 	if (opt.activate && opt.fw_img == NULL &&
297 	    !slot_has_valid_firmware(fd, opt.slot))
298 		errx(1,
299 		    "slot %d does not contain valid firmware,\n"
300 		    "try 'nvmecontrol logpage -p 3 %s' to get a list "
301 		    "of available images\n",
302 		    opt.slot, opt.dev);
303 
304 	if (opt.fw_img)
305 		read_image_file(opt.fw_img, &buf, &size);
306 
307 	if (opt.fw_img != NULL&& opt.activate)
308 		printf("You are about to download and activate "
309 		       "firmware image (%s) to controller %s.\n"
310 		       "This may damage your controller and/or "
311 		       "overwrite an existing firmware image.\n",
312 		       opt.fw_img, opt.dev);
313 	else if (opt.activate)
314 		printf("You are about to activate a new firmware "
315 		       "image on controller %s.\n"
316 		       "This may damage your controller.\n",
317 		       opt.dev);
318 	else if (opt.fw_img != NULL)
319 		printf("You are about to download firmware image "
320 		       "(%s) to controller %s.\n"
321 		       "This may damage your controller and/or "
322 		       "overwrite an existing firmware image.\n",
323 		       opt.fw_img, opt.dev);
324 
325 	printf("Are you sure you want to continue? (yes/no) ");
326 	while (1) {
327 		fgets(prompt, sizeof(prompt), stdin);
328 		if (strncasecmp(prompt, "yes", 3) == 0)
329 			break;
330 		if (strncasecmp(prompt, "no", 2) == 0)
331 			exit(1);
332 		printf("Please answer \"yes\" or \"no\". ");
333 	}
334 
335 	if (opt.fw_img != NULL) {
336 		update_firmware(fd, buf, size);
337 		if (opt.activate)
338 			activate_action = NVME_AA_REPLACE_ACTIVATE;
339 		else
340 			activate_action = NVME_AA_REPLACE_NO_ACTIVATE;
341 	} else {
342 		activate_action = NVME_AA_ACTIVATE;
343 	}
344 
345 	reboot_required = activate_firmware(fd, opt.slot, activate_action);
346 
347 	if (opt.activate) {
348 		if (reboot_required) {
349 			printf("New firmware image activated but requires "
350 			       "conventional reset (i.e. reboot) to "
351 			       "complete activation.\n");
352 		} else {
353 			printf("New firmware image activated and will take "
354 			       "effect after next controller reset.\n"
355 			       "Controller reset can be initiated via "
356 			       "'nvmecontrol reset %s'\n",
357 			       opt.dev);
358 		}
359 	}
360 
361 	close(fd);
362 	exit(0);
363 }
364