1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21
22 /*
23 * Copyright 2009 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 * Copyright 2012 Joyent, Inc. All rights reserved.
26 * Copyright 2015 Nexenta Systems, Inc. All rights reserved.
27 */
28
29 /*
30 * Console support for zones requires a significant infrastructure. The
31 * core pieces are contained in this file, but other portions of note
32 * are in the zlogin(1) command, the zcons(4D) driver, and in the
33 * devfsadm(8) misc_link generator.
34 *
35 * Care is taken to make the console behave in an "intuitive" fashion for
36 * administrators. Essentially, we try as much as possible to mimic the
37 * experience of using a system via a tip line and system controller.
38 *
39 * The zone console architecture looks like this:
40 *
41 * Global Zone | Non-Global Zone
42 * .--------------. |
43 * .-----------. | zoneadmd -z | | .--------. .---------.
44 * | zlogin -C | | myzone | | | ttymon | | syslogd |
45 * `-----------' `--------------' | `--------' `---------'
46 * | | | | | | |
47 * User | | | | | V V
48 * - - - - - - - - -|- - - -|- - - -|-|- - - - - - -|- - /dev/zconsole - - -
49 * Kernel V V | | |
50 * [AF_UNIX Socket] | `--------. .-------------'
51 * | | |
52 * | V V
53 * | +-----------+
54 * | | ldterm, |
55 * | | etc. |
56 * | +-----------+
57 * | +-[Anchor]--+
58 * | | ptem |
59 * V +-----------+
60 * +---manager--+-subsidiary+
61 * | |
62 * | zcons driver |
63 * | zonename="myzone" |
64 * +------------------------+
65 *
66 * There are basically two major tasks which the console subsystem in
67 * zoneadmd accomplishes:
68 *
69 * - Setup and teardown of zcons driver instances. One zcons instance
70 * is maintained per zone; we take advantage of the libdevice APIs
71 * to online new instances of zcons as needed. Care is taken to
72 * prune and manage these appropriately; see init_console_dev() and
73 * destroy_console_dev(). The end result is the creation of the
74 * zcons(4D) instance and an open file descriptor to the manager side.
75 * zcons instances are associated with zones via their zonename device
76 * property. This the console instance to persist across reboots,
77 * and while the zone is halted.
78 *
79 * - Acting as a server for 'zlogin -C' instances. When zlogin -C is
80 * run, zlogin connects to zoneadmd via unix domain socket. zoneadmd
81 * functions as a two-way proxy for console I/O, relaying user input
82 * to the manager side of the console, and relaying output from the
83 * zone to the user.
84 */
85
86 #include <sys/types.h>
87 #include <sys/socket.h>
88 #include <sys/stat.h>
89 #include <sys/termios.h>
90 #include <sys/zcons.h>
91 #include <sys/mkdev.h>
92
93 #include <assert.h>
94 #include <ctype.h>
95 #include <errno.h>
96 #include <fcntl.h>
97 #include <stdarg.h>
98 #include <stdio.h>
99 #include <stdlib.h>
100 #include <strings.h>
101 #include <stropts.h>
102 #include <thread.h>
103 #include <ucred.h>
104 #include <unistd.h>
105 #include <zone.h>
106
107 #include <libdevinfo.h>
108 #include <libdevice.h>
109 #include <libzonecfg.h>
110
111 #include <syslog.h>
112 #include <sys/modctl.h>
113
114 #include "zoneadmd.h"
115
116 #define ZCONSNEX_DEVTREEPATH "/pseudo/zconsnex@1"
117 #define ZCONSNEX_FILEPATH "/devices/pseudo/zconsnex@1"
118
119 #define CONSOLE_SOCKPATH ZONES_TMPDIR "/%s.console_sock"
120
121 static int serverfd = -1; /* console server unix domain socket fd */
122 char boot_args[BOOTARGS_MAX];
123 char bad_boot_arg[BOOTARGS_MAX];
124
125 /*
126 * The eventstream is a simple one-directional flow of messages from the
127 * door server to the console subsystem, implemented with a pipe.
128 * It is used to wake up the console poller when it needs to take action,
129 * message the user, die off, etc.
130 */
131 static int eventstream[2];
132
133
134
135 int
eventstream_init()136 eventstream_init()
137 {
138 if (pipe(eventstream) == -1)
139 return (-1);
140 return (0);
141 }
142
143 void
eventstream_write(zone_evt_t evt)144 eventstream_write(zone_evt_t evt)
145 {
146 (void) write(eventstream[0], &evt, sizeof (evt));
147 }
148
149 static zone_evt_t
eventstream_read(void)150 eventstream_read(void)
151 {
152 zone_evt_t evt = Z_EVT_NULL;
153
154 (void) read(eventstream[1], &evt, sizeof (evt));
155 return (evt);
156 }
157
158 /*
159 * count_console_devs() and its helper count_cb() do a walk of the
160 * subtree of the device tree where zone console nodes are represented.
161 * The goal is to count zone console instances already setup for a zone
162 * with the given name. More than 1 is anomolous, and our caller will
163 * have to deal with that if we find that's the case.
164 *
165 * Note: this algorithm is a linear search of nodes in the zconsnex subtree
166 * of the device tree, and could be a scalability problem, but I don't see
167 * how to avoid it.
168 */
169
170 /*
171 * cb_data is shared by count_cb and destroy_cb for simplicity.
172 */
173 struct cb_data {
174 zlog_t *zlogp;
175 int found;
176 int killed;
177 };
178
179 static int
count_cb(di_node_t node,void * arg)180 count_cb(di_node_t node, void *arg)
181 {
182 struct cb_data *cb = (struct cb_data *)arg;
183 char *prop_data;
184
185 if (di_prop_lookup_strings(DDI_DEV_T_ANY, node, "zonename",
186 &prop_data) != -1) {
187 assert(prop_data != NULL);
188 if (strcmp(prop_data, zone_name) == 0) {
189 cb->found++;
190 return (DI_WALK_CONTINUE);
191 }
192 }
193 return (DI_WALK_CONTINUE);
194 }
195
196 static int
count_console_devs(zlog_t * zlogp)197 count_console_devs(zlog_t *zlogp)
198 {
199 di_node_t root;
200 struct cb_data cb;
201
202 bzero(&cb, sizeof (cb));
203 cb.zlogp = zlogp;
204
205 if ((root = di_init(ZCONSNEX_DEVTREEPATH, DINFOCPYALL)) ==
206 DI_NODE_NIL) {
207 zerror(zlogp, B_TRUE, "%s failed", "di_init");
208 return (-1);
209 }
210
211 (void) di_walk_node(root, DI_WALK_CLDFIRST, (void *)&cb, count_cb);
212 di_fini(root);
213 return (cb.found);
214 }
215
216 /*
217 * destroy_console_devs() and its helper destroy_cb() tears down any console
218 * instances associated with this zone. If things went very wrong, we
219 * might have more than one console instance hanging around. This routine
220 * hunts down and tries to remove all of them. Of course, if the console
221 * is open, the instance will not detach, which is a potential issue.
222 */
223 static int
destroy_cb(di_node_t node,void * arg)224 destroy_cb(di_node_t node, void *arg)
225 {
226 struct cb_data *cb = (struct cb_data *)arg;
227 char *prop_data;
228 char *tmp;
229 char devpath[MAXPATHLEN];
230 devctl_hdl_t hdl;
231
232 if (di_prop_lookup_strings(DDI_DEV_T_ANY, node, "zonename",
233 &prop_data) == -1)
234 return (DI_WALK_CONTINUE);
235
236 assert(prop_data != NULL);
237 if (strcmp(prop_data, zone_name) != 0) {
238 /* this is the console for a different zone */
239 return (DI_WALK_CONTINUE);
240 }
241
242 cb->found++;
243 tmp = di_devfs_path(node);
244 (void) snprintf(devpath, sizeof (devpath), "/devices/%s", tmp);
245 di_devfs_path_free(tmp);
246
247 if ((hdl = devctl_device_acquire(devpath, 0)) == NULL) {
248 zerror(cb->zlogp, B_TRUE, "WARNING: console %s found, "
249 "but it could not be controlled.", devpath);
250 return (DI_WALK_CONTINUE);
251 }
252 if (devctl_device_remove(hdl) == 0) {
253 cb->killed++;
254 } else {
255 zerror(cb->zlogp, B_TRUE, "WARNING: console %s found, "
256 "but it could not be removed.", devpath);
257 }
258 devctl_release(hdl);
259 return (DI_WALK_CONTINUE);
260 }
261
262 static int
destroy_console_devs(zlog_t * zlogp)263 destroy_console_devs(zlog_t *zlogp)
264 {
265 char conspath[MAXPATHLEN];
266 di_node_t root;
267 struct cb_data cb;
268 int managerfd;
269 int subfd;
270
271 /*
272 * Signal the manager side to release its handle on the subsidiary side
273 * by issuing a ZC_RELEASESUBSID ioctl.
274 */
275 (void) snprintf(conspath, sizeof (conspath), "/dev/zcons/%s/%s",
276 zone_name, ZCONS_MANAGER_NAME);
277 if ((managerfd = open(conspath, O_RDWR | O_NOCTTY)) != -1) {
278 (void) snprintf(conspath, sizeof (conspath), "/dev/zcons/%s/%s",
279 zone_name, ZCONS_SUBSIDIARY_NAME);
280 if ((subfd = open(conspath, O_RDWR | O_NOCTTY)) != -1) {
281 if (ioctl(managerfd, ZC_RELEASESUBSID,
282 (caddr_t)(intptr_t)subfd) != 0)
283 zerror(zlogp, B_TRUE, "WARNING: error while "
284 "releasing subsidiary handle of zone "
285 "console for %s", zone_name);
286 (void) close(subfd);
287 } else {
288 zerror(zlogp, B_TRUE, "WARNING: could not open "
289 "subsidiary side of zone console for %s to "
290 "release subsidiary handle", zone_name);
291 }
292 (void) close(managerfd);
293 } else {
294 zerror(zlogp, B_TRUE, "WARNING: could not open manager side of "
295 "zone console for %s to release subsidiary handle",
296 zone_name);
297 }
298
299 bzero(&cb, sizeof (cb));
300 cb.zlogp = zlogp;
301
302 if ((root = di_init(ZCONSNEX_DEVTREEPATH, DINFOCPYALL)) ==
303 DI_NODE_NIL) {
304 zerror(zlogp, B_TRUE, "%s failed", "di_init");
305 return (-1);
306 }
307
308 (void) di_walk_node(root, DI_WALK_CLDFIRST, (void *)&cb, destroy_cb);
309 if (cb.found > 1) {
310 zerror(zlogp, B_FALSE, "WARNING: multiple zone console "
311 "instances detected for zone '%s'; %d of %d "
312 "successfully removed.",
313 zone_name, cb.killed, cb.found);
314 }
315
316 di_fini(root);
317 return (0);
318 }
319
320 /*
321 * init_console_dev() drives the device-tree configuration of the zone
322 * console device. The general strategy is to use the libdevice (devctl)
323 * interfaces to instantiate a new zone console node. We do a lot of
324 * sanity checking, and are careful to reuse a console if one exists.
325 *
326 * Once the device is in the device tree, we kick devfsadm via di_init_devs()
327 * to ensure that the appropriate symlinks (to the manager and subsidiary
328 * console devices) are placed in /dev in the global zone.
329 */
330 static int
init_console_dev(zlog_t * zlogp)331 init_console_dev(zlog_t *zlogp)
332 {
333 char conspath[MAXPATHLEN];
334 devctl_hdl_t bus_hdl = NULL;
335 devctl_hdl_t dev_hdl = NULL;
336 devctl_ddef_t ddef_hdl = NULL;
337 di_devlink_handle_t dl = NULL;
338 int rv = -1;
339 int ndevs;
340 int managerfd;
341 int subfd;
342 int i;
343
344 /*
345 * Don't re-setup console if it is working and ready already; just
346 * skip ahead to making devlinks, which we do for sanity's sake.
347 */
348 ndevs = count_console_devs(zlogp);
349 if (ndevs == 1) {
350 goto devlinks;
351 } else if (ndevs > 1 || ndevs == -1) {
352 /*
353 * For now, this seems like a reasonable but harsh punishment.
354 * If needed, we could try to get clever and delete all but
355 * the console which is pointed at by the current symlink.
356 */
357 if (destroy_console_devs(zlogp) == -1) {
358 goto error;
359 }
360 }
361
362 /*
363 * Time to make the consoles!
364 */
365 if ((bus_hdl = devctl_bus_acquire(ZCONSNEX_FILEPATH, 0)) == NULL) {
366 zerror(zlogp, B_TRUE, "%s failed", "devctl_bus_acquire");
367 goto error;
368 }
369 if ((ddef_hdl = devctl_ddef_alloc("zcons", 0)) == NULL) {
370 zerror(zlogp, B_TRUE, "failed to allocate ddef handle");
371 goto error;
372 }
373 /*
374 * Set three properties on this node; the first is the name of the
375 * zone; the second is a flag which lets pseudo know that it is
376 * OK to automatically allocate an instance # for this device;
377 * the third tells the device framework not to auto-detach this
378 * node-- we need the node to still be there when we ask devfsadmd
379 * to make links, and when we need to open it.
380 */
381 if (devctl_ddef_string(ddef_hdl, "zonename", zone_name) == -1) {
382 zerror(zlogp, B_TRUE, "failed to create zonename property");
383 goto error;
384 }
385 if (devctl_ddef_int(ddef_hdl, "auto-assign-instance", 1) == -1) {
386 zerror(zlogp, B_TRUE, "failed to create auto-assign-instance "
387 "property");
388 goto error;
389 }
390 if (devctl_ddef_int(ddef_hdl, "ddi-no-autodetach", 1) == -1) {
391 zerror(zlogp, B_TRUE, "failed to create ddi-no-auto-detach "
392 "property");
393 goto error;
394 }
395 if (devctl_bus_dev_create(bus_hdl, ddef_hdl, 0, &dev_hdl) == -1) {
396 zerror(zlogp, B_TRUE, "failed to create console node");
397 goto error;
398 }
399
400 devlinks:
401 if ((dl = di_devlink_init("zcons", DI_MAKE_LINK)) != NULL) {
402 (void) di_devlink_fini(&dl);
403 } else {
404 zerror(zlogp, B_TRUE, "failed to create devlinks");
405 goto error;
406 }
407
408 /*
409 * Open the manager side of the console and issue the ZC_HOLDSUBSID
410 * ioctl, which will cause the manager to retain a reference to the
411 * subsidiary. This prevents ttymon from blowing through the
412 * subsidiary's STREAMS anchor.
413 */
414 (void) snprintf(conspath, sizeof (conspath), "/dev/zcons/%s/%s",
415 zone_name, ZCONS_MANAGER_NAME);
416 if ((managerfd = open(conspath, O_RDWR | O_NOCTTY)) == -1) {
417 zerror(zlogp, B_TRUE, "ERROR: could not open manager side of "
418 "zone console for %s to acquire subsidiary handle",
419 zone_name);
420 goto error;
421 }
422 (void) snprintf(conspath, sizeof (conspath), "/dev/zcons/%s/%s",
423 zone_name, ZCONS_SUBSIDIARY_NAME);
424 if ((subfd = open(conspath, O_RDWR | O_NOCTTY)) == -1) {
425 zerror(zlogp, B_TRUE, "ERROR: could not open subsidiary side "
426 "of zone console for %s to acquire subsidiary handle",
427 zone_name);
428 (void) close(managerfd);
429 goto error;
430 }
431 /*
432 * This ioctl can occasionally return ENXIO if devfs doesn't have
433 * everything plumbed up yet due to heavy zone startup load. Wait for
434 * 1 sec. and retry a few times before we fail to boot the zone.
435 */
436 for (i = 0; i < 5; i++) {
437 if (ioctl(managerfd, ZC_HOLDSUBSID, (caddr_t)(intptr_t)subfd)
438 == 0) {
439 rv = 0;
440 break;
441 } else if (errno != ENXIO) {
442 break;
443 }
444 (void) sleep(1);
445 }
446 if (rv != 0)
447 zerror(zlogp, B_TRUE, "ERROR: error while acquiring "
448 "subsidiary handle of zone console for %s", zone_name);
449
450 (void) close(subfd);
451 (void) close(managerfd);
452
453 error:
454 if (ddef_hdl)
455 devctl_ddef_free(ddef_hdl);
456 if (bus_hdl)
457 devctl_release(bus_hdl);
458 if (dev_hdl)
459 devctl_release(dev_hdl);
460 return (rv);
461 }
462
463 static int
init_console_sock(zlog_t * zlogp)464 init_console_sock(zlog_t *zlogp)
465 {
466 int servfd;
467 struct sockaddr_un servaddr;
468
469 bzero(&servaddr, sizeof (servaddr));
470 servaddr.sun_family = AF_UNIX;
471 (void) snprintf(servaddr.sun_path, sizeof (servaddr.sun_path),
472 CONSOLE_SOCKPATH, zone_name);
473
474 if ((servfd = socket(AF_UNIX, SOCK_STREAM, 0)) == -1) {
475 zerror(zlogp, B_TRUE, "console setup: could not create socket");
476 return (-1);
477 }
478 (void) unlink(servaddr.sun_path);
479
480 if (bind(servfd, (struct sockaddr *)&servaddr,
481 sizeof (servaddr)) == -1) {
482 zerror(zlogp, B_TRUE,
483 "console setup: could not bind to socket");
484 goto out;
485 }
486
487 if (listen(servfd, 4) == -1) {
488 zerror(zlogp, B_TRUE,
489 "console setup: could not listen on socket");
490 goto out;
491 }
492 return (servfd);
493
494 out:
495 (void) unlink(servaddr.sun_path);
496 (void) close(servfd);
497 return (-1);
498 }
499
500 static void
destroy_console_sock(int servfd)501 destroy_console_sock(int servfd)
502 {
503 char path[MAXPATHLEN];
504
505 (void) snprintf(path, sizeof (path), CONSOLE_SOCKPATH, zone_name);
506 (void) unlink(path);
507 (void) shutdown(servfd, SHUT_RDWR);
508 (void) close(servfd);
509 }
510
511 /*
512 * Read the "ident" string from the client's descriptor; this routine also
513 * tolerates being called with pid=NULL, for times when you want to "eat"
514 * the ident string from a client without saving it.
515 */
516 static int
get_client_ident(int clifd,pid_t * pid,char * locale,size_t locale_len,int * disconnect)517 get_client_ident(int clifd, pid_t *pid, char *locale, size_t locale_len,
518 int *disconnect)
519 {
520 char buf[BUFSIZ], *bufp;
521 size_t buflen = sizeof (buf);
522 char c = '\0';
523 int i = 0, r;
524
525 /* "eat up the ident string" case, for simplicity */
526 if (pid == NULL) {
527 assert(locale == NULL && locale_len == 0);
528 while (read(clifd, &c, 1) == 1) {
529 if (c == '\n')
530 return (0);
531 }
532 }
533
534 bzero(buf, sizeof (buf));
535 while ((buflen > 1) && (r = read(clifd, &c, 1)) == 1) {
536 buflen--;
537 if (c == '\n')
538 break;
539
540 buf[i] = c;
541 i++;
542 }
543 if (r == -1)
544 return (-1);
545
546 /*
547 * We've filled the buffer, but still haven't seen \n. Keep eating
548 * until we find it; we don't expect this to happen, but this is
549 * defensive.
550 */
551 if (c != '\n') {
552 while ((r = read(clifd, &c, sizeof (c))) > 0)
553 if (c == '\n')
554 break;
555 }
556
557 /*
558 * Parse buffer for message of the form:
559 * IDENT <pid> <locale> <disconnect flag>
560 */
561 bufp = buf;
562 if (strncmp(bufp, "IDENT ", 6) != 0)
563 return (-1);
564 bufp += 6;
565 errno = 0;
566 *pid = strtoll(bufp, &bufp, 10);
567 if (errno != 0)
568 return (-1);
569
570 while (*bufp != '\0' && isspace(*bufp))
571 bufp++;
572 buflen = strlen(bufp) - 1;
573 *disconnect = atoi(&bufp[buflen]);
574 bufp[buflen - 1] = '\0';
575 (void) strlcpy(locale, bufp, locale_len);
576
577 return (0);
578 }
579
580 static int
accept_client(int servfd,pid_t * pid,char * locale,size_t locale_len,int * disconnect)581 accept_client(int servfd, pid_t *pid, char *locale, size_t locale_len,
582 int *disconnect)
583 {
584 int connfd;
585 struct sockaddr_un cliaddr;
586 socklen_t clilen;
587
588 clilen = sizeof (cliaddr);
589 connfd = accept(servfd, (struct sockaddr *)&cliaddr, &clilen);
590 if (connfd == -1)
591 return (-1);
592 if (get_client_ident(connfd, pid, locale, locale_len,
593 disconnect) == -1) {
594 (void) shutdown(connfd, SHUT_RDWR);
595 (void) close(connfd);
596 return (-1);
597 }
598 (void) write(connfd, "OK\n", 3);
599 return (connfd);
600 }
601
602 static void
reject_client(int servfd,pid_t clientpid)603 reject_client(int servfd, pid_t clientpid)
604 {
605 int connfd;
606 struct sockaddr_un cliaddr;
607 socklen_t clilen;
608 char nak[MAXPATHLEN];
609
610 clilen = sizeof (cliaddr);
611 connfd = accept(servfd, (struct sockaddr *)&cliaddr, &clilen);
612
613 /*
614 * After hear its ident string, tell client to get lost.
615 */
616 if (get_client_ident(connfd, NULL, NULL, 0, NULL) == 0) {
617 (void) snprintf(nak, sizeof (nak), "%lu\n",
618 clientpid);
619 (void) write(connfd, nak, strlen(nak));
620 }
621 (void) shutdown(connfd, SHUT_RDWR);
622 (void) close(connfd);
623 }
624
625 static void
event_message(int clifd,char * clilocale,zone_evt_t evt,int dflag)626 event_message(int clifd, char *clilocale, zone_evt_t evt, int dflag)
627 {
628 char *str, *lstr = NULL;
629 char lmsg[BUFSIZ];
630 char outbuf[BUFSIZ];
631
632 if (clifd == -1)
633 return;
634
635 switch (evt) {
636 case Z_EVT_ZONE_BOOTING:
637 if (*boot_args == '\0') {
638 str = "NOTICE: Zone booting up";
639 break;
640 }
641 /*LINTED*/
642 (void) snprintf(lmsg, sizeof (lmsg), localize_msg(clilocale,
643 "NOTICE: Zone booting up with arguments: %s"), boot_args);
644 lstr = lmsg;
645 break;
646 case Z_EVT_ZONE_READIED:
647 str = "NOTICE: Zone readied";
648 break;
649 case Z_EVT_ZONE_HALTED:
650 if (dflag)
651 str = "NOTICE: Zone halted. Disconnecting...";
652 else
653 str = "NOTICE: Zone halted";
654 break;
655 case Z_EVT_ZONE_REBOOTING:
656 if (*boot_args == '\0') {
657 str = "NOTICE: Zone rebooting";
658 break;
659 }
660 /*LINTED*/
661 (void) snprintf(lmsg, sizeof (lmsg), localize_msg(clilocale,
662 "NOTICE: Zone rebooting with arguments: %s"), boot_args);
663 lstr = lmsg;
664 break;
665 case Z_EVT_ZONE_UNINSTALLING:
666 str = "NOTICE: Zone is being uninstalled. Disconnecting...";
667 break;
668 case Z_EVT_ZONE_BOOTFAILED:
669 if (dflag)
670 str = "NOTICE: Zone boot failed. Disconnecting...";
671 else
672 str = "NOTICE: Zone boot failed";
673 break;
674 case Z_EVT_ZONE_BADARGS:
675 /*LINTED*/
676 (void) snprintf(lmsg, sizeof (lmsg),
677 localize_msg(clilocale,
678 "WARNING: Ignoring invalid boot arguments: %s"),
679 bad_boot_arg);
680 lstr = lmsg;
681 break;
682 default:
683 return;
684 }
685
686 if (lstr == NULL)
687 lstr = localize_msg(clilocale, str);
688 (void) snprintf(outbuf, sizeof (outbuf), "\r\n[%s]\r\n", lstr);
689 (void) write(clifd, outbuf, strlen(outbuf));
690 }
691
692 /*
693 * Check to see if the client at the other end of the socket is still
694 * alive; we know it is not if it throws EPIPE at us when we try to write
695 * an otherwise harmless 0-length message to it.
696 */
697 static int
test_client(int clifd)698 test_client(int clifd)
699 {
700 if ((write(clifd, "", 0) == -1) && errno == EPIPE)
701 return (-1);
702 return (0);
703 }
704
705 /*
706 * This routine drives the console I/O loop. It polls for input from the
707 * manager side of the console (output to the console), and from the client
708 * (input from the console user). Additionally, it polls on the server fd,
709 * and disconnects any clients that might try to hook up with the zone while
710 * the console is in use.
711 *
712 * When the client first calls us up, it is expected to send a line giving
713 * its "identity"; this consists of the string 'IDENT <pid> <locale>'.
714 * This is so that we can report that the console is busy along with
715 * some diagnostics about who has it busy; the locale is used so that
716 * asynchronous messages about zone state (like the NOTICE: zone halted
717 * messages) can be output in the user's locale.
718 */
719 static void
do_console_io(zlog_t * zlogp,int consfd,int servfd)720 do_console_io(zlog_t *zlogp, int consfd, int servfd)
721 {
722 struct pollfd pollfds[4];
723 char ibuf[BUFSIZ];
724 int cc, ret;
725 int clifd = -1;
726 int pollerr = 0;
727 char clilocale[MAXPATHLEN];
728 pid_t clipid = 0;
729 int disconnect = 0;
730
731 /* console side, watch for read events */
732 pollfds[0].fd = consfd;
733 pollfds[0].events = POLLIN | POLLRDNORM | POLLRDBAND |
734 POLLPRI | POLLERR | POLLHUP | POLLNVAL;
735
736 /* client side, watch for read events */
737 pollfds[1].fd = clifd;
738 pollfds[1].events = pollfds[0].events;
739
740 /* the server socket; watch for events (new connections) */
741 pollfds[2].fd = servfd;
742 pollfds[2].events = pollfds[0].events;
743
744 /* the eventstram; watch for events (e.g.: zone halted) */
745 pollfds[3].fd = eventstream[1];
746 pollfds[3].events = pollfds[0].events;
747
748 for (;;) {
749 pollfds[0].revents = pollfds[1].revents = 0;
750 pollfds[2].revents = pollfds[3].revents = 0;
751
752 ret = poll(pollfds,
753 sizeof (pollfds) / sizeof (struct pollfd), -1);
754 if (ret == -1 && errno != EINTR) {
755 zerror(zlogp, B_TRUE, "poll failed");
756 /* we are hosed, close connection */
757 break;
758 }
759
760 /* event from console side */
761 if (pollfds[0].revents) {
762 if (pollfds[0].revents &
763 (POLLIN | POLLRDNORM | POLLRDBAND | POLLPRI)) {
764 errno = 0;
765 cc = read(consfd, ibuf, BUFSIZ);
766 if (cc <= 0 && (errno != EINTR) &&
767 (errno != EAGAIN))
768 break;
769 /*
770 * Lose I/O if no one is listening
771 */
772 if (clifd != -1 && cc > 0)
773 (void) write(clifd, ibuf, cc);
774 } else {
775 pollerr = pollfds[0].revents;
776 zerror(zlogp, B_FALSE,
777 "closing connection with (console) "
778 "pollerr %d\n", pollerr);
779 break;
780 }
781 }
782
783 /* event from client side */
784 if (pollfds[1].revents) {
785 if (pollfds[1].revents &
786 (POLLIN | POLLRDNORM | POLLRDBAND | POLLPRI)) {
787 errno = 0;
788 cc = read(clifd, ibuf, BUFSIZ);
789 if (cc <= 0 && (errno != EINTR) &&
790 (errno != EAGAIN))
791 break;
792 (void) write(consfd, ibuf, cc);
793 } else {
794 pollerr = pollfds[1].revents;
795 zerror(zlogp, B_FALSE,
796 "closing connection with (client) "
797 "pollerr %d\n", pollerr);
798 break;
799 }
800 }
801
802 /* event from server socket */
803 if (pollfds[2].revents &&
804 (pollfds[2].revents & (POLLIN | POLLRDNORM))) {
805 if (clifd != -1) {
806 /*
807 * Test the client to see if it is really
808 * still alive. If it has died but we
809 * haven't yet detected that, we might
810 * deny a legitimate connect attempt. If it
811 * is dead, we break out; once we tear down
812 * the old connection, the new connection
813 * will happen.
814 */
815 if (test_client(clifd) == -1) {
816 break;
817 }
818 /* we're already handling a client */
819 reject_client(servfd, clipid);
820
821
822 } else if ((clifd = accept_client(servfd, &clipid,
823 clilocale, sizeof (clilocale),
824 &disconnect)) != -1) {
825 pollfds[1].fd = clifd;
826
827 } else {
828 break;
829 }
830 }
831
832 /*
833 * Watch for events on the eventstream. This is how we get
834 * notified of the zone halting, etc. It provides us a
835 * "wakeup" from poll when important things happen, which
836 * is good.
837 */
838 if (pollfds[3].revents) {
839 int evt = eventstream_read();
840 /*
841 * After we drain out the event, if we aren't servicing
842 * a console client, we hop back out to our caller,
843 * which will check to see if it is time to shutdown
844 * the daemon, or if we should take another console
845 * service lap.
846 */
847 if (clifd == -1) {
848 break;
849 }
850 event_message(clifd, clilocale, evt, disconnect);
851 /*
852 * Special handling for the message that the zone is
853 * uninstalling; we boot the client, then break out
854 * of this function. When we return to the
855 * serve_console loop, we will see that the zone is
856 * in a state < READY, and so zoneadmd will shutdown.
857 */
858 if (evt == Z_EVT_ZONE_UNINSTALLING) {
859 break;
860 }
861 /*
862 * Diconnect if -C and -d options were specified and
863 * zone was halted or failed to boot.
864 */
865 if ((evt == Z_EVT_ZONE_HALTED ||
866 evt == Z_EVT_ZONE_BOOTFAILED) && disconnect) {
867 break;
868 }
869 }
870
871 }
872
873 if (clifd != -1) {
874 (void) shutdown(clifd, SHUT_RDWR);
875 (void) close(clifd);
876 }
877 }
878
879 int
init_console(zlog_t * zlogp)880 init_console(zlog_t *zlogp)
881 {
882 if (init_console_dev(zlogp) == -1) {
883 zerror(zlogp, B_FALSE,
884 "console setup: device initialization failed");
885 return (-1);
886 }
887
888 if ((serverfd = init_console_sock(zlogp)) == -1) {
889 zerror(zlogp, B_FALSE,
890 "console setup: socket initialization failed");
891 return (-1);
892 }
893 return (0);
894 }
895
896 /*
897 * serve_console() is the master loop for driving console I/O. It is also the
898 * routine which is ultimately responsible for "pulling the plug" on zoneadmd
899 * when it realizes that the daemon should shut down.
900 *
901 * The rules for shutdown are: there must be no console client, and the zone
902 * state must be < ready. However, we need to give things a chance to actually
903 * get going when the daemon starts up-- otherwise the daemon would immediately
904 * exit on startup if the zone was in the installed state, so we first drop
905 * into the do_console_io() loop in order to give *something* a chance to
906 * happen.
907 */
908 void
serve_console(zlog_t * zlogp)909 serve_console(zlog_t *zlogp)
910 {
911 int managerfd;
912 zone_state_t zstate;
913 char conspath[MAXPATHLEN];
914
915 (void) snprintf(conspath, sizeof (conspath),
916 "/dev/zcons/%s/%s", zone_name, ZCONS_MANAGER_NAME);
917
918 for (;;) {
919 managerfd = open(conspath, O_RDWR|O_NONBLOCK|O_NOCTTY);
920 if (managerfd == -1) {
921 zerror(zlogp, B_TRUE, "failed to open console manager");
922 (void) mutex_lock(&lock);
923 goto death;
924 }
925
926 /*
927 * Setting RPROTDIS on the stream means that the control
928 * portion of messages received (which we don't care about)
929 * will be discarded by the stream head. If we allowed such
930 * messages, we wouldn't be able to use read(2), as it fails
931 * (EBADMSG) when a message with a control element is received.
932 */
933 if (ioctl(managerfd, I_SRDOPT, RNORM|RPROTDIS) == -1) {
934 zerror(zlogp, B_TRUE, "failed to set options on "
935 "console manager");
936 (void) mutex_lock(&lock);
937 goto death;
938 }
939
940 do_console_io(zlogp, managerfd, serverfd);
941
942 /*
943 * We would prefer not to do this, but hostile zone processes
944 * can cause the stream to become tainted, and reads will
945 * fail. So, in case something has gone seriously ill,
946 * we dismantle the stream and reopen the console when we
947 * take another lap.
948 */
949 (void) close(managerfd);
950
951 (void) mutex_lock(&lock);
952 /*
953 * We need to set death_throes (see below) atomically with
954 * respect to noticing that (a) we have no console client and
955 * (b) the zone is not installed. Otherwise we could get a
956 * request to boot during this time. Once we set death_throes,
957 * any incoming door stuff will be turned away.
958 */
959 if (zone_get_state(zone_name, &zstate) == Z_OK) {
960 if (zstate < ZONE_STATE_READY)
961 goto death;
962 } else {
963 zerror(zlogp, B_FALSE,
964 "unable to determine state of zone");
965 goto death;
966 }
967 /*
968 * Even if zone_get_state() fails, stay conservative, and
969 * take another lap.
970 */
971 (void) mutex_unlock(&lock);
972 }
973
974 death:
975 assert(MUTEX_HELD(&lock));
976 in_death_throes = B_TRUE;
977 (void) mutex_unlock(&lock);
978
979 destroy_console_sock(serverfd);
980 (void) destroy_console_devs(zlogp);
981 }
982