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