ctl_frontend_iscsi.c revision 288221
1/*-
2 * Copyright (c) 2012 The FreeBSD Foundation
3 * All rights reserved.
4 *
5 * This software was developed by Edward Tomasz Napierala under sponsorship
6 * from the FreeBSD Foundation.
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 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 *
29 * $FreeBSD: head/sys/cam/ctl/ctl_frontend_iscsi.c 288221 2015-09-25 18:15:34Z mav $
30 */
31
32/*
33 * CTL frontend for the iSCSI protocol.
34 */
35
36#include <sys/cdefs.h>
37__FBSDID("$FreeBSD: head/sys/cam/ctl/ctl_frontend_iscsi.c 288221 2015-09-25 18:15:34Z mav $");
38
39#include <sys/param.h>
40#include <sys/capsicum.h>
41#include <sys/condvar.h>
42#include <sys/file.h>
43#include <sys/kernel.h>
44#include <sys/kthread.h>
45#include <sys/lock.h>
46#include <sys/malloc.h>
47#include <sys/module.h>
48#include <sys/mutex.h>
49#include <sys/queue.h>
50#include <sys/sbuf.h>
51#include <sys/sysctl.h>
52#include <sys/systm.h>
53#include <sys/uio.h>
54#include <sys/unistd.h>
55#include <vm/uma.h>
56
57#include <cam/scsi/scsi_all.h>
58#include <cam/scsi/scsi_da.h>
59#include <cam/ctl/ctl_io.h>
60#include <cam/ctl/ctl.h>
61#include <cam/ctl/ctl_backend.h>
62#include <cam/ctl/ctl_error.h>
63#include <cam/ctl/ctl_frontend.h>
64#include <cam/ctl/ctl_debug.h>
65#include <cam/ctl/ctl_ha.h>
66#include <cam/ctl/ctl_ioctl.h>
67#include <cam/ctl/ctl_private.h>
68
69#include <dev/iscsi/icl.h>
70#include <dev/iscsi/icl_wrappers.h>
71#include <dev/iscsi/iscsi_proto.h>
72#include <cam/ctl/ctl_frontend_iscsi.h>
73
74#ifdef ICL_KERNEL_PROXY
75#include <sys/socketvar.h>
76#endif
77
78#ifdef ICL_KERNEL_PROXY
79FEATURE(cfiscsi_kernel_proxy, "iSCSI target built with ICL_KERNEL_PROXY");
80#endif
81
82static MALLOC_DEFINE(M_CFISCSI, "cfiscsi", "Memory used for CTL iSCSI frontend");
83static uma_zone_t cfiscsi_data_wait_zone;
84
85SYSCTL_NODE(_kern_cam_ctl, OID_AUTO, iscsi, CTLFLAG_RD, 0,
86    "CAM Target Layer iSCSI Frontend");
87static int debug = 1;
88SYSCTL_INT(_kern_cam_ctl_iscsi, OID_AUTO, debug, CTLFLAG_RWTUN,
89    &debug, 1, "Enable debug messages");
90static int ping_timeout = 5;
91SYSCTL_INT(_kern_cam_ctl_iscsi, OID_AUTO, ping_timeout, CTLFLAG_RWTUN,
92    &ping_timeout, 5, "Interval between ping (NOP-Out) requests, in seconds");
93static int login_timeout = 60;
94SYSCTL_INT(_kern_cam_ctl_iscsi, OID_AUTO, login_timeout, CTLFLAG_RWTUN,
95    &login_timeout, 60, "Time to wait for ctld(8) to finish Login Phase, in seconds");
96static int maxcmdsn_delta = 256;
97SYSCTL_INT(_kern_cam_ctl_iscsi, OID_AUTO, maxcmdsn_delta, CTLFLAG_RWTUN,
98    &maxcmdsn_delta, 256, "Number of commands the initiator can send "
99    "without confirmation");
100
101#define	CFISCSI_DEBUG(X, ...)						\
102	do {								\
103		if (debug > 1) {					\
104			printf("%s: " X "\n",				\
105			    __func__, ## __VA_ARGS__);			\
106		}							\
107	} while (0)
108
109#define	CFISCSI_WARN(X, ...)						\
110	do {								\
111		if (debug > 0) {					\
112			printf("WARNING: %s: " X "\n",			\
113			    __func__, ## __VA_ARGS__);			\
114		}							\
115	} while (0)
116
117#define	CFISCSI_SESSION_DEBUG(S, X, ...)				\
118	do {								\
119		if (debug > 1) {					\
120			printf("%s: %s (%s): " X "\n",			\
121			    __func__, S->cs_initiator_addr,		\
122			    S->cs_initiator_name, ## __VA_ARGS__);	\
123		}							\
124	} while (0)
125
126#define	CFISCSI_SESSION_WARN(S, X, ...)					\
127	do  {								\
128		if (debug > 0) {					\
129			printf("WARNING: %s (%s): " X "\n",		\
130			    S->cs_initiator_addr,			\
131			    S->cs_initiator_name, ## __VA_ARGS__);	\
132		}							\
133	} while (0)
134
135#define CFISCSI_SESSION_LOCK(X)		mtx_lock(&X->cs_lock)
136#define CFISCSI_SESSION_UNLOCK(X)	mtx_unlock(&X->cs_lock)
137#define CFISCSI_SESSION_LOCK_ASSERT(X)	mtx_assert(&X->cs_lock, MA_OWNED)
138
139#define	CONN_SESSION(X)			((struct cfiscsi_session *)(X)->ic_prv0)
140#define	PDU_SESSION(X)			CONN_SESSION((X)->ip_conn)
141#define	PDU_EXPDATASN(X)		(X)->ip_prv0
142#define	PDU_TOTAL_TRANSFER_LEN(X)	(X)->ip_prv1
143#define	PDU_R2TSN(X)			(X)->ip_prv2
144
145int		cfiscsi_init(void);
146static void	cfiscsi_online(void *arg);
147static void	cfiscsi_offline(void *arg);
148static int	cfiscsi_info(void *arg, struct sbuf *sb);
149static int	cfiscsi_ioctl(struct cdev *dev,
150		    u_long cmd, caddr_t addr, int flag, struct thread *td);
151static void	cfiscsi_datamove(union ctl_io *io);
152static void	cfiscsi_datamove_in(union ctl_io *io);
153static void	cfiscsi_datamove_out(union ctl_io *io);
154static void	cfiscsi_done(union ctl_io *io);
155static bool	cfiscsi_pdu_update_cmdsn(const struct icl_pdu *request);
156static void	cfiscsi_pdu_handle_nop_out(struct icl_pdu *request);
157static void	cfiscsi_pdu_handle_scsi_command(struct icl_pdu *request);
158static void	cfiscsi_pdu_handle_task_request(struct icl_pdu *request);
159static void	cfiscsi_pdu_handle_data_out(struct icl_pdu *request);
160static void	cfiscsi_pdu_handle_logout_request(struct icl_pdu *request);
161static void	cfiscsi_session_terminate(struct cfiscsi_session *cs);
162static struct cfiscsi_data_wait	*cfiscsi_data_wait_new(
163		    struct cfiscsi_session *cs, union ctl_io *io,
164		    uint32_t initiator_task_tag,
165		    uint32_t *target_transfer_tagp);
166static void	cfiscsi_data_wait_free(struct cfiscsi_session *cs,
167		    struct cfiscsi_data_wait *cdw);
168static struct cfiscsi_target	*cfiscsi_target_find(struct cfiscsi_softc
169		    *softc, const char *name, uint16_t tag);
170static struct cfiscsi_target	*cfiscsi_target_find_or_create(
171    struct cfiscsi_softc *softc, const char *name, const char *alias,
172    uint16_t tag);
173static void	cfiscsi_target_release(struct cfiscsi_target *ct);
174static void	cfiscsi_session_delete(struct cfiscsi_session *cs);
175
176static struct cfiscsi_softc cfiscsi_softc;
177
178static struct ctl_frontend cfiscsi_frontend =
179{
180	.name = "iscsi",
181	.init = cfiscsi_init,
182	.ioctl = cfiscsi_ioctl,
183};
184CTL_FRONTEND_DECLARE(ctlcfiscsi, cfiscsi_frontend);
185MODULE_DEPEND(ctlcfiscsi, icl, 1, 1, 1);
186
187static struct icl_pdu *
188cfiscsi_pdu_new_response(struct icl_pdu *request, int flags)
189{
190
191	return (icl_pdu_new(request->ip_conn, flags));
192}
193
194static bool
195cfiscsi_pdu_update_cmdsn(const struct icl_pdu *request)
196{
197	const struct iscsi_bhs_scsi_command *bhssc;
198	struct cfiscsi_session *cs;
199	uint32_t cmdsn, expstatsn;
200
201	cs = PDU_SESSION(request);
202
203	/*
204	 * Every incoming PDU - not just NOP-Out - resets the ping timer.
205	 * The purpose of the timeout is to reset the connection when it stalls;
206	 * we don't want this to happen when NOP-In or NOP-Out ends up delayed
207	 * in some queue.
208	 *
209	 * XXX: Locking?
210	 */
211	cs->cs_timeout = 0;
212
213	/*
214	 * Data-Out PDUs don't contain CmdSN.
215	 */
216	if ((request->ip_bhs->bhs_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) ==
217	    ISCSI_BHS_OPCODE_SCSI_DATA_OUT)
218		return (false);
219
220	/*
221	 * We're only using fields common for all the request
222	 * (initiator -> target) PDUs.
223	 */
224	bhssc = (const struct iscsi_bhs_scsi_command *)request->ip_bhs;
225	cmdsn = ntohl(bhssc->bhssc_cmdsn);
226	expstatsn = ntohl(bhssc->bhssc_expstatsn);
227
228	CFISCSI_SESSION_LOCK(cs);
229#if 0
230	if (expstatsn != cs->cs_statsn) {
231		CFISCSI_SESSION_DEBUG(cs, "received PDU with ExpStatSN %d, "
232		    "while current StatSN is %d", expstatsn,
233		    cs->cs_statsn);
234	}
235#endif
236
237	if ((request->ip_bhs->bhs_opcode & ISCSI_BHS_OPCODE_IMMEDIATE) == 0) {
238		/*
239		 * The target MUST silently ignore any non-immediate command
240		 * outside of this range.
241		 */
242		if (ISCSI_SNLT(cmdsn, cs->cs_cmdsn) ||
243		    ISCSI_SNGT(cmdsn, cs->cs_cmdsn + maxcmdsn_delta)) {
244			CFISCSI_SESSION_UNLOCK(cs);
245			CFISCSI_SESSION_WARN(cs, "received PDU with CmdSN %u, "
246			    "while expected %u", cmdsn, cs->cs_cmdsn);
247			return (true);
248		}
249
250		/*
251		 * We don't support multiple connections now, so any
252		 * discontinuity in CmdSN means lost PDUs.  Since we don't
253		 * support PDU retransmission -- terminate the connection.
254		 */
255		if (cmdsn != cs->cs_cmdsn) {
256			CFISCSI_SESSION_UNLOCK(cs);
257			CFISCSI_SESSION_WARN(cs, "received PDU with CmdSN %u, "
258			    "while expected %u; dropping connection",
259			    cmdsn, cs->cs_cmdsn);
260			cfiscsi_session_terminate(cs);
261			return (true);
262		}
263		cs->cs_cmdsn++;
264	}
265
266	CFISCSI_SESSION_UNLOCK(cs);
267
268	return (false);
269}
270
271static void
272cfiscsi_pdu_handle(struct icl_pdu *request)
273{
274	struct cfiscsi_session *cs;
275	bool ignore;
276
277	cs = PDU_SESSION(request);
278
279	ignore = cfiscsi_pdu_update_cmdsn(request);
280	if (ignore) {
281		icl_pdu_free(request);
282		return;
283	}
284
285	/*
286	 * Handle the PDU; this includes e.g. receiving the remaining
287	 * part of PDU and submitting the SCSI command to CTL
288	 * or queueing a reply.  The handling routine is responsible
289	 * for freeing the PDU when it's no longer needed.
290	 */
291	switch (request->ip_bhs->bhs_opcode &
292	    ~ISCSI_BHS_OPCODE_IMMEDIATE) {
293	case ISCSI_BHS_OPCODE_NOP_OUT:
294		cfiscsi_pdu_handle_nop_out(request);
295		break;
296	case ISCSI_BHS_OPCODE_SCSI_COMMAND:
297		cfiscsi_pdu_handle_scsi_command(request);
298		break;
299	case ISCSI_BHS_OPCODE_TASK_REQUEST:
300		cfiscsi_pdu_handle_task_request(request);
301		break;
302	case ISCSI_BHS_OPCODE_SCSI_DATA_OUT:
303		cfiscsi_pdu_handle_data_out(request);
304		break;
305	case ISCSI_BHS_OPCODE_LOGOUT_REQUEST:
306		cfiscsi_pdu_handle_logout_request(request);
307		break;
308	default:
309		CFISCSI_SESSION_WARN(cs, "received PDU with unsupported "
310		    "opcode 0x%x; dropping connection",
311		    request->ip_bhs->bhs_opcode);
312		icl_pdu_free(request);
313		cfiscsi_session_terminate(cs);
314	}
315
316}
317
318static void
319cfiscsi_receive_callback(struct icl_pdu *request)
320{
321	struct cfiscsi_session *cs;
322
323	cs = PDU_SESSION(request);
324
325#ifdef ICL_KERNEL_PROXY
326	if (cs->cs_waiting_for_ctld || cs->cs_login_phase) {
327		if (cs->cs_login_pdu == NULL)
328			cs->cs_login_pdu = request;
329		else
330			icl_pdu_free(request);
331		cv_signal(&cs->cs_login_cv);
332		return;
333	}
334#endif
335
336	cfiscsi_pdu_handle(request);
337}
338
339static void
340cfiscsi_error_callback(struct icl_conn *ic)
341{
342	struct cfiscsi_session *cs;
343
344	cs = CONN_SESSION(ic);
345
346	CFISCSI_SESSION_WARN(cs, "connection error; dropping connection");
347	cfiscsi_session_terminate(cs);
348}
349
350static int
351cfiscsi_pdu_prepare(struct icl_pdu *response)
352{
353	struct cfiscsi_session *cs;
354	struct iscsi_bhs_scsi_response *bhssr;
355	bool advance_statsn = true;
356
357	cs = PDU_SESSION(response);
358
359	CFISCSI_SESSION_LOCK_ASSERT(cs);
360
361	/*
362	 * We're only using fields common for all the response
363	 * (target -> initiator) PDUs.
364	 */
365	bhssr = (struct iscsi_bhs_scsi_response *)response->ip_bhs;
366
367	/*
368	 * 10.8.3: "The StatSN for this connection is not advanced
369	 * after this PDU is sent."
370	 */
371	if (bhssr->bhssr_opcode == ISCSI_BHS_OPCODE_R2T)
372		advance_statsn = false;
373
374	/*
375	 * 10.19.2: "However, when the Initiator Task Tag is set to 0xffffffff,
376	 * StatSN for the connection is not advanced after this PDU is sent."
377	 */
378	if (bhssr->bhssr_opcode == ISCSI_BHS_OPCODE_NOP_IN &&
379	    bhssr->bhssr_initiator_task_tag == 0xffffffff)
380		advance_statsn = false;
381
382	/*
383	 * See the comment below - StatSN is not meaningful and must
384	 * not be advanced.
385	 */
386	if (bhssr->bhssr_opcode == ISCSI_BHS_OPCODE_SCSI_DATA_IN &&
387	    (bhssr->bhssr_flags & BHSDI_FLAGS_S) == 0)
388		advance_statsn = false;
389
390	/*
391	 * 10.7.3: "The fields StatSN, Status, and Residual Count
392	 * only have meaningful content if the S bit is set to 1."
393	 */
394	if (bhssr->bhssr_opcode != ISCSI_BHS_OPCODE_SCSI_DATA_IN ||
395	    (bhssr->bhssr_flags & BHSDI_FLAGS_S))
396		bhssr->bhssr_statsn = htonl(cs->cs_statsn);
397	bhssr->bhssr_expcmdsn = htonl(cs->cs_cmdsn);
398	bhssr->bhssr_maxcmdsn = htonl(cs->cs_cmdsn + maxcmdsn_delta);
399
400	if (advance_statsn)
401		cs->cs_statsn++;
402
403	return (0);
404}
405
406static void
407cfiscsi_pdu_queue(struct icl_pdu *response)
408{
409	struct cfiscsi_session *cs;
410
411	cs = PDU_SESSION(response);
412
413	CFISCSI_SESSION_LOCK(cs);
414	cfiscsi_pdu_prepare(response);
415	icl_pdu_queue(response);
416	CFISCSI_SESSION_UNLOCK(cs);
417}
418
419static uint32_t
420cfiscsi_decode_lun(uint64_t encoded)
421{
422	uint8_t lun[8];
423	uint32_t result;
424
425	/*
426	 * The LUN field in iSCSI PDUs may look like an ordinary 64 bit number,
427	 * but is in fact an evil, multidimensional structure defined
428	 * in SCSI Architecture Model 5 (SAM-5), section 4.6.
429	 */
430	memcpy(lun, &encoded, sizeof(lun));
431	switch (lun[0] & 0xC0) {
432	case 0x00:
433		if ((lun[0] & 0x3f) != 0 || lun[2] != 0 || lun[3] != 0 ||
434		    lun[4] != 0 || lun[5] != 0 || lun[6] != 0 || lun[7] != 0) {
435			CFISCSI_WARN("malformed LUN "
436			    "(peripheral device addressing method): 0x%jx",
437			    (uintmax_t)encoded);
438			result = 0xffffffff;
439			break;
440		}
441		result = lun[1];
442		break;
443	case 0x40:
444		if (lun[2] != 0 || lun[3] != 0 || lun[4] != 0 || lun[5] != 0 ||
445		    lun[6] != 0 || lun[7] != 0) {
446			CFISCSI_WARN("malformed LUN "
447			    "(flat address space addressing method): 0x%jx",
448			    (uintmax_t)encoded);
449			result = 0xffffffff;
450			break;
451		}
452		result = ((lun[0] & 0x3f) << 8) + lun[1];
453		break;
454	case 0xC0:
455		if (lun[0] != 0xD2 || lun[4] != 0 || lun[5] != 0 ||
456		    lun[6] != 0 || lun[7] != 0) {
457			CFISCSI_WARN("malformed LUN (extended flat "
458			    "address space addressing method): 0x%jx",
459			    (uintmax_t)encoded);
460			result = 0xffffffff;
461			break;
462		}
463		result = (lun[1] << 16) + (lun[2] << 8) + lun[3];
464		break;
465	default:
466		CFISCSI_WARN("unsupported LUN format 0x%jx",
467		    (uintmax_t)encoded);
468		result = 0xffffffff;
469		break;
470	}
471
472	return (result);
473}
474
475static void
476cfiscsi_pdu_handle_nop_out(struct icl_pdu *request)
477{
478	struct cfiscsi_session *cs;
479	struct iscsi_bhs_nop_out *bhsno;
480	struct iscsi_bhs_nop_in *bhsni;
481	struct icl_pdu *response;
482	void *data = NULL;
483	size_t datasize;
484	int error;
485
486	cs = PDU_SESSION(request);
487	bhsno = (struct iscsi_bhs_nop_out *)request->ip_bhs;
488
489	if (bhsno->bhsno_initiator_task_tag == 0xffffffff) {
490		/*
491		 * Nothing to do, iscsi_pdu_update_statsn() already
492		 * zeroed the timeout.
493		 */
494		icl_pdu_free(request);
495		return;
496	}
497
498	datasize = icl_pdu_data_segment_length(request);
499	if (datasize > 0) {
500		data = malloc(datasize, M_CFISCSI, M_NOWAIT | M_ZERO);
501		if (data == NULL) {
502			CFISCSI_SESSION_WARN(cs, "failed to allocate memory; "
503			    "dropping connection");
504			icl_pdu_free(request);
505			cfiscsi_session_terminate(cs);
506			return;
507		}
508		icl_pdu_get_data(request, 0, data, datasize);
509	}
510
511	response = cfiscsi_pdu_new_response(request, M_NOWAIT);
512	if (response == NULL) {
513		CFISCSI_SESSION_WARN(cs, "failed to allocate memory; "
514		    "droppping connection");
515		free(data, M_CFISCSI);
516		icl_pdu_free(request);
517		cfiscsi_session_terminate(cs);
518		return;
519	}
520	bhsni = (struct iscsi_bhs_nop_in *)response->ip_bhs;
521	bhsni->bhsni_opcode = ISCSI_BHS_OPCODE_NOP_IN;
522	bhsni->bhsni_flags = 0x80;
523	bhsni->bhsni_initiator_task_tag = bhsno->bhsno_initiator_task_tag;
524	bhsni->bhsni_target_transfer_tag = 0xffffffff;
525	if (datasize > 0) {
526		error = icl_pdu_append_data(response, data, datasize, M_NOWAIT);
527		if (error != 0) {
528			CFISCSI_SESSION_WARN(cs, "failed to allocate memory; "
529			    "dropping connection");
530			free(data, M_CFISCSI);
531			icl_pdu_free(request);
532			icl_pdu_free(response);
533			cfiscsi_session_terminate(cs);
534			return;
535		}
536		free(data, M_CFISCSI);
537	}
538
539	icl_pdu_free(request);
540	cfiscsi_pdu_queue(response);
541}
542
543static void
544cfiscsi_pdu_handle_scsi_command(struct icl_pdu *request)
545{
546	struct iscsi_bhs_scsi_command *bhssc;
547	struct cfiscsi_session *cs;
548	union ctl_io *io;
549	int error;
550
551	cs = PDU_SESSION(request);
552	bhssc = (struct iscsi_bhs_scsi_command *)request->ip_bhs;
553	//CFISCSI_SESSION_DEBUG(cs, "initiator task tag 0x%x",
554	//    bhssc->bhssc_initiator_task_tag);
555
556	if (request->ip_data_len > 0 && cs->cs_immediate_data == false) {
557		CFISCSI_SESSION_WARN(cs, "unsolicited data with "
558		    "ImmediateData=No; dropping connection");
559		icl_pdu_free(request);
560		cfiscsi_session_terminate(cs);
561		return;
562	}
563	io = ctl_alloc_io(cs->cs_target->ct_port.ctl_pool_ref);
564	ctl_zero_io(io);
565	io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr = request;
566	io->io_hdr.io_type = CTL_IO_SCSI;
567	io->io_hdr.nexus.initid = cs->cs_ctl_initid;
568	io->io_hdr.nexus.targ_port = cs->cs_target->ct_port.targ_port;
569	io->io_hdr.nexus.targ_lun = cfiscsi_decode_lun(bhssc->bhssc_lun);
570	io->scsiio.tag_num = bhssc->bhssc_initiator_task_tag;
571	switch ((bhssc->bhssc_flags & BHSSC_FLAGS_ATTR)) {
572	case BHSSC_FLAGS_ATTR_UNTAGGED:
573		io->scsiio.tag_type = CTL_TAG_UNTAGGED;
574		break;
575	case BHSSC_FLAGS_ATTR_SIMPLE:
576		io->scsiio.tag_type = CTL_TAG_SIMPLE;
577		break;
578	case BHSSC_FLAGS_ATTR_ORDERED:
579        	io->scsiio.tag_type = CTL_TAG_ORDERED;
580		break;
581	case BHSSC_FLAGS_ATTR_HOQ:
582        	io->scsiio.tag_type = CTL_TAG_HEAD_OF_QUEUE;
583		break;
584	case BHSSC_FLAGS_ATTR_ACA:
585		io->scsiio.tag_type = CTL_TAG_ACA;
586		break;
587	default:
588		io->scsiio.tag_type = CTL_TAG_UNTAGGED;
589		CFISCSI_SESSION_WARN(cs, "unhandled tag type %d",
590		    bhssc->bhssc_flags & BHSSC_FLAGS_ATTR);
591		break;
592	}
593	io->scsiio.cdb_len = sizeof(bhssc->bhssc_cdb); /* Which is 16. */
594	memcpy(io->scsiio.cdb, bhssc->bhssc_cdb, sizeof(bhssc->bhssc_cdb));
595	refcount_acquire(&cs->cs_outstanding_ctl_pdus);
596	error = ctl_queue(io);
597	if (error != CTL_RETVAL_COMPLETE) {
598		CFISCSI_SESSION_WARN(cs, "ctl_queue() failed; error %d; "
599		    "dropping connection", error);
600		ctl_free_io(io);
601		refcount_release(&cs->cs_outstanding_ctl_pdus);
602		icl_pdu_free(request);
603		cfiscsi_session_terminate(cs);
604	}
605}
606
607static void
608cfiscsi_pdu_handle_task_request(struct icl_pdu *request)
609{
610	struct iscsi_bhs_task_management_request *bhstmr;
611	struct iscsi_bhs_task_management_response *bhstmr2;
612	struct icl_pdu *response;
613	struct cfiscsi_session *cs;
614	union ctl_io *io;
615	int error;
616
617	cs = PDU_SESSION(request);
618	bhstmr = (struct iscsi_bhs_task_management_request *)request->ip_bhs;
619	io = ctl_alloc_io(cs->cs_target->ct_port.ctl_pool_ref);
620	ctl_zero_io(io);
621	io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr = request;
622	io->io_hdr.io_type = CTL_IO_TASK;
623	io->io_hdr.nexus.initid = cs->cs_ctl_initid;
624	io->io_hdr.nexus.targ_port = cs->cs_target->ct_port.targ_port;
625	io->io_hdr.nexus.targ_lun = cfiscsi_decode_lun(bhstmr->bhstmr_lun);
626	io->taskio.tag_type = CTL_TAG_SIMPLE; /* XXX */
627
628	switch (bhstmr->bhstmr_function & ~0x80) {
629	case BHSTMR_FUNCTION_ABORT_TASK:
630#if 0
631		CFISCSI_SESSION_DEBUG(cs, "BHSTMR_FUNCTION_ABORT_TASK");
632#endif
633		io->taskio.task_action = CTL_TASK_ABORT_TASK;
634		io->taskio.tag_num = bhstmr->bhstmr_referenced_task_tag;
635		break;
636	case BHSTMR_FUNCTION_ABORT_TASK_SET:
637#if 0
638		CFISCSI_SESSION_DEBUG(cs, "BHSTMR_FUNCTION_ABORT_TASK_SET");
639#endif
640		io->taskio.task_action = CTL_TASK_ABORT_TASK_SET;
641		break;
642	case BHSTMR_FUNCTION_CLEAR_TASK_SET:
643#if 0
644		CFISCSI_SESSION_DEBUG(cs, "BHSTMR_FUNCTION_CLEAR_TASK_SET");
645#endif
646		io->taskio.task_action = CTL_TASK_CLEAR_TASK_SET;
647		break;
648	case BHSTMR_FUNCTION_LOGICAL_UNIT_RESET:
649#if 0
650		CFISCSI_SESSION_DEBUG(cs, "BHSTMR_FUNCTION_LOGICAL_UNIT_RESET");
651#endif
652		io->taskio.task_action = CTL_TASK_LUN_RESET;
653		break;
654	case BHSTMR_FUNCTION_TARGET_WARM_RESET:
655#if 0
656		CFISCSI_SESSION_DEBUG(cs, "BHSTMR_FUNCTION_TARGET_WARM_RESET");
657#endif
658		io->taskio.task_action = CTL_TASK_TARGET_RESET;
659		break;
660	case BHSTMR_FUNCTION_TARGET_COLD_RESET:
661#if 0
662		CFISCSI_SESSION_DEBUG(cs, "BHSTMR_FUNCTION_TARGET_COLD_RESET");
663#endif
664		io->taskio.task_action = CTL_TASK_TARGET_RESET;
665		break;
666	case BHSTMR_FUNCTION_QUERY_TASK:
667#if 0
668		CFISCSI_SESSION_DEBUG(cs, "BHSTMR_FUNCTION_QUERY_TASK");
669#endif
670		io->taskio.task_action = CTL_TASK_QUERY_TASK;
671		io->taskio.tag_num = bhstmr->bhstmr_referenced_task_tag;
672		break;
673	case BHSTMR_FUNCTION_QUERY_TASK_SET:
674#if 0
675		CFISCSI_SESSION_DEBUG(cs, "BHSTMR_FUNCTION_QUERY_TASK_SET");
676#endif
677		io->taskio.task_action = CTL_TASK_QUERY_TASK_SET;
678		break;
679	case BHSTMR_FUNCTION_I_T_NEXUS_RESET:
680#if 0
681		CFISCSI_SESSION_DEBUG(cs, "BHSTMR_FUNCTION_I_T_NEXUS_RESET");
682#endif
683		io->taskio.task_action = CTL_TASK_I_T_NEXUS_RESET;
684		break;
685	case BHSTMR_FUNCTION_QUERY_ASYNC_EVENT:
686#if 0
687		CFISCSI_SESSION_DEBUG(cs, "BHSTMR_FUNCTION_QUERY_ASYNC_EVENT");
688#endif
689		io->taskio.task_action = CTL_TASK_QUERY_ASYNC_EVENT;
690		break;
691	default:
692		CFISCSI_SESSION_DEBUG(cs, "unsupported function 0x%x",
693		    bhstmr->bhstmr_function & ~0x80);
694		ctl_free_io(io);
695
696		response = cfiscsi_pdu_new_response(request, M_NOWAIT);
697		if (response == NULL) {
698			CFISCSI_SESSION_WARN(cs, "failed to allocate memory; "
699			    "dropping connection");
700			icl_pdu_free(request);
701			cfiscsi_session_terminate(cs);
702			return;
703		}
704		bhstmr2 = (struct iscsi_bhs_task_management_response *)
705		    response->ip_bhs;
706		bhstmr2->bhstmr_opcode = ISCSI_BHS_OPCODE_TASK_RESPONSE;
707		bhstmr2->bhstmr_flags = 0x80;
708		bhstmr2->bhstmr_response =
709		    BHSTMR_RESPONSE_FUNCTION_NOT_SUPPORTED;
710		bhstmr2->bhstmr_initiator_task_tag =
711		    bhstmr->bhstmr_initiator_task_tag;
712		icl_pdu_free(request);
713		cfiscsi_pdu_queue(response);
714		return;
715	}
716
717	refcount_acquire(&cs->cs_outstanding_ctl_pdus);
718	error = ctl_queue(io);
719	if (error != CTL_RETVAL_COMPLETE) {
720		CFISCSI_SESSION_WARN(cs, "ctl_queue() failed; error %d; "
721		    "dropping connection", error);
722		ctl_free_io(io);
723		refcount_release(&cs->cs_outstanding_ctl_pdus);
724		icl_pdu_free(request);
725		cfiscsi_session_terminate(cs);
726	}
727}
728
729static bool
730cfiscsi_handle_data_segment(struct icl_pdu *request, struct cfiscsi_data_wait *cdw)
731{
732	struct iscsi_bhs_data_out *bhsdo;
733	struct cfiscsi_session *cs;
734	struct ctl_sg_entry ctl_sg_entry, *ctl_sglist;
735	size_t copy_len, len, off, buffer_offset;
736	int ctl_sg_count;
737	union ctl_io *io;
738
739	cs = PDU_SESSION(request);
740
741	KASSERT((request->ip_bhs->bhs_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) ==
742	    ISCSI_BHS_OPCODE_SCSI_DATA_OUT ||
743	    (request->ip_bhs->bhs_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) ==
744	    ISCSI_BHS_OPCODE_SCSI_COMMAND,
745	    ("bad opcode 0x%x", request->ip_bhs->bhs_opcode));
746
747	/*
748	 * We're only using fields common for Data-Out and SCSI Command PDUs.
749	 */
750	bhsdo = (struct iscsi_bhs_data_out *)request->ip_bhs;
751
752	io = cdw->cdw_ctl_io;
753	KASSERT((io->io_hdr.flags & CTL_FLAG_DATA_MASK) != CTL_FLAG_DATA_IN,
754	    ("CTL_FLAG_DATA_IN"));
755
756#if 0
757	CFISCSI_SESSION_DEBUG(cs, "received %zd bytes out of %d",
758	    request->ip_data_len, io->scsiio.kern_total_len);
759#endif
760
761	if (io->scsiio.kern_sg_entries > 0) {
762		ctl_sglist = (struct ctl_sg_entry *)io->scsiio.kern_data_ptr;
763		ctl_sg_count = io->scsiio.kern_sg_entries;
764	} else {
765		ctl_sglist = &ctl_sg_entry;
766		ctl_sglist->addr = io->scsiio.kern_data_ptr;
767		ctl_sglist->len = io->scsiio.kern_data_len;
768		ctl_sg_count = 1;
769	}
770
771	if ((request->ip_bhs->bhs_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) ==
772	    ISCSI_BHS_OPCODE_SCSI_DATA_OUT)
773		buffer_offset = ntohl(bhsdo->bhsdo_buffer_offset);
774	else
775		buffer_offset = 0;
776	len = icl_pdu_data_segment_length(request);
777
778	/*
779	 * Make sure the offset, as sent by the initiator, matches the offset
780	 * we're supposed to be at in the scatter-gather list.
781	 */
782	if (buffer_offset >
783	    io->scsiio.kern_rel_offset + io->scsiio.ext_data_filled ||
784	    buffer_offset + len <=
785	    io->scsiio.kern_rel_offset + io->scsiio.ext_data_filled) {
786		CFISCSI_SESSION_WARN(cs, "received bad buffer offset %zd, "
787		    "expected %zd; dropping connection", buffer_offset,
788		    (size_t)io->scsiio.kern_rel_offset +
789		    (size_t)io->scsiio.ext_data_filled);
790		ctl_set_data_phase_error(&io->scsiio);
791		cfiscsi_session_terminate(cs);
792		return (true);
793	}
794
795	/*
796	 * This is the offset within the PDU data segment, as opposed
797	 * to buffer_offset, which is the offset within the task (SCSI
798	 * command).
799	 */
800	off = io->scsiio.kern_rel_offset + io->scsiio.ext_data_filled -
801	    buffer_offset;
802
803	/*
804	 * Iterate over the scatter/gather segments, filling them with data
805	 * from the PDU data segment.  Note that this can get called multiple
806	 * times for one SCSI command; the cdw structure holds state for the
807	 * scatter/gather list.
808	 */
809	for (;;) {
810		KASSERT(cdw->cdw_sg_index < ctl_sg_count,
811		    ("cdw->cdw_sg_index >= ctl_sg_count"));
812		if (cdw->cdw_sg_len == 0) {
813			cdw->cdw_sg_addr = ctl_sglist[cdw->cdw_sg_index].addr;
814			cdw->cdw_sg_len = ctl_sglist[cdw->cdw_sg_index].len;
815		}
816		KASSERT(off <= len, ("len > off"));
817		copy_len = len - off;
818		if (copy_len > cdw->cdw_sg_len)
819			copy_len = cdw->cdw_sg_len;
820
821		icl_pdu_get_data(request, off, cdw->cdw_sg_addr, copy_len);
822		cdw->cdw_sg_addr += copy_len;
823		cdw->cdw_sg_len -= copy_len;
824		off += copy_len;
825		io->scsiio.ext_data_filled += copy_len;
826
827		if (cdw->cdw_sg_len == 0) {
828			/*
829			 * End of current segment.
830			 */
831			if (cdw->cdw_sg_index == ctl_sg_count - 1) {
832				/*
833				 * Last segment in scatter/gather list.
834				 */
835				break;
836			}
837			cdw->cdw_sg_index++;
838		}
839
840		if (off == len) {
841			/*
842			 * End of PDU payload.
843			 */
844			break;
845		}
846	}
847
848	if (len > off) {
849		/*
850		 * In case of unsolicited data, it's possible that the buffer
851		 * provided by CTL is smaller than negotiated FirstBurstLength.
852		 * Just ignore the superfluous data; will ask for them with R2T
853		 * on next call to cfiscsi_datamove().
854		 *
855		 * This obviously can only happen with SCSI Command PDU.
856		 */
857		if ((request->ip_bhs->bhs_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) ==
858		    ISCSI_BHS_OPCODE_SCSI_COMMAND)
859			return (true);
860
861		CFISCSI_SESSION_WARN(cs, "received too much data: got %zd bytes, "
862		    "expected %zd; dropping connection",
863		    icl_pdu_data_segment_length(request), off);
864		ctl_set_data_phase_error(&io->scsiio);
865		cfiscsi_session_terminate(cs);
866		return (true);
867	}
868
869	if (io->scsiio.ext_data_filled == cdw->cdw_r2t_end &&
870	    (bhsdo->bhsdo_flags & BHSDO_FLAGS_F) == 0) {
871		CFISCSI_SESSION_WARN(cs, "got the final packet without "
872		    "the F flag; flags = 0x%x; dropping connection",
873		    bhsdo->bhsdo_flags);
874		ctl_set_data_phase_error(&io->scsiio);
875		cfiscsi_session_terminate(cs);
876		return (true);
877	}
878
879	if (io->scsiio.ext_data_filled != cdw->cdw_r2t_end &&
880	    (bhsdo->bhsdo_flags & BHSDO_FLAGS_F) != 0) {
881		if ((request->ip_bhs->bhs_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) ==
882		    ISCSI_BHS_OPCODE_SCSI_DATA_OUT) {
883			CFISCSI_SESSION_WARN(cs, "got the final packet, but the "
884			    "transmitted size was %zd bytes instead of %d; "
885			    "dropping connection",
886			    (size_t)io->scsiio.ext_data_filled,
887			    cdw->cdw_r2t_end);
888			ctl_set_data_phase_error(&io->scsiio);
889			cfiscsi_session_terminate(cs);
890			return (true);
891		} else {
892			/*
893			 * For SCSI Command PDU, this just means we need to
894			 * solicit more data by sending R2T.
895			 */
896			return (false);
897		}
898	}
899
900	if (io->scsiio.ext_data_filled == cdw->cdw_r2t_end) {
901#if 0
902		CFISCSI_SESSION_DEBUG(cs, "no longer expecting Data-Out with target "
903		    "transfer tag 0x%x", cdw->cdw_target_transfer_tag);
904#endif
905
906		return (true);
907	}
908
909	return (false);
910}
911
912static void
913cfiscsi_pdu_handle_data_out(struct icl_pdu *request)
914{
915	struct iscsi_bhs_data_out *bhsdo;
916	struct cfiscsi_session *cs;
917	struct cfiscsi_data_wait *cdw = NULL;
918	union ctl_io *io;
919	bool done;
920
921	cs = PDU_SESSION(request);
922	bhsdo = (struct iscsi_bhs_data_out *)request->ip_bhs;
923
924	CFISCSI_SESSION_LOCK(cs);
925	TAILQ_FOREACH(cdw, &cs->cs_waiting_for_data_out, cdw_next) {
926#if 0
927		CFISCSI_SESSION_DEBUG(cs, "have ttt 0x%x, itt 0x%x; looking for "
928		    "ttt 0x%x, itt 0x%x",
929		    bhsdo->bhsdo_target_transfer_tag,
930		    bhsdo->bhsdo_initiator_task_tag,
931		    cdw->cdw_target_transfer_tag, cdw->cdw_initiator_task_tag));
932#endif
933		if (bhsdo->bhsdo_target_transfer_tag ==
934		    cdw->cdw_target_transfer_tag)
935			break;
936	}
937	CFISCSI_SESSION_UNLOCK(cs);
938	if (cdw == NULL) {
939		CFISCSI_SESSION_WARN(cs, "data transfer tag 0x%x, initiator task tag "
940		    "0x%x, not found; dropping connection",
941		    bhsdo->bhsdo_target_transfer_tag, bhsdo->bhsdo_initiator_task_tag);
942		icl_pdu_free(request);
943		cfiscsi_session_terminate(cs);
944		return;
945	}
946
947	if (cdw->cdw_datasn != ntohl(bhsdo->bhsdo_datasn)) {
948		CFISCSI_SESSION_WARN(cs, "received Data-Out PDU with "
949		    "DataSN %u, while expected %u; dropping connection",
950		    ntohl(bhsdo->bhsdo_datasn), cdw->cdw_datasn);
951		icl_pdu_free(request);
952		cfiscsi_session_terminate(cs);
953		return;
954	}
955	cdw->cdw_datasn++;
956
957	io = cdw->cdw_ctl_io;
958	KASSERT((io->io_hdr.flags & CTL_FLAG_DATA_MASK) != CTL_FLAG_DATA_IN,
959	    ("CTL_FLAG_DATA_IN"));
960
961	done = cfiscsi_handle_data_segment(request, cdw);
962	if (done) {
963		CFISCSI_SESSION_LOCK(cs);
964		TAILQ_REMOVE(&cs->cs_waiting_for_data_out, cdw, cdw_next);
965		CFISCSI_SESSION_UNLOCK(cs);
966		done = (io->scsiio.ext_data_filled != cdw->cdw_r2t_end ||
967		    io->scsiio.ext_data_filled == io->scsiio.kern_data_len);
968		cfiscsi_data_wait_free(cs, cdw);
969		io->io_hdr.flags &= ~CTL_FLAG_DMA_INPROG;
970		if (done)
971			io->scsiio.be_move_done(io);
972		else
973			cfiscsi_datamove_out(io);
974	}
975
976	icl_pdu_free(request);
977}
978
979static void
980cfiscsi_pdu_handle_logout_request(struct icl_pdu *request)
981{
982	struct iscsi_bhs_logout_request *bhslr;
983	struct iscsi_bhs_logout_response *bhslr2;
984	struct icl_pdu *response;
985	struct cfiscsi_session *cs;
986
987	cs = PDU_SESSION(request);
988	bhslr = (struct iscsi_bhs_logout_request *)request->ip_bhs;
989	switch (bhslr->bhslr_reason & 0x7f) {
990	case BHSLR_REASON_CLOSE_SESSION:
991	case BHSLR_REASON_CLOSE_CONNECTION:
992		response = cfiscsi_pdu_new_response(request, M_NOWAIT);
993		if (response == NULL) {
994			CFISCSI_SESSION_DEBUG(cs, "failed to allocate memory");
995			icl_pdu_free(request);
996			cfiscsi_session_terminate(cs);
997			return;
998		}
999		bhslr2 = (struct iscsi_bhs_logout_response *)response->ip_bhs;
1000		bhslr2->bhslr_opcode = ISCSI_BHS_OPCODE_LOGOUT_RESPONSE;
1001		bhslr2->bhslr_flags = 0x80;
1002		bhslr2->bhslr_response = BHSLR_RESPONSE_CLOSED_SUCCESSFULLY;
1003		bhslr2->bhslr_initiator_task_tag =
1004		    bhslr->bhslr_initiator_task_tag;
1005		icl_pdu_free(request);
1006		cfiscsi_pdu_queue(response);
1007		cfiscsi_session_terminate(cs);
1008		break;
1009	case BHSLR_REASON_REMOVE_FOR_RECOVERY:
1010		response = cfiscsi_pdu_new_response(request, M_NOWAIT);
1011		if (response == NULL) {
1012			CFISCSI_SESSION_WARN(cs,
1013			    "failed to allocate memory; dropping connection");
1014			icl_pdu_free(request);
1015			cfiscsi_session_terminate(cs);
1016			return;
1017		}
1018		bhslr2 = (struct iscsi_bhs_logout_response *)response->ip_bhs;
1019		bhslr2->bhslr_opcode = ISCSI_BHS_OPCODE_LOGOUT_RESPONSE;
1020		bhslr2->bhslr_flags = 0x80;
1021		bhslr2->bhslr_response = BHSLR_RESPONSE_RECOVERY_NOT_SUPPORTED;
1022		bhslr2->bhslr_initiator_task_tag =
1023		    bhslr->bhslr_initiator_task_tag;
1024		icl_pdu_free(request);
1025		cfiscsi_pdu_queue(response);
1026		break;
1027	default:
1028		CFISCSI_SESSION_WARN(cs, "invalid reason 0%x; dropping connection",
1029		    bhslr->bhslr_reason);
1030		icl_pdu_free(request);
1031		cfiscsi_session_terminate(cs);
1032		break;
1033	}
1034}
1035
1036static void
1037cfiscsi_callout(void *context)
1038{
1039	struct icl_pdu *cp;
1040	struct iscsi_bhs_nop_in *bhsni;
1041	struct cfiscsi_session *cs;
1042
1043	cs = context;
1044
1045	if (cs->cs_terminating)
1046		return;
1047
1048	callout_schedule(&cs->cs_callout, 1 * hz);
1049
1050	atomic_add_int(&cs->cs_timeout, 1);
1051
1052#ifdef ICL_KERNEL_PROXY
1053	if (cs->cs_waiting_for_ctld || cs->cs_login_phase) {
1054		if (login_timeout > 0 && cs->cs_timeout > login_timeout) {
1055			CFISCSI_SESSION_WARN(cs, "login timed out after "
1056			    "%d seconds; dropping connection", cs->cs_timeout);
1057			cfiscsi_session_terminate(cs);
1058		}
1059		return;
1060	}
1061#endif
1062
1063	if (ping_timeout <= 0) {
1064		/*
1065		 * Pings are disabled.  Don't send NOP-In in this case;
1066		 * user might have disabled pings to work around problems
1067		 * with certain initiators that can't properly handle
1068		 * NOP-In, such as iPXE.  Reset the timeout, to avoid
1069		 * triggering reconnection, should the user decide to
1070		 * reenable them.
1071		 */
1072		cs->cs_timeout = 0;
1073		return;
1074	}
1075
1076	if (cs->cs_timeout >= ping_timeout) {
1077		CFISCSI_SESSION_WARN(cs, "no ping reply (NOP-Out) after %d seconds; "
1078		    "dropping connection",  ping_timeout);
1079		cfiscsi_session_terminate(cs);
1080		return;
1081	}
1082
1083	/*
1084	 * If the ping was reset less than one second ago - which means
1085	 * that we've received some PDU during the last second - assume
1086	 * the traffic flows correctly and don't bother sending a NOP-Out.
1087	 *
1088	 * (It's 2 - one for one second, and one for incrementing is_timeout
1089	 * earlier in this routine.)
1090	 */
1091	if (cs->cs_timeout < 2)
1092		return;
1093
1094	cp = icl_pdu_new(cs->cs_conn, M_NOWAIT);
1095	if (cp == NULL) {
1096		CFISCSI_SESSION_WARN(cs, "failed to allocate memory");
1097		return;
1098	}
1099	bhsni = (struct iscsi_bhs_nop_in *)cp->ip_bhs;
1100	bhsni->bhsni_opcode = ISCSI_BHS_OPCODE_NOP_IN;
1101	bhsni->bhsni_flags = 0x80;
1102	bhsni->bhsni_initiator_task_tag = 0xffffffff;
1103
1104	cfiscsi_pdu_queue(cp);
1105}
1106
1107static struct cfiscsi_data_wait *
1108cfiscsi_data_wait_new(struct cfiscsi_session *cs, union ctl_io *io,
1109    uint32_t initiator_task_tag, uint32_t *target_transfer_tagp)
1110{
1111	struct cfiscsi_data_wait *cdw;
1112	int error;
1113
1114	cdw = uma_zalloc(cfiscsi_data_wait_zone, M_NOWAIT | M_ZERO);
1115	if (cdw == NULL) {
1116		CFISCSI_SESSION_WARN(cs,
1117		    "failed to allocate %zd bytes", sizeof(*cdw));
1118		return (NULL);
1119	}
1120
1121	error = icl_conn_transfer_setup(cs->cs_conn, io, target_transfer_tagp,
1122	    &cdw->cdw_icl_prv);
1123	if (error != 0) {
1124		CFISCSI_SESSION_WARN(cs,
1125		    "icl_conn_transfer_setup() failed with error %d", error);
1126		uma_zfree(cfiscsi_data_wait_zone, cdw);
1127		return (NULL);
1128	}
1129
1130	cdw->cdw_ctl_io = io;
1131	cdw->cdw_target_transfer_tag = *target_transfer_tagp;
1132	cdw->cdw_initiator_task_tag = initiator_task_tag;
1133
1134	return (cdw);
1135}
1136
1137static void
1138cfiscsi_data_wait_free(struct cfiscsi_session *cs,
1139    struct cfiscsi_data_wait *cdw)
1140{
1141
1142	icl_conn_transfer_done(cs->cs_conn, cdw->cdw_icl_prv);
1143	uma_zfree(cfiscsi_data_wait_zone, cdw);
1144}
1145
1146static void
1147cfiscsi_session_terminate_tasks(struct cfiscsi_session *cs)
1148{
1149	struct cfiscsi_data_wait *cdw;
1150	union ctl_io *io;
1151	int error, last, wait;
1152
1153	if (cs->cs_target == NULL)
1154		return;		/* No target yet, so nothing to do. */
1155	io = ctl_alloc_io(cs->cs_target->ct_port.ctl_pool_ref);
1156	ctl_zero_io(io);
1157	io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr = cs;
1158	io->io_hdr.io_type = CTL_IO_TASK;
1159	io->io_hdr.nexus.initid = cs->cs_ctl_initid;
1160	io->io_hdr.nexus.targ_port = cs->cs_target->ct_port.targ_port;
1161	io->io_hdr.nexus.targ_lun = 0;
1162	io->taskio.tag_type = CTL_TAG_SIMPLE; /* XXX */
1163	io->taskio.task_action = CTL_TASK_I_T_NEXUS_RESET;
1164	wait = cs->cs_outstanding_ctl_pdus;
1165	refcount_acquire(&cs->cs_outstanding_ctl_pdus);
1166	error = ctl_queue(io);
1167	if (error != CTL_RETVAL_COMPLETE) {
1168		CFISCSI_SESSION_WARN(cs, "ctl_queue() failed; error %d", error);
1169		refcount_release(&cs->cs_outstanding_ctl_pdus);
1170		ctl_free_io(io);
1171	}
1172
1173	CFISCSI_SESSION_LOCK(cs);
1174	while ((cdw = TAILQ_FIRST(&cs->cs_waiting_for_data_out)) != NULL) {
1175		TAILQ_REMOVE(&cs->cs_waiting_for_data_out, cdw, cdw_next);
1176		CFISCSI_SESSION_UNLOCK(cs);
1177		/*
1178		 * Set nonzero port status; this prevents backends from
1179		 * assuming that the data transfer actually succeeded
1180		 * and writing uninitialized data to disk.
1181		 */
1182		cdw->cdw_ctl_io->io_hdr.flags &= ~CTL_FLAG_DMA_INPROG;
1183		cdw->cdw_ctl_io->scsiio.io_hdr.port_status = 42;
1184		cdw->cdw_ctl_io->scsiio.be_move_done(cdw->cdw_ctl_io);
1185		cfiscsi_data_wait_free(cs, cdw);
1186		CFISCSI_SESSION_LOCK(cs);
1187	}
1188	CFISCSI_SESSION_UNLOCK(cs);
1189
1190	/*
1191	 * Wait for CTL to terminate all the tasks.
1192	 */
1193	if (wait > 0)
1194		CFISCSI_SESSION_WARN(cs,
1195		    "waiting for CTL to terminate %d tasks", wait);
1196	for (;;) {
1197		refcount_acquire(&cs->cs_outstanding_ctl_pdus);
1198		last = refcount_release(&cs->cs_outstanding_ctl_pdus);
1199		if (last != 0)
1200			break;
1201		tsleep(__DEVOLATILE(void *, &cs->cs_outstanding_ctl_pdus),
1202		    0, "cfiscsi_terminate", hz / 100);
1203	}
1204	if (wait > 0)
1205		CFISCSI_SESSION_WARN(cs, "tasks terminated");
1206}
1207
1208static void
1209cfiscsi_maintenance_thread(void *arg)
1210{
1211	struct cfiscsi_session *cs;
1212
1213	cs = arg;
1214
1215	for (;;) {
1216		CFISCSI_SESSION_LOCK(cs);
1217		if (cs->cs_terminating == false)
1218			cv_wait(&cs->cs_maintenance_cv, &cs->cs_lock);
1219		CFISCSI_SESSION_UNLOCK(cs);
1220
1221		if (cs->cs_terminating) {
1222
1223			/*
1224			 * We used to wait up to 30 seconds to deliver queued
1225			 * PDUs to the initiator.  We also tried hard to deliver
1226			 * SCSI Responses for the aborted PDUs.  We don't do
1227			 * that anymore.  We might need to revisit that.
1228			 */
1229			callout_drain(&cs->cs_callout);
1230			icl_conn_close(cs->cs_conn);
1231
1232			/*
1233			 * At this point ICL receive thread is no longer
1234			 * running; no new tasks can be queued.
1235			 */
1236			cfiscsi_session_terminate_tasks(cs);
1237			cfiscsi_session_delete(cs);
1238			kthread_exit();
1239			return;
1240		}
1241		CFISCSI_SESSION_DEBUG(cs, "nothing to do");
1242	}
1243}
1244
1245static void
1246cfiscsi_session_terminate(struct cfiscsi_session *cs)
1247{
1248
1249	if (cs->cs_terminating)
1250		return;
1251	cs->cs_terminating = true;
1252	cv_signal(&cs->cs_maintenance_cv);
1253#ifdef ICL_KERNEL_PROXY
1254	cv_signal(&cs->cs_login_cv);
1255#endif
1256}
1257
1258static int
1259cfiscsi_session_register_initiator(struct cfiscsi_session *cs)
1260{
1261	struct cfiscsi_target *ct;
1262	char *name;
1263	int i;
1264
1265	KASSERT(cs->cs_ctl_initid == -1, ("already registered"));
1266
1267	ct = cs->cs_target;
1268	name = strdup(cs->cs_initiator_id, M_CTL);
1269	i = ctl_add_initiator(&ct->ct_port, -1, 0, name);
1270	if (i < 0) {
1271		CFISCSI_SESSION_WARN(cs, "ctl_add_initiator failed with error %d",
1272		    i);
1273		cs->cs_ctl_initid = -1;
1274		return (1);
1275	}
1276	cs->cs_ctl_initid = i;
1277#if 0
1278	CFISCSI_SESSION_DEBUG(cs, "added initiator id %d", i);
1279#endif
1280
1281	return (0);
1282}
1283
1284static void
1285cfiscsi_session_unregister_initiator(struct cfiscsi_session *cs)
1286{
1287	int error;
1288
1289	if (cs->cs_ctl_initid == -1)
1290		return;
1291
1292	error = ctl_remove_initiator(&cs->cs_target->ct_port, cs->cs_ctl_initid);
1293	if (error != 0) {
1294		CFISCSI_SESSION_WARN(cs, "ctl_remove_initiator failed with error %d",
1295		    error);
1296	}
1297	cs->cs_ctl_initid = -1;
1298}
1299
1300static struct cfiscsi_session *
1301cfiscsi_session_new(struct cfiscsi_softc *softc, const char *offload)
1302{
1303	struct cfiscsi_session *cs;
1304	int error;
1305
1306	cs = malloc(sizeof(*cs), M_CFISCSI, M_NOWAIT | M_ZERO);
1307	if (cs == NULL) {
1308		CFISCSI_WARN("malloc failed");
1309		return (NULL);
1310	}
1311	cs->cs_ctl_initid = -1;
1312
1313	refcount_init(&cs->cs_outstanding_ctl_pdus, 0);
1314	TAILQ_INIT(&cs->cs_waiting_for_data_out);
1315	mtx_init(&cs->cs_lock, "cfiscsi_lock", NULL, MTX_DEF);
1316	cv_init(&cs->cs_maintenance_cv, "cfiscsi_mt");
1317#ifdef ICL_KERNEL_PROXY
1318	cv_init(&cs->cs_login_cv, "cfiscsi_login");
1319#endif
1320
1321	cs->cs_conn = icl_new_conn(offload, "cfiscsi", &cs->cs_lock);
1322	if (cs->cs_conn == NULL) {
1323		free(cs, M_CFISCSI);
1324		return (NULL);
1325	}
1326	cs->cs_conn->ic_receive = cfiscsi_receive_callback;
1327	cs->cs_conn->ic_error = cfiscsi_error_callback;
1328	cs->cs_conn->ic_prv0 = cs;
1329
1330	error = kthread_add(cfiscsi_maintenance_thread, cs, NULL, NULL, 0, 0, "cfiscsimt");
1331	if (error != 0) {
1332		CFISCSI_SESSION_WARN(cs, "kthread_add(9) failed with error %d", error);
1333		free(cs, M_CFISCSI);
1334		return (NULL);
1335	}
1336
1337	mtx_lock(&softc->lock);
1338	cs->cs_id = ++softc->last_session_id;
1339	TAILQ_INSERT_TAIL(&softc->sessions, cs, cs_next);
1340	mtx_unlock(&softc->lock);
1341
1342	/*
1343	 * Start pinging the initiator.
1344	 */
1345	callout_init(&cs->cs_callout, 1);
1346	callout_reset(&cs->cs_callout, 1 * hz, cfiscsi_callout, cs);
1347
1348	return (cs);
1349}
1350
1351static void
1352cfiscsi_session_delete(struct cfiscsi_session *cs)
1353{
1354	struct cfiscsi_softc *softc;
1355
1356	softc = &cfiscsi_softc;
1357
1358	KASSERT(cs->cs_outstanding_ctl_pdus == 0,
1359	    ("destroying session with outstanding CTL pdus"));
1360	KASSERT(TAILQ_EMPTY(&cs->cs_waiting_for_data_out),
1361	    ("destroying session with non-empty queue"));
1362
1363	cfiscsi_session_unregister_initiator(cs);
1364	if (cs->cs_target != NULL)
1365		cfiscsi_target_release(cs->cs_target);
1366	icl_conn_close(cs->cs_conn);
1367	icl_conn_free(cs->cs_conn);
1368
1369	mtx_lock(&softc->lock);
1370	TAILQ_REMOVE(&softc->sessions, cs, cs_next);
1371	cv_signal(&softc->sessions_cv);
1372	mtx_unlock(&softc->lock);
1373
1374	free(cs, M_CFISCSI);
1375}
1376
1377int
1378cfiscsi_init(void)
1379{
1380	struct cfiscsi_softc *softc;
1381
1382	softc = &cfiscsi_softc;
1383	bzero(softc, sizeof(*softc));
1384	mtx_init(&softc->lock, "cfiscsi", NULL, MTX_DEF);
1385
1386	cv_init(&softc->sessions_cv, "cfiscsi_sessions");
1387#ifdef ICL_KERNEL_PROXY
1388	cv_init(&softc->accept_cv, "cfiscsi_accept");
1389#endif
1390	TAILQ_INIT(&softc->sessions);
1391	TAILQ_INIT(&softc->targets);
1392
1393	cfiscsi_data_wait_zone = uma_zcreate("cfiscsi_data_wait",
1394	    sizeof(struct cfiscsi_data_wait), NULL, NULL, NULL, NULL,
1395	    UMA_ALIGN_PTR, 0);
1396
1397	return (0);
1398}
1399
1400#ifdef ICL_KERNEL_PROXY
1401static void
1402cfiscsi_accept(struct socket *so, struct sockaddr *sa, int portal_id)
1403{
1404	struct cfiscsi_session *cs;
1405
1406	cs = cfiscsi_session_new(&cfiscsi_softc, NULL);
1407	if (cs == NULL) {
1408		CFISCSI_WARN("failed to create session");
1409		return;
1410	}
1411
1412	icl_conn_handoff_sock(cs->cs_conn, so);
1413	cs->cs_initiator_sa = sa;
1414	cs->cs_portal_id = portal_id;
1415	cs->cs_waiting_for_ctld = true;
1416	cv_signal(&cfiscsi_softc.accept_cv);
1417}
1418#endif
1419
1420static void
1421cfiscsi_online(void *arg)
1422{
1423	struct cfiscsi_softc *softc;
1424	struct cfiscsi_target *ct;
1425	int online;
1426
1427	ct = (struct cfiscsi_target *)arg;
1428	softc = ct->ct_softc;
1429
1430	mtx_lock(&softc->lock);
1431	if (ct->ct_online) {
1432		mtx_unlock(&softc->lock);
1433		return;
1434	}
1435	ct->ct_online = 1;
1436	online = softc->online++;
1437	mtx_unlock(&softc->lock);
1438	if (online > 0)
1439		return;
1440
1441#ifdef ICL_KERNEL_PROXY
1442	if (softc->listener != NULL)
1443		icl_listen_free(softc->listener);
1444	softc->listener = icl_listen_new(cfiscsi_accept);
1445#endif
1446}
1447
1448static void
1449cfiscsi_offline(void *arg)
1450{
1451	struct cfiscsi_softc *softc;
1452	struct cfiscsi_target *ct;
1453	struct cfiscsi_session *cs;
1454	int online;
1455
1456	ct = (struct cfiscsi_target *)arg;
1457	softc = ct->ct_softc;
1458
1459	mtx_lock(&softc->lock);
1460	if (!ct->ct_online) {
1461		mtx_unlock(&softc->lock);
1462		return;
1463	}
1464	ct->ct_online = 0;
1465	online = --softc->online;
1466
1467	TAILQ_FOREACH(cs, &softc->sessions, cs_next) {
1468		if (cs->cs_target == ct)
1469			cfiscsi_session_terminate(cs);
1470	}
1471	do {
1472		TAILQ_FOREACH(cs, &softc->sessions, cs_next) {
1473			if (cs->cs_target == ct)
1474				break;
1475		}
1476		if (cs != NULL)
1477			cv_wait(&softc->sessions_cv, &softc->lock);
1478	} while (cs != NULL && ct->ct_online == 0);
1479	mtx_unlock(&softc->lock);
1480	if (online > 0)
1481		return;
1482
1483#ifdef ICL_KERNEL_PROXY
1484	icl_listen_free(softc->listener);
1485	softc->listener = NULL;
1486#endif
1487}
1488
1489static int
1490cfiscsi_info(void *arg, struct sbuf *sb)
1491{
1492	struct cfiscsi_target *ct = (struct cfiscsi_target *)arg;
1493	int retval;
1494
1495	retval = sbuf_printf(sb, "\t<cfiscsi_state>%d</cfiscsi_state>\n",
1496	    ct->ct_state);
1497	return (retval);
1498}
1499
1500static void
1501cfiscsi_ioctl_handoff(struct ctl_iscsi *ci)
1502{
1503	struct cfiscsi_softc *softc;
1504	struct cfiscsi_session *cs, *cs2;
1505	struct cfiscsi_target *ct;
1506	struct ctl_iscsi_handoff_params *cihp;
1507	int error;
1508
1509	cihp = (struct ctl_iscsi_handoff_params *)&(ci->data);
1510	softc = &cfiscsi_softc;
1511
1512	CFISCSI_DEBUG("new connection from %s (%s) to %s",
1513	    cihp->initiator_name, cihp->initiator_addr,
1514	    cihp->target_name);
1515
1516	ct = cfiscsi_target_find(softc, cihp->target_name,
1517	    cihp->portal_group_tag);
1518	if (ct == NULL) {
1519		ci->status = CTL_ISCSI_ERROR;
1520		snprintf(ci->error_str, sizeof(ci->error_str),
1521		    "%s: target not found", __func__);
1522		return;
1523	}
1524
1525#ifdef ICL_KERNEL_PROXY
1526	if (cihp->socket > 0 && cihp->connection_id > 0) {
1527		snprintf(ci->error_str, sizeof(ci->error_str),
1528		    "both socket and connection_id set");
1529		ci->status = CTL_ISCSI_ERROR;
1530		cfiscsi_target_release(ct);
1531		return;
1532	}
1533	if (cihp->socket == 0) {
1534		mtx_lock(&cfiscsi_softc.lock);
1535		TAILQ_FOREACH(cs, &cfiscsi_softc.sessions, cs_next) {
1536			if (cs->cs_id == cihp->connection_id)
1537				break;
1538		}
1539		if (cs == NULL) {
1540			mtx_unlock(&cfiscsi_softc.lock);
1541			snprintf(ci->error_str, sizeof(ci->error_str),
1542			    "connection not found");
1543			ci->status = CTL_ISCSI_ERROR;
1544			cfiscsi_target_release(ct);
1545			return;
1546		}
1547		mtx_unlock(&cfiscsi_softc.lock);
1548	} else {
1549#endif
1550		cs = cfiscsi_session_new(softc, cihp->offload);
1551		if (cs == NULL) {
1552			ci->status = CTL_ISCSI_ERROR;
1553			snprintf(ci->error_str, sizeof(ci->error_str),
1554			    "%s: cfiscsi_session_new failed", __func__);
1555			cfiscsi_target_release(ct);
1556			return;
1557		}
1558#ifdef ICL_KERNEL_PROXY
1559	}
1560#endif
1561
1562	/*
1563	 * First PDU of Full Feature phase has the same CmdSN as the last
1564	 * PDU from the Login Phase received from the initiator.  Thus,
1565	 * the -1 below.
1566	 */
1567	cs->cs_cmdsn = cihp->cmdsn;
1568	cs->cs_statsn = cihp->statsn;
1569	cs->cs_max_data_segment_length = cihp->max_recv_data_segment_length;
1570	cs->cs_max_burst_length = cihp->max_burst_length;
1571	cs->cs_immediate_data = !!cihp->immediate_data;
1572	if (cihp->header_digest == CTL_ISCSI_DIGEST_CRC32C)
1573		cs->cs_conn->ic_header_crc32c = true;
1574	if (cihp->data_digest == CTL_ISCSI_DIGEST_CRC32C)
1575		cs->cs_conn->ic_data_crc32c = true;
1576
1577	strlcpy(cs->cs_initiator_name,
1578	    cihp->initiator_name, sizeof(cs->cs_initiator_name));
1579	strlcpy(cs->cs_initiator_addr,
1580	    cihp->initiator_addr, sizeof(cs->cs_initiator_addr));
1581	strlcpy(cs->cs_initiator_alias,
1582	    cihp->initiator_alias, sizeof(cs->cs_initiator_alias));
1583	memcpy(cs->cs_initiator_isid,
1584	    cihp->initiator_isid, sizeof(cs->cs_initiator_isid));
1585	snprintf(cs->cs_initiator_id, sizeof(cs->cs_initiator_id),
1586	    "%s,i,0x%02x%02x%02x%02x%02x%02x", cs->cs_initiator_name,
1587	    cihp->initiator_isid[0], cihp->initiator_isid[1],
1588	    cihp->initiator_isid[2], cihp->initiator_isid[3],
1589	    cihp->initiator_isid[4], cihp->initiator_isid[5]);
1590
1591	mtx_lock(&softc->lock);
1592	if (ct->ct_online == 0) {
1593		mtx_unlock(&softc->lock);
1594		cfiscsi_session_terminate(cs);
1595		cfiscsi_target_release(ct);
1596		ci->status = CTL_ISCSI_ERROR;
1597		snprintf(ci->error_str, sizeof(ci->error_str),
1598		    "%s: port offline", __func__);
1599		return;
1600	}
1601	cs->cs_target = ct;
1602	mtx_unlock(&softc->lock);
1603
1604	refcount_acquire(&cs->cs_outstanding_ctl_pdus);
1605restart:
1606	if (!cs->cs_terminating) {
1607		mtx_lock(&softc->lock);
1608		TAILQ_FOREACH(cs2, &softc->sessions, cs_next) {
1609			if (cs2 != cs && cs2->cs_tasks_aborted == false &&
1610			    cs->cs_target == cs2->cs_target &&
1611			    strcmp(cs->cs_initiator_id, cs2->cs_initiator_id) == 0) {
1612				if (strcmp(cs->cs_initiator_addr,
1613				    cs2->cs_initiator_addr) != 0) {
1614					CFISCSI_SESSION_WARN(cs2,
1615					    "session reinstatement from "
1616					    "different address %s",
1617					    cs->cs_initiator_addr);
1618				} else {
1619					CFISCSI_SESSION_DEBUG(cs2,
1620					    "session reinstatement");
1621				}
1622				cfiscsi_session_terminate(cs2);
1623				mtx_unlock(&softc->lock);
1624				pause("cfiscsi_reinstate", 1);
1625				goto restart;
1626			}
1627		}
1628		mtx_unlock(&softc->lock);
1629	}
1630
1631	/*
1632	 * Register initiator with CTL.
1633	 */
1634	cfiscsi_session_register_initiator(cs);
1635
1636#ifdef ICL_KERNEL_PROXY
1637	if (cihp->socket > 0) {
1638#endif
1639		error = icl_conn_handoff(cs->cs_conn, cihp->socket);
1640		if (error != 0) {
1641			cfiscsi_session_terminate(cs);
1642			refcount_release(&cs->cs_outstanding_ctl_pdus);
1643			ci->status = CTL_ISCSI_ERROR;
1644			snprintf(ci->error_str, sizeof(ci->error_str),
1645			    "%s: icl_conn_handoff failed with error %d",
1646			    __func__, error);
1647			return;
1648		}
1649#ifdef ICL_KERNEL_PROXY
1650	}
1651#endif
1652
1653#ifdef ICL_KERNEL_PROXY
1654	cs->cs_login_phase = false;
1655
1656	/*
1657	 * First PDU of the Full Feature phase has likely already arrived.
1658	 * We have to pick it up and execute properly.
1659	 */
1660	if (cs->cs_login_pdu != NULL) {
1661		CFISCSI_SESSION_DEBUG(cs, "picking up first PDU");
1662		cfiscsi_pdu_handle(cs->cs_login_pdu);
1663		cs->cs_login_pdu = NULL;
1664	}
1665#endif
1666
1667	refcount_release(&cs->cs_outstanding_ctl_pdus);
1668	ci->status = CTL_ISCSI_OK;
1669}
1670
1671static void
1672cfiscsi_ioctl_list(struct ctl_iscsi *ci)
1673{
1674	struct ctl_iscsi_list_params *cilp;
1675	struct cfiscsi_session *cs;
1676	struct cfiscsi_softc *softc;
1677	struct sbuf *sb;
1678	int error;
1679
1680	cilp = (struct ctl_iscsi_list_params *)&(ci->data);
1681	softc = &cfiscsi_softc;
1682
1683	sb = sbuf_new(NULL, NULL, cilp->alloc_len, SBUF_FIXEDLEN);
1684	if (sb == NULL) {
1685		ci->status = CTL_ISCSI_ERROR;
1686		snprintf(ci->error_str, sizeof(ci->error_str),
1687		    "Unable to allocate %d bytes for iSCSI session list",
1688		    cilp->alloc_len);
1689		return;
1690	}
1691
1692	sbuf_printf(sb, "<ctlislist>\n");
1693	mtx_lock(&softc->lock);
1694	TAILQ_FOREACH(cs, &softc->sessions, cs_next) {
1695#ifdef ICL_KERNEL_PROXY
1696		if (cs->cs_target == NULL)
1697			continue;
1698#endif
1699		error = sbuf_printf(sb, "<connection id=\"%d\">"
1700		    "<initiator>%s</initiator>"
1701		    "<initiator_addr>%s</initiator_addr>"
1702		    "<initiator_alias>%s</initiator_alias>"
1703		    "<target>%s</target>"
1704		    "<target_alias>%s</target_alias>"
1705		    "<target_portal_group_tag>%u</target_portal_group_tag>"
1706		    "<header_digest>%s</header_digest>"
1707		    "<data_digest>%s</data_digest>"
1708		    "<max_data_segment_length>%zd</max_data_segment_length>"
1709		    "<immediate_data>%d</immediate_data>"
1710		    "<iser>%d</iser>"
1711		    "<offload>%s</offload>"
1712		    "</connection>\n",
1713		    cs->cs_id,
1714		    cs->cs_initiator_name, cs->cs_initiator_addr, cs->cs_initiator_alias,
1715		    cs->cs_target->ct_name, cs->cs_target->ct_alias,
1716		    cs->cs_target->ct_tag,
1717		    cs->cs_conn->ic_header_crc32c ? "CRC32C" : "None",
1718		    cs->cs_conn->ic_data_crc32c ? "CRC32C" : "None",
1719		    cs->cs_max_data_segment_length,
1720		    cs->cs_immediate_data,
1721		    cs->cs_conn->ic_iser,
1722		    cs->cs_conn->ic_offload);
1723		if (error != 0)
1724			break;
1725	}
1726	mtx_unlock(&softc->lock);
1727	error = sbuf_printf(sb, "</ctlislist>\n");
1728	if (error != 0) {
1729		sbuf_delete(sb);
1730		ci->status = CTL_ISCSI_LIST_NEED_MORE_SPACE;
1731		snprintf(ci->error_str, sizeof(ci->error_str),
1732		    "Out of space, %d bytes is too small", cilp->alloc_len);
1733		return;
1734	}
1735	sbuf_finish(sb);
1736
1737	error = copyout(sbuf_data(sb), cilp->conn_xml, sbuf_len(sb) + 1);
1738	cilp->fill_len = sbuf_len(sb) + 1;
1739	ci->status = CTL_ISCSI_OK;
1740	sbuf_delete(sb);
1741}
1742
1743static void
1744cfiscsi_ioctl_logout(struct ctl_iscsi *ci)
1745{
1746	struct icl_pdu *response;
1747	struct iscsi_bhs_asynchronous_message *bhsam;
1748	struct ctl_iscsi_logout_params *cilp;
1749	struct cfiscsi_session *cs;
1750	struct cfiscsi_softc *softc;
1751	int found = 0;
1752
1753	cilp = (struct ctl_iscsi_logout_params *)&(ci->data);
1754	softc = &cfiscsi_softc;
1755
1756	mtx_lock(&softc->lock);
1757	TAILQ_FOREACH(cs, &softc->sessions, cs_next) {
1758		if (cilp->all == 0 && cs->cs_id != cilp->connection_id &&
1759		    strcmp(cs->cs_initiator_name, cilp->initiator_name) != 0 &&
1760		    strcmp(cs->cs_initiator_addr, cilp->initiator_addr) != 0)
1761			continue;
1762
1763		response = icl_pdu_new(cs->cs_conn, M_NOWAIT);
1764		if (response == NULL) {
1765			ci->status = CTL_ISCSI_ERROR;
1766			snprintf(ci->error_str, sizeof(ci->error_str),
1767			    "Unable to allocate memory");
1768			mtx_unlock(&softc->lock);
1769			return;
1770		}
1771		bhsam =
1772		    (struct iscsi_bhs_asynchronous_message *)response->ip_bhs;
1773		bhsam->bhsam_opcode = ISCSI_BHS_OPCODE_ASYNC_MESSAGE;
1774		bhsam->bhsam_flags = 0x80;
1775		bhsam->bhsam_async_event = BHSAM_EVENT_TARGET_REQUESTS_LOGOUT;
1776		bhsam->bhsam_parameter3 = htons(10);
1777		cfiscsi_pdu_queue(response);
1778		found++;
1779	}
1780	mtx_unlock(&softc->lock);
1781
1782	if (found == 0) {
1783		ci->status = CTL_ISCSI_SESSION_NOT_FOUND;
1784		snprintf(ci->error_str, sizeof(ci->error_str),
1785		    "No matching connections found");
1786		return;
1787	}
1788
1789	ci->status = CTL_ISCSI_OK;
1790}
1791
1792static void
1793cfiscsi_ioctl_terminate(struct ctl_iscsi *ci)
1794{
1795	struct icl_pdu *response;
1796	struct iscsi_bhs_asynchronous_message *bhsam;
1797	struct ctl_iscsi_terminate_params *citp;
1798	struct cfiscsi_session *cs;
1799	struct cfiscsi_softc *softc;
1800	int found = 0;
1801
1802	citp = (struct ctl_iscsi_terminate_params *)&(ci->data);
1803	softc = &cfiscsi_softc;
1804
1805	mtx_lock(&softc->lock);
1806	TAILQ_FOREACH(cs, &softc->sessions, cs_next) {
1807		if (citp->all == 0 && cs->cs_id != citp->connection_id &&
1808		    strcmp(cs->cs_initiator_name, citp->initiator_name) != 0 &&
1809		    strcmp(cs->cs_initiator_addr, citp->initiator_addr) != 0)
1810			continue;
1811
1812		response = icl_pdu_new(cs->cs_conn, M_NOWAIT);
1813		if (response == NULL) {
1814			/*
1815			 * Oh well.  Just terminate the connection.
1816			 */
1817		} else {
1818			bhsam = (struct iscsi_bhs_asynchronous_message *)
1819			    response->ip_bhs;
1820			bhsam->bhsam_opcode = ISCSI_BHS_OPCODE_ASYNC_MESSAGE;
1821			bhsam->bhsam_flags = 0x80;
1822			bhsam->bhsam_0xffffffff = 0xffffffff;
1823			bhsam->bhsam_async_event =
1824			    BHSAM_EVENT_TARGET_TERMINATES_SESSION;
1825			cfiscsi_pdu_queue(response);
1826		}
1827		cfiscsi_session_terminate(cs);
1828		found++;
1829	}
1830	mtx_unlock(&softc->lock);
1831
1832	if (found == 0) {
1833		ci->status = CTL_ISCSI_SESSION_NOT_FOUND;
1834		snprintf(ci->error_str, sizeof(ci->error_str),
1835		    "No matching connections found");
1836		return;
1837	}
1838
1839	ci->status = CTL_ISCSI_OK;
1840}
1841
1842static void
1843cfiscsi_ioctl_limits(struct ctl_iscsi *ci)
1844{
1845	struct ctl_iscsi_limits_params *cilp;
1846	int error;
1847
1848	cilp = (struct ctl_iscsi_limits_params *)&(ci->data);
1849
1850	error = icl_limits(cilp->offload, &cilp->data_segment_limit);
1851	if (error != 0) {
1852		ci->status = CTL_ISCSI_ERROR;
1853		snprintf(ci->error_str, sizeof(ci->error_str),
1854			"%s: icl_limits failed with error %d",
1855			__func__, error);
1856		return;
1857	}
1858
1859	ci->status = CTL_ISCSI_OK;
1860}
1861
1862#ifdef ICL_KERNEL_PROXY
1863static void
1864cfiscsi_ioctl_listen(struct ctl_iscsi *ci)
1865{
1866	struct ctl_iscsi_listen_params *cilp;
1867	struct sockaddr *sa;
1868	int error;
1869
1870	cilp = (struct ctl_iscsi_listen_params *)&(ci->data);
1871
1872	if (cfiscsi_softc.listener == NULL) {
1873		CFISCSI_DEBUG("no listener");
1874		snprintf(ci->error_str, sizeof(ci->error_str), "no listener");
1875		ci->status = CTL_ISCSI_ERROR;
1876		return;
1877	}
1878
1879	error = getsockaddr(&sa, (void *)cilp->addr, cilp->addrlen);
1880	if (error != 0) {
1881		CFISCSI_DEBUG("getsockaddr, error %d", error);
1882		snprintf(ci->error_str, sizeof(ci->error_str), "getsockaddr failed");
1883		ci->status = CTL_ISCSI_ERROR;
1884		return;
1885	}
1886
1887	error = icl_listen_add(cfiscsi_softc.listener, cilp->iser, cilp->domain,
1888	    cilp->socktype, cilp->protocol, sa, cilp->portal_id);
1889	if (error != 0) {
1890		free(sa, M_SONAME);
1891		CFISCSI_DEBUG("icl_listen_add, error %d", error);
1892		snprintf(ci->error_str, sizeof(ci->error_str),
1893		    "icl_listen_add failed, error %d", error);
1894		ci->status = CTL_ISCSI_ERROR;
1895		return;
1896	}
1897
1898	ci->status = CTL_ISCSI_OK;
1899}
1900
1901static void
1902cfiscsi_ioctl_accept(struct ctl_iscsi *ci)
1903{
1904	struct ctl_iscsi_accept_params *ciap;
1905	struct cfiscsi_session *cs;
1906	int error;
1907
1908	ciap = (struct ctl_iscsi_accept_params *)&(ci->data);
1909
1910	mtx_lock(&cfiscsi_softc.lock);
1911	for (;;) {
1912		TAILQ_FOREACH(cs, &cfiscsi_softc.sessions, cs_next) {
1913			if (cs->cs_waiting_for_ctld)
1914				break;
1915		}
1916		if (cs != NULL)
1917			break;
1918		error = cv_wait_sig(&cfiscsi_softc.accept_cv, &cfiscsi_softc.lock);
1919		if (error != 0) {
1920			mtx_unlock(&cfiscsi_softc.lock);
1921			snprintf(ci->error_str, sizeof(ci->error_str), "interrupted");
1922			ci->status = CTL_ISCSI_ERROR;
1923			return;
1924		}
1925	}
1926	mtx_unlock(&cfiscsi_softc.lock);
1927
1928	cs->cs_waiting_for_ctld = false;
1929	cs->cs_login_phase = true;
1930
1931	ciap->connection_id = cs->cs_id;
1932	ciap->portal_id = cs->cs_portal_id;
1933	ciap->initiator_addrlen = cs->cs_initiator_sa->sa_len;
1934	error = copyout(cs->cs_initiator_sa, ciap->initiator_addr,
1935	    cs->cs_initiator_sa->sa_len);
1936	if (error != 0) {
1937		snprintf(ci->error_str, sizeof(ci->error_str),
1938		    "copyout failed with error %d", error);
1939		ci->status = CTL_ISCSI_ERROR;
1940		return;
1941	}
1942
1943	ci->status = CTL_ISCSI_OK;
1944}
1945
1946static void
1947cfiscsi_ioctl_send(struct ctl_iscsi *ci)
1948{
1949	struct ctl_iscsi_send_params *cisp;
1950	struct cfiscsi_session *cs;
1951	struct icl_pdu *ip;
1952	size_t datalen;
1953	void *data;
1954	int error;
1955
1956	cisp = (struct ctl_iscsi_send_params *)&(ci->data);
1957
1958	mtx_lock(&cfiscsi_softc.lock);
1959	TAILQ_FOREACH(cs, &cfiscsi_softc.sessions, cs_next) {
1960		if (cs->cs_id == cisp->connection_id)
1961			break;
1962	}
1963	if (cs == NULL) {
1964		mtx_unlock(&cfiscsi_softc.lock);
1965		snprintf(ci->error_str, sizeof(ci->error_str), "connection not found");
1966		ci->status = CTL_ISCSI_ERROR;
1967		return;
1968	}
1969	mtx_unlock(&cfiscsi_softc.lock);
1970
1971#if 0
1972	if (cs->cs_login_phase == false)
1973		return (EBUSY);
1974#endif
1975
1976	if (cs->cs_terminating) {
1977		snprintf(ci->error_str, sizeof(ci->error_str), "connection is terminating");
1978		ci->status = CTL_ISCSI_ERROR;
1979		return;
1980	}
1981
1982	datalen = cisp->data_segment_len;
1983	/*
1984	 * XXX
1985	 */
1986	//if (datalen > CFISCSI_MAX_DATA_SEGMENT_LENGTH) {
1987	if (datalen > 65535) {
1988		snprintf(ci->error_str, sizeof(ci->error_str), "data segment too big");
1989		ci->status = CTL_ISCSI_ERROR;
1990		return;
1991	}
1992	if (datalen > 0) {
1993		data = malloc(datalen, M_CFISCSI, M_WAITOK);
1994		error = copyin(cisp->data_segment, data, datalen);
1995		if (error != 0) {
1996			free(data, M_CFISCSI);
1997			snprintf(ci->error_str, sizeof(ci->error_str), "copyin error %d", error);
1998			ci->status = CTL_ISCSI_ERROR;
1999			return;
2000		}
2001	}
2002
2003	ip = icl_pdu_new(cs->cs_conn, M_WAITOK);
2004	memcpy(ip->ip_bhs, cisp->bhs, sizeof(*ip->ip_bhs));
2005	if (datalen > 0) {
2006		icl_pdu_append_data(ip, data, datalen, M_WAITOK);
2007		free(data, M_CFISCSI);
2008	}
2009	CFISCSI_SESSION_LOCK(cs);
2010	icl_pdu_queue(ip);
2011	CFISCSI_SESSION_UNLOCK(cs);
2012	ci->status = CTL_ISCSI_OK;
2013}
2014
2015static void
2016cfiscsi_ioctl_receive(struct ctl_iscsi *ci)
2017{
2018	struct ctl_iscsi_receive_params *cirp;
2019	struct cfiscsi_session *cs;
2020	struct icl_pdu *ip;
2021	void *data;
2022	int error;
2023
2024	cirp = (struct ctl_iscsi_receive_params *)&(ci->data);
2025
2026	mtx_lock(&cfiscsi_softc.lock);
2027	TAILQ_FOREACH(cs, &cfiscsi_softc.sessions, cs_next) {
2028		if (cs->cs_id == cirp->connection_id)
2029			break;
2030	}
2031	if (cs == NULL) {
2032		mtx_unlock(&cfiscsi_softc.lock);
2033		snprintf(ci->error_str, sizeof(ci->error_str),
2034		    "connection not found");
2035		ci->status = CTL_ISCSI_ERROR;
2036		return;
2037	}
2038	mtx_unlock(&cfiscsi_softc.lock);
2039
2040#if 0
2041	if (is->is_login_phase == false)
2042		return (EBUSY);
2043#endif
2044
2045	CFISCSI_SESSION_LOCK(cs);
2046	while (cs->cs_login_pdu == NULL && cs->cs_terminating == false) {
2047		error = cv_wait_sig(&cs->cs_login_cv, &cs->cs_lock);
2048		if (error != 0) {
2049			CFISCSI_SESSION_UNLOCK(cs);
2050			snprintf(ci->error_str, sizeof(ci->error_str),
2051			    "interrupted by signal");
2052			ci->status = CTL_ISCSI_ERROR;
2053			return;
2054		}
2055	}
2056
2057	if (cs->cs_terminating) {
2058		CFISCSI_SESSION_UNLOCK(cs);
2059		snprintf(ci->error_str, sizeof(ci->error_str),
2060		    "connection terminating");
2061		ci->status = CTL_ISCSI_ERROR;
2062		return;
2063	}
2064	ip = cs->cs_login_pdu;
2065	cs->cs_login_pdu = NULL;
2066	CFISCSI_SESSION_UNLOCK(cs);
2067
2068	if (ip->ip_data_len > cirp->data_segment_len) {
2069		icl_pdu_free(ip);
2070		snprintf(ci->error_str, sizeof(ci->error_str),
2071		    "data segment too big");
2072		ci->status = CTL_ISCSI_ERROR;
2073		return;
2074	}
2075
2076	copyout(ip->ip_bhs, cirp->bhs, sizeof(*ip->ip_bhs));
2077	if (ip->ip_data_len > 0) {
2078		data = malloc(ip->ip_data_len, M_CFISCSI, M_WAITOK);
2079		icl_pdu_get_data(ip, 0, data, ip->ip_data_len);
2080		copyout(data, cirp->data_segment, ip->ip_data_len);
2081		free(data, M_CFISCSI);
2082	}
2083
2084	icl_pdu_free(ip);
2085	ci->status = CTL_ISCSI_OK;
2086}
2087
2088#endif /* !ICL_KERNEL_PROXY */
2089
2090static void
2091cfiscsi_ioctl_port_create(struct ctl_req *req)
2092{
2093	struct cfiscsi_target *ct;
2094	struct ctl_port *port;
2095	const char *target, *alias, *tags;
2096	struct scsi_vpd_id_descriptor *desc;
2097	ctl_options_t opts;
2098	int retval, len, idlen;
2099	uint16_t tag;
2100
2101	ctl_init_opts(&opts, req->num_args, req->kern_args);
2102	target = ctl_get_opt(&opts, "cfiscsi_target");
2103	alias = ctl_get_opt(&opts, "cfiscsi_target_alias");
2104	tags = ctl_get_opt(&opts, "cfiscsi_portal_group_tag");
2105	if (target == NULL || tags == NULL) {
2106		req->status = CTL_LUN_ERROR;
2107		snprintf(req->error_str, sizeof(req->error_str),
2108		    "Missing required argument");
2109		ctl_free_opts(&opts);
2110		return;
2111	}
2112	tag = strtol(tags, (char **)NULL, 10);
2113	ct = cfiscsi_target_find_or_create(&cfiscsi_softc, target, alias, tag);
2114	if (ct == NULL) {
2115		req->status = CTL_LUN_ERROR;
2116		snprintf(req->error_str, sizeof(req->error_str),
2117		    "failed to create target \"%s\"", target);
2118		ctl_free_opts(&opts);
2119		return;
2120	}
2121	if (ct->ct_state == CFISCSI_TARGET_STATE_ACTIVE) {
2122		req->status = CTL_LUN_ERROR;
2123		snprintf(req->error_str, sizeof(req->error_str),
2124		    "target \"%s\" already exists", target);
2125		cfiscsi_target_release(ct);
2126		ctl_free_opts(&opts);
2127		return;
2128	}
2129	port = &ct->ct_port;
2130	// WAT
2131	if (ct->ct_state == CFISCSI_TARGET_STATE_DYING)
2132		goto done;
2133
2134	port->frontend = &cfiscsi_frontend;
2135	port->port_type = CTL_PORT_ISCSI;
2136	/* XXX KDM what should the real number be here? */
2137	port->num_requested_ctl_io = 4096;
2138	port->port_name = "iscsi";
2139	port->physical_port = tag;
2140	port->virtual_port = ct->ct_target_id;
2141	port->port_online = cfiscsi_online;
2142	port->port_offline = cfiscsi_offline;
2143	port->port_info = cfiscsi_info;
2144	port->onoff_arg = ct;
2145	port->fe_datamove = cfiscsi_datamove;
2146	port->fe_done = cfiscsi_done;
2147
2148	/* XXX KDM what should we report here? */
2149	/* XXX These should probably be fetched from CTL. */
2150	port->max_targets = 1;
2151	port->max_target_id = 15;
2152	port->targ_port = -1;
2153
2154	port->options = opts;
2155	STAILQ_INIT(&opts);
2156
2157	/* Generate Port ID. */
2158	idlen = strlen(target) + strlen(",t,0x0001") + 1;
2159	idlen = roundup2(idlen, 4);
2160	len = sizeof(struct scsi_vpd_device_id) + idlen;
2161	port->port_devid = malloc(sizeof(struct ctl_devid) + len,
2162	    M_CTL, M_WAITOK | M_ZERO);
2163	port->port_devid->len = len;
2164	desc = (struct scsi_vpd_id_descriptor *)port->port_devid->data;
2165	desc->proto_codeset = (SCSI_PROTO_ISCSI << 4) | SVPD_ID_CODESET_UTF8;
2166	desc->id_type = SVPD_ID_PIV | SVPD_ID_ASSOC_PORT |
2167	    SVPD_ID_TYPE_SCSI_NAME;
2168	desc->length = idlen;
2169	snprintf(desc->identifier, idlen, "%s,t,0x%4.4x", target, tag);
2170
2171	/* Generate Target ID. */
2172	idlen = strlen(target) + 1;
2173	idlen = roundup2(idlen, 4);
2174	len = sizeof(struct scsi_vpd_device_id) + idlen;
2175	port->target_devid = malloc(sizeof(struct ctl_devid) + len,
2176	    M_CTL, M_WAITOK | M_ZERO);
2177	port->target_devid->len = len;
2178	desc = (struct scsi_vpd_id_descriptor *)port->target_devid->data;
2179	desc->proto_codeset = (SCSI_PROTO_ISCSI << 4) | SVPD_ID_CODESET_UTF8;
2180	desc->id_type = SVPD_ID_PIV | SVPD_ID_ASSOC_TARGET |
2181	    SVPD_ID_TYPE_SCSI_NAME;
2182	desc->length = idlen;
2183	strlcpy(desc->identifier, target, idlen);
2184
2185	retval = ctl_port_register(port);
2186	if (retval != 0) {
2187		ctl_free_opts(&port->options);
2188		cfiscsi_target_release(ct);
2189		free(port->port_devid, M_CFISCSI);
2190		free(port->target_devid, M_CFISCSI);
2191		req->status = CTL_LUN_ERROR;
2192		snprintf(req->error_str, sizeof(req->error_str),
2193		    "ctl_port_register() failed with error %d", retval);
2194		return;
2195	}
2196done:
2197	ct->ct_state = CFISCSI_TARGET_STATE_ACTIVE;
2198	req->status = CTL_LUN_OK;
2199	memcpy(req->kern_args[0].kvalue, &port->targ_port,
2200	    sizeof(port->targ_port)); //XXX
2201}
2202
2203static void
2204cfiscsi_ioctl_port_remove(struct ctl_req *req)
2205{
2206	struct cfiscsi_target *ct;
2207	const char *target, *tags;
2208	ctl_options_t opts;
2209	uint16_t tag;
2210
2211	ctl_init_opts(&opts, req->num_args, req->kern_args);
2212	target = ctl_get_opt(&opts, "cfiscsi_target");
2213	tags = ctl_get_opt(&opts, "cfiscsi_portal_group_tag");
2214	if (target == NULL || tags == NULL) {
2215		ctl_free_opts(&opts);
2216		req->status = CTL_LUN_ERROR;
2217		snprintf(req->error_str, sizeof(req->error_str),
2218		    "Missing required argument");
2219		return;
2220	}
2221	tag = strtol(tags, (char **)NULL, 10);
2222	ct = cfiscsi_target_find(&cfiscsi_softc, target, tag);
2223	if (ct == NULL) {
2224		ctl_free_opts(&opts);
2225		req->status = CTL_LUN_ERROR;
2226		snprintf(req->error_str, sizeof(req->error_str),
2227		    "can't find target \"%s\"", target);
2228		return;
2229	}
2230	if (ct->ct_state != CFISCSI_TARGET_STATE_ACTIVE) {
2231		ctl_free_opts(&opts);
2232		req->status = CTL_LUN_ERROR;
2233		snprintf(req->error_str, sizeof(req->error_str),
2234		    "target \"%s\" is already dying", target);
2235		return;
2236	}
2237	ctl_free_opts(&opts);
2238
2239	ct->ct_state = CFISCSI_TARGET_STATE_DYING;
2240	ctl_port_offline(&ct->ct_port);
2241	cfiscsi_target_release(ct);
2242	cfiscsi_target_release(ct);
2243	req->status = CTL_LUN_OK;
2244}
2245
2246static int
2247cfiscsi_ioctl(struct cdev *dev,
2248    u_long cmd, caddr_t addr, int flag, struct thread *td)
2249{
2250	struct ctl_iscsi *ci;
2251	struct ctl_req *req;
2252
2253	if (cmd == CTL_PORT_REQ) {
2254		req = (struct ctl_req *)addr;
2255		switch (req->reqtype) {
2256		case CTL_REQ_CREATE:
2257			cfiscsi_ioctl_port_create(req);
2258			break;
2259		case CTL_REQ_REMOVE:
2260			cfiscsi_ioctl_port_remove(req);
2261			break;
2262		default:
2263			req->status = CTL_LUN_ERROR;
2264			snprintf(req->error_str, sizeof(req->error_str),
2265			    "Unsupported request type %d", req->reqtype);
2266		}
2267		return (0);
2268	}
2269
2270	if (cmd != CTL_ISCSI)
2271		return (ENOTTY);
2272
2273	ci = (struct ctl_iscsi *)addr;
2274	switch (ci->type) {
2275	case CTL_ISCSI_HANDOFF:
2276		cfiscsi_ioctl_handoff(ci);
2277		break;
2278	case CTL_ISCSI_LIST:
2279		cfiscsi_ioctl_list(ci);
2280		break;
2281	case CTL_ISCSI_LOGOUT:
2282		cfiscsi_ioctl_logout(ci);
2283		break;
2284	case CTL_ISCSI_TERMINATE:
2285		cfiscsi_ioctl_terminate(ci);
2286		break;
2287	case CTL_ISCSI_LIMITS:
2288		cfiscsi_ioctl_limits(ci);
2289		break;
2290#ifdef ICL_KERNEL_PROXY
2291	case CTL_ISCSI_LISTEN:
2292		cfiscsi_ioctl_listen(ci);
2293		break;
2294	case CTL_ISCSI_ACCEPT:
2295		cfiscsi_ioctl_accept(ci);
2296		break;
2297	case CTL_ISCSI_SEND:
2298		cfiscsi_ioctl_send(ci);
2299		break;
2300	case CTL_ISCSI_RECEIVE:
2301		cfiscsi_ioctl_receive(ci);
2302		break;
2303#else
2304	case CTL_ISCSI_LISTEN:
2305	case CTL_ISCSI_ACCEPT:
2306	case CTL_ISCSI_SEND:
2307	case CTL_ISCSI_RECEIVE:
2308		ci->status = CTL_ISCSI_ERROR;
2309		snprintf(ci->error_str, sizeof(ci->error_str),
2310		    "%s: CTL compiled without ICL_KERNEL_PROXY",
2311		    __func__);
2312		break;
2313#endif /* !ICL_KERNEL_PROXY */
2314	default:
2315		ci->status = CTL_ISCSI_ERROR;
2316		snprintf(ci->error_str, sizeof(ci->error_str),
2317		    "%s: invalid iSCSI request type %d", __func__, ci->type);
2318		break;
2319	}
2320
2321	return (0);
2322}
2323
2324static void
2325cfiscsi_target_hold(struct cfiscsi_target *ct)
2326{
2327
2328	refcount_acquire(&ct->ct_refcount);
2329}
2330
2331static void
2332cfiscsi_target_release(struct cfiscsi_target *ct)
2333{
2334	struct cfiscsi_softc *softc;
2335
2336	softc = ct->ct_softc;
2337	mtx_lock(&softc->lock);
2338	if (refcount_release(&ct->ct_refcount)) {
2339		TAILQ_REMOVE(&softc->targets, ct, ct_next);
2340		mtx_unlock(&softc->lock);
2341		if (ct->ct_state != CFISCSI_TARGET_STATE_INVALID) {
2342			ct->ct_state = CFISCSI_TARGET_STATE_INVALID;
2343			if (ctl_port_deregister(&ct->ct_port) != 0)
2344				printf("%s: ctl_port_deregister() failed\n",
2345				    __func__);
2346		}
2347		free(ct, M_CFISCSI);
2348
2349		return;
2350	}
2351	mtx_unlock(&softc->lock);
2352}
2353
2354static struct cfiscsi_target *
2355cfiscsi_target_find(struct cfiscsi_softc *softc, const char *name, uint16_t tag)
2356{
2357	struct cfiscsi_target *ct;
2358
2359	mtx_lock(&softc->lock);
2360	TAILQ_FOREACH(ct, &softc->targets, ct_next) {
2361		if (ct->ct_tag != tag ||
2362		    strcmp(name, ct->ct_name) != 0 ||
2363		    ct->ct_state != CFISCSI_TARGET_STATE_ACTIVE)
2364			continue;
2365		cfiscsi_target_hold(ct);
2366		mtx_unlock(&softc->lock);
2367		return (ct);
2368	}
2369	mtx_unlock(&softc->lock);
2370
2371	return (NULL);
2372}
2373
2374static struct cfiscsi_target *
2375cfiscsi_target_find_or_create(struct cfiscsi_softc *softc, const char *name,
2376    const char *alias, uint16_t tag)
2377{
2378	struct cfiscsi_target *ct, *newct;
2379
2380	if (name[0] == '\0' || strlen(name) >= CTL_ISCSI_NAME_LEN)
2381		return (NULL);
2382
2383	newct = malloc(sizeof(*newct), M_CFISCSI, M_WAITOK | M_ZERO);
2384
2385	mtx_lock(&softc->lock);
2386	TAILQ_FOREACH(ct, &softc->targets, ct_next) {
2387		if (ct->ct_tag != tag ||
2388		    strcmp(name, ct->ct_name) != 0 ||
2389		    ct->ct_state == CFISCSI_TARGET_STATE_INVALID)
2390			continue;
2391		cfiscsi_target_hold(ct);
2392		mtx_unlock(&softc->lock);
2393		free(newct, M_CFISCSI);
2394		return (ct);
2395	}
2396
2397	strlcpy(newct->ct_name, name, sizeof(newct->ct_name));
2398	if (alias != NULL)
2399		strlcpy(newct->ct_alias, alias, sizeof(newct->ct_alias));
2400	newct->ct_tag = tag;
2401	refcount_init(&newct->ct_refcount, 1);
2402	newct->ct_softc = softc;
2403	if (TAILQ_EMPTY(&softc->targets))
2404		softc->last_target_id = 0;
2405	newct->ct_target_id = ++softc->last_target_id;
2406	TAILQ_INSERT_TAIL(&softc->targets, newct, ct_next);
2407	mtx_unlock(&softc->lock);
2408
2409	return (newct);
2410}
2411
2412static void
2413cfiscsi_datamove_in(union ctl_io *io)
2414{
2415	struct cfiscsi_session *cs;
2416	struct icl_pdu *request, *response;
2417	const struct iscsi_bhs_scsi_command *bhssc;
2418	struct iscsi_bhs_data_in *bhsdi;
2419	struct ctl_sg_entry ctl_sg_entry, *ctl_sglist;
2420	size_t len, expected_len, sg_len, buffer_offset;
2421	const char *sg_addr;
2422	int ctl_sg_count, error, i;
2423
2424	request = io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr;
2425	cs = PDU_SESSION(request);
2426
2427	bhssc = (const struct iscsi_bhs_scsi_command *)request->ip_bhs;
2428	KASSERT((bhssc->bhssc_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) ==
2429	    ISCSI_BHS_OPCODE_SCSI_COMMAND,
2430	    ("bhssc->bhssc_opcode != ISCSI_BHS_OPCODE_SCSI_COMMAND"));
2431
2432	if (io->scsiio.kern_sg_entries > 0) {
2433		ctl_sglist = (struct ctl_sg_entry *)io->scsiio.kern_data_ptr;
2434		ctl_sg_count = io->scsiio.kern_sg_entries;
2435	} else {
2436		ctl_sglist = &ctl_sg_entry;
2437		ctl_sglist->addr = io->scsiio.kern_data_ptr;
2438		ctl_sglist->len = io->scsiio.kern_data_len;
2439		ctl_sg_count = 1;
2440	}
2441
2442	/*
2443	 * This is the total amount of data to be transferred within the current
2444	 * SCSI command.  We need to record it so that we can properly report
2445	 * underflow/underflow.
2446	 */
2447	PDU_TOTAL_TRANSFER_LEN(request) = io->scsiio.kern_total_len;
2448
2449	/*
2450	 * This is the offset within the current SCSI command; for the first
2451	 * call to cfiscsi_datamove() it will be 0, and for subsequent ones
2452	 * it will be the sum of lengths of previous ones.
2453	 */
2454	buffer_offset = io->scsiio.kern_rel_offset;
2455
2456	/*
2457	 * This is the transfer length expected by the initiator.  In theory,
2458	 * it could be different from the correct amount of data from the SCSI
2459	 * point of view, even if that doesn't make any sense.
2460	 */
2461	expected_len = ntohl(bhssc->bhssc_expected_data_transfer_length);
2462#if 0
2463	if (expected_len != io->scsiio.kern_total_len) {
2464		CFISCSI_SESSION_DEBUG(cs, "expected transfer length %zd, "
2465		    "actual length %zd", expected_len,
2466		    (size_t)io->scsiio.kern_total_len);
2467	}
2468#endif
2469
2470	if (buffer_offset >= expected_len) {
2471#if 0
2472		CFISCSI_SESSION_DEBUG(cs, "buffer_offset = %zd, "
2473		    "already sent the expected len", buffer_offset);
2474#endif
2475		io->scsiio.be_move_done(io);
2476		return;
2477	}
2478
2479	i = 0;
2480	sg_addr = NULL;
2481	sg_len = 0;
2482	response = NULL;
2483	bhsdi = NULL;
2484	for (;;) {
2485		if (response == NULL) {
2486			response = cfiscsi_pdu_new_response(request, M_NOWAIT);
2487			if (response == NULL) {
2488				CFISCSI_SESSION_WARN(cs, "failed to "
2489				    "allocate memory; dropping connection");
2490				ctl_set_busy(&io->scsiio);
2491				io->scsiio.be_move_done(io);
2492				cfiscsi_session_terminate(cs);
2493				return;
2494			}
2495			bhsdi = (struct iscsi_bhs_data_in *)response->ip_bhs;
2496			bhsdi->bhsdi_opcode = ISCSI_BHS_OPCODE_SCSI_DATA_IN;
2497			bhsdi->bhsdi_initiator_task_tag =
2498			    bhssc->bhssc_initiator_task_tag;
2499			bhsdi->bhsdi_datasn = htonl(PDU_EXPDATASN(request));
2500			PDU_EXPDATASN(request)++;
2501			bhsdi->bhsdi_buffer_offset = htonl(buffer_offset);
2502		}
2503
2504		KASSERT(i < ctl_sg_count, ("i >= ctl_sg_count"));
2505		if (sg_len == 0) {
2506			sg_addr = ctl_sglist[i].addr;
2507			sg_len = ctl_sglist[i].len;
2508			KASSERT(sg_len > 0, ("sg_len <= 0"));
2509		}
2510
2511		len = sg_len;
2512
2513		/*
2514		 * Truncate to maximum data segment length.
2515		 */
2516		KASSERT(response->ip_data_len < cs->cs_max_data_segment_length,
2517		    ("ip_data_len %zd >= max_data_segment_length %zd",
2518		    response->ip_data_len, cs->cs_max_data_segment_length));
2519		if (response->ip_data_len + len >
2520		    cs->cs_max_data_segment_length) {
2521			len = cs->cs_max_data_segment_length -
2522			    response->ip_data_len;
2523			KASSERT(len <= sg_len, ("len %zd > sg_len %zd",
2524			    len, sg_len));
2525		}
2526
2527		/*
2528		 * Truncate to expected data transfer length.
2529		 */
2530		KASSERT(buffer_offset + response->ip_data_len < expected_len,
2531		    ("buffer_offset %zd + ip_data_len %zd >= expected_len %zd",
2532		    buffer_offset, response->ip_data_len, expected_len));
2533		if (buffer_offset + response->ip_data_len + len > expected_len) {
2534			CFISCSI_SESSION_DEBUG(cs, "truncating from %zd "
2535			    "to expected data transfer length %zd",
2536			    buffer_offset + response->ip_data_len + len, expected_len);
2537			len = expected_len - (buffer_offset + response->ip_data_len);
2538			KASSERT(len <= sg_len, ("len %zd > sg_len %zd",
2539			    len, sg_len));
2540		}
2541
2542		error = icl_pdu_append_data(response, sg_addr, len, M_NOWAIT);
2543		if (error != 0) {
2544			CFISCSI_SESSION_WARN(cs, "failed to "
2545			    "allocate memory; dropping connection");
2546			icl_pdu_free(response);
2547			ctl_set_busy(&io->scsiio);
2548			io->scsiio.be_move_done(io);
2549			cfiscsi_session_terminate(cs);
2550			return;
2551		}
2552		sg_addr += len;
2553		sg_len -= len;
2554
2555		KASSERT(buffer_offset + response->ip_data_len <= expected_len,
2556		    ("buffer_offset %zd + ip_data_len %zd > expected_len %zd",
2557		    buffer_offset, response->ip_data_len, expected_len));
2558		if (buffer_offset + response->ip_data_len == expected_len) {
2559			/*
2560			 * Already have the amount of data the initiator wanted.
2561			 */
2562			break;
2563		}
2564
2565		if (sg_len == 0) {
2566			/*
2567			 * End of scatter-gather segment;
2568			 * proceed to the next one...
2569			 */
2570			if (i == ctl_sg_count - 1) {
2571				/*
2572				 * ... unless this was the last one.
2573				 */
2574				break;
2575			}
2576			i++;
2577		}
2578
2579		if (response->ip_data_len == cs->cs_max_data_segment_length) {
2580			/*
2581			 * Can't stuff more data into the current PDU;
2582			 * queue it.  Note that's not enough to check
2583			 * for kern_data_resid == 0 instead; there
2584			 * may be several Data-In PDUs for the final
2585			 * call to cfiscsi_datamove(), and we want
2586			 * to set the F flag only on the last of them.
2587			 */
2588			buffer_offset += response->ip_data_len;
2589			if (buffer_offset == io->scsiio.kern_total_len ||
2590			    buffer_offset == expected_len) {
2591				buffer_offset -= response->ip_data_len;
2592				break;
2593			}
2594			cfiscsi_pdu_queue(response);
2595			response = NULL;
2596			bhsdi = NULL;
2597		}
2598	}
2599	if (response != NULL) {
2600		buffer_offset += response->ip_data_len;
2601		if (buffer_offset == io->scsiio.kern_total_len ||
2602		    buffer_offset == expected_len) {
2603			bhsdi->bhsdi_flags |= BHSDI_FLAGS_F;
2604			if (io->io_hdr.status == CTL_SUCCESS) {
2605				bhsdi->bhsdi_flags |= BHSDI_FLAGS_S;
2606				if (PDU_TOTAL_TRANSFER_LEN(request) <
2607				    ntohl(bhssc->bhssc_expected_data_transfer_length)) {
2608					bhsdi->bhsdi_flags |= BHSSR_FLAGS_RESIDUAL_UNDERFLOW;
2609					bhsdi->bhsdi_residual_count =
2610					    htonl(ntohl(bhssc->bhssc_expected_data_transfer_length) -
2611					    PDU_TOTAL_TRANSFER_LEN(request));
2612				} else if (PDU_TOTAL_TRANSFER_LEN(request) >
2613				    ntohl(bhssc->bhssc_expected_data_transfer_length)) {
2614					bhsdi->bhsdi_flags |= BHSSR_FLAGS_RESIDUAL_OVERFLOW;
2615					bhsdi->bhsdi_residual_count =
2616					    htonl(PDU_TOTAL_TRANSFER_LEN(request) -
2617					    ntohl(bhssc->bhssc_expected_data_transfer_length));
2618				}
2619				bhsdi->bhsdi_status = io->scsiio.scsi_status;
2620				io->io_hdr.flags |= CTL_FLAG_STATUS_SENT;
2621			}
2622		}
2623		KASSERT(response->ip_data_len > 0, ("sending empty Data-In"));
2624		cfiscsi_pdu_queue(response);
2625	}
2626
2627	io->scsiio.be_move_done(io);
2628}
2629
2630static void
2631cfiscsi_datamove_out(union ctl_io *io)
2632{
2633	struct cfiscsi_session *cs;
2634	struct icl_pdu *request, *response;
2635	const struct iscsi_bhs_scsi_command *bhssc;
2636	struct iscsi_bhs_r2t *bhsr2t;
2637	struct cfiscsi_data_wait *cdw;
2638	struct ctl_sg_entry ctl_sg_entry, *ctl_sglist;
2639	uint32_t expected_len, r2t_off, r2t_len;
2640	uint32_t target_transfer_tag;
2641	bool done;
2642
2643	request = io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr;
2644	cs = PDU_SESSION(request);
2645
2646	bhssc = (const struct iscsi_bhs_scsi_command *)request->ip_bhs;
2647	KASSERT((bhssc->bhssc_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) ==
2648	    ISCSI_BHS_OPCODE_SCSI_COMMAND,
2649	    ("bhssc->bhssc_opcode != ISCSI_BHS_OPCODE_SCSI_COMMAND"));
2650
2651	/*
2652	 * We need to record it so that we can properly report
2653	 * underflow/underflow.
2654	 */
2655	PDU_TOTAL_TRANSFER_LEN(request) = io->scsiio.kern_total_len;
2656
2657	/*
2658	 * Report write underflow as error since CTL and backends don't
2659	 * really support it, and SCSI does not tell how to do it right.
2660	 */
2661	expected_len = ntohl(bhssc->bhssc_expected_data_transfer_length);
2662	if (io->scsiio.kern_rel_offset + io->scsiio.kern_data_len >
2663	    expected_len) {
2664		io->scsiio.io_hdr.port_status = 43;
2665		io->scsiio.be_move_done(io);
2666		return;
2667	}
2668
2669	target_transfer_tag =
2670	    atomic_fetchadd_32(&cs->cs_target_transfer_tag, 1);
2671	cdw = cfiscsi_data_wait_new(cs, io, bhssc->bhssc_initiator_task_tag,
2672	    &target_transfer_tag);
2673	if (cdw == NULL) {
2674		CFISCSI_SESSION_WARN(cs, "failed to "
2675		    "allocate memory; dropping connection");
2676		ctl_set_busy(&io->scsiio);
2677		io->scsiio.be_move_done(io);
2678		cfiscsi_session_terminate(cs);
2679		return;
2680	}
2681#if 0
2682	CFISCSI_SESSION_DEBUG(cs, "expecting Data-Out with initiator "
2683	    "task tag 0x%x, target transfer tag 0x%x",
2684	    bhssc->bhssc_initiator_task_tag, target_transfer_tag);
2685#endif
2686
2687	cdw->cdw_ctl_io = io;
2688	cdw->cdw_target_transfer_tag = target_transfer_tag;
2689	cdw->cdw_initiator_task_tag = bhssc->bhssc_initiator_task_tag;
2690	cdw->cdw_r2t_end = io->scsiio.kern_data_len;
2691	cdw->cdw_datasn = 0;
2692
2693	/* Set initial data pointer for the CDW respecting ext_data_filled. */
2694	if (io->scsiio.kern_sg_entries > 0) {
2695		ctl_sglist = (struct ctl_sg_entry *)io->scsiio.kern_data_ptr;
2696	} else {
2697		ctl_sglist = &ctl_sg_entry;
2698		ctl_sglist->addr = io->scsiio.kern_data_ptr;
2699		ctl_sglist->len = io->scsiio.kern_data_len;
2700	}
2701	cdw->cdw_sg_index = 0;
2702	cdw->cdw_sg_addr = ctl_sglist[cdw->cdw_sg_index].addr;
2703	cdw->cdw_sg_len = ctl_sglist[cdw->cdw_sg_index].len;
2704	r2t_off = io->scsiio.ext_data_filled;
2705	while (r2t_off > 0) {
2706		if (r2t_off >= cdw->cdw_sg_len) {
2707			r2t_off -= cdw->cdw_sg_len;
2708			cdw->cdw_sg_index++;
2709			cdw->cdw_sg_addr = ctl_sglist[cdw->cdw_sg_index].addr;
2710			cdw->cdw_sg_len = ctl_sglist[cdw->cdw_sg_index].len;
2711			continue;
2712		}
2713		cdw->cdw_sg_addr += r2t_off;
2714		cdw->cdw_sg_len -= r2t_off;
2715		r2t_off = 0;
2716	}
2717
2718	if (cs->cs_immediate_data &&
2719	    io->scsiio.kern_rel_offset + io->scsiio.ext_data_filled <
2720	    icl_pdu_data_segment_length(request)) {
2721		done = cfiscsi_handle_data_segment(request, cdw);
2722		if (done) {
2723			cfiscsi_data_wait_free(cs, cdw);
2724			io->scsiio.be_move_done(io);
2725			return;
2726		}
2727	}
2728
2729	r2t_off = io->scsiio.kern_rel_offset + io->scsiio.ext_data_filled;
2730	r2t_len = MIN(io->scsiio.kern_data_len - io->scsiio.ext_data_filled,
2731	    cs->cs_max_burst_length);
2732	cdw->cdw_r2t_end = io->scsiio.ext_data_filled + r2t_len;
2733
2734	CFISCSI_SESSION_LOCK(cs);
2735	TAILQ_INSERT_TAIL(&cs->cs_waiting_for_data_out, cdw, cdw_next);
2736	CFISCSI_SESSION_UNLOCK(cs);
2737
2738	/*
2739	 * XXX: We should limit the number of outstanding R2T PDUs
2740	 * 	per task to MaxOutstandingR2T.
2741	 */
2742	response = cfiscsi_pdu_new_response(request, M_NOWAIT);
2743	if (response == NULL) {
2744		CFISCSI_SESSION_WARN(cs, "failed to "
2745		    "allocate memory; dropping connection");
2746		ctl_set_busy(&io->scsiio);
2747		io->scsiio.be_move_done(io);
2748		cfiscsi_session_terminate(cs);
2749		return;
2750	}
2751	io->io_hdr.flags |= CTL_FLAG_DMA_INPROG;
2752	bhsr2t = (struct iscsi_bhs_r2t *)response->ip_bhs;
2753	bhsr2t->bhsr2t_opcode = ISCSI_BHS_OPCODE_R2T;
2754	bhsr2t->bhsr2t_flags = 0x80;
2755	bhsr2t->bhsr2t_lun = bhssc->bhssc_lun;
2756	bhsr2t->bhsr2t_initiator_task_tag = bhssc->bhssc_initiator_task_tag;
2757	bhsr2t->bhsr2t_target_transfer_tag = target_transfer_tag;
2758	/*
2759	 * XXX: Here we assume that cfiscsi_datamove() won't ever
2760	 *	be running concurrently on several CPUs for a given
2761	 *	command.
2762	 */
2763	bhsr2t->bhsr2t_r2tsn = htonl(PDU_R2TSN(request));
2764	PDU_R2TSN(request)++;
2765	/*
2766	 * This is the offset within the current SCSI command;
2767	 * i.e. for the first call of datamove(), it will be 0,
2768	 * and for subsequent ones it will be the sum of lengths
2769	 * of previous ones.
2770	 *
2771	 * The ext_data_filled is to account for unsolicited
2772	 * (immediate) data that might have already arrived.
2773	 */
2774	bhsr2t->bhsr2t_buffer_offset = htonl(r2t_off);
2775	/*
2776	 * This is the total length (sum of S/G lengths) this call
2777	 * to cfiscsi_datamove() is supposed to handle, limited by
2778	 * MaxBurstLength.
2779	 */
2780	bhsr2t->bhsr2t_desired_data_transfer_length = htonl(r2t_len);
2781	cfiscsi_pdu_queue(response);
2782}
2783
2784static void
2785cfiscsi_datamove(union ctl_io *io)
2786{
2787
2788	if ((io->io_hdr.flags & CTL_FLAG_DATA_MASK) == CTL_FLAG_DATA_IN)
2789		cfiscsi_datamove_in(io);
2790	else {
2791		/* We hadn't received anything during this datamove yet. */
2792		io->scsiio.ext_data_filled = 0;
2793		cfiscsi_datamove_out(io);
2794	}
2795}
2796
2797static void
2798cfiscsi_scsi_command_done(union ctl_io *io)
2799{
2800	struct icl_pdu *request, *response;
2801	struct iscsi_bhs_scsi_command *bhssc;
2802	struct iscsi_bhs_scsi_response *bhssr;
2803#ifdef DIAGNOSTIC
2804	struct cfiscsi_data_wait *cdw;
2805#endif
2806	struct cfiscsi_session *cs;
2807	uint16_t sense_length;
2808
2809	request = io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr;
2810	cs = PDU_SESSION(request);
2811	bhssc = (struct iscsi_bhs_scsi_command *)request->ip_bhs;
2812	KASSERT((bhssc->bhssc_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) ==
2813	    ISCSI_BHS_OPCODE_SCSI_COMMAND,
2814	    ("replying to wrong opcode 0x%x", bhssc->bhssc_opcode));
2815
2816	//CFISCSI_SESSION_DEBUG(cs, "initiator task tag 0x%x",
2817	//    bhssc->bhssc_initiator_task_tag);
2818
2819#ifdef DIAGNOSTIC
2820	CFISCSI_SESSION_LOCK(cs);
2821	TAILQ_FOREACH(cdw, &cs->cs_waiting_for_data_out, cdw_next)
2822		KASSERT(bhssc->bhssc_initiator_task_tag !=
2823		    cdw->cdw_initiator_task_tag, ("dangling cdw"));
2824	CFISCSI_SESSION_UNLOCK(cs);
2825#endif
2826
2827	/*
2828	 * Do not return status for aborted commands.
2829	 * There are exceptions, but none supported by CTL yet.
2830	 */
2831	if (((io->io_hdr.flags & CTL_FLAG_ABORT) &&
2832	     (io->io_hdr.flags & CTL_FLAG_ABORT_STATUS) == 0) ||
2833	    (io->io_hdr.flags & CTL_FLAG_STATUS_SENT)) {
2834		ctl_free_io(io);
2835		icl_pdu_free(request);
2836		return;
2837	}
2838
2839	response = cfiscsi_pdu_new_response(request, M_WAITOK);
2840	bhssr = (struct iscsi_bhs_scsi_response *)response->ip_bhs;
2841	bhssr->bhssr_opcode = ISCSI_BHS_OPCODE_SCSI_RESPONSE;
2842	bhssr->bhssr_flags = 0x80;
2843	/*
2844	 * XXX: We don't deal with bidirectional under/overflows;
2845	 *	does anything actually support those?
2846	 */
2847	if (PDU_TOTAL_TRANSFER_LEN(request) <
2848	    ntohl(bhssc->bhssc_expected_data_transfer_length)) {
2849		bhssr->bhssr_flags |= BHSSR_FLAGS_RESIDUAL_UNDERFLOW;
2850		bhssr->bhssr_residual_count =
2851		    htonl(ntohl(bhssc->bhssc_expected_data_transfer_length) -
2852		    PDU_TOTAL_TRANSFER_LEN(request));
2853		//CFISCSI_SESSION_DEBUG(cs, "underflow; residual count %d",
2854		//    ntohl(bhssr->bhssr_residual_count));
2855	} else if (PDU_TOTAL_TRANSFER_LEN(request) >
2856	    ntohl(bhssc->bhssc_expected_data_transfer_length)) {
2857		bhssr->bhssr_flags |= BHSSR_FLAGS_RESIDUAL_OVERFLOW;
2858		bhssr->bhssr_residual_count =
2859		    htonl(PDU_TOTAL_TRANSFER_LEN(request) -
2860		    ntohl(bhssc->bhssc_expected_data_transfer_length));
2861		//CFISCSI_SESSION_DEBUG(cs, "overflow; residual count %d",
2862		//    ntohl(bhssr->bhssr_residual_count));
2863	}
2864	bhssr->bhssr_response = BHSSR_RESPONSE_COMMAND_COMPLETED;
2865	bhssr->bhssr_status = io->scsiio.scsi_status;
2866	bhssr->bhssr_initiator_task_tag = bhssc->bhssc_initiator_task_tag;
2867	bhssr->bhssr_expdatasn = htonl(PDU_EXPDATASN(request));
2868
2869	if (io->scsiio.sense_len > 0) {
2870#if 0
2871		CFISCSI_SESSION_DEBUG(cs, "returning %d bytes of sense data",
2872		    io->scsiio.sense_len);
2873#endif
2874		sense_length = htons(io->scsiio.sense_len);
2875		icl_pdu_append_data(response,
2876		    &sense_length, sizeof(sense_length), M_WAITOK);
2877		icl_pdu_append_data(response,
2878		    &io->scsiio.sense_data, io->scsiio.sense_len, M_WAITOK);
2879	}
2880
2881	ctl_free_io(io);
2882	icl_pdu_free(request);
2883	cfiscsi_pdu_queue(response);
2884}
2885
2886static void
2887cfiscsi_task_management_done(union ctl_io *io)
2888{
2889	struct icl_pdu *request, *response;
2890	struct iscsi_bhs_task_management_request *bhstmr;
2891	struct iscsi_bhs_task_management_response *bhstmr2;
2892	struct cfiscsi_data_wait *cdw, *tmpcdw;
2893	struct cfiscsi_session *cs, *tcs;
2894	struct cfiscsi_softc *softc;
2895	int cold_reset = 0;
2896
2897	request = io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr;
2898	cs = PDU_SESSION(request);
2899	bhstmr = (struct iscsi_bhs_task_management_request *)request->ip_bhs;
2900	KASSERT((bhstmr->bhstmr_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) ==
2901	    ISCSI_BHS_OPCODE_TASK_REQUEST,
2902	    ("replying to wrong opcode 0x%x", bhstmr->bhstmr_opcode));
2903
2904#if 0
2905	CFISCSI_SESSION_DEBUG(cs, "initiator task tag 0x%x; referenced task tag 0x%x",
2906	    bhstmr->bhstmr_initiator_task_tag,
2907	    bhstmr->bhstmr_referenced_task_tag);
2908#endif
2909
2910	if ((bhstmr->bhstmr_function & ~0x80) ==
2911	    BHSTMR_FUNCTION_ABORT_TASK) {
2912		/*
2913		 * Make sure we no longer wait for Data-Out for this command.
2914		 */
2915		CFISCSI_SESSION_LOCK(cs);
2916		TAILQ_FOREACH_SAFE(cdw,
2917		    &cs->cs_waiting_for_data_out, cdw_next, tmpcdw) {
2918			if (bhstmr->bhstmr_referenced_task_tag !=
2919			    cdw->cdw_initiator_task_tag)
2920				continue;
2921
2922#if 0
2923			CFISCSI_SESSION_DEBUG(cs, "removing csw for initiator task "
2924			    "tag 0x%x", bhstmr->bhstmr_initiator_task_tag);
2925#endif
2926			TAILQ_REMOVE(&cs->cs_waiting_for_data_out,
2927			    cdw, cdw_next);
2928			io->io_hdr.flags &= ~CTL_FLAG_DMA_INPROG;
2929			cdw->cdw_ctl_io->scsiio.io_hdr.port_status = 43;
2930			cdw->cdw_ctl_io->scsiio.be_move_done(cdw->cdw_ctl_io);
2931			cfiscsi_data_wait_free(cs, cdw);
2932		}
2933		CFISCSI_SESSION_UNLOCK(cs);
2934	}
2935	if ((bhstmr->bhstmr_function & ~0x80) ==
2936	    BHSTMR_FUNCTION_TARGET_COLD_RESET &&
2937	    io->io_hdr.status == CTL_SUCCESS)
2938		cold_reset = 1;
2939
2940	response = cfiscsi_pdu_new_response(request, M_WAITOK);
2941	bhstmr2 = (struct iscsi_bhs_task_management_response *)
2942	    response->ip_bhs;
2943	bhstmr2->bhstmr_opcode = ISCSI_BHS_OPCODE_TASK_RESPONSE;
2944	bhstmr2->bhstmr_flags = 0x80;
2945	switch (io->taskio.task_status) {
2946	case CTL_TASK_FUNCTION_COMPLETE:
2947		bhstmr2->bhstmr_response = BHSTMR_RESPONSE_FUNCTION_COMPLETE;
2948		break;
2949	case CTL_TASK_FUNCTION_SUCCEEDED:
2950		bhstmr2->bhstmr_response = BHSTMR_RESPONSE_FUNCTION_SUCCEEDED;
2951		break;
2952	case CTL_TASK_LUN_DOES_NOT_EXIST:
2953		bhstmr2->bhstmr_response = BHSTMR_RESPONSE_LUN_DOES_NOT_EXIST;
2954		break;
2955	case CTL_TASK_FUNCTION_NOT_SUPPORTED:
2956	default:
2957		bhstmr2->bhstmr_response = BHSTMR_RESPONSE_FUNCTION_NOT_SUPPORTED;
2958		break;
2959	}
2960	memcpy(bhstmr2->bhstmr_additional_reponse_information,
2961	    io->taskio.task_resp, sizeof(io->taskio.task_resp));
2962	bhstmr2->bhstmr_initiator_task_tag = bhstmr->bhstmr_initiator_task_tag;
2963
2964	ctl_free_io(io);
2965	icl_pdu_free(request);
2966	cfiscsi_pdu_queue(response);
2967
2968	if (cold_reset) {
2969		softc = cs->cs_target->ct_softc;
2970		mtx_lock(&softc->lock);
2971		TAILQ_FOREACH(tcs, &softc->sessions, cs_next) {
2972			if (tcs->cs_target == cs->cs_target)
2973				cfiscsi_session_terminate(tcs);
2974		}
2975		mtx_unlock(&softc->lock);
2976	}
2977}
2978
2979static void
2980cfiscsi_done(union ctl_io *io)
2981{
2982	struct icl_pdu *request;
2983	struct cfiscsi_session *cs;
2984
2985	KASSERT(((io->io_hdr.status & CTL_STATUS_MASK) != CTL_STATUS_NONE),
2986		("invalid CTL status %#x", io->io_hdr.status));
2987
2988	if (io->io_hdr.io_type == CTL_IO_TASK &&
2989	    io->taskio.task_action == CTL_TASK_I_T_NEXUS_RESET) {
2990		/*
2991		 * Implicit task termination has just completed; nothing to do.
2992		 */
2993		cs = io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr;
2994		cs->cs_tasks_aborted = true;
2995		refcount_release(&cs->cs_outstanding_ctl_pdus);
2996		wakeup(__DEVOLATILE(void *, &cs->cs_outstanding_ctl_pdus));
2997		ctl_free_io(io);
2998		return;
2999	}
3000
3001	request = io->io_hdr.ctl_private[CTL_PRIV_FRONTEND].ptr;
3002	cs = PDU_SESSION(request);
3003	refcount_release(&cs->cs_outstanding_ctl_pdus);
3004
3005	switch (request->ip_bhs->bhs_opcode & ~ISCSI_BHS_OPCODE_IMMEDIATE) {
3006	case ISCSI_BHS_OPCODE_SCSI_COMMAND:
3007		cfiscsi_scsi_command_done(io);
3008		break;
3009	case ISCSI_BHS_OPCODE_TASK_REQUEST:
3010		cfiscsi_task_management_done(io);
3011		break;
3012	default:
3013		panic("cfiscsi_done called with wrong opcode 0x%x",
3014		    request->ip_bhs->bhs_opcode);
3015	}
3016}
3017