Loading...
1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * vvvvvvvvvvvvvvvvvvvvvvv Original vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
4 * Copyright (C) 1992 Eric Youngdale
5 * Simulate a host adapter with 2 disks attached. Do a lot of checking
6 * to make sure that we are not getting blocks mixed up, and PANIC if
7 * anything out of the ordinary is seen.
8 * ^^^^^^^^^^^^^^^^^^^^^^^ Original ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
9 *
10 * Copyright (C) 2001 - 2021 Douglas Gilbert
11 *
12 * For documentation see http://sg.danny.cz/sg/scsi_debug.html
13 */
14
15
16#define pr_fmt(fmt) KBUILD_MODNAME ":%s: " fmt, __func__
17
18#include <linux/module.h>
19#include <linux/align.h>
20#include <linux/kernel.h>
21#include <linux/errno.h>
22#include <linux/jiffies.h>
23#include <linux/slab.h>
24#include <linux/types.h>
25#include <linux/string.h>
26#include <linux/fs.h>
27#include <linux/init.h>
28#include <linux/proc_fs.h>
29#include <linux/vmalloc.h>
30#include <linux/moduleparam.h>
31#include <linux/scatterlist.h>
32#include <linux/blkdev.h>
33#include <linux/crc-t10dif.h>
34#include <linux/spinlock.h>
35#include <linux/interrupt.h>
36#include <linux/atomic.h>
37#include <linux/hrtimer.h>
38#include <linux/uuid.h>
39#include <linux/t10-pi.h>
40#include <linux/msdos_partition.h>
41#include <linux/random.h>
42#include <linux/xarray.h>
43#include <linux/prefetch.h>
44#include <linux/debugfs.h>
45#include <linux/async.h>
46#include <linux/cleanup.h>
47
48#include <net/checksum.h>
49
50#include <asm/unaligned.h>
51
52#include <scsi/scsi.h>
53#include <scsi/scsi_cmnd.h>
54#include <scsi/scsi_device.h>
55#include <scsi/scsi_host.h>
56#include <scsi/scsicam.h>
57#include <scsi/scsi_eh.h>
58#include <scsi/scsi_tcq.h>
59#include <scsi/scsi_dbg.h>
60
61#include "sd.h"
62#include "scsi_logging.h"
63
64/* make sure inq_product_rev string corresponds to this version */
65#define SDEBUG_VERSION "0191" /* format to fit INQUIRY revision field */
66static const char *sdebug_version_date = "20210520";
67
68#define MY_NAME "scsi_debug"
69
70/* Additional Sense Code (ASC) */
71#define NO_ADDITIONAL_SENSE 0x0
72#define LOGICAL_UNIT_NOT_READY 0x4
73#define LOGICAL_UNIT_COMMUNICATION_FAILURE 0x8
74#define UNRECOVERED_READ_ERR 0x11
75#define PARAMETER_LIST_LENGTH_ERR 0x1a
76#define INVALID_OPCODE 0x20
77#define LBA_OUT_OF_RANGE 0x21
78#define INVALID_FIELD_IN_CDB 0x24
79#define INVALID_FIELD_IN_PARAM_LIST 0x26
80#define WRITE_PROTECTED 0x27
81#define UA_RESET_ASC 0x29
82#define UA_CHANGED_ASC 0x2a
83#define TARGET_CHANGED_ASC 0x3f
84#define LUNS_CHANGED_ASCQ 0x0e
85#define INSUFF_RES_ASC 0x55
86#define INSUFF_RES_ASCQ 0x3
87#define POWER_ON_RESET_ASCQ 0x0
88#define POWER_ON_OCCURRED_ASCQ 0x1
89#define BUS_RESET_ASCQ 0x2 /* scsi bus reset occurred */
90#define MODE_CHANGED_ASCQ 0x1 /* mode parameters changed */
91#define CAPACITY_CHANGED_ASCQ 0x9
92#define SAVING_PARAMS_UNSUP 0x39
93#define TRANSPORT_PROBLEM 0x4b
94#define THRESHOLD_EXCEEDED 0x5d
95#define LOW_POWER_COND_ON 0x5e
96#define MISCOMPARE_VERIFY_ASC 0x1d
97#define MICROCODE_CHANGED_ASCQ 0x1 /* with TARGET_CHANGED_ASC */
98#define MICROCODE_CHANGED_WO_RESET_ASCQ 0x16
99#define WRITE_ERROR_ASC 0xc
100#define UNALIGNED_WRITE_ASCQ 0x4
101#define WRITE_BOUNDARY_ASCQ 0x5
102#define READ_INVDATA_ASCQ 0x6
103#define READ_BOUNDARY_ASCQ 0x7
104#define ATTEMPT_ACCESS_GAP 0x9
105#define INSUFF_ZONE_ASCQ 0xe
106
107/* Additional Sense Code Qualifier (ASCQ) */
108#define ACK_NAK_TO 0x3
109
110/* Default values for driver parameters */
111#define DEF_NUM_HOST 1
112#define DEF_NUM_TGTS 1
113#define DEF_MAX_LUNS 1
114/* With these defaults, this driver will make 1 host with 1 target
115 * (id 0) containing 1 logical unit (lun 0). That is 1 device.
116 */
117#define DEF_ATO 1
118#define DEF_CDB_LEN 10
119#define DEF_JDELAY 1 /* if > 0 unit is a jiffy */
120#define DEF_DEV_SIZE_PRE_INIT 0
121#define DEF_DEV_SIZE_MB 8
122#define DEF_ZBC_DEV_SIZE_MB 128
123#define DEF_DIF 0
124#define DEF_DIX 0
125#define DEF_PER_HOST_STORE false
126#define DEF_D_SENSE 0
127#define DEF_EVERY_NTH 0
128#define DEF_FAKE_RW 0
129#define DEF_GUARD 0
130#define DEF_HOST_LOCK 0
131#define DEF_LBPU 0
132#define DEF_LBPWS 0
133#define DEF_LBPWS10 0
134#define DEF_LBPRZ 1
135#define DEF_LOWEST_ALIGNED 0
136#define DEF_NDELAY 0 /* if > 0 unit is a nanosecond */
137#define DEF_NO_LUN_0 0
138#define DEF_NUM_PARTS 0
139#define DEF_OPTS 0
140#define DEF_OPT_BLKS 1024
141#define DEF_PHYSBLK_EXP 0
142#define DEF_OPT_XFERLEN_EXP 0
143#define DEF_PTYPE TYPE_DISK
144#define DEF_RANDOM false
145#define DEF_REMOVABLE false
146#define DEF_SCSI_LEVEL 7 /* INQUIRY, byte2 [6->SPC-4; 7->SPC-5] */
147#define DEF_SECTOR_SIZE 512
148#define DEF_UNMAP_ALIGNMENT 0
149#define DEF_UNMAP_GRANULARITY 1
150#define DEF_UNMAP_MAX_BLOCKS 0xFFFFFFFF
151#define DEF_UNMAP_MAX_DESC 256
152#define DEF_VIRTUAL_GB 0
153#define DEF_VPD_USE_HOSTNO 1
154#define DEF_WRITESAME_LENGTH 0xFFFF
155#define DEF_STRICT 0
156#define DEF_STATISTICS false
157#define DEF_SUBMIT_QUEUES 1
158#define DEF_TUR_MS_TO_READY 0
159#define DEF_UUID_CTL 0
160#define JDELAY_OVERRIDDEN -9999
161
162/* Default parameters for ZBC drives */
163#define DEF_ZBC_ZONE_SIZE_MB 128
164#define DEF_ZBC_MAX_OPEN_ZONES 8
165#define DEF_ZBC_NR_CONV_ZONES 1
166
167#define SDEBUG_LUN_0_VAL 0
168
169/* bit mask values for sdebug_opts */
170#define SDEBUG_OPT_NOISE 1
171#define SDEBUG_OPT_MEDIUM_ERR 2
172#define SDEBUG_OPT_TIMEOUT 4
173#define SDEBUG_OPT_RECOVERED_ERR 8
174#define SDEBUG_OPT_TRANSPORT_ERR 16
175#define SDEBUG_OPT_DIF_ERR 32
176#define SDEBUG_OPT_DIX_ERR 64
177#define SDEBUG_OPT_MAC_TIMEOUT 128
178#define SDEBUG_OPT_SHORT_TRANSFER 0x100
179#define SDEBUG_OPT_Q_NOISE 0x200
180#define SDEBUG_OPT_ALL_TSF 0x400 /* ignore */
181#define SDEBUG_OPT_RARE_TSF 0x800
182#define SDEBUG_OPT_N_WCE 0x1000
183#define SDEBUG_OPT_RESET_NOISE 0x2000
184#define SDEBUG_OPT_NO_CDB_NOISE 0x4000
185#define SDEBUG_OPT_HOST_BUSY 0x8000
186#define SDEBUG_OPT_CMD_ABORT 0x10000
187#define SDEBUG_OPT_ALL_NOISE (SDEBUG_OPT_NOISE | SDEBUG_OPT_Q_NOISE | \
188 SDEBUG_OPT_RESET_NOISE)
189#define SDEBUG_OPT_ALL_INJECTING (SDEBUG_OPT_RECOVERED_ERR | \
190 SDEBUG_OPT_TRANSPORT_ERR | \
191 SDEBUG_OPT_DIF_ERR | SDEBUG_OPT_DIX_ERR | \
192 SDEBUG_OPT_SHORT_TRANSFER | \
193 SDEBUG_OPT_HOST_BUSY | \
194 SDEBUG_OPT_CMD_ABORT)
195#define SDEBUG_OPT_RECOV_DIF_DIX (SDEBUG_OPT_RECOVERED_ERR | \
196 SDEBUG_OPT_DIF_ERR | SDEBUG_OPT_DIX_ERR)
197
198/* As indicated in SAM-5 and SPC-4 Unit Attentions (UAs) are returned in
199 * priority order. In the subset implemented here lower numbers have higher
200 * priority. The UA numbers should be a sequence starting from 0 with
201 * SDEBUG_NUM_UAS being 1 higher than the highest numbered UA. */
202#define SDEBUG_UA_POR 0 /* Power on, reset, or bus device reset */
203#define SDEBUG_UA_POOCCUR 1 /* Power on occurred */
204#define SDEBUG_UA_BUS_RESET 2
205#define SDEBUG_UA_MODE_CHANGED 3
206#define SDEBUG_UA_CAPACITY_CHANGED 4
207#define SDEBUG_UA_LUNS_CHANGED 5
208#define SDEBUG_UA_MICROCODE_CHANGED 6 /* simulate firmware change */
209#define SDEBUG_UA_MICROCODE_CHANGED_WO_RESET 7
210#define SDEBUG_NUM_UAS 8
211
212/* when 1==SDEBUG_OPT_MEDIUM_ERR, a medium error is simulated at this
213 * sector on read commands: */
214#define OPT_MEDIUM_ERR_ADDR 0x1234 /* that's sector 4660 in decimal */
215#define OPT_MEDIUM_ERR_NUM 10 /* number of consecutive medium errs */
216
217/* SDEBUG_CANQUEUE is the maximum number of commands that can be queued
218 * (for response) per submit queue at one time. Can be reduced by max_queue
219 * option. Command responses are not queued when jdelay=0 and ndelay=0. The
220 * per-device DEF_CMD_PER_LUN can be changed via sysfs:
221 * /sys/class/scsi_device/<h:c:t:l>/device/queue_depth
222 * but cannot exceed SDEBUG_CANQUEUE .
223 */
224#define SDEBUG_CANQUEUE_WORDS 3 /* a WORD is bits in a long */
225#define SDEBUG_CANQUEUE (SDEBUG_CANQUEUE_WORDS * BITS_PER_LONG)
226#define DEF_CMD_PER_LUN SDEBUG_CANQUEUE
227
228/* UA - Unit Attention; SA - Service Action; SSU - Start Stop Unit */
229#define F_D_IN 1 /* Data-in command (e.g. READ) */
230#define F_D_OUT 2 /* Data-out command (e.g. WRITE) */
231#define F_D_OUT_MAYBE 4 /* WRITE SAME, NDOB bit */
232#define F_D_UNKN 8
233#define F_RL_WLUN_OK 0x10 /* allowed with REPORT LUNS W-LUN */
234#define F_SKIP_UA 0x20 /* bypass UAs (e.g. INQUIRY command) */
235#define F_DELAY_OVERR 0x40 /* for commands like INQUIRY */
236#define F_SA_LOW 0x80 /* SA is in cdb byte 1, bits 4 to 0 */
237#define F_SA_HIGH 0x100 /* SA is in cdb bytes 8 and 9 */
238#define F_INV_OP 0x200 /* invalid opcode (not supported) */
239#define F_FAKE_RW 0x400 /* bypass resp_*() when fake_rw set */
240#define F_M_ACCESS 0x800 /* media access, reacts to SSU state */
241#define F_SSU_DELAY 0x1000 /* SSU command delay (long-ish) */
242#define F_SYNC_DELAY 0x2000 /* SYNCHRONIZE CACHE delay */
243
244/* Useful combinations of the above flags */
245#define FF_RESPOND (F_RL_WLUN_OK | F_SKIP_UA | F_DELAY_OVERR)
246#define FF_MEDIA_IO (F_M_ACCESS | F_FAKE_RW)
247#define FF_SA (F_SA_HIGH | F_SA_LOW)
248#define F_LONG_DELAY (F_SSU_DELAY | F_SYNC_DELAY)
249
250#define SDEBUG_MAX_PARTS 4
251
252#define SDEBUG_MAX_CMD_LEN 32
253
254#define SDEB_XA_NOT_IN_USE XA_MARK_1
255
256static struct kmem_cache *queued_cmd_cache;
257
258#define TO_QUEUED_CMD(scmd) ((void *)(scmd)->host_scribble)
259#define ASSIGN_QUEUED_CMD(scmnd, qc) { (scmnd)->host_scribble = (void *) qc; }
260
261/* Zone types (zbcr05 table 25) */
262enum sdebug_z_type {
263 ZBC_ZTYPE_CNV = 0x1,
264 ZBC_ZTYPE_SWR = 0x2,
265 ZBC_ZTYPE_SWP = 0x3,
266 /* ZBC_ZTYPE_SOBR = 0x4, */
267 ZBC_ZTYPE_GAP = 0x5,
268};
269
270/* enumeration names taken from table 26, zbcr05 */
271enum sdebug_z_cond {
272 ZBC_NOT_WRITE_POINTER = 0x0,
273 ZC1_EMPTY = 0x1,
274 ZC2_IMPLICIT_OPEN = 0x2,
275 ZC3_EXPLICIT_OPEN = 0x3,
276 ZC4_CLOSED = 0x4,
277 ZC6_READ_ONLY = 0xd,
278 ZC5_FULL = 0xe,
279 ZC7_OFFLINE = 0xf,
280};
281
282struct sdeb_zone_state { /* ZBC: per zone state */
283 enum sdebug_z_type z_type;
284 enum sdebug_z_cond z_cond;
285 bool z_non_seq_resource;
286 unsigned int z_size;
287 sector_t z_start;
288 sector_t z_wp;
289};
290
291enum sdebug_err_type {
292 ERR_TMOUT_CMD = 0, /* make specific scsi command timeout */
293 ERR_FAIL_QUEUE_CMD = 1, /* make specific scsi command's */
294 /* queuecmd return failed */
295 ERR_FAIL_CMD = 2, /* make specific scsi command's */
296 /* queuecmd return succeed but */
297 /* with errors set in scsi_cmnd */
298 ERR_ABORT_CMD_FAILED = 3, /* control return FAILED from */
299 /* scsi_debug_abort() */
300 ERR_LUN_RESET_FAILED = 4, /* control return FAILED from */
301 /* scsi_debug_device_reseLUN_RESET_FAILEDt() */
302};
303
304struct sdebug_err_inject {
305 int type;
306 struct list_head list;
307 int cnt;
308 unsigned char cmd;
309 struct rcu_head rcu;
310
311 union {
312 /*
313 * For ERR_FAIL_QUEUE_CMD
314 */
315 int queuecmd_ret;
316
317 /*
318 * For ERR_FAIL_CMD
319 */
320 struct {
321 unsigned char host_byte;
322 unsigned char driver_byte;
323 unsigned char status_byte;
324 unsigned char sense_key;
325 unsigned char asc;
326 unsigned char asq;
327 };
328 };
329};
330
331struct sdebug_dev_info {
332 struct list_head dev_list;
333 unsigned int channel;
334 unsigned int target;
335 u64 lun;
336 uuid_t lu_name;
337 struct sdebug_host_info *sdbg_host;
338 unsigned long uas_bm[1];
339 atomic_t stopped; /* 1: by SSU, 2: device start */
340 bool used;
341
342 /* For ZBC devices */
343 bool zoned;
344 unsigned int zcap;
345 unsigned int zsize;
346 unsigned int zsize_shift;
347 unsigned int nr_zones;
348 unsigned int nr_conv_zones;
349 unsigned int nr_seq_zones;
350 unsigned int nr_imp_open;
351 unsigned int nr_exp_open;
352 unsigned int nr_closed;
353 unsigned int max_open;
354 ktime_t create_ts; /* time since bootup that this device was created */
355 struct sdeb_zone_state *zstate;
356
357 struct dentry *debugfs_entry;
358 struct spinlock list_lock;
359 struct list_head inject_err_list;
360};
361
362struct sdebug_target_info {
363 bool reset_fail;
364 struct dentry *debugfs_entry;
365};
366
367struct sdebug_host_info {
368 struct list_head host_list;
369 int si_idx; /* sdeb_store_info (per host) xarray index */
370 struct Scsi_Host *shost;
371 struct device dev;
372 struct list_head dev_info_list;
373};
374
375/* There is an xarray of pointers to this struct's objects, one per host */
376struct sdeb_store_info {
377 rwlock_t macc_lck; /* for atomic media access on this store */
378 u8 *storep; /* user data storage (ram) */
379 struct t10_pi_tuple *dif_storep; /* protection info */
380 void *map_storep; /* provisioning map */
381};
382
383#define dev_to_sdebug_host(d) \
384 container_of(d, struct sdebug_host_info, dev)
385
386#define shost_to_sdebug_host(shost) \
387 dev_to_sdebug_host(shost->dma_dev)
388
389enum sdeb_defer_type {SDEB_DEFER_NONE = 0, SDEB_DEFER_HRT = 1,
390 SDEB_DEFER_WQ = 2, SDEB_DEFER_POLL = 3};
391
392struct sdebug_defer {
393 struct hrtimer hrt;
394 struct execute_work ew;
395 ktime_t cmpl_ts;/* time since boot to complete this cmd */
396 int issuing_cpu;
397 bool aborted; /* true when blk_abort_request() already called */
398 enum sdeb_defer_type defer_t;
399};
400
401struct sdebug_queued_cmd {
402 /* corresponding bit set in in_use_bm[] in owning struct sdebug_queue
403 * instance indicates this slot is in use.
404 */
405 struct sdebug_defer sd_dp;
406 struct scsi_cmnd *scmd;
407};
408
409struct sdebug_scsi_cmd {
410 spinlock_t lock;
411};
412
413static atomic_t sdebug_cmnd_count; /* number of incoming commands */
414static atomic_t sdebug_completions; /* count of deferred completions */
415static atomic_t sdebug_miss_cpus; /* submission + completion cpus differ */
416static atomic_t sdebug_a_tsf; /* 'almost task set full' counter */
417static atomic_t sdeb_inject_pending;
418static atomic_t sdeb_mq_poll_count; /* bumped when mq_poll returns > 0 */
419
420struct opcode_info_t {
421 u8 num_attached; /* 0 if this is it (i.e. a leaf); use 0xff */
422 /* for terminating element */
423 u8 opcode; /* if num_attached > 0, preferred */
424 u16 sa; /* service action */
425 u32 flags; /* OR-ed set of SDEB_F_* */
426 int (*pfp)(struct scsi_cmnd *, struct sdebug_dev_info *);
427 const struct opcode_info_t *arrp; /* num_attached elements or NULL */
428 u8 len_mask[16]; /* len_mask[0]-->cdb_len, then mask for cdb */
429 /* 1 to min(cdb_len, 15); ignore cdb[15...] */
430};
431
432/* SCSI opcodes (first byte of cdb) of interest mapped onto these indexes */
433enum sdeb_opcode_index {
434 SDEB_I_INVALID_OPCODE = 0,
435 SDEB_I_INQUIRY = 1,
436 SDEB_I_REPORT_LUNS = 2,
437 SDEB_I_REQUEST_SENSE = 3,
438 SDEB_I_TEST_UNIT_READY = 4,
439 SDEB_I_MODE_SENSE = 5, /* 6, 10 */
440 SDEB_I_MODE_SELECT = 6, /* 6, 10 */
441 SDEB_I_LOG_SENSE = 7,
442 SDEB_I_READ_CAPACITY = 8, /* 10; 16 is in SA_IN(16) */
443 SDEB_I_READ = 9, /* 6, 10, 12, 16 */
444 SDEB_I_WRITE = 10, /* 6, 10, 12, 16 */
445 SDEB_I_START_STOP = 11,
446 SDEB_I_SERV_ACT_IN_16 = 12, /* add ...SERV_ACT_IN_12 if needed */
447 SDEB_I_SERV_ACT_OUT_16 = 13, /* add ...SERV_ACT_OUT_12 if needed */
448 SDEB_I_MAINT_IN = 14,
449 SDEB_I_MAINT_OUT = 15,
450 SDEB_I_VERIFY = 16, /* VERIFY(10), VERIFY(16) */
451 SDEB_I_VARIABLE_LEN = 17, /* READ(32), WRITE(32), WR_SCAT(32) */
452 SDEB_I_RESERVE = 18, /* 6, 10 */
453 SDEB_I_RELEASE = 19, /* 6, 10 */
454 SDEB_I_ALLOW_REMOVAL = 20, /* PREVENT ALLOW MEDIUM REMOVAL */
455 SDEB_I_REZERO_UNIT = 21, /* REWIND in SSC */
456 SDEB_I_ATA_PT = 22, /* 12, 16 */
457 SDEB_I_SEND_DIAG = 23,
458 SDEB_I_UNMAP = 24,
459 SDEB_I_WRITE_BUFFER = 25,
460 SDEB_I_WRITE_SAME = 26, /* 10, 16 */
461 SDEB_I_SYNC_CACHE = 27, /* 10, 16 */
462 SDEB_I_COMP_WRITE = 28,
463 SDEB_I_PRE_FETCH = 29, /* 10, 16 */
464 SDEB_I_ZONE_OUT = 30, /* 0x94+SA; includes no data xfer */
465 SDEB_I_ZONE_IN = 31, /* 0x95+SA; all have data-in */
466 SDEB_I_LAST_ELEM_P1 = 32, /* keep this last (previous + 1) */
467};
468
469
470static const unsigned char opcode_ind_arr[256] = {
471/* 0x0; 0x0->0x1f: 6 byte cdbs */
472 SDEB_I_TEST_UNIT_READY, SDEB_I_REZERO_UNIT, 0, SDEB_I_REQUEST_SENSE,
473 0, 0, 0, 0,
474 SDEB_I_READ, 0, SDEB_I_WRITE, 0, 0, 0, 0, 0,
475 0, 0, SDEB_I_INQUIRY, 0, 0, SDEB_I_MODE_SELECT, SDEB_I_RESERVE,
476 SDEB_I_RELEASE,
477 0, 0, SDEB_I_MODE_SENSE, SDEB_I_START_STOP, 0, SDEB_I_SEND_DIAG,
478 SDEB_I_ALLOW_REMOVAL, 0,
479/* 0x20; 0x20->0x3f: 10 byte cdbs */
480 0, 0, 0, 0, 0, SDEB_I_READ_CAPACITY, 0, 0,
481 SDEB_I_READ, 0, SDEB_I_WRITE, 0, 0, 0, 0, SDEB_I_VERIFY,
482 0, 0, 0, 0, SDEB_I_PRE_FETCH, SDEB_I_SYNC_CACHE, 0, 0,
483 0, 0, 0, SDEB_I_WRITE_BUFFER, 0, 0, 0, 0,
484/* 0x40; 0x40->0x5f: 10 byte cdbs */
485 0, SDEB_I_WRITE_SAME, SDEB_I_UNMAP, 0, 0, 0, 0, 0,
486 0, 0, 0, 0, 0, SDEB_I_LOG_SENSE, 0, 0,
487 0, 0, 0, 0, 0, SDEB_I_MODE_SELECT, SDEB_I_RESERVE,
488 SDEB_I_RELEASE,
489 0, 0, SDEB_I_MODE_SENSE, 0, 0, 0, 0, 0,
490/* 0x60; 0x60->0x7d are reserved, 0x7e is "extended cdb" */
491 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
492 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
493 0, SDEB_I_VARIABLE_LEN,
494/* 0x80; 0x80->0x9f: 16 byte cdbs */
495 0, 0, 0, 0, 0, SDEB_I_ATA_PT, 0, 0,
496 SDEB_I_READ, SDEB_I_COMP_WRITE, SDEB_I_WRITE, 0,
497 0, 0, 0, SDEB_I_VERIFY,
498 SDEB_I_PRE_FETCH, SDEB_I_SYNC_CACHE, 0, SDEB_I_WRITE_SAME,
499 SDEB_I_ZONE_OUT, SDEB_I_ZONE_IN, 0, 0,
500 0, 0, 0, 0, 0, 0, SDEB_I_SERV_ACT_IN_16, SDEB_I_SERV_ACT_OUT_16,
501/* 0xa0; 0xa0->0xbf: 12 byte cdbs */
502 SDEB_I_REPORT_LUNS, SDEB_I_ATA_PT, 0, SDEB_I_MAINT_IN,
503 SDEB_I_MAINT_OUT, 0, 0, 0,
504 SDEB_I_READ, 0 /* SDEB_I_SERV_ACT_OUT_12 */, SDEB_I_WRITE,
505 0 /* SDEB_I_SERV_ACT_IN_12 */, 0, 0, 0, 0,
506 0, 0, 0, 0, 0, 0, 0, 0,
507 0, 0, 0, 0, 0, 0, 0, 0,
508/* 0xc0; 0xc0->0xff: vendor specific */
509 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
510 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
511 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
512 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
513};
514
515/*
516 * The following "response" functions return the SCSI mid-level's 4 byte
517 * tuple-in-an-int. To handle commands with an IMMED bit, for a faster
518 * command completion, they can mask their return value with
519 * SDEG_RES_IMMED_MASK .
520 */
521#define SDEG_RES_IMMED_MASK 0x40000000
522
523static int resp_inquiry(struct scsi_cmnd *, struct sdebug_dev_info *);
524static int resp_report_luns(struct scsi_cmnd *, struct sdebug_dev_info *);
525static int resp_requests(struct scsi_cmnd *, struct sdebug_dev_info *);
526static int resp_mode_sense(struct scsi_cmnd *, struct sdebug_dev_info *);
527static int resp_mode_select(struct scsi_cmnd *, struct sdebug_dev_info *);
528static int resp_log_sense(struct scsi_cmnd *, struct sdebug_dev_info *);
529static int resp_readcap(struct scsi_cmnd *, struct sdebug_dev_info *);
530static int resp_read_dt0(struct scsi_cmnd *, struct sdebug_dev_info *);
531static int resp_write_dt0(struct scsi_cmnd *, struct sdebug_dev_info *);
532static int resp_write_scat(struct scsi_cmnd *, struct sdebug_dev_info *);
533static int resp_start_stop(struct scsi_cmnd *, struct sdebug_dev_info *);
534static int resp_readcap16(struct scsi_cmnd *, struct sdebug_dev_info *);
535static int resp_get_lba_status(struct scsi_cmnd *, struct sdebug_dev_info *);
536static int resp_get_stream_status(struct scsi_cmnd *scp,
537 struct sdebug_dev_info *devip);
538static int resp_report_tgtpgs(struct scsi_cmnd *, struct sdebug_dev_info *);
539static int resp_unmap(struct scsi_cmnd *, struct sdebug_dev_info *);
540static int resp_rsup_opcodes(struct scsi_cmnd *, struct sdebug_dev_info *);
541static int resp_rsup_tmfs(struct scsi_cmnd *, struct sdebug_dev_info *);
542static int resp_verify(struct scsi_cmnd *, struct sdebug_dev_info *);
543static int resp_write_same_10(struct scsi_cmnd *, struct sdebug_dev_info *);
544static int resp_write_same_16(struct scsi_cmnd *, struct sdebug_dev_info *);
545static int resp_comp_write(struct scsi_cmnd *, struct sdebug_dev_info *);
546static int resp_write_buffer(struct scsi_cmnd *, struct sdebug_dev_info *);
547static int resp_sync_cache(struct scsi_cmnd *, struct sdebug_dev_info *);
548static int resp_pre_fetch(struct scsi_cmnd *, struct sdebug_dev_info *);
549static int resp_report_zones(struct scsi_cmnd *, struct sdebug_dev_info *);
550static int resp_open_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
551static int resp_close_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
552static int resp_finish_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
553static int resp_rwp_zone(struct scsi_cmnd *, struct sdebug_dev_info *);
554
555static int sdebug_do_add_host(bool mk_new_store);
556static int sdebug_add_host_helper(int per_host_idx);
557static void sdebug_do_remove_host(bool the_end);
558static int sdebug_add_store(void);
559static void sdebug_erase_store(int idx, struct sdeb_store_info *sip);
560static void sdebug_erase_all_stores(bool apart_from_first);
561
562static void sdebug_free_queued_cmd(struct sdebug_queued_cmd *sqcp);
563
564/*
565 * The following are overflow arrays for cdbs that "hit" the same index in
566 * the opcode_info_arr array. The most time sensitive (or commonly used) cdb
567 * should be placed in opcode_info_arr[], the others should be placed here.
568 */
569static const struct opcode_info_t msense_iarr[] = {
570 {0, 0x1a, 0, F_D_IN, NULL, NULL,
571 {6, 0xe8, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
572};
573
574static const struct opcode_info_t mselect_iarr[] = {
575 {0, 0x15, 0, F_D_OUT, NULL, NULL,
576 {6, 0xf1, 0, 0, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
577};
578
579static const struct opcode_info_t read_iarr[] = {
580 {0, 0x28, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL,/* READ(10) */
581 {10, 0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
582 0, 0, 0, 0} },
583 {0, 0x8, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL, /* READ(6) */
584 {6, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
585 {0, 0xa8, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL,/* READ(12) */
586 {12, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xbf,
587 0xc7, 0, 0, 0, 0} },
588};
589
590static const struct opcode_info_t write_iarr[] = {
591 {0, 0x2a, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0, /* WRITE(10) */
592 NULL, {10, 0xfb, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7,
593 0, 0, 0, 0, 0, 0} },
594 {0, 0xa, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0, /* WRITE(6) */
595 NULL, {6, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0,
596 0, 0, 0} },
597 {0, 0xaa, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0, /* WRITE(12) */
598 NULL, {12, 0xfb, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
599 0xbf, 0xc7, 0, 0, 0, 0} },
600};
601
602static const struct opcode_info_t verify_iarr[] = {
603 {0, 0x2f, 0, F_D_OUT_MAYBE | FF_MEDIA_IO, resp_verify,/* VERIFY(10) */
604 NULL, {10, 0xf7, 0xff, 0xff, 0xff, 0xff, 0xbf, 0xff, 0xff, 0xc7,
605 0, 0, 0, 0, 0, 0} },
606};
607
608static const struct opcode_info_t sa_in_16_iarr[] = {
609 {0, 0x9e, 0x12, F_SA_LOW | F_D_IN, resp_get_lba_status, NULL,
610 {16, 0x12, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
611 0xff, 0xff, 0xff, 0, 0xc7} }, /* GET LBA STATUS(16) */
612 {0, 0x9e, 0x16, F_SA_LOW | F_D_IN, resp_get_stream_status, NULL,
613 {16, 0x16, 0, 0, 0xff, 0xff, 0, 0, 0, 0, 0xff, 0xff, 0xff, 0xff,
614 0, 0} }, /* GET STREAM STATUS */
615};
616
617static const struct opcode_info_t vl_iarr[] = { /* VARIABLE LENGTH */
618 {0, 0x7f, 0xb, F_SA_HIGH | F_D_OUT | FF_MEDIA_IO, resp_write_dt0,
619 NULL, {32, 0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0xb, 0xfa,
620 0, 0xff, 0xff, 0xff, 0xff} }, /* WRITE(32) */
621 {0, 0x7f, 0x11, F_SA_HIGH | F_D_OUT | FF_MEDIA_IO, resp_write_scat,
622 NULL, {32, 0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0x11, 0xf8,
623 0, 0xff, 0xff, 0x0, 0x0} }, /* WRITE SCATTERED(32) */
624};
625
626static const struct opcode_info_t maint_in_iarr[] = { /* MAINT IN */
627 {0, 0xa3, 0xc, F_SA_LOW | F_D_IN, resp_rsup_opcodes, NULL,
628 {12, 0xc, 0x87, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0,
629 0xc7, 0, 0, 0, 0} }, /* REPORT SUPPORTED OPERATION CODES */
630 {0, 0xa3, 0xd, F_SA_LOW | F_D_IN, resp_rsup_tmfs, NULL,
631 {12, 0xd, 0x80, 0, 0, 0, 0xff, 0xff, 0xff, 0xff, 0, 0xc7, 0, 0,
632 0, 0} }, /* REPORTED SUPPORTED TASK MANAGEMENT FUNCTIONS */
633};
634
635static const struct opcode_info_t write_same_iarr[] = {
636 {0, 0x93, 0, F_D_OUT_MAYBE | FF_MEDIA_IO, resp_write_same_16, NULL,
637 {16, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
638 0xff, 0xff, 0xff, 0x3f, 0xc7} }, /* WRITE SAME(16) */
639};
640
641static const struct opcode_info_t reserve_iarr[] = {
642 {0, 0x16, 0, F_D_OUT, NULL, NULL, /* RESERVE(6) */
643 {6, 0x1f, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
644};
645
646static const struct opcode_info_t release_iarr[] = {
647 {0, 0x17, 0, F_D_OUT, NULL, NULL, /* RELEASE(6) */
648 {6, 0x1f, 0xff, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
649};
650
651static const struct opcode_info_t sync_cache_iarr[] = {
652 {0, 0x91, 0, F_SYNC_DELAY | F_M_ACCESS, resp_sync_cache, NULL,
653 {16, 0x6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
654 0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} }, /* SYNC_CACHE (16) */
655};
656
657static const struct opcode_info_t pre_fetch_iarr[] = {
658 {0, 0x90, 0, F_SYNC_DELAY | FF_MEDIA_IO, resp_pre_fetch, NULL,
659 {16, 0x2, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
660 0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} }, /* PRE-FETCH (16) */
661};
662
663static const struct opcode_info_t zone_out_iarr[] = { /* ZONE OUT(16) */
664 {0, 0x94, 0x1, F_SA_LOW | F_M_ACCESS, resp_close_zone, NULL,
665 {16, 0x1, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
666 0xff, 0, 0, 0xff, 0xff, 0x1, 0xc7} }, /* CLOSE ZONE */
667 {0, 0x94, 0x2, F_SA_LOW | F_M_ACCESS, resp_finish_zone, NULL,
668 {16, 0x2, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
669 0xff, 0, 0, 0xff, 0xff, 0x1, 0xc7} }, /* FINISH ZONE */
670 {0, 0x94, 0x4, F_SA_LOW | F_M_ACCESS, resp_rwp_zone, NULL,
671 {16, 0x4, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
672 0xff, 0, 0, 0xff, 0xff, 0x1, 0xc7} }, /* RESET WRITE POINTER */
673};
674
675static const struct opcode_info_t zone_in_iarr[] = { /* ZONE IN(16) */
676 {0, 0x95, 0x6, F_SA_LOW | F_D_IN | F_M_ACCESS, NULL, NULL,
677 {16, 0x6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
678 0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} }, /* REPORT ZONES */
679};
680
681
682/* This array is accessed via SDEB_I_* values. Make sure all are mapped,
683 * plus the terminating elements for logic that scans this table such as
684 * REPORT SUPPORTED OPERATION CODES. */
685static const struct opcode_info_t opcode_info_arr[SDEB_I_LAST_ELEM_P1 + 1] = {
686/* 0 */
687 {0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* unknown opcodes */
688 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
689 {0, 0x12, 0, FF_RESPOND | F_D_IN, resp_inquiry, NULL, /* INQUIRY */
690 {6, 0xe3, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
691 {0, 0xa0, 0, FF_RESPOND | F_D_IN, resp_report_luns, NULL,
692 {12, 0xe3, 0xff, 0, 0, 0, 0xff, 0xff, 0xff, 0xff, 0, 0xc7, 0, 0,
693 0, 0} }, /* REPORT LUNS */
694 {0, 0x3, 0, FF_RESPOND | F_D_IN, resp_requests, NULL,
695 {6, 0xe1, 0, 0, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
696 {0, 0x0, 0, F_M_ACCESS | F_RL_WLUN_OK, NULL, NULL,/* TEST UNIT READY */
697 {6, 0, 0, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
698/* 5 */
699 {ARRAY_SIZE(msense_iarr), 0x5a, 0, F_D_IN, /* MODE SENSE(10) */
700 resp_mode_sense, msense_iarr, {10, 0xf8, 0xff, 0xff, 0, 0, 0,
701 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
702 {ARRAY_SIZE(mselect_iarr), 0x55, 0, F_D_OUT, /* MODE SELECT(10) */
703 resp_mode_select, mselect_iarr, {10, 0xf1, 0, 0, 0, 0, 0, 0xff,
704 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
705 {0, 0x4d, 0, F_D_IN, resp_log_sense, NULL, /* LOG SENSE */
706 {10, 0xe3, 0xff, 0xff, 0, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0,
707 0, 0, 0} },
708 {0, 0x25, 0, F_D_IN, resp_readcap, NULL, /* READ CAPACITY(10) */
709 {10, 0xe1, 0xff, 0xff, 0xff, 0xff, 0, 0, 0x1, 0xc7, 0, 0, 0, 0,
710 0, 0} },
711 {ARRAY_SIZE(read_iarr), 0x88, 0, F_D_IN | FF_MEDIA_IO, /* READ(16) */
712 resp_read_dt0, read_iarr, {16, 0xfe, 0xff, 0xff, 0xff, 0xff,
713 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7} },
714/* 10 */
715 {ARRAY_SIZE(write_iarr), 0x8a, 0, F_D_OUT | FF_MEDIA_IO,
716 resp_write_dt0, write_iarr, /* WRITE(16) */
717 {16, 0xfa, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
718 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7} },
719 {0, 0x1b, 0, F_SSU_DELAY, resp_start_stop, NULL,/* START STOP UNIT */
720 {6, 0x1, 0, 0xf, 0xf7, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
721 {ARRAY_SIZE(sa_in_16_iarr), 0x9e, 0x10, F_SA_LOW | F_D_IN,
722 resp_readcap16, sa_in_16_iarr, /* SA_IN(16), READ CAPACITY(16) */
723 {16, 0x10, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
724 0xff, 0xff, 0xff, 0xff, 0x1, 0xc7} },
725 {0, 0x9f, 0x12, F_SA_LOW | F_D_OUT | FF_MEDIA_IO, resp_write_scat,
726 NULL, {16, 0x12, 0xf9, 0x0, 0xff, 0xff, 0, 0, 0xff, 0xff, 0xff,
727 0xff, 0xff, 0xff, 0xff, 0xc7} }, /* SA_OUT(16), WRITE SCAT(16) */
728 {ARRAY_SIZE(maint_in_iarr), 0xa3, 0xa, F_SA_LOW | F_D_IN,
729 resp_report_tgtpgs, /* MAINT IN, REPORT TARGET PORT GROUPS */
730 maint_in_iarr, {12, 0xea, 0, 0, 0, 0, 0xff, 0xff, 0xff,
731 0xff, 0, 0xc7, 0, 0, 0, 0} },
732/* 15 */
733 {0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* MAINT OUT */
734 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
735 {ARRAY_SIZE(verify_iarr), 0x8f, 0,
736 F_D_OUT_MAYBE | FF_MEDIA_IO, resp_verify, /* VERIFY(16) */
737 verify_iarr, {16, 0xf6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
738 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} },
739 {ARRAY_SIZE(vl_iarr), 0x7f, 0x9, F_SA_HIGH | F_D_IN | FF_MEDIA_IO,
740 resp_read_dt0, vl_iarr, /* VARIABLE LENGTH, READ(32) */
741 {32, 0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0x9, 0xfe, 0, 0xff, 0xff,
742 0xff, 0xff} },
743 {ARRAY_SIZE(reserve_iarr), 0x56, 0, F_D_OUT,
744 NULL, reserve_iarr, /* RESERVE(10) <no response function> */
745 {10, 0xff, 0xff, 0xff, 0, 0, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0,
746 0} },
747 {ARRAY_SIZE(release_iarr), 0x57, 0, F_D_OUT,
748 NULL, release_iarr, /* RELEASE(10) <no response function> */
749 {10, 0x13, 0xff, 0xff, 0, 0, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0,
750 0} },
751/* 20 */
752 {0, 0x1e, 0, 0, NULL, NULL, /* ALLOW REMOVAL */
753 {6, 0, 0, 0, 0x3, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
754 {0, 0x1, 0, 0, resp_start_stop, NULL, /* REWIND ?? */
755 {6, 0x1, 0, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
756 {0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* ATA_PT */
757 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
758 {0, 0x1d, F_D_OUT, 0, NULL, NULL, /* SEND DIAGNOSTIC */
759 {6, 0xf7, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
760 {0, 0x42, 0, F_D_OUT | FF_MEDIA_IO, resp_unmap, NULL, /* UNMAP */
761 {10, 0x1, 0, 0, 0, 0, 0x3f, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
762/* 25 */
763 {0, 0x3b, 0, F_D_OUT_MAYBE, resp_write_buffer, NULL,
764 {10, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0,
765 0, 0, 0, 0} }, /* WRITE_BUFFER */
766 {ARRAY_SIZE(write_same_iarr), 0x41, 0, F_D_OUT_MAYBE | FF_MEDIA_IO,
767 resp_write_same_10, write_same_iarr, /* WRITE SAME(10) */
768 {10, 0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0,
769 0, 0, 0, 0, 0} },
770 {ARRAY_SIZE(sync_cache_iarr), 0x35, 0, F_SYNC_DELAY | F_M_ACCESS,
771 resp_sync_cache, sync_cache_iarr,
772 {10, 0x7, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
773 0, 0, 0, 0} }, /* SYNC_CACHE (10) */
774 {0, 0x89, 0, F_D_OUT | FF_MEDIA_IO, resp_comp_write, NULL,
775 {16, 0xf8, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0, 0,
776 0, 0xff, 0x3f, 0xc7} }, /* COMPARE AND WRITE */
777 {ARRAY_SIZE(pre_fetch_iarr), 0x34, 0, F_SYNC_DELAY | FF_MEDIA_IO,
778 resp_pre_fetch, pre_fetch_iarr,
779 {10, 0x2, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
780 0, 0, 0, 0} }, /* PRE-FETCH (10) */
781
782/* 30 */
783 {ARRAY_SIZE(zone_out_iarr), 0x94, 0x3, F_SA_LOW | F_M_ACCESS,
784 resp_open_zone, zone_out_iarr, /* ZONE_OUT(16), OPEN ZONE) */
785 {16, 0x3 /* SA */, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
786 0xff, 0xff, 0x0, 0x0, 0xff, 0xff, 0x1, 0xc7} },
787 {ARRAY_SIZE(zone_in_iarr), 0x95, 0x0, F_SA_LOW | F_M_ACCESS,
788 resp_report_zones, zone_in_iarr, /* ZONE_IN(16), REPORT ZONES) */
789 {16, 0x0 /* SA */, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
790 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xbf, 0xc7} },
791/* sentinel */
792 {0xff, 0, 0, 0, NULL, NULL, /* terminating element */
793 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
794};
795
796static int sdebug_num_hosts;
797static int sdebug_add_host = DEF_NUM_HOST; /* in sysfs this is relative */
798static int sdebug_ato = DEF_ATO;
799static int sdebug_cdb_len = DEF_CDB_LEN;
800static int sdebug_jdelay = DEF_JDELAY; /* if > 0 then unit is jiffies */
801static int sdebug_dev_size_mb = DEF_DEV_SIZE_PRE_INIT;
802static int sdebug_dif = DEF_DIF;
803static int sdebug_dix = DEF_DIX;
804static int sdebug_dsense = DEF_D_SENSE;
805static int sdebug_every_nth = DEF_EVERY_NTH;
806static int sdebug_fake_rw = DEF_FAKE_RW;
807static unsigned int sdebug_guard = DEF_GUARD;
808static int sdebug_host_max_queue; /* per host */
809static int sdebug_lowest_aligned = DEF_LOWEST_ALIGNED;
810static int sdebug_max_luns = DEF_MAX_LUNS;
811static int sdebug_max_queue = SDEBUG_CANQUEUE; /* per submit queue */
812static unsigned int sdebug_medium_error_start = OPT_MEDIUM_ERR_ADDR;
813static int sdebug_medium_error_count = OPT_MEDIUM_ERR_NUM;
814static int sdebug_ndelay = DEF_NDELAY; /* if > 0 then unit is nanoseconds */
815static int sdebug_no_lun_0 = DEF_NO_LUN_0;
816static int sdebug_no_uld;
817static int sdebug_num_parts = DEF_NUM_PARTS;
818static int sdebug_num_tgts = DEF_NUM_TGTS; /* targets per host */
819static int sdebug_opt_blks = DEF_OPT_BLKS;
820static int sdebug_opts = DEF_OPTS;
821static int sdebug_physblk_exp = DEF_PHYSBLK_EXP;
822static int sdebug_opt_xferlen_exp = DEF_OPT_XFERLEN_EXP;
823static int sdebug_ptype = DEF_PTYPE; /* SCSI peripheral device type */
824static int sdebug_scsi_level = DEF_SCSI_LEVEL;
825static int sdebug_sector_size = DEF_SECTOR_SIZE;
826static int sdeb_tur_ms_to_ready = DEF_TUR_MS_TO_READY;
827static int sdebug_virtual_gb = DEF_VIRTUAL_GB;
828static int sdebug_vpd_use_hostno = DEF_VPD_USE_HOSTNO;
829static unsigned int sdebug_lbpu = DEF_LBPU;
830static unsigned int sdebug_lbpws = DEF_LBPWS;
831static unsigned int sdebug_lbpws10 = DEF_LBPWS10;
832static unsigned int sdebug_lbprz = DEF_LBPRZ;
833static unsigned int sdebug_unmap_alignment = DEF_UNMAP_ALIGNMENT;
834static unsigned int sdebug_unmap_granularity = DEF_UNMAP_GRANULARITY;
835static unsigned int sdebug_unmap_max_blocks = DEF_UNMAP_MAX_BLOCKS;
836static unsigned int sdebug_unmap_max_desc = DEF_UNMAP_MAX_DESC;
837static unsigned int sdebug_write_same_length = DEF_WRITESAME_LENGTH;
838static int sdebug_uuid_ctl = DEF_UUID_CTL;
839static bool sdebug_random = DEF_RANDOM;
840static bool sdebug_per_host_store = DEF_PER_HOST_STORE;
841static bool sdebug_removable = DEF_REMOVABLE;
842static bool sdebug_clustering;
843static bool sdebug_host_lock = DEF_HOST_LOCK;
844static bool sdebug_strict = DEF_STRICT;
845static bool sdebug_any_injecting_opt;
846static bool sdebug_no_rwlock;
847static bool sdebug_verbose;
848static bool have_dif_prot;
849static bool write_since_sync;
850static bool sdebug_statistics = DEF_STATISTICS;
851static bool sdebug_wp;
852static bool sdebug_allow_restart;
853static enum {
854 BLK_ZONED_NONE = 0,
855 BLK_ZONED_HA = 1,
856 BLK_ZONED_HM = 2,
857} sdeb_zbc_model = BLK_ZONED_NONE;
858static char *sdeb_zbc_model_s;
859
860enum sam_lun_addr_method {SAM_LUN_AM_PERIPHERAL = 0x0,
861 SAM_LUN_AM_FLAT = 0x1,
862 SAM_LUN_AM_LOGICAL_UNIT = 0x2,
863 SAM_LUN_AM_EXTENDED = 0x3};
864static enum sam_lun_addr_method sdebug_lun_am = SAM_LUN_AM_PERIPHERAL;
865static int sdebug_lun_am_i = (int)SAM_LUN_AM_PERIPHERAL;
866
867static unsigned int sdebug_store_sectors;
868static sector_t sdebug_capacity; /* in sectors */
869
870/* old BIOS stuff, kernel may get rid of them but some mode sense pages
871 may still need them */
872static int sdebug_heads; /* heads per disk */
873static int sdebug_cylinders_per; /* cylinders per surface */
874static int sdebug_sectors_per; /* sectors per cylinder */
875
876static LIST_HEAD(sdebug_host_list);
877static DEFINE_MUTEX(sdebug_host_list_mutex);
878
879static struct xarray per_store_arr;
880static struct xarray *per_store_ap = &per_store_arr;
881static int sdeb_first_idx = -1; /* invalid index ==> none created */
882static int sdeb_most_recent_idx = -1;
883static DEFINE_RWLOCK(sdeb_fake_rw_lck); /* need a RW lock when fake_rw=1 */
884
885static unsigned long map_size;
886static int num_aborts;
887static int num_dev_resets;
888static int num_target_resets;
889static int num_bus_resets;
890static int num_host_resets;
891static int dix_writes;
892static int dix_reads;
893static int dif_errors;
894
895/* ZBC global data */
896static bool sdeb_zbc_in_use; /* true for host-aware and host-managed disks */
897static int sdeb_zbc_zone_cap_mb;
898static int sdeb_zbc_zone_size_mb;
899static int sdeb_zbc_max_open = DEF_ZBC_MAX_OPEN_ZONES;
900static int sdeb_zbc_nr_conv = DEF_ZBC_NR_CONV_ZONES;
901
902static int submit_queues = DEF_SUBMIT_QUEUES; /* > 1 for multi-queue (mq) */
903static int poll_queues; /* iouring iopoll interface.*/
904
905static atomic_long_t writes_by_group_number[64];
906
907static char sdebug_proc_name[] = MY_NAME;
908static const char *my_name = MY_NAME;
909
910static const struct bus_type pseudo_lld_bus;
911
912static struct device_driver sdebug_driverfs_driver = {
913 .name = sdebug_proc_name,
914 .bus = &pseudo_lld_bus,
915};
916
917static const int check_condition_result =
918 SAM_STAT_CHECK_CONDITION;
919
920static const int illegal_condition_result =
921 (DID_ABORT << 16) | SAM_STAT_CHECK_CONDITION;
922
923static const int device_qfull_result =
924 (DID_ABORT << 16) | SAM_STAT_TASK_SET_FULL;
925
926static const int condition_met_result = SAM_STAT_CONDITION_MET;
927
928static struct dentry *sdebug_debugfs_root;
929
930static void sdebug_err_free(struct rcu_head *head)
931{
932 struct sdebug_err_inject *inject =
933 container_of(head, typeof(*inject), rcu);
934
935 kfree(inject);
936}
937
938static void sdebug_err_add(struct scsi_device *sdev, struct sdebug_err_inject *new)
939{
940 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdev->hostdata;
941 struct sdebug_err_inject *err;
942
943 spin_lock(&devip->list_lock);
944 list_for_each_entry_rcu(err, &devip->inject_err_list, list) {
945 if (err->type == new->type && err->cmd == new->cmd) {
946 list_del_rcu(&err->list);
947 call_rcu(&err->rcu, sdebug_err_free);
948 }
949 }
950
951 list_add_tail_rcu(&new->list, &devip->inject_err_list);
952 spin_unlock(&devip->list_lock);
953}
954
955static int sdebug_err_remove(struct scsi_device *sdev, const char *buf, size_t count)
956{
957 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdev->hostdata;
958 struct sdebug_err_inject *err;
959 int type;
960 unsigned char cmd;
961
962 if (sscanf(buf, "- %d %hhx", &type, &cmd) != 2) {
963 kfree(buf);
964 return -EINVAL;
965 }
966
967 spin_lock(&devip->list_lock);
968 list_for_each_entry_rcu(err, &devip->inject_err_list, list) {
969 if (err->type == type && err->cmd == cmd) {
970 list_del_rcu(&err->list);
971 call_rcu(&err->rcu, sdebug_err_free);
972 spin_unlock(&devip->list_lock);
973 kfree(buf);
974 return count;
975 }
976 }
977 spin_unlock(&devip->list_lock);
978
979 kfree(buf);
980 return -EINVAL;
981}
982
983static int sdebug_error_show(struct seq_file *m, void *p)
984{
985 struct scsi_device *sdev = (struct scsi_device *)m->private;
986 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdev->hostdata;
987 struct sdebug_err_inject *err;
988
989 seq_puts(m, "Type\tCount\tCommand\n");
990
991 rcu_read_lock();
992 list_for_each_entry_rcu(err, &devip->inject_err_list, list) {
993 switch (err->type) {
994 case ERR_TMOUT_CMD:
995 case ERR_ABORT_CMD_FAILED:
996 case ERR_LUN_RESET_FAILED:
997 seq_printf(m, "%d\t%d\t0x%x\n", err->type, err->cnt,
998 err->cmd);
999 break;
1000
1001 case ERR_FAIL_QUEUE_CMD:
1002 seq_printf(m, "%d\t%d\t0x%x\t0x%x\n", err->type,
1003 err->cnt, err->cmd, err->queuecmd_ret);
1004 break;
1005
1006 case ERR_FAIL_CMD:
1007 seq_printf(m, "%d\t%d\t0x%x\t0x%x 0x%x 0x%x 0x%x 0x%x 0x%x\n",
1008 err->type, err->cnt, err->cmd,
1009 err->host_byte, err->driver_byte,
1010 err->status_byte, err->sense_key,
1011 err->asc, err->asq);
1012 break;
1013 }
1014 }
1015 rcu_read_unlock();
1016
1017 return 0;
1018}
1019
1020static int sdebug_error_open(struct inode *inode, struct file *file)
1021{
1022 return single_open(file, sdebug_error_show, inode->i_private);
1023}
1024
1025static ssize_t sdebug_error_write(struct file *file, const char __user *ubuf,
1026 size_t count, loff_t *ppos)
1027{
1028 char *buf;
1029 unsigned int inject_type;
1030 struct sdebug_err_inject *inject;
1031 struct scsi_device *sdev = (struct scsi_device *)file->f_inode->i_private;
1032
1033 buf = kzalloc(count + 1, GFP_KERNEL);
1034 if (!buf)
1035 return -ENOMEM;
1036
1037 if (copy_from_user(buf, ubuf, count)) {
1038 kfree(buf);
1039 return -EFAULT;
1040 }
1041
1042 if (buf[0] == '-')
1043 return sdebug_err_remove(sdev, buf, count);
1044
1045 if (sscanf(buf, "%d", &inject_type) != 1) {
1046 kfree(buf);
1047 return -EINVAL;
1048 }
1049
1050 inject = kzalloc(sizeof(struct sdebug_err_inject), GFP_KERNEL);
1051 if (!inject) {
1052 kfree(buf);
1053 return -ENOMEM;
1054 }
1055
1056 switch (inject_type) {
1057 case ERR_TMOUT_CMD:
1058 case ERR_ABORT_CMD_FAILED:
1059 case ERR_LUN_RESET_FAILED:
1060 if (sscanf(buf, "%d %d %hhx", &inject->type, &inject->cnt,
1061 &inject->cmd) != 3)
1062 goto out_error;
1063 break;
1064
1065 case ERR_FAIL_QUEUE_CMD:
1066 if (sscanf(buf, "%d %d %hhx %x", &inject->type, &inject->cnt,
1067 &inject->cmd, &inject->queuecmd_ret) != 4)
1068 goto out_error;
1069 break;
1070
1071 case ERR_FAIL_CMD:
1072 if (sscanf(buf, "%d %d %hhx %hhx %hhx %hhx %hhx %hhx %hhx",
1073 &inject->type, &inject->cnt, &inject->cmd,
1074 &inject->host_byte, &inject->driver_byte,
1075 &inject->status_byte, &inject->sense_key,
1076 &inject->asc, &inject->asq) != 9)
1077 goto out_error;
1078 break;
1079
1080 default:
1081 goto out_error;
1082 break;
1083 }
1084
1085 kfree(buf);
1086 sdebug_err_add(sdev, inject);
1087
1088 return count;
1089
1090out_error:
1091 kfree(buf);
1092 kfree(inject);
1093 return -EINVAL;
1094}
1095
1096static const struct file_operations sdebug_error_fops = {
1097 .open = sdebug_error_open,
1098 .read = seq_read,
1099 .write = sdebug_error_write,
1100 .release = single_release,
1101};
1102
1103static int sdebug_target_reset_fail_show(struct seq_file *m, void *p)
1104{
1105 struct scsi_target *starget = (struct scsi_target *)m->private;
1106 struct sdebug_target_info *targetip =
1107 (struct sdebug_target_info *)starget->hostdata;
1108
1109 if (targetip)
1110 seq_printf(m, "%c\n", targetip->reset_fail ? 'Y' : 'N');
1111
1112 return 0;
1113}
1114
1115static int sdebug_target_reset_fail_open(struct inode *inode, struct file *file)
1116{
1117 return single_open(file, sdebug_target_reset_fail_show, inode->i_private);
1118}
1119
1120static ssize_t sdebug_target_reset_fail_write(struct file *file,
1121 const char __user *ubuf, size_t count, loff_t *ppos)
1122{
1123 int ret;
1124 struct scsi_target *starget =
1125 (struct scsi_target *)file->f_inode->i_private;
1126 struct sdebug_target_info *targetip =
1127 (struct sdebug_target_info *)starget->hostdata;
1128
1129 if (targetip) {
1130 ret = kstrtobool_from_user(ubuf, count, &targetip->reset_fail);
1131 return ret < 0 ? ret : count;
1132 }
1133 return -ENODEV;
1134}
1135
1136static const struct file_operations sdebug_target_reset_fail_fops = {
1137 .open = sdebug_target_reset_fail_open,
1138 .read = seq_read,
1139 .write = sdebug_target_reset_fail_write,
1140 .release = single_release,
1141};
1142
1143static int sdebug_target_alloc(struct scsi_target *starget)
1144{
1145 struct sdebug_target_info *targetip;
1146
1147 targetip = kzalloc(sizeof(struct sdebug_target_info), GFP_KERNEL);
1148 if (!targetip)
1149 return -ENOMEM;
1150
1151 targetip->debugfs_entry = debugfs_create_dir(dev_name(&starget->dev),
1152 sdebug_debugfs_root);
1153
1154 debugfs_create_file("fail_reset", 0600, targetip->debugfs_entry, starget,
1155 &sdebug_target_reset_fail_fops);
1156
1157 starget->hostdata = targetip;
1158
1159 return 0;
1160}
1161
1162static void sdebug_tartget_cleanup_async(void *data, async_cookie_t cookie)
1163{
1164 struct sdebug_target_info *targetip = data;
1165
1166 debugfs_remove(targetip->debugfs_entry);
1167 kfree(targetip);
1168}
1169
1170static void sdebug_target_destroy(struct scsi_target *starget)
1171{
1172 struct sdebug_target_info *targetip;
1173
1174 targetip = (struct sdebug_target_info *)starget->hostdata;
1175 if (targetip) {
1176 starget->hostdata = NULL;
1177 async_schedule(sdebug_tartget_cleanup_async, targetip);
1178 }
1179}
1180
1181/* Only do the extra work involved in logical block provisioning if one or
1182 * more of the lbpu, lbpws or lbpws10 parameters are given and we are doing
1183 * real reads and writes (i.e. not skipping them for speed).
1184 */
1185static inline bool scsi_debug_lbp(void)
1186{
1187 return 0 == sdebug_fake_rw &&
1188 (sdebug_lbpu || sdebug_lbpws || sdebug_lbpws10);
1189}
1190
1191static void *lba2fake_store(struct sdeb_store_info *sip,
1192 unsigned long long lba)
1193{
1194 struct sdeb_store_info *lsip = sip;
1195
1196 lba = do_div(lba, sdebug_store_sectors);
1197 if (!sip || !sip->storep) {
1198 WARN_ON_ONCE(true);
1199 lsip = xa_load(per_store_ap, 0); /* should never be NULL */
1200 }
1201 return lsip->storep + lba * sdebug_sector_size;
1202}
1203
1204static struct t10_pi_tuple *dif_store(struct sdeb_store_info *sip,
1205 sector_t sector)
1206{
1207 sector = sector_div(sector, sdebug_store_sectors);
1208
1209 return sip->dif_storep + sector;
1210}
1211
1212static void sdebug_max_tgts_luns(void)
1213{
1214 struct sdebug_host_info *sdbg_host;
1215 struct Scsi_Host *hpnt;
1216
1217 mutex_lock(&sdebug_host_list_mutex);
1218 list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
1219 hpnt = sdbg_host->shost;
1220 if ((hpnt->this_id >= 0) &&
1221 (sdebug_num_tgts > hpnt->this_id))
1222 hpnt->max_id = sdebug_num_tgts + 1;
1223 else
1224 hpnt->max_id = sdebug_num_tgts;
1225 /* sdebug_max_luns; */
1226 hpnt->max_lun = SCSI_W_LUN_REPORT_LUNS + 1;
1227 }
1228 mutex_unlock(&sdebug_host_list_mutex);
1229}
1230
1231enum sdeb_cmd_data {SDEB_IN_DATA = 0, SDEB_IN_CDB = 1};
1232
1233/* Set in_bit to -1 to indicate no bit position of invalid field */
1234static void mk_sense_invalid_fld(struct scsi_cmnd *scp,
1235 enum sdeb_cmd_data c_d,
1236 int in_byte, int in_bit)
1237{
1238 unsigned char *sbuff;
1239 u8 sks[4];
1240 int sl, asc;
1241
1242 sbuff = scp->sense_buffer;
1243 if (!sbuff) {
1244 sdev_printk(KERN_ERR, scp->device,
1245 "%s: sense_buffer is NULL\n", __func__);
1246 return;
1247 }
1248 asc = c_d ? INVALID_FIELD_IN_CDB : INVALID_FIELD_IN_PARAM_LIST;
1249 memset(sbuff, 0, SCSI_SENSE_BUFFERSIZE);
1250 scsi_build_sense(scp, sdebug_dsense, ILLEGAL_REQUEST, asc, 0);
1251 memset(sks, 0, sizeof(sks));
1252 sks[0] = 0x80;
1253 if (c_d)
1254 sks[0] |= 0x40;
1255 if (in_bit >= 0) {
1256 sks[0] |= 0x8;
1257 sks[0] |= 0x7 & in_bit;
1258 }
1259 put_unaligned_be16(in_byte, sks + 1);
1260 if (sdebug_dsense) {
1261 sl = sbuff[7] + 8;
1262 sbuff[7] = sl;
1263 sbuff[sl] = 0x2;
1264 sbuff[sl + 1] = 0x6;
1265 memcpy(sbuff + sl + 4, sks, 3);
1266 } else
1267 memcpy(sbuff + 15, sks, 3);
1268 if (sdebug_verbose)
1269 sdev_printk(KERN_INFO, scp->device, "%s: [sense_key,asc,ascq"
1270 "]: [0x5,0x%x,0x0] %c byte=%d, bit=%d\n",
1271 my_name, asc, c_d ? 'C' : 'D', in_byte, in_bit);
1272}
1273
1274static void mk_sense_buffer(struct scsi_cmnd *scp, int key, int asc, int asq)
1275{
1276 if (!scp->sense_buffer) {
1277 sdev_printk(KERN_ERR, scp->device,
1278 "%s: sense_buffer is NULL\n", __func__);
1279 return;
1280 }
1281 memset(scp->sense_buffer, 0, SCSI_SENSE_BUFFERSIZE);
1282
1283 scsi_build_sense(scp, sdebug_dsense, key, asc, asq);
1284
1285 if (sdebug_verbose)
1286 sdev_printk(KERN_INFO, scp->device,
1287 "%s: [sense_key,asc,ascq]: [0x%x,0x%x,0x%x]\n",
1288 my_name, key, asc, asq);
1289}
1290
1291static void mk_sense_invalid_opcode(struct scsi_cmnd *scp)
1292{
1293 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_OPCODE, 0);
1294}
1295
1296static int scsi_debug_ioctl(struct scsi_device *dev, unsigned int cmd,
1297 void __user *arg)
1298{
1299 if (sdebug_verbose) {
1300 if (0x1261 == cmd)
1301 sdev_printk(KERN_INFO, dev,
1302 "%s: BLKFLSBUF [0x1261]\n", __func__);
1303 else if (0x5331 == cmd)
1304 sdev_printk(KERN_INFO, dev,
1305 "%s: CDROM_GET_CAPABILITY [0x5331]\n",
1306 __func__);
1307 else
1308 sdev_printk(KERN_INFO, dev, "%s: cmd=0x%x\n",
1309 __func__, cmd);
1310 }
1311 return -EINVAL;
1312 /* return -ENOTTY; // correct return but upsets fdisk */
1313}
1314
1315static void config_cdb_len(struct scsi_device *sdev)
1316{
1317 switch (sdebug_cdb_len) {
1318 case 6: /* suggest 6 byte READ, WRITE and MODE SENSE/SELECT */
1319 sdev->use_10_for_rw = false;
1320 sdev->use_16_for_rw = false;
1321 sdev->use_10_for_ms = false;
1322 break;
1323 case 10: /* suggest 10 byte RWs and 6 byte MODE SENSE/SELECT */
1324 sdev->use_10_for_rw = true;
1325 sdev->use_16_for_rw = false;
1326 sdev->use_10_for_ms = false;
1327 break;
1328 case 12: /* suggest 10 byte RWs and 10 byte MODE SENSE/SELECT */
1329 sdev->use_10_for_rw = true;
1330 sdev->use_16_for_rw = false;
1331 sdev->use_10_for_ms = true;
1332 break;
1333 case 16:
1334 sdev->use_10_for_rw = false;
1335 sdev->use_16_for_rw = true;
1336 sdev->use_10_for_ms = true;
1337 break;
1338 case 32: /* No knobs to suggest this so same as 16 for now */
1339 sdev->use_10_for_rw = false;
1340 sdev->use_16_for_rw = true;
1341 sdev->use_10_for_ms = true;
1342 break;
1343 default:
1344 pr_warn("unexpected cdb_len=%d, force to 10\n",
1345 sdebug_cdb_len);
1346 sdev->use_10_for_rw = true;
1347 sdev->use_16_for_rw = false;
1348 sdev->use_10_for_ms = false;
1349 sdebug_cdb_len = 10;
1350 break;
1351 }
1352}
1353
1354static void all_config_cdb_len(void)
1355{
1356 struct sdebug_host_info *sdbg_host;
1357 struct Scsi_Host *shost;
1358 struct scsi_device *sdev;
1359
1360 mutex_lock(&sdebug_host_list_mutex);
1361 list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
1362 shost = sdbg_host->shost;
1363 shost_for_each_device(sdev, shost) {
1364 config_cdb_len(sdev);
1365 }
1366 }
1367 mutex_unlock(&sdebug_host_list_mutex);
1368}
1369
1370static void clear_luns_changed_on_target(struct sdebug_dev_info *devip)
1371{
1372 struct sdebug_host_info *sdhp = devip->sdbg_host;
1373 struct sdebug_dev_info *dp;
1374
1375 list_for_each_entry(dp, &sdhp->dev_info_list, dev_list) {
1376 if ((devip->sdbg_host == dp->sdbg_host) &&
1377 (devip->target == dp->target)) {
1378 clear_bit(SDEBUG_UA_LUNS_CHANGED, dp->uas_bm);
1379 }
1380 }
1381}
1382
1383static int make_ua(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
1384{
1385 int k;
1386
1387 k = find_first_bit(devip->uas_bm, SDEBUG_NUM_UAS);
1388 if (k != SDEBUG_NUM_UAS) {
1389 const char *cp = NULL;
1390
1391 switch (k) {
1392 case SDEBUG_UA_POR:
1393 mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
1394 POWER_ON_RESET_ASCQ);
1395 if (sdebug_verbose)
1396 cp = "power on reset";
1397 break;
1398 case SDEBUG_UA_POOCCUR:
1399 mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
1400 POWER_ON_OCCURRED_ASCQ);
1401 if (sdebug_verbose)
1402 cp = "power on occurred";
1403 break;
1404 case SDEBUG_UA_BUS_RESET:
1405 mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
1406 BUS_RESET_ASCQ);
1407 if (sdebug_verbose)
1408 cp = "bus reset";
1409 break;
1410 case SDEBUG_UA_MODE_CHANGED:
1411 mk_sense_buffer(scp, UNIT_ATTENTION, UA_CHANGED_ASC,
1412 MODE_CHANGED_ASCQ);
1413 if (sdebug_verbose)
1414 cp = "mode parameters changed";
1415 break;
1416 case SDEBUG_UA_CAPACITY_CHANGED:
1417 mk_sense_buffer(scp, UNIT_ATTENTION, UA_CHANGED_ASC,
1418 CAPACITY_CHANGED_ASCQ);
1419 if (sdebug_verbose)
1420 cp = "capacity data changed";
1421 break;
1422 case SDEBUG_UA_MICROCODE_CHANGED:
1423 mk_sense_buffer(scp, UNIT_ATTENTION,
1424 TARGET_CHANGED_ASC,
1425 MICROCODE_CHANGED_ASCQ);
1426 if (sdebug_verbose)
1427 cp = "microcode has been changed";
1428 break;
1429 case SDEBUG_UA_MICROCODE_CHANGED_WO_RESET:
1430 mk_sense_buffer(scp, UNIT_ATTENTION,
1431 TARGET_CHANGED_ASC,
1432 MICROCODE_CHANGED_WO_RESET_ASCQ);
1433 if (sdebug_verbose)
1434 cp = "microcode has been changed without reset";
1435 break;
1436 case SDEBUG_UA_LUNS_CHANGED:
1437 /*
1438 * SPC-3 behavior is to report a UNIT ATTENTION with
1439 * ASC/ASCQ REPORTED LUNS DATA HAS CHANGED on every LUN
1440 * on the target, until a REPORT LUNS command is
1441 * received. SPC-4 behavior is to report it only once.
1442 * NOTE: sdebug_scsi_level does not use the same
1443 * values as struct scsi_device->scsi_level.
1444 */
1445 if (sdebug_scsi_level >= 6) /* SPC-4 and above */
1446 clear_luns_changed_on_target(devip);
1447 mk_sense_buffer(scp, UNIT_ATTENTION,
1448 TARGET_CHANGED_ASC,
1449 LUNS_CHANGED_ASCQ);
1450 if (sdebug_verbose)
1451 cp = "reported luns data has changed";
1452 break;
1453 default:
1454 pr_warn("unexpected unit attention code=%d\n", k);
1455 if (sdebug_verbose)
1456 cp = "unknown";
1457 break;
1458 }
1459 clear_bit(k, devip->uas_bm);
1460 if (sdebug_verbose)
1461 sdev_printk(KERN_INFO, scp->device,
1462 "%s reports: Unit attention: %s\n",
1463 my_name, cp);
1464 return check_condition_result;
1465 }
1466 return 0;
1467}
1468
1469/* Build SCSI "data-in" buffer. Returns 0 if ok else (DID_ERROR << 16). */
1470static int fill_from_dev_buffer(struct scsi_cmnd *scp, unsigned char *arr,
1471 int arr_len)
1472{
1473 int act_len;
1474 struct scsi_data_buffer *sdb = &scp->sdb;
1475
1476 if (!sdb->length)
1477 return 0;
1478 if (scp->sc_data_direction != DMA_FROM_DEVICE)
1479 return DID_ERROR << 16;
1480
1481 act_len = sg_copy_from_buffer(sdb->table.sgl, sdb->table.nents,
1482 arr, arr_len);
1483 scsi_set_resid(scp, scsi_bufflen(scp) - act_len);
1484
1485 return 0;
1486}
1487
1488/* Partial build of SCSI "data-in" buffer. Returns 0 if ok else
1489 * (DID_ERROR << 16). Can write to offset in data-in buffer. If multiple
1490 * calls, not required to write in ascending offset order. Assumes resid
1491 * set to scsi_bufflen() prior to any calls.
1492 */
1493static int p_fill_from_dev_buffer(struct scsi_cmnd *scp, const void *arr,
1494 int arr_len, unsigned int off_dst)
1495{
1496 unsigned int act_len, n;
1497 struct scsi_data_buffer *sdb = &scp->sdb;
1498 off_t skip = off_dst;
1499
1500 if (sdb->length <= off_dst)
1501 return 0;
1502 if (scp->sc_data_direction != DMA_FROM_DEVICE)
1503 return DID_ERROR << 16;
1504
1505 act_len = sg_pcopy_from_buffer(sdb->table.sgl, sdb->table.nents,
1506 arr, arr_len, skip);
1507 pr_debug("%s: off_dst=%u, scsi_bufflen=%u, act_len=%u, resid=%d\n",
1508 __func__, off_dst, scsi_bufflen(scp), act_len,
1509 scsi_get_resid(scp));
1510 n = scsi_bufflen(scp) - (off_dst + act_len);
1511 scsi_set_resid(scp, min_t(u32, scsi_get_resid(scp), n));
1512 return 0;
1513}
1514
1515/* Fetches from SCSI "data-out" buffer. Returns number of bytes fetched into
1516 * 'arr' or -1 if error.
1517 */
1518static int fetch_to_dev_buffer(struct scsi_cmnd *scp, unsigned char *arr,
1519 int arr_len)
1520{
1521 if (!scsi_bufflen(scp))
1522 return 0;
1523 if (scp->sc_data_direction != DMA_TO_DEVICE)
1524 return -1;
1525
1526 return scsi_sg_copy_to_buffer(scp, arr, arr_len);
1527}
1528
1529
1530static char sdebug_inq_vendor_id[9] = "Linux ";
1531static char sdebug_inq_product_id[17] = "scsi_debug ";
1532static char sdebug_inq_product_rev[5] = SDEBUG_VERSION;
1533/* Use some locally assigned NAAs for SAS addresses. */
1534static const u64 naa3_comp_a = 0x3222222000000000ULL;
1535static const u64 naa3_comp_b = 0x3333333000000000ULL;
1536static const u64 naa3_comp_c = 0x3111111000000000ULL;
1537
1538/* Device identification VPD page. Returns number of bytes placed in arr */
1539static int inquiry_vpd_83(unsigned char *arr, int port_group_id,
1540 int target_dev_id, int dev_id_num,
1541 const char *dev_id_str, int dev_id_str_len,
1542 const uuid_t *lu_name)
1543{
1544 int num, port_a;
1545 char b[32];
1546
1547 port_a = target_dev_id + 1;
1548 /* T10 vendor identifier field format (faked) */
1549 arr[0] = 0x2; /* ASCII */
1550 arr[1] = 0x1;
1551 arr[2] = 0x0;
1552 memcpy(&arr[4], sdebug_inq_vendor_id, 8);
1553 memcpy(&arr[12], sdebug_inq_product_id, 16);
1554 memcpy(&arr[28], dev_id_str, dev_id_str_len);
1555 num = 8 + 16 + dev_id_str_len;
1556 arr[3] = num;
1557 num += 4;
1558 if (dev_id_num >= 0) {
1559 if (sdebug_uuid_ctl) {
1560 /* Locally assigned UUID */
1561 arr[num++] = 0x1; /* binary (not necessarily sas) */
1562 arr[num++] = 0xa; /* PIV=0, lu, naa */
1563 arr[num++] = 0x0;
1564 arr[num++] = 0x12;
1565 arr[num++] = 0x10; /* uuid type=1, locally assigned */
1566 arr[num++] = 0x0;
1567 memcpy(arr + num, lu_name, 16);
1568 num += 16;
1569 } else {
1570 /* NAA-3, Logical unit identifier (binary) */
1571 arr[num++] = 0x1; /* binary (not necessarily sas) */
1572 arr[num++] = 0x3; /* PIV=0, lu, naa */
1573 arr[num++] = 0x0;
1574 arr[num++] = 0x8;
1575 put_unaligned_be64(naa3_comp_b + dev_id_num, arr + num);
1576 num += 8;
1577 }
1578 /* Target relative port number */
1579 arr[num++] = 0x61; /* proto=sas, binary */
1580 arr[num++] = 0x94; /* PIV=1, target port, rel port */
1581 arr[num++] = 0x0; /* reserved */
1582 arr[num++] = 0x4; /* length */
1583 arr[num++] = 0x0; /* reserved */
1584 arr[num++] = 0x0; /* reserved */
1585 arr[num++] = 0x0;
1586 arr[num++] = 0x1; /* relative port A */
1587 }
1588 /* NAA-3, Target port identifier */
1589 arr[num++] = 0x61; /* proto=sas, binary */
1590 arr[num++] = 0x93; /* piv=1, target port, naa */
1591 arr[num++] = 0x0;
1592 arr[num++] = 0x8;
1593 put_unaligned_be64(naa3_comp_a + port_a, arr + num);
1594 num += 8;
1595 /* NAA-3, Target port group identifier */
1596 arr[num++] = 0x61; /* proto=sas, binary */
1597 arr[num++] = 0x95; /* piv=1, target port group id */
1598 arr[num++] = 0x0;
1599 arr[num++] = 0x4;
1600 arr[num++] = 0;
1601 arr[num++] = 0;
1602 put_unaligned_be16(port_group_id, arr + num);
1603 num += 2;
1604 /* NAA-3, Target device identifier */
1605 arr[num++] = 0x61; /* proto=sas, binary */
1606 arr[num++] = 0xa3; /* piv=1, target device, naa */
1607 arr[num++] = 0x0;
1608 arr[num++] = 0x8;
1609 put_unaligned_be64(naa3_comp_a + target_dev_id, arr + num);
1610 num += 8;
1611 /* SCSI name string: Target device identifier */
1612 arr[num++] = 0x63; /* proto=sas, UTF-8 */
1613 arr[num++] = 0xa8; /* piv=1, target device, SCSI name string */
1614 arr[num++] = 0x0;
1615 arr[num++] = 24;
1616 memcpy(arr + num, "naa.32222220", 12);
1617 num += 12;
1618 snprintf(b, sizeof(b), "%08X", target_dev_id);
1619 memcpy(arr + num, b, 8);
1620 num += 8;
1621 memset(arr + num, 0, 4);
1622 num += 4;
1623 return num;
1624}
1625
1626static unsigned char vpd84_data[] = {
1627/* from 4th byte */ 0x22,0x22,0x22,0x0,0xbb,0x0,
1628 0x22,0x22,0x22,0x0,0xbb,0x1,
1629 0x22,0x22,0x22,0x0,0xbb,0x2,
1630};
1631
1632/* Software interface identification VPD page */
1633static int inquiry_vpd_84(unsigned char *arr)
1634{
1635 memcpy(arr, vpd84_data, sizeof(vpd84_data));
1636 return sizeof(vpd84_data);
1637}
1638
1639/* Management network addresses VPD page */
1640static int inquiry_vpd_85(unsigned char *arr)
1641{
1642 int num = 0;
1643 const char *na1 = "https://www.kernel.org/config";
1644 const char *na2 = "http://www.kernel.org/log";
1645 int plen, olen;
1646
1647 arr[num++] = 0x1; /* lu, storage config */
1648 arr[num++] = 0x0; /* reserved */
1649 arr[num++] = 0x0;
1650 olen = strlen(na1);
1651 plen = olen + 1;
1652 if (plen % 4)
1653 plen = ((plen / 4) + 1) * 4;
1654 arr[num++] = plen; /* length, null termianted, padded */
1655 memcpy(arr + num, na1, olen);
1656 memset(arr + num + olen, 0, plen - olen);
1657 num += plen;
1658
1659 arr[num++] = 0x4; /* lu, logging */
1660 arr[num++] = 0x0; /* reserved */
1661 arr[num++] = 0x0;
1662 olen = strlen(na2);
1663 plen = olen + 1;
1664 if (plen % 4)
1665 plen = ((plen / 4) + 1) * 4;
1666 arr[num++] = plen; /* length, null terminated, padded */
1667 memcpy(arr + num, na2, olen);
1668 memset(arr + num + olen, 0, plen - olen);
1669 num += plen;
1670
1671 return num;
1672}
1673
1674/* SCSI ports VPD page */
1675static int inquiry_vpd_88(unsigned char *arr, int target_dev_id)
1676{
1677 int num = 0;
1678 int port_a, port_b;
1679
1680 port_a = target_dev_id + 1;
1681 port_b = port_a + 1;
1682 arr[num++] = 0x0; /* reserved */
1683 arr[num++] = 0x0; /* reserved */
1684 arr[num++] = 0x0;
1685 arr[num++] = 0x1; /* relative port 1 (primary) */
1686 memset(arr + num, 0, 6);
1687 num += 6;
1688 arr[num++] = 0x0;
1689 arr[num++] = 12; /* length tp descriptor */
1690 /* naa-5 target port identifier (A) */
1691 arr[num++] = 0x61; /* proto=sas, binary */
1692 arr[num++] = 0x93; /* PIV=1, target port, NAA */
1693 arr[num++] = 0x0; /* reserved */
1694 arr[num++] = 0x8; /* length */
1695 put_unaligned_be64(naa3_comp_a + port_a, arr + num);
1696 num += 8;
1697 arr[num++] = 0x0; /* reserved */
1698 arr[num++] = 0x0; /* reserved */
1699 arr[num++] = 0x0;
1700 arr[num++] = 0x2; /* relative port 2 (secondary) */
1701 memset(arr + num, 0, 6);
1702 num += 6;
1703 arr[num++] = 0x0;
1704 arr[num++] = 12; /* length tp descriptor */
1705 /* naa-5 target port identifier (B) */
1706 arr[num++] = 0x61; /* proto=sas, binary */
1707 arr[num++] = 0x93; /* PIV=1, target port, NAA */
1708 arr[num++] = 0x0; /* reserved */
1709 arr[num++] = 0x8; /* length */
1710 put_unaligned_be64(naa3_comp_a + port_b, arr + num);
1711 num += 8;
1712
1713 return num;
1714}
1715
1716
1717static unsigned char vpd89_data[] = {
1718/* from 4th byte */ 0,0,0,0,
1719'l','i','n','u','x',' ',' ',' ',
1720'S','A','T',' ','s','c','s','i','_','d','e','b','u','g',' ',' ',
1721'1','2','3','4',
17220x34,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,
17230xec,0,0,0,
17240x5a,0xc,0xff,0x3f,0x37,0xc8,0x10,0,0,0,0,0,0x3f,0,0,0,
17250,0,0,0,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x20,0x20,0x20,0x20,
17260x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0,0,0,0x40,0x4,0,0x2e,0x33,
17270x38,0x31,0x20,0x20,0x20,0x20,0x54,0x53,0x38,0x33,0x30,0x30,0x33,0x31,
17280x53,0x41,
17290x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
17300x20,0x20,
17310x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
17320x10,0x80,
17330,0,0,0x2f,0,0,0,0x2,0,0x2,0x7,0,0xff,0xff,0x1,0,
17340x3f,0,0xc1,0xff,0x3e,0,0x10,0x1,0xb0,0xf8,0x50,0x9,0,0,0x7,0,
17350x3,0,0x78,0,0x78,0,0xf0,0,0x78,0,0,0,0,0,0,0,
17360,0,0,0,0,0,0,0,0x2,0,0,0,0,0,0,0,
17370x7e,0,0x1b,0,0x6b,0x34,0x1,0x7d,0x3,0x40,0x69,0x34,0x1,0x3c,0x3,0x40,
17380x7f,0x40,0,0,0,0,0xfe,0xfe,0,0,0,0,0,0xfe,0,0,
17390,0,0,0,0,0,0,0,0xb0,0xf8,0x50,0x9,0,0,0,0,
17400,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17410,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17420,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17430x1,0,0xb0,0xf8,0x50,0x9,0xb0,0xf8,0x50,0x9,0x20,0x20,0x2,0,0xb6,0x42,
17440,0x80,0x8a,0,0x6,0x3c,0xa,0x3c,0xff,0xff,0xc6,0x7,0,0x1,0,0x8,
17450xf0,0xf,0,0x10,0x2,0,0x30,0,0,0,0,0,0,0,0x6,0xfe,
17460,0,0x2,0,0x50,0,0x8a,0,0x4f,0x95,0,0,0x21,0,0xb,0,
17470,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17480,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17490,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17500,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17510,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17520,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17530,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17540,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17550,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17560,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17570,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
17580,0,0,0,0,0,0,0,0,0,0,0,0,0,0xa5,0x51,
1759};
1760
1761/* ATA Information VPD page */
1762static int inquiry_vpd_89(unsigned char *arr)
1763{
1764 memcpy(arr, vpd89_data, sizeof(vpd89_data));
1765 return sizeof(vpd89_data);
1766}
1767
1768
1769static unsigned char vpdb0_data[] = {
1770 /* from 4th byte */ 0,0,0,4, 0,0,0x4,0, 0,0,0,64,
1771 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1772 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1773 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1774};
1775
1776/* Block limits VPD page (SBC-3) */
1777static int inquiry_vpd_b0(unsigned char *arr)
1778{
1779 unsigned int gran;
1780
1781 memcpy(arr, vpdb0_data, sizeof(vpdb0_data));
1782
1783 /* Optimal transfer length granularity */
1784 if (sdebug_opt_xferlen_exp != 0 &&
1785 sdebug_physblk_exp < sdebug_opt_xferlen_exp)
1786 gran = 1 << sdebug_opt_xferlen_exp;
1787 else
1788 gran = 1 << sdebug_physblk_exp;
1789 put_unaligned_be16(gran, arr + 2);
1790
1791 /* Maximum Transfer Length */
1792 if (sdebug_store_sectors > 0x400)
1793 put_unaligned_be32(sdebug_store_sectors, arr + 4);
1794
1795 /* Optimal Transfer Length */
1796 put_unaligned_be32(sdebug_opt_blks, &arr[8]);
1797
1798 if (sdebug_lbpu) {
1799 /* Maximum Unmap LBA Count */
1800 put_unaligned_be32(sdebug_unmap_max_blocks, &arr[16]);
1801
1802 /* Maximum Unmap Block Descriptor Count */
1803 put_unaligned_be32(sdebug_unmap_max_desc, &arr[20]);
1804 }
1805
1806 /* Unmap Granularity Alignment */
1807 if (sdebug_unmap_alignment) {
1808 put_unaligned_be32(sdebug_unmap_alignment, &arr[28]);
1809 arr[28] |= 0x80; /* UGAVALID */
1810 }
1811
1812 /* Optimal Unmap Granularity */
1813 put_unaligned_be32(sdebug_unmap_granularity, &arr[24]);
1814
1815 /* Maximum WRITE SAME Length */
1816 put_unaligned_be64(sdebug_write_same_length, &arr[32]);
1817
1818 return 0x3c; /* Mandatory page length for Logical Block Provisioning */
1819}
1820
1821/* Block device characteristics VPD page (SBC-3) */
1822static int inquiry_vpd_b1(struct sdebug_dev_info *devip, unsigned char *arr)
1823{
1824 memset(arr, 0, 0x3c);
1825 arr[0] = 0;
1826 arr[1] = 1; /* non rotating medium (e.g. solid state) */
1827 arr[2] = 0;
1828 arr[3] = 5; /* less than 1.8" */
1829
1830 return 0x3c;
1831}
1832
1833/* Logical block provisioning VPD page (SBC-4) */
1834static int inquiry_vpd_b2(unsigned char *arr)
1835{
1836 memset(arr, 0, 0x4);
1837 arr[0] = 0; /* threshold exponent */
1838 if (sdebug_lbpu)
1839 arr[1] = 1 << 7;
1840 if (sdebug_lbpws)
1841 arr[1] |= 1 << 6;
1842 if (sdebug_lbpws10)
1843 arr[1] |= 1 << 5;
1844 if (sdebug_lbprz && scsi_debug_lbp())
1845 arr[1] |= (sdebug_lbprz & 0x7) << 2; /* sbc4r07 and later */
1846 /* anc_sup=0; dp=0 (no provisioning group descriptor) */
1847 /* minimum_percentage=0; provisioning_type=0 (unknown) */
1848 /* threshold_percentage=0 */
1849 return 0x4;
1850}
1851
1852/* Zoned block device characteristics VPD page (ZBC mandatory) */
1853static int inquiry_vpd_b6(struct sdebug_dev_info *devip, unsigned char *arr)
1854{
1855 memset(arr, 0, 0x3c);
1856 arr[0] = 0x1; /* set URSWRZ (unrestricted read in seq. wr req zone) */
1857 /*
1858 * Set Optimal number of open sequential write preferred zones and
1859 * Optimal number of non-sequentially written sequential write
1860 * preferred zones fields to 'not reported' (0xffffffff). Leave other
1861 * fields set to zero, apart from Max. number of open swrz_s field.
1862 */
1863 put_unaligned_be32(0xffffffff, &arr[4]);
1864 put_unaligned_be32(0xffffffff, &arr[8]);
1865 if (sdeb_zbc_model == BLK_ZONED_HM && devip->max_open)
1866 put_unaligned_be32(devip->max_open, &arr[12]);
1867 else
1868 put_unaligned_be32(0xffffffff, &arr[12]);
1869 if (devip->zcap < devip->zsize) {
1870 arr[19] = ZBC_CONSTANT_ZONE_START_OFFSET;
1871 put_unaligned_be64(devip->zsize, &arr[20]);
1872 } else {
1873 arr[19] = 0;
1874 }
1875 return 0x3c;
1876}
1877
1878#define SDEBUG_BLE_LEN_AFTER_B4 28 /* thus vpage 32 bytes long */
1879
1880enum { MAXIMUM_NUMBER_OF_STREAMS = 6, PERMANENT_STREAM_COUNT = 5 };
1881
1882/* Block limits extension VPD page (SBC-4) */
1883static int inquiry_vpd_b7(unsigned char *arrb4)
1884{
1885 memset(arrb4, 0, SDEBUG_BLE_LEN_AFTER_B4);
1886 arrb4[1] = 1; /* Reduced stream control support (RSCS) */
1887 put_unaligned_be16(MAXIMUM_NUMBER_OF_STREAMS, &arrb4[2]);
1888 return SDEBUG_BLE_LEN_AFTER_B4;
1889}
1890
1891#define SDEBUG_LONG_INQ_SZ 96
1892#define SDEBUG_MAX_INQ_ARR_SZ 584
1893
1894static int resp_inquiry(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
1895{
1896 unsigned char pq_pdt;
1897 unsigned char *arr;
1898 unsigned char *cmd = scp->cmnd;
1899 u32 alloc_len, n;
1900 int ret;
1901 bool have_wlun, is_disk, is_zbc, is_disk_zbc;
1902
1903 alloc_len = get_unaligned_be16(cmd + 3);
1904 arr = kzalloc(SDEBUG_MAX_INQ_ARR_SZ, GFP_ATOMIC);
1905 if (! arr)
1906 return DID_REQUEUE << 16;
1907 is_disk = (sdebug_ptype == TYPE_DISK);
1908 is_zbc = devip->zoned;
1909 is_disk_zbc = (is_disk || is_zbc);
1910 have_wlun = scsi_is_wlun(scp->device->lun);
1911 if (have_wlun)
1912 pq_pdt = TYPE_WLUN; /* present, wlun */
1913 else if (sdebug_no_lun_0 && (devip->lun == SDEBUG_LUN_0_VAL))
1914 pq_pdt = 0x7f; /* not present, PQ=3, PDT=0x1f */
1915 else
1916 pq_pdt = (sdebug_ptype & 0x1f);
1917 arr[0] = pq_pdt;
1918 if (0x2 & cmd[1]) { /* CMDDT bit set */
1919 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 1);
1920 kfree(arr);
1921 return check_condition_result;
1922 } else if (0x1 & cmd[1]) { /* EVPD bit set */
1923 int lu_id_num, port_group_id, target_dev_id;
1924 u32 len;
1925 char lu_id_str[6];
1926 int host_no = devip->sdbg_host->shost->host_no;
1927
1928 arr[1] = cmd[2];
1929 port_group_id = (((host_no + 1) & 0x7f) << 8) +
1930 (devip->channel & 0x7f);
1931 if (sdebug_vpd_use_hostno == 0)
1932 host_no = 0;
1933 lu_id_num = have_wlun ? -1 : (((host_no + 1) * 2000) +
1934 (devip->target * 1000) + devip->lun);
1935 target_dev_id = ((host_no + 1) * 2000) +
1936 (devip->target * 1000) - 3;
1937 len = scnprintf(lu_id_str, 6, "%d", lu_id_num);
1938 if (0 == cmd[2]) { /* supported vital product data pages */
1939 n = 4;
1940 arr[n++] = 0x0; /* this page */
1941 arr[n++] = 0x80; /* unit serial number */
1942 arr[n++] = 0x83; /* device identification */
1943 arr[n++] = 0x84; /* software interface ident. */
1944 arr[n++] = 0x85; /* management network addresses */
1945 arr[n++] = 0x86; /* extended inquiry */
1946 arr[n++] = 0x87; /* mode page policy */
1947 arr[n++] = 0x88; /* SCSI ports */
1948 if (is_disk_zbc) { /* SBC or ZBC */
1949 arr[n++] = 0x89; /* ATA information */
1950 arr[n++] = 0xb0; /* Block limits */
1951 arr[n++] = 0xb1; /* Block characteristics */
1952 if (is_disk)
1953 arr[n++] = 0xb2; /* LB Provisioning */
1954 if (is_zbc)
1955 arr[n++] = 0xb6; /* ZB dev. char. */
1956 arr[n++] = 0xb7; /* Block limits extension */
1957 }
1958 arr[3] = n - 4; /* number of supported VPD pages */
1959 } else if (0x80 == cmd[2]) { /* unit serial number */
1960 arr[3] = len;
1961 memcpy(&arr[4], lu_id_str, len);
1962 } else if (0x83 == cmd[2]) { /* device identification */
1963 arr[3] = inquiry_vpd_83(&arr[4], port_group_id,
1964 target_dev_id, lu_id_num,
1965 lu_id_str, len,
1966 &devip->lu_name);
1967 } else if (0x84 == cmd[2]) { /* Software interface ident. */
1968 arr[3] = inquiry_vpd_84(&arr[4]);
1969 } else if (0x85 == cmd[2]) { /* Management network addresses */
1970 arr[3] = inquiry_vpd_85(&arr[4]);
1971 } else if (0x86 == cmd[2]) { /* extended inquiry */
1972 arr[3] = 0x3c; /* number of following entries */
1973 if (sdebug_dif == T10_PI_TYPE3_PROTECTION)
1974 arr[4] = 0x4; /* SPT: GRD_CHK:1 */
1975 else if (have_dif_prot)
1976 arr[4] = 0x5; /* SPT: GRD_CHK:1, REF_CHK:1 */
1977 else
1978 arr[4] = 0x0; /* no protection stuff */
1979 /*
1980 * GROUP_SUP=1; HEADSUP=1 (HEAD OF QUEUE); ORDSUP=1
1981 * (ORDERED queuing); SIMPSUP=1 (SIMPLE queuing).
1982 */
1983 arr[5] = 0x17;
1984 } else if (0x87 == cmd[2]) { /* mode page policy */
1985 arr[3] = 0x8; /* number of following entries */
1986 arr[4] = 0x2; /* disconnect-reconnect mp */
1987 arr[6] = 0x80; /* mlus, shared */
1988 arr[8] = 0x18; /* protocol specific lu */
1989 arr[10] = 0x82; /* mlus, per initiator port */
1990 } else if (0x88 == cmd[2]) { /* SCSI Ports */
1991 arr[3] = inquiry_vpd_88(&arr[4], target_dev_id);
1992 } else if (is_disk_zbc && 0x89 == cmd[2]) { /* ATA info */
1993 n = inquiry_vpd_89(&arr[4]);
1994 put_unaligned_be16(n, arr + 2);
1995 } else if (is_disk_zbc && 0xb0 == cmd[2]) { /* Block limits */
1996 arr[3] = inquiry_vpd_b0(&arr[4]);
1997 } else if (is_disk_zbc && 0xb1 == cmd[2]) { /* Block char. */
1998 arr[3] = inquiry_vpd_b1(devip, &arr[4]);
1999 } else if (is_disk && 0xb2 == cmd[2]) { /* LB Prov. */
2000 arr[3] = inquiry_vpd_b2(&arr[4]);
2001 } else if (is_zbc && cmd[2] == 0xb6) { /* ZB dev. charact. */
2002 arr[3] = inquiry_vpd_b6(devip, &arr[4]);
2003 } else if (cmd[2] == 0xb7) { /* block limits extension page */
2004 arr[3] = inquiry_vpd_b7(&arr[4]);
2005 } else {
2006 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, -1);
2007 kfree(arr);
2008 return check_condition_result;
2009 }
2010 len = min_t(u32, get_unaligned_be16(arr + 2) + 4, alloc_len);
2011 ret = fill_from_dev_buffer(scp, arr,
2012 min_t(u32, len, SDEBUG_MAX_INQ_ARR_SZ));
2013 kfree(arr);
2014 return ret;
2015 }
2016 /* drops through here for a standard inquiry */
2017 arr[1] = sdebug_removable ? 0x80 : 0; /* Removable disk */
2018 arr[2] = sdebug_scsi_level;
2019 arr[3] = 2; /* response_data_format==2 */
2020 arr[4] = SDEBUG_LONG_INQ_SZ - 5;
2021 arr[5] = (int)have_dif_prot; /* PROTECT bit */
2022 if (sdebug_vpd_use_hostno == 0)
2023 arr[5] |= 0x10; /* claim: implicit TPGS */
2024 arr[6] = 0x10; /* claim: MultiP */
2025 /* arr[6] |= 0x40; ... claim: EncServ (enclosure services) */
2026 arr[7] = 0xa; /* claim: LINKED + CMDQUE */
2027 memcpy(&arr[8], sdebug_inq_vendor_id, 8);
2028 memcpy(&arr[16], sdebug_inq_product_id, 16);
2029 memcpy(&arr[32], sdebug_inq_product_rev, 4);
2030 /* Use Vendor Specific area to place driver date in ASCII hex */
2031 memcpy(&arr[36], sdebug_version_date, 8);
2032 /* version descriptors (2 bytes each) follow */
2033 put_unaligned_be16(0xc0, arr + 58); /* SAM-6 no version claimed */
2034 put_unaligned_be16(0x5c0, arr + 60); /* SPC-5 no version claimed */
2035 n = 62;
2036 if (is_disk) { /* SBC-4 no version claimed */
2037 put_unaligned_be16(0x600, arr + n);
2038 n += 2;
2039 } else if (sdebug_ptype == TYPE_TAPE) { /* SSC-4 rev 3 */
2040 put_unaligned_be16(0x525, arr + n);
2041 n += 2;
2042 } else if (is_zbc) { /* ZBC BSR INCITS 536 revision 05 */
2043 put_unaligned_be16(0x624, arr + n);
2044 n += 2;
2045 }
2046 put_unaligned_be16(0x2100, arr + n); /* SPL-4 no version claimed */
2047 ret = fill_from_dev_buffer(scp, arr,
2048 min_t(u32, alloc_len, SDEBUG_LONG_INQ_SZ));
2049 kfree(arr);
2050 return ret;
2051}
2052
2053/* See resp_iec_m_pg() for how this data is manipulated */
2054static unsigned char iec_m_pg[] = {0x1c, 0xa, 0x08, 0, 0, 0, 0, 0,
2055 0, 0, 0x0, 0x0};
2056
2057static int resp_requests(struct scsi_cmnd *scp,
2058 struct sdebug_dev_info *devip)
2059{
2060 unsigned char *cmd = scp->cmnd;
2061 unsigned char arr[SCSI_SENSE_BUFFERSIZE]; /* assume >= 18 bytes */
2062 bool dsense = !!(cmd[1] & 1);
2063 u32 alloc_len = cmd[4];
2064 u32 len = 18;
2065 int stopped_state = atomic_read(&devip->stopped);
2066
2067 memset(arr, 0, sizeof(arr));
2068 if (stopped_state > 0) { /* some "pollable" data [spc6r02: 5.12.2] */
2069 if (dsense) {
2070 arr[0] = 0x72;
2071 arr[1] = NOT_READY;
2072 arr[2] = LOGICAL_UNIT_NOT_READY;
2073 arr[3] = (stopped_state == 2) ? 0x1 : 0x2;
2074 len = 8;
2075 } else {
2076 arr[0] = 0x70;
2077 arr[2] = NOT_READY; /* NO_SENSE in sense_key */
2078 arr[7] = 0xa; /* 18 byte sense buffer */
2079 arr[12] = LOGICAL_UNIT_NOT_READY;
2080 arr[13] = (stopped_state == 2) ? 0x1 : 0x2;
2081 }
2082 } else if ((iec_m_pg[2] & 0x4) && (6 == (iec_m_pg[3] & 0xf))) {
2083 /* Information exceptions control mode page: TEST=1, MRIE=6 */
2084 if (dsense) {
2085 arr[0] = 0x72;
2086 arr[1] = 0x0; /* NO_SENSE in sense_key */
2087 arr[2] = THRESHOLD_EXCEEDED;
2088 arr[3] = 0xff; /* Failure prediction(false) */
2089 len = 8;
2090 } else {
2091 arr[0] = 0x70;
2092 arr[2] = 0x0; /* NO_SENSE in sense_key */
2093 arr[7] = 0xa; /* 18 byte sense buffer */
2094 arr[12] = THRESHOLD_EXCEEDED;
2095 arr[13] = 0xff; /* Failure prediction(false) */
2096 }
2097 } else { /* nothing to report */
2098 if (dsense) {
2099 len = 8;
2100 memset(arr, 0, len);
2101 arr[0] = 0x72;
2102 } else {
2103 memset(arr, 0, len);
2104 arr[0] = 0x70;
2105 arr[7] = 0xa;
2106 }
2107 }
2108 return fill_from_dev_buffer(scp, arr, min_t(u32, len, alloc_len));
2109}
2110
2111static int resp_start_stop(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
2112{
2113 unsigned char *cmd = scp->cmnd;
2114 int power_cond, want_stop, stopped_state;
2115 bool changing;
2116
2117 power_cond = (cmd[4] & 0xf0) >> 4;
2118 if (power_cond) {
2119 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, 7);
2120 return check_condition_result;
2121 }
2122 want_stop = !(cmd[4] & 1);
2123 stopped_state = atomic_read(&devip->stopped);
2124 if (stopped_state == 2) {
2125 ktime_t now_ts = ktime_get_boottime();
2126
2127 if (ktime_to_ns(now_ts) > ktime_to_ns(devip->create_ts)) {
2128 u64 diff_ns = ktime_to_ns(ktime_sub(now_ts, devip->create_ts));
2129
2130 if (diff_ns >= ((u64)sdeb_tur_ms_to_ready * 1000000)) {
2131 /* tur_ms_to_ready timer extinguished */
2132 atomic_set(&devip->stopped, 0);
2133 stopped_state = 0;
2134 }
2135 }
2136 if (stopped_state == 2) {
2137 if (want_stop) {
2138 stopped_state = 1; /* dummy up success */
2139 } else { /* Disallow tur_ms_to_ready delay to be overridden */
2140 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, 0 /* START bit */);
2141 return check_condition_result;
2142 }
2143 }
2144 }
2145 changing = (stopped_state != want_stop);
2146 if (changing)
2147 atomic_xchg(&devip->stopped, want_stop);
2148 if (!changing || (cmd[1] & 0x1)) /* state unchanged or IMMED bit set in cdb */
2149 return SDEG_RES_IMMED_MASK;
2150 else
2151 return 0;
2152}
2153
2154static sector_t get_sdebug_capacity(void)
2155{
2156 static const unsigned int gibibyte = 1073741824;
2157
2158 if (sdebug_virtual_gb > 0)
2159 return (sector_t)sdebug_virtual_gb *
2160 (gibibyte / sdebug_sector_size);
2161 else
2162 return sdebug_store_sectors;
2163}
2164
2165#define SDEBUG_READCAP_ARR_SZ 8
2166static int resp_readcap(struct scsi_cmnd *scp,
2167 struct sdebug_dev_info *devip)
2168{
2169 unsigned char arr[SDEBUG_READCAP_ARR_SZ];
2170 unsigned int capac;
2171
2172 /* following just in case virtual_gb changed */
2173 sdebug_capacity = get_sdebug_capacity();
2174 memset(arr, 0, SDEBUG_READCAP_ARR_SZ);
2175 if (sdebug_capacity < 0xffffffff) {
2176 capac = (unsigned int)sdebug_capacity - 1;
2177 put_unaligned_be32(capac, arr + 0);
2178 } else
2179 put_unaligned_be32(0xffffffff, arr + 0);
2180 put_unaligned_be16(sdebug_sector_size, arr + 6);
2181 return fill_from_dev_buffer(scp, arr, SDEBUG_READCAP_ARR_SZ);
2182}
2183
2184#define SDEBUG_READCAP16_ARR_SZ 32
2185static int resp_readcap16(struct scsi_cmnd *scp,
2186 struct sdebug_dev_info *devip)
2187{
2188 unsigned char *cmd = scp->cmnd;
2189 unsigned char arr[SDEBUG_READCAP16_ARR_SZ];
2190 u32 alloc_len;
2191
2192 alloc_len = get_unaligned_be32(cmd + 10);
2193 /* following just in case virtual_gb changed */
2194 sdebug_capacity = get_sdebug_capacity();
2195 memset(arr, 0, SDEBUG_READCAP16_ARR_SZ);
2196 put_unaligned_be64((u64)(sdebug_capacity - 1), arr + 0);
2197 put_unaligned_be32(sdebug_sector_size, arr + 8);
2198 arr[13] = sdebug_physblk_exp & 0xf;
2199 arr[14] = (sdebug_lowest_aligned >> 8) & 0x3f;
2200
2201 if (scsi_debug_lbp()) {
2202 arr[14] |= 0x80; /* LBPME */
2203 /* from sbc4r07, this LBPRZ field is 1 bit, but the LBPRZ in
2204 * the LB Provisioning VPD page is 3 bits. Note that lbprz=2
2205 * in the wider field maps to 0 in this field.
2206 */
2207 if (sdebug_lbprz & 1) /* precisely what the draft requires */
2208 arr[14] |= 0x40;
2209 }
2210
2211 /*
2212 * Since the scsi_debug READ CAPACITY implementation always reports the
2213 * total disk capacity, set RC BASIS = 1 for host-managed ZBC devices.
2214 */
2215 if (devip->zoned)
2216 arr[12] |= 1 << 4;
2217
2218 arr[15] = sdebug_lowest_aligned & 0xff;
2219
2220 if (have_dif_prot) {
2221 arr[12] = (sdebug_dif - 1) << 1; /* P_TYPE */
2222 arr[12] |= 1; /* PROT_EN */
2223 }
2224
2225 return fill_from_dev_buffer(scp, arr,
2226 min_t(u32, alloc_len, SDEBUG_READCAP16_ARR_SZ));
2227}
2228
2229#define SDEBUG_MAX_TGTPGS_ARR_SZ 1412
2230
2231static int resp_report_tgtpgs(struct scsi_cmnd *scp,
2232 struct sdebug_dev_info *devip)
2233{
2234 unsigned char *cmd = scp->cmnd;
2235 unsigned char *arr;
2236 int host_no = devip->sdbg_host->shost->host_no;
2237 int port_group_a, port_group_b, port_a, port_b;
2238 u32 alen, n, rlen;
2239 int ret;
2240
2241 alen = get_unaligned_be32(cmd + 6);
2242 arr = kzalloc(SDEBUG_MAX_TGTPGS_ARR_SZ, GFP_ATOMIC);
2243 if (! arr)
2244 return DID_REQUEUE << 16;
2245 /*
2246 * EVPD page 0x88 states we have two ports, one
2247 * real and a fake port with no device connected.
2248 * So we create two port groups with one port each
2249 * and set the group with port B to unavailable.
2250 */
2251 port_a = 0x1; /* relative port A */
2252 port_b = 0x2; /* relative port B */
2253 port_group_a = (((host_no + 1) & 0x7f) << 8) +
2254 (devip->channel & 0x7f);
2255 port_group_b = (((host_no + 1) & 0x7f) << 8) +
2256 (devip->channel & 0x7f) + 0x80;
2257
2258 /*
2259 * The asymmetric access state is cycled according to the host_id.
2260 */
2261 n = 4;
2262 if (sdebug_vpd_use_hostno == 0) {
2263 arr[n++] = host_no % 3; /* Asymm access state */
2264 arr[n++] = 0x0F; /* claim: all states are supported */
2265 } else {
2266 arr[n++] = 0x0; /* Active/Optimized path */
2267 arr[n++] = 0x01; /* only support active/optimized paths */
2268 }
2269 put_unaligned_be16(port_group_a, arr + n);
2270 n += 2;
2271 arr[n++] = 0; /* Reserved */
2272 arr[n++] = 0; /* Status code */
2273 arr[n++] = 0; /* Vendor unique */
2274 arr[n++] = 0x1; /* One port per group */
2275 arr[n++] = 0; /* Reserved */
2276 arr[n++] = 0; /* Reserved */
2277 put_unaligned_be16(port_a, arr + n);
2278 n += 2;
2279 arr[n++] = 3; /* Port unavailable */
2280 arr[n++] = 0x08; /* claim: only unavailalbe paths are supported */
2281 put_unaligned_be16(port_group_b, arr + n);
2282 n += 2;
2283 arr[n++] = 0; /* Reserved */
2284 arr[n++] = 0; /* Status code */
2285 arr[n++] = 0; /* Vendor unique */
2286 arr[n++] = 0x1; /* One port per group */
2287 arr[n++] = 0; /* Reserved */
2288 arr[n++] = 0; /* Reserved */
2289 put_unaligned_be16(port_b, arr + n);
2290 n += 2;
2291
2292 rlen = n - 4;
2293 put_unaligned_be32(rlen, arr + 0);
2294
2295 /*
2296 * Return the smallest value of either
2297 * - The allocated length
2298 * - The constructed command length
2299 * - The maximum array size
2300 */
2301 rlen = min(alen, n);
2302 ret = fill_from_dev_buffer(scp, arr,
2303 min_t(u32, rlen, SDEBUG_MAX_TGTPGS_ARR_SZ));
2304 kfree(arr);
2305 return ret;
2306}
2307
2308static int resp_rsup_opcodes(struct scsi_cmnd *scp,
2309 struct sdebug_dev_info *devip)
2310{
2311 bool rctd;
2312 u8 reporting_opts, req_opcode, sdeb_i, supp;
2313 u16 req_sa, u;
2314 u32 alloc_len, a_len;
2315 int k, offset, len, errsts, count, bump, na;
2316 const struct opcode_info_t *oip;
2317 const struct opcode_info_t *r_oip;
2318 u8 *arr;
2319 u8 *cmd = scp->cmnd;
2320
2321 rctd = !!(cmd[2] & 0x80);
2322 reporting_opts = cmd[2] & 0x7;
2323 req_opcode = cmd[3];
2324 req_sa = get_unaligned_be16(cmd + 4);
2325 alloc_len = get_unaligned_be32(cmd + 6);
2326 if (alloc_len < 4 || alloc_len > 0xffff) {
2327 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
2328 return check_condition_result;
2329 }
2330 if (alloc_len > 8192)
2331 a_len = 8192;
2332 else
2333 a_len = alloc_len;
2334 arr = kzalloc((a_len < 256) ? 320 : a_len + 64, GFP_ATOMIC);
2335 if (NULL == arr) {
2336 mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
2337 INSUFF_RES_ASCQ);
2338 return check_condition_result;
2339 }
2340 switch (reporting_opts) {
2341 case 0: /* all commands */
2342 /* count number of commands */
2343 for (count = 0, oip = opcode_info_arr;
2344 oip->num_attached != 0xff; ++oip) {
2345 if (F_INV_OP & oip->flags)
2346 continue;
2347 count += (oip->num_attached + 1);
2348 }
2349 bump = rctd ? 20 : 8;
2350 put_unaligned_be32(count * bump, arr);
2351 for (offset = 4, oip = opcode_info_arr;
2352 oip->num_attached != 0xff && offset < a_len; ++oip) {
2353 if (F_INV_OP & oip->flags)
2354 continue;
2355 na = oip->num_attached;
2356 arr[offset] = oip->opcode;
2357 put_unaligned_be16(oip->sa, arr + offset + 2);
2358 if (rctd)
2359 arr[offset + 5] |= 0x2;
2360 if (FF_SA & oip->flags)
2361 arr[offset + 5] |= 0x1;
2362 put_unaligned_be16(oip->len_mask[0], arr + offset + 6);
2363 if (rctd)
2364 put_unaligned_be16(0xa, arr + offset + 8);
2365 r_oip = oip;
2366 for (k = 0, oip = oip->arrp; k < na; ++k, ++oip) {
2367 if (F_INV_OP & oip->flags)
2368 continue;
2369 offset += bump;
2370 arr[offset] = oip->opcode;
2371 put_unaligned_be16(oip->sa, arr + offset + 2);
2372 if (rctd)
2373 arr[offset + 5] |= 0x2;
2374 if (FF_SA & oip->flags)
2375 arr[offset + 5] |= 0x1;
2376 put_unaligned_be16(oip->len_mask[0],
2377 arr + offset + 6);
2378 if (rctd)
2379 put_unaligned_be16(0xa,
2380 arr + offset + 8);
2381 }
2382 oip = r_oip;
2383 offset += bump;
2384 }
2385 break;
2386 case 1: /* one command: opcode only */
2387 case 2: /* one command: opcode plus service action */
2388 case 3: /* one command: if sa==0 then opcode only else opcode+sa */
2389 sdeb_i = opcode_ind_arr[req_opcode];
2390 oip = &opcode_info_arr[sdeb_i];
2391 if (F_INV_OP & oip->flags) {
2392 supp = 1;
2393 offset = 4;
2394 } else {
2395 if (1 == reporting_opts) {
2396 if (FF_SA & oip->flags) {
2397 mk_sense_invalid_fld(scp, SDEB_IN_CDB,
2398 2, 2);
2399 kfree(arr);
2400 return check_condition_result;
2401 }
2402 req_sa = 0;
2403 } else if (2 == reporting_opts &&
2404 0 == (FF_SA & oip->flags)) {
2405 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, -1);
2406 kfree(arr); /* point at requested sa */
2407 return check_condition_result;
2408 }
2409 if (0 == (FF_SA & oip->flags) &&
2410 req_opcode == oip->opcode)
2411 supp = 3;
2412 else if (0 == (FF_SA & oip->flags)) {
2413 na = oip->num_attached;
2414 for (k = 0, oip = oip->arrp; k < na;
2415 ++k, ++oip) {
2416 if (req_opcode == oip->opcode)
2417 break;
2418 }
2419 supp = (k >= na) ? 1 : 3;
2420 } else if (req_sa != oip->sa) {
2421 na = oip->num_attached;
2422 for (k = 0, oip = oip->arrp; k < na;
2423 ++k, ++oip) {
2424 if (req_sa == oip->sa)
2425 break;
2426 }
2427 supp = (k >= na) ? 1 : 3;
2428 } else
2429 supp = 3;
2430 if (3 == supp) {
2431 u = oip->len_mask[0];
2432 put_unaligned_be16(u, arr + 2);
2433 arr[4] = oip->opcode;
2434 for (k = 1; k < u; ++k)
2435 arr[4 + k] = (k < 16) ?
2436 oip->len_mask[k] : 0xff;
2437 offset = 4 + u;
2438 } else
2439 offset = 4;
2440 }
2441 arr[1] = (rctd ? 0x80 : 0) | supp;
2442 if (rctd) {
2443 put_unaligned_be16(0xa, arr + offset);
2444 offset += 12;
2445 }
2446 break;
2447 default:
2448 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 2);
2449 kfree(arr);
2450 return check_condition_result;
2451 }
2452 offset = (offset < a_len) ? offset : a_len;
2453 len = (offset < alloc_len) ? offset : alloc_len;
2454 errsts = fill_from_dev_buffer(scp, arr, len);
2455 kfree(arr);
2456 return errsts;
2457}
2458
2459static int resp_rsup_tmfs(struct scsi_cmnd *scp,
2460 struct sdebug_dev_info *devip)
2461{
2462 bool repd;
2463 u32 alloc_len, len;
2464 u8 arr[16];
2465 u8 *cmd = scp->cmnd;
2466
2467 memset(arr, 0, sizeof(arr));
2468 repd = !!(cmd[2] & 0x80);
2469 alloc_len = get_unaligned_be32(cmd + 6);
2470 if (alloc_len < 4) {
2471 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
2472 return check_condition_result;
2473 }
2474 arr[0] = 0xc8; /* ATS | ATSS | LURS */
2475 arr[1] = 0x1; /* ITNRS */
2476 if (repd) {
2477 arr[3] = 0xc;
2478 len = 16;
2479 } else
2480 len = 4;
2481
2482 len = (len < alloc_len) ? len : alloc_len;
2483 return fill_from_dev_buffer(scp, arr, len);
2484}
2485
2486/* <<Following mode page info copied from ST318451LW>> */
2487
2488static int resp_err_recov_pg(unsigned char *p, int pcontrol, int target)
2489{ /* Read-Write Error Recovery page for mode_sense */
2490 unsigned char err_recov_pg[] = {0x1, 0xa, 0xc0, 11, 240, 0, 0, 0,
2491 5, 0, 0xff, 0xff};
2492
2493 memcpy(p, err_recov_pg, sizeof(err_recov_pg));
2494 if (1 == pcontrol)
2495 memset(p + 2, 0, sizeof(err_recov_pg) - 2);
2496 return sizeof(err_recov_pg);
2497}
2498
2499static int resp_disconnect_pg(unsigned char *p, int pcontrol, int target)
2500{ /* Disconnect-Reconnect page for mode_sense */
2501 unsigned char disconnect_pg[] = {0x2, 0xe, 128, 128, 0, 10, 0, 0,
2502 0, 0, 0, 0, 0, 0, 0, 0};
2503
2504 memcpy(p, disconnect_pg, sizeof(disconnect_pg));
2505 if (1 == pcontrol)
2506 memset(p + 2, 0, sizeof(disconnect_pg) - 2);
2507 return sizeof(disconnect_pg);
2508}
2509
2510static int resp_format_pg(unsigned char *p, int pcontrol, int target)
2511{ /* Format device page for mode_sense */
2512 unsigned char format_pg[] = {0x3, 0x16, 0, 0, 0, 0, 0, 0,
2513 0, 0, 0, 0, 0, 0, 0, 0,
2514 0, 0, 0, 0, 0x40, 0, 0, 0};
2515
2516 memcpy(p, format_pg, sizeof(format_pg));
2517 put_unaligned_be16(sdebug_sectors_per, p + 10);
2518 put_unaligned_be16(sdebug_sector_size, p + 12);
2519 if (sdebug_removable)
2520 p[20] |= 0x20; /* should agree with INQUIRY */
2521 if (1 == pcontrol)
2522 memset(p + 2, 0, sizeof(format_pg) - 2);
2523 return sizeof(format_pg);
2524}
2525
2526static unsigned char caching_pg[] = {0x8, 18, 0x14, 0, 0xff, 0xff, 0, 0,
2527 0xff, 0xff, 0xff, 0xff, 0x80, 0x14, 0, 0,
2528 0, 0, 0, 0};
2529
2530static int resp_caching_pg(unsigned char *p, int pcontrol, int target)
2531{ /* Caching page for mode_sense */
2532 unsigned char ch_caching_pg[] = {/* 0x8, 18, */ 0x4, 0, 0, 0, 0, 0,
2533 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
2534 unsigned char d_caching_pg[] = {0x8, 18, 0x14, 0, 0xff, 0xff, 0, 0,
2535 0xff, 0xff, 0xff, 0xff, 0x80, 0x14, 0, 0, 0, 0, 0, 0};
2536
2537 if (SDEBUG_OPT_N_WCE & sdebug_opts)
2538 caching_pg[2] &= ~0x4; /* set WCE=0 (default WCE=1) */
2539 memcpy(p, caching_pg, sizeof(caching_pg));
2540 if (1 == pcontrol)
2541 memcpy(p + 2, ch_caching_pg, sizeof(ch_caching_pg));
2542 else if (2 == pcontrol)
2543 memcpy(p, d_caching_pg, sizeof(d_caching_pg));
2544 return sizeof(caching_pg);
2545}
2546
2547static unsigned char ctrl_m_pg[] = {0xa, 10, 2, 0, 0, 0, 0, 0,
2548 0, 0, 0x2, 0x4b};
2549
2550static int resp_ctrl_m_pg(unsigned char *p, int pcontrol, int target)
2551{ /* Control mode page for mode_sense */
2552 unsigned char ch_ctrl_m_pg[] = {/* 0xa, 10, */ 0x6, 0, 0, 0, 0, 0,
2553 0, 0, 0, 0};
2554 unsigned char d_ctrl_m_pg[] = {0xa, 10, 2, 0, 0, 0, 0, 0,
2555 0, 0, 0x2, 0x4b};
2556
2557 if (sdebug_dsense)
2558 ctrl_m_pg[2] |= 0x4;
2559 else
2560 ctrl_m_pg[2] &= ~0x4;
2561
2562 if (sdebug_ato)
2563 ctrl_m_pg[5] |= 0x80; /* ATO=1 */
2564
2565 memcpy(p, ctrl_m_pg, sizeof(ctrl_m_pg));
2566 if (1 == pcontrol)
2567 memcpy(p + 2, ch_ctrl_m_pg, sizeof(ch_ctrl_m_pg));
2568 else if (2 == pcontrol)
2569 memcpy(p, d_ctrl_m_pg, sizeof(d_ctrl_m_pg));
2570 return sizeof(ctrl_m_pg);
2571}
2572
2573/* IO Advice Hints Grouping mode page */
2574static int resp_grouping_m_pg(unsigned char *p, int pcontrol, int target)
2575{
2576 /* IO Advice Hints Grouping mode page */
2577 struct grouping_m_pg {
2578 u8 page_code; /* OR 0x40 when subpage_code > 0 */
2579 u8 subpage_code;
2580 __be16 page_length;
2581 u8 reserved[12];
2582 struct scsi_io_group_descriptor descr[MAXIMUM_NUMBER_OF_STREAMS];
2583 };
2584 static const struct grouping_m_pg gr_m_pg = {
2585 .page_code = 0xa | 0x40,
2586 .subpage_code = 5,
2587 .page_length = cpu_to_be16(sizeof(gr_m_pg) - 4),
2588 .descr = {
2589 { .st_enble = 1 },
2590 { .st_enble = 1 },
2591 { .st_enble = 1 },
2592 { .st_enble = 1 },
2593 { .st_enble = 1 },
2594 { .st_enble = 0 },
2595 }
2596 };
2597
2598 BUILD_BUG_ON(sizeof(struct grouping_m_pg) !=
2599 16 + MAXIMUM_NUMBER_OF_STREAMS * 16);
2600 memcpy(p, &gr_m_pg, sizeof(gr_m_pg));
2601 if (1 == pcontrol) {
2602 /* There are no changeable values so clear from byte 4 on. */
2603 memset(p + 4, 0, sizeof(gr_m_pg) - 4);
2604 }
2605 return sizeof(gr_m_pg);
2606}
2607
2608static int resp_iec_m_pg(unsigned char *p, int pcontrol, int target)
2609{ /* Informational Exceptions control mode page for mode_sense */
2610 unsigned char ch_iec_m_pg[] = {/* 0x1c, 0xa, */ 0x4, 0xf, 0, 0, 0, 0,
2611 0, 0, 0x0, 0x0};
2612 unsigned char d_iec_m_pg[] = {0x1c, 0xa, 0x08, 0, 0, 0, 0, 0,
2613 0, 0, 0x0, 0x0};
2614
2615 memcpy(p, iec_m_pg, sizeof(iec_m_pg));
2616 if (1 == pcontrol)
2617 memcpy(p + 2, ch_iec_m_pg, sizeof(ch_iec_m_pg));
2618 else if (2 == pcontrol)
2619 memcpy(p, d_iec_m_pg, sizeof(d_iec_m_pg));
2620 return sizeof(iec_m_pg);
2621}
2622
2623static int resp_sas_sf_m_pg(unsigned char *p, int pcontrol, int target)
2624{ /* SAS SSP mode page - short format for mode_sense */
2625 unsigned char sas_sf_m_pg[] = {0x19, 0x6,
2626 0x6, 0x0, 0x7, 0xd0, 0x0, 0x0};
2627
2628 memcpy(p, sas_sf_m_pg, sizeof(sas_sf_m_pg));
2629 if (1 == pcontrol)
2630 memset(p + 2, 0, sizeof(sas_sf_m_pg) - 2);
2631 return sizeof(sas_sf_m_pg);
2632}
2633
2634
2635static int resp_sas_pcd_m_spg(unsigned char *p, int pcontrol, int target,
2636 int target_dev_id)
2637{ /* SAS phy control and discover mode page for mode_sense */
2638 unsigned char sas_pcd_m_pg[] = {0x59, 0x1, 0, 0x64, 0, 0x6, 0, 2,
2639 0, 0, 0, 0, 0x10, 0x9, 0x8, 0x0,
2640 0, 0, 0, 0, 0, 0, 0, 0, /* insert SAS addr */
2641 0, 0, 0, 0, 0, 0, 0, 0, /* insert SAS addr */
2642 0x2, 0, 0, 0, 0, 0, 0, 0,
2643 0x88, 0x99, 0, 0, 0, 0, 0, 0,
2644 0, 0, 0, 0, 0, 0, 0, 0,
2645 0, 1, 0, 0, 0x10, 0x9, 0x8, 0x0,
2646 0, 0, 0, 0, 0, 0, 0, 0, /* insert SAS addr */
2647 0, 0, 0, 0, 0, 0, 0, 0, /* insert SAS addr */
2648 0x3, 0, 0, 0, 0, 0, 0, 0,
2649 0x88, 0x99, 0, 0, 0, 0, 0, 0,
2650 0, 0, 0, 0, 0, 0, 0, 0,
2651 };
2652 int port_a, port_b;
2653
2654 put_unaligned_be64(naa3_comp_a, sas_pcd_m_pg + 16);
2655 put_unaligned_be64(naa3_comp_c + 1, sas_pcd_m_pg + 24);
2656 put_unaligned_be64(naa3_comp_a, sas_pcd_m_pg + 64);
2657 put_unaligned_be64(naa3_comp_c + 1, sas_pcd_m_pg + 72);
2658 port_a = target_dev_id + 1;
2659 port_b = port_a + 1;
2660 memcpy(p, sas_pcd_m_pg, sizeof(sas_pcd_m_pg));
2661 put_unaligned_be32(port_a, p + 20);
2662 put_unaligned_be32(port_b, p + 48 + 20);
2663 if (1 == pcontrol)
2664 memset(p + 4, 0, sizeof(sas_pcd_m_pg) - 4);
2665 return sizeof(sas_pcd_m_pg);
2666}
2667
2668static int resp_sas_sha_m_spg(unsigned char *p, int pcontrol)
2669{ /* SAS SSP shared protocol specific port mode subpage */
2670 unsigned char sas_sha_m_pg[] = {0x59, 0x2, 0, 0xc, 0, 0x6, 0x10, 0,
2671 0, 0, 0, 0, 0, 0, 0, 0,
2672 };
2673
2674 memcpy(p, sas_sha_m_pg, sizeof(sas_sha_m_pg));
2675 if (1 == pcontrol)
2676 memset(p + 4, 0, sizeof(sas_sha_m_pg) - 4);
2677 return sizeof(sas_sha_m_pg);
2678}
2679
2680/* PAGE_SIZE is more than necessary but provides room for future expansion. */
2681#define SDEBUG_MAX_MSENSE_SZ PAGE_SIZE
2682
2683static int resp_mode_sense(struct scsi_cmnd *scp,
2684 struct sdebug_dev_info *devip)
2685{
2686 int pcontrol, pcode, subpcode, bd_len;
2687 unsigned char dev_spec;
2688 u32 alloc_len, offset, len;
2689 int target_dev_id;
2690 int target = scp->device->id;
2691 unsigned char *ap;
2692 unsigned char *arr __free(kfree);
2693 unsigned char *cmd = scp->cmnd;
2694 bool dbd, llbaa, msense_6, is_disk, is_zbc;
2695
2696 arr = kzalloc(SDEBUG_MAX_MSENSE_SZ, GFP_ATOMIC);
2697 if (!arr)
2698 return -ENOMEM;
2699 dbd = !!(cmd[1] & 0x8); /* disable block descriptors */
2700 pcontrol = (cmd[2] & 0xc0) >> 6;
2701 pcode = cmd[2] & 0x3f;
2702 subpcode = cmd[3];
2703 msense_6 = (MODE_SENSE == cmd[0]);
2704 llbaa = msense_6 ? false : !!(cmd[1] & 0x10);
2705 is_disk = (sdebug_ptype == TYPE_DISK);
2706 is_zbc = devip->zoned;
2707 if ((is_disk || is_zbc) && !dbd)
2708 bd_len = llbaa ? 16 : 8;
2709 else
2710 bd_len = 0;
2711 alloc_len = msense_6 ? cmd[4] : get_unaligned_be16(cmd + 7);
2712 memset(arr, 0, SDEBUG_MAX_MSENSE_SZ);
2713 if (0x3 == pcontrol) { /* Saving values not supported */
2714 mk_sense_buffer(scp, ILLEGAL_REQUEST, SAVING_PARAMS_UNSUP, 0);
2715 return check_condition_result;
2716 }
2717 target_dev_id = ((devip->sdbg_host->shost->host_no + 1) * 2000) +
2718 (devip->target * 1000) - 3;
2719 /* for disks+zbc set DPOFUA bit and clear write protect (WP) bit */
2720 if (is_disk || is_zbc) {
2721 dev_spec = 0x10; /* =0x90 if WP=1 implies read-only */
2722 if (sdebug_wp)
2723 dev_spec |= 0x80;
2724 } else
2725 dev_spec = 0x0;
2726 if (msense_6) {
2727 arr[2] = dev_spec;
2728 arr[3] = bd_len;
2729 offset = 4;
2730 } else {
2731 arr[3] = dev_spec;
2732 if (16 == bd_len)
2733 arr[4] = 0x1; /* set LONGLBA bit */
2734 arr[7] = bd_len; /* assume 255 or less */
2735 offset = 8;
2736 }
2737 ap = arr + offset;
2738 if ((bd_len > 0) && (!sdebug_capacity))
2739 sdebug_capacity = get_sdebug_capacity();
2740
2741 if (8 == bd_len) {
2742 if (sdebug_capacity > 0xfffffffe)
2743 put_unaligned_be32(0xffffffff, ap + 0);
2744 else
2745 put_unaligned_be32(sdebug_capacity, ap + 0);
2746 put_unaligned_be16(sdebug_sector_size, ap + 6);
2747 offset += bd_len;
2748 ap = arr + offset;
2749 } else if (16 == bd_len) {
2750 put_unaligned_be64((u64)sdebug_capacity, ap + 0);
2751 put_unaligned_be32(sdebug_sector_size, ap + 12);
2752 offset += bd_len;
2753 ap = arr + offset;
2754 }
2755
2756 /*
2757 * N.B. If len>0 before resp_*_pg() call, then form of that call should be:
2758 * len += resp_*_pg(ap + len, pcontrol, target);
2759 */
2760 switch (pcode) {
2761 case 0x1: /* Read-Write error recovery page, direct access */
2762 if (subpcode > 0x0 && subpcode < 0xff)
2763 goto bad_subpcode;
2764 len = resp_err_recov_pg(ap, pcontrol, target);
2765 offset += len;
2766 break;
2767 case 0x2: /* Disconnect-Reconnect page, all devices */
2768 if (subpcode > 0x0 && subpcode < 0xff)
2769 goto bad_subpcode;
2770 len = resp_disconnect_pg(ap, pcontrol, target);
2771 offset += len;
2772 break;
2773 case 0x3: /* Format device page, direct access */
2774 if (subpcode > 0x0 && subpcode < 0xff)
2775 goto bad_subpcode;
2776 if (is_disk) {
2777 len = resp_format_pg(ap, pcontrol, target);
2778 offset += len;
2779 } else {
2780 goto bad_pcode;
2781 }
2782 break;
2783 case 0x8: /* Caching page, direct access */
2784 if (subpcode > 0x0 && subpcode < 0xff)
2785 goto bad_subpcode;
2786 if (is_disk || is_zbc) {
2787 len = resp_caching_pg(ap, pcontrol, target);
2788 offset += len;
2789 } else {
2790 goto bad_pcode;
2791 }
2792 break;
2793 case 0xa: /* Control Mode page, all devices */
2794 switch (subpcode) {
2795 case 0:
2796 len = resp_ctrl_m_pg(ap, pcontrol, target);
2797 break;
2798 case 0x05:
2799 len = resp_grouping_m_pg(ap, pcontrol, target);
2800 break;
2801 case 0xff:
2802 len = resp_ctrl_m_pg(ap, pcontrol, target);
2803 len += resp_grouping_m_pg(ap + len, pcontrol, target);
2804 break;
2805 default:
2806 goto bad_subpcode;
2807 }
2808 offset += len;
2809 break;
2810 case 0x19: /* if spc==1 then sas phy, control+discover */
2811 if (subpcode > 0x2 && subpcode < 0xff)
2812 goto bad_subpcode;
2813 len = 0;
2814 if ((0x0 == subpcode) || (0xff == subpcode))
2815 len += resp_sas_sf_m_pg(ap + len, pcontrol, target);
2816 if ((0x1 == subpcode) || (0xff == subpcode))
2817 len += resp_sas_pcd_m_spg(ap + len, pcontrol, target,
2818 target_dev_id);
2819 if ((0x2 == subpcode) || (0xff == subpcode))
2820 len += resp_sas_sha_m_spg(ap + len, pcontrol);
2821 offset += len;
2822 break;
2823 case 0x1c: /* Informational Exceptions Mode page, all devices */
2824 if (subpcode > 0x0 && subpcode < 0xff)
2825 goto bad_subpcode;
2826 len = resp_iec_m_pg(ap, pcontrol, target);
2827 offset += len;
2828 break;
2829 case 0x3f: /* Read all Mode pages */
2830 if (subpcode > 0x0 && subpcode < 0xff)
2831 goto bad_subpcode;
2832 len = resp_err_recov_pg(ap, pcontrol, target);
2833 len += resp_disconnect_pg(ap + len, pcontrol, target);
2834 if (is_disk) {
2835 len += resp_format_pg(ap + len, pcontrol, target);
2836 len += resp_caching_pg(ap + len, pcontrol, target);
2837 } else if (is_zbc) {
2838 len += resp_caching_pg(ap + len, pcontrol, target);
2839 }
2840 len += resp_ctrl_m_pg(ap + len, pcontrol, target);
2841 if (0xff == subpcode)
2842 len += resp_grouping_m_pg(ap + len, pcontrol, target);
2843 len += resp_sas_sf_m_pg(ap + len, pcontrol, target);
2844 if (0xff == subpcode) {
2845 len += resp_sas_pcd_m_spg(ap + len, pcontrol, target,
2846 target_dev_id);
2847 len += resp_sas_sha_m_spg(ap + len, pcontrol);
2848 }
2849 len += resp_iec_m_pg(ap + len, pcontrol, target);
2850 offset += len;
2851 break;
2852 default:
2853 goto bad_pcode;
2854 }
2855 if (msense_6)
2856 arr[0] = offset - 1;
2857 else
2858 put_unaligned_be16((offset - 2), arr + 0);
2859 return fill_from_dev_buffer(scp, arr, min_t(u32, alloc_len, offset));
2860
2861bad_pcode:
2862 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2863 return check_condition_result;
2864
2865bad_subpcode:
2866 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2867 return check_condition_result;
2868}
2869
2870#define SDEBUG_MAX_MSELECT_SZ 512
2871
2872static int resp_mode_select(struct scsi_cmnd *scp,
2873 struct sdebug_dev_info *devip)
2874{
2875 int pf, sp, ps, md_len, bd_len, off, spf, pg_len;
2876 int param_len, res, mpage;
2877 unsigned char arr[SDEBUG_MAX_MSELECT_SZ];
2878 unsigned char *cmd = scp->cmnd;
2879 int mselect6 = (MODE_SELECT == cmd[0]);
2880
2881 memset(arr, 0, sizeof(arr));
2882 pf = cmd[1] & 0x10;
2883 sp = cmd[1] & 0x1;
2884 param_len = mselect6 ? cmd[4] : get_unaligned_be16(cmd + 7);
2885 if ((0 == pf) || sp || (param_len > SDEBUG_MAX_MSELECT_SZ)) {
2886 mk_sense_invalid_fld(scp, SDEB_IN_CDB, mselect6 ? 4 : 7, -1);
2887 return check_condition_result;
2888 }
2889 res = fetch_to_dev_buffer(scp, arr, param_len);
2890 if (-1 == res)
2891 return DID_ERROR << 16;
2892 else if (sdebug_verbose && (res < param_len))
2893 sdev_printk(KERN_INFO, scp->device,
2894 "%s: cdb indicated=%d, IO sent=%d bytes\n",
2895 __func__, param_len, res);
2896 md_len = mselect6 ? (arr[0] + 1) : (get_unaligned_be16(arr + 0) + 2);
2897 bd_len = mselect6 ? arr[3] : get_unaligned_be16(arr + 6);
2898 off = bd_len + (mselect6 ? 4 : 8);
2899 if (md_len > 2 || off >= res) {
2900 mk_sense_invalid_fld(scp, SDEB_IN_DATA, 0, -1);
2901 return check_condition_result;
2902 }
2903 mpage = arr[off] & 0x3f;
2904 ps = !!(arr[off] & 0x80);
2905 if (ps) {
2906 mk_sense_invalid_fld(scp, SDEB_IN_DATA, off, 7);
2907 return check_condition_result;
2908 }
2909 spf = !!(arr[off] & 0x40);
2910 pg_len = spf ? (get_unaligned_be16(arr + off + 2) + 4) :
2911 (arr[off + 1] + 2);
2912 if ((pg_len + off) > param_len) {
2913 mk_sense_buffer(scp, ILLEGAL_REQUEST,
2914 PARAMETER_LIST_LENGTH_ERR, 0);
2915 return check_condition_result;
2916 }
2917 switch (mpage) {
2918 case 0x8: /* Caching Mode page */
2919 if (caching_pg[1] == arr[off + 1]) {
2920 memcpy(caching_pg + 2, arr + off + 2,
2921 sizeof(caching_pg) - 2);
2922 goto set_mode_changed_ua;
2923 }
2924 break;
2925 case 0xa: /* Control Mode page */
2926 if (ctrl_m_pg[1] == arr[off + 1]) {
2927 memcpy(ctrl_m_pg + 2, arr + off + 2,
2928 sizeof(ctrl_m_pg) - 2);
2929 if (ctrl_m_pg[4] & 0x8)
2930 sdebug_wp = true;
2931 else
2932 sdebug_wp = false;
2933 sdebug_dsense = !!(ctrl_m_pg[2] & 0x4);
2934 goto set_mode_changed_ua;
2935 }
2936 break;
2937 case 0x1c: /* Informational Exceptions Mode page */
2938 if (iec_m_pg[1] == arr[off + 1]) {
2939 memcpy(iec_m_pg + 2, arr + off + 2,
2940 sizeof(iec_m_pg) - 2);
2941 goto set_mode_changed_ua;
2942 }
2943 break;
2944 default:
2945 break;
2946 }
2947 mk_sense_invalid_fld(scp, SDEB_IN_DATA, off, 5);
2948 return check_condition_result;
2949set_mode_changed_ua:
2950 set_bit(SDEBUG_UA_MODE_CHANGED, devip->uas_bm);
2951 return 0;
2952}
2953
2954static int resp_temp_l_pg(unsigned char *arr)
2955{
2956 unsigned char temp_l_pg[] = {0x0, 0x0, 0x3, 0x2, 0x0, 38,
2957 0x0, 0x1, 0x3, 0x2, 0x0, 65,
2958 };
2959
2960 memcpy(arr, temp_l_pg, sizeof(temp_l_pg));
2961 return sizeof(temp_l_pg);
2962}
2963
2964static int resp_ie_l_pg(unsigned char *arr)
2965{
2966 unsigned char ie_l_pg[] = {0x0, 0x0, 0x3, 0x3, 0x0, 0x0, 38,
2967 };
2968
2969 memcpy(arr, ie_l_pg, sizeof(ie_l_pg));
2970 if (iec_m_pg[2] & 0x4) { /* TEST bit set */
2971 arr[4] = THRESHOLD_EXCEEDED;
2972 arr[5] = 0xff;
2973 }
2974 return sizeof(ie_l_pg);
2975}
2976
2977static int resp_env_rep_l_spg(unsigned char *arr)
2978{
2979 unsigned char env_rep_l_spg[] = {0x0, 0x0, 0x23, 0x8,
2980 0x0, 40, 72, 0xff, 45, 18, 0, 0,
2981 0x1, 0x0, 0x23, 0x8,
2982 0x0, 55, 72, 35, 55, 45, 0, 0,
2983 };
2984
2985 memcpy(arr, env_rep_l_spg, sizeof(env_rep_l_spg));
2986 return sizeof(env_rep_l_spg);
2987}
2988
2989#define SDEBUG_MAX_LSENSE_SZ 512
2990
2991static int resp_log_sense(struct scsi_cmnd *scp,
2992 struct sdebug_dev_info *devip)
2993{
2994 int ppc, sp, pcode, subpcode;
2995 u32 alloc_len, len, n;
2996 unsigned char arr[SDEBUG_MAX_LSENSE_SZ];
2997 unsigned char *cmd = scp->cmnd;
2998
2999 memset(arr, 0, sizeof(arr));
3000 ppc = cmd[1] & 0x2;
3001 sp = cmd[1] & 0x1;
3002 if (ppc || sp) {
3003 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, ppc ? 1 : 0);
3004 return check_condition_result;
3005 }
3006 pcode = cmd[2] & 0x3f;
3007 subpcode = cmd[3] & 0xff;
3008 alloc_len = get_unaligned_be16(cmd + 7);
3009 arr[0] = pcode;
3010 if (0 == subpcode) {
3011 switch (pcode) {
3012 case 0x0: /* Supported log pages log page */
3013 n = 4;
3014 arr[n++] = 0x0; /* this page */
3015 arr[n++] = 0xd; /* Temperature */
3016 arr[n++] = 0x2f; /* Informational exceptions */
3017 arr[3] = n - 4;
3018 break;
3019 case 0xd: /* Temperature log page */
3020 arr[3] = resp_temp_l_pg(arr + 4);
3021 break;
3022 case 0x2f: /* Informational exceptions log page */
3023 arr[3] = resp_ie_l_pg(arr + 4);
3024 break;
3025 default:
3026 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
3027 return check_condition_result;
3028 }
3029 } else if (0xff == subpcode) {
3030 arr[0] |= 0x40;
3031 arr[1] = subpcode;
3032 switch (pcode) {
3033 case 0x0: /* Supported log pages and subpages log page */
3034 n = 4;
3035 arr[n++] = 0x0;
3036 arr[n++] = 0x0; /* 0,0 page */
3037 arr[n++] = 0x0;
3038 arr[n++] = 0xff; /* this page */
3039 arr[n++] = 0xd;
3040 arr[n++] = 0x0; /* Temperature */
3041 arr[n++] = 0xd;
3042 arr[n++] = 0x1; /* Environment reporting */
3043 arr[n++] = 0xd;
3044 arr[n++] = 0xff; /* all 0xd subpages */
3045 arr[n++] = 0x2f;
3046 arr[n++] = 0x0; /* Informational exceptions */
3047 arr[n++] = 0x2f;
3048 arr[n++] = 0xff; /* all 0x2f subpages */
3049 arr[3] = n - 4;
3050 break;
3051 case 0xd: /* Temperature subpages */
3052 n = 4;
3053 arr[n++] = 0xd;
3054 arr[n++] = 0x0; /* Temperature */
3055 arr[n++] = 0xd;
3056 arr[n++] = 0x1; /* Environment reporting */
3057 arr[n++] = 0xd;
3058 arr[n++] = 0xff; /* these subpages */
3059 arr[3] = n - 4;
3060 break;
3061 case 0x2f: /* Informational exceptions subpages */
3062 n = 4;
3063 arr[n++] = 0x2f;
3064 arr[n++] = 0x0; /* Informational exceptions */
3065 arr[n++] = 0x2f;
3066 arr[n++] = 0xff; /* these subpages */
3067 arr[3] = n - 4;
3068 break;
3069 default:
3070 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
3071 return check_condition_result;
3072 }
3073 } else if (subpcode > 0) {
3074 arr[0] |= 0x40;
3075 arr[1] = subpcode;
3076 if (pcode == 0xd && subpcode == 1)
3077 arr[3] = resp_env_rep_l_spg(arr + 4);
3078 else {
3079 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
3080 return check_condition_result;
3081 }
3082 } else {
3083 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
3084 return check_condition_result;
3085 }
3086 len = min_t(u32, get_unaligned_be16(arr + 2) + 4, alloc_len);
3087 return fill_from_dev_buffer(scp, arr,
3088 min_t(u32, len, SDEBUG_MAX_INQ_ARR_SZ));
3089}
3090
3091static inline bool sdebug_dev_is_zoned(struct sdebug_dev_info *devip)
3092{
3093 return devip->nr_zones != 0;
3094}
3095
3096static struct sdeb_zone_state *zbc_zone(struct sdebug_dev_info *devip,
3097 unsigned long long lba)
3098{
3099 u32 zno = lba >> devip->zsize_shift;
3100 struct sdeb_zone_state *zsp;
3101
3102 if (devip->zcap == devip->zsize || zno < devip->nr_conv_zones)
3103 return &devip->zstate[zno];
3104
3105 /*
3106 * If the zone capacity is less than the zone size, adjust for gap
3107 * zones.
3108 */
3109 zno = 2 * zno - devip->nr_conv_zones;
3110 WARN_ONCE(zno >= devip->nr_zones, "%u > %u\n", zno, devip->nr_zones);
3111 zsp = &devip->zstate[zno];
3112 if (lba >= zsp->z_start + zsp->z_size)
3113 zsp++;
3114 WARN_ON_ONCE(lba >= zsp->z_start + zsp->z_size);
3115 return zsp;
3116}
3117
3118static inline bool zbc_zone_is_conv(struct sdeb_zone_state *zsp)
3119{
3120 return zsp->z_type == ZBC_ZTYPE_CNV;
3121}
3122
3123static inline bool zbc_zone_is_gap(struct sdeb_zone_state *zsp)
3124{
3125 return zsp->z_type == ZBC_ZTYPE_GAP;
3126}
3127
3128static inline bool zbc_zone_is_seq(struct sdeb_zone_state *zsp)
3129{
3130 return !zbc_zone_is_conv(zsp) && !zbc_zone_is_gap(zsp);
3131}
3132
3133static void zbc_close_zone(struct sdebug_dev_info *devip,
3134 struct sdeb_zone_state *zsp)
3135{
3136 enum sdebug_z_cond zc;
3137
3138 if (!zbc_zone_is_seq(zsp))
3139 return;
3140
3141 zc = zsp->z_cond;
3142 if (!(zc == ZC2_IMPLICIT_OPEN || zc == ZC3_EXPLICIT_OPEN))
3143 return;
3144
3145 if (zc == ZC2_IMPLICIT_OPEN)
3146 devip->nr_imp_open--;
3147 else
3148 devip->nr_exp_open--;
3149
3150 if (zsp->z_wp == zsp->z_start) {
3151 zsp->z_cond = ZC1_EMPTY;
3152 } else {
3153 zsp->z_cond = ZC4_CLOSED;
3154 devip->nr_closed++;
3155 }
3156}
3157
3158static void zbc_close_imp_open_zone(struct sdebug_dev_info *devip)
3159{
3160 struct sdeb_zone_state *zsp = &devip->zstate[0];
3161 unsigned int i;
3162
3163 for (i = 0; i < devip->nr_zones; i++, zsp++) {
3164 if (zsp->z_cond == ZC2_IMPLICIT_OPEN) {
3165 zbc_close_zone(devip, zsp);
3166 return;
3167 }
3168 }
3169}
3170
3171static void zbc_open_zone(struct sdebug_dev_info *devip,
3172 struct sdeb_zone_state *zsp, bool explicit)
3173{
3174 enum sdebug_z_cond zc;
3175
3176 if (!zbc_zone_is_seq(zsp))
3177 return;
3178
3179 zc = zsp->z_cond;
3180 if ((explicit && zc == ZC3_EXPLICIT_OPEN) ||
3181 (!explicit && zc == ZC2_IMPLICIT_OPEN))
3182 return;
3183
3184 /* Close an implicit open zone if necessary */
3185 if (explicit && zsp->z_cond == ZC2_IMPLICIT_OPEN)
3186 zbc_close_zone(devip, zsp);
3187 else if (devip->max_open &&
3188 devip->nr_imp_open + devip->nr_exp_open >= devip->max_open)
3189 zbc_close_imp_open_zone(devip);
3190
3191 if (zsp->z_cond == ZC4_CLOSED)
3192 devip->nr_closed--;
3193 if (explicit) {
3194 zsp->z_cond = ZC3_EXPLICIT_OPEN;
3195 devip->nr_exp_open++;
3196 } else {
3197 zsp->z_cond = ZC2_IMPLICIT_OPEN;
3198 devip->nr_imp_open++;
3199 }
3200}
3201
3202static inline void zbc_set_zone_full(struct sdebug_dev_info *devip,
3203 struct sdeb_zone_state *zsp)
3204{
3205 switch (zsp->z_cond) {
3206 case ZC2_IMPLICIT_OPEN:
3207 devip->nr_imp_open--;
3208 break;
3209 case ZC3_EXPLICIT_OPEN:
3210 devip->nr_exp_open--;
3211 break;
3212 default:
3213 WARN_ONCE(true, "Invalid zone %llu condition %x\n",
3214 zsp->z_start, zsp->z_cond);
3215 break;
3216 }
3217 zsp->z_cond = ZC5_FULL;
3218}
3219
3220static void zbc_inc_wp(struct sdebug_dev_info *devip,
3221 unsigned long long lba, unsigned int num)
3222{
3223 struct sdeb_zone_state *zsp = zbc_zone(devip, lba);
3224 unsigned long long n, end, zend = zsp->z_start + zsp->z_size;
3225
3226 if (!zbc_zone_is_seq(zsp))
3227 return;
3228
3229 if (zsp->z_type == ZBC_ZTYPE_SWR) {
3230 zsp->z_wp += num;
3231 if (zsp->z_wp >= zend)
3232 zbc_set_zone_full(devip, zsp);
3233 return;
3234 }
3235
3236 while (num) {
3237 if (lba != zsp->z_wp)
3238 zsp->z_non_seq_resource = true;
3239
3240 end = lba + num;
3241 if (end >= zend) {
3242 n = zend - lba;
3243 zsp->z_wp = zend;
3244 } else if (end > zsp->z_wp) {
3245 n = num;
3246 zsp->z_wp = end;
3247 } else {
3248 n = num;
3249 }
3250 if (zsp->z_wp >= zend)
3251 zbc_set_zone_full(devip, zsp);
3252
3253 num -= n;
3254 lba += n;
3255 if (num) {
3256 zsp++;
3257 zend = zsp->z_start + zsp->z_size;
3258 }
3259 }
3260}
3261
3262static int check_zbc_access_params(struct scsi_cmnd *scp,
3263 unsigned long long lba, unsigned int num, bool write)
3264{
3265 struct scsi_device *sdp = scp->device;
3266 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
3267 struct sdeb_zone_state *zsp = zbc_zone(devip, lba);
3268 struct sdeb_zone_state *zsp_end = zbc_zone(devip, lba + num - 1);
3269
3270 if (!write) {
3271 /* For host-managed, reads cannot cross zone types boundaries */
3272 if (zsp->z_type != zsp_end->z_type) {
3273 mk_sense_buffer(scp, ILLEGAL_REQUEST,
3274 LBA_OUT_OF_RANGE,
3275 READ_INVDATA_ASCQ);
3276 return check_condition_result;
3277 }
3278 return 0;
3279 }
3280
3281 /* Writing into a gap zone is not allowed */
3282 if (zbc_zone_is_gap(zsp)) {
3283 mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE,
3284 ATTEMPT_ACCESS_GAP);
3285 return check_condition_result;
3286 }
3287
3288 /* No restrictions for writes within conventional zones */
3289 if (zbc_zone_is_conv(zsp)) {
3290 if (!zbc_zone_is_conv(zsp_end)) {
3291 mk_sense_buffer(scp, ILLEGAL_REQUEST,
3292 LBA_OUT_OF_RANGE,
3293 WRITE_BOUNDARY_ASCQ);
3294 return check_condition_result;
3295 }
3296 return 0;
3297 }
3298
3299 if (zsp->z_type == ZBC_ZTYPE_SWR) {
3300 /* Writes cannot cross sequential zone boundaries */
3301 if (zsp_end != zsp) {
3302 mk_sense_buffer(scp, ILLEGAL_REQUEST,
3303 LBA_OUT_OF_RANGE,
3304 WRITE_BOUNDARY_ASCQ);
3305 return check_condition_result;
3306 }
3307 /* Cannot write full zones */
3308 if (zsp->z_cond == ZC5_FULL) {
3309 mk_sense_buffer(scp, ILLEGAL_REQUEST,
3310 INVALID_FIELD_IN_CDB, 0);
3311 return check_condition_result;
3312 }
3313 /* Writes must be aligned to the zone WP */
3314 if (lba != zsp->z_wp) {
3315 mk_sense_buffer(scp, ILLEGAL_REQUEST,
3316 LBA_OUT_OF_RANGE,
3317 UNALIGNED_WRITE_ASCQ);
3318 return check_condition_result;
3319 }
3320 }
3321
3322 /* Handle implicit open of closed and empty zones */
3323 if (zsp->z_cond == ZC1_EMPTY || zsp->z_cond == ZC4_CLOSED) {
3324 if (devip->max_open &&
3325 devip->nr_exp_open >= devip->max_open) {
3326 mk_sense_buffer(scp, DATA_PROTECT,
3327 INSUFF_RES_ASC,
3328 INSUFF_ZONE_ASCQ);
3329 return check_condition_result;
3330 }
3331 zbc_open_zone(devip, zsp, false);
3332 }
3333
3334 return 0;
3335}
3336
3337static inline int check_device_access_params
3338 (struct scsi_cmnd *scp, unsigned long long lba,
3339 unsigned int num, bool write)
3340{
3341 struct scsi_device *sdp = scp->device;
3342 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
3343
3344 if (lba + num > sdebug_capacity) {
3345 mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
3346 return check_condition_result;
3347 }
3348 /* transfer length excessive (tie in to block limits VPD page) */
3349 if (num > sdebug_store_sectors) {
3350 /* needs work to find which cdb byte 'num' comes from */
3351 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3352 return check_condition_result;
3353 }
3354 if (write && unlikely(sdebug_wp)) {
3355 mk_sense_buffer(scp, DATA_PROTECT, WRITE_PROTECTED, 0x2);
3356 return check_condition_result;
3357 }
3358 if (sdebug_dev_is_zoned(devip))
3359 return check_zbc_access_params(scp, lba, num, write);
3360
3361 return 0;
3362}
3363
3364/*
3365 * Note: if BUG_ON() fires it usually indicates a problem with the parser
3366 * tables. Perhaps a missing F_FAKE_RW or FF_MEDIA_IO flag. Response functions
3367 * that access any of the "stores" in struct sdeb_store_info should call this
3368 * function with bug_if_fake_rw set to true.
3369 */
3370static inline struct sdeb_store_info *devip2sip(struct sdebug_dev_info *devip,
3371 bool bug_if_fake_rw)
3372{
3373 if (sdebug_fake_rw) {
3374 BUG_ON(bug_if_fake_rw); /* See note above */
3375 return NULL;
3376 }
3377 return xa_load(per_store_ap, devip->sdbg_host->si_idx);
3378}
3379
3380/* Returns number of bytes copied or -1 if error. */
3381static int do_device_access(struct sdeb_store_info *sip, struct scsi_cmnd *scp,
3382 u32 sg_skip, u64 lba, u32 num, bool do_write,
3383 u8 group_number)
3384{
3385 int ret;
3386 u64 block, rest = 0;
3387 enum dma_data_direction dir;
3388 struct scsi_data_buffer *sdb = &scp->sdb;
3389 u8 *fsp;
3390
3391 if (do_write) {
3392 dir = DMA_TO_DEVICE;
3393 write_since_sync = true;
3394 } else {
3395 dir = DMA_FROM_DEVICE;
3396 }
3397
3398 if (!sdb->length || !sip)
3399 return 0;
3400 if (scp->sc_data_direction != dir)
3401 return -1;
3402
3403 if (do_write && group_number < ARRAY_SIZE(writes_by_group_number))
3404 atomic_long_inc(&writes_by_group_number[group_number]);
3405
3406 fsp = sip->storep;
3407
3408 block = do_div(lba, sdebug_store_sectors);
3409 if (block + num > sdebug_store_sectors)
3410 rest = block + num - sdebug_store_sectors;
3411
3412 ret = sg_copy_buffer(sdb->table.sgl, sdb->table.nents,
3413 fsp + (block * sdebug_sector_size),
3414 (num - rest) * sdebug_sector_size, sg_skip, do_write);
3415 if (ret != (num - rest) * sdebug_sector_size)
3416 return ret;
3417
3418 if (rest) {
3419 ret += sg_copy_buffer(sdb->table.sgl, sdb->table.nents,
3420 fsp, rest * sdebug_sector_size,
3421 sg_skip + ((num - rest) * sdebug_sector_size),
3422 do_write);
3423 }
3424
3425 return ret;
3426}
3427
3428/* Returns number of bytes copied or -1 if error. */
3429static int do_dout_fetch(struct scsi_cmnd *scp, u32 num, u8 *doutp)
3430{
3431 struct scsi_data_buffer *sdb = &scp->sdb;
3432
3433 if (!sdb->length)
3434 return 0;
3435 if (scp->sc_data_direction != DMA_TO_DEVICE)
3436 return -1;
3437 return sg_copy_buffer(sdb->table.sgl, sdb->table.nents, doutp,
3438 num * sdebug_sector_size, 0, true);
3439}
3440
3441/* If sip->storep+lba compares equal to arr(num), then copy top half of
3442 * arr into sip->storep+lba and return true. If comparison fails then
3443 * return false. */
3444static bool comp_write_worker(struct sdeb_store_info *sip, u64 lba, u32 num,
3445 const u8 *arr, bool compare_only)
3446{
3447 bool res;
3448 u64 block, rest = 0;
3449 u32 store_blks = sdebug_store_sectors;
3450 u32 lb_size = sdebug_sector_size;
3451 u8 *fsp = sip->storep;
3452
3453 block = do_div(lba, store_blks);
3454 if (block + num > store_blks)
3455 rest = block + num - store_blks;
3456
3457 res = !memcmp(fsp + (block * lb_size), arr, (num - rest) * lb_size);
3458 if (!res)
3459 return res;
3460 if (rest)
3461 res = memcmp(fsp, arr + ((num - rest) * lb_size),
3462 rest * lb_size);
3463 if (!res)
3464 return res;
3465 if (compare_only)
3466 return true;
3467 arr += num * lb_size;
3468 memcpy(fsp + (block * lb_size), arr, (num - rest) * lb_size);
3469 if (rest)
3470 memcpy(fsp, arr + ((num - rest) * lb_size), rest * lb_size);
3471 return res;
3472}
3473
3474static __be16 dif_compute_csum(const void *buf, int len)
3475{
3476 __be16 csum;
3477
3478 if (sdebug_guard)
3479 csum = (__force __be16)ip_compute_csum(buf, len);
3480 else
3481 csum = cpu_to_be16(crc_t10dif(buf, len));
3482
3483 return csum;
3484}
3485
3486static int dif_verify(struct t10_pi_tuple *sdt, const void *data,
3487 sector_t sector, u32 ei_lba)
3488{
3489 __be16 csum = dif_compute_csum(data, sdebug_sector_size);
3490
3491 if (sdt->guard_tag != csum) {
3492 pr_err("GUARD check failed on sector %lu rcvd 0x%04x, data 0x%04x\n",
3493 (unsigned long)sector,
3494 be16_to_cpu(sdt->guard_tag),
3495 be16_to_cpu(csum));
3496 return 0x01;
3497 }
3498 if (sdebug_dif == T10_PI_TYPE1_PROTECTION &&
3499 be32_to_cpu(sdt->ref_tag) != (sector & 0xffffffff)) {
3500 pr_err("REF check failed on sector %lu\n",
3501 (unsigned long)sector);
3502 return 0x03;
3503 }
3504 if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3505 be32_to_cpu(sdt->ref_tag) != ei_lba) {
3506 pr_err("REF check failed on sector %lu\n",
3507 (unsigned long)sector);
3508 return 0x03;
3509 }
3510 return 0;
3511}
3512
3513static void dif_copy_prot(struct scsi_cmnd *scp, sector_t sector,
3514 unsigned int sectors, bool read)
3515{
3516 size_t resid;
3517 void *paddr;
3518 struct sdeb_store_info *sip = devip2sip((struct sdebug_dev_info *)
3519 scp->device->hostdata, true);
3520 struct t10_pi_tuple *dif_storep = sip->dif_storep;
3521 const void *dif_store_end = dif_storep + sdebug_store_sectors;
3522 struct sg_mapping_iter miter;
3523
3524 /* Bytes of protection data to copy into sgl */
3525 resid = sectors * sizeof(*dif_storep);
3526
3527 sg_miter_start(&miter, scsi_prot_sglist(scp),
3528 scsi_prot_sg_count(scp), SG_MITER_ATOMIC |
3529 (read ? SG_MITER_TO_SG : SG_MITER_FROM_SG));
3530
3531 while (sg_miter_next(&miter) && resid > 0) {
3532 size_t len = min_t(size_t, miter.length, resid);
3533 void *start = dif_store(sip, sector);
3534 size_t rest = 0;
3535
3536 if (dif_store_end < start + len)
3537 rest = start + len - dif_store_end;
3538
3539 paddr = miter.addr;
3540
3541 if (read)
3542 memcpy(paddr, start, len - rest);
3543 else
3544 memcpy(start, paddr, len - rest);
3545
3546 if (rest) {
3547 if (read)
3548 memcpy(paddr + len - rest, dif_storep, rest);
3549 else
3550 memcpy(dif_storep, paddr + len - rest, rest);
3551 }
3552
3553 sector += len / sizeof(*dif_storep);
3554 resid -= len;
3555 }
3556 sg_miter_stop(&miter);
3557}
3558
3559static int prot_verify_read(struct scsi_cmnd *scp, sector_t start_sec,
3560 unsigned int sectors, u32 ei_lba)
3561{
3562 int ret = 0;
3563 unsigned int i;
3564 sector_t sector;
3565 struct sdeb_store_info *sip = devip2sip((struct sdebug_dev_info *)
3566 scp->device->hostdata, true);
3567 struct t10_pi_tuple *sdt;
3568
3569 for (i = 0; i < sectors; i++, ei_lba++) {
3570 sector = start_sec + i;
3571 sdt = dif_store(sip, sector);
3572
3573 if (sdt->app_tag == cpu_to_be16(0xffff))
3574 continue;
3575
3576 /*
3577 * Because scsi_debug acts as both initiator and
3578 * target we proceed to verify the PI even if
3579 * RDPROTECT=3. This is done so the "initiator" knows
3580 * which type of error to return. Otherwise we would
3581 * have to iterate over the PI twice.
3582 */
3583 if (scp->cmnd[1] >> 5) { /* RDPROTECT */
3584 ret = dif_verify(sdt, lba2fake_store(sip, sector),
3585 sector, ei_lba);
3586 if (ret) {
3587 dif_errors++;
3588 break;
3589 }
3590 }
3591 }
3592
3593 dif_copy_prot(scp, start_sec, sectors, true);
3594 dix_reads++;
3595
3596 return ret;
3597}
3598
3599static inline void
3600sdeb_read_lock(struct sdeb_store_info *sip)
3601{
3602 if (sdebug_no_rwlock) {
3603 if (sip)
3604 __acquire(&sip->macc_lck);
3605 else
3606 __acquire(&sdeb_fake_rw_lck);
3607 } else {
3608 if (sip)
3609 read_lock(&sip->macc_lck);
3610 else
3611 read_lock(&sdeb_fake_rw_lck);
3612 }
3613}
3614
3615static inline void
3616sdeb_read_unlock(struct sdeb_store_info *sip)
3617{
3618 if (sdebug_no_rwlock) {
3619 if (sip)
3620 __release(&sip->macc_lck);
3621 else
3622 __release(&sdeb_fake_rw_lck);
3623 } else {
3624 if (sip)
3625 read_unlock(&sip->macc_lck);
3626 else
3627 read_unlock(&sdeb_fake_rw_lck);
3628 }
3629}
3630
3631static inline void
3632sdeb_write_lock(struct sdeb_store_info *sip)
3633{
3634 if (sdebug_no_rwlock) {
3635 if (sip)
3636 __acquire(&sip->macc_lck);
3637 else
3638 __acquire(&sdeb_fake_rw_lck);
3639 } else {
3640 if (sip)
3641 write_lock(&sip->macc_lck);
3642 else
3643 write_lock(&sdeb_fake_rw_lck);
3644 }
3645}
3646
3647static inline void
3648sdeb_write_unlock(struct sdeb_store_info *sip)
3649{
3650 if (sdebug_no_rwlock) {
3651 if (sip)
3652 __release(&sip->macc_lck);
3653 else
3654 __release(&sdeb_fake_rw_lck);
3655 } else {
3656 if (sip)
3657 write_unlock(&sip->macc_lck);
3658 else
3659 write_unlock(&sdeb_fake_rw_lck);
3660 }
3661}
3662
3663static int resp_read_dt0(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
3664{
3665 bool check_prot;
3666 u32 num;
3667 u32 ei_lba;
3668 int ret;
3669 u64 lba;
3670 struct sdeb_store_info *sip = devip2sip(devip, true);
3671 u8 *cmd = scp->cmnd;
3672
3673 switch (cmd[0]) {
3674 case READ_16:
3675 ei_lba = 0;
3676 lba = get_unaligned_be64(cmd + 2);
3677 num = get_unaligned_be32(cmd + 10);
3678 check_prot = true;
3679 break;
3680 case READ_10:
3681 ei_lba = 0;
3682 lba = get_unaligned_be32(cmd + 2);
3683 num = get_unaligned_be16(cmd + 7);
3684 check_prot = true;
3685 break;
3686 case READ_6:
3687 ei_lba = 0;
3688 lba = (u32)cmd[3] | (u32)cmd[2] << 8 |
3689 (u32)(cmd[1] & 0x1f) << 16;
3690 num = (0 == cmd[4]) ? 256 : cmd[4];
3691 check_prot = true;
3692 break;
3693 case READ_12:
3694 ei_lba = 0;
3695 lba = get_unaligned_be32(cmd + 2);
3696 num = get_unaligned_be32(cmd + 6);
3697 check_prot = true;
3698 break;
3699 case XDWRITEREAD_10:
3700 ei_lba = 0;
3701 lba = get_unaligned_be32(cmd + 2);
3702 num = get_unaligned_be16(cmd + 7);
3703 check_prot = false;
3704 break;
3705 default: /* assume READ(32) */
3706 lba = get_unaligned_be64(cmd + 12);
3707 ei_lba = get_unaligned_be32(cmd + 20);
3708 num = get_unaligned_be32(cmd + 28);
3709 check_prot = false;
3710 break;
3711 }
3712 if (unlikely(have_dif_prot && check_prot)) {
3713 if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3714 (cmd[1] & 0xe0)) {
3715 mk_sense_invalid_opcode(scp);
3716 return check_condition_result;
3717 }
3718 if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3719 sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3720 (cmd[1] & 0xe0) == 0)
3721 sdev_printk(KERN_ERR, scp->device, "Unprotected RD "
3722 "to DIF device\n");
3723 }
3724 if (unlikely((sdebug_opts & SDEBUG_OPT_SHORT_TRANSFER) &&
3725 atomic_read(&sdeb_inject_pending))) {
3726 num /= 2;
3727 atomic_set(&sdeb_inject_pending, 0);
3728 }
3729
3730 ret = check_device_access_params(scp, lba, num, false);
3731 if (ret)
3732 return ret;
3733 if (unlikely((SDEBUG_OPT_MEDIUM_ERR & sdebug_opts) &&
3734 (lba <= (sdebug_medium_error_start + sdebug_medium_error_count - 1)) &&
3735 ((lba + num) > sdebug_medium_error_start))) {
3736 /* claim unrecoverable read error */
3737 mk_sense_buffer(scp, MEDIUM_ERROR, UNRECOVERED_READ_ERR, 0);
3738 /* set info field and valid bit for fixed descriptor */
3739 if (0x70 == (scp->sense_buffer[0] & 0x7f)) {
3740 scp->sense_buffer[0] |= 0x80; /* Valid bit */
3741 ret = (lba < OPT_MEDIUM_ERR_ADDR)
3742 ? OPT_MEDIUM_ERR_ADDR : (int)lba;
3743 put_unaligned_be32(ret, scp->sense_buffer + 3);
3744 }
3745 scsi_set_resid(scp, scsi_bufflen(scp));
3746 return check_condition_result;
3747 }
3748
3749 sdeb_read_lock(sip);
3750
3751 /* DIX + T10 DIF */
3752 if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3753 switch (prot_verify_read(scp, lba, num, ei_lba)) {
3754 case 1: /* Guard tag error */
3755 if (cmd[1] >> 5 != 3) { /* RDPROTECT != 3 */
3756 sdeb_read_unlock(sip);
3757 mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
3758 return check_condition_result;
3759 } else if (scp->prot_flags & SCSI_PROT_GUARD_CHECK) {
3760 sdeb_read_unlock(sip);
3761 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
3762 return illegal_condition_result;
3763 }
3764 break;
3765 case 3: /* Reference tag error */
3766 if (cmd[1] >> 5 != 3) { /* RDPROTECT != 3 */
3767 sdeb_read_unlock(sip);
3768 mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 3);
3769 return check_condition_result;
3770 } else if (scp->prot_flags & SCSI_PROT_REF_CHECK) {
3771 sdeb_read_unlock(sip);
3772 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 3);
3773 return illegal_condition_result;
3774 }
3775 break;
3776 }
3777 }
3778
3779 ret = do_device_access(sip, scp, 0, lba, num, false, 0);
3780 sdeb_read_unlock(sip);
3781 if (unlikely(ret == -1))
3782 return DID_ERROR << 16;
3783
3784 scsi_set_resid(scp, scsi_bufflen(scp) - ret);
3785
3786 if (unlikely((sdebug_opts & SDEBUG_OPT_RECOV_DIF_DIX) &&
3787 atomic_read(&sdeb_inject_pending))) {
3788 if (sdebug_opts & SDEBUG_OPT_RECOVERED_ERR) {
3789 mk_sense_buffer(scp, RECOVERED_ERROR, THRESHOLD_EXCEEDED, 0);
3790 atomic_set(&sdeb_inject_pending, 0);
3791 return check_condition_result;
3792 } else if (sdebug_opts & SDEBUG_OPT_DIF_ERR) {
3793 /* Logical block guard check failed */
3794 mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
3795 atomic_set(&sdeb_inject_pending, 0);
3796 return illegal_condition_result;
3797 } else if (SDEBUG_OPT_DIX_ERR & sdebug_opts) {
3798 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
3799 atomic_set(&sdeb_inject_pending, 0);
3800 return illegal_condition_result;
3801 }
3802 }
3803 return 0;
3804}
3805
3806static int prot_verify_write(struct scsi_cmnd *SCpnt, sector_t start_sec,
3807 unsigned int sectors, u32 ei_lba)
3808{
3809 int ret;
3810 struct t10_pi_tuple *sdt;
3811 void *daddr;
3812 sector_t sector = start_sec;
3813 int ppage_offset;
3814 int dpage_offset;
3815 struct sg_mapping_iter diter;
3816 struct sg_mapping_iter piter;
3817
3818 BUG_ON(scsi_sg_count(SCpnt) == 0);
3819 BUG_ON(scsi_prot_sg_count(SCpnt) == 0);
3820
3821 sg_miter_start(&piter, scsi_prot_sglist(SCpnt),
3822 scsi_prot_sg_count(SCpnt),
3823 SG_MITER_ATOMIC | SG_MITER_FROM_SG);
3824 sg_miter_start(&diter, scsi_sglist(SCpnt), scsi_sg_count(SCpnt),
3825 SG_MITER_ATOMIC | SG_MITER_FROM_SG);
3826
3827 /* For each protection page */
3828 while (sg_miter_next(&piter)) {
3829 dpage_offset = 0;
3830 if (WARN_ON(!sg_miter_next(&diter))) {
3831 ret = 0x01;
3832 goto out;
3833 }
3834
3835 for (ppage_offset = 0; ppage_offset < piter.length;
3836 ppage_offset += sizeof(struct t10_pi_tuple)) {
3837 /* If we're at the end of the current
3838 * data page advance to the next one
3839 */
3840 if (dpage_offset >= diter.length) {
3841 if (WARN_ON(!sg_miter_next(&diter))) {
3842 ret = 0x01;
3843 goto out;
3844 }
3845 dpage_offset = 0;
3846 }
3847
3848 sdt = piter.addr + ppage_offset;
3849 daddr = diter.addr + dpage_offset;
3850
3851 if (SCpnt->cmnd[1] >> 5 != 3) { /* WRPROTECT */
3852 ret = dif_verify(sdt, daddr, sector, ei_lba);
3853 if (ret)
3854 goto out;
3855 }
3856
3857 sector++;
3858 ei_lba++;
3859 dpage_offset += sdebug_sector_size;
3860 }
3861 diter.consumed = dpage_offset;
3862 sg_miter_stop(&diter);
3863 }
3864 sg_miter_stop(&piter);
3865
3866 dif_copy_prot(SCpnt, start_sec, sectors, false);
3867 dix_writes++;
3868
3869 return 0;
3870
3871out:
3872 dif_errors++;
3873 sg_miter_stop(&diter);
3874 sg_miter_stop(&piter);
3875 return ret;
3876}
3877
3878static unsigned long lba_to_map_index(sector_t lba)
3879{
3880 if (sdebug_unmap_alignment)
3881 lba += sdebug_unmap_granularity - sdebug_unmap_alignment;
3882 sector_div(lba, sdebug_unmap_granularity);
3883 return lba;
3884}
3885
3886static sector_t map_index_to_lba(unsigned long index)
3887{
3888 sector_t lba = index * sdebug_unmap_granularity;
3889
3890 if (sdebug_unmap_alignment)
3891 lba -= sdebug_unmap_granularity - sdebug_unmap_alignment;
3892 return lba;
3893}
3894
3895static unsigned int map_state(struct sdeb_store_info *sip, sector_t lba,
3896 unsigned int *num)
3897{
3898 sector_t end;
3899 unsigned int mapped;
3900 unsigned long index;
3901 unsigned long next;
3902
3903 index = lba_to_map_index(lba);
3904 mapped = test_bit(index, sip->map_storep);
3905
3906 if (mapped)
3907 next = find_next_zero_bit(sip->map_storep, map_size, index);
3908 else
3909 next = find_next_bit(sip->map_storep, map_size, index);
3910
3911 end = min_t(sector_t, sdebug_store_sectors, map_index_to_lba(next));
3912 *num = end - lba;
3913 return mapped;
3914}
3915
3916static void map_region(struct sdeb_store_info *sip, sector_t lba,
3917 unsigned int len)
3918{
3919 sector_t end = lba + len;
3920
3921 while (lba < end) {
3922 unsigned long index = lba_to_map_index(lba);
3923
3924 if (index < map_size)
3925 set_bit(index, sip->map_storep);
3926
3927 lba = map_index_to_lba(index + 1);
3928 }
3929}
3930
3931static void unmap_region(struct sdeb_store_info *sip, sector_t lba,
3932 unsigned int len)
3933{
3934 sector_t end = lba + len;
3935 u8 *fsp = sip->storep;
3936
3937 while (lba < end) {
3938 unsigned long index = lba_to_map_index(lba);
3939
3940 if (lba == map_index_to_lba(index) &&
3941 lba + sdebug_unmap_granularity <= end &&
3942 index < map_size) {
3943 clear_bit(index, sip->map_storep);
3944 if (sdebug_lbprz) { /* for LBPRZ=2 return 0xff_s */
3945 memset(fsp + lba * sdebug_sector_size,
3946 (sdebug_lbprz & 1) ? 0 : 0xff,
3947 sdebug_sector_size *
3948 sdebug_unmap_granularity);
3949 }
3950 if (sip->dif_storep) {
3951 memset(sip->dif_storep + lba, 0xff,
3952 sizeof(*sip->dif_storep) *
3953 sdebug_unmap_granularity);
3954 }
3955 }
3956 lba = map_index_to_lba(index + 1);
3957 }
3958}
3959
3960static int resp_write_dt0(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
3961{
3962 bool check_prot;
3963 u32 num;
3964 u8 group = 0;
3965 u32 ei_lba;
3966 int ret;
3967 u64 lba;
3968 struct sdeb_store_info *sip = devip2sip(devip, true);
3969 u8 *cmd = scp->cmnd;
3970
3971 switch (cmd[0]) {
3972 case WRITE_16:
3973 ei_lba = 0;
3974 lba = get_unaligned_be64(cmd + 2);
3975 num = get_unaligned_be32(cmd + 10);
3976 group = cmd[14] & 0x3f;
3977 check_prot = true;
3978 break;
3979 case WRITE_10:
3980 ei_lba = 0;
3981 lba = get_unaligned_be32(cmd + 2);
3982 group = cmd[6] & 0x3f;
3983 num = get_unaligned_be16(cmd + 7);
3984 check_prot = true;
3985 break;
3986 case WRITE_6:
3987 ei_lba = 0;
3988 lba = (u32)cmd[3] | (u32)cmd[2] << 8 |
3989 (u32)(cmd[1] & 0x1f) << 16;
3990 num = (0 == cmd[4]) ? 256 : cmd[4];
3991 check_prot = true;
3992 break;
3993 case WRITE_12:
3994 ei_lba = 0;
3995 lba = get_unaligned_be32(cmd + 2);
3996 num = get_unaligned_be32(cmd + 6);
3997 group = cmd[6] & 0x3f;
3998 check_prot = true;
3999 break;
4000 case 0x53: /* XDWRITEREAD(10) */
4001 ei_lba = 0;
4002 lba = get_unaligned_be32(cmd + 2);
4003 group = cmd[6] & 0x1f;
4004 num = get_unaligned_be16(cmd + 7);
4005 check_prot = false;
4006 break;
4007 default: /* assume WRITE(32) */
4008 group = cmd[6] & 0x3f;
4009 lba = get_unaligned_be64(cmd + 12);
4010 ei_lba = get_unaligned_be32(cmd + 20);
4011 num = get_unaligned_be32(cmd + 28);
4012 check_prot = false;
4013 break;
4014 }
4015 if (unlikely(have_dif_prot && check_prot)) {
4016 if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
4017 (cmd[1] & 0xe0)) {
4018 mk_sense_invalid_opcode(scp);
4019 return check_condition_result;
4020 }
4021 if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
4022 sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
4023 (cmd[1] & 0xe0) == 0)
4024 sdev_printk(KERN_ERR, scp->device, "Unprotected WR "
4025 "to DIF device\n");
4026 }
4027
4028 sdeb_write_lock(sip);
4029 ret = check_device_access_params(scp, lba, num, true);
4030 if (ret) {
4031 sdeb_write_unlock(sip);
4032 return ret;
4033 }
4034
4035 /* DIX + T10 DIF */
4036 if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
4037 switch (prot_verify_write(scp, lba, num, ei_lba)) {
4038 case 1: /* Guard tag error */
4039 if (scp->prot_flags & SCSI_PROT_GUARD_CHECK) {
4040 sdeb_write_unlock(sip);
4041 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
4042 return illegal_condition_result;
4043 } else if (scp->cmnd[1] >> 5 != 3) { /* WRPROTECT != 3 */
4044 sdeb_write_unlock(sip);
4045 mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
4046 return check_condition_result;
4047 }
4048 break;
4049 case 3: /* Reference tag error */
4050 if (scp->prot_flags & SCSI_PROT_REF_CHECK) {
4051 sdeb_write_unlock(sip);
4052 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 3);
4053 return illegal_condition_result;
4054 } else if (scp->cmnd[1] >> 5 != 3) { /* WRPROTECT != 3 */
4055 sdeb_write_unlock(sip);
4056 mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 3);
4057 return check_condition_result;
4058 }
4059 break;
4060 }
4061 }
4062
4063 ret = do_device_access(sip, scp, 0, lba, num, true, group);
4064 if (unlikely(scsi_debug_lbp()))
4065 map_region(sip, lba, num);
4066 /* If ZBC zone then bump its write pointer */
4067 if (sdebug_dev_is_zoned(devip))
4068 zbc_inc_wp(devip, lba, num);
4069 sdeb_write_unlock(sip);
4070 if (unlikely(-1 == ret))
4071 return DID_ERROR << 16;
4072 else if (unlikely(sdebug_verbose &&
4073 (ret < (num * sdebug_sector_size))))
4074 sdev_printk(KERN_INFO, scp->device,
4075 "%s: write: cdb indicated=%u, IO sent=%d bytes\n",
4076 my_name, num * sdebug_sector_size, ret);
4077
4078 if (unlikely((sdebug_opts & SDEBUG_OPT_RECOV_DIF_DIX) &&
4079 atomic_read(&sdeb_inject_pending))) {
4080 if (sdebug_opts & SDEBUG_OPT_RECOVERED_ERR) {
4081 mk_sense_buffer(scp, RECOVERED_ERROR, THRESHOLD_EXCEEDED, 0);
4082 atomic_set(&sdeb_inject_pending, 0);
4083 return check_condition_result;
4084 } else if (sdebug_opts & SDEBUG_OPT_DIF_ERR) {
4085 /* Logical block guard check failed */
4086 mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
4087 atomic_set(&sdeb_inject_pending, 0);
4088 return illegal_condition_result;
4089 } else if (sdebug_opts & SDEBUG_OPT_DIX_ERR) {
4090 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
4091 atomic_set(&sdeb_inject_pending, 0);
4092 return illegal_condition_result;
4093 }
4094 }
4095 return 0;
4096}
4097
4098/*
4099 * T10 has only specified WRITE SCATTERED(16) and WRITE SCATTERED(32).
4100 * No READ GATHERED yet (requires bidi or long cdb holding gather list).
4101 */
4102static int resp_write_scat(struct scsi_cmnd *scp,
4103 struct sdebug_dev_info *devip)
4104{
4105 u8 *cmd = scp->cmnd;
4106 u8 *lrdp = NULL;
4107 u8 *up;
4108 struct sdeb_store_info *sip = devip2sip(devip, true);
4109 u8 wrprotect;
4110 u16 lbdof, num_lrd, k;
4111 u32 num, num_by, bt_len, lbdof_blen, sg_off, cum_lb;
4112 u32 lb_size = sdebug_sector_size;
4113 u32 ei_lba;
4114 u64 lba;
4115 u8 group;
4116 int ret, res;
4117 bool is_16;
4118 static const u32 lrd_size = 32; /* + parameter list header size */
4119
4120 if (cmd[0] == VARIABLE_LENGTH_CMD) {
4121 is_16 = false;
4122 group = cmd[6] & 0x3f;
4123 wrprotect = (cmd[10] >> 5) & 0x7;
4124 lbdof = get_unaligned_be16(cmd + 12);
4125 num_lrd = get_unaligned_be16(cmd + 16);
4126 bt_len = get_unaligned_be32(cmd + 28);
4127 } else { /* that leaves WRITE SCATTERED(16) */
4128 is_16 = true;
4129 wrprotect = (cmd[2] >> 5) & 0x7;
4130 lbdof = get_unaligned_be16(cmd + 4);
4131 num_lrd = get_unaligned_be16(cmd + 8);
4132 bt_len = get_unaligned_be32(cmd + 10);
4133 group = cmd[14] & 0x3f;
4134 if (unlikely(have_dif_prot)) {
4135 if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
4136 wrprotect) {
4137 mk_sense_invalid_opcode(scp);
4138 return illegal_condition_result;
4139 }
4140 if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
4141 sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
4142 wrprotect == 0)
4143 sdev_printk(KERN_ERR, scp->device,
4144 "Unprotected WR to DIF device\n");
4145 }
4146 }
4147 if ((num_lrd == 0) || (bt_len == 0))
4148 return 0; /* T10 says these do-nothings are not errors */
4149 if (lbdof == 0) {
4150 if (sdebug_verbose)
4151 sdev_printk(KERN_INFO, scp->device,
4152 "%s: %s: LB Data Offset field bad\n",
4153 my_name, __func__);
4154 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4155 return illegal_condition_result;
4156 }
4157 lbdof_blen = lbdof * lb_size;
4158 if ((lrd_size + (num_lrd * lrd_size)) > lbdof_blen) {
4159 if (sdebug_verbose)
4160 sdev_printk(KERN_INFO, scp->device,
4161 "%s: %s: LBA range descriptors don't fit\n",
4162 my_name, __func__);
4163 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
4164 return illegal_condition_result;
4165 }
4166 lrdp = kzalloc(lbdof_blen, GFP_ATOMIC | __GFP_NOWARN);
4167 if (lrdp == NULL)
4168 return SCSI_MLQUEUE_HOST_BUSY;
4169 if (sdebug_verbose)
4170 sdev_printk(KERN_INFO, scp->device,
4171 "%s: %s: Fetch header+scatter_list, lbdof_blen=%u\n",
4172 my_name, __func__, lbdof_blen);
4173 res = fetch_to_dev_buffer(scp, lrdp, lbdof_blen);
4174 if (res == -1) {
4175 ret = DID_ERROR << 16;
4176 goto err_out;
4177 }
4178
4179 sdeb_write_lock(sip);
4180 sg_off = lbdof_blen;
4181 /* Spec says Buffer xfer Length field in number of LBs in dout */
4182 cum_lb = 0;
4183 for (k = 0, up = lrdp + lrd_size; k < num_lrd; ++k, up += lrd_size) {
4184 lba = get_unaligned_be64(up + 0);
4185 num = get_unaligned_be32(up + 8);
4186 if (sdebug_verbose)
4187 sdev_printk(KERN_INFO, scp->device,
4188 "%s: %s: k=%d LBA=0x%llx num=%u sg_off=%u\n",
4189 my_name, __func__, k, lba, num, sg_off);
4190 if (num == 0)
4191 continue;
4192 ret = check_device_access_params(scp, lba, num, true);
4193 if (ret)
4194 goto err_out_unlock;
4195 num_by = num * lb_size;
4196 ei_lba = is_16 ? 0 : get_unaligned_be32(up + 12);
4197
4198 if ((cum_lb + num) > bt_len) {
4199 if (sdebug_verbose)
4200 sdev_printk(KERN_INFO, scp->device,
4201 "%s: %s: sum of blocks > data provided\n",
4202 my_name, __func__);
4203 mk_sense_buffer(scp, ILLEGAL_REQUEST, WRITE_ERROR_ASC,
4204 0);
4205 ret = illegal_condition_result;
4206 goto err_out_unlock;
4207 }
4208
4209 /* DIX + T10 DIF */
4210 if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
4211 int prot_ret = prot_verify_write(scp, lba, num,
4212 ei_lba);
4213
4214 if (prot_ret) {
4215 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10,
4216 prot_ret);
4217 ret = illegal_condition_result;
4218 goto err_out_unlock;
4219 }
4220 }
4221
4222 ret = do_device_access(sip, scp, sg_off, lba, num, true, group);
4223 /* If ZBC zone then bump its write pointer */
4224 if (sdebug_dev_is_zoned(devip))
4225 zbc_inc_wp(devip, lba, num);
4226 if (unlikely(scsi_debug_lbp()))
4227 map_region(sip, lba, num);
4228 if (unlikely(-1 == ret)) {
4229 ret = DID_ERROR << 16;
4230 goto err_out_unlock;
4231 } else if (unlikely(sdebug_verbose && (ret < num_by)))
4232 sdev_printk(KERN_INFO, scp->device,
4233 "%s: write: cdb indicated=%u, IO sent=%d bytes\n",
4234 my_name, num_by, ret);
4235
4236 if (unlikely((sdebug_opts & SDEBUG_OPT_RECOV_DIF_DIX) &&
4237 atomic_read(&sdeb_inject_pending))) {
4238 if (sdebug_opts & SDEBUG_OPT_RECOVERED_ERR) {
4239 mk_sense_buffer(scp, RECOVERED_ERROR, THRESHOLD_EXCEEDED, 0);
4240 atomic_set(&sdeb_inject_pending, 0);
4241 ret = check_condition_result;
4242 goto err_out_unlock;
4243 } else if (sdebug_opts & SDEBUG_OPT_DIF_ERR) {
4244 /* Logical block guard check failed */
4245 mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
4246 atomic_set(&sdeb_inject_pending, 0);
4247 ret = illegal_condition_result;
4248 goto err_out_unlock;
4249 } else if (sdebug_opts & SDEBUG_OPT_DIX_ERR) {
4250 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
4251 atomic_set(&sdeb_inject_pending, 0);
4252 ret = illegal_condition_result;
4253 goto err_out_unlock;
4254 }
4255 }
4256 sg_off += num_by;
4257 cum_lb += num;
4258 }
4259 ret = 0;
4260err_out_unlock:
4261 sdeb_write_unlock(sip);
4262err_out:
4263 kfree(lrdp);
4264 return ret;
4265}
4266
4267static int resp_write_same(struct scsi_cmnd *scp, u64 lba, u32 num,
4268 u32 ei_lba, bool unmap, bool ndob)
4269{
4270 struct scsi_device *sdp = scp->device;
4271 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
4272 unsigned long long i;
4273 u64 block, lbaa;
4274 u32 lb_size = sdebug_sector_size;
4275 int ret;
4276 struct sdeb_store_info *sip = devip2sip((struct sdebug_dev_info *)
4277 scp->device->hostdata, true);
4278 u8 *fs1p;
4279 u8 *fsp;
4280
4281 sdeb_write_lock(sip);
4282
4283 ret = check_device_access_params(scp, lba, num, true);
4284 if (ret) {
4285 sdeb_write_unlock(sip);
4286 return ret;
4287 }
4288
4289 if (unmap && scsi_debug_lbp()) {
4290 unmap_region(sip, lba, num);
4291 goto out;
4292 }
4293 lbaa = lba;
4294 block = do_div(lbaa, sdebug_store_sectors);
4295 /* if ndob then zero 1 logical block, else fetch 1 logical block */
4296 fsp = sip->storep;
4297 fs1p = fsp + (block * lb_size);
4298 if (ndob) {
4299 memset(fs1p, 0, lb_size);
4300 ret = 0;
4301 } else
4302 ret = fetch_to_dev_buffer(scp, fs1p, lb_size);
4303
4304 if (-1 == ret) {
4305 sdeb_write_unlock(sip);
4306 return DID_ERROR << 16;
4307 } else if (sdebug_verbose && !ndob && (ret < lb_size))
4308 sdev_printk(KERN_INFO, scp->device,
4309 "%s: %s: lb size=%u, IO sent=%d bytes\n",
4310 my_name, "write same", lb_size, ret);
4311
4312 /* Copy first sector to remaining blocks */
4313 for (i = 1 ; i < num ; i++) {
4314 lbaa = lba + i;
4315 block = do_div(lbaa, sdebug_store_sectors);
4316 memmove(fsp + (block * lb_size), fs1p, lb_size);
4317 }
4318 if (scsi_debug_lbp())
4319 map_region(sip, lba, num);
4320 /* If ZBC zone then bump its write pointer */
4321 if (sdebug_dev_is_zoned(devip))
4322 zbc_inc_wp(devip, lba, num);
4323out:
4324 sdeb_write_unlock(sip);
4325
4326 return 0;
4327}
4328
4329static int resp_write_same_10(struct scsi_cmnd *scp,
4330 struct sdebug_dev_info *devip)
4331{
4332 u8 *cmd = scp->cmnd;
4333 u32 lba;
4334 u16 num;
4335 u32 ei_lba = 0;
4336 bool unmap = false;
4337
4338 if (cmd[1] & 0x8) {
4339 if (sdebug_lbpws10 == 0) {
4340 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 3);
4341 return check_condition_result;
4342 } else
4343 unmap = true;
4344 }
4345 lba = get_unaligned_be32(cmd + 2);
4346 num = get_unaligned_be16(cmd + 7);
4347 if (num > sdebug_write_same_length) {
4348 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 7, -1);
4349 return check_condition_result;
4350 }
4351 return resp_write_same(scp, lba, num, ei_lba, unmap, false);
4352}
4353
4354static int resp_write_same_16(struct scsi_cmnd *scp,
4355 struct sdebug_dev_info *devip)
4356{
4357 u8 *cmd = scp->cmnd;
4358 u64 lba;
4359 u32 num;
4360 u32 ei_lba = 0;
4361 bool unmap = false;
4362 bool ndob = false;
4363
4364 if (cmd[1] & 0x8) { /* UNMAP */
4365 if (sdebug_lbpws == 0) {
4366 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 3);
4367 return check_condition_result;
4368 } else
4369 unmap = true;
4370 }
4371 if (cmd[1] & 0x1) /* NDOB (no data-out buffer, assumes zeroes) */
4372 ndob = true;
4373 lba = get_unaligned_be64(cmd + 2);
4374 num = get_unaligned_be32(cmd + 10);
4375 if (num > sdebug_write_same_length) {
4376 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 10, -1);
4377 return check_condition_result;
4378 }
4379 return resp_write_same(scp, lba, num, ei_lba, unmap, ndob);
4380}
4381
4382/* Note the mode field is in the same position as the (lower) service action
4383 * field. For the Report supported operation codes command, SPC-4 suggests
4384 * each mode of this command should be reported separately; for future. */
4385static int resp_write_buffer(struct scsi_cmnd *scp,
4386 struct sdebug_dev_info *devip)
4387{
4388 u8 *cmd = scp->cmnd;
4389 struct scsi_device *sdp = scp->device;
4390 struct sdebug_dev_info *dp;
4391 u8 mode;
4392
4393 mode = cmd[1] & 0x1f;
4394 switch (mode) {
4395 case 0x4: /* download microcode (MC) and activate (ACT) */
4396 /* set UAs on this device only */
4397 set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
4398 set_bit(SDEBUG_UA_MICROCODE_CHANGED, devip->uas_bm);
4399 break;
4400 case 0x5: /* download MC, save and ACT */
4401 set_bit(SDEBUG_UA_MICROCODE_CHANGED_WO_RESET, devip->uas_bm);
4402 break;
4403 case 0x6: /* download MC with offsets and ACT */
4404 /* set UAs on most devices (LUs) in this target */
4405 list_for_each_entry(dp,
4406 &devip->sdbg_host->dev_info_list,
4407 dev_list)
4408 if (dp->target == sdp->id) {
4409 set_bit(SDEBUG_UA_BUS_RESET, dp->uas_bm);
4410 if (devip != dp)
4411 set_bit(SDEBUG_UA_MICROCODE_CHANGED,
4412 dp->uas_bm);
4413 }
4414 break;
4415 case 0x7: /* download MC with offsets, save, and ACT */
4416 /* set UA on all devices (LUs) in this target */
4417 list_for_each_entry(dp,
4418 &devip->sdbg_host->dev_info_list,
4419 dev_list)
4420 if (dp->target == sdp->id)
4421 set_bit(SDEBUG_UA_MICROCODE_CHANGED_WO_RESET,
4422 dp->uas_bm);
4423 break;
4424 default:
4425 /* do nothing for this command for other mode values */
4426 break;
4427 }
4428 return 0;
4429}
4430
4431static int resp_comp_write(struct scsi_cmnd *scp,
4432 struct sdebug_dev_info *devip)
4433{
4434 u8 *cmd = scp->cmnd;
4435 u8 *arr;
4436 struct sdeb_store_info *sip = devip2sip(devip, true);
4437 u64 lba;
4438 u32 dnum;
4439 u32 lb_size = sdebug_sector_size;
4440 u8 num;
4441 int ret;
4442 int retval = 0;
4443
4444 lba = get_unaligned_be64(cmd + 2);
4445 num = cmd[13]; /* 1 to a maximum of 255 logical blocks */
4446 if (0 == num)
4447 return 0; /* degenerate case, not an error */
4448 if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
4449 (cmd[1] & 0xe0)) {
4450 mk_sense_invalid_opcode(scp);
4451 return check_condition_result;
4452 }
4453 if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
4454 sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
4455 (cmd[1] & 0xe0) == 0)
4456 sdev_printk(KERN_ERR, scp->device, "Unprotected WR "
4457 "to DIF device\n");
4458 ret = check_device_access_params(scp, lba, num, false);
4459 if (ret)
4460 return ret;
4461 dnum = 2 * num;
4462 arr = kcalloc(lb_size, dnum, GFP_ATOMIC);
4463 if (NULL == arr) {
4464 mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
4465 INSUFF_RES_ASCQ);
4466 return check_condition_result;
4467 }
4468
4469 sdeb_write_lock(sip);
4470
4471 ret = do_dout_fetch(scp, dnum, arr);
4472 if (ret == -1) {
4473 retval = DID_ERROR << 16;
4474 goto cleanup;
4475 } else if (sdebug_verbose && (ret < (dnum * lb_size)))
4476 sdev_printk(KERN_INFO, scp->device, "%s: compare_write: cdb "
4477 "indicated=%u, IO sent=%d bytes\n", my_name,
4478 dnum * lb_size, ret);
4479 if (!comp_write_worker(sip, lba, num, arr, false)) {
4480 mk_sense_buffer(scp, MISCOMPARE, MISCOMPARE_VERIFY_ASC, 0);
4481 retval = check_condition_result;
4482 goto cleanup;
4483 }
4484 if (scsi_debug_lbp())
4485 map_region(sip, lba, num);
4486cleanup:
4487 sdeb_write_unlock(sip);
4488 kfree(arr);
4489 return retval;
4490}
4491
4492struct unmap_block_desc {
4493 __be64 lba;
4494 __be32 blocks;
4495 __be32 __reserved;
4496};
4497
4498static int resp_unmap(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
4499{
4500 unsigned char *buf;
4501 struct unmap_block_desc *desc;
4502 struct sdeb_store_info *sip = devip2sip(devip, true);
4503 unsigned int i, payload_len, descriptors;
4504 int ret;
4505
4506 if (!scsi_debug_lbp())
4507 return 0; /* fib and say its done */
4508 payload_len = get_unaligned_be16(scp->cmnd + 7);
4509 BUG_ON(scsi_bufflen(scp) != payload_len);
4510
4511 descriptors = (payload_len - 8) / 16;
4512 if (descriptors > sdebug_unmap_max_desc) {
4513 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 7, -1);
4514 return check_condition_result;
4515 }
4516
4517 buf = kzalloc(scsi_bufflen(scp), GFP_ATOMIC);
4518 if (!buf) {
4519 mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
4520 INSUFF_RES_ASCQ);
4521 return check_condition_result;
4522 }
4523
4524 scsi_sg_copy_to_buffer(scp, buf, scsi_bufflen(scp));
4525
4526 BUG_ON(get_unaligned_be16(&buf[0]) != payload_len - 2);
4527 BUG_ON(get_unaligned_be16(&buf[2]) != descriptors * 16);
4528
4529 desc = (void *)&buf[8];
4530
4531 sdeb_write_lock(sip);
4532
4533 for (i = 0 ; i < descriptors ; i++) {
4534 unsigned long long lba = get_unaligned_be64(&desc[i].lba);
4535 unsigned int num = get_unaligned_be32(&desc[i].blocks);
4536
4537 ret = check_device_access_params(scp, lba, num, true);
4538 if (ret)
4539 goto out;
4540
4541 unmap_region(sip, lba, num);
4542 }
4543
4544 ret = 0;
4545
4546out:
4547 sdeb_write_unlock(sip);
4548 kfree(buf);
4549
4550 return ret;
4551}
4552
4553#define SDEBUG_GET_LBA_STATUS_LEN 32
4554
4555static int resp_get_lba_status(struct scsi_cmnd *scp,
4556 struct sdebug_dev_info *devip)
4557{
4558 u8 *cmd = scp->cmnd;
4559 u64 lba;
4560 u32 alloc_len, mapped, num;
4561 int ret;
4562 u8 arr[SDEBUG_GET_LBA_STATUS_LEN];
4563
4564 lba = get_unaligned_be64(cmd + 2);
4565 alloc_len = get_unaligned_be32(cmd + 10);
4566
4567 if (alloc_len < 24)
4568 return 0;
4569
4570 ret = check_device_access_params(scp, lba, 1, false);
4571 if (ret)
4572 return ret;
4573
4574 if (scsi_debug_lbp()) {
4575 struct sdeb_store_info *sip = devip2sip(devip, true);
4576
4577 mapped = map_state(sip, lba, &num);
4578 } else {
4579 mapped = 1;
4580 /* following just in case virtual_gb changed */
4581 sdebug_capacity = get_sdebug_capacity();
4582 if (sdebug_capacity - lba <= 0xffffffff)
4583 num = sdebug_capacity - lba;
4584 else
4585 num = 0xffffffff;
4586 }
4587
4588 memset(arr, 0, SDEBUG_GET_LBA_STATUS_LEN);
4589 put_unaligned_be32(20, arr); /* Parameter Data Length */
4590 put_unaligned_be64(lba, arr + 8); /* LBA */
4591 put_unaligned_be32(num, arr + 16); /* Number of blocks */
4592 arr[20] = !mapped; /* prov_stat=0: mapped; 1: dealloc */
4593
4594 return fill_from_dev_buffer(scp, arr, SDEBUG_GET_LBA_STATUS_LEN);
4595}
4596
4597static int resp_get_stream_status(struct scsi_cmnd *scp,
4598 struct sdebug_dev_info *devip)
4599{
4600 u16 starting_stream_id, stream_id;
4601 const u8 *cmd = scp->cmnd;
4602 u32 alloc_len, offset;
4603 u8 arr[256] = {};
4604 struct scsi_stream_status_header *h = (void *)arr;
4605
4606 starting_stream_id = get_unaligned_be16(cmd + 4);
4607 alloc_len = get_unaligned_be32(cmd + 10);
4608
4609 if (alloc_len < 8) {
4610 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 10, -1);
4611 return check_condition_result;
4612 }
4613
4614 if (starting_stream_id >= MAXIMUM_NUMBER_OF_STREAMS) {
4615 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, -1);
4616 return check_condition_result;
4617 }
4618
4619 /*
4620 * The GET STREAM STATUS command only reports status information
4621 * about open streams. Treat the non-permanent stream as open.
4622 */
4623 put_unaligned_be16(MAXIMUM_NUMBER_OF_STREAMS,
4624 &h->number_of_open_streams);
4625
4626 for (offset = 8, stream_id = starting_stream_id;
4627 offset + 8 <= min_t(u32, alloc_len, sizeof(arr)) &&
4628 stream_id < MAXIMUM_NUMBER_OF_STREAMS;
4629 offset += 8, stream_id++) {
4630 struct scsi_stream_status *stream_status = (void *)arr + offset;
4631
4632 stream_status->perm = stream_id < PERMANENT_STREAM_COUNT;
4633 put_unaligned_be16(stream_id,
4634 &stream_status->stream_identifier);
4635 stream_status->rel_lifetime = stream_id + 1;
4636 }
4637 put_unaligned_be32(offset - 8, &h->len); /* PARAMETER DATA LENGTH */
4638
4639 return fill_from_dev_buffer(scp, arr, min(offset, alloc_len));
4640}
4641
4642static int resp_sync_cache(struct scsi_cmnd *scp,
4643 struct sdebug_dev_info *devip)
4644{
4645 int res = 0;
4646 u64 lba;
4647 u32 num_blocks;
4648 u8 *cmd = scp->cmnd;
4649
4650 if (cmd[0] == SYNCHRONIZE_CACHE) { /* 10 byte cdb */
4651 lba = get_unaligned_be32(cmd + 2);
4652 num_blocks = get_unaligned_be16(cmd + 7);
4653 } else { /* SYNCHRONIZE_CACHE(16) */
4654 lba = get_unaligned_be64(cmd + 2);
4655 num_blocks = get_unaligned_be32(cmd + 10);
4656 }
4657 if (lba + num_blocks > sdebug_capacity) {
4658 mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4659 return check_condition_result;
4660 }
4661 if (!write_since_sync || (cmd[1] & 0x2))
4662 res = SDEG_RES_IMMED_MASK;
4663 else /* delay if write_since_sync and IMMED clear */
4664 write_since_sync = false;
4665 return res;
4666}
4667
4668/*
4669 * Assuming the LBA+num_blocks is not out-of-range, this function will return
4670 * CONDITION MET if the specified blocks will/have fitted in the cache, and
4671 * a GOOD status otherwise. Model a disk with a big cache and yield
4672 * CONDITION MET. Actually tries to bring range in main memory into the
4673 * cache associated with the CPU(s).
4674 */
4675static int resp_pre_fetch(struct scsi_cmnd *scp,
4676 struct sdebug_dev_info *devip)
4677{
4678 int res = 0;
4679 u64 lba;
4680 u64 block, rest = 0;
4681 u32 nblks;
4682 u8 *cmd = scp->cmnd;
4683 struct sdeb_store_info *sip = devip2sip(devip, true);
4684 u8 *fsp = sip->storep;
4685
4686 if (cmd[0] == PRE_FETCH) { /* 10 byte cdb */
4687 lba = get_unaligned_be32(cmd + 2);
4688 nblks = get_unaligned_be16(cmd + 7);
4689 } else { /* PRE-FETCH(16) */
4690 lba = get_unaligned_be64(cmd + 2);
4691 nblks = get_unaligned_be32(cmd + 10);
4692 }
4693 if (lba + nblks > sdebug_capacity) {
4694 mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4695 return check_condition_result;
4696 }
4697 if (!fsp)
4698 goto fini;
4699 /* PRE-FETCH spec says nothing about LBP or PI so skip them */
4700 block = do_div(lba, sdebug_store_sectors);
4701 if (block + nblks > sdebug_store_sectors)
4702 rest = block + nblks - sdebug_store_sectors;
4703
4704 /* Try to bring the PRE-FETCH range into CPU's cache */
4705 sdeb_read_lock(sip);
4706 prefetch_range(fsp + (sdebug_sector_size * block),
4707 (nblks - rest) * sdebug_sector_size);
4708 if (rest)
4709 prefetch_range(fsp, rest * sdebug_sector_size);
4710 sdeb_read_unlock(sip);
4711fini:
4712 if (cmd[1] & 0x2)
4713 res = SDEG_RES_IMMED_MASK;
4714 return res | condition_met_result;
4715}
4716
4717#define RL_BUCKET_ELEMS 8
4718
4719/* Even though each pseudo target has a REPORT LUNS "well known logical unit"
4720 * (W-LUN), the normal Linux scanning logic does not associate it with a
4721 * device (e.g. /dev/sg7). The following magic will make that association:
4722 * "cd /sys/class/scsi_host/host<n> ; echo '- - 49409' > scan"
4723 * where <n> is a host number. If there are multiple targets in a host then
4724 * the above will associate a W-LUN to each target. To only get a W-LUN
4725 * for target 2, then use "echo '- 2 49409' > scan" .
4726 */
4727static int resp_report_luns(struct scsi_cmnd *scp,
4728 struct sdebug_dev_info *devip)
4729{
4730 unsigned char *cmd = scp->cmnd;
4731 unsigned int alloc_len;
4732 unsigned char select_report;
4733 u64 lun;
4734 struct scsi_lun *lun_p;
4735 u8 arr[RL_BUCKET_ELEMS * sizeof(struct scsi_lun)];
4736 unsigned int lun_cnt; /* normal LUN count (max: 256) */
4737 unsigned int wlun_cnt; /* report luns W-LUN count */
4738 unsigned int tlun_cnt; /* total LUN count */
4739 unsigned int rlen; /* response length (in bytes) */
4740 int k, j, n, res;
4741 unsigned int off_rsp = 0;
4742 const int sz_lun = sizeof(struct scsi_lun);
4743
4744 clear_luns_changed_on_target(devip);
4745
4746 select_report = cmd[2];
4747 alloc_len = get_unaligned_be32(cmd + 6);
4748
4749 if (alloc_len < 4) {
4750 pr_err("alloc len too small %d\n", alloc_len);
4751 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
4752 return check_condition_result;
4753 }
4754
4755 switch (select_report) {
4756 case 0: /* all LUNs apart from W-LUNs */
4757 lun_cnt = sdebug_max_luns;
4758 wlun_cnt = 0;
4759 break;
4760 case 1: /* only W-LUNs */
4761 lun_cnt = 0;
4762 wlun_cnt = 1;
4763 break;
4764 case 2: /* all LUNs */
4765 lun_cnt = sdebug_max_luns;
4766 wlun_cnt = 1;
4767 break;
4768 case 0x10: /* only administrative LUs */
4769 case 0x11: /* see SPC-5 */
4770 case 0x12: /* only subsiduary LUs owned by referenced LU */
4771 default:
4772 pr_debug("select report invalid %d\n", select_report);
4773 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, -1);
4774 return check_condition_result;
4775 }
4776
4777 if (sdebug_no_lun_0 && (lun_cnt > 0))
4778 --lun_cnt;
4779
4780 tlun_cnt = lun_cnt + wlun_cnt;
4781 rlen = tlun_cnt * sz_lun; /* excluding 8 byte header */
4782 scsi_set_resid(scp, scsi_bufflen(scp));
4783 pr_debug("select_report %d luns = %d wluns = %d no_lun0 %d\n",
4784 select_report, lun_cnt, wlun_cnt, sdebug_no_lun_0);
4785
4786 /* loops rely on sizeof response header same as sizeof lun (both 8) */
4787 lun = sdebug_no_lun_0 ? 1 : 0;
4788 for (k = 0, j = 0, res = 0; true; ++k, j = 0) {
4789 memset(arr, 0, sizeof(arr));
4790 lun_p = (struct scsi_lun *)&arr[0];
4791 if (k == 0) {
4792 put_unaligned_be32(rlen, &arr[0]);
4793 ++lun_p;
4794 j = 1;
4795 }
4796 for ( ; j < RL_BUCKET_ELEMS; ++j, ++lun_p) {
4797 if ((k * RL_BUCKET_ELEMS) + j > lun_cnt)
4798 break;
4799 int_to_scsilun(lun++, lun_p);
4800 if (lun > 1 && sdebug_lun_am == SAM_LUN_AM_FLAT)
4801 lun_p->scsi_lun[0] |= 0x40;
4802 }
4803 if (j < RL_BUCKET_ELEMS)
4804 break;
4805 n = j * sz_lun;
4806 res = p_fill_from_dev_buffer(scp, arr, n, off_rsp);
4807 if (res)
4808 return res;
4809 off_rsp += n;
4810 }
4811 if (wlun_cnt) {
4812 int_to_scsilun(SCSI_W_LUN_REPORT_LUNS, lun_p);
4813 ++j;
4814 }
4815 if (j > 0)
4816 res = p_fill_from_dev_buffer(scp, arr, j * sz_lun, off_rsp);
4817 return res;
4818}
4819
4820static int resp_verify(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
4821{
4822 bool is_bytchk3 = false;
4823 u8 bytchk;
4824 int ret, j;
4825 u32 vnum, a_num, off;
4826 const u32 lb_size = sdebug_sector_size;
4827 u64 lba;
4828 u8 *arr;
4829 u8 *cmd = scp->cmnd;
4830 struct sdeb_store_info *sip = devip2sip(devip, true);
4831
4832 bytchk = (cmd[1] >> 1) & 0x3;
4833 if (bytchk == 0) {
4834 return 0; /* always claim internal verify okay */
4835 } else if (bytchk == 2) {
4836 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 2);
4837 return check_condition_result;
4838 } else if (bytchk == 3) {
4839 is_bytchk3 = true; /* 1 block sent, compared repeatedly */
4840 }
4841 switch (cmd[0]) {
4842 case VERIFY_16:
4843 lba = get_unaligned_be64(cmd + 2);
4844 vnum = get_unaligned_be32(cmd + 10);
4845 break;
4846 case VERIFY: /* is VERIFY(10) */
4847 lba = get_unaligned_be32(cmd + 2);
4848 vnum = get_unaligned_be16(cmd + 7);
4849 break;
4850 default:
4851 mk_sense_invalid_opcode(scp);
4852 return check_condition_result;
4853 }
4854 if (vnum == 0)
4855 return 0; /* not an error */
4856 a_num = is_bytchk3 ? 1 : vnum;
4857 /* Treat following check like one for read (i.e. no write) access */
4858 ret = check_device_access_params(scp, lba, a_num, false);
4859 if (ret)
4860 return ret;
4861
4862 arr = kcalloc(lb_size, vnum, GFP_ATOMIC | __GFP_NOWARN);
4863 if (!arr) {
4864 mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
4865 INSUFF_RES_ASCQ);
4866 return check_condition_result;
4867 }
4868 /* Not changing store, so only need read access */
4869 sdeb_read_lock(sip);
4870
4871 ret = do_dout_fetch(scp, a_num, arr);
4872 if (ret == -1) {
4873 ret = DID_ERROR << 16;
4874 goto cleanup;
4875 } else if (sdebug_verbose && (ret < (a_num * lb_size))) {
4876 sdev_printk(KERN_INFO, scp->device,
4877 "%s: %s: cdb indicated=%u, IO sent=%d bytes\n",
4878 my_name, __func__, a_num * lb_size, ret);
4879 }
4880 if (is_bytchk3) {
4881 for (j = 1, off = lb_size; j < vnum; ++j, off += lb_size)
4882 memcpy(arr + off, arr, lb_size);
4883 }
4884 ret = 0;
4885 if (!comp_write_worker(sip, lba, vnum, arr, true)) {
4886 mk_sense_buffer(scp, MISCOMPARE, MISCOMPARE_VERIFY_ASC, 0);
4887 ret = check_condition_result;
4888 goto cleanup;
4889 }
4890cleanup:
4891 sdeb_read_unlock(sip);
4892 kfree(arr);
4893 return ret;
4894}
4895
4896#define RZONES_DESC_HD 64
4897
4898/* Report zones depending on start LBA and reporting options */
4899static int resp_report_zones(struct scsi_cmnd *scp,
4900 struct sdebug_dev_info *devip)
4901{
4902 unsigned int rep_max_zones, nrz = 0;
4903 int ret = 0;
4904 u32 alloc_len, rep_opts, rep_len;
4905 bool partial;
4906 u64 lba, zs_lba;
4907 u8 *arr = NULL, *desc;
4908 u8 *cmd = scp->cmnd;
4909 struct sdeb_zone_state *zsp = NULL;
4910 struct sdeb_store_info *sip = devip2sip(devip, false);
4911
4912 if (!sdebug_dev_is_zoned(devip)) {
4913 mk_sense_invalid_opcode(scp);
4914 return check_condition_result;
4915 }
4916 zs_lba = get_unaligned_be64(cmd + 2);
4917 alloc_len = get_unaligned_be32(cmd + 10);
4918 if (alloc_len == 0)
4919 return 0; /* not an error */
4920 rep_opts = cmd[14] & 0x3f;
4921 partial = cmd[14] & 0x80;
4922
4923 if (zs_lba >= sdebug_capacity) {
4924 mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
4925 return check_condition_result;
4926 }
4927
4928 rep_max_zones = (alloc_len - 64) >> ilog2(RZONES_DESC_HD);
4929
4930 arr = kzalloc(alloc_len, GFP_ATOMIC | __GFP_NOWARN);
4931 if (!arr) {
4932 mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
4933 INSUFF_RES_ASCQ);
4934 return check_condition_result;
4935 }
4936
4937 sdeb_read_lock(sip);
4938
4939 desc = arr + 64;
4940 for (lba = zs_lba; lba < sdebug_capacity;
4941 lba = zsp->z_start + zsp->z_size) {
4942 if (WARN_ONCE(zbc_zone(devip, lba) == zsp, "lba = %llu\n", lba))
4943 break;
4944 zsp = zbc_zone(devip, lba);
4945 switch (rep_opts) {
4946 case 0x00:
4947 /* All zones */
4948 break;
4949 case 0x01:
4950 /* Empty zones */
4951 if (zsp->z_cond != ZC1_EMPTY)
4952 continue;
4953 break;
4954 case 0x02:
4955 /* Implicit open zones */
4956 if (zsp->z_cond != ZC2_IMPLICIT_OPEN)
4957 continue;
4958 break;
4959 case 0x03:
4960 /* Explicit open zones */
4961 if (zsp->z_cond != ZC3_EXPLICIT_OPEN)
4962 continue;
4963 break;
4964 case 0x04:
4965 /* Closed zones */
4966 if (zsp->z_cond != ZC4_CLOSED)
4967 continue;
4968 break;
4969 case 0x05:
4970 /* Full zones */
4971 if (zsp->z_cond != ZC5_FULL)
4972 continue;
4973 break;
4974 case 0x06:
4975 case 0x07:
4976 case 0x10:
4977 /*
4978 * Read-only, offline, reset WP recommended are
4979 * not emulated: no zones to report;
4980 */
4981 continue;
4982 case 0x11:
4983 /* non-seq-resource set */
4984 if (!zsp->z_non_seq_resource)
4985 continue;
4986 break;
4987 case 0x3e:
4988 /* All zones except gap zones. */
4989 if (zbc_zone_is_gap(zsp))
4990 continue;
4991 break;
4992 case 0x3f:
4993 /* Not write pointer (conventional) zones */
4994 if (zbc_zone_is_seq(zsp))
4995 continue;
4996 break;
4997 default:
4998 mk_sense_buffer(scp, ILLEGAL_REQUEST,
4999 INVALID_FIELD_IN_CDB, 0);
5000 ret = check_condition_result;
5001 goto fini;
5002 }
5003
5004 if (nrz < rep_max_zones) {
5005 /* Fill zone descriptor */
5006 desc[0] = zsp->z_type;
5007 desc[1] = zsp->z_cond << 4;
5008 if (zsp->z_non_seq_resource)
5009 desc[1] |= 1 << 1;
5010 put_unaligned_be64((u64)zsp->z_size, desc + 8);
5011 put_unaligned_be64((u64)zsp->z_start, desc + 16);
5012 put_unaligned_be64((u64)zsp->z_wp, desc + 24);
5013 desc += 64;
5014 }
5015
5016 if (partial && nrz >= rep_max_zones)
5017 break;
5018
5019 nrz++;
5020 }
5021
5022 /* Report header */
5023 /* Zone list length. */
5024 put_unaligned_be32(nrz * RZONES_DESC_HD, arr + 0);
5025 /* Maximum LBA */
5026 put_unaligned_be64(sdebug_capacity - 1, arr + 8);
5027 /* Zone starting LBA granularity. */
5028 if (devip->zcap < devip->zsize)
5029 put_unaligned_be64(devip->zsize, arr + 16);
5030
5031 rep_len = (unsigned long)desc - (unsigned long)arr;
5032 ret = fill_from_dev_buffer(scp, arr, min_t(u32, alloc_len, rep_len));
5033
5034fini:
5035 sdeb_read_unlock(sip);
5036 kfree(arr);
5037 return ret;
5038}
5039
5040/* Logic transplanted from tcmu-runner, file_zbc.c */
5041static void zbc_open_all(struct sdebug_dev_info *devip)
5042{
5043 struct sdeb_zone_state *zsp = &devip->zstate[0];
5044 unsigned int i;
5045
5046 for (i = 0; i < devip->nr_zones; i++, zsp++) {
5047 if (zsp->z_cond == ZC4_CLOSED)
5048 zbc_open_zone(devip, &devip->zstate[i], true);
5049 }
5050}
5051
5052static int resp_open_zone(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
5053{
5054 int res = 0;
5055 u64 z_id;
5056 enum sdebug_z_cond zc;
5057 u8 *cmd = scp->cmnd;
5058 struct sdeb_zone_state *zsp;
5059 bool all = cmd[14] & 0x01;
5060 struct sdeb_store_info *sip = devip2sip(devip, false);
5061
5062 if (!sdebug_dev_is_zoned(devip)) {
5063 mk_sense_invalid_opcode(scp);
5064 return check_condition_result;
5065 }
5066
5067 sdeb_write_lock(sip);
5068
5069 if (all) {
5070 /* Check if all closed zones can be open */
5071 if (devip->max_open &&
5072 devip->nr_exp_open + devip->nr_closed > devip->max_open) {
5073 mk_sense_buffer(scp, DATA_PROTECT, INSUFF_RES_ASC,
5074 INSUFF_ZONE_ASCQ);
5075 res = check_condition_result;
5076 goto fini;
5077 }
5078 /* Open all closed zones */
5079 zbc_open_all(devip);
5080 goto fini;
5081 }
5082
5083 /* Open the specified zone */
5084 z_id = get_unaligned_be64(cmd + 2);
5085 if (z_id >= sdebug_capacity) {
5086 mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
5087 res = check_condition_result;
5088 goto fini;
5089 }
5090
5091 zsp = zbc_zone(devip, z_id);
5092 if (z_id != zsp->z_start) {
5093 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
5094 res = check_condition_result;
5095 goto fini;
5096 }
5097 if (zbc_zone_is_conv(zsp)) {
5098 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
5099 res = check_condition_result;
5100 goto fini;
5101 }
5102
5103 zc = zsp->z_cond;
5104 if (zc == ZC3_EXPLICIT_OPEN || zc == ZC5_FULL)
5105 goto fini;
5106
5107 if (devip->max_open && devip->nr_exp_open >= devip->max_open) {
5108 mk_sense_buffer(scp, DATA_PROTECT, INSUFF_RES_ASC,
5109 INSUFF_ZONE_ASCQ);
5110 res = check_condition_result;
5111 goto fini;
5112 }
5113
5114 zbc_open_zone(devip, zsp, true);
5115fini:
5116 sdeb_write_unlock(sip);
5117 return res;
5118}
5119
5120static void zbc_close_all(struct sdebug_dev_info *devip)
5121{
5122 unsigned int i;
5123
5124 for (i = 0; i < devip->nr_zones; i++)
5125 zbc_close_zone(devip, &devip->zstate[i]);
5126}
5127
5128static int resp_close_zone(struct scsi_cmnd *scp,
5129 struct sdebug_dev_info *devip)
5130{
5131 int res = 0;
5132 u64 z_id;
5133 u8 *cmd = scp->cmnd;
5134 struct sdeb_zone_state *zsp;
5135 bool all = cmd[14] & 0x01;
5136 struct sdeb_store_info *sip = devip2sip(devip, false);
5137
5138 if (!sdebug_dev_is_zoned(devip)) {
5139 mk_sense_invalid_opcode(scp);
5140 return check_condition_result;
5141 }
5142
5143 sdeb_write_lock(sip);
5144
5145 if (all) {
5146 zbc_close_all(devip);
5147 goto fini;
5148 }
5149
5150 /* Close specified zone */
5151 z_id = get_unaligned_be64(cmd + 2);
5152 if (z_id >= sdebug_capacity) {
5153 mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
5154 res = check_condition_result;
5155 goto fini;
5156 }
5157
5158 zsp = zbc_zone(devip, z_id);
5159 if (z_id != zsp->z_start) {
5160 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
5161 res = check_condition_result;
5162 goto fini;
5163 }
5164 if (zbc_zone_is_conv(zsp)) {
5165 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
5166 res = check_condition_result;
5167 goto fini;
5168 }
5169
5170 zbc_close_zone(devip, zsp);
5171fini:
5172 sdeb_write_unlock(sip);
5173 return res;
5174}
5175
5176static void zbc_finish_zone(struct sdebug_dev_info *devip,
5177 struct sdeb_zone_state *zsp, bool empty)
5178{
5179 enum sdebug_z_cond zc = zsp->z_cond;
5180
5181 if (zc == ZC4_CLOSED || zc == ZC2_IMPLICIT_OPEN ||
5182 zc == ZC3_EXPLICIT_OPEN || (empty && zc == ZC1_EMPTY)) {
5183 if (zc == ZC2_IMPLICIT_OPEN || zc == ZC3_EXPLICIT_OPEN)
5184 zbc_close_zone(devip, zsp);
5185 if (zsp->z_cond == ZC4_CLOSED)
5186 devip->nr_closed--;
5187 zsp->z_wp = zsp->z_start + zsp->z_size;
5188 zsp->z_cond = ZC5_FULL;
5189 }
5190}
5191
5192static void zbc_finish_all(struct sdebug_dev_info *devip)
5193{
5194 unsigned int i;
5195
5196 for (i = 0; i < devip->nr_zones; i++)
5197 zbc_finish_zone(devip, &devip->zstate[i], false);
5198}
5199
5200static int resp_finish_zone(struct scsi_cmnd *scp,
5201 struct sdebug_dev_info *devip)
5202{
5203 struct sdeb_zone_state *zsp;
5204 int res = 0;
5205 u64 z_id;
5206 u8 *cmd = scp->cmnd;
5207 bool all = cmd[14] & 0x01;
5208 struct sdeb_store_info *sip = devip2sip(devip, false);
5209
5210 if (!sdebug_dev_is_zoned(devip)) {
5211 mk_sense_invalid_opcode(scp);
5212 return check_condition_result;
5213 }
5214
5215 sdeb_write_lock(sip);
5216
5217 if (all) {
5218 zbc_finish_all(devip);
5219 goto fini;
5220 }
5221
5222 /* Finish the specified zone */
5223 z_id = get_unaligned_be64(cmd + 2);
5224 if (z_id >= sdebug_capacity) {
5225 mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
5226 res = check_condition_result;
5227 goto fini;
5228 }
5229
5230 zsp = zbc_zone(devip, z_id);
5231 if (z_id != zsp->z_start) {
5232 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
5233 res = check_condition_result;
5234 goto fini;
5235 }
5236 if (zbc_zone_is_conv(zsp)) {
5237 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
5238 res = check_condition_result;
5239 goto fini;
5240 }
5241
5242 zbc_finish_zone(devip, zsp, true);
5243fini:
5244 sdeb_write_unlock(sip);
5245 return res;
5246}
5247
5248static void zbc_rwp_zone(struct sdebug_dev_info *devip,
5249 struct sdeb_zone_state *zsp)
5250{
5251 enum sdebug_z_cond zc;
5252 struct sdeb_store_info *sip = devip2sip(devip, false);
5253
5254 if (!zbc_zone_is_seq(zsp))
5255 return;
5256
5257 zc = zsp->z_cond;
5258 if (zc == ZC2_IMPLICIT_OPEN || zc == ZC3_EXPLICIT_OPEN)
5259 zbc_close_zone(devip, zsp);
5260
5261 if (zsp->z_cond == ZC4_CLOSED)
5262 devip->nr_closed--;
5263
5264 if (zsp->z_wp > zsp->z_start)
5265 memset(sip->storep + zsp->z_start * sdebug_sector_size, 0,
5266 (zsp->z_wp - zsp->z_start) * sdebug_sector_size);
5267
5268 zsp->z_non_seq_resource = false;
5269 zsp->z_wp = zsp->z_start;
5270 zsp->z_cond = ZC1_EMPTY;
5271}
5272
5273static void zbc_rwp_all(struct sdebug_dev_info *devip)
5274{
5275 unsigned int i;
5276
5277 for (i = 0; i < devip->nr_zones; i++)
5278 zbc_rwp_zone(devip, &devip->zstate[i]);
5279}
5280
5281static int resp_rwp_zone(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
5282{
5283 struct sdeb_zone_state *zsp;
5284 int res = 0;
5285 u64 z_id;
5286 u8 *cmd = scp->cmnd;
5287 bool all = cmd[14] & 0x01;
5288 struct sdeb_store_info *sip = devip2sip(devip, false);
5289
5290 if (!sdebug_dev_is_zoned(devip)) {
5291 mk_sense_invalid_opcode(scp);
5292 return check_condition_result;
5293 }
5294
5295 sdeb_write_lock(sip);
5296
5297 if (all) {
5298 zbc_rwp_all(devip);
5299 goto fini;
5300 }
5301
5302 z_id = get_unaligned_be64(cmd + 2);
5303 if (z_id >= sdebug_capacity) {
5304 mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
5305 res = check_condition_result;
5306 goto fini;
5307 }
5308
5309 zsp = zbc_zone(devip, z_id);
5310 if (z_id != zsp->z_start) {
5311 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
5312 res = check_condition_result;
5313 goto fini;
5314 }
5315 if (zbc_zone_is_conv(zsp)) {
5316 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
5317 res = check_condition_result;
5318 goto fini;
5319 }
5320
5321 zbc_rwp_zone(devip, zsp);
5322fini:
5323 sdeb_write_unlock(sip);
5324 return res;
5325}
5326
5327static u32 get_tag(struct scsi_cmnd *cmnd)
5328{
5329 return blk_mq_unique_tag(scsi_cmd_to_rq(cmnd));
5330}
5331
5332/* Queued (deferred) command completions converge here. */
5333static void sdebug_q_cmd_complete(struct sdebug_defer *sd_dp)
5334{
5335 struct sdebug_queued_cmd *sqcp = container_of(sd_dp, struct sdebug_queued_cmd, sd_dp);
5336 unsigned long flags;
5337 struct scsi_cmnd *scp = sqcp->scmd;
5338 struct sdebug_scsi_cmd *sdsc;
5339 bool aborted;
5340
5341 if (sdebug_statistics) {
5342 atomic_inc(&sdebug_completions);
5343 if (raw_smp_processor_id() != sd_dp->issuing_cpu)
5344 atomic_inc(&sdebug_miss_cpus);
5345 }
5346
5347 if (!scp) {
5348 pr_err("scmd=NULL\n");
5349 goto out;
5350 }
5351
5352 sdsc = scsi_cmd_priv(scp);
5353 spin_lock_irqsave(&sdsc->lock, flags);
5354 aborted = sd_dp->aborted;
5355 if (unlikely(aborted))
5356 sd_dp->aborted = false;
5357 ASSIGN_QUEUED_CMD(scp, NULL);
5358
5359 spin_unlock_irqrestore(&sdsc->lock, flags);
5360
5361 if (aborted) {
5362 pr_info("bypassing scsi_done() due to aborted cmd, kicking-off EH\n");
5363 blk_abort_request(scsi_cmd_to_rq(scp));
5364 goto out;
5365 }
5366
5367 scsi_done(scp); /* callback to mid level */
5368out:
5369 sdebug_free_queued_cmd(sqcp);
5370}
5371
5372/* When high resolution timer goes off this function is called. */
5373static enum hrtimer_restart sdebug_q_cmd_hrt_complete(struct hrtimer *timer)
5374{
5375 struct sdebug_defer *sd_dp = container_of(timer, struct sdebug_defer,
5376 hrt);
5377 sdebug_q_cmd_complete(sd_dp);
5378 return HRTIMER_NORESTART;
5379}
5380
5381/* When work queue schedules work, it calls this function. */
5382static void sdebug_q_cmd_wq_complete(struct work_struct *work)
5383{
5384 struct sdebug_defer *sd_dp = container_of(work, struct sdebug_defer,
5385 ew.work);
5386 sdebug_q_cmd_complete(sd_dp);
5387}
5388
5389static bool got_shared_uuid;
5390static uuid_t shared_uuid;
5391
5392static int sdebug_device_create_zones(struct sdebug_dev_info *devip)
5393{
5394 struct sdeb_zone_state *zsp;
5395 sector_t capacity = get_sdebug_capacity();
5396 sector_t conv_capacity;
5397 sector_t zstart = 0;
5398 unsigned int i;
5399
5400 /*
5401 * Set the zone size: if sdeb_zbc_zone_size_mb is not set, figure out
5402 * a zone size allowing for at least 4 zones on the device. Otherwise,
5403 * use the specified zone size checking that at least 2 zones can be
5404 * created for the device.
5405 */
5406 if (!sdeb_zbc_zone_size_mb) {
5407 devip->zsize = (DEF_ZBC_ZONE_SIZE_MB * SZ_1M)
5408 >> ilog2(sdebug_sector_size);
5409 while (capacity < devip->zsize << 2 && devip->zsize >= 2)
5410 devip->zsize >>= 1;
5411 if (devip->zsize < 2) {
5412 pr_err("Device capacity too small\n");
5413 return -EINVAL;
5414 }
5415 } else {
5416 if (!is_power_of_2(sdeb_zbc_zone_size_mb)) {
5417 pr_err("Zone size is not a power of 2\n");
5418 return -EINVAL;
5419 }
5420 devip->zsize = (sdeb_zbc_zone_size_mb * SZ_1M)
5421 >> ilog2(sdebug_sector_size);
5422 if (devip->zsize >= capacity) {
5423 pr_err("Zone size too large for device capacity\n");
5424 return -EINVAL;
5425 }
5426 }
5427
5428 devip->zsize_shift = ilog2(devip->zsize);
5429 devip->nr_zones = (capacity + devip->zsize - 1) >> devip->zsize_shift;
5430
5431 if (sdeb_zbc_zone_cap_mb == 0) {
5432 devip->zcap = devip->zsize;
5433 } else {
5434 devip->zcap = (sdeb_zbc_zone_cap_mb * SZ_1M) >>
5435 ilog2(sdebug_sector_size);
5436 if (devip->zcap > devip->zsize) {
5437 pr_err("Zone capacity too large\n");
5438 return -EINVAL;
5439 }
5440 }
5441
5442 conv_capacity = (sector_t)sdeb_zbc_nr_conv << devip->zsize_shift;
5443 if (conv_capacity >= capacity) {
5444 pr_err("Number of conventional zones too large\n");
5445 return -EINVAL;
5446 }
5447 devip->nr_conv_zones = sdeb_zbc_nr_conv;
5448 devip->nr_seq_zones = ALIGN(capacity - conv_capacity, devip->zsize) >>
5449 devip->zsize_shift;
5450 devip->nr_zones = devip->nr_conv_zones + devip->nr_seq_zones;
5451
5452 /* Add gap zones if zone capacity is smaller than the zone size */
5453 if (devip->zcap < devip->zsize)
5454 devip->nr_zones += devip->nr_seq_zones;
5455
5456 if (devip->zoned) {
5457 /* zbc_max_open_zones can be 0, meaning "not reported" */
5458 if (sdeb_zbc_max_open >= devip->nr_zones - 1)
5459 devip->max_open = (devip->nr_zones - 1) / 2;
5460 else
5461 devip->max_open = sdeb_zbc_max_open;
5462 }
5463
5464 devip->zstate = kcalloc(devip->nr_zones,
5465 sizeof(struct sdeb_zone_state), GFP_KERNEL);
5466 if (!devip->zstate)
5467 return -ENOMEM;
5468
5469 for (i = 0; i < devip->nr_zones; i++) {
5470 zsp = &devip->zstate[i];
5471
5472 zsp->z_start = zstart;
5473
5474 if (i < devip->nr_conv_zones) {
5475 zsp->z_type = ZBC_ZTYPE_CNV;
5476 zsp->z_cond = ZBC_NOT_WRITE_POINTER;
5477 zsp->z_wp = (sector_t)-1;
5478 zsp->z_size =
5479 min_t(u64, devip->zsize, capacity - zstart);
5480 } else if ((zstart & (devip->zsize - 1)) == 0) {
5481 if (devip->zoned)
5482 zsp->z_type = ZBC_ZTYPE_SWR;
5483 else
5484 zsp->z_type = ZBC_ZTYPE_SWP;
5485 zsp->z_cond = ZC1_EMPTY;
5486 zsp->z_wp = zsp->z_start;
5487 zsp->z_size =
5488 min_t(u64, devip->zcap, capacity - zstart);
5489 } else {
5490 zsp->z_type = ZBC_ZTYPE_GAP;
5491 zsp->z_cond = ZBC_NOT_WRITE_POINTER;
5492 zsp->z_wp = (sector_t)-1;
5493 zsp->z_size = min_t(u64, devip->zsize - devip->zcap,
5494 capacity - zstart);
5495 }
5496
5497 WARN_ON_ONCE((int)zsp->z_size <= 0);
5498 zstart += zsp->z_size;
5499 }
5500
5501 return 0;
5502}
5503
5504static struct sdebug_dev_info *sdebug_device_create(
5505 struct sdebug_host_info *sdbg_host, gfp_t flags)
5506{
5507 struct sdebug_dev_info *devip;
5508
5509 devip = kzalloc(sizeof(*devip), flags);
5510 if (devip) {
5511 if (sdebug_uuid_ctl == 1)
5512 uuid_gen(&devip->lu_name);
5513 else if (sdebug_uuid_ctl == 2) {
5514 if (got_shared_uuid)
5515 devip->lu_name = shared_uuid;
5516 else {
5517 uuid_gen(&shared_uuid);
5518 got_shared_uuid = true;
5519 devip->lu_name = shared_uuid;
5520 }
5521 }
5522 devip->sdbg_host = sdbg_host;
5523 if (sdeb_zbc_in_use) {
5524 devip->zoned = sdeb_zbc_model == BLK_ZONED_HM;
5525 if (sdebug_device_create_zones(devip)) {
5526 kfree(devip);
5527 return NULL;
5528 }
5529 } else {
5530 devip->zoned = false;
5531 }
5532 devip->create_ts = ktime_get_boottime();
5533 atomic_set(&devip->stopped, (sdeb_tur_ms_to_ready > 0 ? 2 : 0));
5534 spin_lock_init(&devip->list_lock);
5535 INIT_LIST_HEAD(&devip->inject_err_list);
5536 list_add_tail(&devip->dev_list, &sdbg_host->dev_info_list);
5537 }
5538 return devip;
5539}
5540
5541static struct sdebug_dev_info *find_build_dev_info(struct scsi_device *sdev)
5542{
5543 struct sdebug_host_info *sdbg_host;
5544 struct sdebug_dev_info *open_devip = NULL;
5545 struct sdebug_dev_info *devip;
5546
5547 sdbg_host = shost_to_sdebug_host(sdev->host);
5548
5549 list_for_each_entry(devip, &sdbg_host->dev_info_list, dev_list) {
5550 if ((devip->used) && (devip->channel == sdev->channel) &&
5551 (devip->target == sdev->id) &&
5552 (devip->lun == sdev->lun))
5553 return devip;
5554 else {
5555 if ((!devip->used) && (!open_devip))
5556 open_devip = devip;
5557 }
5558 }
5559 if (!open_devip) { /* try and make a new one */
5560 open_devip = sdebug_device_create(sdbg_host, GFP_ATOMIC);
5561 if (!open_devip) {
5562 pr_err("out of memory at line %d\n", __LINE__);
5563 return NULL;
5564 }
5565 }
5566
5567 open_devip->channel = sdev->channel;
5568 open_devip->target = sdev->id;
5569 open_devip->lun = sdev->lun;
5570 open_devip->sdbg_host = sdbg_host;
5571 set_bit(SDEBUG_UA_POOCCUR, open_devip->uas_bm);
5572 open_devip->used = true;
5573 return open_devip;
5574}
5575
5576static int scsi_debug_slave_alloc(struct scsi_device *sdp)
5577{
5578 if (sdebug_verbose)
5579 pr_info("slave_alloc <%u %u %u %llu>\n",
5580 sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
5581
5582 return 0;
5583}
5584
5585static int scsi_debug_slave_configure(struct scsi_device *sdp)
5586{
5587 struct sdebug_dev_info *devip =
5588 (struct sdebug_dev_info *)sdp->hostdata;
5589 struct dentry *dentry;
5590
5591 if (sdebug_verbose)
5592 pr_info("slave_configure <%u %u %u %llu>\n",
5593 sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
5594 if (sdp->host->max_cmd_len != SDEBUG_MAX_CMD_LEN)
5595 sdp->host->max_cmd_len = SDEBUG_MAX_CMD_LEN;
5596 if (devip == NULL) {
5597 devip = find_build_dev_info(sdp);
5598 if (devip == NULL)
5599 return 1; /* no resources, will be marked offline */
5600 }
5601 sdp->hostdata = devip;
5602 if (sdebug_no_uld)
5603 sdp->no_uld_attach = 1;
5604 config_cdb_len(sdp);
5605
5606 if (sdebug_allow_restart)
5607 sdp->allow_restart = 1;
5608
5609 devip->debugfs_entry = debugfs_create_dir(dev_name(&sdp->sdev_dev),
5610 sdebug_debugfs_root);
5611 if (IS_ERR_OR_NULL(devip->debugfs_entry))
5612 pr_info("%s: failed to create debugfs directory for device %s\n",
5613 __func__, dev_name(&sdp->sdev_gendev));
5614
5615 dentry = debugfs_create_file("error", 0600, devip->debugfs_entry, sdp,
5616 &sdebug_error_fops);
5617 if (IS_ERR_OR_NULL(dentry))
5618 pr_info("%s: failed to create error file for device %s\n",
5619 __func__, dev_name(&sdp->sdev_gendev));
5620
5621 return 0;
5622}
5623
5624static void scsi_debug_slave_destroy(struct scsi_device *sdp)
5625{
5626 struct sdebug_dev_info *devip =
5627 (struct sdebug_dev_info *)sdp->hostdata;
5628 struct sdebug_err_inject *err;
5629
5630 if (sdebug_verbose)
5631 pr_info("slave_destroy <%u %u %u %llu>\n",
5632 sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
5633
5634 if (!devip)
5635 return;
5636
5637 spin_lock(&devip->list_lock);
5638 list_for_each_entry_rcu(err, &devip->inject_err_list, list) {
5639 list_del_rcu(&err->list);
5640 call_rcu(&err->rcu, sdebug_err_free);
5641 }
5642 spin_unlock(&devip->list_lock);
5643
5644 debugfs_remove(devip->debugfs_entry);
5645
5646 /* make this slot available for re-use */
5647 devip->used = false;
5648 sdp->hostdata = NULL;
5649}
5650
5651/* Returns true if we require the queued memory to be freed by the caller. */
5652static bool stop_qc_helper(struct sdebug_defer *sd_dp,
5653 enum sdeb_defer_type defer_t)
5654{
5655 if (defer_t == SDEB_DEFER_HRT) {
5656 int res = hrtimer_try_to_cancel(&sd_dp->hrt);
5657
5658 switch (res) {
5659 case 0: /* Not active, it must have already run */
5660 case -1: /* -1 It's executing the CB */
5661 return false;
5662 case 1: /* Was active, we've now cancelled */
5663 default:
5664 return true;
5665 }
5666 } else if (defer_t == SDEB_DEFER_WQ) {
5667 /* Cancel if pending */
5668 if (cancel_work_sync(&sd_dp->ew.work))
5669 return true;
5670 /* Was not pending, so it must have run */
5671 return false;
5672 } else if (defer_t == SDEB_DEFER_POLL) {
5673 return true;
5674 }
5675
5676 return false;
5677}
5678
5679
5680static bool scsi_debug_stop_cmnd(struct scsi_cmnd *cmnd)
5681{
5682 enum sdeb_defer_type l_defer_t;
5683 struct sdebug_defer *sd_dp;
5684 struct sdebug_scsi_cmd *sdsc = scsi_cmd_priv(cmnd);
5685 struct sdebug_queued_cmd *sqcp = TO_QUEUED_CMD(cmnd);
5686
5687 lockdep_assert_held(&sdsc->lock);
5688
5689 if (!sqcp)
5690 return false;
5691 sd_dp = &sqcp->sd_dp;
5692 l_defer_t = READ_ONCE(sd_dp->defer_t);
5693 ASSIGN_QUEUED_CMD(cmnd, NULL);
5694
5695 if (stop_qc_helper(sd_dp, l_defer_t))
5696 sdebug_free_queued_cmd(sqcp);
5697
5698 return true;
5699}
5700
5701/*
5702 * Called from scsi_debug_abort() only, which is for timed-out cmd.
5703 */
5704static bool scsi_debug_abort_cmnd(struct scsi_cmnd *cmnd)
5705{
5706 struct sdebug_scsi_cmd *sdsc = scsi_cmd_priv(cmnd);
5707 unsigned long flags;
5708 bool res;
5709
5710 spin_lock_irqsave(&sdsc->lock, flags);
5711 res = scsi_debug_stop_cmnd(cmnd);
5712 spin_unlock_irqrestore(&sdsc->lock, flags);
5713
5714 return res;
5715}
5716
5717/*
5718 * All we can do is set the cmnd as internally aborted and wait for it to
5719 * finish. We cannot call scsi_done() as normal completion path may do that.
5720 */
5721static bool sdebug_stop_cmnd(struct request *rq, void *data)
5722{
5723 scsi_debug_abort_cmnd(blk_mq_rq_to_pdu(rq));
5724
5725 return true;
5726}
5727
5728/* Deletes (stops) timers or work queues of all queued commands */
5729static void stop_all_queued(void)
5730{
5731 struct sdebug_host_info *sdhp;
5732
5733 mutex_lock(&sdebug_host_list_mutex);
5734 list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
5735 struct Scsi_Host *shost = sdhp->shost;
5736
5737 blk_mq_tagset_busy_iter(&shost->tag_set, sdebug_stop_cmnd, NULL);
5738 }
5739 mutex_unlock(&sdebug_host_list_mutex);
5740}
5741
5742static int sdebug_fail_abort(struct scsi_cmnd *cmnd)
5743{
5744 struct scsi_device *sdp = cmnd->device;
5745 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
5746 struct sdebug_err_inject *err;
5747 unsigned char *cmd = cmnd->cmnd;
5748 int ret = 0;
5749
5750 if (devip == NULL)
5751 return 0;
5752
5753 rcu_read_lock();
5754 list_for_each_entry_rcu(err, &devip->inject_err_list, list) {
5755 if (err->type == ERR_ABORT_CMD_FAILED &&
5756 (err->cmd == cmd[0] || err->cmd == 0xff)) {
5757 ret = !!err->cnt;
5758 if (err->cnt < 0)
5759 err->cnt++;
5760
5761 rcu_read_unlock();
5762 return ret;
5763 }
5764 }
5765 rcu_read_unlock();
5766
5767 return 0;
5768}
5769
5770static int scsi_debug_abort(struct scsi_cmnd *SCpnt)
5771{
5772 bool ok = scsi_debug_abort_cmnd(SCpnt);
5773 u8 *cmd = SCpnt->cmnd;
5774 u8 opcode = cmd[0];
5775
5776 ++num_aborts;
5777
5778 if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5779 sdev_printk(KERN_INFO, SCpnt->device,
5780 "%s: command%s found\n", __func__,
5781 ok ? "" : " not");
5782
5783 if (sdebug_fail_abort(SCpnt)) {
5784 scmd_printk(KERN_INFO, SCpnt, "fail abort command 0x%x\n",
5785 opcode);
5786 return FAILED;
5787 }
5788
5789 return SUCCESS;
5790}
5791
5792static bool scsi_debug_stop_all_queued_iter(struct request *rq, void *data)
5793{
5794 struct scsi_device *sdp = data;
5795 struct scsi_cmnd *scmd = blk_mq_rq_to_pdu(rq);
5796
5797 if (scmd->device == sdp)
5798 scsi_debug_abort_cmnd(scmd);
5799
5800 return true;
5801}
5802
5803/* Deletes (stops) timers or work queues of all queued commands per sdev */
5804static void scsi_debug_stop_all_queued(struct scsi_device *sdp)
5805{
5806 struct Scsi_Host *shost = sdp->host;
5807
5808 blk_mq_tagset_busy_iter(&shost->tag_set,
5809 scsi_debug_stop_all_queued_iter, sdp);
5810}
5811
5812static int sdebug_fail_lun_reset(struct scsi_cmnd *cmnd)
5813{
5814 struct scsi_device *sdp = cmnd->device;
5815 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
5816 struct sdebug_err_inject *err;
5817 unsigned char *cmd = cmnd->cmnd;
5818 int ret = 0;
5819
5820 if (devip == NULL)
5821 return 0;
5822
5823 rcu_read_lock();
5824 list_for_each_entry_rcu(err, &devip->inject_err_list, list) {
5825 if (err->type == ERR_LUN_RESET_FAILED &&
5826 (err->cmd == cmd[0] || err->cmd == 0xff)) {
5827 ret = !!err->cnt;
5828 if (err->cnt < 0)
5829 err->cnt++;
5830
5831 rcu_read_unlock();
5832 return ret;
5833 }
5834 }
5835 rcu_read_unlock();
5836
5837 return 0;
5838}
5839
5840static int scsi_debug_device_reset(struct scsi_cmnd *SCpnt)
5841{
5842 struct scsi_device *sdp = SCpnt->device;
5843 struct sdebug_dev_info *devip = sdp->hostdata;
5844 u8 *cmd = SCpnt->cmnd;
5845 u8 opcode = cmd[0];
5846
5847 ++num_dev_resets;
5848
5849 if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5850 sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
5851
5852 scsi_debug_stop_all_queued(sdp);
5853 if (devip)
5854 set_bit(SDEBUG_UA_POR, devip->uas_bm);
5855
5856 if (sdebug_fail_lun_reset(SCpnt)) {
5857 scmd_printk(KERN_INFO, SCpnt, "fail lun reset 0x%x\n", opcode);
5858 return FAILED;
5859 }
5860
5861 return SUCCESS;
5862}
5863
5864static int sdebug_fail_target_reset(struct scsi_cmnd *cmnd)
5865{
5866 struct scsi_target *starget = scsi_target(cmnd->device);
5867 struct sdebug_target_info *targetip =
5868 (struct sdebug_target_info *)starget->hostdata;
5869
5870 if (targetip)
5871 return targetip->reset_fail;
5872
5873 return 0;
5874}
5875
5876static int scsi_debug_target_reset(struct scsi_cmnd *SCpnt)
5877{
5878 struct scsi_device *sdp = SCpnt->device;
5879 struct sdebug_host_info *sdbg_host = shost_to_sdebug_host(sdp->host);
5880 struct sdebug_dev_info *devip;
5881 u8 *cmd = SCpnt->cmnd;
5882 u8 opcode = cmd[0];
5883 int k = 0;
5884
5885 ++num_target_resets;
5886 if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5887 sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
5888
5889 list_for_each_entry(devip, &sdbg_host->dev_info_list, dev_list) {
5890 if (devip->target == sdp->id) {
5891 set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
5892 ++k;
5893 }
5894 }
5895
5896 if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
5897 sdev_printk(KERN_INFO, sdp,
5898 "%s: %d device(s) found in target\n", __func__, k);
5899
5900 if (sdebug_fail_target_reset(SCpnt)) {
5901 scmd_printk(KERN_INFO, SCpnt, "fail target reset 0x%x\n",
5902 opcode);
5903 return FAILED;
5904 }
5905
5906 return SUCCESS;
5907}
5908
5909static int scsi_debug_bus_reset(struct scsi_cmnd *SCpnt)
5910{
5911 struct scsi_device *sdp = SCpnt->device;
5912 struct sdebug_host_info *sdbg_host = shost_to_sdebug_host(sdp->host);
5913 struct sdebug_dev_info *devip;
5914 int k = 0;
5915
5916 ++num_bus_resets;
5917
5918 if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5919 sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
5920
5921 list_for_each_entry(devip, &sdbg_host->dev_info_list, dev_list) {
5922 set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
5923 ++k;
5924 }
5925
5926 if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
5927 sdev_printk(KERN_INFO, sdp,
5928 "%s: %d device(s) found in host\n", __func__, k);
5929 return SUCCESS;
5930}
5931
5932static int scsi_debug_host_reset(struct scsi_cmnd *SCpnt)
5933{
5934 struct sdebug_host_info *sdbg_host;
5935 struct sdebug_dev_info *devip;
5936 int k = 0;
5937
5938 ++num_host_resets;
5939 if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
5940 sdev_printk(KERN_INFO, SCpnt->device, "%s\n", __func__);
5941 mutex_lock(&sdebug_host_list_mutex);
5942 list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
5943 list_for_each_entry(devip, &sdbg_host->dev_info_list,
5944 dev_list) {
5945 set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
5946 ++k;
5947 }
5948 }
5949 mutex_unlock(&sdebug_host_list_mutex);
5950 stop_all_queued();
5951 if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
5952 sdev_printk(KERN_INFO, SCpnt->device,
5953 "%s: %d device(s) found\n", __func__, k);
5954 return SUCCESS;
5955}
5956
5957static void sdebug_build_parts(unsigned char *ramp, unsigned long store_size)
5958{
5959 struct msdos_partition *pp;
5960 int starts[SDEBUG_MAX_PARTS + 2], max_part_secs;
5961 int sectors_per_part, num_sectors, k;
5962 int heads_by_sects, start_sec, end_sec;
5963
5964 /* assume partition table already zeroed */
5965 if ((sdebug_num_parts < 1) || (store_size < 1048576))
5966 return;
5967 if (sdebug_num_parts > SDEBUG_MAX_PARTS) {
5968 sdebug_num_parts = SDEBUG_MAX_PARTS;
5969 pr_warn("reducing partitions to %d\n", SDEBUG_MAX_PARTS);
5970 }
5971 num_sectors = (int)get_sdebug_capacity();
5972 sectors_per_part = (num_sectors - sdebug_sectors_per)
5973 / sdebug_num_parts;
5974 heads_by_sects = sdebug_heads * sdebug_sectors_per;
5975 starts[0] = sdebug_sectors_per;
5976 max_part_secs = sectors_per_part;
5977 for (k = 1; k < sdebug_num_parts; ++k) {
5978 starts[k] = ((k * sectors_per_part) / heads_by_sects)
5979 * heads_by_sects;
5980 if (starts[k] - starts[k - 1] < max_part_secs)
5981 max_part_secs = starts[k] - starts[k - 1];
5982 }
5983 starts[sdebug_num_parts] = num_sectors;
5984 starts[sdebug_num_parts + 1] = 0;
5985
5986 ramp[510] = 0x55; /* magic partition markings */
5987 ramp[511] = 0xAA;
5988 pp = (struct msdos_partition *)(ramp + 0x1be);
5989 for (k = 0; starts[k + 1]; ++k, ++pp) {
5990 start_sec = starts[k];
5991 end_sec = starts[k] + max_part_secs - 1;
5992 pp->boot_ind = 0;
5993
5994 pp->cyl = start_sec / heads_by_sects;
5995 pp->head = (start_sec - (pp->cyl * heads_by_sects))
5996 / sdebug_sectors_per;
5997 pp->sector = (start_sec % sdebug_sectors_per) + 1;
5998
5999 pp->end_cyl = end_sec / heads_by_sects;
6000 pp->end_head = (end_sec - (pp->end_cyl * heads_by_sects))
6001 / sdebug_sectors_per;
6002 pp->end_sector = (end_sec % sdebug_sectors_per) + 1;
6003
6004 pp->start_sect = cpu_to_le32(start_sec);
6005 pp->nr_sects = cpu_to_le32(end_sec - start_sec + 1);
6006 pp->sys_ind = 0x83; /* plain Linux partition */
6007 }
6008}
6009
6010static void block_unblock_all_queues(bool block)
6011{
6012 struct sdebug_host_info *sdhp;
6013
6014 lockdep_assert_held(&sdebug_host_list_mutex);
6015
6016 list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
6017 struct Scsi_Host *shost = sdhp->shost;
6018
6019 if (block)
6020 scsi_block_requests(shost);
6021 else
6022 scsi_unblock_requests(shost);
6023 }
6024}
6025
6026/* Adjust (by rounding down) the sdebug_cmnd_count so abs(every_nth)-1
6027 * commands will be processed normally before triggers occur.
6028 */
6029static void tweak_cmnd_count(void)
6030{
6031 int count, modulo;
6032
6033 modulo = abs(sdebug_every_nth);
6034 if (modulo < 2)
6035 return;
6036
6037 mutex_lock(&sdebug_host_list_mutex);
6038 block_unblock_all_queues(true);
6039 count = atomic_read(&sdebug_cmnd_count);
6040 atomic_set(&sdebug_cmnd_count, (count / modulo) * modulo);
6041 block_unblock_all_queues(false);
6042 mutex_unlock(&sdebug_host_list_mutex);
6043}
6044
6045static void clear_queue_stats(void)
6046{
6047 atomic_set(&sdebug_cmnd_count, 0);
6048 atomic_set(&sdebug_completions, 0);
6049 atomic_set(&sdebug_miss_cpus, 0);
6050 atomic_set(&sdebug_a_tsf, 0);
6051}
6052
6053static bool inject_on_this_cmd(void)
6054{
6055 if (sdebug_every_nth == 0)
6056 return false;
6057 return (atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth)) == 0;
6058}
6059
6060#define INCLUSIVE_TIMING_MAX_NS 1000000 /* 1 millisecond */
6061
6062
6063void sdebug_free_queued_cmd(struct sdebug_queued_cmd *sqcp)
6064{
6065 if (sqcp)
6066 kmem_cache_free(queued_cmd_cache, sqcp);
6067}
6068
6069static struct sdebug_queued_cmd *sdebug_alloc_queued_cmd(struct scsi_cmnd *scmd)
6070{
6071 struct sdebug_queued_cmd *sqcp;
6072 struct sdebug_defer *sd_dp;
6073
6074 sqcp = kmem_cache_zalloc(queued_cmd_cache, GFP_ATOMIC);
6075 if (!sqcp)
6076 return NULL;
6077
6078 sd_dp = &sqcp->sd_dp;
6079
6080 hrtimer_init(&sd_dp->hrt, CLOCK_MONOTONIC, HRTIMER_MODE_REL_PINNED);
6081 sd_dp->hrt.function = sdebug_q_cmd_hrt_complete;
6082 INIT_WORK(&sd_dp->ew.work, sdebug_q_cmd_wq_complete);
6083
6084 sqcp->scmd = scmd;
6085
6086 return sqcp;
6087}
6088
6089/* Complete the processing of the thread that queued a SCSI command to this
6090 * driver. It either completes the command by calling cmnd_done() or
6091 * schedules a hr timer or work queue then returns 0. Returns
6092 * SCSI_MLQUEUE_HOST_BUSY if temporarily out of resources.
6093 */
6094static int schedule_resp(struct scsi_cmnd *cmnd, struct sdebug_dev_info *devip,
6095 int scsi_result,
6096 int (*pfp)(struct scsi_cmnd *,
6097 struct sdebug_dev_info *),
6098 int delta_jiff, int ndelay)
6099{
6100 struct request *rq = scsi_cmd_to_rq(cmnd);
6101 bool polled = rq->cmd_flags & REQ_POLLED;
6102 struct sdebug_scsi_cmd *sdsc = scsi_cmd_priv(cmnd);
6103 unsigned long flags;
6104 u64 ns_from_boot = 0;
6105 struct sdebug_queued_cmd *sqcp;
6106 struct scsi_device *sdp;
6107 struct sdebug_defer *sd_dp;
6108
6109 if (unlikely(devip == NULL)) {
6110 if (scsi_result == 0)
6111 scsi_result = DID_NO_CONNECT << 16;
6112 goto respond_in_thread;
6113 }
6114 sdp = cmnd->device;
6115
6116 if (delta_jiff == 0)
6117 goto respond_in_thread;
6118
6119
6120 if (unlikely(sdebug_every_nth && (SDEBUG_OPT_RARE_TSF & sdebug_opts) &&
6121 (scsi_result == 0))) {
6122 int num_in_q = scsi_device_busy(sdp);
6123 int qdepth = cmnd->device->queue_depth;
6124
6125 if ((num_in_q == qdepth) &&
6126 (atomic_inc_return(&sdebug_a_tsf) >=
6127 abs(sdebug_every_nth))) {
6128 atomic_set(&sdebug_a_tsf, 0);
6129 scsi_result = device_qfull_result;
6130
6131 if (unlikely(SDEBUG_OPT_Q_NOISE & sdebug_opts))
6132 sdev_printk(KERN_INFO, sdp, "%s: num_in_q=%d +1, <inject> status: TASK SET FULL\n",
6133 __func__, num_in_q);
6134 }
6135 }
6136
6137 sqcp = sdebug_alloc_queued_cmd(cmnd);
6138 if (!sqcp) {
6139 pr_err("%s no alloc\n", __func__);
6140 return SCSI_MLQUEUE_HOST_BUSY;
6141 }
6142 sd_dp = &sqcp->sd_dp;
6143
6144 if (polled)
6145 ns_from_boot = ktime_get_boottime_ns();
6146
6147 /* one of the resp_*() response functions is called here */
6148 cmnd->result = pfp ? pfp(cmnd, devip) : 0;
6149 if (cmnd->result & SDEG_RES_IMMED_MASK) {
6150 cmnd->result &= ~SDEG_RES_IMMED_MASK;
6151 delta_jiff = ndelay = 0;
6152 }
6153 if (cmnd->result == 0 && scsi_result != 0)
6154 cmnd->result = scsi_result;
6155 if (cmnd->result == 0 && unlikely(sdebug_opts & SDEBUG_OPT_TRANSPORT_ERR)) {
6156 if (atomic_read(&sdeb_inject_pending)) {
6157 mk_sense_buffer(cmnd, ABORTED_COMMAND, TRANSPORT_PROBLEM, ACK_NAK_TO);
6158 atomic_set(&sdeb_inject_pending, 0);
6159 cmnd->result = check_condition_result;
6160 }
6161 }
6162
6163 if (unlikely(sdebug_verbose && cmnd->result))
6164 sdev_printk(KERN_INFO, sdp, "%s: non-zero result=0x%x\n",
6165 __func__, cmnd->result);
6166
6167 if (delta_jiff > 0 || ndelay > 0) {
6168 ktime_t kt;
6169
6170 if (delta_jiff > 0) {
6171 u64 ns = jiffies_to_nsecs(delta_jiff);
6172
6173 if (sdebug_random && ns < U32_MAX) {
6174 ns = get_random_u32_below((u32)ns);
6175 } else if (sdebug_random) {
6176 ns >>= 12; /* scale to 4 usec precision */
6177 if (ns < U32_MAX) /* over 4 hours max */
6178 ns = get_random_u32_below((u32)ns);
6179 ns <<= 12;
6180 }
6181 kt = ns_to_ktime(ns);
6182 } else { /* ndelay has a 4.2 second max */
6183 kt = sdebug_random ? get_random_u32_below((u32)ndelay) :
6184 (u32)ndelay;
6185 if (ndelay < INCLUSIVE_TIMING_MAX_NS) {
6186 u64 d = ktime_get_boottime_ns() - ns_from_boot;
6187
6188 if (kt <= d) { /* elapsed duration >= kt */
6189 /* call scsi_done() from this thread */
6190 sdebug_free_queued_cmd(sqcp);
6191 scsi_done(cmnd);
6192 return 0;
6193 }
6194 /* otherwise reduce kt by elapsed time */
6195 kt -= d;
6196 }
6197 }
6198 if (sdebug_statistics)
6199 sd_dp->issuing_cpu = raw_smp_processor_id();
6200 if (polled) {
6201 spin_lock_irqsave(&sdsc->lock, flags);
6202 sd_dp->cmpl_ts = ktime_add(ns_to_ktime(ns_from_boot), kt);
6203 ASSIGN_QUEUED_CMD(cmnd, sqcp);
6204 WRITE_ONCE(sd_dp->defer_t, SDEB_DEFER_POLL);
6205 spin_unlock_irqrestore(&sdsc->lock, flags);
6206 } else {
6207 /* schedule the invocation of scsi_done() for a later time */
6208 spin_lock_irqsave(&sdsc->lock, flags);
6209 ASSIGN_QUEUED_CMD(cmnd, sqcp);
6210 WRITE_ONCE(sd_dp->defer_t, SDEB_DEFER_HRT);
6211 hrtimer_start(&sd_dp->hrt, kt, HRTIMER_MODE_REL_PINNED);
6212 /*
6213 * The completion handler will try to grab sqcp->lock,
6214 * so there is no chance that the completion handler
6215 * will call scsi_done() until we release the lock
6216 * here (so ok to keep referencing sdsc).
6217 */
6218 spin_unlock_irqrestore(&sdsc->lock, flags);
6219 }
6220 } else { /* jdelay < 0, use work queue */
6221 if (unlikely((sdebug_opts & SDEBUG_OPT_CMD_ABORT) &&
6222 atomic_read(&sdeb_inject_pending))) {
6223 sd_dp->aborted = true;
6224 atomic_set(&sdeb_inject_pending, 0);
6225 sdev_printk(KERN_INFO, sdp, "abort request tag=%#x\n",
6226 blk_mq_unique_tag_to_tag(get_tag(cmnd)));
6227 }
6228
6229 if (sdebug_statistics)
6230 sd_dp->issuing_cpu = raw_smp_processor_id();
6231 if (polled) {
6232 spin_lock_irqsave(&sdsc->lock, flags);
6233 ASSIGN_QUEUED_CMD(cmnd, sqcp);
6234 sd_dp->cmpl_ts = ns_to_ktime(ns_from_boot);
6235 WRITE_ONCE(sd_dp->defer_t, SDEB_DEFER_POLL);
6236 spin_unlock_irqrestore(&sdsc->lock, flags);
6237 } else {
6238 spin_lock_irqsave(&sdsc->lock, flags);
6239 ASSIGN_QUEUED_CMD(cmnd, sqcp);
6240 WRITE_ONCE(sd_dp->defer_t, SDEB_DEFER_WQ);
6241 schedule_work(&sd_dp->ew.work);
6242 spin_unlock_irqrestore(&sdsc->lock, flags);
6243 }
6244 }
6245
6246 return 0;
6247
6248respond_in_thread: /* call back to mid-layer using invocation thread */
6249 cmnd->result = pfp != NULL ? pfp(cmnd, devip) : 0;
6250 cmnd->result &= ~SDEG_RES_IMMED_MASK;
6251 if (cmnd->result == 0 && scsi_result != 0)
6252 cmnd->result = scsi_result;
6253 scsi_done(cmnd);
6254 return 0;
6255}
6256
6257/* Note: The following macros create attribute files in the
6258 /sys/module/scsi_debug/parameters directory. Unfortunately this
6259 driver is unaware of a change and cannot trigger auxiliary actions
6260 as it can when the corresponding attribute in the
6261 /sys/bus/pseudo/drivers/scsi_debug directory is changed.
6262 */
6263module_param_named(add_host, sdebug_add_host, int, S_IRUGO | S_IWUSR);
6264module_param_named(ato, sdebug_ato, int, S_IRUGO);
6265module_param_named(cdb_len, sdebug_cdb_len, int, 0644);
6266module_param_named(clustering, sdebug_clustering, bool, S_IRUGO | S_IWUSR);
6267module_param_named(delay, sdebug_jdelay, int, S_IRUGO | S_IWUSR);
6268module_param_named(dev_size_mb, sdebug_dev_size_mb, int, S_IRUGO);
6269module_param_named(dif, sdebug_dif, int, S_IRUGO);
6270module_param_named(dix, sdebug_dix, int, S_IRUGO);
6271module_param_named(dsense, sdebug_dsense, int, S_IRUGO | S_IWUSR);
6272module_param_named(every_nth, sdebug_every_nth, int, S_IRUGO | S_IWUSR);
6273module_param_named(fake_rw, sdebug_fake_rw, int, S_IRUGO | S_IWUSR);
6274module_param_named(guard, sdebug_guard, uint, S_IRUGO);
6275module_param_named(host_lock, sdebug_host_lock, bool, S_IRUGO | S_IWUSR);
6276module_param_named(host_max_queue, sdebug_host_max_queue, int, S_IRUGO);
6277module_param_string(inq_product, sdebug_inq_product_id,
6278 sizeof(sdebug_inq_product_id), S_IRUGO | S_IWUSR);
6279module_param_string(inq_rev, sdebug_inq_product_rev,
6280 sizeof(sdebug_inq_product_rev), S_IRUGO | S_IWUSR);
6281module_param_string(inq_vendor, sdebug_inq_vendor_id,
6282 sizeof(sdebug_inq_vendor_id), S_IRUGO | S_IWUSR);
6283module_param_named(lbprz, sdebug_lbprz, int, S_IRUGO);
6284module_param_named(lbpu, sdebug_lbpu, int, S_IRUGO);
6285module_param_named(lbpws, sdebug_lbpws, int, S_IRUGO);
6286module_param_named(lbpws10, sdebug_lbpws10, int, S_IRUGO);
6287module_param_named(lowest_aligned, sdebug_lowest_aligned, int, S_IRUGO);
6288module_param_named(lun_format, sdebug_lun_am_i, int, S_IRUGO | S_IWUSR);
6289module_param_named(max_luns, sdebug_max_luns, int, S_IRUGO | S_IWUSR);
6290module_param_named(max_queue, sdebug_max_queue, int, S_IRUGO | S_IWUSR);
6291module_param_named(medium_error_count, sdebug_medium_error_count, int,
6292 S_IRUGO | S_IWUSR);
6293module_param_named(medium_error_start, sdebug_medium_error_start, int,
6294 S_IRUGO | S_IWUSR);
6295module_param_named(ndelay, sdebug_ndelay, int, S_IRUGO | S_IWUSR);
6296module_param_named(no_lun_0, sdebug_no_lun_0, int, S_IRUGO | S_IWUSR);
6297module_param_named(no_rwlock, sdebug_no_rwlock, bool, S_IRUGO | S_IWUSR);
6298module_param_named(no_uld, sdebug_no_uld, int, S_IRUGO);
6299module_param_named(num_parts, sdebug_num_parts, int, S_IRUGO);
6300module_param_named(num_tgts, sdebug_num_tgts, int, S_IRUGO | S_IWUSR);
6301module_param_named(opt_blks, sdebug_opt_blks, int, S_IRUGO);
6302module_param_named(opt_xferlen_exp, sdebug_opt_xferlen_exp, int, S_IRUGO);
6303module_param_named(opts, sdebug_opts, int, S_IRUGO | S_IWUSR);
6304module_param_named(per_host_store, sdebug_per_host_store, bool,
6305 S_IRUGO | S_IWUSR);
6306module_param_named(physblk_exp, sdebug_physblk_exp, int, S_IRUGO);
6307module_param_named(ptype, sdebug_ptype, int, S_IRUGO | S_IWUSR);
6308module_param_named(random, sdebug_random, bool, S_IRUGO | S_IWUSR);
6309module_param_named(removable, sdebug_removable, bool, S_IRUGO | S_IWUSR);
6310module_param_named(scsi_level, sdebug_scsi_level, int, S_IRUGO);
6311module_param_named(sector_size, sdebug_sector_size, int, S_IRUGO);
6312module_param_named(statistics, sdebug_statistics, bool, S_IRUGO | S_IWUSR);
6313module_param_named(strict, sdebug_strict, bool, S_IRUGO | S_IWUSR);
6314module_param_named(submit_queues, submit_queues, int, S_IRUGO);
6315module_param_named(poll_queues, poll_queues, int, S_IRUGO);
6316module_param_named(tur_ms_to_ready, sdeb_tur_ms_to_ready, int, S_IRUGO);
6317module_param_named(unmap_alignment, sdebug_unmap_alignment, int, S_IRUGO);
6318module_param_named(unmap_granularity, sdebug_unmap_granularity, int, S_IRUGO);
6319module_param_named(unmap_max_blocks, sdebug_unmap_max_blocks, int, S_IRUGO);
6320module_param_named(unmap_max_desc, sdebug_unmap_max_desc, int, S_IRUGO);
6321module_param_named(uuid_ctl, sdebug_uuid_ctl, int, S_IRUGO);
6322module_param_named(virtual_gb, sdebug_virtual_gb, int, S_IRUGO | S_IWUSR);
6323module_param_named(vpd_use_hostno, sdebug_vpd_use_hostno, int,
6324 S_IRUGO | S_IWUSR);
6325module_param_named(wp, sdebug_wp, bool, S_IRUGO | S_IWUSR);
6326module_param_named(write_same_length, sdebug_write_same_length, int,
6327 S_IRUGO | S_IWUSR);
6328module_param_named(zbc, sdeb_zbc_model_s, charp, S_IRUGO);
6329module_param_named(zone_cap_mb, sdeb_zbc_zone_cap_mb, int, S_IRUGO);
6330module_param_named(zone_max_open, sdeb_zbc_max_open, int, S_IRUGO);
6331module_param_named(zone_nr_conv, sdeb_zbc_nr_conv, int, S_IRUGO);
6332module_param_named(zone_size_mb, sdeb_zbc_zone_size_mb, int, S_IRUGO);
6333module_param_named(allow_restart, sdebug_allow_restart, bool, S_IRUGO | S_IWUSR);
6334
6335MODULE_AUTHOR("Eric Youngdale + Douglas Gilbert");
6336MODULE_DESCRIPTION("SCSI debug adapter driver");
6337MODULE_LICENSE("GPL");
6338MODULE_VERSION(SDEBUG_VERSION);
6339
6340MODULE_PARM_DESC(add_host, "add n hosts, in sysfs if negative remove host(s) (def=1)");
6341MODULE_PARM_DESC(ato, "application tag ownership: 0=disk 1=host (def=1)");
6342MODULE_PARM_DESC(cdb_len, "suggest CDB lengths to drivers (def=10)");
6343MODULE_PARM_DESC(clustering, "when set enables larger transfers (def=0)");
6344MODULE_PARM_DESC(delay, "response delay (def=1 jiffy); 0:imm, -1,-2:tiny");
6345MODULE_PARM_DESC(dev_size_mb, "size in MiB of ram shared by devs(def=8)");
6346MODULE_PARM_DESC(dif, "data integrity field type: 0-3 (def=0)");
6347MODULE_PARM_DESC(dix, "data integrity extensions mask (def=0)");
6348MODULE_PARM_DESC(dsense, "use descriptor sense format(def=0 -> fixed)");
6349MODULE_PARM_DESC(every_nth, "timeout every nth command(def=0)");
6350MODULE_PARM_DESC(fake_rw, "fake reads/writes instead of copying (def=0)");
6351MODULE_PARM_DESC(guard, "protection checksum: 0=crc, 1=ip (def=0)");
6352MODULE_PARM_DESC(host_lock, "host_lock is ignored (def=0)");
6353MODULE_PARM_DESC(host_max_queue,
6354 "host max # of queued cmds (0 to max(def) [max_queue fixed equal for !0])");
6355MODULE_PARM_DESC(inq_product, "SCSI INQUIRY product string (def=\"scsi_debug\")");
6356MODULE_PARM_DESC(inq_rev, "SCSI INQUIRY revision string (def=\""
6357 SDEBUG_VERSION "\")");
6358MODULE_PARM_DESC(inq_vendor, "SCSI INQUIRY vendor string (def=\"Linux\")");
6359MODULE_PARM_DESC(lbprz,
6360 "on read unmapped LBs return 0 when 1 (def), return 0xff when 2");
6361MODULE_PARM_DESC(lbpu, "enable LBP, support UNMAP command (def=0)");
6362MODULE_PARM_DESC(lbpws, "enable LBP, support WRITE SAME(16) with UNMAP bit (def=0)");
6363MODULE_PARM_DESC(lbpws10, "enable LBP, support WRITE SAME(10) with UNMAP bit (def=0)");
6364MODULE_PARM_DESC(lowest_aligned, "lowest aligned lba (def=0)");
6365MODULE_PARM_DESC(lun_format, "LUN format: 0->peripheral (def); 1 --> flat address method");
6366MODULE_PARM_DESC(max_luns, "number of LUNs per target to simulate(def=1)");
6367MODULE_PARM_DESC(max_queue, "max number of queued commands (1 to max(def))");
6368MODULE_PARM_DESC(medium_error_count, "count of sectors to return follow on MEDIUM error");
6369MODULE_PARM_DESC(medium_error_start, "starting sector number to return MEDIUM error");
6370MODULE_PARM_DESC(ndelay, "response delay in nanoseconds (def=0 -> ignore)");
6371MODULE_PARM_DESC(no_lun_0, "no LU number 0 (def=0 -> have lun 0)");
6372MODULE_PARM_DESC(no_rwlock, "don't protect user data reads+writes (def=0)");
6373MODULE_PARM_DESC(no_uld, "stop ULD (e.g. sd driver) attaching (def=0))");
6374MODULE_PARM_DESC(num_parts, "number of partitions(def=0)");
6375MODULE_PARM_DESC(num_tgts, "number of targets per host to simulate(def=1)");
6376MODULE_PARM_DESC(opt_blks, "optimal transfer length in blocks (def=1024)");
6377MODULE_PARM_DESC(opt_xferlen_exp, "optimal transfer length granularity exponent (def=physblk_exp)");
6378MODULE_PARM_DESC(opts, "1->noise, 2->medium_err, 4->timeout, 8->recovered_err... (def=0)");
6379MODULE_PARM_DESC(per_host_store, "If set, next positive add_host will get new store (def=0)");
6380MODULE_PARM_DESC(physblk_exp, "physical block exponent (def=0)");
6381MODULE_PARM_DESC(poll_queues, "support for iouring iopoll queues (1 to max(submit_queues - 1))");
6382MODULE_PARM_DESC(ptype, "SCSI peripheral type(def=0[disk])");
6383MODULE_PARM_DESC(random, "If set, uniformly randomize command duration between 0 and delay_in_ns");
6384MODULE_PARM_DESC(removable, "claim to have removable media (def=0)");
6385MODULE_PARM_DESC(scsi_level, "SCSI level to simulate(def=7[SPC-5])");
6386MODULE_PARM_DESC(sector_size, "logical block size in bytes (def=512)");
6387MODULE_PARM_DESC(statistics, "collect statistics on commands, queues (def=0)");
6388MODULE_PARM_DESC(strict, "stricter checks: reserved field in cdb (def=0)");
6389MODULE_PARM_DESC(submit_queues, "support for block multi-queue (def=1)");
6390MODULE_PARM_DESC(tur_ms_to_ready, "TEST UNIT READY millisecs before initial good status (def=0)");
6391MODULE_PARM_DESC(unmap_alignment, "lowest aligned thin provisioning lba (def=0)");
6392MODULE_PARM_DESC(unmap_granularity, "thin provisioning granularity in blocks (def=1)");
6393MODULE_PARM_DESC(unmap_max_blocks, "max # of blocks can be unmapped in one cmd (def=0xffffffff)");
6394MODULE_PARM_DESC(unmap_max_desc, "max # of ranges that can be unmapped in one cmd (def=256)");
6395MODULE_PARM_DESC(uuid_ctl,
6396 "1->use uuid for lu name, 0->don't, 2->all use same (def=0)");
6397MODULE_PARM_DESC(virtual_gb, "virtual gigabyte (GiB) size (def=0 -> use dev_size_mb)");
6398MODULE_PARM_DESC(vpd_use_hostno, "0 -> dev ids ignore hostno (def=1 -> unique dev ids)");
6399MODULE_PARM_DESC(wp, "Write Protect (def=0)");
6400MODULE_PARM_DESC(write_same_length, "Maximum blocks per WRITE SAME cmd (def=0xffff)");
6401MODULE_PARM_DESC(zbc, "'none' [0]; 'aware' [1]; 'managed' [2] (def=0). Can have 'host-' prefix");
6402MODULE_PARM_DESC(zone_cap_mb, "Zone capacity in MiB (def=zone size)");
6403MODULE_PARM_DESC(zone_max_open, "Maximum number of open zones; [0] for no limit (def=auto)");
6404MODULE_PARM_DESC(zone_nr_conv, "Number of conventional zones (def=1)");
6405MODULE_PARM_DESC(zone_size_mb, "Zone size in MiB (def=auto)");
6406MODULE_PARM_DESC(allow_restart, "Set scsi_device's allow_restart flag(def=0)");
6407
6408#define SDEBUG_INFO_LEN 256
6409static char sdebug_info[SDEBUG_INFO_LEN];
6410
6411static const char *scsi_debug_info(struct Scsi_Host *shp)
6412{
6413 int k;
6414
6415 k = scnprintf(sdebug_info, SDEBUG_INFO_LEN, "%s: version %s [%s]\n",
6416 my_name, SDEBUG_VERSION, sdebug_version_date);
6417 if (k >= (SDEBUG_INFO_LEN - 1))
6418 return sdebug_info;
6419 scnprintf(sdebug_info + k, SDEBUG_INFO_LEN - k,
6420 " dev_size_mb=%d, opts=0x%x, submit_queues=%d, %s=%d",
6421 sdebug_dev_size_mb, sdebug_opts, submit_queues,
6422 "statistics", (int)sdebug_statistics);
6423 return sdebug_info;
6424}
6425
6426/* 'echo <val> > /proc/scsi/scsi_debug/<host_id>' writes to opts */
6427static int scsi_debug_write_info(struct Scsi_Host *host, char *buffer,
6428 int length)
6429{
6430 char arr[16];
6431 int opts;
6432 int minLen = length > 15 ? 15 : length;
6433
6434 if (!capable(CAP_SYS_ADMIN) || !capable(CAP_SYS_RAWIO))
6435 return -EACCES;
6436 memcpy(arr, buffer, minLen);
6437 arr[minLen] = '\0';
6438 if (1 != sscanf(arr, "%d", &opts))
6439 return -EINVAL;
6440 sdebug_opts = opts;
6441 sdebug_verbose = !!(SDEBUG_OPT_NOISE & opts);
6442 sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & opts);
6443 if (sdebug_every_nth != 0)
6444 tweak_cmnd_count();
6445 return length;
6446}
6447
6448struct sdebug_submit_queue_data {
6449 int *first;
6450 int *last;
6451 int queue_num;
6452};
6453
6454static bool sdebug_submit_queue_iter(struct request *rq, void *opaque)
6455{
6456 struct sdebug_submit_queue_data *data = opaque;
6457 u32 unique_tag = blk_mq_unique_tag(rq);
6458 u16 hwq = blk_mq_unique_tag_to_hwq(unique_tag);
6459 u16 tag = blk_mq_unique_tag_to_tag(unique_tag);
6460 int queue_num = data->queue_num;
6461
6462 if (hwq != queue_num)
6463 return true;
6464
6465 /* Rely on iter'ing in ascending tag order */
6466 if (*data->first == -1)
6467 *data->first = *data->last = tag;
6468 else
6469 *data->last = tag;
6470
6471 return true;
6472}
6473
6474/* Output seen with 'cat /proc/scsi/scsi_debug/<host_id>'. It will be the
6475 * same for each scsi_debug host (if more than one). Some of the counters
6476 * output are not atomics so might be inaccurate in a busy system. */
6477static int scsi_debug_show_info(struct seq_file *m, struct Scsi_Host *host)
6478{
6479 struct sdebug_host_info *sdhp;
6480 int j;
6481
6482 seq_printf(m, "scsi_debug adapter driver, version %s [%s]\n",
6483 SDEBUG_VERSION, sdebug_version_date);
6484 seq_printf(m, "num_tgts=%d, %ssize=%d MB, opts=0x%x, every_nth=%d\n",
6485 sdebug_num_tgts, "shared (ram) ", sdebug_dev_size_mb,
6486 sdebug_opts, sdebug_every_nth);
6487 seq_printf(m, "delay=%d, ndelay=%d, max_luns=%d, sector_size=%d %s\n",
6488 sdebug_jdelay, sdebug_ndelay, sdebug_max_luns,
6489 sdebug_sector_size, "bytes");
6490 seq_printf(m, "cylinders=%d, heads=%d, sectors=%d, command aborts=%d\n",
6491 sdebug_cylinders_per, sdebug_heads, sdebug_sectors_per,
6492 num_aborts);
6493 seq_printf(m, "RESETs: device=%d, target=%d, bus=%d, host=%d\n",
6494 num_dev_resets, num_target_resets, num_bus_resets,
6495 num_host_resets);
6496 seq_printf(m, "dix_reads=%d, dix_writes=%d, dif_errors=%d\n",
6497 dix_reads, dix_writes, dif_errors);
6498 seq_printf(m, "usec_in_jiffy=%lu, statistics=%d\n", TICK_NSEC / 1000,
6499 sdebug_statistics);
6500 seq_printf(m, "cmnd_count=%d, completions=%d, %s=%d, a_tsf=%d, mq_polls=%d\n",
6501 atomic_read(&sdebug_cmnd_count),
6502 atomic_read(&sdebug_completions),
6503 "miss_cpus", atomic_read(&sdebug_miss_cpus),
6504 atomic_read(&sdebug_a_tsf),
6505 atomic_read(&sdeb_mq_poll_count));
6506
6507 seq_printf(m, "submit_queues=%d\n", submit_queues);
6508 for (j = 0; j < submit_queues; ++j) {
6509 int f = -1, l = -1;
6510 struct sdebug_submit_queue_data data = {
6511 .queue_num = j,
6512 .first = &f,
6513 .last = &l,
6514 };
6515 seq_printf(m, " queue %d:\n", j);
6516 blk_mq_tagset_busy_iter(&host->tag_set, sdebug_submit_queue_iter,
6517 &data);
6518 if (f >= 0) {
6519 seq_printf(m, " in_use_bm BUSY: %s: %d,%d\n",
6520 "first,last bits", f, l);
6521 }
6522 }
6523
6524 seq_printf(m, "this host_no=%d\n", host->host_no);
6525 if (!xa_empty(per_store_ap)) {
6526 bool niu;
6527 int idx;
6528 unsigned long l_idx;
6529 struct sdeb_store_info *sip;
6530
6531 seq_puts(m, "\nhost list:\n");
6532 j = 0;
6533 list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
6534 idx = sdhp->si_idx;
6535 seq_printf(m, " %d: host_no=%d, si_idx=%d\n", j,
6536 sdhp->shost->host_no, idx);
6537 ++j;
6538 }
6539 seq_printf(m, "\nper_store array [most_recent_idx=%d]:\n",
6540 sdeb_most_recent_idx);
6541 j = 0;
6542 xa_for_each(per_store_ap, l_idx, sip) {
6543 niu = xa_get_mark(per_store_ap, l_idx,
6544 SDEB_XA_NOT_IN_USE);
6545 idx = (int)l_idx;
6546 seq_printf(m, " %d: idx=%d%s\n", j, idx,
6547 (niu ? " not_in_use" : ""));
6548 ++j;
6549 }
6550 }
6551 return 0;
6552}
6553
6554static ssize_t delay_show(struct device_driver *ddp, char *buf)
6555{
6556 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_jdelay);
6557}
6558/* Returns -EBUSY if jdelay is being changed and commands are queued. The unit
6559 * of delay is jiffies.
6560 */
6561static ssize_t delay_store(struct device_driver *ddp, const char *buf,
6562 size_t count)
6563{
6564 int jdelay, res;
6565
6566 if (count > 0 && sscanf(buf, "%d", &jdelay) == 1) {
6567 res = count;
6568 if (sdebug_jdelay != jdelay) {
6569 struct sdebug_host_info *sdhp;
6570
6571 mutex_lock(&sdebug_host_list_mutex);
6572 block_unblock_all_queues(true);
6573
6574 list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
6575 struct Scsi_Host *shost = sdhp->shost;
6576
6577 if (scsi_host_busy(shost)) {
6578 res = -EBUSY; /* queued commands */
6579 break;
6580 }
6581 }
6582 if (res > 0) {
6583 sdebug_jdelay = jdelay;
6584 sdebug_ndelay = 0;
6585 }
6586 block_unblock_all_queues(false);
6587 mutex_unlock(&sdebug_host_list_mutex);
6588 }
6589 return res;
6590 }
6591 return -EINVAL;
6592}
6593static DRIVER_ATTR_RW(delay);
6594
6595static ssize_t ndelay_show(struct device_driver *ddp, char *buf)
6596{
6597 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ndelay);
6598}
6599/* Returns -EBUSY if ndelay is being changed and commands are queued */
6600/* If > 0 and accepted then sdebug_jdelay is set to JDELAY_OVERRIDDEN */
6601static ssize_t ndelay_store(struct device_driver *ddp, const char *buf,
6602 size_t count)
6603{
6604 int ndelay, res;
6605
6606 if ((count > 0) && (1 == sscanf(buf, "%d", &ndelay)) &&
6607 (ndelay >= 0) && (ndelay < (1000 * 1000 * 1000))) {
6608 res = count;
6609 if (sdebug_ndelay != ndelay) {
6610 struct sdebug_host_info *sdhp;
6611
6612 mutex_lock(&sdebug_host_list_mutex);
6613 block_unblock_all_queues(true);
6614
6615 list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
6616 struct Scsi_Host *shost = sdhp->shost;
6617
6618 if (scsi_host_busy(shost)) {
6619 res = -EBUSY; /* queued commands */
6620 break;
6621 }
6622 }
6623
6624 if (res > 0) {
6625 sdebug_ndelay = ndelay;
6626 sdebug_jdelay = ndelay ? JDELAY_OVERRIDDEN
6627 : DEF_JDELAY;
6628 }
6629 block_unblock_all_queues(false);
6630 mutex_unlock(&sdebug_host_list_mutex);
6631 }
6632 return res;
6633 }
6634 return -EINVAL;
6635}
6636static DRIVER_ATTR_RW(ndelay);
6637
6638static ssize_t opts_show(struct device_driver *ddp, char *buf)
6639{
6640 return scnprintf(buf, PAGE_SIZE, "0x%x\n", sdebug_opts);
6641}
6642
6643static ssize_t opts_store(struct device_driver *ddp, const char *buf,
6644 size_t count)
6645{
6646 int opts;
6647 char work[20];
6648
6649 if (sscanf(buf, "%10s", work) == 1) {
6650 if (strncasecmp(work, "0x", 2) == 0) {
6651 if (kstrtoint(work + 2, 16, &opts) == 0)
6652 goto opts_done;
6653 } else {
6654 if (kstrtoint(work, 10, &opts) == 0)
6655 goto opts_done;
6656 }
6657 }
6658 return -EINVAL;
6659opts_done:
6660 sdebug_opts = opts;
6661 sdebug_verbose = !!(SDEBUG_OPT_NOISE & opts);
6662 sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & opts);
6663 tweak_cmnd_count();
6664 return count;
6665}
6666static DRIVER_ATTR_RW(opts);
6667
6668static ssize_t ptype_show(struct device_driver *ddp, char *buf)
6669{
6670 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ptype);
6671}
6672static ssize_t ptype_store(struct device_driver *ddp, const char *buf,
6673 size_t count)
6674{
6675 int n;
6676
6677 /* Cannot change from or to TYPE_ZBC with sysfs */
6678 if (sdebug_ptype == TYPE_ZBC)
6679 return -EINVAL;
6680
6681 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6682 if (n == TYPE_ZBC)
6683 return -EINVAL;
6684 sdebug_ptype = n;
6685 return count;
6686 }
6687 return -EINVAL;
6688}
6689static DRIVER_ATTR_RW(ptype);
6690
6691static ssize_t dsense_show(struct device_driver *ddp, char *buf)
6692{
6693 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dsense);
6694}
6695static ssize_t dsense_store(struct device_driver *ddp, const char *buf,
6696 size_t count)
6697{
6698 int n;
6699
6700 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6701 sdebug_dsense = n;
6702 return count;
6703 }
6704 return -EINVAL;
6705}
6706static DRIVER_ATTR_RW(dsense);
6707
6708static ssize_t fake_rw_show(struct device_driver *ddp, char *buf)
6709{
6710 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_fake_rw);
6711}
6712static ssize_t fake_rw_store(struct device_driver *ddp, const char *buf,
6713 size_t count)
6714{
6715 int n, idx;
6716
6717 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6718 bool want_store = (n == 0);
6719 struct sdebug_host_info *sdhp;
6720
6721 n = (n > 0);
6722 sdebug_fake_rw = (sdebug_fake_rw > 0);
6723 if (sdebug_fake_rw == n)
6724 return count; /* not transitioning so do nothing */
6725
6726 if (want_store) { /* 1 --> 0 transition, set up store */
6727 if (sdeb_first_idx < 0) {
6728 idx = sdebug_add_store();
6729 if (idx < 0)
6730 return idx;
6731 } else {
6732 idx = sdeb_first_idx;
6733 xa_clear_mark(per_store_ap, idx,
6734 SDEB_XA_NOT_IN_USE);
6735 }
6736 /* make all hosts use same store */
6737 list_for_each_entry(sdhp, &sdebug_host_list,
6738 host_list) {
6739 if (sdhp->si_idx != idx) {
6740 xa_set_mark(per_store_ap, sdhp->si_idx,
6741 SDEB_XA_NOT_IN_USE);
6742 sdhp->si_idx = idx;
6743 }
6744 }
6745 sdeb_most_recent_idx = idx;
6746 } else { /* 0 --> 1 transition is trigger for shrink */
6747 sdebug_erase_all_stores(true /* apart from first */);
6748 }
6749 sdebug_fake_rw = n;
6750 return count;
6751 }
6752 return -EINVAL;
6753}
6754static DRIVER_ATTR_RW(fake_rw);
6755
6756static ssize_t no_lun_0_show(struct device_driver *ddp, char *buf)
6757{
6758 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_lun_0);
6759}
6760static ssize_t no_lun_0_store(struct device_driver *ddp, const char *buf,
6761 size_t count)
6762{
6763 int n;
6764
6765 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6766 sdebug_no_lun_0 = n;
6767 return count;
6768 }
6769 return -EINVAL;
6770}
6771static DRIVER_ATTR_RW(no_lun_0);
6772
6773static ssize_t num_tgts_show(struct device_driver *ddp, char *buf)
6774{
6775 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_tgts);
6776}
6777static ssize_t num_tgts_store(struct device_driver *ddp, const char *buf,
6778 size_t count)
6779{
6780 int n;
6781
6782 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6783 sdebug_num_tgts = n;
6784 sdebug_max_tgts_luns();
6785 return count;
6786 }
6787 return -EINVAL;
6788}
6789static DRIVER_ATTR_RW(num_tgts);
6790
6791static ssize_t dev_size_mb_show(struct device_driver *ddp, char *buf)
6792{
6793 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dev_size_mb);
6794}
6795static DRIVER_ATTR_RO(dev_size_mb);
6796
6797static ssize_t per_host_store_show(struct device_driver *ddp, char *buf)
6798{
6799 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_per_host_store);
6800}
6801
6802static ssize_t per_host_store_store(struct device_driver *ddp, const char *buf,
6803 size_t count)
6804{
6805 bool v;
6806
6807 if (kstrtobool(buf, &v))
6808 return -EINVAL;
6809
6810 sdebug_per_host_store = v;
6811 return count;
6812}
6813static DRIVER_ATTR_RW(per_host_store);
6814
6815static ssize_t num_parts_show(struct device_driver *ddp, char *buf)
6816{
6817 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_parts);
6818}
6819static DRIVER_ATTR_RO(num_parts);
6820
6821static ssize_t every_nth_show(struct device_driver *ddp, char *buf)
6822{
6823 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_every_nth);
6824}
6825static ssize_t every_nth_store(struct device_driver *ddp, const char *buf,
6826 size_t count)
6827{
6828 int nth;
6829 char work[20];
6830
6831 if (sscanf(buf, "%10s", work) == 1) {
6832 if (strncasecmp(work, "0x", 2) == 0) {
6833 if (kstrtoint(work + 2, 16, &nth) == 0)
6834 goto every_nth_done;
6835 } else {
6836 if (kstrtoint(work, 10, &nth) == 0)
6837 goto every_nth_done;
6838 }
6839 }
6840 return -EINVAL;
6841
6842every_nth_done:
6843 sdebug_every_nth = nth;
6844 if (nth && !sdebug_statistics) {
6845 pr_info("every_nth needs statistics=1, set it\n");
6846 sdebug_statistics = true;
6847 }
6848 tweak_cmnd_count();
6849 return count;
6850}
6851static DRIVER_ATTR_RW(every_nth);
6852
6853static ssize_t lun_format_show(struct device_driver *ddp, char *buf)
6854{
6855 return scnprintf(buf, PAGE_SIZE, "%d\n", (int)sdebug_lun_am);
6856}
6857static ssize_t lun_format_store(struct device_driver *ddp, const char *buf,
6858 size_t count)
6859{
6860 int n;
6861 bool changed;
6862
6863 if (kstrtoint(buf, 0, &n))
6864 return -EINVAL;
6865 if (n >= 0) {
6866 if (n > (int)SAM_LUN_AM_FLAT) {
6867 pr_warn("only LUN address methods 0 and 1 are supported\n");
6868 return -EINVAL;
6869 }
6870 changed = ((int)sdebug_lun_am != n);
6871 sdebug_lun_am = n;
6872 if (changed && sdebug_scsi_level >= 5) { /* >= SPC-3 */
6873 struct sdebug_host_info *sdhp;
6874 struct sdebug_dev_info *dp;
6875
6876 mutex_lock(&sdebug_host_list_mutex);
6877 list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
6878 list_for_each_entry(dp, &sdhp->dev_info_list, dev_list) {
6879 set_bit(SDEBUG_UA_LUNS_CHANGED, dp->uas_bm);
6880 }
6881 }
6882 mutex_unlock(&sdebug_host_list_mutex);
6883 }
6884 return count;
6885 }
6886 return -EINVAL;
6887}
6888static DRIVER_ATTR_RW(lun_format);
6889
6890static ssize_t max_luns_show(struct device_driver *ddp, char *buf)
6891{
6892 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_max_luns);
6893}
6894static ssize_t max_luns_store(struct device_driver *ddp, const char *buf,
6895 size_t count)
6896{
6897 int n;
6898 bool changed;
6899
6900 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
6901 if (n > 256) {
6902 pr_warn("max_luns can be no more than 256\n");
6903 return -EINVAL;
6904 }
6905 changed = (sdebug_max_luns != n);
6906 sdebug_max_luns = n;
6907 sdebug_max_tgts_luns();
6908 if (changed && (sdebug_scsi_level >= 5)) { /* >= SPC-3 */
6909 struct sdebug_host_info *sdhp;
6910 struct sdebug_dev_info *dp;
6911
6912 mutex_lock(&sdebug_host_list_mutex);
6913 list_for_each_entry(sdhp, &sdebug_host_list,
6914 host_list) {
6915 list_for_each_entry(dp, &sdhp->dev_info_list,
6916 dev_list) {
6917 set_bit(SDEBUG_UA_LUNS_CHANGED,
6918 dp->uas_bm);
6919 }
6920 }
6921 mutex_unlock(&sdebug_host_list_mutex);
6922 }
6923 return count;
6924 }
6925 return -EINVAL;
6926}
6927static DRIVER_ATTR_RW(max_luns);
6928
6929static ssize_t max_queue_show(struct device_driver *ddp, char *buf)
6930{
6931 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_max_queue);
6932}
6933/* N.B. max_queue can be changed while there are queued commands. In flight
6934 * commands beyond the new max_queue will be completed. */
6935static ssize_t max_queue_store(struct device_driver *ddp, const char *buf,
6936 size_t count)
6937{
6938 int n;
6939
6940 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n > 0) &&
6941 (n <= SDEBUG_CANQUEUE) &&
6942 (sdebug_host_max_queue == 0)) {
6943 mutex_lock(&sdebug_host_list_mutex);
6944
6945 /* We may only change sdebug_max_queue when we have no shosts */
6946 if (list_empty(&sdebug_host_list))
6947 sdebug_max_queue = n;
6948 else
6949 count = -EBUSY;
6950 mutex_unlock(&sdebug_host_list_mutex);
6951 return count;
6952 }
6953 return -EINVAL;
6954}
6955static DRIVER_ATTR_RW(max_queue);
6956
6957static ssize_t host_max_queue_show(struct device_driver *ddp, char *buf)
6958{
6959 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_host_max_queue);
6960}
6961
6962static ssize_t no_rwlock_show(struct device_driver *ddp, char *buf)
6963{
6964 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_rwlock);
6965}
6966
6967static ssize_t no_rwlock_store(struct device_driver *ddp, const char *buf, size_t count)
6968{
6969 bool v;
6970
6971 if (kstrtobool(buf, &v))
6972 return -EINVAL;
6973
6974 sdebug_no_rwlock = v;
6975 return count;
6976}
6977static DRIVER_ATTR_RW(no_rwlock);
6978
6979/*
6980 * Since this is used for .can_queue, and we get the hc_idx tag from the bitmap
6981 * in range [0, sdebug_host_max_queue), we can't change it.
6982 */
6983static DRIVER_ATTR_RO(host_max_queue);
6984
6985static ssize_t no_uld_show(struct device_driver *ddp, char *buf)
6986{
6987 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_uld);
6988}
6989static DRIVER_ATTR_RO(no_uld);
6990
6991static ssize_t scsi_level_show(struct device_driver *ddp, char *buf)
6992{
6993 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_scsi_level);
6994}
6995static DRIVER_ATTR_RO(scsi_level);
6996
6997static ssize_t virtual_gb_show(struct device_driver *ddp, char *buf)
6998{
6999 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_virtual_gb);
7000}
7001static ssize_t virtual_gb_store(struct device_driver *ddp, const char *buf,
7002 size_t count)
7003{
7004 int n;
7005 bool changed;
7006
7007 /* Ignore capacity change for ZBC drives for now */
7008 if (sdeb_zbc_in_use)
7009 return -ENOTSUPP;
7010
7011 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
7012 changed = (sdebug_virtual_gb != n);
7013 sdebug_virtual_gb = n;
7014 sdebug_capacity = get_sdebug_capacity();
7015 if (changed) {
7016 struct sdebug_host_info *sdhp;
7017 struct sdebug_dev_info *dp;
7018
7019 mutex_lock(&sdebug_host_list_mutex);
7020 list_for_each_entry(sdhp, &sdebug_host_list,
7021 host_list) {
7022 list_for_each_entry(dp, &sdhp->dev_info_list,
7023 dev_list) {
7024 set_bit(SDEBUG_UA_CAPACITY_CHANGED,
7025 dp->uas_bm);
7026 }
7027 }
7028 mutex_unlock(&sdebug_host_list_mutex);
7029 }
7030 return count;
7031 }
7032 return -EINVAL;
7033}
7034static DRIVER_ATTR_RW(virtual_gb);
7035
7036static ssize_t add_host_show(struct device_driver *ddp, char *buf)
7037{
7038 /* absolute number of hosts currently active is what is shown */
7039 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_hosts);
7040}
7041
7042static ssize_t add_host_store(struct device_driver *ddp, const char *buf,
7043 size_t count)
7044{
7045 bool found;
7046 unsigned long idx;
7047 struct sdeb_store_info *sip;
7048 bool want_phs = (sdebug_fake_rw == 0) && sdebug_per_host_store;
7049 int delta_hosts;
7050
7051 if (sscanf(buf, "%d", &delta_hosts) != 1)
7052 return -EINVAL;
7053 if (delta_hosts > 0) {
7054 do {
7055 found = false;
7056 if (want_phs) {
7057 xa_for_each_marked(per_store_ap, idx, sip,
7058 SDEB_XA_NOT_IN_USE) {
7059 sdeb_most_recent_idx = (int)idx;
7060 found = true;
7061 break;
7062 }
7063 if (found) /* re-use case */
7064 sdebug_add_host_helper((int)idx);
7065 else
7066 sdebug_do_add_host(true);
7067 } else {
7068 sdebug_do_add_host(false);
7069 }
7070 } while (--delta_hosts);
7071 } else if (delta_hosts < 0) {
7072 do {
7073 sdebug_do_remove_host(false);
7074 } while (++delta_hosts);
7075 }
7076 return count;
7077}
7078static DRIVER_ATTR_RW(add_host);
7079
7080static ssize_t vpd_use_hostno_show(struct device_driver *ddp, char *buf)
7081{
7082 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_vpd_use_hostno);
7083}
7084static ssize_t vpd_use_hostno_store(struct device_driver *ddp, const char *buf,
7085 size_t count)
7086{
7087 int n;
7088
7089 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
7090 sdebug_vpd_use_hostno = n;
7091 return count;
7092 }
7093 return -EINVAL;
7094}
7095static DRIVER_ATTR_RW(vpd_use_hostno);
7096
7097static ssize_t statistics_show(struct device_driver *ddp, char *buf)
7098{
7099 return scnprintf(buf, PAGE_SIZE, "%d\n", (int)sdebug_statistics);
7100}
7101static ssize_t statistics_store(struct device_driver *ddp, const char *buf,
7102 size_t count)
7103{
7104 int n;
7105
7106 if ((count > 0) && (sscanf(buf, "%d", &n) == 1) && (n >= 0)) {
7107 if (n > 0)
7108 sdebug_statistics = true;
7109 else {
7110 clear_queue_stats();
7111 sdebug_statistics = false;
7112 }
7113 return count;
7114 }
7115 return -EINVAL;
7116}
7117static DRIVER_ATTR_RW(statistics);
7118
7119static ssize_t sector_size_show(struct device_driver *ddp, char *buf)
7120{
7121 return scnprintf(buf, PAGE_SIZE, "%u\n", sdebug_sector_size);
7122}
7123static DRIVER_ATTR_RO(sector_size);
7124
7125static ssize_t submit_queues_show(struct device_driver *ddp, char *buf)
7126{
7127 return scnprintf(buf, PAGE_SIZE, "%d\n", submit_queues);
7128}
7129static DRIVER_ATTR_RO(submit_queues);
7130
7131static ssize_t dix_show(struct device_driver *ddp, char *buf)
7132{
7133 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dix);
7134}
7135static DRIVER_ATTR_RO(dix);
7136
7137static ssize_t dif_show(struct device_driver *ddp, char *buf)
7138{
7139 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dif);
7140}
7141static DRIVER_ATTR_RO(dif);
7142
7143static ssize_t guard_show(struct device_driver *ddp, char *buf)
7144{
7145 return scnprintf(buf, PAGE_SIZE, "%u\n", sdebug_guard);
7146}
7147static DRIVER_ATTR_RO(guard);
7148
7149static ssize_t ato_show(struct device_driver *ddp, char *buf)
7150{
7151 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ato);
7152}
7153static DRIVER_ATTR_RO(ato);
7154
7155static ssize_t map_show(struct device_driver *ddp, char *buf)
7156{
7157 ssize_t count = 0;
7158
7159 if (!scsi_debug_lbp())
7160 return scnprintf(buf, PAGE_SIZE, "0-%u\n",
7161 sdebug_store_sectors);
7162
7163 if (sdebug_fake_rw == 0 && !xa_empty(per_store_ap)) {
7164 struct sdeb_store_info *sip = xa_load(per_store_ap, 0);
7165
7166 if (sip)
7167 count = scnprintf(buf, PAGE_SIZE - 1, "%*pbl",
7168 (int)map_size, sip->map_storep);
7169 }
7170 buf[count++] = '\n';
7171 buf[count] = '\0';
7172
7173 return count;
7174}
7175static DRIVER_ATTR_RO(map);
7176
7177static ssize_t random_show(struct device_driver *ddp, char *buf)
7178{
7179 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_random);
7180}
7181
7182static ssize_t random_store(struct device_driver *ddp, const char *buf,
7183 size_t count)
7184{
7185 bool v;
7186
7187 if (kstrtobool(buf, &v))
7188 return -EINVAL;
7189
7190 sdebug_random = v;
7191 return count;
7192}
7193static DRIVER_ATTR_RW(random);
7194
7195static ssize_t removable_show(struct device_driver *ddp, char *buf)
7196{
7197 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_removable ? 1 : 0);
7198}
7199static ssize_t removable_store(struct device_driver *ddp, const char *buf,
7200 size_t count)
7201{
7202 int n;
7203
7204 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
7205 sdebug_removable = (n > 0);
7206 return count;
7207 }
7208 return -EINVAL;
7209}
7210static DRIVER_ATTR_RW(removable);
7211
7212static ssize_t host_lock_show(struct device_driver *ddp, char *buf)
7213{
7214 return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_host_lock);
7215}
7216/* N.B. sdebug_host_lock does nothing, kept for backward compatibility */
7217static ssize_t host_lock_store(struct device_driver *ddp, const char *buf,
7218 size_t count)
7219{
7220 int n;
7221
7222 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
7223 sdebug_host_lock = (n > 0);
7224 return count;
7225 }
7226 return -EINVAL;
7227}
7228static DRIVER_ATTR_RW(host_lock);
7229
7230static ssize_t strict_show(struct device_driver *ddp, char *buf)
7231{
7232 return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_strict);
7233}
7234static ssize_t strict_store(struct device_driver *ddp, const char *buf,
7235 size_t count)
7236{
7237 int n;
7238
7239 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
7240 sdebug_strict = (n > 0);
7241 return count;
7242 }
7243 return -EINVAL;
7244}
7245static DRIVER_ATTR_RW(strict);
7246
7247static ssize_t uuid_ctl_show(struct device_driver *ddp, char *buf)
7248{
7249 return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_uuid_ctl);
7250}
7251static DRIVER_ATTR_RO(uuid_ctl);
7252
7253static ssize_t cdb_len_show(struct device_driver *ddp, char *buf)
7254{
7255 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_cdb_len);
7256}
7257static ssize_t cdb_len_store(struct device_driver *ddp, const char *buf,
7258 size_t count)
7259{
7260 int ret, n;
7261
7262 ret = kstrtoint(buf, 0, &n);
7263 if (ret)
7264 return ret;
7265 sdebug_cdb_len = n;
7266 all_config_cdb_len();
7267 return count;
7268}
7269static DRIVER_ATTR_RW(cdb_len);
7270
7271static const char * const zbc_model_strs_a[] = {
7272 [BLK_ZONED_NONE] = "none",
7273 [BLK_ZONED_HA] = "host-aware",
7274 [BLK_ZONED_HM] = "host-managed",
7275};
7276
7277static const char * const zbc_model_strs_b[] = {
7278 [BLK_ZONED_NONE] = "no",
7279 [BLK_ZONED_HA] = "aware",
7280 [BLK_ZONED_HM] = "managed",
7281};
7282
7283static const char * const zbc_model_strs_c[] = {
7284 [BLK_ZONED_NONE] = "0",
7285 [BLK_ZONED_HA] = "1",
7286 [BLK_ZONED_HM] = "2",
7287};
7288
7289static int sdeb_zbc_model_str(const char *cp)
7290{
7291 int res = sysfs_match_string(zbc_model_strs_a, cp);
7292
7293 if (res < 0) {
7294 res = sysfs_match_string(zbc_model_strs_b, cp);
7295 if (res < 0) {
7296 res = sysfs_match_string(zbc_model_strs_c, cp);
7297 if (res < 0)
7298 return -EINVAL;
7299 }
7300 }
7301 return res;
7302}
7303
7304static ssize_t zbc_show(struct device_driver *ddp, char *buf)
7305{
7306 return scnprintf(buf, PAGE_SIZE, "%s\n",
7307 zbc_model_strs_a[sdeb_zbc_model]);
7308}
7309static DRIVER_ATTR_RO(zbc);
7310
7311static ssize_t tur_ms_to_ready_show(struct device_driver *ddp, char *buf)
7312{
7313 return scnprintf(buf, PAGE_SIZE, "%d\n", sdeb_tur_ms_to_ready);
7314}
7315static DRIVER_ATTR_RO(tur_ms_to_ready);
7316
7317static ssize_t group_number_stats_show(struct device_driver *ddp, char *buf)
7318{
7319 char *p = buf, *end = buf + PAGE_SIZE;
7320 int i;
7321
7322 for (i = 0; i < ARRAY_SIZE(writes_by_group_number); i++)
7323 p += scnprintf(p, end - p, "%d %ld\n", i,
7324 atomic_long_read(&writes_by_group_number[i]));
7325
7326 return p - buf;
7327}
7328
7329static ssize_t group_number_stats_store(struct device_driver *ddp,
7330 const char *buf, size_t count)
7331{
7332 int i;
7333
7334 for (i = 0; i < ARRAY_SIZE(writes_by_group_number); i++)
7335 atomic_long_set(&writes_by_group_number[i], 0);
7336
7337 return count;
7338}
7339static DRIVER_ATTR_RW(group_number_stats);
7340
7341/* Note: The following array creates attribute files in the
7342 /sys/bus/pseudo/drivers/scsi_debug directory. The advantage of these
7343 files (over those found in the /sys/module/scsi_debug/parameters
7344 directory) is that auxiliary actions can be triggered when an attribute
7345 is changed. For example see: add_host_store() above.
7346 */
7347
7348static struct attribute *sdebug_drv_attrs[] = {
7349 &driver_attr_delay.attr,
7350 &driver_attr_opts.attr,
7351 &driver_attr_ptype.attr,
7352 &driver_attr_dsense.attr,
7353 &driver_attr_fake_rw.attr,
7354 &driver_attr_host_max_queue.attr,
7355 &driver_attr_no_lun_0.attr,
7356 &driver_attr_num_tgts.attr,
7357 &driver_attr_dev_size_mb.attr,
7358 &driver_attr_num_parts.attr,
7359 &driver_attr_every_nth.attr,
7360 &driver_attr_lun_format.attr,
7361 &driver_attr_max_luns.attr,
7362 &driver_attr_max_queue.attr,
7363 &driver_attr_no_rwlock.attr,
7364 &driver_attr_no_uld.attr,
7365 &driver_attr_scsi_level.attr,
7366 &driver_attr_virtual_gb.attr,
7367 &driver_attr_add_host.attr,
7368 &driver_attr_per_host_store.attr,
7369 &driver_attr_vpd_use_hostno.attr,
7370 &driver_attr_sector_size.attr,
7371 &driver_attr_statistics.attr,
7372 &driver_attr_submit_queues.attr,
7373 &driver_attr_dix.attr,
7374 &driver_attr_dif.attr,
7375 &driver_attr_guard.attr,
7376 &driver_attr_ato.attr,
7377 &driver_attr_map.attr,
7378 &driver_attr_random.attr,
7379 &driver_attr_removable.attr,
7380 &driver_attr_host_lock.attr,
7381 &driver_attr_ndelay.attr,
7382 &driver_attr_strict.attr,
7383 &driver_attr_uuid_ctl.attr,
7384 &driver_attr_cdb_len.attr,
7385 &driver_attr_tur_ms_to_ready.attr,
7386 &driver_attr_zbc.attr,
7387 &driver_attr_group_number_stats.attr,
7388 NULL,
7389};
7390ATTRIBUTE_GROUPS(sdebug_drv);
7391
7392static struct device *pseudo_primary;
7393
7394static int __init scsi_debug_init(void)
7395{
7396 bool want_store = (sdebug_fake_rw == 0);
7397 unsigned long sz;
7398 int k, ret, hosts_to_add;
7399 int idx = -1;
7400
7401 if (sdebug_ndelay >= 1000 * 1000 * 1000) {
7402 pr_warn("ndelay must be less than 1 second, ignored\n");
7403 sdebug_ndelay = 0;
7404 } else if (sdebug_ndelay > 0)
7405 sdebug_jdelay = JDELAY_OVERRIDDEN;
7406
7407 switch (sdebug_sector_size) {
7408 case 512:
7409 case 1024:
7410 case 2048:
7411 case 4096:
7412 break;
7413 default:
7414 pr_err("invalid sector_size %d\n", sdebug_sector_size);
7415 return -EINVAL;
7416 }
7417
7418 switch (sdebug_dif) {
7419 case T10_PI_TYPE0_PROTECTION:
7420 break;
7421 case T10_PI_TYPE1_PROTECTION:
7422 case T10_PI_TYPE2_PROTECTION:
7423 case T10_PI_TYPE3_PROTECTION:
7424 have_dif_prot = true;
7425 break;
7426
7427 default:
7428 pr_err("dif must be 0, 1, 2 or 3\n");
7429 return -EINVAL;
7430 }
7431
7432 if (sdebug_num_tgts < 0) {
7433 pr_err("num_tgts must be >= 0\n");
7434 return -EINVAL;
7435 }
7436
7437 if (sdebug_guard > 1) {
7438 pr_err("guard must be 0 or 1\n");
7439 return -EINVAL;
7440 }
7441
7442 if (sdebug_ato > 1) {
7443 pr_err("ato must be 0 or 1\n");
7444 return -EINVAL;
7445 }
7446
7447 if (sdebug_physblk_exp > 15) {
7448 pr_err("invalid physblk_exp %u\n", sdebug_physblk_exp);
7449 return -EINVAL;
7450 }
7451
7452 sdebug_lun_am = sdebug_lun_am_i;
7453 if (sdebug_lun_am > SAM_LUN_AM_FLAT) {
7454 pr_warn("Invalid LUN format %u, using default\n", (int)sdebug_lun_am);
7455 sdebug_lun_am = SAM_LUN_AM_PERIPHERAL;
7456 }
7457
7458 if (sdebug_max_luns > 256) {
7459 if (sdebug_max_luns > 16384) {
7460 pr_warn("max_luns can be no more than 16384, use default\n");
7461 sdebug_max_luns = DEF_MAX_LUNS;
7462 }
7463 sdebug_lun_am = SAM_LUN_AM_FLAT;
7464 }
7465
7466 if (sdebug_lowest_aligned > 0x3fff) {
7467 pr_err("lowest_aligned too big: %u\n", sdebug_lowest_aligned);
7468 return -EINVAL;
7469 }
7470
7471 if (submit_queues < 1) {
7472 pr_err("submit_queues must be 1 or more\n");
7473 return -EINVAL;
7474 }
7475
7476 if ((sdebug_max_queue > SDEBUG_CANQUEUE) || (sdebug_max_queue < 1)) {
7477 pr_err("max_queue must be in range [1, %d]\n", SDEBUG_CANQUEUE);
7478 return -EINVAL;
7479 }
7480
7481 if ((sdebug_host_max_queue > SDEBUG_CANQUEUE) ||
7482 (sdebug_host_max_queue < 0)) {
7483 pr_err("host_max_queue must be in range [0 %d]\n",
7484 SDEBUG_CANQUEUE);
7485 return -EINVAL;
7486 }
7487
7488 if (sdebug_host_max_queue &&
7489 (sdebug_max_queue != sdebug_host_max_queue)) {
7490 sdebug_max_queue = sdebug_host_max_queue;
7491 pr_warn("fixing max submit queue depth to host max queue depth, %d\n",
7492 sdebug_max_queue);
7493 }
7494
7495 /*
7496 * check for host managed zoned block device specified with
7497 * ptype=0x14 or zbc=XXX.
7498 */
7499 if (sdebug_ptype == TYPE_ZBC) {
7500 sdeb_zbc_model = BLK_ZONED_HM;
7501 } else if (sdeb_zbc_model_s && *sdeb_zbc_model_s) {
7502 k = sdeb_zbc_model_str(sdeb_zbc_model_s);
7503 if (k < 0)
7504 return k;
7505 sdeb_zbc_model = k;
7506 switch (sdeb_zbc_model) {
7507 case BLK_ZONED_NONE:
7508 case BLK_ZONED_HA:
7509 sdebug_ptype = TYPE_DISK;
7510 break;
7511 case BLK_ZONED_HM:
7512 sdebug_ptype = TYPE_ZBC;
7513 break;
7514 default:
7515 pr_err("Invalid ZBC model\n");
7516 return -EINVAL;
7517 }
7518 }
7519 if (sdeb_zbc_model != BLK_ZONED_NONE) {
7520 sdeb_zbc_in_use = true;
7521 if (sdebug_dev_size_mb == DEF_DEV_SIZE_PRE_INIT)
7522 sdebug_dev_size_mb = DEF_ZBC_DEV_SIZE_MB;
7523 }
7524
7525 if (sdebug_dev_size_mb == DEF_DEV_SIZE_PRE_INIT)
7526 sdebug_dev_size_mb = DEF_DEV_SIZE_MB;
7527 if (sdebug_dev_size_mb < 1)
7528 sdebug_dev_size_mb = 1; /* force minimum 1 MB ramdisk */
7529 sz = (unsigned long)sdebug_dev_size_mb * 1048576;
7530 sdebug_store_sectors = sz / sdebug_sector_size;
7531 sdebug_capacity = get_sdebug_capacity();
7532
7533 /* play around with geometry, don't waste too much on track 0 */
7534 sdebug_heads = 8;
7535 sdebug_sectors_per = 32;
7536 if (sdebug_dev_size_mb >= 256)
7537 sdebug_heads = 64;
7538 else if (sdebug_dev_size_mb >= 16)
7539 sdebug_heads = 32;
7540 sdebug_cylinders_per = (unsigned long)sdebug_capacity /
7541 (sdebug_sectors_per * sdebug_heads);
7542 if (sdebug_cylinders_per >= 1024) {
7543 /* other LLDs do this; implies >= 1GB ram disk ... */
7544 sdebug_heads = 255;
7545 sdebug_sectors_per = 63;
7546 sdebug_cylinders_per = (unsigned long)sdebug_capacity /
7547 (sdebug_sectors_per * sdebug_heads);
7548 }
7549 if (scsi_debug_lbp()) {
7550 sdebug_unmap_max_blocks =
7551 clamp(sdebug_unmap_max_blocks, 0U, 0xffffffffU);
7552
7553 sdebug_unmap_max_desc =
7554 clamp(sdebug_unmap_max_desc, 0U, 256U);
7555
7556 sdebug_unmap_granularity =
7557 clamp(sdebug_unmap_granularity, 1U, 0xffffffffU);
7558
7559 if (sdebug_unmap_alignment &&
7560 sdebug_unmap_granularity <=
7561 sdebug_unmap_alignment) {
7562 pr_err("ERR: unmap_granularity <= unmap_alignment\n");
7563 return -EINVAL;
7564 }
7565 }
7566 xa_init_flags(per_store_ap, XA_FLAGS_ALLOC | XA_FLAGS_LOCK_IRQ);
7567 if (want_store) {
7568 idx = sdebug_add_store();
7569 if (idx < 0)
7570 return idx;
7571 }
7572
7573 pseudo_primary = root_device_register("pseudo_0");
7574 if (IS_ERR(pseudo_primary)) {
7575 pr_warn("root_device_register() error\n");
7576 ret = PTR_ERR(pseudo_primary);
7577 goto free_vm;
7578 }
7579 ret = bus_register(&pseudo_lld_bus);
7580 if (ret < 0) {
7581 pr_warn("bus_register error: %d\n", ret);
7582 goto dev_unreg;
7583 }
7584 ret = driver_register(&sdebug_driverfs_driver);
7585 if (ret < 0) {
7586 pr_warn("driver_register error: %d\n", ret);
7587 goto bus_unreg;
7588 }
7589
7590 hosts_to_add = sdebug_add_host;
7591 sdebug_add_host = 0;
7592
7593 queued_cmd_cache = KMEM_CACHE(sdebug_queued_cmd, SLAB_HWCACHE_ALIGN);
7594 if (!queued_cmd_cache) {
7595 ret = -ENOMEM;
7596 goto driver_unreg;
7597 }
7598
7599 sdebug_debugfs_root = debugfs_create_dir("scsi_debug", NULL);
7600 if (IS_ERR_OR_NULL(sdebug_debugfs_root))
7601 pr_info("%s: failed to create initial debugfs directory\n", __func__);
7602
7603 for (k = 0; k < hosts_to_add; k++) {
7604 if (want_store && k == 0) {
7605 ret = sdebug_add_host_helper(idx);
7606 if (ret < 0) {
7607 pr_err("add_host_helper k=%d, error=%d\n",
7608 k, -ret);
7609 break;
7610 }
7611 } else {
7612 ret = sdebug_do_add_host(want_store &&
7613 sdebug_per_host_store);
7614 if (ret < 0) {
7615 pr_err("add_host k=%d error=%d\n", k, -ret);
7616 break;
7617 }
7618 }
7619 }
7620 if (sdebug_verbose)
7621 pr_info("built %d host(s)\n", sdebug_num_hosts);
7622
7623 return 0;
7624
7625driver_unreg:
7626 driver_unregister(&sdebug_driverfs_driver);
7627bus_unreg:
7628 bus_unregister(&pseudo_lld_bus);
7629dev_unreg:
7630 root_device_unregister(pseudo_primary);
7631free_vm:
7632 sdebug_erase_store(idx, NULL);
7633 return ret;
7634}
7635
7636static void __exit scsi_debug_exit(void)
7637{
7638 int k = sdebug_num_hosts;
7639
7640 for (; k; k--)
7641 sdebug_do_remove_host(true);
7642 kmem_cache_destroy(queued_cmd_cache);
7643 driver_unregister(&sdebug_driverfs_driver);
7644 bus_unregister(&pseudo_lld_bus);
7645 root_device_unregister(pseudo_primary);
7646
7647 sdebug_erase_all_stores(false);
7648 xa_destroy(per_store_ap);
7649 debugfs_remove(sdebug_debugfs_root);
7650}
7651
7652device_initcall(scsi_debug_init);
7653module_exit(scsi_debug_exit);
7654
7655static void sdebug_release_adapter(struct device *dev)
7656{
7657 struct sdebug_host_info *sdbg_host;
7658
7659 sdbg_host = dev_to_sdebug_host(dev);
7660 kfree(sdbg_host);
7661}
7662
7663/* idx must be valid, if sip is NULL then it will be obtained using idx */
7664static void sdebug_erase_store(int idx, struct sdeb_store_info *sip)
7665{
7666 if (idx < 0)
7667 return;
7668 if (!sip) {
7669 if (xa_empty(per_store_ap))
7670 return;
7671 sip = xa_load(per_store_ap, idx);
7672 if (!sip)
7673 return;
7674 }
7675 vfree(sip->map_storep);
7676 vfree(sip->dif_storep);
7677 vfree(sip->storep);
7678 xa_erase(per_store_ap, idx);
7679 kfree(sip);
7680}
7681
7682/* Assume apart_from_first==false only in shutdown case. */
7683static void sdebug_erase_all_stores(bool apart_from_first)
7684{
7685 unsigned long idx;
7686 struct sdeb_store_info *sip = NULL;
7687
7688 xa_for_each(per_store_ap, idx, sip) {
7689 if (apart_from_first)
7690 apart_from_first = false;
7691 else
7692 sdebug_erase_store(idx, sip);
7693 }
7694 if (apart_from_first)
7695 sdeb_most_recent_idx = sdeb_first_idx;
7696}
7697
7698/*
7699 * Returns store xarray new element index (idx) if >=0 else negated errno.
7700 * Limit the number of stores to 65536.
7701 */
7702static int sdebug_add_store(void)
7703{
7704 int res;
7705 u32 n_idx;
7706 unsigned long iflags;
7707 unsigned long sz = (unsigned long)sdebug_dev_size_mb * 1048576;
7708 struct sdeb_store_info *sip = NULL;
7709 struct xa_limit xal = { .max = 1 << 16, .min = 0 };
7710
7711 sip = kzalloc(sizeof(*sip), GFP_KERNEL);
7712 if (!sip)
7713 return -ENOMEM;
7714
7715 xa_lock_irqsave(per_store_ap, iflags);
7716 res = __xa_alloc(per_store_ap, &n_idx, sip, xal, GFP_ATOMIC);
7717 if (unlikely(res < 0)) {
7718 xa_unlock_irqrestore(per_store_ap, iflags);
7719 kfree(sip);
7720 pr_warn("%s: xa_alloc() errno=%d\n", __func__, -res);
7721 return res;
7722 }
7723 sdeb_most_recent_idx = n_idx;
7724 if (sdeb_first_idx < 0)
7725 sdeb_first_idx = n_idx;
7726 xa_unlock_irqrestore(per_store_ap, iflags);
7727
7728 res = -ENOMEM;
7729 sip->storep = vzalloc(sz);
7730 if (!sip->storep) {
7731 pr_err("user data oom\n");
7732 goto err;
7733 }
7734 if (sdebug_num_parts > 0)
7735 sdebug_build_parts(sip->storep, sz);
7736
7737 /* DIF/DIX: what T10 calls Protection Information (PI) */
7738 if (sdebug_dix) {
7739 int dif_size;
7740
7741 dif_size = sdebug_store_sectors * sizeof(struct t10_pi_tuple);
7742 sip->dif_storep = vmalloc(dif_size);
7743
7744 pr_info("dif_storep %u bytes @ %pK\n", dif_size,
7745 sip->dif_storep);
7746
7747 if (!sip->dif_storep) {
7748 pr_err("DIX oom\n");
7749 goto err;
7750 }
7751 memset(sip->dif_storep, 0xff, dif_size);
7752 }
7753 /* Logical Block Provisioning */
7754 if (scsi_debug_lbp()) {
7755 map_size = lba_to_map_index(sdebug_store_sectors - 1) + 1;
7756 sip->map_storep = vmalloc(array_size(sizeof(long),
7757 BITS_TO_LONGS(map_size)));
7758
7759 pr_info("%lu provisioning blocks\n", map_size);
7760
7761 if (!sip->map_storep) {
7762 pr_err("LBP map oom\n");
7763 goto err;
7764 }
7765
7766 bitmap_zero(sip->map_storep, map_size);
7767
7768 /* Map first 1KB for partition table */
7769 if (sdebug_num_parts)
7770 map_region(sip, 0, 2);
7771 }
7772
7773 rwlock_init(&sip->macc_lck);
7774 return (int)n_idx;
7775err:
7776 sdebug_erase_store((int)n_idx, sip);
7777 pr_warn("%s: failed, errno=%d\n", __func__, -res);
7778 return res;
7779}
7780
7781static int sdebug_add_host_helper(int per_host_idx)
7782{
7783 int k, devs_per_host, idx;
7784 int error = -ENOMEM;
7785 struct sdebug_host_info *sdbg_host;
7786 struct sdebug_dev_info *sdbg_devinfo, *tmp;
7787
7788 sdbg_host = kzalloc(sizeof(*sdbg_host), GFP_KERNEL);
7789 if (!sdbg_host)
7790 return -ENOMEM;
7791 idx = (per_host_idx < 0) ? sdeb_first_idx : per_host_idx;
7792 if (xa_get_mark(per_store_ap, idx, SDEB_XA_NOT_IN_USE))
7793 xa_clear_mark(per_store_ap, idx, SDEB_XA_NOT_IN_USE);
7794 sdbg_host->si_idx = idx;
7795
7796 INIT_LIST_HEAD(&sdbg_host->dev_info_list);
7797
7798 devs_per_host = sdebug_num_tgts * sdebug_max_luns;
7799 for (k = 0; k < devs_per_host; k++) {
7800 sdbg_devinfo = sdebug_device_create(sdbg_host, GFP_KERNEL);
7801 if (!sdbg_devinfo)
7802 goto clean;
7803 }
7804
7805 mutex_lock(&sdebug_host_list_mutex);
7806 list_add_tail(&sdbg_host->host_list, &sdebug_host_list);
7807 mutex_unlock(&sdebug_host_list_mutex);
7808
7809 sdbg_host->dev.bus = &pseudo_lld_bus;
7810 sdbg_host->dev.parent = pseudo_primary;
7811 sdbg_host->dev.release = &sdebug_release_adapter;
7812 dev_set_name(&sdbg_host->dev, "adapter%d", sdebug_num_hosts);
7813
7814 error = device_register(&sdbg_host->dev);
7815 if (error) {
7816 mutex_lock(&sdebug_host_list_mutex);
7817 list_del(&sdbg_host->host_list);
7818 mutex_unlock(&sdebug_host_list_mutex);
7819 goto clean;
7820 }
7821
7822 ++sdebug_num_hosts;
7823 return 0;
7824
7825clean:
7826 list_for_each_entry_safe(sdbg_devinfo, tmp, &sdbg_host->dev_info_list,
7827 dev_list) {
7828 list_del(&sdbg_devinfo->dev_list);
7829 kfree(sdbg_devinfo->zstate);
7830 kfree(sdbg_devinfo);
7831 }
7832 if (sdbg_host->dev.release)
7833 put_device(&sdbg_host->dev);
7834 else
7835 kfree(sdbg_host);
7836 pr_warn("%s: failed, errno=%d\n", __func__, -error);
7837 return error;
7838}
7839
7840static int sdebug_do_add_host(bool mk_new_store)
7841{
7842 int ph_idx = sdeb_most_recent_idx;
7843
7844 if (mk_new_store) {
7845 ph_idx = sdebug_add_store();
7846 if (ph_idx < 0)
7847 return ph_idx;
7848 }
7849 return sdebug_add_host_helper(ph_idx);
7850}
7851
7852static void sdebug_do_remove_host(bool the_end)
7853{
7854 int idx = -1;
7855 struct sdebug_host_info *sdbg_host = NULL;
7856 struct sdebug_host_info *sdbg_host2;
7857
7858 mutex_lock(&sdebug_host_list_mutex);
7859 if (!list_empty(&sdebug_host_list)) {
7860 sdbg_host = list_entry(sdebug_host_list.prev,
7861 struct sdebug_host_info, host_list);
7862 idx = sdbg_host->si_idx;
7863 }
7864 if (!the_end && idx >= 0) {
7865 bool unique = true;
7866
7867 list_for_each_entry(sdbg_host2, &sdebug_host_list, host_list) {
7868 if (sdbg_host2 == sdbg_host)
7869 continue;
7870 if (idx == sdbg_host2->si_idx) {
7871 unique = false;
7872 break;
7873 }
7874 }
7875 if (unique) {
7876 xa_set_mark(per_store_ap, idx, SDEB_XA_NOT_IN_USE);
7877 if (idx == sdeb_most_recent_idx)
7878 --sdeb_most_recent_idx;
7879 }
7880 }
7881 if (sdbg_host)
7882 list_del(&sdbg_host->host_list);
7883 mutex_unlock(&sdebug_host_list_mutex);
7884
7885 if (!sdbg_host)
7886 return;
7887
7888 device_unregister(&sdbg_host->dev);
7889 --sdebug_num_hosts;
7890}
7891
7892static int sdebug_change_qdepth(struct scsi_device *sdev, int qdepth)
7893{
7894 struct sdebug_dev_info *devip = sdev->hostdata;
7895
7896 if (!devip)
7897 return -ENODEV;
7898
7899 mutex_lock(&sdebug_host_list_mutex);
7900 block_unblock_all_queues(true);
7901
7902 if (qdepth > SDEBUG_CANQUEUE) {
7903 qdepth = SDEBUG_CANQUEUE;
7904 pr_warn("%s: requested qdepth [%d] exceeds canqueue [%d], trim\n", __func__,
7905 qdepth, SDEBUG_CANQUEUE);
7906 }
7907 if (qdepth < 1)
7908 qdepth = 1;
7909 if (qdepth != sdev->queue_depth)
7910 scsi_change_queue_depth(sdev, qdepth);
7911
7912 block_unblock_all_queues(false);
7913 mutex_unlock(&sdebug_host_list_mutex);
7914
7915 if (SDEBUG_OPT_Q_NOISE & sdebug_opts)
7916 sdev_printk(KERN_INFO, sdev, "%s: qdepth=%d\n", __func__, qdepth);
7917
7918 return sdev->queue_depth;
7919}
7920
7921static bool fake_timeout(struct scsi_cmnd *scp)
7922{
7923 if (0 == (atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth))) {
7924 if (sdebug_every_nth < -1)
7925 sdebug_every_nth = -1;
7926 if (SDEBUG_OPT_TIMEOUT & sdebug_opts)
7927 return true; /* ignore command causing timeout */
7928 else if (SDEBUG_OPT_MAC_TIMEOUT & sdebug_opts &&
7929 scsi_medium_access_command(scp))
7930 return true; /* time out reads and writes */
7931 }
7932 return false;
7933}
7934
7935/* Response to TUR or media access command when device stopped */
7936static int resp_not_ready(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
7937{
7938 int stopped_state;
7939 u64 diff_ns = 0;
7940 ktime_t now_ts = ktime_get_boottime();
7941 struct scsi_device *sdp = scp->device;
7942
7943 stopped_state = atomic_read(&devip->stopped);
7944 if (stopped_state == 2) {
7945 if (ktime_to_ns(now_ts) > ktime_to_ns(devip->create_ts)) {
7946 diff_ns = ktime_to_ns(ktime_sub(now_ts, devip->create_ts));
7947 if (diff_ns >= ((u64)sdeb_tur_ms_to_ready * 1000000)) {
7948 /* tur_ms_to_ready timer extinguished */
7949 atomic_set(&devip->stopped, 0);
7950 return 0;
7951 }
7952 }
7953 mk_sense_buffer(scp, NOT_READY, LOGICAL_UNIT_NOT_READY, 0x1);
7954 if (sdebug_verbose)
7955 sdev_printk(KERN_INFO, sdp,
7956 "%s: Not ready: in process of becoming ready\n", my_name);
7957 if (scp->cmnd[0] == TEST_UNIT_READY) {
7958 u64 tur_nanosecs_to_ready = (u64)sdeb_tur_ms_to_ready * 1000000;
7959
7960 if (diff_ns <= tur_nanosecs_to_ready)
7961 diff_ns = tur_nanosecs_to_ready - diff_ns;
7962 else
7963 diff_ns = tur_nanosecs_to_ready;
7964 /* As per 20-061r2 approved for spc6 by T10 on 20200716 */
7965 do_div(diff_ns, 1000000); /* diff_ns becomes milliseconds */
7966 scsi_set_sense_information(scp->sense_buffer, SCSI_SENSE_BUFFERSIZE,
7967 diff_ns);
7968 return check_condition_result;
7969 }
7970 }
7971 mk_sense_buffer(scp, NOT_READY, LOGICAL_UNIT_NOT_READY, 0x2);
7972 if (sdebug_verbose)
7973 sdev_printk(KERN_INFO, sdp, "%s: Not ready: initializing command required\n",
7974 my_name);
7975 return check_condition_result;
7976}
7977
7978static void sdebug_map_queues(struct Scsi_Host *shost)
7979{
7980 int i, qoff;
7981
7982 if (shost->nr_hw_queues == 1)
7983 return;
7984
7985 for (i = 0, qoff = 0; i < HCTX_MAX_TYPES; i++) {
7986 struct blk_mq_queue_map *map = &shost->tag_set.map[i];
7987
7988 map->nr_queues = 0;
7989
7990 if (i == HCTX_TYPE_DEFAULT)
7991 map->nr_queues = submit_queues - poll_queues;
7992 else if (i == HCTX_TYPE_POLL)
7993 map->nr_queues = poll_queues;
7994
7995 if (!map->nr_queues) {
7996 BUG_ON(i == HCTX_TYPE_DEFAULT);
7997 continue;
7998 }
7999
8000 map->queue_offset = qoff;
8001 blk_mq_map_queues(map);
8002
8003 qoff += map->nr_queues;
8004 }
8005}
8006
8007struct sdebug_blk_mq_poll_data {
8008 unsigned int queue_num;
8009 int *num_entries;
8010};
8011
8012/*
8013 * We don't handle aborted commands here, but it does not seem possible to have
8014 * aborted polled commands from schedule_resp()
8015 */
8016static bool sdebug_blk_mq_poll_iter(struct request *rq, void *opaque)
8017{
8018 struct sdebug_blk_mq_poll_data *data = opaque;
8019 struct scsi_cmnd *cmd = blk_mq_rq_to_pdu(rq);
8020 struct sdebug_scsi_cmd *sdsc = scsi_cmd_priv(cmd);
8021 struct sdebug_defer *sd_dp;
8022 u32 unique_tag = blk_mq_unique_tag(rq);
8023 u16 hwq = blk_mq_unique_tag_to_hwq(unique_tag);
8024 struct sdebug_queued_cmd *sqcp;
8025 unsigned long flags;
8026 int queue_num = data->queue_num;
8027 ktime_t time;
8028
8029 /* We're only interested in one queue for this iteration */
8030 if (hwq != queue_num)
8031 return true;
8032
8033 /* Subsequent checks would fail if this failed, but check anyway */
8034 if (!test_bit(SCMD_STATE_INFLIGHT, &cmd->state))
8035 return true;
8036
8037 time = ktime_get_boottime();
8038
8039 spin_lock_irqsave(&sdsc->lock, flags);
8040 sqcp = TO_QUEUED_CMD(cmd);
8041 if (!sqcp) {
8042 spin_unlock_irqrestore(&sdsc->lock, flags);
8043 return true;
8044 }
8045
8046 sd_dp = &sqcp->sd_dp;
8047 if (READ_ONCE(sd_dp->defer_t) != SDEB_DEFER_POLL) {
8048 spin_unlock_irqrestore(&sdsc->lock, flags);
8049 return true;
8050 }
8051
8052 if (time < sd_dp->cmpl_ts) {
8053 spin_unlock_irqrestore(&sdsc->lock, flags);
8054 return true;
8055 }
8056
8057 ASSIGN_QUEUED_CMD(cmd, NULL);
8058 spin_unlock_irqrestore(&sdsc->lock, flags);
8059
8060 if (sdebug_statistics) {
8061 atomic_inc(&sdebug_completions);
8062 if (raw_smp_processor_id() != sd_dp->issuing_cpu)
8063 atomic_inc(&sdebug_miss_cpus);
8064 }
8065
8066 sdebug_free_queued_cmd(sqcp);
8067
8068 scsi_done(cmd); /* callback to mid level */
8069 (*data->num_entries)++;
8070 return true;
8071}
8072
8073static int sdebug_blk_mq_poll(struct Scsi_Host *shost, unsigned int queue_num)
8074{
8075 int num_entries = 0;
8076 struct sdebug_blk_mq_poll_data data = {
8077 .queue_num = queue_num,
8078 .num_entries = &num_entries,
8079 };
8080
8081 blk_mq_tagset_busy_iter(&shost->tag_set, sdebug_blk_mq_poll_iter,
8082 &data);
8083
8084 if (num_entries > 0)
8085 atomic_add(num_entries, &sdeb_mq_poll_count);
8086 return num_entries;
8087}
8088
8089static int sdebug_timeout_cmd(struct scsi_cmnd *cmnd)
8090{
8091 struct scsi_device *sdp = cmnd->device;
8092 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
8093 struct sdebug_err_inject *err;
8094 unsigned char *cmd = cmnd->cmnd;
8095 int ret = 0;
8096
8097 if (devip == NULL)
8098 return 0;
8099
8100 rcu_read_lock();
8101 list_for_each_entry_rcu(err, &devip->inject_err_list, list) {
8102 if (err->type == ERR_TMOUT_CMD &&
8103 (err->cmd == cmd[0] || err->cmd == 0xff)) {
8104 ret = !!err->cnt;
8105 if (err->cnt < 0)
8106 err->cnt++;
8107
8108 rcu_read_unlock();
8109 return ret;
8110 }
8111 }
8112 rcu_read_unlock();
8113
8114 return 0;
8115}
8116
8117static int sdebug_fail_queue_cmd(struct scsi_cmnd *cmnd)
8118{
8119 struct scsi_device *sdp = cmnd->device;
8120 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
8121 struct sdebug_err_inject *err;
8122 unsigned char *cmd = cmnd->cmnd;
8123 int ret = 0;
8124
8125 if (devip == NULL)
8126 return 0;
8127
8128 rcu_read_lock();
8129 list_for_each_entry_rcu(err, &devip->inject_err_list, list) {
8130 if (err->type == ERR_FAIL_QUEUE_CMD &&
8131 (err->cmd == cmd[0] || err->cmd == 0xff)) {
8132 ret = err->cnt ? err->queuecmd_ret : 0;
8133 if (err->cnt < 0)
8134 err->cnt++;
8135
8136 rcu_read_unlock();
8137 return ret;
8138 }
8139 }
8140 rcu_read_unlock();
8141
8142 return 0;
8143}
8144
8145static int sdebug_fail_cmd(struct scsi_cmnd *cmnd, int *retval,
8146 struct sdebug_err_inject *info)
8147{
8148 struct scsi_device *sdp = cmnd->device;
8149 struct sdebug_dev_info *devip = (struct sdebug_dev_info *)sdp->hostdata;
8150 struct sdebug_err_inject *err;
8151 unsigned char *cmd = cmnd->cmnd;
8152 int ret = 0;
8153 int result;
8154
8155 if (devip == NULL)
8156 return 0;
8157
8158 rcu_read_lock();
8159 list_for_each_entry_rcu(err, &devip->inject_err_list, list) {
8160 if (err->type == ERR_FAIL_CMD &&
8161 (err->cmd == cmd[0] || err->cmd == 0xff)) {
8162 if (!err->cnt) {
8163 rcu_read_unlock();
8164 return 0;
8165 }
8166
8167 ret = !!err->cnt;
8168 rcu_read_unlock();
8169 goto out_handle;
8170 }
8171 }
8172 rcu_read_unlock();
8173
8174 return 0;
8175
8176out_handle:
8177 if (err->cnt < 0)
8178 err->cnt++;
8179 mk_sense_buffer(cmnd, err->sense_key, err->asc, err->asq);
8180 result = err->status_byte | err->host_byte << 16 | err->driver_byte << 24;
8181 *info = *err;
8182 *retval = schedule_resp(cmnd, devip, result, NULL, 0, 0);
8183
8184 return ret;
8185}
8186
8187static int scsi_debug_queuecommand(struct Scsi_Host *shost,
8188 struct scsi_cmnd *scp)
8189{
8190 u8 sdeb_i;
8191 struct scsi_device *sdp = scp->device;
8192 const struct opcode_info_t *oip;
8193 const struct opcode_info_t *r_oip;
8194 struct sdebug_dev_info *devip;
8195 u8 *cmd = scp->cmnd;
8196 int (*r_pfp)(struct scsi_cmnd *, struct sdebug_dev_info *);
8197 int (*pfp)(struct scsi_cmnd *, struct sdebug_dev_info *) = NULL;
8198 int k, na;
8199 int errsts = 0;
8200 u64 lun_index = sdp->lun & 0x3FFF;
8201 u32 flags;
8202 u16 sa;
8203 u8 opcode = cmd[0];
8204 bool has_wlun_rl;
8205 bool inject_now;
8206 int ret = 0;
8207 struct sdebug_err_inject err;
8208
8209 scsi_set_resid(scp, 0);
8210 if (sdebug_statistics) {
8211 atomic_inc(&sdebug_cmnd_count);
8212 inject_now = inject_on_this_cmd();
8213 } else {
8214 inject_now = false;
8215 }
8216 if (unlikely(sdebug_verbose &&
8217 !(SDEBUG_OPT_NO_CDB_NOISE & sdebug_opts))) {
8218 char b[120];
8219 int n, len, sb;
8220
8221 len = scp->cmd_len;
8222 sb = (int)sizeof(b);
8223 if (len > 32)
8224 strcpy(b, "too long, over 32 bytes");
8225 else {
8226 for (k = 0, n = 0; k < len && n < sb; ++k)
8227 n += scnprintf(b + n, sb - n, "%02x ",
8228 (u32)cmd[k]);
8229 }
8230 sdev_printk(KERN_INFO, sdp, "%s: tag=%#x, cmd %s\n", my_name,
8231 blk_mq_unique_tag(scsi_cmd_to_rq(scp)), b);
8232 }
8233 if (unlikely(inject_now && (sdebug_opts & SDEBUG_OPT_HOST_BUSY)))
8234 return SCSI_MLQUEUE_HOST_BUSY;
8235 has_wlun_rl = (sdp->lun == SCSI_W_LUN_REPORT_LUNS);
8236 if (unlikely(lun_index >= sdebug_max_luns && !has_wlun_rl))
8237 goto err_out;
8238
8239 sdeb_i = opcode_ind_arr[opcode]; /* fully mapped */
8240 oip = &opcode_info_arr[sdeb_i]; /* safe if table consistent */
8241 devip = (struct sdebug_dev_info *)sdp->hostdata;
8242 if (unlikely(!devip)) {
8243 devip = find_build_dev_info(sdp);
8244 if (NULL == devip)
8245 goto err_out;
8246 }
8247
8248 if (sdebug_timeout_cmd(scp)) {
8249 scmd_printk(KERN_INFO, scp, "timeout command 0x%x\n", opcode);
8250 return 0;
8251 }
8252
8253 ret = sdebug_fail_queue_cmd(scp);
8254 if (ret) {
8255 scmd_printk(KERN_INFO, scp, "fail queue command 0x%x with 0x%x\n",
8256 opcode, ret);
8257 return ret;
8258 }
8259
8260 if (sdebug_fail_cmd(scp, &ret, &err)) {
8261 scmd_printk(KERN_INFO, scp,
8262 "fail command 0x%x with hostbyte=0x%x, "
8263 "driverbyte=0x%x, statusbyte=0x%x, "
8264 "sense_key=0x%x, asc=0x%x, asq=0x%x\n",
8265 opcode, err.host_byte, err.driver_byte,
8266 err.status_byte, err.sense_key, err.asc, err.asq);
8267 return ret;
8268 }
8269
8270 if (unlikely(inject_now && !atomic_read(&sdeb_inject_pending)))
8271 atomic_set(&sdeb_inject_pending, 1);
8272
8273 na = oip->num_attached;
8274 r_pfp = oip->pfp;
8275 if (na) { /* multiple commands with this opcode */
8276 r_oip = oip;
8277 if (FF_SA & r_oip->flags) {
8278 if (F_SA_LOW & oip->flags)
8279 sa = 0x1f & cmd[1];
8280 else
8281 sa = get_unaligned_be16(cmd + 8);
8282 for (k = 0; k <= na; oip = r_oip->arrp + k++) {
8283 if (opcode == oip->opcode && sa == oip->sa)
8284 break;
8285 }
8286 } else { /* since no service action only check opcode */
8287 for (k = 0; k <= na; oip = r_oip->arrp + k++) {
8288 if (opcode == oip->opcode)
8289 break;
8290 }
8291 }
8292 if (k > na) {
8293 if (F_SA_LOW & r_oip->flags)
8294 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 4);
8295 else if (F_SA_HIGH & r_oip->flags)
8296 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 8, 7);
8297 else
8298 mk_sense_invalid_opcode(scp);
8299 goto check_cond;
8300 }
8301 } /* else (when na==0) we assume the oip is a match */
8302 flags = oip->flags;
8303 if (unlikely(F_INV_OP & flags)) {
8304 mk_sense_invalid_opcode(scp);
8305 goto check_cond;
8306 }
8307 if (unlikely(has_wlun_rl && !(F_RL_WLUN_OK & flags))) {
8308 if (sdebug_verbose)
8309 sdev_printk(KERN_INFO, sdp, "%s: Opcode 0x%x not%s\n",
8310 my_name, opcode, " supported for wlun");
8311 mk_sense_invalid_opcode(scp);
8312 goto check_cond;
8313 }
8314 if (unlikely(sdebug_strict)) { /* check cdb against mask */
8315 u8 rem;
8316 int j;
8317
8318 for (k = 1; k < oip->len_mask[0] && k < 16; ++k) {
8319 rem = ~oip->len_mask[k] & cmd[k];
8320 if (rem) {
8321 for (j = 7; j >= 0; --j, rem <<= 1) {
8322 if (0x80 & rem)
8323 break;
8324 }
8325 mk_sense_invalid_fld(scp, SDEB_IN_CDB, k, j);
8326 goto check_cond;
8327 }
8328 }
8329 }
8330 if (unlikely(!(F_SKIP_UA & flags) &&
8331 find_first_bit(devip->uas_bm,
8332 SDEBUG_NUM_UAS) != SDEBUG_NUM_UAS)) {
8333 errsts = make_ua(scp, devip);
8334 if (errsts)
8335 goto check_cond;
8336 }
8337 if (unlikely(((F_M_ACCESS & flags) || scp->cmnd[0] == TEST_UNIT_READY) &&
8338 atomic_read(&devip->stopped))) {
8339 errsts = resp_not_ready(scp, devip);
8340 if (errsts)
8341 goto fini;
8342 }
8343 if (sdebug_fake_rw && (F_FAKE_RW & flags))
8344 goto fini;
8345 if (unlikely(sdebug_every_nth)) {
8346 if (fake_timeout(scp))
8347 return 0; /* ignore command: make trouble */
8348 }
8349 if (likely(oip->pfp))
8350 pfp = oip->pfp; /* calls a resp_* function */
8351 else
8352 pfp = r_pfp; /* if leaf function ptr NULL, try the root's */
8353
8354fini:
8355 if (F_DELAY_OVERR & flags) /* cmds like INQUIRY respond asap */
8356 return schedule_resp(scp, devip, errsts, pfp, 0, 0);
8357 else if ((flags & F_LONG_DELAY) && (sdebug_jdelay > 0 ||
8358 sdebug_ndelay > 10000)) {
8359 /*
8360 * Skip long delays if ndelay <= 10 microseconds. Otherwise
8361 * for Start Stop Unit (SSU) want at least 1 second delay and
8362 * if sdebug_jdelay>1 want a long delay of that many seconds.
8363 * For Synchronize Cache want 1/20 of SSU's delay.
8364 */
8365 int jdelay = (sdebug_jdelay < 2) ? 1 : sdebug_jdelay;
8366 int denom = (flags & F_SYNC_DELAY) ? 20 : 1;
8367
8368 jdelay = mult_frac(USER_HZ * jdelay, HZ, denom * USER_HZ);
8369 return schedule_resp(scp, devip, errsts, pfp, jdelay, 0);
8370 } else
8371 return schedule_resp(scp, devip, errsts, pfp, sdebug_jdelay,
8372 sdebug_ndelay);
8373check_cond:
8374 return schedule_resp(scp, devip, check_condition_result, NULL, 0, 0);
8375err_out:
8376 return schedule_resp(scp, NULL, DID_NO_CONNECT << 16, NULL, 0, 0);
8377}
8378
8379static int sdebug_init_cmd_priv(struct Scsi_Host *shost, struct scsi_cmnd *cmd)
8380{
8381 struct sdebug_scsi_cmd *sdsc = scsi_cmd_priv(cmd);
8382
8383 spin_lock_init(&sdsc->lock);
8384
8385 return 0;
8386}
8387
8388static struct scsi_host_template sdebug_driver_template = {
8389 .show_info = scsi_debug_show_info,
8390 .write_info = scsi_debug_write_info,
8391 .proc_name = sdebug_proc_name,
8392 .name = "SCSI DEBUG",
8393 .info = scsi_debug_info,
8394 .slave_alloc = scsi_debug_slave_alloc,
8395 .slave_configure = scsi_debug_slave_configure,
8396 .slave_destroy = scsi_debug_slave_destroy,
8397 .ioctl = scsi_debug_ioctl,
8398 .queuecommand = scsi_debug_queuecommand,
8399 .change_queue_depth = sdebug_change_qdepth,
8400 .map_queues = sdebug_map_queues,
8401 .mq_poll = sdebug_blk_mq_poll,
8402 .eh_abort_handler = scsi_debug_abort,
8403 .eh_device_reset_handler = scsi_debug_device_reset,
8404 .eh_target_reset_handler = scsi_debug_target_reset,
8405 .eh_bus_reset_handler = scsi_debug_bus_reset,
8406 .eh_host_reset_handler = scsi_debug_host_reset,
8407 .can_queue = SDEBUG_CANQUEUE,
8408 .this_id = 7,
8409 .sg_tablesize = SG_MAX_SEGMENTS,
8410 .cmd_per_lun = DEF_CMD_PER_LUN,
8411 .max_sectors = -1U,
8412 .max_segment_size = -1U,
8413 .module = THIS_MODULE,
8414 .track_queue_depth = 1,
8415 .cmd_size = sizeof(struct sdebug_scsi_cmd),
8416 .init_cmd_priv = sdebug_init_cmd_priv,
8417 .target_alloc = sdebug_target_alloc,
8418 .target_destroy = sdebug_target_destroy,
8419};
8420
8421static int sdebug_driver_probe(struct device *dev)
8422{
8423 int error = 0;
8424 struct sdebug_host_info *sdbg_host;
8425 struct Scsi_Host *hpnt;
8426 int hprot;
8427
8428 sdbg_host = dev_to_sdebug_host(dev);
8429
8430 sdebug_driver_template.can_queue = sdebug_max_queue;
8431 sdebug_driver_template.cmd_per_lun = sdebug_max_queue;
8432 if (!sdebug_clustering)
8433 sdebug_driver_template.dma_boundary = PAGE_SIZE - 1;
8434
8435 hpnt = scsi_host_alloc(&sdebug_driver_template, 0);
8436 if (NULL == hpnt) {
8437 pr_err("scsi_host_alloc failed\n");
8438 error = -ENODEV;
8439 return error;
8440 }
8441 if (submit_queues > nr_cpu_ids) {
8442 pr_warn("%s: trim submit_queues (was %d) to nr_cpu_ids=%u\n",
8443 my_name, submit_queues, nr_cpu_ids);
8444 submit_queues = nr_cpu_ids;
8445 }
8446 /*
8447 * Decide whether to tell scsi subsystem that we want mq. The
8448 * following should give the same answer for each host.
8449 */
8450 hpnt->nr_hw_queues = submit_queues;
8451 if (sdebug_host_max_queue)
8452 hpnt->host_tagset = 1;
8453
8454 /* poll queues are possible for nr_hw_queues > 1 */
8455 if (hpnt->nr_hw_queues == 1 || (poll_queues < 1)) {
8456 pr_warn("%s: trim poll_queues to 0. poll_q/nr_hw = (%d/%d)\n",
8457 my_name, poll_queues, hpnt->nr_hw_queues);
8458 poll_queues = 0;
8459 }
8460
8461 /*
8462 * Poll queues don't need interrupts, but we need at least one I/O queue
8463 * left over for non-polled I/O.
8464 * If condition not met, trim poll_queues to 1 (just for simplicity).
8465 */
8466 if (poll_queues >= submit_queues) {
8467 if (submit_queues < 3)
8468 pr_warn("%s: trim poll_queues to 1\n", my_name);
8469 else
8470 pr_warn("%s: trim poll_queues to 1. Perhaps try poll_queues=%d\n",
8471 my_name, submit_queues - 1);
8472 poll_queues = 1;
8473 }
8474 if (poll_queues)
8475 hpnt->nr_maps = 3;
8476
8477 sdbg_host->shost = hpnt;
8478 if ((hpnt->this_id >= 0) && (sdebug_num_tgts > hpnt->this_id))
8479 hpnt->max_id = sdebug_num_tgts + 1;
8480 else
8481 hpnt->max_id = sdebug_num_tgts;
8482 /* = sdebug_max_luns; */
8483 hpnt->max_lun = SCSI_W_LUN_REPORT_LUNS + 1;
8484
8485 hprot = 0;
8486
8487 switch (sdebug_dif) {
8488
8489 case T10_PI_TYPE1_PROTECTION:
8490 hprot = SHOST_DIF_TYPE1_PROTECTION;
8491 if (sdebug_dix)
8492 hprot |= SHOST_DIX_TYPE1_PROTECTION;
8493 break;
8494
8495 case T10_PI_TYPE2_PROTECTION:
8496 hprot = SHOST_DIF_TYPE2_PROTECTION;
8497 if (sdebug_dix)
8498 hprot |= SHOST_DIX_TYPE2_PROTECTION;
8499 break;
8500
8501 case T10_PI_TYPE3_PROTECTION:
8502 hprot = SHOST_DIF_TYPE3_PROTECTION;
8503 if (sdebug_dix)
8504 hprot |= SHOST_DIX_TYPE3_PROTECTION;
8505 break;
8506
8507 default:
8508 if (sdebug_dix)
8509 hprot |= SHOST_DIX_TYPE0_PROTECTION;
8510 break;
8511 }
8512
8513 scsi_host_set_prot(hpnt, hprot);
8514
8515 if (have_dif_prot || sdebug_dix)
8516 pr_info("host protection%s%s%s%s%s%s%s\n",
8517 (hprot & SHOST_DIF_TYPE1_PROTECTION) ? " DIF1" : "",
8518 (hprot & SHOST_DIF_TYPE2_PROTECTION) ? " DIF2" : "",
8519 (hprot & SHOST_DIF_TYPE3_PROTECTION) ? " DIF3" : "",
8520 (hprot & SHOST_DIX_TYPE0_PROTECTION) ? " DIX0" : "",
8521 (hprot & SHOST_DIX_TYPE1_PROTECTION) ? " DIX1" : "",
8522 (hprot & SHOST_DIX_TYPE2_PROTECTION) ? " DIX2" : "",
8523 (hprot & SHOST_DIX_TYPE3_PROTECTION) ? " DIX3" : "");
8524
8525 if (sdebug_guard == 1)
8526 scsi_host_set_guard(hpnt, SHOST_DIX_GUARD_IP);
8527 else
8528 scsi_host_set_guard(hpnt, SHOST_DIX_GUARD_CRC);
8529
8530 sdebug_verbose = !!(SDEBUG_OPT_NOISE & sdebug_opts);
8531 sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & sdebug_opts);
8532 if (sdebug_every_nth) /* need stats counters for every_nth */
8533 sdebug_statistics = true;
8534 error = scsi_add_host(hpnt, &sdbg_host->dev);
8535 if (error) {
8536 pr_err("scsi_add_host failed\n");
8537 error = -ENODEV;
8538 scsi_host_put(hpnt);
8539 } else {
8540 scsi_scan_host(hpnt);
8541 }
8542
8543 return error;
8544}
8545
8546static void sdebug_driver_remove(struct device *dev)
8547{
8548 struct sdebug_host_info *sdbg_host;
8549 struct sdebug_dev_info *sdbg_devinfo, *tmp;
8550
8551 sdbg_host = dev_to_sdebug_host(dev);
8552
8553 scsi_remove_host(sdbg_host->shost);
8554
8555 list_for_each_entry_safe(sdbg_devinfo, tmp, &sdbg_host->dev_info_list,
8556 dev_list) {
8557 list_del(&sdbg_devinfo->dev_list);
8558 kfree(sdbg_devinfo->zstate);
8559 kfree(sdbg_devinfo);
8560 }
8561
8562 scsi_host_put(sdbg_host->shost);
8563}
8564
8565static const struct bus_type pseudo_lld_bus = {
8566 .name = "pseudo",
8567 .probe = sdebug_driver_probe,
8568 .remove = sdebug_driver_remove,
8569 .drv_groups = sdebug_drv_groups,
8570};
1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * vvvvvvvvvvvvvvvvvvvvvvv Original vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
4 * Copyright (C) 1992 Eric Youngdale
5 * Simulate a host adapter with 2 disks attached. Do a lot of checking
6 * to make sure that we are not getting blocks mixed up, and PANIC if
7 * anything out of the ordinary is seen.
8 * ^^^^^^^^^^^^^^^^^^^^^^^ Original ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
9 *
10 * Copyright (C) 2001 - 2018 Douglas Gilbert
11 *
12 * For documentation see http://sg.danny.cz/sg/sdebug26.html
13 */
14
15
16#define pr_fmt(fmt) KBUILD_MODNAME ":%s: " fmt, __func__
17
18#include <linux/module.h>
19
20#include <linux/kernel.h>
21#include <linux/errno.h>
22#include <linux/jiffies.h>
23#include <linux/slab.h>
24#include <linux/types.h>
25#include <linux/string.h>
26#include <linux/genhd.h>
27#include <linux/fs.h>
28#include <linux/init.h>
29#include <linux/proc_fs.h>
30#include <linux/vmalloc.h>
31#include <linux/moduleparam.h>
32#include <linux/scatterlist.h>
33#include <linux/blkdev.h>
34#include <linux/crc-t10dif.h>
35#include <linux/spinlock.h>
36#include <linux/interrupt.h>
37#include <linux/atomic.h>
38#include <linux/hrtimer.h>
39#include <linux/uuid.h>
40#include <linux/t10-pi.h>
41
42#include <net/checksum.h>
43
44#include <asm/unaligned.h>
45
46#include <scsi/scsi.h>
47#include <scsi/scsi_cmnd.h>
48#include <scsi/scsi_device.h>
49#include <scsi/scsi_host.h>
50#include <scsi/scsicam.h>
51#include <scsi/scsi_eh.h>
52#include <scsi/scsi_tcq.h>
53#include <scsi/scsi_dbg.h>
54
55#include "sd.h"
56#include "scsi_logging.h"
57
58/* make sure inq_product_rev string corresponds to this version */
59#define SDEBUG_VERSION "0188" /* format to fit INQUIRY revision field */
60static const char *sdebug_version_date = "20190125";
61
62#define MY_NAME "scsi_debug"
63
64/* Additional Sense Code (ASC) */
65#define NO_ADDITIONAL_SENSE 0x0
66#define LOGICAL_UNIT_NOT_READY 0x4
67#define LOGICAL_UNIT_COMMUNICATION_FAILURE 0x8
68#define UNRECOVERED_READ_ERR 0x11
69#define PARAMETER_LIST_LENGTH_ERR 0x1a
70#define INVALID_OPCODE 0x20
71#define LBA_OUT_OF_RANGE 0x21
72#define INVALID_FIELD_IN_CDB 0x24
73#define INVALID_FIELD_IN_PARAM_LIST 0x26
74#define WRITE_PROTECTED 0x27
75#define UA_RESET_ASC 0x29
76#define UA_CHANGED_ASC 0x2a
77#define TARGET_CHANGED_ASC 0x3f
78#define LUNS_CHANGED_ASCQ 0x0e
79#define INSUFF_RES_ASC 0x55
80#define INSUFF_RES_ASCQ 0x3
81#define POWER_ON_RESET_ASCQ 0x0
82#define BUS_RESET_ASCQ 0x2 /* scsi bus reset occurred */
83#define MODE_CHANGED_ASCQ 0x1 /* mode parameters changed */
84#define CAPACITY_CHANGED_ASCQ 0x9
85#define SAVING_PARAMS_UNSUP 0x39
86#define TRANSPORT_PROBLEM 0x4b
87#define THRESHOLD_EXCEEDED 0x5d
88#define LOW_POWER_COND_ON 0x5e
89#define MISCOMPARE_VERIFY_ASC 0x1d
90#define MICROCODE_CHANGED_ASCQ 0x1 /* with TARGET_CHANGED_ASC */
91#define MICROCODE_CHANGED_WO_RESET_ASCQ 0x16
92#define WRITE_ERROR_ASC 0xc
93
94/* Additional Sense Code Qualifier (ASCQ) */
95#define ACK_NAK_TO 0x3
96
97/* Default values for driver parameters */
98#define DEF_NUM_HOST 1
99#define DEF_NUM_TGTS 1
100#define DEF_MAX_LUNS 1
101/* With these defaults, this driver will make 1 host with 1 target
102 * (id 0) containing 1 logical unit (lun 0). That is 1 device.
103 */
104#define DEF_ATO 1
105#define DEF_CDB_LEN 10
106#define DEF_JDELAY 1 /* if > 0 unit is a jiffy */
107#define DEF_DEV_SIZE_MB 8
108#define DEF_DIF 0
109#define DEF_DIX 0
110#define DEF_D_SENSE 0
111#define DEF_EVERY_NTH 0
112#define DEF_FAKE_RW 0
113#define DEF_GUARD 0
114#define DEF_HOST_LOCK 0
115#define DEF_LBPU 0
116#define DEF_LBPWS 0
117#define DEF_LBPWS10 0
118#define DEF_LBPRZ 1
119#define DEF_LOWEST_ALIGNED 0
120#define DEF_NDELAY 0 /* if > 0 unit is a nanosecond */
121#define DEF_NO_LUN_0 0
122#define DEF_NUM_PARTS 0
123#define DEF_OPTS 0
124#define DEF_OPT_BLKS 1024
125#define DEF_PHYSBLK_EXP 0
126#define DEF_OPT_XFERLEN_EXP 0
127#define DEF_PTYPE TYPE_DISK
128#define DEF_REMOVABLE false
129#define DEF_SCSI_LEVEL 7 /* INQUIRY, byte2 [6->SPC-4; 7->SPC-5] */
130#define DEF_SECTOR_SIZE 512
131#define DEF_UNMAP_ALIGNMENT 0
132#define DEF_UNMAP_GRANULARITY 1
133#define DEF_UNMAP_MAX_BLOCKS 0xFFFFFFFF
134#define DEF_UNMAP_MAX_DESC 256
135#define DEF_VIRTUAL_GB 0
136#define DEF_VPD_USE_HOSTNO 1
137#define DEF_WRITESAME_LENGTH 0xFFFF
138#define DEF_STRICT 0
139#define DEF_STATISTICS false
140#define DEF_SUBMIT_QUEUES 1
141#define DEF_UUID_CTL 0
142#define JDELAY_OVERRIDDEN -9999
143
144#define SDEBUG_LUN_0_VAL 0
145
146/* bit mask values for sdebug_opts */
147#define SDEBUG_OPT_NOISE 1
148#define SDEBUG_OPT_MEDIUM_ERR 2
149#define SDEBUG_OPT_TIMEOUT 4
150#define SDEBUG_OPT_RECOVERED_ERR 8
151#define SDEBUG_OPT_TRANSPORT_ERR 16
152#define SDEBUG_OPT_DIF_ERR 32
153#define SDEBUG_OPT_DIX_ERR 64
154#define SDEBUG_OPT_MAC_TIMEOUT 128
155#define SDEBUG_OPT_SHORT_TRANSFER 0x100
156#define SDEBUG_OPT_Q_NOISE 0x200
157#define SDEBUG_OPT_ALL_TSF 0x400
158#define SDEBUG_OPT_RARE_TSF 0x800
159#define SDEBUG_OPT_N_WCE 0x1000
160#define SDEBUG_OPT_RESET_NOISE 0x2000
161#define SDEBUG_OPT_NO_CDB_NOISE 0x4000
162#define SDEBUG_OPT_HOST_BUSY 0x8000
163#define SDEBUG_OPT_CMD_ABORT 0x10000
164#define SDEBUG_OPT_ALL_NOISE (SDEBUG_OPT_NOISE | SDEBUG_OPT_Q_NOISE | \
165 SDEBUG_OPT_RESET_NOISE)
166#define SDEBUG_OPT_ALL_INJECTING (SDEBUG_OPT_RECOVERED_ERR | \
167 SDEBUG_OPT_TRANSPORT_ERR | \
168 SDEBUG_OPT_DIF_ERR | SDEBUG_OPT_DIX_ERR | \
169 SDEBUG_OPT_SHORT_TRANSFER | \
170 SDEBUG_OPT_HOST_BUSY | \
171 SDEBUG_OPT_CMD_ABORT)
172/* When "every_nth" > 0 then modulo "every_nth" commands:
173 * - a missing response is simulated if SDEBUG_OPT_TIMEOUT is set
174 * - a RECOVERED_ERROR is simulated on successful read and write
175 * commands if SDEBUG_OPT_RECOVERED_ERR is set.
176 * - a TRANSPORT_ERROR is simulated on successful read and write
177 * commands if SDEBUG_OPT_TRANSPORT_ERR is set.
178 * - similarly for DIF_ERR, DIX_ERR, SHORT_TRANSFER, HOST_BUSY and
179 * CMD_ABORT
180 *
181 * When "every_nth" < 0 then after "- every_nth" commands the selected
182 * error will be injected. The error will be injected on every subsequent
183 * command until some other action occurs; for example, the user writing
184 * a new value (other than -1 or 1) to every_nth:
185 * echo 0 > /sys/bus/pseudo/drivers/scsi_debug/every_nth
186 */
187
188/* As indicated in SAM-5 and SPC-4 Unit Attentions (UAs) are returned in
189 * priority order. In the subset implemented here lower numbers have higher
190 * priority. The UA numbers should be a sequence starting from 0 with
191 * SDEBUG_NUM_UAS being 1 higher than the highest numbered UA. */
192#define SDEBUG_UA_POR 0 /* Power on, reset, or bus device reset */
193#define SDEBUG_UA_BUS_RESET 1
194#define SDEBUG_UA_MODE_CHANGED 2
195#define SDEBUG_UA_CAPACITY_CHANGED 3
196#define SDEBUG_UA_LUNS_CHANGED 4
197#define SDEBUG_UA_MICROCODE_CHANGED 5 /* simulate firmware change */
198#define SDEBUG_UA_MICROCODE_CHANGED_WO_RESET 6
199#define SDEBUG_NUM_UAS 7
200
201/* when 1==SDEBUG_OPT_MEDIUM_ERR, a medium error is simulated at this
202 * sector on read commands: */
203#define OPT_MEDIUM_ERR_ADDR 0x1234 /* that's sector 4660 in decimal */
204#define OPT_MEDIUM_ERR_NUM 10 /* number of consecutive medium errs */
205
206/* If REPORT LUNS has luns >= 256 it can choose "flat space" (value 1)
207 * or "peripheral device" addressing (value 0) */
208#define SAM2_LUN_ADDRESS_METHOD 0
209
210/* SDEBUG_CANQUEUE is the maximum number of commands that can be queued
211 * (for response) per submit queue at one time. Can be reduced by max_queue
212 * option. Command responses are not queued when jdelay=0 and ndelay=0. The
213 * per-device DEF_CMD_PER_LUN can be changed via sysfs:
214 * /sys/class/scsi_device/<h:c:t:l>/device/queue_depth
215 * but cannot exceed SDEBUG_CANQUEUE .
216 */
217#define SDEBUG_CANQUEUE_WORDS 3 /* a WORD is bits in a long */
218#define SDEBUG_CANQUEUE (SDEBUG_CANQUEUE_WORDS * BITS_PER_LONG)
219#define DEF_CMD_PER_LUN 255
220
221#define F_D_IN 1
222#define F_D_OUT 2
223#define F_D_OUT_MAYBE 4 /* WRITE SAME, NDOB bit */
224#define F_D_UNKN 8
225#define F_RL_WLUN_OK 0x10
226#define F_SKIP_UA 0x20
227#define F_DELAY_OVERR 0x40
228#define F_SA_LOW 0x80 /* cdb byte 1, bits 4 to 0 */
229#define F_SA_HIGH 0x100 /* as used by variable length cdbs */
230#define F_INV_OP 0x200
231#define F_FAKE_RW 0x400
232#define F_M_ACCESS 0x800 /* media access */
233#define F_SSU_DELAY 0x1000
234#define F_SYNC_DELAY 0x2000
235
236#define FF_RESPOND (F_RL_WLUN_OK | F_SKIP_UA | F_DELAY_OVERR)
237#define FF_MEDIA_IO (F_M_ACCESS | F_FAKE_RW)
238#define FF_SA (F_SA_HIGH | F_SA_LOW)
239#define F_LONG_DELAY (F_SSU_DELAY | F_SYNC_DELAY)
240
241#define SDEBUG_MAX_PARTS 4
242
243#define SDEBUG_MAX_CMD_LEN 32
244
245
246struct sdebug_dev_info {
247 struct list_head dev_list;
248 unsigned int channel;
249 unsigned int target;
250 u64 lun;
251 uuid_t lu_name;
252 struct sdebug_host_info *sdbg_host;
253 unsigned long uas_bm[1];
254 atomic_t num_in_q;
255 atomic_t stopped;
256 bool used;
257};
258
259struct sdebug_host_info {
260 struct list_head host_list;
261 struct Scsi_Host *shost;
262 struct device dev;
263 struct list_head dev_info_list;
264};
265
266#define to_sdebug_host(d) \
267 container_of(d, struct sdebug_host_info, dev)
268
269enum sdeb_defer_type {SDEB_DEFER_NONE = 0, SDEB_DEFER_HRT = 1,
270 SDEB_DEFER_WQ = 2};
271
272struct sdebug_defer {
273 struct hrtimer hrt;
274 struct execute_work ew;
275 int sqa_idx; /* index of sdebug_queue array */
276 int qc_idx; /* index of sdebug_queued_cmd array within sqa_idx */
277 int issuing_cpu;
278 bool init_hrt;
279 bool init_wq;
280 bool aborted; /* true when blk_abort_request() already called */
281 enum sdeb_defer_type defer_t;
282};
283
284struct sdebug_queued_cmd {
285 /* corresponding bit set in in_use_bm[] in owning struct sdebug_queue
286 * instance indicates this slot is in use.
287 */
288 struct sdebug_defer *sd_dp;
289 struct scsi_cmnd *a_cmnd;
290 unsigned int inj_recovered:1;
291 unsigned int inj_transport:1;
292 unsigned int inj_dif:1;
293 unsigned int inj_dix:1;
294 unsigned int inj_short:1;
295 unsigned int inj_host_busy:1;
296 unsigned int inj_cmd_abort:1;
297};
298
299struct sdebug_queue {
300 struct sdebug_queued_cmd qc_arr[SDEBUG_CANQUEUE];
301 unsigned long in_use_bm[SDEBUG_CANQUEUE_WORDS];
302 spinlock_t qc_lock;
303 atomic_t blocked; /* to temporarily stop more being queued */
304};
305
306static atomic_t sdebug_cmnd_count; /* number of incoming commands */
307static atomic_t sdebug_completions; /* count of deferred completions */
308static atomic_t sdebug_miss_cpus; /* submission + completion cpus differ */
309static atomic_t sdebug_a_tsf; /* 'almost task set full' counter */
310
311struct opcode_info_t {
312 u8 num_attached; /* 0 if this is it (i.e. a leaf); use 0xff */
313 /* for terminating element */
314 u8 opcode; /* if num_attached > 0, preferred */
315 u16 sa; /* service action */
316 u32 flags; /* OR-ed set of SDEB_F_* */
317 int (*pfp)(struct scsi_cmnd *, struct sdebug_dev_info *);
318 const struct opcode_info_t *arrp; /* num_attached elements or NULL */
319 u8 len_mask[16]; /* len_mask[0]-->cdb_len, then mask for cdb */
320 /* 1 to min(cdb_len, 15); ignore cdb[15...] */
321};
322
323/* SCSI opcodes (first byte of cdb) of interest mapped onto these indexes */
324enum sdeb_opcode_index {
325 SDEB_I_INVALID_OPCODE = 0,
326 SDEB_I_INQUIRY = 1,
327 SDEB_I_REPORT_LUNS = 2,
328 SDEB_I_REQUEST_SENSE = 3,
329 SDEB_I_TEST_UNIT_READY = 4,
330 SDEB_I_MODE_SENSE = 5, /* 6, 10 */
331 SDEB_I_MODE_SELECT = 6, /* 6, 10 */
332 SDEB_I_LOG_SENSE = 7,
333 SDEB_I_READ_CAPACITY = 8, /* 10; 16 is in SA_IN(16) */
334 SDEB_I_READ = 9, /* 6, 10, 12, 16 */
335 SDEB_I_WRITE = 10, /* 6, 10, 12, 16 */
336 SDEB_I_START_STOP = 11,
337 SDEB_I_SERV_ACT_IN_16 = 12, /* add ...SERV_ACT_IN_12 if needed */
338 SDEB_I_SERV_ACT_OUT_16 = 13, /* add ...SERV_ACT_OUT_12 if needed */
339 SDEB_I_MAINT_IN = 14,
340 SDEB_I_MAINT_OUT = 15,
341 SDEB_I_VERIFY = 16, /* 10 only */
342 SDEB_I_VARIABLE_LEN = 17, /* READ(32), WRITE(32), WR_SCAT(32) */
343 SDEB_I_RESERVE = 18, /* 6, 10 */
344 SDEB_I_RELEASE = 19, /* 6, 10 */
345 SDEB_I_ALLOW_REMOVAL = 20, /* PREVENT ALLOW MEDIUM REMOVAL */
346 SDEB_I_REZERO_UNIT = 21, /* REWIND in SSC */
347 SDEB_I_ATA_PT = 22, /* 12, 16 */
348 SDEB_I_SEND_DIAG = 23,
349 SDEB_I_UNMAP = 24,
350 SDEB_I_WRITE_BUFFER = 25,
351 SDEB_I_WRITE_SAME = 26, /* 10, 16 */
352 SDEB_I_SYNC_CACHE = 27, /* 10, 16 */
353 SDEB_I_COMP_WRITE = 28,
354 SDEB_I_LAST_ELEMENT = 29, /* keep this last (previous + 1) */
355};
356
357
358static const unsigned char opcode_ind_arr[256] = {
359/* 0x0; 0x0->0x1f: 6 byte cdbs */
360 SDEB_I_TEST_UNIT_READY, SDEB_I_REZERO_UNIT, 0, SDEB_I_REQUEST_SENSE,
361 0, 0, 0, 0,
362 SDEB_I_READ, 0, SDEB_I_WRITE, 0, 0, 0, 0, 0,
363 0, 0, SDEB_I_INQUIRY, 0, 0, SDEB_I_MODE_SELECT, SDEB_I_RESERVE,
364 SDEB_I_RELEASE,
365 0, 0, SDEB_I_MODE_SENSE, SDEB_I_START_STOP, 0, SDEB_I_SEND_DIAG,
366 SDEB_I_ALLOW_REMOVAL, 0,
367/* 0x20; 0x20->0x3f: 10 byte cdbs */
368 0, 0, 0, 0, 0, SDEB_I_READ_CAPACITY, 0, 0,
369 SDEB_I_READ, 0, SDEB_I_WRITE, 0, 0, 0, 0, SDEB_I_VERIFY,
370 0, 0, 0, 0, 0, SDEB_I_SYNC_CACHE, 0, 0,
371 0, 0, 0, SDEB_I_WRITE_BUFFER, 0, 0, 0, 0,
372/* 0x40; 0x40->0x5f: 10 byte cdbs */
373 0, SDEB_I_WRITE_SAME, SDEB_I_UNMAP, 0, 0, 0, 0, 0,
374 0, 0, 0, 0, 0, SDEB_I_LOG_SENSE, 0, 0,
375 0, 0, 0, 0, 0, SDEB_I_MODE_SELECT, SDEB_I_RESERVE,
376 SDEB_I_RELEASE,
377 0, 0, SDEB_I_MODE_SENSE, 0, 0, 0, 0, 0,
378/* 0x60; 0x60->0x7d are reserved, 0x7e is "extended cdb" */
379 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
380 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
381 0, SDEB_I_VARIABLE_LEN,
382/* 0x80; 0x80->0x9f: 16 byte cdbs */
383 0, 0, 0, 0, 0, SDEB_I_ATA_PT, 0, 0,
384 SDEB_I_READ, SDEB_I_COMP_WRITE, SDEB_I_WRITE, 0, 0, 0, 0, 0,
385 0, SDEB_I_SYNC_CACHE, 0, SDEB_I_WRITE_SAME, 0, 0, 0, 0,
386 0, 0, 0, 0, 0, 0, SDEB_I_SERV_ACT_IN_16, SDEB_I_SERV_ACT_OUT_16,
387/* 0xa0; 0xa0->0xbf: 12 byte cdbs */
388 SDEB_I_REPORT_LUNS, SDEB_I_ATA_PT, 0, SDEB_I_MAINT_IN,
389 SDEB_I_MAINT_OUT, 0, 0, 0,
390 SDEB_I_READ, 0 /* SDEB_I_SERV_ACT_OUT_12 */, SDEB_I_WRITE,
391 0 /* SDEB_I_SERV_ACT_IN_12 */, 0, 0, 0, 0,
392 0, 0, 0, 0, 0, 0, 0, 0,
393 0, 0, 0, 0, 0, 0, 0, 0,
394/* 0xc0; 0xc0->0xff: vendor specific */
395 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
396 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
397 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
398 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
399};
400
401/*
402 * The following "response" functions return the SCSI mid-level's 4 byte
403 * tuple-in-an-int. To handle commands with an IMMED bit, for a faster
404 * command completion, they can mask their return value with
405 * SDEG_RES_IMMED_MASK .
406 */
407#define SDEG_RES_IMMED_MASK 0x40000000
408
409static int resp_inquiry(struct scsi_cmnd *, struct sdebug_dev_info *);
410static int resp_report_luns(struct scsi_cmnd *, struct sdebug_dev_info *);
411static int resp_requests(struct scsi_cmnd *, struct sdebug_dev_info *);
412static int resp_mode_sense(struct scsi_cmnd *, struct sdebug_dev_info *);
413static int resp_mode_select(struct scsi_cmnd *, struct sdebug_dev_info *);
414static int resp_log_sense(struct scsi_cmnd *, struct sdebug_dev_info *);
415static int resp_readcap(struct scsi_cmnd *, struct sdebug_dev_info *);
416static int resp_read_dt0(struct scsi_cmnd *, struct sdebug_dev_info *);
417static int resp_write_dt0(struct scsi_cmnd *, struct sdebug_dev_info *);
418static int resp_write_scat(struct scsi_cmnd *, struct sdebug_dev_info *);
419static int resp_start_stop(struct scsi_cmnd *, struct sdebug_dev_info *);
420static int resp_readcap16(struct scsi_cmnd *, struct sdebug_dev_info *);
421static int resp_get_lba_status(struct scsi_cmnd *, struct sdebug_dev_info *);
422static int resp_report_tgtpgs(struct scsi_cmnd *, struct sdebug_dev_info *);
423static int resp_unmap(struct scsi_cmnd *, struct sdebug_dev_info *);
424static int resp_rsup_opcodes(struct scsi_cmnd *, struct sdebug_dev_info *);
425static int resp_rsup_tmfs(struct scsi_cmnd *, struct sdebug_dev_info *);
426static int resp_write_same_10(struct scsi_cmnd *, struct sdebug_dev_info *);
427static int resp_write_same_16(struct scsi_cmnd *, struct sdebug_dev_info *);
428static int resp_comp_write(struct scsi_cmnd *, struct sdebug_dev_info *);
429static int resp_write_buffer(struct scsi_cmnd *, struct sdebug_dev_info *);
430static int resp_sync_cache(struct scsi_cmnd *, struct sdebug_dev_info *);
431
432/*
433 * The following are overflow arrays for cdbs that "hit" the same index in
434 * the opcode_info_arr array. The most time sensitive (or commonly used) cdb
435 * should be placed in opcode_info_arr[], the others should be placed here.
436 */
437static const struct opcode_info_t msense_iarr[] = {
438 {0, 0x1a, 0, F_D_IN, NULL, NULL,
439 {6, 0xe8, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
440};
441
442static const struct opcode_info_t mselect_iarr[] = {
443 {0, 0x15, 0, F_D_OUT, NULL, NULL,
444 {6, 0xf1, 0, 0, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
445};
446
447static const struct opcode_info_t read_iarr[] = {
448 {0, 0x28, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL,/* READ(10) */
449 {10, 0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
450 0, 0, 0, 0} },
451 {0, 0x8, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL, /* READ(6) */
452 {6, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
453 {0, 0xa8, 0, F_D_IN | FF_MEDIA_IO, resp_read_dt0, NULL,/* READ(12) */
454 {12, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xbf,
455 0xc7, 0, 0, 0, 0} },
456};
457
458static const struct opcode_info_t write_iarr[] = {
459 {0, 0x2a, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0, /* WRITE(10) */
460 NULL, {10, 0xfb, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7,
461 0, 0, 0, 0, 0, 0} },
462 {0, 0xa, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0, /* WRITE(6) */
463 NULL, {6, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0,
464 0, 0, 0} },
465 {0, 0xaa, 0, F_D_OUT | FF_MEDIA_IO, resp_write_dt0, /* WRITE(12) */
466 NULL, {12, 0xfb, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
467 0xbf, 0xc7, 0, 0, 0, 0} },
468};
469
470static const struct opcode_info_t sa_in_16_iarr[] = {
471 {0, 0x9e, 0x12, F_SA_LOW | F_D_IN, resp_get_lba_status, NULL,
472 {16, 0x12, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
473 0xff, 0xff, 0xff, 0, 0xc7} }, /* GET LBA STATUS(16) */
474};
475
476static const struct opcode_info_t vl_iarr[] = { /* VARIABLE LENGTH */
477 {0, 0x7f, 0xb, F_SA_HIGH | F_D_OUT | FF_MEDIA_IO, resp_write_dt0,
478 NULL, {32, 0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0xb, 0xfa,
479 0, 0xff, 0xff, 0xff, 0xff} }, /* WRITE(32) */
480 {0, 0x7f, 0x11, F_SA_HIGH | F_D_OUT | FF_MEDIA_IO, resp_write_scat,
481 NULL, {32, 0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0x11, 0xf8,
482 0, 0xff, 0xff, 0x0, 0x0} }, /* WRITE SCATTERED(32) */
483};
484
485static const struct opcode_info_t maint_in_iarr[] = { /* MAINT IN */
486 {0, 0xa3, 0xc, F_SA_LOW | F_D_IN, resp_rsup_opcodes, NULL,
487 {12, 0xc, 0x87, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0,
488 0xc7, 0, 0, 0, 0} }, /* REPORT SUPPORTED OPERATION CODES */
489 {0, 0xa3, 0xd, F_SA_LOW | F_D_IN, resp_rsup_tmfs, NULL,
490 {12, 0xd, 0x80, 0, 0, 0, 0xff, 0xff, 0xff, 0xff, 0, 0xc7, 0, 0,
491 0, 0} }, /* REPORTED SUPPORTED TASK MANAGEMENT FUNCTIONS */
492};
493
494static const struct opcode_info_t write_same_iarr[] = {
495 {0, 0x93, 0, F_D_OUT_MAYBE | FF_MEDIA_IO, resp_write_same_16, NULL,
496 {16, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
497 0xff, 0xff, 0xff, 0x3f, 0xc7} }, /* WRITE SAME(16) */
498};
499
500static const struct opcode_info_t reserve_iarr[] = {
501 {0, 0x16, 0, F_D_OUT, NULL, NULL, /* RESERVE(6) */
502 {6, 0x1f, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
503};
504
505static const struct opcode_info_t release_iarr[] = {
506 {0, 0x17, 0, F_D_OUT, NULL, NULL, /* RELEASE(6) */
507 {6, 0x1f, 0xff, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
508};
509
510static const struct opcode_info_t sync_cache_iarr[] = {
511 {0, 0x91, 0, F_SYNC_DELAY | F_M_ACCESS, resp_sync_cache, NULL,
512 {16, 0x6, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
513 0xff, 0xff, 0xff, 0xff, 0x3f, 0xc7} }, /* SYNC_CACHE (16) */
514};
515
516
517/* This array is accessed via SDEB_I_* values. Make sure all are mapped,
518 * plus the terminating elements for logic that scans this table such as
519 * REPORT SUPPORTED OPERATION CODES. */
520static const struct opcode_info_t opcode_info_arr[SDEB_I_LAST_ELEMENT + 1] = {
521/* 0 */
522 {0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* unknown opcodes */
523 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
524 {0, 0x12, 0, FF_RESPOND | F_D_IN, resp_inquiry, NULL, /* INQUIRY */
525 {6, 0xe3, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
526 {0, 0xa0, 0, FF_RESPOND | F_D_IN, resp_report_luns, NULL,
527 {12, 0xe3, 0xff, 0, 0, 0, 0xff, 0xff, 0xff, 0xff, 0, 0xc7, 0, 0,
528 0, 0} }, /* REPORT LUNS */
529 {0, 0x3, 0, FF_RESPOND | F_D_IN, resp_requests, NULL,
530 {6, 0xe1, 0, 0, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
531 {0, 0x0, 0, F_M_ACCESS | F_RL_WLUN_OK, NULL, NULL,/* TEST UNIT READY */
532 {6, 0, 0, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
533/* 5 */
534 {ARRAY_SIZE(msense_iarr), 0x5a, 0, F_D_IN, /* MODE SENSE(10) */
535 resp_mode_sense, msense_iarr, {10, 0xf8, 0xff, 0xff, 0, 0, 0,
536 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
537 {ARRAY_SIZE(mselect_iarr), 0x55, 0, F_D_OUT, /* MODE SELECT(10) */
538 resp_mode_select, mselect_iarr, {10, 0xf1, 0, 0, 0, 0, 0, 0xff,
539 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
540 {0, 0x4d, 0, F_D_IN, resp_log_sense, NULL, /* LOG SENSE */
541 {10, 0xe3, 0xff, 0xff, 0, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0, 0,
542 0, 0, 0} },
543 {0, 0x25, 0, F_D_IN, resp_readcap, NULL, /* READ CAPACITY(10) */
544 {10, 0xe1, 0xff, 0xff, 0xff, 0xff, 0, 0, 0x1, 0xc7, 0, 0, 0, 0,
545 0, 0} },
546 {ARRAY_SIZE(read_iarr), 0x88, 0, F_D_IN | FF_MEDIA_IO, /* READ(16) */
547 resp_read_dt0, read_iarr, {16, 0xfe, 0xff, 0xff, 0xff, 0xff,
548 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7} },
549/* 10 */
550 {ARRAY_SIZE(write_iarr), 0x8a, 0, F_D_OUT | FF_MEDIA_IO,
551 resp_write_dt0, write_iarr, /* WRITE(16) */
552 {16, 0xfa, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
553 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7} },
554 {0, 0x1b, 0, F_SSU_DELAY, resp_start_stop, NULL,/* START STOP UNIT */
555 {6, 0x1, 0, 0xf, 0xf7, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
556 {ARRAY_SIZE(sa_in_16_iarr), 0x9e, 0x10, F_SA_LOW | F_D_IN,
557 resp_readcap16, sa_in_16_iarr, /* SA_IN(16), READ CAPACITY(16) */
558 {16, 0x10, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
559 0xff, 0xff, 0xff, 0xff, 0x1, 0xc7} },
560 {0, 0x9f, 0x12, F_SA_LOW | F_D_OUT | FF_MEDIA_IO, resp_write_scat,
561 NULL, {16, 0x12, 0xf9, 0x0, 0xff, 0xff, 0, 0, 0xff, 0xff, 0xff,
562 0xff, 0xff, 0xff, 0xff, 0xc7} }, /* SA_OUT(16), WRITE SCAT(16) */
563 {ARRAY_SIZE(maint_in_iarr), 0xa3, 0xa, F_SA_LOW | F_D_IN,
564 resp_report_tgtpgs, /* MAINT IN, REPORT TARGET PORT GROUPS */
565 maint_in_iarr, {12, 0xea, 0, 0, 0, 0, 0xff, 0xff, 0xff,
566 0xff, 0, 0xc7, 0, 0, 0, 0} },
567/* 15 */
568 {0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* MAINT OUT */
569 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
570 {0, 0x2f, 0, F_D_OUT_MAYBE | FF_MEDIA_IO, NULL, NULL, /* VERIFY(10) */
571 {10, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7,
572 0, 0, 0, 0, 0, 0} },
573 {ARRAY_SIZE(vl_iarr), 0x7f, 0x9, F_SA_HIGH | F_D_IN | FF_MEDIA_IO,
574 resp_read_dt0, vl_iarr, /* VARIABLE LENGTH, READ(32) */
575 {32, 0xc7, 0, 0, 0, 0, 0x3f, 0x18, 0x0, 0x9, 0xfe, 0, 0xff, 0xff,
576 0xff, 0xff} },
577 {ARRAY_SIZE(reserve_iarr), 0x56, 0, F_D_OUT,
578 NULL, reserve_iarr, /* RESERVE(10) <no response function> */
579 {10, 0xff, 0xff, 0xff, 0, 0, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0,
580 0} },
581 {ARRAY_SIZE(release_iarr), 0x57, 0, F_D_OUT,
582 NULL, release_iarr, /* RELEASE(10) <no response function> */
583 {10, 0x13, 0xff, 0xff, 0, 0, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0,
584 0} },
585/* 20 */
586 {0, 0x1e, 0, 0, NULL, NULL, /* ALLOW REMOVAL */
587 {6, 0, 0, 0, 0x3, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
588 {0, 0x1, 0, 0, resp_start_stop, NULL, /* REWIND ?? */
589 {6, 0x1, 0, 0, 0, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
590 {0, 0, 0, F_INV_OP | FF_RESPOND, NULL, NULL, /* ATA_PT */
591 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
592 {0, 0x1d, F_D_OUT, 0, NULL, NULL, /* SEND DIAGNOSTIC */
593 {6, 0xf7, 0, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
594 {0, 0x42, 0, F_D_OUT | FF_MEDIA_IO, resp_unmap, NULL, /* UNMAP */
595 {10, 0x1, 0, 0, 0, 0, 0x3f, 0xff, 0xff, 0xc7, 0, 0, 0, 0, 0, 0} },
596/* 25 */
597 {0, 0x3b, 0, F_D_OUT_MAYBE, resp_write_buffer, NULL,
598 {10, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xc7, 0, 0,
599 0, 0, 0, 0} }, /* WRITE_BUFFER */
600 {ARRAY_SIZE(write_same_iarr), 0x41, 0, F_D_OUT_MAYBE | FF_MEDIA_IO,
601 resp_write_same_10, write_same_iarr, /* WRITE SAME(10) */
602 {10, 0xff, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0,
603 0, 0, 0, 0, 0} },
604 {ARRAY_SIZE(sync_cache_iarr), 0x35, 0, F_SYNC_DELAY | F_M_ACCESS,
605 resp_sync_cache, sync_cache_iarr,
606 {10, 0x7, 0xff, 0xff, 0xff, 0xff, 0x3f, 0xff, 0xff, 0xc7, 0, 0,
607 0, 0, 0, 0} }, /* SYNC_CACHE (10) */
608 {0, 0x89, 0, F_D_OUT | FF_MEDIA_IO, resp_comp_write, NULL,
609 {16, 0xf8, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0, 0,
610 0, 0xff, 0x3f, 0xc7} }, /* COMPARE AND WRITE */
611
612/* 29 */
613 {0xff, 0, 0, 0, NULL, NULL, /* terminating element */
614 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} },
615};
616
617static int sdebug_add_host = DEF_NUM_HOST;
618static int sdebug_ato = DEF_ATO;
619static int sdebug_cdb_len = DEF_CDB_LEN;
620static int sdebug_jdelay = DEF_JDELAY; /* if > 0 then unit is jiffies */
621static int sdebug_dev_size_mb = DEF_DEV_SIZE_MB;
622static int sdebug_dif = DEF_DIF;
623static int sdebug_dix = DEF_DIX;
624static int sdebug_dsense = DEF_D_SENSE;
625static int sdebug_every_nth = DEF_EVERY_NTH;
626static int sdebug_fake_rw = DEF_FAKE_RW;
627static unsigned int sdebug_guard = DEF_GUARD;
628static int sdebug_lowest_aligned = DEF_LOWEST_ALIGNED;
629static int sdebug_max_luns = DEF_MAX_LUNS;
630static int sdebug_max_queue = SDEBUG_CANQUEUE; /* per submit queue */
631static unsigned int sdebug_medium_error_start = OPT_MEDIUM_ERR_ADDR;
632static int sdebug_medium_error_count = OPT_MEDIUM_ERR_NUM;
633static atomic_t retired_max_queue; /* if > 0 then was prior max_queue */
634static int sdebug_ndelay = DEF_NDELAY; /* if > 0 then unit is nanoseconds */
635static int sdebug_no_lun_0 = DEF_NO_LUN_0;
636static int sdebug_no_uld;
637static int sdebug_num_parts = DEF_NUM_PARTS;
638static int sdebug_num_tgts = DEF_NUM_TGTS; /* targets per host */
639static int sdebug_opt_blks = DEF_OPT_BLKS;
640static int sdebug_opts = DEF_OPTS;
641static int sdebug_physblk_exp = DEF_PHYSBLK_EXP;
642static int sdebug_opt_xferlen_exp = DEF_OPT_XFERLEN_EXP;
643static int sdebug_ptype = DEF_PTYPE; /* SCSI peripheral device type */
644static int sdebug_scsi_level = DEF_SCSI_LEVEL;
645static int sdebug_sector_size = DEF_SECTOR_SIZE;
646static int sdebug_virtual_gb = DEF_VIRTUAL_GB;
647static int sdebug_vpd_use_hostno = DEF_VPD_USE_HOSTNO;
648static unsigned int sdebug_lbpu = DEF_LBPU;
649static unsigned int sdebug_lbpws = DEF_LBPWS;
650static unsigned int sdebug_lbpws10 = DEF_LBPWS10;
651static unsigned int sdebug_lbprz = DEF_LBPRZ;
652static unsigned int sdebug_unmap_alignment = DEF_UNMAP_ALIGNMENT;
653static unsigned int sdebug_unmap_granularity = DEF_UNMAP_GRANULARITY;
654static unsigned int sdebug_unmap_max_blocks = DEF_UNMAP_MAX_BLOCKS;
655static unsigned int sdebug_unmap_max_desc = DEF_UNMAP_MAX_DESC;
656static unsigned int sdebug_write_same_length = DEF_WRITESAME_LENGTH;
657static int sdebug_uuid_ctl = DEF_UUID_CTL;
658static bool sdebug_removable = DEF_REMOVABLE;
659static bool sdebug_clustering;
660static bool sdebug_host_lock = DEF_HOST_LOCK;
661static bool sdebug_strict = DEF_STRICT;
662static bool sdebug_any_injecting_opt;
663static bool sdebug_verbose;
664static bool have_dif_prot;
665static bool write_since_sync;
666static bool sdebug_statistics = DEF_STATISTICS;
667static bool sdebug_wp;
668
669static unsigned int sdebug_store_sectors;
670static sector_t sdebug_capacity; /* in sectors */
671
672/* old BIOS stuff, kernel may get rid of them but some mode sense pages
673 may still need them */
674static int sdebug_heads; /* heads per disk */
675static int sdebug_cylinders_per; /* cylinders per surface */
676static int sdebug_sectors_per; /* sectors per cylinder */
677
678static LIST_HEAD(sdebug_host_list);
679static DEFINE_SPINLOCK(sdebug_host_list_lock);
680
681static unsigned char *fake_storep; /* ramdisk storage */
682static struct t10_pi_tuple *dif_storep; /* protection info */
683static void *map_storep; /* provisioning map */
684
685static unsigned long map_size;
686static int num_aborts;
687static int num_dev_resets;
688static int num_target_resets;
689static int num_bus_resets;
690static int num_host_resets;
691static int dix_writes;
692static int dix_reads;
693static int dif_errors;
694
695static int submit_queues = DEF_SUBMIT_QUEUES; /* > 1 for multi-queue (mq) */
696static struct sdebug_queue *sdebug_q_arr; /* ptr to array of submit queues */
697
698static DEFINE_RWLOCK(atomic_rw);
699
700static char sdebug_proc_name[] = MY_NAME;
701static const char *my_name = MY_NAME;
702
703static struct bus_type pseudo_lld_bus;
704
705static struct device_driver sdebug_driverfs_driver = {
706 .name = sdebug_proc_name,
707 .bus = &pseudo_lld_bus,
708};
709
710static const int check_condition_result =
711 (DRIVER_SENSE << 24) | SAM_STAT_CHECK_CONDITION;
712
713static const int illegal_condition_result =
714 (DRIVER_SENSE << 24) | (DID_ABORT << 16) | SAM_STAT_CHECK_CONDITION;
715
716static const int device_qfull_result =
717 (DID_OK << 16) | (COMMAND_COMPLETE << 8) | SAM_STAT_TASK_SET_FULL;
718
719
720/* Only do the extra work involved in logical block provisioning if one or
721 * more of the lbpu, lbpws or lbpws10 parameters are given and we are doing
722 * real reads and writes (i.e. not skipping them for speed).
723 */
724static inline bool scsi_debug_lbp(void)
725{
726 return 0 == sdebug_fake_rw &&
727 (sdebug_lbpu || sdebug_lbpws || sdebug_lbpws10);
728}
729
730static void *lba2fake_store(unsigned long long lba)
731{
732 lba = do_div(lba, sdebug_store_sectors);
733
734 return fake_storep + lba * sdebug_sector_size;
735}
736
737static struct t10_pi_tuple *dif_store(sector_t sector)
738{
739 sector = sector_div(sector, sdebug_store_sectors);
740
741 return dif_storep + sector;
742}
743
744static void sdebug_max_tgts_luns(void)
745{
746 struct sdebug_host_info *sdbg_host;
747 struct Scsi_Host *hpnt;
748
749 spin_lock(&sdebug_host_list_lock);
750 list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
751 hpnt = sdbg_host->shost;
752 if ((hpnt->this_id >= 0) &&
753 (sdebug_num_tgts > hpnt->this_id))
754 hpnt->max_id = sdebug_num_tgts + 1;
755 else
756 hpnt->max_id = sdebug_num_tgts;
757 /* sdebug_max_luns; */
758 hpnt->max_lun = SCSI_W_LUN_REPORT_LUNS + 1;
759 }
760 spin_unlock(&sdebug_host_list_lock);
761}
762
763enum sdeb_cmd_data {SDEB_IN_DATA = 0, SDEB_IN_CDB = 1};
764
765/* Set in_bit to -1 to indicate no bit position of invalid field */
766static void mk_sense_invalid_fld(struct scsi_cmnd *scp,
767 enum sdeb_cmd_data c_d,
768 int in_byte, int in_bit)
769{
770 unsigned char *sbuff;
771 u8 sks[4];
772 int sl, asc;
773
774 sbuff = scp->sense_buffer;
775 if (!sbuff) {
776 sdev_printk(KERN_ERR, scp->device,
777 "%s: sense_buffer is NULL\n", __func__);
778 return;
779 }
780 asc = c_d ? INVALID_FIELD_IN_CDB : INVALID_FIELD_IN_PARAM_LIST;
781 memset(sbuff, 0, SCSI_SENSE_BUFFERSIZE);
782 scsi_build_sense_buffer(sdebug_dsense, sbuff, ILLEGAL_REQUEST, asc, 0);
783 memset(sks, 0, sizeof(sks));
784 sks[0] = 0x80;
785 if (c_d)
786 sks[0] |= 0x40;
787 if (in_bit >= 0) {
788 sks[0] |= 0x8;
789 sks[0] |= 0x7 & in_bit;
790 }
791 put_unaligned_be16(in_byte, sks + 1);
792 if (sdebug_dsense) {
793 sl = sbuff[7] + 8;
794 sbuff[7] = sl;
795 sbuff[sl] = 0x2;
796 sbuff[sl + 1] = 0x6;
797 memcpy(sbuff + sl + 4, sks, 3);
798 } else
799 memcpy(sbuff + 15, sks, 3);
800 if (sdebug_verbose)
801 sdev_printk(KERN_INFO, scp->device, "%s: [sense_key,asc,ascq"
802 "]: [0x5,0x%x,0x0] %c byte=%d, bit=%d\n",
803 my_name, asc, c_d ? 'C' : 'D', in_byte, in_bit);
804}
805
806static void mk_sense_buffer(struct scsi_cmnd *scp, int key, int asc, int asq)
807{
808 unsigned char *sbuff;
809
810 sbuff = scp->sense_buffer;
811 if (!sbuff) {
812 sdev_printk(KERN_ERR, scp->device,
813 "%s: sense_buffer is NULL\n", __func__);
814 return;
815 }
816 memset(sbuff, 0, SCSI_SENSE_BUFFERSIZE);
817
818 scsi_build_sense_buffer(sdebug_dsense, sbuff, key, asc, asq);
819
820 if (sdebug_verbose)
821 sdev_printk(KERN_INFO, scp->device,
822 "%s: [sense_key,asc,ascq]: [0x%x,0x%x,0x%x]\n",
823 my_name, key, asc, asq);
824}
825
826static void mk_sense_invalid_opcode(struct scsi_cmnd *scp)
827{
828 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_OPCODE, 0);
829}
830
831static int scsi_debug_ioctl(struct scsi_device *dev, unsigned int cmd,
832 void __user *arg)
833{
834 if (sdebug_verbose) {
835 if (0x1261 == cmd)
836 sdev_printk(KERN_INFO, dev,
837 "%s: BLKFLSBUF [0x1261]\n", __func__);
838 else if (0x5331 == cmd)
839 sdev_printk(KERN_INFO, dev,
840 "%s: CDROM_GET_CAPABILITY [0x5331]\n",
841 __func__);
842 else
843 sdev_printk(KERN_INFO, dev, "%s: cmd=0x%x\n",
844 __func__, cmd);
845 }
846 return -EINVAL;
847 /* return -ENOTTY; // correct return but upsets fdisk */
848}
849
850static void config_cdb_len(struct scsi_device *sdev)
851{
852 switch (sdebug_cdb_len) {
853 case 6: /* suggest 6 byte READ, WRITE and MODE SENSE/SELECT */
854 sdev->use_10_for_rw = false;
855 sdev->use_16_for_rw = false;
856 sdev->use_10_for_ms = false;
857 break;
858 case 10: /* suggest 10 byte RWs and 6 byte MODE SENSE/SELECT */
859 sdev->use_10_for_rw = true;
860 sdev->use_16_for_rw = false;
861 sdev->use_10_for_ms = false;
862 break;
863 case 12: /* suggest 10 byte RWs and 10 byte MODE SENSE/SELECT */
864 sdev->use_10_for_rw = true;
865 sdev->use_16_for_rw = false;
866 sdev->use_10_for_ms = true;
867 break;
868 case 16:
869 sdev->use_10_for_rw = false;
870 sdev->use_16_for_rw = true;
871 sdev->use_10_for_ms = true;
872 break;
873 case 32: /* No knobs to suggest this so same as 16 for now */
874 sdev->use_10_for_rw = false;
875 sdev->use_16_for_rw = true;
876 sdev->use_10_for_ms = true;
877 break;
878 default:
879 pr_warn("unexpected cdb_len=%d, force to 10\n",
880 sdebug_cdb_len);
881 sdev->use_10_for_rw = true;
882 sdev->use_16_for_rw = false;
883 sdev->use_10_for_ms = false;
884 sdebug_cdb_len = 10;
885 break;
886 }
887}
888
889static void all_config_cdb_len(void)
890{
891 struct sdebug_host_info *sdbg_host;
892 struct Scsi_Host *shost;
893 struct scsi_device *sdev;
894
895 spin_lock(&sdebug_host_list_lock);
896 list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
897 shost = sdbg_host->shost;
898 shost_for_each_device(sdev, shost) {
899 config_cdb_len(sdev);
900 }
901 }
902 spin_unlock(&sdebug_host_list_lock);
903}
904
905static void clear_luns_changed_on_target(struct sdebug_dev_info *devip)
906{
907 struct sdebug_host_info *sdhp;
908 struct sdebug_dev_info *dp;
909
910 spin_lock(&sdebug_host_list_lock);
911 list_for_each_entry(sdhp, &sdebug_host_list, host_list) {
912 list_for_each_entry(dp, &sdhp->dev_info_list, dev_list) {
913 if ((devip->sdbg_host == dp->sdbg_host) &&
914 (devip->target == dp->target))
915 clear_bit(SDEBUG_UA_LUNS_CHANGED, dp->uas_bm);
916 }
917 }
918 spin_unlock(&sdebug_host_list_lock);
919}
920
921static int make_ua(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
922{
923 int k;
924
925 k = find_first_bit(devip->uas_bm, SDEBUG_NUM_UAS);
926 if (k != SDEBUG_NUM_UAS) {
927 const char *cp = NULL;
928
929 switch (k) {
930 case SDEBUG_UA_POR:
931 mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
932 POWER_ON_RESET_ASCQ);
933 if (sdebug_verbose)
934 cp = "power on reset";
935 break;
936 case SDEBUG_UA_BUS_RESET:
937 mk_sense_buffer(scp, UNIT_ATTENTION, UA_RESET_ASC,
938 BUS_RESET_ASCQ);
939 if (sdebug_verbose)
940 cp = "bus reset";
941 break;
942 case SDEBUG_UA_MODE_CHANGED:
943 mk_sense_buffer(scp, UNIT_ATTENTION, UA_CHANGED_ASC,
944 MODE_CHANGED_ASCQ);
945 if (sdebug_verbose)
946 cp = "mode parameters changed";
947 break;
948 case SDEBUG_UA_CAPACITY_CHANGED:
949 mk_sense_buffer(scp, UNIT_ATTENTION, UA_CHANGED_ASC,
950 CAPACITY_CHANGED_ASCQ);
951 if (sdebug_verbose)
952 cp = "capacity data changed";
953 break;
954 case SDEBUG_UA_MICROCODE_CHANGED:
955 mk_sense_buffer(scp, UNIT_ATTENTION,
956 TARGET_CHANGED_ASC,
957 MICROCODE_CHANGED_ASCQ);
958 if (sdebug_verbose)
959 cp = "microcode has been changed";
960 break;
961 case SDEBUG_UA_MICROCODE_CHANGED_WO_RESET:
962 mk_sense_buffer(scp, UNIT_ATTENTION,
963 TARGET_CHANGED_ASC,
964 MICROCODE_CHANGED_WO_RESET_ASCQ);
965 if (sdebug_verbose)
966 cp = "microcode has been changed without reset";
967 break;
968 case SDEBUG_UA_LUNS_CHANGED:
969 /*
970 * SPC-3 behavior is to report a UNIT ATTENTION with
971 * ASC/ASCQ REPORTED LUNS DATA HAS CHANGED on every LUN
972 * on the target, until a REPORT LUNS command is
973 * received. SPC-4 behavior is to report it only once.
974 * NOTE: sdebug_scsi_level does not use the same
975 * values as struct scsi_device->scsi_level.
976 */
977 if (sdebug_scsi_level >= 6) /* SPC-4 and above */
978 clear_luns_changed_on_target(devip);
979 mk_sense_buffer(scp, UNIT_ATTENTION,
980 TARGET_CHANGED_ASC,
981 LUNS_CHANGED_ASCQ);
982 if (sdebug_verbose)
983 cp = "reported luns data has changed";
984 break;
985 default:
986 pr_warn("unexpected unit attention code=%d\n", k);
987 if (sdebug_verbose)
988 cp = "unknown";
989 break;
990 }
991 clear_bit(k, devip->uas_bm);
992 if (sdebug_verbose)
993 sdev_printk(KERN_INFO, scp->device,
994 "%s reports: Unit attention: %s\n",
995 my_name, cp);
996 return check_condition_result;
997 }
998 return 0;
999}
1000
1001/* Build SCSI "data-in" buffer. Returns 0 if ok else (DID_ERROR << 16). */
1002static int fill_from_dev_buffer(struct scsi_cmnd *scp, unsigned char *arr,
1003 int arr_len)
1004{
1005 int act_len;
1006 struct scsi_data_buffer *sdb = &scp->sdb;
1007
1008 if (!sdb->length)
1009 return 0;
1010 if (scp->sc_data_direction != DMA_FROM_DEVICE)
1011 return DID_ERROR << 16;
1012
1013 act_len = sg_copy_from_buffer(sdb->table.sgl, sdb->table.nents,
1014 arr, arr_len);
1015 scsi_set_resid(scp, scsi_bufflen(scp) - act_len);
1016
1017 return 0;
1018}
1019
1020/* Partial build of SCSI "data-in" buffer. Returns 0 if ok else
1021 * (DID_ERROR << 16). Can write to offset in data-in buffer. If multiple
1022 * calls, not required to write in ascending offset order. Assumes resid
1023 * set to scsi_bufflen() prior to any calls.
1024 */
1025static int p_fill_from_dev_buffer(struct scsi_cmnd *scp, const void *arr,
1026 int arr_len, unsigned int off_dst)
1027{
1028 int act_len, n;
1029 struct scsi_data_buffer *sdb = &scp->sdb;
1030 off_t skip = off_dst;
1031
1032 if (sdb->length <= off_dst)
1033 return 0;
1034 if (scp->sc_data_direction != DMA_FROM_DEVICE)
1035 return DID_ERROR << 16;
1036
1037 act_len = sg_pcopy_from_buffer(sdb->table.sgl, sdb->table.nents,
1038 arr, arr_len, skip);
1039 pr_debug("%s: off_dst=%u, scsi_bufflen=%u, act_len=%u, resid=%d\n",
1040 __func__, off_dst, scsi_bufflen(scp), act_len,
1041 scsi_get_resid(scp));
1042 n = (int)scsi_bufflen(scp) - ((int)off_dst + act_len);
1043 scsi_set_resid(scp, min(scsi_get_resid(scp), n));
1044 return 0;
1045}
1046
1047/* Fetches from SCSI "data-out" buffer. Returns number of bytes fetched into
1048 * 'arr' or -1 if error.
1049 */
1050static int fetch_to_dev_buffer(struct scsi_cmnd *scp, unsigned char *arr,
1051 int arr_len)
1052{
1053 if (!scsi_bufflen(scp))
1054 return 0;
1055 if (scp->sc_data_direction != DMA_TO_DEVICE)
1056 return -1;
1057
1058 return scsi_sg_copy_to_buffer(scp, arr, arr_len);
1059}
1060
1061
1062static char sdebug_inq_vendor_id[9] = "Linux ";
1063static char sdebug_inq_product_id[17] = "scsi_debug ";
1064static char sdebug_inq_product_rev[5] = SDEBUG_VERSION;
1065/* Use some locally assigned NAAs for SAS addresses. */
1066static const u64 naa3_comp_a = 0x3222222000000000ULL;
1067static const u64 naa3_comp_b = 0x3333333000000000ULL;
1068static const u64 naa3_comp_c = 0x3111111000000000ULL;
1069
1070/* Device identification VPD page. Returns number of bytes placed in arr */
1071static int inquiry_vpd_83(unsigned char *arr, int port_group_id,
1072 int target_dev_id, int dev_id_num,
1073 const char *dev_id_str, int dev_id_str_len,
1074 const uuid_t *lu_name)
1075{
1076 int num, port_a;
1077 char b[32];
1078
1079 port_a = target_dev_id + 1;
1080 /* T10 vendor identifier field format (faked) */
1081 arr[0] = 0x2; /* ASCII */
1082 arr[1] = 0x1;
1083 arr[2] = 0x0;
1084 memcpy(&arr[4], sdebug_inq_vendor_id, 8);
1085 memcpy(&arr[12], sdebug_inq_product_id, 16);
1086 memcpy(&arr[28], dev_id_str, dev_id_str_len);
1087 num = 8 + 16 + dev_id_str_len;
1088 arr[3] = num;
1089 num += 4;
1090 if (dev_id_num >= 0) {
1091 if (sdebug_uuid_ctl) {
1092 /* Locally assigned UUID */
1093 arr[num++] = 0x1; /* binary (not necessarily sas) */
1094 arr[num++] = 0xa; /* PIV=0, lu, naa */
1095 arr[num++] = 0x0;
1096 arr[num++] = 0x12;
1097 arr[num++] = 0x10; /* uuid type=1, locally assigned */
1098 arr[num++] = 0x0;
1099 memcpy(arr + num, lu_name, 16);
1100 num += 16;
1101 } else {
1102 /* NAA-3, Logical unit identifier (binary) */
1103 arr[num++] = 0x1; /* binary (not necessarily sas) */
1104 arr[num++] = 0x3; /* PIV=0, lu, naa */
1105 arr[num++] = 0x0;
1106 arr[num++] = 0x8;
1107 put_unaligned_be64(naa3_comp_b + dev_id_num, arr + num);
1108 num += 8;
1109 }
1110 /* Target relative port number */
1111 arr[num++] = 0x61; /* proto=sas, binary */
1112 arr[num++] = 0x94; /* PIV=1, target port, rel port */
1113 arr[num++] = 0x0; /* reserved */
1114 arr[num++] = 0x4; /* length */
1115 arr[num++] = 0x0; /* reserved */
1116 arr[num++] = 0x0; /* reserved */
1117 arr[num++] = 0x0;
1118 arr[num++] = 0x1; /* relative port A */
1119 }
1120 /* NAA-3, Target port identifier */
1121 arr[num++] = 0x61; /* proto=sas, binary */
1122 arr[num++] = 0x93; /* piv=1, target port, naa */
1123 arr[num++] = 0x0;
1124 arr[num++] = 0x8;
1125 put_unaligned_be64(naa3_comp_a + port_a, arr + num);
1126 num += 8;
1127 /* NAA-3, Target port group identifier */
1128 arr[num++] = 0x61; /* proto=sas, binary */
1129 arr[num++] = 0x95; /* piv=1, target port group id */
1130 arr[num++] = 0x0;
1131 arr[num++] = 0x4;
1132 arr[num++] = 0;
1133 arr[num++] = 0;
1134 put_unaligned_be16(port_group_id, arr + num);
1135 num += 2;
1136 /* NAA-3, Target device identifier */
1137 arr[num++] = 0x61; /* proto=sas, binary */
1138 arr[num++] = 0xa3; /* piv=1, target device, naa */
1139 arr[num++] = 0x0;
1140 arr[num++] = 0x8;
1141 put_unaligned_be64(naa3_comp_a + target_dev_id, arr + num);
1142 num += 8;
1143 /* SCSI name string: Target device identifier */
1144 arr[num++] = 0x63; /* proto=sas, UTF-8 */
1145 arr[num++] = 0xa8; /* piv=1, target device, SCSI name string */
1146 arr[num++] = 0x0;
1147 arr[num++] = 24;
1148 memcpy(arr + num, "naa.32222220", 12);
1149 num += 12;
1150 snprintf(b, sizeof(b), "%08X", target_dev_id);
1151 memcpy(arr + num, b, 8);
1152 num += 8;
1153 memset(arr + num, 0, 4);
1154 num += 4;
1155 return num;
1156}
1157
1158static unsigned char vpd84_data[] = {
1159/* from 4th byte */ 0x22,0x22,0x22,0x0,0xbb,0x0,
1160 0x22,0x22,0x22,0x0,0xbb,0x1,
1161 0x22,0x22,0x22,0x0,0xbb,0x2,
1162};
1163
1164/* Software interface identification VPD page */
1165static int inquiry_vpd_84(unsigned char *arr)
1166{
1167 memcpy(arr, vpd84_data, sizeof(vpd84_data));
1168 return sizeof(vpd84_data);
1169}
1170
1171/* Management network addresses VPD page */
1172static int inquiry_vpd_85(unsigned char *arr)
1173{
1174 int num = 0;
1175 const char *na1 = "https://www.kernel.org/config";
1176 const char *na2 = "http://www.kernel.org/log";
1177 int plen, olen;
1178
1179 arr[num++] = 0x1; /* lu, storage config */
1180 arr[num++] = 0x0; /* reserved */
1181 arr[num++] = 0x0;
1182 olen = strlen(na1);
1183 plen = olen + 1;
1184 if (plen % 4)
1185 plen = ((plen / 4) + 1) * 4;
1186 arr[num++] = plen; /* length, null termianted, padded */
1187 memcpy(arr + num, na1, olen);
1188 memset(arr + num + olen, 0, plen - olen);
1189 num += plen;
1190
1191 arr[num++] = 0x4; /* lu, logging */
1192 arr[num++] = 0x0; /* reserved */
1193 arr[num++] = 0x0;
1194 olen = strlen(na2);
1195 plen = olen + 1;
1196 if (plen % 4)
1197 plen = ((plen / 4) + 1) * 4;
1198 arr[num++] = plen; /* length, null terminated, padded */
1199 memcpy(arr + num, na2, olen);
1200 memset(arr + num + olen, 0, plen - olen);
1201 num += plen;
1202
1203 return num;
1204}
1205
1206/* SCSI ports VPD page */
1207static int inquiry_vpd_88(unsigned char *arr, int target_dev_id)
1208{
1209 int num = 0;
1210 int port_a, port_b;
1211
1212 port_a = target_dev_id + 1;
1213 port_b = port_a + 1;
1214 arr[num++] = 0x0; /* reserved */
1215 arr[num++] = 0x0; /* reserved */
1216 arr[num++] = 0x0;
1217 arr[num++] = 0x1; /* relative port 1 (primary) */
1218 memset(arr + num, 0, 6);
1219 num += 6;
1220 arr[num++] = 0x0;
1221 arr[num++] = 12; /* length tp descriptor */
1222 /* naa-5 target port identifier (A) */
1223 arr[num++] = 0x61; /* proto=sas, binary */
1224 arr[num++] = 0x93; /* PIV=1, target port, NAA */
1225 arr[num++] = 0x0; /* reserved */
1226 arr[num++] = 0x8; /* length */
1227 put_unaligned_be64(naa3_comp_a + port_a, arr + num);
1228 num += 8;
1229 arr[num++] = 0x0; /* reserved */
1230 arr[num++] = 0x0; /* reserved */
1231 arr[num++] = 0x0;
1232 arr[num++] = 0x2; /* relative port 2 (secondary) */
1233 memset(arr + num, 0, 6);
1234 num += 6;
1235 arr[num++] = 0x0;
1236 arr[num++] = 12; /* length tp descriptor */
1237 /* naa-5 target port identifier (B) */
1238 arr[num++] = 0x61; /* proto=sas, binary */
1239 arr[num++] = 0x93; /* PIV=1, target port, NAA */
1240 arr[num++] = 0x0; /* reserved */
1241 arr[num++] = 0x8; /* length */
1242 put_unaligned_be64(naa3_comp_a + port_b, arr + num);
1243 num += 8;
1244
1245 return num;
1246}
1247
1248
1249static unsigned char vpd89_data[] = {
1250/* from 4th byte */ 0,0,0,0,
1251'l','i','n','u','x',' ',' ',' ',
1252'S','A','T',' ','s','c','s','i','_','d','e','b','u','g',' ',' ',
1253'1','2','3','4',
12540x34,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,
12550xec,0,0,0,
12560x5a,0xc,0xff,0x3f,0x37,0xc8,0x10,0,0,0,0,0,0x3f,0,0,0,
12570,0,0,0,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x58,0x20,0x20,0x20,0x20,
12580x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0,0,0,0x40,0x4,0,0x2e,0x33,
12590x38,0x31,0x20,0x20,0x20,0x20,0x54,0x53,0x38,0x33,0x30,0x30,0x33,0x31,
12600x53,0x41,
12610x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
12620x20,0x20,
12630x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
12640x10,0x80,
12650,0,0,0x2f,0,0,0,0x2,0,0x2,0x7,0,0xff,0xff,0x1,0,
12660x3f,0,0xc1,0xff,0x3e,0,0x10,0x1,0xb0,0xf8,0x50,0x9,0,0,0x7,0,
12670x3,0,0x78,0,0x78,0,0xf0,0,0x78,0,0,0,0,0,0,0,
12680,0,0,0,0,0,0,0,0x2,0,0,0,0,0,0,0,
12690x7e,0,0x1b,0,0x6b,0x34,0x1,0x7d,0x3,0x40,0x69,0x34,0x1,0x3c,0x3,0x40,
12700x7f,0x40,0,0,0,0,0xfe,0xfe,0,0,0,0,0,0xfe,0,0,
12710,0,0,0,0,0,0,0,0xb0,0xf8,0x50,0x9,0,0,0,0,
12720,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12730,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12740,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12750x1,0,0xb0,0xf8,0x50,0x9,0xb0,0xf8,0x50,0x9,0x20,0x20,0x2,0,0xb6,0x42,
12760,0x80,0x8a,0,0x6,0x3c,0xa,0x3c,0xff,0xff,0xc6,0x7,0,0x1,0,0x8,
12770xf0,0xf,0,0x10,0x2,0,0x30,0,0,0,0,0,0,0,0x6,0xfe,
12780,0,0x2,0,0x50,0,0x8a,0,0x4f,0x95,0,0,0x21,0,0xb,0,
12790,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12810,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12820,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12830,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12840,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12850,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12860,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12870,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12880,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12890,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
12900,0,0,0,0,0,0,0,0,0,0,0,0,0,0xa5,0x51,
1291};
1292
1293/* ATA Information VPD page */
1294static int inquiry_vpd_89(unsigned char *arr)
1295{
1296 memcpy(arr, vpd89_data, sizeof(vpd89_data));
1297 return sizeof(vpd89_data);
1298}
1299
1300
1301static unsigned char vpdb0_data[] = {
1302 /* from 4th byte */ 0,0,0,4, 0,0,0x4,0, 0,0,0,64,
1303 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1304 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1305 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1306};
1307
1308/* Block limits VPD page (SBC-3) */
1309static int inquiry_vpd_b0(unsigned char *arr)
1310{
1311 unsigned int gran;
1312
1313 memcpy(arr, vpdb0_data, sizeof(vpdb0_data));
1314
1315 /* Optimal transfer length granularity */
1316 if (sdebug_opt_xferlen_exp != 0 &&
1317 sdebug_physblk_exp < sdebug_opt_xferlen_exp)
1318 gran = 1 << sdebug_opt_xferlen_exp;
1319 else
1320 gran = 1 << sdebug_physblk_exp;
1321 put_unaligned_be16(gran, arr + 2);
1322
1323 /* Maximum Transfer Length */
1324 if (sdebug_store_sectors > 0x400)
1325 put_unaligned_be32(sdebug_store_sectors, arr + 4);
1326
1327 /* Optimal Transfer Length */
1328 put_unaligned_be32(sdebug_opt_blks, &arr[8]);
1329
1330 if (sdebug_lbpu) {
1331 /* Maximum Unmap LBA Count */
1332 put_unaligned_be32(sdebug_unmap_max_blocks, &arr[16]);
1333
1334 /* Maximum Unmap Block Descriptor Count */
1335 put_unaligned_be32(sdebug_unmap_max_desc, &arr[20]);
1336 }
1337
1338 /* Unmap Granularity Alignment */
1339 if (sdebug_unmap_alignment) {
1340 put_unaligned_be32(sdebug_unmap_alignment, &arr[28]);
1341 arr[28] |= 0x80; /* UGAVALID */
1342 }
1343
1344 /* Optimal Unmap Granularity */
1345 put_unaligned_be32(sdebug_unmap_granularity, &arr[24]);
1346
1347 /* Maximum WRITE SAME Length */
1348 put_unaligned_be64(sdebug_write_same_length, &arr[32]);
1349
1350 return 0x3c; /* Mandatory page length for Logical Block Provisioning */
1351
1352 return sizeof(vpdb0_data);
1353}
1354
1355/* Block device characteristics VPD page (SBC-3) */
1356static int inquiry_vpd_b1(unsigned char *arr)
1357{
1358 memset(arr, 0, 0x3c);
1359 arr[0] = 0;
1360 arr[1] = 1; /* non rotating medium (e.g. solid state) */
1361 arr[2] = 0;
1362 arr[3] = 5; /* less than 1.8" */
1363
1364 return 0x3c;
1365}
1366
1367/* Logical block provisioning VPD page (SBC-4) */
1368static int inquiry_vpd_b2(unsigned char *arr)
1369{
1370 memset(arr, 0, 0x4);
1371 arr[0] = 0; /* threshold exponent */
1372 if (sdebug_lbpu)
1373 arr[1] = 1 << 7;
1374 if (sdebug_lbpws)
1375 arr[1] |= 1 << 6;
1376 if (sdebug_lbpws10)
1377 arr[1] |= 1 << 5;
1378 if (sdebug_lbprz && scsi_debug_lbp())
1379 arr[1] |= (sdebug_lbprz & 0x7) << 2; /* sbc4r07 and later */
1380 /* anc_sup=0; dp=0 (no provisioning group descriptor) */
1381 /* minimum_percentage=0; provisioning_type=0 (unknown) */
1382 /* threshold_percentage=0 */
1383 return 0x4;
1384}
1385
1386#define SDEBUG_LONG_INQ_SZ 96
1387#define SDEBUG_MAX_INQ_ARR_SZ 584
1388
1389static int resp_inquiry(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
1390{
1391 unsigned char pq_pdt;
1392 unsigned char *arr;
1393 unsigned char *cmd = scp->cmnd;
1394 int alloc_len, n, ret;
1395 bool have_wlun, is_disk;
1396
1397 alloc_len = get_unaligned_be16(cmd + 3);
1398 arr = kzalloc(SDEBUG_MAX_INQ_ARR_SZ, GFP_ATOMIC);
1399 if (! arr)
1400 return DID_REQUEUE << 16;
1401 is_disk = (sdebug_ptype == TYPE_DISK);
1402 have_wlun = scsi_is_wlun(scp->device->lun);
1403 if (have_wlun)
1404 pq_pdt = TYPE_WLUN; /* present, wlun */
1405 else if (sdebug_no_lun_0 && (devip->lun == SDEBUG_LUN_0_VAL))
1406 pq_pdt = 0x7f; /* not present, PQ=3, PDT=0x1f */
1407 else
1408 pq_pdt = (sdebug_ptype & 0x1f);
1409 arr[0] = pq_pdt;
1410 if (0x2 & cmd[1]) { /* CMDDT bit set */
1411 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 1);
1412 kfree(arr);
1413 return check_condition_result;
1414 } else if (0x1 & cmd[1]) { /* EVPD bit set */
1415 int lu_id_num, port_group_id, target_dev_id, len;
1416 char lu_id_str[6];
1417 int host_no = devip->sdbg_host->shost->host_no;
1418
1419 port_group_id = (((host_no + 1) & 0x7f) << 8) +
1420 (devip->channel & 0x7f);
1421 if (sdebug_vpd_use_hostno == 0)
1422 host_no = 0;
1423 lu_id_num = have_wlun ? -1 : (((host_no + 1) * 2000) +
1424 (devip->target * 1000) + devip->lun);
1425 target_dev_id = ((host_no + 1) * 2000) +
1426 (devip->target * 1000) - 3;
1427 len = scnprintf(lu_id_str, 6, "%d", lu_id_num);
1428 if (0 == cmd[2]) { /* supported vital product data pages */
1429 arr[1] = cmd[2]; /*sanity */
1430 n = 4;
1431 arr[n++] = 0x0; /* this page */
1432 arr[n++] = 0x80; /* unit serial number */
1433 arr[n++] = 0x83; /* device identification */
1434 arr[n++] = 0x84; /* software interface ident. */
1435 arr[n++] = 0x85; /* management network addresses */
1436 arr[n++] = 0x86; /* extended inquiry */
1437 arr[n++] = 0x87; /* mode page policy */
1438 arr[n++] = 0x88; /* SCSI ports */
1439 if (is_disk) { /* SBC only */
1440 arr[n++] = 0x89; /* ATA information */
1441 arr[n++] = 0xb0; /* Block limits */
1442 arr[n++] = 0xb1; /* Block characteristics */
1443 arr[n++] = 0xb2; /* Logical Block Prov */
1444 }
1445 arr[3] = n - 4; /* number of supported VPD pages */
1446 } else if (0x80 == cmd[2]) { /* unit serial number */
1447 arr[1] = cmd[2]; /*sanity */
1448 arr[3] = len;
1449 memcpy(&arr[4], lu_id_str, len);
1450 } else if (0x83 == cmd[2]) { /* device identification */
1451 arr[1] = cmd[2]; /*sanity */
1452 arr[3] = inquiry_vpd_83(&arr[4], port_group_id,
1453 target_dev_id, lu_id_num,
1454 lu_id_str, len,
1455 &devip->lu_name);
1456 } else if (0x84 == cmd[2]) { /* Software interface ident. */
1457 arr[1] = cmd[2]; /*sanity */
1458 arr[3] = inquiry_vpd_84(&arr[4]);
1459 } else if (0x85 == cmd[2]) { /* Management network addresses */
1460 arr[1] = cmd[2]; /*sanity */
1461 arr[3] = inquiry_vpd_85(&arr[4]);
1462 } else if (0x86 == cmd[2]) { /* extended inquiry */
1463 arr[1] = cmd[2]; /*sanity */
1464 arr[3] = 0x3c; /* number of following entries */
1465 if (sdebug_dif == T10_PI_TYPE3_PROTECTION)
1466 arr[4] = 0x4; /* SPT: GRD_CHK:1 */
1467 else if (have_dif_prot)
1468 arr[4] = 0x5; /* SPT: GRD_CHK:1, REF_CHK:1 */
1469 else
1470 arr[4] = 0x0; /* no protection stuff */
1471 arr[5] = 0x7; /* head of q, ordered + simple q's */
1472 } else if (0x87 == cmd[2]) { /* mode page policy */
1473 arr[1] = cmd[2]; /*sanity */
1474 arr[3] = 0x8; /* number of following entries */
1475 arr[4] = 0x2; /* disconnect-reconnect mp */
1476 arr[6] = 0x80; /* mlus, shared */
1477 arr[8] = 0x18; /* protocol specific lu */
1478 arr[10] = 0x82; /* mlus, per initiator port */
1479 } else if (0x88 == cmd[2]) { /* SCSI Ports */
1480 arr[1] = cmd[2]; /*sanity */
1481 arr[3] = inquiry_vpd_88(&arr[4], target_dev_id);
1482 } else if (is_disk && 0x89 == cmd[2]) { /* ATA information */
1483 arr[1] = cmd[2]; /*sanity */
1484 n = inquiry_vpd_89(&arr[4]);
1485 put_unaligned_be16(n, arr + 2);
1486 } else if (is_disk && 0xb0 == cmd[2]) { /* Block limits */
1487 arr[1] = cmd[2]; /*sanity */
1488 arr[3] = inquiry_vpd_b0(&arr[4]);
1489 } else if (is_disk && 0xb1 == cmd[2]) { /* Block char. */
1490 arr[1] = cmd[2]; /*sanity */
1491 arr[3] = inquiry_vpd_b1(&arr[4]);
1492 } else if (is_disk && 0xb2 == cmd[2]) { /* LB Prov. */
1493 arr[1] = cmd[2]; /*sanity */
1494 arr[3] = inquiry_vpd_b2(&arr[4]);
1495 } else {
1496 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, -1);
1497 kfree(arr);
1498 return check_condition_result;
1499 }
1500 len = min(get_unaligned_be16(arr + 2) + 4, alloc_len);
1501 ret = fill_from_dev_buffer(scp, arr,
1502 min(len, SDEBUG_MAX_INQ_ARR_SZ));
1503 kfree(arr);
1504 return ret;
1505 }
1506 /* drops through here for a standard inquiry */
1507 arr[1] = sdebug_removable ? 0x80 : 0; /* Removable disk */
1508 arr[2] = sdebug_scsi_level;
1509 arr[3] = 2; /* response_data_format==2 */
1510 arr[4] = SDEBUG_LONG_INQ_SZ - 5;
1511 arr[5] = (int)have_dif_prot; /* PROTECT bit */
1512 if (sdebug_vpd_use_hostno == 0)
1513 arr[5] |= 0x10; /* claim: implicit TPGS */
1514 arr[6] = 0x10; /* claim: MultiP */
1515 /* arr[6] |= 0x40; ... claim: EncServ (enclosure services) */
1516 arr[7] = 0xa; /* claim: LINKED + CMDQUE */
1517 memcpy(&arr[8], sdebug_inq_vendor_id, 8);
1518 memcpy(&arr[16], sdebug_inq_product_id, 16);
1519 memcpy(&arr[32], sdebug_inq_product_rev, 4);
1520 /* Use Vendor Specific area to place driver date in ASCII hex */
1521 memcpy(&arr[36], sdebug_version_date, 8);
1522 /* version descriptors (2 bytes each) follow */
1523 put_unaligned_be16(0xc0, arr + 58); /* SAM-6 no version claimed */
1524 put_unaligned_be16(0x5c0, arr + 60); /* SPC-5 no version claimed */
1525 n = 62;
1526 if (is_disk) { /* SBC-4 no version claimed */
1527 put_unaligned_be16(0x600, arr + n);
1528 n += 2;
1529 } else if (sdebug_ptype == TYPE_TAPE) { /* SSC-4 rev 3 */
1530 put_unaligned_be16(0x525, arr + n);
1531 n += 2;
1532 }
1533 put_unaligned_be16(0x2100, arr + n); /* SPL-4 no version claimed */
1534 ret = fill_from_dev_buffer(scp, arr,
1535 min(alloc_len, SDEBUG_LONG_INQ_SZ));
1536 kfree(arr);
1537 return ret;
1538}
1539
1540static unsigned char iec_m_pg[] = {0x1c, 0xa, 0x08, 0, 0, 0, 0, 0,
1541 0, 0, 0x0, 0x0};
1542
1543static int resp_requests(struct scsi_cmnd *scp,
1544 struct sdebug_dev_info *devip)
1545{
1546 unsigned char *sbuff;
1547 unsigned char *cmd = scp->cmnd;
1548 unsigned char arr[SCSI_SENSE_BUFFERSIZE];
1549 bool dsense;
1550 int len = 18;
1551
1552 memset(arr, 0, sizeof(arr));
1553 dsense = !!(cmd[1] & 1);
1554 sbuff = scp->sense_buffer;
1555 if ((iec_m_pg[2] & 0x4) && (6 == (iec_m_pg[3] & 0xf))) {
1556 if (dsense) {
1557 arr[0] = 0x72;
1558 arr[1] = 0x0; /* NO_SENSE in sense_key */
1559 arr[2] = THRESHOLD_EXCEEDED;
1560 arr[3] = 0xff; /* TEST set and MRIE==6 */
1561 len = 8;
1562 } else {
1563 arr[0] = 0x70;
1564 arr[2] = 0x0; /* NO_SENSE in sense_key */
1565 arr[7] = 0xa; /* 18 byte sense buffer */
1566 arr[12] = THRESHOLD_EXCEEDED;
1567 arr[13] = 0xff; /* TEST set and MRIE==6 */
1568 }
1569 } else {
1570 memcpy(arr, sbuff, SCSI_SENSE_BUFFERSIZE);
1571 if (arr[0] >= 0x70 && dsense == sdebug_dsense)
1572 ; /* have sense and formats match */
1573 else if (arr[0] <= 0x70) {
1574 if (dsense) {
1575 memset(arr, 0, 8);
1576 arr[0] = 0x72;
1577 len = 8;
1578 } else {
1579 memset(arr, 0, 18);
1580 arr[0] = 0x70;
1581 arr[7] = 0xa;
1582 }
1583 } else if (dsense) {
1584 memset(arr, 0, 8);
1585 arr[0] = 0x72;
1586 arr[1] = sbuff[2]; /* sense key */
1587 arr[2] = sbuff[12]; /* asc */
1588 arr[3] = sbuff[13]; /* ascq */
1589 len = 8;
1590 } else {
1591 memset(arr, 0, 18);
1592 arr[0] = 0x70;
1593 arr[2] = sbuff[1];
1594 arr[7] = 0xa;
1595 arr[12] = sbuff[1];
1596 arr[13] = sbuff[3];
1597 }
1598
1599 }
1600 mk_sense_buffer(scp, 0, NO_ADDITIONAL_SENSE, 0);
1601 return fill_from_dev_buffer(scp, arr, len);
1602}
1603
1604static int resp_start_stop(struct scsi_cmnd *scp,
1605 struct sdebug_dev_info *devip)
1606{
1607 unsigned char *cmd = scp->cmnd;
1608 int power_cond, stop;
1609 bool changing;
1610
1611 power_cond = (cmd[4] & 0xf0) >> 4;
1612 if (power_cond) {
1613 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, 7);
1614 return check_condition_result;
1615 }
1616 stop = !(cmd[4] & 1);
1617 changing = atomic_read(&devip->stopped) == !stop;
1618 atomic_xchg(&devip->stopped, stop);
1619 if (!changing || cmd[1] & 0x1) /* state unchanged or IMMED set */
1620 return SDEG_RES_IMMED_MASK;
1621 else
1622 return 0;
1623}
1624
1625static sector_t get_sdebug_capacity(void)
1626{
1627 static const unsigned int gibibyte = 1073741824;
1628
1629 if (sdebug_virtual_gb > 0)
1630 return (sector_t)sdebug_virtual_gb *
1631 (gibibyte / sdebug_sector_size);
1632 else
1633 return sdebug_store_sectors;
1634}
1635
1636#define SDEBUG_READCAP_ARR_SZ 8
1637static int resp_readcap(struct scsi_cmnd *scp,
1638 struct sdebug_dev_info *devip)
1639{
1640 unsigned char arr[SDEBUG_READCAP_ARR_SZ];
1641 unsigned int capac;
1642
1643 /* following just in case virtual_gb changed */
1644 sdebug_capacity = get_sdebug_capacity();
1645 memset(arr, 0, SDEBUG_READCAP_ARR_SZ);
1646 if (sdebug_capacity < 0xffffffff) {
1647 capac = (unsigned int)sdebug_capacity - 1;
1648 put_unaligned_be32(capac, arr + 0);
1649 } else
1650 put_unaligned_be32(0xffffffff, arr + 0);
1651 put_unaligned_be16(sdebug_sector_size, arr + 6);
1652 return fill_from_dev_buffer(scp, arr, SDEBUG_READCAP_ARR_SZ);
1653}
1654
1655#define SDEBUG_READCAP16_ARR_SZ 32
1656static int resp_readcap16(struct scsi_cmnd *scp,
1657 struct sdebug_dev_info *devip)
1658{
1659 unsigned char *cmd = scp->cmnd;
1660 unsigned char arr[SDEBUG_READCAP16_ARR_SZ];
1661 int alloc_len;
1662
1663 alloc_len = get_unaligned_be32(cmd + 10);
1664 /* following just in case virtual_gb changed */
1665 sdebug_capacity = get_sdebug_capacity();
1666 memset(arr, 0, SDEBUG_READCAP16_ARR_SZ);
1667 put_unaligned_be64((u64)(sdebug_capacity - 1), arr + 0);
1668 put_unaligned_be32(sdebug_sector_size, arr + 8);
1669 arr[13] = sdebug_physblk_exp & 0xf;
1670 arr[14] = (sdebug_lowest_aligned >> 8) & 0x3f;
1671
1672 if (scsi_debug_lbp()) {
1673 arr[14] |= 0x80; /* LBPME */
1674 /* from sbc4r07, this LBPRZ field is 1 bit, but the LBPRZ in
1675 * the LB Provisioning VPD page is 3 bits. Note that lbprz=2
1676 * in the wider field maps to 0 in this field.
1677 */
1678 if (sdebug_lbprz & 1) /* precisely what the draft requires */
1679 arr[14] |= 0x40;
1680 }
1681
1682 arr[15] = sdebug_lowest_aligned & 0xff;
1683
1684 if (have_dif_prot) {
1685 arr[12] = (sdebug_dif - 1) << 1; /* P_TYPE */
1686 arr[12] |= 1; /* PROT_EN */
1687 }
1688
1689 return fill_from_dev_buffer(scp, arr,
1690 min(alloc_len, SDEBUG_READCAP16_ARR_SZ));
1691}
1692
1693#define SDEBUG_MAX_TGTPGS_ARR_SZ 1412
1694
1695static int resp_report_tgtpgs(struct scsi_cmnd *scp,
1696 struct sdebug_dev_info *devip)
1697{
1698 unsigned char *cmd = scp->cmnd;
1699 unsigned char *arr;
1700 int host_no = devip->sdbg_host->shost->host_no;
1701 int n, ret, alen, rlen;
1702 int port_group_a, port_group_b, port_a, port_b;
1703
1704 alen = get_unaligned_be32(cmd + 6);
1705 arr = kzalloc(SDEBUG_MAX_TGTPGS_ARR_SZ, GFP_ATOMIC);
1706 if (! arr)
1707 return DID_REQUEUE << 16;
1708 /*
1709 * EVPD page 0x88 states we have two ports, one
1710 * real and a fake port with no device connected.
1711 * So we create two port groups with one port each
1712 * and set the group with port B to unavailable.
1713 */
1714 port_a = 0x1; /* relative port A */
1715 port_b = 0x2; /* relative port B */
1716 port_group_a = (((host_no + 1) & 0x7f) << 8) +
1717 (devip->channel & 0x7f);
1718 port_group_b = (((host_no + 1) & 0x7f) << 8) +
1719 (devip->channel & 0x7f) + 0x80;
1720
1721 /*
1722 * The asymmetric access state is cycled according to the host_id.
1723 */
1724 n = 4;
1725 if (sdebug_vpd_use_hostno == 0) {
1726 arr[n++] = host_no % 3; /* Asymm access state */
1727 arr[n++] = 0x0F; /* claim: all states are supported */
1728 } else {
1729 arr[n++] = 0x0; /* Active/Optimized path */
1730 arr[n++] = 0x01; /* only support active/optimized paths */
1731 }
1732 put_unaligned_be16(port_group_a, arr + n);
1733 n += 2;
1734 arr[n++] = 0; /* Reserved */
1735 arr[n++] = 0; /* Status code */
1736 arr[n++] = 0; /* Vendor unique */
1737 arr[n++] = 0x1; /* One port per group */
1738 arr[n++] = 0; /* Reserved */
1739 arr[n++] = 0; /* Reserved */
1740 put_unaligned_be16(port_a, arr + n);
1741 n += 2;
1742 arr[n++] = 3; /* Port unavailable */
1743 arr[n++] = 0x08; /* claim: only unavailalbe paths are supported */
1744 put_unaligned_be16(port_group_b, arr + n);
1745 n += 2;
1746 arr[n++] = 0; /* Reserved */
1747 arr[n++] = 0; /* Status code */
1748 arr[n++] = 0; /* Vendor unique */
1749 arr[n++] = 0x1; /* One port per group */
1750 arr[n++] = 0; /* Reserved */
1751 arr[n++] = 0; /* Reserved */
1752 put_unaligned_be16(port_b, arr + n);
1753 n += 2;
1754
1755 rlen = n - 4;
1756 put_unaligned_be32(rlen, arr + 0);
1757
1758 /*
1759 * Return the smallest value of either
1760 * - The allocated length
1761 * - The constructed command length
1762 * - The maximum array size
1763 */
1764 rlen = min(alen,n);
1765 ret = fill_from_dev_buffer(scp, arr,
1766 min(rlen, SDEBUG_MAX_TGTPGS_ARR_SZ));
1767 kfree(arr);
1768 return ret;
1769}
1770
1771static int resp_rsup_opcodes(struct scsi_cmnd *scp,
1772 struct sdebug_dev_info *devip)
1773{
1774 bool rctd;
1775 u8 reporting_opts, req_opcode, sdeb_i, supp;
1776 u16 req_sa, u;
1777 u32 alloc_len, a_len;
1778 int k, offset, len, errsts, count, bump, na;
1779 const struct opcode_info_t *oip;
1780 const struct opcode_info_t *r_oip;
1781 u8 *arr;
1782 u8 *cmd = scp->cmnd;
1783
1784 rctd = !!(cmd[2] & 0x80);
1785 reporting_opts = cmd[2] & 0x7;
1786 req_opcode = cmd[3];
1787 req_sa = get_unaligned_be16(cmd + 4);
1788 alloc_len = get_unaligned_be32(cmd + 6);
1789 if (alloc_len < 4 || alloc_len > 0xffff) {
1790 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
1791 return check_condition_result;
1792 }
1793 if (alloc_len > 8192)
1794 a_len = 8192;
1795 else
1796 a_len = alloc_len;
1797 arr = kzalloc((a_len < 256) ? 320 : a_len + 64, GFP_ATOMIC);
1798 if (NULL == arr) {
1799 mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
1800 INSUFF_RES_ASCQ);
1801 return check_condition_result;
1802 }
1803 switch (reporting_opts) {
1804 case 0: /* all commands */
1805 /* count number of commands */
1806 for (count = 0, oip = opcode_info_arr;
1807 oip->num_attached != 0xff; ++oip) {
1808 if (F_INV_OP & oip->flags)
1809 continue;
1810 count += (oip->num_attached + 1);
1811 }
1812 bump = rctd ? 20 : 8;
1813 put_unaligned_be32(count * bump, arr);
1814 for (offset = 4, oip = opcode_info_arr;
1815 oip->num_attached != 0xff && offset < a_len; ++oip) {
1816 if (F_INV_OP & oip->flags)
1817 continue;
1818 na = oip->num_attached;
1819 arr[offset] = oip->opcode;
1820 put_unaligned_be16(oip->sa, arr + offset + 2);
1821 if (rctd)
1822 arr[offset + 5] |= 0x2;
1823 if (FF_SA & oip->flags)
1824 arr[offset + 5] |= 0x1;
1825 put_unaligned_be16(oip->len_mask[0], arr + offset + 6);
1826 if (rctd)
1827 put_unaligned_be16(0xa, arr + offset + 8);
1828 r_oip = oip;
1829 for (k = 0, oip = oip->arrp; k < na; ++k, ++oip) {
1830 if (F_INV_OP & oip->flags)
1831 continue;
1832 offset += bump;
1833 arr[offset] = oip->opcode;
1834 put_unaligned_be16(oip->sa, arr + offset + 2);
1835 if (rctd)
1836 arr[offset + 5] |= 0x2;
1837 if (FF_SA & oip->flags)
1838 arr[offset + 5] |= 0x1;
1839 put_unaligned_be16(oip->len_mask[0],
1840 arr + offset + 6);
1841 if (rctd)
1842 put_unaligned_be16(0xa,
1843 arr + offset + 8);
1844 }
1845 oip = r_oip;
1846 offset += bump;
1847 }
1848 break;
1849 case 1: /* one command: opcode only */
1850 case 2: /* one command: opcode plus service action */
1851 case 3: /* one command: if sa==0 then opcode only else opcode+sa */
1852 sdeb_i = opcode_ind_arr[req_opcode];
1853 oip = &opcode_info_arr[sdeb_i];
1854 if (F_INV_OP & oip->flags) {
1855 supp = 1;
1856 offset = 4;
1857 } else {
1858 if (1 == reporting_opts) {
1859 if (FF_SA & oip->flags) {
1860 mk_sense_invalid_fld(scp, SDEB_IN_CDB,
1861 2, 2);
1862 kfree(arr);
1863 return check_condition_result;
1864 }
1865 req_sa = 0;
1866 } else if (2 == reporting_opts &&
1867 0 == (FF_SA & oip->flags)) {
1868 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 4, -1);
1869 kfree(arr); /* point at requested sa */
1870 return check_condition_result;
1871 }
1872 if (0 == (FF_SA & oip->flags) &&
1873 req_opcode == oip->opcode)
1874 supp = 3;
1875 else if (0 == (FF_SA & oip->flags)) {
1876 na = oip->num_attached;
1877 for (k = 0, oip = oip->arrp; k < na;
1878 ++k, ++oip) {
1879 if (req_opcode == oip->opcode)
1880 break;
1881 }
1882 supp = (k >= na) ? 1 : 3;
1883 } else if (req_sa != oip->sa) {
1884 na = oip->num_attached;
1885 for (k = 0, oip = oip->arrp; k < na;
1886 ++k, ++oip) {
1887 if (req_sa == oip->sa)
1888 break;
1889 }
1890 supp = (k >= na) ? 1 : 3;
1891 } else
1892 supp = 3;
1893 if (3 == supp) {
1894 u = oip->len_mask[0];
1895 put_unaligned_be16(u, arr + 2);
1896 arr[4] = oip->opcode;
1897 for (k = 1; k < u; ++k)
1898 arr[4 + k] = (k < 16) ?
1899 oip->len_mask[k] : 0xff;
1900 offset = 4 + u;
1901 } else
1902 offset = 4;
1903 }
1904 arr[1] = (rctd ? 0x80 : 0) | supp;
1905 if (rctd) {
1906 put_unaligned_be16(0xa, arr + offset);
1907 offset += 12;
1908 }
1909 break;
1910 default:
1911 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 2);
1912 kfree(arr);
1913 return check_condition_result;
1914 }
1915 offset = (offset < a_len) ? offset : a_len;
1916 len = (offset < alloc_len) ? offset : alloc_len;
1917 errsts = fill_from_dev_buffer(scp, arr, len);
1918 kfree(arr);
1919 return errsts;
1920}
1921
1922static int resp_rsup_tmfs(struct scsi_cmnd *scp,
1923 struct sdebug_dev_info *devip)
1924{
1925 bool repd;
1926 u32 alloc_len, len;
1927 u8 arr[16];
1928 u8 *cmd = scp->cmnd;
1929
1930 memset(arr, 0, sizeof(arr));
1931 repd = !!(cmd[2] & 0x80);
1932 alloc_len = get_unaligned_be32(cmd + 6);
1933 if (alloc_len < 4) {
1934 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
1935 return check_condition_result;
1936 }
1937 arr[0] = 0xc8; /* ATS | ATSS | LURS */
1938 arr[1] = 0x1; /* ITNRS */
1939 if (repd) {
1940 arr[3] = 0xc;
1941 len = 16;
1942 } else
1943 len = 4;
1944
1945 len = (len < alloc_len) ? len : alloc_len;
1946 return fill_from_dev_buffer(scp, arr, len);
1947}
1948
1949/* <<Following mode page info copied from ST318451LW>> */
1950
1951static int resp_err_recov_pg(unsigned char *p, int pcontrol, int target)
1952{ /* Read-Write Error Recovery page for mode_sense */
1953 unsigned char err_recov_pg[] = {0x1, 0xa, 0xc0, 11, 240, 0, 0, 0,
1954 5, 0, 0xff, 0xff};
1955
1956 memcpy(p, err_recov_pg, sizeof(err_recov_pg));
1957 if (1 == pcontrol)
1958 memset(p + 2, 0, sizeof(err_recov_pg) - 2);
1959 return sizeof(err_recov_pg);
1960}
1961
1962static int resp_disconnect_pg(unsigned char *p, int pcontrol, int target)
1963{ /* Disconnect-Reconnect page for mode_sense */
1964 unsigned char disconnect_pg[] = {0x2, 0xe, 128, 128, 0, 10, 0, 0,
1965 0, 0, 0, 0, 0, 0, 0, 0};
1966
1967 memcpy(p, disconnect_pg, sizeof(disconnect_pg));
1968 if (1 == pcontrol)
1969 memset(p + 2, 0, sizeof(disconnect_pg) - 2);
1970 return sizeof(disconnect_pg);
1971}
1972
1973static int resp_format_pg(unsigned char *p, int pcontrol, int target)
1974{ /* Format device page for mode_sense */
1975 unsigned char format_pg[] = {0x3, 0x16, 0, 0, 0, 0, 0, 0,
1976 0, 0, 0, 0, 0, 0, 0, 0,
1977 0, 0, 0, 0, 0x40, 0, 0, 0};
1978
1979 memcpy(p, format_pg, sizeof(format_pg));
1980 put_unaligned_be16(sdebug_sectors_per, p + 10);
1981 put_unaligned_be16(sdebug_sector_size, p + 12);
1982 if (sdebug_removable)
1983 p[20] |= 0x20; /* should agree with INQUIRY */
1984 if (1 == pcontrol)
1985 memset(p + 2, 0, sizeof(format_pg) - 2);
1986 return sizeof(format_pg);
1987}
1988
1989static unsigned char caching_pg[] = {0x8, 18, 0x14, 0, 0xff, 0xff, 0, 0,
1990 0xff, 0xff, 0xff, 0xff, 0x80, 0x14, 0, 0,
1991 0, 0, 0, 0};
1992
1993static int resp_caching_pg(unsigned char *p, int pcontrol, int target)
1994{ /* Caching page for mode_sense */
1995 unsigned char ch_caching_pg[] = {/* 0x8, 18, */ 0x4, 0, 0, 0, 0, 0,
1996 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
1997 unsigned char d_caching_pg[] = {0x8, 18, 0x14, 0, 0xff, 0xff, 0, 0,
1998 0xff, 0xff, 0xff, 0xff, 0x80, 0x14, 0, 0, 0, 0, 0, 0};
1999
2000 if (SDEBUG_OPT_N_WCE & sdebug_opts)
2001 caching_pg[2] &= ~0x4; /* set WCE=0 (default WCE=1) */
2002 memcpy(p, caching_pg, sizeof(caching_pg));
2003 if (1 == pcontrol)
2004 memcpy(p + 2, ch_caching_pg, sizeof(ch_caching_pg));
2005 else if (2 == pcontrol)
2006 memcpy(p, d_caching_pg, sizeof(d_caching_pg));
2007 return sizeof(caching_pg);
2008}
2009
2010static unsigned char ctrl_m_pg[] = {0xa, 10, 2, 0, 0, 0, 0, 0,
2011 0, 0, 0x2, 0x4b};
2012
2013static int resp_ctrl_m_pg(unsigned char *p, int pcontrol, int target)
2014{ /* Control mode page for mode_sense */
2015 unsigned char ch_ctrl_m_pg[] = {/* 0xa, 10, */ 0x6, 0, 0, 0, 0, 0,
2016 0, 0, 0, 0};
2017 unsigned char d_ctrl_m_pg[] = {0xa, 10, 2, 0, 0, 0, 0, 0,
2018 0, 0, 0x2, 0x4b};
2019
2020 if (sdebug_dsense)
2021 ctrl_m_pg[2] |= 0x4;
2022 else
2023 ctrl_m_pg[2] &= ~0x4;
2024
2025 if (sdebug_ato)
2026 ctrl_m_pg[5] |= 0x80; /* ATO=1 */
2027
2028 memcpy(p, ctrl_m_pg, sizeof(ctrl_m_pg));
2029 if (1 == pcontrol)
2030 memcpy(p + 2, ch_ctrl_m_pg, sizeof(ch_ctrl_m_pg));
2031 else if (2 == pcontrol)
2032 memcpy(p, d_ctrl_m_pg, sizeof(d_ctrl_m_pg));
2033 return sizeof(ctrl_m_pg);
2034}
2035
2036
2037static int resp_iec_m_pg(unsigned char *p, int pcontrol, int target)
2038{ /* Informational Exceptions control mode page for mode_sense */
2039 unsigned char ch_iec_m_pg[] = {/* 0x1c, 0xa, */ 0x4, 0xf, 0, 0, 0, 0,
2040 0, 0, 0x0, 0x0};
2041 unsigned char d_iec_m_pg[] = {0x1c, 0xa, 0x08, 0, 0, 0, 0, 0,
2042 0, 0, 0x0, 0x0};
2043
2044 memcpy(p, iec_m_pg, sizeof(iec_m_pg));
2045 if (1 == pcontrol)
2046 memcpy(p + 2, ch_iec_m_pg, sizeof(ch_iec_m_pg));
2047 else if (2 == pcontrol)
2048 memcpy(p, d_iec_m_pg, sizeof(d_iec_m_pg));
2049 return sizeof(iec_m_pg);
2050}
2051
2052static int resp_sas_sf_m_pg(unsigned char *p, int pcontrol, int target)
2053{ /* SAS SSP mode page - short format for mode_sense */
2054 unsigned char sas_sf_m_pg[] = {0x19, 0x6,
2055 0x6, 0x0, 0x7, 0xd0, 0x0, 0x0};
2056
2057 memcpy(p, sas_sf_m_pg, sizeof(sas_sf_m_pg));
2058 if (1 == pcontrol)
2059 memset(p + 2, 0, sizeof(sas_sf_m_pg) - 2);
2060 return sizeof(sas_sf_m_pg);
2061}
2062
2063
2064static int resp_sas_pcd_m_spg(unsigned char *p, int pcontrol, int target,
2065 int target_dev_id)
2066{ /* SAS phy control and discover mode page for mode_sense */
2067 unsigned char sas_pcd_m_pg[] = {0x59, 0x1, 0, 0x64, 0, 0x6, 0, 2,
2068 0, 0, 0, 0, 0x10, 0x9, 0x8, 0x0,
2069 0, 0, 0, 0, 0, 0, 0, 0, /* insert SAS addr */
2070 0, 0, 0, 0, 0, 0, 0, 0, /* insert SAS addr */
2071 0x2, 0, 0, 0, 0, 0, 0, 0,
2072 0x88, 0x99, 0, 0, 0, 0, 0, 0,
2073 0, 0, 0, 0, 0, 0, 0, 0,
2074 0, 1, 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 0x3, 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 };
2081 int port_a, port_b;
2082
2083 put_unaligned_be64(naa3_comp_a, sas_pcd_m_pg + 16);
2084 put_unaligned_be64(naa3_comp_c + 1, sas_pcd_m_pg + 24);
2085 put_unaligned_be64(naa3_comp_a, sas_pcd_m_pg + 64);
2086 put_unaligned_be64(naa3_comp_c + 1, sas_pcd_m_pg + 72);
2087 port_a = target_dev_id + 1;
2088 port_b = port_a + 1;
2089 memcpy(p, sas_pcd_m_pg, sizeof(sas_pcd_m_pg));
2090 put_unaligned_be32(port_a, p + 20);
2091 put_unaligned_be32(port_b, p + 48 + 20);
2092 if (1 == pcontrol)
2093 memset(p + 4, 0, sizeof(sas_pcd_m_pg) - 4);
2094 return sizeof(sas_pcd_m_pg);
2095}
2096
2097static int resp_sas_sha_m_spg(unsigned char *p, int pcontrol)
2098{ /* SAS SSP shared protocol specific port mode subpage */
2099 unsigned char sas_sha_m_pg[] = {0x59, 0x2, 0, 0xc, 0, 0x6, 0x10, 0,
2100 0, 0, 0, 0, 0, 0, 0, 0,
2101 };
2102
2103 memcpy(p, sas_sha_m_pg, sizeof(sas_sha_m_pg));
2104 if (1 == pcontrol)
2105 memset(p + 4, 0, sizeof(sas_sha_m_pg) - 4);
2106 return sizeof(sas_sha_m_pg);
2107}
2108
2109#define SDEBUG_MAX_MSENSE_SZ 256
2110
2111static int resp_mode_sense(struct scsi_cmnd *scp,
2112 struct sdebug_dev_info *devip)
2113{
2114 int pcontrol, pcode, subpcode, bd_len;
2115 unsigned char dev_spec;
2116 int alloc_len, offset, len, target_dev_id;
2117 int target = scp->device->id;
2118 unsigned char *ap;
2119 unsigned char arr[SDEBUG_MAX_MSENSE_SZ];
2120 unsigned char *cmd = scp->cmnd;
2121 bool dbd, llbaa, msense_6, is_disk, bad_pcode;
2122
2123 dbd = !!(cmd[1] & 0x8); /* disable block descriptors */
2124 pcontrol = (cmd[2] & 0xc0) >> 6;
2125 pcode = cmd[2] & 0x3f;
2126 subpcode = cmd[3];
2127 msense_6 = (MODE_SENSE == cmd[0]);
2128 llbaa = msense_6 ? false : !!(cmd[1] & 0x10);
2129 is_disk = (sdebug_ptype == TYPE_DISK);
2130 if (is_disk && !dbd)
2131 bd_len = llbaa ? 16 : 8;
2132 else
2133 bd_len = 0;
2134 alloc_len = msense_6 ? cmd[4] : get_unaligned_be16(cmd + 7);
2135 memset(arr, 0, SDEBUG_MAX_MSENSE_SZ);
2136 if (0x3 == pcontrol) { /* Saving values not supported */
2137 mk_sense_buffer(scp, ILLEGAL_REQUEST, SAVING_PARAMS_UNSUP, 0);
2138 return check_condition_result;
2139 }
2140 target_dev_id = ((devip->sdbg_host->shost->host_no + 1) * 2000) +
2141 (devip->target * 1000) - 3;
2142 /* for disks set DPOFUA bit and clear write protect (WP) bit */
2143 if (is_disk) {
2144 dev_spec = 0x10; /* =0x90 if WP=1 implies read-only */
2145 if (sdebug_wp)
2146 dev_spec |= 0x80;
2147 } else
2148 dev_spec = 0x0;
2149 if (msense_6) {
2150 arr[2] = dev_spec;
2151 arr[3] = bd_len;
2152 offset = 4;
2153 } else {
2154 arr[3] = dev_spec;
2155 if (16 == bd_len)
2156 arr[4] = 0x1; /* set LONGLBA bit */
2157 arr[7] = bd_len; /* assume 255 or less */
2158 offset = 8;
2159 }
2160 ap = arr + offset;
2161 if ((bd_len > 0) && (!sdebug_capacity))
2162 sdebug_capacity = get_sdebug_capacity();
2163
2164 if (8 == bd_len) {
2165 if (sdebug_capacity > 0xfffffffe)
2166 put_unaligned_be32(0xffffffff, ap + 0);
2167 else
2168 put_unaligned_be32(sdebug_capacity, ap + 0);
2169 put_unaligned_be16(sdebug_sector_size, ap + 6);
2170 offset += bd_len;
2171 ap = arr + offset;
2172 } else if (16 == bd_len) {
2173 put_unaligned_be64((u64)sdebug_capacity, ap + 0);
2174 put_unaligned_be32(sdebug_sector_size, ap + 12);
2175 offset += bd_len;
2176 ap = arr + offset;
2177 }
2178
2179 if ((subpcode > 0x0) && (subpcode < 0xff) && (0x19 != pcode)) {
2180 /* TODO: Control Extension page */
2181 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2182 return check_condition_result;
2183 }
2184 bad_pcode = false;
2185
2186 switch (pcode) {
2187 case 0x1: /* Read-Write error recovery page, direct access */
2188 len = resp_err_recov_pg(ap, pcontrol, target);
2189 offset += len;
2190 break;
2191 case 0x2: /* Disconnect-Reconnect page, all devices */
2192 len = resp_disconnect_pg(ap, pcontrol, target);
2193 offset += len;
2194 break;
2195 case 0x3: /* Format device page, direct access */
2196 if (is_disk) {
2197 len = resp_format_pg(ap, pcontrol, target);
2198 offset += len;
2199 } else
2200 bad_pcode = true;
2201 break;
2202 case 0x8: /* Caching page, direct access */
2203 if (is_disk) {
2204 len = resp_caching_pg(ap, pcontrol, target);
2205 offset += len;
2206 } else
2207 bad_pcode = true;
2208 break;
2209 case 0xa: /* Control Mode page, all devices */
2210 len = resp_ctrl_m_pg(ap, pcontrol, target);
2211 offset += len;
2212 break;
2213 case 0x19: /* if spc==1 then sas phy, control+discover */
2214 if ((subpcode > 0x2) && (subpcode < 0xff)) {
2215 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2216 return check_condition_result;
2217 }
2218 len = 0;
2219 if ((0x0 == subpcode) || (0xff == subpcode))
2220 len += resp_sas_sf_m_pg(ap + len, pcontrol, target);
2221 if ((0x1 == subpcode) || (0xff == subpcode))
2222 len += resp_sas_pcd_m_spg(ap + len, pcontrol, target,
2223 target_dev_id);
2224 if ((0x2 == subpcode) || (0xff == subpcode))
2225 len += resp_sas_sha_m_spg(ap + len, pcontrol);
2226 offset += len;
2227 break;
2228 case 0x1c: /* Informational Exceptions Mode page, all devices */
2229 len = resp_iec_m_pg(ap, pcontrol, target);
2230 offset += len;
2231 break;
2232 case 0x3f: /* Read all Mode pages */
2233 if ((0 == subpcode) || (0xff == subpcode)) {
2234 len = resp_err_recov_pg(ap, pcontrol, target);
2235 len += resp_disconnect_pg(ap + len, pcontrol, target);
2236 if (is_disk) {
2237 len += resp_format_pg(ap + len, pcontrol,
2238 target);
2239 len += resp_caching_pg(ap + len, pcontrol,
2240 target);
2241 }
2242 len += resp_ctrl_m_pg(ap + len, pcontrol, target);
2243 len += resp_sas_sf_m_pg(ap + len, pcontrol, target);
2244 if (0xff == subpcode) {
2245 len += resp_sas_pcd_m_spg(ap + len, pcontrol,
2246 target, target_dev_id);
2247 len += resp_sas_sha_m_spg(ap + len, pcontrol);
2248 }
2249 len += resp_iec_m_pg(ap + len, pcontrol, target);
2250 offset += len;
2251 } else {
2252 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 3, -1);
2253 return check_condition_result;
2254 }
2255 break;
2256 default:
2257 bad_pcode = true;
2258 break;
2259 }
2260 if (bad_pcode) {
2261 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, 5);
2262 return check_condition_result;
2263 }
2264 if (msense_6)
2265 arr[0] = offset - 1;
2266 else
2267 put_unaligned_be16((offset - 2), arr + 0);
2268 return fill_from_dev_buffer(scp, arr, min(alloc_len, offset));
2269}
2270
2271#define SDEBUG_MAX_MSELECT_SZ 512
2272
2273static int resp_mode_select(struct scsi_cmnd *scp,
2274 struct sdebug_dev_info *devip)
2275{
2276 int pf, sp, ps, md_len, bd_len, off, spf, pg_len;
2277 int param_len, res, mpage;
2278 unsigned char arr[SDEBUG_MAX_MSELECT_SZ];
2279 unsigned char *cmd = scp->cmnd;
2280 int mselect6 = (MODE_SELECT == cmd[0]);
2281
2282 memset(arr, 0, sizeof(arr));
2283 pf = cmd[1] & 0x10;
2284 sp = cmd[1] & 0x1;
2285 param_len = mselect6 ? cmd[4] : get_unaligned_be16(cmd + 7);
2286 if ((0 == pf) || sp || (param_len > SDEBUG_MAX_MSELECT_SZ)) {
2287 mk_sense_invalid_fld(scp, SDEB_IN_CDB, mselect6 ? 4 : 7, -1);
2288 return check_condition_result;
2289 }
2290 res = fetch_to_dev_buffer(scp, arr, param_len);
2291 if (-1 == res)
2292 return DID_ERROR << 16;
2293 else if (sdebug_verbose && (res < param_len))
2294 sdev_printk(KERN_INFO, scp->device,
2295 "%s: cdb indicated=%d, IO sent=%d bytes\n",
2296 __func__, param_len, res);
2297 md_len = mselect6 ? (arr[0] + 1) : (get_unaligned_be16(arr + 0) + 2);
2298 bd_len = mselect6 ? arr[3] : get_unaligned_be16(arr + 6);
2299 if (md_len > 2) {
2300 mk_sense_invalid_fld(scp, SDEB_IN_DATA, 0, -1);
2301 return check_condition_result;
2302 }
2303 off = bd_len + (mselect6 ? 4 : 8);
2304 mpage = arr[off] & 0x3f;
2305 ps = !!(arr[off] & 0x80);
2306 if (ps) {
2307 mk_sense_invalid_fld(scp, SDEB_IN_DATA, off, 7);
2308 return check_condition_result;
2309 }
2310 spf = !!(arr[off] & 0x40);
2311 pg_len = spf ? (get_unaligned_be16(arr + off + 2) + 4) :
2312 (arr[off + 1] + 2);
2313 if ((pg_len + off) > param_len) {
2314 mk_sense_buffer(scp, ILLEGAL_REQUEST,
2315 PARAMETER_LIST_LENGTH_ERR, 0);
2316 return check_condition_result;
2317 }
2318 switch (mpage) {
2319 case 0x8: /* Caching Mode page */
2320 if (caching_pg[1] == arr[off + 1]) {
2321 memcpy(caching_pg + 2, arr + off + 2,
2322 sizeof(caching_pg) - 2);
2323 goto set_mode_changed_ua;
2324 }
2325 break;
2326 case 0xa: /* Control Mode page */
2327 if (ctrl_m_pg[1] == arr[off + 1]) {
2328 memcpy(ctrl_m_pg + 2, arr + off + 2,
2329 sizeof(ctrl_m_pg) - 2);
2330 if (ctrl_m_pg[4] & 0x8)
2331 sdebug_wp = true;
2332 else
2333 sdebug_wp = false;
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;
2350set_mode_changed_ua:
2351 set_bit(SDEBUG_UA_MODE_CHANGED, devip->uas_bm);
2352 return 0;
2353}
2354
2355static 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
2365static 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
2380static 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
2458static inline int check_device_access_params(struct scsi_cmnd *scp,
2459 unsigned long long lba, unsigned int num, bool write)
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 if (write && unlikely(sdebug_wp)) {
2472 mk_sense_buffer(scp, DATA_PROTECT, WRITE_PROTECTED, 0x2);
2473 return check_condition_result;
2474 }
2475 return 0;
2476}
2477
2478/* Returns number of bytes copied or -1 if error. */
2479static int do_device_access(struct scsi_cmnd *scmd, u32 sg_skip, u64 lba,
2480 u32 num, bool do_write)
2481{
2482 int ret;
2483 u64 block, rest = 0;
2484 struct scsi_data_buffer *sdb = &scmd->sdb;
2485 enum dma_data_direction dir;
2486
2487 if (do_write) {
2488 dir = DMA_TO_DEVICE;
2489 write_since_sync = true;
2490 } else {
2491 dir = DMA_FROM_DEVICE;
2492 }
2493
2494 if (!sdb->length)
2495 return 0;
2496 if (scmd->sc_data_direction != dir)
2497 return -1;
2498
2499 block = do_div(lba, sdebug_store_sectors);
2500 if (block + num > sdebug_store_sectors)
2501 rest = block + num - sdebug_store_sectors;
2502
2503 ret = sg_copy_buffer(sdb->table.sgl, sdb->table.nents,
2504 fake_storep + (block * sdebug_sector_size),
2505 (num - rest) * sdebug_sector_size, sg_skip, do_write);
2506 if (ret != (num - rest) * sdebug_sector_size)
2507 return ret;
2508
2509 if (rest) {
2510 ret += sg_copy_buffer(sdb->table.sgl, sdb->table.nents,
2511 fake_storep, rest * sdebug_sector_size,
2512 sg_skip + ((num - rest) * sdebug_sector_size),
2513 do_write);
2514 }
2515
2516 return ret;
2517}
2518
2519/* If lba2fake_store(lba,num) compares equal to arr(num), then copy top half of
2520 * arr into lba2fake_store(lba,num) and return true. If comparison fails then
2521 * return false. */
2522static bool comp_write_worker(u64 lba, u32 num, const u8 *arr)
2523{
2524 bool res;
2525 u64 block, rest = 0;
2526 u32 store_blks = sdebug_store_sectors;
2527 u32 lb_size = sdebug_sector_size;
2528
2529 block = do_div(lba, store_blks);
2530 if (block + num > store_blks)
2531 rest = block + num - store_blks;
2532
2533 res = !memcmp(fake_storep + (block * lb_size), arr,
2534 (num - rest) * lb_size);
2535 if (!res)
2536 return res;
2537 if (rest)
2538 res = memcmp(fake_storep, arr + ((num - rest) * lb_size),
2539 rest * lb_size);
2540 if (!res)
2541 return res;
2542 arr += num * lb_size;
2543 memcpy(fake_storep + (block * lb_size), arr, (num - rest) * lb_size);
2544 if (rest)
2545 memcpy(fake_storep, arr + ((num - rest) * lb_size),
2546 rest * lb_size);
2547 return res;
2548}
2549
2550static __be16 dif_compute_csum(const void *buf, int len)
2551{
2552 __be16 csum;
2553
2554 if (sdebug_guard)
2555 csum = (__force __be16)ip_compute_csum(buf, len);
2556 else
2557 csum = cpu_to_be16(crc_t10dif(buf, len));
2558
2559 return csum;
2560}
2561
2562static int dif_verify(struct t10_pi_tuple *sdt, const void *data,
2563 sector_t sector, u32 ei_lba)
2564{
2565 __be16 csum = dif_compute_csum(data, sdebug_sector_size);
2566
2567 if (sdt->guard_tag != csum) {
2568 pr_err("GUARD check failed on sector %lu rcvd 0x%04x, data 0x%04x\n",
2569 (unsigned long)sector,
2570 be16_to_cpu(sdt->guard_tag),
2571 be16_to_cpu(csum));
2572 return 0x01;
2573 }
2574 if (sdebug_dif == T10_PI_TYPE1_PROTECTION &&
2575 be32_to_cpu(sdt->ref_tag) != (sector & 0xffffffff)) {
2576 pr_err("REF check failed on sector %lu\n",
2577 (unsigned long)sector);
2578 return 0x03;
2579 }
2580 if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
2581 be32_to_cpu(sdt->ref_tag) != ei_lba) {
2582 pr_err("REF check failed on sector %lu\n",
2583 (unsigned long)sector);
2584 return 0x03;
2585 }
2586 return 0;
2587}
2588
2589static void dif_copy_prot(struct scsi_cmnd *SCpnt, sector_t sector,
2590 unsigned int sectors, bool read)
2591{
2592 size_t resid;
2593 void *paddr;
2594 const void *dif_store_end = dif_storep + sdebug_store_sectors;
2595 struct sg_mapping_iter miter;
2596
2597 /* Bytes of protection data to copy into sgl */
2598 resid = sectors * sizeof(*dif_storep);
2599
2600 sg_miter_start(&miter, scsi_prot_sglist(SCpnt),
2601 scsi_prot_sg_count(SCpnt), SG_MITER_ATOMIC |
2602 (read ? SG_MITER_TO_SG : SG_MITER_FROM_SG));
2603
2604 while (sg_miter_next(&miter) && resid > 0) {
2605 size_t len = min(miter.length, resid);
2606 void *start = dif_store(sector);
2607 size_t rest = 0;
2608
2609 if (dif_store_end < start + len)
2610 rest = start + len - dif_store_end;
2611
2612 paddr = miter.addr;
2613
2614 if (read)
2615 memcpy(paddr, start, len - rest);
2616 else
2617 memcpy(start, paddr, len - rest);
2618
2619 if (rest) {
2620 if (read)
2621 memcpy(paddr + len - rest, dif_storep, rest);
2622 else
2623 memcpy(dif_storep, paddr + len - rest, rest);
2624 }
2625
2626 sector += len / sizeof(*dif_storep);
2627 resid -= len;
2628 }
2629 sg_miter_stop(&miter);
2630}
2631
2632static int prot_verify_read(struct scsi_cmnd *SCpnt, sector_t start_sec,
2633 unsigned int sectors, u32 ei_lba)
2634{
2635 unsigned int i;
2636 struct t10_pi_tuple *sdt;
2637 sector_t sector;
2638
2639 for (i = 0; i < sectors; i++, ei_lba++) {
2640 int ret;
2641
2642 sector = start_sec + i;
2643 sdt = dif_store(sector);
2644
2645 if (sdt->app_tag == cpu_to_be16(0xffff))
2646 continue;
2647
2648 ret = dif_verify(sdt, lba2fake_store(sector), sector, ei_lba);
2649 if (ret) {
2650 dif_errors++;
2651 return ret;
2652 }
2653 }
2654
2655 dif_copy_prot(SCpnt, start_sec, sectors, true);
2656 dix_reads++;
2657
2658 return 0;
2659}
2660
2661static int resp_read_dt0(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
2662{
2663 u8 *cmd = scp->cmnd;
2664 struct sdebug_queued_cmd *sqcp;
2665 u64 lba;
2666 u32 num;
2667 u32 ei_lba;
2668 unsigned long iflags;
2669 int ret;
2670 bool check_prot;
2671
2672 switch (cmd[0]) {
2673 case READ_16:
2674 ei_lba = 0;
2675 lba = get_unaligned_be64(cmd + 2);
2676 num = get_unaligned_be32(cmd + 10);
2677 check_prot = true;
2678 break;
2679 case READ_10:
2680 ei_lba = 0;
2681 lba = get_unaligned_be32(cmd + 2);
2682 num = get_unaligned_be16(cmd + 7);
2683 check_prot = true;
2684 break;
2685 case READ_6:
2686 ei_lba = 0;
2687 lba = (u32)cmd[3] | (u32)cmd[2] << 8 |
2688 (u32)(cmd[1] & 0x1f) << 16;
2689 num = (0 == cmd[4]) ? 256 : cmd[4];
2690 check_prot = true;
2691 break;
2692 case READ_12:
2693 ei_lba = 0;
2694 lba = get_unaligned_be32(cmd + 2);
2695 num = get_unaligned_be32(cmd + 6);
2696 check_prot = true;
2697 break;
2698 case XDWRITEREAD_10:
2699 ei_lba = 0;
2700 lba = get_unaligned_be32(cmd + 2);
2701 num = get_unaligned_be16(cmd + 7);
2702 check_prot = false;
2703 break;
2704 default: /* assume READ(32) */
2705 lba = get_unaligned_be64(cmd + 12);
2706 ei_lba = get_unaligned_be32(cmd + 20);
2707 num = get_unaligned_be32(cmd + 28);
2708 check_prot = false;
2709 break;
2710 }
2711 if (unlikely(have_dif_prot && check_prot)) {
2712 if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
2713 (cmd[1] & 0xe0)) {
2714 mk_sense_invalid_opcode(scp);
2715 return check_condition_result;
2716 }
2717 if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
2718 sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
2719 (cmd[1] & 0xe0) == 0)
2720 sdev_printk(KERN_ERR, scp->device, "Unprotected RD "
2721 "to DIF device\n");
2722 }
2723 if (unlikely(sdebug_any_injecting_opt)) {
2724 sqcp = (struct sdebug_queued_cmd *)scp->host_scribble;
2725
2726 if (sqcp) {
2727 if (sqcp->inj_short)
2728 num /= 2;
2729 }
2730 } else
2731 sqcp = NULL;
2732
2733 ret = check_device_access_params(scp, lba, num, false);
2734 if (ret)
2735 return ret;
2736 if (unlikely((SDEBUG_OPT_MEDIUM_ERR & sdebug_opts) &&
2737 (lba <= (sdebug_medium_error_start + sdebug_medium_error_count - 1)) &&
2738 ((lba + num) > sdebug_medium_error_start))) {
2739 /* claim unrecoverable read error */
2740 mk_sense_buffer(scp, MEDIUM_ERROR, UNRECOVERED_READ_ERR, 0);
2741 /* set info field and valid bit for fixed descriptor */
2742 if (0x70 == (scp->sense_buffer[0] & 0x7f)) {
2743 scp->sense_buffer[0] |= 0x80; /* Valid bit */
2744 ret = (lba < OPT_MEDIUM_ERR_ADDR)
2745 ? OPT_MEDIUM_ERR_ADDR : (int)lba;
2746 put_unaligned_be32(ret, scp->sense_buffer + 3);
2747 }
2748 scsi_set_resid(scp, scsi_bufflen(scp));
2749 return check_condition_result;
2750 }
2751
2752 read_lock_irqsave(&atomic_rw, iflags);
2753
2754 /* DIX + T10 DIF */
2755 if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
2756 int prot_ret = prot_verify_read(scp, lba, num, ei_lba);
2757
2758 if (prot_ret) {
2759 read_unlock_irqrestore(&atomic_rw, iflags);
2760 mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, prot_ret);
2761 return illegal_condition_result;
2762 }
2763 }
2764
2765 ret = do_device_access(scp, 0, lba, num, false);
2766 read_unlock_irqrestore(&atomic_rw, iflags);
2767 if (unlikely(ret == -1))
2768 return DID_ERROR << 16;
2769
2770 scsi_set_resid(scp, scsi_bufflen(scp) - ret);
2771
2772 if (unlikely(sqcp)) {
2773 if (sqcp->inj_recovered) {
2774 mk_sense_buffer(scp, RECOVERED_ERROR,
2775 THRESHOLD_EXCEEDED, 0);
2776 return check_condition_result;
2777 } else if (sqcp->inj_transport) {
2778 mk_sense_buffer(scp, ABORTED_COMMAND,
2779 TRANSPORT_PROBLEM, ACK_NAK_TO);
2780 return check_condition_result;
2781 } else if (sqcp->inj_dif) {
2782 /* Logical block guard check failed */
2783 mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
2784 return illegal_condition_result;
2785 } else if (sqcp->inj_dix) {
2786 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
2787 return illegal_condition_result;
2788 }
2789 }
2790 return 0;
2791}
2792
2793static void dump_sector(unsigned char *buf, int len)
2794{
2795 int i, j, n;
2796
2797 pr_err(">>> Sector Dump <<<\n");
2798 for (i = 0 ; i < len ; i += 16) {
2799 char b[128];
2800
2801 for (j = 0, n = 0; j < 16; j++) {
2802 unsigned char c = buf[i+j];
2803
2804 if (c >= 0x20 && c < 0x7e)
2805 n += scnprintf(b + n, sizeof(b) - n,
2806 " %c ", buf[i+j]);
2807 else
2808 n += scnprintf(b + n, sizeof(b) - n,
2809 "%02x ", buf[i+j]);
2810 }
2811 pr_err("%04d: %s\n", i, b);
2812 }
2813}
2814
2815static int prot_verify_write(struct scsi_cmnd *SCpnt, sector_t start_sec,
2816 unsigned int sectors, u32 ei_lba)
2817{
2818 int ret;
2819 struct t10_pi_tuple *sdt;
2820 void *daddr;
2821 sector_t sector = start_sec;
2822 int ppage_offset;
2823 int dpage_offset;
2824 struct sg_mapping_iter diter;
2825 struct sg_mapping_iter piter;
2826
2827 BUG_ON(scsi_sg_count(SCpnt) == 0);
2828 BUG_ON(scsi_prot_sg_count(SCpnt) == 0);
2829
2830 sg_miter_start(&piter, scsi_prot_sglist(SCpnt),
2831 scsi_prot_sg_count(SCpnt),
2832 SG_MITER_ATOMIC | SG_MITER_FROM_SG);
2833 sg_miter_start(&diter, scsi_sglist(SCpnt), scsi_sg_count(SCpnt),
2834 SG_MITER_ATOMIC | SG_MITER_FROM_SG);
2835
2836 /* For each protection page */
2837 while (sg_miter_next(&piter)) {
2838 dpage_offset = 0;
2839 if (WARN_ON(!sg_miter_next(&diter))) {
2840 ret = 0x01;
2841 goto out;
2842 }
2843
2844 for (ppage_offset = 0; ppage_offset < piter.length;
2845 ppage_offset += sizeof(struct t10_pi_tuple)) {
2846 /* If we're at the end of the current
2847 * data page advance to the next one
2848 */
2849 if (dpage_offset >= diter.length) {
2850 if (WARN_ON(!sg_miter_next(&diter))) {
2851 ret = 0x01;
2852 goto out;
2853 }
2854 dpage_offset = 0;
2855 }
2856
2857 sdt = piter.addr + ppage_offset;
2858 daddr = diter.addr + dpage_offset;
2859
2860 ret = dif_verify(sdt, daddr, sector, ei_lba);
2861 if (ret) {
2862 dump_sector(daddr, sdebug_sector_size);
2863 goto out;
2864 }
2865
2866 sector++;
2867 ei_lba++;
2868 dpage_offset += sdebug_sector_size;
2869 }
2870 diter.consumed = dpage_offset;
2871 sg_miter_stop(&diter);
2872 }
2873 sg_miter_stop(&piter);
2874
2875 dif_copy_prot(SCpnt, start_sec, sectors, false);
2876 dix_writes++;
2877
2878 return 0;
2879
2880out:
2881 dif_errors++;
2882 sg_miter_stop(&diter);
2883 sg_miter_stop(&piter);
2884 return ret;
2885}
2886
2887static unsigned long lba_to_map_index(sector_t lba)
2888{
2889 if (sdebug_unmap_alignment)
2890 lba += sdebug_unmap_granularity - sdebug_unmap_alignment;
2891 sector_div(lba, sdebug_unmap_granularity);
2892 return lba;
2893}
2894
2895static sector_t map_index_to_lba(unsigned long index)
2896{
2897 sector_t lba = index * sdebug_unmap_granularity;
2898
2899 if (sdebug_unmap_alignment)
2900 lba -= sdebug_unmap_granularity - sdebug_unmap_alignment;
2901 return lba;
2902}
2903
2904static unsigned int map_state(sector_t lba, unsigned int *num)
2905{
2906 sector_t end;
2907 unsigned int mapped;
2908 unsigned long index;
2909 unsigned long next;
2910
2911 index = lba_to_map_index(lba);
2912 mapped = test_bit(index, map_storep);
2913
2914 if (mapped)
2915 next = find_next_zero_bit(map_storep, map_size, index);
2916 else
2917 next = find_next_bit(map_storep, map_size, index);
2918
2919 end = min_t(sector_t, sdebug_store_sectors, map_index_to_lba(next));
2920 *num = end - lba;
2921 return mapped;
2922}
2923
2924static void map_region(sector_t lba, unsigned int len)
2925{
2926 sector_t end = lba + len;
2927
2928 while (lba < end) {
2929 unsigned long index = lba_to_map_index(lba);
2930
2931 if (index < map_size)
2932 set_bit(index, map_storep);
2933
2934 lba = map_index_to_lba(index + 1);
2935 }
2936}
2937
2938static void unmap_region(sector_t lba, unsigned int len)
2939{
2940 sector_t end = lba + len;
2941
2942 while (lba < end) {
2943 unsigned long index = lba_to_map_index(lba);
2944
2945 if (lba == map_index_to_lba(index) &&
2946 lba + sdebug_unmap_granularity <= end &&
2947 index < map_size) {
2948 clear_bit(index, map_storep);
2949 if (sdebug_lbprz) { /* for LBPRZ=2 return 0xff_s */
2950 memset(fake_storep +
2951 lba * sdebug_sector_size,
2952 (sdebug_lbprz & 1) ? 0 : 0xff,
2953 sdebug_sector_size *
2954 sdebug_unmap_granularity);
2955 }
2956 if (dif_storep) {
2957 memset(dif_storep + lba, 0xff,
2958 sizeof(*dif_storep) *
2959 sdebug_unmap_granularity);
2960 }
2961 }
2962 lba = map_index_to_lba(index + 1);
2963 }
2964}
2965
2966static int resp_write_dt0(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
2967{
2968 u8 *cmd = scp->cmnd;
2969 u64 lba;
2970 u32 num;
2971 u32 ei_lba;
2972 unsigned long iflags;
2973 int ret;
2974 bool check_prot;
2975
2976 switch (cmd[0]) {
2977 case WRITE_16:
2978 ei_lba = 0;
2979 lba = get_unaligned_be64(cmd + 2);
2980 num = get_unaligned_be32(cmd + 10);
2981 check_prot = true;
2982 break;
2983 case WRITE_10:
2984 ei_lba = 0;
2985 lba = get_unaligned_be32(cmd + 2);
2986 num = get_unaligned_be16(cmd + 7);
2987 check_prot = true;
2988 break;
2989 case WRITE_6:
2990 ei_lba = 0;
2991 lba = (u32)cmd[3] | (u32)cmd[2] << 8 |
2992 (u32)(cmd[1] & 0x1f) << 16;
2993 num = (0 == cmd[4]) ? 256 : cmd[4];
2994 check_prot = true;
2995 break;
2996 case WRITE_12:
2997 ei_lba = 0;
2998 lba = get_unaligned_be32(cmd + 2);
2999 num = get_unaligned_be32(cmd + 6);
3000 check_prot = true;
3001 break;
3002 case 0x53: /* XDWRITEREAD(10) */
3003 ei_lba = 0;
3004 lba = get_unaligned_be32(cmd + 2);
3005 num = get_unaligned_be16(cmd + 7);
3006 check_prot = false;
3007 break;
3008 default: /* assume WRITE(32) */
3009 lba = get_unaligned_be64(cmd + 12);
3010 ei_lba = get_unaligned_be32(cmd + 20);
3011 num = get_unaligned_be32(cmd + 28);
3012 check_prot = false;
3013 break;
3014 }
3015 if (unlikely(have_dif_prot && check_prot)) {
3016 if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3017 (cmd[1] & 0xe0)) {
3018 mk_sense_invalid_opcode(scp);
3019 return check_condition_result;
3020 }
3021 if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3022 sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3023 (cmd[1] & 0xe0) == 0)
3024 sdev_printk(KERN_ERR, scp->device, "Unprotected WR "
3025 "to DIF device\n");
3026 }
3027 ret = check_device_access_params(scp, lba, num, true);
3028 if (ret)
3029 return ret;
3030 write_lock_irqsave(&atomic_rw, iflags);
3031
3032 /* DIX + T10 DIF */
3033 if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3034 int prot_ret = prot_verify_write(scp, lba, num, ei_lba);
3035
3036 if (prot_ret) {
3037 write_unlock_irqrestore(&atomic_rw, iflags);
3038 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, prot_ret);
3039 return illegal_condition_result;
3040 }
3041 }
3042
3043 ret = do_device_access(scp, 0, lba, num, true);
3044 if (unlikely(scsi_debug_lbp()))
3045 map_region(lba, num);
3046 write_unlock_irqrestore(&atomic_rw, iflags);
3047 if (unlikely(-1 == ret))
3048 return DID_ERROR << 16;
3049 else if (unlikely(sdebug_verbose &&
3050 (ret < (num * sdebug_sector_size))))
3051 sdev_printk(KERN_INFO, scp->device,
3052 "%s: write: cdb indicated=%u, IO sent=%d bytes\n",
3053 my_name, num * sdebug_sector_size, ret);
3054
3055 if (unlikely(sdebug_any_injecting_opt)) {
3056 struct sdebug_queued_cmd *sqcp =
3057 (struct sdebug_queued_cmd *)scp->host_scribble;
3058
3059 if (sqcp) {
3060 if (sqcp->inj_recovered) {
3061 mk_sense_buffer(scp, RECOVERED_ERROR,
3062 THRESHOLD_EXCEEDED, 0);
3063 return check_condition_result;
3064 } else if (sqcp->inj_dif) {
3065 /* Logical block guard check failed */
3066 mk_sense_buffer(scp, ABORTED_COMMAND, 0x10, 1);
3067 return illegal_condition_result;
3068 } else if (sqcp->inj_dix) {
3069 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10, 1);
3070 return illegal_condition_result;
3071 }
3072 }
3073 }
3074 return 0;
3075}
3076
3077/*
3078 * T10 has only specified WRITE SCATTERED(16) and WRITE SCATTERED(32).
3079 * No READ GATHERED yet (requires bidi or long cdb holding gather list).
3080 */
3081static int resp_write_scat(struct scsi_cmnd *scp,
3082 struct sdebug_dev_info *devip)
3083{
3084 u8 *cmd = scp->cmnd;
3085 u8 *lrdp = NULL;
3086 u8 *up;
3087 u8 wrprotect;
3088 u16 lbdof, num_lrd, k;
3089 u32 num, num_by, bt_len, lbdof_blen, sg_off, cum_lb;
3090 u32 lb_size = sdebug_sector_size;
3091 u32 ei_lba;
3092 u64 lba;
3093 unsigned long iflags;
3094 int ret, res;
3095 bool is_16;
3096 static const u32 lrd_size = 32; /* + parameter list header size */
3097
3098 if (cmd[0] == VARIABLE_LENGTH_CMD) {
3099 is_16 = false;
3100 wrprotect = (cmd[10] >> 5) & 0x7;
3101 lbdof = get_unaligned_be16(cmd + 12);
3102 num_lrd = get_unaligned_be16(cmd + 16);
3103 bt_len = get_unaligned_be32(cmd + 28);
3104 } else { /* that leaves WRITE SCATTERED(16) */
3105 is_16 = true;
3106 wrprotect = (cmd[2] >> 5) & 0x7;
3107 lbdof = get_unaligned_be16(cmd + 4);
3108 num_lrd = get_unaligned_be16(cmd + 8);
3109 bt_len = get_unaligned_be32(cmd + 10);
3110 if (unlikely(have_dif_prot)) {
3111 if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3112 wrprotect) {
3113 mk_sense_invalid_opcode(scp);
3114 return illegal_condition_result;
3115 }
3116 if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3117 sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3118 wrprotect == 0)
3119 sdev_printk(KERN_ERR, scp->device,
3120 "Unprotected WR to DIF device\n");
3121 }
3122 }
3123 if ((num_lrd == 0) || (bt_len == 0))
3124 return 0; /* T10 says these do-nothings are not errors */
3125 if (lbdof == 0) {
3126 if (sdebug_verbose)
3127 sdev_printk(KERN_INFO, scp->device,
3128 "%s: %s: LB Data Offset field bad\n",
3129 my_name, __func__);
3130 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3131 return illegal_condition_result;
3132 }
3133 lbdof_blen = lbdof * lb_size;
3134 if ((lrd_size + (num_lrd * lrd_size)) > lbdof_blen) {
3135 if (sdebug_verbose)
3136 sdev_printk(KERN_INFO, scp->device,
3137 "%s: %s: LBA range descriptors don't fit\n",
3138 my_name, __func__);
3139 mk_sense_buffer(scp, ILLEGAL_REQUEST, INVALID_FIELD_IN_CDB, 0);
3140 return illegal_condition_result;
3141 }
3142 lrdp = kzalloc(lbdof_blen, GFP_ATOMIC);
3143 if (lrdp == NULL)
3144 return SCSI_MLQUEUE_HOST_BUSY;
3145 if (sdebug_verbose)
3146 sdev_printk(KERN_INFO, scp->device,
3147 "%s: %s: Fetch header+scatter_list, lbdof_blen=%u\n",
3148 my_name, __func__, lbdof_blen);
3149 res = fetch_to_dev_buffer(scp, lrdp, lbdof_blen);
3150 if (res == -1) {
3151 ret = DID_ERROR << 16;
3152 goto err_out;
3153 }
3154
3155 write_lock_irqsave(&atomic_rw, iflags);
3156 sg_off = lbdof_blen;
3157 /* Spec says Buffer xfer Length field in number of LBs in dout */
3158 cum_lb = 0;
3159 for (k = 0, up = lrdp + lrd_size; k < num_lrd; ++k, up += lrd_size) {
3160 lba = get_unaligned_be64(up + 0);
3161 num = get_unaligned_be32(up + 8);
3162 if (sdebug_verbose)
3163 sdev_printk(KERN_INFO, scp->device,
3164 "%s: %s: k=%d LBA=0x%llx num=%u sg_off=%u\n",
3165 my_name, __func__, k, lba, num, sg_off);
3166 if (num == 0)
3167 continue;
3168 ret = check_device_access_params(scp, lba, num, true);
3169 if (ret)
3170 goto err_out_unlock;
3171 num_by = num * lb_size;
3172 ei_lba = is_16 ? 0 : get_unaligned_be32(up + 12);
3173
3174 if ((cum_lb + num) > bt_len) {
3175 if (sdebug_verbose)
3176 sdev_printk(KERN_INFO, scp->device,
3177 "%s: %s: sum of blocks > data provided\n",
3178 my_name, __func__);
3179 mk_sense_buffer(scp, ILLEGAL_REQUEST, WRITE_ERROR_ASC,
3180 0);
3181 ret = illegal_condition_result;
3182 goto err_out_unlock;
3183 }
3184
3185 /* DIX + T10 DIF */
3186 if (unlikely(sdebug_dix && scsi_prot_sg_count(scp))) {
3187 int prot_ret = prot_verify_write(scp, lba, num,
3188 ei_lba);
3189
3190 if (prot_ret) {
3191 mk_sense_buffer(scp, ILLEGAL_REQUEST, 0x10,
3192 prot_ret);
3193 ret = illegal_condition_result;
3194 goto err_out_unlock;
3195 }
3196 }
3197
3198 ret = do_device_access(scp, sg_off, lba, num, true);
3199 if (unlikely(scsi_debug_lbp()))
3200 map_region(lba, num);
3201 if (unlikely(-1 == ret)) {
3202 ret = DID_ERROR << 16;
3203 goto err_out_unlock;
3204 } else if (unlikely(sdebug_verbose && (ret < num_by)))
3205 sdev_printk(KERN_INFO, scp->device,
3206 "%s: write: cdb indicated=%u, IO sent=%d bytes\n",
3207 my_name, num_by, ret);
3208
3209 if (unlikely(sdebug_any_injecting_opt)) {
3210 struct sdebug_queued_cmd *sqcp =
3211 (struct sdebug_queued_cmd *)scp->host_scribble;
3212
3213 if (sqcp) {
3214 if (sqcp->inj_recovered) {
3215 mk_sense_buffer(scp, RECOVERED_ERROR,
3216 THRESHOLD_EXCEEDED, 0);
3217 ret = illegal_condition_result;
3218 goto err_out_unlock;
3219 } else if (sqcp->inj_dif) {
3220 /* Logical block guard check failed */
3221 mk_sense_buffer(scp, ABORTED_COMMAND,
3222 0x10, 1);
3223 ret = illegal_condition_result;
3224 goto err_out_unlock;
3225 } else if (sqcp->inj_dix) {
3226 mk_sense_buffer(scp, ILLEGAL_REQUEST,
3227 0x10, 1);
3228 ret = illegal_condition_result;
3229 goto err_out_unlock;
3230 }
3231 }
3232 }
3233 sg_off += num_by;
3234 cum_lb += num;
3235 }
3236 ret = 0;
3237err_out_unlock:
3238 write_unlock_irqrestore(&atomic_rw, iflags);
3239err_out:
3240 kfree(lrdp);
3241 return ret;
3242}
3243
3244static int resp_write_same(struct scsi_cmnd *scp, u64 lba, u32 num,
3245 u32 ei_lba, bool unmap, bool ndob)
3246{
3247 int ret;
3248 unsigned long iflags;
3249 unsigned long long i;
3250 u32 lb_size = sdebug_sector_size;
3251 u64 block, lbaa;
3252 u8 *fs1p;
3253
3254 ret = check_device_access_params(scp, lba, num, true);
3255 if (ret)
3256 return ret;
3257
3258 write_lock_irqsave(&atomic_rw, iflags);
3259
3260 if (unmap && scsi_debug_lbp()) {
3261 unmap_region(lba, num);
3262 goto out;
3263 }
3264 lbaa = lba;
3265 block = do_div(lbaa, sdebug_store_sectors);
3266 /* if ndob then zero 1 logical block, else fetch 1 logical block */
3267 fs1p = fake_storep + (block * lb_size);
3268 if (ndob) {
3269 memset(fs1p, 0, lb_size);
3270 ret = 0;
3271 } else
3272 ret = fetch_to_dev_buffer(scp, fs1p, lb_size);
3273
3274 if (-1 == ret) {
3275 write_unlock_irqrestore(&atomic_rw, iflags);
3276 return DID_ERROR << 16;
3277 } else if (sdebug_verbose && !ndob && (ret < lb_size))
3278 sdev_printk(KERN_INFO, scp->device,
3279 "%s: %s: lb size=%u, IO sent=%d bytes\n",
3280 my_name, "write same", lb_size, ret);
3281
3282 /* Copy first sector to remaining blocks */
3283 for (i = 1 ; i < num ; i++) {
3284 lbaa = lba + i;
3285 block = do_div(lbaa, sdebug_store_sectors);
3286 memmove(fake_storep + (block * lb_size), fs1p, lb_size);
3287 }
3288 if (scsi_debug_lbp())
3289 map_region(lba, num);
3290out:
3291 write_unlock_irqrestore(&atomic_rw, iflags);
3292
3293 return 0;
3294}
3295
3296static int resp_write_same_10(struct scsi_cmnd *scp,
3297 struct sdebug_dev_info *devip)
3298{
3299 u8 *cmd = scp->cmnd;
3300 u32 lba;
3301 u16 num;
3302 u32 ei_lba = 0;
3303 bool unmap = false;
3304
3305 if (cmd[1] & 0x8) {
3306 if (sdebug_lbpws10 == 0) {
3307 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 3);
3308 return check_condition_result;
3309 } else
3310 unmap = true;
3311 }
3312 lba = get_unaligned_be32(cmd + 2);
3313 num = get_unaligned_be16(cmd + 7);
3314 if (num > sdebug_write_same_length) {
3315 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 7, -1);
3316 return check_condition_result;
3317 }
3318 return resp_write_same(scp, lba, num, ei_lba, unmap, false);
3319}
3320
3321static int resp_write_same_16(struct scsi_cmnd *scp,
3322 struct sdebug_dev_info *devip)
3323{
3324 u8 *cmd = scp->cmnd;
3325 u64 lba;
3326 u32 num;
3327 u32 ei_lba = 0;
3328 bool unmap = false;
3329 bool ndob = false;
3330
3331 if (cmd[1] & 0x8) { /* UNMAP */
3332 if (sdebug_lbpws == 0) {
3333 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 3);
3334 return check_condition_result;
3335 } else
3336 unmap = true;
3337 }
3338 if (cmd[1] & 0x1) /* NDOB (no data-out buffer, assumes zeroes) */
3339 ndob = true;
3340 lba = get_unaligned_be64(cmd + 2);
3341 num = get_unaligned_be32(cmd + 10);
3342 if (num > sdebug_write_same_length) {
3343 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 10, -1);
3344 return check_condition_result;
3345 }
3346 return resp_write_same(scp, lba, num, ei_lba, unmap, ndob);
3347}
3348
3349/* Note the mode field is in the same position as the (lower) service action
3350 * field. For the Report supported operation codes command, SPC-4 suggests
3351 * each mode of this command should be reported separately; for future. */
3352static int resp_write_buffer(struct scsi_cmnd *scp,
3353 struct sdebug_dev_info *devip)
3354{
3355 u8 *cmd = scp->cmnd;
3356 struct scsi_device *sdp = scp->device;
3357 struct sdebug_dev_info *dp;
3358 u8 mode;
3359
3360 mode = cmd[1] & 0x1f;
3361 switch (mode) {
3362 case 0x4: /* download microcode (MC) and activate (ACT) */
3363 /* set UAs on this device only */
3364 set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
3365 set_bit(SDEBUG_UA_MICROCODE_CHANGED, devip->uas_bm);
3366 break;
3367 case 0x5: /* download MC, save and ACT */
3368 set_bit(SDEBUG_UA_MICROCODE_CHANGED_WO_RESET, devip->uas_bm);
3369 break;
3370 case 0x6: /* download MC with offsets and ACT */
3371 /* set UAs on most devices (LUs) in this target */
3372 list_for_each_entry(dp,
3373 &devip->sdbg_host->dev_info_list,
3374 dev_list)
3375 if (dp->target == sdp->id) {
3376 set_bit(SDEBUG_UA_BUS_RESET, dp->uas_bm);
3377 if (devip != dp)
3378 set_bit(SDEBUG_UA_MICROCODE_CHANGED,
3379 dp->uas_bm);
3380 }
3381 break;
3382 case 0x7: /* download MC with offsets, save, and ACT */
3383 /* set UA on all devices (LUs) in this target */
3384 list_for_each_entry(dp,
3385 &devip->sdbg_host->dev_info_list,
3386 dev_list)
3387 if (dp->target == sdp->id)
3388 set_bit(SDEBUG_UA_MICROCODE_CHANGED_WO_RESET,
3389 dp->uas_bm);
3390 break;
3391 default:
3392 /* do nothing for this command for other mode values */
3393 break;
3394 }
3395 return 0;
3396}
3397
3398static int resp_comp_write(struct scsi_cmnd *scp,
3399 struct sdebug_dev_info *devip)
3400{
3401 u8 *cmd = scp->cmnd;
3402 u8 *arr;
3403 u8 *fake_storep_hold;
3404 u64 lba;
3405 u32 dnum;
3406 u32 lb_size = sdebug_sector_size;
3407 u8 num;
3408 unsigned long iflags;
3409 int ret;
3410 int retval = 0;
3411
3412 lba = get_unaligned_be64(cmd + 2);
3413 num = cmd[13]; /* 1 to a maximum of 255 logical blocks */
3414 if (0 == num)
3415 return 0; /* degenerate case, not an error */
3416 if (sdebug_dif == T10_PI_TYPE2_PROTECTION &&
3417 (cmd[1] & 0xe0)) {
3418 mk_sense_invalid_opcode(scp);
3419 return check_condition_result;
3420 }
3421 if ((sdebug_dif == T10_PI_TYPE1_PROTECTION ||
3422 sdebug_dif == T10_PI_TYPE3_PROTECTION) &&
3423 (cmd[1] & 0xe0) == 0)
3424 sdev_printk(KERN_ERR, scp->device, "Unprotected WR "
3425 "to DIF device\n");
3426 ret = check_device_access_params(scp, lba, num, false);
3427 if (ret)
3428 return ret;
3429 dnum = 2 * num;
3430 arr = kcalloc(lb_size, dnum, GFP_ATOMIC);
3431 if (NULL == arr) {
3432 mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
3433 INSUFF_RES_ASCQ);
3434 return check_condition_result;
3435 }
3436
3437 write_lock_irqsave(&atomic_rw, iflags);
3438
3439 /* trick do_device_access() to fetch both compare and write buffers
3440 * from data-in into arr. Safe (atomic) since write_lock held. */
3441 fake_storep_hold = fake_storep;
3442 fake_storep = arr;
3443 ret = do_device_access(scp, 0, 0, dnum, true);
3444 fake_storep = fake_storep_hold;
3445 if (ret == -1) {
3446 retval = DID_ERROR << 16;
3447 goto cleanup;
3448 } else if (sdebug_verbose && (ret < (dnum * lb_size)))
3449 sdev_printk(KERN_INFO, scp->device, "%s: compare_write: cdb "
3450 "indicated=%u, IO sent=%d bytes\n", my_name,
3451 dnum * lb_size, ret);
3452 if (!comp_write_worker(lba, num, arr)) {
3453 mk_sense_buffer(scp, MISCOMPARE, MISCOMPARE_VERIFY_ASC, 0);
3454 retval = check_condition_result;
3455 goto cleanup;
3456 }
3457 if (scsi_debug_lbp())
3458 map_region(lba, num);
3459cleanup:
3460 write_unlock_irqrestore(&atomic_rw, iflags);
3461 kfree(arr);
3462 return retval;
3463}
3464
3465struct unmap_block_desc {
3466 __be64 lba;
3467 __be32 blocks;
3468 __be32 __reserved;
3469};
3470
3471static int resp_unmap(struct scsi_cmnd *scp, struct sdebug_dev_info *devip)
3472{
3473 unsigned char *buf;
3474 struct unmap_block_desc *desc;
3475 unsigned int i, payload_len, descriptors;
3476 int ret;
3477 unsigned long iflags;
3478
3479
3480 if (!scsi_debug_lbp())
3481 return 0; /* fib and say its done */
3482 payload_len = get_unaligned_be16(scp->cmnd + 7);
3483 BUG_ON(scsi_bufflen(scp) != payload_len);
3484
3485 descriptors = (payload_len - 8) / 16;
3486 if (descriptors > sdebug_unmap_max_desc) {
3487 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 7, -1);
3488 return check_condition_result;
3489 }
3490
3491 buf = kzalloc(scsi_bufflen(scp), GFP_ATOMIC);
3492 if (!buf) {
3493 mk_sense_buffer(scp, ILLEGAL_REQUEST, INSUFF_RES_ASC,
3494 INSUFF_RES_ASCQ);
3495 return check_condition_result;
3496 }
3497
3498 scsi_sg_copy_to_buffer(scp, buf, scsi_bufflen(scp));
3499
3500 BUG_ON(get_unaligned_be16(&buf[0]) != payload_len - 2);
3501 BUG_ON(get_unaligned_be16(&buf[2]) != descriptors * 16);
3502
3503 desc = (void *)&buf[8];
3504
3505 write_lock_irqsave(&atomic_rw, iflags);
3506
3507 for (i = 0 ; i < descriptors ; i++) {
3508 unsigned long long lba = get_unaligned_be64(&desc[i].lba);
3509 unsigned int num = get_unaligned_be32(&desc[i].blocks);
3510
3511 ret = check_device_access_params(scp, lba, num, true);
3512 if (ret)
3513 goto out;
3514
3515 unmap_region(lba, num);
3516 }
3517
3518 ret = 0;
3519
3520out:
3521 write_unlock_irqrestore(&atomic_rw, iflags);
3522 kfree(buf);
3523
3524 return ret;
3525}
3526
3527#define SDEBUG_GET_LBA_STATUS_LEN 32
3528
3529static int resp_get_lba_status(struct scsi_cmnd *scp,
3530 struct sdebug_dev_info *devip)
3531{
3532 u8 *cmd = scp->cmnd;
3533 u64 lba;
3534 u32 alloc_len, mapped, num;
3535 u8 arr[SDEBUG_GET_LBA_STATUS_LEN];
3536 int ret;
3537
3538 lba = get_unaligned_be64(cmd + 2);
3539 alloc_len = get_unaligned_be32(cmd + 10);
3540
3541 if (alloc_len < 24)
3542 return 0;
3543
3544 ret = check_device_access_params(scp, lba, 1, false);
3545 if (ret)
3546 return ret;
3547
3548 if (scsi_debug_lbp())
3549 mapped = map_state(lba, &num);
3550 else {
3551 mapped = 1;
3552 /* following just in case virtual_gb changed */
3553 sdebug_capacity = get_sdebug_capacity();
3554 if (sdebug_capacity - lba <= 0xffffffff)
3555 num = sdebug_capacity - lba;
3556 else
3557 num = 0xffffffff;
3558 }
3559
3560 memset(arr, 0, SDEBUG_GET_LBA_STATUS_LEN);
3561 put_unaligned_be32(20, arr); /* Parameter Data Length */
3562 put_unaligned_be64(lba, arr + 8); /* LBA */
3563 put_unaligned_be32(num, arr + 16); /* Number of blocks */
3564 arr[20] = !mapped; /* prov_stat=0: mapped; 1: dealloc */
3565
3566 return fill_from_dev_buffer(scp, arr, SDEBUG_GET_LBA_STATUS_LEN);
3567}
3568
3569static int resp_sync_cache(struct scsi_cmnd *scp,
3570 struct sdebug_dev_info *devip)
3571{
3572 int res = 0;
3573 u64 lba;
3574 u32 num_blocks;
3575 u8 *cmd = scp->cmnd;
3576
3577 if (cmd[0] == SYNCHRONIZE_CACHE) { /* 10 byte cdb */
3578 lba = get_unaligned_be32(cmd + 2);
3579 num_blocks = get_unaligned_be16(cmd + 7);
3580 } else { /* SYNCHRONIZE_CACHE(16) */
3581 lba = get_unaligned_be64(cmd + 2);
3582 num_blocks = get_unaligned_be32(cmd + 10);
3583 }
3584 if (lba + num_blocks > sdebug_capacity) {
3585 mk_sense_buffer(scp, ILLEGAL_REQUEST, LBA_OUT_OF_RANGE, 0);
3586 return check_condition_result;
3587 }
3588 if (!write_since_sync || cmd[1] & 0x2)
3589 res = SDEG_RES_IMMED_MASK;
3590 else /* delay if write_since_sync and IMMED clear */
3591 write_since_sync = false;
3592 return res;
3593}
3594
3595#define RL_BUCKET_ELEMS 8
3596
3597/* Even though each pseudo target has a REPORT LUNS "well known logical unit"
3598 * (W-LUN), the normal Linux scanning logic does not associate it with a
3599 * device (e.g. /dev/sg7). The following magic will make that association:
3600 * "cd /sys/class/scsi_host/host<n> ; echo '- - 49409' > scan"
3601 * where <n> is a host number. If there are multiple targets in a host then
3602 * the above will associate a W-LUN to each target. To only get a W-LUN
3603 * for target 2, then use "echo '- 2 49409' > scan" .
3604 */
3605static int resp_report_luns(struct scsi_cmnd *scp,
3606 struct sdebug_dev_info *devip)
3607{
3608 unsigned char *cmd = scp->cmnd;
3609 unsigned int alloc_len;
3610 unsigned char select_report;
3611 u64 lun;
3612 struct scsi_lun *lun_p;
3613 u8 arr[RL_BUCKET_ELEMS * sizeof(struct scsi_lun)];
3614 unsigned int lun_cnt; /* normal LUN count (max: 256) */
3615 unsigned int wlun_cnt; /* report luns W-LUN count */
3616 unsigned int tlun_cnt; /* total LUN count */
3617 unsigned int rlen; /* response length (in bytes) */
3618 int k, j, n, res;
3619 unsigned int off_rsp = 0;
3620 const int sz_lun = sizeof(struct scsi_lun);
3621
3622 clear_luns_changed_on_target(devip);
3623
3624 select_report = cmd[2];
3625 alloc_len = get_unaligned_be32(cmd + 6);
3626
3627 if (alloc_len < 4) {
3628 pr_err("alloc len too small %d\n", alloc_len);
3629 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 6, -1);
3630 return check_condition_result;
3631 }
3632
3633 switch (select_report) {
3634 case 0: /* all LUNs apart from W-LUNs */
3635 lun_cnt = sdebug_max_luns;
3636 wlun_cnt = 0;
3637 break;
3638 case 1: /* only W-LUNs */
3639 lun_cnt = 0;
3640 wlun_cnt = 1;
3641 break;
3642 case 2: /* all LUNs */
3643 lun_cnt = sdebug_max_luns;
3644 wlun_cnt = 1;
3645 break;
3646 case 0x10: /* only administrative LUs */
3647 case 0x11: /* see SPC-5 */
3648 case 0x12: /* only subsiduary LUs owned by referenced LU */
3649 default:
3650 pr_debug("select report invalid %d\n", select_report);
3651 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 2, -1);
3652 return check_condition_result;
3653 }
3654
3655 if (sdebug_no_lun_0 && (lun_cnt > 0))
3656 --lun_cnt;
3657
3658 tlun_cnt = lun_cnt + wlun_cnt;
3659 rlen = tlun_cnt * sz_lun; /* excluding 8 byte header */
3660 scsi_set_resid(scp, scsi_bufflen(scp));
3661 pr_debug("select_report %d luns = %d wluns = %d no_lun0 %d\n",
3662 select_report, lun_cnt, wlun_cnt, sdebug_no_lun_0);
3663
3664 /* loops rely on sizeof response header same as sizeof lun (both 8) */
3665 lun = sdebug_no_lun_0 ? 1 : 0;
3666 for (k = 0, j = 0, res = 0; true; ++k, j = 0) {
3667 memset(arr, 0, sizeof(arr));
3668 lun_p = (struct scsi_lun *)&arr[0];
3669 if (k == 0) {
3670 put_unaligned_be32(rlen, &arr[0]);
3671 ++lun_p;
3672 j = 1;
3673 }
3674 for ( ; j < RL_BUCKET_ELEMS; ++j, ++lun_p) {
3675 if ((k * RL_BUCKET_ELEMS) + j > lun_cnt)
3676 break;
3677 int_to_scsilun(lun++, lun_p);
3678 }
3679 if (j < RL_BUCKET_ELEMS)
3680 break;
3681 n = j * sz_lun;
3682 res = p_fill_from_dev_buffer(scp, arr, n, off_rsp);
3683 if (res)
3684 return res;
3685 off_rsp += n;
3686 }
3687 if (wlun_cnt) {
3688 int_to_scsilun(SCSI_W_LUN_REPORT_LUNS, lun_p);
3689 ++j;
3690 }
3691 if (j > 0)
3692 res = p_fill_from_dev_buffer(scp, arr, j * sz_lun, off_rsp);
3693 return res;
3694}
3695
3696static struct sdebug_queue *get_queue(struct scsi_cmnd *cmnd)
3697{
3698 u32 tag = blk_mq_unique_tag(cmnd->request);
3699 u16 hwq = blk_mq_unique_tag_to_hwq(tag);
3700
3701 pr_debug("tag=%#x, hwq=%d\n", tag, hwq);
3702 if (WARN_ON_ONCE(hwq >= submit_queues))
3703 hwq = 0;
3704 return sdebug_q_arr + hwq;
3705}
3706
3707/* Queued (deferred) command completions converge here. */
3708static void sdebug_q_cmd_complete(struct sdebug_defer *sd_dp)
3709{
3710 bool aborted = sd_dp->aborted;
3711 int qc_idx;
3712 int retiring = 0;
3713 unsigned long iflags;
3714 struct sdebug_queue *sqp;
3715 struct sdebug_queued_cmd *sqcp;
3716 struct scsi_cmnd *scp;
3717 struct sdebug_dev_info *devip;
3718
3719 sd_dp->defer_t = SDEB_DEFER_NONE;
3720 if (unlikely(aborted))
3721 sd_dp->aborted = false;
3722 qc_idx = sd_dp->qc_idx;
3723 sqp = sdebug_q_arr + sd_dp->sqa_idx;
3724 if (sdebug_statistics) {
3725 atomic_inc(&sdebug_completions);
3726 if (raw_smp_processor_id() != sd_dp->issuing_cpu)
3727 atomic_inc(&sdebug_miss_cpus);
3728 }
3729 if (unlikely((qc_idx < 0) || (qc_idx >= SDEBUG_CANQUEUE))) {
3730 pr_err("wild qc_idx=%d\n", qc_idx);
3731 return;
3732 }
3733 spin_lock_irqsave(&sqp->qc_lock, iflags);
3734 sqcp = &sqp->qc_arr[qc_idx];
3735 scp = sqcp->a_cmnd;
3736 if (unlikely(scp == NULL)) {
3737 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3738 pr_err("scp is NULL, sqa_idx=%d, qc_idx=%d\n",
3739 sd_dp->sqa_idx, qc_idx);
3740 return;
3741 }
3742 devip = (struct sdebug_dev_info *)scp->device->hostdata;
3743 if (likely(devip))
3744 atomic_dec(&devip->num_in_q);
3745 else
3746 pr_err("devip=NULL\n");
3747 if (unlikely(atomic_read(&retired_max_queue) > 0))
3748 retiring = 1;
3749
3750 sqcp->a_cmnd = NULL;
3751 if (unlikely(!test_and_clear_bit(qc_idx, sqp->in_use_bm))) {
3752 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3753 pr_err("Unexpected completion\n");
3754 return;
3755 }
3756
3757 if (unlikely(retiring)) { /* user has reduced max_queue */
3758 int k, retval;
3759
3760 retval = atomic_read(&retired_max_queue);
3761 if (qc_idx >= retval) {
3762 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3763 pr_err("index %d too large\n", retval);
3764 return;
3765 }
3766 k = find_last_bit(sqp->in_use_bm, retval);
3767 if ((k < sdebug_max_queue) || (k == retval))
3768 atomic_set(&retired_max_queue, 0);
3769 else
3770 atomic_set(&retired_max_queue, k + 1);
3771 }
3772 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3773 if (unlikely(aborted)) {
3774 if (sdebug_verbose)
3775 pr_info("bypassing scsi_done() due to aborted cmd\n");
3776 return;
3777 }
3778 scp->scsi_done(scp); /* callback to mid level */
3779}
3780
3781/* When high resolution timer goes off this function is called. */
3782static enum hrtimer_restart sdebug_q_cmd_hrt_complete(struct hrtimer *timer)
3783{
3784 struct sdebug_defer *sd_dp = container_of(timer, struct sdebug_defer,
3785 hrt);
3786 sdebug_q_cmd_complete(sd_dp);
3787 return HRTIMER_NORESTART;
3788}
3789
3790/* When work queue schedules work, it calls this function. */
3791static void sdebug_q_cmd_wq_complete(struct work_struct *work)
3792{
3793 struct sdebug_defer *sd_dp = container_of(work, struct sdebug_defer,
3794 ew.work);
3795 sdebug_q_cmd_complete(sd_dp);
3796}
3797
3798static bool got_shared_uuid;
3799static uuid_t shared_uuid;
3800
3801static struct sdebug_dev_info *sdebug_device_create(
3802 struct sdebug_host_info *sdbg_host, gfp_t flags)
3803{
3804 struct sdebug_dev_info *devip;
3805
3806 devip = kzalloc(sizeof(*devip), flags);
3807 if (devip) {
3808 if (sdebug_uuid_ctl == 1)
3809 uuid_gen(&devip->lu_name);
3810 else if (sdebug_uuid_ctl == 2) {
3811 if (got_shared_uuid)
3812 devip->lu_name = shared_uuid;
3813 else {
3814 uuid_gen(&shared_uuid);
3815 got_shared_uuid = true;
3816 devip->lu_name = shared_uuid;
3817 }
3818 }
3819 devip->sdbg_host = sdbg_host;
3820 list_add_tail(&devip->dev_list, &sdbg_host->dev_info_list);
3821 }
3822 return devip;
3823}
3824
3825static struct sdebug_dev_info *find_build_dev_info(struct scsi_device *sdev)
3826{
3827 struct sdebug_host_info *sdbg_host;
3828 struct sdebug_dev_info *open_devip = NULL;
3829 struct sdebug_dev_info *devip;
3830
3831 sdbg_host = *(struct sdebug_host_info **)shost_priv(sdev->host);
3832 if (!sdbg_host) {
3833 pr_err("Host info NULL\n");
3834 return NULL;
3835 }
3836 list_for_each_entry(devip, &sdbg_host->dev_info_list, dev_list) {
3837 if ((devip->used) && (devip->channel == sdev->channel) &&
3838 (devip->target == sdev->id) &&
3839 (devip->lun == sdev->lun))
3840 return devip;
3841 else {
3842 if ((!devip->used) && (!open_devip))
3843 open_devip = devip;
3844 }
3845 }
3846 if (!open_devip) { /* try and make a new one */
3847 open_devip = sdebug_device_create(sdbg_host, GFP_ATOMIC);
3848 if (!open_devip) {
3849 pr_err("out of memory at line %d\n", __LINE__);
3850 return NULL;
3851 }
3852 }
3853
3854 open_devip->channel = sdev->channel;
3855 open_devip->target = sdev->id;
3856 open_devip->lun = sdev->lun;
3857 open_devip->sdbg_host = sdbg_host;
3858 atomic_set(&open_devip->num_in_q, 0);
3859 set_bit(SDEBUG_UA_POR, open_devip->uas_bm);
3860 open_devip->used = true;
3861 return open_devip;
3862}
3863
3864static int scsi_debug_slave_alloc(struct scsi_device *sdp)
3865{
3866 if (sdebug_verbose)
3867 pr_info("slave_alloc <%u %u %u %llu>\n",
3868 sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
3869 return 0;
3870}
3871
3872static int scsi_debug_slave_configure(struct scsi_device *sdp)
3873{
3874 struct sdebug_dev_info *devip =
3875 (struct sdebug_dev_info *)sdp->hostdata;
3876
3877 if (sdebug_verbose)
3878 pr_info("slave_configure <%u %u %u %llu>\n",
3879 sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
3880 if (sdp->host->max_cmd_len != SDEBUG_MAX_CMD_LEN)
3881 sdp->host->max_cmd_len = SDEBUG_MAX_CMD_LEN;
3882 if (devip == NULL) {
3883 devip = find_build_dev_info(sdp);
3884 if (devip == NULL)
3885 return 1; /* no resources, will be marked offline */
3886 }
3887 sdp->hostdata = devip;
3888 if (sdebug_no_uld)
3889 sdp->no_uld_attach = 1;
3890 config_cdb_len(sdp);
3891 return 0;
3892}
3893
3894static void scsi_debug_slave_destroy(struct scsi_device *sdp)
3895{
3896 struct sdebug_dev_info *devip =
3897 (struct sdebug_dev_info *)sdp->hostdata;
3898
3899 if (sdebug_verbose)
3900 pr_info("slave_destroy <%u %u %u %llu>\n",
3901 sdp->host->host_no, sdp->channel, sdp->id, sdp->lun);
3902 if (devip) {
3903 /* make this slot available for re-use */
3904 devip->used = false;
3905 sdp->hostdata = NULL;
3906 }
3907}
3908
3909static void stop_qc_helper(struct sdebug_defer *sd_dp,
3910 enum sdeb_defer_type defer_t)
3911{
3912 if (!sd_dp)
3913 return;
3914 if (defer_t == SDEB_DEFER_HRT)
3915 hrtimer_cancel(&sd_dp->hrt);
3916 else if (defer_t == SDEB_DEFER_WQ)
3917 cancel_work_sync(&sd_dp->ew.work);
3918}
3919
3920/* If @cmnd found deletes its timer or work queue and returns true; else
3921 returns false */
3922static bool stop_queued_cmnd(struct scsi_cmnd *cmnd)
3923{
3924 unsigned long iflags;
3925 int j, k, qmax, r_qmax;
3926 enum sdeb_defer_type l_defer_t;
3927 struct sdebug_queue *sqp;
3928 struct sdebug_queued_cmd *sqcp;
3929 struct sdebug_dev_info *devip;
3930 struct sdebug_defer *sd_dp;
3931
3932 for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
3933 spin_lock_irqsave(&sqp->qc_lock, iflags);
3934 qmax = sdebug_max_queue;
3935 r_qmax = atomic_read(&retired_max_queue);
3936 if (r_qmax > qmax)
3937 qmax = r_qmax;
3938 for (k = 0; k < qmax; ++k) {
3939 if (test_bit(k, sqp->in_use_bm)) {
3940 sqcp = &sqp->qc_arr[k];
3941 if (cmnd != sqcp->a_cmnd)
3942 continue;
3943 /* found */
3944 devip = (struct sdebug_dev_info *)
3945 cmnd->device->hostdata;
3946 if (devip)
3947 atomic_dec(&devip->num_in_q);
3948 sqcp->a_cmnd = NULL;
3949 sd_dp = sqcp->sd_dp;
3950 if (sd_dp) {
3951 l_defer_t = sd_dp->defer_t;
3952 sd_dp->defer_t = SDEB_DEFER_NONE;
3953 } else
3954 l_defer_t = SDEB_DEFER_NONE;
3955 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3956 stop_qc_helper(sd_dp, l_defer_t);
3957 clear_bit(k, sqp->in_use_bm);
3958 return true;
3959 }
3960 }
3961 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3962 }
3963 return false;
3964}
3965
3966/* Deletes (stops) timers or work queues of all queued commands */
3967static void stop_all_queued(void)
3968{
3969 unsigned long iflags;
3970 int j, k;
3971 enum sdeb_defer_type l_defer_t;
3972 struct sdebug_queue *sqp;
3973 struct sdebug_queued_cmd *sqcp;
3974 struct sdebug_dev_info *devip;
3975 struct sdebug_defer *sd_dp;
3976
3977 for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
3978 spin_lock_irqsave(&sqp->qc_lock, iflags);
3979 for (k = 0; k < SDEBUG_CANQUEUE; ++k) {
3980 if (test_bit(k, sqp->in_use_bm)) {
3981 sqcp = &sqp->qc_arr[k];
3982 if (sqcp->a_cmnd == NULL)
3983 continue;
3984 devip = (struct sdebug_dev_info *)
3985 sqcp->a_cmnd->device->hostdata;
3986 if (devip)
3987 atomic_dec(&devip->num_in_q);
3988 sqcp->a_cmnd = NULL;
3989 sd_dp = sqcp->sd_dp;
3990 if (sd_dp) {
3991 l_defer_t = sd_dp->defer_t;
3992 sd_dp->defer_t = SDEB_DEFER_NONE;
3993 } else
3994 l_defer_t = SDEB_DEFER_NONE;
3995 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
3996 stop_qc_helper(sd_dp, l_defer_t);
3997 clear_bit(k, sqp->in_use_bm);
3998 spin_lock_irqsave(&sqp->qc_lock, iflags);
3999 }
4000 }
4001 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4002 }
4003}
4004
4005/* Free queued command memory on heap */
4006static void free_all_queued(void)
4007{
4008 int j, k;
4009 struct sdebug_queue *sqp;
4010 struct sdebug_queued_cmd *sqcp;
4011
4012 for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
4013 for (k = 0; k < SDEBUG_CANQUEUE; ++k) {
4014 sqcp = &sqp->qc_arr[k];
4015 kfree(sqcp->sd_dp);
4016 sqcp->sd_dp = NULL;
4017 }
4018 }
4019}
4020
4021static int scsi_debug_abort(struct scsi_cmnd *SCpnt)
4022{
4023 bool ok;
4024
4025 ++num_aborts;
4026 if (SCpnt) {
4027 ok = stop_queued_cmnd(SCpnt);
4028 if (SCpnt->device && (SDEBUG_OPT_ALL_NOISE & sdebug_opts))
4029 sdev_printk(KERN_INFO, SCpnt->device,
4030 "%s: command%s found\n", __func__,
4031 ok ? "" : " not");
4032 }
4033 return SUCCESS;
4034}
4035
4036static int scsi_debug_device_reset(struct scsi_cmnd *SCpnt)
4037{
4038 ++num_dev_resets;
4039 if (SCpnt && SCpnt->device) {
4040 struct scsi_device *sdp = SCpnt->device;
4041 struct sdebug_dev_info *devip =
4042 (struct sdebug_dev_info *)sdp->hostdata;
4043
4044 if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
4045 sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
4046 if (devip)
4047 set_bit(SDEBUG_UA_POR, devip->uas_bm);
4048 }
4049 return SUCCESS;
4050}
4051
4052static int scsi_debug_target_reset(struct scsi_cmnd *SCpnt)
4053{
4054 struct sdebug_host_info *sdbg_host;
4055 struct sdebug_dev_info *devip;
4056 struct scsi_device *sdp;
4057 struct Scsi_Host *hp;
4058 int k = 0;
4059
4060 ++num_target_resets;
4061 if (!SCpnt)
4062 goto lie;
4063 sdp = SCpnt->device;
4064 if (!sdp)
4065 goto lie;
4066 if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
4067 sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
4068 hp = sdp->host;
4069 if (!hp)
4070 goto lie;
4071 sdbg_host = *(struct sdebug_host_info **)shost_priv(hp);
4072 if (sdbg_host) {
4073 list_for_each_entry(devip,
4074 &sdbg_host->dev_info_list,
4075 dev_list)
4076 if (devip->target == sdp->id) {
4077 set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
4078 ++k;
4079 }
4080 }
4081 if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
4082 sdev_printk(KERN_INFO, sdp,
4083 "%s: %d device(s) found in target\n", __func__, k);
4084lie:
4085 return SUCCESS;
4086}
4087
4088static int scsi_debug_bus_reset(struct scsi_cmnd *SCpnt)
4089{
4090 struct sdebug_host_info *sdbg_host;
4091 struct sdebug_dev_info *devip;
4092 struct scsi_device *sdp;
4093 struct Scsi_Host *hp;
4094 int k = 0;
4095
4096 ++num_bus_resets;
4097 if (!(SCpnt && SCpnt->device))
4098 goto lie;
4099 sdp = SCpnt->device;
4100 if (SDEBUG_OPT_ALL_NOISE & sdebug_opts)
4101 sdev_printk(KERN_INFO, sdp, "%s\n", __func__);
4102 hp = sdp->host;
4103 if (hp) {
4104 sdbg_host = *(struct sdebug_host_info **)shost_priv(hp);
4105 if (sdbg_host) {
4106 list_for_each_entry(devip,
4107 &sdbg_host->dev_info_list,
4108 dev_list) {
4109 set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
4110 ++k;
4111 }
4112 }
4113 }
4114 if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
4115 sdev_printk(KERN_INFO, sdp,
4116 "%s: %d device(s) found in host\n", __func__, k);
4117lie:
4118 return SUCCESS;
4119}
4120
4121static int scsi_debug_host_reset(struct scsi_cmnd *SCpnt)
4122{
4123 struct sdebug_host_info *sdbg_host;
4124 struct sdebug_dev_info *devip;
4125 int k = 0;
4126
4127 ++num_host_resets;
4128 if ((SCpnt->device) && (SDEBUG_OPT_ALL_NOISE & sdebug_opts))
4129 sdev_printk(KERN_INFO, SCpnt->device, "%s\n", __func__);
4130 spin_lock(&sdebug_host_list_lock);
4131 list_for_each_entry(sdbg_host, &sdebug_host_list, host_list) {
4132 list_for_each_entry(devip, &sdbg_host->dev_info_list,
4133 dev_list) {
4134 set_bit(SDEBUG_UA_BUS_RESET, devip->uas_bm);
4135 ++k;
4136 }
4137 }
4138 spin_unlock(&sdebug_host_list_lock);
4139 stop_all_queued();
4140 if (SDEBUG_OPT_RESET_NOISE & sdebug_opts)
4141 sdev_printk(KERN_INFO, SCpnt->device,
4142 "%s: %d device(s) found\n", __func__, k);
4143 return SUCCESS;
4144}
4145
4146static void __init sdebug_build_parts(unsigned char *ramp,
4147 unsigned long store_size)
4148{
4149 struct partition *pp;
4150 int starts[SDEBUG_MAX_PARTS + 2];
4151 int sectors_per_part, num_sectors, k;
4152 int heads_by_sects, start_sec, end_sec;
4153
4154 /* assume partition table already zeroed */
4155 if ((sdebug_num_parts < 1) || (store_size < 1048576))
4156 return;
4157 if (sdebug_num_parts > SDEBUG_MAX_PARTS) {
4158 sdebug_num_parts = SDEBUG_MAX_PARTS;
4159 pr_warn("reducing partitions to %d\n", SDEBUG_MAX_PARTS);
4160 }
4161 num_sectors = (int)sdebug_store_sectors;
4162 sectors_per_part = (num_sectors - sdebug_sectors_per)
4163 / sdebug_num_parts;
4164 heads_by_sects = sdebug_heads * sdebug_sectors_per;
4165 starts[0] = sdebug_sectors_per;
4166 for (k = 1; k < sdebug_num_parts; ++k)
4167 starts[k] = ((k * sectors_per_part) / heads_by_sects)
4168 * heads_by_sects;
4169 starts[sdebug_num_parts] = num_sectors;
4170 starts[sdebug_num_parts + 1] = 0;
4171
4172 ramp[510] = 0x55; /* magic partition markings */
4173 ramp[511] = 0xAA;
4174 pp = (struct partition *)(ramp + 0x1be);
4175 for (k = 0; starts[k + 1]; ++k, ++pp) {
4176 start_sec = starts[k];
4177 end_sec = starts[k + 1] - 1;
4178 pp->boot_ind = 0;
4179
4180 pp->cyl = start_sec / heads_by_sects;
4181 pp->head = (start_sec - (pp->cyl * heads_by_sects))
4182 / sdebug_sectors_per;
4183 pp->sector = (start_sec % sdebug_sectors_per) + 1;
4184
4185 pp->end_cyl = end_sec / heads_by_sects;
4186 pp->end_head = (end_sec - (pp->end_cyl * heads_by_sects))
4187 / sdebug_sectors_per;
4188 pp->end_sector = (end_sec % sdebug_sectors_per) + 1;
4189
4190 pp->start_sect = cpu_to_le32(start_sec);
4191 pp->nr_sects = cpu_to_le32(end_sec - start_sec + 1);
4192 pp->sys_ind = 0x83; /* plain Linux partition */
4193 }
4194}
4195
4196static void block_unblock_all_queues(bool block)
4197{
4198 int j;
4199 struct sdebug_queue *sqp;
4200
4201 for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp)
4202 atomic_set(&sqp->blocked, (int)block);
4203}
4204
4205/* Adjust (by rounding down) the sdebug_cmnd_count so abs(every_nth)-1
4206 * commands will be processed normally before triggers occur.
4207 */
4208static void tweak_cmnd_count(void)
4209{
4210 int count, modulo;
4211
4212 modulo = abs(sdebug_every_nth);
4213 if (modulo < 2)
4214 return;
4215 block_unblock_all_queues(true);
4216 count = atomic_read(&sdebug_cmnd_count);
4217 atomic_set(&sdebug_cmnd_count, (count / modulo) * modulo);
4218 block_unblock_all_queues(false);
4219}
4220
4221static void clear_queue_stats(void)
4222{
4223 atomic_set(&sdebug_cmnd_count, 0);
4224 atomic_set(&sdebug_completions, 0);
4225 atomic_set(&sdebug_miss_cpus, 0);
4226 atomic_set(&sdebug_a_tsf, 0);
4227}
4228
4229static void setup_inject(struct sdebug_queue *sqp,
4230 struct sdebug_queued_cmd *sqcp)
4231{
4232 if ((atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth)) > 0) {
4233 if (sdebug_every_nth > 0)
4234 sqcp->inj_recovered = sqcp->inj_transport
4235 = sqcp->inj_dif
4236 = sqcp->inj_dix = sqcp->inj_short
4237 = sqcp->inj_host_busy = sqcp->inj_cmd_abort = 0;
4238 return;
4239 }
4240 sqcp->inj_recovered = !!(SDEBUG_OPT_RECOVERED_ERR & sdebug_opts);
4241 sqcp->inj_transport = !!(SDEBUG_OPT_TRANSPORT_ERR & sdebug_opts);
4242 sqcp->inj_dif = !!(SDEBUG_OPT_DIF_ERR & sdebug_opts);
4243 sqcp->inj_dix = !!(SDEBUG_OPT_DIX_ERR & sdebug_opts);
4244 sqcp->inj_short = !!(SDEBUG_OPT_SHORT_TRANSFER & sdebug_opts);
4245 sqcp->inj_host_busy = !!(SDEBUG_OPT_HOST_BUSY & sdebug_opts);
4246 sqcp->inj_cmd_abort = !!(SDEBUG_OPT_CMD_ABORT & sdebug_opts);
4247}
4248
4249/* Complete the processing of the thread that queued a SCSI command to this
4250 * driver. It either completes the command by calling cmnd_done() or
4251 * schedules a hr timer or work queue then returns 0. Returns
4252 * SCSI_MLQUEUE_HOST_BUSY if temporarily out of resources.
4253 */
4254static int schedule_resp(struct scsi_cmnd *cmnd, struct sdebug_dev_info *devip,
4255 int scsi_result,
4256 int (*pfp)(struct scsi_cmnd *,
4257 struct sdebug_dev_info *),
4258 int delta_jiff, int ndelay)
4259{
4260 unsigned long iflags;
4261 int k, num_in_q, qdepth, inject;
4262 struct sdebug_queue *sqp;
4263 struct sdebug_queued_cmd *sqcp;
4264 struct scsi_device *sdp;
4265 struct sdebug_defer *sd_dp;
4266
4267 if (unlikely(devip == NULL)) {
4268 if (scsi_result == 0)
4269 scsi_result = DID_NO_CONNECT << 16;
4270 goto respond_in_thread;
4271 }
4272 sdp = cmnd->device;
4273
4274 if (delta_jiff == 0)
4275 goto respond_in_thread;
4276
4277 /* schedule the response at a later time if resources permit */
4278 sqp = get_queue(cmnd);
4279 spin_lock_irqsave(&sqp->qc_lock, iflags);
4280 if (unlikely(atomic_read(&sqp->blocked))) {
4281 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4282 return SCSI_MLQUEUE_HOST_BUSY;
4283 }
4284 num_in_q = atomic_read(&devip->num_in_q);
4285 qdepth = cmnd->device->queue_depth;
4286 inject = 0;
4287 if (unlikely((qdepth > 0) && (num_in_q >= qdepth))) {
4288 if (scsi_result) {
4289 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4290 goto respond_in_thread;
4291 } else
4292 scsi_result = device_qfull_result;
4293 } else if (unlikely(sdebug_every_nth &&
4294 (SDEBUG_OPT_RARE_TSF & sdebug_opts) &&
4295 (scsi_result == 0))) {
4296 if ((num_in_q == (qdepth - 1)) &&
4297 (atomic_inc_return(&sdebug_a_tsf) >=
4298 abs(sdebug_every_nth))) {
4299 atomic_set(&sdebug_a_tsf, 0);
4300 inject = 1;
4301 scsi_result = device_qfull_result;
4302 }
4303 }
4304
4305 k = find_first_zero_bit(sqp->in_use_bm, sdebug_max_queue);
4306 if (unlikely(k >= sdebug_max_queue)) {
4307 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4308 if (scsi_result)
4309 goto respond_in_thread;
4310 else if (SDEBUG_OPT_ALL_TSF & sdebug_opts)
4311 scsi_result = device_qfull_result;
4312 if (SDEBUG_OPT_Q_NOISE & sdebug_opts)
4313 sdev_printk(KERN_INFO, sdp,
4314 "%s: max_queue=%d exceeded, %s\n",
4315 __func__, sdebug_max_queue,
4316 (scsi_result ? "status: TASK SET FULL" :
4317 "report: host busy"));
4318 if (scsi_result)
4319 goto respond_in_thread;
4320 else
4321 return SCSI_MLQUEUE_HOST_BUSY;
4322 }
4323 __set_bit(k, sqp->in_use_bm);
4324 atomic_inc(&devip->num_in_q);
4325 sqcp = &sqp->qc_arr[k];
4326 sqcp->a_cmnd = cmnd;
4327 cmnd->host_scribble = (unsigned char *)sqcp;
4328 sd_dp = sqcp->sd_dp;
4329 spin_unlock_irqrestore(&sqp->qc_lock, iflags);
4330 if (unlikely(sdebug_every_nth && sdebug_any_injecting_opt))
4331 setup_inject(sqp, sqcp);
4332 if (sd_dp == NULL) {
4333 sd_dp = kzalloc(sizeof(*sd_dp), GFP_ATOMIC);
4334 if (sd_dp == NULL)
4335 return SCSI_MLQUEUE_HOST_BUSY;
4336 }
4337
4338 cmnd->result = pfp != NULL ? pfp(cmnd, devip) : 0;
4339 if (cmnd->result & SDEG_RES_IMMED_MASK) {
4340 /*
4341 * This is the F_DELAY_OVERR case. No delay.
4342 */
4343 cmnd->result &= ~SDEG_RES_IMMED_MASK;
4344 delta_jiff = ndelay = 0;
4345 }
4346 if (cmnd->result == 0 && scsi_result != 0)
4347 cmnd->result = scsi_result;
4348
4349 if (unlikely(sdebug_verbose && cmnd->result))
4350 sdev_printk(KERN_INFO, sdp, "%s: non-zero result=0x%x\n",
4351 __func__, cmnd->result);
4352
4353 if (delta_jiff > 0 || ndelay > 0) {
4354 ktime_t kt;
4355
4356 if (delta_jiff > 0) {
4357 kt = ns_to_ktime((u64)delta_jiff * (NSEC_PER_SEC / HZ));
4358 } else
4359 kt = ndelay;
4360 if (!sd_dp->init_hrt) {
4361 sd_dp->init_hrt = true;
4362 sqcp->sd_dp = sd_dp;
4363 hrtimer_init(&sd_dp->hrt, CLOCK_MONOTONIC,
4364 HRTIMER_MODE_REL_PINNED);
4365 sd_dp->hrt.function = sdebug_q_cmd_hrt_complete;
4366 sd_dp->sqa_idx = sqp - sdebug_q_arr;
4367 sd_dp->qc_idx = k;
4368 }
4369 if (sdebug_statistics)
4370 sd_dp->issuing_cpu = raw_smp_processor_id();
4371 sd_dp->defer_t = SDEB_DEFER_HRT;
4372 hrtimer_start(&sd_dp->hrt, kt, HRTIMER_MODE_REL_PINNED);
4373 } else { /* jdelay < 0, use work queue */
4374 if (!sd_dp->init_wq) {
4375 sd_dp->init_wq = true;
4376 sqcp->sd_dp = sd_dp;
4377 sd_dp->sqa_idx = sqp - sdebug_q_arr;
4378 sd_dp->qc_idx = k;
4379 INIT_WORK(&sd_dp->ew.work, sdebug_q_cmd_wq_complete);
4380 }
4381 if (sdebug_statistics)
4382 sd_dp->issuing_cpu = raw_smp_processor_id();
4383 sd_dp->defer_t = SDEB_DEFER_WQ;
4384 if (unlikely(sqcp->inj_cmd_abort))
4385 sd_dp->aborted = true;
4386 schedule_work(&sd_dp->ew.work);
4387 if (unlikely(sqcp->inj_cmd_abort)) {
4388 sdev_printk(KERN_INFO, sdp, "abort request tag %d\n",
4389 cmnd->request->tag);
4390 blk_abort_request(cmnd->request);
4391 }
4392 }
4393 if (unlikely((SDEBUG_OPT_Q_NOISE & sdebug_opts) &&
4394 (scsi_result == device_qfull_result)))
4395 sdev_printk(KERN_INFO, sdp,
4396 "%s: num_in_q=%d +1, %s%s\n", __func__,
4397 num_in_q, (inject ? "<inject> " : ""),
4398 "status: TASK SET FULL");
4399 return 0;
4400
4401respond_in_thread: /* call back to mid-layer using invocation thread */
4402 cmnd->result = pfp != NULL ? pfp(cmnd, devip) : 0;
4403 cmnd->result &= ~SDEG_RES_IMMED_MASK;
4404 if (cmnd->result == 0 && scsi_result != 0)
4405 cmnd->result = scsi_result;
4406 cmnd->scsi_done(cmnd);
4407 return 0;
4408}
4409
4410/* Note: The following macros create attribute files in the
4411 /sys/module/scsi_debug/parameters directory. Unfortunately this
4412 driver is unaware of a change and cannot trigger auxiliary actions
4413 as it can when the corresponding attribute in the
4414 /sys/bus/pseudo/drivers/scsi_debug directory is changed.
4415 */
4416module_param_named(add_host, sdebug_add_host, int, S_IRUGO | S_IWUSR);
4417module_param_named(ato, sdebug_ato, int, S_IRUGO);
4418module_param_named(cdb_len, sdebug_cdb_len, int, 0644);
4419module_param_named(clustering, sdebug_clustering, bool, S_IRUGO | S_IWUSR);
4420module_param_named(delay, sdebug_jdelay, int, S_IRUGO | S_IWUSR);
4421module_param_named(dev_size_mb, sdebug_dev_size_mb, int, S_IRUGO);
4422module_param_named(dif, sdebug_dif, int, S_IRUGO);
4423module_param_named(dix, sdebug_dix, int, S_IRUGO);
4424module_param_named(dsense, sdebug_dsense, int, S_IRUGO | S_IWUSR);
4425module_param_named(every_nth, sdebug_every_nth, int, S_IRUGO | S_IWUSR);
4426module_param_named(fake_rw, sdebug_fake_rw, int, S_IRUGO | S_IWUSR);
4427module_param_named(guard, sdebug_guard, uint, S_IRUGO);
4428module_param_named(host_lock, sdebug_host_lock, bool, S_IRUGO | S_IWUSR);
4429module_param_string(inq_vendor, sdebug_inq_vendor_id,
4430 sizeof(sdebug_inq_vendor_id), S_IRUGO|S_IWUSR);
4431module_param_string(inq_product, sdebug_inq_product_id,
4432 sizeof(sdebug_inq_product_id), S_IRUGO|S_IWUSR);
4433module_param_string(inq_rev, sdebug_inq_product_rev,
4434 sizeof(sdebug_inq_product_rev), S_IRUGO|S_IWUSR);
4435module_param_named(lbpu, sdebug_lbpu, int, S_IRUGO);
4436module_param_named(lbpws, sdebug_lbpws, int, S_IRUGO);
4437module_param_named(lbpws10, sdebug_lbpws10, int, S_IRUGO);
4438module_param_named(lbprz, sdebug_lbprz, int, S_IRUGO);
4439module_param_named(lowest_aligned, sdebug_lowest_aligned, int, S_IRUGO);
4440module_param_named(max_luns, sdebug_max_luns, int, S_IRUGO | S_IWUSR);
4441module_param_named(max_queue, sdebug_max_queue, int, S_IRUGO | S_IWUSR);
4442module_param_named(medium_error_start, sdebug_medium_error_start, int, S_IRUGO | S_IWUSR);
4443module_param_named(medium_error_count, sdebug_medium_error_count, int, S_IRUGO | S_IWUSR);
4444module_param_named(ndelay, sdebug_ndelay, int, S_IRUGO | S_IWUSR);
4445module_param_named(no_lun_0, sdebug_no_lun_0, int, S_IRUGO | S_IWUSR);
4446module_param_named(no_uld, sdebug_no_uld, int, S_IRUGO);
4447module_param_named(num_parts, sdebug_num_parts, int, S_IRUGO);
4448module_param_named(num_tgts, sdebug_num_tgts, int, S_IRUGO | S_IWUSR);
4449module_param_named(opt_blks, sdebug_opt_blks, int, S_IRUGO);
4450module_param_named(opts, sdebug_opts, int, S_IRUGO | S_IWUSR);
4451module_param_named(physblk_exp, sdebug_physblk_exp, int, S_IRUGO);
4452module_param_named(opt_xferlen_exp, sdebug_opt_xferlen_exp, int, S_IRUGO);
4453module_param_named(ptype, sdebug_ptype, int, S_IRUGO | S_IWUSR);
4454module_param_named(removable, sdebug_removable, bool, S_IRUGO | S_IWUSR);
4455module_param_named(scsi_level, sdebug_scsi_level, int, S_IRUGO);
4456module_param_named(sector_size, sdebug_sector_size, int, S_IRUGO);
4457module_param_named(statistics, sdebug_statistics, bool, S_IRUGO | S_IWUSR);
4458module_param_named(strict, sdebug_strict, bool, S_IRUGO | S_IWUSR);
4459module_param_named(submit_queues, submit_queues, int, S_IRUGO);
4460module_param_named(unmap_alignment, sdebug_unmap_alignment, int, S_IRUGO);
4461module_param_named(unmap_granularity, sdebug_unmap_granularity, int, S_IRUGO);
4462module_param_named(unmap_max_blocks, sdebug_unmap_max_blocks, int, S_IRUGO);
4463module_param_named(unmap_max_desc, sdebug_unmap_max_desc, int, S_IRUGO);
4464module_param_named(virtual_gb, sdebug_virtual_gb, int, S_IRUGO | S_IWUSR);
4465module_param_named(uuid_ctl, sdebug_uuid_ctl, int, S_IRUGO);
4466module_param_named(vpd_use_hostno, sdebug_vpd_use_hostno, int,
4467 S_IRUGO | S_IWUSR);
4468module_param_named(wp, sdebug_wp, bool, S_IRUGO | S_IWUSR);
4469module_param_named(write_same_length, sdebug_write_same_length, int,
4470 S_IRUGO | S_IWUSR);
4471
4472MODULE_AUTHOR("Eric Youngdale + Douglas Gilbert");
4473MODULE_DESCRIPTION("SCSI debug adapter driver");
4474MODULE_LICENSE("GPL");
4475MODULE_VERSION(SDEBUG_VERSION);
4476
4477MODULE_PARM_DESC(add_host, "0..127 hosts allowed(def=1)");
4478MODULE_PARM_DESC(ato, "application tag ownership: 0=disk 1=host (def=1)");
4479MODULE_PARM_DESC(cdb_len, "suggest CDB lengths to drivers (def=10)");
4480MODULE_PARM_DESC(clustering, "when set enables larger transfers (def=0)");
4481MODULE_PARM_DESC(delay, "response delay (def=1 jiffy); 0:imm, -1,-2:tiny");
4482MODULE_PARM_DESC(dev_size_mb, "size in MiB of ram shared by devs(def=8)");
4483MODULE_PARM_DESC(dif, "data integrity field type: 0-3 (def=0)");
4484MODULE_PARM_DESC(dix, "data integrity extensions mask (def=0)");
4485MODULE_PARM_DESC(dsense, "use descriptor sense format(def=0 -> fixed)");
4486MODULE_PARM_DESC(every_nth, "timeout every nth command(def=0)");
4487MODULE_PARM_DESC(fake_rw, "fake reads/writes instead of copying (def=0)");
4488MODULE_PARM_DESC(guard, "protection checksum: 0=crc, 1=ip (def=0)");
4489MODULE_PARM_DESC(host_lock, "host_lock is ignored (def=0)");
4490MODULE_PARM_DESC(inq_vendor, "SCSI INQUIRY vendor string (def=\"Linux\")");
4491MODULE_PARM_DESC(inq_product, "SCSI INQUIRY product string (def=\"scsi_debug\")");
4492MODULE_PARM_DESC(inq_rev, "SCSI INQUIRY revision string (def=\""
4493 SDEBUG_VERSION "\")");
4494MODULE_PARM_DESC(lbpu, "enable LBP, support UNMAP command (def=0)");
4495MODULE_PARM_DESC(lbpws, "enable LBP, support WRITE SAME(16) with UNMAP bit (def=0)");
4496MODULE_PARM_DESC(lbpws10, "enable LBP, support WRITE SAME(10) with UNMAP bit (def=0)");
4497MODULE_PARM_DESC(lbprz,
4498 "on read unmapped LBs return 0 when 1 (def), return 0xff when 2");
4499MODULE_PARM_DESC(lowest_aligned, "lowest aligned lba (def=0)");
4500MODULE_PARM_DESC(max_luns, "number of LUNs per target to simulate(def=1)");
4501MODULE_PARM_DESC(max_queue, "max number of queued commands (1 to max(def))");
4502MODULE_PARM_DESC(medium_error_start, "starting sector number to return MEDIUM error");
4503MODULE_PARM_DESC(medium_error_count, "count of sectors to return follow on MEDIUM error");
4504MODULE_PARM_DESC(ndelay, "response delay in nanoseconds (def=0 -> ignore)");
4505MODULE_PARM_DESC(no_lun_0, "no LU number 0 (def=0 -> have lun 0)");
4506MODULE_PARM_DESC(no_uld, "stop ULD (e.g. sd driver) attaching (def=0))");
4507MODULE_PARM_DESC(num_parts, "number of partitions(def=0)");
4508MODULE_PARM_DESC(num_tgts, "number of targets per host to simulate(def=1)");
4509MODULE_PARM_DESC(opt_blks, "optimal transfer length in blocks (def=1024)");
4510MODULE_PARM_DESC(opts, "1->noise, 2->medium_err, 4->timeout, 8->recovered_err... (def=0)");
4511MODULE_PARM_DESC(physblk_exp, "physical block exponent (def=0)");
4512MODULE_PARM_DESC(opt_xferlen_exp, "optimal transfer length granularity exponent (def=physblk_exp)");
4513MODULE_PARM_DESC(ptype, "SCSI peripheral type(def=0[disk])");
4514MODULE_PARM_DESC(removable, "claim to have removable media (def=0)");
4515MODULE_PARM_DESC(scsi_level, "SCSI level to simulate(def=7[SPC-5])");
4516MODULE_PARM_DESC(sector_size, "logical block size in bytes (def=512)");
4517MODULE_PARM_DESC(statistics, "collect statistics on commands, queues (def=0)");
4518MODULE_PARM_DESC(strict, "stricter checks: reserved field in cdb (def=0)");
4519MODULE_PARM_DESC(submit_queues, "support for block multi-queue (def=1)");
4520MODULE_PARM_DESC(unmap_alignment, "lowest aligned thin provisioning lba (def=0)");
4521MODULE_PARM_DESC(unmap_granularity, "thin provisioning granularity in blocks (def=1)");
4522MODULE_PARM_DESC(unmap_max_blocks, "max # of blocks can be unmapped in one cmd (def=0xffffffff)");
4523MODULE_PARM_DESC(unmap_max_desc, "max # of ranges that can be unmapped in one cmd (def=256)");
4524MODULE_PARM_DESC(uuid_ctl,
4525 "1->use uuid for lu name, 0->don't, 2->all use same (def=0)");
4526MODULE_PARM_DESC(virtual_gb, "virtual gigabyte (GiB) size (def=0 -> use dev_size_mb)");
4527MODULE_PARM_DESC(vpd_use_hostno, "0 -> dev ids ignore hostno (def=1 -> unique dev ids)");
4528MODULE_PARM_DESC(wp, "Write Protect (def=0)");
4529MODULE_PARM_DESC(write_same_length, "Maximum blocks per WRITE SAME cmd (def=0xffff)");
4530
4531#define SDEBUG_INFO_LEN 256
4532static char sdebug_info[SDEBUG_INFO_LEN];
4533
4534static const char *scsi_debug_info(struct Scsi_Host *shp)
4535{
4536 int k;
4537
4538 k = scnprintf(sdebug_info, SDEBUG_INFO_LEN, "%s: version %s [%s]\n",
4539 my_name, SDEBUG_VERSION, sdebug_version_date);
4540 if (k >= (SDEBUG_INFO_LEN - 1))
4541 return sdebug_info;
4542 scnprintf(sdebug_info + k, SDEBUG_INFO_LEN - k,
4543 " dev_size_mb=%d, opts=0x%x, submit_queues=%d, %s=%d",
4544 sdebug_dev_size_mb, sdebug_opts, submit_queues,
4545 "statistics", (int)sdebug_statistics);
4546 return sdebug_info;
4547}
4548
4549/* 'echo <val> > /proc/scsi/scsi_debug/<host_id>' writes to opts */
4550static int scsi_debug_write_info(struct Scsi_Host *host, char *buffer,
4551 int length)
4552{
4553 char arr[16];
4554 int opts;
4555 int minLen = length > 15 ? 15 : length;
4556
4557 if (!capable(CAP_SYS_ADMIN) || !capable(CAP_SYS_RAWIO))
4558 return -EACCES;
4559 memcpy(arr, buffer, minLen);
4560 arr[minLen] = '\0';
4561 if (1 != sscanf(arr, "%d", &opts))
4562 return -EINVAL;
4563 sdebug_opts = opts;
4564 sdebug_verbose = !!(SDEBUG_OPT_NOISE & opts);
4565 sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & opts);
4566 if (sdebug_every_nth != 0)
4567 tweak_cmnd_count();
4568 return length;
4569}
4570
4571/* Output seen with 'cat /proc/scsi/scsi_debug/<host_id>'. It will be the
4572 * same for each scsi_debug host (if more than one). Some of the counters
4573 * output are not atomics so might be inaccurate in a busy system. */
4574static int scsi_debug_show_info(struct seq_file *m, struct Scsi_Host *host)
4575{
4576 int f, j, l;
4577 struct sdebug_queue *sqp;
4578
4579 seq_printf(m, "scsi_debug adapter driver, version %s [%s]\n",
4580 SDEBUG_VERSION, sdebug_version_date);
4581 seq_printf(m, "num_tgts=%d, %ssize=%d MB, opts=0x%x, every_nth=%d\n",
4582 sdebug_num_tgts, "shared (ram) ", sdebug_dev_size_mb,
4583 sdebug_opts, sdebug_every_nth);
4584 seq_printf(m, "delay=%d, ndelay=%d, max_luns=%d, sector_size=%d %s\n",
4585 sdebug_jdelay, sdebug_ndelay, sdebug_max_luns,
4586 sdebug_sector_size, "bytes");
4587 seq_printf(m, "cylinders=%d, heads=%d, sectors=%d, command aborts=%d\n",
4588 sdebug_cylinders_per, sdebug_heads, sdebug_sectors_per,
4589 num_aborts);
4590 seq_printf(m, "RESETs: device=%d, target=%d, bus=%d, host=%d\n",
4591 num_dev_resets, num_target_resets, num_bus_resets,
4592 num_host_resets);
4593 seq_printf(m, "dix_reads=%d, dix_writes=%d, dif_errors=%d\n",
4594 dix_reads, dix_writes, dif_errors);
4595 seq_printf(m, "usec_in_jiffy=%lu, statistics=%d\n", TICK_NSEC / 1000,
4596 sdebug_statistics);
4597 seq_printf(m, "cmnd_count=%d, completions=%d, %s=%d, a_tsf=%d\n",
4598 atomic_read(&sdebug_cmnd_count),
4599 atomic_read(&sdebug_completions),
4600 "miss_cpus", atomic_read(&sdebug_miss_cpus),
4601 atomic_read(&sdebug_a_tsf));
4602
4603 seq_printf(m, "submit_queues=%d\n", submit_queues);
4604 for (j = 0, sqp = sdebug_q_arr; j < submit_queues; ++j, ++sqp) {
4605 seq_printf(m, " queue %d:\n", j);
4606 f = find_first_bit(sqp->in_use_bm, sdebug_max_queue);
4607 if (f != sdebug_max_queue) {
4608 l = find_last_bit(sqp->in_use_bm, sdebug_max_queue);
4609 seq_printf(m, " in_use_bm BUSY: %s: %d,%d\n",
4610 "first,last bits", f, l);
4611 }
4612 }
4613 return 0;
4614}
4615
4616static ssize_t delay_show(struct device_driver *ddp, char *buf)
4617{
4618 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_jdelay);
4619}
4620/* Returns -EBUSY if jdelay is being changed and commands are queued. The unit
4621 * of delay is jiffies.
4622 */
4623static ssize_t delay_store(struct device_driver *ddp, const char *buf,
4624 size_t count)
4625{
4626 int jdelay, res;
4627
4628 if (count > 0 && sscanf(buf, "%d", &jdelay) == 1) {
4629 res = count;
4630 if (sdebug_jdelay != jdelay) {
4631 int j, k;
4632 struct sdebug_queue *sqp;
4633
4634 block_unblock_all_queues(true);
4635 for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
4636 ++j, ++sqp) {
4637 k = find_first_bit(sqp->in_use_bm,
4638 sdebug_max_queue);
4639 if (k != sdebug_max_queue) {
4640 res = -EBUSY; /* queued commands */
4641 break;
4642 }
4643 }
4644 if (res > 0) {
4645 sdebug_jdelay = jdelay;
4646 sdebug_ndelay = 0;
4647 }
4648 block_unblock_all_queues(false);
4649 }
4650 return res;
4651 }
4652 return -EINVAL;
4653}
4654static DRIVER_ATTR_RW(delay);
4655
4656static ssize_t ndelay_show(struct device_driver *ddp, char *buf)
4657{
4658 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ndelay);
4659}
4660/* Returns -EBUSY if ndelay is being changed and commands are queued */
4661/* If > 0 and accepted then sdebug_jdelay is set to JDELAY_OVERRIDDEN */
4662static ssize_t ndelay_store(struct device_driver *ddp, const char *buf,
4663 size_t count)
4664{
4665 int ndelay, res;
4666
4667 if ((count > 0) && (1 == sscanf(buf, "%d", &ndelay)) &&
4668 (ndelay >= 0) && (ndelay < (1000 * 1000 * 1000))) {
4669 res = count;
4670 if (sdebug_ndelay != ndelay) {
4671 int j, k;
4672 struct sdebug_queue *sqp;
4673
4674 block_unblock_all_queues(true);
4675 for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
4676 ++j, ++sqp) {
4677 k = find_first_bit(sqp->in_use_bm,
4678 sdebug_max_queue);
4679 if (k != sdebug_max_queue) {
4680 res = -EBUSY; /* queued commands */
4681 break;
4682 }
4683 }
4684 if (res > 0) {
4685 sdebug_ndelay = ndelay;
4686 sdebug_jdelay = ndelay ? JDELAY_OVERRIDDEN
4687 : DEF_JDELAY;
4688 }
4689 block_unblock_all_queues(false);
4690 }
4691 return res;
4692 }
4693 return -EINVAL;
4694}
4695static DRIVER_ATTR_RW(ndelay);
4696
4697static ssize_t opts_show(struct device_driver *ddp, char *buf)
4698{
4699 return scnprintf(buf, PAGE_SIZE, "0x%x\n", sdebug_opts);
4700}
4701
4702static ssize_t opts_store(struct device_driver *ddp, const char *buf,
4703 size_t count)
4704{
4705 int opts;
4706 char work[20];
4707
4708 if (sscanf(buf, "%10s", work) == 1) {
4709 if (strncasecmp(work, "0x", 2) == 0) {
4710 if (kstrtoint(work + 2, 16, &opts) == 0)
4711 goto opts_done;
4712 } else {
4713 if (kstrtoint(work, 10, &opts) == 0)
4714 goto opts_done;
4715 }
4716 }
4717 return -EINVAL;
4718opts_done:
4719 sdebug_opts = opts;
4720 sdebug_verbose = !!(SDEBUG_OPT_NOISE & opts);
4721 sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & opts);
4722 tweak_cmnd_count();
4723 return count;
4724}
4725static DRIVER_ATTR_RW(opts);
4726
4727static ssize_t ptype_show(struct device_driver *ddp, char *buf)
4728{
4729 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ptype);
4730}
4731static ssize_t ptype_store(struct device_driver *ddp, const char *buf,
4732 size_t count)
4733{
4734 int n;
4735
4736 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4737 sdebug_ptype = n;
4738 return count;
4739 }
4740 return -EINVAL;
4741}
4742static DRIVER_ATTR_RW(ptype);
4743
4744static ssize_t dsense_show(struct device_driver *ddp, char *buf)
4745{
4746 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dsense);
4747}
4748static ssize_t dsense_store(struct device_driver *ddp, const char *buf,
4749 size_t count)
4750{
4751 int n;
4752
4753 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4754 sdebug_dsense = n;
4755 return count;
4756 }
4757 return -EINVAL;
4758}
4759static DRIVER_ATTR_RW(dsense);
4760
4761static ssize_t fake_rw_show(struct device_driver *ddp, char *buf)
4762{
4763 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_fake_rw);
4764}
4765static ssize_t fake_rw_store(struct device_driver *ddp, const char *buf,
4766 size_t count)
4767{
4768 int n;
4769
4770 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4771 n = (n > 0);
4772 sdebug_fake_rw = (sdebug_fake_rw > 0);
4773 if (sdebug_fake_rw != n) {
4774 if ((0 == n) && (NULL == fake_storep)) {
4775 unsigned long sz =
4776 (unsigned long)sdebug_dev_size_mb *
4777 1048576;
4778
4779 fake_storep = vzalloc(sz);
4780 if (NULL == fake_storep) {
4781 pr_err("out of memory, 9\n");
4782 return -ENOMEM;
4783 }
4784 }
4785 sdebug_fake_rw = n;
4786 }
4787 return count;
4788 }
4789 return -EINVAL;
4790}
4791static DRIVER_ATTR_RW(fake_rw);
4792
4793static ssize_t no_lun_0_show(struct device_driver *ddp, char *buf)
4794{
4795 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_lun_0);
4796}
4797static ssize_t no_lun_0_store(struct device_driver *ddp, const char *buf,
4798 size_t count)
4799{
4800 int n;
4801
4802 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4803 sdebug_no_lun_0 = n;
4804 return count;
4805 }
4806 return -EINVAL;
4807}
4808static DRIVER_ATTR_RW(no_lun_0);
4809
4810static ssize_t num_tgts_show(struct device_driver *ddp, char *buf)
4811{
4812 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_tgts);
4813}
4814static ssize_t num_tgts_store(struct device_driver *ddp, const char *buf,
4815 size_t count)
4816{
4817 int n;
4818
4819 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4820 sdebug_num_tgts = n;
4821 sdebug_max_tgts_luns();
4822 return count;
4823 }
4824 return -EINVAL;
4825}
4826static DRIVER_ATTR_RW(num_tgts);
4827
4828static ssize_t dev_size_mb_show(struct device_driver *ddp, char *buf)
4829{
4830 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dev_size_mb);
4831}
4832static DRIVER_ATTR_RO(dev_size_mb);
4833
4834static ssize_t num_parts_show(struct device_driver *ddp, char *buf)
4835{
4836 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_num_parts);
4837}
4838static DRIVER_ATTR_RO(num_parts);
4839
4840static ssize_t every_nth_show(struct device_driver *ddp, char *buf)
4841{
4842 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_every_nth);
4843}
4844static ssize_t every_nth_store(struct device_driver *ddp, const char *buf,
4845 size_t count)
4846{
4847 int nth;
4848
4849 if ((count > 0) && (1 == sscanf(buf, "%d", &nth))) {
4850 sdebug_every_nth = nth;
4851 if (nth && !sdebug_statistics) {
4852 pr_info("every_nth needs statistics=1, set it\n");
4853 sdebug_statistics = true;
4854 }
4855 tweak_cmnd_count();
4856 return count;
4857 }
4858 return -EINVAL;
4859}
4860static DRIVER_ATTR_RW(every_nth);
4861
4862static ssize_t max_luns_show(struct device_driver *ddp, char *buf)
4863{
4864 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_max_luns);
4865}
4866static ssize_t max_luns_store(struct device_driver *ddp, const char *buf,
4867 size_t count)
4868{
4869 int n;
4870 bool changed;
4871
4872 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4873 if (n > 256) {
4874 pr_warn("max_luns can be no more than 256\n");
4875 return -EINVAL;
4876 }
4877 changed = (sdebug_max_luns != n);
4878 sdebug_max_luns = n;
4879 sdebug_max_tgts_luns();
4880 if (changed && (sdebug_scsi_level >= 5)) { /* >= SPC-3 */
4881 struct sdebug_host_info *sdhp;
4882 struct sdebug_dev_info *dp;
4883
4884 spin_lock(&sdebug_host_list_lock);
4885 list_for_each_entry(sdhp, &sdebug_host_list,
4886 host_list) {
4887 list_for_each_entry(dp, &sdhp->dev_info_list,
4888 dev_list) {
4889 set_bit(SDEBUG_UA_LUNS_CHANGED,
4890 dp->uas_bm);
4891 }
4892 }
4893 spin_unlock(&sdebug_host_list_lock);
4894 }
4895 return count;
4896 }
4897 return -EINVAL;
4898}
4899static DRIVER_ATTR_RW(max_luns);
4900
4901static ssize_t max_queue_show(struct device_driver *ddp, char *buf)
4902{
4903 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_max_queue);
4904}
4905/* N.B. max_queue can be changed while there are queued commands. In flight
4906 * commands beyond the new max_queue will be completed. */
4907static ssize_t max_queue_store(struct device_driver *ddp, const char *buf,
4908 size_t count)
4909{
4910 int j, n, k, a;
4911 struct sdebug_queue *sqp;
4912
4913 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n > 0) &&
4914 (n <= SDEBUG_CANQUEUE)) {
4915 block_unblock_all_queues(true);
4916 k = 0;
4917 for (j = 0, sqp = sdebug_q_arr; j < submit_queues;
4918 ++j, ++sqp) {
4919 a = find_last_bit(sqp->in_use_bm, SDEBUG_CANQUEUE);
4920 if (a > k)
4921 k = a;
4922 }
4923 sdebug_max_queue = n;
4924 if (k == SDEBUG_CANQUEUE)
4925 atomic_set(&retired_max_queue, 0);
4926 else if (k >= n)
4927 atomic_set(&retired_max_queue, k + 1);
4928 else
4929 atomic_set(&retired_max_queue, 0);
4930 block_unblock_all_queues(false);
4931 return count;
4932 }
4933 return -EINVAL;
4934}
4935static DRIVER_ATTR_RW(max_queue);
4936
4937static ssize_t no_uld_show(struct device_driver *ddp, char *buf)
4938{
4939 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_no_uld);
4940}
4941static DRIVER_ATTR_RO(no_uld);
4942
4943static ssize_t scsi_level_show(struct device_driver *ddp, char *buf)
4944{
4945 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_scsi_level);
4946}
4947static DRIVER_ATTR_RO(scsi_level);
4948
4949static ssize_t virtual_gb_show(struct device_driver *ddp, char *buf)
4950{
4951 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_virtual_gb);
4952}
4953static ssize_t virtual_gb_store(struct device_driver *ddp, const char *buf,
4954 size_t count)
4955{
4956 int n;
4957 bool changed;
4958
4959 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
4960 changed = (sdebug_virtual_gb != n);
4961 sdebug_virtual_gb = n;
4962 sdebug_capacity = get_sdebug_capacity();
4963 if (changed) {
4964 struct sdebug_host_info *sdhp;
4965 struct sdebug_dev_info *dp;
4966
4967 spin_lock(&sdebug_host_list_lock);
4968 list_for_each_entry(sdhp, &sdebug_host_list,
4969 host_list) {
4970 list_for_each_entry(dp, &sdhp->dev_info_list,
4971 dev_list) {
4972 set_bit(SDEBUG_UA_CAPACITY_CHANGED,
4973 dp->uas_bm);
4974 }
4975 }
4976 spin_unlock(&sdebug_host_list_lock);
4977 }
4978 return count;
4979 }
4980 return -EINVAL;
4981}
4982static DRIVER_ATTR_RW(virtual_gb);
4983
4984static ssize_t add_host_show(struct device_driver *ddp, char *buf)
4985{
4986 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_add_host);
4987}
4988
4989static int sdebug_add_adapter(void);
4990static void sdebug_remove_adapter(void);
4991
4992static ssize_t add_host_store(struct device_driver *ddp, const char *buf,
4993 size_t count)
4994{
4995 int delta_hosts;
4996
4997 if (sscanf(buf, "%d", &delta_hosts) != 1)
4998 return -EINVAL;
4999 if (delta_hosts > 0) {
5000 do {
5001 sdebug_add_adapter();
5002 } while (--delta_hosts);
5003 } else if (delta_hosts < 0) {
5004 do {
5005 sdebug_remove_adapter();
5006 } while (++delta_hosts);
5007 }
5008 return count;
5009}
5010static DRIVER_ATTR_RW(add_host);
5011
5012static ssize_t vpd_use_hostno_show(struct device_driver *ddp, char *buf)
5013{
5014 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_vpd_use_hostno);
5015}
5016static ssize_t vpd_use_hostno_store(struct device_driver *ddp, const char *buf,
5017 size_t count)
5018{
5019 int n;
5020
5021 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5022 sdebug_vpd_use_hostno = n;
5023 return count;
5024 }
5025 return -EINVAL;
5026}
5027static DRIVER_ATTR_RW(vpd_use_hostno);
5028
5029static ssize_t statistics_show(struct device_driver *ddp, char *buf)
5030{
5031 return scnprintf(buf, PAGE_SIZE, "%d\n", (int)sdebug_statistics);
5032}
5033static ssize_t statistics_store(struct device_driver *ddp, const char *buf,
5034 size_t count)
5035{
5036 int n;
5037
5038 if ((count > 0) && (sscanf(buf, "%d", &n) == 1) && (n >= 0)) {
5039 if (n > 0)
5040 sdebug_statistics = true;
5041 else {
5042 clear_queue_stats();
5043 sdebug_statistics = false;
5044 }
5045 return count;
5046 }
5047 return -EINVAL;
5048}
5049static DRIVER_ATTR_RW(statistics);
5050
5051static ssize_t sector_size_show(struct device_driver *ddp, char *buf)
5052{
5053 return scnprintf(buf, PAGE_SIZE, "%u\n", sdebug_sector_size);
5054}
5055static DRIVER_ATTR_RO(sector_size);
5056
5057static ssize_t submit_queues_show(struct device_driver *ddp, char *buf)
5058{
5059 return scnprintf(buf, PAGE_SIZE, "%d\n", submit_queues);
5060}
5061static DRIVER_ATTR_RO(submit_queues);
5062
5063static ssize_t dix_show(struct device_driver *ddp, char *buf)
5064{
5065 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dix);
5066}
5067static DRIVER_ATTR_RO(dix);
5068
5069static ssize_t dif_show(struct device_driver *ddp, char *buf)
5070{
5071 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_dif);
5072}
5073static DRIVER_ATTR_RO(dif);
5074
5075static ssize_t guard_show(struct device_driver *ddp, char *buf)
5076{
5077 return scnprintf(buf, PAGE_SIZE, "%u\n", sdebug_guard);
5078}
5079static DRIVER_ATTR_RO(guard);
5080
5081static ssize_t ato_show(struct device_driver *ddp, char *buf)
5082{
5083 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_ato);
5084}
5085static DRIVER_ATTR_RO(ato);
5086
5087static ssize_t map_show(struct device_driver *ddp, char *buf)
5088{
5089 ssize_t count;
5090
5091 if (!scsi_debug_lbp())
5092 return scnprintf(buf, PAGE_SIZE, "0-%u\n",
5093 sdebug_store_sectors);
5094
5095 count = scnprintf(buf, PAGE_SIZE - 1, "%*pbl",
5096 (int)map_size, map_storep);
5097 buf[count++] = '\n';
5098 buf[count] = '\0';
5099
5100 return count;
5101}
5102static DRIVER_ATTR_RO(map);
5103
5104static ssize_t removable_show(struct device_driver *ddp, char *buf)
5105{
5106 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_removable ? 1 : 0);
5107}
5108static ssize_t removable_store(struct device_driver *ddp, const char *buf,
5109 size_t count)
5110{
5111 int n;
5112
5113 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5114 sdebug_removable = (n > 0);
5115 return count;
5116 }
5117 return -EINVAL;
5118}
5119static DRIVER_ATTR_RW(removable);
5120
5121static ssize_t host_lock_show(struct device_driver *ddp, char *buf)
5122{
5123 return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_host_lock);
5124}
5125/* N.B. sdebug_host_lock does nothing, kept for backward compatibility */
5126static ssize_t host_lock_store(struct device_driver *ddp, const char *buf,
5127 size_t count)
5128{
5129 int n;
5130
5131 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5132 sdebug_host_lock = (n > 0);
5133 return count;
5134 }
5135 return -EINVAL;
5136}
5137static DRIVER_ATTR_RW(host_lock);
5138
5139static ssize_t strict_show(struct device_driver *ddp, char *buf)
5140{
5141 return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_strict);
5142}
5143static ssize_t strict_store(struct device_driver *ddp, const char *buf,
5144 size_t count)
5145{
5146 int n;
5147
5148 if ((count > 0) && (1 == sscanf(buf, "%d", &n)) && (n >= 0)) {
5149 sdebug_strict = (n > 0);
5150 return count;
5151 }
5152 return -EINVAL;
5153}
5154static DRIVER_ATTR_RW(strict);
5155
5156static ssize_t uuid_ctl_show(struct device_driver *ddp, char *buf)
5157{
5158 return scnprintf(buf, PAGE_SIZE, "%d\n", !!sdebug_uuid_ctl);
5159}
5160static DRIVER_ATTR_RO(uuid_ctl);
5161
5162static ssize_t cdb_len_show(struct device_driver *ddp, char *buf)
5163{
5164 return scnprintf(buf, PAGE_SIZE, "%d\n", sdebug_cdb_len);
5165}
5166static ssize_t cdb_len_store(struct device_driver *ddp, const char *buf,
5167 size_t count)
5168{
5169 int ret, n;
5170
5171 ret = kstrtoint(buf, 0, &n);
5172 if (ret)
5173 return ret;
5174 sdebug_cdb_len = n;
5175 all_config_cdb_len();
5176 return count;
5177}
5178static DRIVER_ATTR_RW(cdb_len);
5179
5180
5181/* Note: The following array creates attribute files in the
5182 /sys/bus/pseudo/drivers/scsi_debug directory. The advantage of these
5183 files (over those found in the /sys/module/scsi_debug/parameters
5184 directory) is that auxiliary actions can be triggered when an attribute
5185 is changed. For example see: sdebug_add_host_store() above.
5186 */
5187
5188static struct attribute *sdebug_drv_attrs[] = {
5189 &driver_attr_delay.attr,
5190 &driver_attr_opts.attr,
5191 &driver_attr_ptype.attr,
5192 &driver_attr_dsense.attr,
5193 &driver_attr_fake_rw.attr,
5194 &driver_attr_no_lun_0.attr,
5195 &driver_attr_num_tgts.attr,
5196 &driver_attr_dev_size_mb.attr,
5197 &driver_attr_num_parts.attr,
5198 &driver_attr_every_nth.attr,
5199 &driver_attr_max_luns.attr,
5200 &driver_attr_max_queue.attr,
5201 &driver_attr_no_uld.attr,
5202 &driver_attr_scsi_level.attr,
5203 &driver_attr_virtual_gb.attr,
5204 &driver_attr_add_host.attr,
5205 &driver_attr_vpd_use_hostno.attr,
5206 &driver_attr_sector_size.attr,
5207 &driver_attr_statistics.attr,
5208 &driver_attr_submit_queues.attr,
5209 &driver_attr_dix.attr,
5210 &driver_attr_dif.attr,
5211 &driver_attr_guard.attr,
5212 &driver_attr_ato.attr,
5213 &driver_attr_map.attr,
5214 &driver_attr_removable.attr,
5215 &driver_attr_host_lock.attr,
5216 &driver_attr_ndelay.attr,
5217 &driver_attr_strict.attr,
5218 &driver_attr_uuid_ctl.attr,
5219 &driver_attr_cdb_len.attr,
5220 NULL,
5221};
5222ATTRIBUTE_GROUPS(sdebug_drv);
5223
5224static struct device *pseudo_primary;
5225
5226static int __init scsi_debug_init(void)
5227{
5228 unsigned long sz;
5229 int host_to_add;
5230 int k;
5231 int ret;
5232
5233 atomic_set(&retired_max_queue, 0);
5234
5235 if (sdebug_ndelay >= 1000 * 1000 * 1000) {
5236 pr_warn("ndelay must be less than 1 second, ignored\n");
5237 sdebug_ndelay = 0;
5238 } else if (sdebug_ndelay > 0)
5239 sdebug_jdelay = JDELAY_OVERRIDDEN;
5240
5241 switch (sdebug_sector_size) {
5242 case 512:
5243 case 1024:
5244 case 2048:
5245 case 4096:
5246 break;
5247 default:
5248 pr_err("invalid sector_size %d\n", sdebug_sector_size);
5249 return -EINVAL;
5250 }
5251
5252 switch (sdebug_dif) {
5253 case T10_PI_TYPE0_PROTECTION:
5254 break;
5255 case T10_PI_TYPE1_PROTECTION:
5256 case T10_PI_TYPE2_PROTECTION:
5257 case T10_PI_TYPE3_PROTECTION:
5258 have_dif_prot = true;
5259 break;
5260
5261 default:
5262 pr_err("dif must be 0, 1, 2 or 3\n");
5263 return -EINVAL;
5264 }
5265
5266 if (sdebug_guard > 1) {
5267 pr_err("guard must be 0 or 1\n");
5268 return -EINVAL;
5269 }
5270
5271 if (sdebug_ato > 1) {
5272 pr_err("ato must be 0 or 1\n");
5273 return -EINVAL;
5274 }
5275
5276 if (sdebug_physblk_exp > 15) {
5277 pr_err("invalid physblk_exp %u\n", sdebug_physblk_exp);
5278 return -EINVAL;
5279 }
5280 if (sdebug_max_luns > 256) {
5281 pr_warn("max_luns can be no more than 256, use default\n");
5282 sdebug_max_luns = DEF_MAX_LUNS;
5283 }
5284
5285 if (sdebug_lowest_aligned > 0x3fff) {
5286 pr_err("lowest_aligned too big: %u\n", sdebug_lowest_aligned);
5287 return -EINVAL;
5288 }
5289
5290 if (submit_queues < 1) {
5291 pr_err("submit_queues must be 1 or more\n");
5292 return -EINVAL;
5293 }
5294 sdebug_q_arr = kcalloc(submit_queues, sizeof(struct sdebug_queue),
5295 GFP_KERNEL);
5296 if (sdebug_q_arr == NULL)
5297 return -ENOMEM;
5298 for (k = 0; k < submit_queues; ++k)
5299 spin_lock_init(&sdebug_q_arr[k].qc_lock);
5300
5301 if (sdebug_dev_size_mb < 1)
5302 sdebug_dev_size_mb = 1; /* force minimum 1 MB ramdisk */
5303 sz = (unsigned long)sdebug_dev_size_mb * 1048576;
5304 sdebug_store_sectors = sz / sdebug_sector_size;
5305 sdebug_capacity = get_sdebug_capacity();
5306
5307 /* play around with geometry, don't waste too much on track 0 */
5308 sdebug_heads = 8;
5309 sdebug_sectors_per = 32;
5310 if (sdebug_dev_size_mb >= 256)
5311 sdebug_heads = 64;
5312 else if (sdebug_dev_size_mb >= 16)
5313 sdebug_heads = 32;
5314 sdebug_cylinders_per = (unsigned long)sdebug_capacity /
5315 (sdebug_sectors_per * sdebug_heads);
5316 if (sdebug_cylinders_per >= 1024) {
5317 /* other LLDs do this; implies >= 1GB ram disk ... */
5318 sdebug_heads = 255;
5319 sdebug_sectors_per = 63;
5320 sdebug_cylinders_per = (unsigned long)sdebug_capacity /
5321 (sdebug_sectors_per * sdebug_heads);
5322 }
5323
5324 if (sdebug_fake_rw == 0) {
5325 fake_storep = vzalloc(sz);
5326 if (NULL == fake_storep) {
5327 pr_err("out of memory, 1\n");
5328 ret = -ENOMEM;
5329 goto free_q_arr;
5330 }
5331 if (sdebug_num_parts > 0)
5332 sdebug_build_parts(fake_storep, sz);
5333 }
5334
5335 if (sdebug_dix) {
5336 int dif_size;
5337
5338 dif_size = sdebug_store_sectors * sizeof(struct t10_pi_tuple);
5339 dif_storep = vmalloc(dif_size);
5340
5341 pr_err("dif_storep %u bytes @ %p\n", dif_size, dif_storep);
5342
5343 if (dif_storep == NULL) {
5344 pr_err("out of mem. (DIX)\n");
5345 ret = -ENOMEM;
5346 goto free_vm;
5347 }
5348
5349 memset(dif_storep, 0xff, dif_size);
5350 }
5351
5352 /* Logical Block Provisioning */
5353 if (scsi_debug_lbp()) {
5354 sdebug_unmap_max_blocks =
5355 clamp(sdebug_unmap_max_blocks, 0U, 0xffffffffU);
5356
5357 sdebug_unmap_max_desc =
5358 clamp(sdebug_unmap_max_desc, 0U, 256U);
5359
5360 sdebug_unmap_granularity =
5361 clamp(sdebug_unmap_granularity, 1U, 0xffffffffU);
5362
5363 if (sdebug_unmap_alignment &&
5364 sdebug_unmap_granularity <=
5365 sdebug_unmap_alignment) {
5366 pr_err("ERR: unmap_granularity <= unmap_alignment\n");
5367 ret = -EINVAL;
5368 goto free_vm;
5369 }
5370
5371 map_size = lba_to_map_index(sdebug_store_sectors - 1) + 1;
5372 map_storep = vmalloc(array_size(sizeof(long),
5373 BITS_TO_LONGS(map_size)));
5374
5375 pr_info("%lu provisioning blocks\n", map_size);
5376
5377 if (map_storep == NULL) {
5378 pr_err("out of mem. (MAP)\n");
5379 ret = -ENOMEM;
5380 goto free_vm;
5381 }
5382
5383 bitmap_zero(map_storep, map_size);
5384
5385 /* Map first 1KB for partition table */
5386 if (sdebug_num_parts)
5387 map_region(0, 2);
5388 }
5389
5390 pseudo_primary = root_device_register("pseudo_0");
5391 if (IS_ERR(pseudo_primary)) {
5392 pr_warn("root_device_register() error\n");
5393 ret = PTR_ERR(pseudo_primary);
5394 goto free_vm;
5395 }
5396 ret = bus_register(&pseudo_lld_bus);
5397 if (ret < 0) {
5398 pr_warn("bus_register error: %d\n", ret);
5399 goto dev_unreg;
5400 }
5401 ret = driver_register(&sdebug_driverfs_driver);
5402 if (ret < 0) {
5403 pr_warn("driver_register error: %d\n", ret);
5404 goto bus_unreg;
5405 }
5406
5407 host_to_add = sdebug_add_host;
5408 sdebug_add_host = 0;
5409
5410 for (k = 0; k < host_to_add; k++) {
5411 if (sdebug_add_adapter()) {
5412 pr_err("sdebug_add_adapter failed k=%d\n", k);
5413 break;
5414 }
5415 }
5416
5417 if (sdebug_verbose)
5418 pr_info("built %d host(s)\n", sdebug_add_host);
5419
5420 return 0;
5421
5422bus_unreg:
5423 bus_unregister(&pseudo_lld_bus);
5424dev_unreg:
5425 root_device_unregister(pseudo_primary);
5426free_vm:
5427 vfree(map_storep);
5428 vfree(dif_storep);
5429 vfree(fake_storep);
5430free_q_arr:
5431 kfree(sdebug_q_arr);
5432 return ret;
5433}
5434
5435static void __exit scsi_debug_exit(void)
5436{
5437 int k = sdebug_add_host;
5438
5439 stop_all_queued();
5440 for (; k; k--)
5441 sdebug_remove_adapter();
5442 free_all_queued();
5443 driver_unregister(&sdebug_driverfs_driver);
5444 bus_unregister(&pseudo_lld_bus);
5445 root_device_unregister(pseudo_primary);
5446
5447 vfree(map_storep);
5448 vfree(dif_storep);
5449 vfree(fake_storep);
5450 kfree(sdebug_q_arr);
5451}
5452
5453device_initcall(scsi_debug_init);
5454module_exit(scsi_debug_exit);
5455
5456static void sdebug_release_adapter(struct device *dev)
5457{
5458 struct sdebug_host_info *sdbg_host;
5459
5460 sdbg_host = to_sdebug_host(dev);
5461 kfree(sdbg_host);
5462}
5463
5464static int sdebug_add_adapter(void)
5465{
5466 int k, devs_per_host;
5467 int error = 0;
5468 struct sdebug_host_info *sdbg_host;
5469 struct sdebug_dev_info *sdbg_devinfo, *tmp;
5470
5471 sdbg_host = kzalloc(sizeof(*sdbg_host), GFP_KERNEL);
5472 if (sdbg_host == NULL) {
5473 pr_err("out of memory at line %d\n", __LINE__);
5474 return -ENOMEM;
5475 }
5476
5477 INIT_LIST_HEAD(&sdbg_host->dev_info_list);
5478
5479 devs_per_host = sdebug_num_tgts * sdebug_max_luns;
5480 for (k = 0; k < devs_per_host; k++) {
5481 sdbg_devinfo = sdebug_device_create(sdbg_host, GFP_KERNEL);
5482 if (!sdbg_devinfo) {
5483 pr_err("out of memory at line %d\n", __LINE__);
5484 error = -ENOMEM;
5485 goto clean;
5486 }
5487 }
5488
5489 spin_lock(&sdebug_host_list_lock);
5490 list_add_tail(&sdbg_host->host_list, &sdebug_host_list);
5491 spin_unlock(&sdebug_host_list_lock);
5492
5493 sdbg_host->dev.bus = &pseudo_lld_bus;
5494 sdbg_host->dev.parent = pseudo_primary;
5495 sdbg_host->dev.release = &sdebug_release_adapter;
5496 dev_set_name(&sdbg_host->dev, "adapter%d", sdebug_add_host);
5497
5498 error = device_register(&sdbg_host->dev);
5499
5500 if (error)
5501 goto clean;
5502
5503 ++sdebug_add_host;
5504 return error;
5505
5506clean:
5507 list_for_each_entry_safe(sdbg_devinfo, tmp, &sdbg_host->dev_info_list,
5508 dev_list) {
5509 list_del(&sdbg_devinfo->dev_list);
5510 kfree(sdbg_devinfo);
5511 }
5512
5513 kfree(sdbg_host);
5514 return error;
5515}
5516
5517static void sdebug_remove_adapter(void)
5518{
5519 struct sdebug_host_info *sdbg_host = NULL;
5520
5521 spin_lock(&sdebug_host_list_lock);
5522 if (!list_empty(&sdebug_host_list)) {
5523 sdbg_host = list_entry(sdebug_host_list.prev,
5524 struct sdebug_host_info, host_list);
5525 list_del(&sdbg_host->host_list);
5526 }
5527 spin_unlock(&sdebug_host_list_lock);
5528
5529 if (!sdbg_host)
5530 return;
5531
5532 device_unregister(&sdbg_host->dev);
5533 --sdebug_add_host;
5534}
5535
5536static int sdebug_change_qdepth(struct scsi_device *sdev, int qdepth)
5537{
5538 int num_in_q = 0;
5539 struct sdebug_dev_info *devip;
5540
5541 block_unblock_all_queues(true);
5542 devip = (struct sdebug_dev_info *)sdev->hostdata;
5543 if (NULL == devip) {
5544 block_unblock_all_queues(false);
5545 return -ENODEV;
5546 }
5547 num_in_q = atomic_read(&devip->num_in_q);
5548
5549 if (qdepth < 1)
5550 qdepth = 1;
5551 /* allow to exceed max host qc_arr elements for testing */
5552 if (qdepth > SDEBUG_CANQUEUE + 10)
5553 qdepth = SDEBUG_CANQUEUE + 10;
5554 scsi_change_queue_depth(sdev, qdepth);
5555
5556 if (SDEBUG_OPT_Q_NOISE & sdebug_opts) {
5557 sdev_printk(KERN_INFO, sdev, "%s: qdepth=%d, num_in_q=%d\n",
5558 __func__, qdepth, num_in_q);
5559 }
5560 block_unblock_all_queues(false);
5561 return sdev->queue_depth;
5562}
5563
5564static bool fake_timeout(struct scsi_cmnd *scp)
5565{
5566 if (0 == (atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth))) {
5567 if (sdebug_every_nth < -1)
5568 sdebug_every_nth = -1;
5569 if (SDEBUG_OPT_TIMEOUT & sdebug_opts)
5570 return true; /* ignore command causing timeout */
5571 else if (SDEBUG_OPT_MAC_TIMEOUT & sdebug_opts &&
5572 scsi_medium_access_command(scp))
5573 return true; /* time out reads and writes */
5574 }
5575 return false;
5576}
5577
5578static bool fake_host_busy(struct scsi_cmnd *scp)
5579{
5580 return (sdebug_opts & SDEBUG_OPT_HOST_BUSY) &&
5581 (atomic_read(&sdebug_cmnd_count) % abs(sdebug_every_nth)) == 0;
5582}
5583
5584static int scsi_debug_queuecommand(struct Scsi_Host *shost,
5585 struct scsi_cmnd *scp)
5586{
5587 u8 sdeb_i;
5588 struct scsi_device *sdp = scp->device;
5589 const struct opcode_info_t *oip;
5590 const struct opcode_info_t *r_oip;
5591 struct sdebug_dev_info *devip;
5592 u8 *cmd = scp->cmnd;
5593 int (*r_pfp)(struct scsi_cmnd *, struct sdebug_dev_info *);
5594 int (*pfp)(struct scsi_cmnd *, struct sdebug_dev_info *) = NULL;
5595 int k, na;
5596 int errsts = 0;
5597 u32 flags;
5598 u16 sa;
5599 u8 opcode = cmd[0];
5600 bool has_wlun_rl;
5601
5602 scsi_set_resid(scp, 0);
5603 if (sdebug_statistics)
5604 atomic_inc(&sdebug_cmnd_count);
5605 if (unlikely(sdebug_verbose &&
5606 !(SDEBUG_OPT_NO_CDB_NOISE & sdebug_opts))) {
5607 char b[120];
5608 int n, len, sb;
5609
5610 len = scp->cmd_len;
5611 sb = (int)sizeof(b);
5612 if (len > 32)
5613 strcpy(b, "too long, over 32 bytes");
5614 else {
5615 for (k = 0, n = 0; k < len && n < sb; ++k)
5616 n += scnprintf(b + n, sb - n, "%02x ",
5617 (u32)cmd[k]);
5618 }
5619 sdev_printk(KERN_INFO, sdp, "%s: tag=%#x, cmd %s\n", my_name,
5620 blk_mq_unique_tag(scp->request), b);
5621 }
5622 if (fake_host_busy(scp))
5623 return SCSI_MLQUEUE_HOST_BUSY;
5624 has_wlun_rl = (sdp->lun == SCSI_W_LUN_REPORT_LUNS);
5625 if (unlikely((sdp->lun >= sdebug_max_luns) && !has_wlun_rl))
5626 goto err_out;
5627
5628 sdeb_i = opcode_ind_arr[opcode]; /* fully mapped */
5629 oip = &opcode_info_arr[sdeb_i]; /* safe if table consistent */
5630 devip = (struct sdebug_dev_info *)sdp->hostdata;
5631 if (unlikely(!devip)) {
5632 devip = find_build_dev_info(sdp);
5633 if (NULL == devip)
5634 goto err_out;
5635 }
5636 na = oip->num_attached;
5637 r_pfp = oip->pfp;
5638 if (na) { /* multiple commands with this opcode */
5639 r_oip = oip;
5640 if (FF_SA & r_oip->flags) {
5641 if (F_SA_LOW & oip->flags)
5642 sa = 0x1f & cmd[1];
5643 else
5644 sa = get_unaligned_be16(cmd + 8);
5645 for (k = 0; k <= na; oip = r_oip->arrp + k++) {
5646 if (opcode == oip->opcode && sa == oip->sa)
5647 break;
5648 }
5649 } else { /* since no service action only check opcode */
5650 for (k = 0; k <= na; oip = r_oip->arrp + k++) {
5651 if (opcode == oip->opcode)
5652 break;
5653 }
5654 }
5655 if (k > na) {
5656 if (F_SA_LOW & r_oip->flags)
5657 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 1, 4);
5658 else if (F_SA_HIGH & r_oip->flags)
5659 mk_sense_invalid_fld(scp, SDEB_IN_CDB, 8, 7);
5660 else
5661 mk_sense_invalid_opcode(scp);
5662 goto check_cond;
5663 }
5664 } /* else (when na==0) we assume the oip is a match */
5665 flags = oip->flags;
5666 if (unlikely(F_INV_OP & flags)) {
5667 mk_sense_invalid_opcode(scp);
5668 goto check_cond;
5669 }
5670 if (unlikely(has_wlun_rl && !(F_RL_WLUN_OK & flags))) {
5671 if (sdebug_verbose)
5672 sdev_printk(KERN_INFO, sdp, "%s: Opcode 0x%x not%s\n",
5673 my_name, opcode, " supported for wlun");
5674 mk_sense_invalid_opcode(scp);
5675 goto check_cond;
5676 }
5677 if (unlikely(sdebug_strict)) { /* check cdb against mask */
5678 u8 rem;
5679 int j;
5680
5681 for (k = 1; k < oip->len_mask[0] && k < 16; ++k) {
5682 rem = ~oip->len_mask[k] & cmd[k];
5683 if (rem) {
5684 for (j = 7; j >= 0; --j, rem <<= 1) {
5685 if (0x80 & rem)
5686 break;
5687 }
5688 mk_sense_invalid_fld(scp, SDEB_IN_CDB, k, j);
5689 goto check_cond;
5690 }
5691 }
5692 }
5693 if (unlikely(!(F_SKIP_UA & flags) &&
5694 find_first_bit(devip->uas_bm,
5695 SDEBUG_NUM_UAS) != SDEBUG_NUM_UAS)) {
5696 errsts = make_ua(scp, devip);
5697 if (errsts)
5698 goto check_cond;
5699 }
5700 if (unlikely((F_M_ACCESS & flags) && atomic_read(&devip->stopped))) {
5701 mk_sense_buffer(scp, NOT_READY, LOGICAL_UNIT_NOT_READY, 0x2);
5702 if (sdebug_verbose)
5703 sdev_printk(KERN_INFO, sdp, "%s reports: Not ready: "
5704 "%s\n", my_name, "initializing command "
5705 "required");
5706 errsts = check_condition_result;
5707 goto fini;
5708 }
5709 if (sdebug_fake_rw && (F_FAKE_RW & flags))
5710 goto fini;
5711 if (unlikely(sdebug_every_nth)) {
5712 if (fake_timeout(scp))
5713 return 0; /* ignore command: make trouble */
5714 }
5715 if (likely(oip->pfp))
5716 pfp = oip->pfp; /* calls a resp_* function */
5717 else
5718 pfp = r_pfp; /* if leaf function ptr NULL, try the root's */
5719
5720fini:
5721 if (F_DELAY_OVERR & flags)
5722 return schedule_resp(scp, devip, errsts, pfp, 0, 0);
5723 else if ((flags & F_LONG_DELAY) && (sdebug_jdelay > 0 ||
5724 sdebug_ndelay > 10000)) {
5725 /*
5726 * Skip long delays if ndelay <= 10 microseconds. Otherwise
5727 * for Start Stop Unit (SSU) want at least 1 second delay and
5728 * if sdebug_jdelay>1 want a long delay of that many seconds.
5729 * For Synchronize Cache want 1/20 of SSU's delay.
5730 */
5731 int jdelay = (sdebug_jdelay < 2) ? 1 : sdebug_jdelay;
5732 int denom = (flags & F_SYNC_DELAY) ? 20 : 1;
5733
5734 jdelay = mult_frac(USER_HZ * jdelay, HZ, denom * USER_HZ);
5735 return schedule_resp(scp, devip, errsts, pfp, jdelay, 0);
5736 } else
5737 return schedule_resp(scp, devip, errsts, pfp, sdebug_jdelay,
5738 sdebug_ndelay);
5739check_cond:
5740 return schedule_resp(scp, devip, check_condition_result, NULL, 0, 0);
5741err_out:
5742 return schedule_resp(scp, NULL, DID_NO_CONNECT << 16, NULL, 0, 0);
5743}
5744
5745static struct scsi_host_template sdebug_driver_template = {
5746 .show_info = scsi_debug_show_info,
5747 .write_info = scsi_debug_write_info,
5748 .proc_name = sdebug_proc_name,
5749 .name = "SCSI DEBUG",
5750 .info = scsi_debug_info,
5751 .slave_alloc = scsi_debug_slave_alloc,
5752 .slave_configure = scsi_debug_slave_configure,
5753 .slave_destroy = scsi_debug_slave_destroy,
5754 .ioctl = scsi_debug_ioctl,
5755 .queuecommand = scsi_debug_queuecommand,
5756 .change_queue_depth = sdebug_change_qdepth,
5757 .eh_abort_handler = scsi_debug_abort,
5758 .eh_device_reset_handler = scsi_debug_device_reset,
5759 .eh_target_reset_handler = scsi_debug_target_reset,
5760 .eh_bus_reset_handler = scsi_debug_bus_reset,
5761 .eh_host_reset_handler = scsi_debug_host_reset,
5762 .can_queue = SDEBUG_CANQUEUE,
5763 .this_id = 7,
5764 .sg_tablesize = SG_MAX_SEGMENTS,
5765 .cmd_per_lun = DEF_CMD_PER_LUN,
5766 .max_sectors = -1U,
5767 .max_segment_size = -1U,
5768 .module = THIS_MODULE,
5769 .track_queue_depth = 1,
5770};
5771
5772static int sdebug_driver_probe(struct device *dev)
5773{
5774 int error = 0;
5775 struct sdebug_host_info *sdbg_host;
5776 struct Scsi_Host *hpnt;
5777 int hprot;
5778
5779 sdbg_host = to_sdebug_host(dev);
5780
5781 sdebug_driver_template.can_queue = sdebug_max_queue;
5782 if (!sdebug_clustering)
5783 sdebug_driver_template.dma_boundary = PAGE_SIZE - 1;
5784
5785 hpnt = scsi_host_alloc(&sdebug_driver_template, sizeof(sdbg_host));
5786 if (NULL == hpnt) {
5787 pr_err("scsi_host_alloc failed\n");
5788 error = -ENODEV;
5789 return error;
5790 }
5791 if (submit_queues > nr_cpu_ids) {
5792 pr_warn("%s: trim submit_queues (was %d) to nr_cpu_ids=%u\n",
5793 my_name, submit_queues, nr_cpu_ids);
5794 submit_queues = nr_cpu_ids;
5795 }
5796 /* Decide whether to tell scsi subsystem that we want mq */
5797 /* Following should give the same answer for each host */
5798 hpnt->nr_hw_queues = submit_queues;
5799
5800 sdbg_host->shost = hpnt;
5801 *((struct sdebug_host_info **)hpnt->hostdata) = sdbg_host;
5802 if ((hpnt->this_id >= 0) && (sdebug_num_tgts > hpnt->this_id))
5803 hpnt->max_id = sdebug_num_tgts + 1;
5804 else
5805 hpnt->max_id = sdebug_num_tgts;
5806 /* = sdebug_max_luns; */
5807 hpnt->max_lun = SCSI_W_LUN_REPORT_LUNS + 1;
5808
5809 hprot = 0;
5810
5811 switch (sdebug_dif) {
5812
5813 case T10_PI_TYPE1_PROTECTION:
5814 hprot = SHOST_DIF_TYPE1_PROTECTION;
5815 if (sdebug_dix)
5816 hprot |= SHOST_DIX_TYPE1_PROTECTION;
5817 break;
5818
5819 case T10_PI_TYPE2_PROTECTION:
5820 hprot = SHOST_DIF_TYPE2_PROTECTION;
5821 if (sdebug_dix)
5822 hprot |= SHOST_DIX_TYPE2_PROTECTION;
5823 break;
5824
5825 case T10_PI_TYPE3_PROTECTION:
5826 hprot = SHOST_DIF_TYPE3_PROTECTION;
5827 if (sdebug_dix)
5828 hprot |= SHOST_DIX_TYPE3_PROTECTION;
5829 break;
5830
5831 default:
5832 if (sdebug_dix)
5833 hprot |= SHOST_DIX_TYPE0_PROTECTION;
5834 break;
5835 }
5836
5837 scsi_host_set_prot(hpnt, hprot);
5838
5839 if (have_dif_prot || sdebug_dix)
5840 pr_info("host protection%s%s%s%s%s%s%s\n",
5841 (hprot & SHOST_DIF_TYPE1_PROTECTION) ? " DIF1" : "",
5842 (hprot & SHOST_DIF_TYPE2_PROTECTION) ? " DIF2" : "",
5843 (hprot & SHOST_DIF_TYPE3_PROTECTION) ? " DIF3" : "",
5844 (hprot & SHOST_DIX_TYPE0_PROTECTION) ? " DIX0" : "",
5845 (hprot & SHOST_DIX_TYPE1_PROTECTION) ? " DIX1" : "",
5846 (hprot & SHOST_DIX_TYPE2_PROTECTION) ? " DIX2" : "",
5847 (hprot & SHOST_DIX_TYPE3_PROTECTION) ? " DIX3" : "");
5848
5849 if (sdebug_guard == 1)
5850 scsi_host_set_guard(hpnt, SHOST_DIX_GUARD_IP);
5851 else
5852 scsi_host_set_guard(hpnt, SHOST_DIX_GUARD_CRC);
5853
5854 sdebug_verbose = !!(SDEBUG_OPT_NOISE & sdebug_opts);
5855 sdebug_any_injecting_opt = !!(SDEBUG_OPT_ALL_INJECTING & sdebug_opts);
5856 if (sdebug_every_nth) /* need stats counters for every_nth */
5857 sdebug_statistics = true;
5858 error = scsi_add_host(hpnt, &sdbg_host->dev);
5859 if (error) {
5860 pr_err("scsi_add_host failed\n");
5861 error = -ENODEV;
5862 scsi_host_put(hpnt);
5863 } else
5864 scsi_scan_host(hpnt);
5865
5866 return error;
5867}
5868
5869static int sdebug_driver_remove(struct device *dev)
5870{
5871 struct sdebug_host_info *sdbg_host;
5872 struct sdebug_dev_info *sdbg_devinfo, *tmp;
5873
5874 sdbg_host = to_sdebug_host(dev);
5875
5876 if (!sdbg_host) {
5877 pr_err("Unable to locate host info\n");
5878 return -ENODEV;
5879 }
5880
5881 scsi_remove_host(sdbg_host->shost);
5882
5883 list_for_each_entry_safe(sdbg_devinfo, tmp, &sdbg_host->dev_info_list,
5884 dev_list) {
5885 list_del(&sdbg_devinfo->dev_list);
5886 kfree(sdbg_devinfo);
5887 }
5888
5889 scsi_host_put(sdbg_host->shost);
5890 return 0;
5891}
5892
5893static int pseudo_lld_bus_match(struct device *dev,
5894 struct device_driver *dev_driver)
5895{
5896 return 1;
5897}
5898
5899static struct bus_type pseudo_lld_bus = {
5900 .name = "pseudo",
5901 .match = pseudo_lld_bus_match,
5902 .probe = sdebug_driver_probe,
5903 .remove = sdebug_driver_remove,
5904 .drv_groups = sdebug_drv_groups,
5905};