xref: /freebsd/usr.sbin/mptutil/mpt_cam.c (revision d0b2dbfa0ecf2bbc9709efc5e20baf8e4b44bbbf)
1 /*-
2  * SPDX-License-Identifier: BSD-3-Clause
3  *
4  * Copyright (c) 2008 Yahoo!, Inc.
5  * All rights reserved.
6  * Written by: John Baldwin <jhb@FreeBSD.org>
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. Neither the name of the author nor the names of any co-contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  */
32 
33 #include <sys/cdefs.h>
34 #include <sys/param.h>
35 #include <err.h>
36 #include <errno.h>
37 #include <fcntl.h>
38 #include <stdio.h>
39 #include <stdlib.h>
40 #include <string.h>
41 
42 #include <camlib.h>
43 #include <cam/scsi/scsi_message.h>
44 #include <cam/scsi/scsi_pass.h>
45 
46 #include "mptutil.h"
47 
48 static int xptfd;
49 
50 static int
51 xpt_open(void)
52 {
53 
54 	if (xptfd == 0)
55 		xptfd = open(XPT_DEVICE, O_RDWR);
56 	return (xptfd);
57 }
58 
59 /* Fetch the path id of bus 0 for the opened mpt controller. */
60 static int
61 fetch_path_id(path_id_t *path_id)
62 {
63 	struct bus_match_pattern *b;
64 	union ccb ccb;
65 	size_t bufsize;
66 	int error;
67 
68 	if (xpt_open() < 0)
69 		return (ENXIO);
70 
71 	/* First, find the path id of bus 0 for this mpt controller. */
72 	bzero(&ccb, sizeof(ccb));
73 
74 	ccb.ccb_h.func_code = XPT_DEV_MATCH;
75 
76 	bufsize = sizeof(struct dev_match_result) * 1;
77 	ccb.cdm.num_matches = 0;
78 	ccb.cdm.match_buf_len = bufsize;
79 	ccb.cdm.matches = calloc(1, bufsize);
80 
81 	bufsize = sizeof(struct dev_match_pattern) * 1;
82 	ccb.cdm.num_patterns = 1;
83 	ccb.cdm.pattern_buf_len = bufsize;
84 	ccb.cdm.patterns = calloc(1, bufsize);
85 
86 	/* Match mptX bus 0. */
87 	ccb.cdm.patterns[0].type = DEV_MATCH_BUS;
88 	b = &ccb.cdm.patterns[0].pattern.bus_pattern;
89 	snprintf(b->dev_name, sizeof(b->dev_name), "mpt");
90 	b->unit_number = mpt_unit;
91 	b->bus_id = 0;
92 	b->flags = BUS_MATCH_NAME | BUS_MATCH_UNIT | BUS_MATCH_BUS_ID;
93 
94 	if (ioctl(xptfd, CAMIOCOMMAND, &ccb) < 0) {
95 		error = errno;
96 		free(ccb.cdm.matches);
97 		free(ccb.cdm.patterns);
98 		return (error);
99 	}
100 	free(ccb.cdm.patterns);
101 
102 	if (((ccb.ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_CMP) ||
103 	    (ccb.cdm.status != CAM_DEV_MATCH_LAST)) {
104 		warnx("fetch_path_id got CAM error %#x, CDM error %d\n",
105 		    ccb.ccb_h.status, ccb.cdm.status);
106 		free(ccb.cdm.matches);
107 		return (EIO);
108 	}
109 
110 	/* We should have exactly 1 match for the bus. */
111 	if (ccb.cdm.num_matches != 1 ||
112 	    ccb.cdm.matches[0].type != DEV_MATCH_BUS) {
113 		free(ccb.cdm.matches);
114 		return (ENOENT);
115 	}
116 	*path_id = ccb.cdm.matches[0].result.bus_result.path_id;
117 	free(ccb.cdm.matches);
118 	return (0);
119 }
120 
121 int
122 mpt_query_disk(U8 VolumeBus, U8 VolumeID, struct mpt_query_disk *qd)
123 {
124 	struct periph_match_pattern *p;
125 	struct periph_match_result *r;
126 	union ccb ccb;
127 	path_id_t path_id;
128 	size_t bufsize;
129 	int error;
130 
131 	/* mpt(4) only handles devices on bus 0. */
132 	if (VolumeBus != 0)
133 		return (ENXIO);
134 
135 	if (xpt_open() < 0)
136 		return (ENXIO);
137 
138 	/* Find the path ID of bus 0. */
139 	error = fetch_path_id(&path_id);
140 	if (error)
141 		return (error);
142 
143 	bzero(&ccb, sizeof(ccb));
144 
145 	ccb.ccb_h.func_code = XPT_DEV_MATCH;
146 	ccb.ccb_h.path_id = CAM_XPT_PATH_ID;
147 	ccb.ccb_h.target_id = CAM_TARGET_WILDCARD;
148 	ccb.ccb_h.target_lun = CAM_LUN_WILDCARD;
149 
150 	bufsize = sizeof(struct dev_match_result) * 5;
151 	ccb.cdm.num_matches = 0;
152 	ccb.cdm.match_buf_len = bufsize;
153 	ccb.cdm.matches = calloc(1, bufsize);
154 
155 	bufsize = sizeof(struct dev_match_pattern) * 1;
156 	ccb.cdm.num_patterns = 1;
157 	ccb.cdm.pattern_buf_len = bufsize;
158 	ccb.cdm.patterns = calloc(1, bufsize);
159 
160 	/* Look for a "da" device at the specified target and lun. */
161 	ccb.cdm.patterns[0].type = DEV_MATCH_PERIPH;
162 	p = &ccb.cdm.patterns[0].pattern.periph_pattern;
163 	p->path_id = path_id;
164 	snprintf(p->periph_name, sizeof(p->periph_name), "da");
165 	p->target_id = VolumeID;
166 	p->flags = PERIPH_MATCH_PATH | PERIPH_MATCH_NAME | PERIPH_MATCH_TARGET;
167 
168 	if (ioctl(xptfd, CAMIOCOMMAND, &ccb) < 0) {
169 		error = errno;
170 		free(ccb.cdm.matches);
171 		free(ccb.cdm.patterns);
172 		return (error);
173 	}
174 	free(ccb.cdm.patterns);
175 
176 	if (((ccb.ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_CMP) ||
177 	    (ccb.cdm.status != CAM_DEV_MATCH_LAST)) {
178 		warnx("mpt_query_disk got CAM error %#x, CDM error %d\n",
179 		    ccb.ccb_h.status, ccb.cdm.status);
180 		free(ccb.cdm.matches);
181 		return (EIO);
182 	}
183 
184 	/*
185 	 * We should have exactly 1 match for the peripheral.
186 	 * However, if we don't get a match, don't print an error
187 	 * message and return ENOENT.
188 	 */
189 	if (ccb.cdm.num_matches == 0) {
190 		free(ccb.cdm.matches);
191 		return (ENOENT);
192 	}
193 	if (ccb.cdm.num_matches != 1) {
194 		warnx("mpt_query_disk got %d matches, expected 1",
195 		    ccb.cdm.num_matches);
196 		free(ccb.cdm.matches);
197 		return (EIO);
198 	}
199 	if (ccb.cdm.matches[0].type != DEV_MATCH_PERIPH) {
200 		warnx("mpt_query_disk got wrong CAM match");
201 		free(ccb.cdm.matches);
202 		return (EIO);
203 	}
204 
205 	/* Copy out the data. */
206 	r = &ccb.cdm.matches[1].result.periph_result;
207 	snprintf(qd->devname, sizeof(qd->devname), "%s%d", r->periph_name,
208 	    r->unit_number);
209 	free(ccb.cdm.matches);
210 
211 	return (0);
212 }
213 
214 static int
215 periph_is_volume(CONFIG_PAGE_IOC_2 *ioc2, struct periph_match_result *r)
216 {
217 	CONFIG_PAGE_IOC_2_RAID_VOL *vol;
218 	int i;
219 
220 	if (ioc2 == NULL)
221 		return (0);
222 	vol = ioc2->RaidVolume;
223 	for (i = 0; i < ioc2->NumActiveVolumes; vol++, i++) {
224 		if (vol->VolumeBus == 0 && vol->VolumeID == r->target_id)
225 			return (1);
226 	}
227 	return (0);
228 }
229 
230 /* Much borrowed from scsireadcapacity() in src/sbin/camcontrol/camcontrol.c. */
231 static int
232 fetch_scsi_capacity(struct cam_device *dev, struct mpt_standalone_disk *disk)
233 {
234 	struct scsi_read_capacity_data rcap;
235 	struct scsi_read_capacity_data_long rcaplong;
236 	union ccb *ccb;
237 	int error;
238 
239 	ccb = cam_getccb(dev);
240 	if (ccb == NULL)
241 		return (ENOMEM);
242 
243 	/* Zero the rest of the ccb. */
244 	CCB_CLEAR_ALL_EXCEPT_HDR(&ccb->csio);
245 
246 	scsi_read_capacity(&ccb->csio, 1, NULL, MSG_SIMPLE_Q_TAG, &rcap,
247 	    SSD_FULL_SIZE, 5000);
248 
249 	/* Disable freezing the device queue */
250 	ccb->ccb_h.flags |= CAM_DEV_QFRZDIS;
251 
252 	if (cam_send_ccb(dev, ccb) < 0) {
253 		error = errno;
254 		cam_freeccb(ccb);
255 		return (error);
256 	}
257 
258 	if ((ccb->ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_CMP) {
259 		cam_freeccb(ccb);
260 		return (EIO);
261 	}
262 
263 	/*
264 	 * A last block of 2^32-1 means that the true capacity is over 2TB,
265 	 * and we need to issue the long READ CAPACITY to get the real
266 	 * capacity.  Otherwise, we're all set.
267 	 */
268 	if (scsi_4btoul(rcap.addr) != 0xffffffff) {
269 		disk->maxlba = scsi_4btoul(rcap.addr);
270 		cam_freeccb(ccb);
271 		return (0);
272 	}
273 
274 	/* Zero the rest of the ccb. */
275 	CCB_CLEAR_ALL_EXCEPT_HDR(&ccb->csio);
276 
277 	scsi_read_capacity_16(&ccb->csio, 1, NULL, MSG_SIMPLE_Q_TAG, 0, 0, 0,
278 	    (uint8_t *)&rcaplong, sizeof(rcaplong), SSD_FULL_SIZE, 5000);
279 
280 	/* Disable freezing the device queue */
281 	ccb->ccb_h.flags |= CAM_DEV_QFRZDIS;
282 
283 	if (cam_send_ccb(dev, ccb) < 0) {
284 		error = errno;
285 		cam_freeccb(ccb);
286 		return (error);
287 	}
288 
289 	if ((ccb->ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_CMP) {
290 		cam_freeccb(ccb);
291 		return (EIO);
292 	}
293 	cam_freeccb(ccb);
294 
295 	disk->maxlba = scsi_8btou64(rcaplong.addr);
296 	return (0);
297 }
298 
299 /* Borrowed heavily from scsi_all.c:scsi_print_inquiry(). */
300 static void
301 format_scsi_inquiry(struct mpt_standalone_disk *disk,
302     struct scsi_inquiry_data *inq_data)
303 {
304 	char vendor[16], product[48], revision[16], rstr[12];
305 
306 	if (SID_QUAL_IS_VENDOR_UNIQUE(inq_data))
307 		return;
308 	if (SID_TYPE(inq_data) != T_DIRECT)
309 		return;
310 	if (SID_QUAL(inq_data) != SID_QUAL_LU_CONNECTED)
311 		return;
312 
313 	cam_strvis(vendor, inq_data->vendor, sizeof(inq_data->vendor),
314 	    sizeof(vendor));
315 	cam_strvis(product, inq_data->product, sizeof(inq_data->product),
316 	    sizeof(product));
317 	cam_strvis(revision, inq_data->revision, sizeof(inq_data->revision),
318 	    sizeof(revision));
319 
320 	/* Hack for SATA disks, no idea how to tell speed. */
321 	if (strcmp(vendor, "ATA") == 0) {
322 		snprintf(disk->inqstring, sizeof(disk->inqstring),
323 		    "<%s %s> SATA", product, revision);
324 		return;
325 	}
326 
327 	switch (SID_ANSI_REV(inq_data)) {
328 	case SCSI_REV_CCS:
329 		strcpy(rstr, "SCSI-CCS");
330 		break;
331 	case 5:
332 		strcpy(rstr, "SAS");
333 		break;
334 	default:
335 		snprintf(rstr, sizeof (rstr), "SCSI-%d",
336 		    SID_ANSI_REV(inq_data));
337 		break;
338 	}
339 	snprintf(disk->inqstring, sizeof(disk->inqstring), "<%s %s %s> %s",
340 	    vendor, product, revision, rstr);
341 }
342 
343 /* Much borrowed from scsiinquiry() in src/sbin/camcontrol/camcontrol.c. */
344 static int
345 fetch_scsi_inquiry(struct cam_device *dev, struct mpt_standalone_disk *disk)
346 {
347 	struct scsi_inquiry_data *inq_buf;
348 	union ccb *ccb;
349 	int error;
350 
351 	ccb = cam_getccb(dev);
352 	if (ccb == NULL)
353 		return (ENOMEM);
354 
355 	/* Zero the rest of the ccb. */
356 	CCB_CLEAR_ALL_EXCEPT_HDR(&ccb->csio);
357 
358 	inq_buf = calloc(1, sizeof(*inq_buf));
359 	if (inq_buf == NULL) {
360 		cam_freeccb(ccb);
361 		return (ENOMEM);
362 	}
363 	scsi_inquiry(&ccb->csio, 1, NULL, MSG_SIMPLE_Q_TAG, (void *)inq_buf,
364 	    SHORT_INQUIRY_LENGTH, 0, 0, SSD_FULL_SIZE, 5000);
365 
366 	/* Disable freezing the device queue */
367 	ccb->ccb_h.flags |= CAM_DEV_QFRZDIS;
368 
369 	if (cam_send_ccb(dev, ccb) < 0) {
370 		error = errno;
371 		free(inq_buf);
372 		cam_freeccb(ccb);
373 		return (error);
374 	}
375 
376 	if ((ccb->ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_CMP) {
377 		free(inq_buf);
378 		cam_freeccb(ccb);
379 		return (EIO);
380 	}
381 
382 	cam_freeccb(ccb);
383 	format_scsi_inquiry(disk, inq_buf);
384 	free(inq_buf);
385 	return (0);
386 }
387 
388 int
389 mpt_fetch_disks(int fd, int *ndisks, struct mpt_standalone_disk **disksp)
390 {
391 	CONFIG_PAGE_IOC_2 *ioc2;
392 	struct mpt_standalone_disk *disks;
393 	struct periph_match_pattern *p;
394 	struct periph_match_result *r;
395 	struct cam_device *dev;
396 	union ccb ccb;
397 	path_id_t path_id;
398 	size_t bufsize;
399 	int count, error;
400 	uint32_t i;
401 
402 	if (xpt_open() < 0)
403 		return (ENXIO);
404 
405 	error = fetch_path_id(&path_id);
406 	if (error)
407 		return (error);
408 
409 	for (count = 100;; count+= 100) {
410 		/* Try to fetch 'count' disks in one go. */
411 		bzero(&ccb, sizeof(ccb));
412 
413 		ccb.ccb_h.func_code = XPT_DEV_MATCH;
414 
415 		bufsize = sizeof(struct dev_match_result) * (count + 1);
416 		ccb.cdm.num_matches = 0;
417 		ccb.cdm.match_buf_len = bufsize;
418 		ccb.cdm.matches = calloc(1, bufsize);
419 
420 		bufsize = sizeof(struct dev_match_pattern) * 1;
421 		ccb.cdm.num_patterns = 1;
422 		ccb.cdm.pattern_buf_len = bufsize;
423 		ccb.cdm.patterns = calloc(1, bufsize);
424 
425 		/* Match any "da" peripherals. */
426 		ccb.cdm.patterns[0].type = DEV_MATCH_PERIPH;
427 		p = &ccb.cdm.patterns[0].pattern.periph_pattern;
428 		p->path_id = path_id;
429 		snprintf(p->periph_name, sizeof(p->periph_name), "da");
430 		p->flags = PERIPH_MATCH_PATH | PERIPH_MATCH_NAME;
431 
432 		if (ioctl(xptfd, CAMIOCOMMAND, &ccb) < 0) {
433 			error = errno;
434 			free(ccb.cdm.matches);
435 			free(ccb.cdm.patterns);
436 			return (error);
437 		}
438 		free(ccb.cdm.patterns);
439 
440 		/* Check for CCB errors. */
441 		if ((ccb.ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_CMP) {
442 			free(ccb.cdm.matches);
443 			return (EIO);
444 		}
445 
446 		/* If we need a longer list, try again. */
447 		if (ccb.cdm.status == CAM_DEV_MATCH_MORE) {
448 			free(ccb.cdm.matches);
449 			continue;
450 		}
451 
452 		/* If we got an error, abort. */
453 		if (ccb.cdm.status != CAM_DEV_MATCH_LAST) {
454 			free(ccb.cdm.matches);
455 			return (EIO);
456 		}
457 		break;
458 	}
459 
460 	/* Shortcut if we don't have any "da" devices. */
461 	if (ccb.cdm.num_matches == 0) {
462 		free(ccb.cdm.matches);
463 		*ndisks = 0;
464 		*disksp = NULL;
465 		return (0);
466 	}
467 
468 	/* We should have N matches, 1 for each "da" device. */
469 	for (i = 0; i < ccb.cdm.num_matches; i++) {
470 		if (ccb.cdm.matches[i].type != DEV_MATCH_PERIPH) {
471 			warnx("mpt_fetch_disks got wrong CAM matches");
472 			free(ccb.cdm.matches);
473 			return (EIO);
474 		}
475 	}
476 
477 	/*
478 	 * Some of the "da" peripherals may be for RAID volumes, so
479 	 * fetch the IOC 2 page (list of RAID volumes) so we can
480 	 * exclude them from the list.
481 	 */
482 	ioc2 = mpt_read_ioc_page(fd, 2, NULL);
483 	if (ioc2 == NULL)
484 		return (errno);
485 	disks = calloc(ccb.cdm.num_matches, sizeof(*disks));
486 	count = 0;
487 	for (i = 0; i < ccb.cdm.num_matches; i++) {
488 		r = &ccb.cdm.matches[i].result.periph_result;
489 		if (periph_is_volume(ioc2, r))
490 			continue;
491 		disks[count].bus = 0;
492 		disks[count].target = r->target_id;
493 		snprintf(disks[count].devname, sizeof(disks[count].devname),
494 		    "%s%d", r->periph_name, r->unit_number);
495 
496 		dev = cam_open_device(disks[count].devname, O_RDWR);
497 		if (dev != NULL) {
498 			fetch_scsi_capacity(dev, &disks[count]);
499 			fetch_scsi_inquiry(dev, &disks[count]);
500 			cam_close_device(dev);
501 		}
502 		count++;
503 	}
504 	free(ccb.cdm.matches);
505 	free(ioc2);
506 
507 	*ndisks = count;
508 	*disksp = disks;
509 	return (0);
510 }
511 
512 /*
513  * Instruct the mpt(4) device to rescan its buses to find new devices
514  * such as disks whose RAID physdisk page was removed or volumes that
515  * were created.  If id is -1, the entire bus is rescanned.
516  * Otherwise, only devices at the specified ID are rescanned.  If bus
517  * is -1, then all buses are scanned instead of the specified bus.
518  * Note that currently, only bus 0 is supported.
519  */
520 int
521 mpt_rescan_bus(int bus, int id)
522 {
523 	union ccb ccb;
524 	path_id_t path_id;
525 	int error;
526 
527 	/* mpt(4) only handles devices on bus 0. */
528 	if (bus != -1 && bus != 0)
529 		return (EINVAL);
530 
531 	if (xpt_open() < 0)
532 		return (ENXIO);
533 
534 	error = fetch_path_id(&path_id);
535 	if (error)
536 		return (error);
537 
538 	/* Perform the actual rescan. */
539 	bzero(&ccb, sizeof(ccb));
540 	ccb.ccb_h.path_id = path_id;
541 	if (id == -1) {
542 		ccb.ccb_h.func_code = XPT_SCAN_BUS;
543 		ccb.ccb_h.target_id = CAM_TARGET_WILDCARD;
544 		ccb.ccb_h.target_lun = CAM_LUN_WILDCARD;
545 		ccb.ccb_h.timeout = 5000;
546 	} else {
547 		ccb.ccb_h.func_code = XPT_SCAN_LUN;
548 		ccb.ccb_h.target_id = id;
549 		ccb.ccb_h.target_lun = 0;
550 	}
551 	ccb.crcn.flags = CAM_FLAG_NONE;
552 
553 	/* Run this at a low priority. */
554 	ccb.ccb_h.pinfo.priority = 5;
555 
556 	if (ioctl(xptfd, CAMIOCOMMAND, &ccb) == -1)
557 		return (errno);
558 
559 	if ((ccb.ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_CMP) {
560 		warnx("mpt_rescan_bus rescan got CAM error %#x\n",
561 		    ccb.ccb_h.status & CAM_STATUS_MASK);
562 		return (EIO);
563 	}
564 
565 	return (0);
566 }
567