]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - usr.sbin/ctld/kernel.c
Import Dragonfly Mail Agent snapshort from 20160806 aka v0.11+
[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         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
121 struct 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
135 struct 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
146 static void
147 cctl_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
192 static void
193 cctl_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
262 static void
263 cctl_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
308 static void
309 cctl_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
380 static void
381 cctl_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
390 struct conf *
391 conf_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;
416 retry:
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;
465 retry_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
645 static void
646 str_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
656 int
657 kernel_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
764 int
765 kernel_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
825 int
826 kernel_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
859 void
860 kernel_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
917 void
918 kernel_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
950 int
951 kernel_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
1051 int
1052 kernel_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
1081 int
1082 kernel_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
1142 void
1143 kernel_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
1167 void
1168 kernel_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
1193 void
1194 kernel_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
1217 void
1218 kernel_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  */
1251 void
1252 kernel_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