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