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