OSDN Git Service

5a9deb2b24af9047206daac48db1956405d5c319
[uclinux-h8/linux.git] / drivers / target / target_core_tpg.c
1 /*******************************************************************************
2  * Filename:  target_core_tpg.c
3  *
4  * This file contains generic Target Portal Group related functions.
5  *
6  * (c) Copyright 2002-2013 Datera, Inc.
7  *
8  * Nicholas A. Bellinger <nab@kernel.org>
9  *
10  * This program is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License as published by
12  * the Free Software Foundation; either version 2 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
23  *
24  ******************************************************************************/
25
26 #include <linux/net.h>
27 #include <linux/string.h>
28 #include <linux/timer.h>
29 #include <linux/slab.h>
30 #include <linux/spinlock.h>
31 #include <linux/in.h>
32 #include <linux/export.h>
33 #include <net/sock.h>
34 #include <net/tcp.h>
35 #include <scsi/scsi.h>
36 #include <scsi/scsi_cmnd.h>
37
38 #include <target/target_core_base.h>
39 #include <target/target_core_backend.h>
40 #include <target/target_core_fabric.h>
41
42 #include "target_core_internal.h"
43 #include "target_core_pr.h"
44
45 extern struct se_device *g_lun0_dev;
46
47 static DEFINE_SPINLOCK(tpg_lock);
48 static LIST_HEAD(tpg_list);
49
50 /*      core_clear_initiator_node_from_tpg():
51  *
52  *
53  */
54 static void core_clear_initiator_node_from_tpg(
55         struct se_node_acl *nacl,
56         struct se_portal_group *tpg)
57 {
58         int i;
59         struct se_dev_entry *deve;
60         struct se_lun *lun;
61
62         spin_lock_irq(&nacl->device_list_lock);
63         for (i = 0; i < TRANSPORT_MAX_LUNS_PER_TPG; i++) {
64                 deve = nacl->device_list[i];
65
66                 if (!(deve->lun_flags & TRANSPORT_LUNFLAGS_INITIATOR_ACCESS))
67                         continue;
68
69                 if (!deve->se_lun) {
70                         pr_err("%s device entries device pointer is"
71                                 " NULL, but Initiator has access.\n",
72                                 tpg->se_tpg_tfo->get_fabric_name());
73                         continue;
74                 }
75
76                 lun = deve->se_lun;
77                 spin_unlock_irq(&nacl->device_list_lock);
78                 core_disable_device_list_for_node(lun, NULL, deve->mapped_lun,
79                         TRANSPORT_LUNFLAGS_NO_ACCESS, nacl, tpg);
80
81                 spin_lock_irq(&nacl->device_list_lock);
82         }
83         spin_unlock_irq(&nacl->device_list_lock);
84 }
85
86 /*      __core_tpg_get_initiator_node_acl():
87  *
88  *      spin_lock_bh(&tpg->acl_node_lock); must be held when calling
89  */
90 struct se_node_acl *__core_tpg_get_initiator_node_acl(
91         struct se_portal_group *tpg,
92         const char *initiatorname)
93 {
94         struct se_node_acl *acl;
95
96         list_for_each_entry(acl, &tpg->acl_node_list, acl_list) {
97                 if (!strcmp(acl->initiatorname, initiatorname))
98                         return acl;
99         }
100
101         return NULL;
102 }
103
104 /*      core_tpg_get_initiator_node_acl():
105  *
106  *
107  */
108 struct se_node_acl *core_tpg_get_initiator_node_acl(
109         struct se_portal_group *tpg,
110         unsigned char *initiatorname)
111 {
112         struct se_node_acl *acl;
113
114         spin_lock_irq(&tpg->acl_node_lock);
115         acl = __core_tpg_get_initiator_node_acl(tpg, initiatorname);
116         spin_unlock_irq(&tpg->acl_node_lock);
117
118         return acl;
119 }
120 EXPORT_SYMBOL(core_tpg_get_initiator_node_acl);
121
122 /*      core_tpg_add_node_to_devs():
123  *
124  *
125  */
126 void core_tpg_add_node_to_devs(
127         struct se_node_acl *acl,
128         struct se_portal_group *tpg)
129 {
130         int i = 0;
131         u32 lun_access = 0;
132         struct se_lun *lun;
133         struct se_device *dev;
134
135         spin_lock(&tpg->tpg_lun_lock);
136         for (i = 0; i < TRANSPORT_MAX_LUNS_PER_TPG; i++) {
137                 lun = tpg->tpg_lun_list[i];
138                 if (lun->lun_status != TRANSPORT_LUN_STATUS_ACTIVE)
139                         continue;
140
141                 spin_unlock(&tpg->tpg_lun_lock);
142
143                 dev = lun->lun_se_dev;
144                 /*
145                  * By default in LIO-Target $FABRIC_MOD,
146                  * demo_mode_write_protect is ON, or READ_ONLY;
147                  */
148                 if (!tpg->se_tpg_tfo->tpg_check_demo_mode_write_protect(tpg)) {
149                         lun_access = TRANSPORT_LUNFLAGS_READ_WRITE;
150                 } else {
151                         /*
152                          * Allow only optical drives to issue R/W in default RO
153                          * demo mode.
154                          */
155                         if (dev->transport->get_device_type(dev) == TYPE_DISK)
156                                 lun_access = TRANSPORT_LUNFLAGS_READ_ONLY;
157                         else
158                                 lun_access = TRANSPORT_LUNFLAGS_READ_WRITE;
159                 }
160
161                 pr_debug("TARGET_CORE[%s]->TPG[%u]_LUN[%u] - Adding %s"
162                         " access for LUN in Demo Mode\n",
163                         tpg->se_tpg_tfo->get_fabric_name(),
164                         tpg->se_tpg_tfo->tpg_get_tag(tpg), lun->unpacked_lun,
165                         (lun_access == TRANSPORT_LUNFLAGS_READ_WRITE) ?
166                         "READ-WRITE" : "READ-ONLY");
167
168                 core_enable_device_list_for_node(lun, NULL, lun->unpacked_lun,
169                                 lun_access, acl, tpg);
170                 /*
171                  * Check to see if there are any existing persistent reservation
172                  * APTPL pre-registrations that need to be enabled for this dynamic
173                  * LUN ACL now..
174                  */
175                 core_scsi3_check_aptpl_registration(dev, tpg, lun, acl,
176                                                     lun->unpacked_lun);
177                 spin_lock(&tpg->tpg_lun_lock);
178         }
179         spin_unlock(&tpg->tpg_lun_lock);
180 }
181
182 /*      core_set_queue_depth_for_node():
183  *
184  *
185  */
186 static int core_set_queue_depth_for_node(
187         struct se_portal_group *tpg,
188         struct se_node_acl *acl)
189 {
190         if (!acl->queue_depth) {
191                 pr_err("Queue depth for %s Initiator Node: %s is 0,"
192                         "defaulting to 1.\n", tpg->se_tpg_tfo->get_fabric_name(),
193                         acl->initiatorname);
194                 acl->queue_depth = 1;
195         }
196
197         return 0;
198 }
199
200 void array_free(void *array, int n)
201 {
202         void **a = array;
203         int i;
204
205         for (i = 0; i < n; i++)
206                 kfree(a[i]);
207         kfree(a);
208 }
209
210 static void *array_zalloc(int n, size_t size, gfp_t flags)
211 {
212         void **a;
213         int i;
214
215         a = kzalloc(n * sizeof(void*), flags);
216         if (!a)
217                 return NULL;
218         for (i = 0; i < n; i++) {
219                 a[i] = kzalloc(size, flags);
220                 if (!a[i]) {
221                         array_free(a, n);
222                         return NULL;
223                 }
224         }
225         return a;
226 }
227
228 /*      core_create_device_list_for_node():
229  *
230  *
231  */
232 static int core_create_device_list_for_node(struct se_node_acl *nacl)
233 {
234         struct se_dev_entry *deve;
235         int i;
236
237         nacl->device_list = array_zalloc(TRANSPORT_MAX_LUNS_PER_TPG,
238                         sizeof(struct se_dev_entry), GFP_KERNEL);
239         if (!nacl->device_list) {
240                 pr_err("Unable to allocate memory for"
241                         " struct se_node_acl->device_list\n");
242                 return -ENOMEM;
243         }
244         for (i = 0; i < TRANSPORT_MAX_LUNS_PER_TPG; i++) {
245                 deve = nacl->device_list[i];
246
247                 atomic_set(&deve->ua_count, 0);
248                 atomic_set(&deve->pr_ref_count, 0);
249                 spin_lock_init(&deve->ua_lock);
250                 INIT_LIST_HEAD(&deve->alua_port_list);
251                 INIT_LIST_HEAD(&deve->ua_list);
252         }
253
254         return 0;
255 }
256
257 /*      core_tpg_check_initiator_node_acl()
258  *
259  *
260  */
261 struct se_node_acl *core_tpg_check_initiator_node_acl(
262         struct se_portal_group *tpg,
263         unsigned char *initiatorname)
264 {
265         struct se_node_acl *acl;
266
267         acl = core_tpg_get_initiator_node_acl(tpg, initiatorname);
268         if (acl)
269                 return acl;
270
271         if (!tpg->se_tpg_tfo->tpg_check_demo_mode(tpg))
272                 return NULL;
273
274         acl =  tpg->se_tpg_tfo->tpg_alloc_fabric_acl(tpg);
275         if (!acl)
276                 return NULL;
277
278         INIT_LIST_HEAD(&acl->acl_list);
279         INIT_LIST_HEAD(&acl->acl_sess_list);
280         kref_init(&acl->acl_kref);
281         init_completion(&acl->acl_free_comp);
282         spin_lock_init(&acl->device_list_lock);
283         spin_lock_init(&acl->nacl_sess_lock);
284         atomic_set(&acl->acl_pr_ref_count, 0);
285         if (tpg->se_tpg_tfo->tpg_get_default_depth)
286                 acl->queue_depth = tpg->se_tpg_tfo->tpg_get_default_depth(tpg);
287         else
288                 acl->queue_depth = 1;
289         snprintf(acl->initiatorname, TRANSPORT_IQN_LEN, "%s", initiatorname);
290         acl->se_tpg = tpg;
291         acl->acl_index = scsi_get_new_index(SCSI_AUTH_INTR_INDEX);
292         acl->dynamic_node_acl = 1;
293
294         tpg->se_tpg_tfo->set_default_node_attributes(acl);
295
296         if (core_create_device_list_for_node(acl) < 0) {
297                 tpg->se_tpg_tfo->tpg_release_fabric_acl(tpg, acl);
298                 return NULL;
299         }
300
301         if (core_set_queue_depth_for_node(tpg, acl) < 0) {
302                 core_free_device_list_for_node(acl, tpg);
303                 tpg->se_tpg_tfo->tpg_release_fabric_acl(tpg, acl);
304                 return NULL;
305         }
306         /*
307          * Here we only create demo-mode MappedLUNs from the active
308          * TPG LUNs if the fabric is not explicitly asking for
309          * tpg_check_demo_mode_login_only() == 1.
310          */
311         if ((tpg->se_tpg_tfo->tpg_check_demo_mode_login_only == NULL) ||
312             (tpg->se_tpg_tfo->tpg_check_demo_mode_login_only(tpg) != 1))
313                 core_tpg_add_node_to_devs(acl, tpg);
314
315         spin_lock_irq(&tpg->acl_node_lock);
316         list_add_tail(&acl->acl_list, &tpg->acl_node_list);
317         tpg->num_node_acls++;
318         spin_unlock_irq(&tpg->acl_node_lock);
319
320         pr_debug("%s_TPG[%u] - Added DYNAMIC ACL with TCQ Depth: %d for %s"
321                 " Initiator Node: %s\n", tpg->se_tpg_tfo->get_fabric_name(),
322                 tpg->se_tpg_tfo->tpg_get_tag(tpg), acl->queue_depth,
323                 tpg->se_tpg_tfo->get_fabric_name(), initiatorname);
324
325         return acl;
326 }
327 EXPORT_SYMBOL(core_tpg_check_initiator_node_acl);
328
329 void core_tpg_wait_for_nacl_pr_ref(struct se_node_acl *nacl)
330 {
331         while (atomic_read(&nacl->acl_pr_ref_count) != 0)
332                 cpu_relax();
333 }
334
335 void core_tpg_clear_object_luns(struct se_portal_group *tpg)
336 {
337         int i;
338         struct se_lun *lun;
339
340         spin_lock(&tpg->tpg_lun_lock);
341         for (i = 0; i < TRANSPORT_MAX_LUNS_PER_TPG; i++) {
342                 lun = tpg->tpg_lun_list[i];
343
344                 if ((lun->lun_status != TRANSPORT_LUN_STATUS_ACTIVE) ||
345                     (lun->lun_se_dev == NULL))
346                         continue;
347
348                 spin_unlock(&tpg->tpg_lun_lock);
349                 core_dev_del_lun(tpg, lun);
350                 spin_lock(&tpg->tpg_lun_lock);
351         }
352         spin_unlock(&tpg->tpg_lun_lock);
353 }
354 EXPORT_SYMBOL(core_tpg_clear_object_luns);
355
356 /*      core_tpg_add_initiator_node_acl():
357  *
358  *
359  */
360 struct se_node_acl *core_tpg_add_initiator_node_acl(
361         struct se_portal_group *tpg,
362         struct se_node_acl *se_nacl,
363         const char *initiatorname,
364         u32 queue_depth)
365 {
366         struct se_node_acl *acl = NULL;
367
368         spin_lock_irq(&tpg->acl_node_lock);
369         acl = __core_tpg_get_initiator_node_acl(tpg, initiatorname);
370         if (acl) {
371                 if (acl->dynamic_node_acl) {
372                         acl->dynamic_node_acl = 0;
373                         pr_debug("%s_TPG[%u] - Replacing dynamic ACL"
374                                 " for %s\n", tpg->se_tpg_tfo->get_fabric_name(),
375                                 tpg->se_tpg_tfo->tpg_get_tag(tpg), initiatorname);
376                         spin_unlock_irq(&tpg->acl_node_lock);
377                         /*
378                          * Release the locally allocated struct se_node_acl
379                          * because * core_tpg_add_initiator_node_acl() returned
380                          * a pointer to an existing demo mode node ACL.
381                          */
382                         if (se_nacl)
383                                 tpg->se_tpg_tfo->tpg_release_fabric_acl(tpg,
384                                                         se_nacl);
385                         goto done;
386                 }
387
388                 pr_err("ACL entry for %s Initiator"
389                         " Node %s already exists for TPG %u, ignoring"
390                         " request.\n",  tpg->se_tpg_tfo->get_fabric_name(),
391                         initiatorname, tpg->se_tpg_tfo->tpg_get_tag(tpg));
392                 spin_unlock_irq(&tpg->acl_node_lock);
393                 return ERR_PTR(-EEXIST);
394         }
395         spin_unlock_irq(&tpg->acl_node_lock);
396
397         if (!se_nacl) {
398                 pr_err("struct se_node_acl pointer is NULL\n");
399                 return ERR_PTR(-EINVAL);
400         }
401         /*
402          * For v4.x logic the se_node_acl_s is hanging off a fabric
403          * dependent structure allocated via
404          * struct target_core_fabric_ops->fabric_make_nodeacl()
405          */
406         acl = se_nacl;
407
408         INIT_LIST_HEAD(&acl->acl_list);
409         INIT_LIST_HEAD(&acl->acl_sess_list);
410         kref_init(&acl->acl_kref);
411         init_completion(&acl->acl_free_comp);
412         spin_lock_init(&acl->device_list_lock);
413         spin_lock_init(&acl->nacl_sess_lock);
414         atomic_set(&acl->acl_pr_ref_count, 0);
415         acl->queue_depth = queue_depth;
416         snprintf(acl->initiatorname, TRANSPORT_IQN_LEN, "%s", initiatorname);
417         acl->se_tpg = tpg;
418         acl->acl_index = scsi_get_new_index(SCSI_AUTH_INTR_INDEX);
419
420         tpg->se_tpg_tfo->set_default_node_attributes(acl);
421
422         if (core_create_device_list_for_node(acl) < 0) {
423                 tpg->se_tpg_tfo->tpg_release_fabric_acl(tpg, acl);
424                 return ERR_PTR(-ENOMEM);
425         }
426
427         if (core_set_queue_depth_for_node(tpg, acl) < 0) {
428                 core_free_device_list_for_node(acl, tpg);
429                 tpg->se_tpg_tfo->tpg_release_fabric_acl(tpg, acl);
430                 return ERR_PTR(-EINVAL);
431         }
432
433         spin_lock_irq(&tpg->acl_node_lock);
434         list_add_tail(&acl->acl_list, &tpg->acl_node_list);
435         tpg->num_node_acls++;
436         spin_unlock_irq(&tpg->acl_node_lock);
437
438 done:
439         pr_debug("%s_TPG[%hu] - Added ACL with TCQ Depth: %d for %s"
440                 " Initiator Node: %s\n", tpg->se_tpg_tfo->get_fabric_name(),
441                 tpg->se_tpg_tfo->tpg_get_tag(tpg), acl->queue_depth,
442                 tpg->se_tpg_tfo->get_fabric_name(), initiatorname);
443
444         return acl;
445 }
446 EXPORT_SYMBOL(core_tpg_add_initiator_node_acl);
447
448 /*      core_tpg_del_initiator_node_acl():
449  *
450  *
451  */
452 int core_tpg_del_initiator_node_acl(
453         struct se_portal_group *tpg,
454         struct se_node_acl *acl,
455         int force)
456 {
457         LIST_HEAD(sess_list);
458         struct se_session *sess, *sess_tmp;
459         unsigned long flags;
460         int rc;
461
462         spin_lock_irq(&tpg->acl_node_lock);
463         if (acl->dynamic_node_acl) {
464                 acl->dynamic_node_acl = 0;
465         }
466         list_del(&acl->acl_list);
467         tpg->num_node_acls--;
468         spin_unlock_irq(&tpg->acl_node_lock);
469
470         spin_lock_irqsave(&acl->nacl_sess_lock, flags);
471         acl->acl_stop = 1;
472
473         list_for_each_entry_safe(sess, sess_tmp, &acl->acl_sess_list,
474                                 sess_acl_list) {
475                 if (sess->sess_tearing_down != 0)
476                         continue;
477
478                 target_get_session(sess);
479                 list_move(&sess->sess_acl_list, &sess_list);
480         }
481         spin_unlock_irqrestore(&acl->nacl_sess_lock, flags);
482
483         list_for_each_entry_safe(sess, sess_tmp, &sess_list, sess_acl_list) {
484                 list_del(&sess->sess_acl_list);
485
486                 rc = tpg->se_tpg_tfo->shutdown_session(sess);
487                 target_put_session(sess);
488                 if (!rc)
489                         continue;
490                 target_put_session(sess);
491         }
492         target_put_nacl(acl);
493         /*
494          * Wait for last target_put_nacl() to complete in target_complete_nacl()
495          * for active fabric session transport_deregister_session() callbacks.
496          */
497         wait_for_completion(&acl->acl_free_comp);
498
499         core_tpg_wait_for_nacl_pr_ref(acl);
500         core_clear_initiator_node_from_tpg(acl, tpg);
501         core_free_device_list_for_node(acl, tpg);
502
503         pr_debug("%s_TPG[%hu] - Deleted ACL with TCQ Depth: %d for %s"
504                 " Initiator Node: %s\n", tpg->se_tpg_tfo->get_fabric_name(),
505                 tpg->se_tpg_tfo->tpg_get_tag(tpg), acl->queue_depth,
506                 tpg->se_tpg_tfo->get_fabric_name(), acl->initiatorname);
507
508         return 0;
509 }
510 EXPORT_SYMBOL(core_tpg_del_initiator_node_acl);
511
512 /*      core_tpg_set_initiator_node_queue_depth():
513  *
514  *
515  */
516 int core_tpg_set_initiator_node_queue_depth(
517         struct se_portal_group *tpg,
518         unsigned char *initiatorname,
519         u32 queue_depth,
520         int force)
521 {
522         struct se_session *sess, *init_sess = NULL;
523         struct se_node_acl *acl;
524         unsigned long flags;
525         int dynamic_acl = 0;
526
527         spin_lock_irq(&tpg->acl_node_lock);
528         acl = __core_tpg_get_initiator_node_acl(tpg, initiatorname);
529         if (!acl) {
530                 pr_err("Access Control List entry for %s Initiator"
531                         " Node %s does not exists for TPG %hu, ignoring"
532                         " request.\n", tpg->se_tpg_tfo->get_fabric_name(),
533                         initiatorname, tpg->se_tpg_tfo->tpg_get_tag(tpg));
534                 spin_unlock_irq(&tpg->acl_node_lock);
535                 return -ENODEV;
536         }
537         if (acl->dynamic_node_acl) {
538                 acl->dynamic_node_acl = 0;
539                 dynamic_acl = 1;
540         }
541         spin_unlock_irq(&tpg->acl_node_lock);
542
543         spin_lock_irqsave(&tpg->session_lock, flags);
544         list_for_each_entry(sess, &tpg->tpg_sess_list, sess_list) {
545                 if (sess->se_node_acl != acl)
546                         continue;
547
548                 if (!force) {
549                         pr_err("Unable to change queue depth for %s"
550                                 " Initiator Node: %s while session is"
551                                 " operational.  To forcefully change the queue"
552                                 " depth and force session reinstatement"
553                                 " use the \"force=1\" parameter.\n",
554                                 tpg->se_tpg_tfo->get_fabric_name(), initiatorname);
555                         spin_unlock_irqrestore(&tpg->session_lock, flags);
556
557                         spin_lock_irq(&tpg->acl_node_lock);
558                         if (dynamic_acl)
559                                 acl->dynamic_node_acl = 1;
560                         spin_unlock_irq(&tpg->acl_node_lock);
561                         return -EEXIST;
562                 }
563                 /*
564                  * Determine if the session needs to be closed by our context.
565                  */
566                 if (!tpg->se_tpg_tfo->shutdown_session(sess))
567                         continue;
568
569                 init_sess = sess;
570                 break;
571         }
572
573         /*
574          * User has requested to change the queue depth for a Initiator Node.
575          * Change the value in the Node's struct se_node_acl, and call
576          * core_set_queue_depth_for_node() to add the requested queue depth.
577          *
578          * Finally call  tpg->se_tpg_tfo->close_session() to force session
579          * reinstatement to occur if there is an active session for the
580          * $FABRIC_MOD Initiator Node in question.
581          */
582         acl->queue_depth = queue_depth;
583
584         if (core_set_queue_depth_for_node(tpg, acl) < 0) {
585                 spin_unlock_irqrestore(&tpg->session_lock, flags);
586                 /*
587                  * Force session reinstatement if
588                  * core_set_queue_depth_for_node() failed, because we assume
589                  * the $FABRIC_MOD has already the set session reinstatement
590                  * bit from tpg->se_tpg_tfo->shutdown_session() called above.
591                  */
592                 if (init_sess)
593                         tpg->se_tpg_tfo->close_session(init_sess);
594
595                 spin_lock_irq(&tpg->acl_node_lock);
596                 if (dynamic_acl)
597                         acl->dynamic_node_acl = 1;
598                 spin_unlock_irq(&tpg->acl_node_lock);
599                 return -EINVAL;
600         }
601         spin_unlock_irqrestore(&tpg->session_lock, flags);
602         /*
603          * If the $FABRIC_MOD session for the Initiator Node ACL exists,
604          * forcefully shutdown the $FABRIC_MOD session/nexus.
605          */
606         if (init_sess)
607                 tpg->se_tpg_tfo->close_session(init_sess);
608
609         pr_debug("Successfully changed queue depth to: %d for Initiator"
610                 " Node: %s on %s Target Portal Group: %u\n", queue_depth,
611                 initiatorname, tpg->se_tpg_tfo->get_fabric_name(),
612                 tpg->se_tpg_tfo->tpg_get_tag(tpg));
613
614         spin_lock_irq(&tpg->acl_node_lock);
615         if (dynamic_acl)
616                 acl->dynamic_node_acl = 1;
617         spin_unlock_irq(&tpg->acl_node_lock);
618
619         return 0;
620 }
621 EXPORT_SYMBOL(core_tpg_set_initiator_node_queue_depth);
622
623 /*      core_tpg_set_initiator_node_tag():
624  *
625  *      Initiator nodeacl tags are not used internally, but may be used by
626  *      userspace to emulate aliases or groups.
627  *      Returns length of newly-set tag or -EINVAL.
628  */
629 int core_tpg_set_initiator_node_tag(
630         struct se_portal_group *tpg,
631         struct se_node_acl *acl,
632         const char *new_tag)
633 {
634         if (strlen(new_tag) >= MAX_ACL_TAG_SIZE)
635                 return -EINVAL;
636
637         if (!strncmp("NULL", new_tag, 4)) {
638                 acl->acl_tag[0] = '\0';
639                 return 0;
640         }
641
642         return snprintf(acl->acl_tag, MAX_ACL_TAG_SIZE, "%s", new_tag);
643 }
644 EXPORT_SYMBOL(core_tpg_set_initiator_node_tag);
645
646 static void core_tpg_lun_ref_release(struct percpu_ref *ref)
647 {
648         struct se_lun *lun = container_of(ref, struct se_lun, lun_ref);
649
650         complete(&lun->lun_ref_comp);
651 }
652
653 static int core_tpg_setup_virtual_lun0(struct se_portal_group *se_tpg)
654 {
655         /* Set in core_dev_setup_virtual_lun0() */
656         struct se_device *dev = g_lun0_dev;
657         struct se_lun *lun = &se_tpg->tpg_virt_lun0;
658         u32 lun_access = TRANSPORT_LUNFLAGS_READ_ONLY;
659         int ret;
660
661         lun->unpacked_lun = 0;
662         lun->lun_status = TRANSPORT_LUN_STATUS_FREE;
663         atomic_set(&lun->lun_acl_count, 0);
664         init_completion(&lun->lun_shutdown_comp);
665         INIT_LIST_HEAD(&lun->lun_acl_list);
666         spin_lock_init(&lun->lun_acl_lock);
667         spin_lock_init(&lun->lun_sep_lock);
668         init_completion(&lun->lun_ref_comp);
669
670         ret = core_tpg_add_lun(se_tpg, lun, lun_access, dev);
671         if (ret < 0)
672                 return ret;
673
674         return 0;
675 }
676
677 int core_tpg_register(
678         const struct target_core_fabric_ops *tfo,
679         struct se_wwn *se_wwn,
680         struct se_portal_group *se_tpg,
681         void *tpg_fabric_ptr,
682         int se_tpg_type)
683 {
684         struct se_lun *lun;
685         u32 i;
686
687         se_tpg->tpg_lun_list = array_zalloc(TRANSPORT_MAX_LUNS_PER_TPG,
688                         sizeof(struct se_lun), GFP_KERNEL);
689         if (!se_tpg->tpg_lun_list) {
690                 pr_err("Unable to allocate struct se_portal_group->"
691                                 "tpg_lun_list\n");
692                 return -ENOMEM;
693         }
694
695         for (i = 0; i < TRANSPORT_MAX_LUNS_PER_TPG; i++) {
696                 lun = se_tpg->tpg_lun_list[i];
697                 lun->unpacked_lun = i;
698                 lun->lun_link_magic = SE_LUN_LINK_MAGIC;
699                 lun->lun_status = TRANSPORT_LUN_STATUS_FREE;
700                 atomic_set(&lun->lun_acl_count, 0);
701                 init_completion(&lun->lun_shutdown_comp);
702                 INIT_LIST_HEAD(&lun->lun_acl_list);
703                 spin_lock_init(&lun->lun_acl_lock);
704                 spin_lock_init(&lun->lun_sep_lock);
705                 init_completion(&lun->lun_ref_comp);
706         }
707
708         se_tpg->se_tpg_type = se_tpg_type;
709         se_tpg->se_tpg_fabric_ptr = tpg_fabric_ptr;
710         se_tpg->se_tpg_tfo = tfo;
711         se_tpg->se_tpg_wwn = se_wwn;
712         atomic_set(&se_tpg->tpg_pr_ref_count, 0);
713         INIT_LIST_HEAD(&se_tpg->acl_node_list);
714         INIT_LIST_HEAD(&se_tpg->se_tpg_node);
715         INIT_LIST_HEAD(&se_tpg->tpg_sess_list);
716         spin_lock_init(&se_tpg->acl_node_lock);
717         spin_lock_init(&se_tpg->session_lock);
718         spin_lock_init(&se_tpg->tpg_lun_lock);
719
720         if (se_tpg->se_tpg_type == TRANSPORT_TPG_TYPE_NORMAL) {
721                 if (core_tpg_setup_virtual_lun0(se_tpg) < 0) {
722                         array_free(se_tpg->tpg_lun_list,
723                                    TRANSPORT_MAX_LUNS_PER_TPG);
724                         return -ENOMEM;
725                 }
726         }
727
728         spin_lock_bh(&tpg_lock);
729         list_add_tail(&se_tpg->se_tpg_node, &tpg_list);
730         spin_unlock_bh(&tpg_lock);
731
732         pr_debug("TARGET_CORE[%s]: Allocated %s struct se_portal_group for"
733                 " endpoint: %s, Portal Tag: %u\n", tfo->get_fabric_name(),
734                 (se_tpg->se_tpg_type == TRANSPORT_TPG_TYPE_NORMAL) ?
735                 "Normal" : "Discovery", (tfo->tpg_get_wwn(se_tpg) == NULL) ?
736                 "None" : tfo->tpg_get_wwn(se_tpg), tfo->tpg_get_tag(se_tpg));
737
738         return 0;
739 }
740 EXPORT_SYMBOL(core_tpg_register);
741
742 int core_tpg_deregister(struct se_portal_group *se_tpg)
743 {
744         struct se_node_acl *nacl, *nacl_tmp;
745
746         pr_debug("TARGET_CORE[%s]: Deallocating %s struct se_portal_group"
747                 " for endpoint: %s Portal Tag %u\n",
748                 (se_tpg->se_tpg_type == TRANSPORT_TPG_TYPE_NORMAL) ?
749                 "Normal" : "Discovery", se_tpg->se_tpg_tfo->get_fabric_name(),
750                 se_tpg->se_tpg_tfo->tpg_get_wwn(se_tpg),
751                 se_tpg->se_tpg_tfo->tpg_get_tag(se_tpg));
752
753         spin_lock_bh(&tpg_lock);
754         list_del(&se_tpg->se_tpg_node);
755         spin_unlock_bh(&tpg_lock);
756
757         while (atomic_read(&se_tpg->tpg_pr_ref_count) != 0)
758                 cpu_relax();
759         /*
760          * Release any remaining demo-mode generated se_node_acl that have
761          * not been released because of TFO->tpg_check_demo_mode_cache() == 1
762          * in transport_deregister_session().
763          */
764         spin_lock_irq(&se_tpg->acl_node_lock);
765         list_for_each_entry_safe(nacl, nacl_tmp, &se_tpg->acl_node_list,
766                         acl_list) {
767                 list_del(&nacl->acl_list);
768                 se_tpg->num_node_acls--;
769                 spin_unlock_irq(&se_tpg->acl_node_lock);
770
771                 core_tpg_wait_for_nacl_pr_ref(nacl);
772                 core_free_device_list_for_node(nacl, se_tpg);
773                 se_tpg->se_tpg_tfo->tpg_release_fabric_acl(se_tpg, nacl);
774
775                 spin_lock_irq(&se_tpg->acl_node_lock);
776         }
777         spin_unlock_irq(&se_tpg->acl_node_lock);
778
779         if (se_tpg->se_tpg_type == TRANSPORT_TPG_TYPE_NORMAL)
780                 core_tpg_remove_lun(se_tpg, &se_tpg->tpg_virt_lun0);
781
782         se_tpg->se_tpg_fabric_ptr = NULL;
783         array_free(se_tpg->tpg_lun_list, TRANSPORT_MAX_LUNS_PER_TPG);
784         return 0;
785 }
786 EXPORT_SYMBOL(core_tpg_deregister);
787
788 struct se_lun *core_tpg_alloc_lun(
789         struct se_portal_group *tpg,
790         u32 unpacked_lun)
791 {
792         struct se_lun *lun;
793
794         if (unpacked_lun > (TRANSPORT_MAX_LUNS_PER_TPG-1)) {
795                 pr_err("%s LUN: %u exceeds TRANSPORT_MAX_LUNS_PER_TPG"
796                         "-1: %u for Target Portal Group: %u\n",
797                         tpg->se_tpg_tfo->get_fabric_name(),
798                         unpacked_lun, TRANSPORT_MAX_LUNS_PER_TPG-1,
799                         tpg->se_tpg_tfo->tpg_get_tag(tpg));
800                 return ERR_PTR(-EOVERFLOW);
801         }
802
803         spin_lock(&tpg->tpg_lun_lock);
804         lun = tpg->tpg_lun_list[unpacked_lun];
805         if (lun->lun_status == TRANSPORT_LUN_STATUS_ACTIVE) {
806                 pr_err("TPG Logical Unit Number: %u is already active"
807                         " on %s Target Portal Group: %u, ignoring request.\n",
808                         unpacked_lun, tpg->se_tpg_tfo->get_fabric_name(),
809                         tpg->se_tpg_tfo->tpg_get_tag(tpg));
810                 spin_unlock(&tpg->tpg_lun_lock);
811                 return ERR_PTR(-EINVAL);
812         }
813         spin_unlock(&tpg->tpg_lun_lock);
814
815         return lun;
816 }
817
818 int core_tpg_add_lun(
819         struct se_portal_group *tpg,
820         struct se_lun *lun,
821         u32 lun_access,
822         struct se_device *dev)
823 {
824         int ret;
825
826         ret = percpu_ref_init(&lun->lun_ref, core_tpg_lun_ref_release, 0,
827                               GFP_KERNEL);
828         if (ret < 0)
829                 return ret;
830
831         ret = core_dev_export(dev, tpg, lun);
832         if (ret < 0) {
833                 percpu_ref_exit(&lun->lun_ref);
834                 return ret;
835         }
836
837         spin_lock(&tpg->tpg_lun_lock);
838         lun->lun_access = lun_access;
839         lun->lun_status = TRANSPORT_LUN_STATUS_ACTIVE;
840         spin_unlock(&tpg->tpg_lun_lock);
841
842         return 0;
843 }
844
845 void core_tpg_remove_lun(
846         struct se_portal_group *tpg,
847         struct se_lun *lun)
848 {
849         core_clear_lun_from_tpg(lun, tpg);
850         transport_clear_lun_ref(lun);
851
852         core_dev_unexport(lun->lun_se_dev, tpg, lun);
853
854         spin_lock(&tpg->tpg_lun_lock);
855         lun->lun_status = TRANSPORT_LUN_STATUS_FREE;
856         spin_unlock(&tpg->tpg_lun_lock);
857
858         percpu_ref_exit(&lun->lun_ref);
859 }