xref: /openbmc/linux/drivers/scsi/scsi_debug.c (revision 5a170e9e)
1 /*
2  * vvvvvvvvvvvvvvvvvvvvvvv Original vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
3  *  Copyright (C) 1992  Eric Youngdale
4  *  Simulate a host adapter with 2 disks attached.  Do a lot of checking
5  *  to make sure that we are not getting blocks mixed up, and PANIC if
6  *  anything out of the ordinary is seen.
7  * ^^^^^^^^^^^^^^^^^^^^^^^ Original ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
8  *
9  * Copyright (C) 2001 - 2018 Douglas Gilbert
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2, or (at your option)
14  * any later version.
15  *
16  *  For documentation see http://sg.danny.cz/sg/sdebug26.html
17  *
18  */
19 
20 
21 #define pr_fmt(fmt) KBUILD_MODNAME ":%s: " fmt, __func__
22 
23 #include <linux/module.h>
24 
25 #include <linux/kernel.h>
26 #include <linux/errno.h>
27 #include <linux/jiffies.h>
28 #include <linux/slab.h>
29 #include <linux/types.h>
30 #include <linux/string.h>
31 #include <linux/genhd.h>
32 #include <linux/fs.h>
33 #include <linux/init.h>
34 #include <linux/proc_fs.h>
35 #include <linux/vmalloc.h>
36 #include <linux/moduleparam.h>
37 #include <linux/scatterlist.h>
38 #include <linux/blkdev.h>
39 #include <linux/crc-t10dif.h>
40 #include <linux/spinlock.h>
41 #include <linux/interrupt.h>
42 #include <linux/atomic.h>
43 #include <linux/hrtimer.h>
44 #include <linux/uuid.h>
45 #include <linux/t10-pi.h>
46 
47 #include <net/checksum.h>
48 
49 #include <asm/unaligned.h>
50 
51 #include <scsi/scsi.h>
52 #include <scsi/scsi_cmnd.h>
53 #include <scsi/scsi_device.h>
54 #include <scsi/scsi_host.h>
55 #include <scsi/scsicam.h>
56 #include <scsi/scsi_eh.h>
57 #include <scsi/scsi_tcq.h>
58 #include <scsi/scsi_dbg.h>
59 
60 #include "sd.h"
61 #include "scsi_logging.h"
62 
63 /* make sure inq_product_rev string corresponds to this version */
64 #define SDEBUG_VERSION "0188"	/* format to fit INQUIRY revision field */
65 static const char *sdebug_version_date = "20180128";
66 
67 #define MY_NAME "scsi_debug"
68 
69 /* Additional Sense Code (ASC) */
70 #define NO_ADDITIONAL_SENSE 0x0
71 #define LOGICAL_UNIT_NOT_READY 0x4
72 #define LOGICAL_UNIT_COMMUNICATION_FAILURE 0x8
73 #define UNRECOVERED_READ_ERR 0x11
74 #define PARAMETER_LIST_LENGTH_ERR 0x1a
75 #define INVALID_OPCODE 0x20
76 #define LBA_OUT_OF_RANGE 0x21
77 #define INVALID_FIELD_IN_CDB 0x24
78 #define INVALID_FIELD_IN_PARAM_LIST 0x26
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 
98 /* Additional Sense Code Qualifier (ASCQ) */
99 #define ACK_NAK_TO 0x3
100 
101 /* Default values for driver parameters */
102 #define DEF_NUM_HOST   1
103 #define DEF_NUM_TGTS   1
104 #define DEF_MAX_LUNS   1
105 /* With these defaults, this driver will make 1 host with 1 target
106  * (id 0) containing 1 logical unit (lun 0). That is 1 device.
107  */
108 #define DEF_ATO 1
109 #define DEF_CDB_LEN 10
110 #define DEF_JDELAY   1		/* if > 0 unit is a jiffy */
111 #define DEF_DEV_SIZE_MB   8
112 #define DEF_DIF 0
113 #define DEF_DIX 0
114 #define DEF_D_SENSE   0
115 #define DEF_EVERY_NTH   0
116 #define DEF_FAKE_RW	0
117 #define DEF_GUARD 0
118 #define DEF_HOST_LOCK 0
119 #define DEF_LBPU 0
120 #define DEF_LBPWS 0
121 #define DEF_LBPWS10 0
122 #define DEF_LBPRZ 1
123 #define DEF_LOWEST_ALIGNED 0
124 #define DEF_NDELAY   0		/* if > 0 unit is a nanosecond */
125 #define DEF_NO_LUN_0   0
126 #define DEF_NUM_PARTS   0
127 #define DEF_OPTS   0
128 #define DEF_OPT_BLKS 1024
129 #define DEF_PHYSBLK_EXP 0
130 #define DEF_OPT_XFERLEN_EXP 0
131 #define DEF_PTYPE   TYPE_DISK
132 #define DEF_REMOVABLE false
133 #define DEF_SCSI_LEVEL   7    /* INQUIRY, byte2 [6->SPC-4; 7->SPC-5] */
134 #define DEF_SECTOR_SIZE 512
135 #define DEF_UNMAP_ALIGNMENT 0
136 #define DEF_UNMAP_GRANULARITY 1
137 #define DEF_UNMAP_MAX_BLOCKS 0xFFFFFFFF
138 #define DEF_UNMAP_MAX_DESC 256
139 #define DEF_VIRTUAL_GB   0
140 #define DEF_VPD_USE_HOSTNO 1
141 #define DEF_WRITESAME_LENGTH 0xFFFF
142 #define DEF_STRICT 0
143 #define DEF_STATISTICS false
144 #define DEF_SUBMIT_QUEUES 1
145 #define DEF_UUID_CTL 0
146 #define JDELAY_OVERRIDDEN -9999
147 
148 #define SDEBUG_LUN_0_VAL 0
149 
150 /* bit mask values for sdebug_opts */
151 #define SDEBUG_OPT_NOISE		1
152 #define SDEBUG_OPT_MEDIUM_ERR		2
153 #define SDEBUG_OPT_TIMEOUT		4
154 #define SDEBUG_OPT_RECOVERED_ERR	8
155 #define SDEBUG_OPT_TRANSPORT_ERR	16
156 #define SDEBUG_OPT_DIF_ERR		32
157 #define SDEBUG_OPT_DIX_ERR		64
158 #define SDEBUG_OPT_MAC_TIMEOUT		128
159 #define SDEBUG_OPT_SHORT_TRANSFER	0x100
160 #define SDEBUG_OPT_Q_NOISE		0x200
161 #define SDEBUG_OPT_ALL_TSF		0x400
162 #define SDEBUG_OPT_RARE_TSF		0x800
163 #define SDEBUG_OPT_N_WCE		0x1000
164 #define SDEBUG_OPT_RESET_NOISE		0x2000
165 #define SDEBUG_OPT_NO_CDB_NOISE		0x4000
166 #define SDEBUG_OPT_HOST_BUSY		0x8000
167 #define SDEBUG_OPT_CMD_ABORT		0x10000
168 #define SDEBUG_OPT_ALL_NOISE (SDEBUG_OPT_NOISE | SDEBUG_OPT_Q_NOISE | \
169 			      SDEBUG_OPT_RESET_NOISE)
170 #define SDEBUG_OPT_ALL_INJECTING (SDEBUG_OPT_RECOVERED_ERR | \
171 				  SDEBUG_OPT_TRANSPORT_ERR | \
172 				  SDEBUG_OPT_DIF_ERR | SDEBUG_OPT_DIX_ERR | \
173 				  SDEBUG_OPT_SHORT_TRANSFER | \
174 				  SDEBUG_OPT_HOST_BUSY | \
175 				  SDEBUG_OPT_CMD_ABORT)
176 /* When "every_nth" > 0 then modulo "every_nth" commands:
177  *   - a missing response is simulated if SDEBUG_OPT_TIMEOUT is set
178  *   - a RECOVERED_ERROR is simulated on successful read and write
179  *     commands if SDEBUG_OPT_RECOVERED_ERR is set.
180  *   - a TRANSPORT_ERROR is simulated on successful read and write
181  *     commands if SDEBUG_OPT_TRANSPORT_ERR is set.
182  *   - similarly for DIF_ERR, DIX_ERR, SHORT_TRANSFER, HOST_BUSY and
183  *     CMD_ABORT
184  *
185  * When "every_nth" < 0 then after "- every_nth" commands the selected
186  * error will be injected. The error will be injected on every subsequent
187  * command until some other action occurs; for example, the user writing
188  * a new value (other than -1 or 1) to every_nth:
189  *      echo 0 > /sys/bus/pseudo/drivers/scsi_debug/every_nth
190  */
191 
192 /* As indicated in SAM-5 and SPC-4 Unit Attentions (UAs) are returned in
193  * priority order. In the subset implemented here lower numbers have higher
194  * priority. The UA numbers should be a sequence starting from 0 with
195  * SDEBUG_NUM_UAS being 1 higher than the highest numbered UA. */
196 #define SDEBUG_UA_POR 0		/* Power on, reset, or bus device reset */
197 #define SDEBUG_UA_BUS_RESET 1
198 #define SDEBUG_UA_MODE_CHANGED 2
199 #define SDEBUG_UA_CAPACITY_CHANGED 3
200 #define SDEBUG_UA_LUNS_CHANGED 4
201 #define SDEBUG_UA_MICROCODE_CHANGED 5	/* simulate firmware change */
202 #define SDEBUG_UA_MICROCODE_CHANGED_WO_RESET 6
203 #define SDEBUG_NUM_UAS 7
204 
205 /* when 1==SDEBUG_OPT_MEDIUM_ERR, a medium error is simulated at this
206  * sector on read commands: */
207 #define OPT_MEDIUM_ERR_ADDR   0x1234 /* that's sector 4660 in decimal */
208 #define OPT_MEDIUM_ERR_NUM    10     /* number of consecutive medium errs */
209 
210 /* If REPORT LUNS has luns >= 256 it can choose "flat space" (value 1)
211  * or "peripheral device" addressing (value 0) */
212 #define SAM2_LUN_ADDRESS_METHOD 0
213 
214 /* SDEBUG_CANQUEUE is the maximum number of commands that can be queued
215  * (for response) per submit queue at one time. Can be reduced by max_queue
216  * option. Command responses are not queued when jdelay=0 and ndelay=0. The
217  * per-device DEF_CMD_PER_LUN can be changed via sysfs:
218  * /sys/class/scsi_device/<h:c:t:l>/device/queue_depth
219  * but cannot exceed SDEBUG_CANQUEUE .
220  */
221 #define SDEBUG_CANQUEUE_WORDS  3	/* a WORD is bits in a long */
222 #define SDEBUG_CANQUEUE  (SDEBUG_CANQUEUE_WORDS * BITS_PER_LONG)
223 #define DEF_CMD_PER_LUN  255
224 
225 #define F_D_IN			1
226 #define F_D_OUT			2
227 #define F_D_OUT_MAYBE		4	/* WRITE SAME, NDOB bit */
228 #define F_D_UNKN		8
229 #define F_RL_WLUN_OK		0x10
230 #define F_SKIP_UA		0x20
231 #define F_DELAY_OVERR		0x40
232 #define F_SA_LOW		0x80	/* cdb byte 1, bits 4 to 0 */
233 #define F_SA_HIGH		0x100	/* as used by variable length cdbs */
234 #define F_INV_OP		0x200
235 #define F_FAKE_RW		0x400
236 #define F_M_ACCESS		0x800	/* media access */
237 #define F_SSU_DELAY		0x1000
238 #define F_SYNC_DELAY		0x2000
239 
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 
250 struct sdebug_dev_info {
251 	struct list_head dev_list;
252 	unsigned int channel;
253 	unsigned int target;
254 	u64 lun;
255 	uuid_t lu_name;
256 	struct sdebug_host_info *sdbg_host;
257 	unsigned long uas_bm[1];
258 	atomic_t num_in_q;
259 	atomic_t stopped;
260 	bool used;
261 };
262 
263 struct sdebug_host_info {
264 	struct list_head host_list;
265 	struct Scsi_Host *shost;
266 	struct device dev;
267 	struct list_head dev_info_list;
268 };
269 
270 #define to_sdebug_host(d)	\
271 	container_of(d, struct sdebug_host_info, dev)
272 
273 enum sdeb_defer_type {SDEB_DEFER_NONE = 0, SDEB_DEFER_HRT = 1,
274 		      SDEB_DEFER_WQ = 2};
275 
276 struct sdebug_defer {
277 	struct hrtimer hrt;
278 	struct execute_work ew;
279 	int sqa_idx;	/* index of sdebug_queue array */
280 	int qc_idx;	/* index of sdebug_queued_cmd array within sqa_idx */
281 	int issuing_cpu;
282 	bool init_hrt;
283 	bool init_wq;
284 	bool aborted;	/* true when blk_abort_request() already called */
285 	enum sdeb_defer_type defer_t;
286 };
287 
288 struct sdebug_queued_cmd {
289 	/* corresponding bit set in in_use_bm[] in owning struct sdebug_queue
290 	 * instance indicates this slot is in use.
291 	 */
292 	struct sdebug_defer *sd_dp;
293 	struct scsi_cmnd *a_cmnd;
294 	unsigned int inj_recovered:1;
295 	unsigned int inj_transport:1;
296 	unsigned int inj_dif:1;
297 	unsigned int inj_dix:1;
298 	unsigned int inj_short:1;
299 	unsigned int inj_host_busy:1;
300 	unsigned int inj_cmd_abort:1;
301 };
302 
303 struct sdebug_queue {
304 	struct sdebug_queued_cmd qc_arr[SDEBUG_CANQUEUE];
305 	unsigned long in_use_bm[SDEBUG_CANQUEUE_WORDS];
306 	spinlock_t qc_lock;
307 	atomic_t blocked;	/* to temporarily stop more being queued */
308 };
309 
310 static atomic_t sdebug_cmnd_count;   /* number of incoming commands */
311 static atomic_t sdebug_completions;  /* count of deferred completions */
312 static atomic_t sdebug_miss_cpus;    /* submission + completion cpus differ */
313 static atomic_t sdebug_a_tsf;	     /* 'almost task set full' counter */
314 
315 struct opcode_info_t {
316 	u8 num_attached;	/* 0 if this is it (i.e. a leaf); use 0xff */
317 				/* for terminating element */
318 	u8 opcode;		/* if num_attached > 0, preferred */
319 	u16 sa;			/* service action */
320 	u32 flags;		/* OR-ed set of SDEB_F_* */
321 	int (*pfp)(struct scsi_cmnd *, struct sdebug_dev_info *);
322 	const struct opcode_info_t *arrp;  /* num_attached elements or NULL */
323 	u8 len_mask[16];	/* len_mask[0]-->cdb_len, then mask for cdb */
324 				/* 1 to min(cdb_len, 15); ignore cdb[15...] */
325 };
326 
327 /* SCSI opcodes (first byte of cdb) of interest mapped onto these indexes */
328 enum sdeb_opcode_index {
329 	SDEB_I_INVALID_OPCODE =	0,
330 	SDEB_I_INQUIRY = 1,
331 	SDEB_I_REPORT_LUNS = 2,
332 	SDEB_I_REQUEST_SENSE = 3,
333 	SDEB_I_TEST_UNIT_READY = 4,
334 	SDEB_I_MODE_SENSE = 5,		/* 6, 10 */
335 	SDEB_I_MODE_SELECT = 6,		/* 6, 10 */
336 	SDEB_I_LOG_SENSE = 7,
337 	SDEB_I_READ_CAPACITY = 8,	/* 10; 16 is in SA_IN(16) */
338 	SDEB_I_READ = 9,		/* 6, 10, 12, 16 */
339 	SDEB_I_WRITE = 10,		/* 6, 10, 12, 16 */
340 	SDEB_I_START_STOP = 11,
341 	SDEB_I_SERV_ACT_IN_16 = 12,	/* add ...SERV_ACT_IN_12 if needed */
342 	SDEB_I_SERV_ACT_OUT_16 = 13,	/* add ...SERV_ACT_OUT_12 if needed */
343 	SDEB_I_MAINT_IN = 14,
344 	SDEB_I_MAINT_OUT = 15,
345 	SDEB_I_VERIFY = 16,		/* 10 only */
346 	SDEB_I_VARIABLE_LEN = 17,	/* READ(32), WRITE(32), WR_SCAT(32) */
347 	SDEB_I_RESERVE = 18,		/* 6, 10 */
348 	SDEB_I_RELEASE = 19,		/* 6, 10 */
349 	SDEB_I_ALLOW_REMOVAL = 20,	/* PREVENT ALLOW MEDIUM REMOVAL */
350 	SDEB_I_REZERO_UNIT = 21,	/* REWIND in SSC */
351 	SDEB_I_ATA_PT = 22,		/* 12, 16 */
352 	SDEB_I_SEND_DIAG = 23,
353 	SDEB_I_UNMAP = 24,
354 	SDEB_I_XDWRITEREAD = 25,	/* 10 only */
355 	SDEB_I_WRITE_BUFFER = 26,
356 	SDEB_I_WRITE_SAME = 27,		/* 10, 16 */
357 	SDEB_I_SYNC_CACHE = 28,		/* 10, 16 */
358 	SDEB_I_COMP_WRITE = 29,
359 	SDEB_I_LAST_ELEMENT = 30,	/* keep this last (previous + 1) */
360 };
361 
362 
363 static const unsigned char opcode_ind_arr[256] = {
364 /* 0x0; 0x0->0x1f: 6 byte cdbs */
365 	SDEB_I_TEST_UNIT_READY, SDEB_I_REZERO_UNIT, 0, SDEB_I_REQUEST_SENSE,
366 	    0, 0, 0, 0,
367 	SDEB_I_READ, 0, SDEB_I_WRITE, 0, 0, 0, 0, 0,
368 	0, 0, SDEB_I_INQUIRY, 0, 0, SDEB_I_MODE_SELECT, SDEB_I_RESERVE,
369 	    SDEB_I_RELEASE,
370 	0, 0, SDEB_I_MODE_SENSE, SDEB_I_START_STOP, 0, SDEB_I_SEND_DIAG,
371 	    SDEB_I_ALLOW_REMOVAL, 0,
372 /* 0x20; 0x20->0x3f: 10 byte cdbs */
373 	0, 0, 0, 0, 0, SDEB_I_READ_CAPACITY, 0, 0,
374 	SDEB_I_READ, 0, SDEB_I_WRITE, 0, 0, 0, 0, SDEB_I_VERIFY,
375 	0, 0, 0, 0, 0, SDEB_I_SYNC_CACHE, 0, 0,
376 	0, 0, 0, SDEB_I_WRITE_BUFFER, 0, 0, 0, 0,
377 /* 0x40; 0x40->0x5f: 10 byte cdbs */
378 	0, SDEB_I_WRITE_SAME, SDEB_I_UNMAP, 0, 0, 0, 0, 0,
379 	0, 0, 0, 0, 0, SDEB_I_LOG_SENSE, 0, 0,
380 	0, 0, 0, SDEB_I_XDWRITEREAD, 0, SDEB_I_MODE_SELECT, SDEB_I_RESERVE,
381 	    SDEB_I_RELEASE,
382 	0, 0, SDEB_I_MODE_SENSE, 0, 0, 0, 0, 0,
383 /* 0x60; 0x60->0x7d are reserved, 0x7e is "extended cdb" */
384 	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
385 	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
386 	0, SDEB_I_VARIABLE_LEN,
387 /* 0x80; 0x80->0x9f: 16 byte cdbs */
388 	0, 0, 0, 0, 0, SDEB_I_ATA_PT, 0, 0,
389 	SDEB_I_READ, SDEB_I_COMP_WRITE, SDEB_I_WRITE, 0, 0, 0, 0, 0,
390 	0, SDEB_I_SYNC_CACHE, 0, SDEB_I_WRITE_SAME, 0, 0, 0, 0,
391 	0, 0, 0, 0, 0, 0, SDEB_I_SERV_ACT_IN_16, SDEB_I_SERV_ACT_OUT_16,
392 /* 0xa0; 0xa0->0xbf: 12 byte cdbs */
393 	SDEB_I_REPORT_LUNS, SDEB_I_ATA_PT, 0, SDEB_I_MAINT_IN,
394 	     SDEB_I_MAINT_OUT, 0, 0, 0,
395 	SDEB_I_READ, 0 /* SDEB_I_SERV_ACT_OUT_12 */, SDEB_I_WRITE,
396 	     0 /* SDEB_I_SERV_ACT_IN_12 */, 0, 0, 0, 0,
397 	0, 0, 0, 0, 0, 0, 0, 0,
398 	0, 0, 0, 0, 0, 0, 0, 0,
399 /* 0xc0; 0xc0->0xff: vendor specific */
400 	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
401 	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
402 	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
403 	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
404 };
405 
406 /*
407  * The following "response" functions return the SCSI mid-level's 4 byte
408  * tuple-in-an-int. To handle commands with an IMMED bit, for a faster
409  * command completion, they can mask their return value with
410  * SDEG_RES_IMMED_MASK .
411  */
412 #define SDEG_RES_IMMED_MASK 0x40000000
413 
414 static int resp_inquiry(struct scsi_cmnd *, struct sdebug_dev_info *);
415 static int resp_report_luns(struct scsi_cmnd *, struct sdebug_dev_info *);
416 static int resp_requests(struct scsi_cmnd *, struct sdebug_dev_info *);
417 static int resp_mode_sense(struct scsi_cmnd *, struct sdebug_dev_info *);
418 static int resp_mode_select(struct scsi_cmnd *, struct sdebug_dev_info *);
419 static int resp_log_sense(struct scsi_cmnd *, struct sdebug_dev_info *);
420 static int resp_readcap(struct scsi_cmnd *, struct sdebug_dev_info *);
421 static int resp_read_dt0(struct scsi_cmnd *, struct sdebug_dev_info *);
422 static int resp_write_dt0(struct scsi_cmnd *, struct sdebug_dev_info *);
423 static int resp_write_scat(struct scsi_cmnd *, struct sdebug_dev_info *);
424 static int resp_start_stop(struct scsi_cmnd *, struct sdebug_dev_info *);
425 static int resp_readcap16(struct scsi_cmnd *, struct sdebug_dev_info *);
426 static int resp_get_lba_status(struct scsi_cmnd *, struct sdebug_dev_info *);
427 static int resp_report_tgtpgs(struct scsi_cmnd *, struct sdebug_dev_info *);
428 static int resp_unmap(struct scsi_cmnd *, struct sdebug_dev_info *);
429 static int resp_rsup_opcodes(struct scsi_cmnd *, struct sdebug_dev_info *);
430 static int resp_rsup_tmfs(struct scsi_cmnd *, struct sdebug_dev_info *);
431 static int resp_write_same_10(struct scsi_cmnd *, struct sdebug_dev_info *);
432 static int resp_write_same_16(struct scsi_cmnd *, struct sdebug_dev_info *);
433 static int resp_xdwriteread_10(struct scsi_cmnd *, struct sdebug_dev_info *);
434 static int resp_comp_write(struct scsi_cmnd *, struct sdebug_dev_info *);
435 static int resp_write_buffer(struct scsi_cmnd *, struct sdebug_dev_info *);
436 static int resp_sync_cache(struct scsi_cmnd *, struct sdebug_dev_info *);
437 
438 /*
439  * The following are overflow arrays for cdbs that "hit" the same index in
440  * the opcode_info_arr array. The most time sensitive (or commonly used) cdb
441  * should be placed in opcode_info_arr[], the others should be placed here.
442  */
443 static const struct opcode_info_t msense_iarr[] = {
444 	{0, 0x1a, 0, F_D_IN, NULL, NULL,
445 	    {6,  0xe8, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
446 };
447 
448 static const struct opcode_info_t mselect_iarr[] = {
449 	{0, 0x15, 0, F_D_OUT, NULL, NULL,
450 	    {6,  0xf1, 0, 0, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
451 };
452 
453 static const struct opcode_info_t read_iarr[] = {
454 	{0, 0x28, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL,/* READ(10) */
455 	    {10,  0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
456 	     0, 0, 0, 0} },
457 	{0, 0x8, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL, /* READ(6) */
458 	    {6,  0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
459 	{0, 0xa8, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL,/* READ(12) */
460 	    {12,  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xbf,
461 	     0xc7, 0, 0, 0, 0} },
462 };
463 
464 static const struct opcode_info_t write_iarr[] = {
465 	{0, 0x2a, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0,  /* WRITE(10) */
466 	    NULL, {10,  0xfb, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7,
467 		   0, 0, 0, 0, 0, 0} },
468 	{0, 0xa, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0,   /* WRITE(6) */
469 	    NULL, {6,  0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0,
470 		   0, 0, 0} },
471 	{0, 0xaa, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0,  /* WRITE(12) */
472 	    NULL, {12,  0xfb, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
473 		   0xbf, 0xc7, 0, 0, 0, 0} },
474 };
475 
476 static const struct opcode_info_t sa_in_16_iarr[] = {
477 	{0, 0x9e, 0x12, F_SA_LOW | F_D_IN, resp_get_lba_status, NULL,
478 	    {16,  0x12, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
479 	     0xff, 0xff, 0xff, 0, 0xc7} },	/* GET LBA STATUS(16) */
480 };
481 
482 static const struct opcode_info_t vl_iarr[] = {	/* VARIABLE LENGTH */
483 	{0, 0x7f, 0xb, F_SA_HIGH | F_D_OUT | FF_MEDIA_IO, resp_write_dt0,
484 	    NULL, {32,  0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0xb, 0xfa,
485 		   0, 0xff, 0xff, 0xff, 0xff} },	/* WRITE(32) */
486 	{0, 0x7f, 0x11, F_SA_HIGH | F_D_OUT | FF_MEDIA_IO, resp_write_scat,
487 	    NULL, {32,  0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0x11, 0xf8,
488 		   0, 0xff, 0xff, 0x0, 0x0} },	/* WRITE SCATTERED(32) */
489 };
490 
491 static const struct opcode_info_t maint_in_iarr[] = {	/* MAINT IN */
492 	{0, 0xa3, 0xc, F_SA_LOW | F_D_IN, resp_rsup_opcodes, NULL,
493 	    {12,  0xc, 0x87, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0,
494 	     0xc7, 0, 0, 0, 0} }, /* REPORT SUPPORTED OPERATION CODES */
495 	{0, 0xa3, 0xd, F_SA_LOW | F_D_IN, resp_rsup_tmfs, NULL,
496 	    {12,  0xd, 0x80, 0, 0, 0, 0xff, 0xff, 0xff, 0xff, 0, 0xc7, 0, 0,
497 	     0, 0} },	/* REPORTED SUPPORTED TASK MANAGEMENT FUNCTIONS */
498 };
499 
500 static const struct opcode_info_t write_same_iarr[] = {
501 	{0, 0x93, 0, F_D_OUT_MAYBE | FF_MEDIA_IO, resp_write_same_16, NULL,
502 	    {16,  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
503 	     0xff, 0xff, 0xff, 0x3f, 0xc7} },		/* WRITE SAME(16) */
504 };
505 
506 static const struct opcode_info_t reserve_iarr[] = {
507 	{0, 0x16, 0, F_D_OUT, NULL, NULL,		/* RESERVE(6) */
508 	    {6,  0x1f, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
509 };
510 
511 static const struct opcode_info_t release_iarr[] = {
512 	{0, 0x17, 0, F_D_OUT, NULL, NULL,		/* RELEASE(6) */
513 	    {6,  0x1f, 0xff, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
514 };
515 
516 static const struct opcode_info_t sync_cache_iarr[] = {
517 	{0, 0x91, 0, F_SYNC_DELAY | F_M_ACCESS, resp_sync_cache, NULL,
518 	    {16,  0x6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
519 	     0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} },	/* SYNC_CACHE (16) */
520 };
521 
522 
523 /* This array is accessed via SDEB_I_* values. Make sure all are mapped,
524  * plus the terminating elements for logic that scans this table such as
525  * REPORT SUPPORTED OPERATION CODES. */
526 static const struct opcode_info_t opcode_info_arr[SDEB_I_LAST_ELEMENT + 1] = {
527 /* 0 */
528 	{0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL,	/* unknown opcodes */
529 	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
530 	{0, 0x12, 0, FF_RESPOND | F_D_IN, resp_inquiry, NULL, /* INQUIRY */
531 	    {6,  0xe3, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
532 	{0, 0xa0, 0, FF_RESPOND | F_D_IN, resp_report_luns, NULL,
533 	    {12,  0xe3, 0xff, 0, 0, 0, 0xff, 0xff, 0xff, 0xff, 0, 0xc7, 0, 0,
534 	     0, 0} },					/* REPORT LUNS */
535 	{0, 0x3, 0, FF_RESPOND | F_D_IN, resp_requests, NULL,
536 	    {6,  0xe1, 0, 0, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
537 	{0, 0x0, 0, F_M_ACCESS | F_RL_WLUN_OK, NULL, NULL,/* TEST UNIT READY */
538 	    {6,  0, 0, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
539 /* 5 */
540 	{ARRAY_SIZE(msense_iarr), 0x5a, 0, F_D_IN,	/* MODE SENSE(10) */
541 	    resp_mode_sense, msense_iarr, {10,  0xf8, 0xff, 0xff, 0, 0, 0,
542 		0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
543 	{ARRAY_SIZE(mselect_iarr), 0x55, 0, F_D_OUT,	/* MODE SELECT(10) */
544 	    resp_mode_select, mselect_iarr, {10,  0xf1, 0, 0, 0, 0, 0, 0xff,
545 		0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
546 	{0, 0x4d, 0, F_D_IN, resp_log_sense, NULL,	/* LOG SENSE */
547 	    {10,  0xe3, 0xff, 0xff, 0, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0,
548 	     0, 0, 0} },
549 	{0, 0x25, 0, F_D_IN, resp_readcap, NULL,    /* READ CAPACITY(10) */
550 	    {10,  0xe1, 0xff, 0xff, 0xff, 0xff, 0, 0, 0x1, 0xc7, 0, 0, 0, 0,
551 	     0, 0} },
552 	{ARRAY_SIZE(read_iarr), 0x88, 0, F_D_IN | FF_MEDIA_IO, /* READ(16) */
553 	    resp_read_dt0, read_iarr, {16,  0xfe, 0xff, 0xff, 0xff, 0xff,
554 	    0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7} },
555 /* 10 */
556 	{ARRAY_SIZE(write_iarr), 0x8a, 0, F_D_OUT | FF_MEDIA_IO,
557 	    resp_write_dt0, write_iarr,			/* WRITE(16) */
558 		{16,  0xfa, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
559 		 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7} },
560 	{0, 0x1b, 0, F_SSU_DELAY, resp_start_stop, NULL,/* START STOP UNIT */
561 	    {6,  0x1, 0, 0xf, 0xf7, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
562 	{ARRAY_SIZE(sa_in_16_iarr), 0x9e, 0x10, F_SA_LOW | F_D_IN,
563 	    resp_readcap16, sa_in_16_iarr, /* SA_IN(16), READ CAPACITY(16) */
564 		{16,  0x10, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
565 		 0xff, 0xff, 0xff, 0xff, 0x1, 0xc7} },
566 	{0, 0x9f, 0x12, F_SA_LOW | F_D_OUT | FF_MEDIA_IO, resp_write_scat,
567 	    NULL, {16,  0x12, 0xf9, 0x0, 0xff, 0xff, 0, 0, 0xff, 0xff, 0xff,
568 	    0xff, 0xff, 0xff, 0xff, 0xc7} },  /* SA_OUT(16), WRITE SCAT(16) */
569 	{ARRAY_SIZE(maint_in_iarr), 0xa3, 0xa, F_SA_LOW | F_D_IN,
570 	    resp_report_tgtpgs,	/* MAINT IN, REPORT TARGET PORT GROUPS */
571 		maint_in_iarr, {12,  0xea, 0, 0, 0, 0, 0xff, 0xff, 0xff,
572 				0xff, 0, 0xc7, 0, 0, 0, 0} },
573 /* 15 */
574 	{0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* MAINT OUT */
575 	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
576 	{0, 0x2f, 0, F_D_OUT_MAYBE | FF_MEDIA_IO, NULL, NULL, /* VERIFY(10) */
577 	    {10,  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7,
578 	     0, 0, 0, 0, 0, 0} },
579 	{ARRAY_SIZE(vl_iarr), 0x7f, 0x9, F_SA_HIGH | F_D_IN | FF_MEDIA_IO,
580 	    resp_read_dt0, vl_iarr,	/* VARIABLE LENGTH, READ(32) */
581 	    {32,  0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0x9, 0xfe, 0, 0xff, 0xff,
582 	     0xff, 0xff} },
583 	{ARRAY_SIZE(reserve_iarr), 0x56, 0, F_D_OUT,
584 	    NULL, reserve_iarr,	/* RESERVE(10) <no response function> */
585 	    {10,  0xff, 0xff, 0xff, 0, 0, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0,
586 	     0} },
587 	{ARRAY_SIZE(release_iarr), 0x57, 0, F_D_OUT,
588 	    NULL, release_iarr, /* RELEASE(10) <no response function> */
589 	    {10,  0x13, 0xff, 0xff, 0, 0, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0,
590 	     0} },
591 /* 20 */
592 	{0, 0x1e, 0, 0, NULL, NULL, /* ALLOW REMOVAL */
593 	    {6,  0, 0, 0, 0x3, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
594 	{0, 0x1, 0, 0, resp_start_stop, NULL, /* REWIND ?? */
595 	    {6,  0x1, 0, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
596 	{0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* ATA_PT */
597 	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
598 	{0, 0x1d, F_D_OUT, 0, NULL, NULL,	/* SEND DIAGNOSTIC */
599 	    {6,  0xf7, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
600 	{0, 0x42, 0, F_D_OUT | FF_MEDIA_IO, resp_unmap, NULL, /* UNMAP */
601 	    {10,  0x1, 0, 0, 0, 0, 0x3f, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
602 /* 25 */
603 	{0, 0x53, 0, F_D_IN | F_D_OUT | FF_MEDIA_IO, resp_xdwriteread_10,
604 	    NULL, {10,  0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7,
605 		   0, 0, 0, 0, 0, 0} },		/* XDWRITEREAD(10) */
606 	{0, 0x3b, 0, F_D_OUT_MAYBE, resp_write_buffer, NULL,
607 	    {10,  0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0,
608 	     0, 0, 0, 0} },			/* WRITE_BUFFER */
609 	{ARRAY_SIZE(write_same_iarr), 0x41, 0, F_D_OUT_MAYBE | FF_MEDIA_IO,
610 	    resp_write_same_10, write_same_iarr,	/* WRITE SAME(10) */
611 		{10,  0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0,
612 		 0, 0, 0, 0, 0} },
613 	{ARRAY_SIZE(sync_cache_iarr), 0x35, 0, F_SYNC_DELAY | F_M_ACCESS,
614 	    resp_sync_cache, sync_cache_iarr,
615 	    {10,  0x7, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
616 	     0, 0, 0, 0} },			/* SYNC_CACHE (10) */
617 	{0, 0x89, 0, F_D_OUT | FF_MEDIA_IO, resp_comp_write, NULL,
618 	    {16,  0xf8, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0, 0,
619 	     0, 0xff, 0x3f, 0xc7} },		/* COMPARE AND WRITE */
620 
621 /* 30 */
622 	{0xff, 0, 0, 0, NULL, NULL,		/* terminating element */
623 	    {0,  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
624 };
625 
626 static int sdebug_add_host = DEF_NUM_HOST;
627 static int sdebug_ato = DEF_ATO;
628 static int sdebug_cdb_len = DEF_CDB_LEN;
629 static int sdebug_jdelay = DEF_JDELAY;	/* if > 0 then unit is jiffies */
630 static int sdebug_dev_size_mb = DEF_DEV_SIZE_MB;
631 static int sdebug_dif = DEF_DIF;
632 static int sdebug_dix = DEF_DIX;
633 static int sdebug_dsense = DEF_D_SENSE;
634 static int sdebug_every_nth = DEF_EVERY_NTH;
635 static int sdebug_fake_rw = DEF_FAKE_RW;
636 static unsigned int sdebug_guard = DEF_GUARD;
637 static int sdebug_lowest_aligned = DEF_LOWEST_ALIGNED;
638 static int sdebug_max_luns = DEF_MAX_LUNS;
639 static int sdebug_max_queue = SDEBUG_CANQUEUE;	/* per submit queue */
640 static unsigned int sdebug_medium_error_start = OPT_MEDIUM_ERR_ADDR;
641 static int sdebug_medium_error_count = OPT_MEDIUM_ERR_NUM;
642 static atomic_t retired_max_queue;	/* if > 0 then was prior max_queue */
643 static int sdebug_ndelay = DEF_NDELAY;	/* if > 0 then unit is nanoseconds */
644 static int sdebug_no_lun_0 = DEF_NO_LUN_0;
645 static int sdebug_no_uld;
646 static int sdebug_num_parts = DEF_NUM_PARTS;
647 static int sdebug_num_tgts = DEF_NUM_TGTS; /* targets per host */
648 static int sdebug_opt_blks = DEF_OPT_BLKS;
649 static int sdebug_opts = DEF_OPTS;
650 static int sdebug_physblk_exp = DEF_PHYSBLK_EXP;
651 static int sdebug_opt_xferlen_exp = DEF_OPT_XFERLEN_EXP;
652 static int sdebug_ptype = DEF_PTYPE; /* SCSI peripheral device type */
653 static int sdebug_scsi_level = DEF_SCSI_LEVEL;
654 static int sdebug_sector_size = DEF_SECTOR_SIZE;
655 static int sdebug_virtual_gb = DEF_VIRTUAL_GB;
656 static int sdebug_vpd_use_hostno = DEF_VPD_USE_HOSTNO;
657 static unsigned int sdebug_lbpu = DEF_LBPU;
658 static unsigned int sdebug_lbpws = DEF_LBPWS;
659 static unsigned int sdebug_lbpws10 = DEF_LBPWS10;
660 static unsigned int sdebug_lbprz = DEF_LBPRZ;
661 static unsigned int sdebug_unmap_alignment = DEF_UNMAP_ALIGNMENT;
662 static unsigned int sdebug_unmap_granularity = DEF_UNMAP_GRANULARITY;
663 static unsigned int sdebug_unmap_max_blocks = DEF_UNMAP_MAX_BLOCKS;
664 static unsigned int sdebug_unmap_max_desc = DEF_UNMAP_MAX_DESC;
665 static unsigned int sdebug_write_same_length = DEF_WRITESAME_LENGTH;
666 static int sdebug_uuid_ctl = DEF_UUID_CTL;
667 static bool sdebug_removable = DEF_REMOVABLE;
668 static bool sdebug_clustering;
669 static bool sdebug_host_lock = DEF_HOST_LOCK;
670 static bool sdebug_strict = DEF_STRICT;
671 static bool sdebug_any_injecting_opt;
672 static bool sdebug_verbose;
673 static bool have_dif_prot;
674 static bool write_since_sync;
675 static bool sdebug_statistics = DEF_STATISTICS;
676 
677 static unsigned int sdebug_store_sectors;
678 static sector_t sdebug_capacity;	/* in sectors */
679 
680 /* old BIOS stuff, kernel may get rid of them but some mode sense pages
681    may still need them */
682 static int sdebug_heads;		/* heads per disk */
683 static int sdebug_cylinders_per;	/* cylinders per surface */
684 static int sdebug_sectors_per;		/* sectors per cylinder */
685 
686 static LIST_HEAD(sdebug_host_list);
687 static DEFINE_SPINLOCK(sdebug_host_list_lock);
688 
689 static unsigned char *fake_storep;	/* ramdisk storage */
690 static struct t10_pi_tuple *dif_storep;	/* protection info */
691 static void *map_storep;		/* provisioning map */
692 
693 static unsigned long map_size;
694 static int num_aborts;
695 static int num_dev_resets;
696 static int num_target_resets;
697 static int num_bus_resets;
698 static int num_host_resets;
699 static int dix_writes;
700 static int dix_reads;
701 static int dif_errors;
702 
703 static int submit_queues = DEF_SUBMIT_QUEUES;  /* > 1 for multi-queue (mq) */
704 static struct sdebug_queue *sdebug_q_arr;  /* ptr to array of submit queues */
705 
706 static DEFINE_RWLOCK(atomic_rw);
707 
708 static char sdebug_proc_name[] = MY_NAME;
709 static const char *my_name = MY_NAME;
710 
711 static struct bus_type pseudo_lld_bus;
712 
713 static struct device_driver sdebug_driverfs_driver = {
714 	.name 		= sdebug_proc_name,
715 	.bus		= &pseudo_lld_bus,
716 };
717 
718 static const int check_condition_result =
719 		(DRIVER_SENSE << 24) | SAM_STAT_CHECK_CONDITION;
720 
721 static const int illegal_condition_result =
722 	(DRIVER_SENSE << 24) | (DID_ABORT << 16) | SAM_STAT_CHECK_CONDITION;
723 
724 static const int device_qfull_result =
725 	(DID_OK << 16) | (COMMAND_COMPLETE << 8) | SAM_STAT_TASK_SET_FULL;
726 
727 
728 /* Only do the extra work involved in logical block provisioning if one or
729  * more of the lbpu, lbpws or lbpws10 parameters are given and we are doing
730  * real reads and writes (i.e. not skipping them for speed).
731  */
732 static inline bool scsi_debug_lbp(void)
733 {
734 	return 0 == sdebug_fake_rw &&
735 		(sdebug_lbpu || sdebug_lbpws || sdebug_lbpws10);
736 }
737 
738 static void *fake_store(unsigned long long lba)
739 {
740 	lba = do_div(lba, sdebug_store_sectors);
741 
742 	return fake_storep + lba * sdebug_sector_size;
743 }
744 
745 static struct t10_pi_tuple *dif_store(sector_t sector)
746 {
747 	sector = sector_div(sector, sdebug_store_sectors);
748 
749 	return dif_storep + sector;
750 }
751 
752 static void sdebug_max_tgts_luns(void)
753 {
754 	struct sdebug_host_info *sdbg_host;
755 	struct Scsi_Host *hpnt;
756 
757 	spin_lock(&sdebug_host_list_lock);
758 	list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
759 		hpnt = sdbg_host->shost;
760 		if ((hpnt->this_id >= 0) &&
761 		    (sdebug_num_tgts > hpnt->this_id))
762 			hpnt->max_id = sdebug_num_tgts + 1;
763 		else
764 			hpnt->max_id = sdebug_num_tgts;
765 		/* sdebug_max_luns; */
766 		hpnt->max_lun = SCSI_W_LUN_REPORT_LUNS + 1;
767 	}
768 	spin_unlock(&sdebug_host_list_lock);
769 }
770 
771 enum sdeb_cmd_data {SDEB_IN_DATA = 0, SDEB_IN_CDB = 1};
772 
773 /* Set in_bit to -1 to indicate no bit position of invalid field */
774 static void mk_sense_invalid_fld(struct scsi_cmnd *scp,
775 				 enum sdeb_cmd_data c_d,
776 				 int in_byte, int in_bit)
777 {
778 	unsigned char *sbuff;
779 	u8 sks[4];
780 	int sl, asc;
781 
782 	sbuff = scp->sense_buffer;
783 	if (!sbuff) {
784 		sdev_printk(KERN_ERR, scp->device,
785 			    "%s: sense_buffer is NULL\n", __func__);
786 		return;
787 	}
788 	asc = c_d ? INVALID_FIELD_IN_CDB : INVALID_FIELD_IN_PARAM_LIST;
789 	memset(sbuff, 0, SCSI_SENSE_BUFFERSIZE);
790 	scsi_build_sense_buffer(sdebug_dsense, sbuff, ILLEGAL_REQUEST, asc, 0);
791 	memset(sks, 0, sizeof(sks));
792 	sks[0] = 0x80;
793 	if (c_d)
794 		sks[0] |= 0x40;
795 	if (in_bit >= 0) {
796 		sks[0] |= 0x8;
797 		sks[0] |= 0x7 & in_bit;
798 	}
799 	put_unaligned_be16(in_byte, sks + 1);
800 	if (sdebug_dsense) {
801 		sl = sbuff[7] + 8;
802 		sbuff[7] = sl;
803 		sbuff[sl] = 0x2;
804 		sbuff[sl + 1] = 0x6;
805 		memcpy(sbuff + sl + 4, sks, 3);
806 	} else
807 		memcpy(sbuff + 15, sks, 3);
808 	if (sdebug_verbose)
809 		sdev_printk(KERN_INFO, scp->device, "%s:  [sense_key,asc,ascq"
810 			    "]: [0x5,0x%x,0x0] %c byte=%d, bit=%d\n",
811 			    my_name, asc, c_d ? 'C' : 'D', in_byte, in_bit);
812 }
813 
814 static void mk_sense_buffer(struct scsi_cmnd *scp, int key, int asc, int asq)
815 {
816 	unsigned char *sbuff;
817 
818 	sbuff = scp->sense_buffer;
819 	if (!sbuff) {
820 		sdev_printk(KERN_ERR, scp->device,
821 			    "%s: sense_buffer is NULL\n", __func__);
822 		return;
823 	}
824 	memset(sbuff, 0, SCSI_SENSE_BUFFERSIZE);
825 
826 	scsi_build_sense_buffer(sdebug_dsense, sbuff, key, asc, asq);
827 
828 	if (sdebug_verbose)
829 		sdev_printk(KERN_INFO, scp->device,
830 			    "%s:  [sense_key,asc,ascq]: [0x%x,0x%x,0x%x]\n",
831 			    my_name, key, asc, asq);
832 }
833 
834 static void mk_sense_invalid_opcode(struct scsi_cmnd *scp)
835 {
836 	mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_OPCODE, 0);
837 }
838 
839 static int scsi_debug_ioctl(struct scsi_device *dev, int cmd, void __user *arg)
840 {
841 	if (sdebug_verbose) {
842 		if (0x1261 == cmd)
843 			sdev_printk(KERN_INFO, dev,
844 				    "%s: BLKFLSBUF [0x1261]\n", __func__);
845 		else if (0x5331 == cmd)
846 			sdev_printk(KERN_INFO, dev,
847 				    "%s: CDROM_GET_CAPABILITY [0x5331]\n",
848 				    __func__);
849 		else
850 			sdev_printk(KERN_INFO, dev, "%s: cmd=0x%x\n",
851 				    __func__, cmd);
852 	}
853 	return -EINVAL;
854 	/* return -ENOTTY; // correct return but upsets fdisk */
855 }
856 
857 static void config_cdb_len(struct scsi_device *sdev)
858 {
859 	switch (sdebug_cdb_len) {
860 	case 6:	/* suggest 6 byte READ, WRITE and MODE SENSE/SELECT */
861 		sdev->use_10_for_rw = false;
862 		sdev->use_16_for_rw = false;
863 		sdev->use_10_for_ms = false;
864 		break;
865 	case 10: /* suggest 10 byte RWs and 6 byte MODE SENSE/SELECT */
866 		sdev->use_10_for_rw = true;
867 		sdev->use_16_for_rw = false;
868 		sdev->use_10_for_ms = false;
869 		break;
870 	case 12: /* suggest 10 byte RWs and 10 byte MODE SENSE/SELECT */
871 		sdev->use_10_for_rw = true;
872 		sdev->use_16_for_rw = false;
873 		sdev->use_10_for_ms = true;
874 		break;
875 	case 16:
876 		sdev->use_10_for_rw = false;
877 		sdev->use_16_for_rw = true;
878 		sdev->use_10_for_ms = true;
879 		break;
880 	case 32: /* No knobs to suggest this so same as 16 for now */
881 		sdev->use_10_for_rw = false;
882 		sdev->use_16_for_rw = true;
883 		sdev->use_10_for_ms = true;
884 		break;
885 	default:
886 		pr_warn("unexpected cdb_len=%d, force to 10\n",
887 			sdebug_cdb_len);
888 		sdev->use_10_for_rw = true;
889 		sdev->use_16_for_rw = false;
890 		sdev->use_10_for_ms = false;
891 		sdebug_cdb_len = 10;
892 		break;
893 	}
894 }
895 
896 static void all_config_cdb_len(void)
897 {
898 	struct sdebug_host_info *sdbg_host;
899 	struct Scsi_Host *shost;
900 	struct scsi_device *sdev;
901 
902 	spin_lock(&sdebug_host_list_lock);
903 	list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
904 		shost = sdbg_host->shost;
905 		shost_for_each_device(sdev, shost) {
906 			config_cdb_len(sdev);
907 		}
908 	}
909 	spin_unlock(&sdebug_host_list_lock);
910 }
911 
912 static void clear_luns_changed_on_target(struct sdebug_dev_info *devip)
913 {
914 	struct sdebug_host_info *sdhp;
915 	struct sdebug_dev_info *dp;
916 
917 	spin_lock(&sdebug_host_list_lock);
918 	list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
919 		list_for_each_entry(dp, &sdhp->dev_info_list, dev_list) {
920 			if ((devip->sdbg_host == dp->sdbg_host) &&
921 			    (devip->target == dp->target))
922 				clear_bit(SDEBUG_UA_LUNS_CHANGED, dp->uas_bm);
923 		}
924 	}
925 	spin_unlock(&sdebug_host_list_lock);
926 }
927 
928 static int make_ua(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
929 {
930 	int k;
931 
932 	k = find_first_bit(devip->uas_bm, SDEBUG_NUM_UAS);
933 	if (k != SDEBUG_NUM_UAS) {
934 		const char *cp = NULL;
935 
936 		switch (k) {
937 		case SDEBUG_UA_POR:
938 			mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
939 					POWER_ON_RESET_ASCQ);
940 			if (sdebug_verbose)
941 				cp = "power on reset";
942 			break;
943 		case SDEBUG_UA_BUS_RESET:
944 			mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
945 					BUS_RESET_ASCQ);
946 			if (sdebug_verbose)
947 				cp = "bus reset";
948 			break;
949 		case SDEBUG_UA_MODE_CHANGED:
950 			mk_sense_buffer(scp, UNIT_ATTENTION, UA_CHANGED_ASC,
951 					MODE_CHANGED_ASCQ);
952 			if (sdebug_verbose)
953 				cp = "mode parameters changed";
954 			break;
955 		case SDEBUG_UA_CAPACITY_CHANGED:
956 			mk_sense_buffer(scp, UNIT_ATTENTION, UA_CHANGED_ASC,
957 					CAPACITY_CHANGED_ASCQ);
958 			if (sdebug_verbose)
959 				cp = "capacity data changed";
960 			break;
961 		case SDEBUG_UA_MICROCODE_CHANGED:
962 			mk_sense_buffer(scp, UNIT_ATTENTION,
963 					TARGET_CHANGED_ASC,
964 					MICROCODE_CHANGED_ASCQ);
965 			if (sdebug_verbose)
966 				cp = "microcode has been changed";
967 			break;
968 		case SDEBUG_UA_MICROCODE_CHANGED_WO_RESET:
969 			mk_sense_buffer(scp, UNIT_ATTENTION,
970 					TARGET_CHANGED_ASC,
971 					MICROCODE_CHANGED_WO_RESET_ASCQ);
972 			if (sdebug_verbose)
973 				cp = "microcode has been changed without reset";
974 			break;
975 		case SDEBUG_UA_LUNS_CHANGED:
976 			/*
977 			 * SPC-3 behavior is to report a UNIT ATTENTION with
978 			 * ASC/ASCQ REPORTED LUNS DATA HAS CHANGED on every LUN
979 			 * on the target, until a REPORT LUNS command is
980 			 * received.  SPC-4 behavior is to report it only once.
981 			 * NOTE:  sdebug_scsi_level does not use the same
982 			 * values as struct scsi_device->scsi_level.
983 			 */
984 			if (sdebug_scsi_level >= 6)	/* SPC-4 and above */
985 				clear_luns_changed_on_target(devip);
986 			mk_sense_buffer(scp, UNIT_ATTENTION,
987 					TARGET_CHANGED_ASC,
988 					LUNS_CHANGED_ASCQ);
989 			if (sdebug_verbose)
990 				cp = "reported luns data has changed";
991 			break;
992 		default:
993 			pr_warn("unexpected unit attention code=%d\n", k);
994 			if (sdebug_verbose)
995 				cp = "unknown";
996 			break;
997 		}
998 		clear_bit(k, devip->uas_bm);
999 		if (sdebug_verbose)
1000 			sdev_printk(KERN_INFO, scp->device,
1001 				   "%s reports: Unit attention: %s\n",
1002 				   my_name, cp);
1003 		return check_condition_result;
1004 	}
1005 	return 0;
1006 }
1007 
1008 /* Build SCSI "data-in" buffer. Returns 0 if ok else (DID_ERROR << 16). */
1009 static int fill_from_dev_buffer(struct scsi_cmnd *scp, unsigned char *arr,
1010 				int arr_len)
1011 {
1012 	int act_len;
1013 	struct scsi_data_buffer *sdb = scsi_in(scp);
1014 
1015 	if (!sdb->length)
1016 		return 0;
1017 	if (!(scsi_bidi_cmnd(scp) || scp->sc_data_direction == DMA_FROM_DEVICE))
1018 		return DID_ERROR << 16;
1019 
1020 	act_len = sg_copy_from_buffer(sdb->table.sgl, sdb->table.nents,
1021 				      arr, arr_len);
1022 	sdb->resid = scsi_bufflen(scp) - act_len;
1023 
1024 	return 0;
1025 }
1026 
1027 /* Partial build of SCSI "data-in" buffer. Returns 0 if ok else
1028  * (DID_ERROR << 16). Can write to offset in data-in buffer. If multiple
1029  * calls, not required to write in ascending offset order. Assumes resid
1030  * set to scsi_bufflen() prior to any calls.
1031  */
1032 static int p_fill_from_dev_buffer(struct scsi_cmnd *scp, const void *arr,
1033 				  int arr_len, unsigned int off_dst)
1034 {
1035 	int act_len, n;
1036 	struct scsi_data_buffer *sdb = scsi_in(scp);
1037 	off_t skip = off_dst;
1038 
1039 	if (sdb->length <= off_dst)
1040 		return 0;
1041 	if (!(scsi_bidi_cmnd(scp) || scp->sc_data_direction == DMA_FROM_DEVICE))
1042 		return DID_ERROR << 16;
1043 
1044 	act_len = sg_pcopy_from_buffer(sdb->table.sgl, sdb->table.nents,
1045 				       arr, arr_len, skip);
1046 	pr_debug("%s: off_dst=%u, scsi_bufflen=%u, act_len=%u, resid=%d\n",
1047 		 __func__, off_dst, scsi_bufflen(scp), act_len, sdb->resid);
1048 	n = (int)scsi_bufflen(scp) - ((int)off_dst + act_len);
1049 	sdb->resid = min(sdb->resid, n);
1050 	return 0;
1051 }
1052 
1053 /* Fetches from SCSI "data-out" buffer. Returns number of bytes fetched into
1054  * 'arr' or -1 if error.
1055  */
1056 static int fetch_to_dev_buffer(struct scsi_cmnd *scp, unsigned char *arr,
1057 			       int arr_len)
1058 {
1059 	if (!scsi_bufflen(scp))
1060 		return 0;
1061 	if (!(scsi_bidi_cmnd(scp) || scp->sc_data_direction == DMA_TO_DEVICE))
1062 		return -1;
1063 
1064 	return scsi_sg_copy_to_buffer(scp, arr, arr_len);
1065 }
1066 
1067 
1068 static char sdebug_inq_vendor_id[9] = "Linux   ";
1069 static char sdebug_inq_product_id[17] = "scsi_debug      ";
1070 static char sdebug_inq_product_rev[5] = SDEBUG_VERSION;
1071 /* Use some locally assigned NAAs for SAS addresses. */
1072 static const u64 naa3_comp_a = 0x3222222000000000ULL;
1073 static const u64 naa3_comp_b = 0x3333333000000000ULL;
1074 static const u64 naa3_comp_c = 0x3111111000000000ULL;
1075 
1076 /* Device identification VPD page. Returns number of bytes placed in arr */
1077 static int inquiry_vpd_83(unsigned char *arr, int port_group_id,
1078 			  int target_dev_id, int dev_id_num,
1079 			  const char *dev_id_str, int dev_id_str_len,
1080 			  const uuid_t *lu_name)
1081 {
1082 	int num, port_a;
1083 	char b[32];
1084 
1085 	port_a = target_dev_id + 1;
1086 	/* T10 vendor identifier field format (faked) */
1087 	arr[0] = 0x2;	/* ASCII */
1088 	arr[1] = 0x1;
1089 	arr[2] = 0x0;
1090 	memcpy(&arr[4], sdebug_inq_vendor_id, 8);
1091 	memcpy(&arr[12], sdebug_inq_product_id, 16);
1092 	memcpy(&arr[28], dev_id_str, dev_id_str_len);
1093 	num = 8 + 16 + dev_id_str_len;
1094 	arr[3] = num;
1095 	num += 4;
1096 	if (dev_id_num >= 0) {
1097 		if (sdebug_uuid_ctl) {
1098 			/* Locally assigned UUID */
1099 			arr[num++] = 0x1;  /* binary (not necessarily sas) */
1100 			arr[num++] = 0xa;  /* PIV=0, lu, naa */
1101 			arr[num++] = 0x0;
1102 			arr[num++] = 0x12;
1103 			arr[num++] = 0x10; /* uuid type=1, locally assigned */
1104 			arr[num++] = 0x0;
1105 			memcpy(arr + num, lu_name, 16);
1106 			num += 16;
1107 		} else {
1108 			/* NAA-3, Logical unit identifier (binary) */
1109 			arr[num++] = 0x1;  /* binary (not necessarily sas) */
1110 			arr[num++] = 0x3;  /* PIV=0, lu, naa */
1111 			arr[num++] = 0x0;
1112 			arr[num++] = 0x8;
1113 			put_unaligned_be64(naa3_comp_b + dev_id_num, arr + num);
1114 			num += 8;
1115 		}
1116 		/* Target relative port number */
1117 		arr[num++] = 0x61;	/* proto=sas, binary */
1118 		arr[num++] = 0x94;	/* PIV=1, target port, rel port */
1119 		arr[num++] = 0x0;	/* reserved */
1120 		arr[num++] = 0x4;	/* length */
1121 		arr[num++] = 0x0;	/* reserved */
1122 		arr[num++] = 0x0;	/* reserved */
1123 		arr[num++] = 0x0;
1124 		arr[num++] = 0x1;	/* relative port A */
1125 	}
1126 	/* NAA-3, Target port identifier */
1127 	arr[num++] = 0x61;	/* proto=sas, binary */
1128 	arr[num++] = 0x93;	/* piv=1, target port, naa */
1129 	arr[num++] = 0x0;
1130 	arr[num++] = 0x8;
1131 	put_unaligned_be64(naa3_comp_a + port_a, arr + num);
1132 	num += 8;
1133 	/* NAA-3, Target port group identifier */
1134 	arr[num++] = 0x61;	/* proto=sas, binary */
1135 	arr[num++] = 0x95;	/* piv=1, target port group id */
1136 	arr[num++] = 0x0;
1137 	arr[num++] = 0x4;
1138 	arr[num++] = 0;
1139 	arr[num++] = 0;
1140 	put_unaligned_be16(port_group_id, arr + num);
1141 	num += 2;
1142 	/* NAA-3, Target device identifier */
1143 	arr[num++] = 0x61;	/* proto=sas, binary */
1144 	arr[num++] = 0xa3;	/* piv=1, target device, naa */
1145 	arr[num++] = 0x0;
1146 	arr[num++] = 0x8;
1147 	put_unaligned_be64(naa3_comp_a + target_dev_id, arr + num);
1148 	num += 8;
1149 	/* SCSI name string: Target device identifier */
1150 	arr[num++] = 0x63;	/* proto=sas, UTF-8 */
1151 	arr[num++] = 0xa8;	/* piv=1, target device, SCSI name string */
1152 	arr[num++] = 0x0;
1153 	arr[num++] = 24;
1154 	memcpy(arr + num, "naa.32222220", 12);
1155 	num += 12;
1156 	snprintf(b, sizeof(b), "%08X", target_dev_id);
1157 	memcpy(arr + num, b, 8);
1158 	num += 8;
1159 	memset(arr + num, 0, 4);
1160 	num += 4;
1161 	return num;
1162 }
1163 
1164 static unsigned char vpd84_data[] = {
1165 /* from 4th byte */ 0x22,0x22,0x22,0x0,0xbb,0x0,
1166     0x22,0x22,0x22,0x0,0xbb,0x1,
1167     0x22,0x22,0x22,0x0,0xbb,0x2,
1168 };
1169 
1170 /*  Software interface identification VPD page */
1171 static int inquiry_vpd_84(unsigned char *arr)
1172 {
1173 	memcpy(arr, vpd84_data, sizeof(vpd84_data));
1174 	return sizeof(vpd84_data);
1175 }
1176 
1177 /* Management network addresses VPD page */
1178 static int inquiry_vpd_85(unsigned char *arr)
1179 {
1180 	int num = 0;
1181 	const char *na1 = "https://www.kernel.org/config";
1182 	const char *na2 = "http://www.kernel.org/log";
1183 	int plen, olen;
1184 
1185 	arr[num++] = 0x1;	/* lu, storage config */
1186 	arr[num++] = 0x0;	/* reserved */
1187 	arr[num++] = 0x0;
1188 	olen = strlen(na1);
1189 	plen = olen + 1;
1190 	if (plen % 4)
1191 		plen = ((plen / 4) + 1) * 4;
1192 	arr[num++] = plen;	/* length, null termianted, padded */
1193 	memcpy(arr + num, na1, olen);
1194 	memset(arr + num + olen, 0, plen - olen);
1195 	num += plen;
1196 
1197 	arr[num++] = 0x4;	/* lu, logging */
1198 	arr[num++] = 0x0;	/* reserved */
1199 	arr[num++] = 0x0;
1200 	olen = strlen(na2);
1201 	plen = olen + 1;
1202 	if (plen % 4)
1203 		plen = ((plen / 4) + 1) * 4;
1204 	arr[num++] = plen;	/* length, null terminated, padded */
1205 	memcpy(arr + num, na2, olen);
1206 	memset(arr + num + olen, 0, plen - olen);
1207 	num += plen;
1208 
1209 	return num;
1210 }
1211 
1212 /* SCSI ports VPD page */
1213 static int inquiry_vpd_88(unsigned char *arr, int target_dev_id)
1214 {
1215 	int num = 0;
1216 	int port_a, port_b;
1217 
1218 	port_a = target_dev_id + 1;
1219 	port_b = port_a + 1;
1220 	arr[num++] = 0x0;	/* reserved */
1221 	arr[num++] = 0x0;	/* reserved */
1222 	arr[num++] = 0x0;
1223 	arr[num++] = 0x1;	/* relative port 1 (primary) */
1224 	memset(arr + num, 0, 6);
1225 	num += 6;
1226 	arr[num++] = 0x0;
1227 	arr[num++] = 12;	/* length tp descriptor */
1228 	/* naa-5 target port identifier (A) */
1229 	arr[num++] = 0x61;	/* proto=sas, binary */
1230 	arr[num++] = 0x93;	/* PIV=1, target port, NAA */
1231 	arr[num++] = 0x0;	/* reserved */
1232 	arr[num++] = 0x8;	/* length */
1233 	put_unaligned_be64(naa3_comp_a + port_a, arr + num);
1234 	num += 8;
1235 	arr[num++] = 0x0;	/* reserved */
1236 	arr[num++] = 0x0;	/* reserved */
1237 	arr[num++] = 0x0;
1238 	arr[num++] = 0x2;	/* relative port 2 (secondary) */
1239 	memset(arr + num, 0, 6);
1240 	num += 6;
1241 	arr[num++] = 0x0;
1242 	arr[num++] = 12;	/* length tp descriptor */
1243 	/* naa-5 target port identifier (B) */
1244 	arr[num++] = 0x61;	/* proto=sas, binary */
1245 	arr[num++] = 0x93;	/* PIV=1, target port, NAA */
1246 	arr[num++] = 0x0;	/* reserved */
1247 	arr[num++] = 0x8;	/* length */
1248 	put_unaligned_be64(naa3_comp_a + port_b, arr + num);
1249 	num += 8;
1250 
1251 	return num;
1252 }
1253 
1254 
1255 static unsigned char vpd89_data[] = {
1256 /* from 4th byte */ 0,0,0,0,
1257 'l','i','n','u','x',' ',' ',' ',
1258 'S','A','T',' ','s','c','s','i','_','d','e','b','u','g',' ',' ',
1259 '1','2','3','4',
1260 0x34,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,
1261 0xec,0,0,0,
1262 0x5a,0xc,0xff,0x3f,0x37,0xc8,0x10,0,0,0,0,0,0x3f,0,0,0,
1263 0,0,0,0,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x20,0x20,0x20,0x20,
1264 0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0,0,0,0x40,0x4,0,0x2e,0x33,
1265 0x38,0x31,0x20,0x20,0x20,0x20,0x54,0x53,0x38,0x33,0x30,0x30,0x33,0x31,
1266 0x53,0x41,
1267 0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
1268 0x20,0x20,
1269 0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
1270 0x10,0x80,
1271 0,0,0,0x2f,0,0,0,0x2,0,0x2,0x7,0,0xff,0xff,0x1,0,
1272 0x3f,0,0xc1,0xff,0x3e,0,0x10,0x1,0xb0,0xf8,0x50,0x9,0,0,0x7,0,
1273 0x3,0,0x78,0,0x78,0,0xf0,0,0x78,0,0,0,0,0,0,0,
1274 0,0,0,0,0,0,0,0,0x2,0,0,0,0,0,0,0,
1275 0x7e,0,0x1b,0,0x6b,0x34,0x1,0x7d,0x3,0x40,0x69,0x34,0x1,0x3c,0x3,0x40,
1276 0x7f,0x40,0,0,0,0,0xfe,0xfe,0,0,0,0,0,0xfe,0,0,
1277 0,0,0,0,0,0,0,0,0xb0,0xf8,0x50,0x9,0,0,0,0,
1278 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1279 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1280 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1281 0x1,0,0xb0,0xf8,0x50,0x9,0xb0,0xf8,0x50,0x9,0x20,0x20,0x2,0,0xb6,0x42,
1282 0,0x80,0x8a,0,0x6,0x3c,0xa,0x3c,0xff,0xff,0xc6,0x7,0,0x1,0,0x8,
1283 0xf0,0xf,0,0x10,0x2,0,0x30,0,0,0,0,0,0,0,0x6,0xfe,
1284 0,0,0x2,0,0x50,0,0x8a,0,0x4f,0x95,0,0,0x21,0,0xb,0,
1285 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1286 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1287 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1288 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1289 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1290 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1291 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1292 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1293 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1294 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1295 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1296 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0xa5,0x51,
1297 };
1298 
1299 /* ATA Information VPD page */
1300 static int inquiry_vpd_89(unsigned char *arr)
1301 {
1302 	memcpy(arr, vpd89_data, sizeof(vpd89_data));
1303 	return sizeof(vpd89_data);
1304 }
1305 
1306 
1307 static unsigned char vpdb0_data[] = {
1308 	/* from 4th byte */ 0,0,0,4, 0,0,0x4,0, 0,0,0,64,
1309 	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1310 	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1311 	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1312 };
1313 
1314 /* Block limits VPD page (SBC-3) */
1315 static int inquiry_vpd_b0(unsigned char *arr)
1316 {
1317 	unsigned int gran;
1318 
1319 	memcpy(arr, vpdb0_data, sizeof(vpdb0_data));
1320 
1321 	/* Optimal transfer length granularity */
1322 	if (sdebug_opt_xferlen_exp != 0 &&
1323 	    sdebug_physblk_exp < sdebug_opt_xferlen_exp)
1324 		gran = 1 << sdebug_opt_xferlen_exp;
1325 	else
1326 		gran = 1 << sdebug_physblk_exp;
1327 	put_unaligned_be16(gran, arr + 2);
1328 
1329 	/* Maximum Transfer Length */
1330 	if (sdebug_store_sectors > 0x400)
1331 		put_unaligned_be32(sdebug_store_sectors, arr + 4);
1332 
1333 	/* Optimal Transfer Length */
1334 	put_unaligned_be32(sdebug_opt_blks, &arr[8]);
1335 
1336 	if (sdebug_lbpu) {
1337 		/* Maximum Unmap LBA Count */
1338 		put_unaligned_be32(sdebug_unmap_max_blocks, &arr[16]);
1339 
1340 		/* Maximum Unmap Block Descriptor Count */
1341 		put_unaligned_be32(sdebug_unmap_max_desc, &arr[20]);
1342 	}
1343 
1344 	/* Unmap Granularity Alignment */
1345 	if (sdebug_unmap_alignment) {
1346 		put_unaligned_be32(sdebug_unmap_alignment, &arr[28]);
1347 		arr[28] |= 0x80; /* UGAVALID */
1348 	}
1349 
1350 	/* Optimal Unmap Granularity */
1351 	put_unaligned_be32(sdebug_unmap_granularity, &arr[24]);
1352 
1353 	/* Maximum WRITE SAME Length */
1354 	put_unaligned_be64(sdebug_write_same_length, &arr[32]);
1355 
1356 	return 0x3c; /* Mandatory page length for Logical Block Provisioning */
1357 
1358 	return sizeof(vpdb0_data);
1359 }
1360 
1361 /* Block device characteristics VPD page (SBC-3) */
1362 static int inquiry_vpd_b1(unsigned char *arr)
1363 {
1364 	memset(arr, 0, 0x3c);
1365 	arr[0] = 0;
1366 	arr[1] = 1;	/* non rotating medium (e.g. solid state) */
1367 	arr[2] = 0;
1368 	arr[3] = 5;	/* less than 1.8" */
1369 
1370 	return 0x3c;
1371 }
1372 
1373 /* Logical block provisioning VPD page (SBC-4) */
1374 static int inquiry_vpd_b2(unsigned char *arr)
1375 {
1376 	memset(arr, 0, 0x4);
1377 	arr[0] = 0;			/* threshold exponent */
1378 	if (sdebug_lbpu)
1379 		arr[1] = 1 << 7;
1380 	if (sdebug_lbpws)
1381 		arr[1] |= 1 << 6;
1382 	if (sdebug_lbpws10)
1383 		arr[1] |= 1 << 5;
1384 	if (sdebug_lbprz && scsi_debug_lbp())
1385 		arr[1] |= (sdebug_lbprz & 0x7) << 2;  /* sbc4r07 and later */
1386 	/* anc_sup=0; dp=0 (no provisioning group descriptor) */
1387 	/* minimum_percentage=0; provisioning_type=0 (unknown) */
1388 	/* threshold_percentage=0 */
1389 	return 0x4;
1390 }
1391 
1392 #define SDEBUG_LONG_INQ_SZ 96
1393 #define SDEBUG_MAX_INQ_ARR_SZ 584
1394 
1395 static int resp_inquiry(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
1396 {
1397 	unsigned char pq_pdt;
1398 	unsigned char *arr;
1399 	unsigned char *cmd = scp->cmnd;
1400 	int alloc_len, n, ret;
1401 	bool have_wlun, is_disk;
1402 
1403 	alloc_len = get_unaligned_be16(cmd + 3);
1404 	arr = kzalloc(SDEBUG_MAX_INQ_ARR_SZ, GFP_ATOMIC);
1405 	if (! arr)
1406 		return DID_REQUEUE << 16;
1407 	is_disk = (sdebug_ptype == TYPE_DISK);
1408 	have_wlun = scsi_is_wlun(scp->device->lun);
1409 	if (have_wlun)
1410 		pq_pdt = TYPE_WLUN;	/* present, wlun */
1411 	else if (sdebug_no_lun_0 && (devip->lun == SDEBUG_LUN_0_VAL))
1412 		pq_pdt = 0x7f;	/* not present, PQ=3, PDT=0x1f */
1413 	else
1414 		pq_pdt = (sdebug_ptype & 0x1f);
1415 	arr[0] = pq_pdt;
1416 	if (0x2 & cmd[1]) {  /* CMDDT bit set */
1417 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 1);
1418 		kfree(arr);
1419 		return check_condition_result;
1420 	} else if (0x1 & cmd[1]) {  /* EVPD bit set */
1421 		int lu_id_num, port_group_id, target_dev_id, len;
1422 		char lu_id_str[6];
1423 		int host_no = devip->sdbg_host->shost->host_no;
1424 
1425 		port_group_id = (((host_no + 1) & 0x7f) << 8) +
1426 		    (devip->channel & 0x7f);
1427 		if (sdebug_vpd_use_hostno == 0)
1428 			host_no = 0;
1429 		lu_id_num = have_wlun ? -1 : (((host_no + 1) * 2000) +
1430 			    (devip->target * 1000) + devip->lun);
1431 		target_dev_id = ((host_no + 1) * 2000) +
1432 				 (devip->target * 1000) - 3;
1433 		len = scnprintf(lu_id_str, 6, "%d", lu_id_num);
1434 		if (0 == cmd[2]) { /* supported vital product data pages */
1435 			arr[1] = cmd[2];	/*sanity */
1436 			n = 4;
1437 			arr[n++] = 0x0;   /* this page */
1438 			arr[n++] = 0x80;  /* unit serial number */
1439 			arr[n++] = 0x83;  /* device identification */
1440 			arr[n++] = 0x84;  /* software interface ident. */
1441 			arr[n++] = 0x85;  /* management network addresses */
1442 			arr[n++] = 0x86;  /* extended inquiry */
1443 			arr[n++] = 0x87;  /* mode page policy */
1444 			arr[n++] = 0x88;  /* SCSI ports */
1445 			if (is_disk) {	  /* SBC only */
1446 				arr[n++] = 0x89;  /* ATA information */
1447 				arr[n++] = 0xb0;  /* Block limits */
1448 				arr[n++] = 0xb1;  /* Block characteristics */
1449 				arr[n++] = 0xb2;  /* Logical Block Prov */
1450 			}
1451 			arr[3] = n - 4;	  /* number of supported VPD pages */
1452 		} else if (0x80 == cmd[2]) { /* unit serial number */
1453 			arr[1] = cmd[2];	/*sanity */
1454 			arr[3] = len;
1455 			memcpy(&arr[4], lu_id_str, len);
1456 		} else if (0x83 == cmd[2]) { /* device identification */
1457 			arr[1] = cmd[2];	/*sanity */
1458 			arr[3] = inquiry_vpd_83(&arr[4], port_group_id,
1459 						target_dev_id, lu_id_num,
1460 						lu_id_str, len,
1461 						&devip->lu_name);
1462 		} else if (0x84 == cmd[2]) { /* Software interface ident. */
1463 			arr[1] = cmd[2];	/*sanity */
1464 			arr[3] = inquiry_vpd_84(&arr[4]);
1465 		} else if (0x85 == cmd[2]) { /* Management network addresses */
1466 			arr[1] = cmd[2];	/*sanity */
1467 			arr[3] = inquiry_vpd_85(&arr[4]);
1468 		} else if (0x86 == cmd[2]) { /* extended inquiry */
1469 			arr[1] = cmd[2];	/*sanity */
1470 			arr[3] = 0x3c;	/* number of following entries */
1471 			if (sdebug_dif == T10_PI_TYPE3_PROTECTION)
1472 				arr[4] = 0x4;	/* SPT: GRD_CHK:1 */
1473 			else if (have_dif_prot)
1474 				arr[4] = 0x5;   /* SPT: GRD_CHK:1, REF_CHK:1 */
1475 			else
1476 				arr[4] = 0x0;   /* no protection stuff */
1477 			arr[5] = 0x7;   /* head of q, ordered + simple q's */
1478 		} else if (0x87 == cmd[2]) { /* mode page policy */
1479 			arr[1] = cmd[2];	/*sanity */
1480 			arr[3] = 0x8;	/* number of following entries */
1481 			arr[4] = 0x2;	/* disconnect-reconnect mp */
1482 			arr[6] = 0x80;	/* mlus, shared */
1483 			arr[8] = 0x18;	 /* protocol specific lu */
1484 			arr[10] = 0x82;	 /* mlus, per initiator port */
1485 		} else if (0x88 == cmd[2]) { /* SCSI Ports */
1486 			arr[1] = cmd[2];	/*sanity */
1487 			arr[3] = inquiry_vpd_88(&arr[4], target_dev_id);
1488 		} else if (is_disk && 0x89 == cmd[2]) { /* ATA information */
1489 			arr[1] = cmd[2];        /*sanity */
1490 			n = inquiry_vpd_89(&arr[4]);
1491 			put_unaligned_be16(n, arr + 2);
1492 		} else if (is_disk && 0xb0 == cmd[2]) { /* Block limits */
1493 			arr[1] = cmd[2];        /*sanity */
1494 			arr[3] = inquiry_vpd_b0(&arr[4]);
1495 		} else if (is_disk && 0xb1 == cmd[2]) { /* Block char. */
1496 			arr[1] = cmd[2];        /*sanity */
1497 			arr[3] = inquiry_vpd_b1(&arr[4]);
1498 		} else if (is_disk && 0xb2 == cmd[2]) { /* LB Prov. */
1499 			arr[1] = cmd[2];        /*sanity */
1500 			arr[3] = inquiry_vpd_b2(&arr[4]);
1501 		} else {
1502 			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, -1);
1503 			kfree(arr);
1504 			return check_condition_result;
1505 		}
1506 		len = min(get_unaligned_be16(arr + 2) + 4, alloc_len);
1507 		ret = fill_from_dev_buffer(scp, arr,
1508 			    min(len, SDEBUG_MAX_INQ_ARR_SZ));
1509 		kfree(arr);
1510 		return ret;
1511 	}
1512 	/* drops through here for a standard inquiry */
1513 	arr[1] = sdebug_removable ? 0x80 : 0;	/* Removable disk */
1514 	arr[2] = sdebug_scsi_level;
1515 	arr[3] = 2;    /* response_data_format==2 */
1516 	arr[4] = SDEBUG_LONG_INQ_SZ - 5;
1517 	arr[5] = (int)have_dif_prot;	/* PROTECT bit */
1518 	if (sdebug_vpd_use_hostno == 0)
1519 		arr[5] |= 0x10; /* claim: implicit TPGS */
1520 	arr[6] = 0x10; /* claim: MultiP */
1521 	/* arr[6] |= 0x40; ... claim: EncServ (enclosure services) */
1522 	arr[7] = 0xa; /* claim: LINKED + CMDQUE */
1523 	memcpy(&arr[8], sdebug_inq_vendor_id, 8);
1524 	memcpy(&arr[16], sdebug_inq_product_id, 16);
1525 	memcpy(&arr[32], sdebug_inq_product_rev, 4);
1526 	/* Use Vendor Specific area to place driver date in ASCII hex */
1527 	memcpy(&arr[36], sdebug_version_date, 8);
1528 	/* version descriptors (2 bytes each) follow */
1529 	put_unaligned_be16(0xc0, arr + 58);   /* SAM-6 no version claimed */
1530 	put_unaligned_be16(0x5c0, arr + 60);  /* SPC-5 no version claimed */
1531 	n = 62;
1532 	if (is_disk) {		/* SBC-4 no version claimed */
1533 		put_unaligned_be16(0x600, arr + n);
1534 		n += 2;
1535 	} else if (sdebug_ptype == TYPE_TAPE) {	/* SSC-4 rev 3 */
1536 		put_unaligned_be16(0x525, arr + n);
1537 		n += 2;
1538 	}
1539 	put_unaligned_be16(0x2100, arr + n);	/* SPL-4 no version claimed */
1540 	ret = fill_from_dev_buffer(scp, arr,
1541 			    min(alloc_len, SDEBUG_LONG_INQ_SZ));
1542 	kfree(arr);
1543 	return ret;
1544 }
1545 
1546 static unsigned char iec_m_pg[] = {0x1c, 0xa, 0x08, 0, 0, 0, 0, 0,
1547 				   0, 0, 0x0, 0x0};
1548 
1549 static int resp_requests(struct scsi_cmnd *scp,
1550 			 struct sdebug_dev_info *devip)
1551 {
1552 	unsigned char *sbuff;
1553 	unsigned char *cmd = scp->cmnd;
1554 	unsigned char arr[SCSI_SENSE_BUFFERSIZE];
1555 	bool dsense;
1556 	int len = 18;
1557 
1558 	memset(arr, 0, sizeof(arr));
1559 	dsense = !!(cmd[1] & 1);
1560 	sbuff = scp->sense_buffer;
1561 	if ((iec_m_pg[2] & 0x4) && (6 == (iec_m_pg[3] & 0xf))) {
1562 		if (dsense) {
1563 			arr[0] = 0x72;
1564 			arr[1] = 0x0;		/* NO_SENSE in sense_key */
1565 			arr[2] = THRESHOLD_EXCEEDED;
1566 			arr[3] = 0xff;		/* TEST set and MRIE==6 */
1567 			len = 8;
1568 		} else {
1569 			arr[0] = 0x70;
1570 			arr[2] = 0x0;		/* NO_SENSE in sense_key */
1571 			arr[7] = 0xa;   	/* 18 byte sense buffer */
1572 			arr[12] = THRESHOLD_EXCEEDED;
1573 			arr[13] = 0xff;		/* TEST set and MRIE==6 */
1574 		}
1575 	} else {
1576 		memcpy(arr, sbuff, SCSI_SENSE_BUFFERSIZE);
1577 		if (arr[0] >= 0x70 && dsense == sdebug_dsense)
1578 			;	/* have sense and formats match */
1579 		else if (arr[0] <= 0x70) {
1580 			if (dsense) {
1581 				memset(arr, 0, 8);
1582 				arr[0] = 0x72;
1583 				len = 8;
1584 			} else {
1585 				memset(arr, 0, 18);
1586 				arr[0] = 0x70;
1587 				arr[7] = 0xa;
1588 			}
1589 		} else if (dsense) {
1590 			memset(arr, 0, 8);
1591 			arr[0] = 0x72;
1592 			arr[1] = sbuff[2];     /* sense key */
1593 			arr[2] = sbuff[12];    /* asc */
1594 			arr[3] = sbuff[13];    /* ascq */
1595 			len = 8;
1596 		} else {
1597 			memset(arr, 0, 18);
1598 			arr[0] = 0x70;
1599 			arr[2] = sbuff[1];
1600 			arr[7] = 0xa;
1601 			arr[12] = sbuff[1];
1602 			arr[13] = sbuff[3];
1603 		}
1604 
1605 	}
1606 	mk_sense_buffer(scp, 0, NO_ADDITIONAL_SENSE, 0);
1607 	return fill_from_dev_buffer(scp, arr, len);
1608 }
1609 
1610 static int resp_start_stop(struct scsi_cmnd *scp,
1611 			   struct sdebug_dev_info *devip)
1612 {
1613 	unsigned char *cmd = scp->cmnd;
1614 	int power_cond, stop;
1615 	bool changing;
1616 
1617 	power_cond = (cmd[4] & 0xf0) >> 4;
1618 	if (power_cond) {
1619 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, 7);
1620 		return check_condition_result;
1621 	}
1622 	stop = !(cmd[4] & 1);
1623 	changing = atomic_read(&devip->stopped) == !stop;
1624 	atomic_xchg(&devip->stopped, stop);
1625 	if (!changing || cmd[1] & 0x1)  /* state unchanged or IMMED set */
1626 		return SDEG_RES_IMMED_MASK;
1627 	else
1628 		return 0;
1629 }
1630 
1631 static sector_t get_sdebug_capacity(void)
1632 {
1633 	static const unsigned int gibibyte = 1073741824;
1634 
1635 	if (sdebug_virtual_gb > 0)
1636 		return (sector_t)sdebug_virtual_gb *
1637 			(gibibyte / sdebug_sector_size);
1638 	else
1639 		return sdebug_store_sectors;
1640 }
1641 
1642 #define SDEBUG_READCAP_ARR_SZ 8
1643 static int resp_readcap(struct scsi_cmnd *scp,
1644 			struct sdebug_dev_info *devip)
1645 {
1646 	unsigned char arr[SDEBUG_READCAP_ARR_SZ];
1647 	unsigned int capac;
1648 
1649 	/* following just in case virtual_gb changed */
1650 	sdebug_capacity = get_sdebug_capacity();
1651 	memset(arr, 0, SDEBUG_READCAP_ARR_SZ);
1652 	if (sdebug_capacity < 0xffffffff) {
1653 		capac = (unsigned int)sdebug_capacity - 1;
1654 		put_unaligned_be32(capac, arr + 0);
1655 	} else
1656 		put_unaligned_be32(0xffffffff, arr + 0);
1657 	put_unaligned_be16(sdebug_sector_size, arr + 6);
1658 	return fill_from_dev_buffer(scp, arr, SDEBUG_READCAP_ARR_SZ);
1659 }
1660 
1661 #define SDEBUG_READCAP16_ARR_SZ 32
1662 static int resp_readcap16(struct scsi_cmnd *scp,
1663 			  struct sdebug_dev_info *devip)
1664 {
1665 	unsigned char *cmd = scp->cmnd;
1666 	unsigned char arr[SDEBUG_READCAP16_ARR_SZ];
1667 	int alloc_len;
1668 
1669 	alloc_len = get_unaligned_be32(cmd + 10);
1670 	/* following just in case virtual_gb changed */
1671 	sdebug_capacity = get_sdebug_capacity();
1672 	memset(arr, 0, SDEBUG_READCAP16_ARR_SZ);
1673 	put_unaligned_be64((u64)(sdebug_capacity - 1), arr + 0);
1674 	put_unaligned_be32(sdebug_sector_size, arr + 8);
1675 	arr[13] = sdebug_physblk_exp & 0xf;
1676 	arr[14] = (sdebug_lowest_aligned >> 8) & 0x3f;
1677 
1678 	if (scsi_debug_lbp()) {
1679 		arr[14] |= 0x80; /* LBPME */
1680 		/* from sbc4r07, this LBPRZ field is 1 bit, but the LBPRZ in
1681 		 * the LB Provisioning VPD page is 3 bits. Note that lbprz=2
1682 		 * in the wider field maps to 0 in this field.
1683 		 */
1684 		if (sdebug_lbprz & 1)	/* precisely what the draft requires */
1685 			arr[14] |= 0x40;
1686 	}
1687 
1688 	arr[15] = sdebug_lowest_aligned & 0xff;
1689 
1690 	if (have_dif_prot) {
1691 		arr[12] = (sdebug_dif - 1) << 1; /* P_TYPE */
1692 		arr[12] |= 1; /* PROT_EN */
1693 	}
1694 
1695 	return fill_from_dev_buffer(scp, arr,
1696 				    min(alloc_len, SDEBUG_READCAP16_ARR_SZ));
1697 }
1698 
1699 #define SDEBUG_MAX_TGTPGS_ARR_SZ 1412
1700 
1701 static int resp_report_tgtpgs(struct scsi_cmnd *scp,
1702 			      struct sdebug_dev_info *devip)
1703 {
1704 	unsigned char *cmd = scp->cmnd;
1705 	unsigned char *arr;
1706 	int host_no = devip->sdbg_host->shost->host_no;
1707 	int n, ret, alen, rlen;
1708 	int port_group_a, port_group_b, port_a, port_b;
1709 
1710 	alen = get_unaligned_be32(cmd + 6);
1711 	arr = kzalloc(SDEBUG_MAX_TGTPGS_ARR_SZ, GFP_ATOMIC);
1712 	if (! arr)
1713 		return DID_REQUEUE << 16;
1714 	/*
1715 	 * EVPD page 0x88 states we have two ports, one
1716 	 * real and a fake port with no device connected.
1717 	 * So we create two port groups with one port each
1718 	 * and set the group with port B to unavailable.
1719 	 */
1720 	port_a = 0x1; /* relative port A */
1721 	port_b = 0x2; /* relative port B */
1722 	port_group_a = (((host_no + 1) & 0x7f) << 8) +
1723 			(devip->channel & 0x7f);
1724 	port_group_b = (((host_no + 1) & 0x7f) << 8) +
1725 			(devip->channel & 0x7f) + 0x80;
1726 
1727 	/*
1728 	 * The asymmetric access state is cycled according to the host_id.
1729 	 */
1730 	n = 4;
1731 	if (sdebug_vpd_use_hostno == 0) {
1732 		arr[n++] = host_no % 3; /* Asymm access state */
1733 		arr[n++] = 0x0F; /* claim: all states are supported */
1734 	} else {
1735 		arr[n++] = 0x0; /* Active/Optimized path */
1736 		arr[n++] = 0x01; /* only support active/optimized paths */
1737 	}
1738 	put_unaligned_be16(port_group_a, arr + n);
1739 	n += 2;
1740 	arr[n++] = 0;    /* Reserved */
1741 	arr[n++] = 0;    /* Status code */
1742 	arr[n++] = 0;    /* Vendor unique */
1743 	arr[n++] = 0x1;  /* One port per group */
1744 	arr[n++] = 0;    /* Reserved */
1745 	arr[n++] = 0;    /* Reserved */
1746 	put_unaligned_be16(port_a, arr + n);
1747 	n += 2;
1748 	arr[n++] = 3;    /* Port unavailable */
1749 	arr[n++] = 0x08; /* claim: only unavailalbe paths are supported */
1750 	put_unaligned_be16(port_group_b, arr + n);
1751 	n += 2;
1752 	arr[n++] = 0;    /* Reserved */
1753 	arr[n++] = 0;    /* Status code */
1754 	arr[n++] = 0;    /* Vendor unique */
1755 	arr[n++] = 0x1;  /* One port per group */
1756 	arr[n++] = 0;    /* Reserved */
1757 	arr[n++] = 0;    /* Reserved */
1758 	put_unaligned_be16(port_b, arr + n);
1759 	n += 2;
1760 
1761 	rlen = n - 4;
1762 	put_unaligned_be32(rlen, arr + 0);
1763 
1764 	/*
1765 	 * Return the smallest value of either
1766 	 * - The allocated length
1767 	 * - The constructed command length
1768 	 * - The maximum array size
1769 	 */
1770 	rlen = min(alen,n);
1771 	ret = fill_from_dev_buffer(scp, arr,
1772 				   min(rlen, SDEBUG_MAX_TGTPGS_ARR_SZ));
1773 	kfree(arr);
1774 	return ret;
1775 }
1776 
1777 static int resp_rsup_opcodes(struct scsi_cmnd *scp,
1778 			     struct sdebug_dev_info *devip)
1779 {
1780 	bool rctd;
1781 	u8 reporting_opts, req_opcode, sdeb_i, supp;
1782 	u16 req_sa, u;
1783 	u32 alloc_len, a_len;
1784 	int k, offset, len, errsts, count, bump, na;
1785 	const struct opcode_info_t *oip;
1786 	const struct opcode_info_t *r_oip;
1787 	u8 *arr;
1788 	u8 *cmd = scp->cmnd;
1789 
1790 	rctd = !!(cmd[2] & 0x80);
1791 	reporting_opts = cmd[2] & 0x7;
1792 	req_opcode = cmd[3];
1793 	req_sa = get_unaligned_be16(cmd + 4);
1794 	alloc_len = get_unaligned_be32(cmd + 6);
1795 	if (alloc_len < 4 || alloc_len > 0xffff) {
1796 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
1797 		return check_condition_result;
1798 	}
1799 	if (alloc_len > 8192)
1800 		a_len = 8192;
1801 	else
1802 		a_len = alloc_len;
1803 	arr = kzalloc((a_len < 256) ? 320 : a_len + 64, GFP_ATOMIC);
1804 	if (NULL == arr) {
1805 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
1806 				INSUFF_RES_ASCQ);
1807 		return check_condition_result;
1808 	}
1809 	switch (reporting_opts) {
1810 	case 0:	/* all commands */
1811 		/* count number of commands */
1812 		for (count = 0, oip = opcode_info_arr;
1813 		     oip->num_attached != 0xff; ++oip) {
1814 			if (F_INV_OP & oip->flags)
1815 				continue;
1816 			count += (oip->num_attached + 1);
1817 		}
1818 		bump = rctd ? 20 : 8;
1819 		put_unaligned_be32(count * bump, arr);
1820 		for (offset = 4, oip = opcode_info_arr;
1821 		     oip->num_attached != 0xff && offset < a_len; ++oip) {
1822 			if (F_INV_OP & oip->flags)
1823 				continue;
1824 			na = oip->num_attached;
1825 			arr[offset] = oip->opcode;
1826 			put_unaligned_be16(oip->sa, arr + offset + 2);
1827 			if (rctd)
1828 				arr[offset + 5] |= 0x2;
1829 			if (FF_SA & oip->flags)
1830 				arr[offset + 5] |= 0x1;
1831 			put_unaligned_be16(oip->len_mask[0], arr + offset + 6);
1832 			if (rctd)
1833 				put_unaligned_be16(0xa, arr + offset + 8);
1834 			r_oip = oip;
1835 			for (k = 0, oip = oip->arrp; k < na; ++k, ++oip) {
1836 				if (F_INV_OP & oip->flags)
1837 					continue;
1838 				offset += bump;
1839 				arr[offset] = oip->opcode;
1840 				put_unaligned_be16(oip->sa, arr + offset + 2);
1841 				if (rctd)
1842 					arr[offset + 5] |= 0x2;
1843 				if (FF_SA & oip->flags)
1844 					arr[offset + 5] |= 0x1;
1845 				put_unaligned_be16(oip->len_mask[0],
1846 						   arr + offset + 6);
1847 				if (rctd)
1848 					put_unaligned_be16(0xa,
1849 							   arr + offset + 8);
1850 			}
1851 			oip = r_oip;
1852 			offset += bump;
1853 		}
1854 		break;
1855 	case 1:	/* one command: opcode only */
1856 	case 2:	/* one command: opcode plus service action */
1857 	case 3:	/* one command: if sa==0 then opcode only else opcode+sa */
1858 		sdeb_i = opcode_ind_arr[req_opcode];
1859 		oip = &opcode_info_arr[sdeb_i];
1860 		if (F_INV_OP & oip->flags) {
1861 			supp = 1;
1862 			offset = 4;
1863 		} else {
1864 			if (1 == reporting_opts) {
1865 				if (FF_SA & oip->flags) {
1866 					mk_sense_invalid_fld(scp, SDEB_IN_CDB,
1867 							     2, 2);
1868 					kfree(arr);
1869 					return check_condition_result;
1870 				}
1871 				req_sa = 0;
1872 			} else if (2 == reporting_opts &&
1873 				   0 == (FF_SA & oip->flags)) {
1874 				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, -1);
1875 				kfree(arr);	/* point at requested sa */
1876 				return check_condition_result;
1877 			}
1878 			if (0 == (FF_SA & oip->flags) &&
1879 			    req_opcode == oip->opcode)
1880 				supp = 3;
1881 			else if (0 == (FF_SA & oip->flags)) {
1882 				na = oip->num_attached;
1883 				for (k = 0, oip = oip->arrp; k < na;
1884 				     ++k, ++oip) {
1885 					if (req_opcode == oip->opcode)
1886 						break;
1887 				}
1888 				supp = (k >= na) ? 1 : 3;
1889 			} else if (req_sa != oip->sa) {
1890 				na = oip->num_attached;
1891 				for (k = 0, oip = oip->arrp; k < na;
1892 				     ++k, ++oip) {
1893 					if (req_sa == oip->sa)
1894 						break;
1895 				}
1896 				supp = (k >= na) ? 1 : 3;
1897 			} else
1898 				supp = 3;
1899 			if (3 == supp) {
1900 				u = oip->len_mask[0];
1901 				put_unaligned_be16(u, arr + 2);
1902 				arr[4] = oip->opcode;
1903 				for (k = 1; k < u; ++k)
1904 					arr[4 + k] = (k < 16) ?
1905 						 oip->len_mask[k] : 0xff;
1906 				offset = 4 + u;
1907 			} else
1908 				offset = 4;
1909 		}
1910 		arr[1] = (rctd ? 0x80 : 0) | supp;
1911 		if (rctd) {
1912 			put_unaligned_be16(0xa, arr + offset);
1913 			offset += 12;
1914 		}
1915 		break;
1916 	default:
1917 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 2);
1918 		kfree(arr);
1919 		return check_condition_result;
1920 	}
1921 	offset = (offset < a_len) ? offset : a_len;
1922 	len = (offset < alloc_len) ? offset : alloc_len;
1923 	errsts = fill_from_dev_buffer(scp, arr, len);
1924 	kfree(arr);
1925 	return errsts;
1926 }
1927 
1928 static int resp_rsup_tmfs(struct scsi_cmnd *scp,
1929 			  struct sdebug_dev_info *devip)
1930 {
1931 	bool repd;
1932 	u32 alloc_len, len;
1933 	u8 arr[16];
1934 	u8 *cmd = scp->cmnd;
1935 
1936 	memset(arr, 0, sizeof(arr));
1937 	repd = !!(cmd[2] & 0x80);
1938 	alloc_len = get_unaligned_be32(cmd + 6);
1939 	if (alloc_len < 4) {
1940 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
1941 		return check_condition_result;
1942 	}
1943 	arr[0] = 0xc8;		/* ATS | ATSS | LURS */
1944 	arr[1] = 0x1;		/* ITNRS */
1945 	if (repd) {
1946 		arr[3] = 0xc;
1947 		len = 16;
1948 	} else
1949 		len = 4;
1950 
1951 	len = (len < alloc_len) ? len : alloc_len;
1952 	return fill_from_dev_buffer(scp, arr, len);
1953 }
1954 
1955 /* <<Following mode page info copied from ST318451LW>> */
1956 
1957 static int resp_err_recov_pg(unsigned char *p, int pcontrol, int target)
1958 {	/* Read-Write Error Recovery page for mode_sense */
1959 	unsigned char err_recov_pg[] = {0x1, 0xa, 0xc0, 11, 240, 0, 0, 0,
1960 					5, 0, 0xff, 0xff};
1961 
1962 	memcpy(p, err_recov_pg, sizeof(err_recov_pg));
1963 	if (1 == pcontrol)
1964 		memset(p + 2, 0, sizeof(err_recov_pg) - 2);
1965 	return sizeof(err_recov_pg);
1966 }
1967 
1968 static int resp_disconnect_pg(unsigned char *p, int pcontrol, int target)
1969 { 	/* Disconnect-Reconnect page for mode_sense */
1970 	unsigned char disconnect_pg[] = {0x2, 0xe, 128, 128, 0, 10, 0, 0,
1971 					 0, 0, 0, 0, 0, 0, 0, 0};
1972 
1973 	memcpy(p, disconnect_pg, sizeof(disconnect_pg));
1974 	if (1 == pcontrol)
1975 		memset(p + 2, 0, sizeof(disconnect_pg) - 2);
1976 	return sizeof(disconnect_pg);
1977 }
1978 
1979 static int resp_format_pg(unsigned char *p, int pcontrol, int target)
1980 {       /* Format device page for mode_sense */
1981 	unsigned char format_pg[] = {0x3, 0x16, 0, 0, 0, 0, 0, 0,
1982 				     0, 0, 0, 0, 0, 0, 0, 0,
1983 				     0, 0, 0, 0, 0x40, 0, 0, 0};
1984 
1985 	memcpy(p, format_pg, sizeof(format_pg));
1986 	put_unaligned_be16(sdebug_sectors_per, p + 10);
1987 	put_unaligned_be16(sdebug_sector_size, p + 12);
1988 	if (sdebug_removable)
1989 		p[20] |= 0x20; /* should agree with INQUIRY */
1990 	if (1 == pcontrol)
1991 		memset(p + 2, 0, sizeof(format_pg) - 2);
1992 	return sizeof(format_pg);
1993 }
1994 
1995 static unsigned char caching_pg[] = {0x8, 18, 0x14, 0, 0xff, 0xff, 0, 0,
1996 				     0xff, 0xff, 0xff, 0xff, 0x80, 0x14, 0, 0,
1997 				     0, 0, 0, 0};
1998 
1999 static int resp_caching_pg(unsigned char *p, int pcontrol, int target)
2000 { 	/* Caching page for mode_sense */
2001 	unsigned char ch_caching_pg[] = {/* 0x8, 18, */ 0x4, 0, 0, 0, 0, 0,
2002 		0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
2003 	unsigned char d_caching_pg[] = {0x8, 18, 0x14, 0, 0xff, 0xff, 0, 0,
2004 		0xff, 0xff, 0xff, 0xff, 0x80, 0x14, 0, 0,     0, 0, 0, 0};
2005 
2006 	if (SDEBUG_OPT_N_WCE & sdebug_opts)
2007 		caching_pg[2] &= ~0x4;	/* set WCE=0 (default WCE=1) */
2008 	memcpy(p, caching_pg, sizeof(caching_pg));
2009 	if (1 == pcontrol)
2010 		memcpy(p + 2, ch_caching_pg, sizeof(ch_caching_pg));
2011 	else if (2 == pcontrol)
2012 		memcpy(p, d_caching_pg, sizeof(d_caching_pg));
2013 	return sizeof(caching_pg);
2014 }
2015 
2016 static unsigned char ctrl_m_pg[] = {0xa, 10, 2, 0, 0, 0, 0, 0,
2017 				    0, 0, 0x2, 0x4b};
2018 
2019 static int resp_ctrl_m_pg(unsigned char *p, int pcontrol, int target)
2020 { 	/* Control mode page for mode_sense */
2021 	unsigned char ch_ctrl_m_pg[] = {/* 0xa, 10, */ 0x6, 0, 0, 0, 0, 0,
2022 					0, 0, 0, 0};
2023 	unsigned char d_ctrl_m_pg[] = {0xa, 10, 2, 0, 0, 0, 0, 0,
2024 				     0, 0, 0x2, 0x4b};
2025 
2026 	if (sdebug_dsense)
2027 		ctrl_m_pg[2] |= 0x4;
2028 	else
2029 		ctrl_m_pg[2] &= ~0x4;
2030 
2031 	if (sdebug_ato)
2032 		ctrl_m_pg[5] |= 0x80; /* ATO=1 */
2033 
2034 	memcpy(p, ctrl_m_pg, sizeof(ctrl_m_pg));
2035 	if (1 == pcontrol)
2036 		memcpy(p + 2, ch_ctrl_m_pg, sizeof(ch_ctrl_m_pg));
2037 	else if (2 == pcontrol)
2038 		memcpy(p, d_ctrl_m_pg, sizeof(d_ctrl_m_pg));
2039 	return sizeof(ctrl_m_pg);
2040 }
2041 
2042 
2043 static int resp_iec_m_pg(unsigned char *p, int pcontrol, int target)
2044 {	/* Informational Exceptions control mode page for mode_sense */
2045 	unsigned char ch_iec_m_pg[] = {/* 0x1c, 0xa, */ 0x4, 0xf, 0, 0, 0, 0,
2046 				       0, 0, 0x0, 0x0};
2047 	unsigned char d_iec_m_pg[] = {0x1c, 0xa, 0x08, 0, 0, 0, 0, 0,
2048 				      0, 0, 0x0, 0x0};
2049 
2050 	memcpy(p, iec_m_pg, sizeof(iec_m_pg));
2051 	if (1 == pcontrol)
2052 		memcpy(p + 2, ch_iec_m_pg, sizeof(ch_iec_m_pg));
2053 	else if (2 == pcontrol)
2054 		memcpy(p, d_iec_m_pg, sizeof(d_iec_m_pg));
2055 	return sizeof(iec_m_pg);
2056 }
2057 
2058 static int resp_sas_sf_m_pg(unsigned char *p, int pcontrol, int target)
2059 {	/* SAS SSP mode page - short format for mode_sense */
2060 	unsigned char sas_sf_m_pg[] = {0x19, 0x6,
2061 		0x6, 0x0, 0x7, 0xd0, 0x0, 0x0};
2062 
2063 	memcpy(p, sas_sf_m_pg, sizeof(sas_sf_m_pg));
2064 	if (1 == pcontrol)
2065 		memset(p + 2, 0, sizeof(sas_sf_m_pg) - 2);
2066 	return sizeof(sas_sf_m_pg);
2067 }
2068 
2069 
2070 static int resp_sas_pcd_m_spg(unsigned char *p, int pcontrol, int target,
2071 			      int target_dev_id)
2072 {	/* SAS phy control and discover mode page for mode_sense */
2073 	unsigned char sas_pcd_m_pg[] = {0x59, 0x1, 0, 0x64, 0, 0x6, 0, 2,
2074 		    0, 0, 0, 0, 0x10, 0x9, 0x8, 0x0,
2075 		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2076 		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2077 		    0x2, 0, 0, 0, 0, 0, 0, 0,
2078 		    0x88, 0x99, 0, 0, 0, 0, 0, 0,
2079 		    0, 0, 0, 0, 0, 0, 0, 0,
2080 		    0, 1, 0, 0, 0x10, 0x9, 0x8, 0x0,
2081 		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2082 		    0, 0, 0, 0, 0, 0, 0, 0,	/* insert SAS addr */
2083 		    0x3, 0, 0, 0, 0, 0, 0, 0,
2084 		    0x88, 0x99, 0, 0, 0, 0, 0, 0,
2085 		    0, 0, 0, 0, 0, 0, 0, 0,
2086 		};
2087 	int port_a, port_b;
2088 
2089 	put_unaligned_be64(naa3_comp_a, sas_pcd_m_pg + 16);
2090 	put_unaligned_be64(naa3_comp_c + 1, sas_pcd_m_pg + 24);
2091 	put_unaligned_be64(naa3_comp_a, sas_pcd_m_pg + 64);
2092 	put_unaligned_be64(naa3_comp_c + 1, sas_pcd_m_pg + 72);
2093 	port_a = target_dev_id + 1;
2094 	port_b = port_a + 1;
2095 	memcpy(p, sas_pcd_m_pg, sizeof(sas_pcd_m_pg));
2096 	put_unaligned_be32(port_a, p + 20);
2097 	put_unaligned_be32(port_b, p + 48 + 20);
2098 	if (1 == pcontrol)
2099 		memset(p + 4, 0, sizeof(sas_pcd_m_pg) - 4);
2100 	return sizeof(sas_pcd_m_pg);
2101 }
2102 
2103 static int resp_sas_sha_m_spg(unsigned char *p, int pcontrol)
2104 {	/* SAS SSP shared protocol specific port mode subpage */
2105 	unsigned char sas_sha_m_pg[] = {0x59, 0x2, 0, 0xc, 0, 0x6, 0x10, 0,
2106 		    0, 0, 0, 0, 0, 0, 0, 0,
2107 		};
2108 
2109 	memcpy(p, sas_sha_m_pg, sizeof(sas_sha_m_pg));
2110 	if (1 == pcontrol)
2111 		memset(p + 4, 0, sizeof(sas_sha_m_pg) - 4);
2112 	return sizeof(sas_sha_m_pg);
2113 }
2114 
2115 #define SDEBUG_MAX_MSENSE_SZ 256
2116 
2117 static int resp_mode_sense(struct scsi_cmnd *scp,
2118 			   struct sdebug_dev_info *devip)
2119 {
2120 	int pcontrol, pcode, subpcode, bd_len;
2121 	unsigned char dev_spec;
2122 	int alloc_len, offset, len, target_dev_id;
2123 	int target = scp->device->id;
2124 	unsigned char *ap;
2125 	unsigned char arr[SDEBUG_MAX_MSENSE_SZ];
2126 	unsigned char *cmd = scp->cmnd;
2127 	bool dbd, llbaa, msense_6, is_disk, bad_pcode;
2128 
2129 	dbd = !!(cmd[1] & 0x8);		/* disable block descriptors */
2130 	pcontrol = (cmd[2] & 0xc0) >> 6;
2131 	pcode = cmd[2] & 0x3f;
2132 	subpcode = cmd[3];
2133 	msense_6 = (MODE_SENSE == cmd[0]);
2134 	llbaa = msense_6 ? false : !!(cmd[1] & 0x10);
2135 	is_disk = (sdebug_ptype == TYPE_DISK);
2136 	if (is_disk && !dbd)
2137 		bd_len = llbaa ? 16 : 8;
2138 	else
2139 		bd_len = 0;
2140 	alloc_len = msense_6 ? cmd[4] : get_unaligned_be16(cmd + 7);
2141 	memset(arr, 0, SDEBUG_MAX_MSENSE_SZ);
2142 	if (0x3 == pcontrol) {  /* Saving values not supported */
2143 		mk_sense_buffer(scp, ILLEGAL_REQUEST, SAVING_PARAMS_UNSUP, 0);
2144 		return check_condition_result;
2145 	}
2146 	target_dev_id = ((devip->sdbg_host->shost->host_no + 1) * 2000) +
2147 			(devip->target * 1000) - 3;
2148 	/* for disks set DPOFUA bit and clear write protect (WP) bit */
2149 	if (is_disk)
2150 		dev_spec = 0x10;	/* =0x90 if WP=1 implies read-only */
2151 	else
2152 		dev_spec = 0x0;
2153 	if (msense_6) {
2154 		arr[2] = dev_spec;
2155 		arr[3] = bd_len;
2156 		offset = 4;
2157 	} else {
2158 		arr[3] = dev_spec;
2159 		if (16 == bd_len)
2160 			arr[4] = 0x1;	/* set LONGLBA bit */
2161 		arr[7] = bd_len;	/* assume 255 or less */
2162 		offset = 8;
2163 	}
2164 	ap = arr + offset;
2165 	if ((bd_len > 0) && (!sdebug_capacity))
2166 		sdebug_capacity = get_sdebug_capacity();
2167 
2168 	if (8 == bd_len) {
2169 		if (sdebug_capacity > 0xfffffffe)
2170 			put_unaligned_be32(0xffffffff, ap + 0);
2171 		else
2172 			put_unaligned_be32(sdebug_capacity, ap + 0);
2173 		put_unaligned_be16(sdebug_sector_size, ap + 6);
2174 		offset += bd_len;
2175 		ap = arr + offset;
2176 	} else if (16 == bd_len) {
2177 		put_unaligned_be64((u64)sdebug_capacity, ap + 0);
2178 		put_unaligned_be32(sdebug_sector_size, ap + 12);
2179 		offset += bd_len;
2180 		ap = arr + offset;
2181 	}
2182 
2183 	if ((subpcode > 0x0) && (subpcode < 0xff) && (0x19 != pcode)) {
2184 		/* TODO: Control Extension page */
2185 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2186 		return check_condition_result;
2187 	}
2188 	bad_pcode = false;
2189 
2190 	switch (pcode) {
2191 	case 0x1:	/* Read-Write error recovery page, direct access */
2192 		len = resp_err_recov_pg(ap, pcontrol, target);
2193 		offset += len;
2194 		break;
2195 	case 0x2:	/* Disconnect-Reconnect page, all devices */
2196 		len = resp_disconnect_pg(ap, pcontrol, target);
2197 		offset += len;
2198 		break;
2199 	case 0x3:       /* Format device page, direct access */
2200 		if (is_disk) {
2201 			len = resp_format_pg(ap, pcontrol, target);
2202 			offset += len;
2203 		} else
2204 			bad_pcode = true;
2205 		break;
2206 	case 0x8:	/* Caching page, direct access */
2207 		if (is_disk) {
2208 			len = resp_caching_pg(ap, pcontrol, target);
2209 			offset += len;
2210 		} else
2211 			bad_pcode = true;
2212 		break;
2213 	case 0xa:	/* Control Mode page, all devices */
2214 		len = resp_ctrl_m_pg(ap, pcontrol, target);
2215 		offset += len;
2216 		break;
2217 	case 0x19:	/* if spc==1 then sas phy, control+discover */
2218 		if ((subpcode > 0x2) && (subpcode < 0xff)) {
2219 			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2220 			return check_condition_result;
2221 		}
2222 		len = 0;
2223 		if ((0x0 == subpcode) || (0xff == subpcode))
2224 			len += resp_sas_sf_m_pg(ap + len, pcontrol, target);
2225 		if ((0x1 == subpcode) || (0xff == subpcode))
2226 			len += resp_sas_pcd_m_spg(ap + len, pcontrol, target,
2227 						  target_dev_id);
2228 		if ((0x2 == subpcode) || (0xff == subpcode))
2229 			len += resp_sas_sha_m_spg(ap + len, pcontrol);
2230 		offset += len;
2231 		break;
2232 	case 0x1c:	/* Informational Exceptions Mode page, all devices */
2233 		len = resp_iec_m_pg(ap, pcontrol, target);
2234 		offset += len;
2235 		break;
2236 	case 0x3f:	/* Read all Mode pages */
2237 		if ((0 == subpcode) || (0xff == subpcode)) {
2238 			len = resp_err_recov_pg(ap, pcontrol, target);
2239 			len += resp_disconnect_pg(ap + len, pcontrol, target);
2240 			if (is_disk) {
2241 				len += resp_format_pg(ap + len, pcontrol,
2242 						      target);
2243 				len += resp_caching_pg(ap + len, pcontrol,
2244 						       target);
2245 			}
2246 			len += resp_ctrl_m_pg(ap + len, pcontrol, target);
2247 			len += resp_sas_sf_m_pg(ap + len, pcontrol, target);
2248 			if (0xff == subpcode) {
2249 				len += resp_sas_pcd_m_spg(ap + len, pcontrol,
2250 						  target, target_dev_id);
2251 				len += resp_sas_sha_m_spg(ap + len, pcontrol);
2252 			}
2253 			len += resp_iec_m_pg(ap + len, pcontrol, target);
2254 			offset += len;
2255 		} else {
2256 			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2257 			return check_condition_result;
2258 		}
2259 		break;
2260 	default:
2261 		bad_pcode = true;
2262 		break;
2263 	}
2264 	if (bad_pcode) {
2265 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2266 		return check_condition_result;
2267 	}
2268 	if (msense_6)
2269 		arr[0] = offset - 1;
2270 	else
2271 		put_unaligned_be16((offset - 2), arr + 0);
2272 	return fill_from_dev_buffer(scp, arr, min(alloc_len, offset));
2273 }
2274 
2275 #define SDEBUG_MAX_MSELECT_SZ 512
2276 
2277 static int resp_mode_select(struct scsi_cmnd *scp,
2278 			    struct sdebug_dev_info *devip)
2279 {
2280 	int pf, sp, ps, md_len, bd_len, off, spf, pg_len;
2281 	int param_len, res, mpage;
2282 	unsigned char arr[SDEBUG_MAX_MSELECT_SZ];
2283 	unsigned char *cmd = scp->cmnd;
2284 	int mselect6 = (MODE_SELECT == cmd[0]);
2285 
2286 	memset(arr, 0, sizeof(arr));
2287 	pf = cmd[1] & 0x10;
2288 	sp = cmd[1] & 0x1;
2289 	param_len = mselect6 ? cmd[4] : get_unaligned_be16(cmd + 7);
2290 	if ((0 == pf) || sp || (param_len > SDEBUG_MAX_MSELECT_SZ)) {
2291 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, mselect6 ? 4 : 7, -1);
2292 		return check_condition_result;
2293 	}
2294 	res = fetch_to_dev_buffer(scp, arr, param_len);
2295 	if (-1 == res)
2296 		return DID_ERROR << 16;
2297 	else if (sdebug_verbose && (res < param_len))
2298 		sdev_printk(KERN_INFO, scp->device,
2299 			    "%s: cdb indicated=%d, IO sent=%d bytes\n",
2300 			    __func__, param_len, res);
2301 	md_len = mselect6 ? (arr[0] + 1) : (get_unaligned_be16(arr + 0) + 2);
2302 	bd_len = mselect6 ? arr[3] : get_unaligned_be16(arr + 6);
2303 	if (md_len > 2) {
2304 		mk_sense_invalid_fld(scp, SDEB_IN_DATA, 0, -1);
2305 		return check_condition_result;
2306 	}
2307 	off = bd_len + (mselect6 ? 4 : 8);
2308 	mpage = arr[off] & 0x3f;
2309 	ps = !!(arr[off] & 0x80);
2310 	if (ps) {
2311 		mk_sense_invalid_fld(scp, SDEB_IN_DATA, off, 7);
2312 		return check_condition_result;
2313 	}
2314 	spf = !!(arr[off] & 0x40);
2315 	pg_len = spf ? (get_unaligned_be16(arr + off + 2) + 4) :
2316 		       (arr[off + 1] + 2);
2317 	if ((pg_len + off) > param_len) {
2318 		mk_sense_buffer(scp, ILLEGAL_REQUEST,
2319 				PARAMETER_LIST_LENGTH_ERR, 0);
2320 		return check_condition_result;
2321 	}
2322 	switch (mpage) {
2323 	case 0x8:      /* Caching Mode page */
2324 		if (caching_pg[1] == arr[off + 1]) {
2325 			memcpy(caching_pg + 2, arr + off + 2,
2326 			       sizeof(caching_pg) - 2);
2327 			goto set_mode_changed_ua;
2328 		}
2329 		break;
2330 	case 0xa:      /* Control Mode page */
2331 		if (ctrl_m_pg[1] == arr[off + 1]) {
2332 			memcpy(ctrl_m_pg + 2, arr + off + 2,
2333 			       sizeof(ctrl_m_pg) - 2);
2334 			sdebug_dsense = !!(ctrl_m_pg[2] & 0x4);
2335 			goto set_mode_changed_ua;
2336 		}
2337 		break;
2338 	case 0x1c:      /* Informational Exceptions Mode page */
2339 		if (iec_m_pg[1] == arr[off + 1]) {
2340 			memcpy(iec_m_pg + 2, arr + off + 2,
2341 			       sizeof(iec_m_pg) - 2);
2342 			goto set_mode_changed_ua;
2343 		}
2344 		break;
2345 	default:
2346 		break;
2347 	}
2348 	mk_sense_invalid_fld(scp, SDEB_IN_DATA, off, 5);
2349 	return check_condition_result;
2350 set_mode_changed_ua:
2351 	set_bit(SDEBUG_UA_MODE_CHANGED, devip->uas_bm);
2352 	return 0;
2353 }
2354 
2355 static int resp_temp_l_pg(unsigned char *arr)
2356 {
2357 	unsigned char temp_l_pg[] = {0x0, 0x0, 0x3, 0x2, 0x0, 38,
2358 				     0x0, 0x1, 0x3, 0x2, 0x0, 65,
2359 		};
2360 
2361 	memcpy(arr, temp_l_pg, sizeof(temp_l_pg));
2362 	return sizeof(temp_l_pg);
2363 }
2364 
2365 static int resp_ie_l_pg(unsigned char *arr)
2366 {
2367 	unsigned char ie_l_pg[] = {0x0, 0x0, 0x3, 0x3, 0x0, 0x0, 38,
2368 		};
2369 
2370 	memcpy(arr, ie_l_pg, sizeof(ie_l_pg));
2371 	if (iec_m_pg[2] & 0x4) {	/* TEST bit set */
2372 		arr[4] = THRESHOLD_EXCEEDED;
2373 		arr[5] = 0xff;
2374 	}
2375 	return sizeof(ie_l_pg);
2376 }
2377 
2378 #define SDEBUG_MAX_LSENSE_SZ 512
2379 
2380 static int resp_log_sense(struct scsi_cmnd *scp,
2381 			  struct sdebug_dev_info *devip)
2382 {
2383 	int ppc, sp, pcode, subpcode, alloc_len, len, n;
2384 	unsigned char arr[SDEBUG_MAX_LSENSE_SZ];
2385 	unsigned char *cmd = scp->cmnd;
2386 
2387 	memset(arr, 0, sizeof(arr));
2388 	ppc = cmd[1] & 0x2;
2389 	sp = cmd[1] & 0x1;
2390 	if (ppc || sp) {
2391 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, ppc ? 1 : 0);
2392 		return check_condition_result;
2393 	}
2394 	pcode = cmd[2] & 0x3f;
2395 	subpcode = cmd[3] & 0xff;
2396 	alloc_len = get_unaligned_be16(cmd + 7);
2397 	arr[0] = pcode;
2398 	if (0 == subpcode) {
2399 		switch (pcode) {
2400 		case 0x0:	/* Supported log pages log page */
2401 			n = 4;
2402 			arr[n++] = 0x0;		/* this page */
2403 			arr[n++] = 0xd;		/* Temperature */
2404 			arr[n++] = 0x2f;	/* Informational exceptions */
2405 			arr[3] = n - 4;
2406 			break;
2407 		case 0xd:	/* Temperature log page */
2408 			arr[3] = resp_temp_l_pg(arr + 4);
2409 			break;
2410 		case 0x2f:	/* Informational exceptions log page */
2411 			arr[3] = resp_ie_l_pg(arr + 4);
2412 			break;
2413 		default:
2414 			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2415 			return check_condition_result;
2416 		}
2417 	} else if (0xff == subpcode) {
2418 		arr[0] |= 0x40;
2419 		arr[1] = subpcode;
2420 		switch (pcode) {
2421 		case 0x0:	/* Supported log pages and subpages log page */
2422 			n = 4;
2423 			arr[n++] = 0x0;
2424 			arr[n++] = 0x0;		/* 0,0 page */
2425 			arr[n++] = 0x0;
2426 			arr[n++] = 0xff;	/* this page */
2427 			arr[n++] = 0xd;
2428 			arr[n++] = 0x0;		/* Temperature */
2429 			arr[n++] = 0x2f;
2430 			arr[n++] = 0x0;	/* Informational exceptions */
2431 			arr[3] = n - 4;
2432 			break;
2433 		case 0xd:	/* Temperature subpages */
2434 			n = 4;
2435 			arr[n++] = 0xd;
2436 			arr[n++] = 0x0;		/* Temperature */
2437 			arr[3] = n - 4;
2438 			break;
2439 		case 0x2f:	/* Informational exceptions subpages */
2440 			n = 4;
2441 			arr[n++] = 0x2f;
2442 			arr[n++] = 0x0;		/* Informational exceptions */
2443 			arr[3] = n - 4;
2444 			break;
2445 		default:
2446 			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2447 			return check_condition_result;
2448 		}
2449 	} else {
2450 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2451 		return check_condition_result;
2452 	}
2453 	len = min(get_unaligned_be16(arr + 2) + 4, alloc_len);
2454 	return fill_from_dev_buffer(scp, arr,
2455 		    min(len, SDEBUG_MAX_INQ_ARR_SZ));
2456 }
2457 
2458 static int check_device_access_params(struct scsi_cmnd *scp,
2459 				      unsigned long long lba, unsigned int num)
2460 {
2461 	if (lba + num > sdebug_capacity) {
2462 		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
2463 		return check_condition_result;
2464 	}
2465 	/* transfer length excessive (tie in to block limits VPD page) */
2466 	if (num > sdebug_store_sectors) {
2467 		/* needs work to find which cdb byte 'num' comes from */
2468 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
2469 		return check_condition_result;
2470 	}
2471 	return 0;
2472 }
2473 
2474 /* Returns number of bytes copied or -1 if error. */
2475 static int do_device_access(struct scsi_cmnd *scmd, u32 sg_skip, u64 lba,
2476 			    u32 num, bool do_write)
2477 {
2478 	int ret;
2479 	u64 block, rest = 0;
2480 	struct scsi_data_buffer *sdb;
2481 	enum dma_data_direction dir;
2482 
2483 	if (do_write) {
2484 		sdb = scsi_out(scmd);
2485 		dir = DMA_TO_DEVICE;
2486 		write_since_sync = true;
2487 	} else {
2488 		sdb = scsi_in(scmd);
2489 		dir = DMA_FROM_DEVICE;
2490 	}
2491 
2492 	if (!sdb->length)
2493 		return 0;
2494 	if (!(scsi_bidi_cmnd(scmd) || scmd->sc_data_direction == dir))
2495 		return -1;
2496 
2497 	block = do_div(lba, sdebug_store_sectors);
2498 	if (block + num > sdebug_store_sectors)
2499 		rest = block + num - sdebug_store_sectors;
2500 
2501 	ret = sg_copy_buffer(sdb->table.sgl, sdb->table.nents,
2502 		   fake_storep + (block * sdebug_sector_size),
2503 		   (num - rest) * sdebug_sector_size, sg_skip, do_write);
2504 	if (ret != (num - rest) * sdebug_sector_size)
2505 		return ret;
2506 
2507 	if (rest) {
2508 		ret += sg_copy_buffer(sdb->table.sgl, sdb->table.nents,
2509 			    fake_storep, rest * sdebug_sector_size,
2510 			    sg_skip + ((num - rest) * sdebug_sector_size),
2511 			    do_write);
2512 	}
2513 
2514 	return ret;
2515 }
2516 
2517 /* If fake_store(lba,num) compares equal to arr(num), then copy top half of
2518  * arr into fake_store(lba,num) and return true. If comparison fails then
2519  * return false. */
2520 static bool comp_write_worker(u64 lba, u32 num, const u8 *arr)
2521 {
2522 	bool res;
2523 	u64 block, rest = 0;
2524 	u32 store_blks = sdebug_store_sectors;
2525 	u32 lb_size = sdebug_sector_size;
2526 
2527 	block = do_div(lba, store_blks);
2528 	if (block + num > store_blks)
2529 		rest = block + num - store_blks;
2530 
2531 	res = !memcmp(fake_storep + (block * lb_size), arr,
2532 		      (num - rest) * lb_size);
2533 	if (!res)
2534 		return res;
2535 	if (rest)
2536 		res = memcmp(fake_storep, arr + ((num - rest) * lb_size),
2537 			     rest * lb_size);
2538 	if (!res)
2539 		return res;
2540 	arr += num * lb_size;
2541 	memcpy(fake_storep + (block * lb_size), arr, (num - rest) * lb_size);
2542 	if (rest)
2543 		memcpy(fake_storep, arr + ((num - rest) * lb_size),
2544 		       rest * lb_size);
2545 	return res;
2546 }
2547 
2548 static __be16 dif_compute_csum(const void *buf, int len)
2549 {
2550 	__be16 csum;
2551 
2552 	if (sdebug_guard)
2553 		csum = (__force __be16)ip_compute_csum(buf, len);
2554 	else
2555 		csum = cpu_to_be16(crc_t10dif(buf, len));
2556 
2557 	return csum;
2558 }
2559 
2560 static int dif_verify(struct t10_pi_tuple *sdt, const void *data,
2561 		      sector_t sector, u32 ei_lba)
2562 {
2563 	__be16 csum = dif_compute_csum(data, sdebug_sector_size);
2564 
2565 	if (sdt->guard_tag != csum) {
2566 		pr_err("GUARD check failed on sector %lu rcvd 0x%04x, data 0x%04x\n",
2567 			(unsigned long)sector,
2568 			be16_to_cpu(sdt->guard_tag),
2569 			be16_to_cpu(csum));
2570 		return 0x01;
2571 	}
2572 	if (sdebug_dif == T10_PI_TYPE1_PROTECTION &&
2573 	    be32_to_cpu(sdt->ref_tag) != (sector & 0xffffffff)) {
2574 		pr_err("REF check failed on sector %lu\n",
2575 			(unsigned long)sector);
2576 		return 0x03;
2577 	}
2578 	if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
2579 	    be32_to_cpu(sdt->ref_tag) != ei_lba) {
2580 		pr_err("REF check failed on sector %lu\n",
2581 			(unsigned long)sector);
2582 		return 0x03;
2583 	}
2584 	return 0;
2585 }
2586 
2587 static void dif_copy_prot(struct scsi_cmnd *SCpnt, sector_t sector,
2588 			  unsigned int sectors, bool read)
2589 {
2590 	size_t resid;
2591 	void *paddr;
2592 	const void *dif_store_end = dif_storep + sdebug_store_sectors;
2593 	struct sg_mapping_iter miter;
2594 
2595 	/* Bytes of protection data to copy into sgl */
2596 	resid = sectors * sizeof(*dif_storep);
2597 
2598 	sg_miter_start(&miter, scsi_prot_sglist(SCpnt),
2599 			scsi_prot_sg_count(SCpnt), SG_MITER_ATOMIC |
2600 			(read ? SG_MITER_TO_SG : SG_MITER_FROM_SG));
2601 
2602 	while (sg_miter_next(&miter) && resid > 0) {
2603 		size_t len = min(miter.length, resid);
2604 		void *start = dif_store(sector);
2605 		size_t rest = 0;
2606 
2607 		if (dif_store_end < start + len)
2608 			rest = start + len - dif_store_end;
2609 
2610 		paddr = miter.addr;
2611 
2612 		if (read)
2613 			memcpy(paddr, start, len - rest);
2614 		else
2615 			memcpy(start, paddr, len - rest);
2616 
2617 		if (rest) {
2618 			if (read)
2619 				memcpy(paddr + len - rest, dif_storep, rest);
2620 			else
2621 				memcpy(dif_storep, paddr + len - rest, rest);
2622 		}
2623 
2624 		sector += len / sizeof(*dif_storep);
2625 		resid -= len;
2626 	}
2627 	sg_miter_stop(&miter);
2628 }
2629 
2630 static int prot_verify_read(struct scsi_cmnd *SCpnt, sector_t start_sec,
2631 			    unsigned int sectors, u32 ei_lba)
2632 {
2633 	unsigned int i;
2634 	struct t10_pi_tuple *sdt;
2635 	sector_t sector;
2636 
2637 	for (i = 0; i < sectors; i++, ei_lba++) {
2638 		int ret;
2639 
2640 		sector = start_sec + i;
2641 		sdt = dif_store(sector);
2642 
2643 		if (sdt->app_tag == cpu_to_be16(0xffff))
2644 			continue;
2645 
2646 		ret = dif_verify(sdt, fake_store(sector), sector, ei_lba);
2647 		if (ret) {
2648 			dif_errors++;
2649 			return ret;
2650 		}
2651 	}
2652 
2653 	dif_copy_prot(SCpnt, start_sec, sectors, true);
2654 	dix_reads++;
2655 
2656 	return 0;
2657 }
2658 
2659 static int resp_read_dt0(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
2660 {
2661 	u8 *cmd = scp->cmnd;
2662 	struct sdebug_queued_cmd *sqcp;
2663 	u64 lba;
2664 	u32 num;
2665 	u32 ei_lba;
2666 	unsigned long iflags;
2667 	int ret;
2668 	bool check_prot;
2669 
2670 	switch (cmd[0]) {
2671 	case READ_16:
2672 		ei_lba = 0;
2673 		lba = get_unaligned_be64(cmd + 2);
2674 		num = get_unaligned_be32(cmd + 10);
2675 		check_prot = true;
2676 		break;
2677 	case READ_10:
2678 		ei_lba = 0;
2679 		lba = get_unaligned_be32(cmd + 2);
2680 		num = get_unaligned_be16(cmd + 7);
2681 		check_prot = true;
2682 		break;
2683 	case READ_6:
2684 		ei_lba = 0;
2685 		lba = (u32)cmd[3] | (u32)cmd[2] << 8 |
2686 		      (u32)(cmd[1] & 0x1f) << 16;
2687 		num = (0 == cmd[4]) ? 256 : cmd[4];
2688 		check_prot = true;
2689 		break;
2690 	case READ_12:
2691 		ei_lba = 0;
2692 		lba = get_unaligned_be32(cmd + 2);
2693 		num = get_unaligned_be32(cmd + 6);
2694 		check_prot = true;
2695 		break;
2696 	case XDWRITEREAD_10:
2697 		ei_lba = 0;
2698 		lba = get_unaligned_be32(cmd + 2);
2699 		num = get_unaligned_be16(cmd + 7);
2700 		check_prot = false;
2701 		break;
2702 	default:	/* assume READ(32) */
2703 		lba = get_unaligned_be64(cmd + 12);
2704 		ei_lba = get_unaligned_be32(cmd + 20);
2705 		num = get_unaligned_be32(cmd + 28);
2706 		check_prot = false;
2707 		break;
2708 	}
2709 	if (unlikely(have_dif_prot && check_prot)) {
2710 		if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
2711 		    (cmd[1] & 0xe0)) {
2712 			mk_sense_invalid_opcode(scp);
2713 			return check_condition_result;
2714 		}
2715 		if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
2716 		     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
2717 		    (cmd[1] & 0xe0) == 0)
2718 			sdev_printk(KERN_ERR, scp->device, "Unprotected RD "
2719 				    "to DIF device\n");
2720 	}
2721 	if (unlikely(sdebug_any_injecting_opt)) {
2722 		sqcp = (struct sdebug_queued_cmd *)scp->host_scribble;
2723 
2724 		if (sqcp) {
2725 			if (sqcp->inj_short)
2726 				num /= 2;
2727 		}
2728 	} else
2729 		sqcp = NULL;
2730 
2731 	/* inline check_device_access_params() */
2732 	if (unlikely(lba + num > sdebug_capacity)) {
2733 		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
2734 		return check_condition_result;
2735 	}
2736 	/* transfer length excessive (tie in to block limits VPD page) */
2737 	if (unlikely(num > sdebug_store_sectors)) {
2738 		/* needs work to find which cdb byte 'num' comes from */
2739 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
2740 		return check_condition_result;
2741 	}
2742 
2743 	if (unlikely((SDEBUG_OPT_MEDIUM_ERR & sdebug_opts) &&
2744 		     (lba <= (sdebug_medium_error_start + sdebug_medium_error_count - 1)) &&
2745 		     ((lba + num) > sdebug_medium_error_start))) {
2746 		/* claim unrecoverable read error */
2747 		mk_sense_buffer(scp, MEDIUM_ERROR, UNRECOVERED_READ_ERR, 0);
2748 		/* set info field and valid bit for fixed descriptor */
2749 		if (0x70 == (scp->sense_buffer[0] & 0x7f)) {
2750 			scp->sense_buffer[0] |= 0x80;	/* Valid bit */
2751 			ret = (lba < OPT_MEDIUM_ERR_ADDR)
2752 			      ? OPT_MEDIUM_ERR_ADDR : (int)lba;
2753 			put_unaligned_be32(ret, scp->sense_buffer + 3);
2754 		}
2755 		scsi_set_resid(scp, scsi_bufflen(scp));
2756 		return check_condition_result;
2757 	}
2758 
2759 	read_lock_irqsave(&atomic_rw, iflags);
2760 
2761 	/* DIX + T10 DIF */
2762 	if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
2763 		int prot_ret = prot_verify_read(scp, lba, num, ei_lba);
2764 
2765 		if (prot_ret) {
2766 			read_unlock_irqrestore(&atomic_rw, iflags);
2767 			mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, prot_ret);
2768 			return illegal_condition_result;
2769 		}
2770 	}
2771 
2772 	ret = do_device_access(scp, 0, lba, num, false);
2773 	read_unlock_irqrestore(&atomic_rw, iflags);
2774 	if (unlikely(ret == -1))
2775 		return DID_ERROR << 16;
2776 
2777 	scsi_in(scp)->resid = scsi_bufflen(scp) - ret;
2778 
2779 	if (unlikely(sqcp)) {
2780 		if (sqcp->inj_recovered) {
2781 			mk_sense_buffer(scp, RECOVERED_ERROR,
2782 					THRESHOLD_EXCEEDED, 0);
2783 			return check_condition_result;
2784 		} else if (sqcp->inj_transport) {
2785 			mk_sense_buffer(scp, ABORTED_COMMAND,
2786 					TRANSPORT_PROBLEM, ACK_NAK_TO);
2787 			return check_condition_result;
2788 		} else if (sqcp->inj_dif) {
2789 			/* Logical block guard check failed */
2790 			mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
2791 			return illegal_condition_result;
2792 		} else if (sqcp->inj_dix) {
2793 			mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
2794 			return illegal_condition_result;
2795 		}
2796 	}
2797 	return 0;
2798 }
2799 
2800 static void dump_sector(unsigned char *buf, int len)
2801 {
2802 	int i, j, n;
2803 
2804 	pr_err(">>> Sector Dump <<<\n");
2805 	for (i = 0 ; i < len ; i += 16) {
2806 		char b[128];
2807 
2808 		for (j = 0, n = 0; j < 16; j++) {
2809 			unsigned char c = buf[i+j];
2810 
2811 			if (c >= 0x20 && c < 0x7e)
2812 				n += scnprintf(b + n, sizeof(b) - n,
2813 					       " %c ", buf[i+j]);
2814 			else
2815 				n += scnprintf(b + n, sizeof(b) - n,
2816 					       "%02x ", buf[i+j]);
2817 		}
2818 		pr_err("%04d: %s\n", i, b);
2819 	}
2820 }
2821 
2822 static int prot_verify_write(struct scsi_cmnd *SCpnt, sector_t start_sec,
2823 			     unsigned int sectors, u32 ei_lba)
2824 {
2825 	int ret;
2826 	struct t10_pi_tuple *sdt;
2827 	void *daddr;
2828 	sector_t sector = start_sec;
2829 	int ppage_offset;
2830 	int dpage_offset;
2831 	struct sg_mapping_iter diter;
2832 	struct sg_mapping_iter piter;
2833 
2834 	BUG_ON(scsi_sg_count(SCpnt) == 0);
2835 	BUG_ON(scsi_prot_sg_count(SCpnt) == 0);
2836 
2837 	sg_miter_start(&piter, scsi_prot_sglist(SCpnt),
2838 			scsi_prot_sg_count(SCpnt),
2839 			SG_MITER_ATOMIC | SG_MITER_FROM_SG);
2840 	sg_miter_start(&diter, scsi_sglist(SCpnt), scsi_sg_count(SCpnt),
2841 			SG_MITER_ATOMIC | SG_MITER_FROM_SG);
2842 
2843 	/* For each protection page */
2844 	while (sg_miter_next(&piter)) {
2845 		dpage_offset = 0;
2846 		if (WARN_ON(!sg_miter_next(&diter))) {
2847 			ret = 0x01;
2848 			goto out;
2849 		}
2850 
2851 		for (ppage_offset = 0; ppage_offset < piter.length;
2852 		     ppage_offset += sizeof(struct t10_pi_tuple)) {
2853 			/* If we're at the end of the current
2854 			 * data page advance to the next one
2855 			 */
2856 			if (dpage_offset >= diter.length) {
2857 				if (WARN_ON(!sg_miter_next(&diter))) {
2858 					ret = 0x01;
2859 					goto out;
2860 				}
2861 				dpage_offset = 0;
2862 			}
2863 
2864 			sdt = piter.addr + ppage_offset;
2865 			daddr = diter.addr + dpage_offset;
2866 
2867 			ret = dif_verify(sdt, daddr, sector, ei_lba);
2868 			if (ret) {
2869 				dump_sector(daddr, sdebug_sector_size);
2870 				goto out;
2871 			}
2872 
2873 			sector++;
2874 			ei_lba++;
2875 			dpage_offset += sdebug_sector_size;
2876 		}
2877 		diter.consumed = dpage_offset;
2878 		sg_miter_stop(&diter);
2879 	}
2880 	sg_miter_stop(&piter);
2881 
2882 	dif_copy_prot(SCpnt, start_sec, sectors, false);
2883 	dix_writes++;
2884 
2885 	return 0;
2886 
2887 out:
2888 	dif_errors++;
2889 	sg_miter_stop(&diter);
2890 	sg_miter_stop(&piter);
2891 	return ret;
2892 }
2893 
2894 static unsigned long lba_to_map_index(sector_t lba)
2895 {
2896 	if (sdebug_unmap_alignment)
2897 		lba += sdebug_unmap_granularity - sdebug_unmap_alignment;
2898 	sector_div(lba, sdebug_unmap_granularity);
2899 	return lba;
2900 }
2901 
2902 static sector_t map_index_to_lba(unsigned long index)
2903 {
2904 	sector_t lba = index * sdebug_unmap_granularity;
2905 
2906 	if (sdebug_unmap_alignment)
2907 		lba -= sdebug_unmap_granularity - sdebug_unmap_alignment;
2908 	return lba;
2909 }
2910 
2911 static unsigned int map_state(sector_t lba, unsigned int *num)
2912 {
2913 	sector_t end;
2914 	unsigned int mapped;
2915 	unsigned long index;
2916 	unsigned long next;
2917 
2918 	index = lba_to_map_index(lba);
2919 	mapped = test_bit(index, map_storep);
2920 
2921 	if (mapped)
2922 		next = find_next_zero_bit(map_storep, map_size, index);
2923 	else
2924 		next = find_next_bit(map_storep, map_size, index);
2925 
2926 	end = min_t(sector_t, sdebug_store_sectors,  map_index_to_lba(next));
2927 	*num = end - lba;
2928 	return mapped;
2929 }
2930 
2931 static void map_region(sector_t lba, unsigned int len)
2932 {
2933 	sector_t end = lba + len;
2934 
2935 	while (lba < end) {
2936 		unsigned long index = lba_to_map_index(lba);
2937 
2938 		if (index < map_size)
2939 			set_bit(index, map_storep);
2940 
2941 		lba = map_index_to_lba(index + 1);
2942 	}
2943 }
2944 
2945 static void unmap_region(sector_t lba, unsigned int len)
2946 {
2947 	sector_t end = lba + len;
2948 
2949 	while (lba < end) {
2950 		unsigned long index = lba_to_map_index(lba);
2951 
2952 		if (lba == map_index_to_lba(index) &&
2953 		    lba + sdebug_unmap_granularity <= end &&
2954 		    index < map_size) {
2955 			clear_bit(index, map_storep);
2956 			if (sdebug_lbprz) {  /* for LBPRZ=2 return 0xff_s */
2957 				memset(fake_storep +
2958 				       lba * sdebug_sector_size,
2959 				       (sdebug_lbprz & 1) ? 0 : 0xff,
2960 				       sdebug_sector_size *
2961 				       sdebug_unmap_granularity);
2962 			}
2963 			if (dif_storep) {
2964 				memset(dif_storep + lba, 0xff,
2965 				       sizeof(*dif_storep) *
2966 				       sdebug_unmap_granularity);
2967 			}
2968 		}
2969 		lba = map_index_to_lba(index + 1);
2970 	}
2971 }
2972 
2973 static int resp_write_dt0(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
2974 {
2975 	u8 *cmd = scp->cmnd;
2976 	u64 lba;
2977 	u32 num;
2978 	u32 ei_lba;
2979 	unsigned long iflags;
2980 	int ret;
2981 	bool check_prot;
2982 
2983 	switch (cmd[0]) {
2984 	case WRITE_16:
2985 		ei_lba = 0;
2986 		lba = get_unaligned_be64(cmd + 2);
2987 		num = get_unaligned_be32(cmd + 10);
2988 		check_prot = true;
2989 		break;
2990 	case WRITE_10:
2991 		ei_lba = 0;
2992 		lba = get_unaligned_be32(cmd + 2);
2993 		num = get_unaligned_be16(cmd + 7);
2994 		check_prot = true;
2995 		break;
2996 	case WRITE_6:
2997 		ei_lba = 0;
2998 		lba = (u32)cmd[3] | (u32)cmd[2] << 8 |
2999 		      (u32)(cmd[1] & 0x1f) << 16;
3000 		num = (0 == cmd[4]) ? 256 : cmd[4];
3001 		check_prot = true;
3002 		break;
3003 	case WRITE_12:
3004 		ei_lba = 0;
3005 		lba = get_unaligned_be32(cmd + 2);
3006 		num = get_unaligned_be32(cmd + 6);
3007 		check_prot = true;
3008 		break;
3009 	case 0x53:	/* XDWRITEREAD(10) */
3010 		ei_lba = 0;
3011 		lba = get_unaligned_be32(cmd + 2);
3012 		num = get_unaligned_be16(cmd + 7);
3013 		check_prot = false;
3014 		break;
3015 	default:	/* assume WRITE(32) */
3016 		lba = get_unaligned_be64(cmd + 12);
3017 		ei_lba = get_unaligned_be32(cmd + 20);
3018 		num = get_unaligned_be32(cmd + 28);
3019 		check_prot = false;
3020 		break;
3021 	}
3022 	if (unlikely(have_dif_prot && check_prot)) {
3023 		if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3024 		    (cmd[1] & 0xe0)) {
3025 			mk_sense_invalid_opcode(scp);
3026 			return check_condition_result;
3027 		}
3028 		if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3029 		     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3030 		    (cmd[1] & 0xe0) == 0)
3031 			sdev_printk(KERN_ERR, scp->device, "Unprotected WR "
3032 				    "to DIF device\n");
3033 	}
3034 
3035 	/* inline check_device_access_params() */
3036 	if (unlikely(lba + num > sdebug_capacity)) {
3037 		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
3038 		return check_condition_result;
3039 	}
3040 	/* transfer length excessive (tie in to block limits VPD page) */
3041 	if (unlikely(num > sdebug_store_sectors)) {
3042 		/* needs work to find which cdb byte 'num' comes from */
3043 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3044 		return check_condition_result;
3045 	}
3046 
3047 	write_lock_irqsave(&atomic_rw, iflags);
3048 
3049 	/* DIX + T10 DIF */
3050 	if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3051 		int prot_ret = prot_verify_write(scp, lba, num, ei_lba);
3052 
3053 		if (prot_ret) {
3054 			write_unlock_irqrestore(&atomic_rw, iflags);
3055 			mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, prot_ret);
3056 			return illegal_condition_result;
3057 		}
3058 	}
3059 
3060 	ret = do_device_access(scp, 0, lba, num, true);
3061 	if (unlikely(scsi_debug_lbp()))
3062 		map_region(lba, num);
3063 	write_unlock_irqrestore(&atomic_rw, iflags);
3064 	if (unlikely(-1 == ret))
3065 		return DID_ERROR << 16;
3066 	else if (unlikely(sdebug_verbose &&
3067 			  (ret < (num * sdebug_sector_size))))
3068 		sdev_printk(KERN_INFO, scp->device,
3069 			    "%s: write: cdb indicated=%u, IO sent=%d bytes\n",
3070 			    my_name, num * sdebug_sector_size, ret);
3071 
3072 	if (unlikely(sdebug_any_injecting_opt)) {
3073 		struct sdebug_queued_cmd *sqcp =
3074 				(struct sdebug_queued_cmd *)scp->host_scribble;
3075 
3076 		if (sqcp) {
3077 			if (sqcp->inj_recovered) {
3078 				mk_sense_buffer(scp, RECOVERED_ERROR,
3079 						THRESHOLD_EXCEEDED, 0);
3080 				return check_condition_result;
3081 			} else if (sqcp->inj_dif) {
3082 				/* Logical block guard check failed */
3083 				mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
3084 				return illegal_condition_result;
3085 			} else if (sqcp->inj_dix) {
3086 				mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
3087 				return illegal_condition_result;
3088 			}
3089 		}
3090 	}
3091 	return 0;
3092 }
3093 
3094 /*
3095  * T10 has only specified WRITE SCATTERED(16) and WRITE SCATTERED(32).
3096  * No READ GATHERED yet (requires bidi or long cdb holding gather list).
3097  */
3098 static int resp_write_scat(struct scsi_cmnd *scp,
3099 			   struct sdebug_dev_info *devip)
3100 {
3101 	u8 *cmd = scp->cmnd;
3102 	u8 *lrdp = NULL;
3103 	u8 *up;
3104 	u8 wrprotect;
3105 	u16 lbdof, num_lrd, k;
3106 	u32 num, num_by, bt_len, lbdof_blen, sg_off, cum_lb;
3107 	u32 lb_size = sdebug_sector_size;
3108 	u32 ei_lba;
3109 	u64 lba;
3110 	unsigned long iflags;
3111 	int ret, res;
3112 	bool is_16;
3113 	static const u32 lrd_size = 32; /* + parameter list header size */
3114 
3115 	if (cmd[0] == VARIABLE_LENGTH_CMD) {
3116 		is_16 = false;
3117 		wrprotect = (cmd[10] >> 5) & 0x7;
3118 		lbdof = get_unaligned_be16(cmd + 12);
3119 		num_lrd = get_unaligned_be16(cmd + 16);
3120 		bt_len = get_unaligned_be32(cmd + 28);
3121 	} else {        /* that leaves WRITE SCATTERED(16) */
3122 		is_16 = true;
3123 		wrprotect = (cmd[2] >> 5) & 0x7;
3124 		lbdof = get_unaligned_be16(cmd + 4);
3125 		num_lrd = get_unaligned_be16(cmd + 8);
3126 		bt_len = get_unaligned_be32(cmd + 10);
3127 		if (unlikely(have_dif_prot)) {
3128 			if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3129 			    wrprotect) {
3130 				mk_sense_invalid_opcode(scp);
3131 				return illegal_condition_result;
3132 			}
3133 			if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3134 			     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3135 			     wrprotect == 0)
3136 				sdev_printk(KERN_ERR, scp->device,
3137 					    "Unprotected WR to DIF device\n");
3138 		}
3139 	}
3140 	if ((num_lrd == 0) || (bt_len == 0))
3141 		return 0;       /* T10 says these do-nothings are not errors */
3142 	if (lbdof == 0) {
3143 		if (sdebug_verbose)
3144 			sdev_printk(KERN_INFO, scp->device,
3145 				"%s: %s: LB Data Offset field bad\n",
3146 				my_name, __func__);
3147 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3148 		return illegal_condition_result;
3149 	}
3150 	lbdof_blen = lbdof * lb_size;
3151 	if ((lrd_size + (num_lrd * lrd_size)) > lbdof_blen) {
3152 		if (sdebug_verbose)
3153 			sdev_printk(KERN_INFO, scp->device,
3154 				"%s: %s: LBA range descriptors don't fit\n",
3155 				my_name, __func__);
3156 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3157 		return illegal_condition_result;
3158 	}
3159 	lrdp = kzalloc(lbdof_blen, GFP_ATOMIC);
3160 	if (lrdp == NULL)
3161 		return SCSI_MLQUEUE_HOST_BUSY;
3162 	if (sdebug_verbose)
3163 		sdev_printk(KERN_INFO, scp->device,
3164 			"%s: %s: Fetch header+scatter_list, lbdof_blen=%u\n",
3165 			my_name, __func__, lbdof_blen);
3166 	res = fetch_to_dev_buffer(scp, lrdp, lbdof_blen);
3167 	if (res == -1) {
3168 		ret = DID_ERROR << 16;
3169 		goto err_out;
3170 	}
3171 
3172 	write_lock_irqsave(&atomic_rw, iflags);
3173 	sg_off = lbdof_blen;
3174 	/* Spec says Buffer xfer Length field in number of LBs in dout */
3175 	cum_lb = 0;
3176 	for (k = 0, up = lrdp + lrd_size; k < num_lrd; ++k, up += lrd_size) {
3177 		lba = get_unaligned_be64(up + 0);
3178 		num = get_unaligned_be32(up + 8);
3179 		if (sdebug_verbose)
3180 			sdev_printk(KERN_INFO, scp->device,
3181 				"%s: %s: k=%d  LBA=0x%llx num=%u  sg_off=%u\n",
3182 				my_name, __func__, k, lba, num, sg_off);
3183 		if (num == 0)
3184 			continue;
3185 		ret = check_device_access_params(scp, lba, num);
3186 		if (ret)
3187 			goto err_out_unlock;
3188 		num_by = num * lb_size;
3189 		ei_lba = is_16 ? 0 : get_unaligned_be32(up + 12);
3190 
3191 		if ((cum_lb + num) > bt_len) {
3192 			if (sdebug_verbose)
3193 				sdev_printk(KERN_INFO, scp->device,
3194 				    "%s: %s: sum of blocks > data provided\n",
3195 				    my_name, __func__);
3196 			mk_sense_buffer(scp, ILLEGAL_REQUEST, WRITE_ERROR_ASC,
3197 					0);
3198 			ret = illegal_condition_result;
3199 			goto err_out_unlock;
3200 		}
3201 
3202 		/* DIX + T10 DIF */
3203 		if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3204 			int prot_ret = prot_verify_write(scp, lba, num,
3205 							 ei_lba);
3206 
3207 			if (prot_ret) {
3208 				mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10,
3209 						prot_ret);
3210 				ret = illegal_condition_result;
3211 				goto err_out_unlock;
3212 			}
3213 		}
3214 
3215 		ret = do_device_access(scp, sg_off, lba, num, true);
3216 		if (unlikely(scsi_debug_lbp()))
3217 			map_region(lba, num);
3218 		if (unlikely(-1 == ret)) {
3219 			ret = DID_ERROR << 16;
3220 			goto err_out_unlock;
3221 		} else if (unlikely(sdebug_verbose && (ret < num_by)))
3222 			sdev_printk(KERN_INFO, scp->device,
3223 			    "%s: write: cdb indicated=%u, IO sent=%d bytes\n",
3224 			    my_name, num_by, ret);
3225 
3226 		if (unlikely(sdebug_any_injecting_opt)) {
3227 			struct sdebug_queued_cmd *sqcp =
3228 				(struct sdebug_queued_cmd *)scp->host_scribble;
3229 
3230 			if (sqcp) {
3231 				if (sqcp->inj_recovered) {
3232 					mk_sense_buffer(scp, RECOVERED_ERROR,
3233 							THRESHOLD_EXCEEDED, 0);
3234 					ret = illegal_condition_result;
3235 					goto err_out_unlock;
3236 				} else if (sqcp->inj_dif) {
3237 					/* Logical block guard check failed */
3238 					mk_sense_buffer(scp, ABORTED_COMMAND,
3239 							0x10, 1);
3240 					ret = illegal_condition_result;
3241 					goto err_out_unlock;
3242 				} else if (sqcp->inj_dix) {
3243 					mk_sense_buffer(scp, ILLEGAL_REQUEST,
3244 							0x10, 1);
3245 					ret = illegal_condition_result;
3246 					goto err_out_unlock;
3247 				}
3248 			}
3249 		}
3250 		sg_off += num_by;
3251 		cum_lb += num;
3252 	}
3253 	ret = 0;
3254 err_out_unlock:
3255 	write_unlock_irqrestore(&atomic_rw, iflags);
3256 err_out:
3257 	kfree(lrdp);
3258 	return ret;
3259 }
3260 
3261 static int resp_write_same(struct scsi_cmnd *scp, u64 lba, u32 num,
3262 			   u32 ei_lba, bool unmap, bool ndob)
3263 {
3264 	unsigned long iflags;
3265 	unsigned long long i;
3266 	int ret;
3267 	u64 lba_off;
3268 
3269 	ret = check_device_access_params(scp, lba, num);
3270 	if (ret)
3271 		return ret;
3272 
3273 	write_lock_irqsave(&atomic_rw, iflags);
3274 
3275 	if (unmap && scsi_debug_lbp()) {
3276 		unmap_region(lba, num);
3277 		goto out;
3278 	}
3279 
3280 	lba_off = lba * sdebug_sector_size;
3281 	/* if ndob then zero 1 logical block, else fetch 1 logical block */
3282 	if (ndob) {
3283 		memset(fake_storep + lba_off, 0, sdebug_sector_size);
3284 		ret = 0;
3285 	} else
3286 		ret = fetch_to_dev_buffer(scp, fake_storep + lba_off,
3287 					  sdebug_sector_size);
3288 
3289 	if (-1 == ret) {
3290 		write_unlock_irqrestore(&atomic_rw, iflags);
3291 		return DID_ERROR << 16;
3292 	} else if (sdebug_verbose && !ndob && (ret < sdebug_sector_size))
3293 		sdev_printk(KERN_INFO, scp->device,
3294 			    "%s: %s: lb size=%u, IO sent=%d bytes\n",
3295 			    my_name, "write same",
3296 			    sdebug_sector_size, ret);
3297 
3298 	/* Copy first sector to remaining blocks */
3299 	for (i = 1 ; i < num ; i++)
3300 		memcpy(fake_storep + ((lba + i) * sdebug_sector_size),
3301 		       fake_storep + lba_off,
3302 		       sdebug_sector_size);
3303 
3304 	if (scsi_debug_lbp())
3305 		map_region(lba, num);
3306 out:
3307 	write_unlock_irqrestore(&atomic_rw, iflags);
3308 
3309 	return 0;
3310 }
3311 
3312 static int resp_write_same_10(struct scsi_cmnd *scp,
3313 			      struct sdebug_dev_info *devip)
3314 {
3315 	u8 *cmd = scp->cmnd;
3316 	u32 lba;
3317 	u16 num;
3318 	u32 ei_lba = 0;
3319 	bool unmap = false;
3320 
3321 	if (cmd[1] & 0x8) {
3322 		if (sdebug_lbpws10 == 0) {
3323 			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 3);
3324 			return check_condition_result;
3325 		} else
3326 			unmap = true;
3327 	}
3328 	lba = get_unaligned_be32(cmd + 2);
3329 	num = get_unaligned_be16(cmd + 7);
3330 	if (num > sdebug_write_same_length) {
3331 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 7, -1);
3332 		return check_condition_result;
3333 	}
3334 	return resp_write_same(scp, lba, num, ei_lba, unmap, false);
3335 }
3336 
3337 static int resp_write_same_16(struct scsi_cmnd *scp,
3338 			      struct sdebug_dev_info *devip)
3339 {
3340 	u8 *cmd = scp->cmnd;
3341 	u64 lba;
3342 	u32 num;
3343 	u32 ei_lba = 0;
3344 	bool unmap = false;
3345 	bool ndob = false;
3346 
3347 	if (cmd[1] & 0x8) {	/* UNMAP */
3348 		if (sdebug_lbpws == 0) {
3349 			mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 3);
3350 			return check_condition_result;
3351 		} else
3352 			unmap = true;
3353 	}
3354 	if (cmd[1] & 0x1)  /* NDOB (no data-out buffer, assumes zeroes) */
3355 		ndob = true;
3356 	lba = get_unaligned_be64(cmd + 2);
3357 	num = get_unaligned_be32(cmd + 10);
3358 	if (num > sdebug_write_same_length) {
3359 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 10, -1);
3360 		return check_condition_result;
3361 	}
3362 	return resp_write_same(scp, lba, num, ei_lba, unmap, ndob);
3363 }
3364 
3365 /* Note the mode field is in the same position as the (lower) service action
3366  * field. For the Report supported operation codes command, SPC-4 suggests
3367  * each mode of this command should be reported separately; for future. */
3368 static int resp_write_buffer(struct scsi_cmnd *scp,
3369 			     struct sdebug_dev_info *devip)
3370 {
3371 	u8 *cmd = scp->cmnd;
3372 	struct scsi_device *sdp = scp->device;
3373 	struct sdebug_dev_info *dp;
3374 	u8 mode;
3375 
3376 	mode = cmd[1] & 0x1f;
3377 	switch (mode) {
3378 	case 0x4:	/* download microcode (MC) and activate (ACT) */
3379 		/* set UAs on this device only */
3380 		set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
3381 		set_bit(SDEBUG_UA_MICROCODE_CHANGED, devip->uas_bm);
3382 		break;
3383 	case 0x5:	/* download MC, save and ACT */
3384 		set_bit(SDEBUG_UA_MICROCODE_CHANGED_WO_RESET, devip->uas_bm);
3385 		break;
3386 	case 0x6:	/* download MC with offsets and ACT */
3387 		/* set UAs on most devices (LUs) in this target */
3388 		list_for_each_entry(dp,
3389 				    &devip->sdbg_host->dev_info_list,
3390 				    dev_list)
3391 			if (dp->target == sdp->id) {
3392 				set_bit(SDEBUG_UA_BUS_RESET, dp->uas_bm);
3393 				if (devip != dp)
3394 					set_bit(SDEBUG_UA_MICROCODE_CHANGED,
3395 						dp->uas_bm);
3396 			}
3397 		break;
3398 	case 0x7:	/* download MC with offsets, save, and ACT */
3399 		/* set UA on all devices (LUs) in this target */
3400 		list_for_each_entry(dp,
3401 				    &devip->sdbg_host->dev_info_list,
3402 				    dev_list)
3403 			if (dp->target == sdp->id)
3404 				set_bit(SDEBUG_UA_MICROCODE_CHANGED_WO_RESET,
3405 					dp->uas_bm);
3406 		break;
3407 	default:
3408 		/* do nothing for this command for other mode values */
3409 		break;
3410 	}
3411 	return 0;
3412 }
3413 
3414 static int resp_comp_write(struct scsi_cmnd *scp,
3415 			   struct sdebug_dev_info *devip)
3416 {
3417 	u8 *cmd = scp->cmnd;
3418 	u8 *arr;
3419 	u8 *fake_storep_hold;
3420 	u64 lba;
3421 	u32 dnum;
3422 	u32 lb_size = sdebug_sector_size;
3423 	u8 num;
3424 	unsigned long iflags;
3425 	int ret;
3426 	int retval = 0;
3427 
3428 	lba = get_unaligned_be64(cmd + 2);
3429 	num = cmd[13];		/* 1 to a maximum of 255 logical blocks */
3430 	if (0 == num)
3431 		return 0;	/* degenerate case, not an error */
3432 	if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3433 	    (cmd[1] & 0xe0)) {
3434 		mk_sense_invalid_opcode(scp);
3435 		return check_condition_result;
3436 	}
3437 	if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3438 	     sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3439 	    (cmd[1] & 0xe0) == 0)
3440 		sdev_printk(KERN_ERR, scp->device, "Unprotected WR "
3441 			    "to DIF device\n");
3442 
3443 	/* inline check_device_access_params() */
3444 	if (lba + num > sdebug_capacity) {
3445 		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
3446 		return check_condition_result;
3447 	}
3448 	/* transfer length excessive (tie in to block limits VPD page) */
3449 	if (num > sdebug_store_sectors) {
3450 		/* needs work to find which cdb byte 'num' comes from */
3451 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3452 		return check_condition_result;
3453 	}
3454 	dnum = 2 * num;
3455 	arr = kcalloc(lb_size, dnum, GFP_ATOMIC);
3456 	if (NULL == arr) {
3457 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
3458 				INSUFF_RES_ASCQ);
3459 		return check_condition_result;
3460 	}
3461 
3462 	write_lock_irqsave(&atomic_rw, iflags);
3463 
3464 	/* trick do_device_access() to fetch both compare and write buffers
3465 	 * from data-in into arr. Safe (atomic) since write_lock held. */
3466 	fake_storep_hold = fake_storep;
3467 	fake_storep = arr;
3468 	ret = do_device_access(scp, 0, 0, dnum, true);
3469 	fake_storep = fake_storep_hold;
3470 	if (ret == -1) {
3471 		retval = DID_ERROR << 16;
3472 		goto cleanup;
3473 	} else if (sdebug_verbose && (ret < (dnum * lb_size)))
3474 		sdev_printk(KERN_INFO, scp->device, "%s: compare_write: cdb "
3475 			    "indicated=%u, IO sent=%d bytes\n", my_name,
3476 			    dnum * lb_size, ret);
3477 	if (!comp_write_worker(lba, num, arr)) {
3478 		mk_sense_buffer(scp, MISCOMPARE, MISCOMPARE_VERIFY_ASC, 0);
3479 		retval = check_condition_result;
3480 		goto cleanup;
3481 	}
3482 	if (scsi_debug_lbp())
3483 		map_region(lba, num);
3484 cleanup:
3485 	write_unlock_irqrestore(&atomic_rw, iflags);
3486 	kfree(arr);
3487 	return retval;
3488 }
3489 
3490 struct unmap_block_desc {
3491 	__be64	lba;
3492 	__be32	blocks;
3493 	__be32	__reserved;
3494 };
3495 
3496 static int resp_unmap(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
3497 {
3498 	unsigned char *buf;
3499 	struct unmap_block_desc *desc;
3500 	unsigned int i, payload_len, descriptors;
3501 	int ret;
3502 	unsigned long iflags;
3503 
3504 
3505 	if (!scsi_debug_lbp())
3506 		return 0;	/* fib and say its done */
3507 	payload_len = get_unaligned_be16(scp->cmnd + 7);
3508 	BUG_ON(scsi_bufflen(scp) != payload_len);
3509 
3510 	descriptors = (payload_len - 8) / 16;
3511 	if (descriptors > sdebug_unmap_max_desc) {
3512 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 7, -1);
3513 		return check_condition_result;
3514 	}
3515 
3516 	buf = kzalloc(scsi_bufflen(scp), GFP_ATOMIC);
3517 	if (!buf) {
3518 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
3519 				INSUFF_RES_ASCQ);
3520 		return check_condition_result;
3521 	}
3522 
3523 	scsi_sg_copy_to_buffer(scp, buf, scsi_bufflen(scp));
3524 
3525 	BUG_ON(get_unaligned_be16(&buf[0]) != payload_len - 2);
3526 	BUG_ON(get_unaligned_be16(&buf[2]) != descriptors * 16);
3527 
3528 	desc = (void *)&buf[8];
3529 
3530 	write_lock_irqsave(&atomic_rw, iflags);
3531 
3532 	for (i = 0 ; i < descriptors ; i++) {
3533 		unsigned long long lba = get_unaligned_be64(&desc[i].lba);
3534 		unsigned int num = get_unaligned_be32(&desc[i].blocks);
3535 
3536 		ret = check_device_access_params(scp, lba, num);
3537 		if (ret)
3538 			goto out;
3539 
3540 		unmap_region(lba, num);
3541 	}
3542 
3543 	ret = 0;
3544 
3545 out:
3546 	write_unlock_irqrestore(&atomic_rw, iflags);
3547 	kfree(buf);
3548 
3549 	return ret;
3550 }
3551 
3552 #define SDEBUG_GET_LBA_STATUS_LEN 32
3553 
3554 static int resp_get_lba_status(struct scsi_cmnd *scp,
3555 			       struct sdebug_dev_info *devip)
3556 {
3557 	u8 *cmd = scp->cmnd;
3558 	u64 lba;
3559 	u32 alloc_len, mapped, num;
3560 	u8 arr[SDEBUG_GET_LBA_STATUS_LEN];
3561 	int ret;
3562 
3563 	lba = get_unaligned_be64(cmd + 2);
3564 	alloc_len = get_unaligned_be32(cmd + 10);
3565 
3566 	if (alloc_len < 24)
3567 		return 0;
3568 
3569 	ret = check_device_access_params(scp, lba, 1);
3570 	if (ret)
3571 		return ret;
3572 
3573 	if (scsi_debug_lbp())
3574 		mapped = map_state(lba, &num);
3575 	else {
3576 		mapped = 1;
3577 		/* following just in case virtual_gb changed */
3578 		sdebug_capacity = get_sdebug_capacity();
3579 		if (sdebug_capacity - lba <= 0xffffffff)
3580 			num = sdebug_capacity - lba;
3581 		else
3582 			num = 0xffffffff;
3583 	}
3584 
3585 	memset(arr, 0, SDEBUG_GET_LBA_STATUS_LEN);
3586 	put_unaligned_be32(20, arr);		/* Parameter Data Length */
3587 	put_unaligned_be64(lba, arr + 8);	/* LBA */
3588 	put_unaligned_be32(num, arr + 16);	/* Number of blocks */
3589 	arr[20] = !mapped;		/* prov_stat=0: mapped; 1: dealloc */
3590 
3591 	return fill_from_dev_buffer(scp, arr, SDEBUG_GET_LBA_STATUS_LEN);
3592 }
3593 
3594 static int resp_sync_cache(struct scsi_cmnd *scp,
3595 			   struct sdebug_dev_info *devip)
3596 {
3597 	int res = 0;
3598 	u64 lba;
3599 	u32 num_blocks;
3600 	u8 *cmd = scp->cmnd;
3601 
3602 	if (cmd[0] == SYNCHRONIZE_CACHE) {	/* 10 byte cdb */
3603 		lba = get_unaligned_be32(cmd + 2);
3604 		num_blocks = get_unaligned_be16(cmd + 7);
3605 	} else {				/* SYNCHRONIZE_CACHE(16) */
3606 		lba = get_unaligned_be64(cmd + 2);
3607 		num_blocks = get_unaligned_be32(cmd + 10);
3608 	}
3609 	if (lba + num_blocks > sdebug_capacity) {
3610 		mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
3611 		return check_condition_result;
3612 	}
3613 	if (!write_since_sync || cmd[1] & 0x2)
3614 		res = SDEG_RES_IMMED_MASK;
3615 	else		/* delay if write_since_sync and IMMED clear */
3616 		write_since_sync = false;
3617 	return res;
3618 }
3619 
3620 #define RL_BUCKET_ELEMS 8
3621 
3622 /* Even though each pseudo target has a REPORT LUNS "well known logical unit"
3623  * (W-LUN), the normal Linux scanning logic does not associate it with a
3624  * device (e.g. /dev/sg7). The following magic will make that association:
3625  *   "cd /sys/class/scsi_host/host<n> ; echo '- - 49409' > scan"
3626  * where <n> is a host number. If there are multiple targets in a host then
3627  * the above will associate a W-LUN to each target. To only get a W-LUN
3628  * for target 2, then use "echo '- 2 49409' > scan" .
3629  */
3630 static int resp_report_luns(struct scsi_cmnd *scp,
3631 			    struct sdebug_dev_info *devip)
3632 {
3633 	unsigned char *cmd = scp->cmnd;
3634 	unsigned int alloc_len;
3635 	unsigned char select_report;
3636 	u64 lun;
3637 	struct scsi_lun *lun_p;
3638 	u8 arr[RL_BUCKET_ELEMS * sizeof(struct scsi_lun)];
3639 	unsigned int lun_cnt;	/* normal LUN count (max: 256) */
3640 	unsigned int wlun_cnt;	/* report luns W-LUN count */
3641 	unsigned int tlun_cnt;	/* total LUN count */
3642 	unsigned int rlen;	/* response length (in bytes) */
3643 	int k, j, n, res;
3644 	unsigned int off_rsp = 0;
3645 	const int sz_lun = sizeof(struct scsi_lun);
3646 
3647 	clear_luns_changed_on_target(devip);
3648 
3649 	select_report = cmd[2];
3650 	alloc_len = get_unaligned_be32(cmd + 6);
3651 
3652 	if (alloc_len < 4) {
3653 		pr_err("alloc len too small %d\n", alloc_len);
3654 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
3655 		return check_condition_result;
3656 	}
3657 
3658 	switch (select_report) {
3659 	case 0:		/* all LUNs apart from W-LUNs */
3660 		lun_cnt = sdebug_max_luns;
3661 		wlun_cnt = 0;
3662 		break;
3663 	case 1:		/* only W-LUNs */
3664 		lun_cnt = 0;
3665 		wlun_cnt = 1;
3666 		break;
3667 	case 2:		/* all LUNs */
3668 		lun_cnt = sdebug_max_luns;
3669 		wlun_cnt = 1;
3670 		break;
3671 	case 0x10:	/* only administrative LUs */
3672 	case 0x11:	/* see SPC-5 */
3673 	case 0x12:	/* only subsiduary LUs owned by referenced LU */
3674 	default:
3675 		pr_debug("select report invalid %d\n", select_report);
3676 		mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, -1);
3677 		return check_condition_result;
3678 	}
3679 
3680 	if (sdebug_no_lun_0 && (lun_cnt > 0))
3681 		--lun_cnt;
3682 
3683 	tlun_cnt = lun_cnt + wlun_cnt;
3684 	rlen = tlun_cnt * sz_lun;	/* excluding 8 byte header */
3685 	scsi_set_resid(scp, scsi_bufflen(scp));
3686 	pr_debug("select_report %d luns = %d wluns = %d no_lun0 %d\n",
3687 		 select_report, lun_cnt, wlun_cnt, sdebug_no_lun_0);
3688 
3689 	/* loops rely on sizeof response header same as sizeof lun (both 8) */
3690 	lun = sdebug_no_lun_0 ? 1 : 0;
3691 	for (k = 0, j = 0, res = 0; true; ++k, j = 0) {
3692 		memset(arr, 0, sizeof(arr));
3693 		lun_p = (struct scsi_lun *)&arr[0];
3694 		if (k == 0) {
3695 			put_unaligned_be32(rlen, &arr[0]);
3696 			++lun_p;
3697 			j = 1;
3698 		}
3699 		for ( ; j < RL_BUCKET_ELEMS; ++j, ++lun_p) {
3700 			if ((k * RL_BUCKET_ELEMS) + j > lun_cnt)
3701 				break;
3702 			int_to_scsilun(lun++, lun_p);
3703 		}
3704 		if (j < RL_BUCKET_ELEMS)
3705 			break;
3706 		n = j * sz_lun;
3707 		res = p_fill_from_dev_buffer(scp, arr, n, off_rsp);
3708 		if (res)
3709 			return res;
3710 		off_rsp += n;
3711 	}
3712 	if (wlun_cnt) {
3713 		int_to_scsilun(SCSI_W_LUN_REPORT_LUNS, lun_p);
3714 		++j;
3715 	}
3716 	if (j > 0)
3717 		res = p_fill_from_dev_buffer(scp, arr, j * sz_lun, off_rsp);
3718 	return res;
3719 }
3720 
3721 static int resp_xdwriteread(struct scsi_cmnd *scp, unsigned long long lba,
3722 			    unsigned int num, struct sdebug_dev_info *devip)
3723 {
3724 	int j;
3725 	unsigned char *kaddr, *buf;
3726 	unsigned int offset;
3727 	struct scsi_data_buffer *sdb = scsi_in(scp);
3728 	struct sg_mapping_iter miter;
3729 
3730 	/* better not to use temporary buffer. */
3731 	buf = kzalloc(scsi_bufflen(scp), GFP_ATOMIC);
3732 	if (!buf) {
3733 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
3734 				INSUFF_RES_ASCQ);
3735 		return check_condition_result;
3736 	}
3737 
3738 	scsi_sg_copy_to_buffer(scp, buf, scsi_bufflen(scp));
3739 
3740 	offset = 0;
3741 	sg_miter_start(&miter, sdb->table.sgl, sdb->table.nents,
3742 			SG_MITER_ATOMIC | SG_MITER_TO_SG);
3743 
3744 	while (sg_miter_next(&miter)) {
3745 		kaddr = miter.addr;
3746 		for (j = 0; j < miter.length; j++)
3747 			*(kaddr + j) ^= *(buf + offset + j);
3748 
3749 		offset += miter.length;
3750 	}
3751 	sg_miter_stop(&miter);
3752 	kfree(buf);
3753 
3754 	return 0;
3755 }
3756 
3757 static int resp_xdwriteread_10(struct scsi_cmnd *scp,
3758 			       struct sdebug_dev_info *devip)
3759 {
3760 	u8 *cmd = scp->cmnd;
3761 	u64 lba;
3762 	u32 num;
3763 	int errsts;
3764 
3765 	if (!scsi_bidi_cmnd(scp)) {
3766 		mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
3767 				INSUFF_RES_ASCQ);
3768 		return check_condition_result;
3769 	}
3770 	errsts = resp_read_dt0(scp, devip);
3771 	if (errsts)
3772 		return errsts;
3773 	if (!(cmd[1] & 0x4)) {		/* DISABLE_WRITE is not set */
3774 		errsts = resp_write_dt0(scp, devip);
3775 		if (errsts)
3776 			return errsts;
3777 	}
3778 	lba = get_unaligned_be32(cmd + 2);
3779 	num = get_unaligned_be16(cmd + 7);
3780 	return resp_xdwriteread(scp, lba, num, devip);
3781 }
3782 
3783 static struct sdebug_queue *get_queue(struct scsi_cmnd *cmnd)
3784 {
3785 	u32 tag = blk_mq_unique_tag(cmnd->request);
3786 	u16 hwq = blk_mq_unique_tag_to_hwq(tag);
3787 
3788 	pr_debug("tag=%#x, hwq=%d\n", tag, hwq);
3789 	if (WARN_ON_ONCE(hwq >= submit_queues))
3790 		hwq = 0;
3791 	return sdebug_q_arr + hwq;
3792 }
3793 
3794 /* Queued (deferred) command completions converge here. */
3795 static void sdebug_q_cmd_complete(struct sdebug_defer *sd_dp)
3796 {
3797 	bool aborted = sd_dp->aborted;
3798 	int qc_idx;
3799 	int retiring = 0;
3800 	unsigned long iflags;
3801 	struct sdebug_queue *sqp;
3802 	struct sdebug_queued_cmd *sqcp;
3803 	struct scsi_cmnd *scp;
3804 	struct sdebug_dev_info *devip;
3805 
3806 	sd_dp->defer_t = SDEB_DEFER_NONE;
3807 	if (unlikely(aborted))
3808 		sd_dp->aborted = false;
3809 	qc_idx = sd_dp->qc_idx;
3810 	sqp = sdebug_q_arr + sd_dp->sqa_idx;
3811 	if (sdebug_statistics) {
3812 		atomic_inc(&sdebug_completions);
3813 		if (raw_smp_processor_id() != sd_dp->issuing_cpu)
3814 			atomic_inc(&sdebug_miss_cpus);
3815 	}
3816 	if (unlikely((qc_idx < 0) || (qc_idx >= SDEBUG_CANQUEUE))) {
3817 		pr_err("wild qc_idx=%d\n", qc_idx);
3818 		return;
3819 	}
3820 	spin_lock_irqsave(&sqp->qc_lock, iflags);
3821 	sqcp = &sqp->qc_arr[qc_idx];
3822 	scp = sqcp->a_cmnd;
3823 	if (unlikely(scp == NULL)) {
3824 		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3825 		pr_err("scp is NULL, sqa_idx=%d, qc_idx=%d\n",
3826 		       sd_dp->sqa_idx, qc_idx);
3827 		return;
3828 	}
3829 	devip = (struct sdebug_dev_info *)scp->device->hostdata;
3830 	if (likely(devip))
3831 		atomic_dec(&devip->num_in_q);
3832 	else
3833 		pr_err("devip=NULL\n");
3834 	if (unlikely(atomic_read(&retired_max_queue) > 0))
3835 		retiring = 1;
3836 
3837 	sqcp->a_cmnd = NULL;
3838 	if (unlikely(!test_and_clear_bit(qc_idx, sqp->in_use_bm))) {
3839 		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3840 		pr_err("Unexpected completion\n");
3841 		return;
3842 	}
3843 
3844 	if (unlikely(retiring)) {	/* user has reduced max_queue */
3845 		int k, retval;
3846 
3847 		retval = atomic_read(&retired_max_queue);
3848 		if (qc_idx >= retval) {
3849 			spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3850 			pr_err("index %d too large\n", retval);
3851 			return;
3852 		}
3853 		k = find_last_bit(sqp->in_use_bm, retval);
3854 		if ((k < sdebug_max_queue) || (k == retval))
3855 			atomic_set(&retired_max_queue, 0);
3856 		else
3857 			atomic_set(&retired_max_queue, k + 1);
3858 	}
3859 	spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3860 	if (unlikely(aborted)) {
3861 		if (sdebug_verbose)
3862 			pr_info("bypassing scsi_done() due to aborted cmd\n");
3863 		return;
3864 	}
3865 	scp->scsi_done(scp); /* callback to mid level */
3866 }
3867 
3868 /* When high resolution timer goes off this function is called. */
3869 static enum hrtimer_restart sdebug_q_cmd_hrt_complete(struct hrtimer *timer)
3870 {
3871 	struct sdebug_defer *sd_dp = container_of(timer, struct sdebug_defer,
3872 						  hrt);
3873 	sdebug_q_cmd_complete(sd_dp);
3874 	return HRTIMER_NORESTART;
3875 }
3876 
3877 /* When work queue schedules work, it calls this function. */
3878 static void sdebug_q_cmd_wq_complete(struct work_struct *work)
3879 {
3880 	struct sdebug_defer *sd_dp = container_of(work, struct sdebug_defer,
3881 						  ew.work);
3882 	sdebug_q_cmd_complete(sd_dp);
3883 }
3884 
3885 static bool got_shared_uuid;
3886 static uuid_t shared_uuid;
3887 
3888 static struct sdebug_dev_info *sdebug_device_create(
3889 			struct sdebug_host_info *sdbg_host, gfp_t flags)
3890 {
3891 	struct sdebug_dev_info *devip;
3892 
3893 	devip = kzalloc(sizeof(*devip), flags);
3894 	if (devip) {
3895 		if (sdebug_uuid_ctl == 1)
3896 			uuid_gen(&devip->lu_name);
3897 		else if (sdebug_uuid_ctl == 2) {
3898 			if (got_shared_uuid)
3899 				devip->lu_name = shared_uuid;
3900 			else {
3901 				uuid_gen(&shared_uuid);
3902 				got_shared_uuid = true;
3903 				devip->lu_name = shared_uuid;
3904 			}
3905 		}
3906 		devip->sdbg_host = sdbg_host;
3907 		list_add_tail(&devip->dev_list, &sdbg_host->dev_info_list);
3908 	}
3909 	return devip;
3910 }
3911 
3912 static struct sdebug_dev_info *find_build_dev_info(struct scsi_device *sdev)
3913 {
3914 	struct sdebug_host_info *sdbg_host;
3915 	struct sdebug_dev_info *open_devip = NULL;
3916 	struct sdebug_dev_info *devip;
3917 
3918 	sdbg_host = *(struct sdebug_host_info **)shost_priv(sdev->host);
3919 	if (!sdbg_host) {
3920 		pr_err("Host info NULL\n");
3921 		return NULL;
3922 	}
3923 	list_for_each_entry(devip, &sdbg_host->dev_info_list, dev_list) {
3924 		if ((devip->used) && (devip->channel == sdev->channel) &&
3925 		    (devip->target == sdev->id) &&
3926 		    (devip->lun == sdev->lun))
3927 			return devip;
3928 		else {
3929 			if ((!devip->used) && (!open_devip))
3930 				open_devip = devip;
3931 		}
3932 	}
3933 	if (!open_devip) { /* try and make a new one */
3934 		open_devip = sdebug_device_create(sdbg_host, GFP_ATOMIC);
3935 		if (!open_devip) {
3936 			pr_err("out of memory at line %d\n", __LINE__);
3937 			return NULL;
3938 		}
3939 	}
3940 
3941 	open_devip->channel = sdev->channel;
3942 	open_devip->target = sdev->id;
3943 	open_devip->lun = sdev->lun;
3944 	open_devip->sdbg_host = sdbg_host;
3945 	atomic_set(&open_devip->num_in_q, 0);
3946 	set_bit(SDEBUG_UA_POR, open_devip->uas_bm);
3947 	open_devip->used = true;
3948 	return open_devip;
3949 }
3950 
3951 static int scsi_debug_slave_alloc(struct scsi_device *sdp)
3952 {
3953 	if (sdebug_verbose)
3954 		pr_info("slave_alloc <%u %u %u %llu>\n",
3955 		       sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
3956 	blk_queue_flag_set(QUEUE_FLAG_BIDI, sdp->request_queue);
3957 	return 0;
3958 }
3959 
3960 static int scsi_debug_slave_configure(struct scsi_device *sdp)
3961 {
3962 	struct sdebug_dev_info *devip =
3963 			(struct sdebug_dev_info *)sdp->hostdata;
3964 
3965 	if (sdebug_verbose)
3966 		pr_info("slave_configure <%u %u %u %llu>\n",
3967 		       sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
3968 	if (sdp->host->max_cmd_len != SDEBUG_MAX_CMD_LEN)
3969 		sdp->host->max_cmd_len = SDEBUG_MAX_CMD_LEN;
3970 	if (devip == NULL) {
3971 		devip = find_build_dev_info(sdp);
3972 		if (devip == NULL)
3973 			return 1;  /* no resources, will be marked offline */
3974 	}
3975 	sdp->hostdata = devip;
3976 	if (sdebug_no_uld)
3977 		sdp->no_uld_attach = 1;
3978 	config_cdb_len(sdp);
3979 	return 0;
3980 }
3981 
3982 static void scsi_debug_slave_destroy(struct scsi_device *sdp)
3983 {
3984 	struct sdebug_dev_info *devip =
3985 		(struct sdebug_dev_info *)sdp->hostdata;
3986 
3987 	if (sdebug_verbose)
3988 		pr_info("slave_destroy <%u %u %u %llu>\n",
3989 		       sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
3990 	if (devip) {
3991 		/* make this slot available for re-use */
3992 		devip->used = false;
3993 		sdp->hostdata = NULL;
3994 	}
3995 }
3996 
3997 static void stop_qc_helper(struct sdebug_defer *sd_dp,
3998 			   enum sdeb_defer_type defer_t)
3999 {
4000 	if (!sd_dp)
4001 		return;
4002 	if (defer_t == SDEB_DEFER_HRT)
4003 		hrtimer_cancel(&sd_dp->hrt);
4004 	else if (defer_t == SDEB_DEFER_WQ)
4005 		cancel_work_sync(&sd_dp->ew.work);
4006 }
4007 
4008 /* If @cmnd found deletes its timer or work queue and returns true; else
4009    returns false */
4010 static bool stop_queued_cmnd(struct scsi_cmnd *cmnd)
4011 {
4012 	unsigned long iflags;
4013 	int j, k, qmax, r_qmax;
4014 	enum sdeb_defer_type l_defer_t;
4015 	struct sdebug_queue *sqp;
4016 	struct sdebug_queued_cmd *sqcp;
4017 	struct sdebug_dev_info *devip;
4018 	struct sdebug_defer *sd_dp;
4019 
4020 	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
4021 		spin_lock_irqsave(&sqp->qc_lock, iflags);
4022 		qmax = sdebug_max_queue;
4023 		r_qmax = atomic_read(&retired_max_queue);
4024 		if (r_qmax > qmax)
4025 			qmax = r_qmax;
4026 		for (k = 0; k < qmax; ++k) {
4027 			if (test_bit(k, sqp->in_use_bm)) {
4028 				sqcp = &sqp->qc_arr[k];
4029 				if (cmnd != sqcp->a_cmnd)
4030 					continue;
4031 				/* found */
4032 				devip = (struct sdebug_dev_info *)
4033 						cmnd->device->hostdata;
4034 				if (devip)
4035 					atomic_dec(&devip->num_in_q);
4036 				sqcp->a_cmnd = NULL;
4037 				sd_dp = sqcp->sd_dp;
4038 				if (sd_dp) {
4039 					l_defer_t = sd_dp->defer_t;
4040 					sd_dp->defer_t = SDEB_DEFER_NONE;
4041 				} else
4042 					l_defer_t = SDEB_DEFER_NONE;
4043 				spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4044 				stop_qc_helper(sd_dp, l_defer_t);
4045 				clear_bit(k, sqp->in_use_bm);
4046 				return true;
4047 			}
4048 		}
4049 		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4050 	}
4051 	return false;
4052 }
4053 
4054 /* Deletes (stops) timers or work queues of all queued commands */
4055 static void stop_all_queued(void)
4056 {
4057 	unsigned long iflags;
4058 	int j, k;
4059 	enum sdeb_defer_type l_defer_t;
4060 	struct sdebug_queue *sqp;
4061 	struct sdebug_queued_cmd *sqcp;
4062 	struct sdebug_dev_info *devip;
4063 	struct sdebug_defer *sd_dp;
4064 
4065 	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
4066 		spin_lock_irqsave(&sqp->qc_lock, iflags);
4067 		for (k = 0; k < SDEBUG_CANQUEUE; ++k) {
4068 			if (test_bit(k, sqp->in_use_bm)) {
4069 				sqcp = &sqp->qc_arr[k];
4070 				if (sqcp->a_cmnd == NULL)
4071 					continue;
4072 				devip = (struct sdebug_dev_info *)
4073 					sqcp->a_cmnd->device->hostdata;
4074 				if (devip)
4075 					atomic_dec(&devip->num_in_q);
4076 				sqcp->a_cmnd = NULL;
4077 				sd_dp = sqcp->sd_dp;
4078 				if (sd_dp) {
4079 					l_defer_t = sd_dp->defer_t;
4080 					sd_dp->defer_t = SDEB_DEFER_NONE;
4081 				} else
4082 					l_defer_t = SDEB_DEFER_NONE;
4083 				spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4084 				stop_qc_helper(sd_dp, l_defer_t);
4085 				clear_bit(k, sqp->in_use_bm);
4086 				spin_lock_irqsave(&sqp->qc_lock, iflags);
4087 			}
4088 		}
4089 		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4090 	}
4091 }
4092 
4093 /* Free queued command memory on heap */
4094 static void free_all_queued(void)
4095 {
4096 	int j, k;
4097 	struct sdebug_queue *sqp;
4098 	struct sdebug_queued_cmd *sqcp;
4099 
4100 	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
4101 		for (k = 0; k < SDEBUG_CANQUEUE; ++k) {
4102 			sqcp = &sqp->qc_arr[k];
4103 			kfree(sqcp->sd_dp);
4104 			sqcp->sd_dp = NULL;
4105 		}
4106 	}
4107 }
4108 
4109 static int scsi_debug_abort(struct scsi_cmnd *SCpnt)
4110 {
4111 	bool ok;
4112 
4113 	++num_aborts;
4114 	if (SCpnt) {
4115 		ok = stop_queued_cmnd(SCpnt);
4116 		if (SCpnt->device && (SDEBUG_OPT_ALL_NOISE & sdebug_opts))
4117 			sdev_printk(KERN_INFO, SCpnt->device,
4118 				    "%s: command%s found\n", __func__,
4119 				    ok ? "" : " not");
4120 	}
4121 	return SUCCESS;
4122 }
4123 
4124 static int scsi_debug_device_reset(struct scsi_cmnd *SCpnt)
4125 {
4126 	++num_dev_resets;
4127 	if (SCpnt && SCpnt->device) {
4128 		struct scsi_device *sdp = SCpnt->device;
4129 		struct sdebug_dev_info *devip =
4130 				(struct sdebug_dev_info *)sdp->hostdata;
4131 
4132 		if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
4133 			sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
4134 		if (devip)
4135 			set_bit(SDEBUG_UA_POR, devip->uas_bm);
4136 	}
4137 	return SUCCESS;
4138 }
4139 
4140 static int scsi_debug_target_reset(struct scsi_cmnd *SCpnt)
4141 {
4142 	struct sdebug_host_info *sdbg_host;
4143 	struct sdebug_dev_info *devip;
4144 	struct scsi_device *sdp;
4145 	struct Scsi_Host *hp;
4146 	int k = 0;
4147 
4148 	++num_target_resets;
4149 	if (!SCpnt)
4150 		goto lie;
4151 	sdp = SCpnt->device;
4152 	if (!sdp)
4153 		goto lie;
4154 	if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
4155 		sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
4156 	hp = sdp->host;
4157 	if (!hp)
4158 		goto lie;
4159 	sdbg_host = *(struct sdebug_host_info **)shost_priv(hp);
4160 	if (sdbg_host) {
4161 		list_for_each_entry(devip,
4162 				    &sdbg_host->dev_info_list,
4163 				    dev_list)
4164 			if (devip->target == sdp->id) {
4165 				set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
4166 				++k;
4167 			}
4168 	}
4169 	if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
4170 		sdev_printk(KERN_INFO, sdp,
4171 			    "%s: %d device(s) found in target\n", __func__, k);
4172 lie:
4173 	return SUCCESS;
4174 }
4175 
4176 static int scsi_debug_bus_reset(struct scsi_cmnd *SCpnt)
4177 {
4178 	struct sdebug_host_info *sdbg_host;
4179 	struct sdebug_dev_info *devip;
4180 	struct scsi_device *sdp;
4181 	struct Scsi_Host *hp;
4182 	int k = 0;
4183 
4184 	++num_bus_resets;
4185 	if (!(SCpnt && SCpnt->device))
4186 		goto lie;
4187 	sdp = SCpnt->device;
4188 	if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
4189 		sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
4190 	hp = sdp->host;
4191 	if (hp) {
4192 		sdbg_host = *(struct sdebug_host_info **)shost_priv(hp);
4193 		if (sdbg_host) {
4194 			list_for_each_entry(devip,
4195 					    &sdbg_host->dev_info_list,
4196 					    dev_list) {
4197 				set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
4198 				++k;
4199 			}
4200 		}
4201 	}
4202 	if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
4203 		sdev_printk(KERN_INFO, sdp,
4204 			    "%s: %d device(s) found in host\n", __func__, k);
4205 lie:
4206 	return SUCCESS;
4207 }
4208 
4209 static int scsi_debug_host_reset(struct scsi_cmnd *SCpnt)
4210 {
4211 	struct sdebug_host_info *sdbg_host;
4212 	struct sdebug_dev_info *devip;
4213 	int k = 0;
4214 
4215 	++num_host_resets;
4216 	if ((SCpnt->device) && (SDEBUG_OPT_ALL_NOISE & sdebug_opts))
4217 		sdev_printk(KERN_INFO, SCpnt->device, "%s\n", __func__);
4218 	spin_lock(&sdebug_host_list_lock);
4219 	list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
4220 		list_for_each_entry(devip, &sdbg_host->dev_info_list,
4221 				    dev_list) {
4222 			set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
4223 			++k;
4224 		}
4225 	}
4226 	spin_unlock(&sdebug_host_list_lock);
4227 	stop_all_queued();
4228 	if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
4229 		sdev_printk(KERN_INFO, SCpnt->device,
4230 			    "%s: %d device(s) found\n", __func__, k);
4231 	return SUCCESS;
4232 }
4233 
4234 static void __init sdebug_build_parts(unsigned char *ramp,
4235 				      unsigned long store_size)
4236 {
4237 	struct partition *pp;
4238 	int starts[SDEBUG_MAX_PARTS + 2];
4239 	int sectors_per_part, num_sectors, k;
4240 	int heads_by_sects, start_sec, end_sec;
4241 
4242 	/* assume partition table already zeroed */
4243 	if ((sdebug_num_parts < 1) || (store_size < 1048576))
4244 		return;
4245 	if (sdebug_num_parts > SDEBUG_MAX_PARTS) {
4246 		sdebug_num_parts = SDEBUG_MAX_PARTS;
4247 		pr_warn("reducing partitions to %d\n", SDEBUG_MAX_PARTS);
4248 	}
4249 	num_sectors = (int)sdebug_store_sectors;
4250 	sectors_per_part = (num_sectors - sdebug_sectors_per)
4251 			   / sdebug_num_parts;
4252 	heads_by_sects = sdebug_heads * sdebug_sectors_per;
4253 	starts[0] = sdebug_sectors_per;
4254 	for (k = 1; k < sdebug_num_parts; ++k)
4255 		starts[k] = ((k * sectors_per_part) / heads_by_sects)
4256 			    * heads_by_sects;
4257 	starts[sdebug_num_parts] = num_sectors;
4258 	starts[sdebug_num_parts + 1] = 0;
4259 
4260 	ramp[510] = 0x55;	/* magic partition markings */
4261 	ramp[511] = 0xAA;
4262 	pp = (struct partition *)(ramp + 0x1be);
4263 	for (k = 0; starts[k + 1]; ++k, ++pp) {
4264 		start_sec = starts[k];
4265 		end_sec = starts[k + 1] - 1;
4266 		pp->boot_ind = 0;
4267 
4268 		pp->cyl = start_sec / heads_by_sects;
4269 		pp->head = (start_sec - (pp->cyl * heads_by_sects))
4270 			   / sdebug_sectors_per;
4271 		pp->sector = (start_sec % sdebug_sectors_per) + 1;
4272 
4273 		pp->end_cyl = end_sec / heads_by_sects;
4274 		pp->end_head = (end_sec - (pp->end_cyl * heads_by_sects))
4275 			       / sdebug_sectors_per;
4276 		pp->end_sector = (end_sec % sdebug_sectors_per) + 1;
4277 
4278 		pp->start_sect = cpu_to_le32(start_sec);
4279 		pp->nr_sects = cpu_to_le32(end_sec - start_sec + 1);
4280 		pp->sys_ind = 0x83;	/* plain Linux partition */
4281 	}
4282 }
4283 
4284 static void block_unblock_all_queues(bool block)
4285 {
4286 	int j;
4287 	struct sdebug_queue *sqp;
4288 
4289 	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp)
4290 		atomic_set(&sqp->blocked, (int)block);
4291 }
4292 
4293 /* Adjust (by rounding down) the sdebug_cmnd_count so abs(every_nth)-1
4294  * commands will be processed normally before triggers occur.
4295  */
4296 static void tweak_cmnd_count(void)
4297 {
4298 	int count, modulo;
4299 
4300 	modulo = abs(sdebug_every_nth);
4301 	if (modulo < 2)
4302 		return;
4303 	block_unblock_all_queues(true);
4304 	count = atomic_read(&sdebug_cmnd_count);
4305 	atomic_set(&sdebug_cmnd_count, (count / modulo) * modulo);
4306 	block_unblock_all_queues(false);
4307 }
4308 
4309 static void clear_queue_stats(void)
4310 {
4311 	atomic_set(&sdebug_cmnd_count, 0);
4312 	atomic_set(&sdebug_completions, 0);
4313 	atomic_set(&sdebug_miss_cpus, 0);
4314 	atomic_set(&sdebug_a_tsf, 0);
4315 }
4316 
4317 static void setup_inject(struct sdebug_queue *sqp,
4318 			 struct sdebug_queued_cmd *sqcp)
4319 {
4320 	if ((atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth)) > 0) {
4321 		if (sdebug_every_nth > 0)
4322 			sqcp->inj_recovered = sqcp->inj_transport
4323 				= sqcp->inj_dif
4324 				= sqcp->inj_dix = sqcp->inj_short
4325 				= sqcp->inj_host_busy = sqcp->inj_cmd_abort = 0;
4326 		return;
4327 	}
4328 	sqcp->inj_recovered = !!(SDEBUG_OPT_RECOVERED_ERR & sdebug_opts);
4329 	sqcp->inj_transport = !!(SDEBUG_OPT_TRANSPORT_ERR & sdebug_opts);
4330 	sqcp->inj_dif = !!(SDEBUG_OPT_DIF_ERR & sdebug_opts);
4331 	sqcp->inj_dix = !!(SDEBUG_OPT_DIX_ERR & sdebug_opts);
4332 	sqcp->inj_short = !!(SDEBUG_OPT_SHORT_TRANSFER & sdebug_opts);
4333 	sqcp->inj_host_busy = !!(SDEBUG_OPT_HOST_BUSY & sdebug_opts);
4334 	sqcp->inj_cmd_abort = !!(SDEBUG_OPT_CMD_ABORT & sdebug_opts);
4335 }
4336 
4337 /* Complete the processing of the thread that queued a SCSI command to this
4338  * driver. It either completes the command by calling cmnd_done() or
4339  * schedules a hr timer or work queue then returns 0. Returns
4340  * SCSI_MLQUEUE_HOST_BUSY if temporarily out of resources.
4341  */
4342 static int schedule_resp(struct scsi_cmnd *cmnd, struct sdebug_dev_info *devip,
4343 			 int scsi_result,
4344 			 int (*pfp)(struct scsi_cmnd *,
4345 				    struct sdebug_dev_info *),
4346 			 int delta_jiff, int ndelay)
4347 {
4348 	unsigned long iflags;
4349 	int k, num_in_q, qdepth, inject;
4350 	struct sdebug_queue *sqp;
4351 	struct sdebug_queued_cmd *sqcp;
4352 	struct scsi_device *sdp;
4353 	struct sdebug_defer *sd_dp;
4354 
4355 	if (unlikely(devip == NULL)) {
4356 		if (scsi_result == 0)
4357 			scsi_result = DID_NO_CONNECT << 16;
4358 		goto respond_in_thread;
4359 	}
4360 	sdp = cmnd->device;
4361 
4362 	if (delta_jiff == 0)
4363 		goto respond_in_thread;
4364 
4365 	/* schedule the response at a later time if resources permit */
4366 	sqp = get_queue(cmnd);
4367 	spin_lock_irqsave(&sqp->qc_lock, iflags);
4368 	if (unlikely(atomic_read(&sqp->blocked))) {
4369 		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4370 		return SCSI_MLQUEUE_HOST_BUSY;
4371 	}
4372 	num_in_q = atomic_read(&devip->num_in_q);
4373 	qdepth = cmnd->device->queue_depth;
4374 	inject = 0;
4375 	if (unlikely((qdepth > 0) && (num_in_q >= qdepth))) {
4376 		if (scsi_result) {
4377 			spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4378 			goto respond_in_thread;
4379 		} else
4380 			scsi_result = device_qfull_result;
4381 	} else if (unlikely(sdebug_every_nth &&
4382 			    (SDEBUG_OPT_RARE_TSF & sdebug_opts) &&
4383 			    (scsi_result == 0))) {
4384 		if ((num_in_q == (qdepth - 1)) &&
4385 		    (atomic_inc_return(&sdebug_a_tsf) >=
4386 		     abs(sdebug_every_nth))) {
4387 			atomic_set(&sdebug_a_tsf, 0);
4388 			inject = 1;
4389 			scsi_result = device_qfull_result;
4390 		}
4391 	}
4392 
4393 	k = find_first_zero_bit(sqp->in_use_bm, sdebug_max_queue);
4394 	if (unlikely(k >= sdebug_max_queue)) {
4395 		spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4396 		if (scsi_result)
4397 			goto respond_in_thread;
4398 		else if (SDEBUG_OPT_ALL_TSF & sdebug_opts)
4399 			scsi_result = device_qfull_result;
4400 		if (SDEBUG_OPT_Q_NOISE & sdebug_opts)
4401 			sdev_printk(KERN_INFO, sdp,
4402 				    "%s: max_queue=%d exceeded, %s\n",
4403 				    __func__, sdebug_max_queue,
4404 				    (scsi_result ?  "status: TASK SET FULL" :
4405 						    "report: host busy"));
4406 		if (scsi_result)
4407 			goto respond_in_thread;
4408 		else
4409 			return SCSI_MLQUEUE_HOST_BUSY;
4410 	}
4411 	__set_bit(k, sqp->in_use_bm);
4412 	atomic_inc(&devip->num_in_q);
4413 	sqcp = &sqp->qc_arr[k];
4414 	sqcp->a_cmnd = cmnd;
4415 	cmnd->host_scribble = (unsigned char *)sqcp;
4416 	sd_dp = sqcp->sd_dp;
4417 	spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4418 	if (unlikely(sdebug_every_nth && sdebug_any_injecting_opt))
4419 		setup_inject(sqp, sqcp);
4420 	if (sd_dp == NULL) {
4421 		sd_dp = kzalloc(sizeof(*sd_dp), GFP_ATOMIC);
4422 		if (sd_dp == NULL)
4423 			return SCSI_MLQUEUE_HOST_BUSY;
4424 	}
4425 
4426 	cmnd->result = pfp != NULL ? pfp(cmnd, devip) : 0;
4427 	if (cmnd->result & SDEG_RES_IMMED_MASK) {
4428 		/*
4429 		 * This is the F_DELAY_OVERR case. No delay.
4430 		 */
4431 		cmnd->result &= ~SDEG_RES_IMMED_MASK;
4432 		delta_jiff = ndelay = 0;
4433 	}
4434 	if (cmnd->result == 0 && scsi_result != 0)
4435 		cmnd->result = scsi_result;
4436 
4437 	if (unlikely(sdebug_verbose && cmnd->result))
4438 		sdev_printk(KERN_INFO, sdp, "%s: non-zero result=0x%x\n",
4439 			    __func__, cmnd->result);
4440 
4441 	if (delta_jiff > 0 || ndelay > 0) {
4442 		ktime_t kt;
4443 
4444 		if (delta_jiff > 0) {
4445 			kt = ns_to_ktime((u64)delta_jiff * (NSEC_PER_SEC / HZ));
4446 		} else
4447 			kt = ndelay;
4448 		if (!sd_dp->init_hrt) {
4449 			sd_dp->init_hrt = true;
4450 			sqcp->sd_dp = sd_dp;
4451 			hrtimer_init(&sd_dp->hrt, CLOCK_MONOTONIC,
4452 				     HRTIMER_MODE_REL_PINNED);
4453 			sd_dp->hrt.function = sdebug_q_cmd_hrt_complete;
4454 			sd_dp->sqa_idx = sqp - sdebug_q_arr;
4455 			sd_dp->qc_idx = k;
4456 		}
4457 		if (sdebug_statistics)
4458 			sd_dp->issuing_cpu = raw_smp_processor_id();
4459 		sd_dp->defer_t = SDEB_DEFER_HRT;
4460 		hrtimer_start(&sd_dp->hrt, kt, HRTIMER_MODE_REL_PINNED);
4461 	} else {	/* jdelay < 0, use work queue */
4462 		if (!sd_dp->init_wq) {
4463 			sd_dp->init_wq = true;
4464 			sqcp->sd_dp = sd_dp;
4465 			sd_dp->sqa_idx = sqp - sdebug_q_arr;
4466 			sd_dp->qc_idx = k;
4467 			INIT_WORK(&sd_dp->ew.work, sdebug_q_cmd_wq_complete);
4468 		}
4469 		if (sdebug_statistics)
4470 			sd_dp->issuing_cpu = raw_smp_processor_id();
4471 		sd_dp->defer_t = SDEB_DEFER_WQ;
4472 		if (unlikely(sqcp->inj_cmd_abort))
4473 			sd_dp->aborted = true;
4474 		schedule_work(&sd_dp->ew.work);
4475 		if (unlikely(sqcp->inj_cmd_abort)) {
4476 			sdev_printk(KERN_INFO, sdp, "abort request tag %d\n",
4477 				    cmnd->request->tag);
4478 			blk_abort_request(cmnd->request);
4479 		}
4480 	}
4481 	if (unlikely((SDEBUG_OPT_Q_NOISE & sdebug_opts) &&
4482 		     (scsi_result == device_qfull_result)))
4483 		sdev_printk(KERN_INFO, sdp,
4484 			    "%s: num_in_q=%d +1, %s%s\n", __func__,
4485 			    num_in_q, (inject ? "<inject> " : ""),
4486 			    "status: TASK SET FULL");
4487 	return 0;
4488 
4489 respond_in_thread:	/* call back to mid-layer using invocation thread */
4490 	cmnd->result = pfp != NULL ? pfp(cmnd, devip) : 0;
4491 	cmnd->result &= ~SDEG_RES_IMMED_MASK;
4492 	if (cmnd->result == 0 && scsi_result != 0)
4493 		cmnd->result = scsi_result;
4494 	cmnd->scsi_done(cmnd);
4495 	return 0;
4496 }
4497 
4498 /* Note: The following macros create attribute files in the
4499    /sys/module/scsi_debug/parameters directory. Unfortunately this
4500    driver is unaware of a change and cannot trigger auxiliary actions
4501    as it can when the corresponding attribute in the
4502    /sys/bus/pseudo/drivers/scsi_debug directory is changed.
4503  */
4504 module_param_named(add_host, sdebug_add_host, int, S_IRUGO | S_IWUSR);
4505 module_param_named(ato, sdebug_ato, int, S_IRUGO);
4506 module_param_named(cdb_len, sdebug_cdb_len, int, 0644);
4507 module_param_named(clustering, sdebug_clustering, bool, S_IRUGO | S_IWUSR);
4508 module_param_named(delay, sdebug_jdelay, int, S_IRUGO | S_IWUSR);
4509 module_param_named(dev_size_mb, sdebug_dev_size_mb, int, S_IRUGO);
4510 module_param_named(dif, sdebug_dif, int, S_IRUGO);
4511 module_param_named(dix, sdebug_dix, int, S_IRUGO);
4512 module_param_named(dsense, sdebug_dsense, int, S_IRUGO | S_IWUSR);
4513 module_param_named(every_nth, sdebug_every_nth, int, S_IRUGO | S_IWUSR);
4514 module_param_named(fake_rw, sdebug_fake_rw, int, S_IRUGO | S_IWUSR);
4515 module_param_named(guard, sdebug_guard, uint, S_IRUGO);
4516 module_param_named(host_lock, sdebug_host_lock, bool, S_IRUGO | S_IWUSR);
4517 module_param_string(inq_vendor, sdebug_inq_vendor_id,
4518 		    sizeof(sdebug_inq_vendor_id), S_IRUGO|S_IWUSR);
4519 module_param_string(inq_product, sdebug_inq_product_id,
4520 		    sizeof(sdebug_inq_product_id), S_IRUGO|S_IWUSR);
4521 module_param_string(inq_rev, sdebug_inq_product_rev,
4522 		    sizeof(sdebug_inq_product_rev), S_IRUGO|S_IWUSR);
4523 module_param_named(lbpu, sdebug_lbpu, int, S_IRUGO);
4524 module_param_named(lbpws, sdebug_lbpws, int, S_IRUGO);
4525 module_param_named(lbpws10, sdebug_lbpws10, int, S_IRUGO);
4526 module_param_named(lbprz, sdebug_lbprz, int, S_IRUGO);
4527 module_param_named(lowest_aligned, sdebug_lowest_aligned, int, S_IRUGO);
4528 module_param_named(max_luns, sdebug_max_luns, int, S_IRUGO | S_IWUSR);
4529 module_param_named(max_queue, sdebug_max_queue, int, S_IRUGO | S_IWUSR);
4530 module_param_named(medium_error_start, sdebug_medium_error_start, int, S_IRUGO | S_IWUSR);
4531 module_param_named(medium_error_count, sdebug_medium_error_count, int, S_IRUGO | S_IWUSR);
4532 module_param_named(ndelay, sdebug_ndelay, int, S_IRUGO | S_IWUSR);
4533 module_param_named(no_lun_0, sdebug_no_lun_0, int, S_IRUGO | S_IWUSR);
4534 module_param_named(no_uld, sdebug_no_uld, int, S_IRUGO);
4535 module_param_named(num_parts, sdebug_num_parts, int, S_IRUGO);
4536 module_param_named(num_tgts, sdebug_num_tgts, int, S_IRUGO | S_IWUSR);
4537 module_param_named(opt_blks, sdebug_opt_blks, int, S_IRUGO);
4538 module_param_named(opts, sdebug_opts, int, S_IRUGO | S_IWUSR);
4539 module_param_named(physblk_exp, sdebug_physblk_exp, int, S_IRUGO);
4540 module_param_named(opt_xferlen_exp, sdebug_opt_xferlen_exp, int, S_IRUGO);
4541 module_param_named(ptype, sdebug_ptype, int, S_IRUGO | S_IWUSR);
4542 module_param_named(removable, sdebug_removable, bool, S_IRUGO | S_IWUSR);
4543 module_param_named(scsi_level, sdebug_scsi_level, int, S_IRUGO);
4544 module_param_named(sector_size, sdebug_sector_size, int, S_IRUGO);
4545 module_param_named(statistics, sdebug_statistics, bool, S_IRUGO | S_IWUSR);
4546 module_param_named(strict, sdebug_strict, bool, S_IRUGO | S_IWUSR);
4547 module_param_named(submit_queues, submit_queues, int, S_IRUGO);
4548 module_param_named(unmap_alignment, sdebug_unmap_alignment, int, S_IRUGO);
4549 module_param_named(unmap_granularity, sdebug_unmap_granularity, int, S_IRUGO);
4550 module_param_named(unmap_max_blocks, sdebug_unmap_max_blocks, int, S_IRUGO);
4551 module_param_named(unmap_max_desc, sdebug_unmap_max_desc, int, S_IRUGO);
4552 module_param_named(virtual_gb, sdebug_virtual_gb, int, S_IRUGO | S_IWUSR);
4553 module_param_named(uuid_ctl, sdebug_uuid_ctl, int, S_IRUGO);
4554 module_param_named(vpd_use_hostno, sdebug_vpd_use_hostno, int,
4555 		   S_IRUGO | S_IWUSR);
4556 module_param_named(write_same_length, sdebug_write_same_length, int,
4557 		   S_IRUGO | S_IWUSR);
4558 
4559 MODULE_AUTHOR("Eric Youngdale + Douglas Gilbert");
4560 MODULE_DESCRIPTION("SCSI debug adapter driver");
4561 MODULE_LICENSE("GPL");
4562 MODULE_VERSION(SDEBUG_VERSION);
4563 
4564 MODULE_PARM_DESC(add_host, "0..127 hosts allowed(def=1)");
4565 MODULE_PARM_DESC(ato, "application tag ownership: 0=disk 1=host (def=1)");
4566 MODULE_PARM_DESC(cdb_len, "suggest CDB lengths to drivers (def=10)");
4567 MODULE_PARM_DESC(clustering, "when set enables larger transfers (def=0)");
4568 MODULE_PARM_DESC(delay, "response delay (def=1 jiffy); 0:imm, -1,-2:tiny");
4569 MODULE_PARM_DESC(dev_size_mb, "size in MiB of ram shared by devs(def=8)");
4570 MODULE_PARM_DESC(dif, "data integrity field type: 0-3 (def=0)");
4571 MODULE_PARM_DESC(dix, "data integrity extensions mask (def=0)");
4572 MODULE_PARM_DESC(dsense, "use descriptor sense format(def=0 -> fixed)");
4573 MODULE_PARM_DESC(every_nth, "timeout every nth command(def=0)");
4574 MODULE_PARM_DESC(fake_rw, "fake reads/writes instead of copying (def=0)");
4575 MODULE_PARM_DESC(guard, "protection checksum: 0=crc, 1=ip (def=0)");
4576 MODULE_PARM_DESC(host_lock, "host_lock is ignored (def=0)");
4577 MODULE_PARM_DESC(inq_vendor, "SCSI INQUIRY vendor string (def=\"Linux\")");
4578 MODULE_PARM_DESC(inq_product, "SCSI INQUIRY product string (def=\"scsi_debug\")");
4579 MODULE_PARM_DESC(inq_rev, "SCSI INQUIRY revision string (def=\""
4580 		 SDEBUG_VERSION "\")");
4581 MODULE_PARM_DESC(lbpu, "enable LBP, support UNMAP command (def=0)");
4582 MODULE_PARM_DESC(lbpws, "enable LBP, support WRITE SAME(16) with UNMAP bit (def=0)");
4583 MODULE_PARM_DESC(lbpws10, "enable LBP, support WRITE SAME(10) with UNMAP bit (def=0)");
4584 MODULE_PARM_DESC(lbprz,
4585 	"on read unmapped LBs return 0 when 1 (def), return 0xff when 2");
4586 MODULE_PARM_DESC(lowest_aligned, "lowest aligned lba (def=0)");
4587 MODULE_PARM_DESC(max_luns, "number of LUNs per target to simulate(def=1)");
4588 MODULE_PARM_DESC(max_queue, "max number of queued commands (1 to max(def))");
4589 MODULE_PARM_DESC(medium_error_start, "starting sector number to return MEDIUM error");
4590 MODULE_PARM_DESC(medium_error_count, "count of sectors to return follow on MEDIUM error");
4591 MODULE_PARM_DESC(ndelay, "response delay in nanoseconds (def=0 -> ignore)");
4592 MODULE_PARM_DESC(no_lun_0, "no LU number 0 (def=0 -> have lun 0)");
4593 MODULE_PARM_DESC(no_uld, "stop ULD (e.g. sd driver) attaching (def=0))");
4594 MODULE_PARM_DESC(num_parts, "number of partitions(def=0)");
4595 MODULE_PARM_DESC(num_tgts, "number of targets per host to simulate(def=1)");
4596 MODULE_PARM_DESC(opt_blks, "optimal transfer length in blocks (def=1024)");
4597 MODULE_PARM_DESC(opts, "1->noise, 2->medium_err, 4->timeout, 8->recovered_err... (def=0)");
4598 MODULE_PARM_DESC(physblk_exp, "physical block exponent (def=0)");
4599 MODULE_PARM_DESC(opt_xferlen_exp, "optimal transfer length granularity exponent (def=physblk_exp)");
4600 MODULE_PARM_DESC(ptype, "SCSI peripheral type(def=0[disk])");
4601 MODULE_PARM_DESC(removable, "claim to have removable media (def=0)");
4602 MODULE_PARM_DESC(scsi_level, "SCSI level to simulate(def=7[SPC-5])");
4603 MODULE_PARM_DESC(sector_size, "logical block size in bytes (def=512)");
4604 MODULE_PARM_DESC(statistics, "collect statistics on commands, queues (def=0)");
4605 MODULE_PARM_DESC(strict, "stricter checks: reserved field in cdb (def=0)");
4606 MODULE_PARM_DESC(submit_queues, "support for block multi-queue (def=1)");
4607 MODULE_PARM_DESC(unmap_alignment, "lowest aligned thin provisioning lba (def=0)");
4608 MODULE_PARM_DESC(unmap_granularity, "thin provisioning granularity in blocks (def=1)");
4609 MODULE_PARM_DESC(unmap_max_blocks, "max # of blocks can be unmapped in one cmd (def=0xffffffff)");
4610 MODULE_PARM_DESC(unmap_max_desc, "max # of ranges that can be unmapped in one cmd (def=256)");
4611 MODULE_PARM_DESC(uuid_ctl,
4612 		 "1->use uuid for lu name, 0->don't, 2->all use same (def=0)");
4613 MODULE_PARM_DESC(virtual_gb, "virtual gigabyte (GiB) size (def=0 -> use dev_size_mb)");
4614 MODULE_PARM_DESC(vpd_use_hostno, "0 -> dev ids ignore hostno (def=1 -> unique dev ids)");
4615 MODULE_PARM_DESC(write_same_length, "Maximum blocks per WRITE SAME cmd (def=0xffff)");
4616 
4617 #define SDEBUG_INFO_LEN 256
4618 static char sdebug_info[SDEBUG_INFO_LEN];
4619 
4620 static const char *scsi_debug_info(struct Scsi_Host *shp)
4621 {
4622 	int k;
4623 
4624 	k = scnprintf(sdebug_info, SDEBUG_INFO_LEN, "%s: version %s [%s]\n",
4625 		      my_name, SDEBUG_VERSION, sdebug_version_date);
4626 	if (k >= (SDEBUG_INFO_LEN - 1))
4627 		return sdebug_info;
4628 	scnprintf(sdebug_info + k, SDEBUG_INFO_LEN - k,
4629 		  "  dev_size_mb=%d, opts=0x%x, submit_queues=%d, %s=%d",
4630 		  sdebug_dev_size_mb, sdebug_opts, submit_queues,
4631 		  "statistics", (int)sdebug_statistics);
4632 	return sdebug_info;
4633 }
4634 
4635 /* 'echo <val> > /proc/scsi/scsi_debug/<host_id>' writes to opts */
4636 static int scsi_debug_write_info(struct Scsi_Host *host, char *buffer,
4637 				 int length)
4638 {
4639 	char arr[16];
4640 	int opts;
4641 	int minLen = length > 15 ? 15 : length;
4642 
4643 	if (!capable(CAP_SYS_ADMIN) || !capable(CAP_SYS_RAWIO))
4644 		return -EACCES;
4645 	memcpy(arr, buffer, minLen);
4646 	arr[minLen] = '\0';
4647 	if (1 != sscanf(arr, "%d", &opts))
4648 		return -EINVAL;
4649 	sdebug_opts = opts;
4650 	sdebug_verbose = !!(SDEBUG_OPT_NOISE & opts);
4651 	sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & opts);
4652 	if (sdebug_every_nth != 0)
4653 		tweak_cmnd_count();
4654 	return length;
4655 }
4656 
4657 /* Output seen with 'cat /proc/scsi/scsi_debug/<host_id>'. It will be the
4658  * same for each scsi_debug host (if more than one). Some of the counters
4659  * output are not atomics so might be inaccurate in a busy system. */
4660 static int scsi_debug_show_info(struct seq_file *m, struct Scsi_Host *host)
4661 {
4662 	int f, j, l;
4663 	struct sdebug_queue *sqp;
4664 
4665 	seq_printf(m, "scsi_debug adapter driver, version %s [%s]\n",
4666 		   SDEBUG_VERSION, sdebug_version_date);
4667 	seq_printf(m, "num_tgts=%d, %ssize=%d MB, opts=0x%x, every_nth=%d\n",
4668 		   sdebug_num_tgts, "shared (ram) ", sdebug_dev_size_mb,
4669 		   sdebug_opts, sdebug_every_nth);
4670 	seq_printf(m, "delay=%d, ndelay=%d, max_luns=%d, sector_size=%d %s\n",
4671 		   sdebug_jdelay, sdebug_ndelay, sdebug_max_luns,
4672 		   sdebug_sector_size, "bytes");
4673 	seq_printf(m, "cylinders=%d, heads=%d, sectors=%d, command aborts=%d\n",
4674 		   sdebug_cylinders_per, sdebug_heads, sdebug_sectors_per,
4675 		   num_aborts);
4676 	seq_printf(m, "RESETs: device=%d, target=%d, bus=%d, host=%d\n",
4677 		   num_dev_resets, num_target_resets, num_bus_resets,
4678 		   num_host_resets);
4679 	seq_printf(m, "dix_reads=%d, dix_writes=%d, dif_errors=%d\n",
4680 		   dix_reads, dix_writes, dif_errors);
4681 	seq_printf(m, "usec_in_jiffy=%lu, statistics=%d\n", TICK_NSEC / 1000,
4682 		   sdebug_statistics);
4683 	seq_printf(m, "cmnd_count=%d, completions=%d, %s=%d, a_tsf=%d\n",
4684 		   atomic_read(&sdebug_cmnd_count),
4685 		   atomic_read(&sdebug_completions),
4686 		   "miss_cpus", atomic_read(&sdebug_miss_cpus),
4687 		   atomic_read(&sdebug_a_tsf));
4688 
4689 	seq_printf(m, "submit_queues=%d\n", submit_queues);
4690 	for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
4691 		seq_printf(m, "  queue %d:\n", j);
4692 		f = find_first_bit(sqp->in_use_bm, sdebug_max_queue);
4693 		if (f != sdebug_max_queue) {
4694 			l = find_last_bit(sqp->in_use_bm, sdebug_max_queue);
4695 			seq_printf(m, "    in_use_bm BUSY: %s: %d,%d\n",
4696 				   "first,last bits", f, l);
4697 		}
4698 	}
4699 	return 0;
4700 }
4701 
4702 static ssize_t delay_show(struct device_driver *ddp, char *buf)
4703 {
4704 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_jdelay);
4705 }
4706 /* Returns -EBUSY if jdelay is being changed and commands are queued. The unit
4707  * of delay is jiffies.
4708  */
4709 static ssize_t delay_store(struct device_driver *ddp, const char *buf,
4710 			   size_t count)
4711 {
4712 	int jdelay, res;
4713 
4714 	if (count > 0 && sscanf(buf, "%d", &jdelay) == 1) {
4715 		res = count;
4716 		if (sdebug_jdelay != jdelay) {
4717 			int j, k;
4718 			struct sdebug_queue *sqp;
4719 
4720 			block_unblock_all_queues(true);
4721 			for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
4722 			     ++j, ++sqp) {
4723 				k = find_first_bit(sqp->in_use_bm,
4724 						   sdebug_max_queue);
4725 				if (k != sdebug_max_queue) {
4726 					res = -EBUSY;   /* queued commands */
4727 					break;
4728 				}
4729 			}
4730 			if (res > 0) {
4731 				sdebug_jdelay = jdelay;
4732 				sdebug_ndelay = 0;
4733 			}
4734 			block_unblock_all_queues(false);
4735 		}
4736 		return res;
4737 	}
4738 	return -EINVAL;
4739 }
4740 static DRIVER_ATTR_RW(delay);
4741 
4742 static ssize_t ndelay_show(struct device_driver *ddp, char *buf)
4743 {
4744 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ndelay);
4745 }
4746 /* Returns -EBUSY if ndelay is being changed and commands are queued */
4747 /* If > 0 and accepted then sdebug_jdelay is set to JDELAY_OVERRIDDEN */
4748 static ssize_t ndelay_store(struct device_driver *ddp, const char *buf,
4749 			    size_t count)
4750 {
4751 	int ndelay, res;
4752 
4753 	if ((count > 0) && (1 == sscanf(buf, "%d", &ndelay)) &&
4754 	    (ndelay >= 0) && (ndelay < (1000 * 1000 * 1000))) {
4755 		res = count;
4756 		if (sdebug_ndelay != ndelay) {
4757 			int j, k;
4758 			struct sdebug_queue *sqp;
4759 
4760 			block_unblock_all_queues(true);
4761 			for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
4762 			     ++j, ++sqp) {
4763 				k = find_first_bit(sqp->in_use_bm,
4764 						   sdebug_max_queue);
4765 				if (k != sdebug_max_queue) {
4766 					res = -EBUSY;   /* queued commands */
4767 					break;
4768 				}
4769 			}
4770 			if (res > 0) {
4771 				sdebug_ndelay = ndelay;
4772 				sdebug_jdelay = ndelay  ? JDELAY_OVERRIDDEN
4773 							: DEF_JDELAY;
4774 			}
4775 			block_unblock_all_queues(false);
4776 		}
4777 		return res;
4778 	}
4779 	return -EINVAL;
4780 }
4781 static DRIVER_ATTR_RW(ndelay);
4782 
4783 static ssize_t opts_show(struct device_driver *ddp, char *buf)
4784 {
4785 	return scnprintf(buf, PAGE_SIZE, "0x%x\n", sdebug_opts);
4786 }
4787 
4788 static ssize_t opts_store(struct device_driver *ddp, const char *buf,
4789 			  size_t count)
4790 {
4791 	int opts;
4792 	char work[20];
4793 
4794 	if (sscanf(buf, "%10s", work) == 1) {
4795 		if (strncasecmp(work, "0x", 2) == 0) {
4796 			if (kstrtoint(work + 2, 16, &opts) == 0)
4797 				goto opts_done;
4798 		} else {
4799 			if (kstrtoint(work, 10, &opts) == 0)
4800 				goto opts_done;
4801 		}
4802 	}
4803 	return -EINVAL;
4804 opts_done:
4805 	sdebug_opts = opts;
4806 	sdebug_verbose = !!(SDEBUG_OPT_NOISE & opts);
4807 	sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & opts);
4808 	tweak_cmnd_count();
4809 	return count;
4810 }
4811 static DRIVER_ATTR_RW(opts);
4812 
4813 static ssize_t ptype_show(struct device_driver *ddp, char *buf)
4814 {
4815 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ptype);
4816 }
4817 static ssize_t ptype_store(struct device_driver *ddp, const char *buf,
4818 			   size_t count)
4819 {
4820 	int n;
4821 
4822 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4823 		sdebug_ptype = n;
4824 		return count;
4825 	}
4826 	return -EINVAL;
4827 }
4828 static DRIVER_ATTR_RW(ptype);
4829 
4830 static ssize_t dsense_show(struct device_driver *ddp, char *buf)
4831 {
4832 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dsense);
4833 }
4834 static ssize_t dsense_store(struct device_driver *ddp, const char *buf,
4835 			    size_t count)
4836 {
4837 	int n;
4838 
4839 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4840 		sdebug_dsense = n;
4841 		return count;
4842 	}
4843 	return -EINVAL;
4844 }
4845 static DRIVER_ATTR_RW(dsense);
4846 
4847 static ssize_t fake_rw_show(struct device_driver *ddp, char *buf)
4848 {
4849 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_fake_rw);
4850 }
4851 static ssize_t fake_rw_store(struct device_driver *ddp, const char *buf,
4852 			     size_t count)
4853 {
4854 	int n;
4855 
4856 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4857 		n = (n > 0);
4858 		sdebug_fake_rw = (sdebug_fake_rw > 0);
4859 		if (sdebug_fake_rw != n) {
4860 			if ((0 == n) && (NULL == fake_storep)) {
4861 				unsigned long sz =
4862 					(unsigned long)sdebug_dev_size_mb *
4863 					1048576;
4864 
4865 				fake_storep = vzalloc(sz);
4866 				if (NULL == fake_storep) {
4867 					pr_err("out of memory, 9\n");
4868 					return -ENOMEM;
4869 				}
4870 			}
4871 			sdebug_fake_rw = n;
4872 		}
4873 		return count;
4874 	}
4875 	return -EINVAL;
4876 }
4877 static DRIVER_ATTR_RW(fake_rw);
4878 
4879 static ssize_t no_lun_0_show(struct device_driver *ddp, char *buf)
4880 {
4881 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_lun_0);
4882 }
4883 static ssize_t no_lun_0_store(struct device_driver *ddp, const char *buf,
4884 			      size_t count)
4885 {
4886 	int n;
4887 
4888 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4889 		sdebug_no_lun_0 = n;
4890 		return count;
4891 	}
4892 	return -EINVAL;
4893 }
4894 static DRIVER_ATTR_RW(no_lun_0);
4895 
4896 static ssize_t num_tgts_show(struct device_driver *ddp, char *buf)
4897 {
4898 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_tgts);
4899 }
4900 static ssize_t num_tgts_store(struct device_driver *ddp, const char *buf,
4901 			      size_t count)
4902 {
4903 	int n;
4904 
4905 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4906 		sdebug_num_tgts = n;
4907 		sdebug_max_tgts_luns();
4908 		return count;
4909 	}
4910 	return -EINVAL;
4911 }
4912 static DRIVER_ATTR_RW(num_tgts);
4913 
4914 static ssize_t dev_size_mb_show(struct device_driver *ddp, char *buf)
4915 {
4916 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dev_size_mb);
4917 }
4918 static DRIVER_ATTR_RO(dev_size_mb);
4919 
4920 static ssize_t num_parts_show(struct device_driver *ddp, char *buf)
4921 {
4922 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_parts);
4923 }
4924 static DRIVER_ATTR_RO(num_parts);
4925 
4926 static ssize_t every_nth_show(struct device_driver *ddp, char *buf)
4927 {
4928 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_every_nth);
4929 }
4930 static ssize_t every_nth_store(struct device_driver *ddp, const char *buf,
4931 			       size_t count)
4932 {
4933 	int nth;
4934 
4935 	if ((count > 0) && (1 == sscanf(buf, "%d", &nth))) {
4936 		sdebug_every_nth = nth;
4937 		if (nth && !sdebug_statistics) {
4938 			pr_info("every_nth needs statistics=1, set it\n");
4939 			sdebug_statistics = true;
4940 		}
4941 		tweak_cmnd_count();
4942 		return count;
4943 	}
4944 	return -EINVAL;
4945 }
4946 static DRIVER_ATTR_RW(every_nth);
4947 
4948 static ssize_t max_luns_show(struct device_driver *ddp, char *buf)
4949 {
4950 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_max_luns);
4951 }
4952 static ssize_t max_luns_store(struct device_driver *ddp, const char *buf,
4953 			      size_t count)
4954 {
4955 	int n;
4956 	bool changed;
4957 
4958 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4959 		if (n > 256) {
4960 			pr_warn("max_luns can be no more than 256\n");
4961 			return -EINVAL;
4962 		}
4963 		changed = (sdebug_max_luns != n);
4964 		sdebug_max_luns = n;
4965 		sdebug_max_tgts_luns();
4966 		if (changed && (sdebug_scsi_level >= 5)) {	/* >= SPC-3 */
4967 			struct sdebug_host_info *sdhp;
4968 			struct sdebug_dev_info *dp;
4969 
4970 			spin_lock(&sdebug_host_list_lock);
4971 			list_for_each_entry(sdhp, &sdebug_host_list,
4972 					    host_list) {
4973 				list_for_each_entry(dp, &sdhp->dev_info_list,
4974 						    dev_list) {
4975 					set_bit(SDEBUG_UA_LUNS_CHANGED,
4976 						dp->uas_bm);
4977 				}
4978 			}
4979 			spin_unlock(&sdebug_host_list_lock);
4980 		}
4981 		return count;
4982 	}
4983 	return -EINVAL;
4984 }
4985 static DRIVER_ATTR_RW(max_luns);
4986 
4987 static ssize_t max_queue_show(struct device_driver *ddp, char *buf)
4988 {
4989 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_max_queue);
4990 }
4991 /* N.B. max_queue can be changed while there are queued commands. In flight
4992  * commands beyond the new max_queue will be completed. */
4993 static ssize_t max_queue_store(struct device_driver *ddp, const char *buf,
4994 			       size_t count)
4995 {
4996 	int j, n, k, a;
4997 	struct sdebug_queue *sqp;
4998 
4999 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n > 0) &&
5000 	    (n <= SDEBUG_CANQUEUE)) {
5001 		block_unblock_all_queues(true);
5002 		k = 0;
5003 		for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
5004 		     ++j, ++sqp) {
5005 			a = find_last_bit(sqp->in_use_bm, SDEBUG_CANQUEUE);
5006 			if (a > k)
5007 				k = a;
5008 		}
5009 		sdebug_max_queue = n;
5010 		if (k == SDEBUG_CANQUEUE)
5011 			atomic_set(&retired_max_queue, 0);
5012 		else if (k >= n)
5013 			atomic_set(&retired_max_queue, k + 1);
5014 		else
5015 			atomic_set(&retired_max_queue, 0);
5016 		block_unblock_all_queues(false);
5017 		return count;
5018 	}
5019 	return -EINVAL;
5020 }
5021 static DRIVER_ATTR_RW(max_queue);
5022 
5023 static ssize_t no_uld_show(struct device_driver *ddp, char *buf)
5024 {
5025 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_uld);
5026 }
5027 static DRIVER_ATTR_RO(no_uld);
5028 
5029 static ssize_t scsi_level_show(struct device_driver *ddp, char *buf)
5030 {
5031 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_scsi_level);
5032 }
5033 static DRIVER_ATTR_RO(scsi_level);
5034 
5035 static ssize_t virtual_gb_show(struct device_driver *ddp, char *buf)
5036 {
5037 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_virtual_gb);
5038 }
5039 static ssize_t virtual_gb_store(struct device_driver *ddp, const char *buf,
5040 				size_t count)
5041 {
5042 	int n;
5043 	bool changed;
5044 
5045 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5046 		changed = (sdebug_virtual_gb != n);
5047 		sdebug_virtual_gb = n;
5048 		sdebug_capacity = get_sdebug_capacity();
5049 		if (changed) {
5050 			struct sdebug_host_info *sdhp;
5051 			struct sdebug_dev_info *dp;
5052 
5053 			spin_lock(&sdebug_host_list_lock);
5054 			list_for_each_entry(sdhp, &sdebug_host_list,
5055 					    host_list) {
5056 				list_for_each_entry(dp, &sdhp->dev_info_list,
5057 						    dev_list) {
5058 					set_bit(SDEBUG_UA_CAPACITY_CHANGED,
5059 						dp->uas_bm);
5060 				}
5061 			}
5062 			spin_unlock(&sdebug_host_list_lock);
5063 		}
5064 		return count;
5065 	}
5066 	return -EINVAL;
5067 }
5068 static DRIVER_ATTR_RW(virtual_gb);
5069 
5070 static ssize_t add_host_show(struct device_driver *ddp, char *buf)
5071 {
5072 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_add_host);
5073 }
5074 
5075 static int sdebug_add_adapter(void);
5076 static void sdebug_remove_adapter(void);
5077 
5078 static ssize_t add_host_store(struct device_driver *ddp, const char *buf,
5079 			      size_t count)
5080 {
5081 	int delta_hosts;
5082 
5083 	if (sscanf(buf, "%d", &delta_hosts) != 1)
5084 		return -EINVAL;
5085 	if (delta_hosts > 0) {
5086 		do {
5087 			sdebug_add_adapter();
5088 		} while (--delta_hosts);
5089 	} else if (delta_hosts < 0) {
5090 		do {
5091 			sdebug_remove_adapter();
5092 		} while (++delta_hosts);
5093 	}
5094 	return count;
5095 }
5096 static DRIVER_ATTR_RW(add_host);
5097 
5098 static ssize_t vpd_use_hostno_show(struct device_driver *ddp, char *buf)
5099 {
5100 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_vpd_use_hostno);
5101 }
5102 static ssize_t vpd_use_hostno_store(struct device_driver *ddp, const char *buf,
5103 				    size_t count)
5104 {
5105 	int n;
5106 
5107 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5108 		sdebug_vpd_use_hostno = n;
5109 		return count;
5110 	}
5111 	return -EINVAL;
5112 }
5113 static DRIVER_ATTR_RW(vpd_use_hostno);
5114 
5115 static ssize_t statistics_show(struct device_driver *ddp, char *buf)
5116 {
5117 	return scnprintf(buf, PAGE_SIZE, "%d\n", (int)sdebug_statistics);
5118 }
5119 static ssize_t statistics_store(struct device_driver *ddp, const char *buf,
5120 				size_t count)
5121 {
5122 	int n;
5123 
5124 	if ((count > 0) && (sscanf(buf, "%d", &n) == 1) && (n >= 0)) {
5125 		if (n > 0)
5126 			sdebug_statistics = true;
5127 		else {
5128 			clear_queue_stats();
5129 			sdebug_statistics = false;
5130 		}
5131 		return count;
5132 	}
5133 	return -EINVAL;
5134 }
5135 static DRIVER_ATTR_RW(statistics);
5136 
5137 static ssize_t sector_size_show(struct device_driver *ddp, char *buf)
5138 {
5139 	return scnprintf(buf, PAGE_SIZE, "%u\n", sdebug_sector_size);
5140 }
5141 static DRIVER_ATTR_RO(sector_size);
5142 
5143 static ssize_t submit_queues_show(struct device_driver *ddp, char *buf)
5144 {
5145 	return scnprintf(buf, PAGE_SIZE, "%d\n", submit_queues);
5146 }
5147 static DRIVER_ATTR_RO(submit_queues);
5148 
5149 static ssize_t dix_show(struct device_driver *ddp, char *buf)
5150 {
5151 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dix);
5152 }
5153 static DRIVER_ATTR_RO(dix);
5154 
5155 static ssize_t dif_show(struct device_driver *ddp, char *buf)
5156 {
5157 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dif);
5158 }
5159 static DRIVER_ATTR_RO(dif);
5160 
5161 static ssize_t guard_show(struct device_driver *ddp, char *buf)
5162 {
5163 	return scnprintf(buf, PAGE_SIZE, "%u\n", sdebug_guard);
5164 }
5165 static DRIVER_ATTR_RO(guard);
5166 
5167 static ssize_t ato_show(struct device_driver *ddp, char *buf)
5168 {
5169 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ato);
5170 }
5171 static DRIVER_ATTR_RO(ato);
5172 
5173 static ssize_t map_show(struct device_driver *ddp, char *buf)
5174 {
5175 	ssize_t count;
5176 
5177 	if (!scsi_debug_lbp())
5178 		return scnprintf(buf, PAGE_SIZE, "0-%u\n",
5179 				 sdebug_store_sectors);
5180 
5181 	count = scnprintf(buf, PAGE_SIZE - 1, "%*pbl",
5182 			  (int)map_size, map_storep);
5183 	buf[count++] = '\n';
5184 	buf[count] = '\0';
5185 
5186 	return count;
5187 }
5188 static DRIVER_ATTR_RO(map);
5189 
5190 static ssize_t removable_show(struct device_driver *ddp, char *buf)
5191 {
5192 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_removable ? 1 : 0);
5193 }
5194 static ssize_t removable_store(struct device_driver *ddp, const char *buf,
5195 			       size_t count)
5196 {
5197 	int n;
5198 
5199 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5200 		sdebug_removable = (n > 0);
5201 		return count;
5202 	}
5203 	return -EINVAL;
5204 }
5205 static DRIVER_ATTR_RW(removable);
5206 
5207 static ssize_t host_lock_show(struct device_driver *ddp, char *buf)
5208 {
5209 	return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_host_lock);
5210 }
5211 /* N.B. sdebug_host_lock does nothing, kept for backward compatibility */
5212 static ssize_t host_lock_store(struct device_driver *ddp, const char *buf,
5213 			       size_t count)
5214 {
5215 	int n;
5216 
5217 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5218 		sdebug_host_lock = (n > 0);
5219 		return count;
5220 	}
5221 	return -EINVAL;
5222 }
5223 static DRIVER_ATTR_RW(host_lock);
5224 
5225 static ssize_t strict_show(struct device_driver *ddp, char *buf)
5226 {
5227 	return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_strict);
5228 }
5229 static ssize_t strict_store(struct device_driver *ddp, const char *buf,
5230 			    size_t count)
5231 {
5232 	int n;
5233 
5234 	if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5235 		sdebug_strict = (n > 0);
5236 		return count;
5237 	}
5238 	return -EINVAL;
5239 }
5240 static DRIVER_ATTR_RW(strict);
5241 
5242 static ssize_t uuid_ctl_show(struct device_driver *ddp, char *buf)
5243 {
5244 	return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_uuid_ctl);
5245 }
5246 static DRIVER_ATTR_RO(uuid_ctl);
5247 
5248 static ssize_t cdb_len_show(struct device_driver *ddp, char *buf)
5249 {
5250 	return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_cdb_len);
5251 }
5252 static ssize_t cdb_len_store(struct device_driver *ddp, const char *buf,
5253 			     size_t count)
5254 {
5255 	int ret, n;
5256 
5257 	ret = kstrtoint(buf, 0, &n);
5258 	if (ret)
5259 		return ret;
5260 	sdebug_cdb_len = n;
5261 	all_config_cdb_len();
5262 	return count;
5263 }
5264 static DRIVER_ATTR_RW(cdb_len);
5265 
5266 
5267 /* Note: The following array creates attribute files in the
5268    /sys/bus/pseudo/drivers/scsi_debug directory. The advantage of these
5269    files (over those found in the /sys/module/scsi_debug/parameters
5270    directory) is that auxiliary actions can be triggered when an attribute
5271    is changed. For example see: sdebug_add_host_store() above.
5272  */
5273 
5274 static struct attribute *sdebug_drv_attrs[] = {
5275 	&driver_attr_delay.attr,
5276 	&driver_attr_opts.attr,
5277 	&driver_attr_ptype.attr,
5278 	&driver_attr_dsense.attr,
5279 	&driver_attr_fake_rw.attr,
5280 	&driver_attr_no_lun_0.attr,
5281 	&driver_attr_num_tgts.attr,
5282 	&driver_attr_dev_size_mb.attr,
5283 	&driver_attr_num_parts.attr,
5284 	&driver_attr_every_nth.attr,
5285 	&driver_attr_max_luns.attr,
5286 	&driver_attr_max_queue.attr,
5287 	&driver_attr_no_uld.attr,
5288 	&driver_attr_scsi_level.attr,
5289 	&driver_attr_virtual_gb.attr,
5290 	&driver_attr_add_host.attr,
5291 	&driver_attr_vpd_use_hostno.attr,
5292 	&driver_attr_sector_size.attr,
5293 	&driver_attr_statistics.attr,
5294 	&driver_attr_submit_queues.attr,
5295 	&driver_attr_dix.attr,
5296 	&driver_attr_dif.attr,
5297 	&driver_attr_guard.attr,
5298 	&driver_attr_ato.attr,
5299 	&driver_attr_map.attr,
5300 	&driver_attr_removable.attr,
5301 	&driver_attr_host_lock.attr,
5302 	&driver_attr_ndelay.attr,
5303 	&driver_attr_strict.attr,
5304 	&driver_attr_uuid_ctl.attr,
5305 	&driver_attr_cdb_len.attr,
5306 	NULL,
5307 };
5308 ATTRIBUTE_GROUPS(sdebug_drv);
5309 
5310 static struct device *pseudo_primary;
5311 
5312 static int __init scsi_debug_init(void)
5313 {
5314 	unsigned long sz;
5315 	int host_to_add;
5316 	int k;
5317 	int ret;
5318 
5319 	atomic_set(&retired_max_queue, 0);
5320 
5321 	if (sdebug_ndelay >= 1000 * 1000 * 1000) {
5322 		pr_warn("ndelay must be less than 1 second, ignored\n");
5323 		sdebug_ndelay = 0;
5324 	} else if (sdebug_ndelay > 0)
5325 		sdebug_jdelay = JDELAY_OVERRIDDEN;
5326 
5327 	switch (sdebug_sector_size) {
5328 	case  512:
5329 	case 1024:
5330 	case 2048:
5331 	case 4096:
5332 		break;
5333 	default:
5334 		pr_err("invalid sector_size %d\n", sdebug_sector_size);
5335 		return -EINVAL;
5336 	}
5337 
5338 	switch (sdebug_dif) {
5339 	case T10_PI_TYPE0_PROTECTION:
5340 		break;
5341 	case T10_PI_TYPE1_PROTECTION:
5342 	case T10_PI_TYPE2_PROTECTION:
5343 	case T10_PI_TYPE3_PROTECTION:
5344 		have_dif_prot = true;
5345 		break;
5346 
5347 	default:
5348 		pr_err("dif must be 0, 1, 2 or 3\n");
5349 		return -EINVAL;
5350 	}
5351 
5352 	if (sdebug_guard > 1) {
5353 		pr_err("guard must be 0 or 1\n");
5354 		return -EINVAL;
5355 	}
5356 
5357 	if (sdebug_ato > 1) {
5358 		pr_err("ato must be 0 or 1\n");
5359 		return -EINVAL;
5360 	}
5361 
5362 	if (sdebug_physblk_exp > 15) {
5363 		pr_err("invalid physblk_exp %u\n", sdebug_physblk_exp);
5364 		return -EINVAL;
5365 	}
5366 	if (sdebug_max_luns > 256) {
5367 		pr_warn("max_luns can be no more than 256, use default\n");
5368 		sdebug_max_luns = DEF_MAX_LUNS;
5369 	}
5370 
5371 	if (sdebug_lowest_aligned > 0x3fff) {
5372 		pr_err("lowest_aligned too big: %u\n", sdebug_lowest_aligned);
5373 		return -EINVAL;
5374 	}
5375 
5376 	if (submit_queues < 1) {
5377 		pr_err("submit_queues must be 1 or more\n");
5378 		return -EINVAL;
5379 	}
5380 	sdebug_q_arr = kcalloc(submit_queues, sizeof(struct sdebug_queue),
5381 			       GFP_KERNEL);
5382 	if (sdebug_q_arr == NULL)
5383 		return -ENOMEM;
5384 	for (k = 0; k < submit_queues; ++k)
5385 		spin_lock_init(&sdebug_q_arr[k].qc_lock);
5386 
5387 	if (sdebug_dev_size_mb < 1)
5388 		sdebug_dev_size_mb = 1;  /* force minimum 1 MB ramdisk */
5389 	sz = (unsigned long)sdebug_dev_size_mb * 1048576;
5390 	sdebug_store_sectors = sz / sdebug_sector_size;
5391 	sdebug_capacity = get_sdebug_capacity();
5392 
5393 	/* play around with geometry, don't waste too much on track 0 */
5394 	sdebug_heads = 8;
5395 	sdebug_sectors_per = 32;
5396 	if (sdebug_dev_size_mb >= 256)
5397 		sdebug_heads = 64;
5398 	else if (sdebug_dev_size_mb >= 16)
5399 		sdebug_heads = 32;
5400 	sdebug_cylinders_per = (unsigned long)sdebug_capacity /
5401 			       (sdebug_sectors_per * sdebug_heads);
5402 	if (sdebug_cylinders_per >= 1024) {
5403 		/* other LLDs do this; implies >= 1GB ram disk ... */
5404 		sdebug_heads = 255;
5405 		sdebug_sectors_per = 63;
5406 		sdebug_cylinders_per = (unsigned long)sdebug_capacity /
5407 			       (sdebug_sectors_per * sdebug_heads);
5408 	}
5409 
5410 	if (sdebug_fake_rw == 0) {
5411 		fake_storep = vzalloc(sz);
5412 		if (NULL == fake_storep) {
5413 			pr_err("out of memory, 1\n");
5414 			ret = -ENOMEM;
5415 			goto free_q_arr;
5416 		}
5417 		if (sdebug_num_parts > 0)
5418 			sdebug_build_parts(fake_storep, sz);
5419 	}
5420 
5421 	if (sdebug_dix) {
5422 		int dif_size;
5423 
5424 		dif_size = sdebug_store_sectors * sizeof(struct t10_pi_tuple);
5425 		dif_storep = vmalloc(dif_size);
5426 
5427 		pr_err("dif_storep %u bytes @ %p\n", dif_size, dif_storep);
5428 
5429 		if (dif_storep == NULL) {
5430 			pr_err("out of mem. (DIX)\n");
5431 			ret = -ENOMEM;
5432 			goto free_vm;
5433 		}
5434 
5435 		memset(dif_storep, 0xff, dif_size);
5436 	}
5437 
5438 	/* Logical Block Provisioning */
5439 	if (scsi_debug_lbp()) {
5440 		sdebug_unmap_max_blocks =
5441 			clamp(sdebug_unmap_max_blocks, 0U, 0xffffffffU);
5442 
5443 		sdebug_unmap_max_desc =
5444 			clamp(sdebug_unmap_max_desc, 0U, 256U);
5445 
5446 		sdebug_unmap_granularity =
5447 			clamp(sdebug_unmap_granularity, 1U, 0xffffffffU);
5448 
5449 		if (sdebug_unmap_alignment &&
5450 		    sdebug_unmap_granularity <=
5451 		    sdebug_unmap_alignment) {
5452 			pr_err("ERR: unmap_granularity <= unmap_alignment\n");
5453 			ret = -EINVAL;
5454 			goto free_vm;
5455 		}
5456 
5457 		map_size = lba_to_map_index(sdebug_store_sectors - 1) + 1;
5458 		map_storep = vmalloc(array_size(sizeof(long),
5459 						BITS_TO_LONGS(map_size)));
5460 
5461 		pr_info("%lu provisioning blocks\n", map_size);
5462 
5463 		if (map_storep == NULL) {
5464 			pr_err("out of mem. (MAP)\n");
5465 			ret = -ENOMEM;
5466 			goto free_vm;
5467 		}
5468 
5469 		bitmap_zero(map_storep, map_size);
5470 
5471 		/* Map first 1KB for partition table */
5472 		if (sdebug_num_parts)
5473 			map_region(0, 2);
5474 	}
5475 
5476 	pseudo_primary = root_device_register("pseudo_0");
5477 	if (IS_ERR(pseudo_primary)) {
5478 		pr_warn("root_device_register() error\n");
5479 		ret = PTR_ERR(pseudo_primary);
5480 		goto free_vm;
5481 	}
5482 	ret = bus_register(&pseudo_lld_bus);
5483 	if (ret < 0) {
5484 		pr_warn("bus_register error: %d\n", ret);
5485 		goto dev_unreg;
5486 	}
5487 	ret = driver_register(&sdebug_driverfs_driver);
5488 	if (ret < 0) {
5489 		pr_warn("driver_register error: %d\n", ret);
5490 		goto bus_unreg;
5491 	}
5492 
5493 	host_to_add = sdebug_add_host;
5494 	sdebug_add_host = 0;
5495 
5496 	for (k = 0; k < host_to_add; k++) {
5497 		if (sdebug_add_adapter()) {
5498 			pr_err("sdebug_add_adapter failed k=%d\n", k);
5499 			break;
5500 		}
5501 	}
5502 
5503 	if (sdebug_verbose)
5504 		pr_info("built %d host(s)\n", sdebug_add_host);
5505 
5506 	return 0;
5507 
5508 bus_unreg:
5509 	bus_unregister(&pseudo_lld_bus);
5510 dev_unreg:
5511 	root_device_unregister(pseudo_primary);
5512 free_vm:
5513 	vfree(map_storep);
5514 	vfree(dif_storep);
5515 	vfree(fake_storep);
5516 free_q_arr:
5517 	kfree(sdebug_q_arr);
5518 	return ret;
5519 }
5520 
5521 static void __exit scsi_debug_exit(void)
5522 {
5523 	int k = sdebug_add_host;
5524 
5525 	stop_all_queued();
5526 	for (; k; k--)
5527 		sdebug_remove_adapter();
5528 	free_all_queued();
5529 	driver_unregister(&sdebug_driverfs_driver);
5530 	bus_unregister(&pseudo_lld_bus);
5531 	root_device_unregister(pseudo_primary);
5532 
5533 	vfree(map_storep);
5534 	vfree(dif_storep);
5535 	vfree(fake_storep);
5536 	kfree(sdebug_q_arr);
5537 }
5538 
5539 device_initcall(scsi_debug_init);
5540 module_exit(scsi_debug_exit);
5541 
5542 static void sdebug_release_adapter(struct device *dev)
5543 {
5544 	struct sdebug_host_info *sdbg_host;
5545 
5546 	sdbg_host = to_sdebug_host(dev);
5547 	kfree(sdbg_host);
5548 }
5549 
5550 static int sdebug_add_adapter(void)
5551 {
5552 	int k, devs_per_host;
5553 	int error = 0;
5554 	struct sdebug_host_info *sdbg_host;
5555 	struct sdebug_dev_info *sdbg_devinfo, *tmp;
5556 
5557 	sdbg_host = kzalloc(sizeof(*sdbg_host), GFP_KERNEL);
5558 	if (sdbg_host == NULL) {
5559 		pr_err("out of memory at line %d\n", __LINE__);
5560 		return -ENOMEM;
5561 	}
5562 
5563 	INIT_LIST_HEAD(&sdbg_host->dev_info_list);
5564 
5565 	devs_per_host = sdebug_num_tgts * sdebug_max_luns;
5566 	for (k = 0; k < devs_per_host; k++) {
5567 		sdbg_devinfo = sdebug_device_create(sdbg_host, GFP_KERNEL);
5568 		if (!sdbg_devinfo) {
5569 			pr_err("out of memory at line %d\n", __LINE__);
5570 			error = -ENOMEM;
5571 			goto clean;
5572 		}
5573 	}
5574 
5575 	spin_lock(&sdebug_host_list_lock);
5576 	list_add_tail(&sdbg_host->host_list, &sdebug_host_list);
5577 	spin_unlock(&sdebug_host_list_lock);
5578 
5579 	sdbg_host->dev.bus = &pseudo_lld_bus;
5580 	sdbg_host->dev.parent = pseudo_primary;
5581 	sdbg_host->dev.release = &sdebug_release_adapter;
5582 	dev_set_name(&sdbg_host->dev, "adapter%d", sdebug_add_host);
5583 
5584 	error = device_register(&sdbg_host->dev);
5585 
5586 	if (error)
5587 		goto clean;
5588 
5589 	++sdebug_add_host;
5590 	return error;
5591 
5592 clean:
5593 	list_for_each_entry_safe(sdbg_devinfo, tmp, &sdbg_host->dev_info_list,
5594 				 dev_list) {
5595 		list_del(&sdbg_devinfo->dev_list);
5596 		kfree(sdbg_devinfo);
5597 	}
5598 
5599 	kfree(sdbg_host);
5600 	return error;
5601 }
5602 
5603 static void sdebug_remove_adapter(void)
5604 {
5605 	struct sdebug_host_info *sdbg_host = NULL;
5606 
5607 	spin_lock(&sdebug_host_list_lock);
5608 	if (!list_empty(&sdebug_host_list)) {
5609 		sdbg_host = list_entry(sdebug_host_list.prev,
5610 				       struct sdebug_host_info, host_list);
5611 		list_del(&sdbg_host->host_list);
5612 	}
5613 	spin_unlock(&sdebug_host_list_lock);
5614 
5615 	if (!sdbg_host)
5616 		return;
5617 
5618 	device_unregister(&sdbg_host->dev);
5619 	--sdebug_add_host;
5620 }
5621 
5622 static int sdebug_change_qdepth(struct scsi_device *sdev, int qdepth)
5623 {
5624 	int num_in_q = 0;
5625 	struct sdebug_dev_info *devip;
5626 
5627 	block_unblock_all_queues(true);
5628 	devip = (struct sdebug_dev_info *)sdev->hostdata;
5629 	if (NULL == devip) {
5630 		block_unblock_all_queues(false);
5631 		return	-ENODEV;
5632 	}
5633 	num_in_q = atomic_read(&devip->num_in_q);
5634 
5635 	if (qdepth < 1)
5636 		qdepth = 1;
5637 	/* allow to exceed max host qc_arr elements for testing */
5638 	if (qdepth > SDEBUG_CANQUEUE + 10)
5639 		qdepth = SDEBUG_CANQUEUE + 10;
5640 	scsi_change_queue_depth(sdev, qdepth);
5641 
5642 	if (SDEBUG_OPT_Q_NOISE & sdebug_opts) {
5643 		sdev_printk(KERN_INFO, sdev, "%s: qdepth=%d, num_in_q=%d\n",
5644 			    __func__, qdepth, num_in_q);
5645 	}
5646 	block_unblock_all_queues(false);
5647 	return sdev->queue_depth;
5648 }
5649 
5650 static bool fake_timeout(struct scsi_cmnd *scp)
5651 {
5652 	if (0 == (atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth))) {
5653 		if (sdebug_every_nth < -1)
5654 			sdebug_every_nth = -1;
5655 		if (SDEBUG_OPT_TIMEOUT & sdebug_opts)
5656 			return true; /* ignore command causing timeout */
5657 		else if (SDEBUG_OPT_MAC_TIMEOUT & sdebug_opts &&
5658 			 scsi_medium_access_command(scp))
5659 			return true; /* time out reads and writes */
5660 	}
5661 	return false;
5662 }
5663 
5664 static bool fake_host_busy(struct scsi_cmnd *scp)
5665 {
5666 	return (sdebug_opts & SDEBUG_OPT_HOST_BUSY) &&
5667 		(atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth)) == 0;
5668 }
5669 
5670 static int scsi_debug_queuecommand(struct Scsi_Host *shost,
5671 				   struct scsi_cmnd *scp)
5672 {
5673 	u8 sdeb_i;
5674 	struct scsi_device *sdp = scp->device;
5675 	const struct opcode_info_t *oip;
5676 	const struct opcode_info_t *r_oip;
5677 	struct sdebug_dev_info *devip;
5678 	u8 *cmd = scp->cmnd;
5679 	int (*r_pfp)(struct scsi_cmnd *, struct sdebug_dev_info *);
5680 	int (*pfp)(struct scsi_cmnd *, struct sdebug_dev_info *) = NULL;
5681 	int k, na;
5682 	int errsts = 0;
5683 	u32 flags;
5684 	u16 sa;
5685 	u8 opcode = cmd[0];
5686 	bool has_wlun_rl;
5687 
5688 	scsi_set_resid(scp, 0);
5689 	if (sdebug_statistics)
5690 		atomic_inc(&sdebug_cmnd_count);
5691 	if (unlikely(sdebug_verbose &&
5692 		     !(SDEBUG_OPT_NO_CDB_NOISE & sdebug_opts))) {
5693 		char b[120];
5694 		int n, len, sb;
5695 
5696 		len = scp->cmd_len;
5697 		sb = (int)sizeof(b);
5698 		if (len > 32)
5699 			strcpy(b, "too long, over 32 bytes");
5700 		else {
5701 			for (k = 0, n = 0; k < len && n < sb; ++k)
5702 				n += scnprintf(b + n, sb - n, "%02x ",
5703 					       (u32)cmd[k]);
5704 		}
5705 		sdev_printk(KERN_INFO, sdp, "%s: tag=%#x, cmd %s\n", my_name,
5706 			    blk_mq_unique_tag(scp->request), b);
5707 	}
5708 	if (fake_host_busy(scp))
5709 		return SCSI_MLQUEUE_HOST_BUSY;
5710 	has_wlun_rl = (sdp->lun == SCSI_W_LUN_REPORT_LUNS);
5711 	if (unlikely((sdp->lun >= sdebug_max_luns) && !has_wlun_rl))
5712 		goto err_out;
5713 
5714 	sdeb_i = opcode_ind_arr[opcode];	/* fully mapped */
5715 	oip = &opcode_info_arr[sdeb_i];		/* safe if table consistent */
5716 	devip = (struct sdebug_dev_info *)sdp->hostdata;
5717 	if (unlikely(!devip)) {
5718 		devip = find_build_dev_info(sdp);
5719 		if (NULL == devip)
5720 			goto err_out;
5721 	}
5722 	na = oip->num_attached;
5723 	r_pfp = oip->pfp;
5724 	if (na) {	/* multiple commands with this opcode */
5725 		r_oip = oip;
5726 		if (FF_SA & r_oip->flags) {
5727 			if (F_SA_LOW & oip->flags)
5728 				sa = 0x1f & cmd[1];
5729 			else
5730 				sa = get_unaligned_be16(cmd + 8);
5731 			for (k = 0; k <= na; oip = r_oip->arrp + k++) {
5732 				if (opcode == oip->opcode && sa == oip->sa)
5733 					break;
5734 			}
5735 		} else {   /* since no service action only check opcode */
5736 			for (k = 0; k <= na; oip = r_oip->arrp + k++) {
5737 				if (opcode == oip->opcode)
5738 					break;
5739 			}
5740 		}
5741 		if (k > na) {
5742 			if (F_SA_LOW & r_oip->flags)
5743 				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 4);
5744 			else if (F_SA_HIGH & r_oip->flags)
5745 				mk_sense_invalid_fld(scp, SDEB_IN_CDB, 8, 7);
5746 			else
5747 				mk_sense_invalid_opcode(scp);
5748 			goto check_cond;
5749 		}
5750 	}	/* else (when na==0) we assume the oip is a match */
5751 	flags = oip->flags;
5752 	if (unlikely(F_INV_OP & flags)) {
5753 		mk_sense_invalid_opcode(scp);
5754 		goto check_cond;
5755 	}
5756 	if (unlikely(has_wlun_rl && !(F_RL_WLUN_OK & flags))) {
5757 		if (sdebug_verbose)
5758 			sdev_printk(KERN_INFO, sdp, "%s: Opcode 0x%x not%s\n",
5759 				    my_name, opcode, " supported for wlun");
5760 		mk_sense_invalid_opcode(scp);
5761 		goto check_cond;
5762 	}
5763 	if (unlikely(sdebug_strict)) {	/* check cdb against mask */
5764 		u8 rem;
5765 		int j;
5766 
5767 		for (k = 1; k < oip->len_mask[0] && k < 16; ++k) {
5768 			rem = ~oip->len_mask[k] & cmd[k];
5769 			if (rem) {
5770 				for (j = 7; j >= 0; --j, rem <<= 1) {
5771 					if (0x80 & rem)
5772 						break;
5773 				}
5774 				mk_sense_invalid_fld(scp, SDEB_IN_CDB, k, j);
5775 				goto check_cond;
5776 			}
5777 		}
5778 	}
5779 	if (unlikely(!(F_SKIP_UA & flags) &&
5780 		     find_first_bit(devip->uas_bm,
5781 				    SDEBUG_NUM_UAS) != SDEBUG_NUM_UAS)) {
5782 		errsts = make_ua(scp, devip);
5783 		if (errsts)
5784 			goto check_cond;
5785 	}
5786 	if (unlikely((F_M_ACCESS & flags) && atomic_read(&devip->stopped))) {
5787 		mk_sense_buffer(scp, NOT_READY, LOGICAL_UNIT_NOT_READY, 0x2);
5788 		if (sdebug_verbose)
5789 			sdev_printk(KERN_INFO, sdp, "%s reports: Not ready: "
5790 				    "%s\n", my_name, "initializing command "
5791 				    "required");
5792 		errsts = check_condition_result;
5793 		goto fini;
5794 	}
5795 	if (sdebug_fake_rw && (F_FAKE_RW & flags))
5796 		goto fini;
5797 	if (unlikely(sdebug_every_nth)) {
5798 		if (fake_timeout(scp))
5799 			return 0;	/* ignore command: make trouble */
5800 	}
5801 	if (likely(oip->pfp))
5802 		pfp = oip->pfp;	/* calls a resp_* function */
5803 	else
5804 		pfp = r_pfp;    /* if leaf function ptr NULL, try the root's */
5805 
5806 fini:
5807 	if (F_DELAY_OVERR & flags)
5808 		return schedule_resp(scp, devip, errsts, pfp, 0, 0);
5809 	else if ((flags & F_LONG_DELAY) && (sdebug_jdelay > 0 ||
5810 					    sdebug_ndelay > 10000)) {
5811 		/*
5812 		 * Skip long delays if ndelay <= 10 microseconds. Otherwise
5813 		 * for Start Stop Unit (SSU) want at least 1 second delay and
5814 		 * if sdebug_jdelay>1 want a long delay of that many seconds.
5815 		 * For Synchronize Cache want 1/20 of SSU's delay.
5816 		 */
5817 		int jdelay = (sdebug_jdelay < 2) ? 1 : sdebug_jdelay;
5818 		int denom = (flags & F_SYNC_DELAY) ? 20 : 1;
5819 
5820 		jdelay = mult_frac(USER_HZ * jdelay, HZ, denom * USER_HZ);
5821 		return schedule_resp(scp, devip, errsts, pfp, jdelay, 0);
5822 	} else
5823 		return schedule_resp(scp, devip, errsts, pfp, sdebug_jdelay,
5824 				     sdebug_ndelay);
5825 check_cond:
5826 	return schedule_resp(scp, devip, check_condition_result, NULL, 0, 0);
5827 err_out:
5828 	return schedule_resp(scp, NULL, DID_NO_CONNECT << 16, NULL, 0, 0);
5829 }
5830 
5831 static struct scsi_host_template sdebug_driver_template = {
5832 	.show_info =		scsi_debug_show_info,
5833 	.write_info =		scsi_debug_write_info,
5834 	.proc_name =		sdebug_proc_name,
5835 	.name =			"SCSI DEBUG",
5836 	.info =			scsi_debug_info,
5837 	.slave_alloc =		scsi_debug_slave_alloc,
5838 	.slave_configure =	scsi_debug_slave_configure,
5839 	.slave_destroy =	scsi_debug_slave_destroy,
5840 	.ioctl =		scsi_debug_ioctl,
5841 	.queuecommand =		scsi_debug_queuecommand,
5842 	.change_queue_depth =	sdebug_change_qdepth,
5843 	.eh_abort_handler =	scsi_debug_abort,
5844 	.eh_device_reset_handler = scsi_debug_device_reset,
5845 	.eh_target_reset_handler = scsi_debug_target_reset,
5846 	.eh_bus_reset_handler = scsi_debug_bus_reset,
5847 	.eh_host_reset_handler = scsi_debug_host_reset,
5848 	.can_queue =		SDEBUG_CANQUEUE,
5849 	.this_id =		7,
5850 	.sg_tablesize =		SG_MAX_SEGMENTS,
5851 	.cmd_per_lun =		DEF_CMD_PER_LUN,
5852 	.max_sectors =		-1U,
5853 	.max_segment_size =	-1U,
5854 	.module =		THIS_MODULE,
5855 	.track_queue_depth =	1,
5856 };
5857 
5858 static int sdebug_driver_probe(struct device *dev)
5859 {
5860 	int error = 0;
5861 	struct sdebug_host_info *sdbg_host;
5862 	struct Scsi_Host *hpnt;
5863 	int hprot;
5864 
5865 	sdbg_host = to_sdebug_host(dev);
5866 
5867 	sdebug_driver_template.can_queue = sdebug_max_queue;
5868 	if (!sdebug_clustering)
5869 		sdebug_driver_template.dma_boundary = PAGE_SIZE - 1;
5870 
5871 	hpnt = scsi_host_alloc(&sdebug_driver_template, sizeof(sdbg_host));
5872 	if (NULL == hpnt) {
5873 		pr_err("scsi_host_alloc failed\n");
5874 		error = -ENODEV;
5875 		return error;
5876 	}
5877 	if (submit_queues > nr_cpu_ids) {
5878 		pr_warn("%s: trim submit_queues (was %d) to nr_cpu_ids=%u\n",
5879 			my_name, submit_queues, nr_cpu_ids);
5880 		submit_queues = nr_cpu_ids;
5881 	}
5882 	/* Decide whether to tell scsi subsystem that we want mq */
5883 	/* Following should give the same answer for each host */
5884 	hpnt->nr_hw_queues = submit_queues;
5885 
5886 	sdbg_host->shost = hpnt;
5887 	*((struct sdebug_host_info **)hpnt->hostdata) = sdbg_host;
5888 	if ((hpnt->this_id >= 0) && (sdebug_num_tgts > hpnt->this_id))
5889 		hpnt->max_id = sdebug_num_tgts + 1;
5890 	else
5891 		hpnt->max_id = sdebug_num_tgts;
5892 	/* = sdebug_max_luns; */
5893 	hpnt->max_lun = SCSI_W_LUN_REPORT_LUNS + 1;
5894 
5895 	hprot = 0;
5896 
5897 	switch (sdebug_dif) {
5898 
5899 	case T10_PI_TYPE1_PROTECTION:
5900 		hprot = SHOST_DIF_TYPE1_PROTECTION;
5901 		if (sdebug_dix)
5902 			hprot |= SHOST_DIX_TYPE1_PROTECTION;
5903 		break;
5904 
5905 	case T10_PI_TYPE2_PROTECTION:
5906 		hprot = SHOST_DIF_TYPE2_PROTECTION;
5907 		if (sdebug_dix)
5908 			hprot |= SHOST_DIX_TYPE2_PROTECTION;
5909 		break;
5910 
5911 	case T10_PI_TYPE3_PROTECTION:
5912 		hprot = SHOST_DIF_TYPE3_PROTECTION;
5913 		if (sdebug_dix)
5914 			hprot |= SHOST_DIX_TYPE3_PROTECTION;
5915 		break;
5916 
5917 	default:
5918 		if (sdebug_dix)
5919 			hprot |= SHOST_DIX_TYPE0_PROTECTION;
5920 		break;
5921 	}
5922 
5923 	scsi_host_set_prot(hpnt, hprot);
5924 
5925 	if (have_dif_prot || sdebug_dix)
5926 		pr_info("host protection%s%s%s%s%s%s%s\n",
5927 			(hprot & SHOST_DIF_TYPE1_PROTECTION) ? " DIF1" : "",
5928 			(hprot & SHOST_DIF_TYPE2_PROTECTION) ? " DIF2" : "",
5929 			(hprot & SHOST_DIF_TYPE3_PROTECTION) ? " DIF3" : "",
5930 			(hprot & SHOST_DIX_TYPE0_PROTECTION) ? " DIX0" : "",
5931 			(hprot & SHOST_DIX_TYPE1_PROTECTION) ? " DIX1" : "",
5932 			(hprot & SHOST_DIX_TYPE2_PROTECTION) ? " DIX2" : "",
5933 			(hprot & SHOST_DIX_TYPE3_PROTECTION) ? " DIX3" : "");
5934 
5935 	if (sdebug_guard == 1)
5936 		scsi_host_set_guard(hpnt, SHOST_DIX_GUARD_IP);
5937 	else
5938 		scsi_host_set_guard(hpnt, SHOST_DIX_GUARD_CRC);
5939 
5940 	sdebug_verbose = !!(SDEBUG_OPT_NOISE & sdebug_opts);
5941 	sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & sdebug_opts);
5942 	if (sdebug_every_nth)	/* need stats counters for every_nth */
5943 		sdebug_statistics = true;
5944 	error = scsi_add_host(hpnt, &sdbg_host->dev);
5945 	if (error) {
5946 		pr_err("scsi_add_host failed\n");
5947 		error = -ENODEV;
5948 		scsi_host_put(hpnt);
5949 	} else
5950 		scsi_scan_host(hpnt);
5951 
5952 	return error;
5953 }
5954 
5955 static int sdebug_driver_remove(struct device *dev)
5956 {
5957 	struct sdebug_host_info *sdbg_host;
5958 	struct sdebug_dev_info *sdbg_devinfo, *tmp;
5959 
5960 	sdbg_host = to_sdebug_host(dev);
5961 
5962 	if (!sdbg_host) {
5963 		pr_err("Unable to locate host info\n");
5964 		return -ENODEV;
5965 	}
5966 
5967 	scsi_remove_host(sdbg_host->shost);
5968 
5969 	list_for_each_entry_safe(sdbg_devinfo, tmp, &sdbg_host->dev_info_list,
5970 				 dev_list) {
5971 		list_del(&sdbg_devinfo->dev_list);
5972 		kfree(sdbg_devinfo);
5973 	}
5974 
5975 	scsi_host_put(sdbg_host->shost);
5976 	return 0;
5977 }
5978 
5979 static int pseudo_lld_bus_match(struct device *dev,
5980 				struct device_driver *dev_driver)
5981 {
5982 	return 1;
5983 }
5984 
5985 static struct bus_type pseudo_lld_bus = {
5986 	.name = "pseudo",
5987 	.match = pseudo_lld_bus_match,
5988 	.probe = sdebug_driver_probe,
5989 	.remove = sdebug_driver_remove,
5990 	.drv_groups = sdebug_drv_groups,
5991 };
5992