Linux Audio

Check our new training course

Loading...
v5.14.15
   1// SPDX-License-Identifier: GPL-2.0-or-later
   2/*
   3 * vvvvvvvvvvvvvvvvvvvvvvv Original vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
   4 *  Copyright (C) 1992  Eric Youngdale
   5 *  Simulate a host adapter with 2 disks attached.  Do a lot of checking
   6 *  to make sure that we are not getting blocks mixed up, and PANIC if
   7 *  anything out of the ordinary is seen.
   8 * ^^^^^^^^^^^^^^^^^^^^^^^ Original ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
   9 *
  10 * Copyright (C) 2001 - 2020 Douglas Gilbert
  11 *
  12 *  For documentation see http://sg.danny.cz/sg/scsi_debug.html
  13 */
  14
  15
  16#define pr_fmt(fmt) KBUILD_MODNAME ":%s: " fmt, __func__
  17
  18#include <linux/module.h>
  19
  20#include <linux/kernel.h>
  21#include <linux/errno.h>
  22#include <linux/jiffies.h>
  23#include <linux/slab.h>
  24#include <linux/types.h>
  25#include <linux/string.h>
  26#include <linux/genhd.h>
  27#include <linux/fs.h>
  28#include <linux/init.h>
  29#include <linux/proc_fs.h>
  30#include <linux/vmalloc.h>
  31#include <linux/moduleparam.h>
  32#include <linux/scatterlist.h>
  33#include <linux/blkdev.h>
  34#include <linux/crc-t10dif.h>
  35#include <linux/spinlock.h>
  36#include <linux/interrupt.h>
  37#include <linux/atomic.h>
  38#include <linux/hrtimer.h>
  39#include <linux/uuid.h>
  40#include <linux/t10-pi.h>
  41#include <linux/msdos_partition.h>
  42#include <linux/random.h>
  43#include <linux/xarray.h>
  44#include <linux/prefetch.h>
  45
  46#include <net/checksum.h>
  47
  48#include <asm/unaligned.h>
  49
  50#include <scsi/scsi.h>
  51#include <scsi/scsi_cmnd.h>
  52#include <scsi/scsi_device.h>
  53#include <scsi/scsi_host.h>
  54#include <scsi/scsicam.h>
  55#include <scsi/scsi_eh.h>
  56#include <scsi/scsi_tcq.h>
  57#include <scsi/scsi_dbg.h>
  58
  59#include "sd.h"
  60#include "scsi_logging.h"
  61
  62/* make sure inq_product_rev string corresponds to this version */
  63#define SDEBUG_VERSION "0190"	/* format to fit INQUIRY revision field */
  64static const char *sdebug_version_date = "20200710";
  65
  66#define MY_NAME "scsi_debug"
  67
  68/* Additional Sense Code (ASC) */
  69#define NO_ADDITIONAL_SENSE 0x0
  70#define LOGICAL_UNIT_NOT_READY 0x4
  71#define LOGICAL_UNIT_COMMUNICATION_FAILURE 0x8
  72#define UNRECOVERED_READ_ERR 0x11
  73#define PARAMETER_LIST_LENGTH_ERR 0x1a
  74#define INVALID_OPCODE 0x20
  75#define LBA_OUT_OF_RANGE 0x21
  76#define INVALID_FIELD_IN_CDB 0x24
  77#define INVALID_FIELD_IN_PARAM_LIST 0x26
  78#define WRITE_PROTECTED 0x27
  79#define UA_RESET_ASC 0x29
  80#define UA_CHANGED_ASC 0x2a
  81#define TARGET_CHANGED_ASC 0x3f
  82#define LUNS_CHANGED_ASCQ 0x0e
  83#define INSUFF_RES_ASC 0x55
  84#define INSUFF_RES_ASCQ 0x3
  85#define POWER_ON_RESET_ASCQ 0x0
  86#define BUS_RESET_ASCQ 0x2	/* scsi bus reset occurred */
  87#define MODE_CHANGED_ASCQ 0x1	/* mode parameters changed */
  88#define CAPACITY_CHANGED_ASCQ 0x9
  89#define SAVING_PARAMS_UNSUP 0x39
  90#define TRANSPORT_PROBLEM 0x4b
  91#define THRESHOLD_EXCEEDED 0x5d
  92#define LOW_POWER_COND_ON 0x5e
  93#define MISCOMPARE_VERIFY_ASC 0x1d
  94#define MICROCODE_CHANGED_ASCQ 0x1	/* with TARGET_CHANGED_ASC */
  95#define MICROCODE_CHANGED_WO_RESET_ASCQ 0x16
  96#define WRITE_ERROR_ASC 0xc
  97#define UNALIGNED_WRITE_ASCQ 0x4
  98#define WRITE_BOUNDARY_ASCQ 0x5
  99#define READ_INVDATA_ASCQ 0x6
 100#define READ_BOUNDARY_ASCQ 0x7
 101#define INSUFF_ZONE_ASCQ 0xe
 102
 103/* Additional Sense Code Qualifier (ASCQ) */
 104#define ACK_NAK_TO 0x3
 105
 106/* Default values for driver parameters */
 107#define DEF_NUM_HOST   1
 108#define DEF_NUM_TGTS   1
 109#define DEF_MAX_LUNS   1
 110/* With these defaults, this driver will make 1 host with 1 target
 111 * (id 0) containing 1 logical unit (lun 0). That is 1 device.
 112 */
 113#define DEF_ATO 1
 114#define DEF_CDB_LEN 10
 115#define DEF_JDELAY   1		/* if > 0 unit is a jiffy */
 116#define DEF_DEV_SIZE_PRE_INIT   0
 117#define DEF_DEV_SIZE_MB   8
 118#define DEF_ZBC_DEV_SIZE_MB   128
 119#define DEF_DIF 0
 120#define DEF_DIX 0
 121#define DEF_PER_HOST_STORE false
 122#define DEF_D_SENSE   0
 123#define DEF_EVERY_NTH   0
 124#define DEF_FAKE_RW	0
 125#define DEF_GUARD 0
 126#define DEF_HOST_LOCK 0
 127#define DEF_LBPU 0
 128#define DEF_LBPWS 0
 129#define DEF_LBPWS10 0
 130#define DEF_LBPRZ 1
 131#define DEF_LOWEST_ALIGNED 0
 132#define DEF_NDELAY   0		/* if > 0 unit is a nanosecond */
 133#define DEF_NO_LUN_0   0
 134#define DEF_NUM_PARTS   0
 135#define DEF_OPTS   0
 136#define DEF_OPT_BLKS 1024
 137#define DEF_PHYSBLK_EXP 0
 138#define DEF_OPT_XFERLEN_EXP 0
 139#define DEF_PTYPE   TYPE_DISK
 140#define DEF_RANDOM false
 141#define DEF_REMOVABLE false
 142#define DEF_SCSI_LEVEL   7    /* INQUIRY, byte2 [6->SPC-4; 7->SPC-5] */
 143#define DEF_SECTOR_SIZE 512
 144#define DEF_UNMAP_ALIGNMENT 0
 145#define DEF_UNMAP_GRANULARITY 1
 146#define DEF_UNMAP_MAX_BLOCKS 0xFFFFFFFF
 147#define DEF_UNMAP_MAX_DESC 256
 148#define DEF_VIRTUAL_GB   0
 149#define DEF_VPD_USE_HOSTNO 1
 150#define DEF_WRITESAME_LENGTH 0xFFFF
 151#define DEF_STRICT 0
 152#define DEF_STATISTICS false
 153#define DEF_SUBMIT_QUEUES 1
 154#define DEF_TUR_MS_TO_READY 0
 155#define DEF_UUID_CTL 0
 156#define JDELAY_OVERRIDDEN -9999
 157
 158/* Default parameters for ZBC drives */
 159#define DEF_ZBC_ZONE_SIZE_MB	128
 160#define DEF_ZBC_MAX_OPEN_ZONES	8
 161#define DEF_ZBC_NR_CONV_ZONES	1
 162
 163#define SDEBUG_LUN_0_VAL 0
 164
 165/* bit mask values for sdebug_opts */
 166#define SDEBUG_OPT_NOISE		1
 167#define SDEBUG_OPT_MEDIUM_ERR		2
 168#define SDEBUG_OPT_TIMEOUT		4
 169#define SDEBUG_OPT_RECOVERED_ERR	8
 170#define SDEBUG_OPT_TRANSPORT_ERR	16
 171#define SDEBUG_OPT_DIF_ERR		32
 172#define SDEBUG_OPT_DIX_ERR		64
 173#define SDEBUG_OPT_MAC_TIMEOUT		128
 174#define SDEBUG_OPT_SHORT_TRANSFER	0x100
 175#define SDEBUG_OPT_Q_NOISE		0x200
 176#define SDEBUG_OPT_ALL_TSF		0x400
 177#define SDEBUG_OPT_RARE_TSF		0x800
 178#define SDEBUG_OPT_N_WCE		0x1000
 179#define SDEBUG_OPT_RESET_NOISE		0x2000
 180#define SDEBUG_OPT_NO_CDB_NOISE		0x4000
 181#define SDEBUG_OPT_HOST_BUSY		0x8000
 182#define SDEBUG_OPT_CMD_ABORT		0x10000
 183#define SDEBUG_OPT_ALL_NOISE (SDEBUG_OPT_NOISE | SDEBUG_OPT_Q_NOISE | \
 184			      SDEBUG_OPT_RESET_NOISE)
 185#define SDEBUG_OPT_ALL_INJECTING (SDEBUG_OPT_RECOVERED_ERR | \
 186				  SDEBUG_OPT_TRANSPORT_ERR | \
 187				  SDEBUG_OPT_DIF_ERR | SDEBUG_OPT_DIX_ERR | \
 188				  SDEBUG_OPT_SHORT_TRANSFER | \
 189				  SDEBUG_OPT_HOST_BUSY | \
 190				  SDEBUG_OPT_CMD_ABORT)
 191#define SDEBUG_OPT_RECOV_DIF_DIX (SDEBUG_OPT_RECOVERED_ERR | \
 192				  SDEBUG_OPT_DIF_ERR | SDEBUG_OPT_DIX_ERR)
 193
 194/* As indicated in SAM-5 and SPC-4 Unit Attentions (UAs) are returned in
 195 * priority order. In the subset implemented here lower numbers have higher
 196 * priority. The UA numbers should be a sequence starting from 0 with
 197 * SDEBUG_NUM_UAS being 1 higher than the highest numbered UA. */
 198#define SDEBUG_UA_POR 0		/* Power on, reset, or bus device reset */
 199#define SDEBUG_UA_BUS_RESET 1
 200#define SDEBUG_UA_MODE_CHANGED 2
 201#define SDEBUG_UA_CAPACITY_CHANGED 3
 202#define SDEBUG_UA_LUNS_CHANGED 4
 203#define SDEBUG_UA_MICROCODE_CHANGED 5	/* simulate firmware change */
 204#define SDEBUG_UA_MICROCODE_CHANGED_WO_RESET 6
 205#define SDEBUG_NUM_UAS 7
 206
 207/* when 1==SDEBUG_OPT_MEDIUM_ERR, a medium error is simulated at this
 208 * sector on read commands: */
 209#define OPT_MEDIUM_ERR_ADDR   0x1234 /* that's sector 4660 in decimal */
 210#define OPT_MEDIUM_ERR_NUM    10     /* number of consecutive medium errs */
 211
 
 
 
 
 212/* SDEBUG_CANQUEUE is the maximum number of commands that can be queued
 213 * (for response) per submit queue at one time. Can be reduced by max_queue
 214 * option. Command responses are not queued when jdelay=0 and ndelay=0. The
 215 * per-device DEF_CMD_PER_LUN can be changed via sysfs:
 216 * /sys/class/scsi_device/<h:c:t:l>/device/queue_depth
 217 * but cannot exceed SDEBUG_CANQUEUE .
 218 */
 219#define SDEBUG_CANQUEUE_WORDS  3	/* a WORD is bits in a long */
 220#define SDEBUG_CANQUEUE  (SDEBUG_CANQUEUE_WORDS * BITS_PER_LONG)
 221#define DEF_CMD_PER_LUN  SDEBUG_CANQUEUE
 222
 223/* UA - Unit Attention; SA - Service Action; SSU - Start Stop Unit */
 224#define F_D_IN			1	/* Data-in command (e.g. READ) */
 225#define F_D_OUT			2	/* Data-out command (e.g. WRITE) */
 226#define F_D_OUT_MAYBE		4	/* WRITE SAME, NDOB bit */
 227#define F_D_UNKN		8
 228#define F_RL_WLUN_OK		0x10	/* allowed with REPORT LUNS W-LUN */
 229#define F_SKIP_UA		0x20	/* bypass UAs (e.g. INQUIRY command) */
 230#define F_DELAY_OVERR		0x40	/* for commands like INQUIRY */
 231#define F_SA_LOW		0x80	/* SA is in cdb byte 1, bits 4 to 0 */
 232#define F_SA_HIGH		0x100	/* SA is in cdb bytes 8 and 9 */
 233#define F_INV_OP		0x200	/* invalid opcode (not supported) */
 234#define F_FAKE_RW		0x400	/* bypass resp_*() when fake_rw set */
 235#define F_M_ACCESS		0x800	/* media access, reacts to SSU state */
 236#define F_SSU_DELAY		0x1000	/* SSU command delay (long-ish) */
 237#define F_SYNC_DELAY		0x2000	/* SYNCHRONIZE CACHE delay */
 238
 239/* Useful combinations of the above flags */
 240#define FF_RESPOND (F_RL_WLUN_OK | F_SKIP_UA | F_DELAY_OVERR)
 241#define FF_MEDIA_IO (F_M_ACCESS | F_FAKE_RW)
 242#define FF_SA (F_SA_HIGH | F_SA_LOW)
 243#define F_LONG_DELAY		(F_SSU_DELAY | F_SYNC_DELAY)
 244
 245#define SDEBUG_MAX_PARTS 4
 246
 247#define SDEBUG_MAX_CMD_LEN 32
 248
 249#define SDEB_XA_NOT_IN_USE XA_MARK_1
 250
 251/* Zone types (zbcr05 table 25) */
 252enum sdebug_z_type {
 253	ZBC_ZONE_TYPE_CNV	= 0x1,
 254	ZBC_ZONE_TYPE_SWR	= 0x2,
 255	ZBC_ZONE_TYPE_SWP	= 0x3,
 256};
 257
 258/* enumeration names taken from table 26, zbcr05 */
 259enum sdebug_z_cond {
 260	ZBC_NOT_WRITE_POINTER	= 0x0,
 261	ZC1_EMPTY		= 0x1,
 262	ZC2_IMPLICIT_OPEN	= 0x2,
 263	ZC3_EXPLICIT_OPEN	= 0x3,
 264	ZC4_CLOSED		= 0x4,
 265	ZC6_READ_ONLY		= 0xd,
 266	ZC5_FULL		= 0xe,
 267	ZC7_OFFLINE		= 0xf,
 268};
 269
 270struct sdeb_zone_state {	/* ZBC: per zone state */
 271	enum sdebug_z_type z_type;
 272	enum sdebug_z_cond z_cond;
 273	bool z_non_seq_resource;
 274	unsigned int z_size;
 275	sector_t z_start;
 276	sector_t z_wp;
 277};
 278
 279struct sdebug_dev_info {
 280	struct list_head dev_list;
 281	unsigned int channel;
 282	unsigned int target;
 283	u64 lun;
 284	uuid_t lu_name;
 285	struct sdebug_host_info *sdbg_host;
 286	unsigned long uas_bm[1];
 287	atomic_t num_in_q;
 288	atomic_t stopped;	/* 1: by SSU, 2: device start */
 289	bool used;
 290
 291	/* For ZBC devices */
 292	enum blk_zoned_model zmodel;
 293	unsigned int zsize;
 294	unsigned int zsize_shift;
 295	unsigned int nr_zones;
 296	unsigned int nr_conv_zones;
 297	unsigned int nr_imp_open;
 298	unsigned int nr_exp_open;
 299	unsigned int nr_closed;
 300	unsigned int max_open;
 301	ktime_t create_ts;	/* time since bootup that this device was created */
 302	struct sdeb_zone_state *zstate;
 303};
 304
 305struct sdebug_host_info {
 306	struct list_head host_list;
 307	int si_idx;	/* sdeb_store_info (per host) xarray index */
 308	struct Scsi_Host *shost;
 309	struct device dev;
 310	struct list_head dev_info_list;
 311};
 312
 313/* There is an xarray of pointers to this struct's objects, one per host */
 314struct sdeb_store_info {
 315	rwlock_t macc_lck;	/* for atomic media access on this store */
 316	u8 *storep;		/* user data storage (ram) */
 317	struct t10_pi_tuple *dif_storep; /* protection info */
 318	void *map_storep;	/* provisioning map */
 319};
 320
 321#define to_sdebug_host(d)	\
 322	container_of(d, struct sdebug_host_info, dev)
 323
 324enum sdeb_defer_type {SDEB_DEFER_NONE = 0, SDEB_DEFER_HRT = 1,
 325		      SDEB_DEFER_WQ = 2, SDEB_DEFER_POLL = 3};
 326
 327struct sdebug_defer {
 328	struct hrtimer hrt;
 329	struct execute_work ew;
 330	ktime_t cmpl_ts;/* time since boot to complete this cmd */
 331	int sqa_idx;	/* index of sdebug_queue array */
 332	int qc_idx;	/* index of sdebug_queued_cmd array within sqa_idx */
 333	int hc_idx;	/* hostwide tag index */
 334	int issuing_cpu;
 335	bool init_hrt;
 336	bool init_wq;
 337	bool init_poll;
 338	bool aborted;	/* true when blk_abort_request() already called */
 339	enum sdeb_defer_type defer_t;
 340};
 341
 342struct sdebug_queued_cmd {
 343	/* corresponding bit set in in_use_bm[] in owning struct sdebug_queue
 344	 * instance indicates this slot is in use.
 345	 */
 346	struct sdebug_defer *sd_dp;
 347	struct scsi_cmnd *a_cmnd;
 348};
 349
 350struct sdebug_queue {
 351	struct sdebug_queued_cmd qc_arr[SDEBUG_CANQUEUE];
 352	unsigned long in_use_bm[SDEBUG_CANQUEUE_WORDS];
 353	spinlock_t qc_lock;
 354	atomic_t blocked;	/* to temporarily stop more being queued */
 355};
 356
 357static atomic_t sdebug_cmnd_count;   /* number of incoming commands */
 358static atomic_t sdebug_completions;  /* count of deferred completions */
 359static atomic_t sdebug_miss_cpus;    /* submission + completion cpus differ */
 360static atomic_t sdebug_a_tsf;	     /* 'almost task set full' counter */
 361static atomic_t sdeb_inject_pending;
 362static atomic_t sdeb_mq_poll_count;  /* bumped when mq_poll returns > 0 */
 363
 364struct opcode_info_t {
 365	u8 num_attached;	/* 0 if this is it (i.e. a leaf); use 0xff */
 366				/* for terminating element */
 367	u8 opcode;		/* if num_attached > 0, preferred */
 368	u16 sa;			/* service action */
 369	u32 flags;		/* OR-ed set of SDEB_F_* */
 370	int (*pfp)(struct scsi_cmnd *, struct sdebug_dev_info *);
 371	const struct opcode_info_t *arrp;  /* num_attached elements or NULL */
 372	u8 len_mask[16];	/* len_mask[0]-->cdb_len, then mask for cdb */
 373				/* 1 to min(cdb_len, 15); ignore cdb[15...] */
 374};
 375
 376/* SCSI opcodes (first byte of cdb) of interest mapped onto these indexes */
 377enum sdeb_opcode_index {
 378	SDEB_I_INVALID_OPCODE =	0,
 379	SDEB_I_INQUIRY = 1,
 380	SDEB_I_REPORT_LUNS = 2,
 381	SDEB_I_REQUEST_SENSE = 3,
 382	SDEB_I_TEST_UNIT_READY = 4,
 383	SDEB_I_MODE_SENSE = 5,		/* 6, 10 */
 384	SDEB_I_MODE_SELECT = 6,		/* 6, 10 */
 385	SDEB_I_LOG_SENSE = 7,
 386	SDEB_I_READ_CAPACITY = 8,	/* 10; 16 is in SA_IN(16) */
 387	SDEB_I_READ = 9,		/* 6, 10, 12, 16 */
 388	SDEB_I_WRITE = 10,		/* 6, 10, 12, 16 */
 389	SDEB_I_START_STOP = 11,
 390	SDEB_I_SERV_ACT_IN_16 = 12,	/* add ...SERV_ACT_IN_12 if needed */
 391	SDEB_I_SERV_ACT_OUT_16 = 13,	/* add ...SERV_ACT_OUT_12 if needed */
 392	SDEB_I_MAINT_IN = 14,
 393	SDEB_I_MAINT_OUT = 15,
 394	SDEB_I_VERIFY = 16,		/* VERIFY(10), VERIFY(16) */
 395	SDEB_I_VARIABLE_LEN = 17,	/* READ(32), WRITE(32), WR_SCAT(32) */
 396	SDEB_I_RESERVE = 18,		/* 6, 10 */
 397	SDEB_I_RELEASE = 19,		/* 6, 10 */
 398	SDEB_I_ALLOW_REMOVAL = 20,	/* PREVENT ALLOW MEDIUM REMOVAL */
 399	SDEB_I_REZERO_UNIT = 21,	/* REWIND in SSC */
 400	SDEB_I_ATA_PT = 22,		/* 12, 16 */
 401	SDEB_I_SEND_DIAG = 23,
 402	SDEB_I_UNMAP = 24,
 403	SDEB_I_WRITE_BUFFER = 25,
 404	SDEB_I_WRITE_SAME = 26,		/* 10, 16 */
 405	SDEB_I_SYNC_CACHE = 27,		/* 10, 16 */
 406	SDEB_I_COMP_WRITE = 28,
 407	SDEB_I_PRE_FETCH = 29,		/* 10, 16 */
 408	SDEB_I_ZONE_OUT = 30,		/* 0x94+SA; includes no data xfer */
 409	SDEB_I_ZONE_IN = 31,		/* 0x95+SA; all have data-in */
 410	SDEB_I_LAST_ELEM_P1 = 32,	/* keep this last (previous + 1) */
 411};
 412
 413
 414static const unsigned char opcode_ind_arr[256] = {
 415/* 0x0; 0x0->0x1f: 6 byte cdbs */
 416	SDEB_I_TEST_UNIT_READY, SDEB_I_REZERO_UNIT, 0, SDEB_I_REQUEST_SENSE,
 417	    0, 0, 0, 0,
 418	SDEB_I_READ, 0, SDEB_I_WRITE, 0, 0, 0, 0, 0,
 419	0, 0, SDEB_I_INQUIRY, 0, 0, SDEB_I_MODE_SELECT, SDEB_I_RESERVE,
 420	    SDEB_I_RELEASE,
 421	0, 0, SDEB_I_MODE_SENSE, SDEB_I_START_STOP, 0, SDEB_I_SEND_DIAG,
 422	    SDEB_I_ALLOW_REMOVAL, 0,
 423/* 0x20; 0x20->0x3f: 10 byte cdbs */
 424	0, 0, 0, 0, 0, SDEB_I_READ_CAPACITY, 0, 0,
 425	SDEB_I_READ, 0, SDEB_I_WRITE, 0, 0, 0, 0, SDEB_I_VERIFY,
 426	0, 0, 0, 0, SDEB_I_PRE_FETCH, SDEB_I_SYNC_CACHE, 0, 0,
 427	0, 0, 0, SDEB_I_WRITE_BUFFER, 0, 0, 0, 0,
 428/* 0x40; 0x40->0x5f: 10 byte cdbs */
 429	0, SDEB_I_WRITE_SAME, SDEB_I_UNMAP, 0, 0, 0, 0, 0,
 430	0, 0, 0, 0, 0, SDEB_I_LOG_SENSE, 0, 0,
 431	0, 0, 0, 0, 0, SDEB_I_MODE_SELECT, SDEB_I_RESERVE,
 432	    SDEB_I_RELEASE,
 433	0, 0, SDEB_I_MODE_SENSE, 0, 0, 0, 0, 0,
 434/* 0x60; 0x60->0x7d are reserved, 0x7e is "extended cdb" */
 435	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 436	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 437	0, SDEB_I_VARIABLE_LEN,
 438/* 0x80; 0x80->0x9f: 16 byte cdbs */
 439	0, 0, 0, 0, 0, SDEB_I_ATA_PT, 0, 0,
 440	SDEB_I_READ, SDEB_I_COMP_WRITE, SDEB_I_WRITE, 0,
 441	0, 0, 0, SDEB_I_VERIFY,
 442	SDEB_I_PRE_FETCH, SDEB_I_SYNC_CACHE, 0, SDEB_I_WRITE_SAME,
 443	SDEB_I_ZONE_OUT, SDEB_I_ZONE_IN, 0, 0,
 444	0, 0, 0, 0, 0, 0, SDEB_I_SERV_ACT_IN_16, SDEB_I_SERV_ACT_OUT_16,
 445/* 0xa0; 0xa0->0xbf: 12 byte cdbs */
 446	SDEB_I_REPORT_LUNS, SDEB_I_ATA_PT, 0, SDEB_I_MAINT_IN,
 447	     SDEB_I_MAINT_OUT, 0, 0, 0,
 448	SDEB_I_READ, 0 /* SDEB_I_SERV_ACT_OUT_12 */, SDEB_I_WRITE,
 449	     0 /* SDEB_I_SERV_ACT_IN_12 */, 0, 0, 0, 0,
 450	0, 0, 0, 0, 0, 0, 0, 0,
 451	0, 0, 0, 0, 0, 0, 0, 0,
 452/* 0xc0; 0xc0->0xff: vendor specific */
 453	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 454	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 455	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 456	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 457};
 458
 459/*
 460 * The following "response" functions return the SCSI mid-level's 4 byte
 461 * tuple-in-an-int. To handle commands with an IMMED bit, for a faster
 462 * command completion, they can mask their return value with
 463 * SDEG_RES_IMMED_MASK .
 464 */
 465#define SDEG_RES_IMMED_MASK 0x40000000
 466
 467static int resp_inquiry(struct scsi_cmnd *, struct sdebug_dev_info *);
 468static int resp_report_luns(struct scsi_cmnd *, struct sdebug_dev_info *);
 469static int resp_requests(struct scsi_cmnd *, struct sdebug_dev_info *);
 470static int resp_mode_sense(struct scsi_cmnd *, struct sdebug_dev_info *);
 471static int resp_mode_select(struct scsi_cmnd *, struct sdebug_dev_info *);
 472static int resp_log_sense(struct scsi_cmnd *, struct sdebug_dev_info *);
 473static int resp_readcap(struct scsi_cmnd *, struct sdebug_dev_info *);
 474static int resp_read_dt0(struct scsi_cmnd *, struct sdebug_dev_info *);
 475static int resp_write_dt0(struct scsi_cmnd *, struct sdebug_dev_info *);
 476static int resp_write_scat(struct scsi_cmnd *, struct sdebug_dev_info *);
 477static int resp_start_stop(struct scsi_cmnd *, struct sdebug_dev_info *);
 478static int resp_readcap16(struct scsi_cmnd *, struct sdebug_dev_info *);
 479static int resp_get_lba_status(struct scsi_cmnd *, struct sdebug_dev_info *);
 480static int resp_report_tgtpgs(struct scsi_cmnd *, struct sdebug_dev_info *);
 481static int resp_unmap(struct scsi_cmnd *, struct sdebug_dev_info *);
 482static int resp_rsup_opcodes(struct scsi_cmnd *, struct sdebug_dev_info *);
 483static int resp_rsup_tmfs(struct scsi_cmnd *, struct sdebug_dev_info *);
 484static int resp_verify(struct scsi_cmnd *, struct sdebug_dev_info *);
 485static int resp_write_same_10(struct scsi_cmnd *, struct sdebug_dev_info *);
 486static int resp_write_same_16(struct scsi_cmnd *, struct sdebug_dev_info *);
 487static int resp_comp_write(struct scsi_cmnd *, struct sdebug_dev_info *);
 488static int resp_write_buffer(struct scsi_cmnd *, struct sdebug_dev_info *);
 489static int resp_sync_cache(struct scsi_cmnd *, struct sdebug_dev_info *);
 490static int resp_pre_fetch(struct scsi_cmnd *, struct sdebug_dev_info *);
 491static int resp_report_zones(struct scsi_cmnd *, struct sdebug_dev_info *);
 492static int resp_open_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
 493static int resp_close_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
 494static int resp_finish_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
 495static int resp_rwp_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
 496
 497static int sdebug_do_add_host(bool mk_new_store);
 498static int sdebug_add_host_helper(int per_host_idx);
 499static void sdebug_do_remove_host(bool the_end);
 500static int sdebug_add_store(void);
 501static void sdebug_erase_store(int idx, struct sdeb_store_info *sip);
 502static void sdebug_erase_all_stores(bool apart_from_first);
 503
 504/*
 505 * The following are overflow arrays for cdbs that "hit" the same index in
 506 * the opcode_info_arr array. The most time sensitive (or commonly used) cdb
 507 * should be placed in opcode_info_arr[], the others should be placed here.
 508 */
 509static const struct opcode_info_t msense_iarr[] = {
 510	{0, 0x1a, 0, F_D_IN, NULL, NULL,
 511	    {6,  0xe8, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 512};
 513
 514static const struct opcode_info_t mselect_iarr[] = {
 515	{0, 0x15, 0, F_D_OUT, NULL, NULL,
 516	    {6,  0xf1, 0, 0, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 517};
 518
 519static const struct opcode_info_t read_iarr[] = {
 520	{0, 0x28, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL,/* READ(10) */
 521	    {10,  0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
 522	     0, 0, 0, 0} },
 523	{0, 0x8, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL, /* READ(6) */
 524	    {6,  0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 525	{0, 0xa8, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL,/* READ(12) */
 526	    {12,  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xbf,
 527	     0xc7, 0, 0, 0, 0} },
 528};
 529
 530static const struct opcode_info_t write_iarr[] = {
 531	{0, 0x2a, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0,  /* WRITE(10) */
 532	    NULL, {10,  0xfb, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7,
 533		   0, 0, 0, 0, 0, 0} },
 534	{0, 0xa, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0,   /* WRITE(6) */
 535	    NULL, {6,  0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0,
 536		   0, 0, 0} },
 537	{0, 0xaa, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0,  /* WRITE(12) */
 538	    NULL, {12,  0xfb, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 539		   0xbf, 0xc7, 0, 0, 0, 0} },
 540};
 541
 542static const struct opcode_info_t verify_iarr[] = {
 543	{0, 0x2f, 0, F_D_OUT_MAYBE | FF_MEDIA_IO, resp_verify,/* VERIFY(10) */
 544	    NULL, {10,  0xf7, 0xff, 0xff, 0xff, 0xff, 0xbf, 0xff, 0xff, 0xc7,
 545		   0, 0, 0, 0, 0, 0} },
 546};
 547
 548static const struct opcode_info_t sa_in_16_iarr[] = {
 549	{0, 0x9e, 0x12, F_SA_LOW | F_D_IN, resp_get_lba_status, NULL,
 550	    {16,  0x12, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 551	     0xff, 0xff, 0xff, 0, 0xc7} },	/* GET LBA STATUS(16) */
 552};
 553
 554static const struct opcode_info_t vl_iarr[] = {	/* VARIABLE LENGTH */
 555	{0, 0x7f, 0xb, F_SA_HIGH | F_D_OUT | FF_MEDIA_IO, resp_write_dt0,
 556	    NULL, {32,  0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0xb, 0xfa,
 557		   0, 0xff, 0xff, 0xff, 0xff} },	/* WRITE(32) */
 558	{0, 0x7f, 0x11, F_SA_HIGH | F_D_OUT | FF_MEDIA_IO, resp_write_scat,
 559	    NULL, {32,  0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0x11, 0xf8,
 560		   0, 0xff, 0xff, 0x0, 0x0} },	/* WRITE SCATTERED(32) */
 561};
 562
 563static const struct opcode_info_t maint_in_iarr[] = {	/* MAINT IN */
 564	{0, 0xa3, 0xc, F_SA_LOW | F_D_IN, resp_rsup_opcodes, NULL,
 565	    {12,  0xc, 0x87, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0,
 566	     0xc7, 0, 0, 0, 0} }, /* REPORT SUPPORTED OPERATION CODES */
 567	{0, 0xa3, 0xd, F_SA_LOW | F_D_IN, resp_rsup_tmfs, NULL,
 568	    {12,  0xd, 0x80, 0, 0, 0, 0xff, 0xff, 0xff, 0xff, 0, 0xc7, 0, 0,
 569	     0, 0} },	/* REPORTED SUPPORTED TASK MANAGEMENT FUNCTIONS */
 570};
 571
 572static const struct opcode_info_t write_same_iarr[] = {
 573	{0, 0x93, 0, F_D_OUT_MAYBE | FF_MEDIA_IO, resp_write_same_16, NULL,
 574	    {16,  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 575	     0xff, 0xff, 0xff, 0x3f, 0xc7} },		/* WRITE SAME(16) */
 576};
 577
 578static const struct opcode_info_t reserve_iarr[] = {
 579	{0, 0x16, 0, F_D_OUT, NULL, NULL,		/* RESERVE(6) */
 580	    {6,  0x1f, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 581};
 582
 583static const struct opcode_info_t release_iarr[] = {
 584	{0, 0x17, 0, F_D_OUT, NULL, NULL,		/* RELEASE(6) */
 585	    {6,  0x1f, 0xff, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 586};
 587
 588static const struct opcode_info_t sync_cache_iarr[] = {
 589	{0, 0x91, 0, F_SYNC_DELAY | F_M_ACCESS, resp_sync_cache, NULL,
 590	    {16,  0x6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 591	     0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} },	/* SYNC_CACHE (16) */
 592};
 593
 594static const struct opcode_info_t pre_fetch_iarr[] = {
 595	{0, 0x90, 0, F_SYNC_DELAY | FF_MEDIA_IO, resp_pre_fetch, NULL,
 596	    {16,  0x2, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 597	     0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} },	/* PRE-FETCH (16) */
 598};
 599
 600static const struct opcode_info_t zone_out_iarr[] = {	/* ZONE OUT(16) */
 601	{0, 0x94, 0x1, F_SA_LOW | F_M_ACCESS, resp_close_zone, NULL,
 602	    {16, 0x1, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 603	     0xff, 0, 0, 0xff, 0xff, 0x1, 0xc7} },	/* CLOSE ZONE */
 604	{0, 0x94, 0x2, F_SA_LOW | F_M_ACCESS, resp_finish_zone, NULL,
 605	    {16, 0x2, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 606	     0xff, 0, 0, 0xff, 0xff, 0x1, 0xc7} },	/* FINISH ZONE */
 607	{0, 0x94, 0x4, F_SA_LOW | F_M_ACCESS, resp_rwp_zone, NULL,
 608	    {16, 0x4, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 609	     0xff, 0, 0, 0xff, 0xff, 0x1, 0xc7} },  /* RESET WRITE POINTER */
 610};
 611
 612static const struct opcode_info_t zone_in_iarr[] = {	/* ZONE IN(16) */
 613	{0, 0x95, 0x6, F_SA_LOW | F_D_IN | F_M_ACCESS, NULL, NULL,
 614	    {16, 0x6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 615	     0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} }, /* REPORT ZONES */
 616};
 617
 618
 619/* This array is accessed via SDEB_I_* values. Make sure all are mapped,
 620 * plus the terminating elements for logic that scans this table such as
 621 * REPORT SUPPORTED OPERATION CODES. */
 622static const struct opcode_info_t opcode_info_arr[SDEB_I_LAST_ELEM_P1 + 1] = {
 623/* 0 */
 624	{0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL,	/* unknown opcodes */
 625	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 626	{0, 0x12, 0, FF_RESPOND | F_D_IN, resp_inquiry, NULL, /* INQUIRY */
 627	    {6,  0xe3, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 628	{0, 0xa0, 0, FF_RESPOND | F_D_IN, resp_report_luns, NULL,
 629	    {12,  0xe3, 0xff, 0, 0, 0, 0xff, 0xff, 0xff, 0xff, 0, 0xc7, 0, 0,
 630	     0, 0} },					/* REPORT LUNS */
 631	{0, 0x3, 0, FF_RESPOND | F_D_IN, resp_requests, NULL,
 632	    {6,  0xe1, 0, 0, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 633	{0, 0x0, 0, F_M_ACCESS | F_RL_WLUN_OK, NULL, NULL,/* TEST UNIT READY */
 634	    {6,  0, 0, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 635/* 5 */
 636	{ARRAY_SIZE(msense_iarr), 0x5a, 0, F_D_IN,	/* MODE SENSE(10) */
 637	    resp_mode_sense, msense_iarr, {10,  0xf8, 0xff, 0xff, 0, 0, 0,
 638		0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
 639	{ARRAY_SIZE(mselect_iarr), 0x55, 0, F_D_OUT,	/* MODE SELECT(10) */
 640	    resp_mode_select, mselect_iarr, {10,  0xf1, 0, 0, 0, 0, 0, 0xff,
 641		0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
 642	{0, 0x4d, 0, F_D_IN, resp_log_sense, NULL,	/* LOG SENSE */
 643	    {10,  0xe3, 0xff, 0xff, 0, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0,
 644	     0, 0, 0} },
 645	{0, 0x25, 0, F_D_IN, resp_readcap, NULL,    /* READ CAPACITY(10) */
 646	    {10,  0xe1, 0xff, 0xff, 0xff, 0xff, 0, 0, 0x1, 0xc7, 0, 0, 0, 0,
 647	     0, 0} },
 648	{ARRAY_SIZE(read_iarr), 0x88, 0, F_D_IN | FF_MEDIA_IO, /* READ(16) */
 649	    resp_read_dt0, read_iarr, {16,  0xfe, 0xff, 0xff, 0xff, 0xff,
 650	    0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7} },
 651/* 10 */
 652	{ARRAY_SIZE(write_iarr), 0x8a, 0, F_D_OUT | FF_MEDIA_IO,
 653	    resp_write_dt0, write_iarr,			/* WRITE(16) */
 654		{16,  0xfa, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 655		 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7} },
 656	{0, 0x1b, 0, F_SSU_DELAY, resp_start_stop, NULL,/* START STOP UNIT */
 657	    {6,  0x1, 0, 0xf, 0xf7, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 658	{ARRAY_SIZE(sa_in_16_iarr), 0x9e, 0x10, F_SA_LOW | F_D_IN,
 659	    resp_readcap16, sa_in_16_iarr, /* SA_IN(16), READ CAPACITY(16) */
 660		{16,  0x10, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 661		 0xff, 0xff, 0xff, 0xff, 0x1, 0xc7} },
 662	{0, 0x9f, 0x12, F_SA_LOW | F_D_OUT | FF_MEDIA_IO, resp_write_scat,
 663	    NULL, {16,  0x12, 0xf9, 0x0, 0xff, 0xff, 0, 0, 0xff, 0xff, 0xff,
 664	    0xff, 0xff, 0xff, 0xff, 0xc7} },  /* SA_OUT(16), WRITE SCAT(16) */
 665	{ARRAY_SIZE(maint_in_iarr), 0xa3, 0xa, F_SA_LOW | F_D_IN,
 666	    resp_report_tgtpgs,	/* MAINT IN, REPORT TARGET PORT GROUPS */
 667		maint_in_iarr, {12,  0xea, 0, 0, 0, 0, 0xff, 0xff, 0xff,
 668				0xff, 0, 0xc7, 0, 0, 0, 0} },
 669/* 15 */
 670	{0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* MAINT OUT */
 671	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 672	{ARRAY_SIZE(verify_iarr), 0x8f, 0,
 673	    F_D_OUT_MAYBE | FF_MEDIA_IO, resp_verify,	/* VERIFY(16) */
 674	    verify_iarr, {16,  0xf6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 675			  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} },
 676	{ARRAY_SIZE(vl_iarr), 0x7f, 0x9, F_SA_HIGH | F_D_IN | FF_MEDIA_IO,
 677	    resp_read_dt0, vl_iarr,	/* VARIABLE LENGTH, READ(32) */
 678	    {32,  0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0x9, 0xfe, 0, 0xff, 0xff,
 679	     0xff, 0xff} },
 680	{ARRAY_SIZE(reserve_iarr), 0x56, 0, F_D_OUT,
 681	    NULL, reserve_iarr,	/* RESERVE(10) <no response function> */
 682	    {10,  0xff, 0xff, 0xff, 0, 0, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0,
 683	     0} },
 684	{ARRAY_SIZE(release_iarr), 0x57, 0, F_D_OUT,
 685	    NULL, release_iarr, /* RELEASE(10) <no response function> */
 686	    {10,  0x13, 0xff, 0xff, 0, 0, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0,
 687	     0} },
 688/* 20 */
 689	{0, 0x1e, 0, 0, NULL, NULL, /* ALLOW REMOVAL */
 690	    {6,  0, 0, 0, 0x3, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 691	{0, 0x1, 0, 0, resp_start_stop, NULL, /* REWIND ?? */
 692	    {6,  0x1, 0, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 693	{0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* ATA_PT */
 694	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 695	{0, 0x1d, F_D_OUT, 0, NULL, NULL,	/* SEND DIAGNOSTIC */
 696	    {6,  0xf7, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 697	{0, 0x42, 0, F_D_OUT | FF_MEDIA_IO, resp_unmap, NULL, /* UNMAP */
 698	    {10,  0x1, 0, 0, 0, 0, 0x3f, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
 699/* 25 */
 700	{0, 0x3b, 0, F_D_OUT_MAYBE, resp_write_buffer, NULL,
 701	    {10,  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0,
 702	     0, 0, 0, 0} },			/* WRITE_BUFFER */
 703	{ARRAY_SIZE(write_same_iarr), 0x41, 0, F_D_OUT_MAYBE | FF_MEDIA_IO,
 704	    resp_write_same_10, write_same_iarr,	/* WRITE SAME(10) */
 705		{10,  0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0,
 706		 0, 0, 0, 0, 0} },
 707	{ARRAY_SIZE(sync_cache_iarr), 0x35, 0, F_SYNC_DELAY | F_M_ACCESS,
 708	    resp_sync_cache, sync_cache_iarr,
 709	    {10,  0x7, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
 710	     0, 0, 0, 0} },			/* SYNC_CACHE (10) */
 711	{0, 0x89, 0, F_D_OUT | FF_MEDIA_IO, resp_comp_write, NULL,
 712	    {16,  0xf8, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0, 0,
 713	     0, 0xff, 0x3f, 0xc7} },		/* COMPARE AND WRITE */
 714	{ARRAY_SIZE(pre_fetch_iarr), 0x34, 0, F_SYNC_DELAY | FF_MEDIA_IO,
 715	    resp_pre_fetch, pre_fetch_iarr,
 716	    {10,  0x2, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
 717	     0, 0, 0, 0} },			/* PRE-FETCH (10) */
 718
 719/* 30 */
 720	{ARRAY_SIZE(zone_out_iarr), 0x94, 0x3, F_SA_LOW | F_M_ACCESS,
 721	    resp_open_zone, zone_out_iarr, /* ZONE_OUT(16), OPEN ZONE) */
 722		{16,  0x3 /* SA */, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 723		 0xff, 0xff, 0x0, 0x0, 0xff, 0xff, 0x1, 0xc7} },
 724	{ARRAY_SIZE(zone_in_iarr), 0x95, 0x0, F_SA_LOW | F_M_ACCESS,
 725	    resp_report_zones, zone_in_iarr, /* ZONE_IN(16), REPORT ZONES) */
 726		{16,  0x0 /* SA */, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 727		 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xbf, 0xc7} },
 728/* sentinel */
 729	{0xff, 0, 0, 0, NULL, NULL,		/* terminating element */
 730	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 731};
 732
 733static int sdebug_num_hosts;
 734static int sdebug_add_host = DEF_NUM_HOST;  /* in sysfs this is relative */
 735static int sdebug_ato = DEF_ATO;
 736static int sdebug_cdb_len = DEF_CDB_LEN;
 737static int sdebug_jdelay = DEF_JDELAY;	/* if > 0 then unit is jiffies */
 738static int sdebug_dev_size_mb = DEF_DEV_SIZE_PRE_INIT;
 739static int sdebug_dif = DEF_DIF;
 740static int sdebug_dix = DEF_DIX;
 741static int sdebug_dsense = DEF_D_SENSE;
 742static int sdebug_every_nth = DEF_EVERY_NTH;
 743static int sdebug_fake_rw = DEF_FAKE_RW;
 744static unsigned int sdebug_guard = DEF_GUARD;
 745static int sdebug_host_max_queue;	/* per host */
 746static int sdebug_lowest_aligned = DEF_LOWEST_ALIGNED;
 747static int sdebug_max_luns = DEF_MAX_LUNS;
 748static int sdebug_max_queue = SDEBUG_CANQUEUE;	/* per submit queue */
 749static unsigned int sdebug_medium_error_start = OPT_MEDIUM_ERR_ADDR;
 750static int sdebug_medium_error_count = OPT_MEDIUM_ERR_NUM;
 751static atomic_t retired_max_queue;	/* if > 0 then was prior max_queue */
 752static int sdebug_ndelay = DEF_NDELAY;	/* if > 0 then unit is nanoseconds */
 753static int sdebug_no_lun_0 = DEF_NO_LUN_0;
 754static int sdebug_no_uld;
 755static int sdebug_num_parts = DEF_NUM_PARTS;
 756static int sdebug_num_tgts = DEF_NUM_TGTS; /* targets per host */
 757static int sdebug_opt_blks = DEF_OPT_BLKS;
 758static int sdebug_opts = DEF_OPTS;
 759static int sdebug_physblk_exp = DEF_PHYSBLK_EXP;
 760static int sdebug_opt_xferlen_exp = DEF_OPT_XFERLEN_EXP;
 761static int sdebug_ptype = DEF_PTYPE; /* SCSI peripheral device type */
 762static int sdebug_scsi_level = DEF_SCSI_LEVEL;
 763static int sdebug_sector_size = DEF_SECTOR_SIZE;
 764static int sdeb_tur_ms_to_ready = DEF_TUR_MS_TO_READY;
 765static int sdebug_virtual_gb = DEF_VIRTUAL_GB;
 766static int sdebug_vpd_use_hostno = DEF_VPD_USE_HOSTNO;
 767static unsigned int sdebug_lbpu = DEF_LBPU;
 768static unsigned int sdebug_lbpws = DEF_LBPWS;
 769static unsigned int sdebug_lbpws10 = DEF_LBPWS10;
 770static unsigned int sdebug_lbprz = DEF_LBPRZ;
 771static unsigned int sdebug_unmap_alignment = DEF_UNMAP_ALIGNMENT;
 772static unsigned int sdebug_unmap_granularity = DEF_UNMAP_GRANULARITY;
 773static unsigned int sdebug_unmap_max_blocks = DEF_UNMAP_MAX_BLOCKS;
 774static unsigned int sdebug_unmap_max_desc = DEF_UNMAP_MAX_DESC;
 775static unsigned int sdebug_write_same_length = DEF_WRITESAME_LENGTH;
 776static int sdebug_uuid_ctl = DEF_UUID_CTL;
 777static bool sdebug_random = DEF_RANDOM;
 778static bool sdebug_per_host_store = DEF_PER_HOST_STORE;
 779static bool sdebug_removable = DEF_REMOVABLE;
 780static bool sdebug_clustering;
 781static bool sdebug_host_lock = DEF_HOST_LOCK;
 782static bool sdebug_strict = DEF_STRICT;
 783static bool sdebug_any_injecting_opt;
 784static bool sdebug_verbose;
 785static bool have_dif_prot;
 786static bool write_since_sync;
 787static bool sdebug_statistics = DEF_STATISTICS;
 788static bool sdebug_wp;
 789/* Following enum: 0: no zbc, def; 1: host aware; 2: host managed */
 790static enum blk_zoned_model sdeb_zbc_model = BLK_ZONED_NONE;
 791static char *sdeb_zbc_model_s;
 792
 793enum sam_lun_addr_method {SAM_LUN_AM_PERIPHERAL = 0x0,
 794			  SAM_LUN_AM_FLAT = 0x1,
 795			  SAM_LUN_AM_LOGICAL_UNIT = 0x2,
 796			  SAM_LUN_AM_EXTENDED = 0x3};
 797static enum sam_lun_addr_method sdebug_lun_am = SAM_LUN_AM_PERIPHERAL;
 798static int sdebug_lun_am_i = (int)SAM_LUN_AM_PERIPHERAL;
 799
 800static unsigned int sdebug_store_sectors;
 801static sector_t sdebug_capacity;	/* in sectors */
 802
 803/* old BIOS stuff, kernel may get rid of them but some mode sense pages
 804   may still need them */
 805static int sdebug_heads;		/* heads per disk */
 806static int sdebug_cylinders_per;	/* cylinders per surface */
 807static int sdebug_sectors_per;		/* sectors per cylinder */
 808
 809static LIST_HEAD(sdebug_host_list);
 810static DEFINE_SPINLOCK(sdebug_host_list_lock);
 811
 812static struct xarray per_store_arr;
 813static struct xarray *per_store_ap = &per_store_arr;
 814static int sdeb_first_idx = -1;		/* invalid index ==> none created */
 815static int sdeb_most_recent_idx = -1;
 816static DEFINE_RWLOCK(sdeb_fake_rw_lck);	/* need a RW lock when fake_rw=1 */
 817
 818static unsigned long map_size;
 819static int num_aborts;
 820static int num_dev_resets;
 821static int num_target_resets;
 822static int num_bus_resets;
 823static int num_host_resets;
 824static int dix_writes;
 825static int dix_reads;
 826static int dif_errors;
 827
 828/* ZBC global data */
 829static bool sdeb_zbc_in_use;	/* true for host-aware and host-managed disks */
 830static int sdeb_zbc_zone_size_mb;
 831static int sdeb_zbc_max_open = DEF_ZBC_MAX_OPEN_ZONES;
 832static int sdeb_zbc_nr_conv = DEF_ZBC_NR_CONV_ZONES;
 833
 834static int submit_queues = DEF_SUBMIT_QUEUES;  /* > 1 for multi-queue (mq) */
 835static int poll_queues; /* iouring iopoll interface.*/
 836static struct sdebug_queue *sdebug_q_arr;  /* ptr to array of submit queues */
 837
 838static DEFINE_RWLOCK(atomic_rw);
 839static DEFINE_RWLOCK(atomic_rw2);
 840
 841static rwlock_t *ramdisk_lck_a[2];
 842
 843static char sdebug_proc_name[] = MY_NAME;
 844static const char *my_name = MY_NAME;
 845
 846static struct bus_type pseudo_lld_bus;
 847
 848static struct device_driver sdebug_driverfs_driver = {
 849	.name 		= sdebug_proc_name,
 850	.bus		= &pseudo_lld_bus,
 851};
 852
 853static const int check_condition_result =
 854	SAM_STAT_CHECK_CONDITION;
 855
 856static const int illegal_condition_result =
 857	(DID_ABORT << 16) | SAM_STAT_CHECK_CONDITION;
 858
 859static const int device_qfull_result =
 860	(DID_OK << 16) | SAM_STAT_TASK_SET_FULL;
 861
 862static const int condition_met_result = SAM_STAT_CONDITION_MET;
 863
 864
 865/* Only do the extra work involved in logical block provisioning if one or
 866 * more of the lbpu, lbpws or lbpws10 parameters are given and we are doing
 867 * real reads and writes (i.e. not skipping them for speed).
 868 */
 869static inline bool scsi_debug_lbp(void)
 870{
 871	return 0 == sdebug_fake_rw &&
 872		(sdebug_lbpu || sdebug_lbpws || sdebug_lbpws10);
 873}
 874
 875static void *lba2fake_store(struct sdeb_store_info *sip,
 876			    unsigned long long lba)
 877{
 878	struct sdeb_store_info *lsip = sip;
 879
 880	lba = do_div(lba, sdebug_store_sectors);
 881	if (!sip || !sip->storep) {
 882		WARN_ON_ONCE(true);
 883		lsip = xa_load(per_store_ap, 0);  /* should never be NULL */
 884	}
 885	return lsip->storep + lba * sdebug_sector_size;
 886}
 887
 888static struct t10_pi_tuple *dif_store(struct sdeb_store_info *sip,
 889				      sector_t sector)
 890{
 891	sector = sector_div(sector, sdebug_store_sectors);
 892
 893	return sip->dif_storep + sector;
 894}
 895
 896static void sdebug_max_tgts_luns(void)
 897{
 898	struct sdebug_host_info *sdbg_host;
 899	struct Scsi_Host *hpnt;
 900
 901	spin_lock(&sdebug_host_list_lock);
 902	list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
 903		hpnt = sdbg_host->shost;
 904		if ((hpnt->this_id >= 0) &&
 905		    (sdebug_num_tgts > hpnt->this_id))
 906			hpnt->max_id = sdebug_num_tgts + 1;
 907		else
 908			hpnt->max_id = sdebug_num_tgts;
 909		/* sdebug_max_luns; */
 910		hpnt->max_lun = SCSI_W_LUN_REPORT_LUNS + 1;
 911	}
 912	spin_unlock(&sdebug_host_list_lock);
 913}
 914
 915enum sdeb_cmd_data {SDEB_IN_DATA = 0, SDEB_IN_CDB = 1};
 916
 917/* Set in_bit to -1 to indicate no bit position of invalid field */
 918static void mk_sense_invalid_fld(struct scsi_cmnd *scp,
 919				 enum sdeb_cmd_data c_d,
 920				 int in_byte, int in_bit)
 921{
 922	unsigned char *sbuff;
 923	u8 sks[4];
 924	int sl, asc;
 925
 926	sbuff = scp->sense_buffer;
 927	if (!sbuff) {
 928		sdev_printk(KERN_ERR, scp->device,
 929			    "%s: sense_buffer is NULL\n", __func__);
 930		return;
 931	}
 932	asc = c_d ? INVALID_FIELD_IN_CDB : INVALID_FIELD_IN_PARAM_LIST;
 933	memset(sbuff, 0, SCSI_SENSE_BUFFERSIZE);
 934	scsi_build_sense(scp, sdebug_dsense, ILLEGAL_REQUEST, asc, 0);
 935	memset(sks, 0, sizeof(sks));
 936	sks[0] = 0x80;
 937	if (c_d)
 938		sks[0] |= 0x40;
 939	if (in_bit >= 0) {
 940		sks[0] |= 0x8;
 941		sks[0] |= 0x7 & in_bit;
 942	}
 943	put_unaligned_be16(in_byte, sks + 1);
 944	if (sdebug_dsense) {
 945		sl = sbuff[7] + 8;
 946		sbuff[7] = sl;
 947		sbuff[sl] = 0x2;
 948		sbuff[sl + 1] = 0x6;
 949		memcpy(sbuff + sl + 4, sks, 3);
 950	} else
 951		memcpy(sbuff + 15, sks, 3);
 952	if (sdebug_verbose)
 953		sdev_printk(KERN_INFO, scp->device, "%s:  [sense_key,asc,ascq"
 954			    "]: [0x5,0x%x,0x0] %c byte=%d, bit=%d\n",
 955			    my_name, asc, c_d ? 'C' : 'D', in_byte, in_bit);
 956}
 957
 958static void mk_sense_buffer(struct scsi_cmnd *scp, int key, int asc, int asq)
 959{
 960	if (!scp->sense_buffer) {
 
 
 
 961		sdev_printk(KERN_ERR, scp->device,
 962			    "%s: sense_buffer is NULL\n", __func__);
 963		return;
 964	}
 965	memset(scp->sense_buffer, 0, SCSI_SENSE_BUFFERSIZE);
 966
 967	scsi_build_sense(scp, sdebug_dsense, key, asc, asq);
 968
 969	if (sdebug_verbose)
 970		sdev_printk(KERN_INFO, scp->device,
 971			    "%s:  [sense_key,asc,ascq]: [0x%x,0x%x,0x%x]\n",
 972			    my_name, key, asc, asq);
 973}
 974
 975static void mk_sense_invalid_opcode(struct scsi_cmnd *scp)
 976{
 977	mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_OPCODE, 0);
 978}
 979
 980static int scsi_debug_ioctl(struct scsi_device *dev, unsigned int cmd,
 981			    void __user *arg)
 982{
 983	if (sdebug_verbose) {
 984		if (0x1261 == cmd)
 985			sdev_printk(KERN_INFO, dev,
 986				    "%s: BLKFLSBUF [0x1261]\n", __func__);
 987		else if (0x5331 == cmd)
 988			sdev_printk(KERN_INFO, dev,
 989				    "%s: CDROM_GET_CAPABILITY [0x5331]\n",
 990				    __func__);
 991		else
 992			sdev_printk(KERN_INFO, dev, "%s: cmd=0x%x\n",
 993				    __func__, cmd);
 994	}
 995	return -EINVAL;
 996	/* return -ENOTTY; // correct return but upsets fdisk */
 997}
 998
 999static void config_cdb_len(struct scsi_device *sdev)
1000{
1001	switch (sdebug_cdb_len) {
1002	case 6:	/* suggest 6 byte READ, WRITE and MODE SENSE/SELECT */
1003		sdev->use_10_for_rw = false;
1004		sdev->use_16_for_rw = false;
1005		sdev->use_10_for_ms = false;
1006		break;
1007	case 10: /* suggest 10 byte RWs and 6 byte MODE SENSE/SELECT */
1008		sdev->use_10_for_rw = true;
1009		sdev->use_16_for_rw = false;
1010		sdev->use_10_for_ms = false;
1011		break;
1012	case 12: /* suggest 10 byte RWs and 10 byte MODE SENSE/SELECT */
1013		sdev->use_10_for_rw = true;
1014		sdev->use_16_for_rw = false;
1015		sdev->use_10_for_ms = true;
1016		break;
1017	case 16:
1018		sdev->use_10_for_rw = false;
1019		sdev->use_16_for_rw = true;
1020		sdev->use_10_for_ms = true;
1021		break;
1022	case 32: /* No knobs to suggest this so same as 16 for now */
1023		sdev->use_10_for_rw = false;
1024		sdev->use_16_for_rw = true;
1025		sdev->use_10_for_ms = true;
1026		break;
1027	default:
1028		pr_warn("unexpected cdb_len=%d, force to 10\n",
1029			sdebug_cdb_len);
1030		sdev->use_10_for_rw = true;
1031		sdev->use_16_for_rw = false;
1032		sdev->use_10_for_ms = false;
1033		sdebug_cdb_len = 10;
1034		break;
1035	}
1036}
1037
1038static void all_config_cdb_len(void)
1039{
1040	struct sdebug_host_info *sdbg_host;
1041	struct Scsi_Host *shost;
1042	struct scsi_device *sdev;
1043
1044	spin_lock(&sdebug_host_list_lock);
1045	list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
1046		shost = sdbg_host->shost;
1047		shost_for_each_device(sdev, shost) {
1048			config_cdb_len(sdev);
1049		}
1050	}
1051	spin_unlock(&sdebug_host_list_lock);
1052}
1053
1054static void clear_luns_changed_on_target(struct sdebug_dev_info *devip)
1055{
1056	struct sdebug_host_info *sdhp;
1057	struct sdebug_dev_info *dp;
1058
1059	spin_lock(&sdebug_host_list_lock);
1060	list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
1061		list_for_each_entry(dp, &sdhp->dev_info_list, dev_list) {
1062			if ((devip->sdbg_host == dp->sdbg_host) &&
1063			    (devip->target == dp->target))
1064				clear_bit(SDEBUG_UA_LUNS_CHANGED, dp->uas_bm);
1065		}
1066	}
1067	spin_unlock(&sdebug_host_list_lock);
1068}
1069
1070static int make_ua(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
1071{
1072	int k;
1073
1074	k = find_first_bit(devip->uas_bm, SDEBUG_NUM_UAS);
1075	if (k != SDEBUG_NUM_UAS) {
1076		const char *cp = NULL;
1077
1078		switch (k) {
1079		case SDEBUG_UA_POR:
1080			mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
1081					POWER_ON_RESET_ASCQ);
1082			if (sdebug_verbose)
1083				cp = "power on reset";
1084			break;
1085		case SDEBUG_UA_BUS_RESET:
1086			mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
1087					BUS_RESET_ASCQ);
1088			if (sdebug_verbose)
1089				cp = "bus reset";
1090			break;
1091		case SDEBUG_UA_MODE_CHANGED:
1092			mk_sense_buffer(scp, UNIT_ATTENTION, UA_CHANGED_ASC,
1093					MODE_CHANGED_ASCQ);
1094			if (sdebug_verbose)
1095				cp = "mode parameters changed";
1096			break;
1097		case SDEBUG_UA_CAPACITY_CHANGED:
1098			mk_sense_buffer(scp, UNIT_ATTENTION, UA_CHANGED_ASC,
1099					CAPACITY_CHANGED_ASCQ);
1100			if (sdebug_verbose)
1101				cp = "capacity data changed";
1102			break;
1103		case SDEBUG_UA_MICROCODE_CHANGED:
1104			mk_sense_buffer(scp, UNIT_ATTENTION,
1105					TARGET_CHANGED_ASC,
1106					MICROCODE_CHANGED_ASCQ);
1107			if (sdebug_verbose)
1108				cp = "microcode has been changed";
1109			break;
1110		case SDEBUG_UA_MICROCODE_CHANGED_WO_RESET:
1111			mk_sense_buffer(scp, UNIT_ATTENTION,
1112					TARGET_CHANGED_ASC,
1113					MICROCODE_CHANGED_WO_RESET_ASCQ);
1114			if (sdebug_verbose)
1115				cp = "microcode has been changed without reset";
1116			break;
1117		case SDEBUG_UA_LUNS_CHANGED:
1118			/*
1119			 * SPC-3 behavior is to report a UNIT ATTENTION with
1120			 * ASC/ASCQ REPORTED LUNS DATA HAS CHANGED on every LUN
1121			 * on the target, until a REPORT LUNS command is
1122			 * received.  SPC-4 behavior is to report it only once.
1123			 * NOTE:  sdebug_scsi_level does not use the same
1124			 * values as struct scsi_device->scsi_level.
1125			 */
1126			if (sdebug_scsi_level >= 6)	/* SPC-4 and above */
1127				clear_luns_changed_on_target(devip);
1128			mk_sense_buffer(scp, UNIT_ATTENTION,
1129					TARGET_CHANGED_ASC,
1130					LUNS_CHANGED_ASCQ);
1131			if (sdebug_verbose)
1132				cp = "reported luns data has changed";
1133			break;
1134		default:
1135			pr_warn("unexpected unit attention code=%d\n", k);
1136			if (sdebug_verbose)
1137				cp = "unknown";
1138			break;
1139		}
1140		clear_bit(k, devip->uas_bm);
1141		if (sdebug_verbose)
1142			sdev_printk(KERN_INFO, scp->device,
1143				   "%s reports: Unit attention: %s\n",
1144				   my_name, cp);
1145		return check_condition_result;
1146	}
1147	return 0;
1148}
1149
1150/* Build SCSI "data-in" buffer. Returns 0 if ok else (DID_ERROR << 16). */
1151static int fill_from_dev_buffer(struct scsi_cmnd *scp, unsigned char *arr,
1152				int arr_len)
1153{
1154	int act_len;
1155	struct scsi_data_buffer *sdb = &scp->sdb;
1156
1157	if (!sdb->length)
1158		return 0;
1159	if (scp->sc_data_direction != DMA_FROM_DEVICE)
1160		return DID_ERROR << 16;
1161
1162	act_len = sg_copy_from_buffer(sdb->table.sgl, sdb->table.nents,
1163				      arr, arr_len);
1164	scsi_set_resid(scp, scsi_bufflen(scp) - act_len);
1165
1166	return 0;
1167}
1168
1169/* Partial build of SCSI "data-in" buffer. Returns 0 if ok else
1170 * (DID_ERROR << 16). Can write to offset in data-in buffer. If multiple
1171 * calls, not required to write in ascending offset order. Assumes resid
1172 * set to scsi_bufflen() prior to any calls.
1173 */
1174static int p_fill_from_dev_buffer(struct scsi_cmnd *scp, const void *arr,
1175				  int arr_len, unsigned int off_dst)
1176{
1177	unsigned int act_len, n;
1178	struct scsi_data_buffer *sdb = &scp->sdb;
1179	off_t skip = off_dst;
1180
1181	if (sdb->length <= off_dst)
1182		return 0;
1183	if (scp->sc_data_direction != DMA_FROM_DEVICE)
1184		return DID_ERROR << 16;
1185
1186	act_len = sg_pcopy_from_buffer(sdb->table.sgl, sdb->table.nents,
1187				       arr, arr_len, skip);
1188	pr_debug("%s: off_dst=%u, scsi_bufflen=%u, act_len=%u, resid=%d\n",
1189		 __func__, off_dst, scsi_bufflen(scp), act_len,
1190		 scsi_get_resid(scp));
1191	n = scsi_bufflen(scp) - (off_dst + act_len);
1192	scsi_set_resid(scp, min_t(int, scsi_get_resid(scp), n));
1193	return 0;
1194}
1195
1196/* Fetches from SCSI "data-out" buffer. Returns number of bytes fetched into
1197 * 'arr' or -1 if error.
1198 */
1199static int fetch_to_dev_buffer(struct scsi_cmnd *scp, unsigned char *arr,
1200			       int arr_len)
1201{
1202	if (!scsi_bufflen(scp))
1203		return 0;
1204	if (scp->sc_data_direction != DMA_TO_DEVICE)
1205		return -1;
1206
1207	return scsi_sg_copy_to_buffer(scp, arr, arr_len);
1208}
1209
1210
1211static char sdebug_inq_vendor_id[9] = "Linux   ";
1212static char sdebug_inq_product_id[17] = "scsi_debug      ";
1213static char sdebug_inq_product_rev[5] = SDEBUG_VERSION;
1214/* Use some locally assigned NAAs for SAS addresses. */
1215static const u64 naa3_comp_a = 0x3222222000000000ULL;
1216static const u64 naa3_comp_b = 0x3333333000000000ULL;
1217static const u64 naa3_comp_c = 0x3111111000000000ULL;
1218
1219/* Device identification VPD page. Returns number of bytes placed in arr */
1220static int inquiry_vpd_83(unsigned char *arr, int port_group_id,
1221			  int target_dev_id, int dev_id_num,
1222			  const char *dev_id_str, int dev_id_str_len,
1223			  const uuid_t *lu_name)
1224{
1225	int num, port_a;
1226	char b[32];
1227
1228	port_a = target_dev_id + 1;
1229	/* T10 vendor identifier field format (faked) */
1230	arr[0] = 0x2;	/* ASCII */
1231	arr[1] = 0x1;
1232	arr[2] = 0x0;
1233	memcpy(&arr[4], sdebug_inq_vendor_id, 8);
1234	memcpy(&arr[12], sdebug_inq_product_id, 16);
1235	memcpy(&arr[28], dev_id_str, dev_id_str_len);
1236	num = 8 + 16 + dev_id_str_len;
1237	arr[3] = num;
1238	num += 4;
1239	if (dev_id_num >= 0) {
1240		if (sdebug_uuid_ctl) {
1241			/* Locally assigned UUID */
1242			arr[num++] = 0x1;  /* binary (not necessarily sas) */
1243			arr[num++] = 0xa;  /* PIV=0, lu, naa */
1244			arr[num++] = 0x0;
1245			arr[num++] = 0x12;
1246			arr[num++] = 0x10; /* uuid type=1, locally assigned */
1247			arr[num++] = 0x0;
1248			memcpy(arr + num, lu_name, 16);
1249			num += 16;
1250		} else {
1251			/* NAA-3, Logical unit identifier (binary) */
1252			arr[num++] = 0x1;  /* binary (not necessarily sas) */
1253			arr[num++] = 0x3;  /* PIV=0, lu, naa */
1254			arr[num++] = 0x0;
1255			arr[num++] = 0x8;
1256			put_unaligned_be64(naa3_comp_b + dev_id_num, arr + num);
1257			num += 8;
1258		}
1259		/* Target relative port number */
1260		arr[num++] = 0x61;	/* proto=sas, binary */
1261		arr[num++] = 0x94;	/* PIV=1, target port, rel port */
1262		arr[num++] = 0x0;	/* reserved */
1263		arr[num++] = 0x4;	/* length */
1264		arr[num++] = 0x0;	/* reserved */
1265		arr[num++] = 0x0;	/* reserved */
1266		arr[num++] = 0x0;
1267		arr[num++] = 0x1;	/* relative port A */
1268	}
1269	/* NAA-3, Target port identifier */
1270	arr[num++] = 0x61;	/* proto=sas, binary */
1271	arr[num++] = 0x93;	/* piv=1, target port, naa */
1272	arr[num++] = 0x0;
1273	arr[num++] = 0x8;
1274	put_unaligned_be64(naa3_comp_a + port_a, arr + num);
1275	num += 8;
1276	/* NAA-3, Target port group identifier */
1277	arr[num++] = 0x61;	/* proto=sas, binary */
1278	arr[num++] = 0x95;	/* piv=1, target port group id */
1279	arr[num++] = 0x0;
1280	arr[num++] = 0x4;
1281	arr[num++] = 0;
1282	arr[num++] = 0;
1283	put_unaligned_be16(port_group_id, arr + num);
1284	num += 2;
1285	/* NAA-3, Target device identifier */
1286	arr[num++] = 0x61;	/* proto=sas, binary */
1287	arr[num++] = 0xa3;	/* piv=1, target device, naa */
1288	arr[num++] = 0x0;
1289	arr[num++] = 0x8;
1290	put_unaligned_be64(naa3_comp_a + target_dev_id, arr + num);
1291	num += 8;
1292	/* SCSI name string: Target device identifier */
1293	arr[num++] = 0x63;	/* proto=sas, UTF-8 */
1294	arr[num++] = 0xa8;	/* piv=1, target device, SCSI name string */
1295	arr[num++] = 0x0;
1296	arr[num++] = 24;
1297	memcpy(arr + num, "naa.32222220", 12);
1298	num += 12;
1299	snprintf(b, sizeof(b), "%08X", target_dev_id);
1300	memcpy(arr + num, b, 8);
1301	num += 8;
1302	memset(arr + num, 0, 4);
1303	num += 4;
1304	return num;
1305}
1306
1307static unsigned char vpd84_data[] = {
1308/* from 4th byte */ 0x22,0x22,0x22,0x0,0xbb,0x0,
1309    0x22,0x22,0x22,0x0,0xbb,0x1,
1310    0x22,0x22,0x22,0x0,0xbb,0x2,
1311};
1312
1313/*  Software interface identification VPD page */
1314static int inquiry_vpd_84(unsigned char *arr)
1315{
1316	memcpy(arr, vpd84_data, sizeof(vpd84_data));
1317	return sizeof(vpd84_data);
1318}
1319
1320/* Management network addresses VPD page */
1321static int inquiry_vpd_85(unsigned char *arr)
1322{
1323	int num = 0;
1324	const char *na1 = "https://www.kernel.org/config";
1325	const char *na2 = "http://www.kernel.org/log";
1326	int plen, olen;
1327
1328	arr[num++] = 0x1;	/* lu, storage config */
1329	arr[num++] = 0x0;	/* reserved */
1330	arr[num++] = 0x0;
1331	olen = strlen(na1);
1332	plen = olen + 1;
1333	if (plen % 4)
1334		plen = ((plen / 4) + 1) * 4;
1335	arr[num++] = plen;	/* length, null termianted, padded */
1336	memcpy(arr + num, na1, olen);
1337	memset(arr + num + olen, 0, plen - olen);
1338	num += plen;
1339
1340	arr[num++] = 0x4;	/* lu, logging */
1341	arr[num++] = 0x0;	/* reserved */
1342	arr[num++] = 0x0;
1343	olen = strlen(na2);
1344	plen = olen + 1;
1345	if (plen % 4)
1346		plen = ((plen / 4) + 1) * 4;
1347	arr[num++] = plen;	/* length, null terminated, padded */
1348	memcpy(arr + num, na2, olen);
1349	memset(arr + num + olen, 0, plen - olen);
1350	num += plen;
1351
1352	return num;
1353}
1354
1355/* SCSI ports VPD page */
1356static int inquiry_vpd_88(unsigned char *arr, int target_dev_id)
1357{
1358	int num = 0;
1359	int port_a, port_b;
1360
1361	port_a = target_dev_id + 1;
1362	port_b = port_a + 1;
1363	arr[num++] = 0x0;	/* reserved */
1364	arr[num++] = 0x0;	/* reserved */
1365	arr[num++] = 0x0;
1366	arr[num++] = 0x1;	/* relative port 1 (primary) */
1367	memset(arr + num, 0, 6);
1368	num += 6;
1369	arr[num++] = 0x0;
1370	arr[num++] = 12;	/* length tp descriptor */
1371	/* naa-5 target port identifier (A) */
1372	arr[num++] = 0x61;	/* proto=sas, binary */
1373	arr[num++] = 0x93;	/* PIV=1, target port, NAA */
1374	arr[num++] = 0x0;	/* reserved */
1375	arr[num++] = 0x8;	/* length */
1376	put_unaligned_be64(naa3_comp_a + port_a, arr + num);
1377	num += 8;
1378	arr[num++] = 0x0;	/* reserved */
1379	arr[num++] = 0x0;	/* reserved */
1380	arr[num++] = 0x0;
1381	arr[num++] = 0x2;	/* relative port 2 (secondary) */
1382	memset(arr + num, 0, 6);
1383	num += 6;
1384	arr[num++] = 0x0;
1385	arr[num++] = 12;	/* length tp descriptor */
1386	/* naa-5 target port identifier (B) */
1387	arr[num++] = 0x61;	/* proto=sas, binary */
1388	arr[num++] = 0x93;	/* PIV=1, target port, NAA */
1389	arr[num++] = 0x0;	/* reserved */
1390	arr[num++] = 0x8;	/* length */
1391	put_unaligned_be64(naa3_comp_a + port_b, arr + num);
1392	num += 8;
1393
1394	return num;
1395}
1396
1397
1398static unsigned char vpd89_data[] = {
1399/* from 4th byte */ 0,0,0,0,
1400'l','i','n','u','x',' ',' ',' ',
1401'S','A','T',' ','s','c','s','i','_','d','e','b','u','g',' ',' ',
1402'1','2','3','4',
14030x34,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,
14040xec,0,0,0,
14050x5a,0xc,0xff,0x3f,0x37,0xc8,0x10,0,0,0,0,0,0x3f,0,0,0,
14060,0,0,0,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x20,0x20,0x20,0x20,
14070x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0,0,0,0x40,0x4,0,0x2e,0x33,
14080x38,0x31,0x20,0x20,0x20,0x20,0x54,0x53,0x38,0x33,0x30,0x30,0x33,0x31,
14090x53,0x41,
14100x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
14110x20,0x20,
14120x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
14130x10,0x80,
14140,0,0,0x2f,0,0,0,0x2,0,0x2,0x7,0,0xff,0xff,0x1,0,
14150x3f,0,0xc1,0xff,0x3e,0,0x10,0x1,0xb0,0xf8,0x50,0x9,0,0,0x7,0,
14160x3,0,0x78,0,0x78,0,0xf0,0,0x78,0,0,0,0,0,0,0,
14170,0,0,0,0,0,0,0,0x2,0,0,0,0,0,0,0,
14180x7e,0,0x1b,0,0x6b,0x34,0x1,0x7d,0x3,0x40,0x69,0x34,0x1,0x3c,0x3,0x40,
14190x7f,0x40,0,0,0,0,0xfe,0xfe,0,0,0,0,0,0xfe,0,0,
14200,0,0,0,0,0,0,0,0xb0,0xf8,0x50,0x9,0,0,0,0,
14210,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14220,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14230,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14240x1,0,0xb0,0xf8,0x50,0x9,0xb0,0xf8,0x50,0x9,0x20,0x20,0x2,0,0xb6,0x42,
14250,0x80,0x8a,0,0x6,0x3c,0xa,0x3c,0xff,0xff,0xc6,0x7,0,0x1,0,0x8,
14260xf0,0xf,0,0x10,0x2,0,0x30,0,0,0,0,0,0,0,0x6,0xfe,
14270,0,0x2,0,0x50,0,0x8a,0,0x4f,0x95,0,0,0x21,0,0xb,0,
14280,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14290,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14300,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14310,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14320,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14330,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14340,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14350,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14360,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14370,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14380,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14390,0,0,0,0,0,0,0,0,0,0,0,0,0,0xa5,0x51,
1440};
1441
1442/* ATA Information VPD page */
1443static int inquiry_vpd_89(unsigned char *arr)
1444{
1445	memcpy(arr, vpd89_data, sizeof(vpd89_data));
1446	return sizeof(vpd89_data);
1447}
1448
1449
1450static unsigned char vpdb0_data[] = {
1451	/* from 4th byte */ 0,0,0,4, 0,0,0x4,0, 0,0,0,64,
1452	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1453	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1454	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1455};
1456
1457/* Block limits VPD page (SBC-3) */
1458static int inquiry_vpd_b0(unsigned char *arr)
1459{
1460	unsigned int gran;
1461
1462	memcpy(arr, vpdb0_data, sizeof(vpdb0_data));
1463
1464	/* Optimal transfer length granularity */
1465	if (sdebug_opt_xferlen_exp != 0 &&
1466	    sdebug_physblk_exp < sdebug_opt_xferlen_exp)
1467		gran = 1 << sdebug_opt_xferlen_exp;
1468	else
1469		gran = 1 << sdebug_physblk_exp;
1470	put_unaligned_be16(gran, arr + 2);
1471
1472	/* Maximum Transfer Length */
1473	if (sdebug_store_sectors > 0x400)
1474		put_unaligned_be32(sdebug_store_sectors, arr + 4);
1475
1476	/* Optimal Transfer Length */
1477	put_unaligned_be32(sdebug_opt_blks, &arr[8]);
1478
1479	if (sdebug_lbpu) {
1480		/* Maximum Unmap LBA Count */
1481		put_unaligned_be32(sdebug_unmap_max_blocks, &arr[16]);
1482
1483		/* Maximum Unmap Block Descriptor Count */
1484		put_unaligned_be32(sdebug_unmap_max_desc, &arr[20]);
1485	}
1486
1487	/* Unmap Granularity Alignment */
1488	if (sdebug_unmap_alignment) {
1489		put_unaligned_be32(sdebug_unmap_alignment, &arr[28]);
1490		arr[28] |= 0x80; /* UGAVALID */
1491	}
1492
1493	/* Optimal Unmap Granularity */
1494	put_unaligned_be32(sdebug_unmap_granularity, &arr[24]);
1495
1496	/* Maximum WRITE SAME Length */
1497	put_unaligned_be64(sdebug_write_same_length, &arr[32]);
1498
1499	return 0x3c; /* Mandatory page length for Logical Block Provisioning */
1500
1501	return sizeof(vpdb0_data);
1502}
1503
1504/* Block device characteristics VPD page (SBC-3) */
1505static int inquiry_vpd_b1(struct sdebug_dev_info *devip, unsigned char *arr)
1506{
1507	memset(arr, 0, 0x3c);
1508	arr[0] = 0;
1509	arr[1] = 1;	/* non rotating medium (e.g. solid state) */
1510	arr[2] = 0;
1511	arr[3] = 5;	/* less than 1.8" */
1512	if (devip->zmodel == BLK_ZONED_HA)
1513		arr[4] = 1 << 4;	/* zoned field = 01b */
1514
1515	return 0x3c;
1516}
1517
1518/* Logical block provisioning VPD page (SBC-4) */
1519static int inquiry_vpd_b2(unsigned char *arr)
1520{
1521	memset(arr, 0, 0x4);
1522	arr[0] = 0;			/* threshold exponent */
1523	if (sdebug_lbpu)
1524		arr[1] = 1 << 7;
1525	if (sdebug_lbpws)
1526		arr[1] |= 1 << 6;
1527	if (sdebug_lbpws10)
1528		arr[1] |= 1 << 5;
1529	if (sdebug_lbprz && scsi_debug_lbp())
1530		arr[1] |= (sdebug_lbprz & 0x7) << 2;  /* sbc4r07 and later */
1531	/* anc_sup=0; dp=0 (no provisioning group descriptor) */
1532	/* minimum_percentage=0; provisioning_type=0 (unknown) */
1533	/* threshold_percentage=0 */
1534	return 0x4;
1535}
1536
1537/* Zoned block device characteristics VPD page (ZBC mandatory) */
1538static int inquiry_vpd_b6(struct sdebug_dev_info *devip, unsigned char *arr)
1539{
1540	memset(arr, 0, 0x3c);
1541	arr[0] = 0x1; /* set URSWRZ (unrestricted read in seq. wr req zone) */
1542	/*
1543	 * Set Optimal number of open sequential write preferred zones and
1544	 * Optimal number of non-sequentially written sequential write
1545	 * preferred zones fields to 'not reported' (0xffffffff). Leave other
1546	 * fields set to zero, apart from Max. number of open swrz_s field.
1547	 */
1548	put_unaligned_be32(0xffffffff, &arr[4]);
1549	put_unaligned_be32(0xffffffff, &arr[8]);
1550	if (sdeb_zbc_model == BLK_ZONED_HM && devip->max_open)
1551		put_unaligned_be32(devip->max_open, &arr[12]);
1552	else
1553		put_unaligned_be32(0xffffffff, &arr[12]);
1554	return 0x3c;
1555}
1556
1557#define SDEBUG_LONG_INQ_SZ 96
1558#define SDEBUG_MAX_INQ_ARR_SZ 584
1559
1560static int resp_inquiry(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
1561{
1562	unsigned char pq_pdt;
1563	unsigned char *arr;
1564	unsigned char *cmd = scp->cmnd;
1565	int alloc_len, n, ret;
1566	bool have_wlun, is_disk, is_zbc, is_disk_zbc;
1567
1568	alloc_len = get_unaligned_be16(cmd + 3);
1569	arr = kzalloc(SDEBUG_MAX_INQ_ARR_SZ, GFP_ATOMIC);
1570	if (! arr)
1571		return DID_REQUEUE << 16;
1572	is_disk = (sdebug_ptype == TYPE_DISK);
1573	is_zbc = (devip->zmodel != BLK_ZONED_NONE);
1574	is_disk_zbc = (is_disk || is_zbc);
1575	have_wlun = scsi_is_wlun(scp->device->lun);
1576	if (have_wlun)
1577		pq_pdt = TYPE_WLUN;	/* present, wlun */
1578	else if (sdebug_no_lun_0 && (devip->lun == SDEBUG_LUN_0_VAL))
1579		pq_pdt = 0x7f;	/* not present, PQ=3, PDT=0x1f */
1580	else
1581		pq_pdt = (sdebug_ptype & 0x1f);
1582	arr[0] = pq_pdt;
1583	if (0x2 & cmd[1]) {  /* CMDDT bit set */
1584		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 1);
1585		kfree(arr);
1586		return check_condition_result;
1587	} else if (0x1 & cmd[1]) {  /* EVPD bit set */
1588		int lu_id_num, port_group_id, target_dev_id, len;
1589		char lu_id_str[6];
1590		int host_no = devip->sdbg_host->shost->host_no;
1591		
1592		port_group_id = (((host_no + 1) & 0x7f) << 8) +
1593		    (devip->channel & 0x7f);
1594		if (sdebug_vpd_use_hostno == 0)
1595			host_no = 0;
1596		lu_id_num = have_wlun ? -1 : (((host_no + 1) * 2000) +
1597			    (devip->target * 1000) + devip->lun);
1598		target_dev_id = ((host_no + 1) * 2000) +
1599				 (devip->target * 1000) - 3;
1600		len = scnprintf(lu_id_str, 6, "%d", lu_id_num);
1601		if (0 == cmd[2]) { /* supported vital product data pages */
1602			arr[1] = cmd[2];	/*sanity */
1603			n = 4;
1604			arr[n++] = 0x0;   /* this page */
1605			arr[n++] = 0x80;  /* unit serial number */
1606			arr[n++] = 0x83;  /* device identification */
1607			arr[n++] = 0x84;  /* software interface ident. */
1608			arr[n++] = 0x85;  /* management network addresses */
1609			arr[n++] = 0x86;  /* extended inquiry */
1610			arr[n++] = 0x87;  /* mode page policy */
1611			arr[n++] = 0x88;  /* SCSI ports */
1612			if (is_disk_zbc) {	  /* SBC or ZBC */
1613				arr[n++] = 0x89;  /* ATA information */
1614				arr[n++] = 0xb0;  /* Block limits */
1615				arr[n++] = 0xb1;  /* Block characteristics */
1616				if (is_disk)
1617					arr[n++] = 0xb2;  /* LB Provisioning */
1618				if (is_zbc)
1619					arr[n++] = 0xb6;  /* ZB dev. char. */
1620			}
1621			arr[3] = n - 4;	  /* number of supported VPD pages */
1622		} else if (0x80 == cmd[2]) { /* unit serial number */
1623			arr[1] = cmd[2];	/*sanity */
1624			arr[3] = len;
1625			memcpy(&arr[4], lu_id_str, len);
1626		} else if (0x83 == cmd[2]) { /* device identification */
1627			arr[1] = cmd[2];	/*sanity */
1628			arr[3] = inquiry_vpd_83(&arr[4], port_group_id,
1629						target_dev_id, lu_id_num,
1630						lu_id_str, len,
1631						&devip->lu_name);
1632		} else if (0x84 == cmd[2]) { /* Software interface ident. */
1633			arr[1] = cmd[2];	/*sanity */
1634			arr[3] = inquiry_vpd_84(&arr[4]);
1635		} else if (0x85 == cmd[2]) { /* Management network addresses */
1636			arr[1] = cmd[2];	/*sanity */
1637			arr[3] = inquiry_vpd_85(&arr[4]);
1638		} else if (0x86 == cmd[2]) { /* extended inquiry */
1639			arr[1] = cmd[2];	/*sanity */
1640			arr[3] = 0x3c;	/* number of following entries */
1641			if (sdebug_dif == T10_PI_TYPE3_PROTECTION)
1642				arr[4] = 0x4;	/* SPT: GRD_CHK:1 */
1643			else if (have_dif_prot)
1644				arr[4] = 0x5;   /* SPT: GRD_CHK:1, REF_CHK:1 */
1645			else
1646				arr[4] = 0x0;   /* no protection stuff */
1647			arr[5] = 0x7;   /* head of q, ordered + simple q's */
1648		} else if (0x87 == cmd[2]) { /* mode page policy */
1649			arr[1] = cmd[2];	/*sanity */
1650			arr[3] = 0x8;	/* number of following entries */
1651			arr[4] = 0x2;	/* disconnect-reconnect mp */
1652			arr[6] = 0x80;	/* mlus, shared */
1653			arr[8] = 0x18;	 /* protocol specific lu */
1654			arr[10] = 0x82;	 /* mlus, per initiator port */
1655		} else if (0x88 == cmd[2]) { /* SCSI Ports */
1656			arr[1] = cmd[2];	/*sanity */
1657			arr[3] = inquiry_vpd_88(&arr[4], target_dev_id);
1658		} else if (is_disk_zbc && 0x89 == cmd[2]) { /* ATA info */
1659			arr[1] = cmd[2];        /*sanity */
1660			n = inquiry_vpd_89(&arr[4]);
1661			put_unaligned_be16(n, arr + 2);
1662		} else if (is_disk_zbc && 0xb0 == cmd[2]) { /* Block limits */
1663			arr[1] = cmd[2];        /*sanity */
1664			arr[3] = inquiry_vpd_b0(&arr[4]);
1665		} else if (is_disk_zbc && 0xb1 == cmd[2]) { /* Block char. */
1666			arr[1] = cmd[2];        /*sanity */
1667			arr[3] = inquiry_vpd_b1(devip, &arr[4]);
1668		} else if (is_disk && 0xb2 == cmd[2]) { /* LB Prov. */
1669			arr[1] = cmd[2];        /*sanity */
1670			arr[3] = inquiry_vpd_b2(&arr[4]);
1671		} else if (is_zbc && cmd[2] == 0xb6) { /* ZB dev. charact. */
1672			arr[1] = cmd[2];        /*sanity */
1673			arr[3] = inquiry_vpd_b6(devip, &arr[4]);
1674		} else {
1675			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, -1);
1676			kfree(arr);
1677			return check_condition_result;
1678		}
1679		len = min(get_unaligned_be16(arr + 2) + 4, alloc_len);
1680		ret = fill_from_dev_buffer(scp, arr,
1681			    min(len, SDEBUG_MAX_INQ_ARR_SZ));
1682		kfree(arr);
1683		return ret;
1684	}
1685	/* drops through here for a standard inquiry */
1686	arr[1] = sdebug_removable ? 0x80 : 0;	/* Removable disk */
1687	arr[2] = sdebug_scsi_level;
1688	arr[3] = 2;    /* response_data_format==2 */
1689	arr[4] = SDEBUG_LONG_INQ_SZ - 5;
1690	arr[5] = (int)have_dif_prot;	/* PROTECT bit */
1691	if (sdebug_vpd_use_hostno == 0)
1692		arr[5] |= 0x10; /* claim: implicit TPGS */
1693	arr[6] = 0x10; /* claim: MultiP */
1694	/* arr[6] |= 0x40; ... claim: EncServ (enclosure services) */
1695	arr[7] = 0xa; /* claim: LINKED + CMDQUE */
1696	memcpy(&arr[8], sdebug_inq_vendor_id, 8);
1697	memcpy(&arr[16], sdebug_inq_product_id, 16);
1698	memcpy(&arr[32], sdebug_inq_product_rev, 4);
1699	/* Use Vendor Specific area to place driver date in ASCII hex */
1700	memcpy(&arr[36], sdebug_version_date, 8);
1701	/* version descriptors (2 bytes each) follow */
1702	put_unaligned_be16(0xc0, arr + 58);   /* SAM-6 no version claimed */
1703	put_unaligned_be16(0x5c0, arr + 60);  /* SPC-5 no version claimed */
1704	n = 62;
1705	if (is_disk) {		/* SBC-4 no version claimed */
1706		put_unaligned_be16(0x600, arr + n);
1707		n += 2;
1708	} else if (sdebug_ptype == TYPE_TAPE) {	/* SSC-4 rev 3 */
1709		put_unaligned_be16(0x525, arr + n);
1710		n += 2;
1711	} else if (is_zbc) {	/* ZBC BSR INCITS 536 revision 05 */
1712		put_unaligned_be16(0x624, arr + n);
1713		n += 2;
1714	}
1715	put_unaligned_be16(0x2100, arr + n);	/* SPL-4 no version claimed */
1716	ret = fill_from_dev_buffer(scp, arr,
1717			    min_t(int, alloc_len, SDEBUG_LONG_INQ_SZ));
1718	kfree(arr);
1719	return ret;
1720}
1721
1722/* See resp_iec_m_pg() for how this data is manipulated */
1723static unsigned char iec_m_pg[] = {0x1c, 0xa, 0x08, 0, 0, 0, 0, 0,
1724				   0, 0, 0x0, 0x0};
1725
1726static int resp_requests(struct scsi_cmnd *scp,
1727			 struct sdebug_dev_info *devip)
1728{
1729	unsigned char *cmd = scp->cmnd;
1730	unsigned char arr[SCSI_SENSE_BUFFERSIZE];	/* assume >= 18 bytes */
1731	bool dsense = !!(cmd[1] & 1);
1732	int alloc_len = cmd[4];
1733	int len = 18;
1734	int stopped_state = atomic_read(&devip->stopped);
1735
1736	memset(arr, 0, sizeof(arr));
1737	if (stopped_state > 0) {	/* some "pollable" data [spc6r02: 5.12.2] */
1738		if (dsense) {
1739			arr[0] = 0x72;
1740			arr[1] = NOT_READY;
1741			arr[2] = LOGICAL_UNIT_NOT_READY;
1742			arr[3] = (stopped_state == 2) ? 0x1 : 0x2;
1743			len = 8;
1744		} else {
1745			arr[0] = 0x70;
1746			arr[2] = NOT_READY;		/* NO_SENSE in sense_key */
1747			arr[7] = 0xa;			/* 18 byte sense buffer */
1748			arr[12] = LOGICAL_UNIT_NOT_READY;
1749			arr[13] = (stopped_state == 2) ? 0x1 : 0x2;
1750		}
1751	} else if ((iec_m_pg[2] & 0x4) && (6 == (iec_m_pg[3] & 0xf))) {
1752		/* Information exceptions control mode page: TEST=1, MRIE=6 */
1753		if (dsense) {
1754			arr[0] = 0x72;
1755			arr[1] = 0x0;		/* NO_SENSE in sense_key */
1756			arr[2] = THRESHOLD_EXCEEDED;
1757			arr[3] = 0xff;		/* Failure prediction(false) */
1758			len = 8;
1759		} else {
1760			arr[0] = 0x70;
1761			arr[2] = 0x0;		/* NO_SENSE in sense_key */
1762			arr[7] = 0xa;   	/* 18 byte sense buffer */
1763			arr[12] = THRESHOLD_EXCEEDED;
1764			arr[13] = 0xff;		/* Failure prediction(false) */
1765		}
1766	} else {	/* nothing to report */
1767		if (dsense) {
1768			len = 8;
1769			memset(arr, 0, len);
1770			arr[0] = 0x72;
1771		} else {
1772			memset(arr, 0, len);
1773			arr[0] = 0x70;
1774			arr[7] = 0xa;
1775		}
1776	}
1777	return fill_from_dev_buffer(scp, arr, min_t(int, len, alloc_len));
1778}
1779
1780static int resp_start_stop(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
1781{
1782	unsigned char *cmd = scp->cmnd;
1783	int power_cond, want_stop, stopped_state;
1784	bool changing;
1785
1786	power_cond = (cmd[4] & 0xf0) >> 4;
1787	if (power_cond) {
1788		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, 7);
1789		return check_condition_result;
1790	}
1791	want_stop = !(cmd[4] & 1);
1792	stopped_state = atomic_read(&devip->stopped);
1793	if (stopped_state == 2) {
1794		ktime_t now_ts = ktime_get_boottime();
1795
1796		if (ktime_to_ns(now_ts) > ktime_to_ns(devip->create_ts)) {
1797			u64 diff_ns = ktime_to_ns(ktime_sub(now_ts, devip->create_ts));
1798
1799			if (diff_ns >= ((u64)sdeb_tur_ms_to_ready * 1000000)) {
1800				/* tur_ms_to_ready timer extinguished */
1801				atomic_set(&devip->stopped, 0);
1802				stopped_state = 0;
1803			}
1804		}
1805		if (stopped_state == 2) {
1806			if (want_stop) {
1807				stopped_state = 1;	/* dummy up success */
1808			} else {	/* Disallow tur_ms_to_ready delay to be overridden */
1809				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, 0 /* START bit */);
1810				return check_condition_result;
1811			}
1812		}
1813	}
1814	changing = (stopped_state != want_stop);
1815	if (changing)
1816		atomic_xchg(&devip->stopped, want_stop);
1817	if (!changing || (cmd[1] & 0x1))  /* state unchanged or IMMED bit set in cdb */
1818		return SDEG_RES_IMMED_MASK;
1819	else
1820		return 0;
1821}
1822
1823static sector_t get_sdebug_capacity(void)
1824{
1825	static const unsigned int gibibyte = 1073741824;
1826
1827	if (sdebug_virtual_gb > 0)
1828		return (sector_t)sdebug_virtual_gb *
1829			(gibibyte / sdebug_sector_size);
1830	else
1831		return sdebug_store_sectors;
1832}
1833
1834#define SDEBUG_READCAP_ARR_SZ 8
1835static int resp_readcap(struct scsi_cmnd *scp,
1836			struct sdebug_dev_info *devip)
1837{
1838	unsigned char arr[SDEBUG_READCAP_ARR_SZ];
1839	unsigned int capac;
1840
1841	/* following just in case virtual_gb changed */
1842	sdebug_capacity = get_sdebug_capacity();
1843	memset(arr, 0, SDEBUG_READCAP_ARR_SZ);
1844	if (sdebug_capacity < 0xffffffff) {
1845		capac = (unsigned int)sdebug_capacity - 1;
1846		put_unaligned_be32(capac, arr + 0);
1847	} else
1848		put_unaligned_be32(0xffffffff, arr + 0);
1849	put_unaligned_be16(sdebug_sector_size, arr + 6);
1850	return fill_from_dev_buffer(scp, arr, SDEBUG_READCAP_ARR_SZ);
1851}
1852
1853#define SDEBUG_READCAP16_ARR_SZ 32
1854static int resp_readcap16(struct scsi_cmnd *scp,
1855			  struct sdebug_dev_info *devip)
1856{
1857	unsigned char *cmd = scp->cmnd;
1858	unsigned char arr[SDEBUG_READCAP16_ARR_SZ];
1859	int alloc_len;
1860
1861	alloc_len = get_unaligned_be32(cmd + 10);
1862	/* following just in case virtual_gb changed */
1863	sdebug_capacity = get_sdebug_capacity();
1864	memset(arr, 0, SDEBUG_READCAP16_ARR_SZ);
1865	put_unaligned_be64((u64)(sdebug_capacity - 1), arr + 0);
1866	put_unaligned_be32(sdebug_sector_size, arr + 8);
1867	arr[13] = sdebug_physblk_exp & 0xf;
1868	arr[14] = (sdebug_lowest_aligned >> 8) & 0x3f;
1869
1870	if (scsi_debug_lbp()) {
1871		arr[14] |= 0x80; /* LBPME */
1872		/* from sbc4r07, this LBPRZ field is 1 bit, but the LBPRZ in
1873		 * the LB Provisioning VPD page is 3 bits. Note that lbprz=2
1874		 * in the wider field maps to 0 in this field.
1875		 */
1876		if (sdebug_lbprz & 1)	/* precisely what the draft requires */
1877			arr[14] |= 0x40;
1878	}
1879
1880	arr[15] = sdebug_lowest_aligned & 0xff;
1881
1882	if (have_dif_prot) {
1883		arr[12] = (sdebug_dif - 1) << 1; /* P_TYPE */
1884		arr[12] |= 1; /* PROT_EN */
1885	}
1886
1887	return fill_from_dev_buffer(scp, arr,
1888			    min_t(int, alloc_len, SDEBUG_READCAP16_ARR_SZ));
1889}
1890
1891#define SDEBUG_MAX_TGTPGS_ARR_SZ 1412
1892
1893static int resp_report_tgtpgs(struct scsi_cmnd *scp,
1894			      struct sdebug_dev_info *devip)
1895{
1896	unsigned char *cmd = scp->cmnd;
1897	unsigned char *arr;
1898	int host_no = devip->sdbg_host->shost->host_no;
1899	int n, ret, alen, rlen;
1900	int port_group_a, port_group_b, port_a, port_b;
1901
1902	alen = get_unaligned_be32(cmd + 6);
1903	arr = kzalloc(SDEBUG_MAX_TGTPGS_ARR_SZ, GFP_ATOMIC);
1904	if (! arr)
1905		return DID_REQUEUE << 16;
1906	/*
1907	 * EVPD page 0x88 states we have two ports, one
1908	 * real and a fake port with no device connected.
1909	 * So we create two port groups with one port each
1910	 * and set the group with port B to unavailable.
1911	 */
1912	port_a = 0x1; /* relative port A */
1913	port_b = 0x2; /* relative port B */
1914	port_group_a = (((host_no + 1) & 0x7f) << 8) +
1915			(devip->channel & 0x7f);
1916	port_group_b = (((host_no + 1) & 0x7f) << 8) +
1917			(devip->channel & 0x7f) + 0x80;
1918
1919	/*
1920	 * The asymmetric access state is cycled according to the host_id.
1921	 */
1922	n = 4;
1923	if (sdebug_vpd_use_hostno == 0) {
1924		arr[n++] = host_no % 3; /* Asymm access state */
1925		arr[n++] = 0x0F; /* claim: all states are supported */
1926	} else {
1927		arr[n++] = 0x0; /* Active/Optimized path */
1928		arr[n++] = 0x01; /* only support active/optimized paths */
1929	}
1930	put_unaligned_be16(port_group_a, arr + n);
1931	n += 2;
1932	arr[n++] = 0;    /* Reserved */
1933	arr[n++] = 0;    /* Status code */
1934	arr[n++] = 0;    /* Vendor unique */
1935	arr[n++] = 0x1;  /* One port per group */
1936	arr[n++] = 0;    /* Reserved */
1937	arr[n++] = 0;    /* Reserved */
1938	put_unaligned_be16(port_a, arr + n);
1939	n += 2;
1940	arr[n++] = 3;    /* Port unavailable */
1941	arr[n++] = 0x08; /* claim: only unavailalbe paths are supported */
1942	put_unaligned_be16(port_group_b, arr + n);
1943	n += 2;
1944	arr[n++] = 0;    /* Reserved */
1945	arr[n++] = 0;    /* Status code */
1946	arr[n++] = 0;    /* Vendor unique */
1947	arr[n++] = 0x1;  /* One port per group */
1948	arr[n++] = 0;    /* Reserved */
1949	arr[n++] = 0;    /* Reserved */
1950	put_unaligned_be16(port_b, arr + n);
1951	n += 2;
1952
1953	rlen = n - 4;
1954	put_unaligned_be32(rlen, arr + 0);
1955
1956	/*
1957	 * Return the smallest value of either
1958	 * - The allocated length
1959	 * - The constructed command length
1960	 * - The maximum array size
1961	 */
1962	rlen = min_t(int, alen, n);
1963	ret = fill_from_dev_buffer(scp, arr,
1964			   min_t(int, rlen, SDEBUG_MAX_TGTPGS_ARR_SZ));
1965	kfree(arr);
1966	return ret;
1967}
1968
1969static int resp_rsup_opcodes(struct scsi_cmnd *scp,
1970			     struct sdebug_dev_info *devip)
1971{
1972	bool rctd;
1973	u8 reporting_opts, req_opcode, sdeb_i, supp;
1974	u16 req_sa, u;
1975	u32 alloc_len, a_len;
1976	int k, offset, len, errsts, count, bump, na;
1977	const struct opcode_info_t *oip;
1978	const struct opcode_info_t *r_oip;
1979	u8 *arr;
1980	u8 *cmd = scp->cmnd;
1981
1982	rctd = !!(cmd[2] & 0x80);
1983	reporting_opts = cmd[2] & 0x7;
1984	req_opcode = cmd[3];
1985	req_sa = get_unaligned_be16(cmd + 4);
1986	alloc_len = get_unaligned_be32(cmd + 6);
1987	if (alloc_len < 4 || alloc_len > 0xffff) {
1988		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
1989		return check_condition_result;
1990	}
1991	if (alloc_len > 8192)
1992		a_len = 8192;
1993	else
1994		a_len = alloc_len;
1995	arr = kzalloc((a_len < 256) ? 320 : a_len + 64, GFP_ATOMIC);
1996	if (NULL == arr) {
1997		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
1998				INSUFF_RES_ASCQ);
1999		return check_condition_result;
2000	}
2001	switch (reporting_opts) {
2002	case 0:	/* all commands */
2003		/* count number of commands */
2004		for (count = 0, oip = opcode_info_arr;
2005		     oip->num_attached != 0xff; ++oip) {
2006			if (F_INV_OP & oip->flags)
2007				continue;
2008			count += (oip->num_attached + 1);
2009		}
2010		bump = rctd ? 20 : 8;
2011		put_unaligned_be32(count * bump, arr);
2012		for (offset = 4, oip = opcode_info_arr;
2013		     oip->num_attached != 0xff && offset < a_len; ++oip) {
2014			if (F_INV_OP & oip->flags)
2015				continue;
2016			na = oip->num_attached;
2017			arr[offset] = oip->opcode;
2018			put_unaligned_be16(oip->sa, arr + offset + 2);
2019			if (rctd)
2020				arr[offset + 5] |= 0x2;
2021			if (FF_SA & oip->flags)
2022				arr[offset + 5] |= 0x1;
2023			put_unaligned_be16(oip->len_mask[0], arr + offset + 6);
2024			if (rctd)
2025				put_unaligned_be16(0xa, arr + offset + 8);
2026			r_oip = oip;
2027			for (k = 0, oip = oip->arrp; k < na; ++k, ++oip) {
2028				if (F_INV_OP & oip->flags)
2029					continue;
2030				offset += bump;
2031				arr[offset] = oip->opcode;
2032				put_unaligned_be16(oip->sa, arr + offset + 2);
2033				if (rctd)
2034					arr[offset + 5] |= 0x2;
2035				if (FF_SA & oip->flags)
2036					arr[offset + 5] |= 0x1;
2037				put_unaligned_be16(oip->len_mask[0],
2038						   arr + offset + 6);
2039				if (rctd)
2040					put_unaligned_be16(0xa,
2041							   arr + offset + 8);
2042			}
2043			oip = r_oip;
2044			offset += bump;
2045		}
2046		break;
2047	case 1:	/* one command: opcode only */
2048	case 2:	/* one command: opcode plus service action */
2049	case 3:	/* one command: if sa==0 then opcode only else opcode+sa */
2050		sdeb_i = opcode_ind_arr[req_opcode];
2051		oip = &opcode_info_arr[sdeb_i];
2052		if (F_INV_OP & oip->flags) {
2053			supp = 1;
2054			offset = 4;
2055		} else {
2056			if (1 == reporting_opts) {
2057				if (FF_SA & oip->flags) {
2058					mk_sense_invalid_fld(scp, SDEB_IN_CDB,
2059							     2, 2);
2060					kfree(arr);
2061					return check_condition_result;
2062				}
2063				req_sa = 0;
2064			} else if (2 == reporting_opts &&
2065				   0 == (FF_SA & oip->flags)) {
2066				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, -1);
2067				kfree(arr);	/* point at requested sa */
2068				return check_condition_result;
2069			}
2070			if (0 == (FF_SA & oip->flags) &&
2071			    req_opcode == oip->opcode)
2072				supp = 3;
2073			else if (0 == (FF_SA & oip->flags)) {
2074				na = oip->num_attached;
2075				for (k = 0, oip = oip->arrp; k < na;
2076				     ++k, ++oip) {
2077					if (req_opcode == oip->opcode)
2078						break;
2079				}
2080				supp = (k >= na) ? 1 : 3;
2081			} else if (req_sa != oip->sa) {
2082				na = oip->num_attached;
2083				for (k = 0, oip = oip->arrp; k < na;
2084				     ++k, ++oip) {
2085					if (req_sa == oip->sa)
2086						break;
2087				}
2088				supp = (k >= na) ? 1 : 3;
2089			} else
2090				supp = 3;
2091			if (3 == supp) {
2092				u = oip->len_mask[0];
2093				put_unaligned_be16(u, arr + 2);
2094				arr[4] = oip->opcode;
2095				for (k = 1; k < u; ++k)
2096					arr[4 + k] = (k < 16) ?
2097						 oip->len_mask[k] : 0xff;
2098				offset = 4 + u;
2099			} else
2100				offset = 4;
2101		}
2102		arr[1] = (rctd ? 0x80 : 0) | supp;
2103		if (rctd) {
2104			put_unaligned_be16(0xa, arr + offset);
2105			offset += 12;
2106		}
2107		break;
2108	default:
2109		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 2);
2110		kfree(arr);
2111		return check_condition_result;
2112	}
2113	offset = (offset < a_len) ? offset : a_len;
2114	len = (offset < alloc_len) ? offset : alloc_len;
2115	errsts = fill_from_dev_buffer(scp, arr, len);
2116	kfree(arr);
2117	return errsts;
2118}
2119
2120static int resp_rsup_tmfs(struct scsi_cmnd *scp,
2121			  struct sdebug_dev_info *devip)
2122{
2123	bool repd;
2124	u32 alloc_len, len;
2125	u8 arr[16];
2126	u8 *cmd = scp->cmnd;
2127
2128	memset(arr, 0, sizeof(arr));
2129	repd = !!(cmd[2] & 0x80);
2130	alloc_len = get_unaligned_be32(cmd + 6);
2131	if (alloc_len < 4) {
2132		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
2133		return check_condition_result;
2134	}
2135	arr[0] = 0xc8;		/* ATS | ATSS | LURS */
2136	arr[1] = 0x1;		/* ITNRS */
2137	if (repd) {
2138		arr[3] = 0xc;
2139		len = 16;
2140	} else
2141		len = 4;
2142
2143	len = (len < alloc_len) ? len : alloc_len;
2144	return fill_from_dev_buffer(scp, arr, len);
2145}
2146
2147/* <<Following mode page info copied from ST318451LW>> */
2148
2149static int resp_err_recov_pg(unsigned char *p, int pcontrol, int target)
2150{	/* Read-Write Error Recovery page for mode_sense */
2151	unsigned char err_recov_pg[] = {0x1, 0xa, 0xc0, 11, 240, 0, 0, 0,
2152					5, 0, 0xff, 0xff};
2153
2154	memcpy(p, err_recov_pg, sizeof(err_recov_pg));
2155	if (1 == pcontrol)
2156		memset(p + 2, 0, sizeof(err_recov_pg) - 2);
2157	return sizeof(err_recov_pg);
2158}
2159
2160static int resp_disconnect_pg(unsigned char *p, int pcontrol, int target)
2161{ 	/* Disconnect-Reconnect page for mode_sense */
2162	unsigned char disconnect_pg[] = {0x2, 0xe, 128, 128, 0, 10, 0, 0,
2163					 0, 0, 0, 0, 0, 0, 0, 0};
2164
2165	memcpy(p, disconnect_pg, sizeof(disconnect_pg));
2166	if (1 == pcontrol)
2167		memset(p + 2, 0, sizeof(disconnect_pg) - 2);
2168	return sizeof(disconnect_pg);
2169}
2170
2171static int resp_format_pg(unsigned char *p, int pcontrol, int target)
2172{       /* Format device page for mode_sense */
2173	unsigned char format_pg[] = {0x3, 0x16, 0, 0, 0, 0, 0, 0,
2174				     0, 0, 0, 0, 0, 0, 0, 0,
2175				     0, 0, 0, 0, 0x40, 0, 0, 0};
2176
2177	memcpy(p, format_pg, sizeof(format_pg));
2178	put_unaligned_be16(sdebug_sectors_per, p + 10);
2179	put_unaligned_be16(sdebug_sector_size, p + 12);
2180	if (sdebug_removable)
2181		p[20] |= 0x20; /* should agree with INQUIRY */
2182	if (1 == pcontrol)
2183		memset(p + 2, 0, sizeof(format_pg) - 2);
2184	return sizeof(format_pg);
2185}
2186
2187static unsigned char caching_pg[] = {0x8, 18, 0x14, 0, 0xff, 0xff, 0, 0,
2188				     0xff, 0xff, 0xff, 0xff, 0x80, 0x14, 0, 0,
2189				     0, 0, 0, 0};
2190
2191static int resp_caching_pg(unsigned char *p, int pcontrol, int target)
2192{ 	/* Caching page for mode_sense */
2193	unsigned char ch_caching_pg[] = {/* 0x8, 18, */ 0x4, 0, 0, 0, 0, 0,
2194		0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
2195	unsigned char d_caching_pg[] = {0x8, 18, 0x14, 0, 0xff, 0xff, 0, 0,
2196		0xff, 0xff, 0xff, 0xff, 0x80, 0x14, 0, 0,     0, 0, 0, 0};
2197
2198	if (SDEBUG_OPT_N_WCE & sdebug_opts)
2199		caching_pg[2] &= ~0x4;	/* set WCE=0 (default WCE=1) */
2200	memcpy(p, caching_pg, sizeof(caching_pg));
2201	if (1 == pcontrol)
2202		memcpy(p + 2, ch_caching_pg, sizeof(ch_caching_pg));
2203	else if (2 == pcontrol)
2204		memcpy(p, d_caching_pg, sizeof(d_caching_pg));
2205	return sizeof(caching_pg);
2206}
2207
2208static unsigned char ctrl_m_pg[] = {0xa, 10, 2, 0, 0, 0, 0, 0,
2209				    0, 0, 0x2, 0x4b};
2210
2211static int resp_ctrl_m_pg(unsigned char *p, int pcontrol, int target)
2212{ 	/* Control mode page for mode_sense */
2213	unsigned char ch_ctrl_m_pg[] = {/* 0xa, 10, */ 0x6, 0, 0, 0, 0, 0,
2214					0, 0, 0, 0};
2215	unsigned char d_ctrl_m_pg[] = {0xa, 10, 2, 0, 0, 0, 0, 0,
2216				     0, 0, 0x2, 0x4b};
2217
2218	if (sdebug_dsense)
2219		ctrl_m_pg[2] |= 0x4;
2220	else
2221		ctrl_m_pg[2] &= ~0x4;
2222
2223	if (sdebug_ato)
2224		ctrl_m_pg[5] |= 0x80; /* ATO=1 */
2225
2226	memcpy(p, ctrl_m_pg, sizeof(ctrl_m_pg));
2227	if (1 == pcontrol)
2228		memcpy(p + 2, ch_ctrl_m_pg, sizeof(ch_ctrl_m_pg));
2229	else if (2 == pcontrol)
2230		memcpy(p, d_ctrl_m_pg, sizeof(d_ctrl_m_pg));
2231	return sizeof(ctrl_m_pg);
2232}
2233
2234
2235static int resp_iec_m_pg(unsigned char *p, int pcontrol, int target)
2236{	/* Informational Exceptions control mode page for mode_sense */
2237	unsigned char ch_iec_m_pg[] = {/* 0x1c, 0xa, */ 0x4, 0xf, 0, 0, 0, 0,
2238				       0, 0, 0x0, 0x0};
2239	unsigned char d_iec_m_pg[] = {0x1c, 0xa, 0x08, 0, 0, 0, 0, 0,
2240				      0, 0, 0x0, 0x0};
2241
2242	memcpy(p, iec_m_pg, sizeof(iec_m_pg));
2243	if (1 == pcontrol)
2244		memcpy(p + 2, ch_iec_m_pg, sizeof(ch_iec_m_pg));
2245	else if (2 == pcontrol)
2246		memcpy(p, d_iec_m_pg, sizeof(d_iec_m_pg));
2247	return sizeof(iec_m_pg);
2248}
2249
2250static int resp_sas_sf_m_pg(unsigned char *p, int pcontrol, int target)
2251{	/* SAS SSP mode page - short format for mode_sense */
2252	unsigned char sas_sf_m_pg[] = {0x19, 0x6,
2253		0x6, 0x0, 0x7, 0xd0, 0x0, 0x0};
2254
2255	memcpy(p, sas_sf_m_pg, sizeof(sas_sf_m_pg));
2256	if (1 == pcontrol)
2257		memset(p + 2, 0, sizeof(sas_sf_m_pg) - 2);
2258	return sizeof(sas_sf_m_pg);
2259}
2260
2261
2262static int resp_sas_pcd_m_spg(unsigned char *p, int pcontrol, int target,
2263			      int target_dev_id)
2264{	/* SAS phy control and discover mode page for mode_sense */
2265	unsigned char sas_pcd_m_pg[] = {0x59, 0x1, 0, 0x64, 0, 0x6, 0, 2,
2266		    0, 0, 0, 0, 0x10, 0x9, 0x8, 0x0,
2267		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2268		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2269		    0x2, 0, 0, 0, 0, 0, 0, 0,
2270		    0x88, 0x99, 0, 0, 0, 0, 0, 0,
2271		    0, 0, 0, 0, 0, 0, 0, 0,
2272		    0, 1, 0, 0, 0x10, 0x9, 0x8, 0x0,
2273		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2274		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2275		    0x3, 0, 0, 0, 0, 0, 0, 0,
2276		    0x88, 0x99, 0, 0, 0, 0, 0, 0,
2277		    0, 0, 0, 0, 0, 0, 0, 0,
2278		};
2279	int port_a, port_b;
2280
2281	put_unaligned_be64(naa3_comp_a, sas_pcd_m_pg + 16);
2282	put_unaligned_be64(naa3_comp_c + 1, sas_pcd_m_pg + 24);
2283	put_unaligned_be64(naa3_comp_a, sas_pcd_m_pg + 64);
2284	put_unaligned_be64(naa3_comp_c + 1, sas_pcd_m_pg + 72);
2285	port_a = target_dev_id + 1;
2286	port_b = port_a + 1;
2287	memcpy(p, sas_pcd_m_pg, sizeof(sas_pcd_m_pg));
2288	put_unaligned_be32(port_a, p + 20);
2289	put_unaligned_be32(port_b, p + 48 + 20);
2290	if (1 == pcontrol)
2291		memset(p + 4, 0, sizeof(sas_pcd_m_pg) - 4);
2292	return sizeof(sas_pcd_m_pg);
2293}
2294
2295static int resp_sas_sha_m_spg(unsigned char *p, int pcontrol)
2296{	/* SAS SSP shared protocol specific port mode subpage */
2297	unsigned char sas_sha_m_pg[] = {0x59, 0x2, 0, 0xc, 0, 0x6, 0x10, 0,
2298		    0, 0, 0, 0, 0, 0, 0, 0,
2299		};
2300
2301	memcpy(p, sas_sha_m_pg, sizeof(sas_sha_m_pg));
2302	if (1 == pcontrol)
2303		memset(p + 4, 0, sizeof(sas_sha_m_pg) - 4);
2304	return sizeof(sas_sha_m_pg);
2305}
2306
2307#define SDEBUG_MAX_MSENSE_SZ 256
2308
2309static int resp_mode_sense(struct scsi_cmnd *scp,
2310			   struct sdebug_dev_info *devip)
2311{
2312	int pcontrol, pcode, subpcode, bd_len;
2313	unsigned char dev_spec;
2314	int alloc_len, offset, len, target_dev_id;
2315	int target = scp->device->id;
2316	unsigned char *ap;
2317	unsigned char arr[SDEBUG_MAX_MSENSE_SZ];
2318	unsigned char *cmd = scp->cmnd;
2319	bool dbd, llbaa, msense_6, is_disk, is_zbc, bad_pcode;
2320
2321	dbd = !!(cmd[1] & 0x8);		/* disable block descriptors */
2322	pcontrol = (cmd[2] & 0xc0) >> 6;
2323	pcode = cmd[2] & 0x3f;
2324	subpcode = cmd[3];
2325	msense_6 = (MODE_SENSE == cmd[0]);
2326	llbaa = msense_6 ? false : !!(cmd[1] & 0x10);
2327	is_disk = (sdebug_ptype == TYPE_DISK);
2328	is_zbc = (devip->zmodel != BLK_ZONED_NONE);
2329	if ((is_disk || is_zbc) && !dbd)
2330		bd_len = llbaa ? 16 : 8;
2331	else
2332		bd_len = 0;
2333	alloc_len = msense_6 ? cmd[4] : get_unaligned_be16(cmd + 7);
2334	memset(arr, 0, SDEBUG_MAX_MSENSE_SZ);
2335	if (0x3 == pcontrol) {  /* Saving values not supported */
2336		mk_sense_buffer(scp, ILLEGAL_REQUEST, SAVING_PARAMS_UNSUP, 0);
2337		return check_condition_result;
2338	}
2339	target_dev_id = ((devip->sdbg_host->shost->host_no + 1) * 2000) +
2340			(devip->target * 1000) - 3;
2341	/* for disks+zbc set DPOFUA bit and clear write protect (WP) bit */
2342	if (is_disk || is_zbc) {
2343		dev_spec = 0x10;	/* =0x90 if WP=1 implies read-only */
2344		if (sdebug_wp)
2345			dev_spec |= 0x80;
2346	} else
2347		dev_spec = 0x0;
2348	if (msense_6) {
2349		arr[2] = dev_spec;
2350		arr[3] = bd_len;
2351		offset = 4;
2352	} else {
2353		arr[3] = dev_spec;
2354		if (16 == bd_len)
2355			arr[4] = 0x1;	/* set LONGLBA bit */
2356		arr[7] = bd_len;	/* assume 255 or less */
2357		offset = 8;
2358	}
2359	ap = arr + offset;
2360	if ((bd_len > 0) && (!sdebug_capacity))
2361		sdebug_capacity = get_sdebug_capacity();
2362
2363	if (8 == bd_len) {
2364		if (sdebug_capacity > 0xfffffffe)
2365			put_unaligned_be32(0xffffffff, ap + 0);
2366		else
2367			put_unaligned_be32(sdebug_capacity, ap + 0);
2368		put_unaligned_be16(sdebug_sector_size, ap + 6);
2369		offset += bd_len;
2370		ap = arr + offset;
2371	} else if (16 == bd_len) {
2372		put_unaligned_be64((u64)sdebug_capacity, ap + 0);
2373		put_unaligned_be32(sdebug_sector_size, ap + 12);
2374		offset += bd_len;
2375		ap = arr + offset;
2376	}
2377
2378	if ((subpcode > 0x0) && (subpcode < 0xff) && (0x19 != pcode)) {
2379		/* TODO: Control Extension page */
2380		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2381		return check_condition_result;
2382	}
2383	bad_pcode = false;
2384
2385	switch (pcode) {
2386	case 0x1:	/* Read-Write error recovery page, direct access */
2387		len = resp_err_recov_pg(ap, pcontrol, target);
2388		offset += len;
2389		break;
2390	case 0x2:	/* Disconnect-Reconnect page, all devices */
2391		len = resp_disconnect_pg(ap, pcontrol, target);
2392		offset += len;
2393		break;
2394	case 0x3:       /* Format device page, direct access */
2395		if (is_disk) {
2396			len = resp_format_pg(ap, pcontrol, target);
2397			offset += len;
2398		} else
2399			bad_pcode = true;
2400		break;
2401	case 0x8:	/* Caching page, direct access */
2402		if (is_disk || is_zbc) {
2403			len = resp_caching_pg(ap, pcontrol, target);
2404			offset += len;
2405		} else
2406			bad_pcode = true;
2407		break;
2408	case 0xa:	/* Control Mode page, all devices */
2409		len = resp_ctrl_m_pg(ap, pcontrol, target);
2410		offset += len;
2411		break;
2412	case 0x19:	/* if spc==1 then sas phy, control+discover */
2413		if ((subpcode > 0x2) && (subpcode < 0xff)) {
2414			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2415			return check_condition_result;
2416		}
2417		len = 0;
2418		if ((0x0 == subpcode) || (0xff == subpcode))
2419			len += resp_sas_sf_m_pg(ap + len, pcontrol, target);
2420		if ((0x1 == subpcode) || (0xff == subpcode))
2421			len += resp_sas_pcd_m_spg(ap + len, pcontrol, target,
2422						  target_dev_id);
2423		if ((0x2 == subpcode) || (0xff == subpcode))
2424			len += resp_sas_sha_m_spg(ap + len, pcontrol);
2425		offset += len;
2426		break;
2427	case 0x1c:	/* Informational Exceptions Mode page, all devices */
2428		len = resp_iec_m_pg(ap, pcontrol, target);
2429		offset += len;
2430		break;
2431	case 0x3f:	/* Read all Mode pages */
2432		if ((0 == subpcode) || (0xff == subpcode)) {
2433			len = resp_err_recov_pg(ap, pcontrol, target);
2434			len += resp_disconnect_pg(ap + len, pcontrol, target);
2435			if (is_disk) {
2436				len += resp_format_pg(ap + len, pcontrol,
2437						      target);
2438				len += resp_caching_pg(ap + len, pcontrol,
2439						       target);
2440			} else if (is_zbc) {
2441				len += resp_caching_pg(ap + len, pcontrol,
2442						       target);
2443			}
2444			len += resp_ctrl_m_pg(ap + len, pcontrol, target);
2445			len += resp_sas_sf_m_pg(ap + len, pcontrol, target);
2446			if (0xff == subpcode) {
2447				len += resp_sas_pcd_m_spg(ap + len, pcontrol,
2448						  target, target_dev_id);
2449				len += resp_sas_sha_m_spg(ap + len, pcontrol);
2450			}
2451			len += resp_iec_m_pg(ap + len, pcontrol, target);
2452			offset += len;
2453		} else {
2454			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2455			return check_condition_result;
2456		}
2457		break;
2458	default:
2459		bad_pcode = true;
2460		break;
2461	}
2462	if (bad_pcode) {
2463		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2464		return check_condition_result;
2465	}
2466	if (msense_6)
2467		arr[0] = offset - 1;
2468	else
2469		put_unaligned_be16((offset - 2), arr + 0);
2470	return fill_from_dev_buffer(scp, arr, min_t(int, alloc_len, offset));
2471}
2472
2473#define SDEBUG_MAX_MSELECT_SZ 512
2474
2475static int resp_mode_select(struct scsi_cmnd *scp,
2476			    struct sdebug_dev_info *devip)
2477{
2478	int pf, sp, ps, md_len, bd_len, off, spf, pg_len;
2479	int param_len, res, mpage;
2480	unsigned char arr[SDEBUG_MAX_MSELECT_SZ];
2481	unsigned char *cmd = scp->cmnd;
2482	int mselect6 = (MODE_SELECT == cmd[0]);
2483
2484	memset(arr, 0, sizeof(arr));
2485	pf = cmd[1] & 0x10;
2486	sp = cmd[1] & 0x1;
2487	param_len = mselect6 ? cmd[4] : get_unaligned_be16(cmd + 7);
2488	if ((0 == pf) || sp || (param_len > SDEBUG_MAX_MSELECT_SZ)) {
2489		mk_sense_invalid_fld(scp, SDEB_IN_CDB, mselect6 ? 4 : 7, -1);
2490		return check_condition_result;
2491	}
2492	res = fetch_to_dev_buffer(scp, arr, param_len);
2493	if (-1 == res)
2494		return DID_ERROR << 16;
2495	else if (sdebug_verbose && (res < param_len))
2496		sdev_printk(KERN_INFO, scp->device,
2497			    "%s: cdb indicated=%d, IO sent=%d bytes\n",
2498			    __func__, param_len, res);
2499	md_len = mselect6 ? (arr[0] + 1) : (get_unaligned_be16(arr + 0) + 2);
2500	bd_len = mselect6 ? arr[3] : get_unaligned_be16(arr + 6);
2501	if (md_len > 2) {
2502		mk_sense_invalid_fld(scp, SDEB_IN_DATA, 0, -1);
2503		return check_condition_result;
2504	}
2505	off = bd_len + (mselect6 ? 4 : 8);
2506	mpage = arr[off] & 0x3f;
2507	ps = !!(arr[off] & 0x80);
2508	if (ps) {
2509		mk_sense_invalid_fld(scp, SDEB_IN_DATA, off, 7);
2510		return check_condition_result;
2511	}
2512	spf = !!(arr[off] & 0x40);
2513	pg_len = spf ? (get_unaligned_be16(arr + off + 2) + 4) :
2514		       (arr[off + 1] + 2);
2515	if ((pg_len + off) > param_len) {
2516		mk_sense_buffer(scp, ILLEGAL_REQUEST,
2517				PARAMETER_LIST_LENGTH_ERR, 0);
2518		return check_condition_result;
2519	}
2520	switch (mpage) {
2521	case 0x8:      /* Caching Mode page */
2522		if (caching_pg[1] == arr[off + 1]) {
2523			memcpy(caching_pg + 2, arr + off + 2,
2524			       sizeof(caching_pg) - 2);
2525			goto set_mode_changed_ua;
2526		}
2527		break;
2528	case 0xa:      /* Control Mode page */
2529		if (ctrl_m_pg[1] == arr[off + 1]) {
2530			memcpy(ctrl_m_pg + 2, arr + off + 2,
2531			       sizeof(ctrl_m_pg) - 2);
2532			if (ctrl_m_pg[4] & 0x8)
2533				sdebug_wp = true;
2534			else
2535				sdebug_wp = false;
2536			sdebug_dsense = !!(ctrl_m_pg[2] & 0x4);
2537			goto set_mode_changed_ua;
2538		}
2539		break;
2540	case 0x1c:      /* Informational Exceptions Mode page */
2541		if (iec_m_pg[1] == arr[off + 1]) {
2542			memcpy(iec_m_pg + 2, arr + off + 2,
2543			       sizeof(iec_m_pg) - 2);
2544			goto set_mode_changed_ua;
2545		}
2546		break;
2547	default:
2548		break;
2549	}
2550	mk_sense_invalid_fld(scp, SDEB_IN_DATA, off, 5);
2551	return check_condition_result;
2552set_mode_changed_ua:
2553	set_bit(SDEBUG_UA_MODE_CHANGED, devip->uas_bm);
2554	return 0;
2555}
2556
2557static int resp_temp_l_pg(unsigned char *arr)
2558{
2559	unsigned char temp_l_pg[] = {0x0, 0x0, 0x3, 0x2, 0x0, 38,
2560				     0x0, 0x1, 0x3, 0x2, 0x0, 65,
2561		};
2562
2563	memcpy(arr, temp_l_pg, sizeof(temp_l_pg));
2564	return sizeof(temp_l_pg);
2565}
2566
2567static int resp_ie_l_pg(unsigned char *arr)
2568{
2569	unsigned char ie_l_pg[] = {0x0, 0x0, 0x3, 0x3, 0x0, 0x0, 38,
2570		};
2571
2572	memcpy(arr, ie_l_pg, sizeof(ie_l_pg));
2573	if (iec_m_pg[2] & 0x4) {	/* TEST bit set */
2574		arr[4] = THRESHOLD_EXCEEDED;
2575		arr[5] = 0xff;
2576	}
2577	return sizeof(ie_l_pg);
2578}
2579
2580#define SDEBUG_MAX_LSENSE_SZ 512
2581
2582static int resp_log_sense(struct scsi_cmnd *scp,
2583			  struct sdebug_dev_info *devip)
2584{
2585	int ppc, sp, pcode, subpcode, alloc_len, len, n;
2586	unsigned char arr[SDEBUG_MAX_LSENSE_SZ];
2587	unsigned char *cmd = scp->cmnd;
2588
2589	memset(arr, 0, sizeof(arr));
2590	ppc = cmd[1] & 0x2;
2591	sp = cmd[1] & 0x1;
2592	if (ppc || sp) {
2593		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, ppc ? 1 : 0);
2594		return check_condition_result;
2595	}
2596	pcode = cmd[2] & 0x3f;
2597	subpcode = cmd[3] & 0xff;
2598	alloc_len = get_unaligned_be16(cmd + 7);
2599	arr[0] = pcode;
2600	if (0 == subpcode) {
2601		switch (pcode) {
2602		case 0x0:	/* Supported log pages log page */
2603			n = 4;
2604			arr[n++] = 0x0;		/* this page */
2605			arr[n++] = 0xd;		/* Temperature */
2606			arr[n++] = 0x2f;	/* Informational exceptions */
2607			arr[3] = n - 4;
2608			break;
2609		case 0xd:	/* Temperature log page */
2610			arr[3] = resp_temp_l_pg(arr + 4);
2611			break;
2612		case 0x2f:	/* Informational exceptions log page */
2613			arr[3] = resp_ie_l_pg(arr + 4);
2614			break;
2615		default:
2616			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2617			return check_condition_result;
2618		}
2619	} else if (0xff == subpcode) {
2620		arr[0] |= 0x40;
2621		arr[1] = subpcode;
2622		switch (pcode) {
2623		case 0x0:	/* Supported log pages and subpages log page */
2624			n = 4;
2625			arr[n++] = 0x0;
2626			arr[n++] = 0x0;		/* 0,0 page */
2627			arr[n++] = 0x0;
2628			arr[n++] = 0xff;	/* this page */
2629			arr[n++] = 0xd;
2630			arr[n++] = 0x0;		/* Temperature */
2631			arr[n++] = 0x2f;
2632			arr[n++] = 0x0;	/* Informational exceptions */
2633			arr[3] = n - 4;
2634			break;
2635		case 0xd:	/* Temperature subpages */
2636			n = 4;
2637			arr[n++] = 0xd;
2638			arr[n++] = 0x0;		/* Temperature */
2639			arr[3] = n - 4;
2640			break;
2641		case 0x2f:	/* Informational exceptions subpages */
2642			n = 4;
2643			arr[n++] = 0x2f;
2644			arr[n++] = 0x0;		/* Informational exceptions */
2645			arr[3] = n - 4;
2646			break;
2647		default:
2648			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2649			return check_condition_result;
2650		}
2651	} else {
2652		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2653		return check_condition_result;
2654	}
2655	len = min_t(int, get_unaligned_be16(arr + 2) + 4, alloc_len);
2656	return fill_from_dev_buffer(scp, arr,
2657		    min_t(int, len, SDEBUG_MAX_INQ_ARR_SZ));
2658}
2659
2660static inline bool sdebug_dev_is_zoned(struct sdebug_dev_info *devip)
2661{
2662	return devip->nr_zones != 0;
2663}
2664
2665static struct sdeb_zone_state *zbc_zone(struct sdebug_dev_info *devip,
2666					unsigned long long lba)
2667{
2668	return &devip->zstate[lba >> devip->zsize_shift];
2669}
2670
2671static inline bool zbc_zone_is_conv(struct sdeb_zone_state *zsp)
2672{
2673	return zsp->z_type == ZBC_ZONE_TYPE_CNV;
2674}
2675
2676static void zbc_close_zone(struct sdebug_dev_info *devip,
2677			   struct sdeb_zone_state *zsp)
2678{
2679	enum sdebug_z_cond zc;
2680
2681	if (zbc_zone_is_conv(zsp))
2682		return;
2683
2684	zc = zsp->z_cond;
2685	if (!(zc == ZC2_IMPLICIT_OPEN || zc == ZC3_EXPLICIT_OPEN))
2686		return;
2687
2688	if (zc == ZC2_IMPLICIT_OPEN)
2689		devip->nr_imp_open--;
2690	else
2691		devip->nr_exp_open--;
2692
2693	if (zsp->z_wp == zsp->z_start) {
2694		zsp->z_cond = ZC1_EMPTY;
2695	} else {
2696		zsp->z_cond = ZC4_CLOSED;
2697		devip->nr_closed++;
2698	}
2699}
2700
2701static void zbc_close_imp_open_zone(struct sdebug_dev_info *devip)
2702{
2703	struct sdeb_zone_state *zsp = &devip->zstate[0];
2704	unsigned int i;
2705
2706	for (i = 0; i < devip->nr_zones; i++, zsp++) {
2707		if (zsp->z_cond == ZC2_IMPLICIT_OPEN) {
2708			zbc_close_zone(devip, zsp);
2709			return;
2710		}
2711	}
2712}
2713
2714static void zbc_open_zone(struct sdebug_dev_info *devip,
2715			  struct sdeb_zone_state *zsp, bool explicit)
2716{
2717	enum sdebug_z_cond zc;
2718
2719	if (zbc_zone_is_conv(zsp))
2720		return;
2721
2722	zc = zsp->z_cond;
2723	if ((explicit && zc == ZC3_EXPLICIT_OPEN) ||
2724	    (!explicit && zc == ZC2_IMPLICIT_OPEN))
2725		return;
2726
2727	/* Close an implicit open zone if necessary */
2728	if (explicit && zsp->z_cond == ZC2_IMPLICIT_OPEN)
2729		zbc_close_zone(devip, zsp);
2730	else if (devip->max_open &&
2731		 devip->nr_imp_open + devip->nr_exp_open >= devip->max_open)
2732		zbc_close_imp_open_zone(devip);
2733
2734	if (zsp->z_cond == ZC4_CLOSED)
2735		devip->nr_closed--;
2736	if (explicit) {
2737		zsp->z_cond = ZC3_EXPLICIT_OPEN;
2738		devip->nr_exp_open++;
2739	} else {
2740		zsp->z_cond = ZC2_IMPLICIT_OPEN;
2741		devip->nr_imp_open++;
2742	}
2743}
2744
2745static void zbc_inc_wp(struct sdebug_dev_info *devip,
2746		       unsigned long long lba, unsigned int num)
2747{
2748	struct sdeb_zone_state *zsp = zbc_zone(devip, lba);
2749	unsigned long long n, end, zend = zsp->z_start + zsp->z_size;
2750
2751	if (zbc_zone_is_conv(zsp))
2752		return;
2753
2754	if (zsp->z_type == ZBC_ZONE_TYPE_SWR) {
2755		zsp->z_wp += num;
2756		if (zsp->z_wp >= zend)
2757			zsp->z_cond = ZC5_FULL;
2758		return;
2759	}
2760
2761	while (num) {
2762		if (lba != zsp->z_wp)
2763			zsp->z_non_seq_resource = true;
2764
2765		end = lba + num;
2766		if (end >= zend) {
2767			n = zend - lba;
2768			zsp->z_wp = zend;
2769		} else if (end > zsp->z_wp) {
2770			n = num;
2771			zsp->z_wp = end;
2772		} else {
2773			n = num;
2774		}
2775		if (zsp->z_wp >= zend)
2776			zsp->z_cond = ZC5_FULL;
2777
2778		num -= n;
2779		lba += n;
2780		if (num) {
2781			zsp++;
2782			zend = zsp->z_start + zsp->z_size;
2783		}
2784	}
2785}
2786
2787static int check_zbc_access_params(struct scsi_cmnd *scp,
2788			unsigned long long lba, unsigned int num, bool write)
2789{
2790	struct scsi_device *sdp = scp->device;
2791	struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
2792	struct sdeb_zone_state *zsp = zbc_zone(devip, lba);
2793	struct sdeb_zone_state *zsp_end = zbc_zone(devip, lba + num - 1);
2794
2795	if (!write) {
2796		if (devip->zmodel == BLK_ZONED_HA)
2797			return 0;
2798		/* For host-managed, reads cannot cross zone types boundaries */
2799		if (zsp_end != zsp &&
2800		    zbc_zone_is_conv(zsp) &&
2801		    !zbc_zone_is_conv(zsp_end)) {
2802			mk_sense_buffer(scp, ILLEGAL_REQUEST,
2803					LBA_OUT_OF_RANGE,
2804					READ_INVDATA_ASCQ);
2805			return check_condition_result;
2806		}
2807		return 0;
2808	}
2809
2810	/* No restrictions for writes within conventional zones */
2811	if (zbc_zone_is_conv(zsp)) {
2812		if (!zbc_zone_is_conv(zsp_end)) {
2813			mk_sense_buffer(scp, ILLEGAL_REQUEST,
2814					LBA_OUT_OF_RANGE,
2815					WRITE_BOUNDARY_ASCQ);
2816			return check_condition_result;
2817		}
2818		return 0;
2819	}
2820
2821	if (zsp->z_type == ZBC_ZONE_TYPE_SWR) {
2822		/* Writes cannot cross sequential zone boundaries */
2823		if (zsp_end != zsp) {
2824			mk_sense_buffer(scp, ILLEGAL_REQUEST,
2825					LBA_OUT_OF_RANGE,
2826					WRITE_BOUNDARY_ASCQ);
2827			return check_condition_result;
2828		}
2829		/* Cannot write full zones */
2830		if (zsp->z_cond == ZC5_FULL) {
2831			mk_sense_buffer(scp, ILLEGAL_REQUEST,
2832					INVALID_FIELD_IN_CDB, 0);
2833			return check_condition_result;
2834		}
2835		/* Writes must be aligned to the zone WP */
2836		if (lba != zsp->z_wp) {
2837			mk_sense_buffer(scp, ILLEGAL_REQUEST,
2838					LBA_OUT_OF_RANGE,
2839					UNALIGNED_WRITE_ASCQ);
2840			return check_condition_result;
2841		}
2842	}
2843
2844	/* Handle implicit open of closed and empty zones */
2845	if (zsp->z_cond == ZC1_EMPTY || zsp->z_cond == ZC4_CLOSED) {
2846		if (devip->max_open &&
2847		    devip->nr_exp_open >= devip->max_open) {
2848			mk_sense_buffer(scp, DATA_PROTECT,
2849					INSUFF_RES_ASC,
2850					INSUFF_ZONE_ASCQ);
2851			return check_condition_result;
2852		}
2853		zbc_open_zone(devip, zsp, false);
2854	}
2855
2856	return 0;
2857}
2858
2859static inline int check_device_access_params
2860			(struct scsi_cmnd *scp, unsigned long long lba,
2861			 unsigned int num, bool write)
2862{
2863	struct scsi_device *sdp = scp->device;
2864	struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
2865
2866	if (lba + num > sdebug_capacity) {
2867		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
2868		return check_condition_result;
2869	}
2870	/* transfer length excessive (tie in to block limits VPD page) */
2871	if (num > sdebug_store_sectors) {
2872		/* needs work to find which cdb byte 'num' comes from */
2873		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
2874		return check_condition_result;
2875	}
2876	if (write && unlikely(sdebug_wp)) {
2877		mk_sense_buffer(scp, DATA_PROTECT, WRITE_PROTECTED, 0x2);
2878		return check_condition_result;
2879	}
2880	if (sdebug_dev_is_zoned(devip))
2881		return check_zbc_access_params(scp, lba, num, write);
2882
2883	return 0;
2884}
2885
2886/*
2887 * Note: if BUG_ON() fires it usually indicates a problem with the parser
2888 * tables. Perhaps a missing F_FAKE_RW or FF_MEDIA_IO flag. Response functions
2889 * that access any of the "stores" in struct sdeb_store_info should call this
2890 * function with bug_if_fake_rw set to true.
2891 */
2892static inline struct sdeb_store_info *devip2sip(struct sdebug_dev_info *devip,
2893						bool bug_if_fake_rw)
2894{
2895	if (sdebug_fake_rw) {
2896		BUG_ON(bug_if_fake_rw);	/* See note above */
2897		return NULL;
2898	}
2899	return xa_load(per_store_ap, devip->sdbg_host->si_idx);
2900}
2901
2902/* Returns number of bytes copied or -1 if error. */
2903static int do_device_access(struct sdeb_store_info *sip, struct scsi_cmnd *scp,
2904			    u32 sg_skip, u64 lba, u32 num, bool do_write)
2905{
2906	int ret;
2907	u64 block, rest = 0;
2908	enum dma_data_direction dir;
2909	struct scsi_data_buffer *sdb = &scp->sdb;
2910	u8 *fsp;
2911
2912	if (do_write) {
2913		dir = DMA_TO_DEVICE;
2914		write_since_sync = true;
2915	} else {
2916		dir = DMA_FROM_DEVICE;
2917	}
2918
2919	if (!sdb->length || !sip)
2920		return 0;
2921	if (scp->sc_data_direction != dir)
2922		return -1;
2923	fsp = sip->storep;
2924
2925	block = do_div(lba, sdebug_store_sectors);
2926	if (block + num > sdebug_store_sectors)
2927		rest = block + num - sdebug_store_sectors;
2928
2929	ret = sg_copy_buffer(sdb->table.sgl, sdb->table.nents,
2930		   fsp + (block * sdebug_sector_size),
2931		   (num - rest) * sdebug_sector_size, sg_skip, do_write);
2932	if (ret != (num - rest) * sdebug_sector_size)
2933		return ret;
2934
2935	if (rest) {
2936		ret += sg_copy_buffer(sdb->table.sgl, sdb->table.nents,
2937			    fsp, rest * sdebug_sector_size,
2938			    sg_skip + ((num - rest) * sdebug_sector_size),
2939			    do_write);
2940	}
2941
2942	return ret;
2943}
2944
2945/* Returns number of bytes copied or -1 if error. */
2946static int do_dout_fetch(struct scsi_cmnd *scp, u32 num, u8 *doutp)
2947{
2948	struct scsi_data_buffer *sdb = &scp->sdb;
2949
2950	if (!sdb->length)
2951		return 0;
2952	if (scp->sc_data_direction != DMA_TO_DEVICE)
2953		return -1;
2954	return sg_copy_buffer(sdb->table.sgl, sdb->table.nents, doutp,
2955			      num * sdebug_sector_size, 0, true);
2956}
2957
2958/* If sip->storep+lba compares equal to arr(num), then copy top half of
2959 * arr into sip->storep+lba and return true. If comparison fails then
2960 * return false. */
2961static bool comp_write_worker(struct sdeb_store_info *sip, u64 lba, u32 num,
2962			      const u8 *arr, bool compare_only)
2963{
2964	bool res;
2965	u64 block, rest = 0;
2966	u32 store_blks = sdebug_store_sectors;
2967	u32 lb_size = sdebug_sector_size;
2968	u8 *fsp = sip->storep;
2969
2970	block = do_div(lba, store_blks);
2971	if (block + num > store_blks)
2972		rest = block + num - store_blks;
2973
2974	res = !memcmp(fsp + (block * lb_size), arr, (num - rest) * lb_size);
2975	if (!res)
2976		return res;
2977	if (rest)
2978		res = memcmp(fsp, arr + ((num - rest) * lb_size),
2979			     rest * lb_size);
2980	if (!res)
2981		return res;
2982	if (compare_only)
2983		return true;
2984	arr += num * lb_size;
2985	memcpy(fsp + (block * lb_size), arr, (num - rest) * lb_size);
2986	if (rest)
2987		memcpy(fsp, arr + ((num - rest) * lb_size), rest * lb_size);
2988	return res;
2989}
2990
2991static __be16 dif_compute_csum(const void *buf, int len)
2992{
2993	__be16 csum;
2994
2995	if (sdebug_guard)
2996		csum = (__force __be16)ip_compute_csum(buf, len);
2997	else
2998		csum = cpu_to_be16(crc_t10dif(buf, len));
2999
3000	return csum;
3001}
3002
3003static int dif_verify(struct t10_pi_tuple *sdt, const void *data,
3004		      sector_t sector, u32 ei_lba)
3005{
3006	__be16 csum = dif_compute_csum(data, sdebug_sector_size);
3007
3008	if (sdt->guard_tag != csum) {
3009		pr_err("GUARD check failed on sector %lu rcvd 0x%04x, data 0x%04x\n",
3010			(unsigned long)sector,
3011			be16_to_cpu(sdt->guard_tag),
3012			be16_to_cpu(csum));
3013		return 0x01;
3014	}
3015	if (sdebug_dif == T10_PI_TYPE1_PROTECTION &&
3016	    be32_to_cpu(sdt->ref_tag) != (sector & 0xffffffff)) {
3017		pr_err("REF check failed on sector %lu\n",
3018			(unsigned long)sector);
3019		return 0x03;
3020	}
3021	if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3022	    be32_to_cpu(sdt->ref_tag) != ei_lba) {
3023		pr_err("REF check failed on sector %lu\n",
3024			(unsigned long)sector);
3025		return 0x03;
3026	}
3027	return 0;
3028}
3029
3030static void dif_copy_prot(struct scsi_cmnd *scp, sector_t sector,
3031			  unsigned int sectors, bool read)
3032{
3033	size_t resid;
3034	void *paddr;
3035	struct sdeb_store_info *sip = devip2sip((struct sdebug_dev_info *)
3036						scp->device->hostdata, true);
3037	struct t10_pi_tuple *dif_storep = sip->dif_storep;
3038	const void *dif_store_end = dif_storep + sdebug_store_sectors;
3039	struct sg_mapping_iter miter;
3040
3041	/* Bytes of protection data to copy into sgl */
3042	resid = sectors * sizeof(*dif_storep);
3043
3044	sg_miter_start(&miter, scsi_prot_sglist(scp),
3045		       scsi_prot_sg_count(scp), SG_MITER_ATOMIC |
3046		       (read ? SG_MITER_TO_SG : SG_MITER_FROM_SG));
3047
3048	while (sg_miter_next(&miter) && resid > 0) {
3049		size_t len = min_t(size_t, miter.length, resid);
3050		void *start = dif_store(sip, sector);
3051		size_t rest = 0;
3052
3053		if (dif_store_end < start + len)
3054			rest = start + len - dif_store_end;
3055
3056		paddr = miter.addr;
3057
3058		if (read)
3059			memcpy(paddr, start, len - rest);
3060		else
3061			memcpy(start, paddr, len - rest);
3062
3063		if (rest) {
3064			if (read)
3065				memcpy(paddr + len - rest, dif_storep, rest);
3066			else
3067				memcpy(dif_storep, paddr + len - rest, rest);
3068		}
3069
3070		sector += len / sizeof(*dif_storep);
3071		resid -= len;
3072	}
3073	sg_miter_stop(&miter);
3074}
3075
3076static int prot_verify_read(struct scsi_cmnd *scp, sector_t start_sec,
3077			    unsigned int sectors, u32 ei_lba)
3078{
3079	unsigned int i;
3080	sector_t sector;
3081	struct sdeb_store_info *sip = devip2sip((struct sdebug_dev_info *)
3082						scp->device->hostdata, true);
3083	struct t10_pi_tuple *sdt;
3084
3085	for (i = 0; i < sectors; i++, ei_lba++) {
3086		int ret;
3087
3088		sector = start_sec + i;
3089		sdt = dif_store(sip, sector);
3090
3091		if (sdt->app_tag == cpu_to_be16(0xffff))
3092			continue;
3093
3094		ret = dif_verify(sdt, lba2fake_store(sip, sector), sector,
3095				 ei_lba);
3096		if (ret) {
3097			dif_errors++;
3098			return ret;
3099		}
3100	}
3101
3102	dif_copy_prot(scp, start_sec, sectors, true);
3103	dix_reads++;
3104
3105	return 0;
3106}
3107
3108static int resp_read_dt0(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
3109{
3110	bool check_prot;
3111	u32 num;
3112	u32 ei_lba;
3113	int ret;
3114	u64 lba;
3115	struct sdeb_store_info *sip = devip2sip(devip, true);
3116	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
3117	u8 *cmd = scp->cmnd;
3118
3119	switch (cmd[0]) {
3120	case READ_16:
3121		ei_lba = 0;
3122		lba = get_unaligned_be64(cmd + 2);
3123		num = get_unaligned_be32(cmd + 10);
3124		check_prot = true;
3125		break;
3126	case READ_10:
3127		ei_lba = 0;
3128		lba = get_unaligned_be32(cmd + 2);
3129		num = get_unaligned_be16(cmd + 7);
3130		check_prot = true;
3131		break;
3132	case READ_6:
3133		ei_lba = 0;
3134		lba = (u32)cmd[3] | (u32)cmd[2] << 8 |
3135		      (u32)(cmd[1] & 0x1f) << 16;
3136		num = (0 == cmd[4]) ? 256 : cmd[4];
3137		check_prot = true;
3138		break;
3139	case READ_12:
3140		ei_lba = 0;
3141		lba = get_unaligned_be32(cmd + 2);
3142		num = get_unaligned_be32(cmd + 6);
3143		check_prot = true;
3144		break;
3145	case XDWRITEREAD_10:
3146		ei_lba = 0;
3147		lba = get_unaligned_be32(cmd + 2);
3148		num = get_unaligned_be16(cmd + 7);
3149		check_prot = false;
3150		break;
3151	default:	/* assume READ(32) */
3152		lba = get_unaligned_be64(cmd + 12);
3153		ei_lba = get_unaligned_be32(cmd + 20);
3154		num = get_unaligned_be32(cmd + 28);
3155		check_prot = false;
3156		break;
3157	}
3158	if (unlikely(have_dif_prot && check_prot)) {
3159		if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3160		    (cmd[1] & 0xe0)) {
3161			mk_sense_invalid_opcode(scp);
3162			return check_condition_result;
3163		}
3164		if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3165		     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3166		    (cmd[1] & 0xe0) == 0)
3167			sdev_printk(KERN_ERR, scp->device, "Unprotected RD "
3168				    "to DIF device\n");
3169	}
3170	if (unlikely((sdebug_opts & SDEBUG_OPT_SHORT_TRANSFER) &&
3171		     atomic_read(&sdeb_inject_pending))) {
3172		num /= 2;
3173		atomic_set(&sdeb_inject_pending, 0);
3174	}
3175
3176	ret = check_device_access_params(scp, lba, num, false);
3177	if (ret)
3178		return ret;
3179	if (unlikely((SDEBUG_OPT_MEDIUM_ERR & sdebug_opts) &&
3180		     (lba <= (sdebug_medium_error_start + sdebug_medium_error_count - 1)) &&
3181		     ((lba + num) > sdebug_medium_error_start))) {
3182		/* claim unrecoverable read error */
3183		mk_sense_buffer(scp, MEDIUM_ERROR, UNRECOVERED_READ_ERR, 0);
3184		/* set info field and valid bit for fixed descriptor */
3185		if (0x70 == (scp->sense_buffer[0] & 0x7f)) {
3186			scp->sense_buffer[0] |= 0x80;	/* Valid bit */
3187			ret = (lba < OPT_MEDIUM_ERR_ADDR)
3188			      ? OPT_MEDIUM_ERR_ADDR : (int)lba;
3189			put_unaligned_be32(ret, scp->sense_buffer + 3);
3190		}
3191		scsi_set_resid(scp, scsi_bufflen(scp));
3192		return check_condition_result;
3193	}
3194
3195	read_lock(macc_lckp);
3196
3197	/* DIX + T10 DIF */
3198	if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3199		int prot_ret = prot_verify_read(scp, lba, num, ei_lba);
3200
3201		if (prot_ret) {
3202			read_unlock(macc_lckp);
3203			mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, prot_ret);
3204			return illegal_condition_result;
3205		}
3206	}
3207
3208	ret = do_device_access(sip, scp, 0, lba, num, false);
3209	read_unlock(macc_lckp);
3210	if (unlikely(ret == -1))
3211		return DID_ERROR << 16;
3212
3213	scsi_set_resid(scp, scsi_bufflen(scp) - ret);
3214
3215	if (unlikely((sdebug_opts & SDEBUG_OPT_RECOV_DIF_DIX) &&
3216		     atomic_read(&sdeb_inject_pending))) {
3217		if (sdebug_opts & SDEBUG_OPT_RECOVERED_ERR) {
3218			mk_sense_buffer(scp, RECOVERED_ERROR, THRESHOLD_EXCEEDED, 0);
3219			atomic_set(&sdeb_inject_pending, 0);
3220			return check_condition_result;
3221		} else if (sdebug_opts & SDEBUG_OPT_DIF_ERR) {
3222			/* Logical block guard check failed */
3223			mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
3224			atomic_set(&sdeb_inject_pending, 0);
3225			return illegal_condition_result;
3226		} else if (SDEBUG_OPT_DIX_ERR & sdebug_opts) {
3227			mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
3228			atomic_set(&sdeb_inject_pending, 0);
3229			return illegal_condition_result;
3230		}
3231	}
3232	return 0;
3233}
3234
3235static void dump_sector(unsigned char *buf, int len)
3236{
3237	int i, j, n;
3238
3239	pr_err(">>> Sector Dump <<<\n");
3240	for (i = 0 ; i < len ; i += 16) {
3241		char b[128];
3242
3243		for (j = 0, n = 0; j < 16; j++) {
3244			unsigned char c = buf[i+j];
3245
3246			if (c >= 0x20 && c < 0x7e)
3247				n += scnprintf(b + n, sizeof(b) - n,
3248					       " %c ", buf[i+j]);
3249			else
3250				n += scnprintf(b + n, sizeof(b) - n,
3251					       "%02x ", buf[i+j]);
3252		}
3253		pr_err("%04d: %s\n", i, b);
3254	}
3255}
3256
3257static int prot_verify_write(struct scsi_cmnd *SCpnt, sector_t start_sec,
3258			     unsigned int sectors, u32 ei_lba)
3259{
3260	int ret;
3261	struct t10_pi_tuple *sdt;
3262	void *daddr;
3263	sector_t sector = start_sec;
3264	int ppage_offset;
3265	int dpage_offset;
3266	struct sg_mapping_iter diter;
3267	struct sg_mapping_iter piter;
3268
3269	BUG_ON(scsi_sg_count(SCpnt) == 0);
3270	BUG_ON(scsi_prot_sg_count(SCpnt) == 0);
3271
3272	sg_miter_start(&piter, scsi_prot_sglist(SCpnt),
3273			scsi_prot_sg_count(SCpnt),
3274			SG_MITER_ATOMIC | SG_MITER_FROM_SG);
3275	sg_miter_start(&diter, scsi_sglist(SCpnt), scsi_sg_count(SCpnt),
3276			SG_MITER_ATOMIC | SG_MITER_FROM_SG);
3277
3278	/* For each protection page */
3279	while (sg_miter_next(&piter)) {
3280		dpage_offset = 0;
3281		if (WARN_ON(!sg_miter_next(&diter))) {
3282			ret = 0x01;
3283			goto out;
3284		}
3285
3286		for (ppage_offset = 0; ppage_offset < piter.length;
3287		     ppage_offset += sizeof(struct t10_pi_tuple)) {
3288			/* If we're at the end of the current
3289			 * data page advance to the next one
3290			 */
3291			if (dpage_offset >= diter.length) {
3292				if (WARN_ON(!sg_miter_next(&diter))) {
3293					ret = 0x01;
3294					goto out;
3295				}
3296				dpage_offset = 0;
3297			}
3298
3299			sdt = piter.addr + ppage_offset;
3300			daddr = diter.addr + dpage_offset;
3301
3302			ret = dif_verify(sdt, daddr, sector, ei_lba);
3303			if (ret) {
3304				dump_sector(daddr, sdebug_sector_size);
3305				goto out;
3306			}
3307
3308			sector++;
3309			ei_lba++;
3310			dpage_offset += sdebug_sector_size;
3311		}
3312		diter.consumed = dpage_offset;
3313		sg_miter_stop(&diter);
3314	}
3315	sg_miter_stop(&piter);
3316
3317	dif_copy_prot(SCpnt, start_sec, sectors, false);
3318	dix_writes++;
3319
3320	return 0;
3321
3322out:
3323	dif_errors++;
3324	sg_miter_stop(&diter);
3325	sg_miter_stop(&piter);
3326	return ret;
3327}
3328
3329static unsigned long lba_to_map_index(sector_t lba)
3330{
3331	if (sdebug_unmap_alignment)
3332		lba += sdebug_unmap_granularity - sdebug_unmap_alignment;
3333	sector_div(lba, sdebug_unmap_granularity);
3334	return lba;
3335}
3336
3337static sector_t map_index_to_lba(unsigned long index)
3338{
3339	sector_t lba = index * sdebug_unmap_granularity;
3340
3341	if (sdebug_unmap_alignment)
3342		lba -= sdebug_unmap_granularity - sdebug_unmap_alignment;
3343	return lba;
3344}
3345
3346static unsigned int map_state(struct sdeb_store_info *sip, sector_t lba,
3347			      unsigned int *num)
3348{
3349	sector_t end;
3350	unsigned int mapped;
3351	unsigned long index;
3352	unsigned long next;
3353
3354	index = lba_to_map_index(lba);
3355	mapped = test_bit(index, sip->map_storep);
3356
3357	if (mapped)
3358		next = find_next_zero_bit(sip->map_storep, map_size, index);
3359	else
3360		next = find_next_bit(sip->map_storep, map_size, index);
3361
3362	end = min_t(sector_t, sdebug_store_sectors,  map_index_to_lba(next));
3363	*num = end - lba;
3364	return mapped;
3365}
3366
3367static void map_region(struct sdeb_store_info *sip, sector_t lba,
3368		       unsigned int len)
3369{
3370	sector_t end = lba + len;
3371
3372	while (lba < end) {
3373		unsigned long index = lba_to_map_index(lba);
3374
3375		if (index < map_size)
3376			set_bit(index, sip->map_storep);
3377
3378		lba = map_index_to_lba(index + 1);
3379	}
3380}
3381
3382static void unmap_region(struct sdeb_store_info *sip, sector_t lba,
3383			 unsigned int len)
3384{
3385	sector_t end = lba + len;
3386	u8 *fsp = sip->storep;
3387
3388	while (lba < end) {
3389		unsigned long index = lba_to_map_index(lba);
3390
3391		if (lba == map_index_to_lba(index) &&
3392		    lba + sdebug_unmap_granularity <= end &&
3393		    index < map_size) {
3394			clear_bit(index, sip->map_storep);
3395			if (sdebug_lbprz) {  /* for LBPRZ=2 return 0xff_s */
3396				memset(fsp + lba * sdebug_sector_size,
3397				       (sdebug_lbprz & 1) ? 0 : 0xff,
3398				       sdebug_sector_size *
3399				       sdebug_unmap_granularity);
3400			}
3401			if (sip->dif_storep) {
3402				memset(sip->dif_storep + lba, 0xff,
3403				       sizeof(*sip->dif_storep) *
3404				       sdebug_unmap_granularity);
3405			}
3406		}
3407		lba = map_index_to_lba(index + 1);
3408	}
3409}
3410
3411static int resp_write_dt0(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
3412{
3413	bool check_prot;
3414	u32 num;
3415	u32 ei_lba;
3416	int ret;
3417	u64 lba;
3418	struct sdeb_store_info *sip = devip2sip(devip, true);
3419	rwlock_t *macc_lckp = &sip->macc_lck;
3420	u8 *cmd = scp->cmnd;
3421
3422	switch (cmd[0]) {
3423	case WRITE_16:
3424		ei_lba = 0;
3425		lba = get_unaligned_be64(cmd + 2);
3426		num = get_unaligned_be32(cmd + 10);
3427		check_prot = true;
3428		break;
3429	case WRITE_10:
3430		ei_lba = 0;
3431		lba = get_unaligned_be32(cmd + 2);
3432		num = get_unaligned_be16(cmd + 7);
3433		check_prot = true;
3434		break;
3435	case WRITE_6:
3436		ei_lba = 0;
3437		lba = (u32)cmd[3] | (u32)cmd[2] << 8 |
3438		      (u32)(cmd[1] & 0x1f) << 16;
3439		num = (0 == cmd[4]) ? 256 : cmd[4];
3440		check_prot = true;
3441		break;
3442	case WRITE_12:
3443		ei_lba = 0;
3444		lba = get_unaligned_be32(cmd + 2);
3445		num = get_unaligned_be32(cmd + 6);
3446		check_prot = true;
3447		break;
3448	case 0x53:	/* XDWRITEREAD(10) */
3449		ei_lba = 0;
3450		lba = get_unaligned_be32(cmd + 2);
3451		num = get_unaligned_be16(cmd + 7);
3452		check_prot = false;
3453		break;
3454	default:	/* assume WRITE(32) */
3455		lba = get_unaligned_be64(cmd + 12);
3456		ei_lba = get_unaligned_be32(cmd + 20);
3457		num = get_unaligned_be32(cmd + 28);
3458		check_prot = false;
3459		break;
3460	}
3461	if (unlikely(have_dif_prot && check_prot)) {
3462		if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3463		    (cmd[1] & 0xe0)) {
3464			mk_sense_invalid_opcode(scp);
3465			return check_condition_result;
3466		}
3467		if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3468		     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3469		    (cmd[1] & 0xe0) == 0)
3470			sdev_printk(KERN_ERR, scp->device, "Unprotected WR "
3471				    "to DIF device\n");
3472	}
3473
3474	write_lock(macc_lckp);
3475	ret = check_device_access_params(scp, lba, num, true);
3476	if (ret) {
3477		write_unlock(macc_lckp);
3478		return ret;
3479	}
3480
3481	/* DIX + T10 DIF */
3482	if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3483		int prot_ret = prot_verify_write(scp, lba, num, ei_lba);
3484
3485		if (prot_ret) {
3486			write_unlock(macc_lckp);
3487			mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, prot_ret);
3488			return illegal_condition_result;
3489		}
3490	}
3491
3492	ret = do_device_access(sip, scp, 0, lba, num, true);
3493	if (unlikely(scsi_debug_lbp()))
3494		map_region(sip, lba, num);
3495	/* If ZBC zone then bump its write pointer */
3496	if (sdebug_dev_is_zoned(devip))
3497		zbc_inc_wp(devip, lba, num);
3498	write_unlock(macc_lckp);
3499	if (unlikely(-1 == ret))
3500		return DID_ERROR << 16;
3501	else if (unlikely(sdebug_verbose &&
3502			  (ret < (num * sdebug_sector_size))))
3503		sdev_printk(KERN_INFO, scp->device,
3504			    "%s: write: cdb indicated=%u, IO sent=%d bytes\n",
3505			    my_name, num * sdebug_sector_size, ret);
3506
3507	if (unlikely((sdebug_opts & SDEBUG_OPT_RECOV_DIF_DIX) &&
3508		     atomic_read(&sdeb_inject_pending))) {
3509		if (sdebug_opts & SDEBUG_OPT_RECOVERED_ERR) {
3510			mk_sense_buffer(scp, RECOVERED_ERROR, THRESHOLD_EXCEEDED, 0);
3511			atomic_set(&sdeb_inject_pending, 0);
3512			return check_condition_result;
3513		} else if (sdebug_opts & SDEBUG_OPT_DIF_ERR) {
3514			/* Logical block guard check failed */
3515			mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
3516			atomic_set(&sdeb_inject_pending, 0);
3517			return illegal_condition_result;
3518		} else if (sdebug_opts & SDEBUG_OPT_DIX_ERR) {
3519			mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
3520			atomic_set(&sdeb_inject_pending, 0);
3521			return illegal_condition_result;
3522		}
3523	}
3524	return 0;
3525}
3526
3527/*
3528 * T10 has only specified WRITE SCATTERED(16) and WRITE SCATTERED(32).
3529 * No READ GATHERED yet (requires bidi or long cdb holding gather list).
3530 */
3531static int resp_write_scat(struct scsi_cmnd *scp,
3532			   struct sdebug_dev_info *devip)
3533{
3534	u8 *cmd = scp->cmnd;
3535	u8 *lrdp = NULL;
3536	u8 *up;
3537	struct sdeb_store_info *sip = devip2sip(devip, true);
3538	rwlock_t *macc_lckp = &sip->macc_lck;
3539	u8 wrprotect;
3540	u16 lbdof, num_lrd, k;
3541	u32 num, num_by, bt_len, lbdof_blen, sg_off, cum_lb;
3542	u32 lb_size = sdebug_sector_size;
3543	u32 ei_lba;
3544	u64 lba;
3545	int ret, res;
3546	bool is_16;
3547	static const u32 lrd_size = 32; /* + parameter list header size */
3548
3549	if (cmd[0] == VARIABLE_LENGTH_CMD) {
3550		is_16 = false;
3551		wrprotect = (cmd[10] >> 5) & 0x7;
3552		lbdof = get_unaligned_be16(cmd + 12);
3553		num_lrd = get_unaligned_be16(cmd + 16);
3554		bt_len = get_unaligned_be32(cmd + 28);
3555	} else {        /* that leaves WRITE SCATTERED(16) */
3556		is_16 = true;
3557		wrprotect = (cmd[2] >> 5) & 0x7;
3558		lbdof = get_unaligned_be16(cmd + 4);
3559		num_lrd = get_unaligned_be16(cmd + 8);
3560		bt_len = get_unaligned_be32(cmd + 10);
3561		if (unlikely(have_dif_prot)) {
3562			if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3563			    wrprotect) {
3564				mk_sense_invalid_opcode(scp);
3565				return illegal_condition_result;
3566			}
3567			if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3568			     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3569			     wrprotect == 0)
3570				sdev_printk(KERN_ERR, scp->device,
3571					    "Unprotected WR to DIF device\n");
3572		}
3573	}
3574	if ((num_lrd == 0) || (bt_len == 0))
3575		return 0;       /* T10 says these do-nothings are not errors */
3576	if (lbdof == 0) {
3577		if (sdebug_verbose)
3578			sdev_printk(KERN_INFO, scp->device,
3579				"%s: %s: LB Data Offset field bad\n",
3580				my_name, __func__);
3581		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3582		return illegal_condition_result;
3583	}
3584	lbdof_blen = lbdof * lb_size;
3585	if ((lrd_size + (num_lrd * lrd_size)) > lbdof_blen) {
3586		if (sdebug_verbose)
3587			sdev_printk(KERN_INFO, scp->device,
3588				"%s: %s: LBA range descriptors don't fit\n",
3589				my_name, __func__);
3590		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3591		return illegal_condition_result;
3592	}
3593	lrdp = kzalloc(lbdof_blen, GFP_ATOMIC);
3594	if (lrdp == NULL)
3595		return SCSI_MLQUEUE_HOST_BUSY;
3596	if (sdebug_verbose)
3597		sdev_printk(KERN_INFO, scp->device,
3598			"%s: %s: Fetch header+scatter_list, lbdof_blen=%u\n",
3599			my_name, __func__, lbdof_blen);
3600	res = fetch_to_dev_buffer(scp, lrdp, lbdof_blen);
3601	if (res == -1) {
3602		ret = DID_ERROR << 16;
3603		goto err_out;
3604	}
3605
3606	write_lock(macc_lckp);
3607	sg_off = lbdof_blen;
3608	/* Spec says Buffer xfer Length field in number of LBs in dout */
3609	cum_lb = 0;
3610	for (k = 0, up = lrdp + lrd_size; k < num_lrd; ++k, up += lrd_size) {
3611		lba = get_unaligned_be64(up + 0);
3612		num = get_unaligned_be32(up + 8);
3613		if (sdebug_verbose)
3614			sdev_printk(KERN_INFO, scp->device,
3615				"%s: %s: k=%d  LBA=0x%llx num=%u  sg_off=%u\n",
3616				my_name, __func__, k, lba, num, sg_off);
3617		if (num == 0)
3618			continue;
3619		ret = check_device_access_params(scp, lba, num, true);
3620		if (ret)
3621			goto err_out_unlock;
3622		num_by = num * lb_size;
3623		ei_lba = is_16 ? 0 : get_unaligned_be32(up + 12);
3624
3625		if ((cum_lb + num) > bt_len) {
3626			if (sdebug_verbose)
3627				sdev_printk(KERN_INFO, scp->device,
3628				    "%s: %s: sum of blocks > data provided\n",
3629				    my_name, __func__);
3630			mk_sense_buffer(scp, ILLEGAL_REQUEST, WRITE_ERROR_ASC,
3631					0);
3632			ret = illegal_condition_result;
3633			goto err_out_unlock;
3634		}
3635
3636		/* DIX + T10 DIF */
3637		if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3638			int prot_ret = prot_verify_write(scp, lba, num,
3639							 ei_lba);
3640
3641			if (prot_ret) {
3642				mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10,
3643						prot_ret);
3644				ret = illegal_condition_result;
3645				goto err_out_unlock;
3646			}
3647		}
3648
3649		ret = do_device_access(sip, scp, sg_off, lba, num, true);
3650		/* If ZBC zone then bump its write pointer */
3651		if (sdebug_dev_is_zoned(devip))
3652			zbc_inc_wp(devip, lba, num);
3653		if (unlikely(scsi_debug_lbp()))
3654			map_region(sip, lba, num);
3655		if (unlikely(-1 == ret)) {
3656			ret = DID_ERROR << 16;
3657			goto err_out_unlock;
3658		} else if (unlikely(sdebug_verbose && (ret < num_by)))
3659			sdev_printk(KERN_INFO, scp->device,
3660			    "%s: write: cdb indicated=%u, IO sent=%d bytes\n",
3661			    my_name, num_by, ret);
3662
3663		if (unlikely((sdebug_opts & SDEBUG_OPT_RECOV_DIF_DIX) &&
3664			     atomic_read(&sdeb_inject_pending))) {
3665			if (sdebug_opts & SDEBUG_OPT_RECOVERED_ERR) {
3666				mk_sense_buffer(scp, RECOVERED_ERROR, THRESHOLD_EXCEEDED, 0);
3667				atomic_set(&sdeb_inject_pending, 0);
3668				ret = check_condition_result;
3669				goto err_out_unlock;
3670			} else if (sdebug_opts & SDEBUG_OPT_DIF_ERR) {
3671				/* Logical block guard check failed */
3672				mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
3673				atomic_set(&sdeb_inject_pending, 0);
3674				ret = illegal_condition_result;
3675				goto err_out_unlock;
3676			} else if (sdebug_opts & SDEBUG_OPT_DIX_ERR) {
3677				mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
3678				atomic_set(&sdeb_inject_pending, 0);
3679				ret = illegal_condition_result;
3680				goto err_out_unlock;
3681			}
3682		}
3683		sg_off += num_by;
3684		cum_lb += num;
3685	}
3686	ret = 0;
3687err_out_unlock:
3688	write_unlock(macc_lckp);
3689err_out:
3690	kfree(lrdp);
3691	return ret;
3692}
3693
3694static int resp_write_same(struct scsi_cmnd *scp, u64 lba, u32 num,
3695			   u32 ei_lba, bool unmap, bool ndob)
3696{
3697	struct scsi_device *sdp = scp->device;
3698	struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
3699	unsigned long long i;
3700	u64 block, lbaa;
3701	u32 lb_size = sdebug_sector_size;
3702	int ret;
3703	struct sdeb_store_info *sip = devip2sip((struct sdebug_dev_info *)
3704						scp->device->hostdata, true);
3705	rwlock_t *macc_lckp = &sip->macc_lck;
3706	u8 *fs1p;
3707	u8 *fsp;
3708
3709	write_lock(macc_lckp);
3710
3711	ret = check_device_access_params(scp, lba, num, true);
3712	if (ret) {
3713		write_unlock(macc_lckp);
3714		return ret;
3715	}
3716
3717	if (unmap && scsi_debug_lbp()) {
3718		unmap_region(sip, lba, num);
3719		goto out;
3720	}
3721	lbaa = lba;
3722	block = do_div(lbaa, sdebug_store_sectors);
3723	/* if ndob then zero 1 logical block, else fetch 1 logical block */
3724	fsp = sip->storep;
3725	fs1p = fsp + (block * lb_size);
3726	if (ndob) {
3727		memset(fs1p, 0, lb_size);
3728		ret = 0;
3729	} else
3730		ret = fetch_to_dev_buffer(scp, fs1p, lb_size);
3731
3732	if (-1 == ret) {
3733		write_unlock(&sip->macc_lck);
3734		return DID_ERROR << 16;
3735	} else if (sdebug_verbose && !ndob && (ret < lb_size))
3736		sdev_printk(KERN_INFO, scp->device,
3737			    "%s: %s: lb size=%u, IO sent=%d bytes\n",
3738			    my_name, "write same", lb_size, ret);
3739
3740	/* Copy first sector to remaining blocks */
3741	for (i = 1 ; i < num ; i++) {
3742		lbaa = lba + i;
3743		block = do_div(lbaa, sdebug_store_sectors);
3744		memmove(fsp + (block * lb_size), fs1p, lb_size);
3745	}
3746	if (scsi_debug_lbp())
3747		map_region(sip, lba, num);
3748	/* If ZBC zone then bump its write pointer */
3749	if (sdebug_dev_is_zoned(devip))
3750		zbc_inc_wp(devip, lba, num);
3751out:
3752	write_unlock(macc_lckp);
3753
3754	return 0;
3755}
3756
3757static int resp_write_same_10(struct scsi_cmnd *scp,
3758			      struct sdebug_dev_info *devip)
3759{
3760	u8 *cmd = scp->cmnd;
3761	u32 lba;
3762	u16 num;
3763	u32 ei_lba = 0;
3764	bool unmap = false;
3765
3766	if (cmd[1] & 0x8) {
3767		if (sdebug_lbpws10 == 0) {
3768			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 3);
3769			return check_condition_result;
3770		} else
3771			unmap = true;
3772	}
3773	lba = get_unaligned_be32(cmd + 2);
3774	num = get_unaligned_be16(cmd + 7);
3775	if (num > sdebug_write_same_length) {
3776		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 7, -1);
3777		return check_condition_result;
3778	}
3779	return resp_write_same(scp, lba, num, ei_lba, unmap, false);
3780}
3781
3782static int resp_write_same_16(struct scsi_cmnd *scp,
3783			      struct sdebug_dev_info *devip)
3784{
3785	u8 *cmd = scp->cmnd;
3786	u64 lba;
3787	u32 num;
3788	u32 ei_lba = 0;
3789	bool unmap = false;
3790	bool ndob = false;
3791
3792	if (cmd[1] & 0x8) {	/* UNMAP */
3793		if (sdebug_lbpws == 0) {
3794			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 3);
3795			return check_condition_result;
3796		} else
3797			unmap = true;
3798	}
3799	if (cmd[1] & 0x1)  /* NDOB (no data-out buffer, assumes zeroes) */
3800		ndob = true;
3801	lba = get_unaligned_be64(cmd + 2);
3802	num = get_unaligned_be32(cmd + 10);
3803	if (num > sdebug_write_same_length) {
3804		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 10, -1);
3805		return check_condition_result;
3806	}
3807	return resp_write_same(scp, lba, num, ei_lba, unmap, ndob);
3808}
3809
3810/* Note the mode field is in the same position as the (lower) service action
3811 * field. For the Report supported operation codes command, SPC-4 suggests
3812 * each mode of this command should be reported separately; for future. */
3813static int resp_write_buffer(struct scsi_cmnd *scp,
3814			     struct sdebug_dev_info *devip)
3815{
3816	u8 *cmd = scp->cmnd;
3817	struct scsi_device *sdp = scp->device;
3818	struct sdebug_dev_info *dp;
3819	u8 mode;
3820
3821	mode = cmd[1] & 0x1f;
3822	switch (mode) {
3823	case 0x4:	/* download microcode (MC) and activate (ACT) */
3824		/* set UAs on this device only */
3825		set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
3826		set_bit(SDEBUG_UA_MICROCODE_CHANGED, devip->uas_bm);
3827		break;
3828	case 0x5:	/* download MC, save and ACT */
3829		set_bit(SDEBUG_UA_MICROCODE_CHANGED_WO_RESET, devip->uas_bm);
3830		break;
3831	case 0x6:	/* download MC with offsets and ACT */
3832		/* set UAs on most devices (LUs) in this target */
3833		list_for_each_entry(dp,
3834				    &devip->sdbg_host->dev_info_list,
3835				    dev_list)
3836			if (dp->target == sdp->id) {
3837				set_bit(SDEBUG_UA_BUS_RESET, dp->uas_bm);
3838				if (devip != dp)
3839					set_bit(SDEBUG_UA_MICROCODE_CHANGED,
3840						dp->uas_bm);
3841			}
3842		break;
3843	case 0x7:	/* download MC with offsets, save, and ACT */
3844		/* set UA on all devices (LUs) in this target */
3845		list_for_each_entry(dp,
3846				    &devip->sdbg_host->dev_info_list,
3847				    dev_list)
3848			if (dp->target == sdp->id)
3849				set_bit(SDEBUG_UA_MICROCODE_CHANGED_WO_RESET,
3850					dp->uas_bm);
3851		break;
3852	default:
3853		/* do nothing for this command for other mode values */
3854		break;
3855	}
3856	return 0;
3857}
3858
3859static int resp_comp_write(struct scsi_cmnd *scp,
3860			   struct sdebug_dev_info *devip)
3861{
3862	u8 *cmd = scp->cmnd;
3863	u8 *arr;
3864	struct sdeb_store_info *sip = devip2sip(devip, true);
3865	rwlock_t *macc_lckp = &sip->macc_lck;
3866	u64 lba;
3867	u32 dnum;
3868	u32 lb_size = sdebug_sector_size;
3869	u8 num;
3870	int ret;
3871	int retval = 0;
3872
3873	lba = get_unaligned_be64(cmd + 2);
3874	num = cmd[13];		/* 1 to a maximum of 255 logical blocks */
3875	if (0 == num)
3876		return 0;	/* degenerate case, not an error */
3877	if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3878	    (cmd[1] & 0xe0)) {
3879		mk_sense_invalid_opcode(scp);
3880		return check_condition_result;
3881	}
3882	if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3883	     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3884	    (cmd[1] & 0xe0) == 0)
3885		sdev_printk(KERN_ERR, scp->device, "Unprotected WR "
3886			    "to DIF device\n");
3887	ret = check_device_access_params(scp, lba, num, false);
3888	if (ret)
3889		return ret;
3890	dnum = 2 * num;
3891	arr = kcalloc(lb_size, dnum, GFP_ATOMIC);
3892	if (NULL == arr) {
3893		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
3894				INSUFF_RES_ASCQ);
3895		return check_condition_result;
3896	}
3897
3898	write_lock(macc_lckp);
3899
3900	ret = do_dout_fetch(scp, dnum, arr);
3901	if (ret == -1) {
3902		retval = DID_ERROR << 16;
3903		goto cleanup;
3904	} else if (sdebug_verbose && (ret < (dnum * lb_size)))
3905		sdev_printk(KERN_INFO, scp->device, "%s: compare_write: cdb "
3906			    "indicated=%u, IO sent=%d bytes\n", my_name,
3907			    dnum * lb_size, ret);
3908	if (!comp_write_worker(sip, lba, num, arr, false)) {
3909		mk_sense_buffer(scp, MISCOMPARE, MISCOMPARE_VERIFY_ASC, 0);
3910		retval = check_condition_result;
3911		goto cleanup;
3912	}
3913	if (scsi_debug_lbp())
3914		map_region(sip, lba, num);
3915cleanup:
3916	write_unlock(macc_lckp);
3917	kfree(arr);
3918	return retval;
3919}
3920
3921struct unmap_block_desc {
3922	__be64	lba;
3923	__be32	blocks;
3924	__be32	__reserved;
3925};
3926
3927static int resp_unmap(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
3928{
3929	unsigned char *buf;
3930	struct unmap_block_desc *desc;
3931	struct sdeb_store_info *sip = devip2sip(devip, true);
3932	rwlock_t *macc_lckp = &sip->macc_lck;
3933	unsigned int i, payload_len, descriptors;
3934	int ret;
3935
3936	if (!scsi_debug_lbp())
3937		return 0;	/* fib and say its done */
3938	payload_len = get_unaligned_be16(scp->cmnd + 7);
3939	BUG_ON(scsi_bufflen(scp) != payload_len);
3940
3941	descriptors = (payload_len - 8) / 16;
3942	if (descriptors > sdebug_unmap_max_desc) {
3943		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 7, -1);
3944		return check_condition_result;
3945	}
3946
3947	buf = kzalloc(scsi_bufflen(scp), GFP_ATOMIC);
3948	if (!buf) {
3949		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
3950				INSUFF_RES_ASCQ);
3951		return check_condition_result;
3952	}
3953
3954	scsi_sg_copy_to_buffer(scp, buf, scsi_bufflen(scp));
3955
3956	BUG_ON(get_unaligned_be16(&buf[0]) != payload_len - 2);
3957	BUG_ON(get_unaligned_be16(&buf[2]) != descriptors * 16);
3958
3959	desc = (void *)&buf[8];
3960
3961	write_lock(macc_lckp);
3962
3963	for (i = 0 ; i < descriptors ; i++) {
3964		unsigned long long lba = get_unaligned_be64(&desc[i].lba);
3965		unsigned int num = get_unaligned_be32(&desc[i].blocks);
3966
3967		ret = check_device_access_params(scp, lba, num, true);
3968		if (ret)
3969			goto out;
3970
3971		unmap_region(sip, lba, num);
3972	}
3973
3974	ret = 0;
3975
3976out:
3977	write_unlock(macc_lckp);
3978	kfree(buf);
3979
3980	return ret;
3981}
3982
3983#define SDEBUG_GET_LBA_STATUS_LEN 32
3984
3985static int resp_get_lba_status(struct scsi_cmnd *scp,
3986			       struct sdebug_dev_info *devip)
3987{
3988	u8 *cmd = scp->cmnd;
3989	u64 lba;
3990	u32 alloc_len, mapped, num;
3991	int ret;
3992	u8 arr[SDEBUG_GET_LBA_STATUS_LEN];
3993
3994	lba = get_unaligned_be64(cmd + 2);
3995	alloc_len = get_unaligned_be32(cmd + 10);
3996
3997	if (alloc_len < 24)
3998		return 0;
3999
4000	ret = check_device_access_params(scp, lba, 1, false);
4001	if (ret)
4002		return ret;
4003
4004	if (scsi_debug_lbp()) {
4005		struct sdeb_store_info *sip = devip2sip(devip, true);
4006
4007		mapped = map_state(sip, lba, &num);
4008	} else {
4009		mapped = 1;
4010		/* following just in case virtual_gb changed */
4011		sdebug_capacity = get_sdebug_capacity();
4012		if (sdebug_capacity - lba <= 0xffffffff)
4013			num = sdebug_capacity - lba;
4014		else
4015			num = 0xffffffff;
4016	}
4017
4018	memset(arr, 0, SDEBUG_GET_LBA_STATUS_LEN);
4019	put_unaligned_be32(20, arr);		/* Parameter Data Length */
4020	put_unaligned_be64(lba, arr + 8);	/* LBA */
4021	put_unaligned_be32(num, arr + 16);	/* Number of blocks */
4022	arr[20] = !mapped;		/* prov_stat=0: mapped; 1: dealloc */
4023
4024	return fill_from_dev_buffer(scp, arr, SDEBUG_GET_LBA_STATUS_LEN);
4025}
4026
4027static int resp_sync_cache(struct scsi_cmnd *scp,
4028			   struct sdebug_dev_info *devip)
4029{
4030	int res = 0;
4031	u64 lba;
4032	u32 num_blocks;
4033	u8 *cmd = scp->cmnd;
4034
4035	if (cmd[0] == SYNCHRONIZE_CACHE) {	/* 10 byte cdb */
4036		lba = get_unaligned_be32(cmd + 2);
4037		num_blocks = get_unaligned_be16(cmd + 7);
4038	} else {				/* SYNCHRONIZE_CACHE(16) */
4039		lba = get_unaligned_be64(cmd + 2);
4040		num_blocks = get_unaligned_be32(cmd + 10);
4041	}
4042	if (lba + num_blocks > sdebug_capacity) {
4043		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4044		return check_condition_result;
4045	}
4046	if (!write_since_sync || (cmd[1] & 0x2))
4047		res = SDEG_RES_IMMED_MASK;
4048	else		/* delay if write_since_sync and IMMED clear */
4049		write_since_sync = false;
4050	return res;
4051}
4052
4053/*
4054 * Assuming the LBA+num_blocks is not out-of-range, this function will return
4055 * CONDITION MET if the specified blocks will/have fitted in the cache, and
4056 * a GOOD status otherwise. Model a disk with a big cache and yield
4057 * CONDITION MET. Actually tries to bring range in main memory into the
4058 * cache associated with the CPU(s).
4059 */
4060static int resp_pre_fetch(struct scsi_cmnd *scp,
4061			  struct sdebug_dev_info *devip)
4062{
4063	int res = 0;
4064	u64 lba;
4065	u64 block, rest = 0;
4066	u32 nblks;
4067	u8 *cmd = scp->cmnd;
4068	struct sdeb_store_info *sip = devip2sip(devip, true);
4069	rwlock_t *macc_lckp = &sip->macc_lck;
4070	u8 *fsp = sip->storep;
4071
4072	if (cmd[0] == PRE_FETCH) {	/* 10 byte cdb */
4073		lba = get_unaligned_be32(cmd + 2);
4074		nblks = get_unaligned_be16(cmd + 7);
4075	} else {			/* PRE-FETCH(16) */
4076		lba = get_unaligned_be64(cmd + 2);
4077		nblks = get_unaligned_be32(cmd + 10);
4078	}
4079	if (lba + nblks > sdebug_capacity) {
4080		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4081		return check_condition_result;
4082	}
4083	if (!fsp)
4084		goto fini;
4085	/* PRE-FETCH spec says nothing about LBP or PI so skip them */
4086	block = do_div(lba, sdebug_store_sectors);
4087	if (block + nblks > sdebug_store_sectors)
4088		rest = block + nblks - sdebug_store_sectors;
4089
4090	/* Try to bring the PRE-FETCH range into CPU's cache */
4091	read_lock(macc_lckp);
4092	prefetch_range(fsp + (sdebug_sector_size * block),
4093		       (nblks - rest) * sdebug_sector_size);
4094	if (rest)
4095		prefetch_range(fsp, rest * sdebug_sector_size);
4096	read_unlock(macc_lckp);
4097fini:
4098	if (cmd[1] & 0x2)
4099		res = SDEG_RES_IMMED_MASK;
4100	return res | condition_met_result;
4101}
4102
4103#define RL_BUCKET_ELEMS 8
4104
4105/* Even though each pseudo target has a REPORT LUNS "well known logical unit"
4106 * (W-LUN), the normal Linux scanning logic does not associate it with a
4107 * device (e.g. /dev/sg7). The following magic will make that association:
4108 *   "cd /sys/class/scsi_host/host<n> ; echo '- - 49409' > scan"
4109 * where <n> is a host number. If there are multiple targets in a host then
4110 * the above will associate a W-LUN to each target. To only get a W-LUN
4111 * for target 2, then use "echo '- 2 49409' > scan" .
4112 */
4113static int resp_report_luns(struct scsi_cmnd *scp,
4114			    struct sdebug_dev_info *devip)
4115{
4116	unsigned char *cmd = scp->cmnd;
4117	unsigned int alloc_len;
4118	unsigned char select_report;
4119	u64 lun;
4120	struct scsi_lun *lun_p;
4121	u8 arr[RL_BUCKET_ELEMS * sizeof(struct scsi_lun)];
4122	unsigned int lun_cnt;	/* normal LUN count (max: 256) */
4123	unsigned int wlun_cnt;	/* report luns W-LUN count */
4124	unsigned int tlun_cnt;	/* total LUN count */
4125	unsigned int rlen;	/* response length (in bytes) */
4126	int k, j, n, res;
4127	unsigned int off_rsp = 0;
4128	const int sz_lun = sizeof(struct scsi_lun);
4129
4130	clear_luns_changed_on_target(devip);
4131
4132	select_report = cmd[2];
4133	alloc_len = get_unaligned_be32(cmd + 6);
4134
4135	if (alloc_len < 4) {
4136		pr_err("alloc len too small %d\n", alloc_len);
4137		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
4138		return check_condition_result;
4139	}
4140
4141	switch (select_report) {
4142	case 0:		/* all LUNs apart from W-LUNs */
4143		lun_cnt = sdebug_max_luns;
4144		wlun_cnt = 0;
4145		break;
4146	case 1:		/* only W-LUNs */
4147		lun_cnt = 0;
4148		wlun_cnt = 1;
4149		break;
4150	case 2:		/* all LUNs */
4151		lun_cnt = sdebug_max_luns;
4152		wlun_cnt = 1;
4153		break;
4154	case 0x10:	/* only administrative LUs */
4155	case 0x11:	/* see SPC-5 */
4156	case 0x12:	/* only subsiduary LUs owned by referenced LU */
4157	default:
4158		pr_debug("select report invalid %d\n", select_report);
4159		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, -1);
4160		return check_condition_result;
4161	}
4162
4163	if (sdebug_no_lun_0 && (lun_cnt > 0))
4164		--lun_cnt;
4165
4166	tlun_cnt = lun_cnt + wlun_cnt;
4167	rlen = tlun_cnt * sz_lun;	/* excluding 8 byte header */
4168	scsi_set_resid(scp, scsi_bufflen(scp));
4169	pr_debug("select_report %d luns = %d wluns = %d no_lun0 %d\n",
4170		 select_report, lun_cnt, wlun_cnt, sdebug_no_lun_0);
4171
4172	/* loops rely on sizeof response header same as sizeof lun (both 8) */
4173	lun = sdebug_no_lun_0 ? 1 : 0;
4174	for (k = 0, j = 0, res = 0; true; ++k, j = 0) {
4175		memset(arr, 0, sizeof(arr));
4176		lun_p = (struct scsi_lun *)&arr[0];
4177		if (k == 0) {
4178			put_unaligned_be32(rlen, &arr[0]);
4179			++lun_p;
4180			j = 1;
4181		}
4182		for ( ; j < RL_BUCKET_ELEMS; ++j, ++lun_p) {
4183			if ((k * RL_BUCKET_ELEMS) + j > lun_cnt)
4184				break;
4185			int_to_scsilun(lun++, lun_p);
4186			if (lun > 1 && sdebug_lun_am == SAM_LUN_AM_FLAT)
4187				lun_p->scsi_lun[0] |= 0x40;
4188		}
4189		if (j < RL_BUCKET_ELEMS)
4190			break;
4191		n = j * sz_lun;
4192		res = p_fill_from_dev_buffer(scp, arr, n, off_rsp);
4193		if (res)
4194			return res;
4195		off_rsp += n;
4196	}
4197	if (wlun_cnt) {
4198		int_to_scsilun(SCSI_W_LUN_REPORT_LUNS, lun_p);
4199		++j;
4200	}
4201	if (j > 0)
4202		res = p_fill_from_dev_buffer(scp, arr, j * sz_lun, off_rsp);
4203	return res;
4204}
4205
4206static int resp_verify(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
4207{
4208	bool is_bytchk3 = false;
4209	u8 bytchk;
4210	int ret, j;
4211	u32 vnum, a_num, off;
4212	const u32 lb_size = sdebug_sector_size;
4213	u64 lba;
4214	u8 *arr;
4215	u8 *cmd = scp->cmnd;
4216	struct sdeb_store_info *sip = devip2sip(devip, true);
4217	rwlock_t *macc_lckp = &sip->macc_lck;
4218
4219	bytchk = (cmd[1] >> 1) & 0x3;
4220	if (bytchk == 0) {
4221		return 0;	/* always claim internal verify okay */
4222	} else if (bytchk == 2) {
4223		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 2);
4224		return check_condition_result;
4225	} else if (bytchk == 3) {
4226		is_bytchk3 = true;	/* 1 block sent, compared repeatedly */
4227	}
4228	switch (cmd[0]) {
4229	case VERIFY_16:
4230		lba = get_unaligned_be64(cmd + 2);
4231		vnum = get_unaligned_be32(cmd + 10);
4232		break;
4233	case VERIFY:		/* is VERIFY(10) */
4234		lba = get_unaligned_be32(cmd + 2);
4235		vnum = get_unaligned_be16(cmd + 7);
4236		break;
4237	default:
4238		mk_sense_invalid_opcode(scp);
4239		return check_condition_result;
4240	}
4241	a_num = is_bytchk3 ? 1 : vnum;
4242	/* Treat following check like one for read (i.e. no write) access */
4243	ret = check_device_access_params(scp, lba, a_num, false);
4244	if (ret)
4245		return ret;
4246
4247	arr = kcalloc(lb_size, vnum, GFP_ATOMIC);
4248	if (!arr) {
4249		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
4250				INSUFF_RES_ASCQ);
4251		return check_condition_result;
4252	}
4253	/* Not changing store, so only need read access */
4254	read_lock(macc_lckp);
4255
4256	ret = do_dout_fetch(scp, a_num, arr);
4257	if (ret == -1) {
4258		ret = DID_ERROR << 16;
4259		goto cleanup;
4260	} else if (sdebug_verbose && (ret < (a_num * lb_size))) {
4261		sdev_printk(KERN_INFO, scp->device,
4262			    "%s: %s: cdb indicated=%u, IO sent=%d bytes\n",
4263			    my_name, __func__, a_num * lb_size, ret);
4264	}
4265	if (is_bytchk3) {
4266		for (j = 1, off = lb_size; j < vnum; ++j, off += lb_size)
4267			memcpy(arr + off, arr, lb_size);
4268	}
4269	ret = 0;
4270	if (!comp_write_worker(sip, lba, vnum, arr, true)) {
4271		mk_sense_buffer(scp, MISCOMPARE, MISCOMPARE_VERIFY_ASC, 0);
4272		ret = check_condition_result;
4273		goto cleanup;
4274	}
4275cleanup:
4276	read_unlock(macc_lckp);
4277	kfree(arr);
4278	return ret;
4279}
4280
4281#define RZONES_DESC_HD 64
4282
4283/* Report zones depending on start LBA nad reporting options */
4284static int resp_report_zones(struct scsi_cmnd *scp,
4285			     struct sdebug_dev_info *devip)
4286{
4287	unsigned int i, max_zones, rep_max_zones, nrz = 0;
4288	int ret = 0;
4289	u32 alloc_len, rep_opts, rep_len;
4290	bool partial;
4291	u64 lba, zs_lba;
4292	u8 *arr = NULL, *desc;
4293	u8 *cmd = scp->cmnd;
4294	struct sdeb_zone_state *zsp;
4295	struct sdeb_store_info *sip = devip2sip(devip, false);
4296	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
4297
4298	if (!sdebug_dev_is_zoned(devip)) {
4299		mk_sense_invalid_opcode(scp);
4300		return check_condition_result;
4301	}
4302	zs_lba = get_unaligned_be64(cmd + 2);
4303	alloc_len = get_unaligned_be32(cmd + 10);
4304	rep_opts = cmd[14] & 0x3f;
4305	partial = cmd[14] & 0x80;
4306
4307	if (zs_lba >= sdebug_capacity) {
4308		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4309		return check_condition_result;
4310	}
4311
4312	max_zones = devip->nr_zones - (zs_lba >> devip->zsize_shift);
4313	rep_max_zones = min((alloc_len - 64) >> ilog2(RZONES_DESC_HD),
4314			    max_zones);
4315
4316	arr = kcalloc(RZONES_DESC_HD, alloc_len, GFP_ATOMIC);
4317	if (!arr) {
4318		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
4319				INSUFF_RES_ASCQ);
4320		return check_condition_result;
4321	}
4322
4323	read_lock(macc_lckp);
4324
4325	desc = arr + 64;
4326	for (i = 0; i < max_zones; i++) {
4327		lba = zs_lba + devip->zsize * i;
4328		if (lba > sdebug_capacity)
4329			break;
4330		zsp = zbc_zone(devip, lba);
4331		switch (rep_opts) {
4332		case 0x00:
4333			/* All zones */
4334			break;
4335		case 0x01:
4336			/* Empty zones */
4337			if (zsp->z_cond != ZC1_EMPTY)
4338				continue;
4339			break;
4340		case 0x02:
4341			/* Implicit open zones */
4342			if (zsp->z_cond != ZC2_IMPLICIT_OPEN)
4343				continue;
4344			break;
4345		case 0x03:
4346			/* Explicit open zones */
4347			if (zsp->z_cond != ZC3_EXPLICIT_OPEN)
4348				continue;
4349			break;
4350		case 0x04:
4351			/* Closed zones */
4352			if (zsp->z_cond != ZC4_CLOSED)
4353				continue;
4354			break;
4355		case 0x05:
4356			/* Full zones */
4357			if (zsp->z_cond != ZC5_FULL)
4358				continue;
4359			break;
4360		case 0x06:
4361		case 0x07:
4362		case 0x10:
4363			/*
4364			 * Read-only, offline, reset WP recommended are
4365			 * not emulated: no zones to report;
4366			 */
4367			continue;
4368		case 0x11:
4369			/* non-seq-resource set */
4370			if (!zsp->z_non_seq_resource)
4371				continue;
4372			break;
4373		case 0x3f:
4374			/* Not write pointer (conventional) zones */
4375			if (!zbc_zone_is_conv(zsp))
4376				continue;
4377			break;
4378		default:
4379			mk_sense_buffer(scp, ILLEGAL_REQUEST,
4380					INVALID_FIELD_IN_CDB, 0);
4381			ret = check_condition_result;
4382			goto fini;
4383		}
4384
4385		if (nrz < rep_max_zones) {
4386			/* Fill zone descriptor */
4387			desc[0] = zsp->z_type;
4388			desc[1] = zsp->z_cond << 4;
4389			if (zsp->z_non_seq_resource)
4390				desc[1] |= 1 << 1;
4391			put_unaligned_be64((u64)zsp->z_size, desc + 8);
4392			put_unaligned_be64((u64)zsp->z_start, desc + 16);
4393			put_unaligned_be64((u64)zsp->z_wp, desc + 24);
4394			desc += 64;
4395		}
4396
4397		if (partial && nrz >= rep_max_zones)
4398			break;
4399
4400		nrz++;
4401	}
4402
4403	/* Report header */
4404	put_unaligned_be32(nrz * RZONES_DESC_HD, arr + 0);
4405	put_unaligned_be64(sdebug_capacity - 1, arr + 8);
4406
4407	rep_len = (unsigned long)desc - (unsigned long)arr;
4408	ret = fill_from_dev_buffer(scp, arr, min_t(int, alloc_len, rep_len));
4409
4410fini:
4411	read_unlock(macc_lckp);
4412	kfree(arr);
4413	return ret;
4414}
4415
4416/* Logic transplanted from tcmu-runner, file_zbc.c */
4417static void zbc_open_all(struct sdebug_dev_info *devip)
4418{
4419	struct sdeb_zone_state *zsp = &devip->zstate[0];
4420	unsigned int i;
4421
4422	for (i = 0; i < devip->nr_zones; i++, zsp++) {
4423		if (zsp->z_cond == ZC4_CLOSED)
4424			zbc_open_zone(devip, &devip->zstate[i], true);
4425	}
4426}
4427
4428static int resp_open_zone(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
4429{
4430	int res = 0;
4431	u64 z_id;
4432	enum sdebug_z_cond zc;
4433	u8 *cmd = scp->cmnd;
4434	struct sdeb_zone_state *zsp;
4435	bool all = cmd[14] & 0x01;
4436	struct sdeb_store_info *sip = devip2sip(devip, false);
4437	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
4438
4439	if (!sdebug_dev_is_zoned(devip)) {
4440		mk_sense_invalid_opcode(scp);
4441		return check_condition_result;
4442	}
4443
4444	write_lock(macc_lckp);
4445
4446	if (all) {
4447		/* Check if all closed zones can be open */
4448		if (devip->max_open &&
4449		    devip->nr_exp_open + devip->nr_closed > devip->max_open) {
4450			mk_sense_buffer(scp, DATA_PROTECT, INSUFF_RES_ASC,
4451					INSUFF_ZONE_ASCQ);
4452			res = check_condition_result;
4453			goto fini;
4454		}
4455		/* Open all closed zones */
4456		zbc_open_all(devip);
4457		goto fini;
4458	}
4459
4460	/* Open the specified zone */
4461	z_id = get_unaligned_be64(cmd + 2);
4462	if (z_id >= sdebug_capacity) {
4463		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4464		res = check_condition_result;
4465		goto fini;
4466	}
4467
4468	zsp = zbc_zone(devip, z_id);
4469	if (z_id != zsp->z_start) {
4470		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4471		res = check_condition_result;
4472		goto fini;
4473	}
4474	if (zbc_zone_is_conv(zsp)) {
4475		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4476		res = check_condition_result;
4477		goto fini;
4478	}
4479
4480	zc = zsp->z_cond;
4481	if (zc == ZC3_EXPLICIT_OPEN || zc == ZC5_FULL)
4482		goto fini;
4483
4484	if (devip->max_open && devip->nr_exp_open >= devip->max_open) {
4485		mk_sense_buffer(scp, DATA_PROTECT, INSUFF_RES_ASC,
4486				INSUFF_ZONE_ASCQ);
4487		res = check_condition_result;
4488		goto fini;
4489	}
4490
4491	zbc_open_zone(devip, zsp, true);
4492fini:
4493	write_unlock(macc_lckp);
4494	return res;
4495}
4496
4497static void zbc_close_all(struct sdebug_dev_info *devip)
4498{
4499	unsigned int i;
4500
4501	for (i = 0; i < devip->nr_zones; i++)
4502		zbc_close_zone(devip, &devip->zstate[i]);
4503}
4504
4505static int resp_close_zone(struct scsi_cmnd *scp,
4506			   struct sdebug_dev_info *devip)
4507{
4508	int res = 0;
4509	u64 z_id;
4510	u8 *cmd = scp->cmnd;
4511	struct sdeb_zone_state *zsp;
4512	bool all = cmd[14] & 0x01;
4513	struct sdeb_store_info *sip = devip2sip(devip, false);
4514	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
4515
4516	if (!sdebug_dev_is_zoned(devip)) {
4517		mk_sense_invalid_opcode(scp);
4518		return check_condition_result;
4519	}
4520
4521	write_lock(macc_lckp);
4522
4523	if (all) {
4524		zbc_close_all(devip);
4525		goto fini;
4526	}
4527
4528	/* Close specified zone */
4529	z_id = get_unaligned_be64(cmd + 2);
4530	if (z_id >= sdebug_capacity) {
4531		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4532		res = check_condition_result;
4533		goto fini;
4534	}
4535
4536	zsp = zbc_zone(devip, z_id);
4537	if (z_id != zsp->z_start) {
4538		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4539		res = check_condition_result;
4540		goto fini;
4541	}
4542	if (zbc_zone_is_conv(zsp)) {
4543		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4544		res = check_condition_result;
4545		goto fini;
4546	}
4547
4548	zbc_close_zone(devip, zsp);
4549fini:
4550	write_unlock(macc_lckp);
4551	return res;
4552}
4553
4554static void zbc_finish_zone(struct sdebug_dev_info *devip,
4555			    struct sdeb_zone_state *zsp, bool empty)
4556{
4557	enum sdebug_z_cond zc = zsp->z_cond;
4558
4559	if (zc == ZC4_CLOSED || zc == ZC2_IMPLICIT_OPEN ||
4560	    zc == ZC3_EXPLICIT_OPEN || (empty && zc == ZC1_EMPTY)) {
4561		if (zc == ZC2_IMPLICIT_OPEN || zc == ZC3_EXPLICIT_OPEN)
4562			zbc_close_zone(devip, zsp);
4563		if (zsp->z_cond == ZC4_CLOSED)
4564			devip->nr_closed--;
4565		zsp->z_wp = zsp->z_start + zsp->z_size;
4566		zsp->z_cond = ZC5_FULL;
4567	}
4568}
4569
4570static void zbc_finish_all(struct sdebug_dev_info *devip)
4571{
4572	unsigned int i;
4573
4574	for (i = 0; i < devip->nr_zones; i++)
4575		zbc_finish_zone(devip, &devip->zstate[i], false);
4576}
4577
4578static int resp_finish_zone(struct scsi_cmnd *scp,
4579			    struct sdebug_dev_info *devip)
4580{
4581	struct sdeb_zone_state *zsp;
4582	int res = 0;
4583	u64 z_id;
4584	u8 *cmd = scp->cmnd;
4585	bool all = cmd[14] & 0x01;
4586	struct sdeb_store_info *sip = devip2sip(devip, false);
4587	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
4588
4589	if (!sdebug_dev_is_zoned(devip)) {
4590		mk_sense_invalid_opcode(scp);
4591		return check_condition_result;
4592	}
4593
4594	write_lock(macc_lckp);
4595
4596	if (all) {
4597		zbc_finish_all(devip);
4598		goto fini;
4599	}
4600
4601	/* Finish the specified zone */
4602	z_id = get_unaligned_be64(cmd + 2);
4603	if (z_id >= sdebug_capacity) {
4604		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4605		res = check_condition_result;
4606		goto fini;
4607	}
4608
4609	zsp = zbc_zone(devip, z_id);
4610	if (z_id != zsp->z_start) {
4611		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4612		res = check_condition_result;
4613		goto fini;
4614	}
4615	if (zbc_zone_is_conv(zsp)) {
4616		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4617		res = check_condition_result;
4618		goto fini;
4619	}
4620
4621	zbc_finish_zone(devip, zsp, true);
4622fini:
4623	write_unlock(macc_lckp);
4624	return res;
4625}
4626
4627static void zbc_rwp_zone(struct sdebug_dev_info *devip,
4628			 struct sdeb_zone_state *zsp)
4629{
4630	enum sdebug_z_cond zc;
4631
4632	if (zbc_zone_is_conv(zsp))
4633		return;
4634
4635	zc = zsp->z_cond;
4636	if (zc == ZC2_IMPLICIT_OPEN || zc == ZC3_EXPLICIT_OPEN)
4637		zbc_close_zone(devip, zsp);
4638
4639	if (zsp->z_cond == ZC4_CLOSED)
4640		devip->nr_closed--;
4641
4642	zsp->z_non_seq_resource = false;
4643	zsp->z_wp = zsp->z_start;
4644	zsp->z_cond = ZC1_EMPTY;
4645}
4646
4647static void zbc_rwp_all(struct sdebug_dev_info *devip)
4648{
4649	unsigned int i;
4650
4651	for (i = 0; i < devip->nr_zones; i++)
4652		zbc_rwp_zone(devip, &devip->zstate[i]);
4653}
4654
4655static int resp_rwp_zone(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
4656{
4657	struct sdeb_zone_state *zsp;
4658	int res = 0;
4659	u64 z_id;
4660	u8 *cmd = scp->cmnd;
4661	bool all = cmd[14] & 0x01;
4662	struct sdeb_store_info *sip = devip2sip(devip, false);
4663	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
4664
4665	if (!sdebug_dev_is_zoned(devip)) {
4666		mk_sense_invalid_opcode(scp);
4667		return check_condition_result;
4668	}
4669
4670	write_lock(macc_lckp);
4671
4672	if (all) {
4673		zbc_rwp_all(devip);
4674		goto fini;
4675	}
4676
4677	z_id = get_unaligned_be64(cmd + 2);
4678	if (z_id >= sdebug_capacity) {
4679		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4680		res = check_condition_result;
4681		goto fini;
4682	}
4683
4684	zsp = zbc_zone(devip, z_id);
4685	if (z_id != zsp->z_start) {
4686		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4687		res = check_condition_result;
4688		goto fini;
4689	}
4690	if (zbc_zone_is_conv(zsp)) {
4691		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4692		res = check_condition_result;
4693		goto fini;
4694	}
4695
4696	zbc_rwp_zone(devip, zsp);
4697fini:
4698	write_unlock(macc_lckp);
4699	return res;
4700}
4701
4702static struct sdebug_queue *get_queue(struct scsi_cmnd *cmnd)
4703{
4704	u16 hwq;
4705	u32 tag = blk_mq_unique_tag(cmnd->request);
4706
4707	hwq = blk_mq_unique_tag_to_hwq(tag);
 
 
 
 
4708
4709	pr_debug("tag=%#x, hwq=%d\n", tag, hwq);
4710	if (WARN_ON_ONCE(hwq >= submit_queues))
4711		hwq = 0;
4712
 
 
 
 
4713	return sdebug_q_arr + hwq;
4714}
4715
4716static u32 get_tag(struct scsi_cmnd *cmnd)
4717{
4718	return blk_mq_unique_tag(cmnd->request);
4719}
4720
4721/* Queued (deferred) command completions converge here. */
4722static void sdebug_q_cmd_complete(struct sdebug_defer *sd_dp)
4723{
4724	bool aborted = sd_dp->aborted;
4725	int qc_idx;
4726	int retiring = 0;
4727	unsigned long iflags;
4728	struct sdebug_queue *sqp;
4729	struct sdebug_queued_cmd *sqcp;
4730	struct scsi_cmnd *scp;
4731	struct sdebug_dev_info *devip;
4732
 
4733	if (unlikely(aborted))
4734		sd_dp->aborted = false;
4735	qc_idx = sd_dp->qc_idx;
4736	sqp = sdebug_q_arr + sd_dp->sqa_idx;
4737	if (sdebug_statistics) {
4738		atomic_inc(&sdebug_completions);
4739		if (raw_smp_processor_id() != sd_dp->issuing_cpu)
4740			atomic_inc(&sdebug_miss_cpus);
4741	}
4742	if (unlikely((qc_idx < 0) || (qc_idx >= SDEBUG_CANQUEUE))) {
4743		pr_err("wild qc_idx=%d\n", qc_idx);
4744		return;
4745	}
4746	spin_lock_irqsave(&sqp->qc_lock, iflags);
4747	sd_dp->defer_t = SDEB_DEFER_NONE;
4748	sqcp = &sqp->qc_arr[qc_idx];
4749	scp = sqcp->a_cmnd;
4750	if (unlikely(scp == NULL)) {
4751		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4752		pr_err("scp is NULL, sqa_idx=%d, qc_idx=%d, hc_idx=%d\n",
4753		       sd_dp->sqa_idx, qc_idx, sd_dp->hc_idx);
4754		return;
4755	}
4756	devip = (struct sdebug_dev_info *)scp->device->hostdata;
4757	if (likely(devip))
4758		atomic_dec(&devip->num_in_q);
4759	else
4760		pr_err("devip=NULL\n");
4761	if (unlikely(atomic_read(&retired_max_queue) > 0))
4762		retiring = 1;
4763
4764	sqcp->a_cmnd = NULL;
4765	if (unlikely(!test_and_clear_bit(qc_idx, sqp->in_use_bm))) {
4766		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4767		pr_err("Unexpected completion\n");
4768		return;
4769	}
4770
4771	if (unlikely(retiring)) {	/* user has reduced max_queue */
4772		int k, retval;
4773
4774		retval = atomic_read(&retired_max_queue);
4775		if (qc_idx >= retval) {
4776			spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4777			pr_err("index %d too large\n", retval);
4778			return;
4779		}
4780		k = find_last_bit(sqp->in_use_bm, retval);
4781		if ((k < sdebug_max_queue) || (k == retval))
4782			atomic_set(&retired_max_queue, 0);
4783		else
4784			atomic_set(&retired_max_queue, k + 1);
4785	}
4786	spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4787	if (unlikely(aborted)) {
4788		if (sdebug_verbose)
4789			pr_info("bypassing scsi_done() due to aborted cmd\n");
4790		return;
4791	}
4792	scp->scsi_done(scp); /* callback to mid level */
4793}
4794
4795/* When high resolution timer goes off this function is called. */
4796static enum hrtimer_restart sdebug_q_cmd_hrt_complete(struct hrtimer *timer)
4797{
4798	struct sdebug_defer *sd_dp = container_of(timer, struct sdebug_defer,
4799						  hrt);
4800	sdebug_q_cmd_complete(sd_dp);
4801	return HRTIMER_NORESTART;
4802}
4803
4804/* When work queue schedules work, it calls this function. */
4805static void sdebug_q_cmd_wq_complete(struct work_struct *work)
4806{
4807	struct sdebug_defer *sd_dp = container_of(work, struct sdebug_defer,
4808						  ew.work);
4809	sdebug_q_cmd_complete(sd_dp);
4810}
4811
4812static bool got_shared_uuid;
4813static uuid_t shared_uuid;
4814
4815static int sdebug_device_create_zones(struct sdebug_dev_info *devip)
4816{
4817	struct sdeb_zone_state *zsp;
4818	sector_t capacity = get_sdebug_capacity();
4819	sector_t zstart = 0;
4820	unsigned int i;
4821
4822	/*
4823	 * Set the zone size: if sdeb_zbc_zone_size_mb is not set, figure out
4824	 * a zone size allowing for at least 4 zones on the device. Otherwise,
4825	 * use the specified zone size checking that at least 2 zones can be
4826	 * created for the device.
4827	 */
4828	if (!sdeb_zbc_zone_size_mb) {
4829		devip->zsize = (DEF_ZBC_ZONE_SIZE_MB * SZ_1M)
4830			>> ilog2(sdebug_sector_size);
4831		while (capacity < devip->zsize << 2 && devip->zsize >= 2)
4832			devip->zsize >>= 1;
4833		if (devip->zsize < 2) {
4834			pr_err("Device capacity too small\n");
4835			return -EINVAL;
4836		}
4837	} else {
4838		if (!is_power_of_2(sdeb_zbc_zone_size_mb)) {
4839			pr_err("Zone size is not a power of 2\n");
4840			return -EINVAL;
4841		}
4842		devip->zsize = (sdeb_zbc_zone_size_mb * SZ_1M)
4843			>> ilog2(sdebug_sector_size);
4844		if (devip->zsize >= capacity) {
4845			pr_err("Zone size too large for device capacity\n");
4846			return -EINVAL;
4847		}
4848	}
4849
4850	devip->zsize_shift = ilog2(devip->zsize);
4851	devip->nr_zones = (capacity + devip->zsize - 1) >> devip->zsize_shift;
4852
4853	if (sdeb_zbc_nr_conv >= devip->nr_zones) {
4854		pr_err("Number of conventional zones too large\n");
4855		return -EINVAL;
4856	}
4857	devip->nr_conv_zones = sdeb_zbc_nr_conv;
4858
4859	if (devip->zmodel == BLK_ZONED_HM) {
4860		/* zbc_max_open_zones can be 0, meaning "not reported" */
4861		if (sdeb_zbc_max_open >= devip->nr_zones - 1)
4862			devip->max_open = (devip->nr_zones - 1) / 2;
4863		else
4864			devip->max_open = sdeb_zbc_max_open;
4865	}
4866
4867	devip->zstate = kcalloc(devip->nr_zones,
4868				sizeof(struct sdeb_zone_state), GFP_KERNEL);
4869	if (!devip->zstate)
4870		return -ENOMEM;
4871
4872	for (i = 0; i < devip->nr_zones; i++) {
4873		zsp = &devip->zstate[i];
4874
4875		zsp->z_start = zstart;
4876
4877		if (i < devip->nr_conv_zones) {
4878			zsp->z_type = ZBC_ZONE_TYPE_CNV;
4879			zsp->z_cond = ZBC_NOT_WRITE_POINTER;
4880			zsp->z_wp = (sector_t)-1;
4881		} else {
4882			if (devip->zmodel == BLK_ZONED_HM)
4883				zsp->z_type = ZBC_ZONE_TYPE_SWR;
4884			else
4885				zsp->z_type = ZBC_ZONE_TYPE_SWP;
4886			zsp->z_cond = ZC1_EMPTY;
4887			zsp->z_wp = zsp->z_start;
4888		}
4889
4890		if (zsp->z_start + devip->zsize < capacity)
4891			zsp->z_size = devip->zsize;
4892		else
4893			zsp->z_size = capacity - zsp->z_start;
4894
4895		zstart += zsp->z_size;
4896	}
4897
4898	return 0;
4899}
4900
4901static struct sdebug_dev_info *sdebug_device_create(
4902			struct sdebug_host_info *sdbg_host, gfp_t flags)
4903{
4904	struct sdebug_dev_info *devip;
4905
4906	devip = kzalloc(sizeof(*devip), flags);
4907	if (devip) {
4908		if (sdebug_uuid_ctl == 1)
4909			uuid_gen(&devip->lu_name);
4910		else if (sdebug_uuid_ctl == 2) {
4911			if (got_shared_uuid)
4912				devip->lu_name = shared_uuid;
4913			else {
4914				uuid_gen(&shared_uuid);
4915				got_shared_uuid = true;
4916				devip->lu_name = shared_uuid;
4917			}
4918		}
4919		devip->sdbg_host = sdbg_host;
4920		if (sdeb_zbc_in_use) {
4921			devip->zmodel = sdeb_zbc_model;
4922			if (sdebug_device_create_zones(devip)) {
4923				kfree(devip);
4924				return NULL;
4925			}
4926		} else {
4927			devip->zmodel = BLK_ZONED_NONE;
4928		}
4929		devip->sdbg_host = sdbg_host;
4930		devip->create_ts = ktime_get_boottime();
4931		atomic_set(&devip->stopped, (sdeb_tur_ms_to_ready > 0 ? 2 : 0));
4932		list_add_tail(&devip->dev_list, &sdbg_host->dev_info_list);
4933	}
4934	return devip;
4935}
4936
4937static struct sdebug_dev_info *find_build_dev_info(struct scsi_device *sdev)
4938{
4939	struct sdebug_host_info *sdbg_host;
4940	struct sdebug_dev_info *open_devip = NULL;
4941	struct sdebug_dev_info *devip;
4942
4943	sdbg_host = *(struct sdebug_host_info **)shost_priv(sdev->host);
4944	if (!sdbg_host) {
4945		pr_err("Host info NULL\n");
4946		return NULL;
4947	}
4948
4949	list_for_each_entry(devip, &sdbg_host->dev_info_list, dev_list) {
4950		if ((devip->used) && (devip->channel == sdev->channel) &&
4951		    (devip->target == sdev->id) &&
4952		    (devip->lun == sdev->lun))
4953			return devip;
4954		else {
4955			if ((!devip->used) && (!open_devip))
4956				open_devip = devip;
4957		}
4958	}
4959	if (!open_devip) { /* try and make a new one */
4960		open_devip = sdebug_device_create(sdbg_host, GFP_ATOMIC);
4961		if (!open_devip) {
4962			pr_err("out of memory at line %d\n", __LINE__);
4963			return NULL;
4964		}
4965	}
4966
4967	open_devip->channel = sdev->channel;
4968	open_devip->target = sdev->id;
4969	open_devip->lun = sdev->lun;
4970	open_devip->sdbg_host = sdbg_host;
4971	atomic_set(&open_devip->num_in_q, 0);
4972	set_bit(SDEBUG_UA_POR, open_devip->uas_bm);
4973	open_devip->used = true;
4974	return open_devip;
4975}
4976
4977static int scsi_debug_slave_alloc(struct scsi_device *sdp)
4978{
4979	if (sdebug_verbose)
4980		pr_info("slave_alloc <%u %u %u %llu>\n",
4981		       sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
4982	return 0;
4983}
4984
4985static int scsi_debug_slave_configure(struct scsi_device *sdp)
4986{
4987	struct sdebug_dev_info *devip =
4988			(struct sdebug_dev_info *)sdp->hostdata;
4989
4990	if (sdebug_verbose)
4991		pr_info("slave_configure <%u %u %u %llu>\n",
4992		       sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
4993	if (sdp->host->max_cmd_len != SDEBUG_MAX_CMD_LEN)
4994		sdp->host->max_cmd_len = SDEBUG_MAX_CMD_LEN;
4995	if (devip == NULL) {
4996		devip = find_build_dev_info(sdp);
4997		if (devip == NULL)
4998			return 1;  /* no resources, will be marked offline */
4999	}
5000	sdp->hostdata = devip;
5001	if (sdebug_no_uld)
5002		sdp->no_uld_attach = 1;
5003	config_cdb_len(sdp);
5004	return 0;
5005}
5006
5007static void scsi_debug_slave_destroy(struct scsi_device *sdp)
5008{
5009	struct sdebug_dev_info *devip =
5010		(struct sdebug_dev_info *)sdp->hostdata;
5011
5012	if (sdebug_verbose)
5013		pr_info("slave_destroy <%u %u %u %llu>\n",
5014		       sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
5015	if (devip) {
5016		/* make this slot available for re-use */
5017		devip->used = false;
5018		sdp->hostdata = NULL;
5019	}
5020}
5021
5022static void stop_qc_helper(struct sdebug_defer *sd_dp,
5023			   enum sdeb_defer_type defer_t)
5024{
5025	if (!sd_dp)
5026		return;
5027	if (defer_t == SDEB_DEFER_HRT)
5028		hrtimer_cancel(&sd_dp->hrt);
5029	else if (defer_t == SDEB_DEFER_WQ)
5030		cancel_work_sync(&sd_dp->ew.work);
5031}
5032
5033/* If @cmnd found deletes its timer or work queue and returns true; else
5034   returns false */
5035static bool stop_queued_cmnd(struct scsi_cmnd *cmnd)
5036{
5037	unsigned long iflags;
5038	int j, k, qmax, r_qmax;
5039	enum sdeb_defer_type l_defer_t;
5040	struct sdebug_queue *sqp;
5041	struct sdebug_queued_cmd *sqcp;
5042	struct sdebug_dev_info *devip;
5043	struct sdebug_defer *sd_dp;
5044
5045	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
5046		spin_lock_irqsave(&sqp->qc_lock, iflags);
5047		qmax = sdebug_max_queue;
5048		r_qmax = atomic_read(&retired_max_queue);
5049		if (r_qmax > qmax)
5050			qmax = r_qmax;
5051		for (k = 0; k < qmax; ++k) {
5052			if (test_bit(k, sqp->in_use_bm)) {
5053				sqcp = &sqp->qc_arr[k];
5054				if (cmnd != sqcp->a_cmnd)
5055					continue;
5056				/* found */
5057				devip = (struct sdebug_dev_info *)
5058						cmnd->device->hostdata;
5059				if (devip)
5060					atomic_dec(&devip->num_in_q);
5061				sqcp->a_cmnd = NULL;
5062				sd_dp = sqcp->sd_dp;
5063				if (sd_dp) {
5064					l_defer_t = sd_dp->defer_t;
5065					sd_dp->defer_t = SDEB_DEFER_NONE;
5066				} else
5067					l_defer_t = SDEB_DEFER_NONE;
5068				spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5069				stop_qc_helper(sd_dp, l_defer_t);
5070				clear_bit(k, sqp->in_use_bm);
5071				return true;
5072			}
5073		}
5074		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5075	}
5076	return false;
5077}
5078
5079/* Deletes (stops) timers or work queues of all queued commands */
5080static void stop_all_queued(void)
5081{
5082	unsigned long iflags;
5083	int j, k;
5084	enum sdeb_defer_type l_defer_t;
5085	struct sdebug_queue *sqp;
5086	struct sdebug_queued_cmd *sqcp;
5087	struct sdebug_dev_info *devip;
5088	struct sdebug_defer *sd_dp;
5089
5090	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
5091		spin_lock_irqsave(&sqp->qc_lock, iflags);
5092		for (k = 0; k < SDEBUG_CANQUEUE; ++k) {
5093			if (test_bit(k, sqp->in_use_bm)) {
5094				sqcp = &sqp->qc_arr[k];
5095				if (sqcp->a_cmnd == NULL)
5096					continue;
5097				devip = (struct sdebug_dev_info *)
5098					sqcp->a_cmnd->device->hostdata;
5099				if (devip)
5100					atomic_dec(&devip->num_in_q);
5101				sqcp->a_cmnd = NULL;
5102				sd_dp = sqcp->sd_dp;
5103				if (sd_dp) {
5104					l_defer_t = sd_dp->defer_t;
5105					sd_dp->defer_t = SDEB_DEFER_NONE;
5106				} else
5107					l_defer_t = SDEB_DEFER_NONE;
5108				spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5109				stop_qc_helper(sd_dp, l_defer_t);
5110				clear_bit(k, sqp->in_use_bm);
5111				spin_lock_irqsave(&sqp->qc_lock, iflags);
5112			}
5113		}
5114		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5115	}
5116}
5117
5118/* Free queued command memory on heap */
5119static void free_all_queued(void)
5120{
5121	int j, k;
5122	struct sdebug_queue *sqp;
5123	struct sdebug_queued_cmd *sqcp;
5124
5125	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
5126		for (k = 0; k < SDEBUG_CANQUEUE; ++k) {
5127			sqcp = &sqp->qc_arr[k];
5128			kfree(sqcp->sd_dp);
5129			sqcp->sd_dp = NULL;
5130		}
5131	}
5132}
5133
5134static int scsi_debug_abort(struct scsi_cmnd *SCpnt)
5135{
5136	bool ok;
5137
5138	++num_aborts;
5139	if (SCpnt) {
5140		ok = stop_queued_cmnd(SCpnt);
5141		if (SCpnt->device && (SDEBUG_OPT_ALL_NOISE & sdebug_opts))
5142			sdev_printk(KERN_INFO, SCpnt->device,
5143				    "%s: command%s found\n", __func__,
5144				    ok ? "" : " not");
5145	}
5146	return SUCCESS;
5147}
5148
5149static int scsi_debug_device_reset(struct scsi_cmnd *SCpnt)
5150{
5151	++num_dev_resets;
5152	if (SCpnt && SCpnt->device) {
5153		struct scsi_device *sdp = SCpnt->device;
5154		struct sdebug_dev_info *devip =
5155				(struct sdebug_dev_info *)sdp->hostdata;
5156
5157		if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5158			sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
5159		if (devip)
5160			set_bit(SDEBUG_UA_POR, devip->uas_bm);
5161	}
5162	return SUCCESS;
5163}
5164
5165static int scsi_debug_target_reset(struct scsi_cmnd *SCpnt)
5166{
5167	struct sdebug_host_info *sdbg_host;
5168	struct sdebug_dev_info *devip;
5169	struct scsi_device *sdp;
5170	struct Scsi_Host *hp;
5171	int k = 0;
5172
5173	++num_target_resets;
5174	if (!SCpnt)
5175		goto lie;
5176	sdp = SCpnt->device;
5177	if (!sdp)
5178		goto lie;
5179	if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5180		sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
5181	hp = sdp->host;
5182	if (!hp)
5183		goto lie;
5184	sdbg_host = *(struct sdebug_host_info **)shost_priv(hp);
5185	if (sdbg_host) {
5186		list_for_each_entry(devip,
5187				    &sdbg_host->dev_info_list,
5188				    dev_list)
5189			if (devip->target == sdp->id) {
5190				set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
5191				++k;
5192			}
5193	}
5194	if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
5195		sdev_printk(KERN_INFO, sdp,
5196			    "%s: %d device(s) found in target\n", __func__, k);
5197lie:
5198	return SUCCESS;
5199}
5200
5201static int scsi_debug_bus_reset(struct scsi_cmnd *SCpnt)
5202{
5203	struct sdebug_host_info *sdbg_host;
5204	struct sdebug_dev_info *devip;
5205	struct scsi_device *sdp;
5206	struct Scsi_Host *hp;
5207	int k = 0;
5208
5209	++num_bus_resets;
5210	if (!(SCpnt && SCpnt->device))
5211		goto lie;
5212	sdp = SCpnt->device;
5213	if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5214		sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
5215	hp = sdp->host;
5216	if (hp) {
5217		sdbg_host = *(struct sdebug_host_info **)shost_priv(hp);
5218		if (sdbg_host) {
5219			list_for_each_entry(devip,
5220					    &sdbg_host->dev_info_list,
5221					    dev_list) {
5222				set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
5223				++k;
5224			}
5225		}
5226	}
5227	if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
5228		sdev_printk(KERN_INFO, sdp,
5229			    "%s: %d device(s) found in host\n", __func__, k);
5230lie:
5231	return SUCCESS;
5232}
5233
5234static int scsi_debug_host_reset(struct scsi_cmnd *SCpnt)
5235{
5236	struct sdebug_host_info *sdbg_host;
5237	struct sdebug_dev_info *devip;
5238	int k = 0;
5239
5240	++num_host_resets;
5241	if ((SCpnt->device) && (SDEBUG_OPT_ALL_NOISE & sdebug_opts))
5242		sdev_printk(KERN_INFO, SCpnt->device, "%s\n", __func__);
5243	spin_lock(&sdebug_host_list_lock);
5244	list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
5245		list_for_each_entry(devip, &sdbg_host->dev_info_list,
5246				    dev_list) {
5247			set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
5248			++k;
5249		}
5250	}
5251	spin_unlock(&sdebug_host_list_lock);
5252	stop_all_queued();
5253	if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
5254		sdev_printk(KERN_INFO, SCpnt->device,
5255			    "%s: %d device(s) found\n", __func__, k);
5256	return SUCCESS;
5257}
5258
5259static void sdebug_build_parts(unsigned char *ramp, unsigned long store_size)
5260{
5261	struct msdos_partition *pp;
5262	int starts[SDEBUG_MAX_PARTS + 2], max_part_secs;
5263	int sectors_per_part, num_sectors, k;
5264	int heads_by_sects, start_sec, end_sec;
5265
5266	/* assume partition table already zeroed */
5267	if ((sdebug_num_parts < 1) || (store_size < 1048576))
5268		return;
5269	if (sdebug_num_parts > SDEBUG_MAX_PARTS) {
5270		sdebug_num_parts = SDEBUG_MAX_PARTS;
5271		pr_warn("reducing partitions to %d\n", SDEBUG_MAX_PARTS);
5272	}
5273	num_sectors = (int)get_sdebug_capacity();
5274	sectors_per_part = (num_sectors - sdebug_sectors_per)
5275			   / sdebug_num_parts;
5276	heads_by_sects = sdebug_heads * sdebug_sectors_per;
5277	starts[0] = sdebug_sectors_per;
5278	max_part_secs = sectors_per_part;
5279	for (k = 1; k < sdebug_num_parts; ++k) {
5280		starts[k] = ((k * sectors_per_part) / heads_by_sects)
5281			    * heads_by_sects;
5282		if (starts[k] - starts[k - 1] < max_part_secs)
5283			max_part_secs = starts[k] - starts[k - 1];
5284	}
5285	starts[sdebug_num_parts] = num_sectors;
5286	starts[sdebug_num_parts + 1] = 0;
5287
5288	ramp[510] = 0x55;	/* magic partition markings */
5289	ramp[511] = 0xAA;
5290	pp = (struct msdos_partition *)(ramp + 0x1be);
5291	for (k = 0; starts[k + 1]; ++k, ++pp) {
5292		start_sec = starts[k];
5293		end_sec = starts[k] + max_part_secs - 1;
5294		pp->boot_ind = 0;
5295
5296		pp->cyl = start_sec / heads_by_sects;
5297		pp->head = (start_sec - (pp->cyl * heads_by_sects))
5298			   / sdebug_sectors_per;
5299		pp->sector = (start_sec % sdebug_sectors_per) + 1;
5300
5301		pp->end_cyl = end_sec / heads_by_sects;
5302		pp->end_head = (end_sec - (pp->end_cyl * heads_by_sects))
5303			       / sdebug_sectors_per;
5304		pp->end_sector = (end_sec % sdebug_sectors_per) + 1;
5305
5306		pp->start_sect = cpu_to_le32(start_sec);
5307		pp->nr_sects = cpu_to_le32(end_sec - start_sec + 1);
5308		pp->sys_ind = 0x83;	/* plain Linux partition */
5309	}
5310}
5311
5312static void block_unblock_all_queues(bool block)
5313{
5314	int j;
5315	struct sdebug_queue *sqp;
5316
5317	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp)
5318		atomic_set(&sqp->blocked, (int)block);
5319}
5320
5321/* Adjust (by rounding down) the sdebug_cmnd_count so abs(every_nth)-1
5322 * commands will be processed normally before triggers occur.
5323 */
5324static void tweak_cmnd_count(void)
5325{
5326	int count, modulo;
5327
5328	modulo = abs(sdebug_every_nth);
5329	if (modulo < 2)
5330		return;
5331	block_unblock_all_queues(true);
5332	count = atomic_read(&sdebug_cmnd_count);
5333	atomic_set(&sdebug_cmnd_count, (count / modulo) * modulo);
5334	block_unblock_all_queues(false);
5335}
5336
5337static void clear_queue_stats(void)
5338{
5339	atomic_set(&sdebug_cmnd_count, 0);
5340	atomic_set(&sdebug_completions, 0);
5341	atomic_set(&sdebug_miss_cpus, 0);
5342	atomic_set(&sdebug_a_tsf, 0);
5343}
5344
5345static bool inject_on_this_cmd(void)
5346{
5347	if (sdebug_every_nth == 0)
5348		return false;
5349	return (atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth)) == 0;
5350}
5351
5352#define INCLUSIVE_TIMING_MAX_NS 1000000		/* 1 millisecond */
5353
5354/* Complete the processing of the thread that queued a SCSI command to this
5355 * driver. It either completes the command by calling cmnd_done() or
5356 * schedules a hr timer or work queue then returns 0. Returns
5357 * SCSI_MLQUEUE_HOST_BUSY if temporarily out of resources.
5358 */
5359static int schedule_resp(struct scsi_cmnd *cmnd, struct sdebug_dev_info *devip,
5360			 int scsi_result,
5361			 int (*pfp)(struct scsi_cmnd *,
5362				    struct sdebug_dev_info *),
5363			 int delta_jiff, int ndelay)
5364{
5365	bool new_sd_dp;
5366	bool inject = false;
5367	bool hipri = (cmnd->request->cmd_flags & REQ_HIPRI);
5368	int k, num_in_q, qdepth;
5369	unsigned long iflags;
5370	u64 ns_from_boot = 0;
5371	struct sdebug_queue *sqp;
5372	struct sdebug_queued_cmd *sqcp;
5373	struct scsi_device *sdp;
5374	struct sdebug_defer *sd_dp;
5375
5376	if (unlikely(devip == NULL)) {
5377		if (scsi_result == 0)
5378			scsi_result = DID_NO_CONNECT << 16;
5379		goto respond_in_thread;
5380	}
5381	sdp = cmnd->device;
5382
5383	if (delta_jiff == 0)
5384		goto respond_in_thread;
5385
5386	sqp = get_queue(cmnd);
5387	spin_lock_irqsave(&sqp->qc_lock, iflags);
5388	if (unlikely(atomic_read(&sqp->blocked))) {
5389		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5390		return SCSI_MLQUEUE_HOST_BUSY;
5391	}
5392	num_in_q = atomic_read(&devip->num_in_q);
5393	qdepth = cmnd->device->queue_depth;
5394	if (unlikely((qdepth > 0) && (num_in_q >= qdepth))) {
5395		if (scsi_result) {
5396			spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5397			goto respond_in_thread;
5398		} else
5399			scsi_result = device_qfull_result;
5400	} else if (unlikely(sdebug_every_nth &&
5401			    (SDEBUG_OPT_RARE_TSF & sdebug_opts) &&
5402			    (scsi_result == 0))) {
5403		if ((num_in_q == (qdepth - 1)) &&
5404		    (atomic_inc_return(&sdebug_a_tsf) >=
5405		     abs(sdebug_every_nth))) {
5406			atomic_set(&sdebug_a_tsf, 0);
5407			inject = true;
5408			scsi_result = device_qfull_result;
5409		}
5410	}
5411
5412	k = find_first_zero_bit(sqp->in_use_bm, sdebug_max_queue);
5413	if (unlikely(k >= sdebug_max_queue)) {
5414		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5415		if (scsi_result)
5416			goto respond_in_thread;
5417		else if (SDEBUG_OPT_ALL_TSF & sdebug_opts)
5418			scsi_result = device_qfull_result;
5419		if (SDEBUG_OPT_Q_NOISE & sdebug_opts)
5420			sdev_printk(KERN_INFO, sdp,
5421				    "%s: max_queue=%d exceeded, %s\n",
5422				    __func__, sdebug_max_queue,
5423				    (scsi_result ?  "status: TASK SET FULL" :
5424						    "report: host busy"));
5425		if (scsi_result)
5426			goto respond_in_thread;
5427		else
5428			return SCSI_MLQUEUE_HOST_BUSY;
5429	}
5430	set_bit(k, sqp->in_use_bm);
5431	atomic_inc(&devip->num_in_q);
5432	sqcp = &sqp->qc_arr[k];
5433	sqcp->a_cmnd = cmnd;
5434	cmnd->host_scribble = (unsigned char *)sqcp;
5435	sd_dp = sqcp->sd_dp;
5436	spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5437
5438	if (!sd_dp) {
5439		sd_dp = kzalloc(sizeof(*sd_dp), GFP_ATOMIC);
5440		if (!sd_dp) {
5441			atomic_dec(&devip->num_in_q);
5442			clear_bit(k, sqp->in_use_bm);
5443			return SCSI_MLQUEUE_HOST_BUSY;
5444		}
5445		new_sd_dp = true;
5446	} else {
5447		new_sd_dp = false;
5448	}
5449
5450	/* Set the hostwide tag */
5451	if (sdebug_host_max_queue)
5452		sd_dp->hc_idx = get_tag(cmnd);
5453
5454	if (hipri)
5455		ns_from_boot = ktime_get_boottime_ns();
5456
5457	/* one of the resp_*() response functions is called here */
5458	cmnd->result = pfp ? pfp(cmnd, devip) : 0;
5459	if (cmnd->result & SDEG_RES_IMMED_MASK) {
5460		cmnd->result &= ~SDEG_RES_IMMED_MASK;
5461		delta_jiff = ndelay = 0;
5462	}
5463	if (cmnd->result == 0 && scsi_result != 0)
5464		cmnd->result = scsi_result;
5465	if (cmnd->result == 0 && unlikely(sdebug_opts & SDEBUG_OPT_TRANSPORT_ERR)) {
5466		if (atomic_read(&sdeb_inject_pending)) {
5467			mk_sense_buffer(cmnd, ABORTED_COMMAND, TRANSPORT_PROBLEM, ACK_NAK_TO);
5468			atomic_set(&sdeb_inject_pending, 0);
5469			cmnd->result = check_condition_result;
5470		}
5471	}
5472
5473	if (unlikely(sdebug_verbose && cmnd->result))
5474		sdev_printk(KERN_INFO, sdp, "%s: non-zero result=0x%x\n",
5475			    __func__, cmnd->result);
5476
5477	if (delta_jiff > 0 || ndelay > 0) {
5478		ktime_t kt;
5479
5480		if (delta_jiff > 0) {
5481			u64 ns = jiffies_to_nsecs(delta_jiff);
5482
5483			if (sdebug_random && ns < U32_MAX) {
5484				ns = prandom_u32_max((u32)ns);
5485			} else if (sdebug_random) {
5486				ns >>= 12;	/* scale to 4 usec precision */
5487				if (ns < U32_MAX)	/* over 4 hours max */
5488					ns = prandom_u32_max((u32)ns);
5489				ns <<= 12;
5490			}
5491			kt = ns_to_ktime(ns);
5492		} else {	/* ndelay has a 4.2 second max */
5493			kt = sdebug_random ? prandom_u32_max((u32)ndelay) :
5494					     (u32)ndelay;
5495			if (ndelay < INCLUSIVE_TIMING_MAX_NS) {
5496				u64 d = ktime_get_boottime_ns() - ns_from_boot;
5497
5498				if (kt <= d) {	/* elapsed duration >= kt */
5499					spin_lock_irqsave(&sqp->qc_lock, iflags);
5500					sqcp->a_cmnd = NULL;
5501					atomic_dec(&devip->num_in_q);
5502					clear_bit(k, sqp->in_use_bm);
5503					spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5504					if (new_sd_dp)
5505						kfree(sd_dp);
5506					/* call scsi_done() from this thread */
5507					cmnd->scsi_done(cmnd);
5508					return 0;
5509				}
5510				/* otherwise reduce kt by elapsed time */
5511				kt -= d;
5512			}
5513		}
5514		if (hipri) {
5515			sd_dp->cmpl_ts = ktime_add(ns_to_ktime(ns_from_boot), kt);
5516			spin_lock_irqsave(&sqp->qc_lock, iflags);
5517			if (!sd_dp->init_poll) {
5518				sd_dp->init_poll = true;
5519				sqcp->sd_dp = sd_dp;
5520				sd_dp->sqa_idx = sqp - sdebug_q_arr;
5521				sd_dp->qc_idx = k;
5522			}
5523			sd_dp->defer_t = SDEB_DEFER_POLL;
5524			spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5525		} else {
5526			if (!sd_dp->init_hrt) {
5527				sd_dp->init_hrt = true;
5528				sqcp->sd_dp = sd_dp;
5529				hrtimer_init(&sd_dp->hrt, CLOCK_MONOTONIC,
5530					     HRTIMER_MODE_REL_PINNED);
5531				sd_dp->hrt.function = sdebug_q_cmd_hrt_complete;
5532				sd_dp->sqa_idx = sqp - sdebug_q_arr;
5533				sd_dp->qc_idx = k;
5534			}
5535			sd_dp->defer_t = SDEB_DEFER_HRT;
5536			/* schedule the invocation of scsi_done() for a later time */
5537			hrtimer_start(&sd_dp->hrt, kt, HRTIMER_MODE_REL_PINNED);
5538		}
5539		if (sdebug_statistics)
5540			sd_dp->issuing_cpu = raw_smp_processor_id();
 
 
 
5541	} else {	/* jdelay < 0, use work queue */
5542		if (unlikely((sdebug_opts & SDEBUG_OPT_CMD_ABORT) &&
5543			     atomic_read(&sdeb_inject_pending)))
5544			sd_dp->aborted = true;
5545		if (hipri) {
5546			sd_dp->cmpl_ts = ns_to_ktime(ns_from_boot);
5547			spin_lock_irqsave(&sqp->qc_lock, iflags);
5548			if (!sd_dp->init_poll) {
5549				sd_dp->init_poll = true;
5550				sqcp->sd_dp = sd_dp;
5551				sd_dp->sqa_idx = sqp - sdebug_q_arr;
5552				sd_dp->qc_idx = k;
5553			}
5554			sd_dp->defer_t = SDEB_DEFER_POLL;
5555			spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5556		} else {
5557			if (!sd_dp->init_wq) {
5558				sd_dp->init_wq = true;
5559				sqcp->sd_dp = sd_dp;
5560				sd_dp->sqa_idx = sqp - sdebug_q_arr;
5561				sd_dp->qc_idx = k;
5562				INIT_WORK(&sd_dp->ew.work, sdebug_q_cmd_wq_complete);
5563			}
5564			sd_dp->defer_t = SDEB_DEFER_WQ;
5565			schedule_work(&sd_dp->ew.work);
5566		}
5567		if (sdebug_statistics)
5568			sd_dp->issuing_cpu = raw_smp_processor_id();
5569		if (unlikely(sd_dp->aborted)) {
 
 
 
 
 
 
5570			sdev_printk(KERN_INFO, sdp, "abort request tag %d\n", cmnd->request->tag);
5571			blk_abort_request(cmnd->request);
5572			atomic_set(&sdeb_inject_pending, 0);
5573			sd_dp->aborted = false;
5574		}
5575	}
5576	if (unlikely((SDEBUG_OPT_Q_NOISE & sdebug_opts) && scsi_result == device_qfull_result))
5577		sdev_printk(KERN_INFO, sdp, "%s: num_in_q=%d +1, %s%s\n", __func__,
5578			    num_in_q, (inject ? "<inject> " : ""), "status: TASK SET FULL");
5579	return 0;
5580
5581respond_in_thread:	/* call back to mid-layer using invocation thread */
5582	cmnd->result = pfp != NULL ? pfp(cmnd, devip) : 0;
5583	cmnd->result &= ~SDEG_RES_IMMED_MASK;
5584	if (cmnd->result == 0 && scsi_result != 0)
5585		cmnd->result = scsi_result;
5586	cmnd->scsi_done(cmnd);
5587	return 0;
5588}
5589
5590/* Note: The following macros create attribute files in the
5591   /sys/module/scsi_debug/parameters directory. Unfortunately this
5592   driver is unaware of a change and cannot trigger auxiliary actions
5593   as it can when the corresponding attribute in the
5594   /sys/bus/pseudo/drivers/scsi_debug directory is changed.
5595 */
5596module_param_named(add_host, sdebug_add_host, int, S_IRUGO | S_IWUSR);
5597module_param_named(ato, sdebug_ato, int, S_IRUGO);
5598module_param_named(cdb_len, sdebug_cdb_len, int, 0644);
5599module_param_named(clustering, sdebug_clustering, bool, S_IRUGO | S_IWUSR);
5600module_param_named(delay, sdebug_jdelay, int, S_IRUGO | S_IWUSR);
5601module_param_named(dev_size_mb, sdebug_dev_size_mb, int, S_IRUGO);
5602module_param_named(dif, sdebug_dif, int, S_IRUGO);
5603module_param_named(dix, sdebug_dix, int, S_IRUGO);
5604module_param_named(dsense, sdebug_dsense, int, S_IRUGO | S_IWUSR);
5605module_param_named(every_nth, sdebug_every_nth, int, S_IRUGO | S_IWUSR);
5606module_param_named(fake_rw, sdebug_fake_rw, int, S_IRUGO | S_IWUSR);
5607module_param_named(guard, sdebug_guard, uint, S_IRUGO);
5608module_param_named(host_lock, sdebug_host_lock, bool, S_IRUGO | S_IWUSR);
5609module_param_named(host_max_queue, sdebug_host_max_queue, int, S_IRUGO);
5610module_param_string(inq_product, sdebug_inq_product_id,
5611		    sizeof(sdebug_inq_product_id), S_IRUGO | S_IWUSR);
5612module_param_string(inq_rev, sdebug_inq_product_rev,
5613		    sizeof(sdebug_inq_product_rev), S_IRUGO | S_IWUSR);
5614module_param_string(inq_vendor, sdebug_inq_vendor_id,
5615		    sizeof(sdebug_inq_vendor_id), S_IRUGO | S_IWUSR);
5616module_param_named(lbprz, sdebug_lbprz, int, S_IRUGO);
5617module_param_named(lbpu, sdebug_lbpu, int, S_IRUGO);
5618module_param_named(lbpws, sdebug_lbpws, int, S_IRUGO);
5619module_param_named(lbpws10, sdebug_lbpws10, int, S_IRUGO);
5620module_param_named(lowest_aligned, sdebug_lowest_aligned, int, S_IRUGO);
5621module_param_named(lun_format, sdebug_lun_am_i, int, S_IRUGO | S_IWUSR);
5622module_param_named(max_luns, sdebug_max_luns, int, S_IRUGO | S_IWUSR);
5623module_param_named(max_queue, sdebug_max_queue, int, S_IRUGO | S_IWUSR);
5624module_param_named(medium_error_count, sdebug_medium_error_count, int,
5625		   S_IRUGO | S_IWUSR);
5626module_param_named(medium_error_start, sdebug_medium_error_start, int,
5627		   S_IRUGO | S_IWUSR);
5628module_param_named(ndelay, sdebug_ndelay, int, S_IRUGO | S_IWUSR);
5629module_param_named(no_lun_0, sdebug_no_lun_0, int, S_IRUGO | S_IWUSR);
5630module_param_named(no_uld, sdebug_no_uld, int, S_IRUGO);
5631module_param_named(num_parts, sdebug_num_parts, int, S_IRUGO);
5632module_param_named(num_tgts, sdebug_num_tgts, int, S_IRUGO | S_IWUSR);
5633module_param_named(opt_blks, sdebug_opt_blks, int, S_IRUGO);
5634module_param_named(opt_xferlen_exp, sdebug_opt_xferlen_exp, int, S_IRUGO);
5635module_param_named(opts, sdebug_opts, int, S_IRUGO | S_IWUSR);
5636module_param_named(per_host_store, sdebug_per_host_store, bool,
5637		   S_IRUGO | S_IWUSR);
5638module_param_named(physblk_exp, sdebug_physblk_exp, int, S_IRUGO);
5639module_param_named(ptype, sdebug_ptype, int, S_IRUGO | S_IWUSR);
5640module_param_named(random, sdebug_random, bool, S_IRUGO | S_IWUSR);
5641module_param_named(removable, sdebug_removable, bool, S_IRUGO | S_IWUSR);
5642module_param_named(scsi_level, sdebug_scsi_level, int, S_IRUGO);
5643module_param_named(sector_size, sdebug_sector_size, int, S_IRUGO);
5644module_param_named(statistics, sdebug_statistics, bool, S_IRUGO | S_IWUSR);
5645module_param_named(strict, sdebug_strict, bool, S_IRUGO | S_IWUSR);
5646module_param_named(submit_queues, submit_queues, int, S_IRUGO);
5647module_param_named(poll_queues, poll_queues, int, S_IRUGO);
5648module_param_named(tur_ms_to_ready, sdeb_tur_ms_to_ready, int, S_IRUGO);
5649module_param_named(unmap_alignment, sdebug_unmap_alignment, int, S_IRUGO);
5650module_param_named(unmap_granularity, sdebug_unmap_granularity, int, S_IRUGO);
5651module_param_named(unmap_max_blocks, sdebug_unmap_max_blocks, int, S_IRUGO);
5652module_param_named(unmap_max_desc, sdebug_unmap_max_desc, int, S_IRUGO);
5653module_param_named(uuid_ctl, sdebug_uuid_ctl, int, S_IRUGO);
5654module_param_named(virtual_gb, sdebug_virtual_gb, int, S_IRUGO | S_IWUSR);
5655module_param_named(vpd_use_hostno, sdebug_vpd_use_hostno, int,
5656		   S_IRUGO | S_IWUSR);
5657module_param_named(wp, sdebug_wp, bool, S_IRUGO | S_IWUSR);
5658module_param_named(write_same_length, sdebug_write_same_length, int,
5659		   S_IRUGO | S_IWUSR);
5660module_param_named(zbc, sdeb_zbc_model_s, charp, S_IRUGO);
5661module_param_named(zone_max_open, sdeb_zbc_max_open, int, S_IRUGO);
5662module_param_named(zone_nr_conv, sdeb_zbc_nr_conv, int, S_IRUGO);
5663module_param_named(zone_size_mb, sdeb_zbc_zone_size_mb, int, S_IRUGO);
5664
5665MODULE_AUTHOR("Eric Youngdale + Douglas Gilbert");
5666MODULE_DESCRIPTION("SCSI debug adapter driver");
5667MODULE_LICENSE("GPL");
5668MODULE_VERSION(SDEBUG_VERSION);
5669
5670MODULE_PARM_DESC(add_host, "add n hosts, in sysfs if negative remove host(s) (def=1)");
5671MODULE_PARM_DESC(ato, "application tag ownership: 0=disk 1=host (def=1)");
5672MODULE_PARM_DESC(cdb_len, "suggest CDB lengths to drivers (def=10)");
5673MODULE_PARM_DESC(clustering, "when set enables larger transfers (def=0)");
5674MODULE_PARM_DESC(delay, "response delay (def=1 jiffy); 0:imm, -1,-2:tiny");
5675MODULE_PARM_DESC(dev_size_mb, "size in MiB of ram shared by devs(def=8)");
5676MODULE_PARM_DESC(dif, "data integrity field type: 0-3 (def=0)");
5677MODULE_PARM_DESC(dix, "data integrity extensions mask (def=0)");
5678MODULE_PARM_DESC(dsense, "use descriptor sense format(def=0 -> fixed)");
5679MODULE_PARM_DESC(every_nth, "timeout every nth command(def=0)");
5680MODULE_PARM_DESC(fake_rw, "fake reads/writes instead of copying (def=0)");
5681MODULE_PARM_DESC(guard, "protection checksum: 0=crc, 1=ip (def=0)");
5682MODULE_PARM_DESC(host_lock, "host_lock is ignored (def=0)");
5683MODULE_PARM_DESC(host_max_queue,
5684		 "host max # of queued cmds (0 to max(def) [max_queue fixed equal for !0])");
5685MODULE_PARM_DESC(inq_product, "SCSI INQUIRY product string (def=\"scsi_debug\")");
5686MODULE_PARM_DESC(inq_rev, "SCSI INQUIRY revision string (def=\""
5687		 SDEBUG_VERSION "\")");
5688MODULE_PARM_DESC(inq_vendor, "SCSI INQUIRY vendor string (def=\"Linux\")");
5689MODULE_PARM_DESC(lbprz,
5690		 "on read unmapped LBs return 0 when 1 (def), return 0xff when 2");
5691MODULE_PARM_DESC(lbpu, "enable LBP, support UNMAP command (def=0)");
5692MODULE_PARM_DESC(lbpws, "enable LBP, support WRITE SAME(16) with UNMAP bit (def=0)");
5693MODULE_PARM_DESC(lbpws10, "enable LBP, support WRITE SAME(10) with UNMAP bit (def=0)");
5694MODULE_PARM_DESC(lowest_aligned, "lowest aligned lba (def=0)");
5695MODULE_PARM_DESC(lun_format, "LUN format: 0->peripheral (def); 1 --> flat address method");
5696MODULE_PARM_DESC(max_luns, "number of LUNs per target to simulate(def=1)");
5697MODULE_PARM_DESC(max_queue, "max number of queued commands (1 to max(def))");
5698MODULE_PARM_DESC(medium_error_count, "count of sectors to return follow on MEDIUM error");
5699MODULE_PARM_DESC(medium_error_start, "starting sector number to return MEDIUM error");
5700MODULE_PARM_DESC(ndelay, "response delay in nanoseconds (def=0 -> ignore)");
5701MODULE_PARM_DESC(no_lun_0, "no LU number 0 (def=0 -> have lun 0)");
5702MODULE_PARM_DESC(no_uld, "stop ULD (e.g. sd driver) attaching (def=0))");
5703MODULE_PARM_DESC(num_parts, "number of partitions(def=0)");
5704MODULE_PARM_DESC(num_tgts, "number of targets per host to simulate(def=1)");
5705MODULE_PARM_DESC(opt_blks, "optimal transfer length in blocks (def=1024)");
5706MODULE_PARM_DESC(opt_xferlen_exp, "optimal transfer length granularity exponent (def=physblk_exp)");
5707MODULE_PARM_DESC(opts, "1->noise, 2->medium_err, 4->timeout, 8->recovered_err... (def=0)");
5708MODULE_PARM_DESC(per_host_store, "If set, next positive add_host will get new store (def=0)");
5709MODULE_PARM_DESC(physblk_exp, "physical block exponent (def=0)");
5710MODULE_PARM_DESC(poll_queues, "support for iouring iopoll queues (1 to max(submit_queues - 1))");
5711MODULE_PARM_DESC(ptype, "SCSI peripheral type(def=0[disk])");
5712MODULE_PARM_DESC(random, "If set, uniformly randomize command duration between 0 and delay_in_ns");
5713MODULE_PARM_DESC(removable, "claim to have removable media (def=0)");
5714MODULE_PARM_DESC(scsi_level, "SCSI level to simulate(def=7[SPC-5])");
5715MODULE_PARM_DESC(sector_size, "logical block size in bytes (def=512)");
5716MODULE_PARM_DESC(statistics, "collect statistics on commands, queues (def=0)");
5717MODULE_PARM_DESC(strict, "stricter checks: reserved field in cdb (def=0)");
5718MODULE_PARM_DESC(submit_queues, "support for block multi-queue (def=1)");
5719MODULE_PARM_DESC(tur_ms_to_ready, "TEST UNIT READY millisecs before initial good status (def=0)");
5720MODULE_PARM_DESC(unmap_alignment, "lowest aligned thin provisioning lba (def=0)");
5721MODULE_PARM_DESC(unmap_granularity, "thin provisioning granularity in blocks (def=1)");
5722MODULE_PARM_DESC(unmap_max_blocks, "max # of blocks can be unmapped in one cmd (def=0xffffffff)");
5723MODULE_PARM_DESC(unmap_max_desc, "max # of ranges that can be unmapped in one cmd (def=256)");
5724MODULE_PARM_DESC(uuid_ctl,
5725		 "1->use uuid for lu name, 0->don't, 2->all use same (def=0)");
5726MODULE_PARM_DESC(virtual_gb, "virtual gigabyte (GiB) size (def=0 -> use dev_size_mb)");
5727MODULE_PARM_DESC(vpd_use_hostno, "0 -> dev ids ignore hostno (def=1 -> unique dev ids)");
5728MODULE_PARM_DESC(wp, "Write Protect (def=0)");
5729MODULE_PARM_DESC(write_same_length, "Maximum blocks per WRITE SAME cmd (def=0xffff)");
5730MODULE_PARM_DESC(zbc, "'none' [0]; 'aware' [1]; 'managed' [2] (def=0). Can have 'host-' prefix");
5731MODULE_PARM_DESC(zone_max_open, "Maximum number of open zones; [0] for no limit (def=auto)");
5732MODULE_PARM_DESC(zone_nr_conv, "Number of conventional zones (def=1)");
5733MODULE_PARM_DESC(zone_size_mb, "Zone size in MiB (def=auto)");
5734
5735#define SDEBUG_INFO_LEN 256
5736static char sdebug_info[SDEBUG_INFO_LEN];
5737
5738static const char *scsi_debug_info(struct Scsi_Host *shp)
5739{
5740	int k;
5741
5742	k = scnprintf(sdebug_info, SDEBUG_INFO_LEN, "%s: version %s [%s]\n",
5743		      my_name, SDEBUG_VERSION, sdebug_version_date);
5744	if (k >= (SDEBUG_INFO_LEN - 1))
5745		return sdebug_info;
5746	scnprintf(sdebug_info + k, SDEBUG_INFO_LEN - k,
5747		  "  dev_size_mb=%d, opts=0x%x, submit_queues=%d, %s=%d",
5748		  sdebug_dev_size_mb, sdebug_opts, submit_queues,
5749		  "statistics", (int)sdebug_statistics);
5750	return sdebug_info;
5751}
5752
5753/* 'echo <val> > /proc/scsi/scsi_debug/<host_id>' writes to opts */
5754static int scsi_debug_write_info(struct Scsi_Host *host, char *buffer,
5755				 int length)
5756{
5757	char arr[16];
5758	int opts;
5759	int minLen = length > 15 ? 15 : length;
5760
5761	if (!capable(CAP_SYS_ADMIN) || !capable(CAP_SYS_RAWIO))
5762		return -EACCES;
5763	memcpy(arr, buffer, minLen);
5764	arr[minLen] = '\0';
5765	if (1 != sscanf(arr, "%d", &opts))
5766		return -EINVAL;
5767	sdebug_opts = opts;
5768	sdebug_verbose = !!(SDEBUG_OPT_NOISE & opts);
5769	sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & opts);
5770	if (sdebug_every_nth != 0)
5771		tweak_cmnd_count();
5772	return length;
5773}
5774
5775/* Output seen with 'cat /proc/scsi/scsi_debug/<host_id>'. It will be the
5776 * same for each scsi_debug host (if more than one). Some of the counters
5777 * output are not atomics so might be inaccurate in a busy system. */
5778static int scsi_debug_show_info(struct seq_file *m, struct Scsi_Host *host)
5779{
5780	int f, j, l;
5781	struct sdebug_queue *sqp;
5782	struct sdebug_host_info *sdhp;
5783
5784	seq_printf(m, "scsi_debug adapter driver, version %s [%s]\n",
5785		   SDEBUG_VERSION, sdebug_version_date);
5786	seq_printf(m, "num_tgts=%d, %ssize=%d MB, opts=0x%x, every_nth=%d\n",
5787		   sdebug_num_tgts, "shared (ram) ", sdebug_dev_size_mb,
5788		   sdebug_opts, sdebug_every_nth);
5789	seq_printf(m, "delay=%d, ndelay=%d, max_luns=%d, sector_size=%d %s\n",
5790		   sdebug_jdelay, sdebug_ndelay, sdebug_max_luns,
5791		   sdebug_sector_size, "bytes");
5792	seq_printf(m, "cylinders=%d, heads=%d, sectors=%d, command aborts=%d\n",
5793		   sdebug_cylinders_per, sdebug_heads, sdebug_sectors_per,
5794		   num_aborts);
5795	seq_printf(m, "RESETs: device=%d, target=%d, bus=%d, host=%d\n",
5796		   num_dev_resets, num_target_resets, num_bus_resets,
5797		   num_host_resets);
5798	seq_printf(m, "dix_reads=%d, dix_writes=%d, dif_errors=%d\n",
5799		   dix_reads, dix_writes, dif_errors);
5800	seq_printf(m, "usec_in_jiffy=%lu, statistics=%d\n", TICK_NSEC / 1000,
5801		   sdebug_statistics);
5802	seq_printf(m, "cmnd_count=%d, completions=%d, %s=%d, a_tsf=%d, mq_polls=%d\n",
5803		   atomic_read(&sdebug_cmnd_count),
5804		   atomic_read(&sdebug_completions),
5805		   "miss_cpus", atomic_read(&sdebug_miss_cpus),
5806		   atomic_read(&sdebug_a_tsf),
5807		   atomic_read(&sdeb_mq_poll_count));
5808
5809	seq_printf(m, "submit_queues=%d\n", submit_queues);
5810	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
5811		seq_printf(m, "  queue %d:\n", j);
5812		f = find_first_bit(sqp->in_use_bm, sdebug_max_queue);
5813		if (f != sdebug_max_queue) {
5814			l = find_last_bit(sqp->in_use_bm, sdebug_max_queue);
5815			seq_printf(m, "    in_use_bm BUSY: %s: %d,%d\n",
5816				   "first,last bits", f, l);
5817		}
5818	}
5819
5820	seq_printf(m, "this host_no=%d\n", host->host_no);
5821	if (!xa_empty(per_store_ap)) {
5822		bool niu;
5823		int idx;
5824		unsigned long l_idx;
5825		struct sdeb_store_info *sip;
5826
5827		seq_puts(m, "\nhost list:\n");
5828		j = 0;
5829		list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
5830			idx = sdhp->si_idx;
5831			seq_printf(m, "  %d: host_no=%d, si_idx=%d\n", j,
5832				   sdhp->shost->host_no, idx);
5833			++j;
5834		}
5835		seq_printf(m, "\nper_store array [most_recent_idx=%d]:\n",
5836			   sdeb_most_recent_idx);
5837		j = 0;
5838		xa_for_each(per_store_ap, l_idx, sip) {
5839			niu = xa_get_mark(per_store_ap, l_idx,
5840					  SDEB_XA_NOT_IN_USE);
5841			idx = (int)l_idx;
5842			seq_printf(m, "  %d: idx=%d%s\n", j, idx,
5843				   (niu ? "  not_in_use" : ""));
5844			++j;
5845		}
5846	}
5847	return 0;
5848}
5849
5850static ssize_t delay_show(struct device_driver *ddp, char *buf)
5851{
5852	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_jdelay);
5853}
5854/* Returns -EBUSY if jdelay is being changed and commands are queued. The unit
5855 * of delay is jiffies.
5856 */
5857static ssize_t delay_store(struct device_driver *ddp, const char *buf,
5858			   size_t count)
5859{
5860	int jdelay, res;
5861
5862	if (count > 0 && sscanf(buf, "%d", &jdelay) == 1) {
5863		res = count;
5864		if (sdebug_jdelay != jdelay) {
5865			int j, k;
5866			struct sdebug_queue *sqp;
5867
5868			block_unblock_all_queues(true);
5869			for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
5870			     ++j, ++sqp) {
5871				k = find_first_bit(sqp->in_use_bm,
5872						   sdebug_max_queue);
5873				if (k != sdebug_max_queue) {
5874					res = -EBUSY;   /* queued commands */
5875					break;
5876				}
5877			}
5878			if (res > 0) {
5879				sdebug_jdelay = jdelay;
5880				sdebug_ndelay = 0;
5881			}
5882			block_unblock_all_queues(false);
5883		}
5884		return res;
5885	}
5886	return -EINVAL;
5887}
5888static DRIVER_ATTR_RW(delay);
5889
5890static ssize_t ndelay_show(struct device_driver *ddp, char *buf)
5891{
5892	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ndelay);
5893}
5894/* Returns -EBUSY if ndelay is being changed and commands are queued */
5895/* If > 0 and accepted then sdebug_jdelay is set to JDELAY_OVERRIDDEN */
5896static ssize_t ndelay_store(struct device_driver *ddp, const char *buf,
5897			    size_t count)
5898{
5899	int ndelay, res;
5900
5901	if ((count > 0) && (1 == sscanf(buf, "%d", &ndelay)) &&
5902	    (ndelay >= 0) && (ndelay < (1000 * 1000 * 1000))) {
5903		res = count;
5904		if (sdebug_ndelay != ndelay) {
5905			int j, k;
5906			struct sdebug_queue *sqp;
5907
5908			block_unblock_all_queues(true);
5909			for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
5910			     ++j, ++sqp) {
5911				k = find_first_bit(sqp->in_use_bm,
5912						   sdebug_max_queue);
5913				if (k != sdebug_max_queue) {
5914					res = -EBUSY;   /* queued commands */
5915					break;
5916				}
5917			}
5918			if (res > 0) {
5919				sdebug_ndelay = ndelay;
5920				sdebug_jdelay = ndelay  ? JDELAY_OVERRIDDEN
5921							: DEF_JDELAY;
5922			}
5923			block_unblock_all_queues(false);
5924		}
5925		return res;
5926	}
5927	return -EINVAL;
5928}
5929static DRIVER_ATTR_RW(ndelay);
5930
5931static ssize_t opts_show(struct device_driver *ddp, char *buf)
5932{
5933	return scnprintf(buf, PAGE_SIZE, "0x%x\n", sdebug_opts);
5934}
5935
5936static ssize_t opts_store(struct device_driver *ddp, const char *buf,
5937			  size_t count)
5938{
5939	int opts;
5940	char work[20];
5941
5942	if (sscanf(buf, "%10s", work) == 1) {
5943		if (strncasecmp(work, "0x", 2) == 0) {
5944			if (kstrtoint(work + 2, 16, &opts) == 0)
5945				goto opts_done;
5946		} else {
5947			if (kstrtoint(work, 10, &opts) == 0)
5948				goto opts_done;
5949		}
5950	}
5951	return -EINVAL;
5952opts_done:
5953	sdebug_opts = opts;
5954	sdebug_verbose = !!(SDEBUG_OPT_NOISE & opts);
5955	sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & opts);
5956	tweak_cmnd_count();
5957	return count;
5958}
5959static DRIVER_ATTR_RW(opts);
5960
5961static ssize_t ptype_show(struct device_driver *ddp, char *buf)
5962{
5963	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ptype);
5964}
5965static ssize_t ptype_store(struct device_driver *ddp, const char *buf,
5966			   size_t count)
5967{
5968	int n;
5969
5970	/* Cannot change from or to TYPE_ZBC with sysfs */
5971	if (sdebug_ptype == TYPE_ZBC)
5972		return -EINVAL;
5973
5974	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5975		if (n == TYPE_ZBC)
5976			return -EINVAL;
5977		sdebug_ptype = n;
5978		return count;
5979	}
5980	return -EINVAL;
5981}
5982static DRIVER_ATTR_RW(ptype);
5983
5984static ssize_t dsense_show(struct device_driver *ddp, char *buf)
5985{
5986	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dsense);
5987}
5988static ssize_t dsense_store(struct device_driver *ddp, const char *buf,
5989			    size_t count)
5990{
5991	int n;
5992
5993	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5994		sdebug_dsense = n;
5995		return count;
5996	}
5997	return -EINVAL;
5998}
5999static DRIVER_ATTR_RW(dsense);
6000
6001static ssize_t fake_rw_show(struct device_driver *ddp, char *buf)
6002{
6003	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_fake_rw);
6004}
6005static ssize_t fake_rw_store(struct device_driver *ddp, const char *buf,
6006			     size_t count)
6007{
6008	int n, idx;
6009
6010	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6011		bool want_store = (n == 0);
6012		struct sdebug_host_info *sdhp;
6013
6014		n = (n > 0);
6015		sdebug_fake_rw = (sdebug_fake_rw > 0);
6016		if (sdebug_fake_rw == n)
6017			return count;	/* not transitioning so do nothing */
6018
6019		if (want_store) {	/* 1 --> 0 transition, set up store */
6020			if (sdeb_first_idx < 0) {
6021				idx = sdebug_add_store();
6022				if (idx < 0)
6023					return idx;
6024			} else {
6025				idx = sdeb_first_idx;
6026				xa_clear_mark(per_store_ap, idx,
6027					      SDEB_XA_NOT_IN_USE);
6028			}
6029			/* make all hosts use same store */
6030			list_for_each_entry(sdhp, &sdebug_host_list,
6031					    host_list) {
6032				if (sdhp->si_idx != idx) {
6033					xa_set_mark(per_store_ap, sdhp->si_idx,
6034						    SDEB_XA_NOT_IN_USE);
6035					sdhp->si_idx = idx;
6036				}
6037			}
6038			sdeb_most_recent_idx = idx;
6039		} else {	/* 0 --> 1 transition is trigger for shrink */
6040			sdebug_erase_all_stores(true /* apart from first */);
6041		}
6042		sdebug_fake_rw = n;
6043		return count;
6044	}
6045	return -EINVAL;
6046}
6047static DRIVER_ATTR_RW(fake_rw);
6048
6049static ssize_t no_lun_0_show(struct device_driver *ddp, char *buf)
6050{
6051	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_lun_0);
6052}
6053static ssize_t no_lun_0_store(struct device_driver *ddp, const char *buf,
6054			      size_t count)
6055{
6056	int n;
6057
6058	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6059		sdebug_no_lun_0 = n;
6060		return count;
6061	}
6062	return -EINVAL;
6063}
6064static DRIVER_ATTR_RW(no_lun_0);
6065
6066static ssize_t num_tgts_show(struct device_driver *ddp, char *buf)
6067{
6068	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_tgts);
6069}
6070static ssize_t num_tgts_store(struct device_driver *ddp, const char *buf,
6071			      size_t count)
6072{
6073	int n;
6074
6075	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6076		sdebug_num_tgts = n;
6077		sdebug_max_tgts_luns();
6078		return count;
6079	}
6080	return -EINVAL;
6081}
6082static DRIVER_ATTR_RW(num_tgts);
6083
6084static ssize_t dev_size_mb_show(struct device_driver *ddp, char *buf)
6085{
6086	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dev_size_mb);
6087}
6088static DRIVER_ATTR_RO(dev_size_mb);
6089
6090static ssize_t per_host_store_show(struct device_driver *ddp, char *buf)
6091{
6092	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_per_host_store);
6093}
6094
6095static ssize_t per_host_store_store(struct device_driver *ddp, const char *buf,
6096				    size_t count)
6097{
6098	bool v;
6099
6100	if (kstrtobool(buf, &v))
6101		return -EINVAL;
6102
6103	sdebug_per_host_store = v;
6104	return count;
6105}
6106static DRIVER_ATTR_RW(per_host_store);
6107
6108static ssize_t num_parts_show(struct device_driver *ddp, char *buf)
6109{
6110	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_parts);
6111}
6112static DRIVER_ATTR_RO(num_parts);
6113
6114static ssize_t every_nth_show(struct device_driver *ddp, char *buf)
6115{
6116	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_every_nth);
6117}
6118static ssize_t every_nth_store(struct device_driver *ddp, const char *buf,
6119			       size_t count)
6120{
6121	int nth;
6122	char work[20];
6123
6124	if (sscanf(buf, "%10s", work) == 1) {
6125		if (strncasecmp(work, "0x", 2) == 0) {
6126			if (kstrtoint(work + 2, 16, &nth) == 0)
6127				goto every_nth_done;
6128		} else {
6129			if (kstrtoint(work, 10, &nth) == 0)
6130				goto every_nth_done;
6131		}
6132	}
6133	return -EINVAL;
6134
6135every_nth_done:
6136	sdebug_every_nth = nth;
6137	if (nth && !sdebug_statistics) {
6138		pr_info("every_nth needs statistics=1, set it\n");
6139		sdebug_statistics = true;
6140	}
6141	tweak_cmnd_count();
6142	return count;
6143}
6144static DRIVER_ATTR_RW(every_nth);
6145
6146static ssize_t lun_format_show(struct device_driver *ddp, char *buf)
6147{
6148	return scnprintf(buf, PAGE_SIZE, "%d\n", (int)sdebug_lun_am);
6149}
6150static ssize_t lun_format_store(struct device_driver *ddp, const char *buf,
6151				size_t count)
6152{
6153	int n;
6154	bool changed;
6155
6156	if (kstrtoint(buf, 0, &n))
6157		return -EINVAL;
6158	if (n >= 0) {
6159		if (n > (int)SAM_LUN_AM_FLAT) {
6160			pr_warn("only LUN address methods 0 and 1 are supported\n");
6161			return -EINVAL;
6162		}
6163		changed = ((int)sdebug_lun_am != n);
6164		sdebug_lun_am = n;
6165		if (changed && sdebug_scsi_level >= 5) {	/* >= SPC-3 */
6166			struct sdebug_host_info *sdhp;
6167			struct sdebug_dev_info *dp;
6168
6169			spin_lock(&sdebug_host_list_lock);
6170			list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
6171				list_for_each_entry(dp, &sdhp->dev_info_list, dev_list) {
6172					set_bit(SDEBUG_UA_LUNS_CHANGED, dp->uas_bm);
6173				}
6174			}
6175			spin_unlock(&sdebug_host_list_lock);
6176		}
6177		return count;
6178	}
6179	return -EINVAL;
6180}
6181static DRIVER_ATTR_RW(lun_format);
6182
6183static ssize_t max_luns_show(struct device_driver *ddp, char *buf)
6184{
6185	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_max_luns);
6186}
6187static ssize_t max_luns_store(struct device_driver *ddp, const char *buf,
6188			      size_t count)
6189{
6190	int n;
6191	bool changed;
6192
6193	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6194		if (n > 256) {
6195			pr_warn("max_luns can be no more than 256\n");
6196			return -EINVAL;
6197		}
6198		changed = (sdebug_max_luns != n);
6199		sdebug_max_luns = n;
6200		sdebug_max_tgts_luns();
6201		if (changed && (sdebug_scsi_level >= 5)) {	/* >= SPC-3 */
6202			struct sdebug_host_info *sdhp;
6203			struct sdebug_dev_info *dp;
6204
6205			spin_lock(&sdebug_host_list_lock);
6206			list_for_each_entry(sdhp, &sdebug_host_list,
6207					    host_list) {
6208				list_for_each_entry(dp, &sdhp->dev_info_list,
6209						    dev_list) {
6210					set_bit(SDEBUG_UA_LUNS_CHANGED,
6211						dp->uas_bm);
6212				}
6213			}
6214			spin_unlock(&sdebug_host_list_lock);
6215		}
6216		return count;
6217	}
6218	return -EINVAL;
6219}
6220static DRIVER_ATTR_RW(max_luns);
6221
6222static ssize_t max_queue_show(struct device_driver *ddp, char *buf)
6223{
6224	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_max_queue);
6225}
6226/* N.B. max_queue can be changed while there are queued commands. In flight
6227 * commands beyond the new max_queue will be completed. */
6228static ssize_t max_queue_store(struct device_driver *ddp, const char *buf,
6229			       size_t count)
6230{
6231	int j, n, k, a;
6232	struct sdebug_queue *sqp;
6233
6234	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n > 0) &&
6235	    (n <= SDEBUG_CANQUEUE) &&
6236	    (sdebug_host_max_queue == 0)) {
6237		block_unblock_all_queues(true);
6238		k = 0;
6239		for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
6240		     ++j, ++sqp) {
6241			a = find_last_bit(sqp->in_use_bm, SDEBUG_CANQUEUE);
6242			if (a > k)
6243				k = a;
6244		}
6245		sdebug_max_queue = n;
6246		if (k == SDEBUG_CANQUEUE)
6247			atomic_set(&retired_max_queue, 0);
6248		else if (k >= n)
6249			atomic_set(&retired_max_queue, k + 1);
6250		else
6251			atomic_set(&retired_max_queue, 0);
6252		block_unblock_all_queues(false);
6253		return count;
6254	}
6255	return -EINVAL;
6256}
6257static DRIVER_ATTR_RW(max_queue);
6258
6259static ssize_t host_max_queue_show(struct device_driver *ddp, char *buf)
6260{
6261	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_host_max_queue);
6262}
6263
6264/*
6265 * Since this is used for .can_queue, and we get the hc_idx tag from the bitmap
6266 * in range [0, sdebug_host_max_queue), we can't change it.
6267 */
6268static DRIVER_ATTR_RO(host_max_queue);
6269
6270static ssize_t no_uld_show(struct device_driver *ddp, char *buf)
6271{
6272	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_uld);
6273}
6274static DRIVER_ATTR_RO(no_uld);
6275
6276static ssize_t scsi_level_show(struct device_driver *ddp, char *buf)
6277{
6278	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_scsi_level);
6279}
6280static DRIVER_ATTR_RO(scsi_level);
6281
6282static ssize_t virtual_gb_show(struct device_driver *ddp, char *buf)
6283{
6284	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_virtual_gb);
6285}
6286static ssize_t virtual_gb_store(struct device_driver *ddp, const char *buf,
6287				size_t count)
6288{
6289	int n;
6290	bool changed;
6291
6292	/* Ignore capacity change for ZBC drives for now */
6293	if (sdeb_zbc_in_use)
6294		return -ENOTSUPP;
6295
6296	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6297		changed = (sdebug_virtual_gb != n);
6298		sdebug_virtual_gb = n;
6299		sdebug_capacity = get_sdebug_capacity();
6300		if (changed) {
6301			struct sdebug_host_info *sdhp;
6302			struct sdebug_dev_info *dp;
6303
6304			spin_lock(&sdebug_host_list_lock);
6305			list_for_each_entry(sdhp, &sdebug_host_list,
6306					    host_list) {
6307				list_for_each_entry(dp, &sdhp->dev_info_list,
6308						    dev_list) {
6309					set_bit(SDEBUG_UA_CAPACITY_CHANGED,
6310						dp->uas_bm);
6311				}
6312			}
6313			spin_unlock(&sdebug_host_list_lock);
6314		}
6315		return count;
6316	}
6317	return -EINVAL;
6318}
6319static DRIVER_ATTR_RW(virtual_gb);
6320
6321static ssize_t add_host_show(struct device_driver *ddp, char *buf)
6322{
6323	/* absolute number of hosts currently active is what is shown */
6324	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_hosts);
6325}
6326
6327static ssize_t add_host_store(struct device_driver *ddp, const char *buf,
6328			      size_t count)
6329{
6330	bool found;
6331	unsigned long idx;
6332	struct sdeb_store_info *sip;
6333	bool want_phs = (sdebug_fake_rw == 0) && sdebug_per_host_store;
6334	int delta_hosts;
6335
6336	if (sscanf(buf, "%d", &delta_hosts) != 1)
6337		return -EINVAL;
6338	if (delta_hosts > 0) {
6339		do {
6340			found = false;
6341			if (want_phs) {
6342				xa_for_each_marked(per_store_ap, idx, sip,
6343						   SDEB_XA_NOT_IN_USE) {
6344					sdeb_most_recent_idx = (int)idx;
6345					found = true;
6346					break;
6347				}
6348				if (found)	/* re-use case */
6349					sdebug_add_host_helper((int)idx);
6350				else
6351					sdebug_do_add_host(true);
6352			} else {
6353				sdebug_do_add_host(false);
6354			}
6355		} while (--delta_hosts);
6356	} else if (delta_hosts < 0) {
6357		do {
6358			sdebug_do_remove_host(false);
6359		} while (++delta_hosts);
6360	}
6361	return count;
6362}
6363static DRIVER_ATTR_RW(add_host);
6364
6365static ssize_t vpd_use_hostno_show(struct device_driver *ddp, char *buf)
6366{
6367	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_vpd_use_hostno);
6368}
6369static ssize_t vpd_use_hostno_store(struct device_driver *ddp, const char *buf,
6370				    size_t count)
6371{
6372	int n;
6373
6374	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6375		sdebug_vpd_use_hostno = n;
6376		return count;
6377	}
6378	return -EINVAL;
6379}
6380static DRIVER_ATTR_RW(vpd_use_hostno);
6381
6382static ssize_t statistics_show(struct device_driver *ddp, char *buf)
6383{
6384	return scnprintf(buf, PAGE_SIZE, "%d\n", (int)sdebug_statistics);
6385}
6386static ssize_t statistics_store(struct device_driver *ddp, const char *buf,
6387				size_t count)
6388{
6389	int n;
6390
6391	if ((count > 0) && (sscanf(buf, "%d", &n) == 1) && (n >= 0)) {
6392		if (n > 0)
6393			sdebug_statistics = true;
6394		else {
6395			clear_queue_stats();
6396			sdebug_statistics = false;
6397		}
6398		return count;
6399	}
6400	return -EINVAL;
6401}
6402static DRIVER_ATTR_RW(statistics);
6403
6404static ssize_t sector_size_show(struct device_driver *ddp, char *buf)
6405{
6406	return scnprintf(buf, PAGE_SIZE, "%u\n", sdebug_sector_size);
6407}
6408static DRIVER_ATTR_RO(sector_size);
6409
6410static ssize_t submit_queues_show(struct device_driver *ddp, char *buf)
6411{
6412	return scnprintf(buf, PAGE_SIZE, "%d\n", submit_queues);
6413}
6414static DRIVER_ATTR_RO(submit_queues);
6415
6416static ssize_t dix_show(struct device_driver *ddp, char *buf)
6417{
6418	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dix);
6419}
6420static DRIVER_ATTR_RO(dix);
6421
6422static ssize_t dif_show(struct device_driver *ddp, char *buf)
6423{
6424	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dif);
6425}
6426static DRIVER_ATTR_RO(dif);
6427
6428static ssize_t guard_show(struct device_driver *ddp, char *buf)
6429{
6430	return scnprintf(buf, PAGE_SIZE, "%u\n", sdebug_guard);
6431}
6432static DRIVER_ATTR_RO(guard);
6433
6434static ssize_t ato_show(struct device_driver *ddp, char *buf)
6435{
6436	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ato);
6437}
6438static DRIVER_ATTR_RO(ato);
6439
6440static ssize_t map_show(struct device_driver *ddp, char *buf)
6441{
6442	ssize_t count = 0;
6443
6444	if (!scsi_debug_lbp())
6445		return scnprintf(buf, PAGE_SIZE, "0-%u\n",
6446				 sdebug_store_sectors);
6447
6448	if (sdebug_fake_rw == 0 && !xa_empty(per_store_ap)) {
6449		struct sdeb_store_info *sip = xa_load(per_store_ap, 0);
6450
6451		if (sip)
6452			count = scnprintf(buf, PAGE_SIZE - 1, "%*pbl",
6453					  (int)map_size, sip->map_storep);
6454	}
6455	buf[count++] = '\n';
6456	buf[count] = '\0';
6457
6458	return count;
6459}
6460static DRIVER_ATTR_RO(map);
6461
6462static ssize_t random_show(struct device_driver *ddp, char *buf)
6463{
6464	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_random);
6465}
6466
6467static ssize_t random_store(struct device_driver *ddp, const char *buf,
6468			    size_t count)
6469{
6470	bool v;
6471
6472	if (kstrtobool(buf, &v))
6473		return -EINVAL;
6474
6475	sdebug_random = v;
6476	return count;
6477}
6478static DRIVER_ATTR_RW(random);
6479
6480static ssize_t removable_show(struct device_driver *ddp, char *buf)
6481{
6482	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_removable ? 1 : 0);
6483}
6484static ssize_t removable_store(struct device_driver *ddp, const char *buf,
6485			       size_t count)
6486{
6487	int n;
6488
6489	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6490		sdebug_removable = (n > 0);
6491		return count;
6492	}
6493	return -EINVAL;
6494}
6495static DRIVER_ATTR_RW(removable);
6496
6497static ssize_t host_lock_show(struct device_driver *ddp, char *buf)
6498{
6499	return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_host_lock);
6500}
6501/* N.B. sdebug_host_lock does nothing, kept for backward compatibility */
6502static ssize_t host_lock_store(struct device_driver *ddp, const char *buf,
6503			       size_t count)
6504{
6505	int n;
6506
6507	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6508		sdebug_host_lock = (n > 0);
6509		return count;
6510	}
6511	return -EINVAL;
6512}
6513static DRIVER_ATTR_RW(host_lock);
6514
6515static ssize_t strict_show(struct device_driver *ddp, char *buf)
6516{
6517	return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_strict);
6518}
6519static ssize_t strict_store(struct device_driver *ddp, const char *buf,
6520			    size_t count)
6521{
6522	int n;
6523
6524	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6525		sdebug_strict = (n > 0);
6526		return count;
6527	}
6528	return -EINVAL;
6529}
6530static DRIVER_ATTR_RW(strict);
6531
6532static ssize_t uuid_ctl_show(struct device_driver *ddp, char *buf)
6533{
6534	return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_uuid_ctl);
6535}
6536static DRIVER_ATTR_RO(uuid_ctl);
6537
6538static ssize_t cdb_len_show(struct device_driver *ddp, char *buf)
6539{
6540	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_cdb_len);
6541}
6542static ssize_t cdb_len_store(struct device_driver *ddp, const char *buf,
6543			     size_t count)
6544{
6545	int ret, n;
6546
6547	ret = kstrtoint(buf, 0, &n);
6548	if (ret)
6549		return ret;
6550	sdebug_cdb_len = n;
6551	all_config_cdb_len();
6552	return count;
6553}
6554static DRIVER_ATTR_RW(cdb_len);
6555
6556static const char * const zbc_model_strs_a[] = {
6557	[BLK_ZONED_NONE] = "none",
6558	[BLK_ZONED_HA]   = "host-aware",
6559	[BLK_ZONED_HM]   = "host-managed",
6560};
6561
6562static const char * const zbc_model_strs_b[] = {
6563	[BLK_ZONED_NONE] = "no",
6564	[BLK_ZONED_HA]   = "aware",
6565	[BLK_ZONED_HM]   = "managed",
6566};
6567
6568static const char * const zbc_model_strs_c[] = {
6569	[BLK_ZONED_NONE] = "0",
6570	[BLK_ZONED_HA]   = "1",
6571	[BLK_ZONED_HM]   = "2",
6572};
6573
6574static int sdeb_zbc_model_str(const char *cp)
6575{
6576	int res = sysfs_match_string(zbc_model_strs_a, cp);
6577
6578	if (res < 0) {
6579		res = sysfs_match_string(zbc_model_strs_b, cp);
6580		if (res < 0) {
6581			res = sysfs_match_string(zbc_model_strs_c, cp);
6582			if (res < 0)
6583				return -EINVAL;
6584		}
6585	}
6586	return res;
6587}
6588
6589static ssize_t zbc_show(struct device_driver *ddp, char *buf)
6590{
6591	return scnprintf(buf, PAGE_SIZE, "%s\n",
6592			 zbc_model_strs_a[sdeb_zbc_model]);
6593}
6594static DRIVER_ATTR_RO(zbc);
6595
6596static ssize_t tur_ms_to_ready_show(struct device_driver *ddp, char *buf)
6597{
6598	return scnprintf(buf, PAGE_SIZE, "%d\n", sdeb_tur_ms_to_ready);
6599}
6600static DRIVER_ATTR_RO(tur_ms_to_ready);
6601
6602/* Note: The following array creates attribute files in the
6603   /sys/bus/pseudo/drivers/scsi_debug directory. The advantage of these
6604   files (over those found in the /sys/module/scsi_debug/parameters
6605   directory) is that auxiliary actions can be triggered when an attribute
6606   is changed. For example see: add_host_store() above.
6607 */
6608
6609static struct attribute *sdebug_drv_attrs[] = {
6610	&driver_attr_delay.attr,
6611	&driver_attr_opts.attr,
6612	&driver_attr_ptype.attr,
6613	&driver_attr_dsense.attr,
6614	&driver_attr_fake_rw.attr,
6615	&driver_attr_host_max_queue.attr,
6616	&driver_attr_no_lun_0.attr,
6617	&driver_attr_num_tgts.attr,
6618	&driver_attr_dev_size_mb.attr,
6619	&driver_attr_num_parts.attr,
6620	&driver_attr_every_nth.attr,
6621	&driver_attr_lun_format.attr,
6622	&driver_attr_max_luns.attr,
6623	&driver_attr_max_queue.attr,
6624	&driver_attr_no_uld.attr,
6625	&driver_attr_scsi_level.attr,
6626	&driver_attr_virtual_gb.attr,
6627	&driver_attr_add_host.attr,
6628	&driver_attr_per_host_store.attr,
6629	&driver_attr_vpd_use_hostno.attr,
6630	&driver_attr_sector_size.attr,
6631	&driver_attr_statistics.attr,
6632	&driver_attr_submit_queues.attr,
6633	&driver_attr_dix.attr,
6634	&driver_attr_dif.attr,
6635	&driver_attr_guard.attr,
6636	&driver_attr_ato.attr,
6637	&driver_attr_map.attr,
6638	&driver_attr_random.attr,
6639	&driver_attr_removable.attr,
6640	&driver_attr_host_lock.attr,
6641	&driver_attr_ndelay.attr,
6642	&driver_attr_strict.attr,
6643	&driver_attr_uuid_ctl.attr,
6644	&driver_attr_cdb_len.attr,
6645	&driver_attr_tur_ms_to_ready.attr,
6646	&driver_attr_zbc.attr,
6647	NULL,
6648};
6649ATTRIBUTE_GROUPS(sdebug_drv);
6650
6651static struct device *pseudo_primary;
6652
6653static int __init scsi_debug_init(void)
6654{
6655	bool want_store = (sdebug_fake_rw == 0);
6656	unsigned long sz;
6657	int k, ret, hosts_to_add;
6658	int idx = -1;
6659
6660	ramdisk_lck_a[0] = &atomic_rw;
6661	ramdisk_lck_a[1] = &atomic_rw2;
6662	atomic_set(&retired_max_queue, 0);
6663
6664	if (sdebug_ndelay >= 1000 * 1000 * 1000) {
6665		pr_warn("ndelay must be less than 1 second, ignored\n");
6666		sdebug_ndelay = 0;
6667	} else if (sdebug_ndelay > 0)
6668		sdebug_jdelay = JDELAY_OVERRIDDEN;
6669
6670	switch (sdebug_sector_size) {
6671	case  512:
6672	case 1024:
6673	case 2048:
6674	case 4096:
6675		break;
6676	default:
6677		pr_err("invalid sector_size %d\n", sdebug_sector_size);
6678		return -EINVAL;
6679	}
6680
6681	switch (sdebug_dif) {
6682	case T10_PI_TYPE0_PROTECTION:
6683		break;
6684	case T10_PI_TYPE1_PROTECTION:
6685	case T10_PI_TYPE2_PROTECTION:
6686	case T10_PI_TYPE3_PROTECTION:
6687		have_dif_prot = true;
6688		break;
6689
6690	default:
6691		pr_err("dif must be 0, 1, 2 or 3\n");
6692		return -EINVAL;
6693	}
6694
6695	if (sdebug_num_tgts < 0) {
6696		pr_err("num_tgts must be >= 0\n");
6697		return -EINVAL;
6698	}
6699
6700	if (sdebug_guard > 1) {
6701		pr_err("guard must be 0 or 1\n");
6702		return -EINVAL;
6703	}
6704
6705	if (sdebug_ato > 1) {
6706		pr_err("ato must be 0 or 1\n");
6707		return -EINVAL;
6708	}
6709
6710	if (sdebug_physblk_exp > 15) {
6711		pr_err("invalid physblk_exp %u\n", sdebug_physblk_exp);
6712		return -EINVAL;
6713	}
6714
6715	sdebug_lun_am = sdebug_lun_am_i;
6716	if (sdebug_lun_am > SAM_LUN_AM_FLAT) {
6717		pr_warn("Invalid LUN format %u, using default\n", (int)sdebug_lun_am);
6718		sdebug_lun_am = SAM_LUN_AM_PERIPHERAL;
6719	}
6720
6721	if (sdebug_max_luns > 256) {
6722		if (sdebug_max_luns > 16384) {
6723			pr_warn("max_luns can be no more than 16384, use default\n");
6724			sdebug_max_luns = DEF_MAX_LUNS;
6725		}
6726		sdebug_lun_am = SAM_LUN_AM_FLAT;
6727	}
6728
6729	if (sdebug_lowest_aligned > 0x3fff) {
6730		pr_err("lowest_aligned too big: %u\n", sdebug_lowest_aligned);
6731		return -EINVAL;
6732	}
6733
6734	if (submit_queues < 1) {
6735		pr_err("submit_queues must be 1 or more\n");
6736		return -EINVAL;
6737	}
6738
6739	if ((sdebug_max_queue > SDEBUG_CANQUEUE) || (sdebug_max_queue < 1)) {
6740		pr_err("max_queue must be in range [1, %d]\n", SDEBUG_CANQUEUE);
6741		return -EINVAL;
6742	}
6743
6744	if ((sdebug_host_max_queue > SDEBUG_CANQUEUE) ||
6745	    (sdebug_host_max_queue < 0)) {
6746		pr_err("host_max_queue must be in range [0 %d]\n",
6747		       SDEBUG_CANQUEUE);
6748		return -EINVAL;
6749	}
6750
6751	if (sdebug_host_max_queue &&
6752	    (sdebug_max_queue != sdebug_host_max_queue)) {
6753		sdebug_max_queue = sdebug_host_max_queue;
6754		pr_warn("fixing max submit queue depth to host max queue depth, %d\n",
6755			sdebug_max_queue);
6756	}
6757
6758	sdebug_q_arr = kcalloc(submit_queues, sizeof(struct sdebug_queue),
6759			       GFP_KERNEL);
6760	if (sdebug_q_arr == NULL)
6761		return -ENOMEM;
6762	for (k = 0; k < submit_queues; ++k)
6763		spin_lock_init(&sdebug_q_arr[k].qc_lock);
6764
6765	/*
6766	 * check for host managed zoned block device specified with
6767	 * ptype=0x14 or zbc=XXX.
6768	 */
6769	if (sdebug_ptype == TYPE_ZBC) {
6770		sdeb_zbc_model = BLK_ZONED_HM;
6771	} else if (sdeb_zbc_model_s && *sdeb_zbc_model_s) {
6772		k = sdeb_zbc_model_str(sdeb_zbc_model_s);
6773		if (k < 0) {
6774			ret = k;
6775			goto free_q_arr;
6776		}
6777		sdeb_zbc_model = k;
6778		switch (sdeb_zbc_model) {
6779		case BLK_ZONED_NONE:
6780		case BLK_ZONED_HA:
6781			sdebug_ptype = TYPE_DISK;
6782			break;
6783		case BLK_ZONED_HM:
6784			sdebug_ptype = TYPE_ZBC;
6785			break;
6786		default:
6787			pr_err("Invalid ZBC model\n");
6788			ret = -EINVAL;
6789			goto free_q_arr;
6790		}
6791	}
6792	if (sdeb_zbc_model != BLK_ZONED_NONE) {
6793		sdeb_zbc_in_use = true;
6794		if (sdebug_dev_size_mb == DEF_DEV_SIZE_PRE_INIT)
6795			sdebug_dev_size_mb = DEF_ZBC_DEV_SIZE_MB;
6796	}
6797
6798	if (sdebug_dev_size_mb == DEF_DEV_SIZE_PRE_INIT)
6799		sdebug_dev_size_mb = DEF_DEV_SIZE_MB;
6800	if (sdebug_dev_size_mb < 1)
6801		sdebug_dev_size_mb = 1;  /* force minimum 1 MB ramdisk */
6802	sz = (unsigned long)sdebug_dev_size_mb * 1048576;
6803	sdebug_store_sectors = sz / sdebug_sector_size;
6804	sdebug_capacity = get_sdebug_capacity();
6805
6806	/* play around with geometry, don't waste too much on track 0 */
6807	sdebug_heads = 8;
6808	sdebug_sectors_per = 32;
6809	if (sdebug_dev_size_mb >= 256)
6810		sdebug_heads = 64;
6811	else if (sdebug_dev_size_mb >= 16)
6812		sdebug_heads = 32;
6813	sdebug_cylinders_per = (unsigned long)sdebug_capacity /
6814			       (sdebug_sectors_per * sdebug_heads);
6815	if (sdebug_cylinders_per >= 1024) {
6816		/* other LLDs do this; implies >= 1GB ram disk ... */
6817		sdebug_heads = 255;
6818		sdebug_sectors_per = 63;
6819		sdebug_cylinders_per = (unsigned long)sdebug_capacity /
6820			       (sdebug_sectors_per * sdebug_heads);
6821	}
6822	if (scsi_debug_lbp()) {
6823		sdebug_unmap_max_blocks =
6824			clamp(sdebug_unmap_max_blocks, 0U, 0xffffffffU);
6825
6826		sdebug_unmap_max_desc =
6827			clamp(sdebug_unmap_max_desc, 0U, 256U);
6828
6829		sdebug_unmap_granularity =
6830			clamp(sdebug_unmap_granularity, 1U, 0xffffffffU);
6831
6832		if (sdebug_unmap_alignment &&
6833		    sdebug_unmap_granularity <=
6834		    sdebug_unmap_alignment) {
6835			pr_err("ERR: unmap_granularity <= unmap_alignment\n");
6836			ret = -EINVAL;
6837			goto free_q_arr;
6838		}
6839	}
6840	xa_init_flags(per_store_ap, XA_FLAGS_ALLOC | XA_FLAGS_LOCK_IRQ);
6841	if (want_store) {
6842		idx = sdebug_add_store();
6843		if (idx < 0) {
6844			ret = idx;
6845			goto free_q_arr;
6846		}
6847	}
6848
6849	pseudo_primary = root_device_register("pseudo_0");
6850	if (IS_ERR(pseudo_primary)) {
6851		pr_warn("root_device_register() error\n");
6852		ret = PTR_ERR(pseudo_primary);
6853		goto free_vm;
6854	}
6855	ret = bus_register(&pseudo_lld_bus);
6856	if (ret < 0) {
6857		pr_warn("bus_register error: %d\n", ret);
6858		goto dev_unreg;
6859	}
6860	ret = driver_register(&sdebug_driverfs_driver);
6861	if (ret < 0) {
6862		pr_warn("driver_register error: %d\n", ret);
6863		goto bus_unreg;
6864	}
6865
6866	hosts_to_add = sdebug_add_host;
6867	sdebug_add_host = 0;
6868
6869	for (k = 0; k < hosts_to_add; k++) {
6870		if (want_store && k == 0) {
6871			ret = sdebug_add_host_helper(idx);
6872			if (ret < 0) {
6873				pr_err("add_host_helper k=%d, error=%d\n",
6874				       k, -ret);
6875				break;
6876			}
6877		} else {
6878			ret = sdebug_do_add_host(want_store &&
6879						 sdebug_per_host_store);
6880			if (ret < 0) {
6881				pr_err("add_host k=%d error=%d\n", k, -ret);
6882				break;
6883			}
6884		}
6885	}
6886	if (sdebug_verbose)
6887		pr_info("built %d host(s)\n", sdebug_num_hosts);
6888
6889	return 0;
6890
6891bus_unreg:
6892	bus_unregister(&pseudo_lld_bus);
6893dev_unreg:
6894	root_device_unregister(pseudo_primary);
6895free_vm:
6896	sdebug_erase_store(idx, NULL);
6897free_q_arr:
6898	kfree(sdebug_q_arr);
6899	return ret;
6900}
6901
6902static void __exit scsi_debug_exit(void)
6903{
6904	int k = sdebug_num_hosts;
6905
6906	stop_all_queued();
6907	for (; k; k--)
6908		sdebug_do_remove_host(true);
6909	free_all_queued();
6910	driver_unregister(&sdebug_driverfs_driver);
6911	bus_unregister(&pseudo_lld_bus);
6912	root_device_unregister(pseudo_primary);
6913
6914	sdebug_erase_all_stores(false);
6915	xa_destroy(per_store_ap);
6916	kfree(sdebug_q_arr);
6917}
6918
6919device_initcall(scsi_debug_init);
6920module_exit(scsi_debug_exit);
6921
6922static void sdebug_release_adapter(struct device *dev)
6923{
6924	struct sdebug_host_info *sdbg_host;
6925
6926	sdbg_host = to_sdebug_host(dev);
6927	kfree(sdbg_host);
6928}
6929
6930/* idx must be valid, if sip is NULL then it will be obtained using idx */
6931static void sdebug_erase_store(int idx, struct sdeb_store_info *sip)
6932{
6933	if (idx < 0)
6934		return;
6935	if (!sip) {
6936		if (xa_empty(per_store_ap))
6937			return;
6938		sip = xa_load(per_store_ap, idx);
6939		if (!sip)
6940			return;
6941	}
6942	vfree(sip->map_storep);
6943	vfree(sip->dif_storep);
6944	vfree(sip->storep);
6945	xa_erase(per_store_ap, idx);
6946	kfree(sip);
6947}
6948
6949/* Assume apart_from_first==false only in shutdown case. */
6950static void sdebug_erase_all_stores(bool apart_from_first)
6951{
6952	unsigned long idx;
6953	struct sdeb_store_info *sip = NULL;
6954
6955	xa_for_each(per_store_ap, idx, sip) {
6956		if (apart_from_first)
6957			apart_from_first = false;
6958		else
6959			sdebug_erase_store(idx, sip);
6960	}
6961	if (apart_from_first)
6962		sdeb_most_recent_idx = sdeb_first_idx;
6963}
6964
6965/*
6966 * Returns store xarray new element index (idx) if >=0 else negated errno.
6967 * Limit the number of stores to 65536.
6968 */
6969static int sdebug_add_store(void)
6970{
6971	int res;
6972	u32 n_idx;
6973	unsigned long iflags;
6974	unsigned long sz = (unsigned long)sdebug_dev_size_mb * 1048576;
6975	struct sdeb_store_info *sip = NULL;
6976	struct xa_limit xal = { .max = 1 << 16, .min = 0 };
6977
6978	sip = kzalloc(sizeof(*sip), GFP_KERNEL);
6979	if (!sip)
6980		return -ENOMEM;
6981
6982	xa_lock_irqsave(per_store_ap, iflags);
6983	res = __xa_alloc(per_store_ap, &n_idx, sip, xal, GFP_ATOMIC);
6984	if (unlikely(res < 0)) {
6985		xa_unlock_irqrestore(per_store_ap, iflags);
6986		kfree(sip);
6987		pr_warn("%s: xa_alloc() errno=%d\n", __func__, -res);
6988		return res;
6989	}
6990	sdeb_most_recent_idx = n_idx;
6991	if (sdeb_first_idx < 0)
6992		sdeb_first_idx = n_idx;
6993	xa_unlock_irqrestore(per_store_ap, iflags);
6994
6995	res = -ENOMEM;
6996	sip->storep = vzalloc(sz);
6997	if (!sip->storep) {
6998		pr_err("user data oom\n");
6999		goto err;
7000	}
7001	if (sdebug_num_parts > 0)
7002		sdebug_build_parts(sip->storep, sz);
7003
7004	/* DIF/DIX: what T10 calls Protection Information (PI) */
7005	if (sdebug_dix) {
7006		int dif_size;
7007
7008		dif_size = sdebug_store_sectors * sizeof(struct t10_pi_tuple);
7009		sip->dif_storep = vmalloc(dif_size);
7010
7011		pr_info("dif_storep %u bytes @ %pK\n", dif_size,
7012			sip->dif_storep);
7013
7014		if (!sip->dif_storep) {
7015			pr_err("DIX oom\n");
7016			goto err;
7017		}
7018		memset(sip->dif_storep, 0xff, dif_size);
7019	}
7020	/* Logical Block Provisioning */
7021	if (scsi_debug_lbp()) {
7022		map_size = lba_to_map_index(sdebug_store_sectors - 1) + 1;
7023		sip->map_storep = vmalloc(array_size(sizeof(long),
7024						     BITS_TO_LONGS(map_size)));
7025
7026		pr_info("%lu provisioning blocks\n", map_size);
7027
7028		if (!sip->map_storep) {
7029			pr_err("LBP map oom\n");
7030			goto err;
7031		}
7032
7033		bitmap_zero(sip->map_storep, map_size);
7034
7035		/* Map first 1KB for partition table */
7036		if (sdebug_num_parts)
7037			map_region(sip, 0, 2);
7038	}
7039
7040	rwlock_init(&sip->macc_lck);
7041	return (int)n_idx;
7042err:
7043	sdebug_erase_store((int)n_idx, sip);
7044	pr_warn("%s: failed, errno=%d\n", __func__, -res);
7045	return res;
7046}
7047
7048static int sdebug_add_host_helper(int per_host_idx)
7049{
7050	int k, devs_per_host, idx;
7051	int error = -ENOMEM;
7052	struct sdebug_host_info *sdbg_host;
7053	struct sdebug_dev_info *sdbg_devinfo, *tmp;
7054
7055	sdbg_host = kzalloc(sizeof(*sdbg_host), GFP_KERNEL);
7056	if (!sdbg_host)
7057		return -ENOMEM;
7058	idx = (per_host_idx < 0) ? sdeb_first_idx : per_host_idx;
7059	if (xa_get_mark(per_store_ap, idx, SDEB_XA_NOT_IN_USE))
7060		xa_clear_mark(per_store_ap, idx, SDEB_XA_NOT_IN_USE);
7061	sdbg_host->si_idx = idx;
7062
7063	INIT_LIST_HEAD(&sdbg_host->dev_info_list);
7064
7065	devs_per_host = sdebug_num_tgts * sdebug_max_luns;
7066	for (k = 0; k < devs_per_host; k++) {
7067		sdbg_devinfo = sdebug_device_create(sdbg_host, GFP_KERNEL);
7068		if (!sdbg_devinfo)
7069			goto clean;
7070	}
7071
7072	spin_lock(&sdebug_host_list_lock);
7073	list_add_tail(&sdbg_host->host_list, &sdebug_host_list);
7074	spin_unlock(&sdebug_host_list_lock);
7075
7076	sdbg_host->dev.bus = &pseudo_lld_bus;
7077	sdbg_host->dev.parent = pseudo_primary;
7078	sdbg_host->dev.release = &sdebug_release_adapter;
7079	dev_set_name(&sdbg_host->dev, "adapter%d", sdebug_num_hosts);
7080
7081	error = device_register(&sdbg_host->dev);
7082	if (error)
7083		goto clean;
7084
7085	++sdebug_num_hosts;
7086	return 0;
7087
7088clean:
7089	list_for_each_entry_safe(sdbg_devinfo, tmp, &sdbg_host->dev_info_list,
7090				 dev_list) {
7091		list_del(&sdbg_devinfo->dev_list);
7092		kfree(sdbg_devinfo->zstate);
7093		kfree(sdbg_devinfo);
7094	}
7095	kfree(sdbg_host);
7096	pr_warn("%s: failed, errno=%d\n", __func__, -error);
7097	return error;
7098}
7099
7100static int sdebug_do_add_host(bool mk_new_store)
7101{
7102	int ph_idx = sdeb_most_recent_idx;
7103
7104	if (mk_new_store) {
7105		ph_idx = sdebug_add_store();
7106		if (ph_idx < 0)
7107			return ph_idx;
7108	}
7109	return sdebug_add_host_helper(ph_idx);
7110}
7111
7112static void sdebug_do_remove_host(bool the_end)
7113{
7114	int idx = -1;
7115	struct sdebug_host_info *sdbg_host = NULL;
7116	struct sdebug_host_info *sdbg_host2;
7117
7118	spin_lock(&sdebug_host_list_lock);
7119	if (!list_empty(&sdebug_host_list)) {
7120		sdbg_host = list_entry(sdebug_host_list.prev,
7121				       struct sdebug_host_info, host_list);
7122		idx = sdbg_host->si_idx;
7123	}
7124	if (!the_end && idx >= 0) {
7125		bool unique = true;
7126
7127		list_for_each_entry(sdbg_host2, &sdebug_host_list, host_list) {
7128			if (sdbg_host2 == sdbg_host)
7129				continue;
7130			if (idx == sdbg_host2->si_idx) {
7131				unique = false;
7132				break;
7133			}
7134		}
7135		if (unique) {
7136			xa_set_mark(per_store_ap, idx, SDEB_XA_NOT_IN_USE);
7137			if (idx == sdeb_most_recent_idx)
7138				--sdeb_most_recent_idx;
7139		}
7140	}
7141	if (sdbg_host)
7142		list_del(&sdbg_host->host_list);
7143	spin_unlock(&sdebug_host_list_lock);
7144
7145	if (!sdbg_host)
7146		return;
7147
7148	device_unregister(&sdbg_host->dev);
7149	--sdebug_num_hosts;
7150}
7151
7152static int sdebug_change_qdepth(struct scsi_device *sdev, int qdepth)
7153{
7154	int num_in_q = 0;
7155	struct sdebug_dev_info *devip;
7156
7157	block_unblock_all_queues(true);
7158	devip = (struct sdebug_dev_info *)sdev->hostdata;
7159	if (NULL == devip) {
7160		block_unblock_all_queues(false);
7161		return	-ENODEV;
7162	}
7163	num_in_q = atomic_read(&devip->num_in_q);
7164
7165	if (qdepth > SDEBUG_CANQUEUE) {
7166		qdepth = SDEBUG_CANQUEUE;
7167		pr_warn("%s: requested qdepth [%d] exceeds canqueue [%d], trim\n", __func__,
7168			qdepth, SDEBUG_CANQUEUE);
7169	}
7170	if (qdepth < 1)
7171		qdepth = 1;
7172	if (qdepth != sdev->queue_depth)
7173		scsi_change_queue_depth(sdev, qdepth);
 
 
7174
7175	if (SDEBUG_OPT_Q_NOISE & sdebug_opts) {
7176		sdev_printk(KERN_INFO, sdev, "%s: qdepth=%d, num_in_q=%d\n",
7177			    __func__, qdepth, num_in_q);
7178	}
7179	block_unblock_all_queues(false);
7180	return sdev->queue_depth;
7181}
7182
7183static bool fake_timeout(struct scsi_cmnd *scp)
7184{
7185	if (0 == (atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth))) {
7186		if (sdebug_every_nth < -1)
7187			sdebug_every_nth = -1;
7188		if (SDEBUG_OPT_TIMEOUT & sdebug_opts)
7189			return true; /* ignore command causing timeout */
7190		else if (SDEBUG_OPT_MAC_TIMEOUT & sdebug_opts &&
7191			 scsi_medium_access_command(scp))
7192			return true; /* time out reads and writes */
7193	}
7194	return false;
7195}
7196
7197/* Response to TUR or media access command when device stopped */
7198static int resp_not_ready(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
7199{
7200	int stopped_state;
7201	u64 diff_ns = 0;
7202	ktime_t now_ts = ktime_get_boottime();
7203	struct scsi_device *sdp = scp->device;
7204
7205	stopped_state = atomic_read(&devip->stopped);
7206	if (stopped_state == 2) {
7207		if (ktime_to_ns(now_ts) > ktime_to_ns(devip->create_ts)) {
7208			diff_ns = ktime_to_ns(ktime_sub(now_ts, devip->create_ts));
7209			if (diff_ns >= ((u64)sdeb_tur_ms_to_ready * 1000000)) {
7210				/* tur_ms_to_ready timer extinguished */
7211				atomic_set(&devip->stopped, 0);
7212				return 0;
7213			}
7214		}
7215		mk_sense_buffer(scp, NOT_READY, LOGICAL_UNIT_NOT_READY, 0x1);
7216		if (sdebug_verbose)
7217			sdev_printk(KERN_INFO, sdp,
7218				    "%s: Not ready: in process of becoming ready\n", my_name);
7219		if (scp->cmnd[0] == TEST_UNIT_READY) {
7220			u64 tur_nanosecs_to_ready = (u64)sdeb_tur_ms_to_ready * 1000000;
7221
7222			if (diff_ns <= tur_nanosecs_to_ready)
7223				diff_ns = tur_nanosecs_to_ready - diff_ns;
7224			else
7225				diff_ns = tur_nanosecs_to_ready;
7226			/* As per 20-061r2 approved for spc6 by T10 on 20200716 */
7227			do_div(diff_ns, 1000000);	/* diff_ns becomes milliseconds */
7228			scsi_set_sense_information(scp->sense_buffer, SCSI_SENSE_BUFFERSIZE,
7229						   diff_ns);
7230			return check_condition_result;
7231		}
7232	}
7233	mk_sense_buffer(scp, NOT_READY, LOGICAL_UNIT_NOT_READY, 0x2);
7234	if (sdebug_verbose)
7235		sdev_printk(KERN_INFO, sdp, "%s: Not ready: initializing command required\n",
7236			    my_name);
7237	return check_condition_result;
7238}
7239
7240static int sdebug_map_queues(struct Scsi_Host *shost)
7241{
7242	int i, qoff;
7243
7244	if (shost->nr_hw_queues == 1)
7245		return 0;
7246
7247	for (i = 0, qoff = 0; i < HCTX_MAX_TYPES; i++) {
7248		struct blk_mq_queue_map *map = &shost->tag_set.map[i];
7249
7250		map->nr_queues  = 0;
7251
7252		if (i == HCTX_TYPE_DEFAULT)
7253			map->nr_queues = submit_queues - poll_queues;
7254		else if (i == HCTX_TYPE_POLL)
7255			map->nr_queues = poll_queues;
7256
7257		if (!map->nr_queues) {
7258			BUG_ON(i == HCTX_TYPE_DEFAULT);
7259			continue;
7260		}
7261
7262		map->queue_offset = qoff;
7263		blk_mq_map_queues(map);
7264
7265		qoff += map->nr_queues;
7266	}
7267
7268	return 0;
7269
7270}
7271
7272static int sdebug_blk_mq_poll(struct Scsi_Host *shost, unsigned int queue_num)
7273{
7274	bool first;
7275	bool retiring = false;
7276	int num_entries = 0;
7277	unsigned int qc_idx = 0;
7278	unsigned long iflags;
7279	ktime_t kt_from_boot = ktime_get_boottime();
7280	struct sdebug_queue *sqp;
7281	struct sdebug_queued_cmd *sqcp;
7282	struct scsi_cmnd *scp;
7283	struct sdebug_dev_info *devip;
7284	struct sdebug_defer *sd_dp;
7285
7286	sqp = sdebug_q_arr + queue_num;
7287	spin_lock_irqsave(&sqp->qc_lock, iflags);
7288
7289	for (first = true; first || qc_idx + 1 < sdebug_max_queue; )   {
7290		if (first) {
7291			qc_idx = find_first_bit(sqp->in_use_bm, sdebug_max_queue);
7292			first = false;
7293		} else {
7294			qc_idx = find_next_bit(sqp->in_use_bm, sdebug_max_queue, qc_idx + 1);
7295		}
7296		if (unlikely(qc_idx >= sdebug_max_queue))
7297			break;
7298
7299		sqcp = &sqp->qc_arr[qc_idx];
7300		sd_dp = sqcp->sd_dp;
7301		if (unlikely(!sd_dp))
7302			continue;
7303		scp = sqcp->a_cmnd;
7304		if (unlikely(scp == NULL)) {
7305			pr_err("scp is NULL, queue_num=%d, qc_idx=%u from %s\n",
7306			       queue_num, qc_idx, __func__);
7307			break;
7308		}
7309		if (sd_dp->defer_t == SDEB_DEFER_POLL) {
7310			if (kt_from_boot < sd_dp->cmpl_ts)
7311				continue;
7312
7313		} else		/* ignoring non REQ_HIPRI requests */
7314			continue;
7315		devip = (struct sdebug_dev_info *)scp->device->hostdata;
7316		if (likely(devip))
7317			atomic_dec(&devip->num_in_q);
7318		else
7319			pr_err("devip=NULL from %s\n", __func__);
7320		if (unlikely(atomic_read(&retired_max_queue) > 0))
7321			retiring = true;
7322
7323		sqcp->a_cmnd = NULL;
7324		if (unlikely(!test_and_clear_bit(qc_idx, sqp->in_use_bm))) {
7325			pr_err("Unexpected completion sqp %p queue_num=%d qc_idx=%u from %s\n",
7326				sqp, queue_num, qc_idx, __func__);
7327			break;
7328		}
7329		if (unlikely(retiring)) {	/* user has reduced max_queue */
7330			int k, retval;
7331
7332			retval = atomic_read(&retired_max_queue);
7333			if (qc_idx >= retval) {
7334				pr_err("index %d too large\n", retval);
7335				break;
7336			}
7337			k = find_last_bit(sqp->in_use_bm, retval);
7338			if ((k < sdebug_max_queue) || (k == retval))
7339				atomic_set(&retired_max_queue, 0);
7340			else
7341				atomic_set(&retired_max_queue, k + 1);
7342		}
7343		sd_dp->defer_t = SDEB_DEFER_NONE;
7344		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
7345		scp->scsi_done(scp); /* callback to mid level */
7346		spin_lock_irqsave(&sqp->qc_lock, iflags);
7347		num_entries++;
7348	}
7349	spin_unlock_irqrestore(&sqp->qc_lock, iflags);
7350	if (num_entries > 0)
7351		atomic_add(num_entries, &sdeb_mq_poll_count);
7352	return num_entries;
7353}
7354
7355static int scsi_debug_queuecommand(struct Scsi_Host *shost,
7356				   struct scsi_cmnd *scp)
7357{
7358	u8 sdeb_i;
7359	struct scsi_device *sdp = scp->device;
7360	const struct opcode_info_t *oip;
7361	const struct opcode_info_t *r_oip;
7362	struct sdebug_dev_info *devip;
7363	u8 *cmd = scp->cmnd;
7364	int (*r_pfp)(struct scsi_cmnd *, struct sdebug_dev_info *);
7365	int (*pfp)(struct scsi_cmnd *, struct sdebug_dev_info *) = NULL;
7366	int k, na;
7367	int errsts = 0;
7368	u64 lun_index = sdp->lun & 0x3FFF;
7369	u32 flags;
7370	u16 sa;
7371	u8 opcode = cmd[0];
7372	bool has_wlun_rl;
7373	bool inject_now;
7374
7375	scsi_set_resid(scp, 0);
7376	if (sdebug_statistics) {
7377		atomic_inc(&sdebug_cmnd_count);
7378		inject_now = inject_on_this_cmd();
7379	} else {
7380		inject_now = false;
7381	}
7382	if (unlikely(sdebug_verbose &&
7383		     !(SDEBUG_OPT_NO_CDB_NOISE & sdebug_opts))) {
7384		char b[120];
7385		int n, len, sb;
7386
7387		len = scp->cmd_len;
7388		sb = (int)sizeof(b);
7389		if (len > 32)
7390			strcpy(b, "too long, over 32 bytes");
7391		else {
7392			for (k = 0, n = 0; k < len && n < sb; ++k)
7393				n += scnprintf(b + n, sb - n, "%02x ",
7394					       (u32)cmd[k]);
7395		}
7396		sdev_printk(KERN_INFO, sdp, "%s: tag=%#x, cmd %s\n", my_name,
7397			    blk_mq_unique_tag(scp->request), b);
7398	}
7399	if (unlikely(inject_now && (sdebug_opts & SDEBUG_OPT_HOST_BUSY)))
7400		return SCSI_MLQUEUE_HOST_BUSY;
7401	has_wlun_rl = (sdp->lun == SCSI_W_LUN_REPORT_LUNS);
7402	if (unlikely(lun_index >= sdebug_max_luns && !has_wlun_rl))
7403		goto err_out;
7404
7405	sdeb_i = opcode_ind_arr[opcode];	/* fully mapped */
7406	oip = &opcode_info_arr[sdeb_i];		/* safe if table consistent */
7407	devip = (struct sdebug_dev_info *)sdp->hostdata;
7408	if (unlikely(!devip)) {
7409		devip = find_build_dev_info(sdp);
7410		if (NULL == devip)
7411			goto err_out;
7412	}
7413	if (unlikely(inject_now && !atomic_read(&sdeb_inject_pending)))
7414		atomic_set(&sdeb_inject_pending, 1);
7415
7416	na = oip->num_attached;
7417	r_pfp = oip->pfp;
7418	if (na) {	/* multiple commands with this opcode */
7419		r_oip = oip;
7420		if (FF_SA & r_oip->flags) {
7421			if (F_SA_LOW & oip->flags)
7422				sa = 0x1f & cmd[1];
7423			else
7424				sa = get_unaligned_be16(cmd + 8);
7425			for (k = 0; k <= na; oip = r_oip->arrp + k++) {
7426				if (opcode == oip->opcode && sa == oip->sa)
7427					break;
7428			}
7429		} else {   /* since no service action only check opcode */
7430			for (k = 0; k <= na; oip = r_oip->arrp + k++) {
7431				if (opcode == oip->opcode)
7432					break;
7433			}
7434		}
7435		if (k > na) {
7436			if (F_SA_LOW & r_oip->flags)
7437				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 4);
7438			else if (F_SA_HIGH & r_oip->flags)
7439				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 8, 7);
7440			else
7441				mk_sense_invalid_opcode(scp);
7442			goto check_cond;
7443		}
7444	}	/* else (when na==0) we assume the oip is a match */
7445	flags = oip->flags;
7446	if (unlikely(F_INV_OP & flags)) {
7447		mk_sense_invalid_opcode(scp);
7448		goto check_cond;
7449	}
7450	if (unlikely(has_wlun_rl && !(F_RL_WLUN_OK & flags))) {
7451		if (sdebug_verbose)
7452			sdev_printk(KERN_INFO, sdp, "%s: Opcode 0x%x not%s\n",
7453				    my_name, opcode, " supported for wlun");
7454		mk_sense_invalid_opcode(scp);
7455		goto check_cond;
7456	}
7457	if (unlikely(sdebug_strict)) {	/* check cdb against mask */
7458		u8 rem;
7459		int j;
7460
7461		for (k = 1; k < oip->len_mask[0] && k < 16; ++k) {
7462			rem = ~oip->len_mask[k] & cmd[k];
7463			if (rem) {
7464				for (j = 7; j >= 0; --j, rem <<= 1) {
7465					if (0x80 & rem)
7466						break;
7467				}
7468				mk_sense_invalid_fld(scp, SDEB_IN_CDB, k, j);
7469				goto check_cond;
7470			}
7471		}
7472	}
7473	if (unlikely(!(F_SKIP_UA & flags) &&
7474		     find_first_bit(devip->uas_bm,
7475				    SDEBUG_NUM_UAS) != SDEBUG_NUM_UAS)) {
7476		errsts = make_ua(scp, devip);
7477		if (errsts)
7478			goto check_cond;
7479	}
7480	if (unlikely(((F_M_ACCESS & flags) || scp->cmnd[0] == TEST_UNIT_READY) &&
7481		     atomic_read(&devip->stopped))) {
7482		errsts = resp_not_ready(scp, devip);
7483		if (errsts)
7484			goto fini;
7485	}
7486	if (sdebug_fake_rw && (F_FAKE_RW & flags))
7487		goto fini;
7488	if (unlikely(sdebug_every_nth)) {
7489		if (fake_timeout(scp))
7490			return 0;	/* ignore command: make trouble */
7491	}
7492	if (likely(oip->pfp))
7493		pfp = oip->pfp;	/* calls a resp_* function */
7494	else
7495		pfp = r_pfp;    /* if leaf function ptr NULL, try the root's */
7496
7497fini:
7498	if (F_DELAY_OVERR & flags)	/* cmds like INQUIRY respond asap */
7499		return schedule_resp(scp, devip, errsts, pfp, 0, 0);
7500	else if ((flags & F_LONG_DELAY) && (sdebug_jdelay > 0 ||
7501					    sdebug_ndelay > 10000)) {
7502		/*
7503		 * Skip long delays if ndelay <= 10 microseconds. Otherwise
7504		 * for Start Stop Unit (SSU) want at least 1 second delay and
7505		 * if sdebug_jdelay>1 want a long delay of that many seconds.
7506		 * For Synchronize Cache want 1/20 of SSU's delay.
7507		 */
7508		int jdelay = (sdebug_jdelay < 2) ? 1 : sdebug_jdelay;
7509		int denom = (flags & F_SYNC_DELAY) ? 20 : 1;
7510
7511		jdelay = mult_frac(USER_HZ * jdelay, HZ, denom * USER_HZ);
7512		return schedule_resp(scp, devip, errsts, pfp, jdelay, 0);
7513	} else
7514		return schedule_resp(scp, devip, errsts, pfp, sdebug_jdelay,
7515				     sdebug_ndelay);
7516check_cond:
7517	return schedule_resp(scp, devip, check_condition_result, NULL, 0, 0);
7518err_out:
7519	return schedule_resp(scp, NULL, DID_NO_CONNECT << 16, NULL, 0, 0);
7520}
7521
7522static struct scsi_host_template sdebug_driver_template = {
7523	.show_info =		scsi_debug_show_info,
7524	.write_info =		scsi_debug_write_info,
7525	.proc_name =		sdebug_proc_name,
7526	.name =			"SCSI DEBUG",
7527	.info =			scsi_debug_info,
7528	.slave_alloc =		scsi_debug_slave_alloc,
7529	.slave_configure =	scsi_debug_slave_configure,
7530	.slave_destroy =	scsi_debug_slave_destroy,
7531	.ioctl =		scsi_debug_ioctl,
7532	.queuecommand =		scsi_debug_queuecommand,
7533	.change_queue_depth =	sdebug_change_qdepth,
7534	.map_queues =		sdebug_map_queues,
7535	.mq_poll =		sdebug_blk_mq_poll,
7536	.eh_abort_handler =	scsi_debug_abort,
7537	.eh_device_reset_handler = scsi_debug_device_reset,
7538	.eh_target_reset_handler = scsi_debug_target_reset,
7539	.eh_bus_reset_handler = scsi_debug_bus_reset,
7540	.eh_host_reset_handler = scsi_debug_host_reset,
7541	.can_queue =		SDEBUG_CANQUEUE,
7542	.this_id =		7,
7543	.sg_tablesize =		SG_MAX_SEGMENTS,
7544	.cmd_per_lun =		DEF_CMD_PER_LUN,
7545	.max_sectors =		-1U,
7546	.max_segment_size =	-1U,
7547	.module =		THIS_MODULE,
7548	.track_queue_depth =	1,
7549};
7550
7551static int sdebug_driver_probe(struct device *dev)
7552{
7553	int error = 0;
7554	struct sdebug_host_info *sdbg_host;
7555	struct Scsi_Host *hpnt;
7556	int hprot;
7557
7558	sdbg_host = to_sdebug_host(dev);
7559
7560	sdebug_driver_template.can_queue = sdebug_max_queue;
7561	sdebug_driver_template.cmd_per_lun = sdebug_max_queue;
 
 
7562	if (!sdebug_clustering)
7563		sdebug_driver_template.dma_boundary = PAGE_SIZE - 1;
7564
7565	hpnt = scsi_host_alloc(&sdebug_driver_template, sizeof(sdbg_host));
7566	if (NULL == hpnt) {
7567		pr_err("scsi_host_alloc failed\n");
7568		error = -ENODEV;
7569		return error;
7570	}
7571	if (submit_queues > nr_cpu_ids) {
7572		pr_warn("%s: trim submit_queues (was %d) to nr_cpu_ids=%u\n",
7573			my_name, submit_queues, nr_cpu_ids);
7574		submit_queues = nr_cpu_ids;
7575	}
7576	/*
7577	 * Decide whether to tell scsi subsystem that we want mq. The
7578	 * following should give the same answer for each host.
7579	 */
7580	hpnt->nr_hw_queues = submit_queues;
7581	if (sdebug_host_max_queue)
7582		hpnt->host_tagset = 1;
7583
7584	/* poll queues are possible for nr_hw_queues > 1 */
7585	if (hpnt->nr_hw_queues == 1 || (poll_queues < 1)) {
7586		pr_warn("%s: trim poll_queues to 0. poll_q/nr_hw = (%d/%d)\n",
7587			 my_name, poll_queues, hpnt->nr_hw_queues);
7588		poll_queues = 0;
7589	}
7590
7591	/*
7592	 * Poll queues don't need interrupts, but we need at least one I/O queue
7593	 * left over for non-polled I/O.
7594	 * If condition not met, trim poll_queues to 1 (just for simplicity).
7595	 */
7596	if (poll_queues >= submit_queues) {
7597		if (submit_queues < 3)
7598			pr_warn("%s: trim poll_queues to 1\n", my_name);
7599		else
7600			pr_warn("%s: trim poll_queues to 1. Perhaps try poll_queues=%d\n",
7601				my_name, submit_queues - 1);
7602		poll_queues = 1;
7603	}
7604	if (poll_queues)
7605		hpnt->nr_maps = 3;
7606
7607	sdbg_host->shost = hpnt;
7608	*((struct sdebug_host_info **)hpnt->hostdata) = sdbg_host;
7609	if ((hpnt->this_id >= 0) && (sdebug_num_tgts > hpnt->this_id))
7610		hpnt->max_id = sdebug_num_tgts + 1;
7611	else
7612		hpnt->max_id = sdebug_num_tgts;
7613	/* = sdebug_max_luns; */
7614	hpnt->max_lun = SCSI_W_LUN_REPORT_LUNS + 1;
7615
7616	hprot = 0;
7617
7618	switch (sdebug_dif) {
7619
7620	case T10_PI_TYPE1_PROTECTION:
7621		hprot = SHOST_DIF_TYPE1_PROTECTION;
7622		if (sdebug_dix)
7623			hprot |= SHOST_DIX_TYPE1_PROTECTION;
7624		break;
7625
7626	case T10_PI_TYPE2_PROTECTION:
7627		hprot = SHOST_DIF_TYPE2_PROTECTION;
7628		if (sdebug_dix)
7629			hprot |= SHOST_DIX_TYPE2_PROTECTION;
7630		break;
7631
7632	case T10_PI_TYPE3_PROTECTION:
7633		hprot = SHOST_DIF_TYPE3_PROTECTION;
7634		if (sdebug_dix)
7635			hprot |= SHOST_DIX_TYPE3_PROTECTION;
7636		break;
7637
7638	default:
7639		if (sdebug_dix)
7640			hprot |= SHOST_DIX_TYPE0_PROTECTION;
7641		break;
7642	}
7643
7644	scsi_host_set_prot(hpnt, hprot);
7645
7646	if (have_dif_prot || sdebug_dix)
7647		pr_info("host protection%s%s%s%s%s%s%s\n",
7648			(hprot & SHOST_DIF_TYPE1_PROTECTION) ? " DIF1" : "",
7649			(hprot & SHOST_DIF_TYPE2_PROTECTION) ? " DIF2" : "",
7650			(hprot & SHOST_DIF_TYPE3_PROTECTION) ? " DIF3" : "",
7651			(hprot & SHOST_DIX_TYPE0_PROTECTION) ? " DIX0" : "",
7652			(hprot & SHOST_DIX_TYPE1_PROTECTION) ? " DIX1" : "",
7653			(hprot & SHOST_DIX_TYPE2_PROTECTION) ? " DIX2" : "",
7654			(hprot & SHOST_DIX_TYPE3_PROTECTION) ? " DIX3" : "");
7655
7656	if (sdebug_guard == 1)
7657		scsi_host_set_guard(hpnt, SHOST_DIX_GUARD_IP);
7658	else
7659		scsi_host_set_guard(hpnt, SHOST_DIX_GUARD_CRC);
7660
7661	sdebug_verbose = !!(SDEBUG_OPT_NOISE & sdebug_opts);
7662	sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & sdebug_opts);
7663	if (sdebug_every_nth)	/* need stats counters for every_nth */
7664		sdebug_statistics = true;
7665	error = scsi_add_host(hpnt, &sdbg_host->dev);
7666	if (error) {
7667		pr_err("scsi_add_host failed\n");
7668		error = -ENODEV;
7669		scsi_host_put(hpnt);
7670	} else {
7671		scsi_scan_host(hpnt);
7672	}
7673
7674	return error;
7675}
7676
7677static int sdebug_driver_remove(struct device *dev)
7678{
7679	struct sdebug_host_info *sdbg_host;
7680	struct sdebug_dev_info *sdbg_devinfo, *tmp;
7681
7682	sdbg_host = to_sdebug_host(dev);
 
 
 
 
 
7683
7684	scsi_remove_host(sdbg_host->shost);
7685
7686	list_for_each_entry_safe(sdbg_devinfo, tmp, &sdbg_host->dev_info_list,
7687				 dev_list) {
7688		list_del(&sdbg_devinfo->dev_list);
7689		kfree(sdbg_devinfo->zstate);
7690		kfree(sdbg_devinfo);
7691	}
7692
7693	scsi_host_put(sdbg_host->shost);
7694	return 0;
7695}
7696
7697static int pseudo_lld_bus_match(struct device *dev,
7698				struct device_driver *dev_driver)
7699{
7700	return 1;
7701}
7702
7703static struct bus_type pseudo_lld_bus = {
7704	.name = "pseudo",
7705	.match = pseudo_lld_bus_match,
7706	.probe = sdebug_driver_probe,
7707	.remove = sdebug_driver_remove,
7708	.drv_groups = sdebug_drv_groups,
7709};
v5.9
   1// SPDX-License-Identifier: GPL-2.0-or-later
   2/*
   3 * vvvvvvvvvvvvvvvvvvvvvvv Original vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
   4 *  Copyright (C) 1992  Eric Youngdale
   5 *  Simulate a host adapter with 2 disks attached.  Do a lot of checking
   6 *  to make sure that we are not getting blocks mixed up, and PANIC if
   7 *  anything out of the ordinary is seen.
   8 * ^^^^^^^^^^^^^^^^^^^^^^^ Original ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
   9 *
  10 * Copyright (C) 2001 - 2020 Douglas Gilbert
  11 *
  12 *  For documentation see http://sg.danny.cz/sg/scsi_debug.html
  13 */
  14
  15
  16#define pr_fmt(fmt) KBUILD_MODNAME ":%s: " fmt, __func__
  17
  18#include <linux/module.h>
  19
  20#include <linux/kernel.h>
  21#include <linux/errno.h>
  22#include <linux/jiffies.h>
  23#include <linux/slab.h>
  24#include <linux/types.h>
  25#include <linux/string.h>
  26#include <linux/genhd.h>
  27#include <linux/fs.h>
  28#include <linux/init.h>
  29#include <linux/proc_fs.h>
  30#include <linux/vmalloc.h>
  31#include <linux/moduleparam.h>
  32#include <linux/scatterlist.h>
  33#include <linux/blkdev.h>
  34#include <linux/crc-t10dif.h>
  35#include <linux/spinlock.h>
  36#include <linux/interrupt.h>
  37#include <linux/atomic.h>
  38#include <linux/hrtimer.h>
  39#include <linux/uuid.h>
  40#include <linux/t10-pi.h>
  41#include <linux/msdos_partition.h>
  42#include <linux/random.h>
  43#include <linux/xarray.h>
  44#include <linux/prefetch.h>
  45
  46#include <net/checksum.h>
  47
  48#include <asm/unaligned.h>
  49
  50#include <scsi/scsi.h>
  51#include <scsi/scsi_cmnd.h>
  52#include <scsi/scsi_device.h>
  53#include <scsi/scsi_host.h>
  54#include <scsi/scsicam.h>
  55#include <scsi/scsi_eh.h>
  56#include <scsi/scsi_tcq.h>
  57#include <scsi/scsi_dbg.h>
  58
  59#include "sd.h"
  60#include "scsi_logging.h"
  61
  62/* make sure inq_product_rev string corresponds to this version */
  63#define SDEBUG_VERSION "0190"	/* format to fit INQUIRY revision field */
  64static const char *sdebug_version_date = "20200710";
  65
  66#define MY_NAME "scsi_debug"
  67
  68/* Additional Sense Code (ASC) */
  69#define NO_ADDITIONAL_SENSE 0x0
  70#define LOGICAL_UNIT_NOT_READY 0x4
  71#define LOGICAL_UNIT_COMMUNICATION_FAILURE 0x8
  72#define UNRECOVERED_READ_ERR 0x11
  73#define PARAMETER_LIST_LENGTH_ERR 0x1a
  74#define INVALID_OPCODE 0x20
  75#define LBA_OUT_OF_RANGE 0x21
  76#define INVALID_FIELD_IN_CDB 0x24
  77#define INVALID_FIELD_IN_PARAM_LIST 0x26
  78#define WRITE_PROTECTED 0x27
  79#define UA_RESET_ASC 0x29
  80#define UA_CHANGED_ASC 0x2a
  81#define TARGET_CHANGED_ASC 0x3f
  82#define LUNS_CHANGED_ASCQ 0x0e
  83#define INSUFF_RES_ASC 0x55
  84#define INSUFF_RES_ASCQ 0x3
  85#define POWER_ON_RESET_ASCQ 0x0
  86#define BUS_RESET_ASCQ 0x2	/* scsi bus reset occurred */
  87#define MODE_CHANGED_ASCQ 0x1	/* mode parameters changed */
  88#define CAPACITY_CHANGED_ASCQ 0x9
  89#define SAVING_PARAMS_UNSUP 0x39
  90#define TRANSPORT_PROBLEM 0x4b
  91#define THRESHOLD_EXCEEDED 0x5d
  92#define LOW_POWER_COND_ON 0x5e
  93#define MISCOMPARE_VERIFY_ASC 0x1d
  94#define MICROCODE_CHANGED_ASCQ 0x1	/* with TARGET_CHANGED_ASC */
  95#define MICROCODE_CHANGED_WO_RESET_ASCQ 0x16
  96#define WRITE_ERROR_ASC 0xc
  97#define UNALIGNED_WRITE_ASCQ 0x4
  98#define WRITE_BOUNDARY_ASCQ 0x5
  99#define READ_INVDATA_ASCQ 0x6
 100#define READ_BOUNDARY_ASCQ 0x7
 101#define INSUFF_ZONE_ASCQ 0xe
 102
 103/* Additional Sense Code Qualifier (ASCQ) */
 104#define ACK_NAK_TO 0x3
 105
 106/* Default values for driver parameters */
 107#define DEF_NUM_HOST   1
 108#define DEF_NUM_TGTS   1
 109#define DEF_MAX_LUNS   1
 110/* With these defaults, this driver will make 1 host with 1 target
 111 * (id 0) containing 1 logical unit (lun 0). That is 1 device.
 112 */
 113#define DEF_ATO 1
 114#define DEF_CDB_LEN 10
 115#define DEF_JDELAY   1		/* if > 0 unit is a jiffy */
 116#define DEF_DEV_SIZE_PRE_INIT   0
 117#define DEF_DEV_SIZE_MB   8
 118#define DEF_ZBC_DEV_SIZE_MB   128
 119#define DEF_DIF 0
 120#define DEF_DIX 0
 121#define DEF_PER_HOST_STORE false
 122#define DEF_D_SENSE   0
 123#define DEF_EVERY_NTH   0
 124#define DEF_FAKE_RW	0
 125#define DEF_GUARD 0
 126#define DEF_HOST_LOCK 0
 127#define DEF_LBPU 0
 128#define DEF_LBPWS 0
 129#define DEF_LBPWS10 0
 130#define DEF_LBPRZ 1
 131#define DEF_LOWEST_ALIGNED 0
 132#define DEF_NDELAY   0		/* if > 0 unit is a nanosecond */
 133#define DEF_NO_LUN_0   0
 134#define DEF_NUM_PARTS   0
 135#define DEF_OPTS   0
 136#define DEF_OPT_BLKS 1024
 137#define DEF_PHYSBLK_EXP 0
 138#define DEF_OPT_XFERLEN_EXP 0
 139#define DEF_PTYPE   TYPE_DISK
 140#define DEF_RANDOM false
 141#define DEF_REMOVABLE false
 142#define DEF_SCSI_LEVEL   7    /* INQUIRY, byte2 [6->SPC-4; 7->SPC-5] */
 143#define DEF_SECTOR_SIZE 512
 144#define DEF_UNMAP_ALIGNMENT 0
 145#define DEF_UNMAP_GRANULARITY 1
 146#define DEF_UNMAP_MAX_BLOCKS 0xFFFFFFFF
 147#define DEF_UNMAP_MAX_DESC 256
 148#define DEF_VIRTUAL_GB   0
 149#define DEF_VPD_USE_HOSTNO 1
 150#define DEF_WRITESAME_LENGTH 0xFFFF
 151#define DEF_STRICT 0
 152#define DEF_STATISTICS false
 153#define DEF_SUBMIT_QUEUES 1
 154#define DEF_TUR_MS_TO_READY 0
 155#define DEF_UUID_CTL 0
 156#define JDELAY_OVERRIDDEN -9999
 157
 158/* Default parameters for ZBC drives */
 159#define DEF_ZBC_ZONE_SIZE_MB	128
 160#define DEF_ZBC_MAX_OPEN_ZONES	8
 161#define DEF_ZBC_NR_CONV_ZONES	1
 162
 163#define SDEBUG_LUN_0_VAL 0
 164
 165/* bit mask values for sdebug_opts */
 166#define SDEBUG_OPT_NOISE		1
 167#define SDEBUG_OPT_MEDIUM_ERR		2
 168#define SDEBUG_OPT_TIMEOUT		4
 169#define SDEBUG_OPT_RECOVERED_ERR	8
 170#define SDEBUG_OPT_TRANSPORT_ERR	16
 171#define SDEBUG_OPT_DIF_ERR		32
 172#define SDEBUG_OPT_DIX_ERR		64
 173#define SDEBUG_OPT_MAC_TIMEOUT		128
 174#define SDEBUG_OPT_SHORT_TRANSFER	0x100
 175#define SDEBUG_OPT_Q_NOISE		0x200
 176#define SDEBUG_OPT_ALL_TSF		0x400
 177#define SDEBUG_OPT_RARE_TSF		0x800
 178#define SDEBUG_OPT_N_WCE		0x1000
 179#define SDEBUG_OPT_RESET_NOISE		0x2000
 180#define SDEBUG_OPT_NO_CDB_NOISE		0x4000
 181#define SDEBUG_OPT_HOST_BUSY		0x8000
 182#define SDEBUG_OPT_CMD_ABORT		0x10000
 183#define SDEBUG_OPT_ALL_NOISE (SDEBUG_OPT_NOISE | SDEBUG_OPT_Q_NOISE | \
 184			      SDEBUG_OPT_RESET_NOISE)
 185#define SDEBUG_OPT_ALL_INJECTING (SDEBUG_OPT_RECOVERED_ERR | \
 186				  SDEBUG_OPT_TRANSPORT_ERR | \
 187				  SDEBUG_OPT_DIF_ERR | SDEBUG_OPT_DIX_ERR | \
 188				  SDEBUG_OPT_SHORT_TRANSFER | \
 189				  SDEBUG_OPT_HOST_BUSY | \
 190				  SDEBUG_OPT_CMD_ABORT)
 191#define SDEBUG_OPT_RECOV_DIF_DIX (SDEBUG_OPT_RECOVERED_ERR | \
 192				  SDEBUG_OPT_DIF_ERR | SDEBUG_OPT_DIX_ERR)
 193
 194/* As indicated in SAM-5 and SPC-4 Unit Attentions (UAs) are returned in
 195 * priority order. In the subset implemented here lower numbers have higher
 196 * priority. The UA numbers should be a sequence starting from 0 with
 197 * SDEBUG_NUM_UAS being 1 higher than the highest numbered UA. */
 198#define SDEBUG_UA_POR 0		/* Power on, reset, or bus device reset */
 199#define SDEBUG_UA_BUS_RESET 1
 200#define SDEBUG_UA_MODE_CHANGED 2
 201#define SDEBUG_UA_CAPACITY_CHANGED 3
 202#define SDEBUG_UA_LUNS_CHANGED 4
 203#define SDEBUG_UA_MICROCODE_CHANGED 5	/* simulate firmware change */
 204#define SDEBUG_UA_MICROCODE_CHANGED_WO_RESET 6
 205#define SDEBUG_NUM_UAS 7
 206
 207/* when 1==SDEBUG_OPT_MEDIUM_ERR, a medium error is simulated at this
 208 * sector on read commands: */
 209#define OPT_MEDIUM_ERR_ADDR   0x1234 /* that's sector 4660 in decimal */
 210#define OPT_MEDIUM_ERR_NUM    10     /* number of consecutive medium errs */
 211
 212/* If REPORT LUNS has luns >= 256 it can choose "flat space" (value 1)
 213 * or "peripheral device" addressing (value 0) */
 214#define SAM2_LUN_ADDRESS_METHOD 0
 215
 216/* SDEBUG_CANQUEUE is the maximum number of commands that can be queued
 217 * (for response) per submit queue at one time. Can be reduced by max_queue
 218 * option. Command responses are not queued when jdelay=0 and ndelay=0. The
 219 * per-device DEF_CMD_PER_LUN can be changed via sysfs:
 220 * /sys/class/scsi_device/<h:c:t:l>/device/queue_depth
 221 * but cannot exceed SDEBUG_CANQUEUE .
 222 */
 223#define SDEBUG_CANQUEUE_WORDS  3	/* a WORD is bits in a long */
 224#define SDEBUG_CANQUEUE  (SDEBUG_CANQUEUE_WORDS * BITS_PER_LONG)
 225#define DEF_CMD_PER_LUN  255
 226
 227/* UA - Unit Attention; SA - Service Action; SSU - Start Stop Unit */
 228#define F_D_IN			1	/* Data-in command (e.g. READ) */
 229#define F_D_OUT			2	/* Data-out command (e.g. WRITE) */
 230#define F_D_OUT_MAYBE		4	/* WRITE SAME, NDOB bit */
 231#define F_D_UNKN		8
 232#define F_RL_WLUN_OK		0x10	/* allowed with REPORT LUNS W-LUN */
 233#define F_SKIP_UA		0x20	/* bypass UAs (e.g. INQUIRY command) */
 234#define F_DELAY_OVERR		0x40	/* for commands like INQUIRY */
 235#define F_SA_LOW		0x80	/* SA is in cdb byte 1, bits 4 to 0 */
 236#define F_SA_HIGH		0x100	/* SA is in cdb bytes 8 and 9 */
 237#define F_INV_OP		0x200	/* invalid opcode (not supported) */
 238#define F_FAKE_RW		0x400	/* bypass resp_*() when fake_rw set */
 239#define F_M_ACCESS		0x800	/* media access, reacts to SSU state */
 240#define F_SSU_DELAY		0x1000	/* SSU command delay (long-ish) */
 241#define F_SYNC_DELAY		0x2000	/* SYNCHRONIZE CACHE delay */
 242
 243/* Useful combinations of the above flags */
 244#define FF_RESPOND (F_RL_WLUN_OK | F_SKIP_UA | F_DELAY_OVERR)
 245#define FF_MEDIA_IO (F_M_ACCESS | F_FAKE_RW)
 246#define FF_SA (F_SA_HIGH | F_SA_LOW)
 247#define F_LONG_DELAY		(F_SSU_DELAY | F_SYNC_DELAY)
 248
 249#define SDEBUG_MAX_PARTS 4
 250
 251#define SDEBUG_MAX_CMD_LEN 32
 252
 253#define SDEB_XA_NOT_IN_USE XA_MARK_1
 254
 255/* Zone types (zbcr05 table 25) */
 256enum sdebug_z_type {
 257	ZBC_ZONE_TYPE_CNV	= 0x1,
 258	ZBC_ZONE_TYPE_SWR	= 0x2,
 259	ZBC_ZONE_TYPE_SWP	= 0x3,
 260};
 261
 262/* enumeration names taken from table 26, zbcr05 */
 263enum sdebug_z_cond {
 264	ZBC_NOT_WRITE_POINTER	= 0x0,
 265	ZC1_EMPTY		= 0x1,
 266	ZC2_IMPLICIT_OPEN	= 0x2,
 267	ZC3_EXPLICIT_OPEN	= 0x3,
 268	ZC4_CLOSED		= 0x4,
 269	ZC6_READ_ONLY		= 0xd,
 270	ZC5_FULL		= 0xe,
 271	ZC7_OFFLINE		= 0xf,
 272};
 273
 274struct sdeb_zone_state {	/* ZBC: per zone state */
 275	enum sdebug_z_type z_type;
 276	enum sdebug_z_cond z_cond;
 277	bool z_non_seq_resource;
 278	unsigned int z_size;
 279	sector_t z_start;
 280	sector_t z_wp;
 281};
 282
 283struct sdebug_dev_info {
 284	struct list_head dev_list;
 285	unsigned int channel;
 286	unsigned int target;
 287	u64 lun;
 288	uuid_t lu_name;
 289	struct sdebug_host_info *sdbg_host;
 290	unsigned long uas_bm[1];
 291	atomic_t num_in_q;
 292	atomic_t stopped;	/* 1: by SSU, 2: device start */
 293	bool used;
 294
 295	/* For ZBC devices */
 296	enum blk_zoned_model zmodel;
 297	unsigned int zsize;
 298	unsigned int zsize_shift;
 299	unsigned int nr_zones;
 300	unsigned int nr_conv_zones;
 301	unsigned int nr_imp_open;
 302	unsigned int nr_exp_open;
 303	unsigned int nr_closed;
 304	unsigned int max_open;
 305	ktime_t create_ts;	/* time since bootup that this device was created */
 306	struct sdeb_zone_state *zstate;
 307};
 308
 309struct sdebug_host_info {
 310	struct list_head host_list;
 311	int si_idx;	/* sdeb_store_info (per host) xarray index */
 312	struct Scsi_Host *shost;
 313	struct device dev;
 314	struct list_head dev_info_list;
 315};
 316
 317/* There is an xarray of pointers to this struct's objects, one per host */
 318struct sdeb_store_info {
 319	rwlock_t macc_lck;	/* for atomic media access on this store */
 320	u8 *storep;		/* user data storage (ram) */
 321	struct t10_pi_tuple *dif_storep; /* protection info */
 322	void *map_storep;	/* provisioning map */
 323};
 324
 325#define to_sdebug_host(d)	\
 326	container_of(d, struct sdebug_host_info, dev)
 327
 328enum sdeb_defer_type {SDEB_DEFER_NONE = 0, SDEB_DEFER_HRT = 1,
 329		      SDEB_DEFER_WQ = 2};
 330
 331struct sdebug_defer {
 332	struct hrtimer hrt;
 333	struct execute_work ew;
 
 334	int sqa_idx;	/* index of sdebug_queue array */
 335	int qc_idx;	/* index of sdebug_queued_cmd array within sqa_idx */
 336	int hc_idx;	/* hostwide tag index */
 337	int issuing_cpu;
 338	bool init_hrt;
 339	bool init_wq;
 
 340	bool aborted;	/* true when blk_abort_request() already called */
 341	enum sdeb_defer_type defer_t;
 342};
 343
 344struct sdebug_queued_cmd {
 345	/* corresponding bit set in in_use_bm[] in owning struct sdebug_queue
 346	 * instance indicates this slot is in use.
 347	 */
 348	struct sdebug_defer *sd_dp;
 349	struct scsi_cmnd *a_cmnd;
 350};
 351
 352struct sdebug_queue {
 353	struct sdebug_queued_cmd qc_arr[SDEBUG_CANQUEUE];
 354	unsigned long in_use_bm[SDEBUG_CANQUEUE_WORDS];
 355	spinlock_t qc_lock;
 356	atomic_t blocked;	/* to temporarily stop more being queued */
 357};
 358
 359static atomic_t sdebug_cmnd_count;   /* number of incoming commands */
 360static atomic_t sdebug_completions;  /* count of deferred completions */
 361static atomic_t sdebug_miss_cpus;    /* submission + completion cpus differ */
 362static atomic_t sdebug_a_tsf;	     /* 'almost task set full' counter */
 363static atomic_t sdeb_inject_pending;
 
 364
 365struct opcode_info_t {
 366	u8 num_attached;	/* 0 if this is it (i.e. a leaf); use 0xff */
 367				/* for terminating element */
 368	u8 opcode;		/* if num_attached > 0, preferred */
 369	u16 sa;			/* service action */
 370	u32 flags;		/* OR-ed set of SDEB_F_* */
 371	int (*pfp)(struct scsi_cmnd *, struct sdebug_dev_info *);
 372	const struct opcode_info_t *arrp;  /* num_attached elements or NULL */
 373	u8 len_mask[16];	/* len_mask[0]-->cdb_len, then mask for cdb */
 374				/* 1 to min(cdb_len, 15); ignore cdb[15...] */
 375};
 376
 377/* SCSI opcodes (first byte of cdb) of interest mapped onto these indexes */
 378enum sdeb_opcode_index {
 379	SDEB_I_INVALID_OPCODE =	0,
 380	SDEB_I_INQUIRY = 1,
 381	SDEB_I_REPORT_LUNS = 2,
 382	SDEB_I_REQUEST_SENSE = 3,
 383	SDEB_I_TEST_UNIT_READY = 4,
 384	SDEB_I_MODE_SENSE = 5,		/* 6, 10 */
 385	SDEB_I_MODE_SELECT = 6,		/* 6, 10 */
 386	SDEB_I_LOG_SENSE = 7,
 387	SDEB_I_READ_CAPACITY = 8,	/* 10; 16 is in SA_IN(16) */
 388	SDEB_I_READ = 9,		/* 6, 10, 12, 16 */
 389	SDEB_I_WRITE = 10,		/* 6, 10, 12, 16 */
 390	SDEB_I_START_STOP = 11,
 391	SDEB_I_SERV_ACT_IN_16 = 12,	/* add ...SERV_ACT_IN_12 if needed */
 392	SDEB_I_SERV_ACT_OUT_16 = 13,	/* add ...SERV_ACT_OUT_12 if needed */
 393	SDEB_I_MAINT_IN = 14,
 394	SDEB_I_MAINT_OUT = 15,
 395	SDEB_I_VERIFY = 16,		/* VERIFY(10), VERIFY(16) */
 396	SDEB_I_VARIABLE_LEN = 17,	/* READ(32), WRITE(32), WR_SCAT(32) */
 397	SDEB_I_RESERVE = 18,		/* 6, 10 */
 398	SDEB_I_RELEASE = 19,		/* 6, 10 */
 399	SDEB_I_ALLOW_REMOVAL = 20,	/* PREVENT ALLOW MEDIUM REMOVAL */
 400	SDEB_I_REZERO_UNIT = 21,	/* REWIND in SSC */
 401	SDEB_I_ATA_PT = 22,		/* 12, 16 */
 402	SDEB_I_SEND_DIAG = 23,
 403	SDEB_I_UNMAP = 24,
 404	SDEB_I_WRITE_BUFFER = 25,
 405	SDEB_I_WRITE_SAME = 26,		/* 10, 16 */
 406	SDEB_I_SYNC_CACHE = 27,		/* 10, 16 */
 407	SDEB_I_COMP_WRITE = 28,
 408	SDEB_I_PRE_FETCH = 29,		/* 10, 16 */
 409	SDEB_I_ZONE_OUT = 30,		/* 0x94+SA; includes no data xfer */
 410	SDEB_I_ZONE_IN = 31,		/* 0x95+SA; all have data-in */
 411	SDEB_I_LAST_ELEM_P1 = 32,	/* keep this last (previous + 1) */
 412};
 413
 414
 415static const unsigned char opcode_ind_arr[256] = {
 416/* 0x0; 0x0->0x1f: 6 byte cdbs */
 417	SDEB_I_TEST_UNIT_READY, SDEB_I_REZERO_UNIT, 0, SDEB_I_REQUEST_SENSE,
 418	    0, 0, 0, 0,
 419	SDEB_I_READ, 0, SDEB_I_WRITE, 0, 0, 0, 0, 0,
 420	0, 0, SDEB_I_INQUIRY, 0, 0, SDEB_I_MODE_SELECT, SDEB_I_RESERVE,
 421	    SDEB_I_RELEASE,
 422	0, 0, SDEB_I_MODE_SENSE, SDEB_I_START_STOP, 0, SDEB_I_SEND_DIAG,
 423	    SDEB_I_ALLOW_REMOVAL, 0,
 424/* 0x20; 0x20->0x3f: 10 byte cdbs */
 425	0, 0, 0, 0, 0, SDEB_I_READ_CAPACITY, 0, 0,
 426	SDEB_I_READ, 0, SDEB_I_WRITE, 0, 0, 0, 0, SDEB_I_VERIFY,
 427	0, 0, 0, 0, SDEB_I_PRE_FETCH, SDEB_I_SYNC_CACHE, 0, 0,
 428	0, 0, 0, SDEB_I_WRITE_BUFFER, 0, 0, 0, 0,
 429/* 0x40; 0x40->0x5f: 10 byte cdbs */
 430	0, SDEB_I_WRITE_SAME, SDEB_I_UNMAP, 0, 0, 0, 0, 0,
 431	0, 0, 0, 0, 0, SDEB_I_LOG_SENSE, 0, 0,
 432	0, 0, 0, 0, 0, SDEB_I_MODE_SELECT, SDEB_I_RESERVE,
 433	    SDEB_I_RELEASE,
 434	0, 0, SDEB_I_MODE_SENSE, 0, 0, 0, 0, 0,
 435/* 0x60; 0x60->0x7d are reserved, 0x7e is "extended cdb" */
 436	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 437	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 438	0, SDEB_I_VARIABLE_LEN,
 439/* 0x80; 0x80->0x9f: 16 byte cdbs */
 440	0, 0, 0, 0, 0, SDEB_I_ATA_PT, 0, 0,
 441	SDEB_I_READ, SDEB_I_COMP_WRITE, SDEB_I_WRITE, 0,
 442	0, 0, 0, SDEB_I_VERIFY,
 443	SDEB_I_PRE_FETCH, SDEB_I_SYNC_CACHE, 0, SDEB_I_WRITE_SAME,
 444	SDEB_I_ZONE_OUT, SDEB_I_ZONE_IN, 0, 0,
 445	0, 0, 0, 0, 0, 0, SDEB_I_SERV_ACT_IN_16, SDEB_I_SERV_ACT_OUT_16,
 446/* 0xa0; 0xa0->0xbf: 12 byte cdbs */
 447	SDEB_I_REPORT_LUNS, SDEB_I_ATA_PT, 0, SDEB_I_MAINT_IN,
 448	     SDEB_I_MAINT_OUT, 0, 0, 0,
 449	SDEB_I_READ, 0 /* SDEB_I_SERV_ACT_OUT_12 */, SDEB_I_WRITE,
 450	     0 /* SDEB_I_SERV_ACT_IN_12 */, 0, 0, 0, 0,
 451	0, 0, 0, 0, 0, 0, 0, 0,
 452	0, 0, 0, 0, 0, 0, 0, 0,
 453/* 0xc0; 0xc0->0xff: vendor specific */
 454	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 455	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 456	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 457	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
 458};
 459
 460/*
 461 * The following "response" functions return the SCSI mid-level's 4 byte
 462 * tuple-in-an-int. To handle commands with an IMMED bit, for a faster
 463 * command completion, they can mask their return value with
 464 * SDEG_RES_IMMED_MASK .
 465 */
 466#define SDEG_RES_IMMED_MASK 0x40000000
 467
 468static int resp_inquiry(struct scsi_cmnd *, struct sdebug_dev_info *);
 469static int resp_report_luns(struct scsi_cmnd *, struct sdebug_dev_info *);
 470static int resp_requests(struct scsi_cmnd *, struct sdebug_dev_info *);
 471static int resp_mode_sense(struct scsi_cmnd *, struct sdebug_dev_info *);
 472static int resp_mode_select(struct scsi_cmnd *, struct sdebug_dev_info *);
 473static int resp_log_sense(struct scsi_cmnd *, struct sdebug_dev_info *);
 474static int resp_readcap(struct scsi_cmnd *, struct sdebug_dev_info *);
 475static int resp_read_dt0(struct scsi_cmnd *, struct sdebug_dev_info *);
 476static int resp_write_dt0(struct scsi_cmnd *, struct sdebug_dev_info *);
 477static int resp_write_scat(struct scsi_cmnd *, struct sdebug_dev_info *);
 478static int resp_start_stop(struct scsi_cmnd *, struct sdebug_dev_info *);
 479static int resp_readcap16(struct scsi_cmnd *, struct sdebug_dev_info *);
 480static int resp_get_lba_status(struct scsi_cmnd *, struct sdebug_dev_info *);
 481static int resp_report_tgtpgs(struct scsi_cmnd *, struct sdebug_dev_info *);
 482static int resp_unmap(struct scsi_cmnd *, struct sdebug_dev_info *);
 483static int resp_rsup_opcodes(struct scsi_cmnd *, struct sdebug_dev_info *);
 484static int resp_rsup_tmfs(struct scsi_cmnd *, struct sdebug_dev_info *);
 485static int resp_verify(struct scsi_cmnd *, struct sdebug_dev_info *);
 486static int resp_write_same_10(struct scsi_cmnd *, struct sdebug_dev_info *);
 487static int resp_write_same_16(struct scsi_cmnd *, struct sdebug_dev_info *);
 488static int resp_comp_write(struct scsi_cmnd *, struct sdebug_dev_info *);
 489static int resp_write_buffer(struct scsi_cmnd *, struct sdebug_dev_info *);
 490static int resp_sync_cache(struct scsi_cmnd *, struct sdebug_dev_info *);
 491static int resp_pre_fetch(struct scsi_cmnd *, struct sdebug_dev_info *);
 492static int resp_report_zones(struct scsi_cmnd *, struct sdebug_dev_info *);
 493static int resp_open_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
 494static int resp_close_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
 495static int resp_finish_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
 496static int resp_rwp_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
 497
 498static int sdebug_do_add_host(bool mk_new_store);
 499static int sdebug_add_host_helper(int per_host_idx);
 500static void sdebug_do_remove_host(bool the_end);
 501static int sdebug_add_store(void);
 502static void sdebug_erase_store(int idx, struct sdeb_store_info *sip);
 503static void sdebug_erase_all_stores(bool apart_from_first);
 504
 505/*
 506 * The following are overflow arrays for cdbs that "hit" the same index in
 507 * the opcode_info_arr array. The most time sensitive (or commonly used) cdb
 508 * should be placed in opcode_info_arr[], the others should be placed here.
 509 */
 510static const struct opcode_info_t msense_iarr[] = {
 511	{0, 0x1a, 0, F_D_IN, NULL, NULL,
 512	    {6,  0xe8, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 513};
 514
 515static const struct opcode_info_t mselect_iarr[] = {
 516	{0, 0x15, 0, F_D_OUT, NULL, NULL,
 517	    {6,  0xf1, 0, 0, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 518};
 519
 520static const struct opcode_info_t read_iarr[] = {
 521	{0, 0x28, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL,/* READ(10) */
 522	    {10,  0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
 523	     0, 0, 0, 0} },
 524	{0, 0x8, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL, /* READ(6) */
 525	    {6,  0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 526	{0, 0xa8, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL,/* READ(12) */
 527	    {12,  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xbf,
 528	     0xc7, 0, 0, 0, 0} },
 529};
 530
 531static const struct opcode_info_t write_iarr[] = {
 532	{0, 0x2a, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0,  /* WRITE(10) */
 533	    NULL, {10,  0xfb, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7,
 534		   0, 0, 0, 0, 0, 0} },
 535	{0, 0xa, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0,   /* WRITE(6) */
 536	    NULL, {6,  0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0,
 537		   0, 0, 0} },
 538	{0, 0xaa, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0,  /* WRITE(12) */
 539	    NULL, {12,  0xfb, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 540		   0xbf, 0xc7, 0, 0, 0, 0} },
 541};
 542
 543static const struct opcode_info_t verify_iarr[] = {
 544	{0, 0x2f, 0, F_D_OUT_MAYBE | FF_MEDIA_IO, resp_verify,/* VERIFY(10) */
 545	    NULL, {10,  0xf7, 0xff, 0xff, 0xff, 0xff, 0xbf, 0xff, 0xff, 0xc7,
 546		   0, 0, 0, 0, 0, 0} },
 547};
 548
 549static const struct opcode_info_t sa_in_16_iarr[] = {
 550	{0, 0x9e, 0x12, F_SA_LOW | F_D_IN, resp_get_lba_status, NULL,
 551	    {16,  0x12, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 552	     0xff, 0xff, 0xff, 0, 0xc7} },	/* GET LBA STATUS(16) */
 553};
 554
 555static const struct opcode_info_t vl_iarr[] = {	/* VARIABLE LENGTH */
 556	{0, 0x7f, 0xb, F_SA_HIGH | F_D_OUT | FF_MEDIA_IO, resp_write_dt0,
 557	    NULL, {32,  0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0xb, 0xfa,
 558		   0, 0xff, 0xff, 0xff, 0xff} },	/* WRITE(32) */
 559	{0, 0x7f, 0x11, F_SA_HIGH | F_D_OUT | FF_MEDIA_IO, resp_write_scat,
 560	    NULL, {32,  0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0x11, 0xf8,
 561		   0, 0xff, 0xff, 0x0, 0x0} },	/* WRITE SCATTERED(32) */
 562};
 563
 564static const struct opcode_info_t maint_in_iarr[] = {	/* MAINT IN */
 565	{0, 0xa3, 0xc, F_SA_LOW | F_D_IN, resp_rsup_opcodes, NULL,
 566	    {12,  0xc, 0x87, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0,
 567	     0xc7, 0, 0, 0, 0} }, /* REPORT SUPPORTED OPERATION CODES */
 568	{0, 0xa3, 0xd, F_SA_LOW | F_D_IN, resp_rsup_tmfs, NULL,
 569	    {12,  0xd, 0x80, 0, 0, 0, 0xff, 0xff, 0xff, 0xff, 0, 0xc7, 0, 0,
 570	     0, 0} },	/* REPORTED SUPPORTED TASK MANAGEMENT FUNCTIONS */
 571};
 572
 573static const struct opcode_info_t write_same_iarr[] = {
 574	{0, 0x93, 0, F_D_OUT_MAYBE | FF_MEDIA_IO, resp_write_same_16, NULL,
 575	    {16,  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 576	     0xff, 0xff, 0xff, 0x3f, 0xc7} },		/* WRITE SAME(16) */
 577};
 578
 579static const struct opcode_info_t reserve_iarr[] = {
 580	{0, 0x16, 0, F_D_OUT, NULL, NULL,		/* RESERVE(6) */
 581	    {6,  0x1f, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 582};
 583
 584static const struct opcode_info_t release_iarr[] = {
 585	{0, 0x17, 0, F_D_OUT, NULL, NULL,		/* RELEASE(6) */
 586	    {6,  0x1f, 0xff, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 587};
 588
 589static const struct opcode_info_t sync_cache_iarr[] = {
 590	{0, 0x91, 0, F_SYNC_DELAY | F_M_ACCESS, resp_sync_cache, NULL,
 591	    {16,  0x6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 592	     0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} },	/* SYNC_CACHE (16) */
 593};
 594
 595static const struct opcode_info_t pre_fetch_iarr[] = {
 596	{0, 0x90, 0, F_SYNC_DELAY | FF_MEDIA_IO, resp_pre_fetch, NULL,
 597	    {16,  0x2, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 598	     0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} },	/* PRE-FETCH (16) */
 599};
 600
 601static const struct opcode_info_t zone_out_iarr[] = {	/* ZONE OUT(16) */
 602	{0, 0x94, 0x1, F_SA_LOW | F_M_ACCESS, resp_close_zone, NULL,
 603	    {16, 0x1, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 604	     0xff, 0, 0, 0xff, 0xff, 0x1, 0xc7} },	/* CLOSE ZONE */
 605	{0, 0x94, 0x2, F_SA_LOW | F_M_ACCESS, resp_finish_zone, NULL,
 606	    {16, 0x2, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 607	     0xff, 0, 0, 0xff, 0xff, 0x1, 0xc7} },	/* FINISH ZONE */
 608	{0, 0x94, 0x4, F_SA_LOW | F_M_ACCESS, resp_rwp_zone, NULL,
 609	    {16, 0x4, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 610	     0xff, 0, 0, 0xff, 0xff, 0x1, 0xc7} },  /* RESET WRITE POINTER */
 611};
 612
 613static const struct opcode_info_t zone_in_iarr[] = {	/* ZONE IN(16) */
 614	{0, 0x95, 0x6, F_SA_LOW | F_D_IN | F_M_ACCESS, NULL, NULL,
 615	    {16, 0x6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 616	     0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} }, /* REPORT ZONES */
 617};
 618
 619
 620/* This array is accessed via SDEB_I_* values. Make sure all are mapped,
 621 * plus the terminating elements for logic that scans this table such as
 622 * REPORT SUPPORTED OPERATION CODES. */
 623static const struct opcode_info_t opcode_info_arr[SDEB_I_LAST_ELEM_P1 + 1] = {
 624/* 0 */
 625	{0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL,	/* unknown opcodes */
 626	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 627	{0, 0x12, 0, FF_RESPOND | F_D_IN, resp_inquiry, NULL, /* INQUIRY */
 628	    {6,  0xe3, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 629	{0, 0xa0, 0, FF_RESPOND | F_D_IN, resp_report_luns, NULL,
 630	    {12,  0xe3, 0xff, 0, 0, 0, 0xff, 0xff, 0xff, 0xff, 0, 0xc7, 0, 0,
 631	     0, 0} },					/* REPORT LUNS */
 632	{0, 0x3, 0, FF_RESPOND | F_D_IN, resp_requests, NULL,
 633	    {6,  0xe1, 0, 0, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 634	{0, 0x0, 0, F_M_ACCESS | F_RL_WLUN_OK, NULL, NULL,/* TEST UNIT READY */
 635	    {6,  0, 0, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 636/* 5 */
 637	{ARRAY_SIZE(msense_iarr), 0x5a, 0, F_D_IN,	/* MODE SENSE(10) */
 638	    resp_mode_sense, msense_iarr, {10,  0xf8, 0xff, 0xff, 0, 0, 0,
 639		0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
 640	{ARRAY_SIZE(mselect_iarr), 0x55, 0, F_D_OUT,	/* MODE SELECT(10) */
 641	    resp_mode_select, mselect_iarr, {10,  0xf1, 0, 0, 0, 0, 0, 0xff,
 642		0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
 643	{0, 0x4d, 0, F_D_IN, resp_log_sense, NULL,	/* LOG SENSE */
 644	    {10,  0xe3, 0xff, 0xff, 0, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0,
 645	     0, 0, 0} },
 646	{0, 0x25, 0, F_D_IN, resp_readcap, NULL,    /* READ CAPACITY(10) */
 647	    {10,  0xe1, 0xff, 0xff, 0xff, 0xff, 0, 0, 0x1, 0xc7, 0, 0, 0, 0,
 648	     0, 0} },
 649	{ARRAY_SIZE(read_iarr), 0x88, 0, F_D_IN | FF_MEDIA_IO, /* READ(16) */
 650	    resp_read_dt0, read_iarr, {16,  0xfe, 0xff, 0xff, 0xff, 0xff,
 651	    0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7} },
 652/* 10 */
 653	{ARRAY_SIZE(write_iarr), 0x8a, 0, F_D_OUT | FF_MEDIA_IO,
 654	    resp_write_dt0, write_iarr,			/* WRITE(16) */
 655		{16,  0xfa, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 656		 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7} },
 657	{0, 0x1b, 0, F_SSU_DELAY, resp_start_stop, NULL,/* START STOP UNIT */
 658	    {6,  0x1, 0, 0xf, 0xf7, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 659	{ARRAY_SIZE(sa_in_16_iarr), 0x9e, 0x10, F_SA_LOW | F_D_IN,
 660	    resp_readcap16, sa_in_16_iarr, /* SA_IN(16), READ CAPACITY(16) */
 661		{16,  0x10, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 662		 0xff, 0xff, 0xff, 0xff, 0x1, 0xc7} },
 663	{0, 0x9f, 0x12, F_SA_LOW | F_D_OUT | FF_MEDIA_IO, resp_write_scat,
 664	    NULL, {16,  0x12, 0xf9, 0x0, 0xff, 0xff, 0, 0, 0xff, 0xff, 0xff,
 665	    0xff, 0xff, 0xff, 0xff, 0xc7} },  /* SA_OUT(16), WRITE SCAT(16) */
 666	{ARRAY_SIZE(maint_in_iarr), 0xa3, 0xa, F_SA_LOW | F_D_IN,
 667	    resp_report_tgtpgs,	/* MAINT IN, REPORT TARGET PORT GROUPS */
 668		maint_in_iarr, {12,  0xea, 0, 0, 0, 0, 0xff, 0xff, 0xff,
 669				0xff, 0, 0xc7, 0, 0, 0, 0} },
 670/* 15 */
 671	{0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* MAINT OUT */
 672	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 673	{ARRAY_SIZE(verify_iarr), 0x8f, 0,
 674	    F_D_OUT_MAYBE | FF_MEDIA_IO, resp_verify,	/* VERIFY(16) */
 675	    verify_iarr, {16,  0xf6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 676			  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} },
 677	{ARRAY_SIZE(vl_iarr), 0x7f, 0x9, F_SA_HIGH | F_D_IN | FF_MEDIA_IO,
 678	    resp_read_dt0, vl_iarr,	/* VARIABLE LENGTH, READ(32) */
 679	    {32,  0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0x9, 0xfe, 0, 0xff, 0xff,
 680	     0xff, 0xff} },
 681	{ARRAY_SIZE(reserve_iarr), 0x56, 0, F_D_OUT,
 682	    NULL, reserve_iarr,	/* RESERVE(10) <no response function> */
 683	    {10,  0xff, 0xff, 0xff, 0, 0, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0,
 684	     0} },
 685	{ARRAY_SIZE(release_iarr), 0x57, 0, F_D_OUT,
 686	    NULL, release_iarr, /* RELEASE(10) <no response function> */
 687	    {10,  0x13, 0xff, 0xff, 0, 0, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0,
 688	     0} },
 689/* 20 */
 690	{0, 0x1e, 0, 0, NULL, NULL, /* ALLOW REMOVAL */
 691	    {6,  0, 0, 0, 0x3, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 692	{0, 0x1, 0, 0, resp_start_stop, NULL, /* REWIND ?? */
 693	    {6,  0x1, 0, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 694	{0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* ATA_PT */
 695	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 696	{0, 0x1d, F_D_OUT, 0, NULL, NULL,	/* SEND DIAGNOSTIC */
 697	    {6,  0xf7, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 698	{0, 0x42, 0, F_D_OUT | FF_MEDIA_IO, resp_unmap, NULL, /* UNMAP */
 699	    {10,  0x1, 0, 0, 0, 0, 0x3f, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
 700/* 25 */
 701	{0, 0x3b, 0, F_D_OUT_MAYBE, resp_write_buffer, NULL,
 702	    {10,  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0,
 703	     0, 0, 0, 0} },			/* WRITE_BUFFER */
 704	{ARRAY_SIZE(write_same_iarr), 0x41, 0, F_D_OUT_MAYBE | FF_MEDIA_IO,
 705	    resp_write_same_10, write_same_iarr,	/* WRITE SAME(10) */
 706		{10,  0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0,
 707		 0, 0, 0, 0, 0} },
 708	{ARRAY_SIZE(sync_cache_iarr), 0x35, 0, F_SYNC_DELAY | F_M_ACCESS,
 709	    resp_sync_cache, sync_cache_iarr,
 710	    {10,  0x7, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
 711	     0, 0, 0, 0} },			/* SYNC_CACHE (10) */
 712	{0, 0x89, 0, F_D_OUT | FF_MEDIA_IO, resp_comp_write, NULL,
 713	    {16,  0xf8, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0, 0,
 714	     0, 0xff, 0x3f, 0xc7} },		/* COMPARE AND WRITE */
 715	{ARRAY_SIZE(pre_fetch_iarr), 0x34, 0, F_SYNC_DELAY | FF_MEDIA_IO,
 716	    resp_pre_fetch, pre_fetch_iarr,
 717	    {10,  0x2, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
 718	     0, 0, 0, 0} },			/* PRE-FETCH (10) */
 719
 720/* 30 */
 721	{ARRAY_SIZE(zone_out_iarr), 0x94, 0x3, F_SA_LOW | F_M_ACCESS,
 722	    resp_open_zone, zone_out_iarr, /* ZONE_OUT(16), OPEN ZONE) */
 723		{16,  0x3 /* SA */, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 724		 0xff, 0xff, 0x0, 0x0, 0xff, 0xff, 0x1, 0xc7} },
 725	{ARRAY_SIZE(zone_in_iarr), 0x95, 0x0, F_SA_LOW | F_M_ACCESS,
 726	    resp_report_zones, zone_in_iarr, /* ZONE_IN(16), REPORT ZONES) */
 727		{16,  0x0 /* SA */, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
 728		 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xbf, 0xc7} },
 729/* sentinel */
 730	{0xff, 0, 0, 0, NULL, NULL,		/* terminating element */
 731	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
 732};
 733
 734static int sdebug_num_hosts;
 735static int sdebug_add_host = DEF_NUM_HOST;  /* in sysfs this is relative */
 736static int sdebug_ato = DEF_ATO;
 737static int sdebug_cdb_len = DEF_CDB_LEN;
 738static int sdebug_jdelay = DEF_JDELAY;	/* if > 0 then unit is jiffies */
 739static int sdebug_dev_size_mb = DEF_DEV_SIZE_PRE_INIT;
 740static int sdebug_dif = DEF_DIF;
 741static int sdebug_dix = DEF_DIX;
 742static int sdebug_dsense = DEF_D_SENSE;
 743static int sdebug_every_nth = DEF_EVERY_NTH;
 744static int sdebug_fake_rw = DEF_FAKE_RW;
 745static unsigned int sdebug_guard = DEF_GUARD;
 746static int sdebug_host_max_queue;	/* per host */
 747static int sdebug_lowest_aligned = DEF_LOWEST_ALIGNED;
 748static int sdebug_max_luns = DEF_MAX_LUNS;
 749static int sdebug_max_queue = SDEBUG_CANQUEUE;	/* per submit queue */
 750static unsigned int sdebug_medium_error_start = OPT_MEDIUM_ERR_ADDR;
 751static int sdebug_medium_error_count = OPT_MEDIUM_ERR_NUM;
 752static atomic_t retired_max_queue;	/* if > 0 then was prior max_queue */
 753static int sdebug_ndelay = DEF_NDELAY;	/* if > 0 then unit is nanoseconds */
 754static int sdebug_no_lun_0 = DEF_NO_LUN_0;
 755static int sdebug_no_uld;
 756static int sdebug_num_parts = DEF_NUM_PARTS;
 757static int sdebug_num_tgts = DEF_NUM_TGTS; /* targets per host */
 758static int sdebug_opt_blks = DEF_OPT_BLKS;
 759static int sdebug_opts = DEF_OPTS;
 760static int sdebug_physblk_exp = DEF_PHYSBLK_EXP;
 761static int sdebug_opt_xferlen_exp = DEF_OPT_XFERLEN_EXP;
 762static int sdebug_ptype = DEF_PTYPE; /* SCSI peripheral device type */
 763static int sdebug_scsi_level = DEF_SCSI_LEVEL;
 764static int sdebug_sector_size = DEF_SECTOR_SIZE;
 765static int sdeb_tur_ms_to_ready = DEF_TUR_MS_TO_READY;
 766static int sdebug_virtual_gb = DEF_VIRTUAL_GB;
 767static int sdebug_vpd_use_hostno = DEF_VPD_USE_HOSTNO;
 768static unsigned int sdebug_lbpu = DEF_LBPU;
 769static unsigned int sdebug_lbpws = DEF_LBPWS;
 770static unsigned int sdebug_lbpws10 = DEF_LBPWS10;
 771static unsigned int sdebug_lbprz = DEF_LBPRZ;
 772static unsigned int sdebug_unmap_alignment = DEF_UNMAP_ALIGNMENT;
 773static unsigned int sdebug_unmap_granularity = DEF_UNMAP_GRANULARITY;
 774static unsigned int sdebug_unmap_max_blocks = DEF_UNMAP_MAX_BLOCKS;
 775static unsigned int sdebug_unmap_max_desc = DEF_UNMAP_MAX_DESC;
 776static unsigned int sdebug_write_same_length = DEF_WRITESAME_LENGTH;
 777static int sdebug_uuid_ctl = DEF_UUID_CTL;
 778static bool sdebug_random = DEF_RANDOM;
 779static bool sdebug_per_host_store = DEF_PER_HOST_STORE;
 780static bool sdebug_removable = DEF_REMOVABLE;
 781static bool sdebug_clustering;
 782static bool sdebug_host_lock = DEF_HOST_LOCK;
 783static bool sdebug_strict = DEF_STRICT;
 784static bool sdebug_any_injecting_opt;
 785static bool sdebug_verbose;
 786static bool have_dif_prot;
 787static bool write_since_sync;
 788static bool sdebug_statistics = DEF_STATISTICS;
 789static bool sdebug_wp;
 790/* Following enum: 0: no zbc, def; 1: host aware; 2: host managed */
 791static enum blk_zoned_model sdeb_zbc_model = BLK_ZONED_NONE;
 792static char *sdeb_zbc_model_s;
 793
 
 
 
 
 
 
 
 794static unsigned int sdebug_store_sectors;
 795static sector_t sdebug_capacity;	/* in sectors */
 796
 797/* old BIOS stuff, kernel may get rid of them but some mode sense pages
 798   may still need them */
 799static int sdebug_heads;		/* heads per disk */
 800static int sdebug_cylinders_per;	/* cylinders per surface */
 801static int sdebug_sectors_per;		/* sectors per cylinder */
 802
 803static LIST_HEAD(sdebug_host_list);
 804static DEFINE_SPINLOCK(sdebug_host_list_lock);
 805
 806static struct xarray per_store_arr;
 807static struct xarray *per_store_ap = &per_store_arr;
 808static int sdeb_first_idx = -1;		/* invalid index ==> none created */
 809static int sdeb_most_recent_idx = -1;
 810static DEFINE_RWLOCK(sdeb_fake_rw_lck);	/* need a RW lock when fake_rw=1 */
 811
 812static unsigned long map_size;
 813static int num_aborts;
 814static int num_dev_resets;
 815static int num_target_resets;
 816static int num_bus_resets;
 817static int num_host_resets;
 818static int dix_writes;
 819static int dix_reads;
 820static int dif_errors;
 821
 822/* ZBC global data */
 823static bool sdeb_zbc_in_use;	/* true for host-aware and host-managed disks */
 824static int sdeb_zbc_zone_size_mb;
 825static int sdeb_zbc_max_open = DEF_ZBC_MAX_OPEN_ZONES;
 826static int sdeb_zbc_nr_conv = DEF_ZBC_NR_CONV_ZONES;
 827
 828static int submit_queues = DEF_SUBMIT_QUEUES;  /* > 1 for multi-queue (mq) */
 
 829static struct sdebug_queue *sdebug_q_arr;  /* ptr to array of submit queues */
 830
 831static DEFINE_RWLOCK(atomic_rw);
 832static DEFINE_RWLOCK(atomic_rw2);
 833
 834static rwlock_t *ramdisk_lck_a[2];
 835
 836static char sdebug_proc_name[] = MY_NAME;
 837static const char *my_name = MY_NAME;
 838
 839static struct bus_type pseudo_lld_bus;
 840
 841static struct device_driver sdebug_driverfs_driver = {
 842	.name 		= sdebug_proc_name,
 843	.bus		= &pseudo_lld_bus,
 844};
 845
 846static const int check_condition_result =
 847		(DRIVER_SENSE << 24) | SAM_STAT_CHECK_CONDITION;
 848
 849static const int illegal_condition_result =
 850	(DRIVER_SENSE << 24) | (DID_ABORT << 16) | SAM_STAT_CHECK_CONDITION;
 851
 852static const int device_qfull_result =
 853	(DID_OK << 16) | (COMMAND_COMPLETE << 8) | SAM_STAT_TASK_SET_FULL;
 854
 855static const int condition_met_result = SAM_STAT_CONDITION_MET;
 856
 857
 858/* Only do the extra work involved in logical block provisioning if one or
 859 * more of the lbpu, lbpws or lbpws10 parameters are given and we are doing
 860 * real reads and writes (i.e. not skipping them for speed).
 861 */
 862static inline bool scsi_debug_lbp(void)
 863{
 864	return 0 == sdebug_fake_rw &&
 865		(sdebug_lbpu || sdebug_lbpws || sdebug_lbpws10);
 866}
 867
 868static void *lba2fake_store(struct sdeb_store_info *sip,
 869			    unsigned long long lba)
 870{
 871	struct sdeb_store_info *lsip = sip;
 872
 873	lba = do_div(lba, sdebug_store_sectors);
 874	if (!sip || !sip->storep) {
 875		WARN_ON_ONCE(true);
 876		lsip = xa_load(per_store_ap, 0);  /* should never be NULL */
 877	}
 878	return lsip->storep + lba * sdebug_sector_size;
 879}
 880
 881static struct t10_pi_tuple *dif_store(struct sdeb_store_info *sip,
 882				      sector_t sector)
 883{
 884	sector = sector_div(sector, sdebug_store_sectors);
 885
 886	return sip->dif_storep + sector;
 887}
 888
 889static void sdebug_max_tgts_luns(void)
 890{
 891	struct sdebug_host_info *sdbg_host;
 892	struct Scsi_Host *hpnt;
 893
 894	spin_lock(&sdebug_host_list_lock);
 895	list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
 896		hpnt = sdbg_host->shost;
 897		if ((hpnt->this_id >= 0) &&
 898		    (sdebug_num_tgts > hpnt->this_id))
 899			hpnt->max_id = sdebug_num_tgts + 1;
 900		else
 901			hpnt->max_id = sdebug_num_tgts;
 902		/* sdebug_max_luns; */
 903		hpnt->max_lun = SCSI_W_LUN_REPORT_LUNS + 1;
 904	}
 905	spin_unlock(&sdebug_host_list_lock);
 906}
 907
 908enum sdeb_cmd_data {SDEB_IN_DATA = 0, SDEB_IN_CDB = 1};
 909
 910/* Set in_bit to -1 to indicate no bit position of invalid field */
 911static void mk_sense_invalid_fld(struct scsi_cmnd *scp,
 912				 enum sdeb_cmd_data c_d,
 913				 int in_byte, int in_bit)
 914{
 915	unsigned char *sbuff;
 916	u8 sks[4];
 917	int sl, asc;
 918
 919	sbuff = scp->sense_buffer;
 920	if (!sbuff) {
 921		sdev_printk(KERN_ERR, scp->device,
 922			    "%s: sense_buffer is NULL\n", __func__);
 923		return;
 924	}
 925	asc = c_d ? INVALID_FIELD_IN_CDB : INVALID_FIELD_IN_PARAM_LIST;
 926	memset(sbuff, 0, SCSI_SENSE_BUFFERSIZE);
 927	scsi_build_sense_buffer(sdebug_dsense, sbuff, ILLEGAL_REQUEST, asc, 0);
 928	memset(sks, 0, sizeof(sks));
 929	sks[0] = 0x80;
 930	if (c_d)
 931		sks[0] |= 0x40;
 932	if (in_bit >= 0) {
 933		sks[0] |= 0x8;
 934		sks[0] |= 0x7 & in_bit;
 935	}
 936	put_unaligned_be16(in_byte, sks + 1);
 937	if (sdebug_dsense) {
 938		sl = sbuff[7] + 8;
 939		sbuff[7] = sl;
 940		sbuff[sl] = 0x2;
 941		sbuff[sl + 1] = 0x6;
 942		memcpy(sbuff + sl + 4, sks, 3);
 943	} else
 944		memcpy(sbuff + 15, sks, 3);
 945	if (sdebug_verbose)
 946		sdev_printk(KERN_INFO, scp->device, "%s:  [sense_key,asc,ascq"
 947			    "]: [0x5,0x%x,0x0] %c byte=%d, bit=%d\n",
 948			    my_name, asc, c_d ? 'C' : 'D', in_byte, in_bit);
 949}
 950
 951static void mk_sense_buffer(struct scsi_cmnd *scp, int key, int asc, int asq)
 952{
 953	unsigned char *sbuff;
 954
 955	sbuff = scp->sense_buffer;
 956	if (!sbuff) {
 957		sdev_printk(KERN_ERR, scp->device,
 958			    "%s: sense_buffer is NULL\n", __func__);
 959		return;
 960	}
 961	memset(sbuff, 0, SCSI_SENSE_BUFFERSIZE);
 962
 963	scsi_build_sense_buffer(sdebug_dsense, sbuff, key, asc, asq);
 964
 965	if (sdebug_verbose)
 966		sdev_printk(KERN_INFO, scp->device,
 967			    "%s:  [sense_key,asc,ascq]: [0x%x,0x%x,0x%x]\n",
 968			    my_name, key, asc, asq);
 969}
 970
 971static void mk_sense_invalid_opcode(struct scsi_cmnd *scp)
 972{
 973	mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_OPCODE, 0);
 974}
 975
 976static int scsi_debug_ioctl(struct scsi_device *dev, unsigned int cmd,
 977			    void __user *arg)
 978{
 979	if (sdebug_verbose) {
 980		if (0x1261 == cmd)
 981			sdev_printk(KERN_INFO, dev,
 982				    "%s: BLKFLSBUF [0x1261]\n", __func__);
 983		else if (0x5331 == cmd)
 984			sdev_printk(KERN_INFO, dev,
 985				    "%s: CDROM_GET_CAPABILITY [0x5331]\n",
 986				    __func__);
 987		else
 988			sdev_printk(KERN_INFO, dev, "%s: cmd=0x%x\n",
 989				    __func__, cmd);
 990	}
 991	return -EINVAL;
 992	/* return -ENOTTY; // correct return but upsets fdisk */
 993}
 994
 995static void config_cdb_len(struct scsi_device *sdev)
 996{
 997	switch (sdebug_cdb_len) {
 998	case 6:	/* suggest 6 byte READ, WRITE and MODE SENSE/SELECT */
 999		sdev->use_10_for_rw = false;
1000		sdev->use_16_for_rw = false;
1001		sdev->use_10_for_ms = false;
1002		break;
1003	case 10: /* suggest 10 byte RWs and 6 byte MODE SENSE/SELECT */
1004		sdev->use_10_for_rw = true;
1005		sdev->use_16_for_rw = false;
1006		sdev->use_10_for_ms = false;
1007		break;
1008	case 12: /* suggest 10 byte RWs and 10 byte MODE SENSE/SELECT */
1009		sdev->use_10_for_rw = true;
1010		sdev->use_16_for_rw = false;
1011		sdev->use_10_for_ms = true;
1012		break;
1013	case 16:
1014		sdev->use_10_for_rw = false;
1015		sdev->use_16_for_rw = true;
1016		sdev->use_10_for_ms = true;
1017		break;
1018	case 32: /* No knobs to suggest this so same as 16 for now */
1019		sdev->use_10_for_rw = false;
1020		sdev->use_16_for_rw = true;
1021		sdev->use_10_for_ms = true;
1022		break;
1023	default:
1024		pr_warn("unexpected cdb_len=%d, force to 10\n",
1025			sdebug_cdb_len);
1026		sdev->use_10_for_rw = true;
1027		sdev->use_16_for_rw = false;
1028		sdev->use_10_for_ms = false;
1029		sdebug_cdb_len = 10;
1030		break;
1031	}
1032}
1033
1034static void all_config_cdb_len(void)
1035{
1036	struct sdebug_host_info *sdbg_host;
1037	struct Scsi_Host *shost;
1038	struct scsi_device *sdev;
1039
1040	spin_lock(&sdebug_host_list_lock);
1041	list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
1042		shost = sdbg_host->shost;
1043		shost_for_each_device(sdev, shost) {
1044			config_cdb_len(sdev);
1045		}
1046	}
1047	spin_unlock(&sdebug_host_list_lock);
1048}
1049
1050static void clear_luns_changed_on_target(struct sdebug_dev_info *devip)
1051{
1052	struct sdebug_host_info *sdhp;
1053	struct sdebug_dev_info *dp;
1054
1055	spin_lock(&sdebug_host_list_lock);
1056	list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
1057		list_for_each_entry(dp, &sdhp->dev_info_list, dev_list) {
1058			if ((devip->sdbg_host == dp->sdbg_host) &&
1059			    (devip->target == dp->target))
1060				clear_bit(SDEBUG_UA_LUNS_CHANGED, dp->uas_bm);
1061		}
1062	}
1063	spin_unlock(&sdebug_host_list_lock);
1064}
1065
1066static int make_ua(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
1067{
1068	int k;
1069
1070	k = find_first_bit(devip->uas_bm, SDEBUG_NUM_UAS);
1071	if (k != SDEBUG_NUM_UAS) {
1072		const char *cp = NULL;
1073
1074		switch (k) {
1075		case SDEBUG_UA_POR:
1076			mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
1077					POWER_ON_RESET_ASCQ);
1078			if (sdebug_verbose)
1079				cp = "power on reset";
1080			break;
1081		case SDEBUG_UA_BUS_RESET:
1082			mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
1083					BUS_RESET_ASCQ);
1084			if (sdebug_verbose)
1085				cp = "bus reset";
1086			break;
1087		case SDEBUG_UA_MODE_CHANGED:
1088			mk_sense_buffer(scp, UNIT_ATTENTION, UA_CHANGED_ASC,
1089					MODE_CHANGED_ASCQ);
1090			if (sdebug_verbose)
1091				cp = "mode parameters changed";
1092			break;
1093		case SDEBUG_UA_CAPACITY_CHANGED:
1094			mk_sense_buffer(scp, UNIT_ATTENTION, UA_CHANGED_ASC,
1095					CAPACITY_CHANGED_ASCQ);
1096			if (sdebug_verbose)
1097				cp = "capacity data changed";
1098			break;
1099		case SDEBUG_UA_MICROCODE_CHANGED:
1100			mk_sense_buffer(scp, UNIT_ATTENTION,
1101					TARGET_CHANGED_ASC,
1102					MICROCODE_CHANGED_ASCQ);
1103			if (sdebug_verbose)
1104				cp = "microcode has been changed";
1105			break;
1106		case SDEBUG_UA_MICROCODE_CHANGED_WO_RESET:
1107			mk_sense_buffer(scp, UNIT_ATTENTION,
1108					TARGET_CHANGED_ASC,
1109					MICROCODE_CHANGED_WO_RESET_ASCQ);
1110			if (sdebug_verbose)
1111				cp = "microcode has been changed without reset";
1112			break;
1113		case SDEBUG_UA_LUNS_CHANGED:
1114			/*
1115			 * SPC-3 behavior is to report a UNIT ATTENTION with
1116			 * ASC/ASCQ REPORTED LUNS DATA HAS CHANGED on every LUN
1117			 * on the target, until a REPORT LUNS command is
1118			 * received.  SPC-4 behavior is to report it only once.
1119			 * NOTE:  sdebug_scsi_level does not use the same
1120			 * values as struct scsi_device->scsi_level.
1121			 */
1122			if (sdebug_scsi_level >= 6)	/* SPC-4 and above */
1123				clear_luns_changed_on_target(devip);
1124			mk_sense_buffer(scp, UNIT_ATTENTION,
1125					TARGET_CHANGED_ASC,
1126					LUNS_CHANGED_ASCQ);
1127			if (sdebug_verbose)
1128				cp = "reported luns data has changed";
1129			break;
1130		default:
1131			pr_warn("unexpected unit attention code=%d\n", k);
1132			if (sdebug_verbose)
1133				cp = "unknown";
1134			break;
1135		}
1136		clear_bit(k, devip->uas_bm);
1137		if (sdebug_verbose)
1138			sdev_printk(KERN_INFO, scp->device,
1139				   "%s reports: Unit attention: %s\n",
1140				   my_name, cp);
1141		return check_condition_result;
1142	}
1143	return 0;
1144}
1145
1146/* Build SCSI "data-in" buffer. Returns 0 if ok else (DID_ERROR << 16). */
1147static int fill_from_dev_buffer(struct scsi_cmnd *scp, unsigned char *arr,
1148				int arr_len)
1149{
1150	int act_len;
1151	struct scsi_data_buffer *sdb = &scp->sdb;
1152
1153	if (!sdb->length)
1154		return 0;
1155	if (scp->sc_data_direction != DMA_FROM_DEVICE)
1156		return DID_ERROR << 16;
1157
1158	act_len = sg_copy_from_buffer(sdb->table.sgl, sdb->table.nents,
1159				      arr, arr_len);
1160	scsi_set_resid(scp, scsi_bufflen(scp) - act_len);
1161
1162	return 0;
1163}
1164
1165/* Partial build of SCSI "data-in" buffer. Returns 0 if ok else
1166 * (DID_ERROR << 16). Can write to offset in data-in buffer. If multiple
1167 * calls, not required to write in ascending offset order. Assumes resid
1168 * set to scsi_bufflen() prior to any calls.
1169 */
1170static int p_fill_from_dev_buffer(struct scsi_cmnd *scp, const void *arr,
1171				  int arr_len, unsigned int off_dst)
1172{
1173	unsigned int act_len, n;
1174	struct scsi_data_buffer *sdb = &scp->sdb;
1175	off_t skip = off_dst;
1176
1177	if (sdb->length <= off_dst)
1178		return 0;
1179	if (scp->sc_data_direction != DMA_FROM_DEVICE)
1180		return DID_ERROR << 16;
1181
1182	act_len = sg_pcopy_from_buffer(sdb->table.sgl, sdb->table.nents,
1183				       arr, arr_len, skip);
1184	pr_debug("%s: off_dst=%u, scsi_bufflen=%u, act_len=%u, resid=%d\n",
1185		 __func__, off_dst, scsi_bufflen(scp), act_len,
1186		 scsi_get_resid(scp));
1187	n = scsi_bufflen(scp) - (off_dst + act_len);
1188	scsi_set_resid(scp, min_t(int, scsi_get_resid(scp), n));
1189	return 0;
1190}
1191
1192/* Fetches from SCSI "data-out" buffer. Returns number of bytes fetched into
1193 * 'arr' or -1 if error.
1194 */
1195static int fetch_to_dev_buffer(struct scsi_cmnd *scp, unsigned char *arr,
1196			       int arr_len)
1197{
1198	if (!scsi_bufflen(scp))
1199		return 0;
1200	if (scp->sc_data_direction != DMA_TO_DEVICE)
1201		return -1;
1202
1203	return scsi_sg_copy_to_buffer(scp, arr, arr_len);
1204}
1205
1206
1207static char sdebug_inq_vendor_id[9] = "Linux   ";
1208static char sdebug_inq_product_id[17] = "scsi_debug      ";
1209static char sdebug_inq_product_rev[5] = SDEBUG_VERSION;
1210/* Use some locally assigned NAAs for SAS addresses. */
1211static const u64 naa3_comp_a = 0x3222222000000000ULL;
1212static const u64 naa3_comp_b = 0x3333333000000000ULL;
1213static const u64 naa3_comp_c = 0x3111111000000000ULL;
1214
1215/* Device identification VPD page. Returns number of bytes placed in arr */
1216static int inquiry_vpd_83(unsigned char *arr, int port_group_id,
1217			  int target_dev_id, int dev_id_num,
1218			  const char *dev_id_str, int dev_id_str_len,
1219			  const uuid_t *lu_name)
1220{
1221	int num, port_a;
1222	char b[32];
1223
1224	port_a = target_dev_id + 1;
1225	/* T10 vendor identifier field format (faked) */
1226	arr[0] = 0x2;	/* ASCII */
1227	arr[1] = 0x1;
1228	arr[2] = 0x0;
1229	memcpy(&arr[4], sdebug_inq_vendor_id, 8);
1230	memcpy(&arr[12], sdebug_inq_product_id, 16);
1231	memcpy(&arr[28], dev_id_str, dev_id_str_len);
1232	num = 8 + 16 + dev_id_str_len;
1233	arr[3] = num;
1234	num += 4;
1235	if (dev_id_num >= 0) {
1236		if (sdebug_uuid_ctl) {
1237			/* Locally assigned UUID */
1238			arr[num++] = 0x1;  /* binary (not necessarily sas) */
1239			arr[num++] = 0xa;  /* PIV=0, lu, naa */
1240			arr[num++] = 0x0;
1241			arr[num++] = 0x12;
1242			arr[num++] = 0x10; /* uuid type=1, locally assigned */
1243			arr[num++] = 0x0;
1244			memcpy(arr + num, lu_name, 16);
1245			num += 16;
1246		} else {
1247			/* NAA-3, Logical unit identifier (binary) */
1248			arr[num++] = 0x1;  /* binary (not necessarily sas) */
1249			arr[num++] = 0x3;  /* PIV=0, lu, naa */
1250			arr[num++] = 0x0;
1251			arr[num++] = 0x8;
1252			put_unaligned_be64(naa3_comp_b + dev_id_num, arr + num);
1253			num += 8;
1254		}
1255		/* Target relative port number */
1256		arr[num++] = 0x61;	/* proto=sas, binary */
1257		arr[num++] = 0x94;	/* PIV=1, target port, rel port */
1258		arr[num++] = 0x0;	/* reserved */
1259		arr[num++] = 0x4;	/* length */
1260		arr[num++] = 0x0;	/* reserved */
1261		arr[num++] = 0x0;	/* reserved */
1262		arr[num++] = 0x0;
1263		arr[num++] = 0x1;	/* relative port A */
1264	}
1265	/* NAA-3, Target port identifier */
1266	arr[num++] = 0x61;	/* proto=sas, binary */
1267	arr[num++] = 0x93;	/* piv=1, target port, naa */
1268	arr[num++] = 0x0;
1269	arr[num++] = 0x8;
1270	put_unaligned_be64(naa3_comp_a + port_a, arr + num);
1271	num += 8;
1272	/* NAA-3, Target port group identifier */
1273	arr[num++] = 0x61;	/* proto=sas, binary */
1274	arr[num++] = 0x95;	/* piv=1, target port group id */
1275	arr[num++] = 0x0;
1276	arr[num++] = 0x4;
1277	arr[num++] = 0;
1278	arr[num++] = 0;
1279	put_unaligned_be16(port_group_id, arr + num);
1280	num += 2;
1281	/* NAA-3, Target device identifier */
1282	arr[num++] = 0x61;	/* proto=sas, binary */
1283	arr[num++] = 0xa3;	/* piv=1, target device, naa */
1284	arr[num++] = 0x0;
1285	arr[num++] = 0x8;
1286	put_unaligned_be64(naa3_comp_a + target_dev_id, arr + num);
1287	num += 8;
1288	/* SCSI name string: Target device identifier */
1289	arr[num++] = 0x63;	/* proto=sas, UTF-8 */
1290	arr[num++] = 0xa8;	/* piv=1, target device, SCSI name string */
1291	arr[num++] = 0x0;
1292	arr[num++] = 24;
1293	memcpy(arr + num, "naa.32222220", 12);
1294	num += 12;
1295	snprintf(b, sizeof(b), "%08X", target_dev_id);
1296	memcpy(arr + num, b, 8);
1297	num += 8;
1298	memset(arr + num, 0, 4);
1299	num += 4;
1300	return num;
1301}
1302
1303static unsigned char vpd84_data[] = {
1304/* from 4th byte */ 0x22,0x22,0x22,0x0,0xbb,0x0,
1305    0x22,0x22,0x22,0x0,0xbb,0x1,
1306    0x22,0x22,0x22,0x0,0xbb,0x2,
1307};
1308
1309/*  Software interface identification VPD page */
1310static int inquiry_vpd_84(unsigned char *arr)
1311{
1312	memcpy(arr, vpd84_data, sizeof(vpd84_data));
1313	return sizeof(vpd84_data);
1314}
1315
1316/* Management network addresses VPD page */
1317static int inquiry_vpd_85(unsigned char *arr)
1318{
1319	int num = 0;
1320	const char *na1 = "https://www.kernel.org/config";
1321	const char *na2 = "http://www.kernel.org/log";
1322	int plen, olen;
1323
1324	arr[num++] = 0x1;	/* lu, storage config */
1325	arr[num++] = 0x0;	/* reserved */
1326	arr[num++] = 0x0;
1327	olen = strlen(na1);
1328	plen = olen + 1;
1329	if (plen % 4)
1330		plen = ((plen / 4) + 1) * 4;
1331	arr[num++] = plen;	/* length, null termianted, padded */
1332	memcpy(arr + num, na1, olen);
1333	memset(arr + num + olen, 0, plen - olen);
1334	num += plen;
1335
1336	arr[num++] = 0x4;	/* lu, logging */
1337	arr[num++] = 0x0;	/* reserved */
1338	arr[num++] = 0x0;
1339	olen = strlen(na2);
1340	plen = olen + 1;
1341	if (plen % 4)
1342		plen = ((plen / 4) + 1) * 4;
1343	arr[num++] = plen;	/* length, null terminated, padded */
1344	memcpy(arr + num, na2, olen);
1345	memset(arr + num + olen, 0, plen - olen);
1346	num += plen;
1347
1348	return num;
1349}
1350
1351/* SCSI ports VPD page */
1352static int inquiry_vpd_88(unsigned char *arr, int target_dev_id)
1353{
1354	int num = 0;
1355	int port_a, port_b;
1356
1357	port_a = target_dev_id + 1;
1358	port_b = port_a + 1;
1359	arr[num++] = 0x0;	/* reserved */
1360	arr[num++] = 0x0;	/* reserved */
1361	arr[num++] = 0x0;
1362	arr[num++] = 0x1;	/* relative port 1 (primary) */
1363	memset(arr + num, 0, 6);
1364	num += 6;
1365	arr[num++] = 0x0;
1366	arr[num++] = 12;	/* length tp descriptor */
1367	/* naa-5 target port identifier (A) */
1368	arr[num++] = 0x61;	/* proto=sas, binary */
1369	arr[num++] = 0x93;	/* PIV=1, target port, NAA */
1370	arr[num++] = 0x0;	/* reserved */
1371	arr[num++] = 0x8;	/* length */
1372	put_unaligned_be64(naa3_comp_a + port_a, arr + num);
1373	num += 8;
1374	arr[num++] = 0x0;	/* reserved */
1375	arr[num++] = 0x0;	/* reserved */
1376	arr[num++] = 0x0;
1377	arr[num++] = 0x2;	/* relative port 2 (secondary) */
1378	memset(arr + num, 0, 6);
1379	num += 6;
1380	arr[num++] = 0x0;
1381	arr[num++] = 12;	/* length tp descriptor */
1382	/* naa-5 target port identifier (B) */
1383	arr[num++] = 0x61;	/* proto=sas, binary */
1384	arr[num++] = 0x93;	/* PIV=1, target port, NAA */
1385	arr[num++] = 0x0;	/* reserved */
1386	arr[num++] = 0x8;	/* length */
1387	put_unaligned_be64(naa3_comp_a + port_b, arr + num);
1388	num += 8;
1389
1390	return num;
1391}
1392
1393
1394static unsigned char vpd89_data[] = {
1395/* from 4th byte */ 0,0,0,0,
1396'l','i','n','u','x',' ',' ',' ',
1397'S','A','T',' ','s','c','s','i','_','d','e','b','u','g',' ',' ',
1398'1','2','3','4',
13990x34,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,
14000xec,0,0,0,
14010x5a,0xc,0xff,0x3f,0x37,0xc8,0x10,0,0,0,0,0,0x3f,0,0,0,
14020,0,0,0,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x20,0x20,0x20,0x20,
14030x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0,0,0,0x40,0x4,0,0x2e,0x33,
14040x38,0x31,0x20,0x20,0x20,0x20,0x54,0x53,0x38,0x33,0x30,0x30,0x33,0x31,
14050x53,0x41,
14060x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
14070x20,0x20,
14080x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
14090x10,0x80,
14100,0,0,0x2f,0,0,0,0x2,0,0x2,0x7,0,0xff,0xff,0x1,0,
14110x3f,0,0xc1,0xff,0x3e,0,0x10,0x1,0xb0,0xf8,0x50,0x9,0,0,0x7,0,
14120x3,0,0x78,0,0x78,0,0xf0,0,0x78,0,0,0,0,0,0,0,
14130,0,0,0,0,0,0,0,0x2,0,0,0,0,0,0,0,
14140x7e,0,0x1b,0,0x6b,0x34,0x1,0x7d,0x3,0x40,0x69,0x34,0x1,0x3c,0x3,0x40,
14150x7f,0x40,0,0,0,0,0xfe,0xfe,0,0,0,0,0,0xfe,0,0,
14160,0,0,0,0,0,0,0,0xb0,0xf8,0x50,0x9,0,0,0,0,
14170,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14180,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14190,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14200x1,0,0xb0,0xf8,0x50,0x9,0xb0,0xf8,0x50,0x9,0x20,0x20,0x2,0,0xb6,0x42,
14210,0x80,0x8a,0,0x6,0x3c,0xa,0x3c,0xff,0xff,0xc6,0x7,0,0x1,0,0x8,
14220xf0,0xf,0,0x10,0x2,0,0x30,0,0,0,0,0,0,0,0x6,0xfe,
14230,0,0x2,0,0x50,0,0x8a,0,0x4f,0x95,0,0,0x21,0,0xb,0,
14240,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14250,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14260,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14270,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14280,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14290,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14300,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14310,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14320,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14330,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14340,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
14350,0,0,0,0,0,0,0,0,0,0,0,0,0,0xa5,0x51,
1436};
1437
1438/* ATA Information VPD page */
1439static int inquiry_vpd_89(unsigned char *arr)
1440{
1441	memcpy(arr, vpd89_data, sizeof(vpd89_data));
1442	return sizeof(vpd89_data);
1443}
1444
1445
1446static unsigned char vpdb0_data[] = {
1447	/* from 4th byte */ 0,0,0,4, 0,0,0x4,0, 0,0,0,64,
1448	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1449	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1450	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1451};
1452
1453/* Block limits VPD page (SBC-3) */
1454static int inquiry_vpd_b0(unsigned char *arr)
1455{
1456	unsigned int gran;
1457
1458	memcpy(arr, vpdb0_data, sizeof(vpdb0_data));
1459
1460	/* Optimal transfer length granularity */
1461	if (sdebug_opt_xferlen_exp != 0 &&
1462	    sdebug_physblk_exp < sdebug_opt_xferlen_exp)
1463		gran = 1 << sdebug_opt_xferlen_exp;
1464	else
1465		gran = 1 << sdebug_physblk_exp;
1466	put_unaligned_be16(gran, arr + 2);
1467
1468	/* Maximum Transfer Length */
1469	if (sdebug_store_sectors > 0x400)
1470		put_unaligned_be32(sdebug_store_sectors, arr + 4);
1471
1472	/* Optimal Transfer Length */
1473	put_unaligned_be32(sdebug_opt_blks, &arr[8]);
1474
1475	if (sdebug_lbpu) {
1476		/* Maximum Unmap LBA Count */
1477		put_unaligned_be32(sdebug_unmap_max_blocks, &arr[16]);
1478
1479		/* Maximum Unmap Block Descriptor Count */
1480		put_unaligned_be32(sdebug_unmap_max_desc, &arr[20]);
1481	}
1482
1483	/* Unmap Granularity Alignment */
1484	if (sdebug_unmap_alignment) {
1485		put_unaligned_be32(sdebug_unmap_alignment, &arr[28]);
1486		arr[28] |= 0x80; /* UGAVALID */
1487	}
1488
1489	/* Optimal Unmap Granularity */
1490	put_unaligned_be32(sdebug_unmap_granularity, &arr[24]);
1491
1492	/* Maximum WRITE SAME Length */
1493	put_unaligned_be64(sdebug_write_same_length, &arr[32]);
1494
1495	return 0x3c; /* Mandatory page length for Logical Block Provisioning */
1496
1497	return sizeof(vpdb0_data);
1498}
1499
1500/* Block device characteristics VPD page (SBC-3) */
1501static int inquiry_vpd_b1(struct sdebug_dev_info *devip, unsigned char *arr)
1502{
1503	memset(arr, 0, 0x3c);
1504	arr[0] = 0;
1505	arr[1] = 1;	/* non rotating medium (e.g. solid state) */
1506	arr[2] = 0;
1507	arr[3] = 5;	/* less than 1.8" */
1508	if (devip->zmodel == BLK_ZONED_HA)
1509		arr[4] = 1 << 4;	/* zoned field = 01b */
1510
1511	return 0x3c;
1512}
1513
1514/* Logical block provisioning VPD page (SBC-4) */
1515static int inquiry_vpd_b2(unsigned char *arr)
1516{
1517	memset(arr, 0, 0x4);
1518	arr[0] = 0;			/* threshold exponent */
1519	if (sdebug_lbpu)
1520		arr[1] = 1 << 7;
1521	if (sdebug_lbpws)
1522		arr[1] |= 1 << 6;
1523	if (sdebug_lbpws10)
1524		arr[1] |= 1 << 5;
1525	if (sdebug_lbprz && scsi_debug_lbp())
1526		arr[1] |= (sdebug_lbprz & 0x7) << 2;  /* sbc4r07 and later */
1527	/* anc_sup=0; dp=0 (no provisioning group descriptor) */
1528	/* minimum_percentage=0; provisioning_type=0 (unknown) */
1529	/* threshold_percentage=0 */
1530	return 0x4;
1531}
1532
1533/* Zoned block device characteristics VPD page (ZBC mandatory) */
1534static int inquiry_vpd_b6(struct sdebug_dev_info *devip, unsigned char *arr)
1535{
1536	memset(arr, 0, 0x3c);
1537	arr[0] = 0x1; /* set URSWRZ (unrestricted read in seq. wr req zone) */
1538	/*
1539	 * Set Optimal number of open sequential write preferred zones and
1540	 * Optimal number of non-sequentially written sequential write
1541	 * preferred zones fields to 'not reported' (0xffffffff). Leave other
1542	 * fields set to zero, apart from Max. number of open swrz_s field.
1543	 */
1544	put_unaligned_be32(0xffffffff, &arr[4]);
1545	put_unaligned_be32(0xffffffff, &arr[8]);
1546	if (sdeb_zbc_model == BLK_ZONED_HM && devip->max_open)
1547		put_unaligned_be32(devip->max_open, &arr[12]);
1548	else
1549		put_unaligned_be32(0xffffffff, &arr[12]);
1550	return 0x3c;
1551}
1552
1553#define SDEBUG_LONG_INQ_SZ 96
1554#define SDEBUG_MAX_INQ_ARR_SZ 584
1555
1556static int resp_inquiry(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
1557{
1558	unsigned char pq_pdt;
1559	unsigned char *arr;
1560	unsigned char *cmd = scp->cmnd;
1561	int alloc_len, n, ret;
1562	bool have_wlun, is_disk, is_zbc, is_disk_zbc;
1563
1564	alloc_len = get_unaligned_be16(cmd + 3);
1565	arr = kzalloc(SDEBUG_MAX_INQ_ARR_SZ, GFP_ATOMIC);
1566	if (! arr)
1567		return DID_REQUEUE << 16;
1568	is_disk = (sdebug_ptype == TYPE_DISK);
1569	is_zbc = (devip->zmodel != BLK_ZONED_NONE);
1570	is_disk_zbc = (is_disk || is_zbc);
1571	have_wlun = scsi_is_wlun(scp->device->lun);
1572	if (have_wlun)
1573		pq_pdt = TYPE_WLUN;	/* present, wlun */
1574	else if (sdebug_no_lun_0 && (devip->lun == SDEBUG_LUN_0_VAL))
1575		pq_pdt = 0x7f;	/* not present, PQ=3, PDT=0x1f */
1576	else
1577		pq_pdt = (sdebug_ptype & 0x1f);
1578	arr[0] = pq_pdt;
1579	if (0x2 & cmd[1]) {  /* CMDDT bit set */
1580		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 1);
1581		kfree(arr);
1582		return check_condition_result;
1583	} else if (0x1 & cmd[1]) {  /* EVPD bit set */
1584		int lu_id_num, port_group_id, target_dev_id, len;
1585		char lu_id_str[6];
1586		int host_no = devip->sdbg_host->shost->host_no;
1587		
1588		port_group_id = (((host_no + 1) & 0x7f) << 8) +
1589		    (devip->channel & 0x7f);
1590		if (sdebug_vpd_use_hostno == 0)
1591			host_no = 0;
1592		lu_id_num = have_wlun ? -1 : (((host_no + 1) * 2000) +
1593			    (devip->target * 1000) + devip->lun);
1594		target_dev_id = ((host_no + 1) * 2000) +
1595				 (devip->target * 1000) - 3;
1596		len = scnprintf(lu_id_str, 6, "%d", lu_id_num);
1597		if (0 == cmd[2]) { /* supported vital product data pages */
1598			arr[1] = cmd[2];	/*sanity */
1599			n = 4;
1600			arr[n++] = 0x0;   /* this page */
1601			arr[n++] = 0x80;  /* unit serial number */
1602			arr[n++] = 0x83;  /* device identification */
1603			arr[n++] = 0x84;  /* software interface ident. */
1604			arr[n++] = 0x85;  /* management network addresses */
1605			arr[n++] = 0x86;  /* extended inquiry */
1606			arr[n++] = 0x87;  /* mode page policy */
1607			arr[n++] = 0x88;  /* SCSI ports */
1608			if (is_disk_zbc) {	  /* SBC or ZBC */
1609				arr[n++] = 0x89;  /* ATA information */
1610				arr[n++] = 0xb0;  /* Block limits */
1611				arr[n++] = 0xb1;  /* Block characteristics */
1612				if (is_disk)
1613					arr[n++] = 0xb2;  /* LB Provisioning */
1614				if (is_zbc)
1615					arr[n++] = 0xb6;  /* ZB dev. char. */
1616			}
1617			arr[3] = n - 4;	  /* number of supported VPD pages */
1618		} else if (0x80 == cmd[2]) { /* unit serial number */
1619			arr[1] = cmd[2];	/*sanity */
1620			arr[3] = len;
1621			memcpy(&arr[4], lu_id_str, len);
1622		} else if (0x83 == cmd[2]) { /* device identification */
1623			arr[1] = cmd[2];	/*sanity */
1624			arr[3] = inquiry_vpd_83(&arr[4], port_group_id,
1625						target_dev_id, lu_id_num,
1626						lu_id_str, len,
1627						&devip->lu_name);
1628		} else if (0x84 == cmd[2]) { /* Software interface ident. */
1629			arr[1] = cmd[2];	/*sanity */
1630			arr[3] = inquiry_vpd_84(&arr[4]);
1631		} else if (0x85 == cmd[2]) { /* Management network addresses */
1632			arr[1] = cmd[2];	/*sanity */
1633			arr[3] = inquiry_vpd_85(&arr[4]);
1634		} else if (0x86 == cmd[2]) { /* extended inquiry */
1635			arr[1] = cmd[2];	/*sanity */
1636			arr[3] = 0x3c;	/* number of following entries */
1637			if (sdebug_dif == T10_PI_TYPE3_PROTECTION)
1638				arr[4] = 0x4;	/* SPT: GRD_CHK:1 */
1639			else if (have_dif_prot)
1640				arr[4] = 0x5;   /* SPT: GRD_CHK:1, REF_CHK:1 */
1641			else
1642				arr[4] = 0x0;   /* no protection stuff */
1643			arr[5] = 0x7;   /* head of q, ordered + simple q's */
1644		} else if (0x87 == cmd[2]) { /* mode page policy */
1645			arr[1] = cmd[2];	/*sanity */
1646			arr[3] = 0x8;	/* number of following entries */
1647			arr[4] = 0x2;	/* disconnect-reconnect mp */
1648			arr[6] = 0x80;	/* mlus, shared */
1649			arr[8] = 0x18;	 /* protocol specific lu */
1650			arr[10] = 0x82;	 /* mlus, per initiator port */
1651		} else if (0x88 == cmd[2]) { /* SCSI Ports */
1652			arr[1] = cmd[2];	/*sanity */
1653			arr[3] = inquiry_vpd_88(&arr[4], target_dev_id);
1654		} else if (is_disk_zbc && 0x89 == cmd[2]) { /* ATA info */
1655			arr[1] = cmd[2];        /*sanity */
1656			n = inquiry_vpd_89(&arr[4]);
1657			put_unaligned_be16(n, arr + 2);
1658		} else if (is_disk_zbc && 0xb0 == cmd[2]) { /* Block limits */
1659			arr[1] = cmd[2];        /*sanity */
1660			arr[3] = inquiry_vpd_b0(&arr[4]);
1661		} else if (is_disk_zbc && 0xb1 == cmd[2]) { /* Block char. */
1662			arr[1] = cmd[2];        /*sanity */
1663			arr[3] = inquiry_vpd_b1(devip, &arr[4]);
1664		} else if (is_disk && 0xb2 == cmd[2]) { /* LB Prov. */
1665			arr[1] = cmd[2];        /*sanity */
1666			arr[3] = inquiry_vpd_b2(&arr[4]);
1667		} else if (is_zbc && cmd[2] == 0xb6) { /* ZB dev. charact. */
1668			arr[1] = cmd[2];        /*sanity */
1669			arr[3] = inquiry_vpd_b6(devip, &arr[4]);
1670		} else {
1671			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, -1);
1672			kfree(arr);
1673			return check_condition_result;
1674		}
1675		len = min(get_unaligned_be16(arr + 2) + 4, alloc_len);
1676		ret = fill_from_dev_buffer(scp, arr,
1677			    min(len, SDEBUG_MAX_INQ_ARR_SZ));
1678		kfree(arr);
1679		return ret;
1680	}
1681	/* drops through here for a standard inquiry */
1682	arr[1] = sdebug_removable ? 0x80 : 0;	/* Removable disk */
1683	arr[2] = sdebug_scsi_level;
1684	arr[3] = 2;    /* response_data_format==2 */
1685	arr[4] = SDEBUG_LONG_INQ_SZ - 5;
1686	arr[5] = (int)have_dif_prot;	/* PROTECT bit */
1687	if (sdebug_vpd_use_hostno == 0)
1688		arr[5] |= 0x10; /* claim: implicit TPGS */
1689	arr[6] = 0x10; /* claim: MultiP */
1690	/* arr[6] |= 0x40; ... claim: EncServ (enclosure services) */
1691	arr[7] = 0xa; /* claim: LINKED + CMDQUE */
1692	memcpy(&arr[8], sdebug_inq_vendor_id, 8);
1693	memcpy(&arr[16], sdebug_inq_product_id, 16);
1694	memcpy(&arr[32], sdebug_inq_product_rev, 4);
1695	/* Use Vendor Specific area to place driver date in ASCII hex */
1696	memcpy(&arr[36], sdebug_version_date, 8);
1697	/* version descriptors (2 bytes each) follow */
1698	put_unaligned_be16(0xc0, arr + 58);   /* SAM-6 no version claimed */
1699	put_unaligned_be16(0x5c0, arr + 60);  /* SPC-5 no version claimed */
1700	n = 62;
1701	if (is_disk) {		/* SBC-4 no version claimed */
1702		put_unaligned_be16(0x600, arr + n);
1703		n += 2;
1704	} else if (sdebug_ptype == TYPE_TAPE) {	/* SSC-4 rev 3 */
1705		put_unaligned_be16(0x525, arr + n);
1706		n += 2;
1707	} else if (is_zbc) {	/* ZBC BSR INCITS 536 revision 05 */
1708		put_unaligned_be16(0x624, arr + n);
1709		n += 2;
1710	}
1711	put_unaligned_be16(0x2100, arr + n);	/* SPL-4 no version claimed */
1712	ret = fill_from_dev_buffer(scp, arr,
1713			    min_t(int, alloc_len, SDEBUG_LONG_INQ_SZ));
1714	kfree(arr);
1715	return ret;
1716}
1717
1718/* See resp_iec_m_pg() for how this data is manipulated */
1719static unsigned char iec_m_pg[] = {0x1c, 0xa, 0x08, 0, 0, 0, 0, 0,
1720				   0, 0, 0x0, 0x0};
1721
1722static int resp_requests(struct scsi_cmnd *scp,
1723			 struct sdebug_dev_info *devip)
1724{
1725	unsigned char *cmd = scp->cmnd;
1726	unsigned char arr[SCSI_SENSE_BUFFERSIZE];	/* assume >= 18 bytes */
1727	bool dsense = !!(cmd[1] & 1);
1728	int alloc_len = cmd[4];
1729	int len = 18;
1730	int stopped_state = atomic_read(&devip->stopped);
1731
1732	memset(arr, 0, sizeof(arr));
1733	if (stopped_state > 0) {	/* some "pollable" data [spc6r02: 5.12.2] */
1734		if (dsense) {
1735			arr[0] = 0x72;
1736			arr[1] = NOT_READY;
1737			arr[2] = LOGICAL_UNIT_NOT_READY;
1738			arr[3] = (stopped_state == 2) ? 0x1 : 0x2;
1739			len = 8;
1740		} else {
1741			arr[0] = 0x70;
1742			arr[2] = NOT_READY;		/* NO_SENSE in sense_key */
1743			arr[7] = 0xa;			/* 18 byte sense buffer */
1744			arr[12] = LOGICAL_UNIT_NOT_READY;
1745			arr[13] = (stopped_state == 2) ? 0x1 : 0x2;
1746		}
1747	} else if ((iec_m_pg[2] & 0x4) && (6 == (iec_m_pg[3] & 0xf))) {
1748		/* Information exceptions control mode page: TEST=1, MRIE=6 */
1749		if (dsense) {
1750			arr[0] = 0x72;
1751			arr[1] = 0x0;		/* NO_SENSE in sense_key */
1752			arr[2] = THRESHOLD_EXCEEDED;
1753			arr[3] = 0xff;		/* Failure prediction(false) */
1754			len = 8;
1755		} else {
1756			arr[0] = 0x70;
1757			arr[2] = 0x0;		/* NO_SENSE in sense_key */
1758			arr[7] = 0xa;   	/* 18 byte sense buffer */
1759			arr[12] = THRESHOLD_EXCEEDED;
1760			arr[13] = 0xff;		/* Failure prediction(false) */
1761		}
1762	} else {	/* nothing to report */
1763		if (dsense) {
1764			len = 8;
1765			memset(arr, 0, len);
1766			arr[0] = 0x72;
1767		} else {
1768			memset(arr, 0, len);
1769			arr[0] = 0x70;
1770			arr[7] = 0xa;
1771		}
1772	}
1773	return fill_from_dev_buffer(scp, arr, min_t(int, len, alloc_len));
1774}
1775
1776static int resp_start_stop(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
1777{
1778	unsigned char *cmd = scp->cmnd;
1779	int power_cond, want_stop, stopped_state;
1780	bool changing;
1781
1782	power_cond = (cmd[4] & 0xf0) >> 4;
1783	if (power_cond) {
1784		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, 7);
1785		return check_condition_result;
1786	}
1787	want_stop = !(cmd[4] & 1);
1788	stopped_state = atomic_read(&devip->stopped);
1789	if (stopped_state == 2) {
1790		ktime_t now_ts = ktime_get_boottime();
1791
1792		if (ktime_to_ns(now_ts) > ktime_to_ns(devip->create_ts)) {
1793			u64 diff_ns = ktime_to_ns(ktime_sub(now_ts, devip->create_ts));
1794
1795			if (diff_ns >= ((u64)sdeb_tur_ms_to_ready * 1000000)) {
1796				/* tur_ms_to_ready timer extinguished */
1797				atomic_set(&devip->stopped, 0);
1798				stopped_state = 0;
1799			}
1800		}
1801		if (stopped_state == 2) {
1802			if (want_stop) {
1803				stopped_state = 1;	/* dummy up success */
1804			} else {	/* Disallow tur_ms_to_ready delay to be overridden */
1805				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, 0 /* START bit */);
1806				return check_condition_result;
1807			}
1808		}
1809	}
1810	changing = (stopped_state != want_stop);
1811	if (changing)
1812		atomic_xchg(&devip->stopped, want_stop);
1813	if (!changing || (cmd[1] & 0x1))  /* state unchanged or IMMED bit set in cdb */
1814		return SDEG_RES_IMMED_MASK;
1815	else
1816		return 0;
1817}
1818
1819static sector_t get_sdebug_capacity(void)
1820{
1821	static const unsigned int gibibyte = 1073741824;
1822
1823	if (sdebug_virtual_gb > 0)
1824		return (sector_t)sdebug_virtual_gb *
1825			(gibibyte / sdebug_sector_size);
1826	else
1827		return sdebug_store_sectors;
1828}
1829
1830#define SDEBUG_READCAP_ARR_SZ 8
1831static int resp_readcap(struct scsi_cmnd *scp,
1832			struct sdebug_dev_info *devip)
1833{
1834	unsigned char arr[SDEBUG_READCAP_ARR_SZ];
1835	unsigned int capac;
1836
1837	/* following just in case virtual_gb changed */
1838	sdebug_capacity = get_sdebug_capacity();
1839	memset(arr, 0, SDEBUG_READCAP_ARR_SZ);
1840	if (sdebug_capacity < 0xffffffff) {
1841		capac = (unsigned int)sdebug_capacity - 1;
1842		put_unaligned_be32(capac, arr + 0);
1843	} else
1844		put_unaligned_be32(0xffffffff, arr + 0);
1845	put_unaligned_be16(sdebug_sector_size, arr + 6);
1846	return fill_from_dev_buffer(scp, arr, SDEBUG_READCAP_ARR_SZ);
1847}
1848
1849#define SDEBUG_READCAP16_ARR_SZ 32
1850static int resp_readcap16(struct scsi_cmnd *scp,
1851			  struct sdebug_dev_info *devip)
1852{
1853	unsigned char *cmd = scp->cmnd;
1854	unsigned char arr[SDEBUG_READCAP16_ARR_SZ];
1855	int alloc_len;
1856
1857	alloc_len = get_unaligned_be32(cmd + 10);
1858	/* following just in case virtual_gb changed */
1859	sdebug_capacity = get_sdebug_capacity();
1860	memset(arr, 0, SDEBUG_READCAP16_ARR_SZ);
1861	put_unaligned_be64((u64)(sdebug_capacity - 1), arr + 0);
1862	put_unaligned_be32(sdebug_sector_size, arr + 8);
1863	arr[13] = sdebug_physblk_exp & 0xf;
1864	arr[14] = (sdebug_lowest_aligned >> 8) & 0x3f;
1865
1866	if (scsi_debug_lbp()) {
1867		arr[14] |= 0x80; /* LBPME */
1868		/* from sbc4r07, this LBPRZ field is 1 bit, but the LBPRZ in
1869		 * the LB Provisioning VPD page is 3 bits. Note that lbprz=2
1870		 * in the wider field maps to 0 in this field.
1871		 */
1872		if (sdebug_lbprz & 1)	/* precisely what the draft requires */
1873			arr[14] |= 0x40;
1874	}
1875
1876	arr[15] = sdebug_lowest_aligned & 0xff;
1877
1878	if (have_dif_prot) {
1879		arr[12] = (sdebug_dif - 1) << 1; /* P_TYPE */
1880		arr[12] |= 1; /* PROT_EN */
1881	}
1882
1883	return fill_from_dev_buffer(scp, arr,
1884			    min_t(int, alloc_len, SDEBUG_READCAP16_ARR_SZ));
1885}
1886
1887#define SDEBUG_MAX_TGTPGS_ARR_SZ 1412
1888
1889static int resp_report_tgtpgs(struct scsi_cmnd *scp,
1890			      struct sdebug_dev_info *devip)
1891{
1892	unsigned char *cmd = scp->cmnd;
1893	unsigned char *arr;
1894	int host_no = devip->sdbg_host->shost->host_no;
1895	int n, ret, alen, rlen;
1896	int port_group_a, port_group_b, port_a, port_b;
1897
1898	alen = get_unaligned_be32(cmd + 6);
1899	arr = kzalloc(SDEBUG_MAX_TGTPGS_ARR_SZ, GFP_ATOMIC);
1900	if (! arr)
1901		return DID_REQUEUE << 16;
1902	/*
1903	 * EVPD page 0x88 states we have two ports, one
1904	 * real and a fake port with no device connected.
1905	 * So we create two port groups with one port each
1906	 * and set the group with port B to unavailable.
1907	 */
1908	port_a = 0x1; /* relative port A */
1909	port_b = 0x2; /* relative port B */
1910	port_group_a = (((host_no + 1) & 0x7f) << 8) +
1911			(devip->channel & 0x7f);
1912	port_group_b = (((host_no + 1) & 0x7f) << 8) +
1913			(devip->channel & 0x7f) + 0x80;
1914
1915	/*
1916	 * The asymmetric access state is cycled according to the host_id.
1917	 */
1918	n = 4;
1919	if (sdebug_vpd_use_hostno == 0) {
1920		arr[n++] = host_no % 3; /* Asymm access state */
1921		arr[n++] = 0x0F; /* claim: all states are supported */
1922	} else {
1923		arr[n++] = 0x0; /* Active/Optimized path */
1924		arr[n++] = 0x01; /* only support active/optimized paths */
1925	}
1926	put_unaligned_be16(port_group_a, arr + n);
1927	n += 2;
1928	arr[n++] = 0;    /* Reserved */
1929	arr[n++] = 0;    /* Status code */
1930	arr[n++] = 0;    /* Vendor unique */
1931	arr[n++] = 0x1;  /* One port per group */
1932	arr[n++] = 0;    /* Reserved */
1933	arr[n++] = 0;    /* Reserved */
1934	put_unaligned_be16(port_a, arr + n);
1935	n += 2;
1936	arr[n++] = 3;    /* Port unavailable */
1937	arr[n++] = 0x08; /* claim: only unavailalbe paths are supported */
1938	put_unaligned_be16(port_group_b, arr + n);
1939	n += 2;
1940	arr[n++] = 0;    /* Reserved */
1941	arr[n++] = 0;    /* Status code */
1942	arr[n++] = 0;    /* Vendor unique */
1943	arr[n++] = 0x1;  /* One port per group */
1944	arr[n++] = 0;    /* Reserved */
1945	arr[n++] = 0;    /* Reserved */
1946	put_unaligned_be16(port_b, arr + n);
1947	n += 2;
1948
1949	rlen = n - 4;
1950	put_unaligned_be32(rlen, arr + 0);
1951
1952	/*
1953	 * Return the smallest value of either
1954	 * - The allocated length
1955	 * - The constructed command length
1956	 * - The maximum array size
1957	 */
1958	rlen = min_t(int, alen, n);
1959	ret = fill_from_dev_buffer(scp, arr,
1960			   min_t(int, rlen, SDEBUG_MAX_TGTPGS_ARR_SZ));
1961	kfree(arr);
1962	return ret;
1963}
1964
1965static int resp_rsup_opcodes(struct scsi_cmnd *scp,
1966			     struct sdebug_dev_info *devip)
1967{
1968	bool rctd;
1969	u8 reporting_opts, req_opcode, sdeb_i, supp;
1970	u16 req_sa, u;
1971	u32 alloc_len, a_len;
1972	int k, offset, len, errsts, count, bump, na;
1973	const struct opcode_info_t *oip;
1974	const struct opcode_info_t *r_oip;
1975	u8 *arr;
1976	u8 *cmd = scp->cmnd;
1977
1978	rctd = !!(cmd[2] & 0x80);
1979	reporting_opts = cmd[2] & 0x7;
1980	req_opcode = cmd[3];
1981	req_sa = get_unaligned_be16(cmd + 4);
1982	alloc_len = get_unaligned_be32(cmd + 6);
1983	if (alloc_len < 4 || alloc_len > 0xffff) {
1984		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
1985		return check_condition_result;
1986	}
1987	if (alloc_len > 8192)
1988		a_len = 8192;
1989	else
1990		a_len = alloc_len;
1991	arr = kzalloc((a_len < 256) ? 320 : a_len + 64, GFP_ATOMIC);
1992	if (NULL == arr) {
1993		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
1994				INSUFF_RES_ASCQ);
1995		return check_condition_result;
1996	}
1997	switch (reporting_opts) {
1998	case 0:	/* all commands */
1999		/* count number of commands */
2000		for (count = 0, oip = opcode_info_arr;
2001		     oip->num_attached != 0xff; ++oip) {
2002			if (F_INV_OP & oip->flags)
2003				continue;
2004			count += (oip->num_attached + 1);
2005		}
2006		bump = rctd ? 20 : 8;
2007		put_unaligned_be32(count * bump, arr);
2008		for (offset = 4, oip = opcode_info_arr;
2009		     oip->num_attached != 0xff && offset < a_len; ++oip) {
2010			if (F_INV_OP & oip->flags)
2011				continue;
2012			na = oip->num_attached;
2013			arr[offset] = oip->opcode;
2014			put_unaligned_be16(oip->sa, arr + offset + 2);
2015			if (rctd)
2016				arr[offset + 5] |= 0x2;
2017			if (FF_SA & oip->flags)
2018				arr[offset + 5] |= 0x1;
2019			put_unaligned_be16(oip->len_mask[0], arr + offset + 6);
2020			if (rctd)
2021				put_unaligned_be16(0xa, arr + offset + 8);
2022			r_oip = oip;
2023			for (k = 0, oip = oip->arrp; k < na; ++k, ++oip) {
2024				if (F_INV_OP & oip->flags)
2025					continue;
2026				offset += bump;
2027				arr[offset] = oip->opcode;
2028				put_unaligned_be16(oip->sa, arr + offset + 2);
2029				if (rctd)
2030					arr[offset + 5] |= 0x2;
2031				if (FF_SA & oip->flags)
2032					arr[offset + 5] |= 0x1;
2033				put_unaligned_be16(oip->len_mask[0],
2034						   arr + offset + 6);
2035				if (rctd)
2036					put_unaligned_be16(0xa,
2037							   arr + offset + 8);
2038			}
2039			oip = r_oip;
2040			offset += bump;
2041		}
2042		break;
2043	case 1:	/* one command: opcode only */
2044	case 2:	/* one command: opcode plus service action */
2045	case 3:	/* one command: if sa==0 then opcode only else opcode+sa */
2046		sdeb_i = opcode_ind_arr[req_opcode];
2047		oip = &opcode_info_arr[sdeb_i];
2048		if (F_INV_OP & oip->flags) {
2049			supp = 1;
2050			offset = 4;
2051		} else {
2052			if (1 == reporting_opts) {
2053				if (FF_SA & oip->flags) {
2054					mk_sense_invalid_fld(scp, SDEB_IN_CDB,
2055							     2, 2);
2056					kfree(arr);
2057					return check_condition_result;
2058				}
2059				req_sa = 0;
2060			} else if (2 == reporting_opts &&
2061				   0 == (FF_SA & oip->flags)) {
2062				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, -1);
2063				kfree(arr);	/* point at requested sa */
2064				return check_condition_result;
2065			}
2066			if (0 == (FF_SA & oip->flags) &&
2067			    req_opcode == oip->opcode)
2068				supp = 3;
2069			else if (0 == (FF_SA & oip->flags)) {
2070				na = oip->num_attached;
2071				for (k = 0, oip = oip->arrp; k < na;
2072				     ++k, ++oip) {
2073					if (req_opcode == oip->opcode)
2074						break;
2075				}
2076				supp = (k >= na) ? 1 : 3;
2077			} else if (req_sa != oip->sa) {
2078				na = oip->num_attached;
2079				for (k = 0, oip = oip->arrp; k < na;
2080				     ++k, ++oip) {
2081					if (req_sa == oip->sa)
2082						break;
2083				}
2084				supp = (k >= na) ? 1 : 3;
2085			} else
2086				supp = 3;
2087			if (3 == supp) {
2088				u = oip->len_mask[0];
2089				put_unaligned_be16(u, arr + 2);
2090				arr[4] = oip->opcode;
2091				for (k = 1; k < u; ++k)
2092					arr[4 + k] = (k < 16) ?
2093						 oip->len_mask[k] : 0xff;
2094				offset = 4 + u;
2095			} else
2096				offset = 4;
2097		}
2098		arr[1] = (rctd ? 0x80 : 0) | supp;
2099		if (rctd) {
2100			put_unaligned_be16(0xa, arr + offset);
2101			offset += 12;
2102		}
2103		break;
2104	default:
2105		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 2);
2106		kfree(arr);
2107		return check_condition_result;
2108	}
2109	offset = (offset < a_len) ? offset : a_len;
2110	len = (offset < alloc_len) ? offset : alloc_len;
2111	errsts = fill_from_dev_buffer(scp, arr, len);
2112	kfree(arr);
2113	return errsts;
2114}
2115
2116static int resp_rsup_tmfs(struct scsi_cmnd *scp,
2117			  struct sdebug_dev_info *devip)
2118{
2119	bool repd;
2120	u32 alloc_len, len;
2121	u8 arr[16];
2122	u8 *cmd = scp->cmnd;
2123
2124	memset(arr, 0, sizeof(arr));
2125	repd = !!(cmd[2] & 0x80);
2126	alloc_len = get_unaligned_be32(cmd + 6);
2127	if (alloc_len < 4) {
2128		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
2129		return check_condition_result;
2130	}
2131	arr[0] = 0xc8;		/* ATS | ATSS | LURS */
2132	arr[1] = 0x1;		/* ITNRS */
2133	if (repd) {
2134		arr[3] = 0xc;
2135		len = 16;
2136	} else
2137		len = 4;
2138
2139	len = (len < alloc_len) ? len : alloc_len;
2140	return fill_from_dev_buffer(scp, arr, len);
2141}
2142
2143/* <<Following mode page info copied from ST318451LW>> */
2144
2145static int resp_err_recov_pg(unsigned char *p, int pcontrol, int target)
2146{	/* Read-Write Error Recovery page for mode_sense */
2147	unsigned char err_recov_pg[] = {0x1, 0xa, 0xc0, 11, 240, 0, 0, 0,
2148					5, 0, 0xff, 0xff};
2149
2150	memcpy(p, err_recov_pg, sizeof(err_recov_pg));
2151	if (1 == pcontrol)
2152		memset(p + 2, 0, sizeof(err_recov_pg) - 2);
2153	return sizeof(err_recov_pg);
2154}
2155
2156static int resp_disconnect_pg(unsigned char *p, int pcontrol, int target)
2157{ 	/* Disconnect-Reconnect page for mode_sense */
2158	unsigned char disconnect_pg[] = {0x2, 0xe, 128, 128, 0, 10, 0, 0,
2159					 0, 0, 0, 0, 0, 0, 0, 0};
2160
2161	memcpy(p, disconnect_pg, sizeof(disconnect_pg));
2162	if (1 == pcontrol)
2163		memset(p + 2, 0, sizeof(disconnect_pg) - 2);
2164	return sizeof(disconnect_pg);
2165}
2166
2167static int resp_format_pg(unsigned char *p, int pcontrol, int target)
2168{       /* Format device page for mode_sense */
2169	unsigned char format_pg[] = {0x3, 0x16, 0, 0, 0, 0, 0, 0,
2170				     0, 0, 0, 0, 0, 0, 0, 0,
2171				     0, 0, 0, 0, 0x40, 0, 0, 0};
2172
2173	memcpy(p, format_pg, sizeof(format_pg));
2174	put_unaligned_be16(sdebug_sectors_per, p + 10);
2175	put_unaligned_be16(sdebug_sector_size, p + 12);
2176	if (sdebug_removable)
2177		p[20] |= 0x20; /* should agree with INQUIRY */
2178	if (1 == pcontrol)
2179		memset(p + 2, 0, sizeof(format_pg) - 2);
2180	return sizeof(format_pg);
2181}
2182
2183static unsigned char caching_pg[] = {0x8, 18, 0x14, 0, 0xff, 0xff, 0, 0,
2184				     0xff, 0xff, 0xff, 0xff, 0x80, 0x14, 0, 0,
2185				     0, 0, 0, 0};
2186
2187static int resp_caching_pg(unsigned char *p, int pcontrol, int target)
2188{ 	/* Caching page for mode_sense */
2189	unsigned char ch_caching_pg[] = {/* 0x8, 18, */ 0x4, 0, 0, 0, 0, 0,
2190		0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
2191	unsigned char d_caching_pg[] = {0x8, 18, 0x14, 0, 0xff, 0xff, 0, 0,
2192		0xff, 0xff, 0xff, 0xff, 0x80, 0x14, 0, 0,     0, 0, 0, 0};
2193
2194	if (SDEBUG_OPT_N_WCE & sdebug_opts)
2195		caching_pg[2] &= ~0x4;	/* set WCE=0 (default WCE=1) */
2196	memcpy(p, caching_pg, sizeof(caching_pg));
2197	if (1 == pcontrol)
2198		memcpy(p + 2, ch_caching_pg, sizeof(ch_caching_pg));
2199	else if (2 == pcontrol)
2200		memcpy(p, d_caching_pg, sizeof(d_caching_pg));
2201	return sizeof(caching_pg);
2202}
2203
2204static unsigned char ctrl_m_pg[] = {0xa, 10, 2, 0, 0, 0, 0, 0,
2205				    0, 0, 0x2, 0x4b};
2206
2207static int resp_ctrl_m_pg(unsigned char *p, int pcontrol, int target)
2208{ 	/* Control mode page for mode_sense */
2209	unsigned char ch_ctrl_m_pg[] = {/* 0xa, 10, */ 0x6, 0, 0, 0, 0, 0,
2210					0, 0, 0, 0};
2211	unsigned char d_ctrl_m_pg[] = {0xa, 10, 2, 0, 0, 0, 0, 0,
2212				     0, 0, 0x2, 0x4b};
2213
2214	if (sdebug_dsense)
2215		ctrl_m_pg[2] |= 0x4;
2216	else
2217		ctrl_m_pg[2] &= ~0x4;
2218
2219	if (sdebug_ato)
2220		ctrl_m_pg[5] |= 0x80; /* ATO=1 */
2221
2222	memcpy(p, ctrl_m_pg, sizeof(ctrl_m_pg));
2223	if (1 == pcontrol)
2224		memcpy(p + 2, ch_ctrl_m_pg, sizeof(ch_ctrl_m_pg));
2225	else if (2 == pcontrol)
2226		memcpy(p, d_ctrl_m_pg, sizeof(d_ctrl_m_pg));
2227	return sizeof(ctrl_m_pg);
2228}
2229
2230
2231static int resp_iec_m_pg(unsigned char *p, int pcontrol, int target)
2232{	/* Informational Exceptions control mode page for mode_sense */
2233	unsigned char ch_iec_m_pg[] = {/* 0x1c, 0xa, */ 0x4, 0xf, 0, 0, 0, 0,
2234				       0, 0, 0x0, 0x0};
2235	unsigned char d_iec_m_pg[] = {0x1c, 0xa, 0x08, 0, 0, 0, 0, 0,
2236				      0, 0, 0x0, 0x0};
2237
2238	memcpy(p, iec_m_pg, sizeof(iec_m_pg));
2239	if (1 == pcontrol)
2240		memcpy(p + 2, ch_iec_m_pg, sizeof(ch_iec_m_pg));
2241	else if (2 == pcontrol)
2242		memcpy(p, d_iec_m_pg, sizeof(d_iec_m_pg));
2243	return sizeof(iec_m_pg);
2244}
2245
2246static int resp_sas_sf_m_pg(unsigned char *p, int pcontrol, int target)
2247{	/* SAS SSP mode page - short format for mode_sense */
2248	unsigned char sas_sf_m_pg[] = {0x19, 0x6,
2249		0x6, 0x0, 0x7, 0xd0, 0x0, 0x0};
2250
2251	memcpy(p, sas_sf_m_pg, sizeof(sas_sf_m_pg));
2252	if (1 == pcontrol)
2253		memset(p + 2, 0, sizeof(sas_sf_m_pg) - 2);
2254	return sizeof(sas_sf_m_pg);
2255}
2256
2257
2258static int resp_sas_pcd_m_spg(unsigned char *p, int pcontrol, int target,
2259			      int target_dev_id)
2260{	/* SAS phy control and discover mode page for mode_sense */
2261	unsigned char sas_pcd_m_pg[] = {0x59, 0x1, 0, 0x64, 0, 0x6, 0, 2,
2262		    0, 0, 0, 0, 0x10, 0x9, 0x8, 0x0,
2263		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2264		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2265		    0x2, 0, 0, 0, 0, 0, 0, 0,
2266		    0x88, 0x99, 0, 0, 0, 0, 0, 0,
2267		    0, 0, 0, 0, 0, 0, 0, 0,
2268		    0, 1, 0, 0, 0x10, 0x9, 0x8, 0x0,
2269		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2270		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2271		    0x3, 0, 0, 0, 0, 0, 0, 0,
2272		    0x88, 0x99, 0, 0, 0, 0, 0, 0,
2273		    0, 0, 0, 0, 0, 0, 0, 0,
2274		};
2275	int port_a, port_b;
2276
2277	put_unaligned_be64(naa3_comp_a, sas_pcd_m_pg + 16);
2278	put_unaligned_be64(naa3_comp_c + 1, sas_pcd_m_pg + 24);
2279	put_unaligned_be64(naa3_comp_a, sas_pcd_m_pg + 64);
2280	put_unaligned_be64(naa3_comp_c + 1, sas_pcd_m_pg + 72);
2281	port_a = target_dev_id + 1;
2282	port_b = port_a + 1;
2283	memcpy(p, sas_pcd_m_pg, sizeof(sas_pcd_m_pg));
2284	put_unaligned_be32(port_a, p + 20);
2285	put_unaligned_be32(port_b, p + 48 + 20);
2286	if (1 == pcontrol)
2287		memset(p + 4, 0, sizeof(sas_pcd_m_pg) - 4);
2288	return sizeof(sas_pcd_m_pg);
2289}
2290
2291static int resp_sas_sha_m_spg(unsigned char *p, int pcontrol)
2292{	/* SAS SSP shared protocol specific port mode subpage */
2293	unsigned char sas_sha_m_pg[] = {0x59, 0x2, 0, 0xc, 0, 0x6, 0x10, 0,
2294		    0, 0, 0, 0, 0, 0, 0, 0,
2295		};
2296
2297	memcpy(p, sas_sha_m_pg, sizeof(sas_sha_m_pg));
2298	if (1 == pcontrol)
2299		memset(p + 4, 0, sizeof(sas_sha_m_pg) - 4);
2300	return sizeof(sas_sha_m_pg);
2301}
2302
2303#define SDEBUG_MAX_MSENSE_SZ 256
2304
2305static int resp_mode_sense(struct scsi_cmnd *scp,
2306			   struct sdebug_dev_info *devip)
2307{
2308	int pcontrol, pcode, subpcode, bd_len;
2309	unsigned char dev_spec;
2310	int alloc_len, offset, len, target_dev_id;
2311	int target = scp->device->id;
2312	unsigned char *ap;
2313	unsigned char arr[SDEBUG_MAX_MSENSE_SZ];
2314	unsigned char *cmd = scp->cmnd;
2315	bool dbd, llbaa, msense_6, is_disk, is_zbc, bad_pcode;
2316
2317	dbd = !!(cmd[1] & 0x8);		/* disable block descriptors */
2318	pcontrol = (cmd[2] & 0xc0) >> 6;
2319	pcode = cmd[2] & 0x3f;
2320	subpcode = cmd[3];
2321	msense_6 = (MODE_SENSE == cmd[0]);
2322	llbaa = msense_6 ? false : !!(cmd[1] & 0x10);
2323	is_disk = (sdebug_ptype == TYPE_DISK);
2324	is_zbc = (devip->zmodel != BLK_ZONED_NONE);
2325	if ((is_disk || is_zbc) && !dbd)
2326		bd_len = llbaa ? 16 : 8;
2327	else
2328		bd_len = 0;
2329	alloc_len = msense_6 ? cmd[4] : get_unaligned_be16(cmd + 7);
2330	memset(arr, 0, SDEBUG_MAX_MSENSE_SZ);
2331	if (0x3 == pcontrol) {  /* Saving values not supported */
2332		mk_sense_buffer(scp, ILLEGAL_REQUEST, SAVING_PARAMS_UNSUP, 0);
2333		return check_condition_result;
2334	}
2335	target_dev_id = ((devip->sdbg_host->shost->host_no + 1) * 2000) +
2336			(devip->target * 1000) - 3;
2337	/* for disks+zbc set DPOFUA bit and clear write protect (WP) bit */
2338	if (is_disk || is_zbc) {
2339		dev_spec = 0x10;	/* =0x90 if WP=1 implies read-only */
2340		if (sdebug_wp)
2341			dev_spec |= 0x80;
2342	} else
2343		dev_spec = 0x0;
2344	if (msense_6) {
2345		arr[2] = dev_spec;
2346		arr[3] = bd_len;
2347		offset = 4;
2348	} else {
2349		arr[3] = dev_spec;
2350		if (16 == bd_len)
2351			arr[4] = 0x1;	/* set LONGLBA bit */
2352		arr[7] = bd_len;	/* assume 255 or less */
2353		offset = 8;
2354	}
2355	ap = arr + offset;
2356	if ((bd_len > 0) && (!sdebug_capacity))
2357		sdebug_capacity = get_sdebug_capacity();
2358
2359	if (8 == bd_len) {
2360		if (sdebug_capacity > 0xfffffffe)
2361			put_unaligned_be32(0xffffffff, ap + 0);
2362		else
2363			put_unaligned_be32(sdebug_capacity, ap + 0);
2364		put_unaligned_be16(sdebug_sector_size, ap + 6);
2365		offset += bd_len;
2366		ap = arr + offset;
2367	} else if (16 == bd_len) {
2368		put_unaligned_be64((u64)sdebug_capacity, ap + 0);
2369		put_unaligned_be32(sdebug_sector_size, ap + 12);
2370		offset += bd_len;
2371		ap = arr + offset;
2372	}
2373
2374	if ((subpcode > 0x0) && (subpcode < 0xff) && (0x19 != pcode)) {
2375		/* TODO: Control Extension page */
2376		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2377		return check_condition_result;
2378	}
2379	bad_pcode = false;
2380
2381	switch (pcode) {
2382	case 0x1:	/* Read-Write error recovery page, direct access */
2383		len = resp_err_recov_pg(ap, pcontrol, target);
2384		offset += len;
2385		break;
2386	case 0x2:	/* Disconnect-Reconnect page, all devices */
2387		len = resp_disconnect_pg(ap, pcontrol, target);
2388		offset += len;
2389		break;
2390	case 0x3:       /* Format device page, direct access */
2391		if (is_disk) {
2392			len = resp_format_pg(ap, pcontrol, target);
2393			offset += len;
2394		} else
2395			bad_pcode = true;
2396		break;
2397	case 0x8:	/* Caching page, direct access */
2398		if (is_disk || is_zbc) {
2399			len = resp_caching_pg(ap, pcontrol, target);
2400			offset += len;
2401		} else
2402			bad_pcode = true;
2403		break;
2404	case 0xa:	/* Control Mode page, all devices */
2405		len = resp_ctrl_m_pg(ap, pcontrol, target);
2406		offset += len;
2407		break;
2408	case 0x19:	/* if spc==1 then sas phy, control+discover */
2409		if ((subpcode > 0x2) && (subpcode < 0xff)) {
2410			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2411			return check_condition_result;
2412		}
2413		len = 0;
2414		if ((0x0 == subpcode) || (0xff == subpcode))
2415			len += resp_sas_sf_m_pg(ap + len, pcontrol, target);
2416		if ((0x1 == subpcode) || (0xff == subpcode))
2417			len += resp_sas_pcd_m_spg(ap + len, pcontrol, target,
2418						  target_dev_id);
2419		if ((0x2 == subpcode) || (0xff == subpcode))
2420			len += resp_sas_sha_m_spg(ap + len, pcontrol);
2421		offset += len;
2422		break;
2423	case 0x1c:	/* Informational Exceptions Mode page, all devices */
2424		len = resp_iec_m_pg(ap, pcontrol, target);
2425		offset += len;
2426		break;
2427	case 0x3f:	/* Read all Mode pages */
2428		if ((0 == subpcode) || (0xff == subpcode)) {
2429			len = resp_err_recov_pg(ap, pcontrol, target);
2430			len += resp_disconnect_pg(ap + len, pcontrol, target);
2431			if (is_disk) {
2432				len += resp_format_pg(ap + len, pcontrol,
2433						      target);
2434				len += resp_caching_pg(ap + len, pcontrol,
2435						       target);
2436			} else if (is_zbc) {
2437				len += resp_caching_pg(ap + len, pcontrol,
2438						       target);
2439			}
2440			len += resp_ctrl_m_pg(ap + len, pcontrol, target);
2441			len += resp_sas_sf_m_pg(ap + len, pcontrol, target);
2442			if (0xff == subpcode) {
2443				len += resp_sas_pcd_m_spg(ap + len, pcontrol,
2444						  target, target_dev_id);
2445				len += resp_sas_sha_m_spg(ap + len, pcontrol);
2446			}
2447			len += resp_iec_m_pg(ap + len, pcontrol, target);
2448			offset += len;
2449		} else {
2450			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2451			return check_condition_result;
2452		}
2453		break;
2454	default:
2455		bad_pcode = true;
2456		break;
2457	}
2458	if (bad_pcode) {
2459		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2460		return check_condition_result;
2461	}
2462	if (msense_6)
2463		arr[0] = offset - 1;
2464	else
2465		put_unaligned_be16((offset - 2), arr + 0);
2466	return fill_from_dev_buffer(scp, arr, min_t(int, alloc_len, offset));
2467}
2468
2469#define SDEBUG_MAX_MSELECT_SZ 512
2470
2471static int resp_mode_select(struct scsi_cmnd *scp,
2472			    struct sdebug_dev_info *devip)
2473{
2474	int pf, sp, ps, md_len, bd_len, off, spf, pg_len;
2475	int param_len, res, mpage;
2476	unsigned char arr[SDEBUG_MAX_MSELECT_SZ];
2477	unsigned char *cmd = scp->cmnd;
2478	int mselect6 = (MODE_SELECT == cmd[0]);
2479
2480	memset(arr, 0, sizeof(arr));
2481	pf = cmd[1] & 0x10;
2482	sp = cmd[1] & 0x1;
2483	param_len = mselect6 ? cmd[4] : get_unaligned_be16(cmd + 7);
2484	if ((0 == pf) || sp || (param_len > SDEBUG_MAX_MSELECT_SZ)) {
2485		mk_sense_invalid_fld(scp, SDEB_IN_CDB, mselect6 ? 4 : 7, -1);
2486		return check_condition_result;
2487	}
2488	res = fetch_to_dev_buffer(scp, arr, param_len);
2489	if (-1 == res)
2490		return DID_ERROR << 16;
2491	else if (sdebug_verbose && (res < param_len))
2492		sdev_printk(KERN_INFO, scp->device,
2493			    "%s: cdb indicated=%d, IO sent=%d bytes\n",
2494			    __func__, param_len, res);
2495	md_len = mselect6 ? (arr[0] + 1) : (get_unaligned_be16(arr + 0) + 2);
2496	bd_len = mselect6 ? arr[3] : get_unaligned_be16(arr + 6);
2497	if (md_len > 2) {
2498		mk_sense_invalid_fld(scp, SDEB_IN_DATA, 0, -1);
2499		return check_condition_result;
2500	}
2501	off = bd_len + (mselect6 ? 4 : 8);
2502	mpage = arr[off] & 0x3f;
2503	ps = !!(arr[off] & 0x80);
2504	if (ps) {
2505		mk_sense_invalid_fld(scp, SDEB_IN_DATA, off, 7);
2506		return check_condition_result;
2507	}
2508	spf = !!(arr[off] & 0x40);
2509	pg_len = spf ? (get_unaligned_be16(arr + off + 2) + 4) :
2510		       (arr[off + 1] + 2);
2511	if ((pg_len + off) > param_len) {
2512		mk_sense_buffer(scp, ILLEGAL_REQUEST,
2513				PARAMETER_LIST_LENGTH_ERR, 0);
2514		return check_condition_result;
2515	}
2516	switch (mpage) {
2517	case 0x8:      /* Caching Mode page */
2518		if (caching_pg[1] == arr[off + 1]) {
2519			memcpy(caching_pg + 2, arr + off + 2,
2520			       sizeof(caching_pg) - 2);
2521			goto set_mode_changed_ua;
2522		}
2523		break;
2524	case 0xa:      /* Control Mode page */
2525		if (ctrl_m_pg[1] == arr[off + 1]) {
2526			memcpy(ctrl_m_pg + 2, arr + off + 2,
2527			       sizeof(ctrl_m_pg) - 2);
2528			if (ctrl_m_pg[4] & 0x8)
2529				sdebug_wp = true;
2530			else
2531				sdebug_wp = false;
2532			sdebug_dsense = !!(ctrl_m_pg[2] & 0x4);
2533			goto set_mode_changed_ua;
2534		}
2535		break;
2536	case 0x1c:      /* Informational Exceptions Mode page */
2537		if (iec_m_pg[1] == arr[off + 1]) {
2538			memcpy(iec_m_pg + 2, arr + off + 2,
2539			       sizeof(iec_m_pg) - 2);
2540			goto set_mode_changed_ua;
2541		}
2542		break;
2543	default:
2544		break;
2545	}
2546	mk_sense_invalid_fld(scp, SDEB_IN_DATA, off, 5);
2547	return check_condition_result;
2548set_mode_changed_ua:
2549	set_bit(SDEBUG_UA_MODE_CHANGED, devip->uas_bm);
2550	return 0;
2551}
2552
2553static int resp_temp_l_pg(unsigned char *arr)
2554{
2555	unsigned char temp_l_pg[] = {0x0, 0x0, 0x3, 0x2, 0x0, 38,
2556				     0x0, 0x1, 0x3, 0x2, 0x0, 65,
2557		};
2558
2559	memcpy(arr, temp_l_pg, sizeof(temp_l_pg));
2560	return sizeof(temp_l_pg);
2561}
2562
2563static int resp_ie_l_pg(unsigned char *arr)
2564{
2565	unsigned char ie_l_pg[] = {0x0, 0x0, 0x3, 0x3, 0x0, 0x0, 38,
2566		};
2567
2568	memcpy(arr, ie_l_pg, sizeof(ie_l_pg));
2569	if (iec_m_pg[2] & 0x4) {	/* TEST bit set */
2570		arr[4] = THRESHOLD_EXCEEDED;
2571		arr[5] = 0xff;
2572	}
2573	return sizeof(ie_l_pg);
2574}
2575
2576#define SDEBUG_MAX_LSENSE_SZ 512
2577
2578static int resp_log_sense(struct scsi_cmnd *scp,
2579			  struct sdebug_dev_info *devip)
2580{
2581	int ppc, sp, pcode, subpcode, alloc_len, len, n;
2582	unsigned char arr[SDEBUG_MAX_LSENSE_SZ];
2583	unsigned char *cmd = scp->cmnd;
2584
2585	memset(arr, 0, sizeof(arr));
2586	ppc = cmd[1] & 0x2;
2587	sp = cmd[1] & 0x1;
2588	if (ppc || sp) {
2589		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, ppc ? 1 : 0);
2590		return check_condition_result;
2591	}
2592	pcode = cmd[2] & 0x3f;
2593	subpcode = cmd[3] & 0xff;
2594	alloc_len = get_unaligned_be16(cmd + 7);
2595	arr[0] = pcode;
2596	if (0 == subpcode) {
2597		switch (pcode) {
2598		case 0x0:	/* Supported log pages log page */
2599			n = 4;
2600			arr[n++] = 0x0;		/* this page */
2601			arr[n++] = 0xd;		/* Temperature */
2602			arr[n++] = 0x2f;	/* Informational exceptions */
2603			arr[3] = n - 4;
2604			break;
2605		case 0xd:	/* Temperature log page */
2606			arr[3] = resp_temp_l_pg(arr + 4);
2607			break;
2608		case 0x2f:	/* Informational exceptions log page */
2609			arr[3] = resp_ie_l_pg(arr + 4);
2610			break;
2611		default:
2612			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2613			return check_condition_result;
2614		}
2615	} else if (0xff == subpcode) {
2616		arr[0] |= 0x40;
2617		arr[1] = subpcode;
2618		switch (pcode) {
2619		case 0x0:	/* Supported log pages and subpages log page */
2620			n = 4;
2621			arr[n++] = 0x0;
2622			arr[n++] = 0x0;		/* 0,0 page */
2623			arr[n++] = 0x0;
2624			arr[n++] = 0xff;	/* this page */
2625			arr[n++] = 0xd;
2626			arr[n++] = 0x0;		/* Temperature */
2627			arr[n++] = 0x2f;
2628			arr[n++] = 0x0;	/* Informational exceptions */
2629			arr[3] = n - 4;
2630			break;
2631		case 0xd:	/* Temperature subpages */
2632			n = 4;
2633			arr[n++] = 0xd;
2634			arr[n++] = 0x0;		/* Temperature */
2635			arr[3] = n - 4;
2636			break;
2637		case 0x2f:	/* Informational exceptions subpages */
2638			n = 4;
2639			arr[n++] = 0x2f;
2640			arr[n++] = 0x0;		/* Informational exceptions */
2641			arr[3] = n - 4;
2642			break;
2643		default:
2644			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2645			return check_condition_result;
2646		}
2647	} else {
2648		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2649		return check_condition_result;
2650	}
2651	len = min_t(int, get_unaligned_be16(arr + 2) + 4, alloc_len);
2652	return fill_from_dev_buffer(scp, arr,
2653		    min_t(int, len, SDEBUG_MAX_INQ_ARR_SZ));
2654}
2655
2656static inline bool sdebug_dev_is_zoned(struct sdebug_dev_info *devip)
2657{
2658	return devip->nr_zones != 0;
2659}
2660
2661static struct sdeb_zone_state *zbc_zone(struct sdebug_dev_info *devip,
2662					unsigned long long lba)
2663{
2664	return &devip->zstate[lba >> devip->zsize_shift];
2665}
2666
2667static inline bool zbc_zone_is_conv(struct sdeb_zone_state *zsp)
2668{
2669	return zsp->z_type == ZBC_ZONE_TYPE_CNV;
2670}
2671
2672static void zbc_close_zone(struct sdebug_dev_info *devip,
2673			   struct sdeb_zone_state *zsp)
2674{
2675	enum sdebug_z_cond zc;
2676
2677	if (zbc_zone_is_conv(zsp))
2678		return;
2679
2680	zc = zsp->z_cond;
2681	if (!(zc == ZC2_IMPLICIT_OPEN || zc == ZC3_EXPLICIT_OPEN))
2682		return;
2683
2684	if (zc == ZC2_IMPLICIT_OPEN)
2685		devip->nr_imp_open--;
2686	else
2687		devip->nr_exp_open--;
2688
2689	if (zsp->z_wp == zsp->z_start) {
2690		zsp->z_cond = ZC1_EMPTY;
2691	} else {
2692		zsp->z_cond = ZC4_CLOSED;
2693		devip->nr_closed++;
2694	}
2695}
2696
2697static void zbc_close_imp_open_zone(struct sdebug_dev_info *devip)
2698{
2699	struct sdeb_zone_state *zsp = &devip->zstate[0];
2700	unsigned int i;
2701
2702	for (i = 0; i < devip->nr_zones; i++, zsp++) {
2703		if (zsp->z_cond == ZC2_IMPLICIT_OPEN) {
2704			zbc_close_zone(devip, zsp);
2705			return;
2706		}
2707	}
2708}
2709
2710static void zbc_open_zone(struct sdebug_dev_info *devip,
2711			  struct sdeb_zone_state *zsp, bool explicit)
2712{
2713	enum sdebug_z_cond zc;
2714
2715	if (zbc_zone_is_conv(zsp))
2716		return;
2717
2718	zc = zsp->z_cond;
2719	if ((explicit && zc == ZC3_EXPLICIT_OPEN) ||
2720	    (!explicit && zc == ZC2_IMPLICIT_OPEN))
2721		return;
2722
2723	/* Close an implicit open zone if necessary */
2724	if (explicit && zsp->z_cond == ZC2_IMPLICIT_OPEN)
2725		zbc_close_zone(devip, zsp);
2726	else if (devip->max_open &&
2727		 devip->nr_imp_open + devip->nr_exp_open >= devip->max_open)
2728		zbc_close_imp_open_zone(devip);
2729
2730	if (zsp->z_cond == ZC4_CLOSED)
2731		devip->nr_closed--;
2732	if (explicit) {
2733		zsp->z_cond = ZC3_EXPLICIT_OPEN;
2734		devip->nr_exp_open++;
2735	} else {
2736		zsp->z_cond = ZC2_IMPLICIT_OPEN;
2737		devip->nr_imp_open++;
2738	}
2739}
2740
2741static void zbc_inc_wp(struct sdebug_dev_info *devip,
2742		       unsigned long long lba, unsigned int num)
2743{
2744	struct sdeb_zone_state *zsp = zbc_zone(devip, lba);
2745	unsigned long long n, end, zend = zsp->z_start + zsp->z_size;
2746
2747	if (zbc_zone_is_conv(zsp))
2748		return;
2749
2750	if (zsp->z_type == ZBC_ZONE_TYPE_SWR) {
2751		zsp->z_wp += num;
2752		if (zsp->z_wp >= zend)
2753			zsp->z_cond = ZC5_FULL;
2754		return;
2755	}
2756
2757	while (num) {
2758		if (lba != zsp->z_wp)
2759			zsp->z_non_seq_resource = true;
2760
2761		end = lba + num;
2762		if (end >= zend) {
2763			n = zend - lba;
2764			zsp->z_wp = zend;
2765		} else if (end > zsp->z_wp) {
2766			n = num;
2767			zsp->z_wp = end;
2768		} else {
2769			n = num;
2770		}
2771		if (zsp->z_wp >= zend)
2772			zsp->z_cond = ZC5_FULL;
2773
2774		num -= n;
2775		lba += n;
2776		if (num) {
2777			zsp++;
2778			zend = zsp->z_start + zsp->z_size;
2779		}
2780	}
2781}
2782
2783static int check_zbc_access_params(struct scsi_cmnd *scp,
2784			unsigned long long lba, unsigned int num, bool write)
2785{
2786	struct scsi_device *sdp = scp->device;
2787	struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
2788	struct sdeb_zone_state *zsp = zbc_zone(devip, lba);
2789	struct sdeb_zone_state *zsp_end = zbc_zone(devip, lba + num - 1);
2790
2791	if (!write) {
2792		if (devip->zmodel == BLK_ZONED_HA)
2793			return 0;
2794		/* For host-managed, reads cannot cross zone types boundaries */
2795		if (zsp_end != zsp &&
2796		    zbc_zone_is_conv(zsp) &&
2797		    !zbc_zone_is_conv(zsp_end)) {
2798			mk_sense_buffer(scp, ILLEGAL_REQUEST,
2799					LBA_OUT_OF_RANGE,
2800					READ_INVDATA_ASCQ);
2801			return check_condition_result;
2802		}
2803		return 0;
2804	}
2805
2806	/* No restrictions for writes within conventional zones */
2807	if (zbc_zone_is_conv(zsp)) {
2808		if (!zbc_zone_is_conv(zsp_end)) {
2809			mk_sense_buffer(scp, ILLEGAL_REQUEST,
2810					LBA_OUT_OF_RANGE,
2811					WRITE_BOUNDARY_ASCQ);
2812			return check_condition_result;
2813		}
2814		return 0;
2815	}
2816
2817	if (zsp->z_type == ZBC_ZONE_TYPE_SWR) {
2818		/* Writes cannot cross sequential zone boundaries */
2819		if (zsp_end != zsp) {
2820			mk_sense_buffer(scp, ILLEGAL_REQUEST,
2821					LBA_OUT_OF_RANGE,
2822					WRITE_BOUNDARY_ASCQ);
2823			return check_condition_result;
2824		}
2825		/* Cannot write full zones */
2826		if (zsp->z_cond == ZC5_FULL) {
2827			mk_sense_buffer(scp, ILLEGAL_REQUEST,
2828					INVALID_FIELD_IN_CDB, 0);
2829			return check_condition_result;
2830		}
2831		/* Writes must be aligned to the zone WP */
2832		if (lba != zsp->z_wp) {
2833			mk_sense_buffer(scp, ILLEGAL_REQUEST,
2834					LBA_OUT_OF_RANGE,
2835					UNALIGNED_WRITE_ASCQ);
2836			return check_condition_result;
2837		}
2838	}
2839
2840	/* Handle implicit open of closed and empty zones */
2841	if (zsp->z_cond == ZC1_EMPTY || zsp->z_cond == ZC4_CLOSED) {
2842		if (devip->max_open &&
2843		    devip->nr_exp_open >= devip->max_open) {
2844			mk_sense_buffer(scp, DATA_PROTECT,
2845					INSUFF_RES_ASC,
2846					INSUFF_ZONE_ASCQ);
2847			return check_condition_result;
2848		}
2849		zbc_open_zone(devip, zsp, false);
2850	}
2851
2852	return 0;
2853}
2854
2855static inline int check_device_access_params
2856			(struct scsi_cmnd *scp, unsigned long long lba,
2857			 unsigned int num, bool write)
2858{
2859	struct scsi_device *sdp = scp->device;
2860	struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
2861
2862	if (lba + num > sdebug_capacity) {
2863		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
2864		return check_condition_result;
2865	}
2866	/* transfer length excessive (tie in to block limits VPD page) */
2867	if (num > sdebug_store_sectors) {
2868		/* needs work to find which cdb byte 'num' comes from */
2869		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
2870		return check_condition_result;
2871	}
2872	if (write && unlikely(sdebug_wp)) {
2873		mk_sense_buffer(scp, DATA_PROTECT, WRITE_PROTECTED, 0x2);
2874		return check_condition_result;
2875	}
2876	if (sdebug_dev_is_zoned(devip))
2877		return check_zbc_access_params(scp, lba, num, write);
2878
2879	return 0;
2880}
2881
2882/*
2883 * Note: if BUG_ON() fires it usually indicates a problem with the parser
2884 * tables. Perhaps a missing F_FAKE_RW or FF_MEDIA_IO flag. Response functions
2885 * that access any of the "stores" in struct sdeb_store_info should call this
2886 * function with bug_if_fake_rw set to true.
2887 */
2888static inline struct sdeb_store_info *devip2sip(struct sdebug_dev_info *devip,
2889						bool bug_if_fake_rw)
2890{
2891	if (sdebug_fake_rw) {
2892		BUG_ON(bug_if_fake_rw);	/* See note above */
2893		return NULL;
2894	}
2895	return xa_load(per_store_ap, devip->sdbg_host->si_idx);
2896}
2897
2898/* Returns number of bytes copied or -1 if error. */
2899static int do_device_access(struct sdeb_store_info *sip, struct scsi_cmnd *scp,
2900			    u32 sg_skip, u64 lba, u32 num, bool do_write)
2901{
2902	int ret;
2903	u64 block, rest = 0;
2904	enum dma_data_direction dir;
2905	struct scsi_data_buffer *sdb = &scp->sdb;
2906	u8 *fsp;
2907
2908	if (do_write) {
2909		dir = DMA_TO_DEVICE;
2910		write_since_sync = true;
2911	} else {
2912		dir = DMA_FROM_DEVICE;
2913	}
2914
2915	if (!sdb->length || !sip)
2916		return 0;
2917	if (scp->sc_data_direction != dir)
2918		return -1;
2919	fsp = sip->storep;
2920
2921	block = do_div(lba, sdebug_store_sectors);
2922	if (block + num > sdebug_store_sectors)
2923		rest = block + num - sdebug_store_sectors;
2924
2925	ret = sg_copy_buffer(sdb->table.sgl, sdb->table.nents,
2926		   fsp + (block * sdebug_sector_size),
2927		   (num - rest) * sdebug_sector_size, sg_skip, do_write);
2928	if (ret != (num - rest) * sdebug_sector_size)
2929		return ret;
2930
2931	if (rest) {
2932		ret += sg_copy_buffer(sdb->table.sgl, sdb->table.nents,
2933			    fsp, rest * sdebug_sector_size,
2934			    sg_skip + ((num - rest) * sdebug_sector_size),
2935			    do_write);
2936	}
2937
2938	return ret;
2939}
2940
2941/* Returns number of bytes copied or -1 if error. */
2942static int do_dout_fetch(struct scsi_cmnd *scp, u32 num, u8 *doutp)
2943{
2944	struct scsi_data_buffer *sdb = &scp->sdb;
2945
2946	if (!sdb->length)
2947		return 0;
2948	if (scp->sc_data_direction != DMA_TO_DEVICE)
2949		return -1;
2950	return sg_copy_buffer(sdb->table.sgl, sdb->table.nents, doutp,
2951			      num * sdebug_sector_size, 0, true);
2952}
2953
2954/* If sip->storep+lba compares equal to arr(num), then copy top half of
2955 * arr into sip->storep+lba and return true. If comparison fails then
2956 * return false. */
2957static bool comp_write_worker(struct sdeb_store_info *sip, u64 lba, u32 num,
2958			      const u8 *arr, bool compare_only)
2959{
2960	bool res;
2961	u64 block, rest = 0;
2962	u32 store_blks = sdebug_store_sectors;
2963	u32 lb_size = sdebug_sector_size;
2964	u8 *fsp = sip->storep;
2965
2966	block = do_div(lba, store_blks);
2967	if (block + num > store_blks)
2968		rest = block + num - store_blks;
2969
2970	res = !memcmp(fsp + (block * lb_size), arr, (num - rest) * lb_size);
2971	if (!res)
2972		return res;
2973	if (rest)
2974		res = memcmp(fsp, arr + ((num - rest) * lb_size),
2975			     rest * lb_size);
2976	if (!res)
2977		return res;
2978	if (compare_only)
2979		return true;
2980	arr += num * lb_size;
2981	memcpy(fsp + (block * lb_size), arr, (num - rest) * lb_size);
2982	if (rest)
2983		memcpy(fsp, arr + ((num - rest) * lb_size), rest * lb_size);
2984	return res;
2985}
2986
2987static __be16 dif_compute_csum(const void *buf, int len)
2988{
2989	__be16 csum;
2990
2991	if (sdebug_guard)
2992		csum = (__force __be16)ip_compute_csum(buf, len);
2993	else
2994		csum = cpu_to_be16(crc_t10dif(buf, len));
2995
2996	return csum;
2997}
2998
2999static int dif_verify(struct t10_pi_tuple *sdt, const void *data,
3000		      sector_t sector, u32 ei_lba)
3001{
3002	__be16 csum = dif_compute_csum(data, sdebug_sector_size);
3003
3004	if (sdt->guard_tag != csum) {
3005		pr_err("GUARD check failed on sector %lu rcvd 0x%04x, data 0x%04x\n",
3006			(unsigned long)sector,
3007			be16_to_cpu(sdt->guard_tag),
3008			be16_to_cpu(csum));
3009		return 0x01;
3010	}
3011	if (sdebug_dif == T10_PI_TYPE1_PROTECTION &&
3012	    be32_to_cpu(sdt->ref_tag) != (sector & 0xffffffff)) {
3013		pr_err("REF check failed on sector %lu\n",
3014			(unsigned long)sector);
3015		return 0x03;
3016	}
3017	if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3018	    be32_to_cpu(sdt->ref_tag) != ei_lba) {
3019		pr_err("REF check failed on sector %lu\n",
3020			(unsigned long)sector);
3021		return 0x03;
3022	}
3023	return 0;
3024}
3025
3026static void dif_copy_prot(struct scsi_cmnd *scp, sector_t sector,
3027			  unsigned int sectors, bool read)
3028{
3029	size_t resid;
3030	void *paddr;
3031	struct sdeb_store_info *sip = devip2sip((struct sdebug_dev_info *)
3032						scp->device->hostdata, true);
3033	struct t10_pi_tuple *dif_storep = sip->dif_storep;
3034	const void *dif_store_end = dif_storep + sdebug_store_sectors;
3035	struct sg_mapping_iter miter;
3036
3037	/* Bytes of protection data to copy into sgl */
3038	resid = sectors * sizeof(*dif_storep);
3039
3040	sg_miter_start(&miter, scsi_prot_sglist(scp),
3041		       scsi_prot_sg_count(scp), SG_MITER_ATOMIC |
3042		       (read ? SG_MITER_TO_SG : SG_MITER_FROM_SG));
3043
3044	while (sg_miter_next(&miter) && resid > 0) {
3045		size_t len = min_t(size_t, miter.length, resid);
3046		void *start = dif_store(sip, sector);
3047		size_t rest = 0;
3048
3049		if (dif_store_end < start + len)
3050			rest = start + len - dif_store_end;
3051
3052		paddr = miter.addr;
3053
3054		if (read)
3055			memcpy(paddr, start, len - rest);
3056		else
3057			memcpy(start, paddr, len - rest);
3058
3059		if (rest) {
3060			if (read)
3061				memcpy(paddr + len - rest, dif_storep, rest);
3062			else
3063				memcpy(dif_storep, paddr + len - rest, rest);
3064		}
3065
3066		sector += len / sizeof(*dif_storep);
3067		resid -= len;
3068	}
3069	sg_miter_stop(&miter);
3070}
3071
3072static int prot_verify_read(struct scsi_cmnd *scp, sector_t start_sec,
3073			    unsigned int sectors, u32 ei_lba)
3074{
3075	unsigned int i;
3076	sector_t sector;
3077	struct sdeb_store_info *sip = devip2sip((struct sdebug_dev_info *)
3078						scp->device->hostdata, true);
3079	struct t10_pi_tuple *sdt;
3080
3081	for (i = 0; i < sectors; i++, ei_lba++) {
3082		int ret;
3083
3084		sector = start_sec + i;
3085		sdt = dif_store(sip, sector);
3086
3087		if (sdt->app_tag == cpu_to_be16(0xffff))
3088			continue;
3089
3090		ret = dif_verify(sdt, lba2fake_store(sip, sector), sector,
3091				 ei_lba);
3092		if (ret) {
3093			dif_errors++;
3094			return ret;
3095		}
3096	}
3097
3098	dif_copy_prot(scp, start_sec, sectors, true);
3099	dix_reads++;
3100
3101	return 0;
3102}
3103
3104static int resp_read_dt0(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
3105{
3106	bool check_prot;
3107	u32 num;
3108	u32 ei_lba;
3109	int ret;
3110	u64 lba;
3111	struct sdeb_store_info *sip = devip2sip(devip, true);
3112	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
3113	u8 *cmd = scp->cmnd;
3114
3115	switch (cmd[0]) {
3116	case READ_16:
3117		ei_lba = 0;
3118		lba = get_unaligned_be64(cmd + 2);
3119		num = get_unaligned_be32(cmd + 10);
3120		check_prot = true;
3121		break;
3122	case READ_10:
3123		ei_lba = 0;
3124		lba = get_unaligned_be32(cmd + 2);
3125		num = get_unaligned_be16(cmd + 7);
3126		check_prot = true;
3127		break;
3128	case READ_6:
3129		ei_lba = 0;
3130		lba = (u32)cmd[3] | (u32)cmd[2] << 8 |
3131		      (u32)(cmd[1] & 0x1f) << 16;
3132		num = (0 == cmd[4]) ? 256 : cmd[4];
3133		check_prot = true;
3134		break;
3135	case READ_12:
3136		ei_lba = 0;
3137		lba = get_unaligned_be32(cmd + 2);
3138		num = get_unaligned_be32(cmd + 6);
3139		check_prot = true;
3140		break;
3141	case XDWRITEREAD_10:
3142		ei_lba = 0;
3143		lba = get_unaligned_be32(cmd + 2);
3144		num = get_unaligned_be16(cmd + 7);
3145		check_prot = false;
3146		break;
3147	default:	/* assume READ(32) */
3148		lba = get_unaligned_be64(cmd + 12);
3149		ei_lba = get_unaligned_be32(cmd + 20);
3150		num = get_unaligned_be32(cmd + 28);
3151		check_prot = false;
3152		break;
3153	}
3154	if (unlikely(have_dif_prot && check_prot)) {
3155		if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3156		    (cmd[1] & 0xe0)) {
3157			mk_sense_invalid_opcode(scp);
3158			return check_condition_result;
3159		}
3160		if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3161		     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3162		    (cmd[1] & 0xe0) == 0)
3163			sdev_printk(KERN_ERR, scp->device, "Unprotected RD "
3164				    "to DIF device\n");
3165	}
3166	if (unlikely((sdebug_opts & SDEBUG_OPT_SHORT_TRANSFER) &&
3167		     atomic_read(&sdeb_inject_pending))) {
3168		num /= 2;
3169		atomic_set(&sdeb_inject_pending, 0);
3170	}
3171
3172	ret = check_device_access_params(scp, lba, num, false);
3173	if (ret)
3174		return ret;
3175	if (unlikely((SDEBUG_OPT_MEDIUM_ERR & sdebug_opts) &&
3176		     (lba <= (sdebug_medium_error_start + sdebug_medium_error_count - 1)) &&
3177		     ((lba + num) > sdebug_medium_error_start))) {
3178		/* claim unrecoverable read error */
3179		mk_sense_buffer(scp, MEDIUM_ERROR, UNRECOVERED_READ_ERR, 0);
3180		/* set info field and valid bit for fixed descriptor */
3181		if (0x70 == (scp->sense_buffer[0] & 0x7f)) {
3182			scp->sense_buffer[0] |= 0x80;	/* Valid bit */
3183			ret = (lba < OPT_MEDIUM_ERR_ADDR)
3184			      ? OPT_MEDIUM_ERR_ADDR : (int)lba;
3185			put_unaligned_be32(ret, scp->sense_buffer + 3);
3186		}
3187		scsi_set_resid(scp, scsi_bufflen(scp));
3188		return check_condition_result;
3189	}
3190
3191	read_lock(macc_lckp);
3192
3193	/* DIX + T10 DIF */
3194	if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3195		int prot_ret = prot_verify_read(scp, lba, num, ei_lba);
3196
3197		if (prot_ret) {
3198			read_unlock(macc_lckp);
3199			mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, prot_ret);
3200			return illegal_condition_result;
3201		}
3202	}
3203
3204	ret = do_device_access(sip, scp, 0, lba, num, false);
3205	read_unlock(macc_lckp);
3206	if (unlikely(ret == -1))
3207		return DID_ERROR << 16;
3208
3209	scsi_set_resid(scp, scsi_bufflen(scp) - ret);
3210
3211	if (unlikely((sdebug_opts & SDEBUG_OPT_RECOV_DIF_DIX) &&
3212		     atomic_read(&sdeb_inject_pending))) {
3213		if (sdebug_opts & SDEBUG_OPT_RECOVERED_ERR) {
3214			mk_sense_buffer(scp, RECOVERED_ERROR, THRESHOLD_EXCEEDED, 0);
3215			atomic_set(&sdeb_inject_pending, 0);
3216			return check_condition_result;
3217		} else if (sdebug_opts & SDEBUG_OPT_DIF_ERR) {
3218			/* Logical block guard check failed */
3219			mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
3220			atomic_set(&sdeb_inject_pending, 0);
3221			return illegal_condition_result;
3222		} else if (SDEBUG_OPT_DIX_ERR & sdebug_opts) {
3223			mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
3224			atomic_set(&sdeb_inject_pending, 0);
3225			return illegal_condition_result;
3226		}
3227	}
3228	return 0;
3229}
3230
3231static void dump_sector(unsigned char *buf, int len)
3232{
3233	int i, j, n;
3234
3235	pr_err(">>> Sector Dump <<<\n");
3236	for (i = 0 ; i < len ; i += 16) {
3237		char b[128];
3238
3239		for (j = 0, n = 0; j < 16; j++) {
3240			unsigned char c = buf[i+j];
3241
3242			if (c >= 0x20 && c < 0x7e)
3243				n += scnprintf(b + n, sizeof(b) - n,
3244					       " %c ", buf[i+j]);
3245			else
3246				n += scnprintf(b + n, sizeof(b) - n,
3247					       "%02x ", buf[i+j]);
3248		}
3249		pr_err("%04d: %s\n", i, b);
3250	}
3251}
3252
3253static int prot_verify_write(struct scsi_cmnd *SCpnt, sector_t start_sec,
3254			     unsigned int sectors, u32 ei_lba)
3255{
3256	int ret;
3257	struct t10_pi_tuple *sdt;
3258	void *daddr;
3259	sector_t sector = start_sec;
3260	int ppage_offset;
3261	int dpage_offset;
3262	struct sg_mapping_iter diter;
3263	struct sg_mapping_iter piter;
3264
3265	BUG_ON(scsi_sg_count(SCpnt) == 0);
3266	BUG_ON(scsi_prot_sg_count(SCpnt) == 0);
3267
3268	sg_miter_start(&piter, scsi_prot_sglist(SCpnt),
3269			scsi_prot_sg_count(SCpnt),
3270			SG_MITER_ATOMIC | SG_MITER_FROM_SG);
3271	sg_miter_start(&diter, scsi_sglist(SCpnt), scsi_sg_count(SCpnt),
3272			SG_MITER_ATOMIC | SG_MITER_FROM_SG);
3273
3274	/* For each protection page */
3275	while (sg_miter_next(&piter)) {
3276		dpage_offset = 0;
3277		if (WARN_ON(!sg_miter_next(&diter))) {
3278			ret = 0x01;
3279			goto out;
3280		}
3281
3282		for (ppage_offset = 0; ppage_offset < piter.length;
3283		     ppage_offset += sizeof(struct t10_pi_tuple)) {
3284			/* If we're at the end of the current
3285			 * data page advance to the next one
3286			 */
3287			if (dpage_offset >= diter.length) {
3288				if (WARN_ON(!sg_miter_next(&diter))) {
3289					ret = 0x01;
3290					goto out;
3291				}
3292				dpage_offset = 0;
3293			}
3294
3295			sdt = piter.addr + ppage_offset;
3296			daddr = diter.addr + dpage_offset;
3297
3298			ret = dif_verify(sdt, daddr, sector, ei_lba);
3299			if (ret) {
3300				dump_sector(daddr, sdebug_sector_size);
3301				goto out;
3302			}
3303
3304			sector++;
3305			ei_lba++;
3306			dpage_offset += sdebug_sector_size;
3307		}
3308		diter.consumed = dpage_offset;
3309		sg_miter_stop(&diter);
3310	}
3311	sg_miter_stop(&piter);
3312
3313	dif_copy_prot(SCpnt, start_sec, sectors, false);
3314	dix_writes++;
3315
3316	return 0;
3317
3318out:
3319	dif_errors++;
3320	sg_miter_stop(&diter);
3321	sg_miter_stop(&piter);
3322	return ret;
3323}
3324
3325static unsigned long lba_to_map_index(sector_t lba)
3326{
3327	if (sdebug_unmap_alignment)
3328		lba += sdebug_unmap_granularity - sdebug_unmap_alignment;
3329	sector_div(lba, sdebug_unmap_granularity);
3330	return lba;
3331}
3332
3333static sector_t map_index_to_lba(unsigned long index)
3334{
3335	sector_t lba = index * sdebug_unmap_granularity;
3336
3337	if (sdebug_unmap_alignment)
3338		lba -= sdebug_unmap_granularity - sdebug_unmap_alignment;
3339	return lba;
3340}
3341
3342static unsigned int map_state(struct sdeb_store_info *sip, sector_t lba,
3343			      unsigned int *num)
3344{
3345	sector_t end;
3346	unsigned int mapped;
3347	unsigned long index;
3348	unsigned long next;
3349
3350	index = lba_to_map_index(lba);
3351	mapped = test_bit(index, sip->map_storep);
3352
3353	if (mapped)
3354		next = find_next_zero_bit(sip->map_storep, map_size, index);
3355	else
3356		next = find_next_bit(sip->map_storep, map_size, index);
3357
3358	end = min_t(sector_t, sdebug_store_sectors,  map_index_to_lba(next));
3359	*num = end - lba;
3360	return mapped;
3361}
3362
3363static void map_region(struct sdeb_store_info *sip, sector_t lba,
3364		       unsigned int len)
3365{
3366	sector_t end = lba + len;
3367
3368	while (lba < end) {
3369		unsigned long index = lba_to_map_index(lba);
3370
3371		if (index < map_size)
3372			set_bit(index, sip->map_storep);
3373
3374		lba = map_index_to_lba(index + 1);
3375	}
3376}
3377
3378static void unmap_region(struct sdeb_store_info *sip, sector_t lba,
3379			 unsigned int len)
3380{
3381	sector_t end = lba + len;
3382	u8 *fsp = sip->storep;
3383
3384	while (lba < end) {
3385		unsigned long index = lba_to_map_index(lba);
3386
3387		if (lba == map_index_to_lba(index) &&
3388		    lba + sdebug_unmap_granularity <= end &&
3389		    index < map_size) {
3390			clear_bit(index, sip->map_storep);
3391			if (sdebug_lbprz) {  /* for LBPRZ=2 return 0xff_s */
3392				memset(fsp + lba * sdebug_sector_size,
3393				       (sdebug_lbprz & 1) ? 0 : 0xff,
3394				       sdebug_sector_size *
3395				       sdebug_unmap_granularity);
3396			}
3397			if (sip->dif_storep) {
3398				memset(sip->dif_storep + lba, 0xff,
3399				       sizeof(*sip->dif_storep) *
3400				       sdebug_unmap_granularity);
3401			}
3402		}
3403		lba = map_index_to_lba(index + 1);
3404	}
3405}
3406
3407static int resp_write_dt0(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
3408{
3409	bool check_prot;
3410	u32 num;
3411	u32 ei_lba;
3412	int ret;
3413	u64 lba;
3414	struct sdeb_store_info *sip = devip2sip(devip, true);
3415	rwlock_t *macc_lckp = &sip->macc_lck;
3416	u8 *cmd = scp->cmnd;
3417
3418	switch (cmd[0]) {
3419	case WRITE_16:
3420		ei_lba = 0;
3421		lba = get_unaligned_be64(cmd + 2);
3422		num = get_unaligned_be32(cmd + 10);
3423		check_prot = true;
3424		break;
3425	case WRITE_10:
3426		ei_lba = 0;
3427		lba = get_unaligned_be32(cmd + 2);
3428		num = get_unaligned_be16(cmd + 7);
3429		check_prot = true;
3430		break;
3431	case WRITE_6:
3432		ei_lba = 0;
3433		lba = (u32)cmd[3] | (u32)cmd[2] << 8 |
3434		      (u32)(cmd[1] & 0x1f) << 16;
3435		num = (0 == cmd[4]) ? 256 : cmd[4];
3436		check_prot = true;
3437		break;
3438	case WRITE_12:
3439		ei_lba = 0;
3440		lba = get_unaligned_be32(cmd + 2);
3441		num = get_unaligned_be32(cmd + 6);
3442		check_prot = true;
3443		break;
3444	case 0x53:	/* XDWRITEREAD(10) */
3445		ei_lba = 0;
3446		lba = get_unaligned_be32(cmd + 2);
3447		num = get_unaligned_be16(cmd + 7);
3448		check_prot = false;
3449		break;
3450	default:	/* assume WRITE(32) */
3451		lba = get_unaligned_be64(cmd + 12);
3452		ei_lba = get_unaligned_be32(cmd + 20);
3453		num = get_unaligned_be32(cmd + 28);
3454		check_prot = false;
3455		break;
3456	}
3457	if (unlikely(have_dif_prot && check_prot)) {
3458		if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3459		    (cmd[1] & 0xe0)) {
3460			mk_sense_invalid_opcode(scp);
3461			return check_condition_result;
3462		}
3463		if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3464		     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3465		    (cmd[1] & 0xe0) == 0)
3466			sdev_printk(KERN_ERR, scp->device, "Unprotected WR "
3467				    "to DIF device\n");
3468	}
3469
3470	write_lock(macc_lckp);
3471	ret = check_device_access_params(scp, lba, num, true);
3472	if (ret) {
3473		write_unlock(macc_lckp);
3474		return ret;
3475	}
3476
3477	/* DIX + T10 DIF */
3478	if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3479		int prot_ret = prot_verify_write(scp, lba, num, ei_lba);
3480
3481		if (prot_ret) {
3482			write_unlock(macc_lckp);
3483			mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, prot_ret);
3484			return illegal_condition_result;
3485		}
3486	}
3487
3488	ret = do_device_access(sip, scp, 0, lba, num, true);
3489	if (unlikely(scsi_debug_lbp()))
3490		map_region(sip, lba, num);
3491	/* If ZBC zone then bump its write pointer */
3492	if (sdebug_dev_is_zoned(devip))
3493		zbc_inc_wp(devip, lba, num);
3494	write_unlock(macc_lckp);
3495	if (unlikely(-1 == ret))
3496		return DID_ERROR << 16;
3497	else if (unlikely(sdebug_verbose &&
3498			  (ret < (num * sdebug_sector_size))))
3499		sdev_printk(KERN_INFO, scp->device,
3500			    "%s: write: cdb indicated=%u, IO sent=%d bytes\n",
3501			    my_name, num * sdebug_sector_size, ret);
3502
3503	if (unlikely((sdebug_opts & SDEBUG_OPT_RECOV_DIF_DIX) &&
3504		     atomic_read(&sdeb_inject_pending))) {
3505		if (sdebug_opts & SDEBUG_OPT_RECOVERED_ERR) {
3506			mk_sense_buffer(scp, RECOVERED_ERROR, THRESHOLD_EXCEEDED, 0);
3507			atomic_set(&sdeb_inject_pending, 0);
3508			return check_condition_result;
3509		} else if (sdebug_opts & SDEBUG_OPT_DIF_ERR) {
3510			/* Logical block guard check failed */
3511			mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
3512			atomic_set(&sdeb_inject_pending, 0);
3513			return illegal_condition_result;
3514		} else if (sdebug_opts & SDEBUG_OPT_DIX_ERR) {
3515			mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
3516			atomic_set(&sdeb_inject_pending, 0);
3517			return illegal_condition_result;
3518		}
3519	}
3520	return 0;
3521}
3522
3523/*
3524 * T10 has only specified WRITE SCATTERED(16) and WRITE SCATTERED(32).
3525 * No READ GATHERED yet (requires bidi or long cdb holding gather list).
3526 */
3527static int resp_write_scat(struct scsi_cmnd *scp,
3528			   struct sdebug_dev_info *devip)
3529{
3530	u8 *cmd = scp->cmnd;
3531	u8 *lrdp = NULL;
3532	u8 *up;
3533	struct sdeb_store_info *sip = devip2sip(devip, true);
3534	rwlock_t *macc_lckp = &sip->macc_lck;
3535	u8 wrprotect;
3536	u16 lbdof, num_lrd, k;
3537	u32 num, num_by, bt_len, lbdof_blen, sg_off, cum_lb;
3538	u32 lb_size = sdebug_sector_size;
3539	u32 ei_lba;
3540	u64 lba;
3541	int ret, res;
3542	bool is_16;
3543	static const u32 lrd_size = 32; /* + parameter list header size */
3544
3545	if (cmd[0] == VARIABLE_LENGTH_CMD) {
3546		is_16 = false;
3547		wrprotect = (cmd[10] >> 5) & 0x7;
3548		lbdof = get_unaligned_be16(cmd + 12);
3549		num_lrd = get_unaligned_be16(cmd + 16);
3550		bt_len = get_unaligned_be32(cmd + 28);
3551	} else {        /* that leaves WRITE SCATTERED(16) */
3552		is_16 = true;
3553		wrprotect = (cmd[2] >> 5) & 0x7;
3554		lbdof = get_unaligned_be16(cmd + 4);
3555		num_lrd = get_unaligned_be16(cmd + 8);
3556		bt_len = get_unaligned_be32(cmd + 10);
3557		if (unlikely(have_dif_prot)) {
3558			if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3559			    wrprotect) {
3560				mk_sense_invalid_opcode(scp);
3561				return illegal_condition_result;
3562			}
3563			if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3564			     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3565			     wrprotect == 0)
3566				sdev_printk(KERN_ERR, scp->device,
3567					    "Unprotected WR to DIF device\n");
3568		}
3569	}
3570	if ((num_lrd == 0) || (bt_len == 0))
3571		return 0;       /* T10 says these do-nothings are not errors */
3572	if (lbdof == 0) {
3573		if (sdebug_verbose)
3574			sdev_printk(KERN_INFO, scp->device,
3575				"%s: %s: LB Data Offset field bad\n",
3576				my_name, __func__);
3577		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3578		return illegal_condition_result;
3579	}
3580	lbdof_blen = lbdof * lb_size;
3581	if ((lrd_size + (num_lrd * lrd_size)) > lbdof_blen) {
3582		if (sdebug_verbose)
3583			sdev_printk(KERN_INFO, scp->device,
3584				"%s: %s: LBA range descriptors don't fit\n",
3585				my_name, __func__);
3586		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3587		return illegal_condition_result;
3588	}
3589	lrdp = kzalloc(lbdof_blen, GFP_ATOMIC);
3590	if (lrdp == NULL)
3591		return SCSI_MLQUEUE_HOST_BUSY;
3592	if (sdebug_verbose)
3593		sdev_printk(KERN_INFO, scp->device,
3594			"%s: %s: Fetch header+scatter_list, lbdof_blen=%u\n",
3595			my_name, __func__, lbdof_blen);
3596	res = fetch_to_dev_buffer(scp, lrdp, lbdof_blen);
3597	if (res == -1) {
3598		ret = DID_ERROR << 16;
3599		goto err_out;
3600	}
3601
3602	write_lock(macc_lckp);
3603	sg_off = lbdof_blen;
3604	/* Spec says Buffer xfer Length field in number of LBs in dout */
3605	cum_lb = 0;
3606	for (k = 0, up = lrdp + lrd_size; k < num_lrd; ++k, up += lrd_size) {
3607		lba = get_unaligned_be64(up + 0);
3608		num = get_unaligned_be32(up + 8);
3609		if (sdebug_verbose)
3610			sdev_printk(KERN_INFO, scp->device,
3611				"%s: %s: k=%d  LBA=0x%llx num=%u  sg_off=%u\n",
3612				my_name, __func__, k, lba, num, sg_off);
3613		if (num == 0)
3614			continue;
3615		ret = check_device_access_params(scp, lba, num, true);
3616		if (ret)
3617			goto err_out_unlock;
3618		num_by = num * lb_size;
3619		ei_lba = is_16 ? 0 : get_unaligned_be32(up + 12);
3620
3621		if ((cum_lb + num) > bt_len) {
3622			if (sdebug_verbose)
3623				sdev_printk(KERN_INFO, scp->device,
3624				    "%s: %s: sum of blocks > data provided\n",
3625				    my_name, __func__);
3626			mk_sense_buffer(scp, ILLEGAL_REQUEST, WRITE_ERROR_ASC,
3627					0);
3628			ret = illegal_condition_result;
3629			goto err_out_unlock;
3630		}
3631
3632		/* DIX + T10 DIF */
3633		if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3634			int prot_ret = prot_verify_write(scp, lba, num,
3635							 ei_lba);
3636
3637			if (prot_ret) {
3638				mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10,
3639						prot_ret);
3640				ret = illegal_condition_result;
3641				goto err_out_unlock;
3642			}
3643		}
3644
3645		ret = do_device_access(sip, scp, sg_off, lba, num, true);
3646		/* If ZBC zone then bump its write pointer */
3647		if (sdebug_dev_is_zoned(devip))
3648			zbc_inc_wp(devip, lba, num);
3649		if (unlikely(scsi_debug_lbp()))
3650			map_region(sip, lba, num);
3651		if (unlikely(-1 == ret)) {
3652			ret = DID_ERROR << 16;
3653			goto err_out_unlock;
3654		} else if (unlikely(sdebug_verbose && (ret < num_by)))
3655			sdev_printk(KERN_INFO, scp->device,
3656			    "%s: write: cdb indicated=%u, IO sent=%d bytes\n",
3657			    my_name, num_by, ret);
3658
3659		if (unlikely((sdebug_opts & SDEBUG_OPT_RECOV_DIF_DIX) &&
3660			     atomic_read(&sdeb_inject_pending))) {
3661			if (sdebug_opts & SDEBUG_OPT_RECOVERED_ERR) {
3662				mk_sense_buffer(scp, RECOVERED_ERROR, THRESHOLD_EXCEEDED, 0);
3663				atomic_set(&sdeb_inject_pending, 0);
3664				ret = check_condition_result;
3665				goto err_out_unlock;
3666			} else if (sdebug_opts & SDEBUG_OPT_DIF_ERR) {
3667				/* Logical block guard check failed */
3668				mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
3669				atomic_set(&sdeb_inject_pending, 0);
3670				ret = illegal_condition_result;
3671				goto err_out_unlock;
3672			} else if (sdebug_opts & SDEBUG_OPT_DIX_ERR) {
3673				mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
3674				atomic_set(&sdeb_inject_pending, 0);
3675				ret = illegal_condition_result;
3676				goto err_out_unlock;
3677			}
3678		}
3679		sg_off += num_by;
3680		cum_lb += num;
3681	}
3682	ret = 0;
3683err_out_unlock:
3684	write_unlock(macc_lckp);
3685err_out:
3686	kfree(lrdp);
3687	return ret;
3688}
3689
3690static int resp_write_same(struct scsi_cmnd *scp, u64 lba, u32 num,
3691			   u32 ei_lba, bool unmap, bool ndob)
3692{
3693	struct scsi_device *sdp = scp->device;
3694	struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
3695	unsigned long long i;
3696	u64 block, lbaa;
3697	u32 lb_size = sdebug_sector_size;
3698	int ret;
3699	struct sdeb_store_info *sip = devip2sip((struct sdebug_dev_info *)
3700						scp->device->hostdata, true);
3701	rwlock_t *macc_lckp = &sip->macc_lck;
3702	u8 *fs1p;
3703	u8 *fsp;
3704
3705	write_lock(macc_lckp);
3706
3707	ret = check_device_access_params(scp, lba, num, true);
3708	if (ret) {
3709		write_unlock(macc_lckp);
3710		return ret;
3711	}
3712
3713	if (unmap && scsi_debug_lbp()) {
3714		unmap_region(sip, lba, num);
3715		goto out;
3716	}
3717	lbaa = lba;
3718	block = do_div(lbaa, sdebug_store_sectors);
3719	/* if ndob then zero 1 logical block, else fetch 1 logical block */
3720	fsp = sip->storep;
3721	fs1p = fsp + (block * lb_size);
3722	if (ndob) {
3723		memset(fs1p, 0, lb_size);
3724		ret = 0;
3725	} else
3726		ret = fetch_to_dev_buffer(scp, fs1p, lb_size);
3727
3728	if (-1 == ret) {
3729		write_unlock(&sip->macc_lck);
3730		return DID_ERROR << 16;
3731	} else if (sdebug_verbose && !ndob && (ret < lb_size))
3732		sdev_printk(KERN_INFO, scp->device,
3733			    "%s: %s: lb size=%u, IO sent=%d bytes\n",
3734			    my_name, "write same", lb_size, ret);
3735
3736	/* Copy first sector to remaining blocks */
3737	for (i = 1 ; i < num ; i++) {
3738		lbaa = lba + i;
3739		block = do_div(lbaa, sdebug_store_sectors);
3740		memmove(fsp + (block * lb_size), fs1p, lb_size);
3741	}
3742	if (scsi_debug_lbp())
3743		map_region(sip, lba, num);
3744	/* If ZBC zone then bump its write pointer */
3745	if (sdebug_dev_is_zoned(devip))
3746		zbc_inc_wp(devip, lba, num);
3747out:
3748	write_unlock(macc_lckp);
3749
3750	return 0;
3751}
3752
3753static int resp_write_same_10(struct scsi_cmnd *scp,
3754			      struct sdebug_dev_info *devip)
3755{
3756	u8 *cmd = scp->cmnd;
3757	u32 lba;
3758	u16 num;
3759	u32 ei_lba = 0;
3760	bool unmap = false;
3761
3762	if (cmd[1] & 0x8) {
3763		if (sdebug_lbpws10 == 0) {
3764			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 3);
3765			return check_condition_result;
3766		} else
3767			unmap = true;
3768	}
3769	lba = get_unaligned_be32(cmd + 2);
3770	num = get_unaligned_be16(cmd + 7);
3771	if (num > sdebug_write_same_length) {
3772		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 7, -1);
3773		return check_condition_result;
3774	}
3775	return resp_write_same(scp, lba, num, ei_lba, unmap, false);
3776}
3777
3778static int resp_write_same_16(struct scsi_cmnd *scp,
3779			      struct sdebug_dev_info *devip)
3780{
3781	u8 *cmd = scp->cmnd;
3782	u64 lba;
3783	u32 num;
3784	u32 ei_lba = 0;
3785	bool unmap = false;
3786	bool ndob = false;
3787
3788	if (cmd[1] & 0x8) {	/* UNMAP */
3789		if (sdebug_lbpws == 0) {
3790			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 3);
3791			return check_condition_result;
3792		} else
3793			unmap = true;
3794	}
3795	if (cmd[1] & 0x1)  /* NDOB (no data-out buffer, assumes zeroes) */
3796		ndob = true;
3797	lba = get_unaligned_be64(cmd + 2);
3798	num = get_unaligned_be32(cmd + 10);
3799	if (num > sdebug_write_same_length) {
3800		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 10, -1);
3801		return check_condition_result;
3802	}
3803	return resp_write_same(scp, lba, num, ei_lba, unmap, ndob);
3804}
3805
3806/* Note the mode field is in the same position as the (lower) service action
3807 * field. For the Report supported operation codes command, SPC-4 suggests
3808 * each mode of this command should be reported separately; for future. */
3809static int resp_write_buffer(struct scsi_cmnd *scp,
3810			     struct sdebug_dev_info *devip)
3811{
3812	u8 *cmd = scp->cmnd;
3813	struct scsi_device *sdp = scp->device;
3814	struct sdebug_dev_info *dp;
3815	u8 mode;
3816
3817	mode = cmd[1] & 0x1f;
3818	switch (mode) {
3819	case 0x4:	/* download microcode (MC) and activate (ACT) */
3820		/* set UAs on this device only */
3821		set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
3822		set_bit(SDEBUG_UA_MICROCODE_CHANGED, devip->uas_bm);
3823		break;
3824	case 0x5:	/* download MC, save and ACT */
3825		set_bit(SDEBUG_UA_MICROCODE_CHANGED_WO_RESET, devip->uas_bm);
3826		break;
3827	case 0x6:	/* download MC with offsets and ACT */
3828		/* set UAs on most devices (LUs) in this target */
3829		list_for_each_entry(dp,
3830				    &devip->sdbg_host->dev_info_list,
3831				    dev_list)
3832			if (dp->target == sdp->id) {
3833				set_bit(SDEBUG_UA_BUS_RESET, dp->uas_bm);
3834				if (devip != dp)
3835					set_bit(SDEBUG_UA_MICROCODE_CHANGED,
3836						dp->uas_bm);
3837			}
3838		break;
3839	case 0x7:	/* download MC with offsets, save, and ACT */
3840		/* set UA on all devices (LUs) in this target */
3841		list_for_each_entry(dp,
3842				    &devip->sdbg_host->dev_info_list,
3843				    dev_list)
3844			if (dp->target == sdp->id)
3845				set_bit(SDEBUG_UA_MICROCODE_CHANGED_WO_RESET,
3846					dp->uas_bm);
3847		break;
3848	default:
3849		/* do nothing for this command for other mode values */
3850		break;
3851	}
3852	return 0;
3853}
3854
3855static int resp_comp_write(struct scsi_cmnd *scp,
3856			   struct sdebug_dev_info *devip)
3857{
3858	u8 *cmd = scp->cmnd;
3859	u8 *arr;
3860	struct sdeb_store_info *sip = devip2sip(devip, true);
3861	rwlock_t *macc_lckp = &sip->macc_lck;
3862	u64 lba;
3863	u32 dnum;
3864	u32 lb_size = sdebug_sector_size;
3865	u8 num;
3866	int ret;
3867	int retval = 0;
3868
3869	lba = get_unaligned_be64(cmd + 2);
3870	num = cmd[13];		/* 1 to a maximum of 255 logical blocks */
3871	if (0 == num)
3872		return 0;	/* degenerate case, not an error */
3873	if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3874	    (cmd[1] & 0xe0)) {
3875		mk_sense_invalid_opcode(scp);
3876		return check_condition_result;
3877	}
3878	if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3879	     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3880	    (cmd[1] & 0xe0) == 0)
3881		sdev_printk(KERN_ERR, scp->device, "Unprotected WR "
3882			    "to DIF device\n");
3883	ret = check_device_access_params(scp, lba, num, false);
3884	if (ret)
3885		return ret;
3886	dnum = 2 * num;
3887	arr = kcalloc(lb_size, dnum, GFP_ATOMIC);
3888	if (NULL == arr) {
3889		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
3890				INSUFF_RES_ASCQ);
3891		return check_condition_result;
3892	}
3893
3894	write_lock(macc_lckp);
3895
3896	ret = do_dout_fetch(scp, dnum, arr);
3897	if (ret == -1) {
3898		retval = DID_ERROR << 16;
3899		goto cleanup;
3900	} else if (sdebug_verbose && (ret < (dnum * lb_size)))
3901		sdev_printk(KERN_INFO, scp->device, "%s: compare_write: cdb "
3902			    "indicated=%u, IO sent=%d bytes\n", my_name,
3903			    dnum * lb_size, ret);
3904	if (!comp_write_worker(sip, lba, num, arr, false)) {
3905		mk_sense_buffer(scp, MISCOMPARE, MISCOMPARE_VERIFY_ASC, 0);
3906		retval = check_condition_result;
3907		goto cleanup;
3908	}
3909	if (scsi_debug_lbp())
3910		map_region(sip, lba, num);
3911cleanup:
3912	write_unlock(macc_lckp);
3913	kfree(arr);
3914	return retval;
3915}
3916
3917struct unmap_block_desc {
3918	__be64	lba;
3919	__be32	blocks;
3920	__be32	__reserved;
3921};
3922
3923static int resp_unmap(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
3924{
3925	unsigned char *buf;
3926	struct unmap_block_desc *desc;
3927	struct sdeb_store_info *sip = devip2sip(devip, true);
3928	rwlock_t *macc_lckp = &sip->macc_lck;
3929	unsigned int i, payload_len, descriptors;
3930	int ret;
3931
3932	if (!scsi_debug_lbp())
3933		return 0;	/* fib and say its done */
3934	payload_len = get_unaligned_be16(scp->cmnd + 7);
3935	BUG_ON(scsi_bufflen(scp) != payload_len);
3936
3937	descriptors = (payload_len - 8) / 16;
3938	if (descriptors > sdebug_unmap_max_desc) {
3939		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 7, -1);
3940		return check_condition_result;
3941	}
3942
3943	buf = kzalloc(scsi_bufflen(scp), GFP_ATOMIC);
3944	if (!buf) {
3945		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
3946				INSUFF_RES_ASCQ);
3947		return check_condition_result;
3948	}
3949
3950	scsi_sg_copy_to_buffer(scp, buf, scsi_bufflen(scp));
3951
3952	BUG_ON(get_unaligned_be16(&buf[0]) != payload_len - 2);
3953	BUG_ON(get_unaligned_be16(&buf[2]) != descriptors * 16);
3954
3955	desc = (void *)&buf[8];
3956
3957	write_lock(macc_lckp);
3958
3959	for (i = 0 ; i < descriptors ; i++) {
3960		unsigned long long lba = get_unaligned_be64(&desc[i].lba);
3961		unsigned int num = get_unaligned_be32(&desc[i].blocks);
3962
3963		ret = check_device_access_params(scp, lba, num, true);
3964		if (ret)
3965			goto out;
3966
3967		unmap_region(sip, lba, num);
3968	}
3969
3970	ret = 0;
3971
3972out:
3973	write_unlock(macc_lckp);
3974	kfree(buf);
3975
3976	return ret;
3977}
3978
3979#define SDEBUG_GET_LBA_STATUS_LEN 32
3980
3981static int resp_get_lba_status(struct scsi_cmnd *scp,
3982			       struct sdebug_dev_info *devip)
3983{
3984	u8 *cmd = scp->cmnd;
3985	u64 lba;
3986	u32 alloc_len, mapped, num;
3987	int ret;
3988	u8 arr[SDEBUG_GET_LBA_STATUS_LEN];
3989
3990	lba = get_unaligned_be64(cmd + 2);
3991	alloc_len = get_unaligned_be32(cmd + 10);
3992
3993	if (alloc_len < 24)
3994		return 0;
3995
3996	ret = check_device_access_params(scp, lba, 1, false);
3997	if (ret)
3998		return ret;
3999
4000	if (scsi_debug_lbp()) {
4001		struct sdeb_store_info *sip = devip2sip(devip, true);
4002
4003		mapped = map_state(sip, lba, &num);
4004	} else {
4005		mapped = 1;
4006		/* following just in case virtual_gb changed */
4007		sdebug_capacity = get_sdebug_capacity();
4008		if (sdebug_capacity - lba <= 0xffffffff)
4009			num = sdebug_capacity - lba;
4010		else
4011			num = 0xffffffff;
4012	}
4013
4014	memset(arr, 0, SDEBUG_GET_LBA_STATUS_LEN);
4015	put_unaligned_be32(20, arr);		/* Parameter Data Length */
4016	put_unaligned_be64(lba, arr + 8);	/* LBA */
4017	put_unaligned_be32(num, arr + 16);	/* Number of blocks */
4018	arr[20] = !mapped;		/* prov_stat=0: mapped; 1: dealloc */
4019
4020	return fill_from_dev_buffer(scp, arr, SDEBUG_GET_LBA_STATUS_LEN);
4021}
4022
4023static int resp_sync_cache(struct scsi_cmnd *scp,
4024			   struct sdebug_dev_info *devip)
4025{
4026	int res = 0;
4027	u64 lba;
4028	u32 num_blocks;
4029	u8 *cmd = scp->cmnd;
4030
4031	if (cmd[0] == SYNCHRONIZE_CACHE) {	/* 10 byte cdb */
4032		lba = get_unaligned_be32(cmd + 2);
4033		num_blocks = get_unaligned_be16(cmd + 7);
4034	} else {				/* SYNCHRONIZE_CACHE(16) */
4035		lba = get_unaligned_be64(cmd + 2);
4036		num_blocks = get_unaligned_be32(cmd + 10);
4037	}
4038	if (lba + num_blocks > sdebug_capacity) {
4039		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4040		return check_condition_result;
4041	}
4042	if (!write_since_sync || (cmd[1] & 0x2))
4043		res = SDEG_RES_IMMED_MASK;
4044	else		/* delay if write_since_sync and IMMED clear */
4045		write_since_sync = false;
4046	return res;
4047}
4048
4049/*
4050 * Assuming the LBA+num_blocks is not out-of-range, this function will return
4051 * CONDITION MET if the specified blocks will/have fitted in the cache, and
4052 * a GOOD status otherwise. Model a disk with a big cache and yield
4053 * CONDITION MET. Actually tries to bring range in main memory into the
4054 * cache associated with the CPU(s).
4055 */
4056static int resp_pre_fetch(struct scsi_cmnd *scp,
4057			  struct sdebug_dev_info *devip)
4058{
4059	int res = 0;
4060	u64 lba;
4061	u64 block, rest = 0;
4062	u32 nblks;
4063	u8 *cmd = scp->cmnd;
4064	struct sdeb_store_info *sip = devip2sip(devip, true);
4065	rwlock_t *macc_lckp = &sip->macc_lck;
4066	u8 *fsp = sip->storep;
4067
4068	if (cmd[0] == PRE_FETCH) {	/* 10 byte cdb */
4069		lba = get_unaligned_be32(cmd + 2);
4070		nblks = get_unaligned_be16(cmd + 7);
4071	} else {			/* PRE-FETCH(16) */
4072		lba = get_unaligned_be64(cmd + 2);
4073		nblks = get_unaligned_be32(cmd + 10);
4074	}
4075	if (lba + nblks > sdebug_capacity) {
4076		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4077		return check_condition_result;
4078	}
4079	if (!fsp)
4080		goto fini;
4081	/* PRE-FETCH spec says nothing about LBP or PI so skip them */
4082	block = do_div(lba, sdebug_store_sectors);
4083	if (block + nblks > sdebug_store_sectors)
4084		rest = block + nblks - sdebug_store_sectors;
4085
4086	/* Try to bring the PRE-FETCH range into CPU's cache */
4087	read_lock(macc_lckp);
4088	prefetch_range(fsp + (sdebug_sector_size * block),
4089		       (nblks - rest) * sdebug_sector_size);
4090	if (rest)
4091		prefetch_range(fsp, rest * sdebug_sector_size);
4092	read_unlock(macc_lckp);
4093fini:
4094	if (cmd[1] & 0x2)
4095		res = SDEG_RES_IMMED_MASK;
4096	return res | condition_met_result;
4097}
4098
4099#define RL_BUCKET_ELEMS 8
4100
4101/* Even though each pseudo target has a REPORT LUNS "well known logical unit"
4102 * (W-LUN), the normal Linux scanning logic does not associate it with a
4103 * device (e.g. /dev/sg7). The following magic will make that association:
4104 *   "cd /sys/class/scsi_host/host<n> ; echo '- - 49409' > scan"
4105 * where <n> is a host number. If there are multiple targets in a host then
4106 * the above will associate a W-LUN to each target. To only get a W-LUN
4107 * for target 2, then use "echo '- 2 49409' > scan" .
4108 */
4109static int resp_report_luns(struct scsi_cmnd *scp,
4110			    struct sdebug_dev_info *devip)
4111{
4112	unsigned char *cmd = scp->cmnd;
4113	unsigned int alloc_len;
4114	unsigned char select_report;
4115	u64 lun;
4116	struct scsi_lun *lun_p;
4117	u8 arr[RL_BUCKET_ELEMS * sizeof(struct scsi_lun)];
4118	unsigned int lun_cnt;	/* normal LUN count (max: 256) */
4119	unsigned int wlun_cnt;	/* report luns W-LUN count */
4120	unsigned int tlun_cnt;	/* total LUN count */
4121	unsigned int rlen;	/* response length (in bytes) */
4122	int k, j, n, res;
4123	unsigned int off_rsp = 0;
4124	const int sz_lun = sizeof(struct scsi_lun);
4125
4126	clear_luns_changed_on_target(devip);
4127
4128	select_report = cmd[2];
4129	alloc_len = get_unaligned_be32(cmd + 6);
4130
4131	if (alloc_len < 4) {
4132		pr_err("alloc len too small %d\n", alloc_len);
4133		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
4134		return check_condition_result;
4135	}
4136
4137	switch (select_report) {
4138	case 0:		/* all LUNs apart from W-LUNs */
4139		lun_cnt = sdebug_max_luns;
4140		wlun_cnt = 0;
4141		break;
4142	case 1:		/* only W-LUNs */
4143		lun_cnt = 0;
4144		wlun_cnt = 1;
4145		break;
4146	case 2:		/* all LUNs */
4147		lun_cnt = sdebug_max_luns;
4148		wlun_cnt = 1;
4149		break;
4150	case 0x10:	/* only administrative LUs */
4151	case 0x11:	/* see SPC-5 */
4152	case 0x12:	/* only subsiduary LUs owned by referenced LU */
4153	default:
4154		pr_debug("select report invalid %d\n", select_report);
4155		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, -1);
4156		return check_condition_result;
4157	}
4158
4159	if (sdebug_no_lun_0 && (lun_cnt > 0))
4160		--lun_cnt;
4161
4162	tlun_cnt = lun_cnt + wlun_cnt;
4163	rlen = tlun_cnt * sz_lun;	/* excluding 8 byte header */
4164	scsi_set_resid(scp, scsi_bufflen(scp));
4165	pr_debug("select_report %d luns = %d wluns = %d no_lun0 %d\n",
4166		 select_report, lun_cnt, wlun_cnt, sdebug_no_lun_0);
4167
4168	/* loops rely on sizeof response header same as sizeof lun (both 8) */
4169	lun = sdebug_no_lun_0 ? 1 : 0;
4170	for (k = 0, j = 0, res = 0; true; ++k, j = 0) {
4171		memset(arr, 0, sizeof(arr));
4172		lun_p = (struct scsi_lun *)&arr[0];
4173		if (k == 0) {
4174			put_unaligned_be32(rlen, &arr[0]);
4175			++lun_p;
4176			j = 1;
4177		}
4178		for ( ; j < RL_BUCKET_ELEMS; ++j, ++lun_p) {
4179			if ((k * RL_BUCKET_ELEMS) + j > lun_cnt)
4180				break;
4181			int_to_scsilun(lun++, lun_p);
 
 
4182		}
4183		if (j < RL_BUCKET_ELEMS)
4184			break;
4185		n = j * sz_lun;
4186		res = p_fill_from_dev_buffer(scp, arr, n, off_rsp);
4187		if (res)
4188			return res;
4189		off_rsp += n;
4190	}
4191	if (wlun_cnt) {
4192		int_to_scsilun(SCSI_W_LUN_REPORT_LUNS, lun_p);
4193		++j;
4194	}
4195	if (j > 0)
4196		res = p_fill_from_dev_buffer(scp, arr, j * sz_lun, off_rsp);
4197	return res;
4198}
4199
4200static int resp_verify(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
4201{
4202	bool is_bytchk3 = false;
4203	u8 bytchk;
4204	int ret, j;
4205	u32 vnum, a_num, off;
4206	const u32 lb_size = sdebug_sector_size;
4207	u64 lba;
4208	u8 *arr;
4209	u8 *cmd = scp->cmnd;
4210	struct sdeb_store_info *sip = devip2sip(devip, true);
4211	rwlock_t *macc_lckp = &sip->macc_lck;
4212
4213	bytchk = (cmd[1] >> 1) & 0x3;
4214	if (bytchk == 0) {
4215		return 0;	/* always claim internal verify okay */
4216	} else if (bytchk == 2) {
4217		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 2);
4218		return check_condition_result;
4219	} else if (bytchk == 3) {
4220		is_bytchk3 = true;	/* 1 block sent, compared repeatedly */
4221	}
4222	switch (cmd[0]) {
4223	case VERIFY_16:
4224		lba = get_unaligned_be64(cmd + 2);
4225		vnum = get_unaligned_be32(cmd + 10);
4226		break;
4227	case VERIFY:		/* is VERIFY(10) */
4228		lba = get_unaligned_be32(cmd + 2);
4229		vnum = get_unaligned_be16(cmd + 7);
4230		break;
4231	default:
4232		mk_sense_invalid_opcode(scp);
4233		return check_condition_result;
4234	}
4235	a_num = is_bytchk3 ? 1 : vnum;
4236	/* Treat following check like one for read (i.e. no write) access */
4237	ret = check_device_access_params(scp, lba, a_num, false);
4238	if (ret)
4239		return ret;
4240
4241	arr = kcalloc(lb_size, vnum, GFP_ATOMIC);
4242	if (!arr) {
4243		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
4244				INSUFF_RES_ASCQ);
4245		return check_condition_result;
4246	}
4247	/* Not changing store, so only need read access */
4248	read_lock(macc_lckp);
4249
4250	ret = do_dout_fetch(scp, a_num, arr);
4251	if (ret == -1) {
4252		ret = DID_ERROR << 16;
4253		goto cleanup;
4254	} else if (sdebug_verbose && (ret < (a_num * lb_size))) {
4255		sdev_printk(KERN_INFO, scp->device,
4256			    "%s: %s: cdb indicated=%u, IO sent=%d bytes\n",
4257			    my_name, __func__, a_num * lb_size, ret);
4258	}
4259	if (is_bytchk3) {
4260		for (j = 1, off = lb_size; j < vnum; ++j, off += lb_size)
4261			memcpy(arr + off, arr, lb_size);
4262	}
4263	ret = 0;
4264	if (!comp_write_worker(sip, lba, vnum, arr, true)) {
4265		mk_sense_buffer(scp, MISCOMPARE, MISCOMPARE_VERIFY_ASC, 0);
4266		ret = check_condition_result;
4267		goto cleanup;
4268	}
4269cleanup:
4270	read_unlock(macc_lckp);
4271	kfree(arr);
4272	return ret;
4273}
4274
4275#define RZONES_DESC_HD 64
4276
4277/* Report zones depending on start LBA nad reporting options */
4278static int resp_report_zones(struct scsi_cmnd *scp,
4279			     struct sdebug_dev_info *devip)
4280{
4281	unsigned int i, max_zones, rep_max_zones, nrz = 0;
4282	int ret = 0;
4283	u32 alloc_len, rep_opts, rep_len;
4284	bool partial;
4285	u64 lba, zs_lba;
4286	u8 *arr = NULL, *desc;
4287	u8 *cmd = scp->cmnd;
4288	struct sdeb_zone_state *zsp;
4289	struct sdeb_store_info *sip = devip2sip(devip, false);
4290	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
4291
4292	if (!sdebug_dev_is_zoned(devip)) {
4293		mk_sense_invalid_opcode(scp);
4294		return check_condition_result;
4295	}
4296	zs_lba = get_unaligned_be64(cmd + 2);
4297	alloc_len = get_unaligned_be32(cmd + 10);
4298	rep_opts = cmd[14] & 0x3f;
4299	partial = cmd[14] & 0x80;
4300
4301	if (zs_lba >= sdebug_capacity) {
4302		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4303		return check_condition_result;
4304	}
4305
4306	max_zones = devip->nr_zones - (zs_lba >> devip->zsize_shift);
4307	rep_max_zones = min((alloc_len - 64) >> ilog2(RZONES_DESC_HD),
4308			    max_zones);
4309
4310	arr = kcalloc(RZONES_DESC_HD, alloc_len, GFP_ATOMIC);
4311	if (!arr) {
4312		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
4313				INSUFF_RES_ASCQ);
4314		return check_condition_result;
4315	}
4316
4317	read_lock(macc_lckp);
4318
4319	desc = arr + 64;
4320	for (i = 0; i < max_zones; i++) {
4321		lba = zs_lba + devip->zsize * i;
4322		if (lba > sdebug_capacity)
4323			break;
4324		zsp = zbc_zone(devip, lba);
4325		switch (rep_opts) {
4326		case 0x00:
4327			/* All zones */
4328			break;
4329		case 0x01:
4330			/* Empty zones */
4331			if (zsp->z_cond != ZC1_EMPTY)
4332				continue;
4333			break;
4334		case 0x02:
4335			/* Implicit open zones */
4336			if (zsp->z_cond != ZC2_IMPLICIT_OPEN)
4337				continue;
4338			break;
4339		case 0x03:
4340			/* Explicit open zones */
4341			if (zsp->z_cond != ZC3_EXPLICIT_OPEN)
4342				continue;
4343			break;
4344		case 0x04:
4345			/* Closed zones */
4346			if (zsp->z_cond != ZC4_CLOSED)
4347				continue;
4348			break;
4349		case 0x05:
4350			/* Full zones */
4351			if (zsp->z_cond != ZC5_FULL)
4352				continue;
4353			break;
4354		case 0x06:
4355		case 0x07:
4356		case 0x10:
4357			/*
4358			 * Read-only, offline, reset WP recommended are
4359			 * not emulated: no zones to report;
4360			 */
4361			continue;
4362		case 0x11:
4363			/* non-seq-resource set */
4364			if (!zsp->z_non_seq_resource)
4365				continue;
4366			break;
4367		case 0x3f:
4368			/* Not write pointer (conventional) zones */
4369			if (!zbc_zone_is_conv(zsp))
4370				continue;
4371			break;
4372		default:
4373			mk_sense_buffer(scp, ILLEGAL_REQUEST,
4374					INVALID_FIELD_IN_CDB, 0);
4375			ret = check_condition_result;
4376			goto fini;
4377		}
4378
4379		if (nrz < rep_max_zones) {
4380			/* Fill zone descriptor */
4381			desc[0] = zsp->z_type;
4382			desc[1] = zsp->z_cond << 4;
4383			if (zsp->z_non_seq_resource)
4384				desc[1] |= 1 << 1;
4385			put_unaligned_be64((u64)zsp->z_size, desc + 8);
4386			put_unaligned_be64((u64)zsp->z_start, desc + 16);
4387			put_unaligned_be64((u64)zsp->z_wp, desc + 24);
4388			desc += 64;
4389		}
4390
4391		if (partial && nrz >= rep_max_zones)
4392			break;
4393
4394		nrz++;
4395	}
4396
4397	/* Report header */
4398	put_unaligned_be32(nrz * RZONES_DESC_HD, arr + 0);
4399	put_unaligned_be64(sdebug_capacity - 1, arr + 8);
4400
4401	rep_len = (unsigned long)desc - (unsigned long)arr;
4402	ret = fill_from_dev_buffer(scp, arr, min_t(int, alloc_len, rep_len));
4403
4404fini:
4405	read_unlock(macc_lckp);
4406	kfree(arr);
4407	return ret;
4408}
4409
4410/* Logic transplanted from tcmu-runner, file_zbc.c */
4411static void zbc_open_all(struct sdebug_dev_info *devip)
4412{
4413	struct sdeb_zone_state *zsp = &devip->zstate[0];
4414	unsigned int i;
4415
4416	for (i = 0; i < devip->nr_zones; i++, zsp++) {
4417		if (zsp->z_cond == ZC4_CLOSED)
4418			zbc_open_zone(devip, &devip->zstate[i], true);
4419	}
4420}
4421
4422static int resp_open_zone(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
4423{
4424	int res = 0;
4425	u64 z_id;
4426	enum sdebug_z_cond zc;
4427	u8 *cmd = scp->cmnd;
4428	struct sdeb_zone_state *zsp;
4429	bool all = cmd[14] & 0x01;
4430	struct sdeb_store_info *sip = devip2sip(devip, false);
4431	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
4432
4433	if (!sdebug_dev_is_zoned(devip)) {
4434		mk_sense_invalid_opcode(scp);
4435		return check_condition_result;
4436	}
4437
4438	write_lock(macc_lckp);
4439
4440	if (all) {
4441		/* Check if all closed zones can be open */
4442		if (devip->max_open &&
4443		    devip->nr_exp_open + devip->nr_closed > devip->max_open) {
4444			mk_sense_buffer(scp, DATA_PROTECT, INSUFF_RES_ASC,
4445					INSUFF_ZONE_ASCQ);
4446			res = check_condition_result;
4447			goto fini;
4448		}
4449		/* Open all closed zones */
4450		zbc_open_all(devip);
4451		goto fini;
4452	}
4453
4454	/* Open the specified zone */
4455	z_id = get_unaligned_be64(cmd + 2);
4456	if (z_id >= sdebug_capacity) {
4457		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4458		res = check_condition_result;
4459		goto fini;
4460	}
4461
4462	zsp = zbc_zone(devip, z_id);
4463	if (z_id != zsp->z_start) {
4464		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4465		res = check_condition_result;
4466		goto fini;
4467	}
4468	if (zbc_zone_is_conv(zsp)) {
4469		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4470		res = check_condition_result;
4471		goto fini;
4472	}
4473
4474	zc = zsp->z_cond;
4475	if (zc == ZC3_EXPLICIT_OPEN || zc == ZC5_FULL)
4476		goto fini;
4477
4478	if (devip->max_open && devip->nr_exp_open >= devip->max_open) {
4479		mk_sense_buffer(scp, DATA_PROTECT, INSUFF_RES_ASC,
4480				INSUFF_ZONE_ASCQ);
4481		res = check_condition_result;
4482		goto fini;
4483	}
4484
4485	zbc_open_zone(devip, zsp, true);
4486fini:
4487	write_unlock(macc_lckp);
4488	return res;
4489}
4490
4491static void zbc_close_all(struct sdebug_dev_info *devip)
4492{
4493	unsigned int i;
4494
4495	for (i = 0; i < devip->nr_zones; i++)
4496		zbc_close_zone(devip, &devip->zstate[i]);
4497}
4498
4499static int resp_close_zone(struct scsi_cmnd *scp,
4500			   struct sdebug_dev_info *devip)
4501{
4502	int res = 0;
4503	u64 z_id;
4504	u8 *cmd = scp->cmnd;
4505	struct sdeb_zone_state *zsp;
4506	bool all = cmd[14] & 0x01;
4507	struct sdeb_store_info *sip = devip2sip(devip, false);
4508	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
4509
4510	if (!sdebug_dev_is_zoned(devip)) {
4511		mk_sense_invalid_opcode(scp);
4512		return check_condition_result;
4513	}
4514
4515	write_lock(macc_lckp);
4516
4517	if (all) {
4518		zbc_close_all(devip);
4519		goto fini;
4520	}
4521
4522	/* Close specified zone */
4523	z_id = get_unaligned_be64(cmd + 2);
4524	if (z_id >= sdebug_capacity) {
4525		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4526		res = check_condition_result;
4527		goto fini;
4528	}
4529
4530	zsp = zbc_zone(devip, z_id);
4531	if (z_id != zsp->z_start) {
4532		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4533		res = check_condition_result;
4534		goto fini;
4535	}
4536	if (zbc_zone_is_conv(zsp)) {
4537		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4538		res = check_condition_result;
4539		goto fini;
4540	}
4541
4542	zbc_close_zone(devip, zsp);
4543fini:
4544	write_unlock(macc_lckp);
4545	return res;
4546}
4547
4548static void zbc_finish_zone(struct sdebug_dev_info *devip,
4549			    struct sdeb_zone_state *zsp, bool empty)
4550{
4551	enum sdebug_z_cond zc = zsp->z_cond;
4552
4553	if (zc == ZC4_CLOSED || zc == ZC2_IMPLICIT_OPEN ||
4554	    zc == ZC3_EXPLICIT_OPEN || (empty && zc == ZC1_EMPTY)) {
4555		if (zc == ZC2_IMPLICIT_OPEN || zc == ZC3_EXPLICIT_OPEN)
4556			zbc_close_zone(devip, zsp);
4557		if (zsp->z_cond == ZC4_CLOSED)
4558			devip->nr_closed--;
4559		zsp->z_wp = zsp->z_start + zsp->z_size;
4560		zsp->z_cond = ZC5_FULL;
4561	}
4562}
4563
4564static void zbc_finish_all(struct sdebug_dev_info *devip)
4565{
4566	unsigned int i;
4567
4568	for (i = 0; i < devip->nr_zones; i++)
4569		zbc_finish_zone(devip, &devip->zstate[i], false);
4570}
4571
4572static int resp_finish_zone(struct scsi_cmnd *scp,
4573			    struct sdebug_dev_info *devip)
4574{
4575	struct sdeb_zone_state *zsp;
4576	int res = 0;
4577	u64 z_id;
4578	u8 *cmd = scp->cmnd;
4579	bool all = cmd[14] & 0x01;
4580	struct sdeb_store_info *sip = devip2sip(devip, false);
4581	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
4582
4583	if (!sdebug_dev_is_zoned(devip)) {
4584		mk_sense_invalid_opcode(scp);
4585		return check_condition_result;
4586	}
4587
4588	write_lock(macc_lckp);
4589
4590	if (all) {
4591		zbc_finish_all(devip);
4592		goto fini;
4593	}
4594
4595	/* Finish the specified zone */
4596	z_id = get_unaligned_be64(cmd + 2);
4597	if (z_id >= sdebug_capacity) {
4598		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4599		res = check_condition_result;
4600		goto fini;
4601	}
4602
4603	zsp = zbc_zone(devip, z_id);
4604	if (z_id != zsp->z_start) {
4605		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4606		res = check_condition_result;
4607		goto fini;
4608	}
4609	if (zbc_zone_is_conv(zsp)) {
4610		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4611		res = check_condition_result;
4612		goto fini;
4613	}
4614
4615	zbc_finish_zone(devip, zsp, true);
4616fini:
4617	write_unlock(macc_lckp);
4618	return res;
4619}
4620
4621static void zbc_rwp_zone(struct sdebug_dev_info *devip,
4622			 struct sdeb_zone_state *zsp)
4623{
4624	enum sdebug_z_cond zc;
4625
4626	if (zbc_zone_is_conv(zsp))
4627		return;
4628
4629	zc = zsp->z_cond;
4630	if (zc == ZC2_IMPLICIT_OPEN || zc == ZC3_EXPLICIT_OPEN)
4631		zbc_close_zone(devip, zsp);
4632
4633	if (zsp->z_cond == ZC4_CLOSED)
4634		devip->nr_closed--;
4635
4636	zsp->z_non_seq_resource = false;
4637	zsp->z_wp = zsp->z_start;
4638	zsp->z_cond = ZC1_EMPTY;
4639}
4640
4641static void zbc_rwp_all(struct sdebug_dev_info *devip)
4642{
4643	unsigned int i;
4644
4645	for (i = 0; i < devip->nr_zones; i++)
4646		zbc_rwp_zone(devip, &devip->zstate[i]);
4647}
4648
4649static int resp_rwp_zone(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
4650{
4651	struct sdeb_zone_state *zsp;
4652	int res = 0;
4653	u64 z_id;
4654	u8 *cmd = scp->cmnd;
4655	bool all = cmd[14] & 0x01;
4656	struct sdeb_store_info *sip = devip2sip(devip, false);
4657	rwlock_t *macc_lckp = sip ? &sip->macc_lck : &sdeb_fake_rw_lck;
4658
4659	if (!sdebug_dev_is_zoned(devip)) {
4660		mk_sense_invalid_opcode(scp);
4661		return check_condition_result;
4662	}
4663
4664	write_lock(macc_lckp);
4665
4666	if (all) {
4667		zbc_rwp_all(devip);
4668		goto fini;
4669	}
4670
4671	z_id = get_unaligned_be64(cmd + 2);
4672	if (z_id >= sdebug_capacity) {
4673		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4674		res = check_condition_result;
4675		goto fini;
4676	}
4677
4678	zsp = zbc_zone(devip, z_id);
4679	if (z_id != zsp->z_start) {
4680		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4681		res = check_condition_result;
4682		goto fini;
4683	}
4684	if (zbc_zone_is_conv(zsp)) {
4685		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4686		res = check_condition_result;
4687		goto fini;
4688	}
4689
4690	zbc_rwp_zone(devip, zsp);
4691fini:
4692	write_unlock(macc_lckp);
4693	return res;
4694}
4695
4696static struct sdebug_queue *get_queue(struct scsi_cmnd *cmnd)
4697{
4698	u16 hwq;
 
4699
4700	if (sdebug_host_max_queue) {
4701		/* Provide a simple method to choose the hwq */
4702		hwq = smp_processor_id() % submit_queues;
4703	} else {
4704		u32 tag = blk_mq_unique_tag(cmnd->request);
4705
4706		hwq = blk_mq_unique_tag_to_hwq(tag);
 
 
4707
4708		pr_debug("tag=%#x, hwq=%d\n", tag, hwq);
4709		if (WARN_ON_ONCE(hwq >= submit_queues))
4710			hwq = 0;
4711	}
4712	return sdebug_q_arr + hwq;
4713}
4714
4715static u32 get_tag(struct scsi_cmnd *cmnd)
4716{
4717	return blk_mq_unique_tag(cmnd->request);
4718}
4719
4720/* Queued (deferred) command completions converge here. */
4721static void sdebug_q_cmd_complete(struct sdebug_defer *sd_dp)
4722{
4723	bool aborted = sd_dp->aborted;
4724	int qc_idx;
4725	int retiring = 0;
4726	unsigned long iflags;
4727	struct sdebug_queue *sqp;
4728	struct sdebug_queued_cmd *sqcp;
4729	struct scsi_cmnd *scp;
4730	struct sdebug_dev_info *devip;
4731
4732	sd_dp->defer_t = SDEB_DEFER_NONE;
4733	if (unlikely(aborted))
4734		sd_dp->aborted = false;
4735	qc_idx = sd_dp->qc_idx;
4736	sqp = sdebug_q_arr + sd_dp->sqa_idx;
4737	if (sdebug_statistics) {
4738		atomic_inc(&sdebug_completions);
4739		if (raw_smp_processor_id() != sd_dp->issuing_cpu)
4740			atomic_inc(&sdebug_miss_cpus);
4741	}
4742	if (unlikely((qc_idx < 0) || (qc_idx >= SDEBUG_CANQUEUE))) {
4743		pr_err("wild qc_idx=%d\n", qc_idx);
4744		return;
4745	}
4746	spin_lock_irqsave(&sqp->qc_lock, iflags);
 
4747	sqcp = &sqp->qc_arr[qc_idx];
4748	scp = sqcp->a_cmnd;
4749	if (unlikely(scp == NULL)) {
4750		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4751		pr_err("scp is NULL, sqa_idx=%d, qc_idx=%d, hc_idx=%d\n",
4752		       sd_dp->sqa_idx, qc_idx, sd_dp->hc_idx);
4753		return;
4754	}
4755	devip = (struct sdebug_dev_info *)scp->device->hostdata;
4756	if (likely(devip))
4757		atomic_dec(&devip->num_in_q);
4758	else
4759		pr_err("devip=NULL\n");
4760	if (unlikely(atomic_read(&retired_max_queue) > 0))
4761		retiring = 1;
4762
4763	sqcp->a_cmnd = NULL;
4764	if (unlikely(!test_and_clear_bit(qc_idx, sqp->in_use_bm))) {
4765		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4766		pr_err("Unexpected completion\n");
4767		return;
4768	}
4769
4770	if (unlikely(retiring)) {	/* user has reduced max_queue */
4771		int k, retval;
4772
4773		retval = atomic_read(&retired_max_queue);
4774		if (qc_idx >= retval) {
4775			spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4776			pr_err("index %d too large\n", retval);
4777			return;
4778		}
4779		k = find_last_bit(sqp->in_use_bm, retval);
4780		if ((k < sdebug_max_queue) || (k == retval))
4781			atomic_set(&retired_max_queue, 0);
4782		else
4783			atomic_set(&retired_max_queue, k + 1);
4784	}
4785	spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4786	if (unlikely(aborted)) {
4787		if (sdebug_verbose)
4788			pr_info("bypassing scsi_done() due to aborted cmd\n");
4789		return;
4790	}
4791	scp->scsi_done(scp); /* callback to mid level */
4792}
4793
4794/* When high resolution timer goes off this function is called. */
4795static enum hrtimer_restart sdebug_q_cmd_hrt_complete(struct hrtimer *timer)
4796{
4797	struct sdebug_defer *sd_dp = container_of(timer, struct sdebug_defer,
4798						  hrt);
4799	sdebug_q_cmd_complete(sd_dp);
4800	return HRTIMER_NORESTART;
4801}
4802
4803/* When work queue schedules work, it calls this function. */
4804static void sdebug_q_cmd_wq_complete(struct work_struct *work)
4805{
4806	struct sdebug_defer *sd_dp = container_of(work, struct sdebug_defer,
4807						  ew.work);
4808	sdebug_q_cmd_complete(sd_dp);
4809}
4810
4811static bool got_shared_uuid;
4812static uuid_t shared_uuid;
4813
4814static int sdebug_device_create_zones(struct sdebug_dev_info *devip)
4815{
4816	struct sdeb_zone_state *zsp;
4817	sector_t capacity = get_sdebug_capacity();
4818	sector_t zstart = 0;
4819	unsigned int i;
4820
4821	/*
4822	 * Set the zone size: if sdeb_zbc_zone_size_mb is not set, figure out
4823	 * a zone size allowing for at least 4 zones on the device. Otherwise,
4824	 * use the specified zone size checking that at least 2 zones can be
4825	 * created for the device.
4826	 */
4827	if (!sdeb_zbc_zone_size_mb) {
4828		devip->zsize = (DEF_ZBC_ZONE_SIZE_MB * SZ_1M)
4829			>> ilog2(sdebug_sector_size);
4830		while (capacity < devip->zsize << 2 && devip->zsize >= 2)
4831			devip->zsize >>= 1;
4832		if (devip->zsize < 2) {
4833			pr_err("Device capacity too small\n");
4834			return -EINVAL;
4835		}
4836	} else {
4837		if (!is_power_of_2(sdeb_zbc_zone_size_mb)) {
4838			pr_err("Zone size is not a power of 2\n");
4839			return -EINVAL;
4840		}
4841		devip->zsize = (sdeb_zbc_zone_size_mb * SZ_1M)
4842			>> ilog2(sdebug_sector_size);
4843		if (devip->zsize >= capacity) {
4844			pr_err("Zone size too large for device capacity\n");
4845			return -EINVAL;
4846		}
4847	}
4848
4849	devip->zsize_shift = ilog2(devip->zsize);
4850	devip->nr_zones = (capacity + devip->zsize - 1) >> devip->zsize_shift;
4851
4852	if (sdeb_zbc_nr_conv >= devip->nr_zones) {
4853		pr_err("Number of conventional zones too large\n");
4854		return -EINVAL;
4855	}
4856	devip->nr_conv_zones = sdeb_zbc_nr_conv;
4857
4858	if (devip->zmodel == BLK_ZONED_HM) {
4859		/* zbc_max_open_zones can be 0, meaning "not reported" */
4860		if (sdeb_zbc_max_open >= devip->nr_zones - 1)
4861			devip->max_open = (devip->nr_zones - 1) / 2;
4862		else
4863			devip->max_open = sdeb_zbc_max_open;
4864	}
4865
4866	devip->zstate = kcalloc(devip->nr_zones,
4867				sizeof(struct sdeb_zone_state), GFP_KERNEL);
4868	if (!devip->zstate)
4869		return -ENOMEM;
4870
4871	for (i = 0; i < devip->nr_zones; i++) {
4872		zsp = &devip->zstate[i];
4873
4874		zsp->z_start = zstart;
4875
4876		if (i < devip->nr_conv_zones) {
4877			zsp->z_type = ZBC_ZONE_TYPE_CNV;
4878			zsp->z_cond = ZBC_NOT_WRITE_POINTER;
4879			zsp->z_wp = (sector_t)-1;
4880		} else {
4881			if (devip->zmodel == BLK_ZONED_HM)
4882				zsp->z_type = ZBC_ZONE_TYPE_SWR;
4883			else
4884				zsp->z_type = ZBC_ZONE_TYPE_SWP;
4885			zsp->z_cond = ZC1_EMPTY;
4886			zsp->z_wp = zsp->z_start;
4887		}
4888
4889		if (zsp->z_start + devip->zsize < capacity)
4890			zsp->z_size = devip->zsize;
4891		else
4892			zsp->z_size = capacity - zsp->z_start;
4893
4894		zstart += zsp->z_size;
4895	}
4896
4897	return 0;
4898}
4899
4900static struct sdebug_dev_info *sdebug_device_create(
4901			struct sdebug_host_info *sdbg_host, gfp_t flags)
4902{
4903	struct sdebug_dev_info *devip;
4904
4905	devip = kzalloc(sizeof(*devip), flags);
4906	if (devip) {
4907		if (sdebug_uuid_ctl == 1)
4908			uuid_gen(&devip->lu_name);
4909		else if (sdebug_uuid_ctl == 2) {
4910			if (got_shared_uuid)
4911				devip->lu_name = shared_uuid;
4912			else {
4913				uuid_gen(&shared_uuid);
4914				got_shared_uuid = true;
4915				devip->lu_name = shared_uuid;
4916			}
4917		}
4918		devip->sdbg_host = sdbg_host;
4919		if (sdeb_zbc_in_use) {
4920			devip->zmodel = sdeb_zbc_model;
4921			if (sdebug_device_create_zones(devip)) {
4922				kfree(devip);
4923				return NULL;
4924			}
4925		} else {
4926			devip->zmodel = BLK_ZONED_NONE;
4927		}
4928		devip->sdbg_host = sdbg_host;
4929		devip->create_ts = ktime_get_boottime();
4930		atomic_set(&devip->stopped, (sdeb_tur_ms_to_ready > 0 ? 2 : 0));
4931		list_add_tail(&devip->dev_list, &sdbg_host->dev_info_list);
4932	}
4933	return devip;
4934}
4935
4936static struct sdebug_dev_info *find_build_dev_info(struct scsi_device *sdev)
4937{
4938	struct sdebug_host_info *sdbg_host;
4939	struct sdebug_dev_info *open_devip = NULL;
4940	struct sdebug_dev_info *devip;
4941
4942	sdbg_host = *(struct sdebug_host_info **)shost_priv(sdev->host);
4943	if (!sdbg_host) {
4944		pr_err("Host info NULL\n");
4945		return NULL;
4946	}
 
4947	list_for_each_entry(devip, &sdbg_host->dev_info_list, dev_list) {
4948		if ((devip->used) && (devip->channel == sdev->channel) &&
4949		    (devip->target == sdev->id) &&
4950		    (devip->lun == sdev->lun))
4951			return devip;
4952		else {
4953			if ((!devip->used) && (!open_devip))
4954				open_devip = devip;
4955		}
4956	}
4957	if (!open_devip) { /* try and make a new one */
4958		open_devip = sdebug_device_create(sdbg_host, GFP_ATOMIC);
4959		if (!open_devip) {
4960			pr_err("out of memory at line %d\n", __LINE__);
4961			return NULL;
4962		}
4963	}
4964
4965	open_devip->channel = sdev->channel;
4966	open_devip->target = sdev->id;
4967	open_devip->lun = sdev->lun;
4968	open_devip->sdbg_host = sdbg_host;
4969	atomic_set(&open_devip->num_in_q, 0);
4970	set_bit(SDEBUG_UA_POR, open_devip->uas_bm);
4971	open_devip->used = true;
4972	return open_devip;
4973}
4974
4975static int scsi_debug_slave_alloc(struct scsi_device *sdp)
4976{
4977	if (sdebug_verbose)
4978		pr_info("slave_alloc <%u %u %u %llu>\n",
4979		       sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
4980	return 0;
4981}
4982
4983static int scsi_debug_slave_configure(struct scsi_device *sdp)
4984{
4985	struct sdebug_dev_info *devip =
4986			(struct sdebug_dev_info *)sdp->hostdata;
4987
4988	if (sdebug_verbose)
4989		pr_info("slave_configure <%u %u %u %llu>\n",
4990		       sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
4991	if (sdp->host->max_cmd_len != SDEBUG_MAX_CMD_LEN)
4992		sdp->host->max_cmd_len = SDEBUG_MAX_CMD_LEN;
4993	if (devip == NULL) {
4994		devip = find_build_dev_info(sdp);
4995		if (devip == NULL)
4996			return 1;  /* no resources, will be marked offline */
4997	}
4998	sdp->hostdata = devip;
4999	if (sdebug_no_uld)
5000		sdp->no_uld_attach = 1;
5001	config_cdb_len(sdp);
5002	return 0;
5003}
5004
5005static void scsi_debug_slave_destroy(struct scsi_device *sdp)
5006{
5007	struct sdebug_dev_info *devip =
5008		(struct sdebug_dev_info *)sdp->hostdata;
5009
5010	if (sdebug_verbose)
5011		pr_info("slave_destroy <%u %u %u %llu>\n",
5012		       sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
5013	if (devip) {
5014		/* make this slot available for re-use */
5015		devip->used = false;
5016		sdp->hostdata = NULL;
5017	}
5018}
5019
5020static void stop_qc_helper(struct sdebug_defer *sd_dp,
5021			   enum sdeb_defer_type defer_t)
5022{
5023	if (!sd_dp)
5024		return;
5025	if (defer_t == SDEB_DEFER_HRT)
5026		hrtimer_cancel(&sd_dp->hrt);
5027	else if (defer_t == SDEB_DEFER_WQ)
5028		cancel_work_sync(&sd_dp->ew.work);
5029}
5030
5031/* If @cmnd found deletes its timer or work queue and returns true; else
5032   returns false */
5033static bool stop_queued_cmnd(struct scsi_cmnd *cmnd)
5034{
5035	unsigned long iflags;
5036	int j, k, qmax, r_qmax;
5037	enum sdeb_defer_type l_defer_t;
5038	struct sdebug_queue *sqp;
5039	struct sdebug_queued_cmd *sqcp;
5040	struct sdebug_dev_info *devip;
5041	struct sdebug_defer *sd_dp;
5042
5043	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
5044		spin_lock_irqsave(&sqp->qc_lock, iflags);
5045		qmax = sdebug_max_queue;
5046		r_qmax = atomic_read(&retired_max_queue);
5047		if (r_qmax > qmax)
5048			qmax = r_qmax;
5049		for (k = 0; k < qmax; ++k) {
5050			if (test_bit(k, sqp->in_use_bm)) {
5051				sqcp = &sqp->qc_arr[k];
5052				if (cmnd != sqcp->a_cmnd)
5053					continue;
5054				/* found */
5055				devip = (struct sdebug_dev_info *)
5056						cmnd->device->hostdata;
5057				if (devip)
5058					atomic_dec(&devip->num_in_q);
5059				sqcp->a_cmnd = NULL;
5060				sd_dp = sqcp->sd_dp;
5061				if (sd_dp) {
5062					l_defer_t = sd_dp->defer_t;
5063					sd_dp->defer_t = SDEB_DEFER_NONE;
5064				} else
5065					l_defer_t = SDEB_DEFER_NONE;
5066				spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5067				stop_qc_helper(sd_dp, l_defer_t);
5068				clear_bit(k, sqp->in_use_bm);
5069				return true;
5070			}
5071		}
5072		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5073	}
5074	return false;
5075}
5076
5077/* Deletes (stops) timers or work queues of all queued commands */
5078static void stop_all_queued(void)
5079{
5080	unsigned long iflags;
5081	int j, k;
5082	enum sdeb_defer_type l_defer_t;
5083	struct sdebug_queue *sqp;
5084	struct sdebug_queued_cmd *sqcp;
5085	struct sdebug_dev_info *devip;
5086	struct sdebug_defer *sd_dp;
5087
5088	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
5089		spin_lock_irqsave(&sqp->qc_lock, iflags);
5090		for (k = 0; k < SDEBUG_CANQUEUE; ++k) {
5091			if (test_bit(k, sqp->in_use_bm)) {
5092				sqcp = &sqp->qc_arr[k];
5093				if (sqcp->a_cmnd == NULL)
5094					continue;
5095				devip = (struct sdebug_dev_info *)
5096					sqcp->a_cmnd->device->hostdata;
5097				if (devip)
5098					atomic_dec(&devip->num_in_q);
5099				sqcp->a_cmnd = NULL;
5100				sd_dp = sqcp->sd_dp;
5101				if (sd_dp) {
5102					l_defer_t = sd_dp->defer_t;
5103					sd_dp->defer_t = SDEB_DEFER_NONE;
5104				} else
5105					l_defer_t = SDEB_DEFER_NONE;
5106				spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5107				stop_qc_helper(sd_dp, l_defer_t);
5108				clear_bit(k, sqp->in_use_bm);
5109				spin_lock_irqsave(&sqp->qc_lock, iflags);
5110			}
5111		}
5112		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5113	}
5114}
5115
5116/* Free queued command memory on heap */
5117static void free_all_queued(void)
5118{
5119	int j, k;
5120	struct sdebug_queue *sqp;
5121	struct sdebug_queued_cmd *sqcp;
5122
5123	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
5124		for (k = 0; k < SDEBUG_CANQUEUE; ++k) {
5125			sqcp = &sqp->qc_arr[k];
5126			kfree(sqcp->sd_dp);
5127			sqcp->sd_dp = NULL;
5128		}
5129	}
5130}
5131
5132static int scsi_debug_abort(struct scsi_cmnd *SCpnt)
5133{
5134	bool ok;
5135
5136	++num_aborts;
5137	if (SCpnt) {
5138		ok = stop_queued_cmnd(SCpnt);
5139		if (SCpnt->device && (SDEBUG_OPT_ALL_NOISE & sdebug_opts))
5140			sdev_printk(KERN_INFO, SCpnt->device,
5141				    "%s: command%s found\n", __func__,
5142				    ok ? "" : " not");
5143	}
5144	return SUCCESS;
5145}
5146
5147static int scsi_debug_device_reset(struct scsi_cmnd *SCpnt)
5148{
5149	++num_dev_resets;
5150	if (SCpnt && SCpnt->device) {
5151		struct scsi_device *sdp = SCpnt->device;
5152		struct sdebug_dev_info *devip =
5153				(struct sdebug_dev_info *)sdp->hostdata;
5154
5155		if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5156			sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
5157		if (devip)
5158			set_bit(SDEBUG_UA_POR, devip->uas_bm);
5159	}
5160	return SUCCESS;
5161}
5162
5163static int scsi_debug_target_reset(struct scsi_cmnd *SCpnt)
5164{
5165	struct sdebug_host_info *sdbg_host;
5166	struct sdebug_dev_info *devip;
5167	struct scsi_device *sdp;
5168	struct Scsi_Host *hp;
5169	int k = 0;
5170
5171	++num_target_resets;
5172	if (!SCpnt)
5173		goto lie;
5174	sdp = SCpnt->device;
5175	if (!sdp)
5176		goto lie;
5177	if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5178		sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
5179	hp = sdp->host;
5180	if (!hp)
5181		goto lie;
5182	sdbg_host = *(struct sdebug_host_info **)shost_priv(hp);
5183	if (sdbg_host) {
5184		list_for_each_entry(devip,
5185				    &sdbg_host->dev_info_list,
5186				    dev_list)
5187			if (devip->target == sdp->id) {
5188				set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
5189				++k;
5190			}
5191	}
5192	if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
5193		sdev_printk(KERN_INFO, sdp,
5194			    "%s: %d device(s) found in target\n", __func__, k);
5195lie:
5196	return SUCCESS;
5197}
5198
5199static int scsi_debug_bus_reset(struct scsi_cmnd *SCpnt)
5200{
5201	struct sdebug_host_info *sdbg_host;
5202	struct sdebug_dev_info *devip;
5203	struct scsi_device *sdp;
5204	struct Scsi_Host *hp;
5205	int k = 0;
5206
5207	++num_bus_resets;
5208	if (!(SCpnt && SCpnt->device))
5209		goto lie;
5210	sdp = SCpnt->device;
5211	if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5212		sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
5213	hp = sdp->host;
5214	if (hp) {
5215		sdbg_host = *(struct sdebug_host_info **)shost_priv(hp);
5216		if (sdbg_host) {
5217			list_for_each_entry(devip,
5218					    &sdbg_host->dev_info_list,
5219					    dev_list) {
5220				set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
5221				++k;
5222			}
5223		}
5224	}
5225	if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
5226		sdev_printk(KERN_INFO, sdp,
5227			    "%s: %d device(s) found in host\n", __func__, k);
5228lie:
5229	return SUCCESS;
5230}
5231
5232static int scsi_debug_host_reset(struct scsi_cmnd *SCpnt)
5233{
5234	struct sdebug_host_info *sdbg_host;
5235	struct sdebug_dev_info *devip;
5236	int k = 0;
5237
5238	++num_host_resets;
5239	if ((SCpnt->device) && (SDEBUG_OPT_ALL_NOISE & sdebug_opts))
5240		sdev_printk(KERN_INFO, SCpnt->device, "%s\n", __func__);
5241	spin_lock(&sdebug_host_list_lock);
5242	list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
5243		list_for_each_entry(devip, &sdbg_host->dev_info_list,
5244				    dev_list) {
5245			set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
5246			++k;
5247		}
5248	}
5249	spin_unlock(&sdebug_host_list_lock);
5250	stop_all_queued();
5251	if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
5252		sdev_printk(KERN_INFO, SCpnt->device,
5253			    "%s: %d device(s) found\n", __func__, k);
5254	return SUCCESS;
5255}
5256
5257static void sdebug_build_parts(unsigned char *ramp, unsigned long store_size)
5258{
5259	struct msdos_partition *pp;
5260	int starts[SDEBUG_MAX_PARTS + 2];
5261	int sectors_per_part, num_sectors, k;
5262	int heads_by_sects, start_sec, end_sec;
5263
5264	/* assume partition table already zeroed */
5265	if ((sdebug_num_parts < 1) || (store_size < 1048576))
5266		return;
5267	if (sdebug_num_parts > SDEBUG_MAX_PARTS) {
5268		sdebug_num_parts = SDEBUG_MAX_PARTS;
5269		pr_warn("reducing partitions to %d\n", SDEBUG_MAX_PARTS);
5270	}
5271	num_sectors = (int)sdebug_store_sectors;
5272	sectors_per_part = (num_sectors - sdebug_sectors_per)
5273			   / sdebug_num_parts;
5274	heads_by_sects = sdebug_heads * sdebug_sectors_per;
5275	starts[0] = sdebug_sectors_per;
5276	for (k = 1; k < sdebug_num_parts; ++k)
 
5277		starts[k] = ((k * sectors_per_part) / heads_by_sects)
5278			    * heads_by_sects;
 
 
 
5279	starts[sdebug_num_parts] = num_sectors;
5280	starts[sdebug_num_parts + 1] = 0;
5281
5282	ramp[510] = 0x55;	/* magic partition markings */
5283	ramp[511] = 0xAA;
5284	pp = (struct msdos_partition *)(ramp + 0x1be);
5285	for (k = 0; starts[k + 1]; ++k, ++pp) {
5286		start_sec = starts[k];
5287		end_sec = starts[k + 1] - 1;
5288		pp->boot_ind = 0;
5289
5290		pp->cyl = start_sec / heads_by_sects;
5291		pp->head = (start_sec - (pp->cyl * heads_by_sects))
5292			   / sdebug_sectors_per;
5293		pp->sector = (start_sec % sdebug_sectors_per) + 1;
5294
5295		pp->end_cyl = end_sec / heads_by_sects;
5296		pp->end_head = (end_sec - (pp->end_cyl * heads_by_sects))
5297			       / sdebug_sectors_per;
5298		pp->end_sector = (end_sec % sdebug_sectors_per) + 1;
5299
5300		pp->start_sect = cpu_to_le32(start_sec);
5301		pp->nr_sects = cpu_to_le32(end_sec - start_sec + 1);
5302		pp->sys_ind = 0x83;	/* plain Linux partition */
5303	}
5304}
5305
5306static void block_unblock_all_queues(bool block)
5307{
5308	int j;
5309	struct sdebug_queue *sqp;
5310
5311	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp)
5312		atomic_set(&sqp->blocked, (int)block);
5313}
5314
5315/* Adjust (by rounding down) the sdebug_cmnd_count so abs(every_nth)-1
5316 * commands will be processed normally before triggers occur.
5317 */
5318static void tweak_cmnd_count(void)
5319{
5320	int count, modulo;
5321
5322	modulo = abs(sdebug_every_nth);
5323	if (modulo < 2)
5324		return;
5325	block_unblock_all_queues(true);
5326	count = atomic_read(&sdebug_cmnd_count);
5327	atomic_set(&sdebug_cmnd_count, (count / modulo) * modulo);
5328	block_unblock_all_queues(false);
5329}
5330
5331static void clear_queue_stats(void)
5332{
5333	atomic_set(&sdebug_cmnd_count, 0);
5334	atomic_set(&sdebug_completions, 0);
5335	atomic_set(&sdebug_miss_cpus, 0);
5336	atomic_set(&sdebug_a_tsf, 0);
5337}
5338
5339static bool inject_on_this_cmd(void)
5340{
5341	if (sdebug_every_nth == 0)
5342		return false;
5343	return (atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth)) == 0;
5344}
5345
5346#define INCLUSIVE_TIMING_MAX_NS 1000000		/* 1 millisecond */
5347
5348/* Complete the processing of the thread that queued a SCSI command to this
5349 * driver. It either completes the command by calling cmnd_done() or
5350 * schedules a hr timer or work queue then returns 0. Returns
5351 * SCSI_MLQUEUE_HOST_BUSY if temporarily out of resources.
5352 */
5353static int schedule_resp(struct scsi_cmnd *cmnd, struct sdebug_dev_info *devip,
5354			 int scsi_result,
5355			 int (*pfp)(struct scsi_cmnd *,
5356				    struct sdebug_dev_info *),
5357			 int delta_jiff, int ndelay)
5358{
5359	bool new_sd_dp;
5360	bool inject = false;
 
5361	int k, num_in_q, qdepth;
5362	unsigned long iflags;
5363	u64 ns_from_boot = 0;
5364	struct sdebug_queue *sqp;
5365	struct sdebug_queued_cmd *sqcp;
5366	struct scsi_device *sdp;
5367	struct sdebug_defer *sd_dp;
5368
5369	if (unlikely(devip == NULL)) {
5370		if (scsi_result == 0)
5371			scsi_result = DID_NO_CONNECT << 16;
5372		goto respond_in_thread;
5373	}
5374	sdp = cmnd->device;
5375
5376	if (delta_jiff == 0)
5377		goto respond_in_thread;
5378
5379	sqp = get_queue(cmnd);
5380	spin_lock_irqsave(&sqp->qc_lock, iflags);
5381	if (unlikely(atomic_read(&sqp->blocked))) {
5382		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5383		return SCSI_MLQUEUE_HOST_BUSY;
5384	}
5385	num_in_q = atomic_read(&devip->num_in_q);
5386	qdepth = cmnd->device->queue_depth;
5387	if (unlikely((qdepth > 0) && (num_in_q >= qdepth))) {
5388		if (scsi_result) {
5389			spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5390			goto respond_in_thread;
5391		} else
5392			scsi_result = device_qfull_result;
5393	} else if (unlikely(sdebug_every_nth &&
5394			    (SDEBUG_OPT_RARE_TSF & sdebug_opts) &&
5395			    (scsi_result == 0))) {
5396		if ((num_in_q == (qdepth - 1)) &&
5397		    (atomic_inc_return(&sdebug_a_tsf) >=
5398		     abs(sdebug_every_nth))) {
5399			atomic_set(&sdebug_a_tsf, 0);
5400			inject = true;
5401			scsi_result = device_qfull_result;
5402		}
5403	}
5404
5405	k = find_first_zero_bit(sqp->in_use_bm, sdebug_max_queue);
5406	if (unlikely(k >= sdebug_max_queue)) {
5407		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5408		if (scsi_result)
5409			goto respond_in_thread;
5410		else if (SDEBUG_OPT_ALL_TSF & sdebug_opts)
5411			scsi_result = device_qfull_result;
5412		if (SDEBUG_OPT_Q_NOISE & sdebug_opts)
5413			sdev_printk(KERN_INFO, sdp,
5414				    "%s: max_queue=%d exceeded, %s\n",
5415				    __func__, sdebug_max_queue,
5416				    (scsi_result ?  "status: TASK SET FULL" :
5417						    "report: host busy"));
5418		if (scsi_result)
5419			goto respond_in_thread;
5420		else
5421			return SCSI_MLQUEUE_HOST_BUSY;
5422	}
5423	set_bit(k, sqp->in_use_bm);
5424	atomic_inc(&devip->num_in_q);
5425	sqcp = &sqp->qc_arr[k];
5426	sqcp->a_cmnd = cmnd;
5427	cmnd->host_scribble = (unsigned char *)sqcp;
5428	sd_dp = sqcp->sd_dp;
5429	spin_unlock_irqrestore(&sqp->qc_lock, iflags);
 
5430	if (!sd_dp) {
5431		sd_dp = kzalloc(sizeof(*sd_dp), GFP_ATOMIC);
5432		if (!sd_dp) {
5433			atomic_dec(&devip->num_in_q);
5434			clear_bit(k, sqp->in_use_bm);
5435			return SCSI_MLQUEUE_HOST_BUSY;
5436		}
5437		new_sd_dp = true;
5438	} else {
5439		new_sd_dp = false;
5440	}
5441
5442	/* Set the hostwide tag */
5443	if (sdebug_host_max_queue)
5444		sd_dp->hc_idx = get_tag(cmnd);
5445
5446	if (ndelay > 0 && ndelay < INCLUSIVE_TIMING_MAX_NS)
5447		ns_from_boot = ktime_get_boottime_ns();
5448
5449	/* one of the resp_*() response functions is called here */
5450	cmnd->result = pfp ? pfp(cmnd, devip) : 0;
5451	if (cmnd->result & SDEG_RES_IMMED_MASK) {
5452		cmnd->result &= ~SDEG_RES_IMMED_MASK;
5453		delta_jiff = ndelay = 0;
5454	}
5455	if (cmnd->result == 0 && scsi_result != 0)
5456		cmnd->result = scsi_result;
5457	if (cmnd->result == 0 && unlikely(sdebug_opts & SDEBUG_OPT_TRANSPORT_ERR)) {
5458		if (atomic_read(&sdeb_inject_pending)) {
5459			mk_sense_buffer(cmnd, ABORTED_COMMAND, TRANSPORT_PROBLEM, ACK_NAK_TO);
5460			atomic_set(&sdeb_inject_pending, 0);
5461			cmnd->result = check_condition_result;
5462		}
5463	}
5464
5465	if (unlikely(sdebug_verbose && cmnd->result))
5466		sdev_printk(KERN_INFO, sdp, "%s: non-zero result=0x%x\n",
5467			    __func__, cmnd->result);
5468
5469	if (delta_jiff > 0 || ndelay > 0) {
5470		ktime_t kt;
5471
5472		if (delta_jiff > 0) {
5473			u64 ns = jiffies_to_nsecs(delta_jiff);
5474
5475			if (sdebug_random && ns < U32_MAX) {
5476				ns = prandom_u32_max((u32)ns);
5477			} else if (sdebug_random) {
5478				ns >>= 12;	/* scale to 4 usec precision */
5479				if (ns < U32_MAX)	/* over 4 hours max */
5480					ns = prandom_u32_max((u32)ns);
5481				ns <<= 12;
5482			}
5483			kt = ns_to_ktime(ns);
5484		} else {	/* ndelay has a 4.2 second max */
5485			kt = sdebug_random ? prandom_u32_max((u32)ndelay) :
5486					     (u32)ndelay;
5487			if (ndelay < INCLUSIVE_TIMING_MAX_NS) {
5488				u64 d = ktime_get_boottime_ns() - ns_from_boot;
5489
5490				if (kt <= d) {	/* elapsed duration >= kt */
5491					spin_lock_irqsave(&sqp->qc_lock, iflags);
5492					sqcp->a_cmnd = NULL;
5493					atomic_dec(&devip->num_in_q);
5494					clear_bit(k, sqp->in_use_bm);
5495					spin_unlock_irqrestore(&sqp->qc_lock, iflags);
5496					if (new_sd_dp)
5497						kfree(sd_dp);
5498					/* call scsi_done() from this thread */
5499					cmnd->scsi_done(cmnd);
5500					return 0;
5501				}
5502				/* otherwise reduce kt by elapsed time */
5503				kt -= d;
5504			}
5505		}
5506		if (!sd_dp->init_hrt) {
5507			sd_dp->init_hrt = true;
5508			sqcp->sd_dp = sd_dp;
5509			hrtimer_init(&sd_dp->hrt, CLOCK_MONOTONIC,
5510				     HRTIMER_MODE_REL_PINNED);
5511			sd_dp->hrt.function = sdebug_q_cmd_hrt_complete;
5512			sd_dp->sqa_idx = sqp - sdebug_q_arr;
5513			sd_dp->qc_idx = k;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
5514		}
5515		if (sdebug_statistics)
5516			sd_dp->issuing_cpu = raw_smp_processor_id();
5517		sd_dp->defer_t = SDEB_DEFER_HRT;
5518		/* schedule the invocation of scsi_done() for a later time */
5519		hrtimer_start(&sd_dp->hrt, kt, HRTIMER_MODE_REL_PINNED);
5520	} else {	/* jdelay < 0, use work queue */
5521		if (!sd_dp->init_wq) {
5522			sd_dp->init_wq = true;
5523			sqcp->sd_dp = sd_dp;
5524			sd_dp->sqa_idx = sqp - sdebug_q_arr;
5525			sd_dp->qc_idx = k;
5526			INIT_WORK(&sd_dp->ew.work, sdebug_q_cmd_wq_complete);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
5527		}
5528		if (sdebug_statistics)
5529			sd_dp->issuing_cpu = raw_smp_processor_id();
5530		sd_dp->defer_t = SDEB_DEFER_WQ;
5531		if (unlikely((sdebug_opts & SDEBUG_OPT_CMD_ABORT) &&
5532			     atomic_read(&sdeb_inject_pending)))
5533			sd_dp->aborted = true;
5534		schedule_work(&sd_dp->ew.work);
5535		if (unlikely((sdebug_opts & SDEBUG_OPT_CMD_ABORT) &&
5536			     atomic_read(&sdeb_inject_pending))) {
5537			sdev_printk(KERN_INFO, sdp, "abort request tag %d\n", cmnd->request->tag);
5538			blk_abort_request(cmnd->request);
5539			atomic_set(&sdeb_inject_pending, 0);
 
5540		}
5541	}
5542	if (unlikely((SDEBUG_OPT_Q_NOISE & sdebug_opts) && scsi_result == device_qfull_result))
5543		sdev_printk(KERN_INFO, sdp, "%s: num_in_q=%d +1, %s%s\n", __func__,
5544			    num_in_q, (inject ? "<inject> " : ""), "status: TASK SET FULL");
5545	return 0;
5546
5547respond_in_thread:	/* call back to mid-layer using invocation thread */
5548	cmnd->result = pfp != NULL ? pfp(cmnd, devip) : 0;
5549	cmnd->result &= ~SDEG_RES_IMMED_MASK;
5550	if (cmnd->result == 0 && scsi_result != 0)
5551		cmnd->result = scsi_result;
5552	cmnd->scsi_done(cmnd);
5553	return 0;
5554}
5555
5556/* Note: The following macros create attribute files in the
5557   /sys/module/scsi_debug/parameters directory. Unfortunately this
5558   driver is unaware of a change and cannot trigger auxiliary actions
5559   as it can when the corresponding attribute in the
5560   /sys/bus/pseudo/drivers/scsi_debug directory is changed.
5561 */
5562module_param_named(add_host, sdebug_add_host, int, S_IRUGO | S_IWUSR);
5563module_param_named(ato, sdebug_ato, int, S_IRUGO);
5564module_param_named(cdb_len, sdebug_cdb_len, int, 0644);
5565module_param_named(clustering, sdebug_clustering, bool, S_IRUGO | S_IWUSR);
5566module_param_named(delay, sdebug_jdelay, int, S_IRUGO | S_IWUSR);
5567module_param_named(dev_size_mb, sdebug_dev_size_mb, int, S_IRUGO);
5568module_param_named(dif, sdebug_dif, int, S_IRUGO);
5569module_param_named(dix, sdebug_dix, int, S_IRUGO);
5570module_param_named(dsense, sdebug_dsense, int, S_IRUGO | S_IWUSR);
5571module_param_named(every_nth, sdebug_every_nth, int, S_IRUGO | S_IWUSR);
5572module_param_named(fake_rw, sdebug_fake_rw, int, S_IRUGO | S_IWUSR);
5573module_param_named(guard, sdebug_guard, uint, S_IRUGO);
5574module_param_named(host_lock, sdebug_host_lock, bool, S_IRUGO | S_IWUSR);
5575module_param_named(host_max_queue, sdebug_host_max_queue, int, S_IRUGO);
5576module_param_string(inq_product, sdebug_inq_product_id,
5577		    sizeof(sdebug_inq_product_id), S_IRUGO | S_IWUSR);
5578module_param_string(inq_rev, sdebug_inq_product_rev,
5579		    sizeof(sdebug_inq_product_rev), S_IRUGO | S_IWUSR);
5580module_param_string(inq_vendor, sdebug_inq_vendor_id,
5581		    sizeof(sdebug_inq_vendor_id), S_IRUGO | S_IWUSR);
5582module_param_named(lbprz, sdebug_lbprz, int, S_IRUGO);
5583module_param_named(lbpu, sdebug_lbpu, int, S_IRUGO);
5584module_param_named(lbpws, sdebug_lbpws, int, S_IRUGO);
5585module_param_named(lbpws10, sdebug_lbpws10, int, S_IRUGO);
5586module_param_named(lowest_aligned, sdebug_lowest_aligned, int, S_IRUGO);
 
5587module_param_named(max_luns, sdebug_max_luns, int, S_IRUGO | S_IWUSR);
5588module_param_named(max_queue, sdebug_max_queue, int, S_IRUGO | S_IWUSR);
5589module_param_named(medium_error_count, sdebug_medium_error_count, int,
5590		   S_IRUGO | S_IWUSR);
5591module_param_named(medium_error_start, sdebug_medium_error_start, int,
5592		   S_IRUGO | S_IWUSR);
5593module_param_named(ndelay, sdebug_ndelay, int, S_IRUGO | S_IWUSR);
5594module_param_named(no_lun_0, sdebug_no_lun_0, int, S_IRUGO | S_IWUSR);
5595module_param_named(no_uld, sdebug_no_uld, int, S_IRUGO);
5596module_param_named(num_parts, sdebug_num_parts, int, S_IRUGO);
5597module_param_named(num_tgts, sdebug_num_tgts, int, S_IRUGO | S_IWUSR);
5598module_param_named(opt_blks, sdebug_opt_blks, int, S_IRUGO);
5599module_param_named(opt_xferlen_exp, sdebug_opt_xferlen_exp, int, S_IRUGO);
5600module_param_named(opts, sdebug_opts, int, S_IRUGO | S_IWUSR);
5601module_param_named(per_host_store, sdebug_per_host_store, bool,
5602		   S_IRUGO | S_IWUSR);
5603module_param_named(physblk_exp, sdebug_physblk_exp, int, S_IRUGO);
5604module_param_named(ptype, sdebug_ptype, int, S_IRUGO | S_IWUSR);
5605module_param_named(random, sdebug_random, bool, S_IRUGO | S_IWUSR);
5606module_param_named(removable, sdebug_removable, bool, S_IRUGO | S_IWUSR);
5607module_param_named(scsi_level, sdebug_scsi_level, int, S_IRUGO);
5608module_param_named(sector_size, sdebug_sector_size, int, S_IRUGO);
5609module_param_named(statistics, sdebug_statistics, bool, S_IRUGO | S_IWUSR);
5610module_param_named(strict, sdebug_strict, bool, S_IRUGO | S_IWUSR);
5611module_param_named(submit_queues, submit_queues, int, S_IRUGO);
 
5612module_param_named(tur_ms_to_ready, sdeb_tur_ms_to_ready, int, S_IRUGO);
5613module_param_named(unmap_alignment, sdebug_unmap_alignment, int, S_IRUGO);
5614module_param_named(unmap_granularity, sdebug_unmap_granularity, int, S_IRUGO);
5615module_param_named(unmap_max_blocks, sdebug_unmap_max_blocks, int, S_IRUGO);
5616module_param_named(unmap_max_desc, sdebug_unmap_max_desc, int, S_IRUGO);
5617module_param_named(uuid_ctl, sdebug_uuid_ctl, int, S_IRUGO);
5618module_param_named(virtual_gb, sdebug_virtual_gb, int, S_IRUGO | S_IWUSR);
5619module_param_named(vpd_use_hostno, sdebug_vpd_use_hostno, int,
5620		   S_IRUGO | S_IWUSR);
5621module_param_named(wp, sdebug_wp, bool, S_IRUGO | S_IWUSR);
5622module_param_named(write_same_length, sdebug_write_same_length, int,
5623		   S_IRUGO | S_IWUSR);
5624module_param_named(zbc, sdeb_zbc_model_s, charp, S_IRUGO);
5625module_param_named(zone_max_open, sdeb_zbc_max_open, int, S_IRUGO);
5626module_param_named(zone_nr_conv, sdeb_zbc_nr_conv, int, S_IRUGO);
5627module_param_named(zone_size_mb, sdeb_zbc_zone_size_mb, int, S_IRUGO);
5628
5629MODULE_AUTHOR("Eric Youngdale + Douglas Gilbert");
5630MODULE_DESCRIPTION("SCSI debug adapter driver");
5631MODULE_LICENSE("GPL");
5632MODULE_VERSION(SDEBUG_VERSION);
5633
5634MODULE_PARM_DESC(add_host, "add n hosts, in sysfs if negative remove host(s) (def=1)");
5635MODULE_PARM_DESC(ato, "application tag ownership: 0=disk 1=host (def=1)");
5636MODULE_PARM_DESC(cdb_len, "suggest CDB lengths to drivers (def=10)");
5637MODULE_PARM_DESC(clustering, "when set enables larger transfers (def=0)");
5638MODULE_PARM_DESC(delay, "response delay (def=1 jiffy); 0:imm, -1,-2:tiny");
5639MODULE_PARM_DESC(dev_size_mb, "size in MiB of ram shared by devs(def=8)");
5640MODULE_PARM_DESC(dif, "data integrity field type: 0-3 (def=0)");
5641MODULE_PARM_DESC(dix, "data integrity extensions mask (def=0)");
5642MODULE_PARM_DESC(dsense, "use descriptor sense format(def=0 -> fixed)");
5643MODULE_PARM_DESC(every_nth, "timeout every nth command(def=0)");
5644MODULE_PARM_DESC(fake_rw, "fake reads/writes instead of copying (def=0)");
5645MODULE_PARM_DESC(guard, "protection checksum: 0=crc, 1=ip (def=0)");
5646MODULE_PARM_DESC(host_lock, "host_lock is ignored (def=0)");
5647MODULE_PARM_DESC(host_max_queue,
5648		 "host max # of queued cmds (0 to max(def) [max_queue fixed equal for !0])");
5649MODULE_PARM_DESC(inq_product, "SCSI INQUIRY product string (def=\"scsi_debug\")");
5650MODULE_PARM_DESC(inq_rev, "SCSI INQUIRY revision string (def=\""
5651		 SDEBUG_VERSION "\")");
5652MODULE_PARM_DESC(inq_vendor, "SCSI INQUIRY vendor string (def=\"Linux\")");
5653MODULE_PARM_DESC(lbprz,
5654		 "on read unmapped LBs return 0 when 1 (def), return 0xff when 2");
5655MODULE_PARM_DESC(lbpu, "enable LBP, support UNMAP command (def=0)");
5656MODULE_PARM_DESC(lbpws, "enable LBP, support WRITE SAME(16) with UNMAP bit (def=0)");
5657MODULE_PARM_DESC(lbpws10, "enable LBP, support WRITE SAME(10) with UNMAP bit (def=0)");
5658MODULE_PARM_DESC(lowest_aligned, "lowest aligned lba (def=0)");
 
5659MODULE_PARM_DESC(max_luns, "number of LUNs per target to simulate(def=1)");
5660MODULE_PARM_DESC(max_queue, "max number of queued commands (1 to max(def))");
5661MODULE_PARM_DESC(medium_error_count, "count of sectors to return follow on MEDIUM error");
5662MODULE_PARM_DESC(medium_error_start, "starting sector number to return MEDIUM error");
5663MODULE_PARM_DESC(ndelay, "response delay in nanoseconds (def=0 -> ignore)");
5664MODULE_PARM_DESC(no_lun_0, "no LU number 0 (def=0 -> have lun 0)");
5665MODULE_PARM_DESC(no_uld, "stop ULD (e.g. sd driver) attaching (def=0))");
5666MODULE_PARM_DESC(num_parts, "number of partitions(def=0)");
5667MODULE_PARM_DESC(num_tgts, "number of targets per host to simulate(def=1)");
5668MODULE_PARM_DESC(opt_blks, "optimal transfer length in blocks (def=1024)");
5669MODULE_PARM_DESC(opt_xferlen_exp, "optimal transfer length granularity exponent (def=physblk_exp)");
5670MODULE_PARM_DESC(opts, "1->noise, 2->medium_err, 4->timeout, 8->recovered_err... (def=0)");
5671MODULE_PARM_DESC(per_host_store, "If set, next positive add_host will get new store (def=0)");
5672MODULE_PARM_DESC(physblk_exp, "physical block exponent (def=0)");
 
5673MODULE_PARM_DESC(ptype, "SCSI peripheral type(def=0[disk])");
5674MODULE_PARM_DESC(random, "If set, uniformly randomize command duration between 0 and delay_in_ns");
5675MODULE_PARM_DESC(removable, "claim to have removable media (def=0)");
5676MODULE_PARM_DESC(scsi_level, "SCSI level to simulate(def=7[SPC-5])");
5677MODULE_PARM_DESC(sector_size, "logical block size in bytes (def=512)");
5678MODULE_PARM_DESC(statistics, "collect statistics on commands, queues (def=0)");
5679MODULE_PARM_DESC(strict, "stricter checks: reserved field in cdb (def=0)");
5680MODULE_PARM_DESC(submit_queues, "support for block multi-queue (def=1)");
5681MODULE_PARM_DESC(tur_ms_to_ready, "TEST UNIT READY millisecs before initial good status (def=0)");
5682MODULE_PARM_DESC(unmap_alignment, "lowest aligned thin provisioning lba (def=0)");
5683MODULE_PARM_DESC(unmap_granularity, "thin provisioning granularity in blocks (def=1)");
5684MODULE_PARM_DESC(unmap_max_blocks, "max # of blocks can be unmapped in one cmd (def=0xffffffff)");
5685MODULE_PARM_DESC(unmap_max_desc, "max # of ranges that can be unmapped in one cmd (def=256)");
5686MODULE_PARM_DESC(uuid_ctl,
5687		 "1->use uuid for lu name, 0->don't, 2->all use same (def=0)");
5688MODULE_PARM_DESC(virtual_gb, "virtual gigabyte (GiB) size (def=0 -> use dev_size_mb)");
5689MODULE_PARM_DESC(vpd_use_hostno, "0 -> dev ids ignore hostno (def=1 -> unique dev ids)");
5690MODULE_PARM_DESC(wp, "Write Protect (def=0)");
5691MODULE_PARM_DESC(write_same_length, "Maximum blocks per WRITE SAME cmd (def=0xffff)");
5692MODULE_PARM_DESC(zbc, "'none' [0]; 'aware' [1]; 'managed' [2] (def=0). Can have 'host-' prefix");
5693MODULE_PARM_DESC(zone_max_open, "Maximum number of open zones; [0] for no limit (def=auto)");
5694MODULE_PARM_DESC(zone_nr_conv, "Number of conventional zones (def=1)");
5695MODULE_PARM_DESC(zone_size_mb, "Zone size in MiB (def=auto)");
5696
5697#define SDEBUG_INFO_LEN 256
5698static char sdebug_info[SDEBUG_INFO_LEN];
5699
5700static const char *scsi_debug_info(struct Scsi_Host *shp)
5701{
5702	int k;
5703
5704	k = scnprintf(sdebug_info, SDEBUG_INFO_LEN, "%s: version %s [%s]\n",
5705		      my_name, SDEBUG_VERSION, sdebug_version_date);
5706	if (k >= (SDEBUG_INFO_LEN - 1))
5707		return sdebug_info;
5708	scnprintf(sdebug_info + k, SDEBUG_INFO_LEN - k,
5709		  "  dev_size_mb=%d, opts=0x%x, submit_queues=%d, %s=%d",
5710		  sdebug_dev_size_mb, sdebug_opts, submit_queues,
5711		  "statistics", (int)sdebug_statistics);
5712	return sdebug_info;
5713}
5714
5715/* 'echo <val> > /proc/scsi/scsi_debug/<host_id>' writes to opts */
5716static int scsi_debug_write_info(struct Scsi_Host *host, char *buffer,
5717				 int length)
5718{
5719	char arr[16];
5720	int opts;
5721	int minLen = length > 15 ? 15 : length;
5722
5723	if (!capable(CAP_SYS_ADMIN) || !capable(CAP_SYS_RAWIO))
5724		return -EACCES;
5725	memcpy(arr, buffer, minLen);
5726	arr[minLen] = '\0';
5727	if (1 != sscanf(arr, "%d", &opts))
5728		return -EINVAL;
5729	sdebug_opts = opts;
5730	sdebug_verbose = !!(SDEBUG_OPT_NOISE & opts);
5731	sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & opts);
5732	if (sdebug_every_nth != 0)
5733		tweak_cmnd_count();
5734	return length;
5735}
5736
5737/* Output seen with 'cat /proc/scsi/scsi_debug/<host_id>'. It will be the
5738 * same for each scsi_debug host (if more than one). Some of the counters
5739 * output are not atomics so might be inaccurate in a busy system. */
5740static int scsi_debug_show_info(struct seq_file *m, struct Scsi_Host *host)
5741{
5742	int f, j, l;
5743	struct sdebug_queue *sqp;
5744	struct sdebug_host_info *sdhp;
5745
5746	seq_printf(m, "scsi_debug adapter driver, version %s [%s]\n",
5747		   SDEBUG_VERSION, sdebug_version_date);
5748	seq_printf(m, "num_tgts=%d, %ssize=%d MB, opts=0x%x, every_nth=%d\n",
5749		   sdebug_num_tgts, "shared (ram) ", sdebug_dev_size_mb,
5750		   sdebug_opts, sdebug_every_nth);
5751	seq_printf(m, "delay=%d, ndelay=%d, max_luns=%d, sector_size=%d %s\n",
5752		   sdebug_jdelay, sdebug_ndelay, sdebug_max_luns,
5753		   sdebug_sector_size, "bytes");
5754	seq_printf(m, "cylinders=%d, heads=%d, sectors=%d, command aborts=%d\n",
5755		   sdebug_cylinders_per, sdebug_heads, sdebug_sectors_per,
5756		   num_aborts);
5757	seq_printf(m, "RESETs: device=%d, target=%d, bus=%d, host=%d\n",
5758		   num_dev_resets, num_target_resets, num_bus_resets,
5759		   num_host_resets);
5760	seq_printf(m, "dix_reads=%d, dix_writes=%d, dif_errors=%d\n",
5761		   dix_reads, dix_writes, dif_errors);
5762	seq_printf(m, "usec_in_jiffy=%lu, statistics=%d\n", TICK_NSEC / 1000,
5763		   sdebug_statistics);
5764	seq_printf(m, "cmnd_count=%d, completions=%d, %s=%d, a_tsf=%d\n",
5765		   atomic_read(&sdebug_cmnd_count),
5766		   atomic_read(&sdebug_completions),
5767		   "miss_cpus", atomic_read(&sdebug_miss_cpus),
5768		   atomic_read(&sdebug_a_tsf));
 
5769
5770	seq_printf(m, "submit_queues=%d\n", submit_queues);
5771	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
5772		seq_printf(m, "  queue %d:\n", j);
5773		f = find_first_bit(sqp->in_use_bm, sdebug_max_queue);
5774		if (f != sdebug_max_queue) {
5775			l = find_last_bit(sqp->in_use_bm, sdebug_max_queue);
5776			seq_printf(m, "    in_use_bm BUSY: %s: %d,%d\n",
5777				   "first,last bits", f, l);
5778		}
5779	}
5780
5781	seq_printf(m, "this host_no=%d\n", host->host_no);
5782	if (!xa_empty(per_store_ap)) {
5783		bool niu;
5784		int idx;
5785		unsigned long l_idx;
5786		struct sdeb_store_info *sip;
5787
5788		seq_puts(m, "\nhost list:\n");
5789		j = 0;
5790		list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
5791			idx = sdhp->si_idx;
5792			seq_printf(m, "  %d: host_no=%d, si_idx=%d\n", j,
5793				   sdhp->shost->host_no, idx);
5794			++j;
5795		}
5796		seq_printf(m, "\nper_store array [most_recent_idx=%d]:\n",
5797			   sdeb_most_recent_idx);
5798		j = 0;
5799		xa_for_each(per_store_ap, l_idx, sip) {
5800			niu = xa_get_mark(per_store_ap, l_idx,
5801					  SDEB_XA_NOT_IN_USE);
5802			idx = (int)l_idx;
5803			seq_printf(m, "  %d: idx=%d%s\n", j, idx,
5804				   (niu ? "  not_in_use" : ""));
5805			++j;
5806		}
5807	}
5808	return 0;
5809}
5810
5811static ssize_t delay_show(struct device_driver *ddp, char *buf)
5812{
5813	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_jdelay);
5814}
5815/* Returns -EBUSY if jdelay is being changed and commands are queued. The unit
5816 * of delay is jiffies.
5817 */
5818static ssize_t delay_store(struct device_driver *ddp, const char *buf,
5819			   size_t count)
5820{
5821	int jdelay, res;
5822
5823	if (count > 0 && sscanf(buf, "%d", &jdelay) == 1) {
5824		res = count;
5825		if (sdebug_jdelay != jdelay) {
5826			int j, k;
5827			struct sdebug_queue *sqp;
5828
5829			block_unblock_all_queues(true);
5830			for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
5831			     ++j, ++sqp) {
5832				k = find_first_bit(sqp->in_use_bm,
5833						   sdebug_max_queue);
5834				if (k != sdebug_max_queue) {
5835					res = -EBUSY;   /* queued commands */
5836					break;
5837				}
5838			}
5839			if (res > 0) {
5840				sdebug_jdelay = jdelay;
5841				sdebug_ndelay = 0;
5842			}
5843			block_unblock_all_queues(false);
5844		}
5845		return res;
5846	}
5847	return -EINVAL;
5848}
5849static DRIVER_ATTR_RW(delay);
5850
5851static ssize_t ndelay_show(struct device_driver *ddp, char *buf)
5852{
5853	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ndelay);
5854}
5855/* Returns -EBUSY if ndelay is being changed and commands are queued */
5856/* If > 0 and accepted then sdebug_jdelay is set to JDELAY_OVERRIDDEN */
5857static ssize_t ndelay_store(struct device_driver *ddp, const char *buf,
5858			    size_t count)
5859{
5860	int ndelay, res;
5861
5862	if ((count > 0) && (1 == sscanf(buf, "%d", &ndelay)) &&
5863	    (ndelay >= 0) && (ndelay < (1000 * 1000 * 1000))) {
5864		res = count;
5865		if (sdebug_ndelay != ndelay) {
5866			int j, k;
5867			struct sdebug_queue *sqp;
5868
5869			block_unblock_all_queues(true);
5870			for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
5871			     ++j, ++sqp) {
5872				k = find_first_bit(sqp->in_use_bm,
5873						   sdebug_max_queue);
5874				if (k != sdebug_max_queue) {
5875					res = -EBUSY;   /* queued commands */
5876					break;
5877				}
5878			}
5879			if (res > 0) {
5880				sdebug_ndelay = ndelay;
5881				sdebug_jdelay = ndelay  ? JDELAY_OVERRIDDEN
5882							: DEF_JDELAY;
5883			}
5884			block_unblock_all_queues(false);
5885		}
5886		return res;
5887	}
5888	return -EINVAL;
5889}
5890static DRIVER_ATTR_RW(ndelay);
5891
5892static ssize_t opts_show(struct device_driver *ddp, char *buf)
5893{
5894	return scnprintf(buf, PAGE_SIZE, "0x%x\n", sdebug_opts);
5895}
5896
5897static ssize_t opts_store(struct device_driver *ddp, const char *buf,
5898			  size_t count)
5899{
5900	int opts;
5901	char work[20];
5902
5903	if (sscanf(buf, "%10s", work) == 1) {
5904		if (strncasecmp(work, "0x", 2) == 0) {
5905			if (kstrtoint(work + 2, 16, &opts) == 0)
5906				goto opts_done;
5907		} else {
5908			if (kstrtoint(work, 10, &opts) == 0)
5909				goto opts_done;
5910		}
5911	}
5912	return -EINVAL;
5913opts_done:
5914	sdebug_opts = opts;
5915	sdebug_verbose = !!(SDEBUG_OPT_NOISE & opts);
5916	sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & opts);
5917	tweak_cmnd_count();
5918	return count;
5919}
5920static DRIVER_ATTR_RW(opts);
5921
5922static ssize_t ptype_show(struct device_driver *ddp, char *buf)
5923{
5924	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ptype);
5925}
5926static ssize_t ptype_store(struct device_driver *ddp, const char *buf,
5927			   size_t count)
5928{
5929	int n;
5930
5931	/* Cannot change from or to TYPE_ZBC with sysfs */
5932	if (sdebug_ptype == TYPE_ZBC)
5933		return -EINVAL;
5934
5935	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5936		if (n == TYPE_ZBC)
5937			return -EINVAL;
5938		sdebug_ptype = n;
5939		return count;
5940	}
5941	return -EINVAL;
5942}
5943static DRIVER_ATTR_RW(ptype);
5944
5945static ssize_t dsense_show(struct device_driver *ddp, char *buf)
5946{
5947	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dsense);
5948}
5949static ssize_t dsense_store(struct device_driver *ddp, const char *buf,
5950			    size_t count)
5951{
5952	int n;
5953
5954	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5955		sdebug_dsense = n;
5956		return count;
5957	}
5958	return -EINVAL;
5959}
5960static DRIVER_ATTR_RW(dsense);
5961
5962static ssize_t fake_rw_show(struct device_driver *ddp, char *buf)
5963{
5964	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_fake_rw);
5965}
5966static ssize_t fake_rw_store(struct device_driver *ddp, const char *buf,
5967			     size_t count)
5968{
5969	int n, idx;
5970
5971	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5972		bool want_store = (n == 0);
5973		struct sdebug_host_info *sdhp;
5974
5975		n = (n > 0);
5976		sdebug_fake_rw = (sdebug_fake_rw > 0);
5977		if (sdebug_fake_rw == n)
5978			return count;	/* not transitioning so do nothing */
5979
5980		if (want_store) {	/* 1 --> 0 transition, set up store */
5981			if (sdeb_first_idx < 0) {
5982				idx = sdebug_add_store();
5983				if (idx < 0)
5984					return idx;
5985			} else {
5986				idx = sdeb_first_idx;
5987				xa_clear_mark(per_store_ap, idx,
5988					      SDEB_XA_NOT_IN_USE);
5989			}
5990			/* make all hosts use same store */
5991			list_for_each_entry(sdhp, &sdebug_host_list,
5992					    host_list) {
5993				if (sdhp->si_idx != idx) {
5994					xa_set_mark(per_store_ap, sdhp->si_idx,
5995						    SDEB_XA_NOT_IN_USE);
5996					sdhp->si_idx = idx;
5997				}
5998			}
5999			sdeb_most_recent_idx = idx;
6000		} else {	/* 0 --> 1 transition is trigger for shrink */
6001			sdebug_erase_all_stores(true /* apart from first */);
6002		}
6003		sdebug_fake_rw = n;
6004		return count;
6005	}
6006	return -EINVAL;
6007}
6008static DRIVER_ATTR_RW(fake_rw);
6009
6010static ssize_t no_lun_0_show(struct device_driver *ddp, char *buf)
6011{
6012	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_lun_0);
6013}
6014static ssize_t no_lun_0_store(struct device_driver *ddp, const char *buf,
6015			      size_t count)
6016{
6017	int n;
6018
6019	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6020		sdebug_no_lun_0 = n;
6021		return count;
6022	}
6023	return -EINVAL;
6024}
6025static DRIVER_ATTR_RW(no_lun_0);
6026
6027static ssize_t num_tgts_show(struct device_driver *ddp, char *buf)
6028{
6029	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_tgts);
6030}
6031static ssize_t num_tgts_store(struct device_driver *ddp, const char *buf,
6032			      size_t count)
6033{
6034	int n;
6035
6036	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6037		sdebug_num_tgts = n;
6038		sdebug_max_tgts_luns();
6039		return count;
6040	}
6041	return -EINVAL;
6042}
6043static DRIVER_ATTR_RW(num_tgts);
6044
6045static ssize_t dev_size_mb_show(struct device_driver *ddp, char *buf)
6046{
6047	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dev_size_mb);
6048}
6049static DRIVER_ATTR_RO(dev_size_mb);
6050
6051static ssize_t per_host_store_show(struct device_driver *ddp, char *buf)
6052{
6053	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_per_host_store);
6054}
6055
6056static ssize_t per_host_store_store(struct device_driver *ddp, const char *buf,
6057				    size_t count)
6058{
6059	bool v;
6060
6061	if (kstrtobool(buf, &v))
6062		return -EINVAL;
6063
6064	sdebug_per_host_store = v;
6065	return count;
6066}
6067static DRIVER_ATTR_RW(per_host_store);
6068
6069static ssize_t num_parts_show(struct device_driver *ddp, char *buf)
6070{
6071	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_parts);
6072}
6073static DRIVER_ATTR_RO(num_parts);
6074
6075static ssize_t every_nth_show(struct device_driver *ddp, char *buf)
6076{
6077	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_every_nth);
6078}
6079static ssize_t every_nth_store(struct device_driver *ddp, const char *buf,
6080			       size_t count)
6081{
6082	int nth;
6083	char work[20];
6084
6085	if (sscanf(buf, "%10s", work) == 1) {
6086		if (strncasecmp(work, "0x", 2) == 0) {
6087			if (kstrtoint(work + 2, 16, &nth) == 0)
6088				goto every_nth_done;
6089		} else {
6090			if (kstrtoint(work, 10, &nth) == 0)
6091				goto every_nth_done;
6092		}
6093	}
6094	return -EINVAL;
6095
6096every_nth_done:
6097	sdebug_every_nth = nth;
6098	if (nth && !sdebug_statistics) {
6099		pr_info("every_nth needs statistics=1, set it\n");
6100		sdebug_statistics = true;
6101	}
6102	tweak_cmnd_count();
6103	return count;
6104}
6105static DRIVER_ATTR_RW(every_nth);
6106
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
6107static ssize_t max_luns_show(struct device_driver *ddp, char *buf)
6108{
6109	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_max_luns);
6110}
6111static ssize_t max_luns_store(struct device_driver *ddp, const char *buf,
6112			      size_t count)
6113{
6114	int n;
6115	bool changed;
6116
6117	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6118		if (n > 256) {
6119			pr_warn("max_luns can be no more than 256\n");
6120			return -EINVAL;
6121		}
6122		changed = (sdebug_max_luns != n);
6123		sdebug_max_luns = n;
6124		sdebug_max_tgts_luns();
6125		if (changed && (sdebug_scsi_level >= 5)) {	/* >= SPC-3 */
6126			struct sdebug_host_info *sdhp;
6127			struct sdebug_dev_info *dp;
6128
6129			spin_lock(&sdebug_host_list_lock);
6130			list_for_each_entry(sdhp, &sdebug_host_list,
6131					    host_list) {
6132				list_for_each_entry(dp, &sdhp->dev_info_list,
6133						    dev_list) {
6134					set_bit(SDEBUG_UA_LUNS_CHANGED,
6135						dp->uas_bm);
6136				}
6137			}
6138			spin_unlock(&sdebug_host_list_lock);
6139		}
6140		return count;
6141	}
6142	return -EINVAL;
6143}
6144static DRIVER_ATTR_RW(max_luns);
6145
6146static ssize_t max_queue_show(struct device_driver *ddp, char *buf)
6147{
6148	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_max_queue);
6149}
6150/* N.B. max_queue can be changed while there are queued commands. In flight
6151 * commands beyond the new max_queue will be completed. */
6152static ssize_t max_queue_store(struct device_driver *ddp, const char *buf,
6153			       size_t count)
6154{
6155	int j, n, k, a;
6156	struct sdebug_queue *sqp;
6157
6158	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n > 0) &&
6159	    (n <= SDEBUG_CANQUEUE) &&
6160	    (sdebug_host_max_queue == 0)) {
6161		block_unblock_all_queues(true);
6162		k = 0;
6163		for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
6164		     ++j, ++sqp) {
6165			a = find_last_bit(sqp->in_use_bm, SDEBUG_CANQUEUE);
6166			if (a > k)
6167				k = a;
6168		}
6169		sdebug_max_queue = n;
6170		if (k == SDEBUG_CANQUEUE)
6171			atomic_set(&retired_max_queue, 0);
6172		else if (k >= n)
6173			atomic_set(&retired_max_queue, k + 1);
6174		else
6175			atomic_set(&retired_max_queue, 0);
6176		block_unblock_all_queues(false);
6177		return count;
6178	}
6179	return -EINVAL;
6180}
6181static DRIVER_ATTR_RW(max_queue);
6182
6183static ssize_t host_max_queue_show(struct device_driver *ddp, char *buf)
6184{
6185	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_host_max_queue);
6186}
6187
6188/*
6189 * Since this is used for .can_queue, and we get the hc_idx tag from the bitmap
6190 * in range [0, sdebug_host_max_queue), we can't change it.
6191 */
6192static DRIVER_ATTR_RO(host_max_queue);
6193
6194static ssize_t no_uld_show(struct device_driver *ddp, char *buf)
6195{
6196	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_uld);
6197}
6198static DRIVER_ATTR_RO(no_uld);
6199
6200static ssize_t scsi_level_show(struct device_driver *ddp, char *buf)
6201{
6202	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_scsi_level);
6203}
6204static DRIVER_ATTR_RO(scsi_level);
6205
6206static ssize_t virtual_gb_show(struct device_driver *ddp, char *buf)
6207{
6208	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_virtual_gb);
6209}
6210static ssize_t virtual_gb_store(struct device_driver *ddp, const char *buf,
6211				size_t count)
6212{
6213	int n;
6214	bool changed;
6215
6216	/* Ignore capacity change for ZBC drives for now */
6217	if (sdeb_zbc_in_use)
6218		return -ENOTSUPP;
6219
6220	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6221		changed = (sdebug_virtual_gb != n);
6222		sdebug_virtual_gb = n;
6223		sdebug_capacity = get_sdebug_capacity();
6224		if (changed) {
6225			struct sdebug_host_info *sdhp;
6226			struct sdebug_dev_info *dp;
6227
6228			spin_lock(&sdebug_host_list_lock);
6229			list_for_each_entry(sdhp, &sdebug_host_list,
6230					    host_list) {
6231				list_for_each_entry(dp, &sdhp->dev_info_list,
6232						    dev_list) {
6233					set_bit(SDEBUG_UA_CAPACITY_CHANGED,
6234						dp->uas_bm);
6235				}
6236			}
6237			spin_unlock(&sdebug_host_list_lock);
6238		}
6239		return count;
6240	}
6241	return -EINVAL;
6242}
6243static DRIVER_ATTR_RW(virtual_gb);
6244
6245static ssize_t add_host_show(struct device_driver *ddp, char *buf)
6246{
6247	/* absolute number of hosts currently active is what is shown */
6248	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_hosts);
6249}
6250
6251static ssize_t add_host_store(struct device_driver *ddp, const char *buf,
6252			      size_t count)
6253{
6254	bool found;
6255	unsigned long idx;
6256	struct sdeb_store_info *sip;
6257	bool want_phs = (sdebug_fake_rw == 0) && sdebug_per_host_store;
6258	int delta_hosts;
6259
6260	if (sscanf(buf, "%d", &delta_hosts) != 1)
6261		return -EINVAL;
6262	if (delta_hosts > 0) {
6263		do {
6264			found = false;
6265			if (want_phs) {
6266				xa_for_each_marked(per_store_ap, idx, sip,
6267						   SDEB_XA_NOT_IN_USE) {
6268					sdeb_most_recent_idx = (int)idx;
6269					found = true;
6270					break;
6271				}
6272				if (found)	/* re-use case */
6273					sdebug_add_host_helper((int)idx);
6274				else
6275					sdebug_do_add_host(true);
6276			} else {
6277				sdebug_do_add_host(false);
6278			}
6279		} while (--delta_hosts);
6280	} else if (delta_hosts < 0) {
6281		do {
6282			sdebug_do_remove_host(false);
6283		} while (++delta_hosts);
6284	}
6285	return count;
6286}
6287static DRIVER_ATTR_RW(add_host);
6288
6289static ssize_t vpd_use_hostno_show(struct device_driver *ddp, char *buf)
6290{
6291	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_vpd_use_hostno);
6292}
6293static ssize_t vpd_use_hostno_store(struct device_driver *ddp, const char *buf,
6294				    size_t count)
6295{
6296	int n;
6297
6298	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6299		sdebug_vpd_use_hostno = n;
6300		return count;
6301	}
6302	return -EINVAL;
6303}
6304static DRIVER_ATTR_RW(vpd_use_hostno);
6305
6306static ssize_t statistics_show(struct device_driver *ddp, char *buf)
6307{
6308	return scnprintf(buf, PAGE_SIZE, "%d\n", (int)sdebug_statistics);
6309}
6310static ssize_t statistics_store(struct device_driver *ddp, const char *buf,
6311				size_t count)
6312{
6313	int n;
6314
6315	if ((count > 0) && (sscanf(buf, "%d", &n) == 1) && (n >= 0)) {
6316		if (n > 0)
6317			sdebug_statistics = true;
6318		else {
6319			clear_queue_stats();
6320			sdebug_statistics = false;
6321		}
6322		return count;
6323	}
6324	return -EINVAL;
6325}
6326static DRIVER_ATTR_RW(statistics);
6327
6328static ssize_t sector_size_show(struct device_driver *ddp, char *buf)
6329{
6330	return scnprintf(buf, PAGE_SIZE, "%u\n", sdebug_sector_size);
6331}
6332static DRIVER_ATTR_RO(sector_size);
6333
6334static ssize_t submit_queues_show(struct device_driver *ddp, char *buf)
6335{
6336	return scnprintf(buf, PAGE_SIZE, "%d\n", submit_queues);
6337}
6338static DRIVER_ATTR_RO(submit_queues);
6339
6340static ssize_t dix_show(struct device_driver *ddp, char *buf)
6341{
6342	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dix);
6343}
6344static DRIVER_ATTR_RO(dix);
6345
6346static ssize_t dif_show(struct device_driver *ddp, char *buf)
6347{
6348	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dif);
6349}
6350static DRIVER_ATTR_RO(dif);
6351
6352static ssize_t guard_show(struct device_driver *ddp, char *buf)
6353{
6354	return scnprintf(buf, PAGE_SIZE, "%u\n", sdebug_guard);
6355}
6356static DRIVER_ATTR_RO(guard);
6357
6358static ssize_t ato_show(struct device_driver *ddp, char *buf)
6359{
6360	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ato);
6361}
6362static DRIVER_ATTR_RO(ato);
6363
6364static ssize_t map_show(struct device_driver *ddp, char *buf)
6365{
6366	ssize_t count = 0;
6367
6368	if (!scsi_debug_lbp())
6369		return scnprintf(buf, PAGE_SIZE, "0-%u\n",
6370				 sdebug_store_sectors);
6371
6372	if (sdebug_fake_rw == 0 && !xa_empty(per_store_ap)) {
6373		struct sdeb_store_info *sip = xa_load(per_store_ap, 0);
6374
6375		if (sip)
6376			count = scnprintf(buf, PAGE_SIZE - 1, "%*pbl",
6377					  (int)map_size, sip->map_storep);
6378	}
6379	buf[count++] = '\n';
6380	buf[count] = '\0';
6381
6382	return count;
6383}
6384static DRIVER_ATTR_RO(map);
6385
6386static ssize_t random_show(struct device_driver *ddp, char *buf)
6387{
6388	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_random);
6389}
6390
6391static ssize_t random_store(struct device_driver *ddp, const char *buf,
6392			    size_t count)
6393{
6394	bool v;
6395
6396	if (kstrtobool(buf, &v))
6397		return -EINVAL;
6398
6399	sdebug_random = v;
6400	return count;
6401}
6402static DRIVER_ATTR_RW(random);
6403
6404static ssize_t removable_show(struct device_driver *ddp, char *buf)
6405{
6406	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_removable ? 1 : 0);
6407}
6408static ssize_t removable_store(struct device_driver *ddp, const char *buf,
6409			       size_t count)
6410{
6411	int n;
6412
6413	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6414		sdebug_removable = (n > 0);
6415		return count;
6416	}
6417	return -EINVAL;
6418}
6419static DRIVER_ATTR_RW(removable);
6420
6421static ssize_t host_lock_show(struct device_driver *ddp, char *buf)
6422{
6423	return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_host_lock);
6424}
6425/* N.B. sdebug_host_lock does nothing, kept for backward compatibility */
6426static ssize_t host_lock_store(struct device_driver *ddp, const char *buf,
6427			       size_t count)
6428{
6429	int n;
6430
6431	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6432		sdebug_host_lock = (n > 0);
6433		return count;
6434	}
6435	return -EINVAL;
6436}
6437static DRIVER_ATTR_RW(host_lock);
6438
6439static ssize_t strict_show(struct device_driver *ddp, char *buf)
6440{
6441	return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_strict);
6442}
6443static ssize_t strict_store(struct device_driver *ddp, const char *buf,
6444			    size_t count)
6445{
6446	int n;
6447
6448	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6449		sdebug_strict = (n > 0);
6450		return count;
6451	}
6452	return -EINVAL;
6453}
6454static DRIVER_ATTR_RW(strict);
6455
6456static ssize_t uuid_ctl_show(struct device_driver *ddp, char *buf)
6457{
6458	return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_uuid_ctl);
6459}
6460static DRIVER_ATTR_RO(uuid_ctl);
6461
6462static ssize_t cdb_len_show(struct device_driver *ddp, char *buf)
6463{
6464	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_cdb_len);
6465}
6466static ssize_t cdb_len_store(struct device_driver *ddp, const char *buf,
6467			     size_t count)
6468{
6469	int ret, n;
6470
6471	ret = kstrtoint(buf, 0, &n);
6472	if (ret)
6473		return ret;
6474	sdebug_cdb_len = n;
6475	all_config_cdb_len();
6476	return count;
6477}
6478static DRIVER_ATTR_RW(cdb_len);
6479
6480static const char * const zbc_model_strs_a[] = {
6481	[BLK_ZONED_NONE] = "none",
6482	[BLK_ZONED_HA]   = "host-aware",
6483	[BLK_ZONED_HM]   = "host-managed",
6484};
6485
6486static const char * const zbc_model_strs_b[] = {
6487	[BLK_ZONED_NONE] = "no",
6488	[BLK_ZONED_HA]   = "aware",
6489	[BLK_ZONED_HM]   = "managed",
6490};
6491
6492static const char * const zbc_model_strs_c[] = {
6493	[BLK_ZONED_NONE] = "0",
6494	[BLK_ZONED_HA]   = "1",
6495	[BLK_ZONED_HM]   = "2",
6496};
6497
6498static int sdeb_zbc_model_str(const char *cp)
6499{
6500	int res = sysfs_match_string(zbc_model_strs_a, cp);
6501
6502	if (res < 0) {
6503		res = sysfs_match_string(zbc_model_strs_b, cp);
6504		if (res < 0) {
6505			res = sysfs_match_string(zbc_model_strs_c, cp);
6506			if (res < 0)
6507				return -EINVAL;
6508		}
6509	}
6510	return res;
6511}
6512
6513static ssize_t zbc_show(struct device_driver *ddp, char *buf)
6514{
6515	return scnprintf(buf, PAGE_SIZE, "%s\n",
6516			 zbc_model_strs_a[sdeb_zbc_model]);
6517}
6518static DRIVER_ATTR_RO(zbc);
6519
6520static ssize_t tur_ms_to_ready_show(struct device_driver *ddp, char *buf)
6521{
6522	return scnprintf(buf, PAGE_SIZE, "%d\n", sdeb_tur_ms_to_ready);
6523}
6524static DRIVER_ATTR_RO(tur_ms_to_ready);
6525
6526/* Note: The following array creates attribute files in the
6527   /sys/bus/pseudo/drivers/scsi_debug directory. The advantage of these
6528   files (over those found in the /sys/module/scsi_debug/parameters
6529   directory) is that auxiliary actions can be triggered when an attribute
6530   is changed. For example see: add_host_store() above.
6531 */
6532
6533static struct attribute *sdebug_drv_attrs[] = {
6534	&driver_attr_delay.attr,
6535	&driver_attr_opts.attr,
6536	&driver_attr_ptype.attr,
6537	&driver_attr_dsense.attr,
6538	&driver_attr_fake_rw.attr,
6539	&driver_attr_host_max_queue.attr,
6540	&driver_attr_no_lun_0.attr,
6541	&driver_attr_num_tgts.attr,
6542	&driver_attr_dev_size_mb.attr,
6543	&driver_attr_num_parts.attr,
6544	&driver_attr_every_nth.attr,
 
6545	&driver_attr_max_luns.attr,
6546	&driver_attr_max_queue.attr,
6547	&driver_attr_no_uld.attr,
6548	&driver_attr_scsi_level.attr,
6549	&driver_attr_virtual_gb.attr,
6550	&driver_attr_add_host.attr,
6551	&driver_attr_per_host_store.attr,
6552	&driver_attr_vpd_use_hostno.attr,
6553	&driver_attr_sector_size.attr,
6554	&driver_attr_statistics.attr,
6555	&driver_attr_submit_queues.attr,
6556	&driver_attr_dix.attr,
6557	&driver_attr_dif.attr,
6558	&driver_attr_guard.attr,
6559	&driver_attr_ato.attr,
6560	&driver_attr_map.attr,
6561	&driver_attr_random.attr,
6562	&driver_attr_removable.attr,
6563	&driver_attr_host_lock.attr,
6564	&driver_attr_ndelay.attr,
6565	&driver_attr_strict.attr,
6566	&driver_attr_uuid_ctl.attr,
6567	&driver_attr_cdb_len.attr,
6568	&driver_attr_tur_ms_to_ready.attr,
6569	&driver_attr_zbc.attr,
6570	NULL,
6571};
6572ATTRIBUTE_GROUPS(sdebug_drv);
6573
6574static struct device *pseudo_primary;
6575
6576static int __init scsi_debug_init(void)
6577{
6578	bool want_store = (sdebug_fake_rw == 0);
6579	unsigned long sz;
6580	int k, ret, hosts_to_add;
6581	int idx = -1;
6582
6583	ramdisk_lck_a[0] = &atomic_rw;
6584	ramdisk_lck_a[1] = &atomic_rw2;
6585	atomic_set(&retired_max_queue, 0);
6586
6587	if (sdebug_ndelay >= 1000 * 1000 * 1000) {
6588		pr_warn("ndelay must be less than 1 second, ignored\n");
6589		sdebug_ndelay = 0;
6590	} else if (sdebug_ndelay > 0)
6591		sdebug_jdelay = JDELAY_OVERRIDDEN;
6592
6593	switch (sdebug_sector_size) {
6594	case  512:
6595	case 1024:
6596	case 2048:
6597	case 4096:
6598		break;
6599	default:
6600		pr_err("invalid sector_size %d\n", sdebug_sector_size);
6601		return -EINVAL;
6602	}
6603
6604	switch (sdebug_dif) {
6605	case T10_PI_TYPE0_PROTECTION:
6606		break;
6607	case T10_PI_TYPE1_PROTECTION:
6608	case T10_PI_TYPE2_PROTECTION:
6609	case T10_PI_TYPE3_PROTECTION:
6610		have_dif_prot = true;
6611		break;
6612
6613	default:
6614		pr_err("dif must be 0, 1, 2 or 3\n");
6615		return -EINVAL;
6616	}
6617
6618	if (sdebug_num_tgts < 0) {
6619		pr_err("num_tgts must be >= 0\n");
6620		return -EINVAL;
6621	}
6622
6623	if (sdebug_guard > 1) {
6624		pr_err("guard must be 0 or 1\n");
6625		return -EINVAL;
6626	}
6627
6628	if (sdebug_ato > 1) {
6629		pr_err("ato must be 0 or 1\n");
6630		return -EINVAL;
6631	}
6632
6633	if (sdebug_physblk_exp > 15) {
6634		pr_err("invalid physblk_exp %u\n", sdebug_physblk_exp);
6635		return -EINVAL;
6636	}
 
 
 
 
 
 
 
6637	if (sdebug_max_luns > 256) {
6638		pr_warn("max_luns can be no more than 256, use default\n");
6639		sdebug_max_luns = DEF_MAX_LUNS;
 
 
 
6640	}
6641
6642	if (sdebug_lowest_aligned > 0x3fff) {
6643		pr_err("lowest_aligned too big: %u\n", sdebug_lowest_aligned);
6644		return -EINVAL;
6645	}
6646
6647	if (submit_queues < 1) {
6648		pr_err("submit_queues must be 1 or more\n");
6649		return -EINVAL;
6650	}
6651
6652	if ((sdebug_max_queue > SDEBUG_CANQUEUE) || (sdebug_max_queue < 1)) {
6653		pr_err("max_queue must be in range [1, %d]\n", SDEBUG_CANQUEUE);
6654		return -EINVAL;
6655	}
6656
6657	if ((sdebug_host_max_queue > SDEBUG_CANQUEUE) ||
6658	    (sdebug_host_max_queue < 0)) {
6659		pr_err("host_max_queue must be in range [0 %d]\n",
6660		       SDEBUG_CANQUEUE);
6661		return -EINVAL;
6662	}
6663
6664	if (sdebug_host_max_queue &&
6665	    (sdebug_max_queue != sdebug_host_max_queue)) {
6666		sdebug_max_queue = sdebug_host_max_queue;
6667		pr_warn("fixing max submit queue depth to host max queue depth, %d\n",
6668			sdebug_max_queue);
6669	}
6670
6671	sdebug_q_arr = kcalloc(submit_queues, sizeof(struct sdebug_queue),
6672			       GFP_KERNEL);
6673	if (sdebug_q_arr == NULL)
6674		return -ENOMEM;
6675	for (k = 0; k < submit_queues; ++k)
6676		spin_lock_init(&sdebug_q_arr[k].qc_lock);
6677
6678	/*
6679	 * check for host managed zoned block device specified with
6680	 * ptype=0x14 or zbc=XXX.
6681	 */
6682	if (sdebug_ptype == TYPE_ZBC) {
6683		sdeb_zbc_model = BLK_ZONED_HM;
6684	} else if (sdeb_zbc_model_s && *sdeb_zbc_model_s) {
6685		k = sdeb_zbc_model_str(sdeb_zbc_model_s);
6686		if (k < 0) {
6687			ret = k;
6688			goto free_vm;
6689		}
6690		sdeb_zbc_model = k;
6691		switch (sdeb_zbc_model) {
6692		case BLK_ZONED_NONE:
6693		case BLK_ZONED_HA:
6694			sdebug_ptype = TYPE_DISK;
6695			break;
6696		case BLK_ZONED_HM:
6697			sdebug_ptype = TYPE_ZBC;
6698			break;
6699		default:
6700			pr_err("Invalid ZBC model\n");
6701			return -EINVAL;
 
6702		}
6703	}
6704	if (sdeb_zbc_model != BLK_ZONED_NONE) {
6705		sdeb_zbc_in_use = true;
6706		if (sdebug_dev_size_mb == DEF_DEV_SIZE_PRE_INIT)
6707			sdebug_dev_size_mb = DEF_ZBC_DEV_SIZE_MB;
6708	}
6709
6710	if (sdebug_dev_size_mb == DEF_DEV_SIZE_PRE_INIT)
6711		sdebug_dev_size_mb = DEF_DEV_SIZE_MB;
6712	if (sdebug_dev_size_mb < 1)
6713		sdebug_dev_size_mb = 1;  /* force minimum 1 MB ramdisk */
6714	sz = (unsigned long)sdebug_dev_size_mb * 1048576;
6715	sdebug_store_sectors = sz / sdebug_sector_size;
6716	sdebug_capacity = get_sdebug_capacity();
6717
6718	/* play around with geometry, don't waste too much on track 0 */
6719	sdebug_heads = 8;
6720	sdebug_sectors_per = 32;
6721	if (sdebug_dev_size_mb >= 256)
6722		sdebug_heads = 64;
6723	else if (sdebug_dev_size_mb >= 16)
6724		sdebug_heads = 32;
6725	sdebug_cylinders_per = (unsigned long)sdebug_capacity /
6726			       (sdebug_sectors_per * sdebug_heads);
6727	if (sdebug_cylinders_per >= 1024) {
6728		/* other LLDs do this; implies >= 1GB ram disk ... */
6729		sdebug_heads = 255;
6730		sdebug_sectors_per = 63;
6731		sdebug_cylinders_per = (unsigned long)sdebug_capacity /
6732			       (sdebug_sectors_per * sdebug_heads);
6733	}
6734	if (scsi_debug_lbp()) {
6735		sdebug_unmap_max_blocks =
6736			clamp(sdebug_unmap_max_blocks, 0U, 0xffffffffU);
6737
6738		sdebug_unmap_max_desc =
6739			clamp(sdebug_unmap_max_desc, 0U, 256U);
6740
6741		sdebug_unmap_granularity =
6742			clamp(sdebug_unmap_granularity, 1U, 0xffffffffU);
6743
6744		if (sdebug_unmap_alignment &&
6745		    sdebug_unmap_granularity <=
6746		    sdebug_unmap_alignment) {
6747			pr_err("ERR: unmap_granularity <= unmap_alignment\n");
6748			ret = -EINVAL;
6749			goto free_q_arr;
6750		}
6751	}
6752	xa_init_flags(per_store_ap, XA_FLAGS_ALLOC | XA_FLAGS_LOCK_IRQ);
6753	if (want_store) {
6754		idx = sdebug_add_store();
6755		if (idx < 0) {
6756			ret = idx;
6757			goto free_q_arr;
6758		}
6759	}
6760
6761	pseudo_primary = root_device_register("pseudo_0");
6762	if (IS_ERR(pseudo_primary)) {
6763		pr_warn("root_device_register() error\n");
6764		ret = PTR_ERR(pseudo_primary);
6765		goto free_vm;
6766	}
6767	ret = bus_register(&pseudo_lld_bus);
6768	if (ret < 0) {
6769		pr_warn("bus_register error: %d\n", ret);
6770		goto dev_unreg;
6771	}
6772	ret = driver_register(&sdebug_driverfs_driver);
6773	if (ret < 0) {
6774		pr_warn("driver_register error: %d\n", ret);
6775		goto bus_unreg;
6776	}
6777
6778	hosts_to_add = sdebug_add_host;
6779	sdebug_add_host = 0;
6780
6781	for (k = 0; k < hosts_to_add; k++) {
6782		if (want_store && k == 0) {
6783			ret = sdebug_add_host_helper(idx);
6784			if (ret < 0) {
6785				pr_err("add_host_helper k=%d, error=%d\n",
6786				       k, -ret);
6787				break;
6788			}
6789		} else {
6790			ret = sdebug_do_add_host(want_store &&
6791						 sdebug_per_host_store);
6792			if (ret < 0) {
6793				pr_err("add_host k=%d error=%d\n", k, -ret);
6794				break;
6795			}
6796		}
6797	}
6798	if (sdebug_verbose)
6799		pr_info("built %d host(s)\n", sdebug_num_hosts);
6800
6801	return 0;
6802
6803bus_unreg:
6804	bus_unregister(&pseudo_lld_bus);
6805dev_unreg:
6806	root_device_unregister(pseudo_primary);
6807free_vm:
6808	sdebug_erase_store(idx, NULL);
6809free_q_arr:
6810	kfree(sdebug_q_arr);
6811	return ret;
6812}
6813
6814static void __exit scsi_debug_exit(void)
6815{
6816	int k = sdebug_num_hosts;
6817
6818	stop_all_queued();
6819	for (; k; k--)
6820		sdebug_do_remove_host(true);
6821	free_all_queued();
6822	driver_unregister(&sdebug_driverfs_driver);
6823	bus_unregister(&pseudo_lld_bus);
6824	root_device_unregister(pseudo_primary);
6825
6826	sdebug_erase_all_stores(false);
6827	xa_destroy(per_store_ap);
 
6828}
6829
6830device_initcall(scsi_debug_init);
6831module_exit(scsi_debug_exit);
6832
6833static void sdebug_release_adapter(struct device *dev)
6834{
6835	struct sdebug_host_info *sdbg_host;
6836
6837	sdbg_host = to_sdebug_host(dev);
6838	kfree(sdbg_host);
6839}
6840
6841/* idx must be valid, if sip is NULL then it will be obtained using idx */
6842static void sdebug_erase_store(int idx, struct sdeb_store_info *sip)
6843{
6844	if (idx < 0)
6845		return;
6846	if (!sip) {
6847		if (xa_empty(per_store_ap))
6848			return;
6849		sip = xa_load(per_store_ap, idx);
6850		if (!sip)
6851			return;
6852	}
6853	vfree(sip->map_storep);
6854	vfree(sip->dif_storep);
6855	vfree(sip->storep);
6856	xa_erase(per_store_ap, idx);
6857	kfree(sip);
6858}
6859
6860/* Assume apart_from_first==false only in shutdown case. */
6861static void sdebug_erase_all_stores(bool apart_from_first)
6862{
6863	unsigned long idx;
6864	struct sdeb_store_info *sip = NULL;
6865
6866	xa_for_each(per_store_ap, idx, sip) {
6867		if (apart_from_first)
6868			apart_from_first = false;
6869		else
6870			sdebug_erase_store(idx, sip);
6871	}
6872	if (apart_from_first)
6873		sdeb_most_recent_idx = sdeb_first_idx;
6874}
6875
6876/*
6877 * Returns store xarray new element index (idx) if >=0 else negated errno.
6878 * Limit the number of stores to 65536.
6879 */
6880static int sdebug_add_store(void)
6881{
6882	int res;
6883	u32 n_idx;
6884	unsigned long iflags;
6885	unsigned long sz = (unsigned long)sdebug_dev_size_mb * 1048576;
6886	struct sdeb_store_info *sip = NULL;
6887	struct xa_limit xal = { .max = 1 << 16, .min = 0 };
6888
6889	sip = kzalloc(sizeof(*sip), GFP_KERNEL);
6890	if (!sip)
6891		return -ENOMEM;
6892
6893	xa_lock_irqsave(per_store_ap, iflags);
6894	res = __xa_alloc(per_store_ap, &n_idx, sip, xal, GFP_ATOMIC);
6895	if (unlikely(res < 0)) {
6896		xa_unlock_irqrestore(per_store_ap, iflags);
6897		kfree(sip);
6898		pr_warn("%s: xa_alloc() errno=%d\n", __func__, -res);
6899		return res;
6900	}
6901	sdeb_most_recent_idx = n_idx;
6902	if (sdeb_first_idx < 0)
6903		sdeb_first_idx = n_idx;
6904	xa_unlock_irqrestore(per_store_ap, iflags);
6905
6906	res = -ENOMEM;
6907	sip->storep = vzalloc(sz);
6908	if (!sip->storep) {
6909		pr_err("user data oom\n");
6910		goto err;
6911	}
6912	if (sdebug_num_parts > 0)
6913		sdebug_build_parts(sip->storep, sz);
6914
6915	/* DIF/DIX: what T10 calls Protection Information (PI) */
6916	if (sdebug_dix) {
6917		int dif_size;
6918
6919		dif_size = sdebug_store_sectors * sizeof(struct t10_pi_tuple);
6920		sip->dif_storep = vmalloc(dif_size);
6921
6922		pr_info("dif_storep %u bytes @ %pK\n", dif_size,
6923			sip->dif_storep);
6924
6925		if (!sip->dif_storep) {
6926			pr_err("DIX oom\n");
6927			goto err;
6928		}
6929		memset(sip->dif_storep, 0xff, dif_size);
6930	}
6931	/* Logical Block Provisioning */
6932	if (scsi_debug_lbp()) {
6933		map_size = lba_to_map_index(sdebug_store_sectors - 1) + 1;
6934		sip->map_storep = vmalloc(array_size(sizeof(long),
6935						     BITS_TO_LONGS(map_size)));
6936
6937		pr_info("%lu provisioning blocks\n", map_size);
6938
6939		if (!sip->map_storep) {
6940			pr_err("LBP map oom\n");
6941			goto err;
6942		}
6943
6944		bitmap_zero(sip->map_storep, map_size);
6945
6946		/* Map first 1KB for partition table */
6947		if (sdebug_num_parts)
6948			map_region(sip, 0, 2);
6949	}
6950
6951	rwlock_init(&sip->macc_lck);
6952	return (int)n_idx;
6953err:
6954	sdebug_erase_store((int)n_idx, sip);
6955	pr_warn("%s: failed, errno=%d\n", __func__, -res);
6956	return res;
6957}
6958
6959static int sdebug_add_host_helper(int per_host_idx)
6960{
6961	int k, devs_per_host, idx;
6962	int error = -ENOMEM;
6963	struct sdebug_host_info *sdbg_host;
6964	struct sdebug_dev_info *sdbg_devinfo, *tmp;
6965
6966	sdbg_host = kzalloc(sizeof(*sdbg_host), GFP_KERNEL);
6967	if (!sdbg_host)
6968		return -ENOMEM;
6969	idx = (per_host_idx < 0) ? sdeb_first_idx : per_host_idx;
6970	if (xa_get_mark(per_store_ap, idx, SDEB_XA_NOT_IN_USE))
6971		xa_clear_mark(per_store_ap, idx, SDEB_XA_NOT_IN_USE);
6972	sdbg_host->si_idx = idx;
6973
6974	INIT_LIST_HEAD(&sdbg_host->dev_info_list);
6975
6976	devs_per_host = sdebug_num_tgts * sdebug_max_luns;
6977	for (k = 0; k < devs_per_host; k++) {
6978		sdbg_devinfo = sdebug_device_create(sdbg_host, GFP_KERNEL);
6979		if (!sdbg_devinfo)
6980			goto clean;
6981	}
6982
6983	spin_lock(&sdebug_host_list_lock);
6984	list_add_tail(&sdbg_host->host_list, &sdebug_host_list);
6985	spin_unlock(&sdebug_host_list_lock);
6986
6987	sdbg_host->dev.bus = &pseudo_lld_bus;
6988	sdbg_host->dev.parent = pseudo_primary;
6989	sdbg_host->dev.release = &sdebug_release_adapter;
6990	dev_set_name(&sdbg_host->dev, "adapter%d", sdebug_num_hosts);
6991
6992	error = device_register(&sdbg_host->dev);
6993	if (error)
6994		goto clean;
6995
6996	++sdebug_num_hosts;
6997	return 0;
6998
6999clean:
7000	list_for_each_entry_safe(sdbg_devinfo, tmp, &sdbg_host->dev_info_list,
7001				 dev_list) {
7002		list_del(&sdbg_devinfo->dev_list);
7003		kfree(sdbg_devinfo->zstate);
7004		kfree(sdbg_devinfo);
7005	}
7006	kfree(sdbg_host);
7007	pr_warn("%s: failed, errno=%d\n", __func__, -error);
7008	return error;
7009}
7010
7011static int sdebug_do_add_host(bool mk_new_store)
7012{
7013	int ph_idx = sdeb_most_recent_idx;
7014
7015	if (mk_new_store) {
7016		ph_idx = sdebug_add_store();
7017		if (ph_idx < 0)
7018			return ph_idx;
7019	}
7020	return sdebug_add_host_helper(ph_idx);
7021}
7022
7023static void sdebug_do_remove_host(bool the_end)
7024{
7025	int idx = -1;
7026	struct sdebug_host_info *sdbg_host = NULL;
7027	struct sdebug_host_info *sdbg_host2;
7028
7029	spin_lock(&sdebug_host_list_lock);
7030	if (!list_empty(&sdebug_host_list)) {
7031		sdbg_host = list_entry(sdebug_host_list.prev,
7032				       struct sdebug_host_info, host_list);
7033		idx = sdbg_host->si_idx;
7034	}
7035	if (!the_end && idx >= 0) {
7036		bool unique = true;
7037
7038		list_for_each_entry(sdbg_host2, &sdebug_host_list, host_list) {
7039			if (sdbg_host2 == sdbg_host)
7040				continue;
7041			if (idx == sdbg_host2->si_idx) {
7042				unique = false;
7043				break;
7044			}
7045		}
7046		if (unique) {
7047			xa_set_mark(per_store_ap, idx, SDEB_XA_NOT_IN_USE);
7048			if (idx == sdeb_most_recent_idx)
7049				--sdeb_most_recent_idx;
7050		}
7051	}
7052	if (sdbg_host)
7053		list_del(&sdbg_host->host_list);
7054	spin_unlock(&sdebug_host_list_lock);
7055
7056	if (!sdbg_host)
7057		return;
7058
7059	device_unregister(&sdbg_host->dev);
7060	--sdebug_num_hosts;
7061}
7062
7063static int sdebug_change_qdepth(struct scsi_device *sdev, int qdepth)
7064{
7065	int num_in_q = 0;
7066	struct sdebug_dev_info *devip;
7067
7068	block_unblock_all_queues(true);
7069	devip = (struct sdebug_dev_info *)sdev->hostdata;
7070	if (NULL == devip) {
7071		block_unblock_all_queues(false);
7072		return	-ENODEV;
7073	}
7074	num_in_q = atomic_read(&devip->num_in_q);
7075
 
 
 
 
 
7076	if (qdepth < 1)
7077		qdepth = 1;
7078	/* allow to exceed max host qc_arr elements for testing */
7079	if (qdepth > SDEBUG_CANQUEUE + 10)
7080		qdepth = SDEBUG_CANQUEUE + 10;
7081	scsi_change_queue_depth(sdev, qdepth);
7082
7083	if (SDEBUG_OPT_Q_NOISE & sdebug_opts) {
7084		sdev_printk(KERN_INFO, sdev, "%s: qdepth=%d, num_in_q=%d\n",
7085			    __func__, qdepth, num_in_q);
7086	}
7087	block_unblock_all_queues(false);
7088	return sdev->queue_depth;
7089}
7090
7091static bool fake_timeout(struct scsi_cmnd *scp)
7092{
7093	if (0 == (atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth))) {
7094		if (sdebug_every_nth < -1)
7095			sdebug_every_nth = -1;
7096		if (SDEBUG_OPT_TIMEOUT & sdebug_opts)
7097			return true; /* ignore command causing timeout */
7098		else if (SDEBUG_OPT_MAC_TIMEOUT & sdebug_opts &&
7099			 scsi_medium_access_command(scp))
7100			return true; /* time out reads and writes */
7101	}
7102	return false;
7103}
7104
7105/* Response to TUR or media access command when device stopped */
7106static int resp_not_ready(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
7107{
7108	int stopped_state;
7109	u64 diff_ns = 0;
7110	ktime_t now_ts = ktime_get_boottime();
7111	struct scsi_device *sdp = scp->device;
7112
7113	stopped_state = atomic_read(&devip->stopped);
7114	if (stopped_state == 2) {
7115		if (ktime_to_ns(now_ts) > ktime_to_ns(devip->create_ts)) {
7116			diff_ns = ktime_to_ns(ktime_sub(now_ts, devip->create_ts));
7117			if (diff_ns >= ((u64)sdeb_tur_ms_to_ready * 1000000)) {
7118				/* tur_ms_to_ready timer extinguished */
7119				atomic_set(&devip->stopped, 0);
7120				return 0;
7121			}
7122		}
7123		mk_sense_buffer(scp, NOT_READY, LOGICAL_UNIT_NOT_READY, 0x1);
7124		if (sdebug_verbose)
7125			sdev_printk(KERN_INFO, sdp,
7126				    "%s: Not ready: in process of becoming ready\n", my_name);
7127		if (scp->cmnd[0] == TEST_UNIT_READY) {
7128			u64 tur_nanosecs_to_ready = (u64)sdeb_tur_ms_to_ready * 1000000;
7129
7130			if (diff_ns <= tur_nanosecs_to_ready)
7131				diff_ns = tur_nanosecs_to_ready - diff_ns;
7132			else
7133				diff_ns = tur_nanosecs_to_ready;
7134			/* As per 20-061r2 approved for spc6 by T10 on 20200716 */
7135			do_div(diff_ns, 1000000);	/* diff_ns becomes milliseconds */
7136			scsi_set_sense_information(scp->sense_buffer, SCSI_SENSE_BUFFERSIZE,
7137						   diff_ns);
7138			return check_condition_result;
7139		}
7140	}
7141	mk_sense_buffer(scp, NOT_READY, LOGICAL_UNIT_NOT_READY, 0x2);
7142	if (sdebug_verbose)
7143		sdev_printk(KERN_INFO, sdp, "%s: Not ready: initializing command required\n",
7144			    my_name);
7145	return check_condition_result;
7146}
7147
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
7148static int scsi_debug_queuecommand(struct Scsi_Host *shost,
7149				   struct scsi_cmnd *scp)
7150{
7151	u8 sdeb_i;
7152	struct scsi_device *sdp = scp->device;
7153	const struct opcode_info_t *oip;
7154	const struct opcode_info_t *r_oip;
7155	struct sdebug_dev_info *devip;
7156	u8 *cmd = scp->cmnd;
7157	int (*r_pfp)(struct scsi_cmnd *, struct sdebug_dev_info *);
7158	int (*pfp)(struct scsi_cmnd *, struct sdebug_dev_info *) = NULL;
7159	int k, na;
7160	int errsts = 0;
 
7161	u32 flags;
7162	u16 sa;
7163	u8 opcode = cmd[0];
7164	bool has_wlun_rl;
7165	bool inject_now;
7166
7167	scsi_set_resid(scp, 0);
7168	if (sdebug_statistics) {
7169		atomic_inc(&sdebug_cmnd_count);
7170		inject_now = inject_on_this_cmd();
7171	} else {
7172		inject_now = false;
7173	}
7174	if (unlikely(sdebug_verbose &&
7175		     !(SDEBUG_OPT_NO_CDB_NOISE & sdebug_opts))) {
7176		char b[120];
7177		int n, len, sb;
7178
7179		len = scp->cmd_len;
7180		sb = (int)sizeof(b);
7181		if (len > 32)
7182			strcpy(b, "too long, over 32 bytes");
7183		else {
7184			for (k = 0, n = 0; k < len && n < sb; ++k)
7185				n += scnprintf(b + n, sb - n, "%02x ",
7186					       (u32)cmd[k]);
7187		}
7188		sdev_printk(KERN_INFO, sdp, "%s: tag=%#x, cmd %s\n", my_name,
7189			    blk_mq_unique_tag(scp->request), b);
7190	}
7191	if (unlikely(inject_now && (sdebug_opts & SDEBUG_OPT_HOST_BUSY)))
7192		return SCSI_MLQUEUE_HOST_BUSY;
7193	has_wlun_rl = (sdp->lun == SCSI_W_LUN_REPORT_LUNS);
7194	if (unlikely((sdp->lun >= sdebug_max_luns) && !has_wlun_rl))
7195		goto err_out;
7196
7197	sdeb_i = opcode_ind_arr[opcode];	/* fully mapped */
7198	oip = &opcode_info_arr[sdeb_i];		/* safe if table consistent */
7199	devip = (struct sdebug_dev_info *)sdp->hostdata;
7200	if (unlikely(!devip)) {
7201		devip = find_build_dev_info(sdp);
7202		if (NULL == devip)
7203			goto err_out;
7204	}
7205	if (unlikely(inject_now && !atomic_read(&sdeb_inject_pending)))
7206		atomic_set(&sdeb_inject_pending, 1);
7207
7208	na = oip->num_attached;
7209	r_pfp = oip->pfp;
7210	if (na) {	/* multiple commands with this opcode */
7211		r_oip = oip;
7212		if (FF_SA & r_oip->flags) {
7213			if (F_SA_LOW & oip->flags)
7214				sa = 0x1f & cmd[1];
7215			else
7216				sa = get_unaligned_be16(cmd + 8);
7217			for (k = 0; k <= na; oip = r_oip->arrp + k++) {
7218				if (opcode == oip->opcode && sa == oip->sa)
7219					break;
7220			}
7221		} else {   /* since no service action only check opcode */
7222			for (k = 0; k <= na; oip = r_oip->arrp + k++) {
7223				if (opcode == oip->opcode)
7224					break;
7225			}
7226		}
7227		if (k > na) {
7228			if (F_SA_LOW & r_oip->flags)
7229				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 4);
7230			else if (F_SA_HIGH & r_oip->flags)
7231				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 8, 7);
7232			else
7233				mk_sense_invalid_opcode(scp);
7234			goto check_cond;
7235		}
7236	}	/* else (when na==0) we assume the oip is a match */
7237	flags = oip->flags;
7238	if (unlikely(F_INV_OP & flags)) {
7239		mk_sense_invalid_opcode(scp);
7240		goto check_cond;
7241	}
7242	if (unlikely(has_wlun_rl && !(F_RL_WLUN_OK & flags))) {
7243		if (sdebug_verbose)
7244			sdev_printk(KERN_INFO, sdp, "%s: Opcode 0x%x not%s\n",
7245				    my_name, opcode, " supported for wlun");
7246		mk_sense_invalid_opcode(scp);
7247		goto check_cond;
7248	}
7249	if (unlikely(sdebug_strict)) {	/* check cdb against mask */
7250		u8 rem;
7251		int j;
7252
7253		for (k = 1; k < oip->len_mask[0] && k < 16; ++k) {
7254			rem = ~oip->len_mask[k] & cmd[k];
7255			if (rem) {
7256				for (j = 7; j >= 0; --j, rem <<= 1) {
7257					if (0x80 & rem)
7258						break;
7259				}
7260				mk_sense_invalid_fld(scp, SDEB_IN_CDB, k, j);
7261				goto check_cond;
7262			}
7263		}
7264	}
7265	if (unlikely(!(F_SKIP_UA & flags) &&
7266		     find_first_bit(devip->uas_bm,
7267				    SDEBUG_NUM_UAS) != SDEBUG_NUM_UAS)) {
7268		errsts = make_ua(scp, devip);
7269		if (errsts)
7270			goto check_cond;
7271	}
7272	if (unlikely(((F_M_ACCESS & flags) || scp->cmnd[0] == TEST_UNIT_READY) &&
7273		     atomic_read(&devip->stopped))) {
7274		errsts = resp_not_ready(scp, devip);
7275		if (errsts)
7276			goto fini;
7277	}
7278	if (sdebug_fake_rw && (F_FAKE_RW & flags))
7279		goto fini;
7280	if (unlikely(sdebug_every_nth)) {
7281		if (fake_timeout(scp))
7282			return 0;	/* ignore command: make trouble */
7283	}
7284	if (likely(oip->pfp))
7285		pfp = oip->pfp;	/* calls a resp_* function */
7286	else
7287		pfp = r_pfp;    /* if leaf function ptr NULL, try the root's */
7288
7289fini:
7290	if (F_DELAY_OVERR & flags)	/* cmds like INQUIRY respond asap */
7291		return schedule_resp(scp, devip, errsts, pfp, 0, 0);
7292	else if ((flags & F_LONG_DELAY) && (sdebug_jdelay > 0 ||
7293					    sdebug_ndelay > 10000)) {
7294		/*
7295		 * Skip long delays if ndelay <= 10 microseconds. Otherwise
7296		 * for Start Stop Unit (SSU) want at least 1 second delay and
7297		 * if sdebug_jdelay>1 want a long delay of that many seconds.
7298		 * For Synchronize Cache want 1/20 of SSU's delay.
7299		 */
7300		int jdelay = (sdebug_jdelay < 2) ? 1 : sdebug_jdelay;
7301		int denom = (flags & F_SYNC_DELAY) ? 20 : 1;
7302
7303		jdelay = mult_frac(USER_HZ * jdelay, HZ, denom * USER_HZ);
7304		return schedule_resp(scp, devip, errsts, pfp, jdelay, 0);
7305	} else
7306		return schedule_resp(scp, devip, errsts, pfp, sdebug_jdelay,
7307				     sdebug_ndelay);
7308check_cond:
7309	return schedule_resp(scp, devip, check_condition_result, NULL, 0, 0);
7310err_out:
7311	return schedule_resp(scp, NULL, DID_NO_CONNECT << 16, NULL, 0, 0);
7312}
7313
7314static struct scsi_host_template sdebug_driver_template = {
7315	.show_info =		scsi_debug_show_info,
7316	.write_info =		scsi_debug_write_info,
7317	.proc_name =		sdebug_proc_name,
7318	.name =			"SCSI DEBUG",
7319	.info =			scsi_debug_info,
7320	.slave_alloc =		scsi_debug_slave_alloc,
7321	.slave_configure =	scsi_debug_slave_configure,
7322	.slave_destroy =	scsi_debug_slave_destroy,
7323	.ioctl =		scsi_debug_ioctl,
7324	.queuecommand =		scsi_debug_queuecommand,
7325	.change_queue_depth =	sdebug_change_qdepth,
 
 
7326	.eh_abort_handler =	scsi_debug_abort,
7327	.eh_device_reset_handler = scsi_debug_device_reset,
7328	.eh_target_reset_handler = scsi_debug_target_reset,
7329	.eh_bus_reset_handler = scsi_debug_bus_reset,
7330	.eh_host_reset_handler = scsi_debug_host_reset,
7331	.can_queue =		SDEBUG_CANQUEUE,
7332	.this_id =		7,
7333	.sg_tablesize =		SG_MAX_SEGMENTS,
7334	.cmd_per_lun =		DEF_CMD_PER_LUN,
7335	.max_sectors =		-1U,
7336	.max_segment_size =	-1U,
7337	.module =		THIS_MODULE,
7338	.track_queue_depth =	1,
7339};
7340
7341static int sdebug_driver_probe(struct device *dev)
7342{
7343	int error = 0;
7344	struct sdebug_host_info *sdbg_host;
7345	struct Scsi_Host *hpnt;
7346	int hprot;
7347
7348	sdbg_host = to_sdebug_host(dev);
7349
7350	if (sdebug_host_max_queue)
7351		sdebug_driver_template.can_queue = sdebug_host_max_queue;
7352	else
7353		sdebug_driver_template.can_queue = sdebug_max_queue;
7354	if (!sdebug_clustering)
7355		sdebug_driver_template.dma_boundary = PAGE_SIZE - 1;
7356
7357	hpnt = scsi_host_alloc(&sdebug_driver_template, sizeof(sdbg_host));
7358	if (NULL == hpnt) {
7359		pr_err("scsi_host_alloc failed\n");
7360		error = -ENODEV;
7361		return error;
7362	}
7363	if (submit_queues > nr_cpu_ids) {
7364		pr_warn("%s: trim submit_queues (was %d) to nr_cpu_ids=%u\n",
7365			my_name, submit_queues, nr_cpu_ids);
7366		submit_queues = nr_cpu_ids;
7367	}
7368	/*
7369	 * Decide whether to tell scsi subsystem that we want mq. The
7370	 * following should give the same answer for each host. If the host
7371	 * has a limit of hostwide max commands, then do not set.
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
7372	 */
7373	if (!sdebug_host_max_queue)
7374		hpnt->nr_hw_queues = submit_queues;
 
 
 
 
 
 
 
 
7375
7376	sdbg_host->shost = hpnt;
7377	*((struct sdebug_host_info **)hpnt->hostdata) = sdbg_host;
7378	if ((hpnt->this_id >= 0) && (sdebug_num_tgts > hpnt->this_id))
7379		hpnt->max_id = sdebug_num_tgts + 1;
7380	else
7381		hpnt->max_id = sdebug_num_tgts;
7382	/* = sdebug_max_luns; */
7383	hpnt->max_lun = SCSI_W_LUN_REPORT_LUNS + 1;
7384
7385	hprot = 0;
7386
7387	switch (sdebug_dif) {
7388
7389	case T10_PI_TYPE1_PROTECTION:
7390		hprot = SHOST_DIF_TYPE1_PROTECTION;
7391		if (sdebug_dix)
7392			hprot |= SHOST_DIX_TYPE1_PROTECTION;
7393		break;
7394
7395	case T10_PI_TYPE2_PROTECTION:
7396		hprot = SHOST_DIF_TYPE2_PROTECTION;
7397		if (sdebug_dix)
7398			hprot |= SHOST_DIX_TYPE2_PROTECTION;
7399		break;
7400
7401	case T10_PI_TYPE3_PROTECTION:
7402		hprot = SHOST_DIF_TYPE3_PROTECTION;
7403		if (sdebug_dix)
7404			hprot |= SHOST_DIX_TYPE3_PROTECTION;
7405		break;
7406
7407	default:
7408		if (sdebug_dix)
7409			hprot |= SHOST_DIX_TYPE0_PROTECTION;
7410		break;
7411	}
7412
7413	scsi_host_set_prot(hpnt, hprot);
7414
7415	if (have_dif_prot || sdebug_dix)
7416		pr_info("host protection%s%s%s%s%s%s%s\n",
7417			(hprot & SHOST_DIF_TYPE1_PROTECTION) ? " DIF1" : "",
7418			(hprot & SHOST_DIF_TYPE2_PROTECTION) ? " DIF2" : "",
7419			(hprot & SHOST_DIF_TYPE3_PROTECTION) ? " DIF3" : "",
7420			(hprot & SHOST_DIX_TYPE0_PROTECTION) ? " DIX0" : "",
7421			(hprot & SHOST_DIX_TYPE1_PROTECTION) ? " DIX1" : "",
7422			(hprot & SHOST_DIX_TYPE2_PROTECTION) ? " DIX2" : "",
7423			(hprot & SHOST_DIX_TYPE3_PROTECTION) ? " DIX3" : "");
7424
7425	if (sdebug_guard == 1)
7426		scsi_host_set_guard(hpnt, SHOST_DIX_GUARD_IP);
7427	else
7428		scsi_host_set_guard(hpnt, SHOST_DIX_GUARD_CRC);
7429
7430	sdebug_verbose = !!(SDEBUG_OPT_NOISE & sdebug_opts);
7431	sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & sdebug_opts);
7432	if (sdebug_every_nth)	/* need stats counters for every_nth */
7433		sdebug_statistics = true;
7434	error = scsi_add_host(hpnt, &sdbg_host->dev);
7435	if (error) {
7436		pr_err("scsi_add_host failed\n");
7437		error = -ENODEV;
7438		scsi_host_put(hpnt);
7439	} else {
7440		scsi_scan_host(hpnt);
7441	}
7442
7443	return error;
7444}
7445
7446static int sdebug_driver_remove(struct device *dev)
7447{
7448	struct sdebug_host_info *sdbg_host;
7449	struct sdebug_dev_info *sdbg_devinfo, *tmp;
7450
7451	sdbg_host = to_sdebug_host(dev);
7452
7453	if (!sdbg_host) {
7454		pr_err("Unable to locate host info\n");
7455		return -ENODEV;
7456	}
7457
7458	scsi_remove_host(sdbg_host->shost);
7459
7460	list_for_each_entry_safe(sdbg_devinfo, tmp, &sdbg_host->dev_info_list,
7461				 dev_list) {
7462		list_del(&sdbg_devinfo->dev_list);
7463		kfree(sdbg_devinfo->zstate);
7464		kfree(sdbg_devinfo);
7465	}
7466
7467	scsi_host_put(sdbg_host->shost);
7468	return 0;
7469}
7470
7471static int pseudo_lld_bus_match(struct device *dev,
7472				struct device_driver *dev_driver)
7473{
7474	return 1;
7475}
7476
7477static struct bus_type pseudo_lld_bus = {
7478	.name = "pseudo",
7479	.match = pseudo_lld_bus_match,
7480	.probe = sdebug_driver_probe,
7481	.remove = sdebug_driver_remove,
7482	.drv_groups = sdebug_drv_groups,
7483};