Home | History | Annotate | Line # | Download | only in iscsi
iscsi_main.c revision 1.6
      1 /*	$netBSD: iscsi_main.c,v 1.1.1.1 2011/05/02 07:01:11 agc Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2004,2005,2006,2011 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Wasabi Systems, Inc.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 #include "iscsi_globals.h"
     32 
     33 #include <sys/systm.h>
     34 #include <sys/buf.h>
     35 #include <sys/kmem.h>
     36 #include <sys/socketvar.h>
     37 
     38 
     39 /*------------------------- Global Variables ------------------------*/
     40 
     41 extern struct cfdriver iscsi_cd;
     42 
     43 #if defined(ISCSI_DEBUG)
     44 int iscsi_debug_level = ISCSI_DEBUG;
     45 #endif
     46 
     47 #if defined(ISCSI_PERFTEST)
     48 int iscsi_perf_level = 0;
     49 #endif
     50 
     51 /* Device Structure */
     52 iscsi_softc_t *sc = NULL;
     53 
     54 /* the list of sessions */
     55 session_list_t iscsi_sessions = TAILQ_HEAD_INITIALIZER(iscsi_sessions);
     56 
     57 /* connections to clean up */
     58 connection_list_t iscsi_cleanup_list = TAILQ_HEAD_INITIALIZER(iscsi_cleanup_list);
     59 bool iscsi_detaching = FALSE;
     60 struct lwp *iscsi_cleanproc = NULL;
     61 
     62 /* the number of active send threads (for cleanup thread) */
     63 uint32_t iscsi_num_send_threads = 0;
     64 
     65 /* Our node name, alias, and ISID */
     66 uint8_t iscsi_InitiatorName[ISCSI_STRING_LENGTH] = "";
     67 uint8_t iscsi_InitiatorAlias[ISCSI_STRING_LENGTH] = "";
     68 login_isid_t iscsi_InitiatorISID;
     69 
     70 /******************************************************************************/
     71 
     72 /*
     73    System interface: autoconf and device structures
     74 */
     75 
     76 void iscsiattach(int);
     77 
     78 static void iscsi_attach(device_t parent, device_t self, void *aux);
     79 static int iscsi_match(device_t, cfdata_t, void *);
     80 static int iscsi_detach(device_t, int);
     81 
     82 
     83 CFATTACH_DECL_NEW(iscsi, sizeof(struct iscsi_softc), iscsi_match, iscsi_attach,
     84 			  iscsi_detach, NULL);
     85 
     86 
     87 static dev_type_open(iscsiopen);
     88 static dev_type_close(iscsiclose);
     89 
     90 struct cdevsw iscsi_cdevsw = {
     91 	iscsiopen, iscsiclose,
     92 	noread, nowrite,
     93 	iscsiioctl, nostop, notty, nopoll, nommap, nokqfilter, D_OTHER
     94 };
     95 
     96 /******************************************************************************/
     97 
     98 STATIC void iscsi_scsipi_request(struct scsipi_channel *,
     99 								 scsipi_adapter_req_t, void *);
    100 STATIC void iscsi_minphys(struct buf *);
    101 
    102 /******************************************************************************/
    103 
    104 /*******************************************************************************
    105 * Open and Close device interfaces. We don't really need them, because we don't
    106 * have to keep track of device opens and closes from userland. But apps can't
    107 * call ioctl without a handle to the device, and the kernel doesn't hand out
    108 * handles without an open routine in the driver. So here they are in all their
    109 * glory...
    110 *******************************************************************************/
    111 
    112 int
    113 iscsiopen(dev_t dev, int flag, int mode, PTHREADOBJ p)
    114 {
    115 
    116 	DEB(99, ("ISCSI Open\n"));
    117 	return 0;
    118 }
    119 
    120 int
    121 iscsiclose(dev_t dev, int flag, int mode, PTHREADOBJ p)
    122 {
    123 
    124 	DEB(99, ("ISCSI Close\n"));
    125 	return 0;
    126 }
    127 
    128 /******************************************************************************/
    129 
    130 /*
    131  * The config Match routine.
    132  *    Not much to do here, either - this is a pseudo-device.
    133  */
    134 
    135 static int
    136 iscsi_match(device_t self, cfdata_t cfdata, void *arg)
    137 {
    138 	return 1;
    139 }
    140 
    141 /*
    142  * iscsiattach:
    143  *    Only called when statically configured into a kernel
    144  */
    145 void
    146 iscsiattach(int n)
    147 {
    148 	int err;
    149 	cfdata_t cf;
    150 
    151 	err = config_cfattach_attach(iscsi_cd.cd_name, &iscsi_ca);
    152 	if (err) {
    153 		aprint_error("%s: couldn't register cfattach: %d\n",
    154 		    iscsi_cd.cd_name, err);
    155 		config_cfdriver_detach(&iscsi_cd);
    156 		return;
    157 	}
    158 
    159 	if (n > 1)
    160 		aprint_error("%s: only one device supported\n",
    161 		    iscsi_cd.cd_name);
    162 
    163 	cf = kmem_alloc(sizeof(struct cfdata), KM_NOSLEEP);
    164 	if (cf == NULL) {
    165 		aprint_error("%s: couldn't allocate cfdata\n",
    166 		    iscsi_cd.cd_name);
    167 		return;
    168 	}
    169 	cf->cf_name = iscsi_cd.cd_name;
    170 	cf->cf_atname = iscsi_cd.cd_name;
    171 	cf->cf_unit = 0;
    172 	cf->cf_fstate = FSTATE_NOTFOUND;
    173 
    174 	(void)config_attach_pseudo(cf);
    175 	return;
    176 }
    177 
    178 /*
    179  * iscsi_attach:
    180  *    One-time inits go here. Not much for now, probably even less later.
    181  */
    182 static void
    183 iscsi_attach(device_t parent, device_t self, void *aux)
    184 {
    185 
    186 	DEBOUT(("ISCSI: iscsi_attach, parent=%p, self=%p, aux=%p\n", parent,
    187 			self, aux));
    188 	sc = (iscsi_softc_t *) device_private(self);
    189 	sc->sc_dev = self;
    190 	if (kthread_create(PRI_NONE, 0, NULL, iscsi_cleanup_thread,
    191 	    NULL, &iscsi_cleanproc, "Cleanup") != 0) {
    192 		panic("Can't create cleanup thread!");
    193 	}
    194 	aprint_normal("%s: attached.  major = %d\n", iscsi_cd.cd_name,
    195 	    cdevsw_lookup_major(&iscsi_cdevsw));
    196 }
    197 
    198 /*
    199  * iscsi_detach:
    200  *    Cleanup.
    201  */
    202 static int
    203 iscsi_detach(device_t self, int flags)
    204 {
    205 
    206 	DEBOUT(("ISCSI: detach\n"));
    207 	kill_all_sessions();
    208 	iscsi_detaching = TRUE;
    209 	while (iscsi_cleanproc != NULL) {
    210 		wakeup(&iscsi_cleanup_list);
    211 		tsleep(&iscsi_cleanup_list, PWAIT, "detach_wait", 20);
    212 	}
    213 	return 0;
    214 }
    215 
    216 /******************************************************************************/
    217 
    218 typedef struct quirktab_t {
    219 	const char	*tgt;
    220 	size_t		 tgtlen;
    221 	const char	*iqn;
    222 	size_t		 iqnlen;
    223 	uint32_t	 quirks;
    224 } quirktab_t;
    225 
    226 static const quirktab_t	quirktab[] = {
    227 	{ "StarWind",	8,
    228 		"iqn.2008-08.com.starwindsoftware",	32,
    229 		PQUIRK_ONLYBIG	},
    230 	{ "UNH",	3,
    231 		"iqn.2002-10.edu.unh.",	20,
    232 		PQUIRK_NOBIGMODESENSE |
    233 		PQUIRK_NOMODESENSE |
    234 		PQUIRK_NOSYNCCACHE },
    235 	{ "NetBSD",	6,
    236 		"iqn.1994-04.org.netbsd.",	23,
    237 		0	},
    238 	{ "Unknown",	7,
    239 		"unknown",	7,
    240 		0	},
    241 	{ NULL,		0,	NULL,	0,	0	}
    242 };
    243 
    244 /* loop through the quirktab looking for a match on target name */
    245 static const quirktab_t *
    246 getquirks(const char *iqn)
    247 {
    248 	const quirktab_t	*qp;
    249 
    250 	if (iqn == NULL) {
    251 		iqn = "unknown";
    252 	}
    253 	for (qp = quirktab ; qp->iqn ; qp++) {
    254 		if (strncmp(qp->iqn, iqn, qp->iqnlen) == 0) {
    255 			break;
    256 		}
    257 	}
    258 	return qp;
    259 }
    260 
    261 /******************************************************************************/
    262 
    263 /*
    264  * map_session
    265  *    This (indirectly) maps the existing LUNs for a target to SCSI devices
    266  *    by going through config_found to tell any child drivers that there's
    267  *    a new adapter.
    268  *    Note that each session is equivalent to a SCSI adapter.
    269  *
    270  *    Parameter:  the session pointer
    271  *
    272  *    Returns:    1 on success, 0 on failure
    273  *
    274  * ToDo: Figuring out how to handle more than one LUN. It appears that
    275  *    the NetBSD SCSI LUN discovery doesn't use "report LUNs", and instead
    276  *    goes through the LUNs sequentially, stopping somewhere on the way if it
    277  *    gets an error. We may have to do some LUN mapping in here if this is
    278  *    really how things work.
    279  */
    280 
    281 int
    282 map_session(session_t *session)
    283 {
    284 	struct scsipi_adapter *adapt = &session->sc_adapter;
    285 	struct scsipi_channel *chan = &session->sc_channel;
    286 	const quirktab_t	*tgt;
    287 
    288 	if (sc == NULL) {
    289 		/* we haven't gone through the config process */
    290 		/* (shouldn't happen) */
    291 		DEBOUT(("Map: No device pointer!\n"));
    292 		return 0;
    293 	}
    294 	/*
    295 	 * Fill in the scsipi_adapter.
    296 	 */
    297 	adapt->adapt_dev = sc->sc_dev;
    298 	adapt->adapt_nchannels = 1;
    299 	adapt->adapt_request = iscsi_scsipi_request;
    300 	adapt->adapt_minphys = iscsi_minphys;
    301 	adapt->adapt_openings = CCBS_PER_SESSION;
    302 	adapt->adapt_max_periph = CCBS_PER_SESSION;
    303 
    304 	/*
    305 	 * Fill in the scsipi_channel.
    306 	 */
    307 	if ((tgt = getquirks(chan->chan_name)) == NULL) {
    308 		tgt = getquirks("unknown");
    309 	}
    310 	chan->chan_name = tgt->tgt;
    311 	chan->chan_defquirks = tgt->quirks;
    312 	chan->chan_adapter = adapt;
    313 	chan->chan_bustype = &scsi_bustype;
    314 	chan->chan_channel = 0;
    315 	chan->chan_flags = SCSIPI_CHAN_NOSETTLE;
    316 	chan->chan_ntargets = 1;
    317 	chan->chan_nluns = 16;		/* ToDo: ??? */
    318 	chan->chan_id = session->id;
    319 
    320 	session->child_dev = config_found(sc->sc_dev, chan, scsiprint);
    321 
    322 	return session->child_dev != NULL;
    323 }
    324 
    325 
    326 /*
    327  * unmap_session
    328  *    This (indirectly) unmaps the existing all LUNs for a target by
    329  *    telling the config system that the adapter has detached.
    330  *
    331  *    Parameter:  the session pointer
    332  */
    333 
    334 void
    335 unmap_session(session_t *session)
    336 {
    337 	device_t dev;
    338 
    339 	if ((dev = session->child_dev) != NULL) {
    340 		session->child_dev = NULL;
    341 		config_detach(dev, DETACH_FORCE);
    342 	}
    343 }
    344 
    345 /******************************************************************************/
    346 
    347 /*****************************************************************************
    348  * SCSI interface routines
    349  *****************************************************************************/
    350 
    351 /*
    352  * iscsi_scsipi_request:
    353  *    Perform a request for the SCSIPI layer.
    354  */
    355 
    356 void
    357 iscsi_scsipi_request(struct scsipi_channel *chan, scsipi_adapter_req_t req,
    358 					 void *arg)
    359 {
    360 	struct scsipi_adapter *adapt = chan->chan_adapter;
    361 	struct scsipi_xfer *xs;
    362 	session_t *session;
    363 	int flags;
    364 
    365 	session = (session_t *) adapt;	/* adapter is first field in session */
    366 
    367 	switch (req) {
    368 	case ADAPTER_REQ_RUN_XFER:
    369 		DEB(9, ("ISCSI: scsipi_request RUN_XFER\n"));
    370 		xs = arg;
    371 		flags = xs->xs_control;
    372 
    373 		if ((flags & XS_CTL_POLL) != 0) {
    374 			xs->error = XS_DRIVER_STUFFUP;
    375 			DEBOUT(("Run Xfer request with polling\n"));
    376 			scsipi_done(xs);
    377 			return;
    378 		}
    379 		/*
    380 		 * NOTE: It appears that XS_CTL_DATA_UIO is not actually used anywhere.
    381          *       Since it really would complicate matters to handle offsets
    382          *       into scatter-gather lists, and a number of other drivers don't
    383          *       handle uio-based data as well, XS_CTL_DATA_UIO isn't
    384          *       implemented in this driver (at least for now).
    385 		 */
    386 		if (flags & XS_CTL_DATA_UIO) {
    387 			xs->error = XS_DRIVER_STUFFUP;
    388 			DEBOUT(("Run Xfer with data in UIO\n"));
    389 			scsipi_done(xs);
    390 			return;
    391 		}
    392 
    393 		send_run_xfer(session, xs);
    394 		DEB(9, ("scsipi_req returns\n"));
    395 		return;
    396 
    397 	case ADAPTER_REQ_GROW_RESOURCES:
    398 		DEBOUT(("ISCSI: scsipi_request GROW_RESOURCES\n"));
    399 		return;
    400 
    401 	case ADAPTER_REQ_SET_XFER_MODE:
    402 		DEB(5, ("ISCSI: scsipi_request SET_XFER_MODE\n"));
    403 		return;
    404 
    405 	default:
    406 		break;
    407 	}
    408 	DEBOUT(("ISCSI: scsipi_request with invalid REQ code %d\n", req));
    409 }
    410 
    411 /* cap the transfer at 64K */
    412 #define ISCSI_MAX_XFER	65536
    413 
    414 /*
    415  * iscsi_minphys:
    416  *    Limit a transfer to our maximum transfer size.
    417  */
    418 
    419 void
    420 iscsi_minphys(struct buf *bp)
    421 {
    422 	if (bp->b_bcount > ISCSI_MAX_XFER) {
    423 		bp->b_bcount = ISCSI_MAX_XFER;
    424 	}
    425 }
    426 
    427 /*****************************************************************************
    428  * SCSI job execution helper routines
    429  *****************************************************************************/
    430 
    431 /*
    432  * iscsi_done:
    433  *
    434  * A CCB has completed execution.  Pass the status back to the
    435  * upper layer.
    436  */
    437 void
    438 iscsi_done(ccb_t *ccb)
    439 {
    440 	struct scsipi_xfer *xs = ccb->xs;
    441 	/*DEBOUT (("iscsi_done\n")); */
    442 
    443 	if (xs != NULL) {
    444 		xs->resid = ccb->residual;
    445 
    446 		switch (ccb->status) {
    447 		case ISCSI_STATUS_SUCCESS:
    448 			xs->error = 0;
    449 			break;
    450 
    451 		case ISCSI_STATUS_CHECK_CONDITION:
    452 			xs->error = XS_SENSE;
    453 #ifdef ISCSI_DEBUG
    454 			{
    455 				uint8_t *s = (uint8_t *) (&xs->sense);
    456 				DEB(5, ("Scsipi_done, error=XS_SENSE, sense data=%02x "
    457 						"%02x %02x %02x...\n",
    458 						s[0], s[1], s[2], s[3]));
    459 			}
    460 #endif
    461 			break;
    462 
    463 		case ISCSI_STATUS_TARGET_BUSY:
    464 			xs->error = XS_BUSY;
    465 			break;
    466 
    467 		case ISCSI_STATUS_SOCKET_ERROR:
    468 		case ISCSI_STATUS_TIMEOUT:
    469 			xs->error = XS_SELTIMEOUT;
    470 			break;
    471 
    472 		default:
    473 			xs->error = XS_DRIVER_STUFFUP;
    474 			break;
    475 		}
    476 
    477 		DEB(99, ("Calling scsipi_done (%p), err = %d\n", xs, xs->error));
    478 		scsipi_done(xs);
    479 		DEB(99, ("scsipi_done returned\n"));
    480 	}
    481 
    482 	free_ccb(ccb);
    483 }
    484 
    485 /* Kernel Module support */
    486 
    487 #include <sys/module.h>
    488 
    489 MODULE(MODULE_CLASS_DRIVER, iscsi, NULL);
    490 static const struct cfiattrdata ibescsi_info = { "scsi", 1,
    491 	{{"channel", "-1", -1},}
    492 };
    493 static const struct cfiattrdata *const iscsi_attrs[] = { &ibescsi_info, NULL };
    494 
    495 #ifdef _MODULE
    496 CFDRIVER_DECL(iscsi, DV_DULL, iscsi_attrs);
    497 
    498 static struct cfdata iscsi_cfdata[] = {
    499 	{
    500 		.cf_name = "iscsi",
    501 		.cf_atname = "iscsi",
    502 		.cf_unit = 0,		/* Only unit 0 is ever used  */
    503 		.cf_fstate = FSTATE_NOTFOUND,
    504 		.cf_loc = NULL,
    505 		.cf_flags = 0,
    506 		.cf_pspec = NULL,
    507 	},
    508 	{ NULL, NULL, 0, 0, NULL, 0, NULL }
    509 };
    510 #endif
    511 
    512 static int
    513 iscsi_modcmd(modcmd_t cmd, void *arg)
    514 {
    515 #ifdef _MODULE
    516 	devmajor_t cmajor = NODEVMAJOR, bmajor = NODEVMAJOR;
    517 	int error;
    518 #endif
    519 
    520 	switch (cmd) {
    521 	case MODULE_CMD_INIT:
    522 #ifdef _MODULE
    523 		error = config_cfdriver_attach(&iscsi_cd);
    524 		if (error) {
    525 			return error;
    526 		}
    527 
    528 		error = config_cfattach_attach(iscsi_cd.cd_name, &iscsi_ca);
    529 		if (error) {
    530 			config_cfdriver_detach(&iscsi_cd);
    531 			aprint_error("%s: unable to register cfattach\n",
    532 				iscsi_cd.cd_name);
    533 			return error;
    534 		}
    535 
    536 		error = config_cfdata_attach(iscsi_cfdata, 1);
    537 		if (error) {
    538 			aprint_error("%s: unable to attach cfdata\n",
    539 				iscsi_cd.cd_name);
    540 			config_cfattach_detach(iscsi_cd.cd_name, &iscsi_ca);
    541 			config_cfdriver_detach(&iscsi_cd);
    542 			return error;
    543 		}
    544 
    545 		error = devsw_attach(iscsi_cd.cd_name, NULL, &bmajor,
    546 			&iscsi_cdevsw, &cmajor);
    547 		if (error) {
    548 			aprint_error("%s: unable to register devsw\n",
    549 				iscsi_cd.cd_name);
    550 			config_cfdata_detach(iscsi_cfdata);
    551 			config_cfattach_detach(iscsi_cd.cd_name, &iscsi_ca);
    552 			config_cfdriver_detach(&iscsi_cd);
    553 			return error;
    554 		}
    555 
    556 		if (config_attach_pseudo(iscsi_cfdata) == NULL) {
    557 			aprint_error("%s: config_attach_pseudo failed\n",
    558 				iscsi_cd.cd_name);
    559 			config_cfattach_detach(iscsi_cd.cd_name, &iscsi_ca);
    560 			config_cfdriver_detach(&iscsi_cd);
    561 			return ENXIO;
    562 		}
    563 #endif
    564 		return 0;
    565 		break;
    566 
    567 	case MODULE_CMD_FINI:
    568 #ifdef _MODULE
    569 		error = config_cfdata_detach(iscsi_cfdata);
    570 		if (error)
    571 			return error;
    572 
    573 		config_cfattach_detach(iscsi_cd.cd_name, &iscsi_ca);
    574 		config_cfdriver_detach(&iscsi_cd);
    575 		devsw_detach(NULL, &iscsi_cdevsw);
    576 #endif
    577 		return 0;
    578 		break;
    579 
    580 	case MODULE_CMD_AUTOUNLOAD:
    581 		return EBUSY;
    582 		break;
    583 
    584 	default:
    585 		return ENOTTY;
    586 		break;
    587 	}
    588 }
    589