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