kernel.c revision 280250
1/*-
2 * Copyright (c) 2003, 2004 Silicon Graphics International Corp.
3 * Copyright (c) 1997-2007 Kenneth D. Merry
4 * Copyright (c) 2012 The FreeBSD Foundation
5 * All rights reserved.
6 *
7 * Portions of this software were developed by Edward Tomasz Napierala
8 * under sponsorship from the FreeBSD Foundation.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions, and the following disclaimer,
15 *    without modification.
16 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
17 *    substantially similar to the "NO WARRANTY" disclaimer below
18 *    ("Disclaimer") and any redistribution must be conditioned upon
19 *    including a substantially similar Disclaimer requirement for further
20 *    binary redistribution.
21 *
22 * NO WARRANTY
23 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
24 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
25 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
26 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
27 * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
31 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
32 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
33 * POSSIBILITY OF SUCH DAMAGES.
34 *
35 */
36
37#include <sys/cdefs.h>
38__FBSDID("$FreeBSD: stable/10/usr.sbin/ctld/kernel.c 280250 2015-03-19 12:32:48Z rwatson $");
39
40#include <sys/ioctl.h>
41#include <sys/types.h>
42#include <sys/stat.h>
43#include <sys/param.h>
44#include <sys/linker.h>
45#include <sys/queue.h>
46#include <sys/callout.h>
47#include <sys/sbuf.h>
48#include <sys/capsicum.h>
49#include <assert.h>
50#include <bsdxml.h>
51#include <ctype.h>
52#include <errno.h>
53#include <fcntl.h>
54#include <stdint.h>
55#include <stdio.h>
56#include <stdlib.h>
57#include <string.h>
58#include <strings.h>
59#include <cam/scsi/scsi_all.h>
60#include <cam/scsi/scsi_message.h>
61#include <cam/ctl/ctl.h>
62#include <cam/ctl/ctl_io.h>
63#include <cam/ctl/ctl_frontend_internal.h>
64#include <cam/ctl/ctl_backend.h>
65#include <cam/ctl/ctl_ioctl.h>
66#include <cam/ctl/ctl_backend_block.h>
67#include <cam/ctl/ctl_util.h>
68#include <cam/ctl/ctl_scsi_all.h>
69
70#include "ctld.h"
71
72#ifdef ICL_KERNEL_PROXY
73#include <netdb.h>
74#endif
75
76extern bool proxy_mode;
77
78static int	ctl_fd = 0;
79
80void
81kernel_init(void)
82{
83	int retval, saved_errno;
84
85	ctl_fd = open(CTL_DEFAULT_DEV, O_RDWR);
86	if (ctl_fd < 0 && errno == ENOENT) {
87		saved_errno = errno;
88		retval = kldload("ctl");
89		if (retval != -1)
90			ctl_fd = open(CTL_DEFAULT_DEV, O_RDWR);
91		else
92			errno = saved_errno;
93	}
94	if (ctl_fd < 0)
95		log_err(1, "failed to open %s", CTL_DEFAULT_DEV);
96}
97
98/*
99 * Name/value pair used for per-LUN attributes.
100 */
101struct cctl_lun_nv {
102	char *name;
103	char *value;
104	STAILQ_ENTRY(cctl_lun_nv) links;
105};
106
107/*
108 * Backend LUN information.
109 */
110struct cctl_lun {
111	uint64_t lun_id;
112	char *backend_type;
113	uint64_t size_blocks;
114	uint32_t blocksize;
115	char *serial_number;
116	char *device_id;
117	char *ctld_name;
118	STAILQ_HEAD(,cctl_lun_nv) attr_list;
119	STAILQ_ENTRY(cctl_lun) links;
120};
121
122struct cctl_port {
123	uint32_t port_id;
124	char *port_name;
125	int cfiscsi_state;
126	char *cfiscsi_target;
127	uint16_t cfiscsi_portal_group_tag;
128	char *ctld_portal_group_name;
129	STAILQ_HEAD(,cctl_lun_nv) attr_list;
130	STAILQ_ENTRY(cctl_port) links;
131};
132
133struct cctl_devlist_data {
134	int num_luns;
135	STAILQ_HEAD(,cctl_lun) lun_list;
136	struct cctl_lun *cur_lun;
137	int num_ports;
138	STAILQ_HEAD(,cctl_port) port_list;
139	struct cctl_port *cur_port;
140	int level;
141	struct sbuf *cur_sb[32];
142};
143
144static void
145cctl_start_element(void *user_data, const char *name, const char **attr)
146{
147	int i;
148	struct cctl_devlist_data *devlist;
149	struct cctl_lun *cur_lun;
150
151	devlist = (struct cctl_devlist_data *)user_data;
152	cur_lun = devlist->cur_lun;
153	devlist->level++;
154	if ((u_int)devlist->level >= (sizeof(devlist->cur_sb) /
155	    sizeof(devlist->cur_sb[0])))
156		log_errx(1, "%s: too many nesting levels, %zd max", __func__,
157		     sizeof(devlist->cur_sb) / sizeof(devlist->cur_sb[0]));
158
159	devlist->cur_sb[devlist->level] = sbuf_new_auto();
160	if (devlist->cur_sb[devlist->level] == NULL)
161		log_err(1, "%s: unable to allocate sbuf", __func__);
162
163	if (strcmp(name, "lun") == 0) {
164		if (cur_lun != NULL)
165			log_errx(1, "%s: improper lun element nesting",
166			    __func__);
167
168		cur_lun = calloc(1, sizeof(*cur_lun));
169		if (cur_lun == NULL)
170			log_err(1, "%s: cannot allocate %zd bytes", __func__,
171			    sizeof(*cur_lun));
172
173		devlist->num_luns++;
174		devlist->cur_lun = cur_lun;
175
176		STAILQ_INIT(&cur_lun->attr_list);
177		STAILQ_INSERT_TAIL(&devlist->lun_list, cur_lun, links);
178
179		for (i = 0; attr[i] != NULL; i += 2) {
180			if (strcmp(attr[i], "id") == 0) {
181				cur_lun->lun_id = strtoull(attr[i+1], NULL, 0);
182			} else {
183				log_errx(1, "%s: invalid LUN attribute %s = %s",
184				     __func__, attr[i], attr[i+1]);
185			}
186		}
187	}
188}
189
190static void
191cctl_end_element(void *user_data, const char *name)
192{
193	struct cctl_devlist_data *devlist;
194	struct cctl_lun *cur_lun;
195	char *str;
196
197	devlist = (struct cctl_devlist_data *)user_data;
198	cur_lun = devlist->cur_lun;
199
200	if ((cur_lun == NULL)
201	 && (strcmp(name, "ctllunlist") != 0))
202		log_errx(1, "%s: cur_lun == NULL! (name = %s)", __func__, name);
203
204	if (devlist->cur_sb[devlist->level] == NULL)
205		log_errx(1, "%s: no valid sbuf at level %d (name %s)", __func__,
206		     devlist->level, name);
207
208	sbuf_finish(devlist->cur_sb[devlist->level]);
209	str = checked_strdup(sbuf_data(devlist->cur_sb[devlist->level]));
210
211	if (strlen(str) == 0) {
212		free(str);
213		str = NULL;
214	}
215
216	sbuf_delete(devlist->cur_sb[devlist->level]);
217	devlist->cur_sb[devlist->level] = NULL;
218	devlist->level--;
219
220	if (strcmp(name, "backend_type") == 0) {
221		cur_lun->backend_type = str;
222		str = NULL;
223	} else if (strcmp(name, "size") == 0) {
224		cur_lun->size_blocks = strtoull(str, NULL, 0);
225	} else if (strcmp(name, "blocksize") == 0) {
226		cur_lun->blocksize = strtoul(str, NULL, 0);
227	} else if (strcmp(name, "serial_number") == 0) {
228		cur_lun->serial_number = str;
229		str = NULL;
230	} else if (strcmp(name, "device_id") == 0) {
231		cur_lun->device_id = str;
232		str = NULL;
233	} else if (strcmp(name, "ctld_name") == 0) {
234		cur_lun->ctld_name = str;
235		str = NULL;
236	} else if (strcmp(name, "lun") == 0) {
237		devlist->cur_lun = NULL;
238	} else if (strcmp(name, "ctllunlist") == 0) {
239		/* Nothing. */
240	} else {
241		struct cctl_lun_nv *nv;
242
243		nv = calloc(1, sizeof(*nv));
244		if (nv == NULL)
245			log_err(1, "%s: can't allocate %zd bytes for nv pair",
246			    __func__, sizeof(*nv));
247
248		nv->name = checked_strdup(name);
249
250		nv->value = str;
251		str = NULL;
252		STAILQ_INSERT_TAIL(&cur_lun->attr_list, nv, links);
253	}
254
255	free(str);
256}
257
258static void
259cctl_start_pelement(void *user_data, const char *name, const char **attr)
260{
261	int i;
262	struct cctl_devlist_data *devlist;
263	struct cctl_port *cur_port;
264
265	devlist = (struct cctl_devlist_data *)user_data;
266	cur_port = devlist->cur_port;
267	devlist->level++;
268	if ((u_int)devlist->level >= (sizeof(devlist->cur_sb) /
269	    sizeof(devlist->cur_sb[0])))
270		log_errx(1, "%s: too many nesting levels, %zd max", __func__,
271		     sizeof(devlist->cur_sb) / sizeof(devlist->cur_sb[0]));
272
273	devlist->cur_sb[devlist->level] = sbuf_new_auto();
274	if (devlist->cur_sb[devlist->level] == NULL)
275		log_err(1, "%s: unable to allocate sbuf", __func__);
276
277	if (strcmp(name, "targ_port") == 0) {
278		if (cur_port != NULL)
279			log_errx(1, "%s: improper port element nesting (%s)",
280			    __func__, name);
281
282		cur_port = calloc(1, sizeof(*cur_port));
283		if (cur_port == NULL)
284			log_err(1, "%s: cannot allocate %zd bytes", __func__,
285			    sizeof(*cur_port));
286
287		devlist->num_ports++;
288		devlist->cur_port = cur_port;
289
290		STAILQ_INIT(&cur_port->attr_list);
291		STAILQ_INSERT_TAIL(&devlist->port_list, cur_port, links);
292
293		for (i = 0; attr[i] != NULL; i += 2) {
294			if (strcmp(attr[i], "id") == 0) {
295				cur_port->port_id = strtoul(attr[i+1], NULL, 0);
296			} else {
297				log_errx(1, "%s: invalid LUN attribute %s = %s",
298				     __func__, attr[i], attr[i+1]);
299			}
300		}
301	}
302}
303
304static void
305cctl_end_pelement(void *user_data, const char *name)
306{
307	struct cctl_devlist_data *devlist;
308	struct cctl_port *cur_port;
309	char *str;
310
311	devlist = (struct cctl_devlist_data *)user_data;
312	cur_port = devlist->cur_port;
313
314	if ((cur_port == NULL)
315	 && (strcmp(name, "ctlportlist") != 0))
316		log_errx(1, "%s: cur_port == NULL! (name = %s)", __func__, name);
317
318	if (devlist->cur_sb[devlist->level] == NULL)
319		log_errx(1, "%s: no valid sbuf at level %d (name %s)", __func__,
320		     devlist->level, name);
321
322	sbuf_finish(devlist->cur_sb[devlist->level]);
323	str = checked_strdup(sbuf_data(devlist->cur_sb[devlist->level]));
324
325	if (strlen(str) == 0) {
326		free(str);
327		str = NULL;
328	}
329
330	sbuf_delete(devlist->cur_sb[devlist->level]);
331	devlist->cur_sb[devlist->level] = NULL;
332	devlist->level--;
333
334	if (strcmp(name, "port_name") == 0) {
335		cur_port->port_name = str;
336		str = NULL;
337	} else if (strcmp(name, "cfiscsi_target") == 0) {
338		cur_port->cfiscsi_target = str;
339		str = NULL;
340	} else if (strcmp(name, "cfiscsi_state") == 0) {
341		cur_port->cfiscsi_state = strtoul(str, NULL, 0);
342	} else if (strcmp(name, "cfiscsi_portal_group_tag") == 0) {
343		cur_port->cfiscsi_portal_group_tag = strtoul(str, NULL, 0);
344	} else if (strcmp(name, "ctld_portal_group_name") == 0) {
345		cur_port->ctld_portal_group_name = str;
346		str = NULL;
347	} else if (strcmp(name, "targ_port") == 0) {
348		devlist->cur_port = NULL;
349	} else if (strcmp(name, "ctlportlist") == 0) {
350		/* Nothing. */
351	} else {
352		struct cctl_lun_nv *nv;
353
354		nv = calloc(1, sizeof(*nv));
355		if (nv == NULL)
356			log_err(1, "%s: can't allocate %zd bytes for nv pair",
357			    __func__, sizeof(*nv));
358
359		nv->name = checked_strdup(name);
360
361		nv->value = str;
362		str = NULL;
363		STAILQ_INSERT_TAIL(&cur_port->attr_list, nv, links);
364	}
365
366	free(str);
367}
368
369static void
370cctl_char_handler(void *user_data, const XML_Char *str, int len)
371{
372	struct cctl_devlist_data *devlist;
373
374	devlist = (struct cctl_devlist_data *)user_data;
375
376	sbuf_bcat(devlist->cur_sb[devlist->level], str, len);
377}
378
379struct conf *
380conf_new_from_kernel(void)
381{
382	struct conf *conf = NULL;
383	struct target *targ;
384	struct portal_group *pg;
385	struct pport *pp;
386	struct port *cp;
387	struct lun *cl;
388	struct lun_option *lo;
389	struct ctl_lun_list list;
390	struct cctl_devlist_data devlist;
391	struct cctl_lun *lun;
392	struct cctl_port *port;
393	XML_Parser parser;
394	char *str;
395	int len, retval;
396
397	bzero(&devlist, sizeof(devlist));
398	STAILQ_INIT(&devlist.lun_list);
399	STAILQ_INIT(&devlist.port_list);
400
401	log_debugx("obtaining previously configured CTL luns from the kernel");
402
403	str = NULL;
404	len = 4096;
405retry:
406	str = realloc(str, len);
407	if (str == NULL)
408		log_err(1, "realloc");
409
410	bzero(&list, sizeof(list));
411	list.alloc_len = len;
412	list.status = CTL_LUN_LIST_NONE;
413	list.lun_xml = str;
414
415	if (ioctl(ctl_fd, CTL_LUN_LIST, &list) == -1) {
416		log_warn("error issuing CTL_LUN_LIST ioctl");
417		free(str);
418		return (NULL);
419	}
420
421	if (list.status == CTL_LUN_LIST_ERROR) {
422		log_warnx("error returned from CTL_LUN_LIST ioctl: %s",
423		    list.error_str);
424		free(str);
425		return (NULL);
426	}
427
428	if (list.status == CTL_LUN_LIST_NEED_MORE_SPACE) {
429		len = len << 1;
430		goto retry;
431	}
432
433	parser = XML_ParserCreate(NULL);
434	if (parser == NULL) {
435		log_warnx("unable to create XML parser");
436		free(str);
437		return (NULL);
438	}
439
440	XML_SetUserData(parser, &devlist);
441	XML_SetElementHandler(parser, cctl_start_element, cctl_end_element);
442	XML_SetCharacterDataHandler(parser, cctl_char_handler);
443
444	retval = XML_Parse(parser, str, strlen(str), 1);
445	XML_ParserFree(parser);
446	free(str);
447	if (retval != 1) {
448		log_warnx("XML_Parse failed");
449		return (NULL);
450	}
451
452	str = NULL;
453	len = 4096;
454retry_port:
455	str = realloc(str, len);
456	if (str == NULL)
457		log_err(1, "realloc");
458
459	bzero(&list, sizeof(list));
460	list.alloc_len = len;
461	list.status = CTL_LUN_LIST_NONE;
462	list.lun_xml = str;
463
464	if (ioctl(ctl_fd, CTL_PORT_LIST, &list) == -1) {
465		log_warn("error issuing CTL_PORT_LIST ioctl");
466		free(str);
467		return (NULL);
468	}
469
470	if (list.status == CTL_PORT_LIST_ERROR) {
471		log_warnx("error returned from CTL_PORT_LIST ioctl: %s",
472		    list.error_str);
473		free(str);
474		return (NULL);
475	}
476
477	if (list.status == CTL_LUN_LIST_NEED_MORE_SPACE) {
478		len = len << 1;
479		goto retry_port;
480	}
481
482	parser = XML_ParserCreate(NULL);
483	if (parser == NULL) {
484		log_warnx("unable to create XML parser");
485		free(str);
486		return (NULL);
487	}
488
489	XML_SetUserData(parser, &devlist);
490	XML_SetElementHandler(parser, cctl_start_pelement, cctl_end_pelement);
491	XML_SetCharacterDataHandler(parser, cctl_char_handler);
492
493	retval = XML_Parse(parser, str, strlen(str), 1);
494	XML_ParserFree(parser);
495	free(str);
496	if (retval != 1) {
497		log_warnx("XML_Parse failed");
498		return (NULL);
499	}
500
501	conf = conf_new();
502
503	STAILQ_FOREACH(port, &devlist.port_list, links) {
504
505		if (port->cfiscsi_target == NULL) {
506			log_debugx("CTL port %u \"%s\" wasn't managed by ctld; ",
507			    port->port_id, port->port_name);
508			pp = pport_find(conf, port->port_name);
509			if (pp == NULL) {
510#if 0
511				log_debugx("found new kernel port %u \"%s\"",
512				    port->port_id, port->port_name);
513#endif
514				pp = pport_new(conf, port->port_name, port->port_id);
515				if (pp == NULL) {
516					log_warnx("pport_new failed");
517					continue;
518				}
519			}
520			continue;
521		}
522		if (port->cfiscsi_state != 1) {
523			log_debugx("CTL port %ju is not active (%d); ignoring",
524			    (uintmax_t)port->port_id, port->cfiscsi_state);
525			continue;
526		}
527
528		targ = target_find(conf, port->cfiscsi_target);
529		if (targ == NULL) {
530#if 0
531			log_debugx("found new kernel target %s for CTL port %ld",
532			    port->cfiscsi_target, port->port_id);
533#endif
534			targ = target_new(conf, port->cfiscsi_target);
535			if (targ == NULL) {
536				log_warnx("target_new failed");
537				continue;
538			}
539		}
540
541		if (port->ctld_portal_group_name == NULL)
542			continue;
543		pg = portal_group_find(conf, port->ctld_portal_group_name);
544		if (pg == NULL) {
545#if 0
546			log_debugx("found new kernel portal group %s for CTL port %ld",
547			    port->ctld_portal_group_name, port->port_id);
548#endif
549			pg = portal_group_new(conf, port->ctld_portal_group_name);
550			if (pg == NULL) {
551				log_warnx("portal_group_new failed");
552				continue;
553			}
554		}
555		pg->pg_tag = port->cfiscsi_portal_group_tag;
556		cp = port_new(conf, targ, pg);
557		if (cp == NULL) {
558			log_warnx("port_new failed");
559			continue;
560		}
561		cp->p_ctl_port = port->port_id;
562	}
563
564	STAILQ_FOREACH(lun, &devlist.lun_list, links) {
565		struct cctl_lun_nv *nv;
566
567		if (lun->ctld_name == NULL) {
568			log_debugx("CTL lun %ju wasn't managed by ctld; "
569			    "ignoring", (uintmax_t)lun->lun_id);
570			continue;
571		}
572
573		cl = lun_find(conf, lun->ctld_name);
574		if (cl != NULL) {
575			log_warnx("found CTL lun %ju \"%s\", "
576			    "also backed by CTL lun %d; ignoring",
577			    (uintmax_t)lun->lun_id, lun->ctld_name,
578			    cl->l_ctl_lun);
579			continue;
580		}
581
582		log_debugx("found CTL lun %ju \"%s\"",
583		    (uintmax_t)lun->lun_id, lun->ctld_name);
584
585		cl = lun_new(conf, lun->ctld_name);
586		if (cl == NULL) {
587			log_warnx("lun_new failed");
588			continue;
589		}
590		lun_set_backend(cl, lun->backend_type);
591		lun_set_blocksize(cl, lun->blocksize);
592		lun_set_device_id(cl, lun->device_id);
593		lun_set_serial(cl, lun->serial_number);
594		lun_set_size(cl, lun->size_blocks * cl->l_blocksize);
595		lun_set_ctl_lun(cl, lun->lun_id);
596
597		STAILQ_FOREACH(nv, &lun->attr_list, links) {
598			if (strcmp(nv->name, "file") == 0 ||
599			    strcmp(nv->name, "dev") == 0) {
600				lun_set_path(cl, nv->value);
601				continue;
602			}
603			lo = lun_option_new(cl, nv->name, nv->value);
604			if (lo == NULL)
605				log_warnx("unable to add CTL lun option %s "
606				    "for CTL lun %ju \"%s\"",
607				    nv->name, (uintmax_t) lun->lun_id,
608				    cl->l_name);
609		}
610	}
611
612	return (conf);
613}
614
615static void
616str_arg(struct ctl_be_arg *arg, const char *name, const char *value)
617{
618
619	arg->namelen = strlen(name) + 1;
620	arg->name = __DECONST(char *, name);
621	arg->vallen = strlen(value) + 1;
622	arg->value = __DECONST(char *, value);
623	arg->flags = CTL_BEARG_ASCII | CTL_BEARG_RD;
624}
625
626int
627kernel_lun_add(struct lun *lun)
628{
629	struct lun_option *lo;
630	struct ctl_lun_req req;
631	int error, i, num_options;
632
633	bzero(&req, sizeof(req));
634
635	strlcpy(req.backend, lun->l_backend, sizeof(req.backend));
636	req.reqtype = CTL_LUNREQ_CREATE;
637
638	req.reqdata.create.blocksize_bytes = lun->l_blocksize;
639
640	if (lun->l_size != 0)
641		req.reqdata.create.lun_size_bytes = lun->l_size;
642
643	req.reqdata.create.flags |= CTL_LUN_FLAG_DEV_TYPE;
644	req.reqdata.create.device_type = T_DIRECT;
645
646	if (lun->l_serial != NULL) {
647		strncpy(req.reqdata.create.serial_num, lun->l_serial,
648			sizeof(req.reqdata.create.serial_num));
649		req.reqdata.create.flags |= CTL_LUN_FLAG_SERIAL_NUM;
650	}
651
652	if (lun->l_device_id != NULL) {
653		strncpy(req.reqdata.create.device_id, lun->l_device_id,
654			sizeof(req.reqdata.create.device_id));
655		req.reqdata.create.flags |= CTL_LUN_FLAG_DEVID;
656	}
657
658	if (lun->l_path != NULL) {
659		lo = lun_option_find(lun, "file");
660		if (lo != NULL) {
661			lun_option_set(lo, lun->l_path);
662		} else {
663			lo = lun_option_new(lun, "file", lun->l_path);
664			assert(lo != NULL);
665		}
666	}
667
668	lo = lun_option_find(lun, "ctld_name");
669	if (lo != NULL) {
670		lun_option_set(lo, lun->l_name);
671	} else {
672		lo = lun_option_new(lun, "ctld_name", lun->l_name);
673		assert(lo != NULL);
674	}
675
676	lo = lun_option_find(lun, "scsiname");
677	if (lo == NULL && lun->l_scsiname != NULL) {
678		lo = lun_option_new(lun, "scsiname", lun->l_scsiname);
679		assert(lo != NULL);
680	}
681
682	num_options = 0;
683	TAILQ_FOREACH(lo, &lun->l_options, lo_next)
684		num_options++;
685
686	req.num_be_args = num_options;
687	if (num_options > 0) {
688		req.be_args = malloc(num_options * sizeof(*req.be_args));
689		if (req.be_args == NULL) {
690			log_warn("error allocating %zd bytes",
691			    num_options * sizeof(*req.be_args));
692			return (1);
693		}
694
695		i = 0;
696		TAILQ_FOREACH(lo, &lun->l_options, lo_next) {
697			str_arg(&req.be_args[i], lo->lo_name, lo->lo_value);
698			i++;
699		}
700		assert(i == num_options);
701	}
702
703	error = ioctl(ctl_fd, CTL_LUN_REQ, &req);
704	free(req.be_args);
705	if (error != 0) {
706		log_warn("error issuing CTL_LUN_REQ ioctl");
707		return (1);
708	}
709
710	switch (req.status) {
711	case CTL_LUN_ERROR:
712		log_warnx("LUN creation error: %s", req.error_str);
713		return (1);
714	case CTL_LUN_WARNING:
715		log_warnx("LUN creation warning: %s", req.error_str);
716		break;
717	case CTL_LUN_OK:
718		break;
719	default:
720		log_warnx("unknown LUN creation status: %d",
721		    req.status);
722		return (1);
723	}
724
725	lun_set_ctl_lun(lun, req.reqdata.create.req_lun_id);
726	return (0);
727}
728
729int
730kernel_lun_resize(struct lun *lun)
731{
732	struct ctl_lun_req req;
733
734	bzero(&req, sizeof(req));
735
736	strlcpy(req.backend, lun->l_backend, sizeof(req.backend));
737	req.reqtype = CTL_LUNREQ_MODIFY;
738
739	req.reqdata.modify.lun_id = lun->l_ctl_lun;
740	req.reqdata.modify.lun_size_bytes = lun->l_size;
741
742	if (ioctl(ctl_fd, CTL_LUN_REQ, &req) == -1) {
743		log_warn("error issuing CTL_LUN_REQ ioctl");
744		return (1);
745	}
746
747	switch (req.status) {
748	case CTL_LUN_ERROR:
749		log_warnx("LUN modification error: %s", req.error_str);
750		return (1);
751	case CTL_LUN_WARNING:
752		log_warnx("LUN modification warning: %s", req.error_str);
753		break;
754	case CTL_LUN_OK:
755		break;
756	default:
757		log_warnx("unknown LUN modification status: %d",
758		    req.status);
759		return (1);
760	}
761
762	return (0);
763}
764
765int
766kernel_lun_remove(struct lun *lun)
767{
768	struct ctl_lun_req req;
769
770	bzero(&req, sizeof(req));
771
772	strlcpy(req.backend, lun->l_backend, sizeof(req.backend));
773	req.reqtype = CTL_LUNREQ_RM;
774
775	req.reqdata.rm.lun_id = lun->l_ctl_lun;
776
777	if (ioctl(ctl_fd, CTL_LUN_REQ, &req) == -1) {
778		log_warn("error issuing CTL_LUN_REQ ioctl");
779		return (1);
780	}
781
782	switch (req.status) {
783	case CTL_LUN_ERROR:
784		log_warnx("LUN removal error: %s", req.error_str);
785		return (1);
786	case CTL_LUN_WARNING:
787		log_warnx("LUN removal warning: %s", req.error_str);
788		break;
789	case CTL_LUN_OK:
790		break;
791	default:
792		log_warnx("unknown LUN removal status: %d", req.status);
793		return (1);
794	}
795
796	return (0);
797}
798
799void
800kernel_handoff(struct connection *conn)
801{
802	struct ctl_iscsi req;
803
804	bzero(&req, sizeof(req));
805
806	req.type = CTL_ISCSI_HANDOFF;
807	strlcpy(req.data.handoff.initiator_name,
808	    conn->conn_initiator_name, sizeof(req.data.handoff.initiator_name));
809	strlcpy(req.data.handoff.initiator_addr,
810	    conn->conn_initiator_addr, sizeof(req.data.handoff.initiator_addr));
811	if (conn->conn_initiator_alias != NULL) {
812		strlcpy(req.data.handoff.initiator_alias,
813		    conn->conn_initiator_alias, sizeof(req.data.handoff.initiator_alias));
814	}
815	memcpy(req.data.handoff.initiator_isid, conn->conn_initiator_isid,
816	    sizeof(req.data.handoff.initiator_isid));
817	strlcpy(req.data.handoff.target_name,
818	    conn->conn_target->t_name, sizeof(req.data.handoff.target_name));
819#ifdef ICL_KERNEL_PROXY
820	if (proxy_mode)
821		req.data.handoff.connection_id = conn->conn_socket;
822	else
823		req.data.handoff.socket = conn->conn_socket;
824#else
825	req.data.handoff.socket = conn->conn_socket;
826#endif
827	req.data.handoff.portal_group_tag =
828	    conn->conn_portal->p_portal_group->pg_tag;
829	if (conn->conn_header_digest == CONN_DIGEST_CRC32C)
830		req.data.handoff.header_digest = CTL_ISCSI_DIGEST_CRC32C;
831	if (conn->conn_data_digest == CONN_DIGEST_CRC32C)
832		req.data.handoff.data_digest = CTL_ISCSI_DIGEST_CRC32C;
833	req.data.handoff.cmdsn = conn->conn_cmdsn;
834	req.data.handoff.statsn = conn->conn_statsn;
835	req.data.handoff.max_recv_data_segment_length =
836	    conn->conn_max_data_segment_length;
837	req.data.handoff.max_burst_length = conn->conn_max_burst_length;
838	req.data.handoff.immediate_data = conn->conn_immediate_data;
839
840	if (ioctl(ctl_fd, CTL_ISCSI, &req) == -1) {
841		log_err(1, "error issuing CTL_ISCSI ioctl; "
842		    "dropping connection");
843	}
844
845	if (req.status != CTL_ISCSI_OK) {
846		log_errx(1, "error returned from CTL iSCSI handoff request: "
847		    "%s; dropping connection", req.error_str);
848	}
849}
850
851int
852kernel_port_add(struct port *port)
853{
854	struct ctl_port_entry entry;
855	struct ctl_req req;
856	struct ctl_lun_map lm;
857	struct target *targ = port->p_target;
858	struct portal_group *pg = port->p_portal_group;
859	char tagstr[16];
860	int error, i, n;
861
862	/* Create iSCSI port. */
863	if (port->p_portal_group) {
864		bzero(&req, sizeof(req));
865		strlcpy(req.driver, "iscsi", sizeof(req.driver));
866		req.reqtype = CTL_REQ_CREATE;
867		req.num_args = 5;
868		req.args = malloc(req.num_args * sizeof(*req.args));
869		if (req.args == NULL)
870			log_err(1, "malloc");
871		n = 0;
872		req.args[n].namelen = sizeof("port_id");
873		req.args[n].name = __DECONST(char *, "port_id");
874		req.args[n].vallen = sizeof(port->p_ctl_port);
875		req.args[n].value = &port->p_ctl_port;
876		req.args[n++].flags = CTL_BEARG_WR;
877		str_arg(&req.args[n++], "cfiscsi_target", targ->t_name);
878		snprintf(tagstr, sizeof(tagstr), "%d", pg->pg_tag);
879		str_arg(&req.args[n++], "cfiscsi_portal_group_tag", tagstr);
880		if (targ->t_alias)
881			str_arg(&req.args[n++], "cfiscsi_target_alias", targ->t_alias);
882		str_arg(&req.args[n++], "ctld_portal_group_name", pg->pg_name);
883		req.num_args = n;
884		error = ioctl(ctl_fd, CTL_PORT_REQ, &req);
885		free(req.args);
886		if (error != 0) {
887			log_warn("error issuing CTL_PORT_REQ ioctl");
888			return (1);
889		}
890		if (req.status == CTL_LUN_ERROR) {
891			log_warnx("error returned from port creation request: %s",
892			    req.error_str);
893			return (1);
894		}
895		if (req.status != CTL_LUN_OK) {
896			log_warnx("unknown port creation request status %d",
897			    req.status);
898			return (1);
899		}
900	} else if (port->p_pport) {
901		port->p_ctl_port = port->p_pport->pp_ctl_port;
902
903		if (strncmp(targ->t_name, "naa.", 4) == 0 &&
904		    strlen(targ->t_name) == 20) {
905			bzero(&entry, sizeof(entry));
906			entry.port_type = CTL_PORT_NONE;
907			entry.targ_port = port->p_ctl_port;
908			entry.flags |= CTL_PORT_WWNN_VALID;
909			entry.wwnn = strtoull(targ->t_name + 4, NULL, 16);
910			if (ioctl(ctl_fd, CTL_SET_PORT_WWNS, &entry) == -1)
911				log_warn("CTL_SET_PORT_WWNS ioctl failed");
912		}
913	}
914
915	/* Explicitly enable mapping to block any access except allowed. */
916	lm.port = port->p_ctl_port;
917	lm.plun = UINT32_MAX;
918	lm.lun = 0;
919	error = ioctl(ctl_fd, CTL_LUN_MAP, &lm);
920	if (error != 0)
921		log_warn("CTL_LUN_MAP ioctl failed");
922
923	/* Map configured LUNs */
924	for (i = 0; i < MAX_LUNS; i++) {
925		if (targ->t_luns[i] == NULL)
926			continue;
927		lm.port = port->p_ctl_port;
928		lm.plun = i;
929		lm.lun = targ->t_luns[i]->l_ctl_lun;
930		error = ioctl(ctl_fd, CTL_LUN_MAP, &lm);
931		if (error != 0)
932			log_warn("CTL_LUN_MAP ioctl failed");
933	}
934
935	/* Enable port */
936	bzero(&entry, sizeof(entry));
937	entry.targ_port = port->p_ctl_port;
938	error = ioctl(ctl_fd, CTL_ENABLE_PORT, &entry);
939	if (error != 0) {
940		log_warn("CTL_ENABLE_PORT ioctl failed");
941		return (-1);
942	}
943
944	return (0);
945}
946
947int
948kernel_port_update(struct port *port)
949{
950	struct ctl_lun_map lm;
951	struct target *targ = port->p_target;
952	int error, i;
953
954	/* Map configured LUNs and unmap others */
955	for (i = 0; i < MAX_LUNS; i++) {
956		lm.port = port->p_ctl_port;
957		lm.plun = i;
958		if (targ->t_luns[i] == NULL)
959			lm.lun = UINT32_MAX;
960		else
961			lm.lun = targ->t_luns[i]->l_ctl_lun;
962		error = ioctl(ctl_fd, CTL_LUN_MAP, &lm);
963		if (error != 0)
964			log_warn("CTL_LUN_MAP ioctl failed");
965	}
966	return (0);
967}
968
969int
970kernel_port_remove(struct port *port)
971{
972	struct ctl_port_entry entry;
973	struct ctl_lun_map lm;
974	struct ctl_req req;
975	char tagstr[16];
976	struct target *targ = port->p_target;
977	struct portal_group *pg = port->p_portal_group;
978	int error;
979
980	/* Disable port */
981	bzero(&entry, sizeof(entry));
982	entry.targ_port = port->p_ctl_port;
983	error = ioctl(ctl_fd, CTL_DISABLE_PORT, &entry);
984	if (error != 0) {
985		log_warn("CTL_DISABLE_PORT ioctl failed");
986		return (-1);
987	}
988
989	/* Remove iSCSI port. */
990	if (port->p_portal_group) {
991		bzero(&req, sizeof(req));
992		strlcpy(req.driver, "iscsi", sizeof(req.driver));
993		req.reqtype = CTL_REQ_REMOVE;
994		req.num_args = 2;
995		req.args = malloc(req.num_args * sizeof(*req.args));
996		if (req.args == NULL)
997			log_err(1, "malloc");
998		str_arg(&req.args[0], "cfiscsi_target", targ->t_name);
999		snprintf(tagstr, sizeof(tagstr), "%d", pg->pg_tag);
1000		str_arg(&req.args[1], "cfiscsi_portal_group_tag", tagstr);
1001		error = ioctl(ctl_fd, CTL_PORT_REQ, &req);
1002		free(req.args);
1003		if (error != 0) {
1004			log_warn("error issuing CTL_PORT_REQ ioctl");
1005			return (1);
1006		}
1007		if (req.status == CTL_LUN_ERROR) {
1008			log_warnx("error returned from port removal request: %s",
1009			    req.error_str);
1010			return (1);
1011		}
1012		if (req.status != CTL_LUN_OK) {
1013			log_warnx("unknown port removal request status %d",
1014			    req.status);
1015			return (1);
1016		}
1017	} else {
1018		/* Disable LUN mapping. */
1019		lm.port = port->p_ctl_port;
1020		lm.plun = UINT32_MAX;
1021		lm.lun = UINT32_MAX;
1022		error = ioctl(ctl_fd, CTL_LUN_MAP, &lm);
1023		if (error != 0)
1024			log_warn("CTL_LUN_MAP ioctl failed");
1025	}
1026	return (0);
1027}
1028
1029#ifdef ICL_KERNEL_PROXY
1030void
1031kernel_listen(struct addrinfo *ai, bool iser, int portal_id)
1032{
1033	struct ctl_iscsi req;
1034
1035	bzero(&req, sizeof(req));
1036
1037	req.type = CTL_ISCSI_LISTEN;
1038	req.data.listen.iser = iser;
1039	req.data.listen.domain = ai->ai_family;
1040	req.data.listen.socktype = ai->ai_socktype;
1041	req.data.listen.protocol = ai->ai_protocol;
1042	req.data.listen.addr = ai->ai_addr;
1043	req.data.listen.addrlen = ai->ai_addrlen;
1044	req.data.listen.portal_id = portal_id;
1045
1046	if (ioctl(ctl_fd, CTL_ISCSI, &req) == -1)
1047		log_err(1, "error issuing CTL_ISCSI ioctl");
1048
1049	if (req.status != CTL_ISCSI_OK) {
1050		log_errx(1, "error returned from CTL iSCSI listen: %s",
1051		    req.error_str);
1052	}
1053}
1054
1055void
1056kernel_accept(int *connection_id, int *portal_id,
1057    struct sockaddr *client_sa, socklen_t *client_salen)
1058{
1059	struct ctl_iscsi req;
1060	struct sockaddr_storage ss;
1061
1062	bzero(&req, sizeof(req));
1063
1064	req.type = CTL_ISCSI_ACCEPT;
1065	req.data.accept.initiator_addr = (struct sockaddr *)&ss;
1066
1067	if (ioctl(ctl_fd, CTL_ISCSI, &req) == -1)
1068		log_err(1, "error issuing CTL_ISCSI ioctl");
1069
1070	if (req.status != CTL_ISCSI_OK) {
1071		log_errx(1, "error returned from CTL iSCSI accept: %s",
1072		    req.error_str);
1073	}
1074
1075	*connection_id = req.data.accept.connection_id;
1076	*portal_id = req.data.accept.portal_id;
1077	*client_salen = req.data.accept.initiator_addrlen;
1078	memcpy(client_sa, &ss, *client_salen);
1079}
1080
1081void
1082kernel_send(struct pdu *pdu)
1083{
1084	struct ctl_iscsi req;
1085
1086	bzero(&req, sizeof(req));
1087
1088	req.type = CTL_ISCSI_SEND;
1089	req.data.send.connection_id = pdu->pdu_connection->conn_socket;
1090	req.data.send.bhs = pdu->pdu_bhs;
1091	req.data.send.data_segment_len = pdu->pdu_data_len;
1092	req.data.send.data_segment = pdu->pdu_data;
1093
1094	if (ioctl(ctl_fd, CTL_ISCSI, &req) == -1) {
1095		log_err(1, "error issuing CTL_ISCSI ioctl; "
1096		    "dropping connection");
1097	}
1098
1099	if (req.status != CTL_ISCSI_OK) {
1100		log_errx(1, "error returned from CTL iSCSI send: "
1101		    "%s; dropping connection", req.error_str);
1102	}
1103}
1104
1105void
1106kernel_receive(struct pdu *pdu)
1107{
1108	struct ctl_iscsi req;
1109
1110	pdu->pdu_data = malloc(MAX_DATA_SEGMENT_LENGTH);
1111	if (pdu->pdu_data == NULL)
1112		log_err(1, "malloc");
1113
1114	bzero(&req, sizeof(req));
1115
1116	req.type = CTL_ISCSI_RECEIVE;
1117	req.data.receive.connection_id = pdu->pdu_connection->conn_socket;
1118	req.data.receive.bhs = pdu->pdu_bhs;
1119	req.data.receive.data_segment_len = MAX_DATA_SEGMENT_LENGTH;
1120	req.data.receive.data_segment = pdu->pdu_data;
1121
1122	if (ioctl(ctl_fd, CTL_ISCSI, &req) == -1) {
1123		log_err(1, "error issuing CTL_ISCSI ioctl; "
1124		    "dropping connection");
1125	}
1126
1127	if (req.status != CTL_ISCSI_OK) {
1128		log_errx(1, "error returned from CTL iSCSI receive: "
1129		    "%s; dropping connection", req.error_str);
1130	}
1131
1132}
1133
1134#endif /* ICL_KERNEL_PROXY */
1135
1136/*
1137 * XXX: I CANT INTO LATIN
1138 */
1139void
1140kernel_capsicate(void)
1141{
1142	int error;
1143	cap_rights_t rights;
1144	const unsigned long cmds[] = { CTL_ISCSI };
1145
1146	cap_rights_init(&rights, CAP_IOCTL);
1147	error = cap_rights_limit(ctl_fd, &rights);
1148	if (error != 0 && errno != ENOSYS)
1149		log_err(1, "cap_rights_limit");
1150
1151	error = cap_ioctls_limit(ctl_fd, cmds,
1152	    sizeof(cmds) / sizeof(cmds[0]));
1153	if (error != 0 && errno != ENOSYS)
1154		log_err(1, "cap_ioctls_limit");
1155
1156	error = cap_enter();
1157	if (error != 0 && errno != ENOSYS)
1158		log_err(1, "cap_enter");
1159
1160	if (cap_sandboxed())
1161		log_debugx("Capsicum capability mode enabled");
1162	else
1163		log_warnx("Capsicum capability mode not supported");
1164}
1165
1166