Linux Audio

Check our new training course

Loading...
v3.1
   1/*******************************************************************************
   2 *
   3 * This file contains the Linux/SCSI LLD virtual SCSI initiator driver
   4 * for emulated SAS initiator ports
   5 *
   6 * © Copyright 2011 RisingTide Systems LLC.
   7 *
   8 * Licensed to the Linux Foundation under the General Public License (GPL) version 2.
   9 *
  10 * Author: Nicholas A. Bellinger <nab@risingtidesystems.com>
  11 *
  12 * This program is free software; you can redistribute it and/or modify
  13 * it under the terms of the GNU General Public License as published by
  14 * the Free Software Foundation; either version 2 of the License, or
  15 * (at your option) any later version.
  16 *
  17 * This program is distributed in the hope that it will be useful,
  18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20 * GNU General Public License for more details.
  21 ****************************************************************************/
  22
  23#include <linux/module.h>
  24#include <linux/moduleparam.h>
  25#include <linux/init.h>
  26#include <linux/slab.h>
  27#include <linux/types.h>
  28#include <linux/configfs.h>
  29#include <scsi/scsi.h>
  30#include <scsi/scsi_tcq.h>
  31#include <scsi/scsi_host.h>
  32#include <scsi/scsi_device.h>
  33#include <scsi/scsi_cmnd.h>
  34
  35#include <target/target_core_base.h>
  36#include <target/target_core_transport.h>
  37#include <target/target_core_fabric_ops.h>
  38#include <target/target_core_fabric_configfs.h>
  39#include <target/target_core_fabric_lib.h>
  40#include <target/target_core_configfs.h>
  41#include <target/target_core_device.h>
  42#include <target/target_core_tpg.h>
  43#include <target/target_core_tmr.h>
  44
  45#include "tcm_loop.h"
  46
  47#define to_tcm_loop_hba(hba)	container_of(hba, struct tcm_loop_hba, dev)
  48
  49/* Local pointer to allocated TCM configfs fabric module */
  50static struct target_fabric_configfs *tcm_loop_fabric_configfs;
  51
 
  52static struct kmem_cache *tcm_loop_cmd_cache;
  53
  54static int tcm_loop_hba_no_cnt;
  55
  56/*
  57 * Allocate a tcm_loop cmd descriptor from target_core_mod code
  58 *
  59 * Can be called from interrupt context in tcm_loop_queuecommand() below
  60 */
  61static struct se_cmd *tcm_loop_allocate_core_cmd(
  62	struct tcm_loop_hba *tl_hba,
  63	struct se_portal_group *se_tpg,
  64	struct scsi_cmnd *sc)
  65{
  66	struct se_cmd *se_cmd;
  67	struct se_session *se_sess;
  68	struct tcm_loop_nexus *tl_nexus = tl_hba->tl_nexus;
  69	struct tcm_loop_cmd *tl_cmd;
  70	int sam_task_attr;
  71
  72	if (!tl_nexus) {
  73		scmd_printk(KERN_ERR, sc, "TCM_Loop I_T Nexus"
  74				" does not exist\n");
  75		set_host_byte(sc, DID_ERROR);
  76		return NULL;
  77	}
  78	se_sess = tl_nexus->se_sess;
  79
  80	tl_cmd = kmem_cache_zalloc(tcm_loop_cmd_cache, GFP_ATOMIC);
  81	if (!tl_cmd) {
  82		pr_err("Unable to allocate struct tcm_loop_cmd\n");
  83		set_host_byte(sc, DID_ERROR);
  84		return NULL;
  85	}
  86	se_cmd = &tl_cmd->tl_se_cmd;
  87	/*
  88	 * Save the pointer to struct scsi_cmnd *sc
  89	 */
  90	tl_cmd->sc = sc;
  91	/*
  92	 * Locate the SAM Task Attr from struct scsi_cmnd *
  93	 */
  94	if (sc->device->tagged_supported) {
  95		switch (sc->tag) {
  96		case HEAD_OF_QUEUE_TAG:
  97			sam_task_attr = MSG_HEAD_TAG;
  98			break;
  99		case ORDERED_QUEUE_TAG:
 100			sam_task_attr = MSG_ORDERED_TAG;
 101			break;
 102		default:
 103			sam_task_attr = MSG_SIMPLE_TAG;
 104			break;
 105		}
 106	} else
 107		sam_task_attr = MSG_SIMPLE_TAG;
 108
 109	/*
 110	 * Initialize struct se_cmd descriptor from target_core_mod infrastructure
 111	 */
 112	transport_init_se_cmd(se_cmd, se_tpg->se_tpg_tfo, se_sess,
 113			scsi_bufflen(sc), sc->sc_data_direction, sam_task_attr,
 114			&tl_cmd->tl_sense_buf[0]);
 115
 116	/*
 117	 * Signal BIDI usage with T_TASK(cmd)->t_tasks_bidi
 118	 */
 119	if (scsi_bidi_cmnd(sc))
 120		se_cmd->t_tasks_bidi = 1;
 121	/*
 122	 * Locate the struct se_lun pointer and attach it to struct se_cmd
 123	 */
 124	if (transport_lookup_cmd_lun(se_cmd, tl_cmd->sc->device->lun) < 0) {
 125		kmem_cache_free(tcm_loop_cmd_cache, tl_cmd);
 126		set_host_byte(sc, DID_NO_CONNECT);
 127		return NULL;
 128	}
 129
 130	return se_cmd;
 131}
 132
 133/*
 134 * Called by struct target_core_fabric_ops->new_cmd_map()
 135 *
 136 * Always called in process context.  A non zero return value
 137 * here will signal to handle an exception based on the return code.
 138 */
 139static int tcm_loop_new_cmd_map(struct se_cmd *se_cmd)
 140{
 141	struct tcm_loop_cmd *tl_cmd = container_of(se_cmd,
 142				struct tcm_loop_cmd, tl_se_cmd);
 143	struct scsi_cmnd *sc = tl_cmd->sc;
 144	struct scatterlist *sgl_bidi = NULL;
 145	u32 sgl_bidi_count = 0;
 146	int ret;
 147	/*
 148	 * Allocate the necessary tasks to complete the received CDB+data
 149	 */
 150	ret = transport_generic_allocate_tasks(se_cmd, sc->cmnd);
 151	if (ret == -ENOMEM) {
 152		/* Out of Resources */
 153		return PYX_TRANSPORT_LU_COMM_FAILURE;
 154	} else if (ret == -EINVAL) {
 155		/*
 156		 * Handle case for SAM_STAT_RESERVATION_CONFLICT
 157		 */
 158		if (se_cmd->se_cmd_flags & SCF_SCSI_RESERVATION_CONFLICT)
 159			return PYX_TRANSPORT_RESERVATION_CONFLICT;
 160		/*
 161		 * Otherwise, return SAM_STAT_CHECK_CONDITION and return
 162		 * sense data.
 163		 */
 164		return PYX_TRANSPORT_USE_SENSE_REASON;
 165	}
 166
 167	/*
 168	 * For BIDI commands, pass in the extra READ buffer
 169	 * to transport_generic_map_mem_to_cmd() below..
 170	 */
 171	if (se_cmd->t_tasks_bidi) {
 172		struct scsi_data_buffer *sdb = scsi_in(sc);
 173
 174		sgl_bidi = sdb->table.sgl;
 175		sgl_bidi_count = sdb->table.nents;
 176	}
 177
 178	/* Tell the core about our preallocated memory */
 179	ret = transport_generic_map_mem_to_cmd(se_cmd, scsi_sglist(sc),
 180			scsi_sg_count(sc), sgl_bidi, sgl_bidi_count);
 181	if (ret < 0)
 182		return PYX_TRANSPORT_LU_COMM_FAILURE;
 183
 184	return 0;
 185}
 186
 187/*
 188 * Called from struct target_core_fabric_ops->check_stop_free()
 189 */
 190static void tcm_loop_check_stop_free(struct se_cmd *se_cmd)
 191{
 192	/*
 193	 * Do not release struct se_cmd's containing a valid TMR
 194	 * pointer.  These will be released directly in tcm_loop_device_reset()
 195	 * with transport_generic_free_cmd().
 196	 */
 197	if (se_cmd->se_tmr_req)
 198		return;
 199	/*
 200	 * Release the struct se_cmd, which will make a callback to release
 201	 * struct tcm_loop_cmd * in tcm_loop_deallocate_core_cmd()
 202	 */
 203	transport_generic_free_cmd(se_cmd, 0, 0);
 
 204}
 205
 206static void tcm_loop_release_cmd(struct se_cmd *se_cmd)
 207{
 208	struct tcm_loop_cmd *tl_cmd = container_of(se_cmd,
 209				struct tcm_loop_cmd, tl_se_cmd);
 210
 211	kmem_cache_free(tcm_loop_cmd_cache, tl_cmd);
 212}
 213
 214static int tcm_loop_proc_info(struct Scsi_Host *host, char *buffer,
 215				char **start, off_t offset,
 216				int length, int inout)
 217{
 218	return sprintf(buffer, "tcm_loop_proc_info()\n");
 
 219}
 220
 221static int tcm_loop_driver_probe(struct device *);
 222static int tcm_loop_driver_remove(struct device *);
 223
 224static int pseudo_lld_bus_match(struct device *dev,
 225				struct device_driver *dev_driver)
 226{
 227	return 1;
 228}
 229
 230static struct bus_type tcm_loop_lld_bus = {
 231	.name			= "tcm_loop_bus",
 232	.match			= pseudo_lld_bus_match,
 233	.probe			= tcm_loop_driver_probe,
 234	.remove			= tcm_loop_driver_remove,
 235};
 236
 237static struct device_driver tcm_loop_driverfs = {
 238	.name			= "tcm_loop",
 239	.bus			= &tcm_loop_lld_bus,
 240};
 241/*
 242 * Used with root_device_register() in tcm_loop_alloc_core_bus() below
 243 */
 244struct device *tcm_loop_primary;
 245
 246/*
 247 * Copied from drivers/scsi/libfc/fc_fcp.c:fc_change_queue_depth() and
 248 * drivers/scsi/libiscsi.c:iscsi_change_queue_depth()
 249 */
 250static int tcm_loop_change_queue_depth(
 251	struct scsi_device *sdev,
 252	int depth,
 253	int reason)
 254{
 255	switch (reason) {
 256	case SCSI_QDEPTH_DEFAULT:
 257		scsi_adjust_queue_depth(sdev, scsi_get_tag_type(sdev), depth);
 258		break;
 259	case SCSI_QDEPTH_QFULL:
 260		scsi_track_queue_full(sdev, depth);
 261		break;
 262	case SCSI_QDEPTH_RAMP_UP:
 263		scsi_adjust_queue_depth(sdev, scsi_get_tag_type(sdev), depth);
 264		break;
 265	default:
 266		return -EOPNOTSUPP;
 267	}
 268	return sdev->queue_depth;
 269}
 270
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 271/*
 272 * Main entry point from struct scsi_host_template for incoming SCSI CDB+Data
 273 * from Linux/SCSI subsystem for SCSI low level device drivers (LLDs)
 274 */
 275static int tcm_loop_queuecommand(
 276	struct Scsi_Host *sh,
 277	struct scsi_cmnd *sc)
 278{
 279	struct se_cmd *se_cmd;
 280	struct se_portal_group *se_tpg;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 281	struct tcm_loop_hba *tl_hba;
 282	struct tcm_loop_tpg *tl_tpg;
 
 
 
 283
 284	pr_debug("tcm_loop_queuecommand() %d:%d:%d:%d got CDB: 0x%02x"
 285		" scsi_buf_len: %u\n", sc->device->host->host_no,
 286		sc->device->id, sc->device->channel, sc->device->lun,
 287		sc->cmnd[0], scsi_bufflen(sc));
 288	/*
 289	 * Locate the tcm_loop_hba_t pointer
 290	 */
 291	tl_hba = *(struct tcm_loop_hba **)shost_priv(sc->device->host);
 292	tl_tpg = &tl_hba->tl_hba_tpgs[sc->device->id];
 293	se_tpg = &tl_tpg->tl_se_tpg;
 294	/*
 295	 * Determine the SAM Task Attribute and allocate tl_cmd and
 296	 * tl_cmd->tl_se_cmd from TCM infrastructure
 297	 */
 298	se_cmd = tcm_loop_allocate_core_cmd(tl_hba, se_tpg, sc);
 299	if (!se_cmd) {
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 300		sc->scsi_done(sc);
 301		return 0;
 302	}
 303	/*
 304	 * Queue up the newly allocated to be processed in TCM thread context.
 305	*/
 306	transport_generic_handle_cdb_map(se_cmd);
 
 307	return 0;
 308}
 309
 310/*
 311 * Called from SCSI EH process context to issue a LUN_RESET TMR
 312 * to struct scsi_device
 313 */
 314static int tcm_loop_device_reset(struct scsi_cmnd *sc)
 
 
 315{
 316	struct se_cmd *se_cmd = NULL;
 317	struct se_portal_group *se_tpg;
 318	struct se_session *se_sess;
 
 319	struct tcm_loop_cmd *tl_cmd = NULL;
 320	struct tcm_loop_hba *tl_hba;
 321	struct tcm_loop_nexus *tl_nexus;
 322	struct tcm_loop_tmr *tl_tmr = NULL;
 323	struct tcm_loop_tpg *tl_tpg;
 324	int ret = FAILED;
 325	/*
 326	 * Locate the tcm_loop_hba_t pointer
 327	 */
 328	tl_hba = *(struct tcm_loop_hba **)shost_priv(sc->device->host);
 329	/*
 330	 * Locate the tl_nexus and se_sess pointers
 331	 */
 332	tl_nexus = tl_hba->tl_nexus;
 333	if (!tl_nexus) {
 334		pr_err("Unable to perform device reset without"
 335				" active I_T Nexus\n");
 336		return FAILED;
 337	}
 338	se_sess = tl_nexus->se_sess;
 339	/*
 340	 * Locate the tl_tpg and se_tpg pointers from TargetID in sc->device->id
 341	 */
 342	tl_tpg = &tl_hba->tl_hba_tpgs[sc->device->id];
 343	se_tpg = &tl_tpg->tl_se_tpg;
 344
 345	tl_cmd = kmem_cache_zalloc(tcm_loop_cmd_cache, GFP_KERNEL);
 346	if (!tl_cmd) {
 347		pr_err("Unable to allocate memory for tl_cmd\n");
 348		return FAILED;
 349	}
 350
 351	tl_tmr = kzalloc(sizeof(struct tcm_loop_tmr), GFP_KERNEL);
 352	if (!tl_tmr) {
 353		pr_err("Unable to allocate memory for tl_tmr\n");
 354		goto release;
 355	}
 356	init_waitqueue_head(&tl_tmr->tl_tmr_wait);
 357
 358	se_cmd = &tl_cmd->tl_se_cmd;
 
 
 359	/*
 360	 * Initialize struct se_cmd descriptor from target_core_mod infrastructure
 361	 */
 362	transport_init_se_cmd(se_cmd, se_tpg->se_tpg_tfo, se_sess, 0,
 363				DMA_NONE, MSG_SIMPLE_TAG,
 364				&tl_cmd->tl_sense_buf[0]);
 365	/*
 366	 * Allocate the LUN_RESET TMR
 367	 */
 368	se_cmd->se_tmr_req = core_tmr_alloc_req(se_cmd, tl_tmr,
 369				TMR_LUN_RESET);
 370	if (IS_ERR(se_cmd->se_tmr_req))
 371		goto release;
 
 
 
 
 372	/*
 373	 * Locate the underlying TCM struct se_lun from sc->device->lun
 374	 */
 375	if (transport_lookup_tmr_lun(se_cmd, sc->device->lun) < 0)
 
 376		goto release;
 
 377	/*
 378	 * Queue the TMR to TCM Core and sleep waiting for tcm_loop_queue_tm_rsp()
 379	 * to wake us up.
 380	 */
 381	transport_generic_handle_tmr(se_cmd);
 382	wait_event(tl_tmr->tl_tmr_wait, atomic_read(&tl_tmr->tmr_complete));
 383	/*
 384	 * The TMR LUN_RESET has completed, check the response status and
 385	 * then release allocations.
 386	 */
 387	ret = (se_cmd->se_tmr_req->response == TMR_FUNCTION_COMPLETE) ?
 388		SUCCESS : FAILED;
 389release:
 390	if (se_cmd)
 391		transport_generic_free_cmd(se_cmd, 1, 0);
 392	else
 393		kmem_cache_free(tcm_loop_cmd_cache, tl_cmd);
 394	kfree(tl_tmr);
 395	return ret;
 396}
 397
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 398static int tcm_loop_slave_alloc(struct scsi_device *sd)
 399{
 400	set_bit(QUEUE_FLAG_BIDI, &sd->request_queue->queue_flags);
 401	return 0;
 402}
 403
 404static int tcm_loop_slave_configure(struct scsi_device *sd)
 405{
 
 
 
 
 
 
 
 
 
 406	return 0;
 407}
 408
 409static struct scsi_host_template tcm_loop_driver_template = {
 410	.proc_info		= tcm_loop_proc_info,
 411	.proc_name		= "tcm_loopback",
 412	.name			= "TCM_Loopback",
 413	.queuecommand		= tcm_loop_queuecommand,
 414	.change_queue_depth	= tcm_loop_change_queue_depth,
 
 
 415	.eh_device_reset_handler = tcm_loop_device_reset,
 416	.can_queue		= TL_SCSI_CAN_QUEUE,
 
 417	.this_id		= -1,
 418	.sg_tablesize		= TL_SCSI_SG_TABLESIZE,
 419	.cmd_per_lun		= TL_SCSI_CMD_PER_LUN,
 420	.max_sectors		= TL_SCSI_MAX_SECTORS,
 421	.use_clustering		= DISABLE_CLUSTERING,
 422	.slave_alloc		= tcm_loop_slave_alloc,
 423	.slave_configure	= tcm_loop_slave_configure,
 424	.module			= THIS_MODULE,
 425};
 426
 427static int tcm_loop_driver_probe(struct device *dev)
 428{
 429	struct tcm_loop_hba *tl_hba;
 430	struct Scsi_Host *sh;
 431	int error;
 432
 433	tl_hba = to_tcm_loop_hba(dev);
 434
 435	sh = scsi_host_alloc(&tcm_loop_driver_template,
 436			sizeof(struct tcm_loop_hba));
 437	if (!sh) {
 438		pr_err("Unable to allocate struct scsi_host\n");
 439		return -ENODEV;
 440	}
 441	tl_hba->sh = sh;
 442
 443	/*
 444	 * Assign the struct tcm_loop_hba pointer to struct Scsi_Host->hostdata
 445	 */
 446	*((struct tcm_loop_hba **)sh->hostdata) = tl_hba;
 447	/*
 448	 * Setup single ID, Channel and LUN for now..
 449	 */
 450	sh->max_id = 2;
 451	sh->max_lun = 0;
 452	sh->max_channel = 0;
 453	sh->max_cmd_len = TL_SCSI_MAX_CMD_LEN;
 454
 
 
 
 
 
 
 
 455	error = scsi_add_host(sh, &tl_hba->dev);
 456	if (error) {
 457		pr_err("%s: scsi_add_host failed\n", __func__);
 458		scsi_host_put(sh);
 459		return -ENODEV;
 460	}
 461	return 0;
 462}
 463
 464static int tcm_loop_driver_remove(struct device *dev)
 465{
 466	struct tcm_loop_hba *tl_hba;
 467	struct Scsi_Host *sh;
 468
 469	tl_hba = to_tcm_loop_hba(dev);
 470	sh = tl_hba->sh;
 471
 472	scsi_remove_host(sh);
 473	scsi_host_put(sh);
 474	return 0;
 475}
 476
 477static void tcm_loop_release_adapter(struct device *dev)
 478{
 479	struct tcm_loop_hba *tl_hba = to_tcm_loop_hba(dev);
 480
 481	kfree(tl_hba);
 482}
 483
 484/*
 485 * Called from tcm_loop_make_scsi_hba() in tcm_loop_configfs.c
 486 */
 487static int tcm_loop_setup_hba_bus(struct tcm_loop_hba *tl_hba, int tcm_loop_host_id)
 488{
 489	int ret;
 490
 491	tl_hba->dev.bus = &tcm_loop_lld_bus;
 492	tl_hba->dev.parent = tcm_loop_primary;
 493	tl_hba->dev.release = &tcm_loop_release_adapter;
 494	dev_set_name(&tl_hba->dev, "tcm_loop_adapter_%d", tcm_loop_host_id);
 495
 496	ret = device_register(&tl_hba->dev);
 497	if (ret) {
 498		pr_err("device_register() failed for"
 499				" tl_hba->dev: %d\n", ret);
 500		return -ENODEV;
 501	}
 502
 503	return 0;
 504}
 505
 506/*
 507 * Called from tcm_loop_fabric_init() in tcl_loop_fabric.c to load the emulated
 508 * tcm_loop SCSI bus.
 509 */
 510static int tcm_loop_alloc_core_bus(void)
 511{
 512	int ret;
 513
 514	tcm_loop_primary = root_device_register("tcm_loop_0");
 515	if (IS_ERR(tcm_loop_primary)) {
 516		pr_err("Unable to allocate tcm_loop_primary\n");
 517		return PTR_ERR(tcm_loop_primary);
 518	}
 519
 520	ret = bus_register(&tcm_loop_lld_bus);
 521	if (ret) {
 522		pr_err("bus_register() failed for tcm_loop_lld_bus\n");
 523		goto dev_unreg;
 524	}
 525
 526	ret = driver_register(&tcm_loop_driverfs);
 527	if (ret) {
 528		pr_err("driver_register() failed for"
 529				"tcm_loop_driverfs\n");
 530		goto bus_unreg;
 531	}
 532
 533	pr_debug("Initialized TCM Loop Core Bus\n");
 534	return ret;
 535
 536bus_unreg:
 537	bus_unregister(&tcm_loop_lld_bus);
 538dev_unreg:
 539	root_device_unregister(tcm_loop_primary);
 540	return ret;
 541}
 542
 543static void tcm_loop_release_core_bus(void)
 544{
 545	driver_unregister(&tcm_loop_driverfs);
 546	bus_unregister(&tcm_loop_lld_bus);
 547	root_device_unregister(tcm_loop_primary);
 548
 549	pr_debug("Releasing TCM Loop Core BUS\n");
 550}
 551
 552static char *tcm_loop_get_fabric_name(void)
 553{
 554	return "loopback";
 555}
 556
 557static u8 tcm_loop_get_fabric_proto_ident(struct se_portal_group *se_tpg)
 558{
 559	struct tcm_loop_tpg *tl_tpg =
 560			(struct tcm_loop_tpg *)se_tpg->se_tpg_fabric_ptr;
 561	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 562	/*
 563	 * tl_proto_id is set at tcm_loop_configfs.c:tcm_loop_make_scsi_hba()
 564	 * time based on the protocol dependent prefix of the passed configfs group.
 565	 *
 566	 * Based upon tl_proto_id, TCM_Loop emulates the requested fabric
 567	 * ProtocolID using target_core_fabric_lib.c symbols.
 568	 */
 569	switch (tl_hba->tl_proto_id) {
 570	case SCSI_PROTOCOL_SAS:
 571		return sas_get_fabric_proto_ident(se_tpg);
 572	case SCSI_PROTOCOL_FCP:
 573		return fc_get_fabric_proto_ident(se_tpg);
 574	case SCSI_PROTOCOL_ISCSI:
 575		return iscsi_get_fabric_proto_ident(se_tpg);
 576	default:
 577		pr_err("Unknown tl_proto_id: 0x%02x, using"
 578			" SAS emulation\n", tl_hba->tl_proto_id);
 579		break;
 580	}
 581
 582	return sas_get_fabric_proto_ident(se_tpg);
 583}
 584
 585static char *tcm_loop_get_endpoint_wwn(struct se_portal_group *se_tpg)
 586{
 587	struct tcm_loop_tpg *tl_tpg =
 588		(struct tcm_loop_tpg *)se_tpg->se_tpg_fabric_ptr;
 589	/*
 590	 * Return the passed NAA identifier for the SAS Target Port
 591	 */
 592	return &tl_tpg->tl_hba->tl_wwn_address[0];
 593}
 594
 595static u16 tcm_loop_get_tag(struct se_portal_group *se_tpg)
 596{
 597	struct tcm_loop_tpg *tl_tpg =
 598		(struct tcm_loop_tpg *)se_tpg->se_tpg_fabric_ptr;
 599	/*
 600	 * This Tag is used when forming SCSI Name identifier in EVPD=1 0x83
 601	 * to represent the SCSI Target Port.
 602	 */
 603	return tl_tpg->tl_tpgt;
 604}
 605
 606static u32 tcm_loop_get_default_depth(struct se_portal_group *se_tpg)
 607{
 608	return 1;
 609}
 610
 611static u32 tcm_loop_get_pr_transport_id(
 612	struct se_portal_group *se_tpg,
 613	struct se_node_acl *se_nacl,
 614	struct t10_pr_registration *pr_reg,
 615	int *format_code,
 616	unsigned char *buf)
 617{
 618	struct tcm_loop_tpg *tl_tpg =
 619			(struct tcm_loop_tpg *)se_tpg->se_tpg_fabric_ptr;
 620	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 621
 622	switch (tl_hba->tl_proto_id) {
 623	case SCSI_PROTOCOL_SAS:
 624		return sas_get_pr_transport_id(se_tpg, se_nacl, pr_reg,
 625					format_code, buf);
 626	case SCSI_PROTOCOL_FCP:
 627		return fc_get_pr_transport_id(se_tpg, se_nacl, pr_reg,
 628					format_code, buf);
 629	case SCSI_PROTOCOL_ISCSI:
 630		return iscsi_get_pr_transport_id(se_tpg, se_nacl, pr_reg,
 631					format_code, buf);
 632	default:
 633		pr_err("Unknown tl_proto_id: 0x%02x, using"
 634			" SAS emulation\n", tl_hba->tl_proto_id);
 635		break;
 636	}
 637
 638	return sas_get_pr_transport_id(se_tpg, se_nacl, pr_reg,
 639			format_code, buf);
 640}
 641
 642static u32 tcm_loop_get_pr_transport_id_len(
 643	struct se_portal_group *se_tpg,
 644	struct se_node_acl *se_nacl,
 645	struct t10_pr_registration *pr_reg,
 646	int *format_code)
 647{
 648	struct tcm_loop_tpg *tl_tpg =
 649			(struct tcm_loop_tpg *)se_tpg->se_tpg_fabric_ptr;
 650	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 651
 652	switch (tl_hba->tl_proto_id) {
 653	case SCSI_PROTOCOL_SAS:
 654		return sas_get_pr_transport_id_len(se_tpg, se_nacl, pr_reg,
 655					format_code);
 656	case SCSI_PROTOCOL_FCP:
 657		return fc_get_pr_transport_id_len(se_tpg, se_nacl, pr_reg,
 658					format_code);
 659	case SCSI_PROTOCOL_ISCSI:
 660		return iscsi_get_pr_transport_id_len(se_tpg, se_nacl, pr_reg,
 661					format_code);
 662	default:
 663		pr_err("Unknown tl_proto_id: 0x%02x, using"
 664			" SAS emulation\n", tl_hba->tl_proto_id);
 665		break;
 666	}
 667
 668	return sas_get_pr_transport_id_len(se_tpg, se_nacl, pr_reg,
 669			format_code);
 670}
 671
 672/*
 673 * Used for handling SCSI fabric dependent TransportIDs in SPC-3 and above
 674 * Persistent Reservation SPEC_I_PT=1 and PROUT REGISTER_AND_MOVE operations.
 675 */
 676static char *tcm_loop_parse_pr_out_transport_id(
 677	struct se_portal_group *se_tpg,
 678	const char *buf,
 679	u32 *out_tid_len,
 680	char **port_nexus_ptr)
 681{
 682	struct tcm_loop_tpg *tl_tpg =
 683			(struct tcm_loop_tpg *)se_tpg->se_tpg_fabric_ptr;
 684	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 685
 686	switch (tl_hba->tl_proto_id) {
 687	case SCSI_PROTOCOL_SAS:
 688		return sas_parse_pr_out_transport_id(se_tpg, buf, out_tid_len,
 689					port_nexus_ptr);
 690	case SCSI_PROTOCOL_FCP:
 691		return fc_parse_pr_out_transport_id(se_tpg, buf, out_tid_len,
 692					port_nexus_ptr);
 693	case SCSI_PROTOCOL_ISCSI:
 694		return iscsi_parse_pr_out_transport_id(se_tpg, buf, out_tid_len,
 695					port_nexus_ptr);
 696	default:
 697		pr_err("Unknown tl_proto_id: 0x%02x, using"
 698			" SAS emulation\n", tl_hba->tl_proto_id);
 699		break;
 700	}
 701
 702	return sas_parse_pr_out_transport_id(se_tpg, buf, out_tid_len,
 703			port_nexus_ptr);
 704}
 705
 706/*
 707 * Returning (1) here allows for target_core_mod struct se_node_acl to be generated
 708 * based upon the incoming fabric dependent SCSI Initiator Port
 709 */
 710static int tcm_loop_check_demo_mode(struct se_portal_group *se_tpg)
 711{
 712	return 1;
 713}
 714
 715static int tcm_loop_check_demo_mode_cache(struct se_portal_group *se_tpg)
 716{
 717	return 0;
 718}
 719
 720/*
 721 * Allow I_T Nexus full READ-WRITE access without explict Initiator Node ACLs for
 722 * local virtual Linux/SCSI LLD passthrough into VM hypervisor guest
 723 */
 724static int tcm_loop_check_demo_mode_write_protect(struct se_portal_group *se_tpg)
 725{
 726	return 0;
 727}
 728
 729/*
 730 * Because TCM_Loop does not use explict ACLs and MappedLUNs, this will
 731 * never be called for TCM_Loop by target_core_fabric_configfs.c code.
 732 * It has been added here as a nop for target_fabric_tf_ops_check()
 733 */
 734static int tcm_loop_check_prod_mode_write_protect(struct se_portal_group *se_tpg)
 735{
 736	return 0;
 737}
 738
 739static struct se_node_acl *tcm_loop_tpg_alloc_fabric_acl(
 740	struct se_portal_group *se_tpg)
 741{
 742	struct tcm_loop_nacl *tl_nacl;
 743
 744	tl_nacl = kzalloc(sizeof(struct tcm_loop_nacl), GFP_KERNEL);
 745	if (!tl_nacl) {
 746		pr_err("Unable to allocate struct tcm_loop_nacl\n");
 747		return NULL;
 748	}
 749
 750	return &tl_nacl->se_node_acl;
 751}
 752
 753static void tcm_loop_tpg_release_fabric_acl(
 754	struct se_portal_group *se_tpg,
 755	struct se_node_acl *se_nacl)
 756{
 757	struct tcm_loop_nacl *tl_nacl = container_of(se_nacl,
 758				struct tcm_loop_nacl, se_node_acl);
 759
 760	kfree(tl_nacl);
 761}
 762
 763static u32 tcm_loop_get_inst_index(struct se_portal_group *se_tpg)
 764{
 765	return 1;
 766}
 767
 768static int tcm_loop_is_state_remove(struct se_cmd *se_cmd)
 769{
 770	/*
 771	 * Assume struct scsi_cmnd is not in remove state..
 772	 */
 773	return 0;
 774}
 775
 776static int tcm_loop_sess_logged_in(struct se_session *se_sess)
 777{
 778	/*
 779	 * Assume that TL Nexus is always active
 780	 */
 781	return 1;
 782}
 783
 784static u32 tcm_loop_sess_get_index(struct se_session *se_sess)
 785{
 786	return 1;
 787}
 788
 789static void tcm_loop_set_default_node_attributes(struct se_node_acl *se_acl)
 790{
 791	return;
 792}
 793
 794static u32 tcm_loop_get_task_tag(struct se_cmd *se_cmd)
 795{
 796	return 1;
 
 
 
 797}
 798
 799static int tcm_loop_get_cmd_state(struct se_cmd *se_cmd)
 800{
 801	struct tcm_loop_cmd *tl_cmd = container_of(se_cmd,
 802			struct tcm_loop_cmd, tl_se_cmd);
 803
 804	return tl_cmd->sc_cmd_state;
 805}
 806
 807static int tcm_loop_shutdown_session(struct se_session *se_sess)
 808{
 809	return 0;
 810}
 811
 812static void tcm_loop_close_session(struct se_session *se_sess)
 813{
 814	return;
 815};
 816
 817static void tcm_loop_stop_session(
 818	struct se_session *se_sess,
 819	int sess_sleep,
 820	int conn_sleep)
 821{
 822	return;
 823}
 824
 825static void tcm_loop_fall_back_to_erl0(struct se_session *se_sess)
 826{
 827	return;
 828}
 829
 830static int tcm_loop_write_pending(struct se_cmd *se_cmd)
 831{
 832	/*
 833	 * Since Linux/SCSI has already sent down a struct scsi_cmnd
 834	 * sc->sc_data_direction of DMA_TO_DEVICE with struct scatterlist array
 835	 * memory, and memory has already been mapped to struct se_cmd->t_mem_list
 836	 * format with transport_generic_map_mem_to_cmd().
 837	 *
 838	 * We now tell TCM to add this WRITE CDB directly into the TCM storage
 839	 * object execution queue.
 840	 */
 841	transport_generic_process_write(se_cmd);
 842	return 0;
 843}
 844
 845static int tcm_loop_write_pending_status(struct se_cmd *se_cmd)
 846{
 847	return 0;
 848}
 849
 850static int tcm_loop_queue_data_in(struct se_cmd *se_cmd)
 851{
 852	struct tcm_loop_cmd *tl_cmd = container_of(se_cmd,
 853				struct tcm_loop_cmd, tl_se_cmd);
 854	struct scsi_cmnd *sc = tl_cmd->sc;
 855
 856	pr_debug("tcm_loop_queue_data_in() called for scsi_cmnd: %p"
 857		     " cdb: 0x%02x\n", sc, sc->cmnd[0]);
 858
 859	sc->result = SAM_STAT_GOOD;
 860	set_host_byte(sc, DID_OK);
 
 
 
 861	sc->scsi_done(sc);
 862	return 0;
 863}
 864
 865static int tcm_loop_queue_status(struct se_cmd *se_cmd)
 866{
 867	struct tcm_loop_cmd *tl_cmd = container_of(se_cmd,
 868				struct tcm_loop_cmd, tl_se_cmd);
 869	struct scsi_cmnd *sc = tl_cmd->sc;
 870
 871	pr_debug("tcm_loop_queue_status() called for scsi_cmnd: %p"
 872			" cdb: 0x%02x\n", sc, sc->cmnd[0]);
 873
 874	if (se_cmd->sense_buffer &&
 875	   ((se_cmd->se_cmd_flags & SCF_TRANSPORT_TASK_SENSE) ||
 876	    (se_cmd->se_cmd_flags & SCF_EMULATED_TASK_SENSE))) {
 877
 878		memcpy(sc->sense_buffer, se_cmd->sense_buffer,
 879				SCSI_SENSE_BUFFERSIZE);
 880		sc->result = SAM_STAT_CHECK_CONDITION;
 881		set_driver_byte(sc, DRIVER_SENSE);
 882	} else
 883		sc->result = se_cmd->scsi_status;
 884
 885	set_host_byte(sc, DID_OK);
 
 
 
 886	sc->scsi_done(sc);
 887	return 0;
 888}
 889
 890static int tcm_loop_queue_tm_rsp(struct se_cmd *se_cmd)
 891{
 892	struct se_tmr_req *se_tmr = se_cmd->se_tmr_req;
 893	struct tcm_loop_tmr *tl_tmr = se_tmr->fabric_tmr_ptr;
 894	/*
 895	 * The SCSI EH thread will be sleeping on se_tmr->tl_tmr_wait, go ahead
 896	 * and wake up the wait_queue_head_t in tcm_loop_device_reset()
 897	 */
 898	atomic_set(&tl_tmr->tmr_complete, 1);
 899	wake_up(&tl_tmr->tl_tmr_wait);
 900	return 0;
 901}
 902
 903static u16 tcm_loop_set_fabric_sense_len(struct se_cmd *se_cmd, u32 sense_length)
 904{
 905	return 0;
 906}
 907
 908static u16 tcm_loop_get_fabric_sense_len(void)
 909{
 910	return 0;
 911}
 912
 913static char *tcm_loop_dump_proto_id(struct tcm_loop_hba *tl_hba)
 914{
 915	switch (tl_hba->tl_proto_id) {
 916	case SCSI_PROTOCOL_SAS:
 917		return "SAS";
 918	case SCSI_PROTOCOL_FCP:
 919		return "FCP";
 920	case SCSI_PROTOCOL_ISCSI:
 921		return "iSCSI";
 922	default:
 923		break;
 924	}
 925
 926	return "Unknown";
 927}
 928
 929/* Start items for tcm_loop_port_cit */
 930
 931static int tcm_loop_port_link(
 932	struct se_portal_group *se_tpg,
 933	struct se_lun *lun)
 934{
 935	struct tcm_loop_tpg *tl_tpg = container_of(se_tpg,
 936				struct tcm_loop_tpg, tl_se_tpg);
 937	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 938
 939	atomic_inc(&tl_tpg->tl_tpg_port_count);
 940	smp_mb__after_atomic_inc();
 941	/*
 942	 * Add Linux/SCSI struct scsi_device by HCTL
 943	 */
 944	scsi_add_device(tl_hba->sh, 0, tl_tpg->tl_tpgt, lun->unpacked_lun);
 945
 946	pr_debug("TCM_Loop_ConfigFS: Port Link Successful\n");
 947	return 0;
 948}
 949
 950static void tcm_loop_port_unlink(
 951	struct se_portal_group *se_tpg,
 952	struct se_lun *se_lun)
 953{
 954	struct scsi_device *sd;
 955	struct tcm_loop_hba *tl_hba;
 956	struct tcm_loop_tpg *tl_tpg;
 957
 958	tl_tpg = container_of(se_tpg, struct tcm_loop_tpg, tl_se_tpg);
 959	tl_hba = tl_tpg->tl_hba;
 960
 961	sd = scsi_device_lookup(tl_hba->sh, 0, tl_tpg->tl_tpgt,
 962				se_lun->unpacked_lun);
 963	if (!sd) {
 964		pr_err("Unable to locate struct scsi_device for %d:%d:"
 965			"%d\n", 0, tl_tpg->tl_tpgt, se_lun->unpacked_lun);
 966		return;
 967	}
 968	/*
 969	 * Remove Linux/SCSI struct scsi_device by HCTL
 970	 */
 971	scsi_remove_device(sd);
 972	scsi_device_put(sd);
 973
 974	atomic_dec(&tl_tpg->tl_tpg_port_count);
 975	smp_mb__after_atomic_dec();
 976
 977	pr_debug("TCM_Loop_ConfigFS: Port Unlink Successful\n");
 978}
 979
 980/* End items for tcm_loop_port_cit */
 981
 982/* Start items for tcm_loop_nexus_cit */
 983
 984static int tcm_loop_make_nexus(
 985	struct tcm_loop_tpg *tl_tpg,
 986	const char *name)
 987{
 988	struct se_portal_group *se_tpg;
 989	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 990	struct tcm_loop_nexus *tl_nexus;
 991	int ret = -ENOMEM;
 992
 993	if (tl_tpg->tl_hba->tl_nexus) {
 994		pr_debug("tl_tpg->tl_hba->tl_nexus already exists\n");
 995		return -EEXIST;
 996	}
 997	se_tpg = &tl_tpg->tl_se_tpg;
 998
 999	tl_nexus = kzalloc(sizeof(struct tcm_loop_nexus), GFP_KERNEL);
1000	if (!tl_nexus) {
1001		pr_err("Unable to allocate struct tcm_loop_nexus\n");
1002		return -ENOMEM;
1003	}
1004	/*
1005	 * Initialize the struct se_session pointer
1006	 */
1007	tl_nexus->se_sess = transport_init_session();
1008	if (IS_ERR(tl_nexus->se_sess)) {
1009		ret = PTR_ERR(tl_nexus->se_sess);
1010		goto out;
1011	}
1012	/*
1013	 * Since we are running in 'demo mode' this call with generate a
1014	 * struct se_node_acl for the tcm_loop struct se_portal_group with the SCSI
1015	 * Initiator port name of the passed configfs group 'name'.
1016	 */
1017	tl_nexus->se_sess->se_node_acl = core_tpg_check_initiator_node_acl(
1018				se_tpg, (unsigned char *)name);
1019	if (!tl_nexus->se_sess->se_node_acl) {
1020		transport_free_session(tl_nexus->se_sess);
1021		goto out;
1022	}
1023	/*
1024	 * Now, register the SAS I_T Nexus as active with the call to
1025	 * transport_register_session()
1026	 */
1027	__transport_register_session(se_tpg, tl_nexus->se_sess->se_node_acl,
1028			tl_nexus->se_sess, tl_nexus);
1029	tl_tpg->tl_hba->tl_nexus = tl_nexus;
1030	pr_debug("TCM_Loop_ConfigFS: Established I_T Nexus to emulated"
1031		" %s Initiator Port: %s\n", tcm_loop_dump_proto_id(tl_hba),
1032		name);
1033	return 0;
1034
1035out:
1036	kfree(tl_nexus);
1037	return ret;
1038}
1039
1040static int tcm_loop_drop_nexus(
1041	struct tcm_loop_tpg *tpg)
1042{
1043	struct se_session *se_sess;
1044	struct tcm_loop_nexus *tl_nexus;
1045	struct tcm_loop_hba *tl_hba = tpg->tl_hba;
1046
1047	tl_nexus = tpg->tl_hba->tl_nexus;
 
 
 
1048	if (!tl_nexus)
1049		return -ENODEV;
1050
1051	se_sess = tl_nexus->se_sess;
1052	if (!se_sess)
1053		return -ENODEV;
1054
1055	if (atomic_read(&tpg->tl_tpg_port_count)) {
1056		pr_err("Unable to remove TCM_Loop I_T Nexus with"
1057			" active TPG port count: %d\n",
1058			atomic_read(&tpg->tl_tpg_port_count));
1059		return -EPERM;
1060	}
1061
1062	pr_debug("TCM_Loop_ConfigFS: Removing I_T Nexus to emulated"
1063		" %s Initiator Port: %s\n", tcm_loop_dump_proto_id(tl_hba),
1064		tl_nexus->se_sess->se_node_acl->initiatorname);
1065	/*
1066	 * Release the SCSI I_T Nexus to the emulated SAS Target Port
1067	 */
1068	transport_deregister_session(tl_nexus->se_sess);
1069	tpg->tl_hba->tl_nexus = NULL;
1070	kfree(tl_nexus);
1071	return 0;
1072}
1073
1074/* End items for tcm_loop_nexus_cit */
1075
1076static ssize_t tcm_loop_tpg_show_nexus(
1077	struct se_portal_group *se_tpg,
1078	char *page)
1079{
1080	struct tcm_loop_tpg *tl_tpg = container_of(se_tpg,
1081			struct tcm_loop_tpg, tl_se_tpg);
1082	struct tcm_loop_nexus *tl_nexus;
1083	ssize_t ret;
1084
1085	tl_nexus = tl_tpg->tl_hba->tl_nexus;
1086	if (!tl_nexus)
1087		return -ENODEV;
1088
1089	ret = snprintf(page, PAGE_SIZE, "%s\n",
1090		tl_nexus->se_sess->se_node_acl->initiatorname);
1091
1092	return ret;
1093}
1094
1095static ssize_t tcm_loop_tpg_store_nexus(
1096	struct se_portal_group *se_tpg,
1097	const char *page,
1098	size_t count)
1099{
1100	struct tcm_loop_tpg *tl_tpg = container_of(se_tpg,
1101			struct tcm_loop_tpg, tl_se_tpg);
1102	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
1103	unsigned char i_port[TL_WWN_ADDR_LEN], *ptr, *port_ptr;
1104	int ret;
1105	/*
1106	 * Shutdown the active I_T nexus if 'NULL' is passed..
1107	 */
1108	if (!strncmp(page, "NULL", 4)) {
1109		ret = tcm_loop_drop_nexus(tl_tpg);
1110		return (!ret) ? count : ret;
1111	}
1112	/*
1113	 * Otherwise make sure the passed virtual Initiator port WWN matches
1114	 * the fabric protocol_id set in tcm_loop_make_scsi_hba(), and call
1115	 * tcm_loop_make_nexus()
1116	 */
1117	if (strlen(page) >= TL_WWN_ADDR_LEN) {
1118		pr_err("Emulated NAA Sas Address: %s, exceeds"
1119				" max: %d\n", page, TL_WWN_ADDR_LEN);
1120		return -EINVAL;
1121	}
1122	snprintf(&i_port[0], TL_WWN_ADDR_LEN, "%s", page);
1123
1124	ptr = strstr(i_port, "naa.");
1125	if (ptr) {
1126		if (tl_hba->tl_proto_id != SCSI_PROTOCOL_SAS) {
1127			pr_err("Passed SAS Initiator Port %s does not"
1128				" match target port protoid: %s\n", i_port,
1129				tcm_loop_dump_proto_id(tl_hba));
1130			return -EINVAL;
1131		}
1132		port_ptr = &i_port[0];
1133		goto check_newline;
1134	}
1135	ptr = strstr(i_port, "fc.");
1136	if (ptr) {
1137		if (tl_hba->tl_proto_id != SCSI_PROTOCOL_FCP) {
1138			pr_err("Passed FCP Initiator Port %s does not"
1139				" match target port protoid: %s\n", i_port,
1140				tcm_loop_dump_proto_id(tl_hba));
1141			return -EINVAL;
1142		}
1143		port_ptr = &i_port[3]; /* Skip over "fc." */
1144		goto check_newline;
1145	}
1146	ptr = strstr(i_port, "iqn.");
1147	if (ptr) {
1148		if (tl_hba->tl_proto_id != SCSI_PROTOCOL_ISCSI) {
1149			pr_err("Passed iSCSI Initiator Port %s does not"
1150				" match target port protoid: %s\n", i_port,
1151				tcm_loop_dump_proto_id(tl_hba));
1152			return -EINVAL;
1153		}
1154		port_ptr = &i_port[0];
1155		goto check_newline;
1156	}
1157	pr_err("Unable to locate prefix for emulated Initiator Port:"
1158			" %s\n", i_port);
1159	return -EINVAL;
1160	/*
1161	 * Clear any trailing newline for the NAA WWN
1162	 */
1163check_newline:
1164	if (i_port[strlen(i_port)-1] == '\n')
1165		i_port[strlen(i_port)-1] = '\0';
1166
1167	ret = tcm_loop_make_nexus(tl_tpg, port_ptr);
1168	if (ret < 0)
1169		return ret;
1170
1171	return count;
1172}
1173
1174TF_TPG_BASE_ATTR(tcm_loop, nexus, S_IRUGO | S_IWUSR);
1175
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1176static struct configfs_attribute *tcm_loop_tpg_attrs[] = {
1177	&tcm_loop_tpg_nexus.attr,
 
1178	NULL,
1179};
1180
1181/* Start items for tcm_loop_naa_cit */
1182
1183struct se_portal_group *tcm_loop_make_naa_tpg(
1184	struct se_wwn *wwn,
1185	struct config_group *group,
1186	const char *name)
1187{
1188	struct tcm_loop_hba *tl_hba = container_of(wwn,
1189			struct tcm_loop_hba, tl_hba_wwn);
1190	struct tcm_loop_tpg *tl_tpg;
1191	char *tpgt_str, *end_ptr;
1192	int ret;
1193	unsigned short int tpgt;
1194
1195	tpgt_str = strstr(name, "tpgt_");
1196	if (!tpgt_str) {
1197		pr_err("Unable to locate \"tpgt_#\" directory"
1198				" group\n");
1199		return ERR_PTR(-EINVAL);
1200	}
1201	tpgt_str += 5; /* Skip ahead of "tpgt_" */
1202	tpgt = (unsigned short int) simple_strtoul(tpgt_str, &end_ptr, 0);
1203
1204	if (tpgt >= TL_TPGS_PER_HBA) {
1205		pr_err("Passed tpgt: %hu exceeds TL_TPGS_PER_HBA:"
1206				" %u\n", tpgt, TL_TPGS_PER_HBA);
1207		return ERR_PTR(-EINVAL);
1208	}
1209	tl_tpg = &tl_hba->tl_hba_tpgs[tpgt];
1210	tl_tpg->tl_hba = tl_hba;
1211	tl_tpg->tl_tpgt = tpgt;
1212	/*
1213	 * Register the tl_tpg as a emulated SAS TCM Target Endpoint
1214	 */
1215	ret = core_tpg_register(&tcm_loop_fabric_configfs->tf_ops,
1216			wwn, &tl_tpg->tl_se_tpg, tl_tpg,
1217			TRANSPORT_TPG_TYPE_NORMAL);
1218	if (ret < 0)
1219		return ERR_PTR(-ENOMEM);
1220
1221	pr_debug("TCM_Loop_ConfigFS: Allocated Emulated %s"
1222		" Target Port %s,t,0x%04x\n", tcm_loop_dump_proto_id(tl_hba),
1223		config_item_name(&wwn->wwn_group.cg_item), tpgt);
1224
1225	return &tl_tpg->tl_se_tpg;
1226}
1227
1228void tcm_loop_drop_naa_tpg(
1229	struct se_portal_group *se_tpg)
1230{
1231	struct se_wwn *wwn = se_tpg->se_tpg_wwn;
1232	struct tcm_loop_tpg *tl_tpg = container_of(se_tpg,
1233				struct tcm_loop_tpg, tl_se_tpg);
1234	struct tcm_loop_hba *tl_hba;
1235	unsigned short tpgt;
1236
1237	tl_hba = tl_tpg->tl_hba;
1238	tpgt = tl_tpg->tl_tpgt;
1239	/*
1240	 * Release the I_T Nexus for the Virtual SAS link if present
1241	 */
1242	tcm_loop_drop_nexus(tl_tpg);
1243	/*
1244	 * Deregister the tl_tpg as a emulated SAS TCM Target Endpoint
1245	 */
1246	core_tpg_deregister(se_tpg);
1247
 
 
 
1248	pr_debug("TCM_Loop_ConfigFS: Deallocated Emulated %s"
1249		" Target Port %s,t,0x%04x\n", tcm_loop_dump_proto_id(tl_hba),
1250		config_item_name(&wwn->wwn_group.cg_item), tpgt);
1251}
1252
1253/* End items for tcm_loop_naa_cit */
1254
1255/* Start items for tcm_loop_cit */
1256
1257struct se_wwn *tcm_loop_make_scsi_hba(
1258	struct target_fabric_configfs *tf,
1259	struct config_group *group,
1260	const char *name)
1261{
1262	struct tcm_loop_hba *tl_hba;
1263	struct Scsi_Host *sh;
1264	char *ptr;
1265	int ret, off = 0;
1266
1267	tl_hba = kzalloc(sizeof(struct tcm_loop_hba), GFP_KERNEL);
1268	if (!tl_hba) {
1269		pr_err("Unable to allocate struct tcm_loop_hba\n");
1270		return ERR_PTR(-ENOMEM);
1271	}
1272	/*
1273	 * Determine the emulated Protocol Identifier and Target Port Name
1274	 * based on the incoming configfs directory name.
1275	 */
1276	ptr = strstr(name, "naa.");
1277	if (ptr) {
1278		tl_hba->tl_proto_id = SCSI_PROTOCOL_SAS;
1279		goto check_len;
1280	}
1281	ptr = strstr(name, "fc.");
1282	if (ptr) {
1283		tl_hba->tl_proto_id = SCSI_PROTOCOL_FCP;
1284		off = 3; /* Skip over "fc." */
1285		goto check_len;
1286	}
1287	ptr = strstr(name, "iqn.");
1288	if (!ptr) {
1289		pr_err("Unable to locate prefix for emulated Target "
1290				"Port: %s\n", name);
1291		ret = -EINVAL;
1292		goto out;
1293	}
1294	tl_hba->tl_proto_id = SCSI_PROTOCOL_ISCSI;
1295
1296check_len:
1297	if (strlen(name) >= TL_WWN_ADDR_LEN) {
1298		pr_err("Emulated NAA %s Address: %s, exceeds"
1299			" max: %d\n", name, tcm_loop_dump_proto_id(tl_hba),
1300			TL_WWN_ADDR_LEN);
1301		ret = -EINVAL;
1302		goto out;
1303	}
1304	snprintf(&tl_hba->tl_wwn_address[0], TL_WWN_ADDR_LEN, "%s", &name[off]);
1305
1306	/*
1307	 * Call device_register(tl_hba->dev) to register the emulated
1308	 * Linux/SCSI LLD of type struct Scsi_Host at tl_hba->sh after
1309	 * device_register() callbacks in tcm_loop_driver_probe()
1310	 */
1311	ret = tcm_loop_setup_hba_bus(tl_hba, tcm_loop_hba_no_cnt);
1312	if (ret)
1313		goto out;
1314
1315	sh = tl_hba->sh;
1316	tcm_loop_hba_no_cnt++;
1317	pr_debug("TCM_Loop_ConfigFS: Allocated emulated Target"
1318		" %s Address: %s at Linux/SCSI Host ID: %d\n",
1319		tcm_loop_dump_proto_id(tl_hba), name, sh->host_no);
1320
1321	return &tl_hba->tl_hba_wwn;
1322out:
1323	kfree(tl_hba);
1324	return ERR_PTR(ret);
1325}
1326
1327void tcm_loop_drop_scsi_hba(
1328	struct se_wwn *wwn)
1329{
1330	struct tcm_loop_hba *tl_hba = container_of(wwn,
1331				struct tcm_loop_hba, tl_hba_wwn);
1332	int host_no = tl_hba->sh->host_no;
 
 
 
1333	/*
1334	 * Call device_unregister() on the original tl_hba->dev.
1335	 * tcm_loop_fabric_scsi.c:tcm_loop_release_adapter() will
1336	 * release *tl_hba;
1337	 */
1338	device_unregister(&tl_hba->dev);
1339
1340	pr_debug("TCM_Loop_ConfigFS: Deallocated emulated Target"
1341		" SAS Address: %s at Linux/SCSI Host ID: %d\n",
1342		config_item_name(&wwn->wwn_group.cg_item), host_no);
1343}
1344
1345/* Start items for tcm_loop_cit */
1346static ssize_t tcm_loop_wwn_show_attr_version(
1347	struct target_fabric_configfs *tf,
1348	char *page)
1349{
1350	return sprintf(page, "TCM Loopback Fabric module %s\n", TCM_LOOP_VERSION);
1351}
1352
1353TF_WWN_ATTR_RO(tcm_loop, version);
1354
1355static struct configfs_attribute *tcm_loop_wwn_attrs[] = {
1356	&tcm_loop_wwn_version.attr,
1357	NULL,
1358};
1359
1360/* End items for tcm_loop_cit */
1361
1362static int tcm_loop_register_configfs(void)
1363{
1364	struct target_fabric_configfs *fabric;
1365	struct config_group *tf_cg;
1366	int ret;
1367	/*
1368	 * Set the TCM Loop HBA counter to zero
1369	 */
1370	tcm_loop_hba_no_cnt = 0;
1371	/*
1372	 * Register the top level struct config_item_type with TCM core
1373	 */
1374	fabric = target_fabric_configfs_init(THIS_MODULE, "loopback");
1375	if (IS_ERR(fabric)) {
1376		pr_err("tcm_loop_register_configfs() failed!\n");
1377		return PTR_ERR(fabric);
1378	}
1379	/*
1380	 * Setup the fabric API of function pointers used by target_core_mod
1381	 */
1382	fabric->tf_ops.get_fabric_name = &tcm_loop_get_fabric_name;
1383	fabric->tf_ops.get_fabric_proto_ident = &tcm_loop_get_fabric_proto_ident;
1384	fabric->tf_ops.tpg_get_wwn = &tcm_loop_get_endpoint_wwn;
1385	fabric->tf_ops.tpg_get_tag = &tcm_loop_get_tag;
1386	fabric->tf_ops.tpg_get_default_depth = &tcm_loop_get_default_depth;
1387	fabric->tf_ops.tpg_get_pr_transport_id = &tcm_loop_get_pr_transport_id;
1388	fabric->tf_ops.tpg_get_pr_transport_id_len =
1389					&tcm_loop_get_pr_transport_id_len;
1390	fabric->tf_ops.tpg_parse_pr_out_transport_id =
1391					&tcm_loop_parse_pr_out_transport_id;
1392	fabric->tf_ops.tpg_check_demo_mode = &tcm_loop_check_demo_mode;
1393	fabric->tf_ops.tpg_check_demo_mode_cache =
1394					&tcm_loop_check_demo_mode_cache;
1395	fabric->tf_ops.tpg_check_demo_mode_write_protect =
1396					&tcm_loop_check_demo_mode_write_protect;
1397	fabric->tf_ops.tpg_check_prod_mode_write_protect =
1398					&tcm_loop_check_prod_mode_write_protect;
1399	/*
1400	 * The TCM loopback fabric module runs in demo-mode to a local
1401	 * virtual SCSI device, so fabric dependent initator ACLs are
1402	 * not required.
1403	 */
1404	fabric->tf_ops.tpg_alloc_fabric_acl = &tcm_loop_tpg_alloc_fabric_acl;
1405	fabric->tf_ops.tpg_release_fabric_acl =
1406					&tcm_loop_tpg_release_fabric_acl;
1407	fabric->tf_ops.tpg_get_inst_index = &tcm_loop_get_inst_index;
1408	/*
1409	 * Used for setting up remaining TCM resources in process context
1410	 */
1411	fabric->tf_ops.new_cmd_map = &tcm_loop_new_cmd_map;
1412	fabric->tf_ops.check_stop_free = &tcm_loop_check_stop_free;
1413	fabric->tf_ops.release_cmd = &tcm_loop_release_cmd;
1414	fabric->tf_ops.shutdown_session = &tcm_loop_shutdown_session;
1415	fabric->tf_ops.close_session = &tcm_loop_close_session;
1416	fabric->tf_ops.stop_session = &tcm_loop_stop_session;
1417	fabric->tf_ops.fall_back_to_erl0 = &tcm_loop_fall_back_to_erl0;
1418	fabric->tf_ops.sess_logged_in = &tcm_loop_sess_logged_in;
1419	fabric->tf_ops.sess_get_index = &tcm_loop_sess_get_index;
1420	fabric->tf_ops.sess_get_initiator_sid = NULL;
1421	fabric->tf_ops.write_pending = &tcm_loop_write_pending;
1422	fabric->tf_ops.write_pending_status = &tcm_loop_write_pending_status;
1423	/*
1424	 * Not used for TCM loopback
1425	 */
1426	fabric->tf_ops.set_default_node_attributes =
1427					&tcm_loop_set_default_node_attributes;
1428	fabric->tf_ops.get_task_tag = &tcm_loop_get_task_tag;
1429	fabric->tf_ops.get_cmd_state = &tcm_loop_get_cmd_state;
1430	fabric->tf_ops.queue_data_in = &tcm_loop_queue_data_in;
1431	fabric->tf_ops.queue_status = &tcm_loop_queue_status;
1432	fabric->tf_ops.queue_tm_rsp = &tcm_loop_queue_tm_rsp;
1433	fabric->tf_ops.set_fabric_sense_len = &tcm_loop_set_fabric_sense_len;
1434	fabric->tf_ops.get_fabric_sense_len = &tcm_loop_get_fabric_sense_len;
1435	fabric->tf_ops.is_state_remove = &tcm_loop_is_state_remove;
1436
1437	tf_cg = &fabric->tf_group;
1438	/*
1439	 * Setup function pointers for generic logic in target_core_fabric_configfs.c
1440	 */
1441	fabric->tf_ops.fabric_make_wwn = &tcm_loop_make_scsi_hba;
1442	fabric->tf_ops.fabric_drop_wwn = &tcm_loop_drop_scsi_hba;
1443	fabric->tf_ops.fabric_make_tpg = &tcm_loop_make_naa_tpg;
1444	fabric->tf_ops.fabric_drop_tpg = &tcm_loop_drop_naa_tpg;
1445	/*
1446	 * fabric_post_link() and fabric_pre_unlink() are used for
1447	 * registration and release of TCM Loop Virtual SCSI LUNs.
1448	 */
1449	fabric->tf_ops.fabric_post_link = &tcm_loop_port_link;
1450	fabric->tf_ops.fabric_pre_unlink = &tcm_loop_port_unlink;
1451	fabric->tf_ops.fabric_make_np = NULL;
1452	fabric->tf_ops.fabric_drop_np = NULL;
1453	/*
1454	 * Setup default attribute lists for various fabric->tf_cit_tmpl
1455	 */
1456	TF_CIT_TMPL(fabric)->tfc_wwn_cit.ct_attrs = tcm_loop_wwn_attrs;
1457	TF_CIT_TMPL(fabric)->tfc_tpg_base_cit.ct_attrs = tcm_loop_tpg_attrs;
1458	TF_CIT_TMPL(fabric)->tfc_tpg_attrib_cit.ct_attrs = NULL;
1459	TF_CIT_TMPL(fabric)->tfc_tpg_param_cit.ct_attrs = NULL;
1460	TF_CIT_TMPL(fabric)->tfc_tpg_np_base_cit.ct_attrs = NULL;
1461	/*
1462	 * Once fabric->tf_ops has been setup, now register the fabric for
1463	 * use within TCM
1464	 */
1465	ret = target_fabric_configfs_register(fabric);
1466	if (ret < 0) {
1467		pr_err("target_fabric_configfs_register() for"
1468				" TCM_Loop failed!\n");
1469		target_fabric_configfs_free(fabric);
1470		return -1;
1471	}
1472	/*
1473	 * Setup our local pointer to *fabric.
1474	 */
1475	tcm_loop_fabric_configfs = fabric;
1476	pr_debug("TCM_LOOP[0] - Set fabric ->"
1477			" tcm_loop_fabric_configfs\n");
1478	return 0;
1479}
1480
1481static void tcm_loop_deregister_configfs(void)
1482{
1483	if (!tcm_loop_fabric_configfs)
1484		return;
1485
1486	target_fabric_configfs_deregister(tcm_loop_fabric_configfs);
1487	tcm_loop_fabric_configfs = NULL;
1488	pr_debug("TCM_LOOP[0] - Cleared"
1489				" tcm_loop_fabric_configfs\n");
1490}
1491
1492static int __init tcm_loop_fabric_init(void)
1493{
1494	int ret;
 
 
 
 
1495
1496	tcm_loop_cmd_cache = kmem_cache_create("tcm_loop_cmd_cache",
1497				sizeof(struct tcm_loop_cmd),
1498				__alignof__(struct tcm_loop_cmd),
1499				0, NULL);
1500	if (!tcm_loop_cmd_cache) {
1501		pr_debug("kmem_cache_create() for"
1502			" tcm_loop_cmd_cache failed\n");
1503		return -ENOMEM;
1504	}
1505
1506	ret = tcm_loop_alloc_core_bus();
1507	if (ret)
1508		return ret;
1509
1510	ret = tcm_loop_register_configfs();
1511	if (ret) {
1512		tcm_loop_release_core_bus();
1513		return ret;
1514	}
1515
1516	return 0;
 
 
 
 
 
 
 
 
 
1517}
1518
1519static void __exit tcm_loop_fabric_exit(void)
1520{
1521	tcm_loop_deregister_configfs();
1522	tcm_loop_release_core_bus();
1523	kmem_cache_destroy(tcm_loop_cmd_cache);
 
1524}
1525
1526MODULE_DESCRIPTION("TCM loopback virtual Linux/SCSI fabric module");
1527MODULE_AUTHOR("Nicholas A. Bellinger <nab@risingtidesystems.com>");
1528MODULE_LICENSE("GPL");
1529module_init(tcm_loop_fabric_init);
1530module_exit(tcm_loop_fabric_exit);
v3.15
   1/*******************************************************************************
   2 *
   3 * This file contains the Linux/SCSI LLD virtual SCSI initiator driver
   4 * for emulated SAS initiator ports
   5 *
   6 * © Copyright 2011-2013 Datera, Inc.
   7 *
   8 * Licensed to the Linux Foundation under the General Public License (GPL) version 2.
   9 *
  10 * Author: Nicholas A. Bellinger <nab@risingtidesystems.com>
  11 *
  12 * This program is free software; you can redistribute it and/or modify
  13 * it under the terms of the GNU General Public License as published by
  14 * the Free Software Foundation; either version 2 of the License, or
  15 * (at your option) any later version.
  16 *
  17 * This program is distributed in the hope that it will be useful,
  18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20 * GNU General Public License for more details.
  21 ****************************************************************************/
  22
  23#include <linux/module.h>
  24#include <linux/moduleparam.h>
  25#include <linux/init.h>
  26#include <linux/slab.h>
  27#include <linux/types.h>
  28#include <linux/configfs.h>
  29#include <scsi/scsi.h>
  30#include <scsi/scsi_tcq.h>
  31#include <scsi/scsi_host.h>
  32#include <scsi/scsi_device.h>
  33#include <scsi/scsi_cmnd.h>
  34
  35#include <target/target_core_base.h>
  36#include <target/target_core_fabric.h>
 
  37#include <target/target_core_fabric_configfs.h>
 
  38#include <target/target_core_configfs.h>
 
 
 
  39
  40#include "tcm_loop.h"
  41
  42#define to_tcm_loop_hba(hba)	container_of(hba, struct tcm_loop_hba, dev)
  43
  44/* Local pointer to allocated TCM configfs fabric module */
  45static struct target_fabric_configfs *tcm_loop_fabric_configfs;
  46
  47static struct workqueue_struct *tcm_loop_workqueue;
  48static struct kmem_cache *tcm_loop_cmd_cache;
  49
  50static int tcm_loop_hba_no_cnt;
  51
  52static int tcm_loop_queue_status(struct se_cmd *se_cmd);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
  53
  54/*
  55 * Called from struct target_core_fabric_ops->check_stop_free()
  56 */
  57static int tcm_loop_check_stop_free(struct se_cmd *se_cmd)
  58{
  59	/*
  60	 * Do not release struct se_cmd's containing a valid TMR
  61	 * pointer.  These will be released directly in tcm_loop_device_reset()
  62	 * with transport_generic_free_cmd().
  63	 */
  64	if (se_cmd->se_cmd_flags & SCF_SCSI_TMR_CDB)
  65		return 0;
  66	/*
  67	 * Release the struct se_cmd, which will make a callback to release
  68	 * struct tcm_loop_cmd * in tcm_loop_deallocate_core_cmd()
  69	 */
  70	transport_generic_free_cmd(se_cmd, 0);
  71	return 1;
  72}
  73
  74static void tcm_loop_release_cmd(struct se_cmd *se_cmd)
  75{
  76	struct tcm_loop_cmd *tl_cmd = container_of(se_cmd,
  77				struct tcm_loop_cmd, tl_se_cmd);
  78
  79	kmem_cache_free(tcm_loop_cmd_cache, tl_cmd);
  80}
  81
  82static int tcm_loop_show_info(struct seq_file *m, struct Scsi_Host *host)
 
 
  83{
  84	seq_printf(m, "tcm_loop_proc_info()\n");
  85	return 0;
  86}
  87
  88static int tcm_loop_driver_probe(struct device *);
  89static int tcm_loop_driver_remove(struct device *);
  90
  91static int pseudo_lld_bus_match(struct device *dev,
  92				struct device_driver *dev_driver)
  93{
  94	return 1;
  95}
  96
  97static struct bus_type tcm_loop_lld_bus = {
  98	.name			= "tcm_loop_bus",
  99	.match			= pseudo_lld_bus_match,
 100	.probe			= tcm_loop_driver_probe,
 101	.remove			= tcm_loop_driver_remove,
 102};
 103
 104static struct device_driver tcm_loop_driverfs = {
 105	.name			= "tcm_loop",
 106	.bus			= &tcm_loop_lld_bus,
 107};
 108/*
 109 * Used with root_device_register() in tcm_loop_alloc_core_bus() below
 110 */
 111struct device *tcm_loop_primary;
 112
 113/*
 114 * Copied from drivers/scsi/libfc/fc_fcp.c:fc_change_queue_depth() and
 115 * drivers/scsi/libiscsi.c:iscsi_change_queue_depth()
 116 */
 117static int tcm_loop_change_queue_depth(
 118	struct scsi_device *sdev,
 119	int depth,
 120	int reason)
 121{
 122	switch (reason) {
 123	case SCSI_QDEPTH_DEFAULT:
 124		scsi_adjust_queue_depth(sdev, scsi_get_tag_type(sdev), depth);
 125		break;
 126	case SCSI_QDEPTH_QFULL:
 127		scsi_track_queue_full(sdev, depth);
 128		break;
 129	case SCSI_QDEPTH_RAMP_UP:
 130		scsi_adjust_queue_depth(sdev, scsi_get_tag_type(sdev), depth);
 131		break;
 132	default:
 133		return -EOPNOTSUPP;
 134	}
 135	return sdev->queue_depth;
 136}
 137
 138static int tcm_loop_change_queue_type(struct scsi_device *sdev, int tag)
 139{
 140	if (sdev->tagged_supported) {
 141		scsi_set_tag_type(sdev, tag);
 142
 143		if (tag)
 144			scsi_activate_tcq(sdev, sdev->queue_depth);
 145		else
 146			scsi_deactivate_tcq(sdev, sdev->queue_depth);
 147	} else
 148		tag = 0;
 149
 150	return tag;
 151}
 152
 153/*
 154 * Locate the SAM Task Attr from struct scsi_cmnd *
 
 155 */
 156static int tcm_loop_sam_attr(struct scsi_cmnd *sc)
 
 
 157{
 158	if (sc->device->tagged_supported) {
 159		switch (sc->tag) {
 160		case HEAD_OF_QUEUE_TAG:
 161			return MSG_HEAD_TAG;
 162		case ORDERED_QUEUE_TAG:
 163			return MSG_ORDERED_TAG;
 164		default:
 165			break;
 166		}
 167	}
 168
 169	return MSG_SIMPLE_TAG;
 170}
 171
 172static void tcm_loop_submission_work(struct work_struct *work)
 173{
 174	struct tcm_loop_cmd *tl_cmd =
 175		container_of(work, struct tcm_loop_cmd, work);
 176	struct se_cmd *se_cmd = &tl_cmd->tl_se_cmd;
 177	struct scsi_cmnd *sc = tl_cmd->sc;
 178	struct tcm_loop_nexus *tl_nexus;
 179	struct tcm_loop_hba *tl_hba;
 180	struct tcm_loop_tpg *tl_tpg;
 181	struct scatterlist *sgl_bidi = NULL;
 182	u32 sgl_bidi_count = 0;
 183	int rc;
 184
 
 
 
 
 
 
 
 185	tl_hba = *(struct tcm_loop_hba **)shost_priv(sc->device->host);
 186	tl_tpg = &tl_hba->tl_hba_tpgs[sc->device->id];
 187
 188	/*
 189	 * Ensure that this tl_tpg reference from the incoming sc->device->id
 190	 * has already been configured via tcm_loop_make_naa_tpg().
 191	 */
 192	if (!tl_tpg->tl_hba) {
 193		set_host_byte(sc, DID_NO_CONNECT);
 194		goto out_done;
 195	}
 196	if (tl_tpg->tl_transport_status == TCM_TRANSPORT_OFFLINE) {
 197		set_host_byte(sc, DID_TRANSPORT_DISRUPTED);
 198		goto out_done;
 199	}
 200	tl_nexus = tl_hba->tl_nexus;
 201	if (!tl_nexus) {
 202		scmd_printk(KERN_ERR, sc, "TCM_Loop I_T Nexus"
 203				" does not exist\n");
 204		set_host_byte(sc, DID_ERROR);
 205		goto out_done;
 206	}
 207	if (scsi_bidi_cmnd(sc)) {
 208		struct scsi_data_buffer *sdb = scsi_in(sc);
 209
 210		sgl_bidi = sdb->table.sgl;
 211		sgl_bidi_count = sdb->table.nents;
 212		se_cmd->se_cmd_flags |= SCF_BIDI;
 213
 214	}
 215
 216	if (!scsi_prot_sg_count(sc) && scsi_get_prot_op(sc) != SCSI_PROT_NORMAL)
 217		se_cmd->prot_pto = true;
 218
 219	rc = target_submit_cmd_map_sgls(se_cmd, tl_nexus->se_sess, sc->cmnd,
 220			&tl_cmd->tl_sense_buf[0], tl_cmd->sc->device->lun,
 221			scsi_bufflen(sc), tcm_loop_sam_attr(sc),
 222			sc->sc_data_direction, 0,
 223			scsi_sglist(sc), scsi_sg_count(sc),
 224			sgl_bidi, sgl_bidi_count,
 225			scsi_prot_sglist(sc), scsi_prot_sg_count(sc));
 226	if (rc < 0) {
 227		set_host_byte(sc, DID_NO_CONNECT);
 228		goto out_done;
 229	}
 230	return;
 231
 232out_done:
 233	sc->scsi_done(sc);
 234	return;
 235}
 236
 237/*
 238 * ->queuecommand can be and usually is called from interrupt context, so
 239 * defer the actual submission to a workqueue.
 240 */
 241static int tcm_loop_queuecommand(struct Scsi_Host *sh, struct scsi_cmnd *sc)
 242{
 243	struct tcm_loop_cmd *tl_cmd;
 244
 245	pr_debug("tcm_loop_queuecommand() %d:%d:%d:%d got CDB: 0x%02x"
 246		" scsi_buf_len: %u\n", sc->device->host->host_no,
 247		sc->device->id, sc->device->channel, sc->device->lun,
 248		sc->cmnd[0], scsi_bufflen(sc));
 249
 250	tl_cmd = kmem_cache_zalloc(tcm_loop_cmd_cache, GFP_ATOMIC);
 251	if (!tl_cmd) {
 252		pr_err("Unable to allocate struct tcm_loop_cmd\n");
 253		set_host_byte(sc, DID_ERROR);
 254		sc->scsi_done(sc);
 255		return 0;
 256	}
 257
 258	tl_cmd->sc = sc;
 259	tl_cmd->sc_cmd_tag = sc->tag;
 260	INIT_WORK(&tl_cmd->work, tcm_loop_submission_work);
 261	queue_work(tcm_loop_workqueue, &tl_cmd->work);
 262	return 0;
 263}
 264
 265/*
 266 * Called from SCSI EH process context to issue a LUN_RESET TMR
 267 * to struct scsi_device
 268 */
 269static int tcm_loop_issue_tmr(struct tcm_loop_tpg *tl_tpg,
 270			      struct tcm_loop_nexus *tl_nexus,
 271			      int lun, int task, enum tcm_tmreq_table tmr)
 272{
 273	struct se_cmd *se_cmd = NULL;
 
 274	struct se_session *se_sess;
 275	struct se_portal_group *se_tpg;
 276	struct tcm_loop_cmd *tl_cmd = NULL;
 
 
 277	struct tcm_loop_tmr *tl_tmr = NULL;
 278	int ret = TMR_FUNCTION_FAILED, rc;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 279
 280	tl_cmd = kmem_cache_zalloc(tcm_loop_cmd_cache, GFP_KERNEL);
 281	if (!tl_cmd) {
 282		pr_err("Unable to allocate memory for tl_cmd\n");
 283		return ret;
 284	}
 285
 286	tl_tmr = kzalloc(sizeof(struct tcm_loop_tmr), GFP_KERNEL);
 287	if (!tl_tmr) {
 288		pr_err("Unable to allocate memory for tl_tmr\n");
 289		goto release;
 290	}
 291	init_waitqueue_head(&tl_tmr->tl_tmr_wait);
 292
 293	se_cmd = &tl_cmd->tl_se_cmd;
 294	se_tpg = &tl_tpg->tl_se_tpg;
 295	se_sess = tl_nexus->se_sess;
 296	/*
 297	 * Initialize struct se_cmd descriptor from target_core_mod infrastructure
 298	 */
 299	transport_init_se_cmd(se_cmd, se_tpg->se_tpg_tfo, se_sess, 0,
 300				DMA_NONE, MSG_SIMPLE_TAG,
 301				&tl_cmd->tl_sense_buf[0]);
 302
 303	rc = core_tmr_alloc_req(se_cmd, tl_tmr, tmr, GFP_KERNEL);
 304	if (rc < 0)
 
 
 
 305		goto release;
 306
 307	if (tmr == TMR_ABORT_TASK)
 308		se_cmd->se_tmr_req->ref_task_tag = task;
 309
 310	/*
 311	 * Locate the underlying TCM struct se_lun
 312	 */
 313	if (transport_lookup_tmr_lun(se_cmd, lun) < 0) {
 314		ret = TMR_LUN_DOES_NOT_EXIST;
 315		goto release;
 316	}
 317	/*
 318	 * Queue the TMR to TCM Core and sleep waiting for
 319	 * tcm_loop_queue_tm_rsp() to wake us up.
 320	 */
 321	transport_generic_handle_tmr(se_cmd);
 322	wait_event(tl_tmr->tl_tmr_wait, atomic_read(&tl_tmr->tmr_complete));
 323	/*
 324	 * The TMR LUN_RESET has completed, check the response status and
 325	 * then release allocations.
 326	 */
 327	ret = se_cmd->se_tmr_req->response;
 
 328release:
 329	if (se_cmd)
 330		transport_generic_free_cmd(se_cmd, 1);
 331	else
 332		kmem_cache_free(tcm_loop_cmd_cache, tl_cmd);
 333	kfree(tl_tmr);
 334	return ret;
 335}
 336
 337static int tcm_loop_abort_task(struct scsi_cmnd *sc)
 338{
 339	struct tcm_loop_hba *tl_hba;
 340	struct tcm_loop_nexus *tl_nexus;
 341	struct tcm_loop_tpg *tl_tpg;
 342	int ret = FAILED;
 343
 344	/*
 345	 * Locate the tcm_loop_hba_t pointer
 346	 */
 347	tl_hba = *(struct tcm_loop_hba **)shost_priv(sc->device->host);
 348	/*
 349	 * Locate the tl_nexus and se_sess pointers
 350	 */
 351	tl_nexus = tl_hba->tl_nexus;
 352	if (!tl_nexus) {
 353		pr_err("Unable to perform device reset without"
 354				" active I_T Nexus\n");
 355		return FAILED;
 356	}
 357
 358	/*
 359	 * Locate the tl_tpg pointer from TargetID in sc->device->id
 360	 */
 361	tl_tpg = &tl_hba->tl_hba_tpgs[sc->device->id];
 362	ret = tcm_loop_issue_tmr(tl_tpg, tl_nexus, sc->device->lun,
 363				 sc->tag, TMR_ABORT_TASK);
 364	return (ret == TMR_FUNCTION_COMPLETE) ? SUCCESS : FAILED;
 365}
 366
 367/*
 368 * Called from SCSI EH process context to issue a LUN_RESET TMR
 369 * to struct scsi_device
 370 */
 371static int tcm_loop_device_reset(struct scsi_cmnd *sc)
 372{
 373	struct tcm_loop_hba *tl_hba;
 374	struct tcm_loop_nexus *tl_nexus;
 375	struct tcm_loop_tpg *tl_tpg;
 376	int ret = FAILED;
 377
 378	/*
 379	 * Locate the tcm_loop_hba_t pointer
 380	 */
 381	tl_hba = *(struct tcm_loop_hba **)shost_priv(sc->device->host);
 382	/*
 383	 * Locate the tl_nexus and se_sess pointers
 384	 */
 385	tl_nexus = tl_hba->tl_nexus;
 386	if (!tl_nexus) {
 387		pr_err("Unable to perform device reset without"
 388				" active I_T Nexus\n");
 389		return FAILED;
 390	}
 391	/*
 392	 * Locate the tl_tpg pointer from TargetID in sc->device->id
 393	 */
 394	tl_tpg = &tl_hba->tl_hba_tpgs[sc->device->id];
 395	ret = tcm_loop_issue_tmr(tl_tpg, tl_nexus, sc->device->lun,
 396				 0, TMR_LUN_RESET);
 397	return (ret == TMR_FUNCTION_COMPLETE) ? SUCCESS : FAILED;
 398}
 399
 400static int tcm_loop_target_reset(struct scsi_cmnd *sc)
 401{
 402	struct tcm_loop_hba *tl_hba;
 403	struct tcm_loop_tpg *tl_tpg;
 404
 405	/*
 406	 * Locate the tcm_loop_hba_t pointer
 407	 */
 408	tl_hba = *(struct tcm_loop_hba **)shost_priv(sc->device->host);
 409	if (!tl_hba) {
 410		pr_err("Unable to perform device reset without"
 411				" active I_T Nexus\n");
 412		return FAILED;
 413	}
 414	/*
 415	 * Locate the tl_tpg pointer from TargetID in sc->device->id
 416	 */
 417	tl_tpg = &tl_hba->tl_hba_tpgs[sc->device->id];
 418	if (tl_tpg) {
 419		tl_tpg->tl_transport_status = TCM_TRANSPORT_ONLINE;
 420		return SUCCESS;
 421	}
 422	return FAILED;
 423}
 424
 425static int tcm_loop_slave_alloc(struct scsi_device *sd)
 426{
 427	set_bit(QUEUE_FLAG_BIDI, &sd->request_queue->queue_flags);
 428	return 0;
 429}
 430
 431static int tcm_loop_slave_configure(struct scsi_device *sd)
 432{
 433	if (sd->tagged_supported) {
 434		scsi_activate_tcq(sd, sd->queue_depth);
 435		scsi_adjust_queue_depth(sd, MSG_SIMPLE_TAG,
 436					sd->host->cmd_per_lun);
 437	} else {
 438		scsi_adjust_queue_depth(sd, 0,
 439					sd->host->cmd_per_lun);
 440	}
 441
 442	return 0;
 443}
 444
 445static struct scsi_host_template tcm_loop_driver_template = {
 446	.show_info		= tcm_loop_show_info,
 447	.proc_name		= "tcm_loopback",
 448	.name			= "TCM_Loopback",
 449	.queuecommand		= tcm_loop_queuecommand,
 450	.change_queue_depth	= tcm_loop_change_queue_depth,
 451	.change_queue_type	= tcm_loop_change_queue_type,
 452	.eh_abort_handler = tcm_loop_abort_task,
 453	.eh_device_reset_handler = tcm_loop_device_reset,
 454	.eh_target_reset_handler = tcm_loop_target_reset,
 455	.can_queue		= 1024,
 456	.this_id		= -1,
 457	.sg_tablesize		= 256,
 458	.cmd_per_lun		= 1024,
 459	.max_sectors		= 0xFFFF,
 460	.use_clustering		= DISABLE_CLUSTERING,
 461	.slave_alloc		= tcm_loop_slave_alloc,
 462	.slave_configure	= tcm_loop_slave_configure,
 463	.module			= THIS_MODULE,
 464};
 465
 466static int tcm_loop_driver_probe(struct device *dev)
 467{
 468	struct tcm_loop_hba *tl_hba;
 469	struct Scsi_Host *sh;
 470	int error, host_prot;
 471
 472	tl_hba = to_tcm_loop_hba(dev);
 473
 474	sh = scsi_host_alloc(&tcm_loop_driver_template,
 475			sizeof(struct tcm_loop_hba));
 476	if (!sh) {
 477		pr_err("Unable to allocate struct scsi_host\n");
 478		return -ENODEV;
 479	}
 480	tl_hba->sh = sh;
 481
 482	/*
 483	 * Assign the struct tcm_loop_hba pointer to struct Scsi_Host->hostdata
 484	 */
 485	*((struct tcm_loop_hba **)sh->hostdata) = tl_hba;
 486	/*
 487	 * Setup single ID, Channel and LUN for now..
 488	 */
 489	sh->max_id = 2;
 490	sh->max_lun = 0;
 491	sh->max_channel = 0;
 492	sh->max_cmd_len = TL_SCSI_MAX_CMD_LEN;
 493
 494	host_prot = SHOST_DIF_TYPE1_PROTECTION | SHOST_DIF_TYPE2_PROTECTION |
 495		    SHOST_DIF_TYPE3_PROTECTION | SHOST_DIX_TYPE1_PROTECTION |
 496		    SHOST_DIX_TYPE2_PROTECTION | SHOST_DIX_TYPE3_PROTECTION;
 497
 498	scsi_host_set_prot(sh, host_prot);
 499	scsi_host_set_guard(sh, SHOST_DIX_GUARD_CRC);
 500
 501	error = scsi_add_host(sh, &tl_hba->dev);
 502	if (error) {
 503		pr_err("%s: scsi_add_host failed\n", __func__);
 504		scsi_host_put(sh);
 505		return -ENODEV;
 506	}
 507	return 0;
 508}
 509
 510static int tcm_loop_driver_remove(struct device *dev)
 511{
 512	struct tcm_loop_hba *tl_hba;
 513	struct Scsi_Host *sh;
 514
 515	tl_hba = to_tcm_loop_hba(dev);
 516	sh = tl_hba->sh;
 517
 518	scsi_remove_host(sh);
 519	scsi_host_put(sh);
 520	return 0;
 521}
 522
 523static void tcm_loop_release_adapter(struct device *dev)
 524{
 525	struct tcm_loop_hba *tl_hba = to_tcm_loop_hba(dev);
 526
 527	kfree(tl_hba);
 528}
 529
 530/*
 531 * Called from tcm_loop_make_scsi_hba() in tcm_loop_configfs.c
 532 */
 533static int tcm_loop_setup_hba_bus(struct tcm_loop_hba *tl_hba, int tcm_loop_host_id)
 534{
 535	int ret;
 536
 537	tl_hba->dev.bus = &tcm_loop_lld_bus;
 538	tl_hba->dev.parent = tcm_loop_primary;
 539	tl_hba->dev.release = &tcm_loop_release_adapter;
 540	dev_set_name(&tl_hba->dev, "tcm_loop_adapter_%d", tcm_loop_host_id);
 541
 542	ret = device_register(&tl_hba->dev);
 543	if (ret) {
 544		pr_err("device_register() failed for"
 545				" tl_hba->dev: %d\n", ret);
 546		return -ENODEV;
 547	}
 548
 549	return 0;
 550}
 551
 552/*
 553 * Called from tcm_loop_fabric_init() in tcl_loop_fabric.c to load the emulated
 554 * tcm_loop SCSI bus.
 555 */
 556static int tcm_loop_alloc_core_bus(void)
 557{
 558	int ret;
 559
 560	tcm_loop_primary = root_device_register("tcm_loop_0");
 561	if (IS_ERR(tcm_loop_primary)) {
 562		pr_err("Unable to allocate tcm_loop_primary\n");
 563		return PTR_ERR(tcm_loop_primary);
 564	}
 565
 566	ret = bus_register(&tcm_loop_lld_bus);
 567	if (ret) {
 568		pr_err("bus_register() failed for tcm_loop_lld_bus\n");
 569		goto dev_unreg;
 570	}
 571
 572	ret = driver_register(&tcm_loop_driverfs);
 573	if (ret) {
 574		pr_err("driver_register() failed for"
 575				"tcm_loop_driverfs\n");
 576		goto bus_unreg;
 577	}
 578
 579	pr_debug("Initialized TCM Loop Core Bus\n");
 580	return ret;
 581
 582bus_unreg:
 583	bus_unregister(&tcm_loop_lld_bus);
 584dev_unreg:
 585	root_device_unregister(tcm_loop_primary);
 586	return ret;
 587}
 588
 589static void tcm_loop_release_core_bus(void)
 590{
 591	driver_unregister(&tcm_loop_driverfs);
 592	bus_unregister(&tcm_loop_lld_bus);
 593	root_device_unregister(tcm_loop_primary);
 594
 595	pr_debug("Releasing TCM Loop Core BUS\n");
 596}
 597
 598static char *tcm_loop_get_fabric_name(void)
 599{
 600	return "loopback";
 601}
 602
 603static u8 tcm_loop_get_fabric_proto_ident(struct se_portal_group *se_tpg)
 604{
 605	struct tcm_loop_tpg *tl_tpg = se_tpg->se_tpg_fabric_ptr;
 
 606	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 607	/*
 608	 * tl_proto_id is set at tcm_loop_configfs.c:tcm_loop_make_scsi_hba()
 609	 * time based on the protocol dependent prefix of the passed configfs group.
 610	 *
 611	 * Based upon tl_proto_id, TCM_Loop emulates the requested fabric
 612	 * ProtocolID using target_core_fabric_lib.c symbols.
 613	 */
 614	switch (tl_hba->tl_proto_id) {
 615	case SCSI_PROTOCOL_SAS:
 616		return sas_get_fabric_proto_ident(se_tpg);
 617	case SCSI_PROTOCOL_FCP:
 618		return fc_get_fabric_proto_ident(se_tpg);
 619	case SCSI_PROTOCOL_ISCSI:
 620		return iscsi_get_fabric_proto_ident(se_tpg);
 621	default:
 622		pr_err("Unknown tl_proto_id: 0x%02x, using"
 623			" SAS emulation\n", tl_hba->tl_proto_id);
 624		break;
 625	}
 626
 627	return sas_get_fabric_proto_ident(se_tpg);
 628}
 629
 630static char *tcm_loop_get_endpoint_wwn(struct se_portal_group *se_tpg)
 631{
 632	struct tcm_loop_tpg *tl_tpg = se_tpg->se_tpg_fabric_ptr;
 
 633	/*
 634	 * Return the passed NAA identifier for the SAS Target Port
 635	 */
 636	return &tl_tpg->tl_hba->tl_wwn_address[0];
 637}
 638
 639static u16 tcm_loop_get_tag(struct se_portal_group *se_tpg)
 640{
 641	struct tcm_loop_tpg *tl_tpg = se_tpg->se_tpg_fabric_ptr;
 
 642	/*
 643	 * This Tag is used when forming SCSI Name identifier in EVPD=1 0x83
 644	 * to represent the SCSI Target Port.
 645	 */
 646	return tl_tpg->tl_tpgt;
 647}
 648
 649static u32 tcm_loop_get_default_depth(struct se_portal_group *se_tpg)
 650{
 651	return 1;
 652}
 653
 654static u32 tcm_loop_get_pr_transport_id(
 655	struct se_portal_group *se_tpg,
 656	struct se_node_acl *se_nacl,
 657	struct t10_pr_registration *pr_reg,
 658	int *format_code,
 659	unsigned char *buf)
 660{
 661	struct tcm_loop_tpg *tl_tpg = se_tpg->se_tpg_fabric_ptr;
 
 662	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 663
 664	switch (tl_hba->tl_proto_id) {
 665	case SCSI_PROTOCOL_SAS:
 666		return sas_get_pr_transport_id(se_tpg, se_nacl, pr_reg,
 667					format_code, buf);
 668	case SCSI_PROTOCOL_FCP:
 669		return fc_get_pr_transport_id(se_tpg, se_nacl, pr_reg,
 670					format_code, buf);
 671	case SCSI_PROTOCOL_ISCSI:
 672		return iscsi_get_pr_transport_id(se_tpg, se_nacl, pr_reg,
 673					format_code, buf);
 674	default:
 675		pr_err("Unknown tl_proto_id: 0x%02x, using"
 676			" SAS emulation\n", tl_hba->tl_proto_id);
 677		break;
 678	}
 679
 680	return sas_get_pr_transport_id(se_tpg, se_nacl, pr_reg,
 681			format_code, buf);
 682}
 683
 684static u32 tcm_loop_get_pr_transport_id_len(
 685	struct se_portal_group *se_tpg,
 686	struct se_node_acl *se_nacl,
 687	struct t10_pr_registration *pr_reg,
 688	int *format_code)
 689{
 690	struct tcm_loop_tpg *tl_tpg = se_tpg->se_tpg_fabric_ptr;
 
 691	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 692
 693	switch (tl_hba->tl_proto_id) {
 694	case SCSI_PROTOCOL_SAS:
 695		return sas_get_pr_transport_id_len(se_tpg, se_nacl, pr_reg,
 696					format_code);
 697	case SCSI_PROTOCOL_FCP:
 698		return fc_get_pr_transport_id_len(se_tpg, se_nacl, pr_reg,
 699					format_code);
 700	case SCSI_PROTOCOL_ISCSI:
 701		return iscsi_get_pr_transport_id_len(se_tpg, se_nacl, pr_reg,
 702					format_code);
 703	default:
 704		pr_err("Unknown tl_proto_id: 0x%02x, using"
 705			" SAS emulation\n", tl_hba->tl_proto_id);
 706		break;
 707	}
 708
 709	return sas_get_pr_transport_id_len(se_tpg, se_nacl, pr_reg,
 710			format_code);
 711}
 712
 713/*
 714 * Used for handling SCSI fabric dependent TransportIDs in SPC-3 and above
 715 * Persistent Reservation SPEC_I_PT=1 and PROUT REGISTER_AND_MOVE operations.
 716 */
 717static char *tcm_loop_parse_pr_out_transport_id(
 718	struct se_portal_group *se_tpg,
 719	const char *buf,
 720	u32 *out_tid_len,
 721	char **port_nexus_ptr)
 722{
 723	struct tcm_loop_tpg *tl_tpg = se_tpg->se_tpg_fabric_ptr;
 
 724	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 725
 726	switch (tl_hba->tl_proto_id) {
 727	case SCSI_PROTOCOL_SAS:
 728		return sas_parse_pr_out_transport_id(se_tpg, buf, out_tid_len,
 729					port_nexus_ptr);
 730	case SCSI_PROTOCOL_FCP:
 731		return fc_parse_pr_out_transport_id(se_tpg, buf, out_tid_len,
 732					port_nexus_ptr);
 733	case SCSI_PROTOCOL_ISCSI:
 734		return iscsi_parse_pr_out_transport_id(se_tpg, buf, out_tid_len,
 735					port_nexus_ptr);
 736	default:
 737		pr_err("Unknown tl_proto_id: 0x%02x, using"
 738			" SAS emulation\n", tl_hba->tl_proto_id);
 739		break;
 740	}
 741
 742	return sas_parse_pr_out_transport_id(se_tpg, buf, out_tid_len,
 743			port_nexus_ptr);
 744}
 745
 746/*
 747 * Returning (1) here allows for target_core_mod struct se_node_acl to be generated
 748 * based upon the incoming fabric dependent SCSI Initiator Port
 749 */
 750static int tcm_loop_check_demo_mode(struct se_portal_group *se_tpg)
 751{
 752	return 1;
 753}
 754
 755static int tcm_loop_check_demo_mode_cache(struct se_portal_group *se_tpg)
 756{
 757	return 0;
 758}
 759
 760/*
 761 * Allow I_T Nexus full READ-WRITE access without explict Initiator Node ACLs for
 762 * local virtual Linux/SCSI LLD passthrough into VM hypervisor guest
 763 */
 764static int tcm_loop_check_demo_mode_write_protect(struct se_portal_group *se_tpg)
 765{
 766	return 0;
 767}
 768
 769/*
 770 * Because TCM_Loop does not use explict ACLs and MappedLUNs, this will
 771 * never be called for TCM_Loop by target_core_fabric_configfs.c code.
 772 * It has been added here as a nop for target_fabric_tf_ops_check()
 773 */
 774static int tcm_loop_check_prod_mode_write_protect(struct se_portal_group *se_tpg)
 775{
 776	return 0;
 777}
 778
 779static struct se_node_acl *tcm_loop_tpg_alloc_fabric_acl(
 780	struct se_portal_group *se_tpg)
 781{
 782	struct tcm_loop_nacl *tl_nacl;
 783
 784	tl_nacl = kzalloc(sizeof(struct tcm_loop_nacl), GFP_KERNEL);
 785	if (!tl_nacl) {
 786		pr_err("Unable to allocate struct tcm_loop_nacl\n");
 787		return NULL;
 788	}
 789
 790	return &tl_nacl->se_node_acl;
 791}
 792
 793static void tcm_loop_tpg_release_fabric_acl(
 794	struct se_portal_group *se_tpg,
 795	struct se_node_acl *se_nacl)
 796{
 797	struct tcm_loop_nacl *tl_nacl = container_of(se_nacl,
 798				struct tcm_loop_nacl, se_node_acl);
 799
 800	kfree(tl_nacl);
 801}
 802
 803static u32 tcm_loop_get_inst_index(struct se_portal_group *se_tpg)
 804{
 805	return 1;
 806}
 807
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 808static u32 tcm_loop_sess_get_index(struct se_session *se_sess)
 809{
 810	return 1;
 811}
 812
 813static void tcm_loop_set_default_node_attributes(struct se_node_acl *se_acl)
 814{
 815	return;
 816}
 817
 818static u32 tcm_loop_get_task_tag(struct se_cmd *se_cmd)
 819{
 820	struct tcm_loop_cmd *tl_cmd = container_of(se_cmd,
 821			struct tcm_loop_cmd, tl_se_cmd);
 822
 823	return tl_cmd->sc_cmd_tag;
 824}
 825
 826static int tcm_loop_get_cmd_state(struct se_cmd *se_cmd)
 827{
 828	struct tcm_loop_cmd *tl_cmd = container_of(se_cmd,
 829			struct tcm_loop_cmd, tl_se_cmd);
 830
 831	return tl_cmd->sc_cmd_state;
 832}
 833
 834static int tcm_loop_shutdown_session(struct se_session *se_sess)
 835{
 836	return 0;
 837}
 838
 839static void tcm_loop_close_session(struct se_session *se_sess)
 840{
 841	return;
 842};
 843
 
 
 
 
 
 
 
 
 
 
 
 
 
 844static int tcm_loop_write_pending(struct se_cmd *se_cmd)
 845{
 846	/*
 847	 * Since Linux/SCSI has already sent down a struct scsi_cmnd
 848	 * sc->sc_data_direction of DMA_TO_DEVICE with struct scatterlist array
 849	 * memory, and memory has already been mapped to struct se_cmd->t_mem_list
 850	 * format with transport_generic_map_mem_to_cmd().
 851	 *
 852	 * We now tell TCM to add this WRITE CDB directly into the TCM storage
 853	 * object execution queue.
 854	 */
 855	target_execute_cmd(se_cmd);
 856	return 0;
 857}
 858
 859static int tcm_loop_write_pending_status(struct se_cmd *se_cmd)
 860{
 861	return 0;
 862}
 863
 864static int tcm_loop_queue_data_in(struct se_cmd *se_cmd)
 865{
 866	struct tcm_loop_cmd *tl_cmd = container_of(se_cmd,
 867				struct tcm_loop_cmd, tl_se_cmd);
 868	struct scsi_cmnd *sc = tl_cmd->sc;
 869
 870	pr_debug("tcm_loop_queue_data_in() called for scsi_cmnd: %p"
 871		     " cdb: 0x%02x\n", sc, sc->cmnd[0]);
 872
 873	sc->result = SAM_STAT_GOOD;
 874	set_host_byte(sc, DID_OK);
 875	if ((se_cmd->se_cmd_flags & SCF_OVERFLOW_BIT) ||
 876	    (se_cmd->se_cmd_flags & SCF_UNDERFLOW_BIT))
 877		scsi_set_resid(sc, se_cmd->residual_count);
 878	sc->scsi_done(sc);
 879	return 0;
 880}
 881
 882static int tcm_loop_queue_status(struct se_cmd *se_cmd)
 883{
 884	struct tcm_loop_cmd *tl_cmd = container_of(se_cmd,
 885				struct tcm_loop_cmd, tl_se_cmd);
 886	struct scsi_cmnd *sc = tl_cmd->sc;
 887
 888	pr_debug("tcm_loop_queue_status() called for scsi_cmnd: %p"
 889			" cdb: 0x%02x\n", sc, sc->cmnd[0]);
 890
 891	if (se_cmd->sense_buffer &&
 892	   ((se_cmd->se_cmd_flags & SCF_TRANSPORT_TASK_SENSE) ||
 893	    (se_cmd->se_cmd_flags & SCF_EMULATED_TASK_SENSE))) {
 894
 895		memcpy(sc->sense_buffer, se_cmd->sense_buffer,
 896				SCSI_SENSE_BUFFERSIZE);
 897		sc->result = SAM_STAT_CHECK_CONDITION;
 898		set_driver_byte(sc, DRIVER_SENSE);
 899	} else
 900		sc->result = se_cmd->scsi_status;
 901
 902	set_host_byte(sc, DID_OK);
 903	if ((se_cmd->se_cmd_flags & SCF_OVERFLOW_BIT) ||
 904	    (se_cmd->se_cmd_flags & SCF_UNDERFLOW_BIT))
 905		scsi_set_resid(sc, se_cmd->residual_count);
 906	sc->scsi_done(sc);
 907	return 0;
 908}
 909
 910static void tcm_loop_queue_tm_rsp(struct se_cmd *se_cmd)
 911{
 912	struct se_tmr_req *se_tmr = se_cmd->se_tmr_req;
 913	struct tcm_loop_tmr *tl_tmr = se_tmr->fabric_tmr_ptr;
 914	/*
 915	 * The SCSI EH thread will be sleeping on se_tmr->tl_tmr_wait, go ahead
 916	 * and wake up the wait_queue_head_t in tcm_loop_device_reset()
 917	 */
 918	atomic_set(&tl_tmr->tmr_complete, 1);
 919	wake_up(&tl_tmr->tl_tmr_wait);
 
 
 
 
 
 
 920}
 921
 922static void tcm_loop_aborted_task(struct se_cmd *se_cmd)
 923{
 924	return;
 925}
 926
 927static char *tcm_loop_dump_proto_id(struct tcm_loop_hba *tl_hba)
 928{
 929	switch (tl_hba->tl_proto_id) {
 930	case SCSI_PROTOCOL_SAS:
 931		return "SAS";
 932	case SCSI_PROTOCOL_FCP:
 933		return "FCP";
 934	case SCSI_PROTOCOL_ISCSI:
 935		return "iSCSI";
 936	default:
 937		break;
 938	}
 939
 940	return "Unknown";
 941}
 942
 943/* Start items for tcm_loop_port_cit */
 944
 945static int tcm_loop_port_link(
 946	struct se_portal_group *se_tpg,
 947	struct se_lun *lun)
 948{
 949	struct tcm_loop_tpg *tl_tpg = container_of(se_tpg,
 950				struct tcm_loop_tpg, tl_se_tpg);
 951	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
 952
 953	atomic_inc(&tl_tpg->tl_tpg_port_count);
 954	smp_mb__after_atomic_inc();
 955	/*
 956	 * Add Linux/SCSI struct scsi_device by HCTL
 957	 */
 958	scsi_add_device(tl_hba->sh, 0, tl_tpg->tl_tpgt, lun->unpacked_lun);
 959
 960	pr_debug("TCM_Loop_ConfigFS: Port Link Successful\n");
 961	return 0;
 962}
 963
 964static void tcm_loop_port_unlink(
 965	struct se_portal_group *se_tpg,
 966	struct se_lun *se_lun)
 967{
 968	struct scsi_device *sd;
 969	struct tcm_loop_hba *tl_hba;
 970	struct tcm_loop_tpg *tl_tpg;
 971
 972	tl_tpg = container_of(se_tpg, struct tcm_loop_tpg, tl_se_tpg);
 973	tl_hba = tl_tpg->tl_hba;
 974
 975	sd = scsi_device_lookup(tl_hba->sh, 0, tl_tpg->tl_tpgt,
 976				se_lun->unpacked_lun);
 977	if (!sd) {
 978		pr_err("Unable to locate struct scsi_device for %d:%d:"
 979			"%d\n", 0, tl_tpg->tl_tpgt, se_lun->unpacked_lun);
 980		return;
 981	}
 982	/*
 983	 * Remove Linux/SCSI struct scsi_device by HCTL
 984	 */
 985	scsi_remove_device(sd);
 986	scsi_device_put(sd);
 987
 988	atomic_dec(&tl_tpg->tl_tpg_port_count);
 989	smp_mb__after_atomic_dec();
 990
 991	pr_debug("TCM_Loop_ConfigFS: Port Unlink Successful\n");
 992}
 993
 994/* End items for tcm_loop_port_cit */
 995
 996/* Start items for tcm_loop_nexus_cit */
 997
 998static int tcm_loop_make_nexus(
 999	struct tcm_loop_tpg *tl_tpg,
1000	const char *name)
1001{
1002	struct se_portal_group *se_tpg;
1003	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
1004	struct tcm_loop_nexus *tl_nexus;
1005	int ret = -ENOMEM;
1006
1007	if (tl_tpg->tl_hba->tl_nexus) {
1008		pr_debug("tl_tpg->tl_hba->tl_nexus already exists\n");
1009		return -EEXIST;
1010	}
1011	se_tpg = &tl_tpg->tl_se_tpg;
1012
1013	tl_nexus = kzalloc(sizeof(struct tcm_loop_nexus), GFP_KERNEL);
1014	if (!tl_nexus) {
1015		pr_err("Unable to allocate struct tcm_loop_nexus\n");
1016		return -ENOMEM;
1017	}
1018	/*
1019	 * Initialize the struct se_session pointer
1020	 */
1021	tl_nexus->se_sess = transport_init_session(TARGET_PROT_ALL);
1022	if (IS_ERR(tl_nexus->se_sess)) {
1023		ret = PTR_ERR(tl_nexus->se_sess);
1024		goto out;
1025	}
1026	/*
1027	 * Since we are running in 'demo mode' this call with generate a
1028	 * struct se_node_acl for the tcm_loop struct se_portal_group with the SCSI
1029	 * Initiator port name of the passed configfs group 'name'.
1030	 */
1031	tl_nexus->se_sess->se_node_acl = core_tpg_check_initiator_node_acl(
1032				se_tpg, (unsigned char *)name);
1033	if (!tl_nexus->se_sess->se_node_acl) {
1034		transport_free_session(tl_nexus->se_sess);
1035		goto out;
1036	}
1037	/*
1038	 * Now, register the SAS I_T Nexus as active with the call to
1039	 * transport_register_session()
1040	 */
1041	__transport_register_session(se_tpg, tl_nexus->se_sess->se_node_acl,
1042			tl_nexus->se_sess, tl_nexus);
1043	tl_tpg->tl_hba->tl_nexus = tl_nexus;
1044	pr_debug("TCM_Loop_ConfigFS: Established I_T Nexus to emulated"
1045		" %s Initiator Port: %s\n", tcm_loop_dump_proto_id(tl_hba),
1046		name);
1047	return 0;
1048
1049out:
1050	kfree(tl_nexus);
1051	return ret;
1052}
1053
1054static int tcm_loop_drop_nexus(
1055	struct tcm_loop_tpg *tpg)
1056{
1057	struct se_session *se_sess;
1058	struct tcm_loop_nexus *tl_nexus;
1059	struct tcm_loop_hba *tl_hba = tpg->tl_hba;
1060
1061	if (!tl_hba)
1062		return -ENODEV;
1063
1064	tl_nexus = tl_hba->tl_nexus;
1065	if (!tl_nexus)
1066		return -ENODEV;
1067
1068	se_sess = tl_nexus->se_sess;
1069	if (!se_sess)
1070		return -ENODEV;
1071
1072	if (atomic_read(&tpg->tl_tpg_port_count)) {
1073		pr_err("Unable to remove TCM_Loop I_T Nexus with"
1074			" active TPG port count: %d\n",
1075			atomic_read(&tpg->tl_tpg_port_count));
1076		return -EPERM;
1077	}
1078
1079	pr_debug("TCM_Loop_ConfigFS: Removing I_T Nexus to emulated"
1080		" %s Initiator Port: %s\n", tcm_loop_dump_proto_id(tl_hba),
1081		tl_nexus->se_sess->se_node_acl->initiatorname);
1082	/*
1083	 * Release the SCSI I_T Nexus to the emulated SAS Target Port
1084	 */
1085	transport_deregister_session(tl_nexus->se_sess);
1086	tpg->tl_hba->tl_nexus = NULL;
1087	kfree(tl_nexus);
1088	return 0;
1089}
1090
1091/* End items for tcm_loop_nexus_cit */
1092
1093static ssize_t tcm_loop_tpg_show_nexus(
1094	struct se_portal_group *se_tpg,
1095	char *page)
1096{
1097	struct tcm_loop_tpg *tl_tpg = container_of(se_tpg,
1098			struct tcm_loop_tpg, tl_se_tpg);
1099	struct tcm_loop_nexus *tl_nexus;
1100	ssize_t ret;
1101
1102	tl_nexus = tl_tpg->tl_hba->tl_nexus;
1103	if (!tl_nexus)
1104		return -ENODEV;
1105
1106	ret = snprintf(page, PAGE_SIZE, "%s\n",
1107		tl_nexus->se_sess->se_node_acl->initiatorname);
1108
1109	return ret;
1110}
1111
1112static ssize_t tcm_loop_tpg_store_nexus(
1113	struct se_portal_group *se_tpg,
1114	const char *page,
1115	size_t count)
1116{
1117	struct tcm_loop_tpg *tl_tpg = container_of(se_tpg,
1118			struct tcm_loop_tpg, tl_se_tpg);
1119	struct tcm_loop_hba *tl_hba = tl_tpg->tl_hba;
1120	unsigned char i_port[TL_WWN_ADDR_LEN], *ptr, *port_ptr;
1121	int ret;
1122	/*
1123	 * Shutdown the active I_T nexus if 'NULL' is passed..
1124	 */
1125	if (!strncmp(page, "NULL", 4)) {
1126		ret = tcm_loop_drop_nexus(tl_tpg);
1127		return (!ret) ? count : ret;
1128	}
1129	/*
1130	 * Otherwise make sure the passed virtual Initiator port WWN matches
1131	 * the fabric protocol_id set in tcm_loop_make_scsi_hba(), and call
1132	 * tcm_loop_make_nexus()
1133	 */
1134	if (strlen(page) >= TL_WWN_ADDR_LEN) {
1135		pr_err("Emulated NAA Sas Address: %s, exceeds"
1136				" max: %d\n", page, TL_WWN_ADDR_LEN);
1137		return -EINVAL;
1138	}
1139	snprintf(&i_port[0], TL_WWN_ADDR_LEN, "%s", page);
1140
1141	ptr = strstr(i_port, "naa.");
1142	if (ptr) {
1143		if (tl_hba->tl_proto_id != SCSI_PROTOCOL_SAS) {
1144			pr_err("Passed SAS Initiator Port %s does not"
1145				" match target port protoid: %s\n", i_port,
1146				tcm_loop_dump_proto_id(tl_hba));
1147			return -EINVAL;
1148		}
1149		port_ptr = &i_port[0];
1150		goto check_newline;
1151	}
1152	ptr = strstr(i_port, "fc.");
1153	if (ptr) {
1154		if (tl_hba->tl_proto_id != SCSI_PROTOCOL_FCP) {
1155			pr_err("Passed FCP Initiator Port %s does not"
1156				" match target port protoid: %s\n", i_port,
1157				tcm_loop_dump_proto_id(tl_hba));
1158			return -EINVAL;
1159		}
1160		port_ptr = &i_port[3]; /* Skip over "fc." */
1161		goto check_newline;
1162	}
1163	ptr = strstr(i_port, "iqn.");
1164	if (ptr) {
1165		if (tl_hba->tl_proto_id != SCSI_PROTOCOL_ISCSI) {
1166			pr_err("Passed iSCSI Initiator Port %s does not"
1167				" match target port protoid: %s\n", i_port,
1168				tcm_loop_dump_proto_id(tl_hba));
1169			return -EINVAL;
1170		}
1171		port_ptr = &i_port[0];
1172		goto check_newline;
1173	}
1174	pr_err("Unable to locate prefix for emulated Initiator Port:"
1175			" %s\n", i_port);
1176	return -EINVAL;
1177	/*
1178	 * Clear any trailing newline for the NAA WWN
1179	 */
1180check_newline:
1181	if (i_port[strlen(i_port)-1] == '\n')
1182		i_port[strlen(i_port)-1] = '\0';
1183
1184	ret = tcm_loop_make_nexus(tl_tpg, port_ptr);
1185	if (ret < 0)
1186		return ret;
1187
1188	return count;
1189}
1190
1191TF_TPG_BASE_ATTR(tcm_loop, nexus, S_IRUGO | S_IWUSR);
1192
1193static ssize_t tcm_loop_tpg_show_transport_status(
1194	struct se_portal_group *se_tpg,
1195	char *page)
1196{
1197	struct tcm_loop_tpg *tl_tpg = container_of(se_tpg,
1198			struct tcm_loop_tpg, tl_se_tpg);
1199	const char *status = NULL;
1200	ssize_t ret = -EINVAL;
1201
1202	switch (tl_tpg->tl_transport_status) {
1203	case TCM_TRANSPORT_ONLINE:
1204		status = "online";
1205		break;
1206	case TCM_TRANSPORT_OFFLINE:
1207		status = "offline";
1208		break;
1209	default:
1210		break;
1211	}
1212
1213	if (status)
1214		ret = snprintf(page, PAGE_SIZE, "%s\n", status);
1215
1216	return ret;
1217}
1218
1219static ssize_t tcm_loop_tpg_store_transport_status(
1220	struct se_portal_group *se_tpg,
1221	const char *page,
1222	size_t count)
1223{
1224	struct tcm_loop_tpg *tl_tpg = container_of(se_tpg,
1225			struct tcm_loop_tpg, tl_se_tpg);
1226
1227	if (!strncmp(page, "online", 6)) {
1228		tl_tpg->tl_transport_status = TCM_TRANSPORT_ONLINE;
1229		return count;
1230	}
1231	if (!strncmp(page, "offline", 7)) {
1232		tl_tpg->tl_transport_status = TCM_TRANSPORT_OFFLINE;
1233		return count;
1234	}
1235	return -EINVAL;
1236}
1237
1238TF_TPG_BASE_ATTR(tcm_loop, transport_status, S_IRUGO | S_IWUSR);
1239
1240static struct configfs_attribute *tcm_loop_tpg_attrs[] = {
1241	&tcm_loop_tpg_nexus.attr,
1242	&tcm_loop_tpg_transport_status.attr,
1243	NULL,
1244};
1245
1246/* Start items for tcm_loop_naa_cit */
1247
1248static struct se_portal_group *tcm_loop_make_naa_tpg(
1249	struct se_wwn *wwn,
1250	struct config_group *group,
1251	const char *name)
1252{
1253	struct tcm_loop_hba *tl_hba = container_of(wwn,
1254			struct tcm_loop_hba, tl_hba_wwn);
1255	struct tcm_loop_tpg *tl_tpg;
1256	char *tpgt_str, *end_ptr;
1257	int ret;
1258	unsigned short int tpgt;
1259
1260	tpgt_str = strstr(name, "tpgt_");
1261	if (!tpgt_str) {
1262		pr_err("Unable to locate \"tpgt_#\" directory"
1263				" group\n");
1264		return ERR_PTR(-EINVAL);
1265	}
1266	tpgt_str += 5; /* Skip ahead of "tpgt_" */
1267	tpgt = (unsigned short int) simple_strtoul(tpgt_str, &end_ptr, 0);
1268
1269	if (tpgt >= TL_TPGS_PER_HBA) {
1270		pr_err("Passed tpgt: %hu exceeds TL_TPGS_PER_HBA:"
1271				" %u\n", tpgt, TL_TPGS_PER_HBA);
1272		return ERR_PTR(-EINVAL);
1273	}
1274	tl_tpg = &tl_hba->tl_hba_tpgs[tpgt];
1275	tl_tpg->tl_hba = tl_hba;
1276	tl_tpg->tl_tpgt = tpgt;
1277	/*
1278	 * Register the tl_tpg as a emulated SAS TCM Target Endpoint
1279	 */
1280	ret = core_tpg_register(&tcm_loop_fabric_configfs->tf_ops,
1281			wwn, &tl_tpg->tl_se_tpg, tl_tpg,
1282			TRANSPORT_TPG_TYPE_NORMAL);
1283	if (ret < 0)
1284		return ERR_PTR(-ENOMEM);
1285
1286	pr_debug("TCM_Loop_ConfigFS: Allocated Emulated %s"
1287		" Target Port %s,t,0x%04x\n", tcm_loop_dump_proto_id(tl_hba),
1288		config_item_name(&wwn->wwn_group.cg_item), tpgt);
1289
1290	return &tl_tpg->tl_se_tpg;
1291}
1292
1293static void tcm_loop_drop_naa_tpg(
1294	struct se_portal_group *se_tpg)
1295{
1296	struct se_wwn *wwn = se_tpg->se_tpg_wwn;
1297	struct tcm_loop_tpg *tl_tpg = container_of(se_tpg,
1298				struct tcm_loop_tpg, tl_se_tpg);
1299	struct tcm_loop_hba *tl_hba;
1300	unsigned short tpgt;
1301
1302	tl_hba = tl_tpg->tl_hba;
1303	tpgt = tl_tpg->tl_tpgt;
1304	/*
1305	 * Release the I_T Nexus for the Virtual SAS link if present
1306	 */
1307	tcm_loop_drop_nexus(tl_tpg);
1308	/*
1309	 * Deregister the tl_tpg as a emulated SAS TCM Target Endpoint
1310	 */
1311	core_tpg_deregister(se_tpg);
1312
1313	tl_tpg->tl_hba = NULL;
1314	tl_tpg->tl_tpgt = 0;
1315
1316	pr_debug("TCM_Loop_ConfigFS: Deallocated Emulated %s"
1317		" Target Port %s,t,0x%04x\n", tcm_loop_dump_proto_id(tl_hba),
1318		config_item_name(&wwn->wwn_group.cg_item), tpgt);
1319}
1320
1321/* End items for tcm_loop_naa_cit */
1322
1323/* Start items for tcm_loop_cit */
1324
1325static struct se_wwn *tcm_loop_make_scsi_hba(
1326	struct target_fabric_configfs *tf,
1327	struct config_group *group,
1328	const char *name)
1329{
1330	struct tcm_loop_hba *tl_hba;
1331	struct Scsi_Host *sh;
1332	char *ptr;
1333	int ret, off = 0;
1334
1335	tl_hba = kzalloc(sizeof(struct tcm_loop_hba), GFP_KERNEL);
1336	if (!tl_hba) {
1337		pr_err("Unable to allocate struct tcm_loop_hba\n");
1338		return ERR_PTR(-ENOMEM);
1339	}
1340	/*
1341	 * Determine the emulated Protocol Identifier and Target Port Name
1342	 * based on the incoming configfs directory name.
1343	 */
1344	ptr = strstr(name, "naa.");
1345	if (ptr) {
1346		tl_hba->tl_proto_id = SCSI_PROTOCOL_SAS;
1347		goto check_len;
1348	}
1349	ptr = strstr(name, "fc.");
1350	if (ptr) {
1351		tl_hba->tl_proto_id = SCSI_PROTOCOL_FCP;
1352		off = 3; /* Skip over "fc." */
1353		goto check_len;
1354	}
1355	ptr = strstr(name, "iqn.");
1356	if (!ptr) {
1357		pr_err("Unable to locate prefix for emulated Target "
1358				"Port: %s\n", name);
1359		ret = -EINVAL;
1360		goto out;
1361	}
1362	tl_hba->tl_proto_id = SCSI_PROTOCOL_ISCSI;
1363
1364check_len:
1365	if (strlen(name) >= TL_WWN_ADDR_LEN) {
1366		pr_err("Emulated NAA %s Address: %s, exceeds"
1367			" max: %d\n", name, tcm_loop_dump_proto_id(tl_hba),
1368			TL_WWN_ADDR_LEN);
1369		ret = -EINVAL;
1370		goto out;
1371	}
1372	snprintf(&tl_hba->tl_wwn_address[0], TL_WWN_ADDR_LEN, "%s", &name[off]);
1373
1374	/*
1375	 * Call device_register(tl_hba->dev) to register the emulated
1376	 * Linux/SCSI LLD of type struct Scsi_Host at tl_hba->sh after
1377	 * device_register() callbacks in tcm_loop_driver_probe()
1378	 */
1379	ret = tcm_loop_setup_hba_bus(tl_hba, tcm_loop_hba_no_cnt);
1380	if (ret)
1381		goto out;
1382
1383	sh = tl_hba->sh;
1384	tcm_loop_hba_no_cnt++;
1385	pr_debug("TCM_Loop_ConfigFS: Allocated emulated Target"
1386		" %s Address: %s at Linux/SCSI Host ID: %d\n",
1387		tcm_loop_dump_proto_id(tl_hba), name, sh->host_no);
1388
1389	return &tl_hba->tl_hba_wwn;
1390out:
1391	kfree(tl_hba);
1392	return ERR_PTR(ret);
1393}
1394
1395static void tcm_loop_drop_scsi_hba(
1396	struct se_wwn *wwn)
1397{
1398	struct tcm_loop_hba *tl_hba = container_of(wwn,
1399				struct tcm_loop_hba, tl_hba_wwn);
1400
1401	pr_debug("TCM_Loop_ConfigFS: Deallocating emulated Target"
1402		" SAS Address: %s at Linux/SCSI Host ID: %d\n",
1403		tl_hba->tl_wwn_address, tl_hba->sh->host_no);
1404	/*
1405	 * Call device_unregister() on the original tl_hba->dev.
1406	 * tcm_loop_fabric_scsi.c:tcm_loop_release_adapter() will
1407	 * release *tl_hba;
1408	 */
1409	device_unregister(&tl_hba->dev);
 
 
 
 
1410}
1411
1412/* Start items for tcm_loop_cit */
1413static ssize_t tcm_loop_wwn_show_attr_version(
1414	struct target_fabric_configfs *tf,
1415	char *page)
1416{
1417	return sprintf(page, "TCM Loopback Fabric module %s\n", TCM_LOOP_VERSION);
1418}
1419
1420TF_WWN_ATTR_RO(tcm_loop, version);
1421
1422static struct configfs_attribute *tcm_loop_wwn_attrs[] = {
1423	&tcm_loop_wwn_version.attr,
1424	NULL,
1425};
1426
1427/* End items for tcm_loop_cit */
1428
1429static int tcm_loop_register_configfs(void)
1430{
1431	struct target_fabric_configfs *fabric;
 
1432	int ret;
1433	/*
1434	 * Set the TCM Loop HBA counter to zero
1435	 */
1436	tcm_loop_hba_no_cnt = 0;
1437	/*
1438	 * Register the top level struct config_item_type with TCM core
1439	 */
1440	fabric = target_fabric_configfs_init(THIS_MODULE, "loopback");
1441	if (IS_ERR(fabric)) {
1442		pr_err("tcm_loop_register_configfs() failed!\n");
1443		return PTR_ERR(fabric);
1444	}
1445	/*
1446	 * Setup the fabric API of function pointers used by target_core_mod
1447	 */
1448	fabric->tf_ops.get_fabric_name = &tcm_loop_get_fabric_name;
1449	fabric->tf_ops.get_fabric_proto_ident = &tcm_loop_get_fabric_proto_ident;
1450	fabric->tf_ops.tpg_get_wwn = &tcm_loop_get_endpoint_wwn;
1451	fabric->tf_ops.tpg_get_tag = &tcm_loop_get_tag;
1452	fabric->tf_ops.tpg_get_default_depth = &tcm_loop_get_default_depth;
1453	fabric->tf_ops.tpg_get_pr_transport_id = &tcm_loop_get_pr_transport_id;
1454	fabric->tf_ops.tpg_get_pr_transport_id_len =
1455					&tcm_loop_get_pr_transport_id_len;
1456	fabric->tf_ops.tpg_parse_pr_out_transport_id =
1457					&tcm_loop_parse_pr_out_transport_id;
1458	fabric->tf_ops.tpg_check_demo_mode = &tcm_loop_check_demo_mode;
1459	fabric->tf_ops.tpg_check_demo_mode_cache =
1460					&tcm_loop_check_demo_mode_cache;
1461	fabric->tf_ops.tpg_check_demo_mode_write_protect =
1462					&tcm_loop_check_demo_mode_write_protect;
1463	fabric->tf_ops.tpg_check_prod_mode_write_protect =
1464					&tcm_loop_check_prod_mode_write_protect;
1465	/*
1466	 * The TCM loopback fabric module runs in demo-mode to a local
1467	 * virtual SCSI device, so fabric dependent initator ACLs are
1468	 * not required.
1469	 */
1470	fabric->tf_ops.tpg_alloc_fabric_acl = &tcm_loop_tpg_alloc_fabric_acl;
1471	fabric->tf_ops.tpg_release_fabric_acl =
1472					&tcm_loop_tpg_release_fabric_acl;
1473	fabric->tf_ops.tpg_get_inst_index = &tcm_loop_get_inst_index;
1474	/*
1475	 * Used for setting up remaining TCM resources in process context
1476	 */
 
1477	fabric->tf_ops.check_stop_free = &tcm_loop_check_stop_free;
1478	fabric->tf_ops.release_cmd = &tcm_loop_release_cmd;
1479	fabric->tf_ops.shutdown_session = &tcm_loop_shutdown_session;
1480	fabric->tf_ops.close_session = &tcm_loop_close_session;
 
 
 
1481	fabric->tf_ops.sess_get_index = &tcm_loop_sess_get_index;
1482	fabric->tf_ops.sess_get_initiator_sid = NULL;
1483	fabric->tf_ops.write_pending = &tcm_loop_write_pending;
1484	fabric->tf_ops.write_pending_status = &tcm_loop_write_pending_status;
1485	/*
1486	 * Not used for TCM loopback
1487	 */
1488	fabric->tf_ops.set_default_node_attributes =
1489					&tcm_loop_set_default_node_attributes;
1490	fabric->tf_ops.get_task_tag = &tcm_loop_get_task_tag;
1491	fabric->tf_ops.get_cmd_state = &tcm_loop_get_cmd_state;
1492	fabric->tf_ops.queue_data_in = &tcm_loop_queue_data_in;
1493	fabric->tf_ops.queue_status = &tcm_loop_queue_status;
1494	fabric->tf_ops.queue_tm_rsp = &tcm_loop_queue_tm_rsp;
1495	fabric->tf_ops.aborted_task = &tcm_loop_aborted_task;
 
 
1496
 
1497	/*
1498	 * Setup function pointers for generic logic in target_core_fabric_configfs.c
1499	 */
1500	fabric->tf_ops.fabric_make_wwn = &tcm_loop_make_scsi_hba;
1501	fabric->tf_ops.fabric_drop_wwn = &tcm_loop_drop_scsi_hba;
1502	fabric->tf_ops.fabric_make_tpg = &tcm_loop_make_naa_tpg;
1503	fabric->tf_ops.fabric_drop_tpg = &tcm_loop_drop_naa_tpg;
1504	/*
1505	 * fabric_post_link() and fabric_pre_unlink() are used for
1506	 * registration and release of TCM Loop Virtual SCSI LUNs.
1507	 */
1508	fabric->tf_ops.fabric_post_link = &tcm_loop_port_link;
1509	fabric->tf_ops.fabric_pre_unlink = &tcm_loop_port_unlink;
1510	fabric->tf_ops.fabric_make_np = NULL;
1511	fabric->tf_ops.fabric_drop_np = NULL;
1512	/*
1513	 * Setup default attribute lists for various fabric->tf_cit_tmpl
1514	 */
1515	fabric->tf_cit_tmpl.tfc_wwn_cit.ct_attrs = tcm_loop_wwn_attrs;
1516	fabric->tf_cit_tmpl.tfc_tpg_base_cit.ct_attrs = tcm_loop_tpg_attrs;
1517	fabric->tf_cit_tmpl.tfc_tpg_attrib_cit.ct_attrs = NULL;
1518	fabric->tf_cit_tmpl.tfc_tpg_param_cit.ct_attrs = NULL;
1519	fabric->tf_cit_tmpl.tfc_tpg_np_base_cit.ct_attrs = NULL;
1520	/*
1521	 * Once fabric->tf_ops has been setup, now register the fabric for
1522	 * use within TCM
1523	 */
1524	ret = target_fabric_configfs_register(fabric);
1525	if (ret < 0) {
1526		pr_err("target_fabric_configfs_register() for"
1527				" TCM_Loop failed!\n");
1528		target_fabric_configfs_free(fabric);
1529		return -1;
1530	}
1531	/*
1532	 * Setup our local pointer to *fabric.
1533	 */
1534	tcm_loop_fabric_configfs = fabric;
1535	pr_debug("TCM_LOOP[0] - Set fabric ->"
1536			" tcm_loop_fabric_configfs\n");
1537	return 0;
1538}
1539
1540static void tcm_loop_deregister_configfs(void)
1541{
1542	if (!tcm_loop_fabric_configfs)
1543		return;
1544
1545	target_fabric_configfs_deregister(tcm_loop_fabric_configfs);
1546	tcm_loop_fabric_configfs = NULL;
1547	pr_debug("TCM_LOOP[0] - Cleared"
1548				" tcm_loop_fabric_configfs\n");
1549}
1550
1551static int __init tcm_loop_fabric_init(void)
1552{
1553	int ret = -ENOMEM;
1554
1555	tcm_loop_workqueue = alloc_workqueue("tcm_loop", 0, 0);
1556	if (!tcm_loop_workqueue)
1557		goto out;
1558
1559	tcm_loop_cmd_cache = kmem_cache_create("tcm_loop_cmd_cache",
1560				sizeof(struct tcm_loop_cmd),
1561				__alignof__(struct tcm_loop_cmd),
1562				0, NULL);
1563	if (!tcm_loop_cmd_cache) {
1564		pr_debug("kmem_cache_create() for"
1565			" tcm_loop_cmd_cache failed\n");
1566		goto out_destroy_workqueue;
1567	}
1568
1569	ret = tcm_loop_alloc_core_bus();
1570	if (ret)
1571		goto out_destroy_cache;
1572
1573	ret = tcm_loop_register_configfs();
1574	if (ret)
1575		goto out_release_core_bus;
 
 
1576
1577	return 0;
1578
1579out_release_core_bus:
1580	tcm_loop_release_core_bus();
1581out_destroy_cache:
1582	kmem_cache_destroy(tcm_loop_cmd_cache);
1583out_destroy_workqueue:
1584	destroy_workqueue(tcm_loop_workqueue);
1585out:
1586	return ret;
1587}
1588
1589static void __exit tcm_loop_fabric_exit(void)
1590{
1591	tcm_loop_deregister_configfs();
1592	tcm_loop_release_core_bus();
1593	kmem_cache_destroy(tcm_loop_cmd_cache);
1594	destroy_workqueue(tcm_loop_workqueue);
1595}
1596
1597MODULE_DESCRIPTION("TCM loopback virtual Linux/SCSI fabric module");
1598MODULE_AUTHOR("Nicholas A. Bellinger <nab@risingtidesystems.com>");
1599MODULE_LICENSE("GPL");
1600module_init(tcm_loop_fabric_init);
1601module_exit(tcm_loop_fabric_exit);