drivers/target/target_core_device.c

   1 /*******************************************************************************
   2  * Filename:  target_core_device.c (based on iscsi_target_device.c)
   3  *
   4  * This file contains the TCM Virtual Device and Disk Transport
   5  * agnostic related functions.
   6  *
   7  * (c) Copyright 2003-2013 Datera, Inc.
   8  *
   9  * Nicholas A. Bellinger <nab@kernel.org>
  10  *
  11  * This program is free software; you can redistribute it and/or modify
  12  * it under the terms of the GNU General Public License as published by
  13  * the Free Software Foundation; either version 2 of the License, or
  14  * (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  24  *
  25  ******************************************************************************/
  26
  27 #include <linux/net.h>
  28 #include <linux/string.h>
  29 #include <linux/delay.h>
  30 #include <linux/timer.h>
  31 #include <linux/slab.h>
  32 #include <linux/spinlock.h>
  33 #include <linux/kthread.h>
  34 #include <linux/in.h>
  35 #include <linux/export.h>
  36 #include <asm/unaligned.h>
  37 #include <net/sock.h>
  38 #include <net/tcp.h>
  39 #include <scsi/scsi.h>
  40 #include <scsi/scsi_device.h>
  41
  42 #include <target/target_core_base.h>
  43 #include <target/target_core_backend.h>
  44 #include <target/target_core_fabric.h>
  45
  46 #include "target_core_internal.h"
  47 #include "target_core_alua.h"
  48 #include "target_core_pr.h"
  49 #include "target_core_ua.h"
  50
  51 DEFINE_MUTEX(g_device_mutex);
  52 LIST_HEAD(g_device_list);
  53
  54 static struct se_hba *lun0_hba;
  55 /* not static, needed by tpg.c */
  56 struct se_device *g_lun0_dev;
  57
  58 sense_reason_t
  59 transport_lookup_cmd_lun(struct se_cmd *se_cmd, u32 unpacked_lun)
  60 {
  61         struct se_lun *se_lun = NULL;
  62         struct se_session *se_sess = se_cmd->se_sess;
  63         struct se_node_acl *nacl = se_sess->se_node_acl;
  64         struct se_dev_entry *deve;
  65
  66         if (unpacked_lun >= TRANSPORT_MAX_LUNS_PER_TPG)
  67                 return TCM_NON_EXISTENT_LUN;
  68
  69         rcu_read_lock();
  70         deve = target_nacl_find_deve(nacl, unpacked_lun);
  71         if (deve) {
  72                 atomic_long_inc(&deve->total_cmds);
  73
  74                 if ((se_cmd->data_direction == DMA_TO_DEVICE) &&
  75                     (deve->lun_flags & TRANSPORT_LUNFLAGS_READ_ONLY)) {
  76                         pr_err("TARGET_CORE[%s]: Detected WRITE_PROTECTED LUN"
  77                                 " Access for 0x%08x\n",
  78                                 se_cmd->se_tfo->get_fabric_name(),
  79                                 unpacked_lun);
  80                         rcu_read_unlock();
  81                         return TCM_WRITE_PROTECTED;
  82                 }
  83
  84                 if (se_cmd->data_direction == DMA_TO_DEVICE)
  85                         atomic_long_add(se_cmd->data_length,
  86                                         &deve->write_bytes);
  87                 else if (se_cmd->data_direction == DMA_FROM_DEVICE)
  88                         atomic_long_add(se_cmd->data_length,
  89                                         &deve->read_bytes);
  90
  91                 se_lun = rcu_dereference(deve->se_lun);
  92                 se_cmd->se_lun = rcu_dereference(deve->se_lun);
  93                 se_cmd->pr_res_key = deve->pr_res_key;
  94                 se_cmd->orig_fe_lun = unpacked_lun;
  95                 se_cmd->se_cmd_flags |= SCF_SE_LUN_CMD;
  96
  97                 percpu_ref_get(&se_lun->lun_ref);
  98                 se_cmd->lun_ref_active = true;
  99         }
 100         rcu_read_unlock();
 101
 102         if (!se_lun) {
 103                 /*
 104                  * Use the se_portal_group->tpg_virt_lun0 to allow for
 105                  * REPORT_LUNS, et al to be returned when no active
 106                  * MappedLUN=0 exists for this Initiator Port.
 107                  */
 108                 if (unpacked_lun != 0) {
 109                         pr_err("TARGET_CORE[%s]: Detected NON_EXISTENT_LUN"
 110                                 " Access for 0x%08x\n",
 111                                 se_cmd->se_tfo->get_fabric_name(),
 112                                 unpacked_lun);
 113                         return TCM_NON_EXISTENT_LUN;
 114                 }
 115                 /*
 116                  * Force WRITE PROTECT for virtual LUN 0
 117                  */
 118                 if ((se_cmd->data_direction != DMA_FROM_DEVICE) &&
 119                     (se_cmd->data_direction != DMA_NONE))
 120                         return TCM_WRITE_PROTECTED;
 121
 122                 se_lun = se_sess->se_tpg->tpg_virt_lun0;
 123                 se_cmd->se_lun = se_sess->se_tpg->tpg_virt_lun0;
 124                 se_cmd->orig_fe_lun = 0;
 125                 se_cmd->se_cmd_flags |= SCF_SE_LUN_CMD;
 126
 127                 percpu_ref_get(&se_lun->lun_ref);
 128                 se_cmd->lun_ref_active = true;
 129         }
 130         /*
 131          * RCU reference protected by percpu se_lun->lun_ref taken above that
 132          * must drop to zero (including initial reference) before this se_lun
 133          * pointer can be kfree_rcu() by the final se_lun->lun_group put via
 134          * target_core_fabric_configfs.c:target_fabric_port_release
 135          */
 136         se_cmd->se_dev = rcu_dereference_raw(se_lun->lun_se_dev);
 137         atomic_long_inc(&se_cmd->se_dev->num_cmds);
 138
 139         if (se_cmd->data_direction == DMA_TO_DEVICE)
 140                 atomic_long_add(se_cmd->data_length,
 141                                 &se_cmd->se_dev->write_bytes);
 142         else if (se_cmd->data_direction == DMA_FROM_DEVICE)
 143                 atomic_long_add(se_cmd->data_length,
 144                                 &se_cmd->se_dev->read_bytes);
 145
 146         return 0;
 147 }
 148 EXPORT_SYMBOL(transport_lookup_cmd_lun);
 149
 150 int transport_lookup_tmr_lun(struct se_cmd *se_cmd, u32 unpacked_lun)
 151 {
 152         struct se_dev_entry *deve;
 153         struct se_lun *se_lun = NULL;
 154         struct se_session *se_sess = se_cmd->se_sess;
 155         struct se_node_acl *nacl = se_sess->se_node_acl;
 156         struct se_tmr_req *se_tmr = se_cmd->se_tmr_req;
 157         unsigned long flags;
 158
 159         if (unpacked_lun >= TRANSPORT_MAX_LUNS_PER_TPG)
 160                 return -ENODEV;
 161
 162         rcu_read_lock();
 163         deve = target_nacl_find_deve(nacl, unpacked_lun);
 164         if (deve) {
 165                 se_tmr->tmr_lun = rcu_dereference(deve->se_lun);
 166                 se_cmd->se_lun = rcu_dereference(deve->se_lun);
 167                 se_lun = rcu_dereference(deve->se_lun);
 168                 se_cmd->pr_res_key = deve->pr_res_key;
 169                 se_cmd->orig_fe_lun = unpacked_lun;
 170         }
 171         rcu_read_unlock();
 172
 173         if (!se_lun) {
 174                 pr_debug("TARGET_CORE[%s]: Detected NON_EXISTENT_LUN"
 175                         " Access for 0x%08x\n",
 176                         se_cmd->se_tfo->get_fabric_name(),
 177                         unpacked_lun);
 178                 return -ENODEV;
 179         }
 180         /*
 181          * XXX: Add percpu se_lun->lun_ref reference count for TMR
 182          */
 183         se_cmd->se_dev = rcu_dereference_raw(se_lun->lun_se_dev);
 184         se_tmr->tmr_dev = rcu_dereference_raw(se_lun->lun_se_dev);
 185
 186         spin_lock_irqsave(&se_tmr->tmr_dev->se_tmr_lock, flags);
 187         list_add_tail(&se_tmr->tmr_list, &se_tmr->tmr_dev->dev_tmr_list);
 188         spin_unlock_irqrestore(&se_tmr->tmr_dev->se_tmr_lock, flags);
 189
 190         return 0;
 191 }
 192 EXPORT_SYMBOL(transport_lookup_tmr_lun);
 193
 194 bool target_lun_is_rdonly(struct se_cmd *cmd)
 195 {
 196         struct se_session *se_sess = cmd->se_sess;
 197         struct se_dev_entry *deve;
 198         bool ret;
 199
 200         if (cmd->se_lun->lun_access & TRANSPORT_LUNFLAGS_READ_ONLY)
 201                 return true;
 202
 203         rcu_read_lock();
 204         deve = target_nacl_find_deve(se_sess->se_node_acl, cmd->orig_fe_lun);
 205         ret = (deve && deve->lun_flags & TRANSPORT_LUNFLAGS_READ_ONLY);
 206         rcu_read_unlock();
 207
 208         return ret;
 209 }
 210 EXPORT_SYMBOL(target_lun_is_rdonly);
 211
 212 /*
 213  * This function is called from core_scsi3_emulate_pro_register_and_move()
 214  * and core_scsi3_decode_spec_i_port(), and will increment &deve->pr_kref
 215  * when a matching rtpi is found.
 216  */
 217 struct se_dev_entry *core_get_se_deve_from_rtpi(
 218         struct se_node_acl *nacl,
 219         u16 rtpi)
 220 {
 221         struct se_dev_entry *deve;
 222         struct se_lun *lun;
 223         struct se_portal_group *tpg = nacl->se_tpg;
 224
 225         rcu_read_lock();
 226         hlist_for_each_entry_rcu(deve, &nacl->lun_entry_hlist, link) {
 227                 lun = rcu_dereference(deve->se_lun);
 228                 if (!lun) {
 229                         pr_err("%s device entries device pointer is"
 230                                 " NULL, but Initiator has access.\n",
 231                                 tpg->se_tpg_tfo->get_fabric_name());
 232                         continue;
 233                 }
 234                 if (lun->lun_rtpi != rtpi)
 235                         continue;
 236
 237                 kref_get(&deve->pr_kref);
 238                 rcu_read_unlock();
 239
 240                 return deve;
 241         }
 242         rcu_read_unlock();
 243
 244         return NULL;
 245 }
 246
 247 void core_free_device_list_for_node(
 248         struct se_node_acl *nacl,
 249         struct se_portal_group *tpg)
 250 {
 251         struct se_dev_entry *deve;
 252
 253         mutex_lock(&nacl->lun_entry_mutex);
 254         hlist_for_each_entry_rcu(deve, &nacl->lun_entry_hlist, link) {
 255                 struct se_lun *lun = rcu_dereference_check(deve->se_lun,
 256                                         lockdep_is_held(&nacl->lun_entry_mutex));
 257                 core_disable_device_list_for_node(lun, deve, nacl, tpg);
 258         }
 259         mutex_unlock(&nacl->lun_entry_mutex);
 260 }
 261
 262 void core_update_device_list_access(
 263         u32 mapped_lun,
 264         u32 lun_access,
 265         struct se_node_acl *nacl)
 266 {
 267         struct se_dev_entry *deve;
 268
 269         mutex_lock(&nacl->lun_entry_mutex);
 270         deve = target_nacl_find_deve(nacl, mapped_lun);
 271         if (deve) {
 272                 if (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE) {
 273                         deve->lun_flags &= ~TRANSPORT_LUNFLAGS_READ_ONLY;
 274                         deve->lun_flags |= TRANSPORT_LUNFLAGS_READ_WRITE;
 275                 } else {
 276                         deve->lun_flags &= ~TRANSPORT_LUNFLAGS_READ_WRITE;
 277                         deve->lun_flags |= TRANSPORT_LUNFLAGS_READ_ONLY;
 278                 }
 279         }
 280         mutex_unlock(&nacl->lun_entry_mutex);
 281 }
 282
 283 /*
 284  * Called with rcu_read_lock or nacl->device_list_lock held.
 285  */
 286 struct se_dev_entry *target_nacl_find_deve(struct se_node_acl *nacl, u32 mapped_lun)
 287 {
 288         struct se_dev_entry *deve;
 289
 290         hlist_for_each_entry_rcu(deve, &nacl->lun_entry_hlist, link)
 291                 if (deve->mapped_lun == mapped_lun)
 292                         return deve;
 293
 294         return NULL;
 295 }
 296 EXPORT_SYMBOL(target_nacl_find_deve);
 297
 298 void target_pr_kref_release(struct kref *kref)
 299 {
 300         struct se_dev_entry *deve = container_of(kref, struct se_dev_entry,
 301                                                  pr_kref);
 302         complete(&deve->pr_comp);
 303 }
 304
 305 /*      core_enable_device_list_for_node():
 306  *
 307  *
 308  */
 309 int core_enable_device_list_for_node(
 310         struct se_lun *lun,
 311         struct se_lun_acl *lun_acl,
 312         u32 mapped_lun,
 313         u32 lun_access,
 314         struct se_node_acl *nacl,
 315         struct se_portal_group *tpg)
 316 {
 317         struct se_dev_entry *orig, *new;
 318
 319         new = kzalloc(sizeof(*new), GFP_KERNEL);
 320         if (!new) {
 321                 pr_err("Unable to allocate se_dev_entry memory\n");
 322                 return -ENOMEM;
 323         }
 324
 325         atomic_set(&new->ua_count, 0);
 326         spin_lock_init(&new->ua_lock);
 327         INIT_LIST_HEAD(&new->ua_list);
 328         INIT_LIST_HEAD(&new->lun_link);
 329
 330         new->mapped_lun = mapped_lun;
 331         kref_init(&new->pr_kref);
 332         init_completion(&new->pr_comp);
 333
 334         if (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE)
 335                 new->lun_flags |= TRANSPORT_LUNFLAGS_READ_WRITE;
 336         else
 337                 new->lun_flags |= TRANSPORT_LUNFLAGS_READ_ONLY;
 338
 339         new->creation_time = get_jiffies_64();
 340         new->attach_count++;
 341
 342         mutex_lock(&nacl->lun_entry_mutex);
 343         orig = target_nacl_find_deve(nacl, mapped_lun);
 344         if (orig && orig->se_lun) {
 345                 struct se_lun *orig_lun = rcu_dereference_check(orig->se_lun,
 346                                         lockdep_is_held(&nacl->lun_entry_mutex));
 347
 348                 if (orig_lun != lun) {
 349                         pr_err("Existing orig->se_lun doesn't match new lun"
 350                                " for dynamic -> explicit NodeACL conversion:"
 351                                 " %s\n", nacl->initiatorname);
 352                         mutex_unlock(&nacl->lun_entry_mutex);
 353                         kfree(new);
 354                         return -EINVAL;
 355                 }
 356                 BUG_ON(orig->se_lun_acl != NULL);
 357
 358                 rcu_assign_pointer(new->se_lun, lun);
 359                 rcu_assign_pointer(new->se_lun_acl, lun_acl);
 360                 hlist_del_rcu(&orig->link);
 361                 hlist_add_head_rcu(&new->link, &nacl->lun_entry_hlist);
 362                 mutex_unlock(&nacl->lun_entry_mutex);
 363
 364                 spin_lock_bh(&lun->lun_deve_lock);
 365                 list_del(&orig->lun_link);
 366                 list_add_tail(&new->lun_link, &lun->lun_deve_list);
 367                 spin_unlock_bh(&lun->lun_deve_lock);
 368
 369                 kref_put(&orig->pr_kref, target_pr_kref_release);
 370                 wait_for_completion(&orig->pr_comp);
 371
 372                 kfree_rcu(orig, rcu_head);
 373                 return 0;
 374         }
 375
 376         rcu_assign_pointer(new->se_lun, lun);
 377         rcu_assign_pointer(new->se_lun_acl, lun_acl);
 378         hlist_add_head_rcu(&new->link, &nacl->lun_entry_hlist);
 379         mutex_unlock(&nacl->lun_entry_mutex);
 380
 381         spin_lock_bh(&lun->lun_deve_lock);
 382         list_add_tail(&new->lun_link, &lun->lun_deve_list);
 383         spin_unlock_bh(&lun->lun_deve_lock);
 384
 385         return 0;
 386 }
 387
 388 /*
 389  *      Called with se_node_acl->lun_entry_mutex held.
 390  */
 391 void core_disable_device_list_for_node(
 392         struct se_lun *lun,
 393         struct se_dev_entry *orig,
 394         struct se_node_acl *nacl,
 395         struct se_portal_group *tpg)
 396 {
 397         /*
 398          * rcu_dereference_raw protected by se_lun->lun_group symlink
 399          * reference to se_device->dev_group.
 400          */
 401         struct se_device *dev = rcu_dereference_raw(lun->lun_se_dev);
 402         /*
 403          * If the MappedLUN entry is being disabled, the entry in
 404          * lun->lun_deve_list must be removed now before clearing the
 405          * struct se_dev_entry pointers below as logic in
 406          * core_alua_do_transition_tg_pt() depends on these being present.
 407          *
 408          * deve->se_lun_acl will be NULL for demo-mode created LUNs
 409          * that have not been explicitly converted to MappedLUNs ->
 410          * struct se_lun_acl, but we remove deve->lun_link from
 411          * lun->lun_deve_list. This also means that active UAs and
 412          * NodeACL context specific PR metadata for demo-mode
 413          * MappedLUN *deve will be released below..
 414          */
 415         spin_lock_bh(&lun->lun_deve_lock);
 416         list_del(&orig->lun_link);
 417         spin_unlock_bh(&lun->lun_deve_lock);
 418         /*
 419          * Disable struct se_dev_entry LUN ACL mapping
 420          */
 421         core_scsi3_ua_release_all(orig);
 422
 423         hlist_del_rcu(&orig->link);
 424         clear_bit(DEF_PR_REG_ACTIVE, &orig->deve_flags);
 425         rcu_assign_pointer(orig->se_lun, NULL);
 426         rcu_assign_pointer(orig->se_lun_acl, NULL);
 427         orig->lun_flags = 0;
 428         orig->creation_time = 0;
 429         orig->attach_count--;
 430         /*
 431          * Before firing off RCU callback, wait for any in process SPEC_I_PT=1
 432          * or REGISTER_AND_MOVE PR operation to complete.
 433          */
 434         kref_put(&orig->pr_kref, target_pr_kref_release);
 435         wait_for_completion(&orig->pr_comp);
 436
 437         kfree_rcu(orig, rcu_head);
 438
 439         core_scsi3_free_pr_reg_from_nacl(dev, nacl);
 440 }
 441
 442 /*      core_clear_lun_from_tpg():
 443  *
 444  *
 445  */
 446 void core_clear_lun_from_tpg(struct se_lun *lun, struct se_portal_group *tpg)
 447 {
 448         struct se_node_acl *nacl;
 449         struct se_dev_entry *deve;
 450
 451         mutex_lock(&tpg->acl_node_mutex);
 452         list_for_each_entry(nacl, &tpg->acl_node_list, acl_list) {
 453
 454                 mutex_lock(&nacl->lun_entry_mutex);
 455                 hlist_for_each_entry_rcu(deve, &nacl->lun_entry_hlist, link) {
 456                         struct se_lun *tmp_lun = rcu_dereference_check(deve->se_lun,
 457                                         lockdep_is_held(&nacl->lun_entry_mutex));
 458
 459                         if (lun != tmp_lun)
 460                                 continue;
 461
 462                         core_disable_device_list_for_node(lun, deve, nacl, tpg);
 463                 }
 464                 mutex_unlock(&nacl->lun_entry_mutex);
 465         }
 466         mutex_unlock(&tpg->acl_node_mutex);
 467 }
 468
 469 int core_alloc_rtpi(struct se_lun *lun, struct se_device *dev)
 470 {
 471         struct se_lun *tmp;
 472
 473         spin_lock(&dev->se_port_lock);
 474         if (dev->export_count == 0x0000ffff) {
 475                 pr_warn("Reached dev->dev_port_count =="
 476                                 " 0x0000ffff\n");
 477                 spin_unlock(&dev->se_port_lock);
 478                 return -ENOSPC;
 479         }
 480 again:
 481         /*
 482          * Allocate the next RELATIVE TARGET PORT IDENTIFIER for this struct se_device
 483          * Here is the table from spc4r17 section 7.7.3.8.
 484          *
 485          *    Table 473 -- RELATIVE TARGET PORT IDENTIFIER field
 486          *
 487          * Code      Description
 488          * 0h        Reserved
 489          * 1h        Relative port 1, historically known as port A
 490          * 2h        Relative port 2, historically known as port B
 491          * 3h to FFFFh    Relative port 3 through 65 535
 492          */
 493         lun->lun_rtpi = dev->dev_rpti_counter++;
 494         if (!lun->lun_rtpi)
 495                 goto again;
 496
 497         list_for_each_entry(tmp, &dev->dev_sep_list, lun_dev_link) {
 498                 /*
 499                  * Make sure RELATIVE TARGET PORT IDENTIFIER is unique
 500                  * for 16-bit wrap..
 501                  */
 502                 if (lun->lun_rtpi == tmp->lun_rtpi)
 503                         goto again;
 504         }
 505         spin_unlock(&dev->se_port_lock);
 506
 507         return 0;
 508 }
 509
 510 static void se_release_vpd_for_dev(struct se_device *dev)
 511 {
 512         struct t10_vpd *vpd, *vpd_tmp;
 513
 514         spin_lock(&dev->t10_wwn.t10_vpd_lock);
 515         list_for_each_entry_safe(vpd, vpd_tmp,
 516                         &dev->t10_wwn.t10_vpd_list, vpd_list) {
 517                 list_del(&vpd->vpd_list);
 518                 kfree(vpd);
 519         }
 520         spin_unlock(&dev->t10_wwn.t10_vpd_lock);
 521 }
 522
 523 static u32 se_dev_align_max_sectors(u32 max_sectors, u32 block_size)
 524 {
 525         u32 aligned_max_sectors;
 526         u32 alignment;
 527         /*
 528          * Limit max_sectors to a PAGE_SIZE aligned value for modern
 529          * transport_allocate_data_tasks() operation.
 530          */
 531         alignment = max(1ul, PAGE_SIZE / block_size);
 532         aligned_max_sectors = rounddown(max_sectors, alignment);
 533
 534         if (max_sectors != aligned_max_sectors)
 535                 pr_info("Rounding down aligned max_sectors from %u to %u\n",
 536                         max_sectors, aligned_max_sectors);
 537
 538         return aligned_max_sectors;
 539 }
 540
 541 int core_dev_add_lun(
 542         struct se_portal_group *tpg,
 543         struct se_device *dev,
 544         struct se_lun *lun)
 545 {
 546         int rc;
 547
 548         rc = core_tpg_add_lun(tpg, lun,
 549                                 TRANSPORT_LUNFLAGS_READ_WRITE, dev);
 550         if (rc < 0)
 551                 return rc;
 552
 553         pr_debug("%s_TPG[%u]_LUN[%u] - Activated %s Logical Unit from"
 554                 " CORE HBA: %u\n", tpg->se_tpg_tfo->get_fabric_name(),
 555                 tpg->se_tpg_tfo->tpg_get_tag(tpg), lun->unpacked_lun,
 556                 tpg->se_tpg_tfo->get_fabric_name(), dev->se_hba->hba_id);
 557         /*
 558          * Update LUN maps for dynamically added initiators when
 559          * generate_node_acl is enabled.
 560          */
 561         if (tpg->se_tpg_tfo->tpg_check_demo_mode(tpg)) {
 562                 struct se_node_acl *acl;
 563
 564                 mutex_lock(&tpg->acl_node_mutex);
 565                 list_for_each_entry(acl, &tpg->acl_node_list, acl_list) {
 566                         if (acl->dynamic_node_acl &&
 567                             (!tpg->se_tpg_tfo->tpg_check_demo_mode_login_only ||
 568                              !tpg->se_tpg_tfo->tpg_check_demo_mode_login_only(tpg))) {
 569                                 core_tpg_add_node_to_devs(acl, tpg, lun);
 570                         }
 571                 }
 572                 mutex_unlock(&tpg->acl_node_mutex);
 573         }
 574
 575         return 0;
 576 }
 577
 578 /*      core_dev_del_lun():
 579  *
 580  *
 581  */
 582 void core_dev_del_lun(
 583         struct se_portal_group *tpg,
 584         struct se_lun *lun)
 585 {
 586         pr_debug("%s_TPG[%u]_LUN[%u] - Deactivating %s Logical Unit from"
 587                 " device object\n", tpg->se_tpg_tfo->get_fabric_name(),
 588                 tpg->se_tpg_tfo->tpg_get_tag(tpg), lun->unpacked_lun,
 589                 tpg->se_tpg_tfo->get_fabric_name());
 590
 591         core_tpg_remove_lun(tpg, lun);
 592 }
 593
 594 struct se_lun_acl *core_dev_init_initiator_node_lun_acl(
 595         struct se_portal_group *tpg,
 596         struct se_node_acl *nacl,
 597         u32 mapped_lun,
 598         int *ret)
 599 {
 600         struct se_lun_acl *lacl;
 601
 602         if (strlen(nacl->initiatorname) >= TRANSPORT_IQN_LEN) {
 603                 pr_err("%s InitiatorName exceeds maximum size.\n",
 604                         tpg->se_tpg_tfo->get_fabric_name());
 605                 *ret = -EOVERFLOW;
 606                 return NULL;
 607         }
 608         lacl = kzalloc(sizeof(struct se_lun_acl), GFP_KERNEL);
 609         if (!lacl) {
 610                 pr_err("Unable to allocate memory for struct se_lun_acl.\n");
 611                 *ret = -ENOMEM;
 612                 return NULL;
 613         }
 614
 615         lacl->mapped_lun = mapped_lun;
 616         lacl->se_lun_nacl = nacl;
 617         snprintf(lacl->initiatorname, TRANSPORT_IQN_LEN, "%s",
 618                  nacl->initiatorname);
 619
 620         return lacl;
 621 }
 622
 623 int core_dev_add_initiator_node_lun_acl(
 624         struct se_portal_group *tpg,
 625         struct se_lun_acl *lacl,
 626         struct se_lun *lun,
 627         u32 lun_access)
 628 {
 629         struct se_node_acl *nacl = lacl->se_lun_nacl;
 630         /*
 631          * rcu_dereference_raw protected by se_lun->lun_group symlink
 632          * reference to se_device->dev_group.
 633          */
 634         struct se_device *dev = rcu_dereference_raw(lun->lun_se_dev);
 635
 636         if (!nacl)
 637                 return -EINVAL;
 638
 639         if ((lun->lun_access & TRANSPORT_LUNFLAGS_READ_ONLY) &&
 640             (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE))
 641                 lun_access = TRANSPORT_LUNFLAGS_READ_ONLY;
 642
 643         lacl->se_lun = lun;
 644
 645         if (core_enable_device_list_for_node(lun, lacl, lacl->mapped_lun,
 646                         lun_access, nacl, tpg) < 0)
 647                 return -EINVAL;
 648
 649         pr_debug("%s_TPG[%hu]_LUN[%u->%u] - Added %s ACL for "
 650                 " InitiatorNode: %s\n", tpg->se_tpg_tfo->get_fabric_name(),
 651                 tpg->se_tpg_tfo->tpg_get_tag(tpg), lun->unpacked_lun, lacl->mapped_lun,
 652                 (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE) ? "RW" : "RO",
 653                 lacl->initiatorname);
 654         /*
 655          * Check to see if there are any existing persistent reservation APTPL
 656          * pre-registrations that need to be enabled for this LUN ACL..
 657          */
 658         core_scsi3_check_aptpl_registration(dev, tpg, lun, nacl,
 659                                             lacl->mapped_lun);
 660         return 0;
 661 }
 662
 663 int core_dev_del_initiator_node_lun_acl(
 664         struct se_lun *lun,
 665         struct se_lun_acl *lacl)
 666 {
 667         struct se_portal_group *tpg = lun->lun_tpg;
 668         struct se_node_acl *nacl;
 669         struct se_dev_entry *deve;
 670
 671         nacl = lacl->se_lun_nacl;
 672         if (!nacl)
 673                 return -EINVAL;
 674
 675         mutex_lock(&nacl->lun_entry_mutex);
 676         deve = target_nacl_find_deve(nacl, lacl->mapped_lun);
 677         if (deve)
 678                 core_disable_device_list_for_node(lun, deve, nacl, tpg);
 679         mutex_unlock(&nacl->lun_entry_mutex);
 680
 681         pr_debug("%s_TPG[%hu]_LUN[%u] - Removed ACL for"
 682                 " InitiatorNode: %s Mapped LUN: %u\n",
 683                 tpg->se_tpg_tfo->get_fabric_name(),
 684                 tpg->se_tpg_tfo->tpg_get_tag(tpg), lun->unpacked_lun,
 685                 lacl->initiatorname, lacl->mapped_lun);
 686
 687         return 0;
 688 }
 689
 690 void core_dev_free_initiator_node_lun_acl(
 691         struct se_portal_group *tpg,
 692         struct se_lun_acl *lacl)
 693 {
 694         pr_debug("%s_TPG[%hu] - Freeing ACL for %s InitiatorNode: %s"
 695                 " Mapped LUN: %u\n", tpg->se_tpg_tfo->get_fabric_name(),
 696                 tpg->se_tpg_tfo->tpg_get_tag(tpg),
 697                 tpg->se_tpg_tfo->get_fabric_name(),
 698                 lacl->initiatorname, lacl->mapped_lun);
 699
 700         kfree(lacl);
 701 }
 702
 703 static void scsi_dump_inquiry(struct se_device *dev)
 704 {
 705         struct t10_wwn *wwn = &dev->t10_wwn;
 706         char buf[17];
 707         int i, device_type;
 708         /*
 709          * Print Linux/SCSI style INQUIRY formatting to the kernel ring buffer
 710          */
 711         for (i = 0; i < 8; i++)
 712                 if (wwn->vendor[i] >= 0x20)
 713                         buf[i] = wwn->vendor[i];
 714                 else
 715                         buf[i] = ' ';
 716         buf[i] = '\0';
 717         pr_debug("  Vendor: %s\n", buf);
 718
 719         for (i = 0; i < 16; i++)
 720                 if (wwn->model[i] >= 0x20)
 721                         buf[i] = wwn->model[i];
 722                 else
 723                         buf[i] = ' ';
 724         buf[i] = '\0';
 725         pr_debug("  Model: %s\n", buf);
 726
 727         for (i = 0; i < 4; i++)
 728                 if (wwn->revision[i] >= 0x20)
 729                         buf[i] = wwn->revision[i];
 730                 else
 731                         buf[i] = ' ';
 732         buf[i] = '\0';
 733         pr_debug("  Revision: %s\n", buf);
 734
 735         device_type = dev->transport->get_device_type(dev);
 736         pr_debug("  Type:   %s ", scsi_device_type(device_type));
 737 }
 738
 739 struct se_device *target_alloc_device(struct se_hba *hba, const char *name)
 740 {
 741         struct se_device *dev;
 742         struct se_lun *xcopy_lun;
 743
 744         dev = hba->backend->ops->alloc_device(hba, name);
 745         if (!dev)
 746                 return NULL;
 747
 748         dev->dev_link_magic = SE_DEV_LINK_MAGIC;
 749         dev->se_hba = hba;
 750         dev->transport = hba->backend->ops;
 751         dev->prot_length = sizeof(struct se_dif_v1_tuple);
 752         dev->hba_index = hba->hba_index;
 753
 754         INIT_LIST_HEAD(&dev->dev_list);
 755         INIT_LIST_HEAD(&dev->dev_sep_list);
 756         INIT_LIST_HEAD(&dev->dev_tmr_list);
 757         INIT_LIST_HEAD(&dev->delayed_cmd_list);
 758         INIT_LIST_HEAD(&dev->state_list);
 759         INIT_LIST_HEAD(&dev->qf_cmd_list);
 760         INIT_LIST_HEAD(&dev->g_dev_node);
 761         spin_lock_init(&dev->execute_task_lock);
 762         spin_lock_init(&dev->delayed_cmd_lock);
 763         spin_lock_init(&dev->dev_reservation_lock);
 764         spin_lock_init(&dev->se_port_lock);
 765         spin_lock_init(&dev->se_tmr_lock);
 766         spin_lock_init(&dev->qf_cmd_lock);
 767         sema_init(&dev->caw_sem, 1);
 768         atomic_set(&dev->dev_ordered_id, 0);
 769         INIT_LIST_HEAD(&dev->t10_wwn.t10_vpd_list);
 770         spin_lock_init(&dev->t10_wwn.t10_vpd_lock);
 771         INIT_LIST_HEAD(&dev->t10_pr.registration_list);
 772         INIT_LIST_HEAD(&dev->t10_pr.aptpl_reg_list);
 773         spin_lock_init(&dev->t10_pr.registration_lock);
 774         spin_lock_init(&dev->t10_pr.aptpl_reg_lock);
 775         INIT_LIST_HEAD(&dev->t10_alua.tg_pt_gps_list);
 776         spin_lock_init(&dev->t10_alua.tg_pt_gps_lock);
 777         INIT_LIST_HEAD(&dev->t10_alua.lba_map_list);
 778         spin_lock_init(&dev->t10_alua.lba_map_lock);
 779
 780         dev->t10_wwn.t10_dev = dev;
 781         dev->t10_alua.t10_dev = dev;
 782
 783         dev->dev_attrib.da_dev = dev;
 784         dev->dev_attrib.emulate_model_alias = DA_EMULATE_MODEL_ALIAS;
 785         dev->dev_attrib.emulate_dpo = 1;
 786         dev->dev_attrib.emulate_fua_write = 1;
 787         dev->dev_attrib.emulate_fua_read = 1;
 788         dev->dev_attrib.emulate_write_cache = DA_EMULATE_WRITE_CACHE;
 789         dev->dev_attrib.emulate_ua_intlck_ctrl = DA_EMULATE_UA_INTLLCK_CTRL;
 790         dev->dev_attrib.emulate_tas = DA_EMULATE_TAS;
 791         dev->dev_attrib.emulate_tpu = DA_EMULATE_TPU;
 792         dev->dev_attrib.emulate_tpws = DA_EMULATE_TPWS;
 793         dev->dev_attrib.emulate_caw = DA_EMULATE_CAW;
 794         dev->dev_attrib.emulate_3pc = DA_EMULATE_3PC;
 795         dev->dev_attrib.pi_prot_type = TARGET_DIF_TYPE0_PROT;
 796         dev->dev_attrib.enforce_pr_isids = DA_ENFORCE_PR_ISIDS;
 797         dev->dev_attrib.force_pr_aptpl = DA_FORCE_PR_APTPL;
 798         dev->dev_attrib.is_nonrot = DA_IS_NONROT;
 799         dev->dev_attrib.emulate_rest_reord = DA_EMULATE_REST_REORD;
 800         dev->dev_attrib.max_unmap_lba_count = DA_MAX_UNMAP_LBA_COUNT;
 801         dev->dev_attrib.max_unmap_block_desc_count =
 802                 DA_MAX_UNMAP_BLOCK_DESC_COUNT;
 803         dev->dev_attrib.unmap_granularity = DA_UNMAP_GRANULARITY_DEFAULT;
 804         dev->dev_attrib.unmap_granularity_alignment =
 805                                 DA_UNMAP_GRANULARITY_ALIGNMENT_DEFAULT;
 806         dev->dev_attrib.max_write_same_len = DA_MAX_WRITE_SAME_LEN;
 807
 808         xcopy_lun = &dev->xcopy_lun;
 809         rcu_assign_pointer(xcopy_lun->lun_se_dev, dev);
 810         init_completion(&xcopy_lun->lun_ref_comp);
 811         INIT_LIST_HEAD(&xcopy_lun->lun_deve_list);
 812         INIT_LIST_HEAD(&xcopy_lun->lun_dev_link);
 813         mutex_init(&xcopy_lun->lun_tg_pt_md_mutex);
 814         xcopy_lun->lun_tpg = &xcopy_pt_tpg;
 815
 816         return dev;
 817 }
 818
 819 int target_configure_device(struct se_device *dev)
 820 {
 821         struct se_hba *hba = dev->se_hba;
 822         int ret;
 823
 824         if (dev->dev_flags & DF_CONFIGURED) {
 825                 pr_err("se_dev->se_dev_ptr already set for storage"
 826                                 " object\n");
 827                 return -EEXIST;
 828         }
 829
 830         ret = dev->transport->configure_device(dev);
 831         if (ret)
 832                 goto out;
 833         /*
 834          * XXX: there is not much point to have two different values here..
 835          */
 836         dev->dev_attrib.block_size = dev->dev_attrib.hw_block_size;
 837         dev->dev_attrib.queue_depth = dev->dev_attrib.hw_queue_depth;
 838
 839         /*
 840          * Align max_hw_sectors down to PAGE_SIZE I/O transfers
 841          */
 842         dev->dev_attrib.hw_max_sectors =
 843                 se_dev_align_max_sectors(dev->dev_attrib.hw_max_sectors,
 844                                          dev->dev_attrib.hw_block_size);
 845         dev->dev_attrib.optimal_sectors = dev->dev_attrib.hw_max_sectors;
 846
 847         dev->dev_index = scsi_get_new_index(SCSI_DEVICE_INDEX);
 848         dev->creation_time = get_jiffies_64();
 849
 850         ret = core_setup_alua(dev);
 851         if (ret)
 852                 goto out;
 853
 854         /*
 855          * Startup the struct se_device processing thread
 856          */
 857         dev->tmr_wq = alloc_workqueue("tmr-%s", WQ_MEM_RECLAIM | WQ_UNBOUND, 1,
 858                                       dev->transport->name);
 859         if (!dev->tmr_wq) {
 860                 pr_err("Unable to create tmr workqueue for %s\n",
 861                         dev->transport->name);
 862                 ret = -ENOMEM;
 863                 goto out_free_alua;
 864         }
 865
 866         /*
 867          * Setup work_queue for QUEUE_FULL
 868          */
 869         INIT_WORK(&dev->qf_work_queue, target_qf_do_work);
 870
 871         /*
 872          * Preload the initial INQUIRY const values if we are doing
 873          * anything virtual (IBLOCK, FILEIO, RAMDISK), but not for TCM/pSCSI
 874          * passthrough because this is being provided by the backend LLD.
 875          */
 876         if (!(dev->transport->transport_flags & TRANSPORT_FLAG_PASSTHROUGH)) {
 877                 strncpy(&dev->t10_wwn.vendor[0], "LIO-ORG", 8);
 878                 strncpy(&dev->t10_wwn.model[0],
 879                         dev->transport->inquiry_prod, 16);
 880                 strncpy(&dev->t10_wwn.revision[0],
 881                         dev->transport->inquiry_rev, 4);
 882         }
 883
 884         scsi_dump_inquiry(dev);
 885
 886         spin_lock(&hba->device_lock);
 887         hba->dev_count++;
 888         spin_unlock(&hba->device_lock);
 889
 890         mutex_lock(&g_device_mutex);
 891         list_add_tail(&dev->g_dev_node, &g_device_list);
 892         mutex_unlock(&g_device_mutex);
 893
 894         dev->dev_flags |= DF_CONFIGURED;
 895
 896         return 0;
 897
 898 out_free_alua:
 899         core_alua_free_lu_gp_mem(dev);
 900 out:
 901         se_release_vpd_for_dev(dev);
 902         return ret;
 903 }
 904
 905 void target_free_device(struct se_device *dev)
 906 {
 907         struct se_hba *hba = dev->se_hba;
 908
 909         WARN_ON(!list_empty(&dev->dev_sep_list));
 910
 911         if (dev->dev_flags & DF_CONFIGURED) {
 912                 destroy_workqueue(dev->tmr_wq);
 913
 914                 mutex_lock(&g_device_mutex);
 915                 list_del(&dev->g_dev_node);
 916                 mutex_unlock(&g_device_mutex);
 917
 918                 spin_lock(&hba->device_lock);
 919                 hba->dev_count--;
 920                 spin_unlock(&hba->device_lock);
 921         }
 922
 923         core_alua_free_lu_gp_mem(dev);
 924         core_alua_set_lba_map(dev, NULL, 0, 0);
 925         core_scsi3_free_all_registrations(dev);
 926         se_release_vpd_for_dev(dev);
 927
 928         if (dev->transport->free_prot)
 929                 dev->transport->free_prot(dev);
 930
 931         dev->transport->free_device(dev);
 932 }
 933
 934 int core_dev_setup_virtual_lun0(void)
 935 {
 936         struct se_hba *hba;
 937         struct se_device *dev;
 938         char buf[] = "rd_pages=8,rd_nullio=1";
 939         int ret;
 940
 941         hba = core_alloc_hba("rd_mcp", 0, HBA_FLAGS_INTERNAL_USE);
 942         if (IS_ERR(hba))
 943                 return PTR_ERR(hba);
 944
 945         dev = target_alloc_device(hba, "virt_lun0");
 946         if (!dev) {
 947                 ret = -ENOMEM;
 948                 goto out_free_hba;
 949         }
 950
 951         hba->backend->ops->set_configfs_dev_params(dev, buf, sizeof(buf));
 952
 953         ret = target_configure_device(dev);
 954         if (ret)
 955                 goto out_free_se_dev;
 956
 957         lun0_hba = hba;
 958         g_lun0_dev = dev;
 959         return 0;
 960
 961 out_free_se_dev:
 962         target_free_device(dev);
 963 out_free_hba:
 964         core_delete_hba(hba);
 965         return ret;
 966 }
 967
 968
 969 void core_dev_release_virtual_lun0(void)
 970 {
 971         struct se_hba *hba = lun0_hba;
 972
 973         if (!hba)
 974                 return;
 975
 976         if (g_lun0_dev)
 977                 target_free_device(g_lun0_dev);
 978         core_delete_hba(hba);
 979 }
 980
 981 /*
 982  * Common CDB parsing for kernel and user passthrough.
 983  */
 984 sense_reason_t
 985 passthrough_parse_cdb(struct se_cmd *cmd,
 986         sense_reason_t (*exec_cmd)(struct se_cmd *cmd))
 987 {
 988         unsigned char *cdb = cmd->t_task_cdb;
 989
 990         /*
 991          * Clear a lun set in the cdb if the initiator talking to use spoke
 992          * and old standards version, as we can't assume the underlying device
 993          * won't choke up on it.
 994          */
 995         switch (cdb[0]) {
 996         case READ_10: /* SBC - RDProtect */
 997         case READ_12: /* SBC - RDProtect */
 998         case READ_16: /* SBC - RDProtect */
 999         case SEND_DIAGNOSTIC: /* SPC - SELF-TEST Code */
1000         case VERIFY: /* SBC - VRProtect */
1001         case VERIFY_16: /* SBC - VRProtect */
1002         case WRITE_VERIFY: /* SBC - VRProtect */
1003         case WRITE_VERIFY_12: /* SBC - VRProtect */
1004         case MAINTENANCE_IN: /* SPC - Parameter Data Format for SA RTPG */
1005                 break;
1006         default:
1007                 cdb[1] &= 0x1f; /* clear logical unit number */
1008                 break;
1009         }
1010
1011         /*
1012          * For REPORT LUNS we always need to emulate the response, for everything
1013          * else, pass it up.
1014          */
1015         if (cdb[0] == REPORT_LUNS) {
1016                 cmd->execute_cmd = spc_emulate_report_luns;
1017                 return TCM_NO_SENSE;
1018         }
1019
1020         /* Set DATA_CDB flag for ops that should have it */
1021         switch (cdb[0]) {
1022         case READ_6:
1023         case READ_10:
1024         case READ_12:
1025         case READ_16:
1026         case WRITE_6:
1027         case WRITE_10:
1028         case WRITE_12:
1029         case WRITE_16:
1030         case WRITE_VERIFY:
1031         case WRITE_VERIFY_12:
1032         case 0x8e: /* WRITE_VERIFY_16 */
1033         case COMPARE_AND_WRITE:
1034         case XDWRITEREAD_10:
1035                 cmd->se_cmd_flags |= SCF_SCSI_DATA_CDB;
1036                 break;
1037         case VARIABLE_LENGTH_CMD:
1038                 switch (get_unaligned_be16(&cdb[8])) {
1039                 case READ_32:
1040                 case WRITE_32:
1041                 case 0x0c: /* WRITE_VERIFY_32 */
1042                 case XDWRITEREAD_32:
1043                         cmd->se_cmd_flags |= SCF_SCSI_DATA_CDB;
1044                         break;
1045                 }
1046         }
1047
1048         cmd->execute_cmd = exec_cmd;
1049
1050         return TCM_NO_SENSE;
1051 }
1052 EXPORT_SYMBOL(passthrough_parse_cdb);