drivers/target/target_core_spc.c

   1 /*
   2  * SCSI Primary Commands (SPC) parsing and emulation.
   3  *
   4  * (c) Copyright 2002-2013 Datera, Inc.
   5  *
   6  * Nicholas A. Bellinger <nab@kernel.org>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  21  */
  22
  23 #include <linux/kernel.h>
  24 #include <linux/module.h>
  25 #include <asm/unaligned.h>
  26
  27 #include <scsi/scsi.h>
  28 #include <scsi/scsi_tcq.h>
  29
  30 #include <target/target_core_base.h>
  31 #include <target/target_core_backend.h>
  32 #include <target/target_core_fabric.h>
  33
  34 #include "target_core_internal.h"
  35 #include "target_core_alua.h"
  36 #include "target_core_pr.h"
  37 #include "target_core_ua.h"
  38 #include "target_core_xcopy.h"
  39
  40 static void spc_fill_alua_data(struct se_port *port, unsigned char *buf)
  41 {
  42         struct t10_alua_tg_pt_gp *tg_pt_gp;
  43         struct t10_alua_tg_pt_gp_member *tg_pt_gp_mem;
  44
  45         /*
  46          * Set SCCS for MAINTENANCE_IN + REPORT_TARGET_PORT_GROUPS.
  47          */
  48         buf[5]  = 0x80;
  49
  50         /*
  51          * Set TPGS field for explicit and/or implicit ALUA access type
  52          * and opteration.
  53          *
  54          * See spc4r17 section 6.4.2 Table 135
  55          */
  56         if (!port)
  57                 return;
  58         tg_pt_gp_mem = port->sep_alua_tg_pt_gp_mem;
  59         if (!tg_pt_gp_mem)
  60                 return;
  61
  62         spin_lock(&tg_pt_gp_mem->tg_pt_gp_mem_lock);
  63         tg_pt_gp = tg_pt_gp_mem->tg_pt_gp;
  64         if (tg_pt_gp)
  65                 buf[5] |= tg_pt_gp->tg_pt_gp_alua_access_type;
  66         spin_unlock(&tg_pt_gp_mem->tg_pt_gp_mem_lock);
  67 }
  68
  69 sense_reason_t
  70 spc_emulate_inquiry_std(struct se_cmd *cmd, unsigned char *buf)
  71 {
  72         struct se_lun *lun = cmd->se_lun;
  73         struct se_device *dev = cmd->se_dev;
  74         struct se_session *sess = cmd->se_sess;
  75
  76         /* Set RMB (removable media) for tape devices */
  77         if (dev->transport->get_device_type(dev) == TYPE_TAPE)
  78                 buf[1] = 0x80;
  79
  80         buf[2] = 0x05; /* SPC-3 */
  81
  82         /*
  83          * NORMACA and HISUP = 0, RESPONSE DATA FORMAT = 2
  84          *
  85          * SPC4 says:
  86          *   A RESPONSE DATA FORMAT field set to 2h indicates that the
  87          *   standard INQUIRY data is in the format defined in this
  88          *   standard. Response data format values less than 2h are
  89          *   obsolete. Response data format values greater than 2h are
  90          *   reserved.
  91          */
  92         buf[3] = 2;
  93
  94         /*
  95          * Enable SCCS and TPGS fields for Emulated ALUA
  96          */
  97         spc_fill_alua_data(lun->lun_sep, buf);
  98
  99         /*
 100          * Set Third-Party Copy (3PC) bit to indicate support for EXTENDED_COPY
 101          */
 102         if (dev->dev_attrib.emulate_3pc)
 103                 buf[5] |= 0x8;
 104         /*
 105          * Set Protection (PROTECT) bit when DIF has been enabled on the
 106          * device, and the transport supports VERIFY + PASS.
 107          */
 108         if (sess->sup_prot_ops & (TARGET_PROT_DIN_PASS | TARGET_PROT_DOUT_PASS)) {
 109                 if (dev->dev_attrib.pi_prot_type)
 110                         buf[5] |= 0x1;
 111         }
 112
 113         buf[7] = 0x2; /* CmdQue=1 */
 114
 115         memcpy(&buf[8], "LIO-ORG ", 8);
 116         memset(&buf[16], 0x20, 16);
 117         memcpy(&buf[16], dev->t10_wwn.model,
 118                min_t(size_t, strlen(dev->t10_wwn.model), 16));
 119         memcpy(&buf[32], dev->t10_wwn.revision,
 120                min_t(size_t, strlen(dev->t10_wwn.revision), 4));
 121         buf[4] = 31; /* Set additional length to 31 */
 122
 123         return 0;
 124 }
 125 EXPORT_SYMBOL(spc_emulate_inquiry_std);
 126
 127 /* unit serial number */
 128 static sense_reason_t
 129 spc_emulate_evpd_80(struct se_cmd *cmd, unsigned char *buf)
 130 {
 131         struct se_device *dev = cmd->se_dev;
 132         u16 len;
 133
 134         if (dev->dev_flags & DF_EMULATED_VPD_UNIT_SERIAL) {
 135                 len = sprintf(&buf[4], "%s", dev->t10_wwn.unit_serial);
 136                 len++; /* Extra Byte for NULL Terminator */
 137                 buf[3] = len;
 138         }
 139         return 0;
 140 }
 141
 142 void spc_parse_naa_6h_vendor_specific(struct se_device *dev,
 143                                       unsigned char *buf)
 144 {
 145         unsigned char *p = &dev->t10_wwn.unit_serial[0];
 146         int cnt;
 147         bool next = true;
 148
 149         /*
 150          * Generate up to 36 bits of VENDOR SPECIFIC IDENTIFIER starting on
 151          * byte 3 bit 3-0 for NAA IEEE Registered Extended DESIGNATOR field
 152          * format, followed by 64 bits of VENDOR SPECIFIC IDENTIFIER EXTENSION
 153          * to complete the payload.  These are based from VPD=0x80 PRODUCT SERIAL
 154          * NUMBER set via vpd_unit_serial in target_core_configfs.c to ensure
 155          * per device uniqeness.
 156          */
 157         for (cnt = 0; *p && cnt < 13; p++) {
 158                 int val = hex_to_bin(*p);
 159
 160                 if (val < 0)
 161                         continue;
 162
 163                 if (next) {
 164                         next = false;
 165                         buf[cnt++] |= val;
 166                 } else {
 167                         next = true;
 168                         buf[cnt] = val << 4;
 169                 }
 170         }
 171 }
 172
 173 /*
 174  * Device identification VPD, for a complete list of
 175  * DESIGNATOR TYPEs see spc4r17 Table 459.
 176  */
 177 sense_reason_t
 178 spc_emulate_evpd_83(struct se_cmd *cmd, unsigned char *buf)
 179 {
 180         struct se_device *dev = cmd->se_dev;
 181         struct se_lun *lun = cmd->se_lun;
 182         struct se_port *port = NULL;
 183         struct se_portal_group *tpg = NULL;
 184         struct t10_alua_lu_gp_member *lu_gp_mem;
 185         struct t10_alua_tg_pt_gp *tg_pt_gp;
 186         struct t10_alua_tg_pt_gp_member *tg_pt_gp_mem;
 187         unsigned char *prod = &dev->t10_wwn.model[0];
 188         u32 prod_len;
 189         u32 unit_serial_len, off = 0;
 190         u16 len = 0, id_len;
 191
 192         off = 4;
 193
 194         /*
 195          * NAA IEEE Registered Extended Assigned designator format, see
 196          * spc4r17 section 7.7.3.6.5
 197          *
 198          * We depend upon a target_core_mod/ConfigFS provided
 199          * /sys/kernel/config/target/core/$HBA/$DEV/wwn/vpd_unit_serial
 200          * value in order to return the NAA id.
 201          */
 202         if (!(dev->dev_flags & DF_EMULATED_VPD_UNIT_SERIAL))
 203                 goto check_t10_vend_desc;
 204
 205         /* CODE SET == Binary */
 206         buf[off++] = 0x1;
 207
 208         /* Set ASSOCIATION == addressed logical unit: 0)b */
 209         buf[off] = 0x00;
 210
 211         /* Identifier/Designator type == NAA identifier */
 212         buf[off++] |= 0x3;
 213         off++;
 214
 215         /* Identifier/Designator length */
 216         buf[off++] = 0x10;
 217
 218         /*
 219          * Start NAA IEEE Registered Extended Identifier/Designator
 220          */
 221         buf[off++] = (0x6 << 4);
 222
 223         /*
 224          * Use OpenFabrics IEEE Company ID: 00 14 05
 225          */
 226         buf[off++] = 0x01;
 227         buf[off++] = 0x40;
 228         buf[off] = (0x5 << 4);
 229
 230         /*
 231          * Return ConfigFS Unit Serial Number information for
 232          * VENDOR_SPECIFIC_IDENTIFIER and
 233          * VENDOR_SPECIFIC_IDENTIFIER_EXTENTION
 234          */
 235         spc_parse_naa_6h_vendor_specific(dev, &buf[off]);
 236
 237         len = 20;
 238         off = (len + 4);
 239
 240 check_t10_vend_desc:
 241         /*
 242          * T10 Vendor Identifier Page, see spc4r17 section 7.7.3.4
 243          */
 244         id_len = 8; /* For Vendor field */
 245         prod_len = 4; /* For VPD Header */
 246         prod_len += 8; /* For Vendor field */
 247         prod_len += strlen(prod);
 248         prod_len++; /* For : */
 249
 250         if (dev->dev_flags & DF_EMULATED_VPD_UNIT_SERIAL) {
 251                 unit_serial_len = strlen(&dev->t10_wwn.unit_serial[0]);
 252                 unit_serial_len++; /* For NULL Terminator */
 253
 254                 id_len += sprintf(&buf[off+12], "%s:%s", prod,
 255                                 &dev->t10_wwn.unit_serial[0]);
 256         }
 257         buf[off] = 0x2; /* ASCII */
 258         buf[off+1] = 0x1; /* T10 Vendor ID */
 259         buf[off+2] = 0x0;
 260         memcpy(&buf[off+4], "LIO-ORG", 8);
 261         /* Extra Byte for NULL Terminator */
 262         id_len++;
 263         /* Identifier Length */
 264         buf[off+3] = id_len;
 265         /* Header size for Designation descriptor */
 266         len += (id_len + 4);
 267         off += (id_len + 4);
 268         /*
 269          * struct se_port is only set for INQUIRY VPD=1 through $FABRIC_MOD
 270          */
 271         port = lun->lun_sep;
 272         if (port) {
 273                 struct t10_alua_lu_gp *lu_gp;
 274                 u32 padding, scsi_name_len, scsi_target_len;
 275                 u16 lu_gp_id = 0;
 276                 u16 tg_pt_gp_id = 0;
 277                 u16 tpgt;
 278
 279                 tpg = port->sep_tpg;
 280                 /*
 281                  * Relative target port identifer, see spc4r17
 282                  * section 7.7.3.7
 283                  *
 284                  * Get the PROTOCOL IDENTIFIER as defined by spc4r17
 285                  * section 7.5.1 Table 362
 286                  */
 287                 buf[off] =
 288                         (tpg->se_tpg_tfo->get_fabric_proto_ident(tpg) << 4);
 289                 buf[off++] |= 0x1; /* CODE SET == Binary */
 290                 buf[off] = 0x80; /* Set PIV=1 */
 291                 /* Set ASSOCIATION == target port: 01b */
 292                 buf[off] |= 0x10;
 293                 /* DESIGNATOR TYPE == Relative target port identifer */
 294                 buf[off++] |= 0x4;
 295                 off++; /* Skip over Reserved */
 296                 buf[off++] = 4; /* DESIGNATOR LENGTH */
 297                 /* Skip over Obsolete field in RTPI payload
 298                  * in Table 472 */
 299                 off += 2;
 300                 buf[off++] = ((port->sep_rtpi >> 8) & 0xff);
 301                 buf[off++] = (port->sep_rtpi & 0xff);
 302                 len += 8; /* Header size + Designation descriptor */
 303                 /*
 304                  * Target port group identifier, see spc4r17
 305                  * section 7.7.3.8
 306                  *
 307                  * Get the PROTOCOL IDENTIFIER as defined by spc4r17
 308                  * section 7.5.1 Table 362
 309                  */
 310                 tg_pt_gp_mem = port->sep_alua_tg_pt_gp_mem;
 311                 if (!tg_pt_gp_mem)
 312                         goto check_lu_gp;
 313
 314                 spin_lock(&tg_pt_gp_mem->tg_pt_gp_mem_lock);
 315                 tg_pt_gp = tg_pt_gp_mem->tg_pt_gp;
 316                 if (!tg_pt_gp) {
 317                         spin_unlock(&tg_pt_gp_mem->tg_pt_gp_mem_lock);
 318                         goto check_lu_gp;
 319                 }
 320                 tg_pt_gp_id = tg_pt_gp->tg_pt_gp_id;
 321                 spin_unlock(&tg_pt_gp_mem->tg_pt_gp_mem_lock);
 322
 323                 buf[off] =
 324                         (tpg->se_tpg_tfo->get_fabric_proto_ident(tpg) << 4);
 325                 buf[off++] |= 0x1; /* CODE SET == Binary */
 326                 buf[off] = 0x80; /* Set PIV=1 */
 327                 /* Set ASSOCIATION == target port: 01b */
 328                 buf[off] |= 0x10;
 329                 /* DESIGNATOR TYPE == Target port group identifier */
 330                 buf[off++] |= 0x5;
 331                 off++; /* Skip over Reserved */
 332                 buf[off++] = 4; /* DESIGNATOR LENGTH */
 333                 off += 2; /* Skip over Reserved Field */
 334                 buf[off++] = ((tg_pt_gp_id >> 8) & 0xff);
 335                 buf[off++] = (tg_pt_gp_id & 0xff);
 336                 len += 8; /* Header size + Designation descriptor */
 337                 /*
 338                  * Logical Unit Group identifier, see spc4r17
 339                  * section 7.7.3.8
 340                  */
 341 check_lu_gp:
 342                 lu_gp_mem = dev->dev_alua_lu_gp_mem;
 343                 if (!lu_gp_mem)
 344                         goto check_scsi_name;
 345
 346                 spin_lock(&lu_gp_mem->lu_gp_mem_lock);
 347                 lu_gp = lu_gp_mem->lu_gp;
 348                 if (!lu_gp) {
 349                         spin_unlock(&lu_gp_mem->lu_gp_mem_lock);
 350                         goto check_scsi_name;
 351                 }
 352                 lu_gp_id = lu_gp->lu_gp_id;
 353                 spin_unlock(&lu_gp_mem->lu_gp_mem_lock);
 354
 355                 buf[off++] |= 0x1; /* CODE SET == Binary */
 356                 /* DESIGNATOR TYPE == Logical Unit Group identifier */
 357                 buf[off++] |= 0x6;
 358                 off++; /* Skip over Reserved */
 359                 buf[off++] = 4; /* DESIGNATOR LENGTH */
 360                 off += 2; /* Skip over Reserved Field */
 361                 buf[off++] = ((lu_gp_id >> 8) & 0xff);
 362                 buf[off++] = (lu_gp_id & 0xff);
 363                 len += 8; /* Header size + Designation descriptor */
 364                 /*
 365                  * SCSI name string designator, see spc4r17
 366                  * section 7.7.3.11
 367                  *
 368                  * Get the PROTOCOL IDENTIFIER as defined by spc4r17
 369                  * section 7.5.1 Table 362
 370                  */
 371 check_scsi_name:
 372                 buf[off] =
 373                         (tpg->se_tpg_tfo->get_fabric_proto_ident(tpg) << 4);
 374                 buf[off++] |= 0x3; /* CODE SET == UTF-8 */
 375                 buf[off] = 0x80; /* Set PIV=1 */
 376                 /* Set ASSOCIATION == target port: 01b */
 377                 buf[off] |= 0x10;
 378                 /* DESIGNATOR TYPE == SCSI name string */
 379                 buf[off++] |= 0x8;
 380                 off += 2; /* Skip over Reserved and length */
 381                 /*
 382                  * SCSI name string identifer containing, $FABRIC_MOD
 383                  * dependent information.  For LIO-Target and iSCSI
 384                  * Target Port, this means "<iSCSI name>,t,0x<TPGT> in
 385                  * UTF-8 encoding.
 386                  */
 387                 tpgt = tpg->se_tpg_tfo->tpg_get_tag(tpg);
 388                 scsi_name_len = sprintf(&buf[off], "%s,t,0x%04x",
 389                                         tpg->se_tpg_tfo->tpg_get_wwn(tpg), tpgt);
 390                 scsi_name_len += 1 /* Include  NULL terminator */;
 391                 /*
 392                  * The null-terminated, null-padded (see 4.4.2) SCSI
 393                  * NAME STRING field contains a UTF-8 format string.
 394                  * The number of bytes in the SCSI NAME STRING field
 395                  * (i.e., the value in the DESIGNATOR LENGTH field)
 396                  * shall be no larger than 256 and shall be a multiple
 397                  * of four.
 398                  */
 399                 padding = ((-scsi_name_len) & 3);
 400                 if (padding)
 401                         scsi_name_len += padding;
 402                 if (scsi_name_len > 256)
 403                         scsi_name_len = 256;
 404
 405                 buf[off-1] = scsi_name_len;
 406                 off += scsi_name_len;
 407                 /* Header size + Designation descriptor */
 408                 len += (scsi_name_len + 4);
 409
 410                 /*
 411                  * Target device designator
 412                  */
 413                 buf[off] =
 414                         (tpg->se_tpg_tfo->get_fabric_proto_ident(tpg) << 4);
 415                 buf[off++] |= 0x3; /* CODE SET == UTF-8 */
 416                 buf[off] = 0x80; /* Set PIV=1 */
 417                 /* Set ASSOCIATION == target device: 10b */
 418                 buf[off] |= 0x20;
 419                 /* DESIGNATOR TYPE == SCSI name string */
 420                 buf[off++] |= 0x8;
 421                 off += 2; /* Skip over Reserved and length */
 422                 /*
 423                  * SCSI name string identifer containing, $FABRIC_MOD
 424                  * dependent information.  For LIO-Target and iSCSI
 425                  * Target Port, this means "<iSCSI name>" in
 426                  * UTF-8 encoding.
 427                  */
 428                 scsi_target_len = sprintf(&buf[off], "%s",
 429                                           tpg->se_tpg_tfo->tpg_get_wwn(tpg));
 430                 scsi_target_len += 1 /* Include  NULL terminator */;
 431                 /*
 432                  * The null-terminated, null-padded (see 4.4.2) SCSI
 433                  * NAME STRING field contains a UTF-8 format string.
 434                  * The number of bytes in the SCSI NAME STRING field
 435                  * (i.e., the value in the DESIGNATOR LENGTH field)
 436                  * shall be no larger than 256 and shall be a multiple
 437                  * of four.
 438                  */
 439                 padding = ((-scsi_target_len) & 3);
 440                 if (padding)
 441                         scsi_target_len += padding;
 442                 if (scsi_target_len > 256)
 443                         scsi_target_len = 256;
 444
 445                 buf[off-1] = scsi_target_len;
 446                 off += scsi_target_len;
 447
 448                 /* Header size + Designation descriptor */
 449                 len += (scsi_target_len + 4);
 450         }
 451         buf[2] = ((len >> 8) & 0xff);
 452         buf[3] = (len & 0xff); /* Page Length for VPD 0x83 */
 453         return 0;
 454 }
 455 EXPORT_SYMBOL(spc_emulate_evpd_83);
 456
 457 /* Extended INQUIRY Data VPD Page */
 458 static sense_reason_t
 459 spc_emulate_evpd_86(struct se_cmd *cmd, unsigned char *buf)
 460 {
 461         struct se_device *dev = cmd->se_dev;
 462         struct se_session *sess = cmd->se_sess;
 463
 464         buf[3] = 0x3c;
 465         /*
 466          * Set GRD_CHK + REF_CHK for TYPE1 protection, or GRD_CHK
 467          * only for TYPE3 protection.
 468          */
 469         if (sess->sup_prot_ops & (TARGET_PROT_DIN_PASS | TARGET_PROT_DOUT_PASS)) {
 470                 if (dev->dev_attrib.pi_prot_type == TARGET_DIF_TYPE1_PROT)
 471                         buf[4] = 0x5;
 472                 else if (dev->dev_attrib.pi_prot_type == TARGET_DIF_TYPE3_PROT)
 473                         buf[4] = 0x4;
 474         }
 475
 476         /* Set HEADSUP, ORDSUP, SIMPSUP */
 477         buf[5] = 0x07;
 478
 479         /* If WriteCache emulation is enabled, set V_SUP */
 480         if (se_dev_check_wce(dev))
 481                 buf[6] = 0x01;
 482         /* If an LBA map is present set R_SUP */
 483         spin_lock(&cmd->se_dev->t10_alua.lba_map_lock);
 484         if (!list_empty(&dev->t10_alua.lba_map_list))
 485                 buf[8] = 0x10;
 486         spin_unlock(&cmd->se_dev->t10_alua.lba_map_lock);
 487         return 0;
 488 }
 489
 490 /* Block Limits VPD page */
 491 static sense_reason_t
 492 spc_emulate_evpd_b0(struct se_cmd *cmd, unsigned char *buf)
 493 {
 494         struct se_device *dev = cmd->se_dev;
 495         int have_tp = 0;
 496         int opt, min;
 497
 498         /*
 499          * Following spc3r22 section 6.5.3 Block Limits VPD page, when
 500          * emulate_tpu=1 or emulate_tpws=1 we will be expect a
 501          * different page length for Thin Provisioning.
 502          */
 503         if (dev->dev_attrib.emulate_tpu || dev->dev_attrib.emulate_tpws)
 504                 have_tp = 1;
 505
 506         buf[0] = dev->transport->get_device_type(dev);
 507         buf[3] = have_tp ? 0x3c : 0x10;
 508
 509         /* Set WSNZ to 1 */
 510         buf[4] = 0x01;
 511         /*
 512          * Set MAXIMUM COMPARE AND WRITE LENGTH
 513          */
 514         if (dev->dev_attrib.emulate_caw)
 515                 buf[5] = 0x01;
 516
 517         /*
 518          * Set OPTIMAL TRANSFER LENGTH GRANULARITY
 519          */
 520         if (dev->transport->get_io_min && (min = dev->transport->get_io_min(dev)))
 521                 put_unaligned_be16(min / dev->dev_attrib.block_size, &buf[6]);
 522         else
 523                 put_unaligned_be16(1, &buf[6]);
 524
 525         /*
 526          * Set MAXIMUM TRANSFER LENGTH
 527          */
 528         put_unaligned_be32(dev->dev_attrib.hw_max_sectors, &buf[8]);
 529
 530         /*
 531          * Set OPTIMAL TRANSFER LENGTH
 532          */
 533         if (dev->transport->get_io_opt && (opt = dev->transport->get_io_opt(dev)))
 534                 put_unaligned_be32(opt / dev->dev_attrib.block_size, &buf[12]);
 535         else
 536                 put_unaligned_be32(dev->dev_attrib.optimal_sectors, &buf[12]);
 537
 538         /*
 539          * Exit now if we don't support TP.
 540          */
 541         if (!have_tp)
 542                 goto max_write_same;
 543
 544         /*
 545          * Set MAXIMUM UNMAP LBA COUNT
 546          */
 547         put_unaligned_be32(dev->dev_attrib.max_unmap_lba_count, &buf[20]);
 548
 549         /*
 550          * Set MAXIMUM UNMAP BLOCK DESCRIPTOR COUNT
 551          */
 552         put_unaligned_be32(dev->dev_attrib.max_unmap_block_desc_count,
 553                            &buf[24]);
 554
 555         /*
 556          * Set OPTIMAL UNMAP GRANULARITY
 557          */
 558         put_unaligned_be32(dev->dev_attrib.unmap_granularity, &buf[28]);
 559
 560         /*
 561          * UNMAP GRANULARITY ALIGNMENT
 562          */
 563         put_unaligned_be32(dev->dev_attrib.unmap_granularity_alignment,
 564                            &buf[32]);
 565         if (dev->dev_attrib.unmap_granularity_alignment != 0)
 566                 buf[32] |= 0x80; /* Set the UGAVALID bit */
 567
 568         /*
 569          * MAXIMUM WRITE SAME LENGTH
 570          */
 571 max_write_same:
 572         put_unaligned_be64(dev->dev_attrib.max_write_same_len, &buf[36]);
 573
 574         return 0;
 575 }
 576
 577 /* Block Device Characteristics VPD page */
 578 static sense_reason_t
 579 spc_emulate_evpd_b1(struct se_cmd *cmd, unsigned char *buf)
 580 {
 581         struct se_device *dev = cmd->se_dev;
 582
 583         buf[0] = dev->transport->get_device_type(dev);
 584         buf[3] = 0x3c;
 585         buf[5] = dev->dev_attrib.is_nonrot ? 1 : 0;
 586
 587         return 0;
 588 }
 589
 590 /* Thin Provisioning VPD */
 591 static sense_reason_t
 592 spc_emulate_evpd_b2(struct se_cmd *cmd, unsigned char *buf)
 593 {
 594         struct se_device *dev = cmd->se_dev;
 595
 596         /*
 597          * From spc3r22 section 6.5.4 Thin Provisioning VPD page:
 598          *
 599          * The PAGE LENGTH field is defined in SPC-4. If the DP bit is set to
 600          * zero, then the page length shall be set to 0004h.  If the DP bit
 601          * is set to one, then the page length shall be set to the value
 602          * defined in table 162.
 603          */
 604         buf[0] = dev->transport->get_device_type(dev);
 605
 606         /*
 607          * Set Hardcoded length mentioned above for DP=0
 608          */
 609         put_unaligned_be16(0x0004, &buf[2]);
 610
 611         /*
 612          * The THRESHOLD EXPONENT field indicates the threshold set size in
 613          * LBAs as a power of 2 (i.e., the threshold set size is equal to
 614          * 2(threshold exponent)).
 615          *
 616          * Note that this is currently set to 0x00 as mkp says it will be
 617          * changing again.  We can enable this once it has settled in T10
 618          * and is actually used by Linux/SCSI ML code.
 619          */
 620         buf[4] = 0x00;
 621
 622         /*
 623          * A TPU bit set to one indicates that the device server supports
 624          * the UNMAP command (see 5.25). A TPU bit set to zero indicates
 625          * that the device server does not support the UNMAP command.
 626          */
 627         if (dev->dev_attrib.emulate_tpu != 0)
 628                 buf[5] = 0x80;
 629
 630         /*
 631          * A TPWS bit set to one indicates that the device server supports
 632          * the use of the WRITE SAME (16) command (see 5.42) to unmap LBAs.
 633          * A TPWS bit set to zero indicates that the device server does not
 634          * support the use of the WRITE SAME (16) command to unmap LBAs.
 635          */
 636         if (dev->dev_attrib.emulate_tpws != 0)
 637                 buf[5] |= 0x40 | 0x20;
 638
 639         return 0;
 640 }
 641
 642 /* Referrals VPD page */
 643 static sense_reason_t
 644 spc_emulate_evpd_b3(struct se_cmd *cmd, unsigned char *buf)
 645 {
 646         struct se_device *dev = cmd->se_dev;
 647
 648         buf[0] = dev->transport->get_device_type(dev);
 649         buf[3] = 0x0c;
 650         put_unaligned_be32(dev->t10_alua.lba_map_segment_size, &buf[8]);
 651         put_unaligned_be32(dev->t10_alua.lba_map_segment_multiplier, &buf[12]);
 652
 653         return 0;
 654 }
 655
 656 static sense_reason_t
 657 spc_emulate_evpd_00(struct se_cmd *cmd, unsigned char *buf);
 658
 659 static struct {
 660         uint8_t         page;
 661         sense_reason_t  (*emulate)(struct se_cmd *, unsigned char *);
 662 } evpd_handlers[] = {
 663         { .page = 0x00, .emulate = spc_emulate_evpd_00 },
 664         { .page = 0x80, .emulate = spc_emulate_evpd_80 },
 665         { .page = 0x83, .emulate = spc_emulate_evpd_83 },
 666         { .page = 0x86, .emulate = spc_emulate_evpd_86 },
 667         { .page = 0xb0, .emulate = spc_emulate_evpd_b0 },
 668         { .page = 0xb1, .emulate = spc_emulate_evpd_b1 },
 669         { .page = 0xb2, .emulate = spc_emulate_evpd_b2 },
 670         { .page = 0xb3, .emulate = spc_emulate_evpd_b3 },
 671 };
 672
 673 /* supported vital product data pages */
 674 static sense_reason_t
 675 spc_emulate_evpd_00(struct se_cmd *cmd, unsigned char *buf)
 676 {
 677         int p;
 678
 679         /*
 680          * Only report the INQUIRY EVPD=1 pages after a valid NAA
 681          * Registered Extended LUN WWN has been set via ConfigFS
 682          * during device creation/restart.
 683          */
 684         if (cmd->se_dev->dev_flags & DF_EMULATED_VPD_UNIT_SERIAL) {
 685                 buf[3] = ARRAY_SIZE(evpd_handlers);
 686                 for (p = 0; p < ARRAY_SIZE(evpd_handlers); ++p)
 687                         buf[p + 4] = evpd_handlers[p].page;
 688         }
 689
 690         return 0;
 691 }
 692
 693 static sense_reason_t
 694 spc_emulate_inquiry(struct se_cmd *cmd)
 695 {
 696         struct se_device *dev = cmd->se_dev;
 697         struct se_portal_group *tpg = cmd->se_lun->lun_sep->sep_tpg;
 698         unsigned char *rbuf;
 699         unsigned char *cdb = cmd->t_task_cdb;
 700         unsigned char *buf;
 701         sense_reason_t ret;
 702         int p;
 703         int len = 0;
 704
 705         buf = kzalloc(SE_INQUIRY_BUF, GFP_KERNEL);
 706         if (!buf) {
 707                 pr_err("Unable to allocate response buffer for INQUIRY\n");
 708                 return TCM_LOGICAL_UNIT_COMMUNICATION_FAILURE;
 709         }
 710
 711         if (dev == tpg->tpg_virt_lun0.lun_se_dev)
 712                 buf[0] = 0x3f; /* Not connected */
 713         else
 714                 buf[0] = dev->transport->get_device_type(dev);
 715
 716         if (!(cdb[1] & 0x1)) {
 717                 if (cdb[2]) {
 718                         pr_err("INQUIRY with EVPD==0 but PAGE CODE=%02x\n",
 719                                cdb[2]);
 720                         ret = TCM_INVALID_CDB_FIELD;
 721                         goto out;
 722                 }
 723
 724                 ret = spc_emulate_inquiry_std(cmd, buf);
 725                 len = buf[4] + 5;
 726                 goto out;
 727         }
 728
 729         for (p = 0; p < ARRAY_SIZE(evpd_handlers); ++p) {
 730                 if (cdb[2] == evpd_handlers[p].page) {
 731                         buf[1] = cdb[2];
 732                         ret = evpd_handlers[p].emulate(cmd, buf);
 733                         len = get_unaligned_be16(&buf[2]) + 4;
 734                         goto out;
 735                 }
 736         }
 737
 738         pr_err("Unknown VPD Code: 0x%02x\n", cdb[2]);
 739         ret = TCM_INVALID_CDB_FIELD;
 740
 741 out:
 742         rbuf = transport_kmap_data_sg(cmd);
 743         if (rbuf) {
 744                 memcpy(rbuf, buf, min_t(u32, SE_INQUIRY_BUF, cmd->data_length));
 745                 transport_kunmap_data_sg(cmd);
 746         }
 747         kfree(buf);
 748
 749         if (!ret)
 750                 target_complete_cmd_with_length(cmd, GOOD, len);
 751         return ret;
 752 }
 753
 754 static int spc_modesense_rwrecovery(struct se_cmd *cmd, u8 pc, u8 *p)
 755 {
 756         p[0] = 0x01;
 757         p[1] = 0x0a;
 758
 759         /* No changeable values for now */
 760         if (pc == 1)
 761                 goto out;
 762
 763 out:
 764         return 12;
 765 }
 766
 767 static int spc_modesense_control(struct se_cmd *cmd, u8 pc, u8 *p)
 768 {
 769         struct se_device *dev = cmd->se_dev;
 770         struct se_session *sess = cmd->se_sess;
 771
 772         p[0] = 0x0a;
 773         p[1] = 0x0a;
 774
 775         /* No changeable values for now */
 776         if (pc == 1)
 777                 goto out;
 778
 779         p[2] = 2;
 780         /*
 781          * From spc4r23, 7.4.7 Control mode page
 782          *
 783          * The QUEUE ALGORITHM MODIFIER field (see table 368) specifies
 784          * restrictions on the algorithm used for reordering commands
 785          * having the SIMPLE task attribute (see SAM-4).
 786          *
 787          *                    Table 368 -- QUEUE ALGORITHM MODIFIER field
 788          *                         Code      Description
 789          *                          0h       Restricted reordering
 790          *                          1h       Unrestricted reordering allowed
 791          *                          2h to 7h    Reserved
 792          *                          8h to Fh    Vendor specific
 793          *
 794          * A value of zero in the QUEUE ALGORITHM MODIFIER field specifies that
 795          * the device server shall order the processing sequence of commands
 796          * having the SIMPLE task attribute such that data integrity is maintained
 797          * for that I_T nexus (i.e., if the transmission of new SCSI transport protocol
 798          * requests is halted at any time, the final value of all data observable
 799          * on the medium shall be the same as if all the commands had been processed
 800          * with the ORDERED task attribute).
 801          *
 802          * A value of one in the QUEUE ALGORITHM MODIFIER field specifies that the
 803          * device server may reorder the processing sequence of commands having the
 804          * SIMPLE task attribute in any manner. Any data integrity exposures related to
 805          * command sequence order shall be explicitly handled by the application client
 806          * through the selection of appropriate ommands and task attributes.
 807          */
 808         p[3] = (dev->dev_attrib.emulate_rest_reord == 1) ? 0x00 : 0x10;
 809         /*
 810          * From spc4r17, section 7.4.6 Control mode Page
 811          *
 812          * Unit Attention interlocks control (UN_INTLCK_CTRL) to code 00b
 813          *
 814          * 00b: The logical unit shall clear any unit attention condition
 815          * reported in the same I_T_L_Q nexus transaction as a CHECK CONDITION
 816          * status and shall not establish a unit attention condition when a com-
 817          * mand is completed with BUSY, TASK SET FULL, or RESERVATION CONFLICT
 818          * status.
 819          *
 820          * 10b: The logical unit shall not clear any unit attention condition
 821          * reported in the same I_T_L_Q nexus transaction as a CHECK CONDITION
 822          * status and shall not establish a unit attention condition when
 823          * a command is completed with BUSY, TASK SET FULL, or RESERVATION
 824          * CONFLICT status.
 825          *
 826          * 11b a The logical unit shall not clear any unit attention condition
 827          * reported in the same I_T_L_Q nexus transaction as a CHECK CONDITION
 828          * status and shall establish a unit attention condition for the
 829          * initiator port associated with the I_T nexus on which the BUSY,
 830          * TASK SET FULL, or RESERVATION CONFLICT status is being returned.
 831          * Depending on the status, the additional sense code shall be set to
 832          * PREVIOUS BUSY STATUS, PREVIOUS TASK SET FULL STATUS, or PREVIOUS
 833          * RESERVATION CONFLICT STATUS. Until it is cleared by a REQUEST SENSE
 834          * command, a unit attention condition shall be established only once
 835          * for a BUSY, TASK SET FULL, or RESERVATION CONFLICT status regardless
 836          * to the number of commands completed with one of those status codes.
 837          */
 838         p[4] = (dev->dev_attrib.emulate_ua_intlck_ctrl == 2) ? 0x30 :
 839                (dev->dev_attrib.emulate_ua_intlck_ctrl == 1) ? 0x20 : 0x00;
 840         /*
 841          * From spc4r17, section 7.4.6 Control mode Page
 842          *
 843          * Task Aborted Status (TAS) bit set to zero.
 844          *
 845          * A task aborted status (TAS) bit set to zero specifies that aborted
 846          * tasks shall be terminated by the device server without any response
 847          * to the application client. A TAS bit set to one specifies that tasks
 848          * aborted by the actions of an I_T nexus other than the I_T nexus on
 849          * which the command was received shall be completed with TASK ABORTED
 850          * status (see SAM-4).
 851          */
 852         p[5] = (dev->dev_attrib.emulate_tas) ? 0x40 : 0x00;
 853         /*
 854          * From spc4r30, section 7.5.7 Control mode page
 855          *
 856          * Application Tag Owner (ATO) bit set to one.
 857          *
 858          * If the ATO bit is set to one the device server shall not modify the
 859          * LOGICAL BLOCK APPLICATION TAG field and, depending on the protection
 860          * type, shall not modify the contents of the LOGICAL BLOCK REFERENCE
 861          * TAG field.
 862          */
 863         if (sess->sup_prot_ops & (TARGET_PROT_DIN_PASS | TARGET_PROT_DOUT_PASS)) {
 864                 if (dev->dev_attrib.pi_prot_type)
 865                         p[5] |= 0x80;
 866         }
 867
 868         p[8] = 0xff;
 869         p[9] = 0xff;
 870         p[11] = 30;
 871
 872 out:
 873         return 12;
 874 }
 875
 876 static int spc_modesense_caching(struct se_cmd *cmd, u8 pc, u8 *p)
 877 {
 878         struct se_device *dev = cmd->se_dev;
 879
 880         p[0] = 0x08;
 881         p[1] = 0x12;
 882
 883         /* No changeable values for now */
 884         if (pc == 1)
 885                 goto out;
 886
 887         if (se_dev_check_wce(dev))
 888                 p[2] = 0x04; /* Write Cache Enable */
 889         p[12] = 0x20; /* Disabled Read Ahead */
 890
 891 out:
 892         return 20;
 893 }
 894
 895 static int spc_modesense_informational_exceptions(struct se_cmd *cmd, u8 pc, unsigned char *p)
 896 {
 897         p[0] = 0x1c;
 898         p[1] = 0x0a;
 899
 900         /* No changeable values for now */
 901         if (pc == 1)
 902                 goto out;
 903
 904 out:
 905         return 12;
 906 }
 907
 908 static struct {
 909         uint8_t         page;
 910         uint8_t         subpage;
 911         int             (*emulate)(struct se_cmd *, u8, unsigned char *);
 912 } modesense_handlers[] = {
 913         { .page = 0x01, .subpage = 0x00, .emulate = spc_modesense_rwrecovery },
 914         { .page = 0x08, .subpage = 0x00, .emulate = spc_modesense_caching },
 915         { .page = 0x0a, .subpage = 0x00, .emulate = spc_modesense_control },
 916         { .page = 0x1c, .subpage = 0x00, .emulate = spc_modesense_informational_exceptions },
 917 };
 918
 919 static void spc_modesense_write_protect(unsigned char *buf, int type)
 920 {
 921         /*
 922          * I believe that the WP bit (bit 7) in the mode header is the same for
 923          * all device types..
 924          */
 925         switch (type) {
 926         case TYPE_DISK:
 927         case TYPE_TAPE:
 928         default:
 929                 buf[0] |= 0x80; /* WP bit */
 930                 break;
 931         }
 932 }
 933
 934 static void spc_modesense_dpofua(unsigned char *buf, int type)
 935 {
 936         switch (type) {
 937         case TYPE_DISK:
 938                 buf[0] |= 0x10; /* DPOFUA bit */
 939                 break;
 940         default:
 941                 break;
 942         }
 943 }
 944
 945 static int spc_modesense_blockdesc(unsigned char *buf, u64 blocks, u32 block_size)
 946 {
 947         *buf++ = 8;
 948         put_unaligned_be32(min(blocks, 0xffffffffull), buf);
 949         buf += 4;
 950         put_unaligned_be32(block_size, buf);
 951         return 9;
 952 }
 953
 954 static int spc_modesense_long_blockdesc(unsigned char *buf, u64 blocks, u32 block_size)
 955 {
 956         if (blocks <= 0xffffffff)
 957                 return spc_modesense_blockdesc(buf + 3, blocks, block_size) + 3;
 958
 959         *buf++ = 1;             /* LONGLBA */
 960         buf += 2;
 961         *buf++ = 16;
 962         put_unaligned_be64(blocks, buf);
 963         buf += 12;
 964         put_unaligned_be32(block_size, buf);
 965
 966         return 17;
 967 }
 968
 969 static sense_reason_t spc_emulate_modesense(struct se_cmd *cmd)
 970 {
 971         struct se_device *dev = cmd->se_dev;
 972         char *cdb = cmd->t_task_cdb;
 973         unsigned char buf[SE_MODE_PAGE_BUF], *rbuf;
 974         int type = dev->transport->get_device_type(dev);
 975         int ten = (cmd->t_task_cdb[0] == MODE_SENSE_10);
 976         bool dbd = !!(cdb[1] & 0x08);
 977         bool llba = ten ? !!(cdb[1] & 0x10) : false;
 978         u8 pc = cdb[2] >> 6;
 979         u8 page = cdb[2] & 0x3f;
 980         u8 subpage = cdb[3];
 981         int length = 0;
 982         int ret;
 983         int i;
 984
 985         memset(buf, 0, SE_MODE_PAGE_BUF);
 986
 987         /*
 988          * Skip over MODE DATA LENGTH + MEDIUM TYPE fields to byte 3 for
 989          * MODE_SENSE_10 and byte 2 for MODE_SENSE (6).
 990          */
 991         length = ten ? 3 : 2;
 992
 993         /* DEVICE-SPECIFIC PARAMETER */
 994         if ((cmd->se_lun->lun_access & TRANSPORT_LUNFLAGS_READ_ONLY) ||
 995             (cmd->se_deve &&
 996              (cmd->se_deve->lun_flags & TRANSPORT_LUNFLAGS_READ_ONLY)))
 997                 spc_modesense_write_protect(&buf[length], type);
 998
 999         if ((se_dev_check_wce(dev)) &&
1000             (dev->dev_attrib.emulate_fua_write > 0))
1001                 spc_modesense_dpofua(&buf[length], type);
1002
1003         ++length;
1004
1005         /* BLOCK DESCRIPTOR */
1006
1007         /*
1008          * For now we only include a block descriptor for disk (SBC)
1009          * devices; other command sets use a slightly different format.
1010          */
1011         if (!dbd && type == TYPE_DISK) {
1012                 u64 blocks = dev->transport->get_blocks(dev);
1013                 u32 block_size = dev->dev_attrib.block_size;
1014
1015                 if (ten) {
1016                         if (llba) {
1017                                 length += spc_modesense_long_blockdesc(&buf[length],
1018                                                                        blocks, block_size);
1019                         } else {
1020                                 length += 3;
1021                                 length += spc_modesense_blockdesc(&buf[length],
1022                                                                   blocks, block_size);
1023                         }
1024                 } else {
1025                         length += spc_modesense_blockdesc(&buf[length], blocks,
1026                                                           block_size);
1027                 }
1028         } else {
1029                 if (ten)
1030                         length += 4;
1031                 else
1032                         length += 1;
1033         }
1034
1035         if (page == 0x3f) {
1036                 if (subpage != 0x00 && subpage != 0xff) {
1037                         pr_warn("MODE_SENSE: Invalid subpage code: 0x%02x\n", subpage);
1038                         return TCM_INVALID_CDB_FIELD;
1039                 }
1040
1041                 for (i = 0; i < ARRAY_SIZE(modesense_handlers); ++i) {
1042                         /*
1043                          * Tricky way to say all subpage 00h for
1044                          * subpage==0, all subpages for subpage==0xff
1045                          * (and we just checked above that those are
1046                          * the only two possibilities).
1047                          */
1048                         if ((modesense_handlers[i].subpage & ~subpage) == 0) {
1049                                 ret = modesense_handlers[i].emulate(cmd, pc, &buf[length]);
1050                                 if (!ten && length + ret >= 255)
1051                                         break;
1052                                 length += ret;
1053                         }
1054                 }
1055
1056                 goto set_length;
1057         }
1058
1059         for (i = 0; i < ARRAY_SIZE(modesense_handlers); ++i)
1060                 if (modesense_handlers[i].page == page &&
1061                     modesense_handlers[i].subpage == subpage) {
1062                         length += modesense_handlers[i].emulate(cmd, pc, &buf[length]);
1063                         goto set_length;
1064                 }
1065
1066         /*
1067          * We don't intend to implement:
1068          *  - obsolete page 03h "format parameters" (checked by Solaris)
1069          */
1070         if (page != 0x03)
1071                 pr_err("MODE SENSE: unimplemented page/subpage: 0x%02x/0x%02x\n",
1072                        page, subpage);
1073
1074         return TCM_UNKNOWN_MODE_PAGE;
1075
1076 set_length:
1077         if (ten)
1078                 put_unaligned_be16(length - 2, buf);
1079         else
1080                 buf[0] = length - 1;
1081
1082         rbuf = transport_kmap_data_sg(cmd);
1083         if (rbuf) {
1084                 memcpy(rbuf, buf, min_t(u32, SE_MODE_PAGE_BUF, cmd->data_length));
1085                 transport_kunmap_data_sg(cmd);
1086         }
1087
1088         target_complete_cmd_with_length(cmd, GOOD, length);
1089         return 0;
1090 }
1091
1092 static sense_reason_t spc_emulate_modeselect(struct se_cmd *cmd)
1093 {
1094         char *cdb = cmd->t_task_cdb;
1095         bool ten = cdb[0] == MODE_SELECT_10;
1096         int off = ten ? 8 : 4;
1097         bool pf = !!(cdb[1] & 0x10);
1098         u8 page, subpage;
1099         unsigned char *buf;
1100         unsigned char tbuf[SE_MODE_PAGE_BUF];
1101         int length;
1102         int ret = 0;
1103         int i;
1104
1105         if (!cmd->data_length) {
1106                 target_complete_cmd(cmd, GOOD);
1107                 return 0;
1108         }
1109
1110         if (cmd->data_length < off + 2)
1111                 return TCM_PARAMETER_LIST_LENGTH_ERROR;
1112
1113         buf = transport_kmap_data_sg(cmd);
1114         if (!buf)
1115                 return TCM_LOGICAL_UNIT_COMMUNICATION_FAILURE;
1116
1117         if (!pf) {
1118                 ret = TCM_INVALID_CDB_FIELD;
1119                 goto out;
1120         }
1121
1122         page = buf[off] & 0x3f;
1123         subpage = buf[off] & 0x40 ? buf[off + 1] : 0;
1124
1125         for (i = 0; i < ARRAY_SIZE(modesense_handlers); ++i)
1126                 if (modesense_handlers[i].page == page &&
1127                     modesense_handlers[i].subpage == subpage) {
1128                         memset(tbuf, 0, SE_MODE_PAGE_BUF);
1129                         length = modesense_handlers[i].emulate(cmd, 0, tbuf);
1130                         goto check_contents;
1131                 }
1132
1133         ret = TCM_UNKNOWN_MODE_PAGE;
1134         goto out;
1135
1136 check_contents:
1137         if (cmd->data_length < off + length) {
1138                 ret = TCM_PARAMETER_LIST_LENGTH_ERROR;
1139                 goto out;
1140         }
1141
1142         if (memcmp(buf + off, tbuf, length))
1143                 ret = TCM_INVALID_PARAMETER_LIST;
1144
1145 out:
1146         transport_kunmap_data_sg(cmd);
1147
1148         if (!ret)
1149                 target_complete_cmd(cmd, GOOD);
1150         return ret;
1151 }
1152
1153 static sense_reason_t spc_emulate_request_sense(struct se_cmd *cmd)
1154 {
1155         unsigned char *cdb = cmd->t_task_cdb;
1156         unsigned char *rbuf;
1157         u8 ua_asc = 0, ua_ascq = 0;
1158         unsigned char buf[SE_SENSE_BUF];
1159
1160         memset(buf, 0, SE_SENSE_BUF);
1161
1162         if (cdb[1] & 0x01) {
1163                 pr_err("REQUEST_SENSE description emulation not"
1164                         " supported\n");
1165                 return TCM_INVALID_CDB_FIELD;
1166         }
1167
1168         rbuf = transport_kmap_data_sg(cmd);
1169         if (!rbuf)
1170                 return TCM_LOGICAL_UNIT_COMMUNICATION_FAILURE;
1171
1172         if (!core_scsi3_ua_clear_for_request_sense(cmd, &ua_asc, &ua_ascq)) {
1173                 /*
1174                  * CURRENT ERROR, UNIT ATTENTION
1175                  */
1176                 buf[0] = 0x70;
1177                 buf[SPC_SENSE_KEY_OFFSET] = UNIT_ATTENTION;
1178
1179                 /*
1180                  * The Additional Sense Code (ASC) from the UNIT ATTENTION
1181                  */
1182                 buf[SPC_ASC_KEY_OFFSET] = ua_asc;
1183                 buf[SPC_ASCQ_KEY_OFFSET] = ua_ascq;
1184                 buf[7] = 0x0A;
1185         } else {
1186                 /*
1187                  * CURRENT ERROR, NO SENSE
1188                  */
1189                 buf[0] = 0x70;
1190                 buf[SPC_SENSE_KEY_OFFSET] = NO_SENSE;
1191
1192                 /*
1193                  * NO ADDITIONAL SENSE INFORMATION
1194                  */
1195                 buf[SPC_ASC_KEY_OFFSET] = 0x00;
1196                 buf[7] = 0x0A;
1197         }
1198
1199         memcpy(rbuf, buf, min_t(u32, sizeof(buf), cmd->data_length));
1200         transport_kunmap_data_sg(cmd);
1201
1202         target_complete_cmd(cmd, GOOD);
1203         return 0;
1204 }
1205
1206 sense_reason_t spc_emulate_report_luns(struct se_cmd *cmd)
1207 {
1208         struct se_dev_entry *deve;
1209         struct se_session *sess = cmd->se_sess;
1210         unsigned char *buf;
1211         u32 lun_count = 0, offset = 8, i;
1212
1213         if (cmd->data_length < 16) {
1214                 pr_warn("REPORT LUNS allocation length %u too small\n",
1215                         cmd->data_length);
1216                 return TCM_INVALID_CDB_FIELD;
1217         }
1218
1219         buf = transport_kmap_data_sg(cmd);
1220         if (!buf)
1221                 return TCM_LOGICAL_UNIT_COMMUNICATION_FAILURE;
1222
1223         /*
1224          * If no struct se_session pointer is present, this struct se_cmd is
1225          * coming via a target_core_mod PASSTHROUGH op, and not through
1226          * a $FABRIC_MOD.  In that case, report LUN=0 only.
1227          */
1228         if (!sess) {
1229                 int_to_scsilun(0, (struct scsi_lun *)&buf[offset]);
1230                 lun_count = 1;
1231                 goto done;
1232         }
1233
1234         spin_lock_irq(&sess->se_node_acl->device_list_lock);
1235         for (i = 0; i < TRANSPORT_MAX_LUNS_PER_TPG; i++) {
1236                 deve = sess->se_node_acl->device_list[i];
1237                 if (!(deve->lun_flags & TRANSPORT_LUNFLAGS_INITIATOR_ACCESS))
1238                         continue;
1239                 /*
1240                  * We determine the correct LUN LIST LENGTH even once we
1241                  * have reached the initial allocation length.
1242                  * See SPC2-R20 7.19.
1243                  */
1244                 lun_count++;
1245                 if ((offset + 8) > cmd->data_length)
1246                         continue;
1247
1248                 int_to_scsilun(deve->mapped_lun, (struct scsi_lun *)&buf[offset]);
1249                 offset += 8;
1250         }
1251         spin_unlock_irq(&sess->se_node_acl->device_list_lock);
1252
1253         /*
1254          * See SPC3 r07, page 159.
1255          */
1256 done:
1257         lun_count *= 8;
1258         buf[0] = ((lun_count >> 24) & 0xff);
1259         buf[1] = ((lun_count >> 16) & 0xff);
1260         buf[2] = ((lun_count >> 8) & 0xff);
1261         buf[3] = (lun_count & 0xff);
1262         transport_kunmap_data_sg(cmd);
1263
1264         target_complete_cmd_with_length(cmd, GOOD, 8 + lun_count * 8);
1265         return 0;
1266 }
1267 EXPORT_SYMBOL(spc_emulate_report_luns);
1268
1269 static sense_reason_t
1270 spc_emulate_testunitready(struct se_cmd *cmd)
1271 {
1272         target_complete_cmd(cmd, GOOD);
1273         return 0;
1274 }
1275
1276 sense_reason_t
1277 spc_parse_cdb(struct se_cmd *cmd, unsigned int *size)
1278 {
1279         struct se_device *dev = cmd->se_dev;
1280         unsigned char *cdb = cmd->t_task_cdb;
1281
1282         switch (cdb[0]) {
1283         case MODE_SELECT:
1284                 *size = cdb[4];
1285                 cmd->execute_cmd = spc_emulate_modeselect;
1286                 break;
1287         case MODE_SELECT_10:
1288                 *size = (cdb[7] << 8) + cdb[8];
1289                 cmd->execute_cmd = spc_emulate_modeselect;
1290                 break;
1291         case MODE_SENSE:
1292                 *size = cdb[4];
1293                 cmd->execute_cmd = spc_emulate_modesense;
1294                 break;
1295         case MODE_SENSE_10:
1296                 *size = (cdb[7] << 8) + cdb[8];
1297                 cmd->execute_cmd = spc_emulate_modesense;
1298                 break;
1299         case LOG_SELECT:
1300         case LOG_SENSE:
1301                 *size = (cdb[7] << 8) + cdb[8];
1302                 break;
1303         case PERSISTENT_RESERVE_IN:
1304                 *size = (cdb[7] << 8) + cdb[8];
1305                 cmd->execute_cmd = target_scsi3_emulate_pr_in;
1306                 break;
1307         case PERSISTENT_RESERVE_OUT:
1308                 *size = (cdb[7] << 8) + cdb[8];
1309                 cmd->execute_cmd = target_scsi3_emulate_pr_out;
1310                 break;
1311         case RELEASE:
1312         case RELEASE_10:
1313                 if (cdb[0] == RELEASE_10)
1314                         *size = (cdb[7] << 8) | cdb[8];
1315                 else
1316                         *size = cmd->data_length;
1317
1318                 cmd->execute_cmd = target_scsi2_reservation_release;
1319                 break;
1320         case RESERVE:
1321         case RESERVE_10:
1322                 /*
1323                  * The SPC-2 RESERVE does not contain a size in the SCSI CDB.
1324                  * Assume the passthrough or $FABRIC_MOD will tell us about it.
1325                  */
1326                 if (cdb[0] == RESERVE_10)
1327                         *size = (cdb[7] << 8) | cdb[8];
1328                 else
1329                         *size = cmd->data_length;
1330
1331                 cmd->execute_cmd = target_scsi2_reservation_reserve;
1332                 break;
1333         case REQUEST_SENSE:
1334                 *size = cdb[4];
1335                 cmd->execute_cmd = spc_emulate_request_sense;
1336                 break;
1337         case INQUIRY:
1338                 *size = (cdb[3] << 8) + cdb[4];
1339
1340                 /*
1341                  * Do implicit HEAD_OF_QUEUE processing for INQUIRY.
1342                  * See spc4r17 section 5.3
1343                  */
1344                 cmd->sam_task_attr = TCM_HEAD_TAG;
1345                 cmd->execute_cmd = spc_emulate_inquiry;
1346                 break;
1347         case SECURITY_PROTOCOL_IN:
1348         case SECURITY_PROTOCOL_OUT:
1349                 *size = (cdb[6] << 24) | (cdb[7] << 16) | (cdb[8] << 8) | cdb[9];
1350                 break;
1351         case EXTENDED_COPY:
1352                 *size = get_unaligned_be32(&cdb[10]);
1353                 cmd->execute_cmd = target_do_xcopy;
1354                 break;
1355         case RECEIVE_COPY_RESULTS:
1356                 *size = get_unaligned_be32(&cdb[10]);
1357                 cmd->execute_cmd = target_do_receive_copy_results;
1358                 break;
1359         case READ_ATTRIBUTE:
1360         case WRITE_ATTRIBUTE:
1361                 *size = (cdb[10] << 24) | (cdb[11] << 16) |
1362                        (cdb[12] << 8) | cdb[13];
1363                 break;
1364         case RECEIVE_DIAGNOSTIC:
1365         case SEND_DIAGNOSTIC:
1366                 *size = (cdb[3] << 8) | cdb[4];
1367                 break;
1368         case WRITE_BUFFER:
1369                 *size = (cdb[6] << 16) + (cdb[7] << 8) + cdb[8];
1370                 break;
1371         case REPORT_LUNS:
1372                 cmd->execute_cmd = spc_emulate_report_luns;
1373                 *size = (cdb[6] << 24) | (cdb[7] << 16) | (cdb[8] << 8) | cdb[9];
1374                 /*
1375                  * Do implicit HEAD_OF_QUEUE processing for REPORT_LUNS
1376                  * See spc4r17 section 5.3
1377                  */
1378                 cmd->sam_task_attr = TCM_HEAD_TAG;
1379                 break;
1380         case TEST_UNIT_READY:
1381                 cmd->execute_cmd = spc_emulate_testunitready;
1382                 *size = 0;
1383                 break;
1384         case MAINTENANCE_IN:
1385                 if (dev->transport->get_device_type(dev) != TYPE_ROM) {
1386                         /*
1387                          * MAINTENANCE_IN from SCC-2
1388                          * Check for emulated MI_REPORT_TARGET_PGS
1389                          */
1390                         if ((cdb[1] & 0x1f) == MI_REPORT_TARGET_PGS) {
1391                                 cmd->execute_cmd =
1392                                         target_emulate_report_target_port_groups;
1393                         }
1394                         *size = get_unaligned_be32(&cdb[6]);
1395                 } else {
1396                         /*
1397                          * GPCMD_SEND_KEY from multi media commands
1398                          */
1399                         *size = get_unaligned_be16(&cdb[8]);
1400                 }
1401                 break;
1402         case MAINTENANCE_OUT:
1403                 if (dev->transport->get_device_type(dev) != TYPE_ROM) {
1404                         /*
1405                          * MAINTENANCE_OUT from SCC-2
1406                          * Check for emulated MO_SET_TARGET_PGS.
1407                          */
1408                         if (cdb[1] == MO_SET_TARGET_PGS) {
1409                                 cmd->execute_cmd =
1410                                         target_emulate_set_target_port_groups;
1411                         }
1412                         *size = get_unaligned_be32(&cdb[6]);
1413                 } else {
1414                         /*
1415                          * GPCMD_SEND_KEY from multi media commands
1416                          */
1417                         *size = get_unaligned_be16(&cdb[8]);
1418                 }
1419                 break;
1420         default:
1421                 pr_warn("TARGET_CORE[%s]: Unsupported SCSI Opcode"
1422                         " 0x%02x, sending CHECK_CONDITION.\n",
1423                         cmd->se_tfo->get_fabric_name(), cdb[0]);
1424                 return TCM_UNSUPPORTED_SCSI_OPCODE;
1425         }
1426
1427         return 0;
1428 }
1429 EXPORT_SYMBOL(spc_parse_cdb);