Upgrade to 4.4.50-rt62
[kvmfornfv.git] / kernel / 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                 se_cmd->se_lun = rcu_dereference(deve->se_lun);
81                 se_cmd->pr_res_key = deve->pr_res_key;
82                 se_cmd->orig_fe_lun = unpacked_lun;
83                 se_cmd->se_cmd_flags |= SCF_SE_LUN_CMD;
84
85                 percpu_ref_get(&se_lun->lun_ref);
86                 se_cmd->lun_ref_active = true;
87
88                 if ((se_cmd->data_direction == DMA_TO_DEVICE) &&
89                     (deve->lun_flags & TRANSPORT_LUNFLAGS_READ_ONLY)) {
90                         pr_err("TARGET_CORE[%s]: Detected WRITE_PROTECTED LUN"
91                                 " Access for 0x%08llx\n",
92                                 se_cmd->se_tfo->get_fabric_name(),
93                                 unpacked_lun);
94                         rcu_read_unlock();
95                         ret = TCM_WRITE_PROTECTED;
96                         goto ref_dev;
97                 }
98         }
99         rcu_read_unlock();
100
101         if (!se_lun) {
102                 /*
103                  * Use the se_portal_group->tpg_virt_lun0 to allow for
104                  * REPORT_LUNS, et al to be returned when no active
105                  * MappedLUN=0 exists for this Initiator Port.
106                  */
107                 if (unpacked_lun != 0) {
108                         pr_err("TARGET_CORE[%s]: Detected NON_EXISTENT_LUN"
109                                 " Access for 0x%08llx\n",
110                                 se_cmd->se_tfo->get_fabric_name(),
111                                 unpacked_lun);
112                         return TCM_NON_EXISTENT_LUN;
113                 }
114
115                 se_lun = se_sess->se_tpg->tpg_virt_lun0;
116                 se_cmd->se_lun = se_sess->se_tpg->tpg_virt_lun0;
117                 se_cmd->orig_fe_lun = 0;
118                 se_cmd->se_cmd_flags |= SCF_SE_LUN_CMD;
119
120                 percpu_ref_get(&se_lun->lun_ref);
121                 se_cmd->lun_ref_active = true;
122
123                 /*
124                  * Force WRITE PROTECT for virtual LUN 0
125                  */
126                 if ((se_cmd->data_direction != DMA_FROM_DEVICE) &&
127                     (se_cmd->data_direction != DMA_NONE)) {
128                         ret = TCM_WRITE_PROTECTED;
129                         goto ref_dev;
130                 }
131         }
132         /*
133          * RCU reference protected by percpu se_lun->lun_ref taken above that
134          * must drop to zero (including initial reference) before this se_lun
135          * pointer can be kfree_rcu() by the final se_lun->lun_group put via
136          * target_core_fabric_configfs.c:target_fabric_port_release
137          */
138 ref_dev:
139         se_cmd->se_dev = rcu_dereference_raw(se_lun->lun_se_dev);
140         atomic_long_inc(&se_cmd->se_dev->num_cmds);
141
142         if (se_cmd->data_direction == DMA_TO_DEVICE)
143                 atomic_long_add(se_cmd->data_length,
144                                 &se_cmd->se_dev->write_bytes);
145         else if (se_cmd->data_direction == DMA_FROM_DEVICE)
146                 atomic_long_add(se_cmd->data_length,
147                                 &se_cmd->se_dev->read_bytes);
148
149         return ret;
150 }
151 EXPORT_SYMBOL(transport_lookup_cmd_lun);
152
153 int transport_lookup_tmr_lun(struct se_cmd *se_cmd, u64 unpacked_lun)
154 {
155         struct se_dev_entry *deve;
156         struct se_lun *se_lun = NULL;
157         struct se_session *se_sess = se_cmd->se_sess;
158         struct se_node_acl *nacl = se_sess->se_node_acl;
159         struct se_tmr_req *se_tmr = se_cmd->se_tmr_req;
160         unsigned long flags;
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%08llx\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         rcu_read_lock();
201         deve = target_nacl_find_deve(se_sess->se_node_acl, cmd->orig_fe_lun);
202         ret = (deve && deve->lun_flags & TRANSPORT_LUNFLAGS_READ_ONLY);
203         rcu_read_unlock();
204
205         return ret;
206 }
207 EXPORT_SYMBOL(target_lun_is_rdonly);
208
209 /*
210  * This function is called from core_scsi3_emulate_pro_register_and_move()
211  * and core_scsi3_decode_spec_i_port(), and will increment &deve->pr_kref
212  * when a matching rtpi is found.
213  */
214 struct se_dev_entry *core_get_se_deve_from_rtpi(
215         struct se_node_acl *nacl,
216         u16 rtpi)
217 {
218         struct se_dev_entry *deve;
219         struct se_lun *lun;
220         struct se_portal_group *tpg = nacl->se_tpg;
221
222         rcu_read_lock();
223         hlist_for_each_entry_rcu(deve, &nacl->lun_entry_hlist, link) {
224                 lun = rcu_dereference(deve->se_lun);
225                 if (!lun) {
226                         pr_err("%s device entries device pointer is"
227                                 " NULL, but Initiator has access.\n",
228                                 tpg->se_tpg_tfo->get_fabric_name());
229                         continue;
230                 }
231                 if (lun->lun_rtpi != rtpi)
232                         continue;
233
234                 kref_get(&deve->pr_kref);
235                 rcu_read_unlock();
236
237                 return deve;
238         }
239         rcu_read_unlock();
240
241         return NULL;
242 }
243
244 void core_free_device_list_for_node(
245         struct se_node_acl *nacl,
246         struct se_portal_group *tpg)
247 {
248         struct se_dev_entry *deve;
249
250         mutex_lock(&nacl->lun_entry_mutex);
251         hlist_for_each_entry_rcu(deve, &nacl->lun_entry_hlist, link) {
252                 struct se_lun *lun = rcu_dereference_check(deve->se_lun,
253                                         lockdep_is_held(&nacl->lun_entry_mutex));
254                 core_disable_device_list_for_node(lun, deve, nacl, tpg);
255         }
256         mutex_unlock(&nacl->lun_entry_mutex);
257 }
258
259 void core_update_device_list_access(
260         u64 mapped_lun,
261         u32 lun_access,
262         struct se_node_acl *nacl)
263 {
264         struct se_dev_entry *deve;
265
266         mutex_lock(&nacl->lun_entry_mutex);
267         deve = target_nacl_find_deve(nacl, mapped_lun);
268         if (deve) {
269                 if (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE) {
270                         deve->lun_flags &= ~TRANSPORT_LUNFLAGS_READ_ONLY;
271                         deve->lun_flags |= TRANSPORT_LUNFLAGS_READ_WRITE;
272                 } else {
273                         deve->lun_flags &= ~TRANSPORT_LUNFLAGS_READ_WRITE;
274                         deve->lun_flags |= TRANSPORT_LUNFLAGS_READ_ONLY;
275                 }
276         }
277         mutex_unlock(&nacl->lun_entry_mutex);
278 }
279
280 /*
281  * Called with rcu_read_lock or nacl->device_list_lock held.
282  */
283 struct se_dev_entry *target_nacl_find_deve(struct se_node_acl *nacl, u64 mapped_lun)
284 {
285         struct se_dev_entry *deve;
286
287         hlist_for_each_entry_rcu(deve, &nacl->lun_entry_hlist, link)
288                 if (deve->mapped_lun == mapped_lun)
289                         return deve;
290
291         return NULL;
292 }
293 EXPORT_SYMBOL(target_nacl_find_deve);
294
295 void target_pr_kref_release(struct kref *kref)
296 {
297         struct se_dev_entry *deve = container_of(kref, struct se_dev_entry,
298                                                  pr_kref);
299         complete(&deve->pr_comp);
300 }
301
302 static void
303 target_luns_data_has_changed(struct se_node_acl *nacl, struct se_dev_entry *new,
304                              bool skip_new)
305 {
306         struct se_dev_entry *tmp;
307
308         rcu_read_lock();
309         hlist_for_each_entry_rcu(tmp, &nacl->lun_entry_hlist, link) {
310                 if (skip_new && tmp == new)
311                         continue;
312                 core_scsi3_ua_allocate(tmp, 0x3F,
313                                        ASCQ_3FH_REPORTED_LUNS_DATA_HAS_CHANGED);
314         }
315         rcu_read_unlock();
316 }
317
318 int core_enable_device_list_for_node(
319         struct se_lun *lun,
320         struct se_lun_acl *lun_acl,
321         u64 mapped_lun,
322         u32 lun_access,
323         struct se_node_acl *nacl,
324         struct se_portal_group *tpg)
325 {
326         struct se_dev_entry *orig, *new;
327
328         new = kzalloc(sizeof(*new), GFP_KERNEL);
329         if (!new) {
330                 pr_err("Unable to allocate se_dev_entry memory\n");
331                 return -ENOMEM;
332         }
333
334         atomic_set(&new->ua_count, 0);
335         spin_lock_init(&new->ua_lock);
336         INIT_LIST_HEAD(&new->ua_list);
337         INIT_LIST_HEAD(&new->lun_link);
338
339         new->mapped_lun = mapped_lun;
340         kref_init(&new->pr_kref);
341         init_completion(&new->pr_comp);
342
343         if (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE)
344                 new->lun_flags |= TRANSPORT_LUNFLAGS_READ_WRITE;
345         else
346                 new->lun_flags |= TRANSPORT_LUNFLAGS_READ_ONLY;
347
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_flags = 0;
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,
570                                 TRANSPORT_LUNFLAGS_READ_WRITE, dev);
571         if (rc < 0)
572                 return rc;
573
574         pr_debug("%s_TPG[%u]_LUN[%llu] - Activated %s Logical Unit from"
575                 " CORE HBA: %u\n", tpg->se_tpg_tfo->get_fabric_name(),
576                 tpg->se_tpg_tfo->tpg_get_tag(tpg), lun->unpacked_lun,
577                 tpg->se_tpg_tfo->get_fabric_name(), dev->se_hba->hba_id);
578         /*
579          * Update LUN maps for dynamically added initiators when
580          * generate_node_acl is enabled.
581          */
582         if (tpg->se_tpg_tfo->tpg_check_demo_mode(tpg)) {
583                 struct se_node_acl *acl;
584
585                 mutex_lock(&tpg->acl_node_mutex);
586                 list_for_each_entry(acl, &tpg->acl_node_list, acl_list) {
587                         if (acl->dynamic_node_acl &&
588                             (!tpg->se_tpg_tfo->tpg_check_demo_mode_login_only ||
589                              !tpg->se_tpg_tfo->tpg_check_demo_mode_login_only(tpg))) {
590                                 core_tpg_add_node_to_devs(acl, tpg, lun);
591                         }
592                 }
593                 mutex_unlock(&tpg->acl_node_mutex);
594         }
595
596         return 0;
597 }
598
599 /*      core_dev_del_lun():
600  *
601  *
602  */
603 void core_dev_del_lun(
604         struct se_portal_group *tpg,
605         struct se_lun *lun)
606 {
607         pr_debug("%s_TPG[%u]_LUN[%llu] - Deactivating %s Logical Unit from"
608                 " device object\n", tpg->se_tpg_tfo->get_fabric_name(),
609                 tpg->se_tpg_tfo->tpg_get_tag(tpg), lun->unpacked_lun,
610                 tpg->se_tpg_tfo->get_fabric_name());
611
612         core_tpg_remove_lun(tpg, lun);
613 }
614
615 struct se_lun_acl *core_dev_init_initiator_node_lun_acl(
616         struct se_portal_group *tpg,
617         struct se_node_acl *nacl,
618         u64 mapped_lun,
619         int *ret)
620 {
621         struct se_lun_acl *lacl;
622
623         if (strlen(nacl->initiatorname) >= TRANSPORT_IQN_LEN) {
624                 pr_err("%s InitiatorName exceeds maximum size.\n",
625                         tpg->se_tpg_tfo->get_fabric_name());
626                 *ret = -EOVERFLOW;
627                 return NULL;
628         }
629         lacl = kzalloc(sizeof(struct se_lun_acl), GFP_KERNEL);
630         if (!lacl) {
631                 pr_err("Unable to allocate memory for struct se_lun_acl.\n");
632                 *ret = -ENOMEM;
633                 return NULL;
634         }
635
636         lacl->mapped_lun = mapped_lun;
637         lacl->se_lun_nacl = nacl;
638
639         return lacl;
640 }
641
642 int core_dev_add_initiator_node_lun_acl(
643         struct se_portal_group *tpg,
644         struct se_lun_acl *lacl,
645         struct se_lun *lun,
646         u32 lun_access)
647 {
648         struct se_node_acl *nacl = lacl->se_lun_nacl;
649         /*
650          * rcu_dereference_raw protected by se_lun->lun_group symlink
651          * reference to se_device->dev_group.
652          */
653         struct se_device *dev = rcu_dereference_raw(lun->lun_se_dev);
654
655         if (!nacl)
656                 return -EINVAL;
657
658         if ((lun->lun_access & TRANSPORT_LUNFLAGS_READ_ONLY) &&
659             (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE))
660                 lun_access = TRANSPORT_LUNFLAGS_READ_ONLY;
661
662         lacl->se_lun = lun;
663
664         if (core_enable_device_list_for_node(lun, lacl, lacl->mapped_lun,
665                         lun_access, nacl, tpg) < 0)
666                 return -EINVAL;
667
668         pr_debug("%s_TPG[%hu]_LUN[%llu->%llu] - Added %s ACL for "
669                 " InitiatorNode: %s\n", tpg->se_tpg_tfo->get_fabric_name(),
670                 tpg->se_tpg_tfo->tpg_get_tag(tpg), lun->unpacked_lun, lacl->mapped_lun,
671                 (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE) ? "RW" : "RO",
672                 nacl->initiatorname);
673         /*
674          * Check to see if there are any existing persistent reservation APTPL
675          * pre-registrations that need to be enabled for this LUN ACL..
676          */
677         core_scsi3_check_aptpl_registration(dev, tpg, lun, nacl,
678                                             lacl->mapped_lun);
679         return 0;
680 }
681
682 int core_dev_del_initiator_node_lun_acl(
683         struct se_lun *lun,
684         struct se_lun_acl *lacl)
685 {
686         struct se_portal_group *tpg = lun->lun_tpg;
687         struct se_node_acl *nacl;
688         struct se_dev_entry *deve;
689
690         nacl = lacl->se_lun_nacl;
691         if (!nacl)
692                 return -EINVAL;
693
694         mutex_lock(&nacl->lun_entry_mutex);
695         deve = target_nacl_find_deve(nacl, lacl->mapped_lun);
696         if (deve)
697                 core_disable_device_list_for_node(lun, deve, nacl, tpg);
698         mutex_unlock(&nacl->lun_entry_mutex);
699
700         pr_debug("%s_TPG[%hu]_LUN[%llu] - Removed ACL for"
701                 " InitiatorNode: %s Mapped LUN: %llu\n",
702                 tpg->se_tpg_tfo->get_fabric_name(),
703                 tpg->se_tpg_tfo->tpg_get_tag(tpg), lun->unpacked_lun,
704                 nacl->initiatorname, lacl->mapped_lun);
705
706         return 0;
707 }
708
709 void core_dev_free_initiator_node_lun_acl(
710         struct se_portal_group *tpg,
711         struct se_lun_acl *lacl)
712 {
713         pr_debug("%s_TPG[%hu] - Freeing ACL for %s InitiatorNode: %s"
714                 " Mapped LUN: %llu\n", tpg->se_tpg_tfo->get_fabric_name(),
715                 tpg->se_tpg_tfo->tpg_get_tag(tpg),
716                 tpg->se_tpg_tfo->get_fabric_name(),
717                 lacl->se_lun_nacl->initiatorname, lacl->mapped_lun);
718
719         kfree(lacl);
720 }
721
722 static void scsi_dump_inquiry(struct se_device *dev)
723 {
724         struct t10_wwn *wwn = &dev->t10_wwn;
725         char buf[17];
726         int i, device_type;
727         /*
728          * Print Linux/SCSI style INQUIRY formatting to the kernel ring buffer
729          */
730         for (i = 0; i < 8; i++)
731                 if (wwn->vendor[i] >= 0x20)
732                         buf[i] = wwn->vendor[i];
733                 else
734                         buf[i] = ' ';
735         buf[i] = '\0';
736         pr_debug("  Vendor: %s\n", buf);
737
738         for (i = 0; i < 16; i++)
739                 if (wwn->model[i] >= 0x20)
740                         buf[i] = wwn->model[i];
741                 else
742                         buf[i] = ' ';
743         buf[i] = '\0';
744         pr_debug("  Model: %s\n", buf);
745
746         for (i = 0; i < 4; i++)
747                 if (wwn->revision[i] >= 0x20)
748                         buf[i] = wwn->revision[i];
749                 else
750                         buf[i] = ' ';
751         buf[i] = '\0';
752         pr_debug("  Revision: %s\n", buf);
753
754         device_type = dev->transport->get_device_type(dev);
755         pr_debug("  Type:   %s ", scsi_device_type(device_type));
756 }
757
758 struct se_device *target_alloc_device(struct se_hba *hba, const char *name)
759 {
760         struct se_device *dev;
761         struct se_lun *xcopy_lun;
762
763         dev = hba->backend->ops->alloc_device(hba, name);
764         if (!dev)
765                 return NULL;
766
767         dev->dev_link_magic = SE_DEV_LINK_MAGIC;
768         dev->se_hba = hba;
769         dev->transport = hba->backend->ops;
770         dev->prot_length = sizeof(struct t10_pi_tuple);
771         dev->hba_index = hba->hba_index;
772
773         INIT_LIST_HEAD(&dev->dev_list);
774         INIT_LIST_HEAD(&dev->dev_sep_list);
775         INIT_LIST_HEAD(&dev->dev_tmr_list);
776         INIT_LIST_HEAD(&dev->delayed_cmd_list);
777         INIT_LIST_HEAD(&dev->state_list);
778         INIT_LIST_HEAD(&dev->qf_cmd_list);
779         INIT_LIST_HEAD(&dev->g_dev_node);
780         spin_lock_init(&dev->execute_task_lock);
781         spin_lock_init(&dev->delayed_cmd_lock);
782         spin_lock_init(&dev->dev_reservation_lock);
783         spin_lock_init(&dev->se_port_lock);
784         spin_lock_init(&dev->se_tmr_lock);
785         spin_lock_init(&dev->qf_cmd_lock);
786         sema_init(&dev->caw_sem, 1);
787         INIT_LIST_HEAD(&dev->t10_wwn.t10_vpd_list);
788         spin_lock_init(&dev->t10_wwn.t10_vpd_lock);
789         INIT_LIST_HEAD(&dev->t10_pr.registration_list);
790         INIT_LIST_HEAD(&dev->t10_pr.aptpl_reg_list);
791         spin_lock_init(&dev->t10_pr.registration_lock);
792         spin_lock_init(&dev->t10_pr.aptpl_reg_lock);
793         INIT_LIST_HEAD(&dev->t10_alua.tg_pt_gps_list);
794         spin_lock_init(&dev->t10_alua.tg_pt_gps_lock);
795         INIT_LIST_HEAD(&dev->t10_alua.lba_map_list);
796         spin_lock_init(&dev->t10_alua.lba_map_lock);
797
798         dev->t10_wwn.t10_dev = dev;
799         dev->t10_alua.t10_dev = dev;
800
801         dev->dev_attrib.da_dev = dev;
802         dev->dev_attrib.emulate_model_alias = DA_EMULATE_MODEL_ALIAS;
803         dev->dev_attrib.emulate_dpo = 1;
804         dev->dev_attrib.emulate_fua_write = 1;
805         dev->dev_attrib.emulate_fua_read = 1;
806         dev->dev_attrib.emulate_write_cache = DA_EMULATE_WRITE_CACHE;
807         dev->dev_attrib.emulate_ua_intlck_ctrl = DA_EMULATE_UA_INTLLCK_CTRL;
808         dev->dev_attrib.emulate_tas = DA_EMULATE_TAS;
809         dev->dev_attrib.emulate_tpu = DA_EMULATE_TPU;
810         dev->dev_attrib.emulate_tpws = DA_EMULATE_TPWS;
811         dev->dev_attrib.emulate_caw = DA_EMULATE_CAW;
812         dev->dev_attrib.emulate_3pc = DA_EMULATE_3PC;
813         dev->dev_attrib.pi_prot_type = TARGET_DIF_TYPE0_PROT;
814         dev->dev_attrib.enforce_pr_isids = DA_ENFORCE_PR_ISIDS;
815         dev->dev_attrib.force_pr_aptpl = DA_FORCE_PR_APTPL;
816         dev->dev_attrib.is_nonrot = DA_IS_NONROT;
817         dev->dev_attrib.emulate_rest_reord = DA_EMULATE_REST_REORD;
818         dev->dev_attrib.max_unmap_lba_count = DA_MAX_UNMAP_LBA_COUNT;
819         dev->dev_attrib.max_unmap_block_desc_count =
820                 DA_MAX_UNMAP_BLOCK_DESC_COUNT;
821         dev->dev_attrib.unmap_granularity = DA_UNMAP_GRANULARITY_DEFAULT;
822         dev->dev_attrib.unmap_granularity_alignment =
823                                 DA_UNMAP_GRANULARITY_ALIGNMENT_DEFAULT;
824         dev->dev_attrib.max_write_same_len = DA_MAX_WRITE_SAME_LEN;
825
826         xcopy_lun = &dev->xcopy_lun;
827         rcu_assign_pointer(xcopy_lun->lun_se_dev, dev);
828         init_completion(&xcopy_lun->lun_ref_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         return true;
860 }
861 EXPORT_SYMBOL(target_configure_unmap_from_queue);
862
863 /*
864  * Convert from blocksize advertised to the initiator to the 512 byte
865  * units unconditionally used by the Linux block layer.
866  */
867 sector_t target_to_linux_sector(struct se_device *dev, sector_t lb)
868 {
869         switch (dev->dev_attrib.block_size) {
870         case 4096:
871                 return lb << 3;
872         case 2048:
873                 return lb << 2;
874         case 1024:
875                 return lb << 1;
876         default:
877                 return lb;
878         }
879 }
880 EXPORT_SYMBOL(target_to_linux_sector);
881
882 int target_configure_device(struct se_device *dev)
883 {
884         struct se_hba *hba = dev->se_hba;
885         int ret;
886
887         if (dev->dev_flags & DF_CONFIGURED) {
888                 pr_err("se_dev->se_dev_ptr already set for storage"
889                                 " object\n");
890                 return -EEXIST;
891         }
892
893         ret = dev->transport->configure_device(dev);
894         if (ret)
895                 goto out;
896         /*
897          * XXX: there is not much point to have two different values here..
898          */
899         dev->dev_attrib.block_size = dev->dev_attrib.hw_block_size;
900         dev->dev_attrib.queue_depth = dev->dev_attrib.hw_queue_depth;
901
902         /*
903          * Align max_hw_sectors down to PAGE_SIZE I/O transfers
904          */
905         dev->dev_attrib.hw_max_sectors =
906                 se_dev_align_max_sectors(dev->dev_attrib.hw_max_sectors,
907                                          dev->dev_attrib.hw_block_size);
908         dev->dev_attrib.optimal_sectors = dev->dev_attrib.hw_max_sectors;
909
910         dev->dev_index = scsi_get_new_index(SCSI_DEVICE_INDEX);
911         dev->creation_time = get_jiffies_64();
912
913         ret = core_setup_alua(dev);
914         if (ret)
915                 goto out;
916
917         /*
918          * Startup the struct se_device processing thread
919          */
920         dev->tmr_wq = alloc_workqueue("tmr-%s", WQ_MEM_RECLAIM | WQ_UNBOUND, 1,
921                                       dev->transport->name);
922         if (!dev->tmr_wq) {
923                 pr_err("Unable to create tmr workqueue for %s\n",
924                         dev->transport->name);
925                 ret = -ENOMEM;
926                 goto out_free_alua;
927         }
928
929         /*
930          * Setup work_queue for QUEUE_FULL
931          */
932         INIT_WORK(&dev->qf_work_queue, target_qf_do_work);
933
934         /*
935          * Preload the initial INQUIRY const values if we are doing
936          * anything virtual (IBLOCK, FILEIO, RAMDISK), but not for TCM/pSCSI
937          * passthrough because this is being provided by the backend LLD.
938          */
939         if (!(dev->transport->transport_flags & TRANSPORT_FLAG_PASSTHROUGH)) {
940                 strncpy(&dev->t10_wwn.vendor[0], "LIO-ORG", 8);
941                 strncpy(&dev->t10_wwn.model[0],
942                         dev->transport->inquiry_prod, 16);
943                 strncpy(&dev->t10_wwn.revision[0],
944                         dev->transport->inquiry_rev, 4);
945         }
946
947         scsi_dump_inquiry(dev);
948
949         spin_lock(&hba->device_lock);
950         hba->dev_count++;
951         spin_unlock(&hba->device_lock);
952
953         mutex_lock(&g_device_mutex);
954         list_add_tail(&dev->g_dev_node, &g_device_list);
955         mutex_unlock(&g_device_mutex);
956
957         dev->dev_flags |= DF_CONFIGURED;
958
959         return 0;
960
961 out_free_alua:
962         core_alua_free_lu_gp_mem(dev);
963 out:
964         se_release_vpd_for_dev(dev);
965         return ret;
966 }
967
968 void target_free_device(struct se_device *dev)
969 {
970         struct se_hba *hba = dev->se_hba;
971
972         WARN_ON(!list_empty(&dev->dev_sep_list));
973
974         if (dev->dev_flags & DF_CONFIGURED) {
975                 destroy_workqueue(dev->tmr_wq);
976
977                 mutex_lock(&g_device_mutex);
978                 list_del(&dev->g_dev_node);
979                 mutex_unlock(&g_device_mutex);
980
981                 spin_lock(&hba->device_lock);
982                 hba->dev_count--;
983                 spin_unlock(&hba->device_lock);
984         }
985
986         core_alua_free_lu_gp_mem(dev);
987         core_alua_set_lba_map(dev, NULL, 0, 0);
988         core_scsi3_free_all_registrations(dev);
989         se_release_vpd_for_dev(dev);
990
991         if (dev->transport->free_prot)
992                 dev->transport->free_prot(dev);
993
994         dev->transport->free_device(dev);
995 }
996
997 int core_dev_setup_virtual_lun0(void)
998 {
999         struct se_hba *hba;
1000         struct se_device *dev;
1001         char buf[] = "rd_pages=8,rd_nullio=1";
1002         int ret;
1003
1004         hba = core_alloc_hba("rd_mcp", 0, HBA_FLAGS_INTERNAL_USE);
1005         if (IS_ERR(hba))
1006                 return PTR_ERR(hba);
1007
1008         dev = target_alloc_device(hba, "virt_lun0");
1009         if (!dev) {
1010                 ret = -ENOMEM;
1011                 goto out_free_hba;
1012         }
1013
1014         hba->backend->ops->set_configfs_dev_params(dev, buf, sizeof(buf));
1015
1016         ret = target_configure_device(dev);
1017         if (ret)
1018                 goto out_free_se_dev;
1019
1020         lun0_hba = hba;
1021         g_lun0_dev = dev;
1022         return 0;
1023
1024 out_free_se_dev:
1025         target_free_device(dev);
1026 out_free_hba:
1027         core_delete_hba(hba);
1028         return ret;
1029 }
1030
1031
1032 void core_dev_release_virtual_lun0(void)
1033 {
1034         struct se_hba *hba = lun0_hba;
1035
1036         if (!hba)
1037                 return;
1038
1039         if (g_lun0_dev)
1040                 target_free_device(g_lun0_dev);
1041         core_delete_hba(hba);
1042 }
1043
1044 /*
1045  * Common CDB parsing for kernel and user passthrough.
1046  */
1047 sense_reason_t
1048 passthrough_parse_cdb(struct se_cmd *cmd,
1049         sense_reason_t (*exec_cmd)(struct se_cmd *cmd))
1050 {
1051         unsigned char *cdb = cmd->t_task_cdb;
1052
1053         /*
1054          * Clear a lun set in the cdb if the initiator talking to use spoke
1055          * and old standards version, as we can't assume the underlying device
1056          * won't choke up on it.
1057          */
1058         switch (cdb[0]) {
1059         case READ_10: /* SBC - RDProtect */
1060         case READ_12: /* SBC - RDProtect */
1061         case READ_16: /* SBC - RDProtect */
1062         case SEND_DIAGNOSTIC: /* SPC - SELF-TEST Code */
1063         case VERIFY: /* SBC - VRProtect */
1064         case VERIFY_16: /* SBC - VRProtect */
1065         case WRITE_VERIFY: /* SBC - VRProtect */
1066         case WRITE_VERIFY_12: /* SBC - VRProtect */
1067         case MAINTENANCE_IN: /* SPC - Parameter Data Format for SA RTPG */
1068                 break;
1069         default:
1070                 cdb[1] &= 0x1f; /* clear logical unit number */
1071                 break;
1072         }
1073
1074         /*
1075          * For REPORT LUNS we always need to emulate the response, for everything
1076          * else, pass it up.
1077          */
1078         if (cdb[0] == REPORT_LUNS) {
1079                 cmd->execute_cmd = spc_emulate_report_luns;
1080                 return TCM_NO_SENSE;
1081         }
1082
1083         /* Set DATA_CDB flag for ops that should have it */
1084         switch (cdb[0]) {
1085         case READ_6:
1086         case READ_10:
1087         case READ_12:
1088         case READ_16:
1089         case WRITE_6:
1090         case WRITE_10:
1091         case WRITE_12:
1092         case WRITE_16:
1093         case WRITE_VERIFY:
1094         case WRITE_VERIFY_12:
1095         case 0x8e: /* WRITE_VERIFY_16 */
1096         case COMPARE_AND_WRITE:
1097         case XDWRITEREAD_10:
1098                 cmd->se_cmd_flags |= SCF_SCSI_DATA_CDB;
1099                 break;
1100         case VARIABLE_LENGTH_CMD:
1101                 switch (get_unaligned_be16(&cdb[8])) {
1102                 case READ_32:
1103                 case WRITE_32:
1104                 case 0x0c: /* WRITE_VERIFY_32 */
1105                 case XDWRITEREAD_32:
1106                         cmd->se_cmd_flags |= SCF_SCSI_DATA_CDB;
1107                         break;
1108                 }
1109         }
1110
1111         cmd->execute_cmd = exec_cmd;
1112
1113         return TCM_NO_SENSE;
1114 }
1115 EXPORT_SYMBOL(passthrough_parse_cdb);