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