sys/cam/ctl/ctl_frontend_iscsi.c

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