target: Implement Block Device Characteristics VPD page
[linux-block.git] / 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  * Copyright (c) 2003, 2004, 2005 PyX Technologies, Inc.
8  * Copyright (c) 2005-2006 SBE, Inc.  All Rights Reserved.
9  * Copyright (c) 2007-2010 Rising Tide Systems
10  * Copyright (c) 2008-2010 Linux-iSCSI.org
11  *
12  * Nicholas A. Bellinger <nab@kernel.org>
13  *
14  * This program is free software; you can redistribute it and/or modify
15  * it under the terms of the GNU General Public License as published by
16  * the Free Software Foundation; either version 2 of the License, or
17  * (at your option) any later version.
18  *
19  * This program is distributed in the hope that it will be useful,
20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22  * GNU General Public License for more details.
23  *
24  * You should have received a copy of the GNU General Public License
25  * along with this program; if not, write to the Free Software
26  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
27  *
28  ******************************************************************************/
29
30 #include <linux/net.h>
31 #include <linux/string.h>
32 #include <linux/delay.h>
33 #include <linux/timer.h>
34 #include <linux/slab.h>
35 #include <linux/spinlock.h>
36 #include <linux/kthread.h>
37 #include <linux/in.h>
38 #include <net/sock.h>
39 #include <net/tcp.h>
40 #include <scsi/scsi.h>
41 #include <scsi/scsi_device.h>
42
43 #include <target/target_core_base.h>
44 #include <target/target_core_device.h>
45 #include <target/target_core_tpg.h>
46 #include <target/target_core_transport.h>
47 #include <target/target_core_fabric_ops.h>
48
49 #include "target_core_alua.h"
50 #include "target_core_hba.h"
51 #include "target_core_pr.h"
52 #include "target_core_ua.h"
53
54 static void se_dev_start(struct se_device *dev);
55 static void se_dev_stop(struct se_device *dev);
56
57 static struct se_hba *lun0_hba;
58 static struct se_subsystem_dev *lun0_su_dev;
59 /* not static, needed by tpg.c */
60 struct se_device *g_lun0_dev;
61
62 int transport_lookup_cmd_lun(struct se_cmd *se_cmd, u32 unpacked_lun)
63 {
64         struct se_lun *se_lun = NULL;
65         struct se_session *se_sess = se_cmd->se_sess;
66         struct se_device *dev;
67         unsigned long flags;
68
69         if (unpacked_lun >= TRANSPORT_MAX_LUNS_PER_TPG) {
70                 se_cmd->scsi_sense_reason = TCM_NON_EXISTENT_LUN;
71                 se_cmd->se_cmd_flags |= SCF_SCSI_CDB_EXCEPTION;
72                 return -ENODEV;
73         }
74
75         spin_lock_irqsave(&se_sess->se_node_acl->device_list_lock, flags);
76         se_cmd->se_deve = &se_sess->se_node_acl->device_list[unpacked_lun];
77         if (se_cmd->se_deve->lun_flags & TRANSPORT_LUNFLAGS_INITIATOR_ACCESS) {
78                 struct se_dev_entry *deve = se_cmd->se_deve;
79
80                 deve->total_cmds++;
81                 deve->total_bytes += se_cmd->data_length;
82
83                 if ((se_cmd->data_direction == DMA_TO_DEVICE) &&
84                     (deve->lun_flags & TRANSPORT_LUNFLAGS_READ_ONLY)) {
85                         se_cmd->scsi_sense_reason = TCM_WRITE_PROTECTED;
86                         se_cmd->se_cmd_flags |= SCF_SCSI_CDB_EXCEPTION;
87                         printk("TARGET_CORE[%s]: Detected WRITE_PROTECTED LUN"
88                                 " Access for 0x%08x\n",
89                                 se_cmd->se_tfo->get_fabric_name(),
90                                 unpacked_lun);
91                         spin_unlock_irqrestore(&se_sess->se_node_acl->device_list_lock, flags);
92                         return -EACCES;
93                 }
94
95                 if (se_cmd->data_direction == DMA_TO_DEVICE)
96                         deve->write_bytes += se_cmd->data_length;
97                 else if (se_cmd->data_direction == DMA_FROM_DEVICE)
98                         deve->read_bytes += se_cmd->data_length;
99
100                 deve->deve_cmds++;
101
102                 se_lun = deve->se_lun;
103                 se_cmd->se_lun = deve->se_lun;
104                 se_cmd->pr_res_key = deve->pr_res_key;
105                 se_cmd->orig_fe_lun = unpacked_lun;
106                 se_cmd->se_orig_obj_ptr = se_cmd->se_lun->lun_se_dev;
107                 se_cmd->se_cmd_flags |= SCF_SE_LUN_CMD;
108         }
109         spin_unlock_irqrestore(&se_sess->se_node_acl->device_list_lock, flags);
110
111         if (!se_lun) {
112                 /*
113                  * Use the se_portal_group->tpg_virt_lun0 to allow for
114                  * REPORT_LUNS, et al to be returned when no active
115                  * MappedLUN=0 exists for this Initiator Port.
116                  */
117                 if (unpacked_lun != 0) {
118                         se_cmd->scsi_sense_reason = TCM_NON_EXISTENT_LUN;
119                         se_cmd->se_cmd_flags |= SCF_SCSI_CDB_EXCEPTION;
120                         printk("TARGET_CORE[%s]: Detected NON_EXISTENT_LUN"
121                                 " Access for 0x%08x\n",
122                                 se_cmd->se_tfo->get_fabric_name(),
123                                 unpacked_lun);
124                         return -ENODEV;
125                 }
126                 /*
127                  * Force WRITE PROTECT for virtual LUN 0
128                  */
129                 if ((se_cmd->data_direction != DMA_FROM_DEVICE) &&
130                     (se_cmd->data_direction != DMA_NONE)) {
131                         se_cmd->scsi_sense_reason = TCM_WRITE_PROTECTED;
132                         se_cmd->se_cmd_flags |= SCF_SCSI_CDB_EXCEPTION;
133                         return -EACCES;
134                 }
135
136                 se_lun = &se_sess->se_tpg->tpg_virt_lun0;
137                 se_cmd->se_lun = &se_sess->se_tpg->tpg_virt_lun0;
138                 se_cmd->orig_fe_lun = 0;
139                 se_cmd->se_orig_obj_ptr = se_cmd->se_lun->lun_se_dev;
140                 se_cmd->se_cmd_flags |= SCF_SE_LUN_CMD;
141         }
142         /*
143          * Determine if the struct se_lun is online.
144          * FIXME: Check for LUN_RESET + UNIT Attention
145          */
146         if (se_dev_check_online(se_lun->lun_se_dev) != 0) {
147                 se_cmd->scsi_sense_reason = TCM_NON_EXISTENT_LUN;
148                 se_cmd->se_cmd_flags |= SCF_SCSI_CDB_EXCEPTION;
149                 return -ENODEV;
150         }
151
152         /* Directly associate cmd with se_dev */
153         se_cmd->se_dev = se_lun->lun_se_dev;
154
155         /* TODO: get rid of this and use atomics for stats */
156         dev = se_lun->lun_se_dev;
157         spin_lock_irqsave(&dev->stats_lock, flags);
158         dev->num_cmds++;
159         if (se_cmd->data_direction == DMA_TO_DEVICE)
160                 dev->write_bytes += se_cmd->data_length;
161         else if (se_cmd->data_direction == DMA_FROM_DEVICE)
162                 dev->read_bytes += se_cmd->data_length;
163         spin_unlock_irqrestore(&dev->stats_lock, flags);
164
165         /*
166          * Add the iscsi_cmd_t to the struct se_lun's cmd list.  This list is used
167          * for tracking state of struct se_cmds during LUN shutdown events.
168          */
169         spin_lock_irqsave(&se_lun->lun_cmd_lock, flags);
170         list_add_tail(&se_cmd->se_lun_node, &se_lun->lun_cmd_list);
171         atomic_set(&se_cmd->transport_lun_active, 1);
172         spin_unlock_irqrestore(&se_lun->lun_cmd_lock, flags);
173
174         return 0;
175 }
176 EXPORT_SYMBOL(transport_lookup_cmd_lun);
177
178 int transport_lookup_tmr_lun(struct se_cmd *se_cmd, u32 unpacked_lun)
179 {
180         struct se_dev_entry *deve;
181         struct se_lun *se_lun = NULL;
182         struct se_session *se_sess = se_cmd->se_sess;
183         struct se_tmr_req *se_tmr = se_cmd->se_tmr_req;
184         unsigned long flags;
185
186         if (unpacked_lun >= TRANSPORT_MAX_LUNS_PER_TPG) {
187                 se_cmd->scsi_sense_reason = TCM_NON_EXISTENT_LUN;
188                 se_cmd->se_cmd_flags |= SCF_SCSI_CDB_EXCEPTION;
189                 return -ENODEV;
190         }
191
192         spin_lock_irqsave(&se_sess->se_node_acl->device_list_lock, flags);
193         se_cmd->se_deve = &se_sess->se_node_acl->device_list[unpacked_lun];
194         deve = se_cmd->se_deve;
195
196         if (deve->lun_flags & TRANSPORT_LUNFLAGS_INITIATOR_ACCESS) {
197                 se_tmr->tmr_lun = deve->se_lun;
198                 se_cmd->se_lun = deve->se_lun;
199                 se_lun = deve->se_lun;
200                 se_cmd->pr_res_key = deve->pr_res_key;
201                 se_cmd->orig_fe_lun = unpacked_lun;
202                 se_cmd->se_orig_obj_ptr = se_cmd->se_dev;
203         }
204         spin_unlock_irqrestore(&se_sess->se_node_acl->device_list_lock, flags);
205
206         if (!se_lun) {
207                 printk(KERN_INFO "TARGET_CORE[%s]: Detected NON_EXISTENT_LUN"
208                         " Access for 0x%08x\n",
209                         se_cmd->se_tfo->get_fabric_name(),
210                         unpacked_lun);
211                 se_cmd->se_cmd_flags |= SCF_SCSI_CDB_EXCEPTION;
212                 return -ENODEV;
213         }
214         /*
215          * Determine if the struct se_lun is online.
216          * FIXME: Check for LUN_RESET + UNIT Attention
217          */
218         if (se_dev_check_online(se_lun->lun_se_dev) != 0) {
219                 se_cmd->se_cmd_flags |= SCF_SCSI_CDB_EXCEPTION;
220                 return -ENODEV;
221         }
222
223         /* Directly associate cmd with se_dev */
224         se_cmd->se_dev = se_lun->lun_se_dev;
225         se_tmr->tmr_dev = se_lun->lun_se_dev;
226
227         spin_lock_irqsave(&se_tmr->tmr_dev->se_tmr_lock, flags);
228         list_add_tail(&se_tmr->tmr_list, &se_tmr->tmr_dev->dev_tmr_list);
229         spin_unlock_irqrestore(&se_tmr->tmr_dev->se_tmr_lock, flags);
230
231         return 0;
232 }
233 EXPORT_SYMBOL(transport_lookup_tmr_lun);
234
235 /*
236  * This function is called from core_scsi3_emulate_pro_register_and_move()
237  * and core_scsi3_decode_spec_i_port(), and will increment &deve->pr_ref_count
238  * when a matching rtpi is found.
239  */
240 struct se_dev_entry *core_get_se_deve_from_rtpi(
241         struct se_node_acl *nacl,
242         u16 rtpi)
243 {
244         struct se_dev_entry *deve;
245         struct se_lun *lun;
246         struct se_port *port;
247         struct se_portal_group *tpg = nacl->se_tpg;
248         u32 i;
249
250         spin_lock_irq(&nacl->device_list_lock);
251         for (i = 0; i < TRANSPORT_MAX_LUNS_PER_TPG; i++) {
252                 deve = &nacl->device_list[i];
253
254                 if (!(deve->lun_flags & TRANSPORT_LUNFLAGS_INITIATOR_ACCESS))
255                         continue;
256
257                 lun = deve->se_lun;
258                 if (!(lun)) {
259                         printk(KERN_ERR "%s device entries device pointer is"
260                                 " NULL, but Initiator has access.\n",
261                                 tpg->se_tpg_tfo->get_fabric_name());
262                         continue;
263                 }
264                 port = lun->lun_sep;
265                 if (!(port)) {
266                         printk(KERN_ERR "%s device entries device pointer is"
267                                 " NULL, but Initiator has access.\n",
268                                 tpg->se_tpg_tfo->get_fabric_name());
269                         continue;
270                 }
271                 if (port->sep_rtpi != rtpi)
272                         continue;
273
274                 atomic_inc(&deve->pr_ref_count);
275                 smp_mb__after_atomic_inc();
276                 spin_unlock_irq(&nacl->device_list_lock);
277
278                 return deve;
279         }
280         spin_unlock_irq(&nacl->device_list_lock);
281
282         return NULL;
283 }
284
285 int core_free_device_list_for_node(
286         struct se_node_acl *nacl,
287         struct se_portal_group *tpg)
288 {
289         struct se_dev_entry *deve;
290         struct se_lun *lun;
291         u32 i;
292
293         if (!nacl->device_list)
294                 return 0;
295
296         spin_lock_irq(&nacl->device_list_lock);
297         for (i = 0; i < TRANSPORT_MAX_LUNS_PER_TPG; i++) {
298                 deve = &nacl->device_list[i];
299
300                 if (!(deve->lun_flags & TRANSPORT_LUNFLAGS_INITIATOR_ACCESS))
301                         continue;
302
303                 if (!deve->se_lun) {
304                         printk(KERN_ERR "%s device entries device pointer is"
305                                 " NULL, but Initiator has access.\n",
306                                 tpg->se_tpg_tfo->get_fabric_name());
307                         continue;
308                 }
309                 lun = deve->se_lun;
310
311                 spin_unlock_irq(&nacl->device_list_lock);
312                 core_update_device_list_for_node(lun, NULL, deve->mapped_lun,
313                         TRANSPORT_LUNFLAGS_NO_ACCESS, nacl, tpg, 0);
314                 spin_lock_irq(&nacl->device_list_lock);
315         }
316         spin_unlock_irq(&nacl->device_list_lock);
317
318         kfree(nacl->device_list);
319         nacl->device_list = NULL;
320
321         return 0;
322 }
323
324 void core_dec_lacl_count(struct se_node_acl *se_nacl, struct se_cmd *se_cmd)
325 {
326         struct se_dev_entry *deve;
327
328         spin_lock_irq(&se_nacl->device_list_lock);
329         deve = &se_nacl->device_list[se_cmd->orig_fe_lun];
330         deve->deve_cmds--;
331         spin_unlock_irq(&se_nacl->device_list_lock);
332 }
333
334 void core_update_device_list_access(
335         u32 mapped_lun,
336         u32 lun_access,
337         struct se_node_acl *nacl)
338 {
339         struct se_dev_entry *deve;
340
341         spin_lock_irq(&nacl->device_list_lock);
342         deve = &nacl->device_list[mapped_lun];
343         if (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE) {
344                 deve->lun_flags &= ~TRANSPORT_LUNFLAGS_READ_ONLY;
345                 deve->lun_flags |= TRANSPORT_LUNFLAGS_READ_WRITE;
346         } else {
347                 deve->lun_flags &= ~TRANSPORT_LUNFLAGS_READ_WRITE;
348                 deve->lun_flags |= TRANSPORT_LUNFLAGS_READ_ONLY;
349         }
350         spin_unlock_irq(&nacl->device_list_lock);
351 }
352
353 /*      core_update_device_list_for_node():
354  *
355  *
356  */
357 int core_update_device_list_for_node(
358         struct se_lun *lun,
359         struct se_lun_acl *lun_acl,
360         u32 mapped_lun,
361         u32 lun_access,
362         struct se_node_acl *nacl,
363         struct se_portal_group *tpg,
364         int enable)
365 {
366         struct se_port *port = lun->lun_sep;
367         struct se_dev_entry *deve = &nacl->device_list[mapped_lun];
368         int trans = 0;
369         /*
370          * If the MappedLUN entry is being disabled, the entry in
371          * port->sep_alua_list must be removed now before clearing the
372          * struct se_dev_entry pointers below as logic in
373          * core_alua_do_transition_tg_pt() depends on these being present.
374          */
375         if (!(enable)) {
376                 /*
377                  * deve->se_lun_acl will be NULL for demo-mode created LUNs
378                  * that have not been explicitly concerted to MappedLUNs ->
379                  * struct se_lun_acl, but we remove deve->alua_port_list from
380                  * port->sep_alua_list. This also means that active UAs and
381                  * NodeACL context specific PR metadata for demo-mode
382                  * MappedLUN *deve will be released below..
383                  */
384                 spin_lock_bh(&port->sep_alua_lock);
385                 list_del(&deve->alua_port_list);
386                 spin_unlock_bh(&port->sep_alua_lock);
387         }
388
389         spin_lock_irq(&nacl->device_list_lock);
390         if (enable) {
391                 /*
392                  * Check if the call is handling demo mode -> explict LUN ACL
393                  * transition.  This transition must be for the same struct se_lun
394                  * + mapped_lun that was setup in demo mode..
395                  */
396                 if (deve->lun_flags & TRANSPORT_LUNFLAGS_INITIATOR_ACCESS) {
397                         if (deve->se_lun_acl != NULL) {
398                                 printk(KERN_ERR "struct se_dev_entry->se_lun_acl"
399                                         " already set for demo mode -> explict"
400                                         " LUN ACL transition\n");
401                                 spin_unlock_irq(&nacl->device_list_lock);
402                                 return -EINVAL;
403                         }
404                         if (deve->se_lun != lun) {
405                                 printk(KERN_ERR "struct se_dev_entry->se_lun does"
406                                         " match passed struct se_lun for demo mode"
407                                         " -> explict LUN ACL transition\n");
408                                 spin_unlock_irq(&nacl->device_list_lock);
409                                 return -EINVAL;
410                         }
411                         deve->se_lun_acl = lun_acl;
412                         trans = 1;
413                 } else {
414                         deve->se_lun = lun;
415                         deve->se_lun_acl = lun_acl;
416                         deve->mapped_lun = mapped_lun;
417                         deve->lun_flags |= TRANSPORT_LUNFLAGS_INITIATOR_ACCESS;
418                 }
419
420                 if (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE) {
421                         deve->lun_flags &= ~TRANSPORT_LUNFLAGS_READ_ONLY;
422                         deve->lun_flags |= TRANSPORT_LUNFLAGS_READ_WRITE;
423                 } else {
424                         deve->lun_flags &= ~TRANSPORT_LUNFLAGS_READ_WRITE;
425                         deve->lun_flags |= TRANSPORT_LUNFLAGS_READ_ONLY;
426                 }
427
428                 if (trans) {
429                         spin_unlock_irq(&nacl->device_list_lock);
430                         return 0;
431                 }
432                 deve->creation_time = get_jiffies_64();
433                 deve->attach_count++;
434                 spin_unlock_irq(&nacl->device_list_lock);
435
436                 spin_lock_bh(&port->sep_alua_lock);
437                 list_add_tail(&deve->alua_port_list, &port->sep_alua_list);
438                 spin_unlock_bh(&port->sep_alua_lock);
439
440                 return 0;
441         }
442         /*
443          * Wait for any in process SPEC_I_PT=1 or REGISTER_AND_MOVE
444          * PR operation to complete.
445          */
446         spin_unlock_irq(&nacl->device_list_lock);
447         while (atomic_read(&deve->pr_ref_count) != 0)
448                 cpu_relax();
449         spin_lock_irq(&nacl->device_list_lock);
450         /*
451          * Disable struct se_dev_entry LUN ACL mapping
452          */
453         core_scsi3_ua_release_all(deve);
454         deve->se_lun = NULL;
455         deve->se_lun_acl = NULL;
456         deve->lun_flags = 0;
457         deve->creation_time = 0;
458         deve->attach_count--;
459         spin_unlock_irq(&nacl->device_list_lock);
460
461         core_scsi3_free_pr_reg_from_nacl(lun->lun_se_dev, nacl);
462         return 0;
463 }
464
465 /*      core_clear_lun_from_tpg():
466  *
467  *
468  */
469 void core_clear_lun_from_tpg(struct se_lun *lun, struct se_portal_group *tpg)
470 {
471         struct se_node_acl *nacl;
472         struct se_dev_entry *deve;
473         u32 i;
474
475         spin_lock_bh(&tpg->acl_node_lock);
476         list_for_each_entry(nacl, &tpg->acl_node_list, acl_list) {
477                 spin_unlock_bh(&tpg->acl_node_lock);
478
479                 spin_lock_irq(&nacl->device_list_lock);
480                 for (i = 0; i < TRANSPORT_MAX_LUNS_PER_TPG; i++) {
481                         deve = &nacl->device_list[i];
482                         if (lun != deve->se_lun)
483                                 continue;
484                         spin_unlock_irq(&nacl->device_list_lock);
485
486                         core_update_device_list_for_node(lun, NULL,
487                                 deve->mapped_lun, TRANSPORT_LUNFLAGS_NO_ACCESS,
488                                 nacl, tpg, 0);
489
490                         spin_lock_irq(&nacl->device_list_lock);
491                 }
492                 spin_unlock_irq(&nacl->device_list_lock);
493
494                 spin_lock_bh(&tpg->acl_node_lock);
495         }
496         spin_unlock_bh(&tpg->acl_node_lock);
497 }
498
499 static struct se_port *core_alloc_port(struct se_device *dev)
500 {
501         struct se_port *port, *port_tmp;
502
503         port = kzalloc(sizeof(struct se_port), GFP_KERNEL);
504         if (!(port)) {
505                 printk(KERN_ERR "Unable to allocate struct se_port\n");
506                 return ERR_PTR(-ENOMEM);
507         }
508         INIT_LIST_HEAD(&port->sep_alua_list);
509         INIT_LIST_HEAD(&port->sep_list);
510         atomic_set(&port->sep_tg_pt_secondary_offline, 0);
511         spin_lock_init(&port->sep_alua_lock);
512         mutex_init(&port->sep_tg_pt_md_mutex);
513
514         spin_lock(&dev->se_port_lock);
515         if (dev->dev_port_count == 0x0000ffff) {
516                 printk(KERN_WARNING "Reached dev->dev_port_count =="
517                                 " 0x0000ffff\n");
518                 spin_unlock(&dev->se_port_lock);
519                 return ERR_PTR(-ENOSPC);
520         }
521 again:
522         /*
523          * Allocate the next RELATIVE TARGET PORT IDENTIFER for this struct se_device
524          * Here is the table from spc4r17 section 7.7.3.8.
525          *
526          *    Table 473 -- RELATIVE TARGET PORT IDENTIFIER field
527          *
528          * Code      Description
529          * 0h        Reserved
530          * 1h        Relative port 1, historically known as port A
531          * 2h        Relative port 2, historically known as port B
532          * 3h to FFFFh    Relative port 3 through 65 535
533          */
534         port->sep_rtpi = dev->dev_rpti_counter++;
535         if (!(port->sep_rtpi))
536                 goto again;
537
538         list_for_each_entry(port_tmp, &dev->dev_sep_list, sep_list) {
539                 /*
540                  * Make sure RELATIVE TARGET PORT IDENTIFER is unique
541                  * for 16-bit wrap..
542                  */
543                 if (port->sep_rtpi == port_tmp->sep_rtpi)
544                         goto again;
545         }
546         spin_unlock(&dev->se_port_lock);
547
548         return port;
549 }
550
551 static void core_export_port(
552         struct se_device *dev,
553         struct se_portal_group *tpg,
554         struct se_port *port,
555         struct se_lun *lun)
556 {
557         struct se_subsystem_dev *su_dev = dev->se_sub_dev;
558         struct t10_alua_tg_pt_gp_member *tg_pt_gp_mem = NULL;
559
560         spin_lock(&dev->se_port_lock);
561         spin_lock(&lun->lun_sep_lock);
562         port->sep_tpg = tpg;
563         port->sep_lun = lun;
564         lun->lun_sep = port;
565         spin_unlock(&lun->lun_sep_lock);
566
567         list_add_tail(&port->sep_list, &dev->dev_sep_list);
568         spin_unlock(&dev->se_port_lock);
569
570         if (su_dev->t10_alua.alua_type == SPC3_ALUA_EMULATED) {
571                 tg_pt_gp_mem = core_alua_allocate_tg_pt_gp_mem(port);
572                 if (IS_ERR(tg_pt_gp_mem) || !tg_pt_gp_mem) {
573                         printk(KERN_ERR "Unable to allocate t10_alua_tg_pt"
574                                         "_gp_member_t\n");
575                         return;
576                 }
577                 spin_lock(&tg_pt_gp_mem->tg_pt_gp_mem_lock);
578                 __core_alua_attach_tg_pt_gp_mem(tg_pt_gp_mem,
579                         su_dev->t10_alua.default_tg_pt_gp);
580                 spin_unlock(&tg_pt_gp_mem->tg_pt_gp_mem_lock);
581                 printk(KERN_INFO "%s/%s: Adding to default ALUA Target Port"
582                         " Group: alua/default_tg_pt_gp\n",
583                         dev->transport->name, tpg->se_tpg_tfo->get_fabric_name());
584         }
585
586         dev->dev_port_count++;
587         port->sep_index = port->sep_rtpi; /* RELATIVE TARGET PORT IDENTIFER */
588 }
589
590 /*
591  *      Called with struct se_device->se_port_lock spinlock held.
592  */
593 static void core_release_port(struct se_device *dev, struct se_port *port)
594         __releases(&dev->se_port_lock) __acquires(&dev->se_port_lock)
595 {
596         /*
597          * Wait for any port reference for PR ALL_TG_PT=1 operation
598          * to complete in __core_scsi3_alloc_registration()
599          */
600         spin_unlock(&dev->se_port_lock);
601         if (atomic_read(&port->sep_tg_pt_ref_cnt))
602                 cpu_relax();
603         spin_lock(&dev->se_port_lock);
604
605         core_alua_free_tg_pt_gp_mem(port);
606
607         list_del(&port->sep_list);
608         dev->dev_port_count--;
609         kfree(port);
610 }
611
612 int core_dev_export(
613         struct se_device *dev,
614         struct se_portal_group *tpg,
615         struct se_lun *lun)
616 {
617         struct se_port *port;
618
619         port = core_alloc_port(dev);
620         if (IS_ERR(port))
621                 return PTR_ERR(port);
622
623         lun->lun_se_dev = dev;
624         se_dev_start(dev);
625
626         atomic_inc(&dev->dev_export_obj.obj_access_count);
627         core_export_port(dev, tpg, port, lun);
628         return 0;
629 }
630
631 void core_dev_unexport(
632         struct se_device *dev,
633         struct se_portal_group *tpg,
634         struct se_lun *lun)
635 {
636         struct se_port *port = lun->lun_sep;
637
638         spin_lock(&lun->lun_sep_lock);
639         if (lun->lun_se_dev == NULL) {
640                 spin_unlock(&lun->lun_sep_lock);
641                 return;
642         }
643         spin_unlock(&lun->lun_sep_lock);
644
645         spin_lock(&dev->se_port_lock);
646         atomic_dec(&dev->dev_export_obj.obj_access_count);
647         core_release_port(dev, port);
648         spin_unlock(&dev->se_port_lock);
649
650         se_dev_stop(dev);
651         lun->lun_se_dev = NULL;
652 }
653
654 int transport_core_report_lun_response(struct se_cmd *se_cmd)
655 {
656         struct se_dev_entry *deve;
657         struct se_lun *se_lun;
658         struct se_session *se_sess = se_cmd->se_sess;
659         struct se_task *se_task;
660         unsigned char *buf = se_cmd->t_task_buf;
661         u32 cdb_offset = 0, lun_count = 0, offset = 8, i;
662
663         list_for_each_entry(se_task, &se_cmd->t_task_list, t_list)
664                 break;
665
666         if (!(se_task)) {
667                 printk(KERN_ERR "Unable to locate struct se_task for struct se_cmd\n");
668                 return PYX_TRANSPORT_LU_COMM_FAILURE;
669         }
670
671         /*
672          * If no struct se_session pointer is present, this struct se_cmd is
673          * coming via a target_core_mod PASSTHROUGH op, and not through
674          * a $FABRIC_MOD.  In that case, report LUN=0 only.
675          */
676         if (!(se_sess)) {
677                 int_to_scsilun(0, (struct scsi_lun *)&buf[offset]);
678                 lun_count = 1;
679                 goto done;
680         }
681
682         spin_lock_irq(&se_sess->se_node_acl->device_list_lock);
683         for (i = 0; i < TRANSPORT_MAX_LUNS_PER_TPG; i++) {
684                 deve = &se_sess->se_node_acl->device_list[i];
685                 if (!(deve->lun_flags & TRANSPORT_LUNFLAGS_INITIATOR_ACCESS))
686                         continue;
687                 se_lun = deve->se_lun;
688                 /*
689                  * We determine the correct LUN LIST LENGTH even once we
690                  * have reached the initial allocation length.
691                  * See SPC2-R20 7.19.
692                  */
693                 lun_count++;
694                 if ((cdb_offset + 8) >= se_cmd->data_length)
695                         continue;
696
697                 int_to_scsilun(deve->mapped_lun, (struct scsi_lun *)&buf[offset]);
698                 offset += 8;
699                 cdb_offset += 8;
700         }
701         spin_unlock_irq(&se_sess->se_node_acl->device_list_lock);
702
703         /*
704          * See SPC3 r07, page 159.
705          */
706 done:
707         lun_count *= 8;
708         buf[0] = ((lun_count >> 24) & 0xff);
709         buf[1] = ((lun_count >> 16) & 0xff);
710         buf[2] = ((lun_count >> 8) & 0xff);
711         buf[3] = (lun_count & 0xff);
712
713         return PYX_TRANSPORT_SENT_TO_TRANSPORT;
714 }
715
716 /*      se_release_device_for_hba():
717  *
718  *
719  */
720 void se_release_device_for_hba(struct se_device *dev)
721 {
722         struct se_hba *hba = dev->se_hba;
723
724         if ((dev->dev_status & TRANSPORT_DEVICE_ACTIVATED) ||
725             (dev->dev_status & TRANSPORT_DEVICE_DEACTIVATED) ||
726             (dev->dev_status & TRANSPORT_DEVICE_SHUTDOWN) ||
727             (dev->dev_status & TRANSPORT_DEVICE_OFFLINE_ACTIVATED) ||
728             (dev->dev_status & TRANSPORT_DEVICE_OFFLINE_DEACTIVATED))
729                 se_dev_stop(dev);
730
731         if (dev->dev_ptr) {
732                 kthread_stop(dev->process_thread);
733                 if (dev->transport->free_device)
734                         dev->transport->free_device(dev->dev_ptr);
735         }
736
737         spin_lock(&hba->device_lock);
738         list_del(&dev->dev_list);
739         hba->dev_count--;
740         spin_unlock(&hba->device_lock);
741
742         core_scsi3_free_all_registrations(dev);
743         se_release_vpd_for_dev(dev);
744
745         kfree(dev);
746 }
747
748 void se_release_vpd_for_dev(struct se_device *dev)
749 {
750         struct t10_vpd *vpd, *vpd_tmp;
751
752         spin_lock(&dev->se_sub_dev->t10_wwn.t10_vpd_lock);
753         list_for_each_entry_safe(vpd, vpd_tmp,
754                         &dev->se_sub_dev->t10_wwn.t10_vpd_list, vpd_list) {
755                 list_del(&vpd->vpd_list);
756                 kfree(vpd);
757         }
758         spin_unlock(&dev->se_sub_dev->t10_wwn.t10_vpd_lock);
759 }
760
761 /*      se_free_virtual_device():
762  *
763  *      Used for IBLOCK, RAMDISK, and FILEIO Transport Drivers.
764  */
765 int se_free_virtual_device(struct se_device *dev, struct se_hba *hba)
766 {
767         if (!list_empty(&dev->dev_sep_list))
768                 dump_stack();
769
770         core_alua_free_lu_gp_mem(dev);
771         se_release_device_for_hba(dev);
772
773         return 0;
774 }
775
776 static void se_dev_start(struct se_device *dev)
777 {
778         struct se_hba *hba = dev->se_hba;
779
780         spin_lock(&hba->device_lock);
781         atomic_inc(&dev->dev_obj.obj_access_count);
782         if (atomic_read(&dev->dev_obj.obj_access_count) == 1) {
783                 if (dev->dev_status & TRANSPORT_DEVICE_DEACTIVATED) {
784                         dev->dev_status &= ~TRANSPORT_DEVICE_DEACTIVATED;
785                         dev->dev_status |= TRANSPORT_DEVICE_ACTIVATED;
786                 } else if (dev->dev_status &
787                            TRANSPORT_DEVICE_OFFLINE_DEACTIVATED) {
788                         dev->dev_status &=
789                                 ~TRANSPORT_DEVICE_OFFLINE_DEACTIVATED;
790                         dev->dev_status |= TRANSPORT_DEVICE_OFFLINE_ACTIVATED;
791                 }
792         }
793         spin_unlock(&hba->device_lock);
794 }
795
796 static void se_dev_stop(struct se_device *dev)
797 {
798         struct se_hba *hba = dev->se_hba;
799
800         spin_lock(&hba->device_lock);
801         atomic_dec(&dev->dev_obj.obj_access_count);
802         if (atomic_read(&dev->dev_obj.obj_access_count) == 0) {
803                 if (dev->dev_status & TRANSPORT_DEVICE_ACTIVATED) {
804                         dev->dev_status &= ~TRANSPORT_DEVICE_ACTIVATED;
805                         dev->dev_status |= TRANSPORT_DEVICE_DEACTIVATED;
806                 } else if (dev->dev_status &
807                            TRANSPORT_DEVICE_OFFLINE_ACTIVATED) {
808                         dev->dev_status &= ~TRANSPORT_DEVICE_OFFLINE_ACTIVATED;
809                         dev->dev_status |= TRANSPORT_DEVICE_OFFLINE_DEACTIVATED;
810                 }
811         }
812         spin_unlock(&hba->device_lock);
813 }
814
815 int se_dev_check_online(struct se_device *dev)
816 {
817         unsigned long flags;
818         int ret;
819
820         spin_lock_irqsave(&dev->dev_status_lock, flags);
821         ret = ((dev->dev_status & TRANSPORT_DEVICE_ACTIVATED) ||
822                (dev->dev_status & TRANSPORT_DEVICE_DEACTIVATED)) ? 0 : 1;
823         spin_unlock_irqrestore(&dev->dev_status_lock, flags);
824
825         return ret;
826 }
827
828 int se_dev_check_shutdown(struct se_device *dev)
829 {
830         int ret;
831
832         spin_lock_irq(&dev->dev_status_lock);
833         ret = (dev->dev_status & TRANSPORT_DEVICE_SHUTDOWN);
834         spin_unlock_irq(&dev->dev_status_lock);
835
836         return ret;
837 }
838
839 void se_dev_set_default_attribs(
840         struct se_device *dev,
841         struct se_dev_limits *dev_limits)
842 {
843         struct queue_limits *limits = &dev_limits->limits;
844
845         dev->se_sub_dev->se_dev_attrib.emulate_dpo = DA_EMULATE_DPO;
846         dev->se_sub_dev->se_dev_attrib.emulate_fua_write = DA_EMULATE_FUA_WRITE;
847         dev->se_sub_dev->se_dev_attrib.emulate_fua_read = DA_EMULATE_FUA_READ;
848         dev->se_sub_dev->se_dev_attrib.emulate_write_cache = DA_EMULATE_WRITE_CACHE;
849         dev->se_sub_dev->se_dev_attrib.emulate_ua_intlck_ctrl = DA_EMULATE_UA_INTLLCK_CTRL;
850         dev->se_sub_dev->se_dev_attrib.emulate_tas = DA_EMULATE_TAS;
851         dev->se_sub_dev->se_dev_attrib.emulate_tpu = DA_EMULATE_TPU;
852         dev->se_sub_dev->se_dev_attrib.emulate_tpws = DA_EMULATE_TPWS;
853         dev->se_sub_dev->se_dev_attrib.emulate_reservations = DA_EMULATE_RESERVATIONS;
854         dev->se_sub_dev->se_dev_attrib.emulate_alua = DA_EMULATE_ALUA;
855         dev->se_sub_dev->se_dev_attrib.enforce_pr_isids = DA_ENFORCE_PR_ISIDS;
856         dev->se_sub_dev->se_dev_attrib.is_nonrot = DA_IS_NONROT;
857         /*
858          * The TPU=1 and TPWS=1 settings will be set in TCM/IBLOCK
859          * iblock_create_virtdevice() from struct queue_limits values
860          * if blk_queue_discard()==1
861          */
862         dev->se_sub_dev->se_dev_attrib.max_unmap_lba_count = DA_MAX_UNMAP_LBA_COUNT;
863         dev->se_sub_dev->se_dev_attrib.max_unmap_block_desc_count =
864                 DA_MAX_UNMAP_BLOCK_DESC_COUNT;
865         dev->se_sub_dev->se_dev_attrib.unmap_granularity = DA_UNMAP_GRANULARITY_DEFAULT;
866         dev->se_sub_dev->se_dev_attrib.unmap_granularity_alignment =
867                                 DA_UNMAP_GRANULARITY_ALIGNMENT_DEFAULT;
868         /*
869          * block_size is based on subsystem plugin dependent requirements.
870          */
871         dev->se_sub_dev->se_dev_attrib.hw_block_size = limits->logical_block_size;
872         dev->se_sub_dev->se_dev_attrib.block_size = limits->logical_block_size;
873         /*
874          * max_sectors is based on subsystem plugin dependent requirements.
875          */
876         dev->se_sub_dev->se_dev_attrib.hw_max_sectors = limits->max_hw_sectors;
877         dev->se_sub_dev->se_dev_attrib.max_sectors = limits->max_sectors;
878         /*
879          * Set optimal_sectors from max_sectors, which can be lowered via
880          * configfs.
881          */
882         dev->se_sub_dev->se_dev_attrib.optimal_sectors = limits->max_sectors;
883         /*
884          * queue_depth is based on subsystem plugin dependent requirements.
885          */
886         dev->se_sub_dev->se_dev_attrib.hw_queue_depth = dev_limits->hw_queue_depth;
887         dev->se_sub_dev->se_dev_attrib.queue_depth = dev_limits->queue_depth;
888 }
889
890 int se_dev_set_task_timeout(struct se_device *dev, u32 task_timeout)
891 {
892         if (task_timeout > DA_TASK_TIMEOUT_MAX) {
893                 printk(KERN_ERR "dev[%p]: Passed task_timeout: %u larger then"
894                         " DA_TASK_TIMEOUT_MAX\n", dev, task_timeout);
895                 return -EINVAL;
896         } else {
897                 dev->se_sub_dev->se_dev_attrib.task_timeout = task_timeout;
898                 printk(KERN_INFO "dev[%p]: Set SE Device task_timeout: %u\n",
899                         dev, task_timeout);
900         }
901
902         return 0;
903 }
904
905 int se_dev_set_max_unmap_lba_count(
906         struct se_device *dev,
907         u32 max_unmap_lba_count)
908 {
909         dev->se_sub_dev->se_dev_attrib.max_unmap_lba_count = max_unmap_lba_count;
910         printk(KERN_INFO "dev[%p]: Set max_unmap_lba_count: %u\n",
911                         dev, dev->se_sub_dev->se_dev_attrib.max_unmap_lba_count);
912         return 0;
913 }
914
915 int se_dev_set_max_unmap_block_desc_count(
916         struct se_device *dev,
917         u32 max_unmap_block_desc_count)
918 {
919         dev->se_sub_dev->se_dev_attrib.max_unmap_block_desc_count =
920                 max_unmap_block_desc_count;
921         printk(KERN_INFO "dev[%p]: Set max_unmap_block_desc_count: %u\n",
922                         dev, dev->se_sub_dev->se_dev_attrib.max_unmap_block_desc_count);
923         return 0;
924 }
925
926 int se_dev_set_unmap_granularity(
927         struct se_device *dev,
928         u32 unmap_granularity)
929 {
930         dev->se_sub_dev->se_dev_attrib.unmap_granularity = unmap_granularity;
931         printk(KERN_INFO "dev[%p]: Set unmap_granularity: %u\n",
932                         dev, dev->se_sub_dev->se_dev_attrib.unmap_granularity);
933         return 0;
934 }
935
936 int se_dev_set_unmap_granularity_alignment(
937         struct se_device *dev,
938         u32 unmap_granularity_alignment)
939 {
940         dev->se_sub_dev->se_dev_attrib.unmap_granularity_alignment = unmap_granularity_alignment;
941         printk(KERN_INFO "dev[%p]: Set unmap_granularity_alignment: %u\n",
942                         dev, dev->se_sub_dev->se_dev_attrib.unmap_granularity_alignment);
943         return 0;
944 }
945
946 int se_dev_set_emulate_dpo(struct se_device *dev, int flag)
947 {
948         if ((flag != 0) && (flag != 1)) {
949                 printk(KERN_ERR "Illegal value %d\n", flag);
950                 return -EINVAL;
951         }
952         if (dev->transport->dpo_emulated == NULL) {
953                 printk(KERN_ERR "dev->transport->dpo_emulated is NULL\n");
954                 return -EINVAL;
955         }
956         if (dev->transport->dpo_emulated(dev) == 0) {
957                 printk(KERN_ERR "dev->transport->dpo_emulated not supported\n");
958                 return -EINVAL;
959         }
960         dev->se_sub_dev->se_dev_attrib.emulate_dpo = flag;
961         printk(KERN_INFO "dev[%p]: SE Device Page Out (DPO) Emulation"
962                         " bit: %d\n", dev, dev->se_sub_dev->se_dev_attrib.emulate_dpo);
963         return 0;
964 }
965
966 int se_dev_set_emulate_fua_write(struct se_device *dev, int flag)
967 {
968         if ((flag != 0) && (flag != 1)) {
969                 printk(KERN_ERR "Illegal value %d\n", flag);
970                 return -EINVAL;
971         }
972         if (dev->transport->fua_write_emulated == NULL) {
973                 printk(KERN_ERR "dev->transport->fua_write_emulated is NULL\n");
974                 return -EINVAL;
975         }
976         if (dev->transport->fua_write_emulated(dev) == 0) {
977                 printk(KERN_ERR "dev->transport->fua_write_emulated not supported\n");
978                 return -EINVAL;
979         }
980         dev->se_sub_dev->se_dev_attrib.emulate_fua_write = flag;
981         printk(KERN_INFO "dev[%p]: SE Device Forced Unit Access WRITEs: %d\n",
982                         dev, dev->se_sub_dev->se_dev_attrib.emulate_fua_write);
983         return 0;
984 }
985
986 int se_dev_set_emulate_fua_read(struct se_device *dev, int flag)
987 {
988         if ((flag != 0) && (flag != 1)) {
989                 printk(KERN_ERR "Illegal value %d\n", flag);
990                 return -EINVAL;
991         }
992         if (dev->transport->fua_read_emulated == NULL) {
993                 printk(KERN_ERR "dev->transport->fua_read_emulated is NULL\n");
994                 return -EINVAL;
995         }
996         if (dev->transport->fua_read_emulated(dev) == 0) {
997                 printk(KERN_ERR "dev->transport->fua_read_emulated not supported\n");
998                 return -EINVAL;
999         }
1000         dev->se_sub_dev->se_dev_attrib.emulate_fua_read = flag;
1001         printk(KERN_INFO "dev[%p]: SE Device Forced Unit Access READs: %d\n",
1002                         dev, dev->se_sub_dev->se_dev_attrib.emulate_fua_read);
1003         return 0;
1004 }
1005
1006 int se_dev_set_emulate_write_cache(struct se_device *dev, int flag)
1007 {
1008         if ((flag != 0) && (flag != 1)) {
1009                 printk(KERN_ERR "Illegal value %d\n", flag);
1010                 return -EINVAL;
1011         }
1012         if (dev->transport->write_cache_emulated == NULL) {
1013                 printk(KERN_ERR "dev->transport->write_cache_emulated is NULL\n");
1014                 return -EINVAL;
1015         }
1016         if (dev->transport->write_cache_emulated(dev) == 0) {
1017                 printk(KERN_ERR "dev->transport->write_cache_emulated not supported\n");
1018                 return -EINVAL;
1019         }
1020         dev->se_sub_dev->se_dev_attrib.emulate_write_cache = flag;
1021         printk(KERN_INFO "dev[%p]: SE Device WRITE_CACHE_EMULATION flag: %d\n",
1022                         dev, dev->se_sub_dev->se_dev_attrib.emulate_write_cache);
1023         return 0;
1024 }
1025
1026 int se_dev_set_emulate_ua_intlck_ctrl(struct se_device *dev, int flag)
1027 {
1028         if ((flag != 0) && (flag != 1) && (flag != 2)) {
1029                 printk(KERN_ERR "Illegal value %d\n", flag);
1030                 return -EINVAL;
1031         }
1032
1033         if (atomic_read(&dev->dev_export_obj.obj_access_count)) {
1034                 printk(KERN_ERR "dev[%p]: Unable to change SE Device"
1035                         " UA_INTRLCK_CTRL while dev_export_obj: %d count"
1036                         " exists\n", dev,
1037                         atomic_read(&dev->dev_export_obj.obj_access_count));
1038                 return -EINVAL;
1039         }
1040         dev->se_sub_dev->se_dev_attrib.emulate_ua_intlck_ctrl = flag;
1041         printk(KERN_INFO "dev[%p]: SE Device UA_INTRLCK_CTRL flag: %d\n",
1042                 dev, dev->se_sub_dev->se_dev_attrib.emulate_ua_intlck_ctrl);
1043
1044         return 0;
1045 }
1046
1047 int se_dev_set_emulate_tas(struct se_device *dev, int flag)
1048 {
1049         if ((flag != 0) && (flag != 1)) {
1050                 printk(KERN_ERR "Illegal value %d\n", flag);
1051                 return -EINVAL;
1052         }
1053
1054         if (atomic_read(&dev->dev_export_obj.obj_access_count)) {
1055                 printk(KERN_ERR "dev[%p]: Unable to change SE Device TAS while"
1056                         " dev_export_obj: %d count exists\n", dev,
1057                         atomic_read(&dev->dev_export_obj.obj_access_count));
1058                 return -EINVAL;
1059         }
1060         dev->se_sub_dev->se_dev_attrib.emulate_tas = flag;
1061         printk(KERN_INFO "dev[%p]: SE Device TASK_ABORTED status bit: %s\n",
1062                 dev, (dev->se_sub_dev->se_dev_attrib.emulate_tas) ? "Enabled" : "Disabled");
1063
1064         return 0;
1065 }
1066
1067 int se_dev_set_emulate_tpu(struct se_device *dev, int flag)
1068 {
1069         if ((flag != 0) && (flag != 1)) {
1070                 printk(KERN_ERR "Illegal value %d\n", flag);
1071                 return -EINVAL;
1072         }
1073         /*
1074          * We expect this value to be non-zero when generic Block Layer
1075          * Discard supported is detected iblock_create_virtdevice().
1076          */
1077         if (!(dev->se_sub_dev->se_dev_attrib.max_unmap_block_desc_count)) {
1078                 printk(KERN_ERR "Generic Block Discard not supported\n");
1079                 return -ENOSYS;
1080         }
1081
1082         dev->se_sub_dev->se_dev_attrib.emulate_tpu = flag;
1083         printk(KERN_INFO "dev[%p]: SE Device Thin Provisioning UNMAP bit: %d\n",
1084                                 dev, flag);
1085         return 0;
1086 }
1087
1088 int se_dev_set_emulate_tpws(struct se_device *dev, int flag)
1089 {
1090         if ((flag != 0) && (flag != 1)) {
1091                 printk(KERN_ERR "Illegal value %d\n", flag);
1092                 return -EINVAL;
1093         }
1094         /*
1095          * We expect this value to be non-zero when generic Block Layer
1096          * Discard supported is detected iblock_create_virtdevice().
1097          */
1098         if (!(dev->se_sub_dev->se_dev_attrib.max_unmap_block_desc_count)) {
1099                 printk(KERN_ERR "Generic Block Discard not supported\n");
1100                 return -ENOSYS;
1101         }
1102
1103         dev->se_sub_dev->se_dev_attrib.emulate_tpws = flag;
1104         printk(KERN_INFO "dev[%p]: SE Device Thin Provisioning WRITE_SAME: %d\n",
1105                                 dev, flag);
1106         return 0;
1107 }
1108
1109 int se_dev_set_enforce_pr_isids(struct se_device *dev, int flag)
1110 {
1111         if ((flag != 0) && (flag != 1)) {
1112                 printk(KERN_ERR "Illegal value %d\n", flag);
1113                 return -EINVAL;
1114         }
1115         dev->se_sub_dev->se_dev_attrib.enforce_pr_isids = flag;
1116         printk(KERN_INFO "dev[%p]: SE Device enforce_pr_isids bit: %s\n", dev,
1117                 (dev->se_sub_dev->se_dev_attrib.enforce_pr_isids) ? "Enabled" : "Disabled");
1118         return 0;
1119 }
1120
1121 int se_dev_set_is_nonrot(struct se_device *dev, int flag)
1122 {
1123         if ((flag != 0) && (flag != 1)) {
1124                 printk(KERN_ERR "Illegal value %d\n", flag);
1125                 return -EINVAL;
1126         }
1127         dev->se_sub_dev->se_dev_attrib.is_nonrot = flag;
1128         printk(KERN_INFO "dev[%p]: SE Device is_nonrot bit: %d\n",
1129                dev, flag);
1130         return 0;
1131 }
1132
1133 /*
1134  * Note, this can only be called on unexported SE Device Object.
1135  */
1136 int se_dev_set_queue_depth(struct se_device *dev, u32 queue_depth)
1137 {
1138         u32 orig_queue_depth = dev->queue_depth;
1139
1140         if (atomic_read(&dev->dev_export_obj.obj_access_count)) {
1141                 printk(KERN_ERR "dev[%p]: Unable to change SE Device TCQ while"
1142                         " dev_export_obj: %d count exists\n", dev,
1143                         atomic_read(&dev->dev_export_obj.obj_access_count));
1144                 return -EINVAL;
1145         }
1146         if (!(queue_depth)) {
1147                 printk(KERN_ERR "dev[%p]: Illegal ZERO value for queue"
1148                         "_depth\n", dev);
1149                 return -EINVAL;
1150         }
1151
1152         if (dev->transport->transport_type == TRANSPORT_PLUGIN_PHBA_PDEV) {
1153                 if (queue_depth > dev->se_sub_dev->se_dev_attrib.hw_queue_depth) {
1154                         printk(KERN_ERR "dev[%p]: Passed queue_depth: %u"
1155                                 " exceeds TCM/SE_Device TCQ: %u\n",
1156                                 dev, queue_depth,
1157                                 dev->se_sub_dev->se_dev_attrib.hw_queue_depth);
1158                         return -EINVAL;
1159                 }
1160         } else {
1161                 if (queue_depth > dev->se_sub_dev->se_dev_attrib.queue_depth) {
1162                         if (queue_depth > dev->se_sub_dev->se_dev_attrib.hw_queue_depth) {
1163                                 printk(KERN_ERR "dev[%p]: Passed queue_depth:"
1164                                         " %u exceeds TCM/SE_Device MAX"
1165                                         " TCQ: %u\n", dev, queue_depth,
1166                                         dev->se_sub_dev->se_dev_attrib.hw_queue_depth);
1167                                 return -EINVAL;
1168                         }
1169                 }
1170         }
1171
1172         dev->se_sub_dev->se_dev_attrib.queue_depth = dev->queue_depth = queue_depth;
1173         if (queue_depth > orig_queue_depth)
1174                 atomic_add(queue_depth - orig_queue_depth, &dev->depth_left);
1175         else if (queue_depth < orig_queue_depth)
1176                 atomic_sub(orig_queue_depth - queue_depth, &dev->depth_left);
1177
1178         printk(KERN_INFO "dev[%p]: SE Device TCQ Depth changed to: %u\n",
1179                         dev, queue_depth);
1180         return 0;
1181 }
1182
1183 int se_dev_set_max_sectors(struct se_device *dev, u32 max_sectors)
1184 {
1185         int force = 0; /* Force setting for VDEVS */
1186
1187         if (atomic_read(&dev->dev_export_obj.obj_access_count)) {
1188                 printk(KERN_ERR "dev[%p]: Unable to change SE Device"
1189                         " max_sectors while dev_export_obj: %d count exists\n",
1190                         dev, atomic_read(&dev->dev_export_obj.obj_access_count));
1191                 return -EINVAL;
1192         }
1193         if (!(max_sectors)) {
1194                 printk(KERN_ERR "dev[%p]: Illegal ZERO value for"
1195                         " max_sectors\n", dev);
1196                 return -EINVAL;
1197         }
1198         if (max_sectors < DA_STATUS_MAX_SECTORS_MIN) {
1199                 printk(KERN_ERR "dev[%p]: Passed max_sectors: %u less than"
1200                         " DA_STATUS_MAX_SECTORS_MIN: %u\n", dev, max_sectors,
1201                                 DA_STATUS_MAX_SECTORS_MIN);
1202                 return -EINVAL;
1203         }
1204         if (dev->transport->transport_type == TRANSPORT_PLUGIN_PHBA_PDEV) {
1205                 if (max_sectors > dev->se_sub_dev->se_dev_attrib.hw_max_sectors) {
1206                         printk(KERN_ERR "dev[%p]: Passed max_sectors: %u"
1207                                 " greater than TCM/SE_Device max_sectors:"
1208                                 " %u\n", dev, max_sectors,
1209                                 dev->se_sub_dev->se_dev_attrib.hw_max_sectors);
1210                          return -EINVAL;
1211                 }
1212         } else {
1213                 if (!(force) && (max_sectors >
1214                                  dev->se_sub_dev->se_dev_attrib.hw_max_sectors)) {
1215                         printk(KERN_ERR "dev[%p]: Passed max_sectors: %u"
1216                                 " greater than TCM/SE_Device max_sectors"
1217                                 ": %u, use force=1 to override.\n", dev,
1218                                 max_sectors, dev->se_sub_dev->se_dev_attrib.hw_max_sectors);
1219                         return -EINVAL;
1220                 }
1221                 if (max_sectors > DA_STATUS_MAX_SECTORS_MAX) {
1222                         printk(KERN_ERR "dev[%p]: Passed max_sectors: %u"
1223                                 " greater than DA_STATUS_MAX_SECTORS_MAX:"
1224                                 " %u\n", dev, max_sectors,
1225                                 DA_STATUS_MAX_SECTORS_MAX);
1226                         return -EINVAL;
1227                 }
1228         }
1229
1230         dev->se_sub_dev->se_dev_attrib.max_sectors = max_sectors;
1231         printk("dev[%p]: SE Device max_sectors changed to %u\n",
1232                         dev, max_sectors);
1233         return 0;
1234 }
1235
1236 int se_dev_set_optimal_sectors(struct se_device *dev, u32 optimal_sectors)
1237 {
1238         if (atomic_read(&dev->dev_export_obj.obj_access_count)) {
1239                 printk(KERN_ERR "dev[%p]: Unable to change SE Device"
1240                         " optimal_sectors while dev_export_obj: %d count exists\n",
1241                         dev, atomic_read(&dev->dev_export_obj.obj_access_count));
1242                 return -EINVAL;
1243         }
1244         if (dev->transport->transport_type == TRANSPORT_PLUGIN_PHBA_PDEV) {
1245                 printk(KERN_ERR "dev[%p]: Passed optimal_sectors cannot be"
1246                                 " changed for TCM/pSCSI\n", dev);
1247                 return -EINVAL;
1248         }
1249         if (optimal_sectors > dev->se_sub_dev->se_dev_attrib.max_sectors) {
1250                 printk(KERN_ERR "dev[%p]: Passed optimal_sectors %u cannot be"
1251                         " greater than max_sectors: %u\n", dev,
1252                         optimal_sectors, dev->se_sub_dev->se_dev_attrib.max_sectors);
1253                 return -EINVAL;
1254         }
1255
1256         dev->se_sub_dev->se_dev_attrib.optimal_sectors = optimal_sectors;
1257         printk(KERN_INFO "dev[%p]: SE Device optimal_sectors changed to %u\n",
1258                         dev, optimal_sectors);
1259         return 0;
1260 }
1261
1262 int se_dev_set_block_size(struct se_device *dev, u32 block_size)
1263 {
1264         if (atomic_read(&dev->dev_export_obj.obj_access_count)) {
1265                 printk(KERN_ERR "dev[%p]: Unable to change SE Device block_size"
1266                         " while dev_export_obj: %d count exists\n", dev,
1267                         atomic_read(&dev->dev_export_obj.obj_access_count));
1268                 return -EINVAL;
1269         }
1270
1271         if ((block_size != 512) &&
1272             (block_size != 1024) &&
1273             (block_size != 2048) &&
1274             (block_size != 4096)) {
1275                 printk(KERN_ERR "dev[%p]: Illegal value for block_device: %u"
1276                         " for SE device, must be 512, 1024, 2048 or 4096\n",
1277                         dev, block_size);
1278                 return -EINVAL;
1279         }
1280
1281         if (dev->transport->transport_type == TRANSPORT_PLUGIN_PHBA_PDEV) {
1282                 printk(KERN_ERR "dev[%p]: Not allowed to change block_size for"
1283                         " Physical Device, use for Linux/SCSI to change"
1284                         " block_size for underlying hardware\n", dev);
1285                 return -EINVAL;
1286         }
1287
1288         dev->se_sub_dev->se_dev_attrib.block_size = block_size;
1289         printk(KERN_INFO "dev[%p]: SE Device block_size changed to %u\n",
1290                         dev, block_size);
1291         return 0;
1292 }
1293
1294 struct se_lun *core_dev_add_lun(
1295         struct se_portal_group *tpg,
1296         struct se_hba *hba,
1297         struct se_device *dev,
1298         u32 lun)
1299 {
1300         struct se_lun *lun_p;
1301         u32 lun_access = 0;
1302
1303         if (atomic_read(&dev->dev_access_obj.obj_access_count) != 0) {
1304                 printk(KERN_ERR "Unable to export struct se_device while dev_access_obj: %d\n",
1305                         atomic_read(&dev->dev_access_obj.obj_access_count));
1306                 return NULL;
1307         }
1308
1309         lun_p = core_tpg_pre_addlun(tpg, lun);
1310         if ((IS_ERR(lun_p)) || !(lun_p))
1311                 return NULL;
1312
1313         if (dev->dev_flags & DF_READ_ONLY)
1314                 lun_access = TRANSPORT_LUNFLAGS_READ_ONLY;
1315         else
1316                 lun_access = TRANSPORT_LUNFLAGS_READ_WRITE;
1317
1318         if (core_tpg_post_addlun(tpg, lun_p, lun_access, dev) < 0)
1319                 return NULL;
1320
1321         printk(KERN_INFO "%s_TPG[%u]_LUN[%u] - Activated %s Logical Unit from"
1322                 " CORE HBA: %u\n", tpg->se_tpg_tfo->get_fabric_name(),
1323                 tpg->se_tpg_tfo->tpg_get_tag(tpg), lun_p->unpacked_lun,
1324                 tpg->se_tpg_tfo->get_fabric_name(), hba->hba_id);
1325         /*
1326          * Update LUN maps for dynamically added initiators when
1327          * generate_node_acl is enabled.
1328          */
1329         if (tpg->se_tpg_tfo->tpg_check_demo_mode(tpg)) {
1330                 struct se_node_acl *acl;
1331                 spin_lock_bh(&tpg->acl_node_lock);
1332                 list_for_each_entry(acl, &tpg->acl_node_list, acl_list) {
1333                         if (acl->dynamic_node_acl) {
1334                                 spin_unlock_bh(&tpg->acl_node_lock);
1335                                 core_tpg_add_node_to_devs(acl, tpg);
1336                                 spin_lock_bh(&tpg->acl_node_lock);
1337                         }
1338                 }
1339                 spin_unlock_bh(&tpg->acl_node_lock);
1340         }
1341
1342         return lun_p;
1343 }
1344
1345 /*      core_dev_del_lun():
1346  *
1347  *
1348  */
1349 int core_dev_del_lun(
1350         struct se_portal_group *tpg,
1351         u32 unpacked_lun)
1352 {
1353         struct se_lun *lun;
1354         int ret = 0;
1355
1356         lun = core_tpg_pre_dellun(tpg, unpacked_lun, &ret);
1357         if (!(lun))
1358                 return ret;
1359
1360         core_tpg_post_dellun(tpg, lun);
1361
1362         printk(KERN_INFO "%s_TPG[%u]_LUN[%u] - Deactivated %s Logical Unit from"
1363                 " device object\n", tpg->se_tpg_tfo->get_fabric_name(),
1364                 tpg->se_tpg_tfo->tpg_get_tag(tpg), unpacked_lun,
1365                 tpg->se_tpg_tfo->get_fabric_name());
1366
1367         return 0;
1368 }
1369
1370 struct se_lun *core_get_lun_from_tpg(struct se_portal_group *tpg, u32 unpacked_lun)
1371 {
1372         struct se_lun *lun;
1373
1374         spin_lock(&tpg->tpg_lun_lock);
1375         if (unpacked_lun > (TRANSPORT_MAX_LUNS_PER_TPG-1)) {
1376                 printk(KERN_ERR "%s LUN: %u exceeds TRANSPORT_MAX_LUNS"
1377                         "_PER_TPG-1: %u for Target Portal Group: %hu\n",
1378                         tpg->se_tpg_tfo->get_fabric_name(), unpacked_lun,
1379                         TRANSPORT_MAX_LUNS_PER_TPG-1,
1380                         tpg->se_tpg_tfo->tpg_get_tag(tpg));
1381                 spin_unlock(&tpg->tpg_lun_lock);
1382                 return NULL;
1383         }
1384         lun = &tpg->tpg_lun_list[unpacked_lun];
1385
1386         if (lun->lun_status != TRANSPORT_LUN_STATUS_FREE) {
1387                 printk(KERN_ERR "%s Logical Unit Number: %u is not free on"
1388                         " Target Portal Group: %hu, ignoring request.\n",
1389                         tpg->se_tpg_tfo->get_fabric_name(), unpacked_lun,
1390                         tpg->se_tpg_tfo->tpg_get_tag(tpg));
1391                 spin_unlock(&tpg->tpg_lun_lock);
1392                 return NULL;
1393         }
1394         spin_unlock(&tpg->tpg_lun_lock);
1395
1396         return lun;
1397 }
1398
1399 /*      core_dev_get_lun():
1400  *
1401  *
1402  */
1403 static struct se_lun *core_dev_get_lun(struct se_portal_group *tpg, u32 unpacked_lun)
1404 {
1405         struct se_lun *lun;
1406
1407         spin_lock(&tpg->tpg_lun_lock);
1408         if (unpacked_lun > (TRANSPORT_MAX_LUNS_PER_TPG-1)) {
1409                 printk(KERN_ERR "%s LUN: %u exceeds TRANSPORT_MAX_LUNS_PER"
1410                         "_TPG-1: %u for Target Portal Group: %hu\n",
1411                         tpg->se_tpg_tfo->get_fabric_name(), unpacked_lun,
1412                         TRANSPORT_MAX_LUNS_PER_TPG-1,
1413                         tpg->se_tpg_tfo->tpg_get_tag(tpg));
1414                 spin_unlock(&tpg->tpg_lun_lock);
1415                 return NULL;
1416         }
1417         lun = &tpg->tpg_lun_list[unpacked_lun];
1418
1419         if (lun->lun_status != TRANSPORT_LUN_STATUS_ACTIVE) {
1420                 printk(KERN_ERR "%s Logical Unit Number: %u is not active on"
1421                         " Target Portal Group: %hu, ignoring request.\n",
1422                         tpg->se_tpg_tfo->get_fabric_name(), unpacked_lun,
1423                         tpg->se_tpg_tfo->tpg_get_tag(tpg));
1424                 spin_unlock(&tpg->tpg_lun_lock);
1425                 return NULL;
1426         }
1427         spin_unlock(&tpg->tpg_lun_lock);
1428
1429         return lun;
1430 }
1431
1432 struct se_lun_acl *core_dev_init_initiator_node_lun_acl(
1433         struct se_portal_group *tpg,
1434         u32 mapped_lun,
1435         char *initiatorname,
1436         int *ret)
1437 {
1438         struct se_lun_acl *lacl;
1439         struct se_node_acl *nacl;
1440
1441         if (strlen(initiatorname) >= TRANSPORT_IQN_LEN) {
1442                 printk(KERN_ERR "%s InitiatorName exceeds maximum size.\n",
1443                         tpg->se_tpg_tfo->get_fabric_name());
1444                 *ret = -EOVERFLOW;
1445                 return NULL;
1446         }
1447         nacl = core_tpg_get_initiator_node_acl(tpg, initiatorname);
1448         if (!(nacl)) {
1449                 *ret = -EINVAL;
1450                 return NULL;
1451         }
1452         lacl = kzalloc(sizeof(struct se_lun_acl), GFP_KERNEL);
1453         if (!(lacl)) {
1454                 printk(KERN_ERR "Unable to allocate memory for struct se_lun_acl.\n");
1455                 *ret = -ENOMEM;
1456                 return NULL;
1457         }
1458
1459         INIT_LIST_HEAD(&lacl->lacl_list);
1460         lacl->mapped_lun = mapped_lun;
1461         lacl->se_lun_nacl = nacl;
1462         snprintf(lacl->initiatorname, TRANSPORT_IQN_LEN, "%s", initiatorname);
1463
1464         return lacl;
1465 }
1466
1467 int core_dev_add_initiator_node_lun_acl(
1468         struct se_portal_group *tpg,
1469         struct se_lun_acl *lacl,
1470         u32 unpacked_lun,
1471         u32 lun_access)
1472 {
1473         struct se_lun *lun;
1474         struct se_node_acl *nacl;
1475
1476         lun = core_dev_get_lun(tpg, unpacked_lun);
1477         if (!(lun)) {
1478                 printk(KERN_ERR "%s Logical Unit Number: %u is not active on"
1479                         " Target Portal Group: %hu, ignoring request.\n",
1480                         tpg->se_tpg_tfo->get_fabric_name(), unpacked_lun,
1481                         tpg->se_tpg_tfo->tpg_get_tag(tpg));
1482                 return -EINVAL;
1483         }
1484
1485         nacl = lacl->se_lun_nacl;
1486         if (!(nacl))
1487                 return -EINVAL;
1488
1489         if ((lun->lun_access & TRANSPORT_LUNFLAGS_READ_ONLY) &&
1490             (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE))
1491                 lun_access = TRANSPORT_LUNFLAGS_READ_ONLY;
1492
1493         lacl->se_lun = lun;
1494
1495         if (core_update_device_list_for_node(lun, lacl, lacl->mapped_lun,
1496                         lun_access, nacl, tpg, 1) < 0)
1497                 return -EINVAL;
1498
1499         spin_lock(&lun->lun_acl_lock);
1500         list_add_tail(&lacl->lacl_list, &lun->lun_acl_list);
1501         atomic_inc(&lun->lun_acl_count);
1502         smp_mb__after_atomic_inc();
1503         spin_unlock(&lun->lun_acl_lock);
1504
1505         printk(KERN_INFO "%s_TPG[%hu]_LUN[%u->%u] - Added %s ACL for "
1506                 " InitiatorNode: %s\n", tpg->se_tpg_tfo->get_fabric_name(),
1507                 tpg->se_tpg_tfo->tpg_get_tag(tpg), unpacked_lun, lacl->mapped_lun,
1508                 (lun_access & TRANSPORT_LUNFLAGS_READ_WRITE) ? "RW" : "RO",
1509                 lacl->initiatorname);
1510         /*
1511          * Check to see if there are any existing persistent reservation APTPL
1512          * pre-registrations that need to be enabled for this LUN ACL..
1513          */
1514         core_scsi3_check_aptpl_registration(lun->lun_se_dev, tpg, lun, lacl);
1515         return 0;
1516 }
1517
1518 /*      core_dev_del_initiator_node_lun_acl():
1519  *
1520  *
1521  */
1522 int core_dev_del_initiator_node_lun_acl(
1523         struct se_portal_group *tpg,
1524         struct se_lun *lun,
1525         struct se_lun_acl *lacl)
1526 {
1527         struct se_node_acl *nacl;
1528
1529         nacl = lacl->se_lun_nacl;
1530         if (!(nacl))
1531                 return -EINVAL;
1532
1533         spin_lock(&lun->lun_acl_lock);
1534         list_del(&lacl->lacl_list);
1535         atomic_dec(&lun->lun_acl_count);
1536         smp_mb__after_atomic_dec();
1537         spin_unlock(&lun->lun_acl_lock);
1538
1539         core_update_device_list_for_node(lun, NULL, lacl->mapped_lun,
1540                 TRANSPORT_LUNFLAGS_NO_ACCESS, nacl, tpg, 0);
1541
1542         lacl->se_lun = NULL;
1543
1544         printk(KERN_INFO "%s_TPG[%hu]_LUN[%u] - Removed ACL for"
1545                 " InitiatorNode: %s Mapped LUN: %u\n",
1546                 tpg->se_tpg_tfo->get_fabric_name(),
1547                 tpg->se_tpg_tfo->tpg_get_tag(tpg), lun->unpacked_lun,
1548                 lacl->initiatorname, lacl->mapped_lun);
1549
1550         return 0;
1551 }
1552
1553 void core_dev_free_initiator_node_lun_acl(
1554         struct se_portal_group *tpg,
1555         struct se_lun_acl *lacl)
1556 {
1557         printk("%s_TPG[%hu] - Freeing ACL for %s InitiatorNode: %s"
1558                 " Mapped LUN: %u\n", tpg->se_tpg_tfo->get_fabric_name(),
1559                 tpg->se_tpg_tfo->tpg_get_tag(tpg),
1560                 tpg->se_tpg_tfo->get_fabric_name(),
1561                 lacl->initiatorname, lacl->mapped_lun);
1562
1563         kfree(lacl);
1564 }
1565
1566 int core_dev_setup_virtual_lun0(void)
1567 {
1568         struct se_hba *hba;
1569         struct se_device *dev;
1570         struct se_subsystem_dev *se_dev = NULL;
1571         struct se_subsystem_api *t;
1572         char buf[16];
1573         int ret;
1574
1575         hba = core_alloc_hba("rd_dr", 0, HBA_FLAGS_INTERNAL_USE);
1576         if (IS_ERR(hba))
1577                 return PTR_ERR(hba);
1578
1579         lun0_hba = hba;
1580         t = hba->transport;
1581
1582         se_dev = kzalloc(sizeof(struct se_subsystem_dev), GFP_KERNEL);
1583         if (!(se_dev)) {
1584                 printk(KERN_ERR "Unable to allocate memory for"
1585                                 " struct se_subsystem_dev\n");
1586                 ret = -ENOMEM;
1587                 goto out;
1588         }
1589         INIT_LIST_HEAD(&se_dev->se_dev_node);
1590         INIT_LIST_HEAD(&se_dev->t10_wwn.t10_vpd_list);
1591         spin_lock_init(&se_dev->t10_wwn.t10_vpd_lock);
1592         INIT_LIST_HEAD(&se_dev->t10_pr.registration_list);
1593         INIT_LIST_HEAD(&se_dev->t10_pr.aptpl_reg_list);
1594         spin_lock_init(&se_dev->t10_pr.registration_lock);
1595         spin_lock_init(&se_dev->t10_pr.aptpl_reg_lock);
1596         INIT_LIST_HEAD(&se_dev->t10_alua.tg_pt_gps_list);
1597         spin_lock_init(&se_dev->t10_alua.tg_pt_gps_lock);
1598         spin_lock_init(&se_dev->se_dev_lock);
1599         se_dev->t10_pr.pr_aptpl_buf_len = PR_APTPL_BUF_LEN;
1600         se_dev->t10_wwn.t10_sub_dev = se_dev;
1601         se_dev->t10_alua.t10_sub_dev = se_dev;
1602         se_dev->se_dev_attrib.da_sub_dev = se_dev;
1603         se_dev->se_dev_hba = hba;
1604
1605         se_dev->se_dev_su_ptr = t->allocate_virtdevice(hba, "virt_lun0");
1606         if (!(se_dev->se_dev_su_ptr)) {
1607                 printk(KERN_ERR "Unable to locate subsystem dependent pointer"
1608                         " from allocate_virtdevice()\n");
1609                 ret = -ENOMEM;
1610                 goto out;
1611         }
1612         lun0_su_dev = se_dev;
1613
1614         memset(buf, 0, 16);
1615         sprintf(buf, "rd_pages=8");
1616         t->set_configfs_dev_params(hba, se_dev, buf, sizeof(buf));
1617
1618         dev = t->create_virtdevice(hba, se_dev, se_dev->se_dev_su_ptr);
1619         if (IS_ERR(dev)) {
1620                 ret = PTR_ERR(dev);
1621                 goto out;
1622         }
1623         se_dev->se_dev_ptr = dev;
1624         g_lun0_dev = dev;
1625
1626         return 0;
1627 out:
1628         lun0_su_dev = NULL;
1629         kfree(se_dev);
1630         if (lun0_hba) {
1631                 core_delete_hba(lun0_hba);
1632                 lun0_hba = NULL;
1633         }
1634         return ret;
1635 }
1636
1637
1638 void core_dev_release_virtual_lun0(void)
1639 {
1640         struct se_hba *hba = lun0_hba;
1641         struct se_subsystem_dev *su_dev = lun0_su_dev;
1642
1643         if (!(hba))
1644                 return;
1645
1646         if (g_lun0_dev)
1647                 se_free_virtual_device(g_lun0_dev, hba);
1648
1649         kfree(su_dev);
1650         core_delete_hba(hba);
1651 }