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