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