1 /******************************************************************************* 2 * Filename: target_core_xcopy.c 3 * 4 * This file contains support for SPC-4 Extended-Copy offload with generic 5 * TCM backends. 6 * 7 * Copyright (c) 2011-2013 Datera, Inc. All rights reserved. 8 * 9 * Author: 10 * Nicholas A. Bellinger <nab@daterainc.com> 11 * 12 * This program is free software; you can redistribute it and/or modify 13 * it under the terms of the GNU General Public License as published by 14 * the Free Software Foundation; either version 2 of the License, or 15 * (at your option) any later version. 16 * 17 * This program is distributed in the hope that it will be useful, 18 * but WITHOUT ANY WARRANTY; without even the implied warranty of 19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 20 * GNU General Public License for more details. 21 * 22 ******************************************************************************/ 23 24 #include <linux/slab.h> 25 #include <linux/spinlock.h> 26 #include <linux/list.h> 27 #include <linux/configfs.h> 28 #include <linux/ratelimit.h> 29 #include <scsi/scsi_proto.h> 30 #include <asm/unaligned.h> 31 32 #include <target/target_core_base.h> 33 #include <target/target_core_backend.h> 34 #include <target/target_core_fabric.h> 35 36 #include "target_core_internal.h" 37 #include "target_core_pr.h" 38 #include "target_core_ua.h" 39 #include "target_core_xcopy.h" 40 41 static struct workqueue_struct *xcopy_wq = NULL; 42 43 static sense_reason_t target_parse_xcopy_cmd(struct xcopy_op *xop); 44 45 static int target_xcopy_gen_naa_ieee(struct se_device *dev, unsigned char *buf) 46 { 47 int off = 0; 48 49 buf[off++] = (0x6 << 4); 50 buf[off++] = 0x01; 51 buf[off++] = 0x40; 52 buf[off] = (0x5 << 4); 53 54 spc_parse_naa_6h_vendor_specific(dev, &buf[off]); 55 return 0; 56 } 57 58 struct xcopy_dev_search_info { 59 const unsigned char *dev_wwn; 60 struct se_device *found_dev; 61 }; 62 63 static int target_xcopy_locate_se_dev_e4_iter(struct se_device *se_dev, 64 void *data) 65 { 66 struct xcopy_dev_search_info *info = data; 67 unsigned char tmp_dev_wwn[XCOPY_NAA_IEEE_REGEX_LEN]; 68 int rc; 69 70 if (!se_dev->dev_attrib.emulate_3pc) 71 return 0; 72 73 memset(&tmp_dev_wwn[0], 0, XCOPY_NAA_IEEE_REGEX_LEN); 74 target_xcopy_gen_naa_ieee(se_dev, &tmp_dev_wwn[0]); 75 76 rc = memcmp(&tmp_dev_wwn[0], info->dev_wwn, XCOPY_NAA_IEEE_REGEX_LEN); 77 if (rc != 0) 78 return 0; 79 80 info->found_dev = se_dev; 81 pr_debug("XCOPY 0xe4: located se_dev: %p\n", se_dev); 82 83 rc = target_depend_item(&se_dev->dev_group.cg_item); 84 if (rc != 0) { 85 pr_err("configfs_depend_item attempt failed: %d for se_dev: %p\n", 86 rc, se_dev); 87 return rc; 88 } 89 90 pr_debug("Called configfs_depend_item for se_dev: %p se_dev->se_dev_group: %p\n", 91 se_dev, &se_dev->dev_group); 92 return 1; 93 } 94 95 static int target_xcopy_locate_se_dev_e4(const unsigned char *dev_wwn, 96 struct se_device **found_dev) 97 { 98 struct xcopy_dev_search_info info; 99 int ret; 100 101 memset(&info, 0, sizeof(info)); 102 info.dev_wwn = dev_wwn; 103 104 ret = target_for_each_device(target_xcopy_locate_se_dev_e4_iter, &info); 105 if (ret == 1) { 106 *found_dev = info.found_dev; 107 return 0; 108 } else { 109 pr_debug_ratelimited("Unable to locate 0xe4 descriptor for EXTENDED_COPY\n"); 110 return -EINVAL; 111 } 112 } 113 114 static int target_xcopy_parse_tiddesc_e4(struct se_cmd *se_cmd, struct xcopy_op *xop, 115 unsigned char *p, unsigned short cscd_index) 116 { 117 unsigned char *desc = p; 118 unsigned short ript; 119 u8 desig_len; 120 /* 121 * Extract RELATIVE INITIATOR PORT IDENTIFIER 122 */ 123 ript = get_unaligned_be16(&desc[2]); 124 pr_debug("XCOPY 0xe4: RELATIVE INITIATOR PORT IDENTIFIER: %hu\n", ript); 125 /* 126 * Check for supported code set, association, and designator type 127 */ 128 if ((desc[4] & 0x0f) != 0x1) { 129 pr_err("XCOPY 0xe4: code set of non binary type not supported\n"); 130 return -EINVAL; 131 } 132 if ((desc[5] & 0x30) != 0x00) { 133 pr_err("XCOPY 0xe4: association other than LUN not supported\n"); 134 return -EINVAL; 135 } 136 if ((desc[5] & 0x0f) != 0x3) { 137 pr_err("XCOPY 0xe4: designator type unsupported: 0x%02x\n", 138 (desc[5] & 0x0f)); 139 return -EINVAL; 140 } 141 /* 142 * Check for matching 16 byte length for NAA IEEE Registered Extended 143 * Assigned designator 144 */ 145 desig_len = desc[7]; 146 if (desig_len != 16) { 147 pr_err("XCOPY 0xe4: invalid desig_len: %d\n", (int)desig_len); 148 return -EINVAL; 149 } 150 pr_debug("XCOPY 0xe4: desig_len: %d\n", (int)desig_len); 151 /* 152 * Check for NAA IEEE Registered Extended Assigned header.. 153 */ 154 if ((desc[8] & 0xf0) != 0x60) { 155 pr_err("XCOPY 0xe4: Unsupported DESIGNATOR TYPE: 0x%02x\n", 156 (desc[8] & 0xf0)); 157 return -EINVAL; 158 } 159 160 if (cscd_index != xop->stdi && cscd_index != xop->dtdi) { 161 pr_debug("XCOPY 0xe4: ignoring CSCD entry %d - neither src nor " 162 "dest\n", cscd_index); 163 return 0; 164 } 165 166 if (cscd_index == xop->stdi) { 167 memcpy(&xop->src_tid_wwn[0], &desc[8], XCOPY_NAA_IEEE_REGEX_LEN); 168 /* 169 * Determine if the source designator matches the local device 170 */ 171 if (!memcmp(&xop->local_dev_wwn[0], &xop->src_tid_wwn[0], 172 XCOPY_NAA_IEEE_REGEX_LEN)) { 173 xop->op_origin = XCOL_SOURCE_RECV_OP; 174 xop->src_dev = se_cmd->se_dev; 175 pr_debug("XCOPY 0xe4: Set xop->src_dev %p from source" 176 " received xop\n", xop->src_dev); 177 } 178 } 179 180 if (cscd_index == xop->dtdi) { 181 memcpy(&xop->dst_tid_wwn[0], &desc[8], XCOPY_NAA_IEEE_REGEX_LEN); 182 /* 183 * Determine if the destination designator matches the local 184 * device. If @cscd_index corresponds to both source (stdi) and 185 * destination (dtdi), or dtdi comes after stdi, then 186 * XCOL_DEST_RECV_OP wins. 187 */ 188 if (!memcmp(&xop->local_dev_wwn[0], &xop->dst_tid_wwn[0], 189 XCOPY_NAA_IEEE_REGEX_LEN)) { 190 xop->op_origin = XCOL_DEST_RECV_OP; 191 xop->dst_dev = se_cmd->se_dev; 192 pr_debug("XCOPY 0xe4: Set xop->dst_dev: %p from destination" 193 " received xop\n", xop->dst_dev); 194 } 195 } 196 197 return 0; 198 } 199 200 static int target_xcopy_parse_target_descriptors(struct se_cmd *se_cmd, 201 struct xcopy_op *xop, unsigned char *p, 202 unsigned short tdll, sense_reason_t *sense_ret) 203 { 204 struct se_device *local_dev = se_cmd->se_dev; 205 unsigned char *desc = p; 206 int offset = tdll % XCOPY_TARGET_DESC_LEN, rc; 207 unsigned short cscd_index = 0; 208 unsigned short start = 0; 209 210 *sense_ret = TCM_INVALID_PARAMETER_LIST; 211 212 if (offset != 0) { 213 pr_err("XCOPY target descriptor list length is not" 214 " multiple of %d\n", XCOPY_TARGET_DESC_LEN); 215 *sense_ret = TCM_UNSUPPORTED_TARGET_DESC_TYPE_CODE; 216 return -EINVAL; 217 } 218 if (tdll > RCR_OP_MAX_TARGET_DESC_COUNT * XCOPY_TARGET_DESC_LEN) { 219 pr_err("XCOPY target descriptor supports a maximum" 220 " two src/dest descriptors, tdll: %hu too large..\n", tdll); 221 /* spc4r37 6.4.3.4 CSCD DESCRIPTOR LIST LENGTH field */ 222 *sense_ret = TCM_TOO_MANY_TARGET_DESCS; 223 return -EINVAL; 224 } 225 /* 226 * Generate an IEEE Registered Extended designator based upon the 227 * se_device the XCOPY was received upon.. 228 */ 229 memset(&xop->local_dev_wwn[0], 0, XCOPY_NAA_IEEE_REGEX_LEN); 230 target_xcopy_gen_naa_ieee(local_dev, &xop->local_dev_wwn[0]); 231 232 while (start < tdll) { 233 /* 234 * Check target descriptor identification with 0xE4 type, and 235 * compare the current index with the CSCD descriptor IDs in 236 * the segment descriptor. Use VPD 0x83 WWPN matching .. 237 */ 238 switch (desc[0]) { 239 case 0xe4: 240 rc = target_xcopy_parse_tiddesc_e4(se_cmd, xop, 241 &desc[0], cscd_index); 242 if (rc != 0) 243 goto out; 244 start += XCOPY_TARGET_DESC_LEN; 245 desc += XCOPY_TARGET_DESC_LEN; 246 cscd_index++; 247 break; 248 default: 249 pr_err("XCOPY unsupported descriptor type code:" 250 " 0x%02x\n", desc[0]); 251 *sense_ret = TCM_UNSUPPORTED_TARGET_DESC_TYPE_CODE; 252 goto out; 253 } 254 } 255 256 switch (xop->op_origin) { 257 case XCOL_SOURCE_RECV_OP: 258 rc = target_xcopy_locate_se_dev_e4(xop->dst_tid_wwn, 259 &xop->dst_dev); 260 break; 261 case XCOL_DEST_RECV_OP: 262 rc = target_xcopy_locate_se_dev_e4(xop->src_tid_wwn, 263 &xop->src_dev); 264 break; 265 default: 266 pr_err("XCOPY CSCD descriptor IDs not found in CSCD list - " 267 "stdi: %hu dtdi: %hu\n", xop->stdi, xop->dtdi); 268 rc = -EINVAL; 269 break; 270 } 271 /* 272 * If a matching IEEE NAA 0x83 descriptor for the requested device 273 * is not located on this node, return COPY_ABORTED with ASQ/ASQC 274 * 0x0d/0x02 - COPY_TARGET_DEVICE_NOT_REACHABLE to request the 275 * initiator to fall back to normal copy method. 276 */ 277 if (rc < 0) { 278 *sense_ret = TCM_COPY_TARGET_DEVICE_NOT_REACHABLE; 279 goto out; 280 } 281 282 pr_debug("XCOPY TGT desc: Source dev: %p NAA IEEE WWN: 0x%16phN\n", 283 xop->src_dev, &xop->src_tid_wwn[0]); 284 pr_debug("XCOPY TGT desc: Dest dev: %p NAA IEEE WWN: 0x%16phN\n", 285 xop->dst_dev, &xop->dst_tid_wwn[0]); 286 287 return cscd_index; 288 289 out: 290 return -EINVAL; 291 } 292 293 static int target_xcopy_parse_segdesc_02(struct se_cmd *se_cmd, struct xcopy_op *xop, 294 unsigned char *p) 295 { 296 unsigned char *desc = p; 297 int dc = (desc[1] & 0x02); 298 unsigned short desc_len; 299 300 desc_len = get_unaligned_be16(&desc[2]); 301 if (desc_len != 0x18) { 302 pr_err("XCOPY segment desc 0x02: Illegal desc_len:" 303 " %hu\n", desc_len); 304 return -EINVAL; 305 } 306 307 xop->stdi = get_unaligned_be16(&desc[4]); 308 xop->dtdi = get_unaligned_be16(&desc[6]); 309 310 if (xop->stdi > XCOPY_CSCD_DESC_ID_LIST_OFF_MAX || 311 xop->dtdi > XCOPY_CSCD_DESC_ID_LIST_OFF_MAX) { 312 pr_err("XCOPY segment desc 0x02: unsupported CSCD ID > 0x%x; stdi: %hu dtdi: %hu\n", 313 XCOPY_CSCD_DESC_ID_LIST_OFF_MAX, xop->stdi, xop->dtdi); 314 return -EINVAL; 315 } 316 317 pr_debug("XCOPY seg desc 0x02: desc_len: %hu stdi: %hu dtdi: %hu, DC: %d\n", 318 desc_len, xop->stdi, xop->dtdi, dc); 319 320 xop->nolb = get_unaligned_be16(&desc[10]); 321 xop->src_lba = get_unaligned_be64(&desc[12]); 322 xop->dst_lba = get_unaligned_be64(&desc[20]); 323 pr_debug("XCOPY seg desc 0x02: nolb: %hu src_lba: %llu dst_lba: %llu\n", 324 xop->nolb, (unsigned long long)xop->src_lba, 325 (unsigned long long)xop->dst_lba); 326 327 if (dc != 0) { 328 xop->dbl = get_unaligned_be24(&desc[29]); 329 330 pr_debug("XCOPY seg desc 0x02: DC=1 w/ dbl: %u\n", xop->dbl); 331 } 332 return 0; 333 } 334 335 static int target_xcopy_parse_segment_descriptors(struct se_cmd *se_cmd, 336 struct xcopy_op *xop, unsigned char *p, 337 unsigned int sdll, sense_reason_t *sense_ret) 338 { 339 unsigned char *desc = p; 340 unsigned int start = 0; 341 int offset = sdll % XCOPY_SEGMENT_DESC_LEN, rc, ret = 0; 342 343 *sense_ret = TCM_INVALID_PARAMETER_LIST; 344 345 if (offset != 0) { 346 pr_err("XCOPY segment descriptor list length is not" 347 " multiple of %d\n", XCOPY_SEGMENT_DESC_LEN); 348 *sense_ret = TCM_UNSUPPORTED_SEGMENT_DESC_TYPE_CODE; 349 return -EINVAL; 350 } 351 if (sdll > RCR_OP_MAX_SG_DESC_COUNT * XCOPY_SEGMENT_DESC_LEN) { 352 pr_err("XCOPY supports %u segment descriptor(s), sdll: %u too" 353 " large..\n", RCR_OP_MAX_SG_DESC_COUNT, sdll); 354 /* spc4r37 6.4.3.5 SEGMENT DESCRIPTOR LIST LENGTH field */ 355 *sense_ret = TCM_TOO_MANY_SEGMENT_DESCS; 356 return -EINVAL; 357 } 358 359 while (start < sdll) { 360 /* 361 * Check segment descriptor type code for block -> block 362 */ 363 switch (desc[0]) { 364 case 0x02: 365 rc = target_xcopy_parse_segdesc_02(se_cmd, xop, desc); 366 if (rc < 0) 367 goto out; 368 369 ret++; 370 start += XCOPY_SEGMENT_DESC_LEN; 371 desc += XCOPY_SEGMENT_DESC_LEN; 372 break; 373 default: 374 pr_err("XCOPY unsupported segment descriptor" 375 "type: 0x%02x\n", desc[0]); 376 *sense_ret = TCM_UNSUPPORTED_SEGMENT_DESC_TYPE_CODE; 377 goto out; 378 } 379 } 380 381 return ret; 382 383 out: 384 return -EINVAL; 385 } 386 387 /* 388 * Start xcopy_pt ops 389 */ 390 391 struct xcopy_pt_cmd { 392 bool remote_port; 393 struct se_cmd se_cmd; 394 struct completion xpt_passthrough_sem; 395 unsigned char sense_buffer[TRANSPORT_SENSE_BUFFER]; 396 }; 397 398 struct se_portal_group xcopy_pt_tpg; 399 static struct se_session xcopy_pt_sess; 400 static struct se_node_acl xcopy_pt_nacl; 401 402 static char *xcopy_pt_get_fabric_name(void) 403 { 404 return "xcopy-pt"; 405 } 406 407 static int xcopy_pt_get_cmd_state(struct se_cmd *se_cmd) 408 { 409 return 0; 410 } 411 412 static void xcopy_pt_undepend_remotedev(struct xcopy_op *xop) 413 { 414 struct se_device *remote_dev; 415 416 if (xop->op_origin == XCOL_SOURCE_RECV_OP) 417 remote_dev = xop->dst_dev; 418 else 419 remote_dev = xop->src_dev; 420 421 pr_debug("Calling configfs_undepend_item for" 422 " remote_dev: %p remote_dev->dev_group: %p\n", 423 remote_dev, &remote_dev->dev_group.cg_item); 424 425 target_undepend_item(&remote_dev->dev_group.cg_item); 426 } 427 428 static void xcopy_pt_release_cmd(struct se_cmd *se_cmd) 429 { 430 struct xcopy_pt_cmd *xpt_cmd = container_of(se_cmd, 431 struct xcopy_pt_cmd, se_cmd); 432 433 kfree(xpt_cmd); 434 } 435 436 static int xcopy_pt_check_stop_free(struct se_cmd *se_cmd) 437 { 438 struct xcopy_pt_cmd *xpt_cmd = container_of(se_cmd, 439 struct xcopy_pt_cmd, se_cmd); 440 441 complete(&xpt_cmd->xpt_passthrough_sem); 442 return 0; 443 } 444 445 static int xcopy_pt_write_pending(struct se_cmd *se_cmd) 446 { 447 return 0; 448 } 449 450 static int xcopy_pt_write_pending_status(struct se_cmd *se_cmd) 451 { 452 return 0; 453 } 454 455 static int xcopy_pt_queue_data_in(struct se_cmd *se_cmd) 456 { 457 return 0; 458 } 459 460 static int xcopy_pt_queue_status(struct se_cmd *se_cmd) 461 { 462 return 0; 463 } 464 465 static const struct target_core_fabric_ops xcopy_pt_tfo = { 466 .get_fabric_name = xcopy_pt_get_fabric_name, 467 .get_cmd_state = xcopy_pt_get_cmd_state, 468 .release_cmd = xcopy_pt_release_cmd, 469 .check_stop_free = xcopy_pt_check_stop_free, 470 .write_pending = xcopy_pt_write_pending, 471 .write_pending_status = xcopy_pt_write_pending_status, 472 .queue_data_in = xcopy_pt_queue_data_in, 473 .queue_status = xcopy_pt_queue_status, 474 }; 475 476 /* 477 * End xcopy_pt_ops 478 */ 479 480 int target_xcopy_setup_pt(void) 481 { 482 xcopy_wq = alloc_workqueue("xcopy_wq", WQ_MEM_RECLAIM, 0); 483 if (!xcopy_wq) { 484 pr_err("Unable to allocate xcopy_wq\n"); 485 return -ENOMEM; 486 } 487 488 memset(&xcopy_pt_tpg, 0, sizeof(struct se_portal_group)); 489 INIT_LIST_HEAD(&xcopy_pt_tpg.se_tpg_node); 490 INIT_LIST_HEAD(&xcopy_pt_tpg.acl_node_list); 491 INIT_LIST_HEAD(&xcopy_pt_tpg.tpg_sess_list); 492 493 xcopy_pt_tpg.se_tpg_tfo = &xcopy_pt_tfo; 494 495 memset(&xcopy_pt_nacl, 0, sizeof(struct se_node_acl)); 496 INIT_LIST_HEAD(&xcopy_pt_nacl.acl_list); 497 INIT_LIST_HEAD(&xcopy_pt_nacl.acl_sess_list); 498 memset(&xcopy_pt_sess, 0, sizeof(struct se_session)); 499 transport_init_session(&xcopy_pt_sess); 500 501 xcopy_pt_nacl.se_tpg = &xcopy_pt_tpg; 502 xcopy_pt_nacl.nacl_sess = &xcopy_pt_sess; 503 504 xcopy_pt_sess.se_tpg = &xcopy_pt_tpg; 505 xcopy_pt_sess.se_node_acl = &xcopy_pt_nacl; 506 507 return 0; 508 } 509 510 void target_xcopy_release_pt(void) 511 { 512 if (xcopy_wq) 513 destroy_workqueue(xcopy_wq); 514 } 515 516 static void target_xcopy_setup_pt_port( 517 struct xcopy_pt_cmd *xpt_cmd, 518 struct xcopy_op *xop, 519 bool remote_port) 520 { 521 struct se_cmd *ec_cmd = xop->xop_se_cmd; 522 struct se_cmd *pt_cmd = &xpt_cmd->se_cmd; 523 524 if (xop->op_origin == XCOL_SOURCE_RECV_OP) { 525 /* 526 * Honor destination port reservations for X-COPY PUSH emulation 527 * when CDB is received on local source port, and READs blocks to 528 * WRITE on remote destination port. 529 */ 530 if (remote_port) { 531 xpt_cmd->remote_port = remote_port; 532 } else { 533 pt_cmd->se_lun = ec_cmd->se_lun; 534 pt_cmd->se_dev = ec_cmd->se_dev; 535 536 pr_debug("Honoring local SRC port from ec_cmd->se_dev:" 537 " %p\n", pt_cmd->se_dev); 538 pt_cmd->se_lun = ec_cmd->se_lun; 539 pr_debug("Honoring local SRC port from ec_cmd->se_lun: %p\n", 540 pt_cmd->se_lun); 541 } 542 } else { 543 /* 544 * Honor source port reservation for X-COPY PULL emulation 545 * when CDB is received on local desintation port, and READs 546 * blocks from the remote source port to WRITE on local 547 * destination port. 548 */ 549 if (remote_port) { 550 xpt_cmd->remote_port = remote_port; 551 } else { 552 pt_cmd->se_lun = ec_cmd->se_lun; 553 pt_cmd->se_dev = ec_cmd->se_dev; 554 555 pr_debug("Honoring local DST port from ec_cmd->se_dev:" 556 " %p\n", pt_cmd->se_dev); 557 pt_cmd->se_lun = ec_cmd->se_lun; 558 pr_debug("Honoring local DST port from ec_cmd->se_lun: %p\n", 559 pt_cmd->se_lun); 560 } 561 } 562 } 563 564 static void target_xcopy_init_pt_lun(struct se_device *se_dev, 565 struct se_cmd *pt_cmd, bool remote_port) 566 { 567 /* 568 * Don't allocate + init an pt_cmd->se_lun if honoring local port for 569 * reservations. The pt_cmd->se_lun pointer will be setup from within 570 * target_xcopy_setup_pt_port() 571 */ 572 if (remote_port) { 573 pr_debug("Setup emulated se_dev: %p from se_dev\n", 574 pt_cmd->se_dev); 575 pt_cmd->se_lun = &se_dev->xcopy_lun; 576 pt_cmd->se_dev = se_dev; 577 } 578 579 pt_cmd->se_cmd_flags |= SCF_SE_LUN_CMD; 580 } 581 582 static int target_xcopy_setup_pt_cmd( 583 struct xcopy_pt_cmd *xpt_cmd, 584 struct xcopy_op *xop, 585 struct se_device *se_dev, 586 unsigned char *cdb, 587 bool remote_port, 588 bool alloc_mem) 589 { 590 struct se_cmd *cmd = &xpt_cmd->se_cmd; 591 sense_reason_t sense_rc; 592 int ret = 0, rc; 593 /* 594 * Setup LUN+port to honor reservations based upon xop->op_origin for 595 * X-COPY PUSH or X-COPY PULL based upon where the CDB was received. 596 */ 597 target_xcopy_init_pt_lun(se_dev, cmd, remote_port); 598 target_xcopy_setup_pt_port(xpt_cmd, xop, remote_port); 599 600 cmd->tag = 0; 601 sense_rc = target_setup_cmd_from_cdb(cmd, cdb); 602 if (sense_rc) { 603 ret = -EINVAL; 604 goto out; 605 } 606 607 if (alloc_mem) { 608 rc = target_alloc_sgl(&cmd->t_data_sg, &cmd->t_data_nents, 609 cmd->data_length, false, false); 610 if (rc < 0) { 611 ret = rc; 612 goto out; 613 } 614 /* 615 * Set this bit so that transport_free_pages() allows the 616 * caller to release SGLs + physical memory allocated by 617 * transport_generic_get_mem().. 618 */ 619 cmd->se_cmd_flags |= SCF_PASSTHROUGH_SG_TO_MEM_NOALLOC; 620 } else { 621 /* 622 * Here the previously allocated SGLs for the internal READ 623 * are mapped zero-copy to the internal WRITE. 624 */ 625 sense_rc = transport_generic_map_mem_to_cmd(cmd, 626 xop->xop_data_sg, xop->xop_data_nents, 627 NULL, 0); 628 if (sense_rc) { 629 ret = -EINVAL; 630 goto out; 631 } 632 633 pr_debug("Setup PASSTHROUGH_NOALLOC t_data_sg: %p t_data_nents:" 634 " %u\n", cmd->t_data_sg, cmd->t_data_nents); 635 } 636 637 return 0; 638 639 out: 640 return ret; 641 } 642 643 static int target_xcopy_issue_pt_cmd(struct xcopy_pt_cmd *xpt_cmd) 644 { 645 struct se_cmd *se_cmd = &xpt_cmd->se_cmd; 646 sense_reason_t sense_rc; 647 648 sense_rc = transport_generic_new_cmd(se_cmd); 649 if (sense_rc) 650 return -EINVAL; 651 652 if (se_cmd->data_direction == DMA_TO_DEVICE) 653 target_execute_cmd(se_cmd); 654 655 wait_for_completion_interruptible(&xpt_cmd->xpt_passthrough_sem); 656 657 pr_debug("target_xcopy_issue_pt_cmd(): SCSI status: 0x%02x\n", 658 se_cmd->scsi_status); 659 660 return (se_cmd->scsi_status) ? -EINVAL : 0; 661 } 662 663 static int target_xcopy_read_source( 664 struct se_cmd *ec_cmd, 665 struct xcopy_op *xop, 666 struct se_device *src_dev, 667 sector_t src_lba, 668 u32 src_sectors) 669 { 670 struct xcopy_pt_cmd *xpt_cmd; 671 struct se_cmd *se_cmd; 672 u32 length = (src_sectors * src_dev->dev_attrib.block_size); 673 int rc; 674 unsigned char cdb[16]; 675 bool remote_port = (xop->op_origin == XCOL_DEST_RECV_OP); 676 677 xpt_cmd = kzalloc(sizeof(struct xcopy_pt_cmd), GFP_KERNEL); 678 if (!xpt_cmd) { 679 pr_err("Unable to allocate xcopy_pt_cmd\n"); 680 return -ENOMEM; 681 } 682 init_completion(&xpt_cmd->xpt_passthrough_sem); 683 se_cmd = &xpt_cmd->se_cmd; 684 685 memset(&cdb[0], 0, 16); 686 cdb[0] = READ_16; 687 put_unaligned_be64(src_lba, &cdb[2]); 688 put_unaligned_be32(src_sectors, &cdb[10]); 689 pr_debug("XCOPY: Built READ_16: LBA: %llu Sectors: %u Length: %u\n", 690 (unsigned long long)src_lba, src_sectors, length); 691 692 transport_init_se_cmd(se_cmd, &xcopy_pt_tfo, &xcopy_pt_sess, length, 693 DMA_FROM_DEVICE, 0, &xpt_cmd->sense_buffer[0]); 694 xop->src_pt_cmd = xpt_cmd; 695 696 rc = target_xcopy_setup_pt_cmd(xpt_cmd, xop, src_dev, &cdb[0], 697 remote_port, true); 698 if (rc < 0) { 699 ec_cmd->scsi_status = xpt_cmd->se_cmd.scsi_status; 700 transport_generic_free_cmd(se_cmd, 0); 701 return rc; 702 } 703 704 xop->xop_data_sg = se_cmd->t_data_sg; 705 xop->xop_data_nents = se_cmd->t_data_nents; 706 pr_debug("XCOPY-READ: Saved xop->xop_data_sg: %p, num: %u for READ" 707 " memory\n", xop->xop_data_sg, xop->xop_data_nents); 708 709 rc = target_xcopy_issue_pt_cmd(xpt_cmd); 710 if (rc < 0) { 711 ec_cmd->scsi_status = xpt_cmd->se_cmd.scsi_status; 712 transport_generic_free_cmd(se_cmd, 0); 713 return rc; 714 } 715 /* 716 * Clear off the allocated t_data_sg, that has been saved for 717 * zero-copy WRITE submission reuse in struct xcopy_op.. 718 */ 719 se_cmd->t_data_sg = NULL; 720 se_cmd->t_data_nents = 0; 721 722 return 0; 723 } 724 725 static int target_xcopy_write_destination( 726 struct se_cmd *ec_cmd, 727 struct xcopy_op *xop, 728 struct se_device *dst_dev, 729 sector_t dst_lba, 730 u32 dst_sectors) 731 { 732 struct xcopy_pt_cmd *xpt_cmd; 733 struct se_cmd *se_cmd; 734 u32 length = (dst_sectors * dst_dev->dev_attrib.block_size); 735 int rc; 736 unsigned char cdb[16]; 737 bool remote_port = (xop->op_origin == XCOL_SOURCE_RECV_OP); 738 739 xpt_cmd = kzalloc(sizeof(struct xcopy_pt_cmd), GFP_KERNEL); 740 if (!xpt_cmd) { 741 pr_err("Unable to allocate xcopy_pt_cmd\n"); 742 return -ENOMEM; 743 } 744 init_completion(&xpt_cmd->xpt_passthrough_sem); 745 se_cmd = &xpt_cmd->se_cmd; 746 747 memset(&cdb[0], 0, 16); 748 cdb[0] = WRITE_16; 749 put_unaligned_be64(dst_lba, &cdb[2]); 750 put_unaligned_be32(dst_sectors, &cdb[10]); 751 pr_debug("XCOPY: Built WRITE_16: LBA: %llu Sectors: %u Length: %u\n", 752 (unsigned long long)dst_lba, dst_sectors, length); 753 754 transport_init_se_cmd(se_cmd, &xcopy_pt_tfo, &xcopy_pt_sess, length, 755 DMA_TO_DEVICE, 0, &xpt_cmd->sense_buffer[0]); 756 xop->dst_pt_cmd = xpt_cmd; 757 758 rc = target_xcopy_setup_pt_cmd(xpt_cmd, xop, dst_dev, &cdb[0], 759 remote_port, false); 760 if (rc < 0) { 761 struct se_cmd *src_cmd = &xop->src_pt_cmd->se_cmd; 762 ec_cmd->scsi_status = xpt_cmd->se_cmd.scsi_status; 763 /* 764 * If the failure happened before the t_mem_list hand-off in 765 * target_xcopy_setup_pt_cmd(), Reset memory + clear flag so that 766 * core releases this memory on error during X-COPY WRITE I/O. 767 */ 768 src_cmd->se_cmd_flags &= ~SCF_PASSTHROUGH_SG_TO_MEM_NOALLOC; 769 src_cmd->t_data_sg = xop->xop_data_sg; 770 src_cmd->t_data_nents = xop->xop_data_nents; 771 772 transport_generic_free_cmd(se_cmd, 0); 773 return rc; 774 } 775 776 rc = target_xcopy_issue_pt_cmd(xpt_cmd); 777 if (rc < 0) { 778 ec_cmd->scsi_status = xpt_cmd->se_cmd.scsi_status; 779 se_cmd->se_cmd_flags &= ~SCF_PASSTHROUGH_SG_TO_MEM_NOALLOC; 780 transport_generic_free_cmd(se_cmd, 0); 781 return rc; 782 } 783 784 return 0; 785 } 786 787 static void target_xcopy_do_work(struct work_struct *work) 788 { 789 struct xcopy_op *xop = container_of(work, struct xcopy_op, xop_work); 790 struct se_cmd *ec_cmd = xop->xop_se_cmd; 791 struct se_device *src_dev, *dst_dev; 792 sector_t src_lba, dst_lba, end_lba; 793 unsigned int max_sectors; 794 int rc = 0; 795 unsigned short nolb, cur_nolb, max_nolb, copied_nolb = 0; 796 797 if (target_parse_xcopy_cmd(xop) != TCM_NO_SENSE) 798 goto err_free; 799 800 if (WARN_ON_ONCE(!xop->src_dev) || WARN_ON_ONCE(!xop->dst_dev)) 801 goto err_free; 802 803 src_dev = xop->src_dev; 804 dst_dev = xop->dst_dev; 805 src_lba = xop->src_lba; 806 dst_lba = xop->dst_lba; 807 nolb = xop->nolb; 808 end_lba = src_lba + nolb; 809 /* 810 * Break up XCOPY I/O into hw_max_sectors sized I/O based on the 811 * smallest max_sectors between src_dev + dev_dev, or 812 */ 813 max_sectors = min(src_dev->dev_attrib.hw_max_sectors, 814 dst_dev->dev_attrib.hw_max_sectors); 815 max_sectors = min_t(u32, max_sectors, XCOPY_MAX_SECTORS); 816 817 max_nolb = min_t(u16, max_sectors, ((u16)(~0U))); 818 819 pr_debug("target_xcopy_do_work: nolb: %hu, max_nolb: %hu end_lba: %llu\n", 820 nolb, max_nolb, (unsigned long long)end_lba); 821 pr_debug("target_xcopy_do_work: Starting src_lba: %llu, dst_lba: %llu\n", 822 (unsigned long long)src_lba, (unsigned long long)dst_lba); 823 824 while (src_lba < end_lba) { 825 cur_nolb = min(nolb, max_nolb); 826 827 pr_debug("target_xcopy_do_work: Calling read src_dev: %p src_lba: %llu," 828 " cur_nolb: %hu\n", src_dev, (unsigned long long)src_lba, cur_nolb); 829 830 rc = target_xcopy_read_source(ec_cmd, xop, src_dev, src_lba, cur_nolb); 831 if (rc < 0) 832 goto out; 833 834 src_lba += cur_nolb; 835 pr_debug("target_xcopy_do_work: Incremented READ src_lba to %llu\n", 836 (unsigned long long)src_lba); 837 838 pr_debug("target_xcopy_do_work: Calling write dst_dev: %p dst_lba: %llu," 839 " cur_nolb: %hu\n", dst_dev, (unsigned long long)dst_lba, cur_nolb); 840 841 rc = target_xcopy_write_destination(ec_cmd, xop, dst_dev, 842 dst_lba, cur_nolb); 843 if (rc < 0) { 844 transport_generic_free_cmd(&xop->src_pt_cmd->se_cmd, 0); 845 goto out; 846 } 847 848 dst_lba += cur_nolb; 849 pr_debug("target_xcopy_do_work: Incremented WRITE dst_lba to %llu\n", 850 (unsigned long long)dst_lba); 851 852 copied_nolb += cur_nolb; 853 nolb -= cur_nolb; 854 855 transport_generic_free_cmd(&xop->src_pt_cmd->se_cmd, 0); 856 xop->dst_pt_cmd->se_cmd.se_cmd_flags &= ~SCF_PASSTHROUGH_SG_TO_MEM_NOALLOC; 857 858 transport_generic_free_cmd(&xop->dst_pt_cmd->se_cmd, 0); 859 } 860 861 xcopy_pt_undepend_remotedev(xop); 862 kfree(xop); 863 864 pr_debug("target_xcopy_do_work: Final src_lba: %llu, dst_lba: %llu\n", 865 (unsigned long long)src_lba, (unsigned long long)dst_lba); 866 pr_debug("target_xcopy_do_work: Blocks copied: %hu, Bytes Copied: %u\n", 867 copied_nolb, copied_nolb * dst_dev->dev_attrib.block_size); 868 869 pr_debug("target_xcopy_do_work: Setting X-COPY GOOD status -> sending response\n"); 870 target_complete_cmd(ec_cmd, SAM_STAT_GOOD); 871 return; 872 873 out: 874 xcopy_pt_undepend_remotedev(xop); 875 876 err_free: 877 kfree(xop); 878 /* 879 * Don't override an error scsi status if it has already been set 880 */ 881 if (ec_cmd->scsi_status == SAM_STAT_GOOD) { 882 pr_warn_ratelimited("target_xcopy_do_work: rc: %d, Setting X-COPY" 883 " CHECK_CONDITION -> sending response\n", rc); 884 ec_cmd->scsi_status = SAM_STAT_CHECK_CONDITION; 885 } 886 target_complete_cmd(ec_cmd, ec_cmd->scsi_status); 887 } 888 889 /* 890 * Returns TCM_NO_SENSE upon success or a sense code != TCM_NO_SENSE if parsing 891 * fails. 892 */ 893 static sense_reason_t target_parse_xcopy_cmd(struct xcopy_op *xop) 894 { 895 struct se_cmd *se_cmd = xop->xop_se_cmd; 896 unsigned char *p = NULL, *seg_desc; 897 unsigned int list_id, list_id_usage, sdll, inline_dl; 898 sense_reason_t ret = TCM_INVALID_PARAMETER_LIST; 899 int rc; 900 unsigned short tdll; 901 902 p = transport_kmap_data_sg(se_cmd); 903 if (!p) { 904 pr_err("transport_kmap_data_sg() failed in target_do_xcopy\n"); 905 return TCM_OUT_OF_RESOURCES; 906 } 907 908 list_id = p[0]; 909 list_id_usage = (p[1] & 0x18) >> 3; 910 911 /* 912 * Determine TARGET DESCRIPTOR LIST LENGTH + SEGMENT DESCRIPTOR LIST LENGTH 913 */ 914 tdll = get_unaligned_be16(&p[2]); 915 sdll = get_unaligned_be32(&p[8]); 916 if (tdll + sdll > RCR_OP_MAX_DESC_LIST_LEN) { 917 pr_err("XCOPY descriptor list length %u exceeds maximum %u\n", 918 tdll + sdll, RCR_OP_MAX_DESC_LIST_LEN); 919 ret = TCM_PARAMETER_LIST_LENGTH_ERROR; 920 goto out; 921 } 922 923 inline_dl = get_unaligned_be32(&p[12]); 924 if (inline_dl != 0) { 925 pr_err("XCOPY with non zero inline data length\n"); 926 goto out; 927 } 928 929 if (se_cmd->data_length < (XCOPY_HDR_LEN + tdll + sdll + inline_dl)) { 930 pr_err("XCOPY parameter truncation: data length %u too small " 931 "for tdll: %hu sdll: %u inline_dl: %u\n", 932 se_cmd->data_length, tdll, sdll, inline_dl); 933 ret = TCM_PARAMETER_LIST_LENGTH_ERROR; 934 goto out; 935 } 936 937 pr_debug("Processing XCOPY with list_id: 0x%02x list_id_usage: 0x%02x" 938 " tdll: %hu sdll: %u inline_dl: %u\n", list_id, list_id_usage, 939 tdll, sdll, inline_dl); 940 941 /* 942 * skip over the target descriptors until segment descriptors 943 * have been passed - CSCD ids are needed to determine src and dest. 944 */ 945 seg_desc = &p[16] + tdll; 946 947 rc = target_xcopy_parse_segment_descriptors(se_cmd, xop, seg_desc, 948 sdll, &ret); 949 if (rc <= 0) 950 goto out; 951 952 pr_debug("XCOPY: Processed %d segment descriptors, length: %u\n", rc, 953 rc * XCOPY_SEGMENT_DESC_LEN); 954 955 rc = target_xcopy_parse_target_descriptors(se_cmd, xop, &p[16], tdll, &ret); 956 if (rc <= 0) 957 goto out; 958 959 if (xop->src_dev->dev_attrib.block_size != 960 xop->dst_dev->dev_attrib.block_size) { 961 pr_err("XCOPY: Non matching src_dev block_size: %u + dst_dev" 962 " block_size: %u currently unsupported\n", 963 xop->src_dev->dev_attrib.block_size, 964 xop->dst_dev->dev_attrib.block_size); 965 xcopy_pt_undepend_remotedev(xop); 966 ret = TCM_LOGICAL_UNIT_COMMUNICATION_FAILURE; 967 goto out; 968 } 969 970 pr_debug("XCOPY: Processed %d target descriptors, length: %u\n", rc, 971 rc * XCOPY_TARGET_DESC_LEN); 972 transport_kunmap_data_sg(se_cmd); 973 return TCM_NO_SENSE; 974 975 out: 976 if (p) 977 transport_kunmap_data_sg(se_cmd); 978 return ret; 979 } 980 981 sense_reason_t target_do_xcopy(struct se_cmd *se_cmd) 982 { 983 struct se_device *dev = se_cmd->se_dev; 984 struct xcopy_op *xop; 985 unsigned int sa; 986 987 if (!dev->dev_attrib.emulate_3pc) { 988 pr_err("EXTENDED_COPY operation explicitly disabled\n"); 989 return TCM_UNSUPPORTED_SCSI_OPCODE; 990 } 991 992 sa = se_cmd->t_task_cdb[1] & 0x1f; 993 if (sa != 0x00) { 994 pr_err("EXTENDED_COPY(LID4) not supported\n"); 995 return TCM_UNSUPPORTED_SCSI_OPCODE; 996 } 997 998 if (se_cmd->data_length == 0) { 999 target_complete_cmd(se_cmd, SAM_STAT_GOOD); 1000 return TCM_NO_SENSE; 1001 } 1002 if (se_cmd->data_length < XCOPY_HDR_LEN) { 1003 pr_err("XCOPY parameter truncation: length %u < hdr_len %u\n", 1004 se_cmd->data_length, XCOPY_HDR_LEN); 1005 return TCM_PARAMETER_LIST_LENGTH_ERROR; 1006 } 1007 1008 xop = kzalloc(sizeof(struct xcopy_op), GFP_KERNEL); 1009 if (!xop) 1010 goto err; 1011 xop->xop_se_cmd = se_cmd; 1012 INIT_WORK(&xop->xop_work, target_xcopy_do_work); 1013 if (WARN_ON_ONCE(!queue_work(xcopy_wq, &xop->xop_work))) 1014 goto free; 1015 return TCM_NO_SENSE; 1016 1017 free: 1018 kfree(xop); 1019 1020 err: 1021 return TCM_OUT_OF_RESOURCES; 1022 } 1023 1024 static sense_reason_t target_rcr_operating_parameters(struct se_cmd *se_cmd) 1025 { 1026 unsigned char *p; 1027 1028 p = transport_kmap_data_sg(se_cmd); 1029 if (!p) { 1030 pr_err("transport_kmap_data_sg failed in" 1031 " target_rcr_operating_parameters\n"); 1032 return TCM_OUT_OF_RESOURCES; 1033 } 1034 1035 if (se_cmd->data_length < 54) { 1036 pr_err("Receive Copy Results Op Parameters length" 1037 " too small: %u\n", se_cmd->data_length); 1038 transport_kunmap_data_sg(se_cmd); 1039 return TCM_INVALID_CDB_FIELD; 1040 } 1041 /* 1042 * Set SNLID=1 (Supports no List ID) 1043 */ 1044 p[4] = 0x1; 1045 /* 1046 * MAXIMUM TARGET DESCRIPTOR COUNT 1047 */ 1048 put_unaligned_be16(RCR_OP_MAX_TARGET_DESC_COUNT, &p[8]); 1049 /* 1050 * MAXIMUM SEGMENT DESCRIPTOR COUNT 1051 */ 1052 put_unaligned_be16(RCR_OP_MAX_SG_DESC_COUNT, &p[10]); 1053 /* 1054 * MAXIMUM DESCRIPTOR LIST LENGTH 1055 */ 1056 put_unaligned_be32(RCR_OP_MAX_DESC_LIST_LEN, &p[12]); 1057 /* 1058 * MAXIMUM SEGMENT LENGTH 1059 */ 1060 put_unaligned_be32(RCR_OP_MAX_SEGMENT_LEN, &p[16]); 1061 /* 1062 * MAXIMUM INLINE DATA LENGTH for SA 0x04 (NOT SUPPORTED) 1063 */ 1064 put_unaligned_be32(0x0, &p[20]); 1065 /* 1066 * HELD DATA LIMIT 1067 */ 1068 put_unaligned_be32(0x0, &p[24]); 1069 /* 1070 * MAXIMUM STREAM DEVICE TRANSFER SIZE 1071 */ 1072 put_unaligned_be32(0x0, &p[28]); 1073 /* 1074 * TOTAL CONCURRENT COPIES 1075 */ 1076 put_unaligned_be16(RCR_OP_TOTAL_CONCURR_COPIES, &p[34]); 1077 /* 1078 * MAXIMUM CONCURRENT COPIES 1079 */ 1080 p[36] = RCR_OP_MAX_CONCURR_COPIES; 1081 /* 1082 * DATA SEGMENT GRANULARITY (log 2) 1083 */ 1084 p[37] = RCR_OP_DATA_SEG_GRAN_LOG2; 1085 /* 1086 * INLINE DATA GRANULARITY log 2) 1087 */ 1088 p[38] = RCR_OP_INLINE_DATA_GRAN_LOG2; 1089 /* 1090 * HELD DATA GRANULARITY 1091 */ 1092 p[39] = RCR_OP_HELD_DATA_GRAN_LOG2; 1093 /* 1094 * IMPLEMENTED DESCRIPTOR LIST LENGTH 1095 */ 1096 p[43] = 0x2; 1097 /* 1098 * List of implemented descriptor type codes (ordered) 1099 */ 1100 p[44] = 0x02; /* Copy Block to Block device */ 1101 p[45] = 0xe4; /* Identification descriptor target descriptor */ 1102 1103 /* 1104 * AVAILABLE DATA (n-3) 1105 */ 1106 put_unaligned_be32(42, &p[0]); 1107 1108 transport_kunmap_data_sg(se_cmd); 1109 target_complete_cmd(se_cmd, GOOD); 1110 1111 return TCM_NO_SENSE; 1112 } 1113 1114 sense_reason_t target_do_receive_copy_results(struct se_cmd *se_cmd) 1115 { 1116 unsigned char *cdb = &se_cmd->t_task_cdb[0]; 1117 int sa = (cdb[1] & 0x1f), list_id = cdb[2]; 1118 sense_reason_t rc = TCM_NO_SENSE; 1119 1120 pr_debug("Entering target_do_receive_copy_results: SA: 0x%02x, List ID:" 1121 " 0x%02x, AL: %u\n", sa, list_id, se_cmd->data_length); 1122 1123 if (list_id != 0) { 1124 pr_err("Receive Copy Results with non zero list identifier" 1125 " not supported\n"); 1126 return TCM_INVALID_CDB_FIELD; 1127 } 1128 1129 switch (sa) { 1130 case RCR_SA_OPERATING_PARAMETERS: 1131 rc = target_rcr_operating_parameters(se_cmd); 1132 break; 1133 case RCR_SA_COPY_STATUS: 1134 case RCR_SA_RECEIVE_DATA: 1135 case RCR_SA_FAILED_SEGMENT_DETAILS: 1136 default: 1137 pr_err("Unsupported SA for receive copy results: 0x%02x\n", sa); 1138 return TCM_INVALID_CDB_FIELD; 1139 } 1140 1141 return rc; 1142 } 1143