xref: /linux/drivers/target/tcm_fc/tfc_cmd.c (revision be602cde657ee43d23adbf309be6d700d0106dc9)
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * Copyright (c) 2010 Cisco Systems, Inc.
4  */
5 
6 /* XXX TBD some includes may be extraneous */
7 
8 #include <linux/module.h>
9 #include <linux/moduleparam.h>
10 #include <linux/utsname.h>
11 #include <linux/init.h>
12 #include <linux/slab.h>
13 #include <linux/kthread.h>
14 #include <linux/types.h>
15 #include <linux/string.h>
16 #include <linux/configfs.h>
17 #include <linux/ctype.h>
18 #include <linux/hash.h>
19 #include <linux/unaligned.h>
20 #include <scsi/scsi_tcq.h>
21 #include <scsi/libfc.h>
22 
23 #include <target/target_core_base.h>
24 #include <target/target_core_fabric.h>
25 
26 #include "tcm_fc.h"
27 
28 /*
29  * Dump cmd state for debugging.
30  */
31 static void _ft_dump_cmd(struct ft_cmd *cmd, const char *caller)
32 {
33 	struct fc_exch *ep;
34 	struct fc_seq *sp;
35 	struct se_cmd *se_cmd;
36 	struct scatterlist *sg;
37 	int count;
38 
39 	se_cmd = &cmd->se_cmd;
40 	pr_debug("%s: cmd %p sess %p seq %p se_cmd %p\n",
41 		caller, cmd, cmd->sess, cmd->seq, se_cmd);
42 
43 	pr_debug("%s: cmd %p data_nents %u len %u se_cmd_flags <0x%x>\n",
44 		caller, cmd, se_cmd->t_data_nents,
45 	       se_cmd->data_length, se_cmd->se_cmd_flags);
46 
47 	for_each_sg(se_cmd->t_data_sg, sg, se_cmd->t_data_nents, count)
48 		pr_debug("%s: cmd %p sg %p page %p "
49 			"len 0x%x off 0x%x\n",
50 			caller, cmd, sg,
51 			sg_page(sg), sg->length, sg->offset);
52 
53 	sp = cmd->seq;
54 	if (sp) {
55 		ep = fc_seq_exch(sp);
56 		pr_debug("%s: cmd %p sid %x did %x "
57 			"ox_id %x rx_id %x seq_id %x e_stat %x\n",
58 			caller, cmd, ep->sid, ep->did, ep->oxid, ep->rxid,
59 			sp->id, ep->esb_stat);
60 	}
61 }
62 
63 void ft_dump_cmd(struct ft_cmd *cmd, const char *caller)
64 {
65 	if (unlikely(ft_debug_logging))
66 		_ft_dump_cmd(cmd, caller);
67 }
68 
69 static void ft_free_cmd(struct ft_cmd *cmd)
70 {
71 	struct fc_frame *fp;
72 	struct ft_sess *sess;
73 
74 	if (!cmd)
75 		return;
76 	sess = cmd->sess;
77 	fp = cmd->req_frame;
78 	if (fr_seq(fp))
79 		fc_seq_release(fr_seq(fp));
80 	fc_frame_free(fp);
81 	target_free_tag(sess->se_sess, &cmd->se_cmd);
82 	ft_sess_put(sess);	/* undo get from lookup at recv */
83 }
84 
85 void ft_release_cmd(struct se_cmd *se_cmd)
86 {
87 	struct ft_cmd *cmd = container_of(se_cmd, struct ft_cmd, se_cmd);
88 
89 	ft_free_cmd(cmd);
90 }
91 
92 int ft_check_stop_free(struct se_cmd *se_cmd)
93 {
94 	return transport_generic_free_cmd(se_cmd, 0);
95 }
96 
97 /*
98  * Send response.
99  */
100 int ft_queue_status(struct se_cmd *se_cmd)
101 {
102 	struct ft_cmd *cmd = container_of(se_cmd, struct ft_cmd, se_cmd);
103 	struct fc_frame *fp;
104 	struct fcp_resp_with_ext *fcp;
105 	struct fc_lport *lport;
106 	struct fc_exch *ep;
107 	size_t len;
108 	int rc;
109 
110 	if (cmd->aborted)
111 		return 0;
112 	ft_dump_cmd(cmd, __func__);
113 	ep = fc_seq_exch(cmd->seq);
114 	lport = ep->lp;
115 	len = sizeof(*fcp) + se_cmd->scsi_sense_length;
116 	fp = fc_frame_alloc(lport, len);
117 	if (!fp) {
118 		se_cmd->scsi_status = SAM_STAT_TASK_SET_FULL;
119 		return -ENOMEM;
120 	}
121 
122 	fcp = fc_frame_payload_get(fp, len);
123 	memset(fcp, 0, len);
124 	fcp->resp.fr_status = se_cmd->scsi_status;
125 
126 	len = se_cmd->scsi_sense_length;
127 	if (len) {
128 		fcp->resp.fr_flags |= FCP_SNS_LEN_VAL;
129 		fcp->ext.fr_sns_len = htonl(len);
130 		memcpy((fcp + 1), se_cmd->sense_buffer, len);
131 	}
132 
133 	/*
134 	 * Test underflow and overflow with one mask.  Usually both are off.
135 	 * Bidirectional commands are not handled yet.
136 	 */
137 	if (se_cmd->se_cmd_flags & (SCF_OVERFLOW_BIT | SCF_UNDERFLOW_BIT)) {
138 		if (se_cmd->se_cmd_flags & SCF_OVERFLOW_BIT)
139 			fcp->resp.fr_flags |= FCP_RESID_OVER;
140 		else
141 			fcp->resp.fr_flags |= FCP_RESID_UNDER;
142 		fcp->ext.fr_resid = cpu_to_be32(se_cmd->residual_count);
143 	}
144 
145 	/*
146 	 * Send response.
147 	 */
148 	cmd->seq = fc_seq_start_next(cmd->seq);
149 	fc_fill_fc_hdr(fp, FC_RCTL_DD_CMD_STATUS, ep->did, ep->sid, FC_TYPE_FCP,
150 		       FC_FC_EX_CTX | FC_FC_LAST_SEQ | FC_FC_END_SEQ, 0);
151 
152 	rc = fc_seq_send(lport, cmd->seq, fp);
153 	if (rc) {
154 		pr_info_ratelimited("%s: Failed to send response frame %p, "
155 				    "xid <0x%x>\n", __func__, fp, ep->xid);
156 		/*
157 		 * Generate a TASK_SET_FULL status to notify the initiator
158 		 * to reduce it's queue_depth after the se_cmd response has
159 		 * been re-queued by target-core.
160 		 */
161 		se_cmd->scsi_status = SAM_STAT_TASK_SET_FULL;
162 		return -ENOMEM;
163 	}
164 	fc_exch_done(cmd->seq);
165 	/*
166 	 * Drop the extra ACK_KREF reference taken by target_submit_cmd()
167 	 * ahead of ft_check_stop_free() -> transport_generic_free_cmd()
168 	 * final se_cmd->cmd_kref put.
169 	 */
170 	target_put_sess_cmd(&cmd->se_cmd);
171 	return 0;
172 }
173 
174 /*
175  * Send TX_RDY (transfer ready).
176  */
177 int ft_write_pending(struct se_cmd *se_cmd)
178 {
179 	struct ft_cmd *cmd = container_of(se_cmd, struct ft_cmd, se_cmd);
180 	struct fc_frame *fp;
181 	struct fcp_txrdy *txrdy;
182 	struct fc_lport *lport;
183 	struct fc_exch *ep;
184 	struct fc_frame_header *fh;
185 	u32 f_ctl;
186 
187 	ft_dump_cmd(cmd, __func__);
188 
189 	if (cmd->aborted)
190 		return 0;
191 	ep = fc_seq_exch(cmd->seq);
192 	lport = ep->lp;
193 	fp = fc_frame_alloc(lport, sizeof(*txrdy));
194 	if (!fp)
195 		return -ENOMEM; /* Signal QUEUE_FULL */
196 
197 	txrdy = fc_frame_payload_get(fp, sizeof(*txrdy));
198 	memset(txrdy, 0, sizeof(*txrdy));
199 	txrdy->ft_burst_len = htonl(se_cmd->data_length);
200 
201 	cmd->seq = fc_seq_start_next(cmd->seq);
202 	fc_fill_fc_hdr(fp, FC_RCTL_DD_DATA_DESC, ep->did, ep->sid, FC_TYPE_FCP,
203 		       FC_FC_EX_CTX | FC_FC_END_SEQ | FC_FC_SEQ_INIT, 0);
204 
205 	fh = fc_frame_header_get(fp);
206 	f_ctl = ntoh24(fh->fh_f_ctl);
207 
208 	/* Only if it is 'Exchange Responder' */
209 	if (f_ctl & FC_FC_EX_CTX) {
210 		/* Target is 'exchange responder' and sending XFER_READY
211 		 * to 'exchange initiator (initiator)'
212 		 */
213 		if ((ep->xid <= lport->lro_xid) &&
214 		    (fh->fh_r_ctl == FC_RCTL_DD_DATA_DESC)) {
215 			if ((se_cmd->se_cmd_flags & SCF_SCSI_DATA_CDB) &&
216 			    lport->tt.ddp_target(lport, ep->xid,
217 						 se_cmd->t_data_sg,
218 						 se_cmd->t_data_nents))
219 				cmd->was_ddp_setup = 1;
220 		}
221 	}
222 	fc_seq_send(lport, cmd->seq, fp);
223 	return 0;
224 }
225 
226 /*
227  * FC sequence response handler for follow-on sequences (data) and aborts.
228  */
229 static void ft_recv_seq(struct fc_seq *sp, struct fc_frame *fp, void *arg)
230 {
231 	struct ft_cmd *cmd = arg;
232 	struct fc_frame_header *fh;
233 
234 	if (IS_ERR(fp)) {
235 		/* XXX need to find cmd if queued */
236 		cmd->seq = NULL;
237 		cmd->aborted = true;
238 		return;
239 	}
240 
241 	fh = fc_frame_header_get(fp);
242 
243 	switch (fh->fh_r_ctl) {
244 	case FC_RCTL_DD_SOL_DATA:	/* write data */
245 		ft_recv_write_data(cmd, fp);
246 		break;
247 	case FC_RCTL_DD_UNSOL_CTL:	/* command */
248 	case FC_RCTL_DD_SOL_CTL:	/* transfer ready */
249 	case FC_RCTL_DD_DATA_DESC:	/* transfer ready */
250 	default:
251 		pr_debug("%s: unhandled frame r_ctl %x\n",
252 		       __func__, fh->fh_r_ctl);
253 		ft_invl_hw_context(cmd);
254 		fc_frame_free(fp);
255 		transport_generic_free_cmd(&cmd->se_cmd, 0);
256 		break;
257 	}
258 }
259 
260 /*
261  * Send a FCP response including SCSI status and optional FCP rsp_code.
262  * status is SAM_STAT_GOOD (zero) iff code is valid.
263  * This is used in error cases, such as allocation failures.
264  */
265 static void ft_send_resp_status(struct fc_lport *lport,
266 				const struct fc_frame *rx_fp,
267 				u32 status, enum fcp_resp_rsp_codes code)
268 {
269 	struct fc_frame *fp;
270 	struct fc_seq *sp;
271 	const struct fc_frame_header *fh;
272 	size_t len;
273 	struct fcp_resp_with_ext *fcp;
274 	struct fcp_resp_rsp_info *info;
275 
276 	fh = fc_frame_header_get(rx_fp);
277 	pr_debug("FCP error response: did %x oxid %x status %x code %x\n",
278 		  ntoh24(fh->fh_s_id), ntohs(fh->fh_ox_id), status, code);
279 	len = sizeof(*fcp);
280 	if (status == SAM_STAT_GOOD)
281 		len += sizeof(*info);
282 	fp = fc_frame_alloc(lport, len);
283 	if (!fp)
284 		return;
285 	fcp = fc_frame_payload_get(fp, len);
286 	memset(fcp, 0, len);
287 	fcp->resp.fr_status = status;
288 	if (status == SAM_STAT_GOOD) {
289 		fcp->ext.fr_rsp_len = htonl(sizeof(*info));
290 		fcp->resp.fr_flags |= FCP_RSP_LEN_VAL;
291 		info = (struct fcp_resp_rsp_info *)(fcp + 1);
292 		info->rsp_code = code;
293 	}
294 
295 	fc_fill_reply_hdr(fp, rx_fp, FC_RCTL_DD_CMD_STATUS, 0);
296 	sp = fr_seq(fp);
297 	if (sp) {
298 		fc_seq_send(lport, sp, fp);
299 		fc_exch_done(sp);
300 	} else {
301 		lport->tt.frame_send(lport, fp);
302 	}
303 }
304 
305 /*
306  * Send error or task management response.
307  */
308 static void ft_send_resp_code(struct ft_cmd *cmd,
309 			      enum fcp_resp_rsp_codes code)
310 {
311 	ft_send_resp_status(cmd->sess->tport->lport,
312 			    cmd->req_frame, SAM_STAT_GOOD, code);
313 }
314 
315 
316 /*
317  * Send error or task management response.
318  * Always frees the cmd and associated state.
319  */
320 static void ft_send_resp_code_and_free(struct ft_cmd *cmd,
321 				      enum fcp_resp_rsp_codes code)
322 {
323 	ft_send_resp_code(cmd, code);
324 	ft_free_cmd(cmd);
325 }
326 
327 /*
328  * Handle Task Management Request.
329  */
330 static void ft_send_tm(struct ft_cmd *cmd)
331 {
332 	struct fcp_cmnd *fcp;
333 	int rc;
334 	u8 tm_func;
335 
336 	fcp = fc_frame_payload_get(cmd->req_frame, sizeof(*fcp));
337 
338 	switch (fcp->fc_tm_flags) {
339 	case FCP_TMF_LUN_RESET:
340 		tm_func = TMR_LUN_RESET;
341 		break;
342 	case FCP_TMF_TGT_RESET:
343 		tm_func = TMR_TARGET_WARM_RESET;
344 		break;
345 	case FCP_TMF_CLR_TASK_SET:
346 		tm_func = TMR_CLEAR_TASK_SET;
347 		break;
348 	case FCP_TMF_ABT_TASK_SET:
349 		tm_func = TMR_ABORT_TASK_SET;
350 		break;
351 	case FCP_TMF_CLR_ACA:
352 		tm_func = TMR_CLEAR_ACA;
353 		break;
354 	default:
355 		/*
356 		 * FCP4r01 indicates having a combination of
357 		 * tm_flags set is invalid.
358 		 */
359 		pr_debug("invalid FCP tm_flags %x\n", fcp->fc_tm_flags);
360 		ft_send_resp_code_and_free(cmd, FCP_CMND_FIELDS_INVALID);
361 		return;
362 	}
363 
364 	/* FIXME: Add referenced task tag for ABORT_TASK */
365 	rc = target_submit_tmr(&cmd->se_cmd, cmd->sess->se_sess,
366 		&cmd->ft_sense_buffer[0], scsilun_to_int(&fcp->fc_lun),
367 		cmd, tm_func, GFP_KERNEL, 0, TARGET_SCF_ACK_KREF);
368 	if (rc < 0)
369 		ft_send_resp_code_and_free(cmd, FCP_TMF_FAILED);
370 }
371 
372 /*
373  * Send status from completed task management request.
374  */
375 void ft_queue_tm_resp(struct se_cmd *se_cmd)
376 {
377 	struct ft_cmd *cmd = container_of(se_cmd, struct ft_cmd, se_cmd);
378 	struct se_tmr_req *tmr = se_cmd->se_tmr_req;
379 	enum fcp_resp_rsp_codes code;
380 
381 	if (cmd->aborted)
382 		return;
383 	switch (tmr->response) {
384 	case TMR_FUNCTION_COMPLETE:
385 		code = FCP_TMF_CMPL;
386 		break;
387 	case TMR_LUN_DOES_NOT_EXIST:
388 		code = FCP_TMF_INVALID_LUN;
389 		break;
390 	case TMR_FUNCTION_REJECTED:
391 		code = FCP_TMF_REJECTED;
392 		break;
393 	case TMR_TASK_DOES_NOT_EXIST:
394 	case TMR_TASK_MGMT_FUNCTION_NOT_SUPPORTED:
395 	default:
396 		code = FCP_TMF_FAILED;
397 		break;
398 	}
399 	pr_debug("tmr fn %d resp %d fcp code %d\n",
400 		  tmr->function, tmr->response, code);
401 	ft_send_resp_code(cmd, code);
402 	/*
403 	 * Drop the extra ACK_KREF reference taken by target_submit_tmr()
404 	 * ahead of ft_check_stop_free() -> transport_generic_free_cmd()
405 	 * final se_cmd->cmd_kref put.
406 	 */
407 	target_put_sess_cmd(&cmd->se_cmd);
408 }
409 
410 void ft_aborted_task(struct se_cmd *se_cmd)
411 {
412 	return;
413 }
414 
415 static void ft_send_work(struct work_struct *work);
416 
417 /*
418  * Handle incoming FCP command.
419  */
420 static void ft_recv_cmd(struct ft_sess *sess, struct fc_frame *fp)
421 {
422 	struct ft_cmd *cmd;
423 	struct fc_lport *lport = sess->tport->lport;
424 	struct se_session *se_sess = sess->se_sess;
425 	int tag, cpu;
426 
427 	tag = sbitmap_queue_get(&se_sess->sess_tag_pool, &cpu);
428 	if (tag < 0)
429 		goto busy;
430 
431 	cmd = &((struct ft_cmd *)se_sess->sess_cmd_map)[tag];
432 	memset(cmd, 0, sizeof(struct ft_cmd));
433 
434 	cmd->se_cmd.map_tag = tag;
435 	cmd->se_cmd.map_cpu = cpu;
436 	cmd->sess = sess;
437 	cmd->seq = fc_seq_assign(lport, fp);
438 	if (!cmd->seq) {
439 		target_free_tag(se_sess, &cmd->se_cmd);
440 		goto busy;
441 	}
442 	cmd->req_frame = fp;		/* hold frame during cmd */
443 
444 	INIT_WORK(&cmd->work, ft_send_work);
445 	queue_work(sess->tport->tpg->workqueue, &cmd->work);
446 	return;
447 
448 busy:
449 	pr_debug("cmd or seq allocation failure - sending BUSY\n");
450 	ft_send_resp_status(lport, fp, SAM_STAT_BUSY, 0);
451 	fc_frame_free(fp);
452 	ft_sess_put(sess);		/* undo get from lookup */
453 }
454 
455 
456 /*
457  * Handle incoming FCP frame.
458  * Caller has verified that the frame is type FCP.
459  */
460 void ft_recv_req(struct ft_sess *sess, struct fc_frame *fp)
461 {
462 	struct fc_frame_header *fh = fc_frame_header_get(fp);
463 
464 	switch (fh->fh_r_ctl) {
465 	case FC_RCTL_DD_UNSOL_CMD:	/* command */
466 		ft_recv_cmd(sess, fp);
467 		break;
468 	case FC_RCTL_DD_SOL_DATA:	/* write data */
469 	case FC_RCTL_DD_UNSOL_CTL:
470 	case FC_RCTL_DD_SOL_CTL:
471 	case FC_RCTL_DD_DATA_DESC:	/* transfer ready */
472 	case FC_RCTL_ELS4_REQ:		/* SRR, perhaps */
473 	default:
474 		pr_debug("%s: unhandled frame r_ctl %x\n",
475 		       __func__, fh->fh_r_ctl);
476 		fc_frame_free(fp);
477 		ft_sess_put(sess);	/* undo get from lookup */
478 		break;
479 	}
480 }
481 
482 /*
483  * Send new command to target.
484  */
485 static void ft_send_work(struct work_struct *work)
486 {
487 	struct ft_cmd *cmd = container_of(work, struct ft_cmd, work);
488 	struct fc_frame_header *fh = fc_frame_header_get(cmd->req_frame);
489 	struct fcp_cmnd *fcp;
490 	int data_dir = 0;
491 	int task_attr;
492 
493 	fcp = fc_frame_payload_get(cmd->req_frame, sizeof(*fcp));
494 	if (!fcp)
495 		goto err;
496 
497 	if (fcp->fc_flags & FCP_CFL_LEN_MASK)
498 		goto err;		/* not handling longer CDBs yet */
499 
500 	/*
501 	 * Check for FCP task management flags
502 	 */
503 	if (fcp->fc_tm_flags) {
504 		ft_send_tm(cmd);
505 		return;
506 	}
507 
508 	switch (fcp->fc_flags & (FCP_CFL_RDDATA | FCP_CFL_WRDATA)) {
509 	case 0:
510 		data_dir = DMA_NONE;
511 		break;
512 	case FCP_CFL_RDDATA:
513 		data_dir = DMA_FROM_DEVICE;
514 		break;
515 	case FCP_CFL_WRDATA:
516 		data_dir = DMA_TO_DEVICE;
517 		break;
518 	case FCP_CFL_WRDATA | FCP_CFL_RDDATA:
519 		goto err;	/* TBD not supported by tcm_fc yet */
520 	}
521 	/*
522 	 * Locate the SAM Task Attr from fc_pri_ta
523 	 */
524 	switch (fcp->fc_pri_ta & FCP_PTA_MASK) {
525 	case FCP_PTA_HEADQ:
526 		task_attr = TCM_HEAD_TAG;
527 		break;
528 	case FCP_PTA_ORDERED:
529 		task_attr = TCM_ORDERED_TAG;
530 		break;
531 	case FCP_PTA_ACA:
532 		task_attr = TCM_ACA_TAG;
533 		break;
534 	case FCP_PTA_SIMPLE:
535 	default:
536 		task_attr = TCM_SIMPLE_TAG;
537 	}
538 
539 	fc_seq_set_resp(cmd->seq, ft_recv_seq, cmd);
540 	cmd->se_cmd.tag = fc_seq_exch(cmd->seq)->rxid;
541 
542 	/*
543 	 * Use a single se_cmd->cmd_kref as we expect to release se_cmd
544 	 * directly from ft_check_stop_free callback in response path.
545 	 */
546 	if (target_init_cmd(&cmd->se_cmd, cmd->sess->se_sess,
547 			    &cmd->ft_sense_buffer[0],
548 			    scsilun_to_int(&fcp->fc_lun), ntohl(fcp->fc_dl),
549 			    task_attr, data_dir, TARGET_SCF_ACK_KREF))
550 		goto err;
551 
552 	if (target_submit_prep(&cmd->se_cmd, fcp->fc_cdb, NULL, 0, NULL, 0,
553 			       NULL, 0, GFP_KERNEL))
554 		return;
555 
556 	target_submit(&cmd->se_cmd);
557 	pr_debug("r_ctl %x target_submit_cmd %p\n", fh->fh_r_ctl, cmd);
558 	return;
559 
560 err:
561 	ft_send_resp_code_and_free(cmd, FCP_CMND_FIELDS_INVALID);
562 }
563