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