xref: /freebsd/sys/cam/ctl/ctl_frontend_cam_sim.c (revision c6ec7d31830ab1c80edae95ad5e4b9dba10c47ac)
1 /*-
2  * Copyright (c) 2009 Silicon Graphics International Corp.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions, and the following disclaimer,
10  *    without modification.
11  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
12  *    substantially similar to the "NO WARRANTY" disclaimer below
13  *    ("Disclaimer") and any redistribution must be conditioned upon
14  *    including a substantially similar Disclaimer requirement for further
15  *    binary redistribution.
16  *
17  * NO WARRANTY
18  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
19  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
20  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
21  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
22  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
26  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
27  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28  * POSSIBILITY OF SUCH DAMAGES.
29  *
30  * $Id: //depot/users/kenm/FreeBSD-test2/sys/cam/ctl/ctl_frontend_cam_sim.c#4 $
31  */
32 /*
33  * CTL frontend to CAM SIM interface.  This allows access to CTL LUNs via
34  * the da(4) and pass(4) drivers from inside the system.
35  *
36  * Author: Ken Merry <ken@FreeBSD.org>
37  */
38 
39 #include <sys/cdefs.h>
40 __FBSDID("$FreeBSD$");
41 
42 #include <sys/param.h>
43 #include <sys/systm.h>
44 #include <sys/kernel.h>
45 #include <sys/types.h>
46 #include <sys/malloc.h>
47 #include <sys/lock.h>
48 #include <sys/mutex.h>
49 #include <sys/condvar.h>
50 #include <sys/queue.h>
51 #include <sys/bus.h>
52 #include <sys/sysctl.h>
53 #include <machine/bus.h>
54 #include <sys/sbuf.h>
55 
56 #include <cam/cam.h>
57 #include <cam/cam_ccb.h>
58 #include <cam/cam_sim.h>
59 #include <cam/cam_xpt_sim.h>
60 #include <cam/cam_xpt.h>
61 #include <cam/cam_periph.h>
62 #include <cam/scsi/scsi_all.h>
63 #include <cam/scsi/scsi_message.h>
64 #include <cam/ctl/ctl_io.h>
65 #include <cam/ctl/ctl.h>
66 #include <cam/ctl/ctl_frontend.h>
67 #include <cam/ctl/ctl_frontend_internal.h>
68 #include <cam/ctl/ctl_mem_pool.h>
69 #include <cam/ctl/ctl_debug.h>
70 
71 #define	io_ptr		spriv_ptr1
72 
73 struct cfcs_io {
74 	union ccb *ccb;
75 };
76 
77 struct cfcs_softc {
78 	struct ctl_frontend fe;
79 	char port_name[32];
80 	struct cam_sim *sim;
81 	struct cam_devq *devq;
82 	struct cam_path *path;
83 	struct mtx lock;
84 	char lock_desc[32];
85 	uint64_t wwnn;
86 	uint64_t wwpn;
87 	uint32_t cur_tag_num;
88 	int online;
89 };
90 
91 /*
92  * We can't handle CCBs with these flags.  For the most part, we just don't
93  * handle physical addresses yet.  That would require mapping things in
94  * order to do the copy.
95  */
96 #define	CFCS_BAD_CCB_FLAGS (CAM_DATA_PHYS | CAM_SG_LIST_PHYS | \
97 	CAM_MSG_BUF_PHYS | CAM_SNS_BUF_PHYS | CAM_CDB_PHYS | CAM_SENSE_PTR |\
98 	CAM_SENSE_PHYS)
99 
100 int cfcs_init(void);
101 void cfcs_shutdown(void);
102 static void cfcs_poll(struct cam_sim *sim);
103 static void cfcs_online(void *arg);
104 static void cfcs_offline(void *arg);
105 static int cfcs_targ_enable(void *arg, struct ctl_id targ_id);
106 static int cfcs_targ_disable(void *arg, struct ctl_id targ_id);
107 static int cfcs_lun_enable(void *arg, struct ctl_id target_id, int lun_id);
108 static int cfcs_lun_disable(void *arg, struct ctl_id target_id, int lun_id);
109 static void cfcs_datamove(union ctl_io *io);
110 static void cfcs_done(union ctl_io *io);
111 void cfcs_action(struct cam_sim *sim, union ccb *ccb);
112 static void cfcs_async(void *callback_arg, uint32_t code,
113 		       struct cam_path *path, void *arg);
114 
115 struct cfcs_softc cfcs_softc;
116 /*
117  * This is primarly intended to allow for error injection to test the CAM
118  * sense data and sense residual handling code.  This sets the maximum
119  * amount of SCSI sense data that we will report to CAM.
120  */
121 static int cfcs_max_sense = sizeof(struct scsi_sense_data);
122 extern int ctl_disable;
123 
124 SYSINIT(cfcs_init, SI_SUB_CONFIGURE, SI_ORDER_FOURTH, cfcs_init, NULL);
125 SYSCTL_NODE(_kern_cam, OID_AUTO, ctl2cam, CTLFLAG_RD, 0,
126 	    "CAM Target Layer SIM frontend");
127 SYSCTL_INT(_kern_cam_ctl2cam, OID_AUTO, max_sense, CTLFLAG_RW,
128            &cfcs_max_sense, 0, "Maximum sense data size");
129 
130 
131 int
132 cfcs_init(void)
133 {
134 	struct cfcs_softc *softc;
135 	struct ccb_setasync csa;
136 	struct ctl_frontend *fe;
137 #ifdef NEEDTOPORT
138 	char wwnn[8];
139 #endif
140 	int retval;
141 
142 	/* Don't continue if CTL is disabled */
143 	if (ctl_disable != 0)
144 		return (0);
145 
146 	softc = &cfcs_softc;
147 	retval = 0;
148 	bzero(softc, sizeof(*softc));
149 	sprintf(softc->lock_desc, "ctl2cam");
150 	mtx_init(&softc->lock, softc->lock_desc, NULL, MTX_DEF);
151 	fe = &softc->fe;
152 
153 	fe->port_type = CTL_PORT_INTERNAL;
154 	/* XXX KDM what should the real number be here? */
155 	fe->num_requested_ctl_io = 4096;
156 	snprintf(softc->port_name, sizeof(softc->port_name), "ctl2cam");
157 	fe->port_name = softc->port_name;
158 	fe->port_online = cfcs_online;
159 	fe->port_offline = cfcs_offline;
160 	fe->onoff_arg = softc;
161 	fe->targ_enable = cfcs_targ_enable;
162 	fe->targ_disable = cfcs_targ_disable;
163 	fe->lun_enable = cfcs_lun_enable;
164 	fe->lun_disable = cfcs_lun_disable;
165 	fe->targ_lun_arg = softc;
166 	fe->fe_datamove = cfcs_datamove;
167 	fe->fe_done = cfcs_done;
168 
169 	/* XXX KDM what should we report here? */
170 	/* XXX These should probably be fetched from CTL. */
171 	fe->max_targets = 1;
172 	fe->max_target_id = 15;
173 
174 	retval = ctl_frontend_register(fe, /*master_SC*/ 1);
175 	if (retval != 0) {
176 		printf("%s: ctl_frontend_register() failed with error %d!\n",
177 		       __func__, retval);
178 		mtx_destroy(&softc->lock);
179 		return (1);
180 	}
181 
182 	/*
183 	 * Get the WWNN out of the database, and create a WWPN as well.
184 	 */
185 #ifdef NEEDTOPORT
186 	ddb_GetWWNN((char *)wwnn);
187 	softc->wwnn = be64dec(wwnn);
188 	softc->wwpn = softc->wwnn + (softc->fe.targ_port & 0xff);
189 #endif
190 
191 	/*
192 	 * If the CTL frontend didn't tell us what our WWNN/WWPN is, go
193 	 * ahead and set something random.
194 	 */
195 	if (fe->wwnn == 0) {
196 		uint64_t random_bits;
197 
198 		arc4rand(&random_bits, sizeof(random_bits), 0);
199 		softc->wwnn = (random_bits & 0x0000000fffffff00ULL) |
200 			/* Company ID */ 0x5000000000000000ULL |
201 			/* NL-Port */    0x0300;
202 		softc->wwpn = softc->wwnn + fe->targ_port + 1;
203 		fe->wwnn = softc->wwnn;
204 		fe->wwpn = softc->wwpn;
205 	} else {
206 		softc->wwnn = fe->wwnn;
207 		softc->wwpn = fe->wwpn;
208 	}
209 
210 	mtx_lock(&softc->lock);
211 	softc->devq = cam_simq_alloc(fe->num_requested_ctl_io);
212 	if (softc->devq == NULL) {
213 		printf("%s: error allocating devq\n", __func__);
214 		retval = ENOMEM;
215 		goto bailout;
216 	}
217 
218 	softc->sim = cam_sim_alloc(cfcs_action, cfcs_poll, softc->port_name,
219 				   softc, /*unit*/ 0, &softc->lock, 1,
220 				   fe->num_requested_ctl_io, softc->devq);
221 	if (softc->sim == NULL) {
222 		printf("%s: error allocating SIM\n", __func__);
223 		retval = ENOMEM;
224 		goto bailout;
225 	}
226 
227 	if (xpt_bus_register(softc->sim, NULL, 0) != CAM_SUCCESS) {
228 		printf("%s: error registering SIM\n", __func__);
229 		retval = ENOMEM;
230 		goto bailout;
231 	}
232 
233 	if (xpt_create_path(&softc->path, /*periph*/NULL,
234 			    cam_sim_path(softc->sim),
235 			    CAM_TARGET_WILDCARD,
236 			    CAM_LUN_WILDCARD) != CAM_REQ_CMP) {
237 		printf("%s: error creating path\n", __func__);
238 		xpt_bus_deregister(cam_sim_path(softc->sim));
239 		retval = 1;
240 		goto bailout;
241 	}
242 
243 	xpt_setup_ccb(&csa.ccb_h, softc->path, CAM_PRIORITY_NONE);
244 	csa.ccb_h.func_code = XPT_SASYNC_CB;
245 	csa.event_enable = AC_LOST_DEVICE;
246 	csa.callback = cfcs_async;
247         csa.callback_arg = softc->sim;
248         xpt_action((union ccb *)&csa);
249 
250 	mtx_unlock(&softc->lock);
251 
252 	return (retval);
253 
254 bailout:
255 	if (softc->sim)
256 		cam_sim_free(softc->sim, /*free_devq*/ TRUE);
257 	else if (softc->devq)
258 		cam_simq_free(softc->devq);
259 	mtx_unlock(&softc->lock);
260 	mtx_destroy(&softc->lock);
261 
262 	return (retval);
263 }
264 
265 static void
266 cfcs_poll(struct cam_sim *sim)
267 {
268 
269 }
270 
271 void
272 cfcs_shutdown(void)
273 {
274 
275 }
276 
277 static void
278 cfcs_onoffline(void *arg, int online)
279 {
280 	struct cfcs_softc *softc;
281 	union ccb *ccb;
282 
283 	softc = (struct cfcs_softc *)arg;
284 
285 	mtx_lock(&softc->lock);
286 	softc->online = online;
287 
288 	ccb = xpt_alloc_ccb_nowait();
289 	if (ccb == NULL) {
290 		printf("%s: unable to allocate CCB for rescan\n", __func__);
291 		goto bailout;
292 	}
293 
294 	if (xpt_create_path(&ccb->ccb_h.path, xpt_periph,
295 			    cam_sim_path(softc->sim), CAM_TARGET_WILDCARD,
296 			    CAM_LUN_WILDCARD) != CAM_REQ_CMP) {
297 		printf("%s: can't allocate path for rescan\n", __func__);
298 		xpt_free_ccb(ccb);
299 		goto bailout;
300 	}
301 	xpt_rescan(ccb);
302 
303 bailout:
304 	mtx_unlock(&softc->lock);
305 }
306 
307 static void
308 cfcs_online(void *arg)
309 {
310 	cfcs_onoffline(arg, /*online*/ 1);
311 }
312 
313 static void
314 cfcs_offline(void *arg)
315 {
316 	cfcs_onoffline(arg, /*online*/ 0);
317 }
318 
319 static int
320 cfcs_targ_enable(void *arg, struct ctl_id targ_id)
321 {
322 	return (0);
323 }
324 
325 static int
326 cfcs_targ_disable(void *arg, struct ctl_id targ_id)
327 {
328 	return (0);
329 }
330 
331 static int
332 cfcs_lun_enable(void *arg, struct ctl_id target_id, int lun_id)
333 {
334 	return (0);
335 }
336 static int
337 cfcs_lun_disable(void *arg, struct ctl_id target_id, int lun_id)
338 {
339 	return (0);
340 }
341 
342 /*
343  * This function is very similar to ctl_ioctl_do_datamove().  Is there a
344  * way to combine the functionality?
345  *
346  * XXX KDM may need to move this into a thread.  We're doing a bcopy in the
347  * caller's context, which will usually be the backend.  That may not be a
348  * good thing.
349  */
350 static void
351 cfcs_datamove(union ctl_io *io)
352 {
353 	union ccb *ccb;
354 	bus_dma_segment_t cam_sg_entry, *cam_sglist;
355 	struct ctl_sg_entry ctl_sg_entry, *ctl_sglist;
356 	int cam_sg_count, ctl_sg_count, cam_sg_start;
357 	int cam_sg_offset;
358 	int len_to_copy, len_copied;
359 	int ctl_watermark, cam_watermark;
360 	int i, j;
361 
362 
363 	cam_sg_offset = 0;
364 	cam_sg_start = 0;
365 
366 	ccb = io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr;
367 
368 	/*
369 	 * Note that we have a check in cfcs_action() to make sure that any
370 	 * CCBs with "bad" flags are returned with CAM_REQ_INVALID.  This
371 	 * is just to make sure no one removes that check without updating
372 	 * this code to provide the additional functionality necessary to
373 	 * support those modes of operation.
374 	 */
375 	KASSERT(((ccb->ccb_h.flags & CFCS_BAD_CCB_FLAGS) == 0), ("invalid "
376 		  "CAM flags %#x", (ccb->ccb_h.flags & CFCS_BAD_CCB_FLAGS)));
377 
378 	/*
379 	 * Simplify things on both sides by putting single buffers into a
380 	 * single entry S/G list.
381 	 */
382 	if (ccb->ccb_h.flags & CAM_SCATTER_VALID) {
383 		if (ccb->ccb_h.flags & CAM_SG_LIST_PHYS) {
384 			/* We should filter this out on entry */
385 			panic("%s: physical S/G list, should not get here",
386 			      __func__);
387 		} else {
388 			int len_seen;
389 
390 			cam_sglist = (bus_dma_segment_t *)ccb->csio.data_ptr;
391 			cam_sg_count = ccb->csio.sglist_cnt;
392 
393 			for (i = 0, len_seen = 0; i < cam_sg_count; i++) {
394 				if ((len_seen + cam_sglist[i].ds_len) >=
395 				     io->scsiio.kern_rel_offset) {
396 					cam_sg_start = i;
397 					cam_sg_offset =
398 						io->scsiio.kern_rel_offset -
399 						len_seen;
400 					break;
401 				}
402 				len_seen += cam_sglist[i].ds_len;
403 			}
404 		}
405 	} else {
406 		cam_sglist = &cam_sg_entry;
407 		cam_sglist[0].ds_len = ccb->csio.dxfer_len;
408 		cam_sglist[0].ds_addr = (bus_addr_t)ccb->csio.data_ptr;
409 		cam_sg_count = 1;
410 		cam_sg_start = 0;
411 		cam_sg_offset = io->scsiio.kern_rel_offset;
412 	}
413 
414 	if (io->scsiio.kern_sg_entries > 0) {
415 		ctl_sglist = (struct ctl_sg_entry *)io->scsiio.kern_data_ptr;
416 		ctl_sg_count = io->scsiio.kern_sg_entries;
417 	} else {
418 		ctl_sglist = &ctl_sg_entry;
419 		ctl_sglist->addr = io->scsiio.kern_data_ptr;
420 		ctl_sglist->len = io->scsiio.kern_data_len;
421 		ctl_sg_count = 1;
422 	}
423 
424 	ctl_watermark = 0;
425 	cam_watermark = cam_sg_offset;
426 	len_copied = 0;
427 	for (i = cam_sg_start, j = 0;
428 	     i < cam_sg_count && j < ctl_sg_count;) {
429 		uint8_t *cam_ptr, *ctl_ptr;
430 
431 		len_to_copy = ctl_min(cam_sglist[i].ds_len - cam_watermark,
432 				      ctl_sglist[j].len - ctl_watermark);
433 
434 		cam_ptr = (uint8_t *)cam_sglist[i].ds_addr;
435 		cam_ptr = cam_ptr + cam_watermark;
436 		if (io->io_hdr.flags & CTL_FLAG_BUS_ADDR) {
437 			/*
438 			 * XXX KDM fix this!
439 			 */
440 			panic("need to implement bus address support");
441 #if 0
442 			kern_ptr = bus_to_virt(kern_sglist[j].addr);
443 #endif
444 		} else
445 			ctl_ptr = (uint8_t *)ctl_sglist[j].addr;
446 		ctl_ptr = ctl_ptr + ctl_watermark;
447 
448 		ctl_watermark += len_to_copy;
449 		cam_watermark += len_to_copy;
450 
451 		if ((io->io_hdr.flags & CTL_FLAG_DATA_MASK) ==
452 		     CTL_FLAG_DATA_IN) {
453 			CTL_DEBUG_PRINT(("%s: copying %d bytes to CAM\n",
454 					 __func__, len_to_copy));
455 			CTL_DEBUG_PRINT(("%s: from %p to %p\n", ctl_ptr,
456 					 __func__, cam_ptr));
457 			bcopy(ctl_ptr, cam_ptr, len_to_copy);
458 		} else {
459 			CTL_DEBUG_PRINT(("%s: copying %d bytes from CAM\n",
460 					 __func__, len_to_copy));
461 			CTL_DEBUG_PRINT(("%s: from %p to %p\n", cam_ptr,
462 					 __func__, ctl_ptr));
463 			bcopy(cam_ptr, ctl_ptr, len_to_copy);
464 		}
465 
466 		len_copied += len_to_copy;
467 
468 		if (cam_sglist[i].ds_len == cam_watermark) {
469 			i++;
470 			cam_watermark = 0;
471 		}
472 
473 		if (ctl_sglist[j].len == ctl_watermark) {
474 			j++;
475 			ctl_watermark = 0;
476 		}
477 	}
478 
479 	io->scsiio.ext_data_filled += len_copied;
480 
481 	io->scsiio.be_move_done(io);
482 }
483 
484 static void
485 cfcs_done(union ctl_io *io)
486 {
487 	union ccb *ccb;
488 	struct cfcs_softc *softc;
489 	struct cam_sim *sim;
490 
491 	ccb = io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr;
492 
493 	sim = xpt_path_sim(ccb->ccb_h.path);
494 	softc = (struct cfcs_softc *)cam_sim_softc(sim);
495 
496 	/*
497 	 * At this point we should have status.  If we don't, that's a bug.
498 	 */
499 	KASSERT(((io->io_hdr.status & CTL_STATUS_MASK) != CTL_STATUS_NONE),
500 		("invalid CTL status %#x", io->io_hdr.status));
501 
502 	/*
503 	 * Translate CTL status to CAM status.
504 	 */
505 	switch (io->io_hdr.status & CTL_STATUS_MASK) {
506 	case CTL_SUCCESS:
507 		ccb->ccb_h.status = CAM_REQ_CMP;
508 		break;
509 	case CTL_SCSI_ERROR:
510 		ccb->ccb_h.status = CAM_SCSI_STATUS_ERROR | CAM_AUTOSNS_VALID;
511 		ccb->csio.scsi_status = io->scsiio.scsi_status;
512 		bcopy(&io->scsiio.sense_data, &ccb->csio.sense_data,
513 		      min(io->scsiio.sense_len, ccb->csio.sense_len));
514 		if (ccb->csio.sense_len > io->scsiio.sense_len)
515 			ccb->csio.sense_resid = ccb->csio.sense_len -
516 						io->scsiio.sense_len;
517 		else
518 			ccb->csio.sense_resid = 0;
519 		if ((ccb->csio.sense_len - ccb->csio.sense_resid) >
520 		     cfcs_max_sense) {
521 			ccb->csio.sense_resid = ccb->csio.sense_len -
522 						cfcs_max_sense;
523 		}
524 		break;
525 	case CTL_CMD_ABORTED:
526 		ccb->ccb_h.status = CAM_REQ_ABORTED;
527 		break;
528 	case CTL_ERROR:
529 	default:
530 		ccb->ccb_h.status = CAM_REQ_CMP_ERR;
531 		break;
532 	}
533 
534 	mtx_lock(sim->mtx);
535 	xpt_done(ccb);
536 	mtx_unlock(sim->mtx);
537 
538 	ctl_free_io(io);
539 }
540 
541 void
542 cfcs_action(struct cam_sim *sim, union ccb *ccb)
543 {
544 	struct cfcs_softc *softc;
545 	int err;
546 
547 	softc = (struct cfcs_softc *)cam_sim_softc(sim);
548 	mtx_assert(&softc->lock, MA_OWNED);
549 
550 	switch (ccb->ccb_h.func_code) {
551 	case XPT_SCSI_IO: {
552 		union ctl_io *io;
553 		struct ccb_scsiio *csio;
554 
555 		csio = &ccb->csio;
556 
557 		/*
558 		 * Catch CCB flags, like physical address flags, that
559 	 	 * indicate situations we currently can't handle.
560 		 */
561 		if (ccb->ccb_h.flags & CFCS_BAD_CCB_FLAGS) {
562 			ccb->ccb_h.status = CAM_REQ_INVALID;
563 			printf("%s: bad CCB flags %#x (all flags %#x)\n",
564 			       __func__, ccb->ccb_h.flags & CFCS_BAD_CCB_FLAGS,
565 			       ccb->ccb_h.flags);
566 			xpt_done(ccb);
567 			return;
568 		}
569 
570 		/*
571 		 * If we aren't online, there are no devices to see.
572 		 */
573 		if (softc->online == 0) {
574 			ccb->ccb_h.status = CAM_DEV_NOT_THERE;
575 			xpt_done(ccb);
576 			return;
577 		}
578 
579 		io = ctl_alloc_io(softc->fe.ctl_pool_ref);
580 		if (io == NULL) {
581 			printf("%s: can't allocate ctl_io\n", __func__);
582 			ccb->ccb_h.status = CAM_BUSY | CAM_DEV_QFRZN;
583 			xpt_freeze_devq(ccb->ccb_h.path, 1);
584 			xpt_done(ccb);
585 			return;
586 		}
587 		ctl_zero_io(io);
588 		/* Save pointers on both sides */
589 		io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr = ccb;
590 		ccb->ccb_h.io_ptr = io;
591 
592 		/*
593 		 * Only SCSI I/O comes down this path, resets, etc. come
594 		 * down via the XPT_RESET_BUS/LUN CCBs below.
595 		 */
596 		io->io_hdr.io_type = CTL_IO_SCSI;
597 		io->io_hdr.nexus.initid.id = 1;
598 		io->io_hdr.nexus.targ_port = softc->fe.targ_port;
599 		/*
600 		 * XXX KDM how do we handle target IDs?
601 		 */
602 		io->io_hdr.nexus.targ_target.id = ccb->ccb_h.target_id;
603 		io->io_hdr.nexus.targ_lun = ccb->ccb_h.target_lun;
604 		/*
605 		 * This tag scheme isn't the best, since we could in theory
606 		 * have a very long-lived I/O and tag collision, especially
607 		 * in a high I/O environment.  But it should work well
608 		 * enough for now.  Since we're using unsigned ints,
609 		 * they'll just wrap around.
610 		 */
611 		io->scsiio.tag_num = softc->cur_tag_num++;
612 		csio->tag_id = io->scsiio.tag_num;
613 		switch (csio->tag_action) {
614 		case CAM_TAG_ACTION_NONE:
615 			io->scsiio.tag_type = CTL_TAG_UNTAGGED;
616 			break;
617 		case MSG_SIMPLE_TASK:
618 			io->scsiio.tag_type = CTL_TAG_SIMPLE;
619 			break;
620 		case MSG_HEAD_OF_QUEUE_TASK:
621         		io->scsiio.tag_type = CTL_TAG_HEAD_OF_QUEUE;
622 			break;
623 		case MSG_ORDERED_TASK:
624         		io->scsiio.tag_type = CTL_TAG_ORDERED;
625 			break;
626 		case MSG_ACA_TASK:
627 			io->scsiio.tag_type = CTL_TAG_ACA;
628 			break;
629 		default:
630 			io->scsiio.tag_type = CTL_TAG_UNTAGGED;
631 			printf("%s: unhandled tag type %#x!!\n", __func__,
632 			       csio->tag_action);
633 			break;
634 		}
635 		if (csio->cdb_len > sizeof(io->scsiio.cdb)) {
636 			printf("%s: WARNING: CDB len %d > ctl_io space %zd\n",
637 			       __func__, csio->cdb_len, sizeof(io->scsiio.cdb));
638 		}
639 		io->scsiio.cdb_len = min(csio->cdb_len, sizeof(io->scsiio.cdb));
640 		bcopy(csio->cdb_io.cdb_bytes, io->scsiio.cdb,
641 		      io->scsiio.cdb_len);
642 
643 		err = ctl_queue(io);
644 		if (err != CTL_RETVAL_COMPLETE) {
645 			printf("%s: func %d: error %d returned by "
646 			       "ctl_queue()!\n", __func__,
647 			       ccb->ccb_h.func_code, err);
648 			ctl_free_io(io);
649 		} else {
650 			ccb->ccb_h.status |= CAM_SIM_QUEUED;
651 		}
652 		break;
653 	}
654 	case XPT_ABORT: {
655 		union ctl_io *io;
656 		union ccb *abort_ccb;
657 
658 		abort_ccb = ccb->cab.abort_ccb;
659 
660 		if (abort_ccb->ccb_h.func_code != XPT_SCSI_IO) {
661 			ccb->ccb_h.status = CAM_REQ_INVALID;
662 			xpt_done(ccb);
663 		}
664 
665 		/*
666 		 * If we aren't online, there are no devices to talk to.
667 		 */
668 		if (softc->online == 0) {
669 			ccb->ccb_h.status = CAM_DEV_NOT_THERE;
670 			xpt_done(ccb);
671 			return;
672 		}
673 
674 		io = ctl_alloc_io(softc->fe.ctl_pool_ref);
675 		if (io == NULL) {
676 			ccb->ccb_h.status = CAM_BUSY | CAM_DEV_QFRZN;
677 			xpt_freeze_devq(ccb->ccb_h.path, 1);
678 			xpt_done(ccb);
679 			return;
680 		}
681 
682 		ctl_zero_io(io);
683 		/* Save pointers on both sides */
684 		io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr = ccb;
685 		ccb->ccb_h.io_ptr = io;
686 
687 		io->io_hdr.io_type = CTL_IO_TASK;
688 		io->io_hdr.nexus.initid.id = 1;
689 		io->io_hdr.nexus.targ_port = softc->fe.targ_port;
690 		io->io_hdr.nexus.targ_target.id = ccb->ccb_h.target_id;
691 		io->io_hdr.nexus.targ_lun = ccb->ccb_h.target_lun;
692 		io->taskio.task_action = CTL_TASK_ABORT_TASK;
693 		io->taskio.tag_num = abort_ccb->csio.tag_id;
694 		switch (abort_ccb->csio.tag_action) {
695 		case CAM_TAG_ACTION_NONE:
696 			io->taskio.tag_type = CTL_TAG_UNTAGGED;
697 			break;
698 		case MSG_SIMPLE_TASK:
699 			io->taskio.tag_type = CTL_TAG_SIMPLE;
700 			break;
701 		case MSG_HEAD_OF_QUEUE_TASK:
702         		io->taskio.tag_type = CTL_TAG_HEAD_OF_QUEUE;
703 			break;
704 		case MSG_ORDERED_TASK:
705         		io->taskio.tag_type = CTL_TAG_ORDERED;
706 			break;
707 		case MSG_ACA_TASK:
708 			io->taskio.tag_type = CTL_TAG_ACA;
709 			break;
710 		default:
711 			io->taskio.tag_type = CTL_TAG_UNTAGGED;
712 			printf("%s: unhandled tag type %#x!!\n", __func__,
713 			       abort_ccb->csio.tag_action);
714 			break;
715 		}
716 		err = ctl_queue(io);
717 		if (err != CTL_RETVAL_COMPLETE) {
718 			printf("%s func %d: error %d returned by "
719 			       "ctl_queue()!\n", __func__,
720 			       ccb->ccb_h.func_code, err);
721 			ctl_free_io(io);
722 		}
723 		break;
724 	}
725 	case XPT_GET_TRAN_SETTINGS: {
726 		struct ccb_trans_settings *cts;
727 		struct ccb_trans_settings_scsi *scsi;
728 		struct ccb_trans_settings_fc *fc;
729 
730 		cts = &ccb->cts;
731 		scsi = &cts->proto_specific.scsi;
732 		fc = &cts->xport_specific.fc;
733 
734 
735 		cts->protocol = PROTO_SCSI;
736 		cts->protocol_version = SCSI_REV_SPC2;
737 		cts->transport = XPORT_FC;
738 		cts->transport_version = 0;
739 
740 		scsi->valid = CTS_SCSI_VALID_TQ;
741 		scsi->flags = CTS_SCSI_FLAGS_TAG_ENB;
742 		fc->valid = CTS_FC_VALID_SPEED;
743 		fc->bitrate = 800000;
744 		fc->wwnn = softc->wwnn;
745 		fc->wwpn = softc->wwpn;
746        		fc->port = softc->fe.targ_port;
747 		fc->valid |= CTS_FC_VALID_WWNN | CTS_FC_VALID_WWPN |
748 			CTS_FC_VALID_PORT;
749 		ccb->ccb_h.status = CAM_REQ_CMP;
750 		break;
751 	}
752 	case XPT_SET_TRAN_SETTINGS:
753 		/* XXX KDM should we actually do something here? */
754 		ccb->ccb_h.status = CAM_REQ_CMP;
755 		break;
756 	case XPT_RESET_BUS:
757 	case XPT_RESET_DEV: {
758 		union ctl_io *io;
759 
760 		/*
761 		 * If we aren't online, there are no devices to talk to.
762 		 */
763 		if (softc->online == 0) {
764 			ccb->ccb_h.status = CAM_DEV_NOT_THERE;
765 			xpt_done(ccb);
766 			return;
767 		}
768 
769 		io = ctl_alloc_io(softc->fe.ctl_pool_ref);
770 		if (io == NULL) {
771 			ccb->ccb_h.status = CAM_BUSY | CAM_DEV_QFRZN;
772 			xpt_freeze_devq(ccb->ccb_h.path, 1);
773 			xpt_done(ccb);
774 			return;
775 		}
776 
777 		ctl_zero_io(io);
778 		/* Save pointers on both sides */
779 		io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr = ccb;
780 		ccb->ccb_h.io_ptr = io;
781 
782 		io->io_hdr.io_type = CTL_IO_TASK;
783 		io->io_hdr.nexus.initid.id = 0;
784 		io->io_hdr.nexus.targ_port = softc->fe.targ_port;
785 		io->io_hdr.nexus.targ_target.id = ccb->ccb_h.target_id;
786 		io->io_hdr.nexus.targ_lun = ccb->ccb_h.target_lun;
787 		if (ccb->ccb_h.func_code == XPT_RESET_BUS)
788 			io->taskio.task_action = CTL_TASK_BUS_RESET;
789 		else
790 			io->taskio.task_action = CTL_TASK_LUN_RESET;
791 
792 		err = ctl_queue(io);
793 		if (err != CTL_RETVAL_COMPLETE) {
794 			printf("%s func %d: error %d returned by "
795 			      "ctl_queue()!\n", __func__,
796 			      ccb->ccb_h.func_code, err);
797 			ctl_free_io(io);
798 		}
799 		break;
800 	}
801 	case XPT_CALC_GEOMETRY:
802 		cam_calc_geometry(&ccb->ccg, 1);
803 		xpt_done(ccb);
804 		break;
805 	case XPT_PATH_INQ: {
806 		struct ccb_pathinq *cpi;
807 
808 		cpi = &ccb->cpi;
809 
810 		cpi->version_num = 0;
811 		cpi->hba_inquiry = PI_TAG_ABLE;
812 		cpi->target_sprt = 0;
813 		cpi->hba_misc = 0;
814 		cpi->hba_eng_cnt = 0;
815 		cpi->max_target = 1;
816 		cpi->max_lun = 1024;
817 		/* Do we really have a limit? */
818 		cpi->maxio = 1024 * 1024;
819 		cpi->async_flags = 0;
820 		cpi->hpath_id = 0;
821 		cpi->initiator_id = 0;
822 
823 		strncpy(cpi->sim_vid, "FreeBSD", SIM_IDLEN);
824 		strncpy(cpi->hba_vid, "FreeBSD", HBA_IDLEN);
825 		strncpy(cpi->dev_name, cam_sim_name(sim), DEV_IDLEN);
826 		cpi->unit_number = 0;
827 		cpi->bus_id = 0;
828 		cpi->base_transfer_speed = 800000;
829 		cpi->protocol = PROTO_SCSI;
830 		cpi->protocol_version = SCSI_REV_SPC2;
831 		/*
832 		 * Pretend to be Fibre Channel.
833 		 */
834 		cpi->transport = XPORT_FC;
835 		cpi->transport_version = 0;
836 		cpi->xport_specific.fc.wwnn = softc->wwnn;
837 		cpi->xport_specific.fc.wwpn = softc->wwpn;
838 		cpi->xport_specific.fc.port = softc->fe.targ_port;
839 		cpi->xport_specific.fc.bitrate = 8 * 1000 * 1000;
840 		cpi->ccb_h.status = CAM_REQ_CMP;
841 		break;
842 	}
843 	default:
844 		ccb->ccb_h.status = CAM_PROVIDE_FAIL;
845 		printf("%s: unsupported CCB type %#x\n", __func__,
846 		       ccb->ccb_h.func_code);
847 		xpt_done(ccb);
848 		break;
849 	}
850 }
851 
852 static void
853 cfcs_async(void *callback_arg, uint32_t code, struct cam_path *path, void *arg)
854 {
855 
856 }
857