1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 3 * 4 * Copyright (c) 2012 The FreeBSD Foundation 5 * 6 * This software was developed by Edward Tomasz Napierala under sponsorship 7 * from the FreeBSD Foundation. 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 2. Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in the 16 * documentation and/or other materials provided with the distribution. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28 * SUCH DAMAGE. 29 * 30 */ 31 32 #include <sys/cdefs.h> 33 __FBSDID("$FreeBSD$"); 34 35 #include <sys/types.h> 36 #include <sys/time.h> 37 #include <sys/ioctl.h> 38 #include <sys/param.h> 39 #include <sys/linker.h> 40 #include <sys/socket.h> 41 #include <sys/capsicum.h> 42 #include <sys/wait.h> 43 #include <netinet/in.h> 44 #include <assert.h> 45 #include <capsicum_helpers.h> 46 #include <errno.h> 47 #include <fcntl.h> 48 #include <libutil.h> 49 #include <netdb.h> 50 #include <signal.h> 51 #include <stdbool.h> 52 #include <stdint.h> 53 #include <stdio.h> 54 #include <stdlib.h> 55 #include <string.h> 56 #include <unistd.h> 57 58 #include "iscsid.h" 59 60 static volatile bool sigalrm_received = false; 61 62 static int nchildren = 0; 63 64 static void 65 usage(void) 66 { 67 68 fprintf(stderr, "usage: iscsid [-P pidfile][-d][-m maxproc][-t timeout]\n"); 69 exit(1); 70 } 71 72 char * 73 checked_strdup(const char *s) 74 { 75 char *c; 76 77 c = strdup(s); 78 if (c == NULL) 79 log_err(1, "strdup"); 80 return (c); 81 } 82 83 static void 84 resolve_addr(const struct connection *conn, const char *address, 85 struct addrinfo **ai, bool initiator_side) 86 { 87 struct addrinfo hints; 88 char *arg, *addr, *ch; 89 const char *port; 90 int error, colons = 0; 91 92 arg = checked_strdup(address); 93 94 if (arg[0] == '\0') { 95 fail(conn, "empty address"); 96 log_errx(1, "empty address"); 97 } 98 if (arg[0] == '[') { 99 /* 100 * IPv6 address in square brackets, perhaps with port. 101 */ 102 arg++; 103 addr = strsep(&arg, "]"); 104 if (arg == NULL) { 105 fail(conn, "malformed address"); 106 log_errx(1, "malformed address %s", address); 107 } 108 if (arg[0] == '\0') { 109 port = NULL; 110 } else if (arg[0] == ':') { 111 port = arg + 1; 112 } else { 113 fail(conn, "malformed address"); 114 log_errx(1, "malformed address %s", address); 115 } 116 } else { 117 /* 118 * Either IPv6 address without brackets - and without 119 * a port - or IPv4 address. Just count the colons. 120 */ 121 for (ch = arg; *ch != '\0'; ch++) { 122 if (*ch == ':') 123 colons++; 124 } 125 if (colons > 1) { 126 addr = arg; 127 port = NULL; 128 } else { 129 addr = strsep(&arg, ":"); 130 if (arg == NULL) 131 port = NULL; 132 else 133 port = arg; 134 } 135 } 136 137 if (port == NULL && !initiator_side) 138 port = "3260"; 139 140 memset(&hints, 0, sizeof(hints)); 141 hints.ai_family = PF_UNSPEC; 142 hints.ai_socktype = SOCK_STREAM; 143 hints.ai_flags = AI_ADDRCONFIG | AI_NUMERICSERV; 144 if (initiator_side) 145 hints.ai_flags |= AI_PASSIVE; 146 147 error = getaddrinfo(addr, port, &hints, ai); 148 if (error != 0) { 149 fail(conn, gai_strerror(error)); 150 log_errx(1, "getaddrinfo for %s failed: %s", 151 address, gai_strerror(error)); 152 } 153 154 free(addr); 155 } 156 157 static struct connection * 158 connection_new(int iscsi_fd, const struct iscsi_daemon_request *request) 159 { 160 struct connection *conn; 161 struct iscsi_session_limits *isl; 162 struct addrinfo *from_ai, *to_ai; 163 const char *from_addr, *to_addr; 164 #ifdef ICL_KERNEL_PROXY 165 struct iscsi_daemon_connect idc; 166 #endif 167 int error, optval; 168 169 conn = calloc(1, sizeof(*conn)); 170 if (conn == NULL) 171 log_err(1, "calloc"); 172 173 /* 174 * Default values, from RFC 3720, section 12. 175 */ 176 conn->conn_protocol_level = 0; 177 conn->conn_header_digest = CONN_DIGEST_NONE; 178 conn->conn_data_digest = CONN_DIGEST_NONE; 179 conn->conn_initial_r2t = true; 180 conn->conn_immediate_data = true; 181 conn->conn_max_recv_data_segment_length = 8192; 182 conn->conn_max_send_data_segment_length = 8192; 183 conn->conn_max_burst_length = 262144; 184 conn->conn_first_burst_length = 65536; 185 conn->conn_iscsi_fd = iscsi_fd; 186 187 conn->conn_session_id = request->idr_session_id; 188 memcpy(&conn->conn_conf, &request->idr_conf, sizeof(conn->conn_conf)); 189 memcpy(&conn->conn_isid, &request->idr_isid, sizeof(conn->conn_isid)); 190 conn->conn_tsih = request->idr_tsih; 191 192 /* 193 * Read the driver limits and provide reasonable defaults for the ones 194 * the driver doesn't care about. If a max_snd_dsl is not explicitly 195 * provided by the driver then we'll make sure both conn->max_snd_dsl 196 * and isl->max_snd_dsl are set to the rcv_dsl. This preserves historic 197 * behavior. 198 */ 199 isl = &conn->conn_limits; 200 memcpy(isl, &request->idr_limits, sizeof(*isl)); 201 if (isl->isl_max_recv_data_segment_length == 0) 202 isl->isl_max_recv_data_segment_length = (1 << 24) - 1; 203 if (isl->isl_max_send_data_segment_length == 0) 204 isl->isl_max_send_data_segment_length = 205 isl->isl_max_recv_data_segment_length; 206 if (isl->isl_max_burst_length == 0) 207 isl->isl_max_burst_length = (1 << 24) - 1; 208 if (isl->isl_first_burst_length == 0) 209 isl->isl_first_burst_length = (1 << 24) - 1; 210 if (isl->isl_first_burst_length > isl->isl_max_burst_length) 211 isl->isl_first_burst_length = isl->isl_max_burst_length; 212 213 /* 214 * Limit default send length in case it won't be negotiated. 215 * We can't do it for other limits, since they may affect both 216 * sender and receiver operation, and we must obey defaults. 217 */ 218 if (conn->conn_max_send_data_segment_length > 219 isl->isl_max_send_data_segment_length) { 220 conn->conn_max_send_data_segment_length = 221 isl->isl_max_send_data_segment_length; 222 } 223 224 from_addr = conn->conn_conf.isc_initiator_addr; 225 to_addr = conn->conn_conf.isc_target_addr; 226 227 if (from_addr[0] != '\0') 228 resolve_addr(conn, from_addr, &from_ai, true); 229 else 230 from_ai = NULL; 231 232 resolve_addr(conn, to_addr, &to_ai, false); 233 234 #ifdef ICL_KERNEL_PROXY 235 if (conn->conn_conf.isc_iser) { 236 memset(&idc, 0, sizeof(idc)); 237 idc.idc_session_id = conn->conn_session_id; 238 if (conn->conn_conf.isc_iser) 239 idc.idc_iser = 1; 240 idc.idc_domain = to_ai->ai_family; 241 idc.idc_socktype = to_ai->ai_socktype; 242 idc.idc_protocol = to_ai->ai_protocol; 243 if (from_ai != NULL) { 244 idc.idc_from_addr = from_ai->ai_addr; 245 idc.idc_from_addrlen = from_ai->ai_addrlen; 246 } 247 idc.idc_to_addr = to_ai->ai_addr; 248 idc.idc_to_addrlen = to_ai->ai_addrlen; 249 250 log_debugx("connecting to %s using ICL kernel proxy", to_addr); 251 error = ioctl(iscsi_fd, ISCSIDCONNECT, &idc); 252 if (error != 0) { 253 fail(conn, strerror(errno)); 254 log_err(1, "failed to connect to %s " 255 "using ICL kernel proxy: ISCSIDCONNECT", to_addr); 256 } 257 258 if (from_ai != NULL) 259 freeaddrinfo(from_ai); 260 freeaddrinfo(to_ai); 261 262 return (conn); 263 } 264 #endif /* ICL_KERNEL_PROXY */ 265 266 if (conn->conn_conf.isc_iser) { 267 fail(conn, "iSER not supported"); 268 log_errx(1, "iscsid(8) compiled without ICL_KERNEL_PROXY " 269 "does not support iSER"); 270 } 271 272 conn->conn_socket = socket(to_ai->ai_family, to_ai->ai_socktype, 273 to_ai->ai_protocol); 274 if (conn->conn_socket < 0) { 275 fail(conn, strerror(errno)); 276 log_err(1, "failed to create socket for %s", from_addr); 277 } 278 optval = SOCKBUF_SIZE; 279 if (setsockopt(conn->conn_socket, SOL_SOCKET, SO_RCVBUF, 280 &optval, sizeof(optval)) == -1) 281 log_warn("setsockopt(SO_RCVBUF) failed"); 282 optval = SOCKBUF_SIZE; 283 if (setsockopt(conn->conn_socket, SOL_SOCKET, SO_SNDBUF, 284 &optval, sizeof(optval)) == -1) 285 log_warn("setsockopt(SO_SNDBUF) failed"); 286 optval = 1; 287 if (setsockopt(conn->conn_socket, SOL_SOCKET, SO_NO_DDP, 288 &optval, sizeof(optval)) == -1) 289 log_warn("setsockopt(SO_NO_DDP) failed"); 290 if (conn->conn_conf.isc_dscp != -1) { 291 int tos = conn->conn_conf.isc_dscp << 2; 292 if (to_ai->ai_family == AF_INET) { 293 if (setsockopt(conn->conn_socket, 294 IPPROTO_IP, IP_TOS, 295 &tos, sizeof(tos)) == -1) 296 log_warn("setsockopt(IP_TOS) " 297 "failed for %s", 298 from_addr); 299 } else 300 if (to_ai->ai_family == AF_INET6) { 301 if (setsockopt(conn->conn_socket, 302 IPPROTO_IPV6, IPV6_TCLASS, 303 &tos, sizeof(tos)) == -1) 304 log_warn("setsockopt(IPV6_TCLASS) " 305 "failed for %s", 306 from_addr); 307 } 308 } 309 if (conn->conn_conf.isc_pcp != -1) { 310 int pcp = conn->conn_conf.isc_pcp; 311 if (to_ai->ai_family == AF_INET) { 312 if (setsockopt(conn->conn_socket, 313 IPPROTO_IP, IP_VLAN_PCP, 314 &pcp, sizeof(pcp)) == -1) 315 log_warn("setsockopt(IP_VLAN_PCP) " 316 "failed for %s", 317 from_addr); 318 } else 319 if (to_ai->ai_family == AF_INET6) { 320 if (setsockopt(conn->conn_socket, 321 IPPROTO_IPV6, IPV6_VLAN_PCP, 322 &pcp, sizeof(pcp)) == -1) 323 log_warn("setsockopt(IPV6_VLAN_PCP) " 324 "failed for %s", 325 from_addr); 326 } 327 } 328 if (from_ai != NULL) { 329 error = bind(conn->conn_socket, from_ai->ai_addr, 330 from_ai->ai_addrlen); 331 if (error != 0) { 332 fail(conn, strerror(errno)); 333 log_err(1, "failed to bind to %s", from_addr); 334 } 335 } 336 log_debugx("connecting to %s", to_addr); 337 error = connect(conn->conn_socket, to_ai->ai_addr, to_ai->ai_addrlen); 338 if (error != 0) { 339 fail(conn, strerror(errno)); 340 log_err(1, "failed to connect to %s", to_addr); 341 } 342 343 if (from_ai != NULL) 344 freeaddrinfo(from_ai); 345 freeaddrinfo(to_ai); 346 347 return (conn); 348 } 349 350 static void 351 handoff(struct connection *conn) 352 { 353 struct iscsi_daemon_handoff idh; 354 int error; 355 356 log_debugx("handing off connection to the kernel"); 357 358 memset(&idh, 0, sizeof(idh)); 359 idh.idh_session_id = conn->conn_session_id; 360 idh.idh_socket = conn->conn_socket; 361 strlcpy(idh.idh_target_alias, conn->conn_target_alias, 362 sizeof(idh.idh_target_alias)); 363 idh.idh_tsih = conn->conn_tsih; 364 idh.idh_statsn = conn->conn_statsn; 365 idh.idh_protocol_level = conn->conn_protocol_level; 366 idh.idh_header_digest = conn->conn_header_digest; 367 idh.idh_data_digest = conn->conn_data_digest; 368 idh.idh_initial_r2t = conn->conn_initial_r2t; 369 idh.idh_immediate_data = conn->conn_immediate_data; 370 idh.idh_max_recv_data_segment_length = 371 conn->conn_max_recv_data_segment_length; 372 idh.idh_max_send_data_segment_length = 373 conn->conn_max_send_data_segment_length; 374 idh.idh_max_burst_length = conn->conn_max_burst_length; 375 idh.idh_first_burst_length = conn->conn_first_burst_length; 376 377 error = ioctl(conn->conn_iscsi_fd, ISCSIDHANDOFF, &idh); 378 if (error != 0) 379 log_err(1, "ISCSIDHANDOFF"); 380 } 381 382 void 383 fail(const struct connection *conn, const char *reason) 384 { 385 struct iscsi_daemon_fail idf; 386 int error, saved_errno; 387 388 saved_errno = errno; 389 390 memset(&idf, 0, sizeof(idf)); 391 idf.idf_session_id = conn->conn_session_id; 392 strlcpy(idf.idf_reason, reason, sizeof(idf.idf_reason)); 393 394 error = ioctl(conn->conn_iscsi_fd, ISCSIDFAIL, &idf); 395 if (error != 0) 396 log_err(1, "ISCSIDFAIL"); 397 398 errno = saved_errno; 399 } 400 401 /* 402 * XXX: I CANT INTO LATIN 403 */ 404 static void 405 capsicate(struct connection *conn) 406 { 407 cap_rights_t rights; 408 #ifdef ICL_KERNEL_PROXY 409 const unsigned long cmds[] = { ISCSIDCONNECT, ISCSIDSEND, ISCSIDRECEIVE, 410 ISCSIDHANDOFF, ISCSIDFAIL, ISCSISADD, ISCSISREMOVE, ISCSISMODIFY }; 411 #else 412 const unsigned long cmds[] = { ISCSIDHANDOFF, ISCSIDFAIL, ISCSISADD, 413 ISCSISREMOVE, ISCSISMODIFY }; 414 #endif 415 416 cap_rights_init(&rights, CAP_IOCTL); 417 if (caph_rights_limit(conn->conn_iscsi_fd, &rights) < 0) 418 log_err(1, "cap_rights_limit"); 419 420 if (caph_ioctls_limit(conn->conn_iscsi_fd, cmds, nitems(cmds)) < 0) 421 log_err(1, "cap_ioctls_limit"); 422 423 if (caph_enter() != 0) 424 log_err(1, "cap_enter"); 425 426 if (cap_sandboxed()) 427 log_debugx("Capsicum capability mode enabled"); 428 else 429 log_warnx("Capsicum capability mode not supported"); 430 } 431 432 bool 433 timed_out(void) 434 { 435 436 return (sigalrm_received); 437 } 438 439 static void 440 sigalrm_handler(int dummy __unused) 441 { 442 /* 443 * It would be easiest to just log an error and exit. We can't 444 * do this, though, because log_errx() is not signal safe, since 445 * it calls syslog(3). Instead, set a flag checked by pdu_send() 446 * and pdu_receive(), to call log_errx() there. Should they fail 447 * to notice, we'll exit here one second later. 448 */ 449 if (sigalrm_received) { 450 /* 451 * Oh well. Just give up and quit. 452 */ 453 _exit(2); 454 } 455 456 sigalrm_received = true; 457 } 458 459 static void 460 set_timeout(int timeout) 461 { 462 struct sigaction sa; 463 struct itimerval itv; 464 int error; 465 466 if (timeout <= 0) { 467 log_debugx("session timeout disabled"); 468 return; 469 } 470 471 bzero(&sa, sizeof(sa)); 472 sa.sa_handler = sigalrm_handler; 473 sigfillset(&sa.sa_mask); 474 error = sigaction(SIGALRM, &sa, NULL); 475 if (error != 0) 476 log_err(1, "sigaction"); 477 478 /* 479 * First SIGALRM will arive after conf_timeout seconds. 480 * If we do nothing, another one will arrive a second later. 481 */ 482 bzero(&itv, sizeof(itv)); 483 itv.it_interval.tv_sec = 1; 484 itv.it_value.tv_sec = timeout; 485 486 log_debugx("setting session timeout to %d seconds", 487 timeout); 488 error = setitimer(ITIMER_REAL, &itv, NULL); 489 if (error != 0) 490 log_err(1, "setitimer"); 491 } 492 493 static void 494 sigchld_handler(int dummy __unused) 495 { 496 497 /* 498 * The only purpose of this handler is to make SIGCHLD 499 * interrupt the ISCSIDWAIT ioctl(2), so we can call 500 * wait_for_children(). 501 */ 502 } 503 504 static void 505 register_sigchld(void) 506 { 507 struct sigaction sa; 508 int error; 509 510 bzero(&sa, sizeof(sa)); 511 sa.sa_handler = sigchld_handler; 512 sigfillset(&sa.sa_mask); 513 error = sigaction(SIGCHLD, &sa, NULL); 514 if (error != 0) 515 log_err(1, "sigaction"); 516 517 } 518 519 static void 520 handle_request(int iscsi_fd, const struct iscsi_daemon_request *request, int timeout) 521 { 522 struct connection *conn; 523 524 log_set_peer_addr(request->idr_conf.isc_target_addr); 525 if (request->idr_conf.isc_target[0] != '\0') { 526 log_set_peer_name(request->idr_conf.isc_target); 527 setproctitle("%s (%s)", request->idr_conf.isc_target_addr, request->idr_conf.isc_target); 528 } else { 529 setproctitle("%s", request->idr_conf.isc_target_addr); 530 } 531 532 conn = connection_new(iscsi_fd, request); 533 set_timeout(timeout); 534 capsicate(conn); 535 login(conn); 536 if (conn->conn_conf.isc_discovery != 0) 537 discovery(conn); 538 else 539 handoff(conn); 540 541 log_debugx("nothing more to do; exiting"); 542 exit (0); 543 } 544 545 static int 546 wait_for_children(bool block) 547 { 548 pid_t pid; 549 int status; 550 int num = 0; 551 552 for (;;) { 553 /* 554 * If "block" is true, wait for at least one process. 555 */ 556 if (block && num == 0) 557 pid = wait4(-1, &status, 0, NULL); 558 else 559 pid = wait4(-1, &status, WNOHANG, NULL); 560 if (pid <= 0) 561 break; 562 if (WIFSIGNALED(status)) { 563 log_warnx("child process %d terminated with signal %d", 564 pid, WTERMSIG(status)); 565 } else if (WEXITSTATUS(status) != 0) { 566 log_warnx("child process %d terminated with exit status %d", 567 pid, WEXITSTATUS(status)); 568 } else { 569 log_debugx("child process %d terminated gracefully", pid); 570 } 571 num++; 572 } 573 574 return (num); 575 } 576 577 int 578 main(int argc, char **argv) 579 { 580 int ch, debug = 0, error, iscsi_fd, maxproc = 30, retval, saved_errno, 581 timeout = 60; 582 bool dont_daemonize = false; 583 struct pidfh *pidfh; 584 pid_t pid, otherpid; 585 const char *pidfile_path = DEFAULT_PIDFILE; 586 struct iscsi_daemon_request request; 587 588 while ((ch = getopt(argc, argv, "P:dl:m:t:")) != -1) { 589 switch (ch) { 590 case 'P': 591 pidfile_path = optarg; 592 break; 593 case 'd': 594 dont_daemonize = true; 595 debug++; 596 break; 597 case 'l': 598 debug = atoi(optarg); 599 break; 600 case 'm': 601 maxproc = atoi(optarg); 602 break; 603 case 't': 604 timeout = atoi(optarg); 605 break; 606 case '?': 607 default: 608 usage(); 609 } 610 } 611 argc -= optind; 612 if (argc != 0) 613 usage(); 614 615 log_init(debug); 616 617 pidfh = pidfile_open(pidfile_path, 0600, &otherpid); 618 if (pidfh == NULL) { 619 if (errno == EEXIST) 620 log_errx(1, "daemon already running, pid: %jd.", 621 (intmax_t)otherpid); 622 log_err(1, "cannot open or create pidfile \"%s\"", 623 pidfile_path); 624 } 625 626 iscsi_fd = open(ISCSI_PATH, O_RDWR); 627 if (iscsi_fd < 0 && errno == ENOENT) { 628 saved_errno = errno; 629 retval = kldload("iscsi"); 630 if (retval != -1) 631 iscsi_fd = open(ISCSI_PATH, O_RDWR); 632 else 633 errno = saved_errno; 634 } 635 if (iscsi_fd < 0) 636 log_err(1, "failed to open %s", ISCSI_PATH); 637 638 if (dont_daemonize == false) { 639 if (daemon(0, 0) == -1) { 640 log_warn("cannot daemonize"); 641 pidfile_remove(pidfh); 642 exit(1); 643 } 644 } 645 646 pidfile_write(pidfh); 647 648 register_sigchld(); 649 650 for (;;) { 651 log_debugx("waiting for request from the kernel"); 652 653 memset(&request, 0, sizeof(request)); 654 error = ioctl(iscsi_fd, ISCSIDWAIT, &request); 655 if (error != 0) { 656 if (errno == EINTR) { 657 nchildren -= wait_for_children(false); 658 assert(nchildren >= 0); 659 continue; 660 } 661 662 log_err(1, "ISCSIDWAIT"); 663 } 664 665 if (dont_daemonize) { 666 log_debugx("not forking due to -d flag; " 667 "will exit after servicing a single request"); 668 } else { 669 nchildren -= wait_for_children(false); 670 assert(nchildren >= 0); 671 672 while (maxproc > 0 && nchildren >= maxproc) { 673 log_debugx("maxproc limit of %d child processes hit; " 674 "waiting for child process to exit", maxproc); 675 nchildren -= wait_for_children(true); 676 assert(nchildren >= 0); 677 } 678 log_debugx("incoming connection; forking child process #%d", 679 nchildren); 680 nchildren++; 681 682 pid = fork(); 683 if (pid < 0) 684 log_err(1, "fork"); 685 if (pid > 0) 686 continue; 687 } 688 689 pidfile_close(pidfh); 690 handle_request(iscsi_fd, &request, timeout); 691 } 692 693 return (0); 694 } 695