Home | History | Annotate | Line # | Download | only in wscons
wsmux.c revision 1.57
      1 /*	$NetBSD: wsmux.c,v 1.57 2014/03/16 05:20:29 dholland Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1998, 2005 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * Author: Lennart Augustsson <lennart (at) augustsson.net>
      8  *         Carlstedt Research & Technology
      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  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 /*
     33  * wscons mux device.
     34  *
     35  * The mux device is a collection of real mice and keyboards and acts as
     36  * a merge point for all the events from the different real devices.
     37  */
     38 
     39 #include <sys/cdefs.h>
     40 __KERNEL_RCSID(0, "$NetBSD: wsmux.c,v 1.57 2014/03/16 05:20:29 dholland Exp $");
     41 
     42 #include "opt_compat_netbsd.h"
     43 #include "opt_modular.h"
     44 
     45 #include "wsdisplay.h"
     46 #include "wsmux.h"
     47 #include "wskbd.h"
     48 #include "wsmouse.h"
     49 
     50 #include <sys/param.h>
     51 #include <sys/conf.h>
     52 #include <sys/ioctl.h>
     53 #include <sys/poll.h>
     54 #include <sys/fcntl.h>
     55 #include <sys/kernel.h>
     56 #include <sys/malloc.h>
     57 #include <sys/proc.h>
     58 #include <sys/queue.h>
     59 #include <sys/syslog.h>
     60 #include <sys/systm.h>
     61 #include <sys/tty.h>
     62 #include <sys/signalvar.h>
     63 #include <sys/device.h>
     64 
     65 #include "opt_wsdisplay_compat.h"
     66 
     67 #include <dev/wscons/wsconsio.h>
     68 #include <dev/wscons/wsksymdef.h>
     69 #include <dev/wscons/wseventvar.h>
     70 #include <dev/wscons/wscons_callbacks.h>
     71 #include <dev/wscons/wsmuxvar.h>
     72 
     73 #ifdef WSMUX_DEBUG
     74 #define DPRINTF(x)	if (wsmuxdebug) printf x
     75 #define DPRINTFN(n,x)	if (wsmuxdebug > (n)) printf x
     76 int	wsmuxdebug = 0;
     77 #else
     78 #define DPRINTF(x)
     79 #define DPRINTFN(n,x)
     80 #endif
     81 
     82 /*
     83  * The wsmux pseudo device is used to multiplex events from several wsmouse,
     84  * wskbd, and/or wsmux devices together.
     85  * The devices connected together form a tree with muxes in the interior
     86  * and real devices (mouse and kbd) at the leaves.  The special case of
     87  * a tree with one node (mux or other) is supported as well.
     88  * Only the device at the root of the tree can be opened (if a non-root
     89  * device is opened the subtree rooted at that point is severed from the
     90  * containing tree).  When the root is opened it allocates a wseventvar
     91  * struct which all the nodes in the tree will send their events too.
     92  * An ioctl() performed on the root is propagated to all the nodes.
     93  * There are also ioctl() operations to add and remove nodes from a tree.
     94  */
     95 
     96 static int wsmux_mux_open(struct wsevsrc *, struct wseventvar *);
     97 static int wsmux_mux_close(struct wsevsrc *);
     98 
     99 static void wsmux_do_open(struct wsmux_softc *, struct wseventvar *);
    100 
    101 static void wsmux_do_close(struct wsmux_softc *);
    102 #if NWSDISPLAY > 0
    103 static int wsmux_evsrc_set_display(device_t, struct wsevsrc *);
    104 #else
    105 #define wsmux_evsrc_set_display NULL
    106 #endif
    107 
    108 static int wsmux_do_displayioctl(device_t dev, u_long cmd,
    109 				 void *data, int flag, struct lwp *l);
    110 static int wsmux_do_ioctl(device_t, u_long, void *,int,struct lwp *);
    111 
    112 static int wsmux_add_mux(int, struct wsmux_softc *);
    113 
    114 void wsmuxattach(int);
    115 
    116 #define WSMUXDEV(n) ((n) & 0x7f)
    117 #define WSMUXCTL(n) ((n) & 0x80)
    118 
    119 dev_type_open(wsmuxopen);
    120 dev_type_close(wsmuxclose);
    121 dev_type_read(wsmuxread);
    122 dev_type_ioctl(wsmuxioctl);
    123 dev_type_poll(wsmuxpoll);
    124 dev_type_kqfilter(wsmuxkqfilter);
    125 
    126 const struct cdevsw wsmux_cdevsw = {
    127 	.d_open = wsmuxopen,
    128 	.d_close = wsmuxclose,
    129 	.d_read = wsmuxread,
    130 	.d_write = nowrite,
    131 	.d_ioctl = wsmuxioctl,
    132 	.d_stop = nostop,
    133 	.d_tty = notty,
    134 	.d_poll = wsmuxpoll,
    135 	.d_mmap = nommap,
    136 	.d_kqfilter = wsmuxkqfilter,
    137 	.d_flag = D_OTHER
    138 };
    139 
    140 struct wssrcops wsmux_srcops = {
    141 	WSMUX_MUX,
    142 	wsmux_mux_open, wsmux_mux_close, wsmux_do_ioctl, wsmux_do_displayioctl,
    143 	wsmux_evsrc_set_display
    144 };
    145 
    146 /* From upper level */
    147 void
    148 wsmuxattach(int n)
    149 {
    150 }
    151 
    152 /* Keep track of all muxes that have been allocated */
    153 static struct wsmux_softc **wsmuxdevs = NULL;
    154 static int nwsmux = 0;
    155 
    156 /* Return mux n, create if necessary */
    157 struct wsmux_softc *
    158 wsmux_getmux(int n)
    159 {
    160 	struct wsmux_softc *sc;
    161 
    162 	n = WSMUXDEV(n);	/* limit range */
    163 
    164 	/* Make sure there is room for mux n in the table */
    165 	if (n >= nwsmux) {
    166 		void *new;
    167 
    168 		new = realloc(wsmuxdevs, (n + 1) * sizeof(*wsmuxdevs),
    169 		    M_DEVBUF, M_ZERO | M_NOWAIT);
    170 		if (new == NULL) {
    171 			printf("wsmux_getmux: no memory for mux %d\n", n);
    172 			return NULL;
    173 		}
    174 		wsmuxdevs = new;
    175 		nwsmux = n + 1;
    176 	}
    177 
    178 	sc = wsmuxdevs[n];
    179 	if (sc == NULL) {
    180 		sc = wsmux_create("wsmux", n);
    181 		if (sc == NULL)
    182 			printf("wsmux: attach out of memory\n");
    183 		wsmuxdevs[n] = sc;
    184 	}
    185 	return (sc);
    186 }
    187 
    188 /*
    189  * open() of the pseudo device from device table.
    190  */
    191 int
    192 wsmuxopen(dev_t dev, int flags, int mode, struct lwp *l)
    193 {
    194 	struct wsmux_softc *sc;
    195 	struct wseventvar *evar;
    196 	int minr, unit;
    197 
    198 	minr = minor(dev);
    199 	unit = WSMUXDEV(minr);
    200 	sc = wsmux_getmux(unit);
    201 	if (sc == NULL)
    202 		return (ENXIO);
    203 
    204 	DPRINTF(("wsmuxopen: %s: sc=%p l=%p\n",
    205 		 device_xname(sc->sc_base.me_dv), sc, l));
    206 
    207 	if (WSMUXCTL(minr)) {
    208 		/* This is the control device which does not allow reads. */
    209 		if (flags & FREAD)
    210 			return (EINVAL);
    211 		return (0);
    212 	}
    213 	if ((flags & (FREAD | FWRITE)) == FWRITE)
    214 		/* Allow write only open */
    215 		return (0);
    216 
    217 	if (sc->sc_base.me_parent != NULL) {
    218 		/* Grab the mux out of the greedy hands of the parent mux. */
    219 		DPRINTF(("wsmuxopen: detach\n"));
    220 		wsmux_detach_sc(&sc->sc_base);
    221 	}
    222 
    223 	if (sc->sc_base.me_evp != NULL)
    224 		/* Already open. */
    225 		return (EBUSY);
    226 
    227 	evar = &sc->sc_base.me_evar;
    228 	wsevent_init(evar, l->l_proc);
    229 #ifdef WSDISPLAY_COMPAT_RAWKBD
    230 	sc->sc_rawkbd = 0;
    231 #endif
    232 
    233 	wsmux_do_open(sc, evar);
    234 
    235 	return (0);
    236 }
    237 
    238 /*
    239  * Open of a mux via the parent mux.
    240  */
    241 int
    242 wsmux_mux_open(struct wsevsrc *me, struct wseventvar *evar)
    243 {
    244 	struct wsmux_softc *sc = (struct wsmux_softc *)me;
    245 
    246 #ifdef DIAGNOSTIC
    247 	if (sc->sc_base.me_evp != NULL) {
    248 		printf("wsmux_mux_open: busy\n");
    249 		return (EBUSY);
    250 	}
    251 	if (sc->sc_base.me_parent == NULL) {
    252 		printf("wsmux_mux_open: no parent\n");
    253 		return (EINVAL);
    254 	}
    255 #endif
    256 
    257 	wsmux_do_open(sc, evar);
    258 
    259 	return (0);
    260 }
    261 
    262 /* Common part of opening a mux. */
    263 void
    264 wsmux_do_open(struct wsmux_softc *sc, struct wseventvar *evar)
    265 {
    266 	struct wsevsrc *me;
    267 
    268 	sc->sc_base.me_evp = evar; /* remember event variable, mark as open */
    269 
    270 	/* Open all children. */
    271 	TAILQ_FOREACH(me, &sc->sc_cld, me_next) {
    272 		DPRINTF(("wsmuxopen: %s: m=%p dev=%s\n",
    273 			 device_xname(sc->sc_base.me_dv), me,
    274 			 device_xname(me->me_dv)));
    275 #ifdef DIAGNOSTIC
    276 		if (me->me_evp != NULL) {
    277 			printf("wsmuxopen: dev already in use\n");
    278 			continue;
    279 		}
    280 		if (me->me_parent != sc) {
    281 			printf("wsmux_do_open: bad child=%p\n", me);
    282 			continue;
    283 		}
    284 		{
    285 		int error = wsevsrc_open(me, evar);
    286 		if (error) {
    287 			DPRINTF(("wsmuxopen: open failed %d\n", error));
    288 		}
    289 		}
    290 #else
    291 		/* ignore errors, failing children will not be marked open */
    292 		(void)wsevsrc_open(me, evar);
    293 #endif
    294 	}
    295 }
    296 
    297 /*
    298  * close() of the pseudo device from device table.
    299  */
    300 int
    301 wsmuxclose(dev_t dev, int flags, int mode,
    302     struct lwp *l)
    303 {
    304 	int minr = minor(dev);
    305 	struct wsmux_softc *sc = wsmuxdevs[WSMUXDEV(minr)];
    306 	struct wseventvar *evar = sc->sc_base.me_evp;
    307 
    308 	if (WSMUXCTL(minr))
    309 		/* control device */
    310 		return (0);
    311 	if (evar == NULL)
    312 		/* Not open for read */
    313 		return (0);
    314 
    315 	wsmux_do_close(sc);
    316 	sc->sc_base.me_evp = NULL;
    317 	wsevent_fini(evar);
    318 	return (0);
    319 }
    320 
    321 /*
    322  * Close of a mux via the parent mux.
    323  */
    324 int
    325 wsmux_mux_close(struct wsevsrc *me)
    326 {
    327 	me->me_evp = NULL;
    328 	wsmux_do_close((struct wsmux_softc *)me);
    329 	return (0);
    330 }
    331 
    332 /* Common part of closing a mux. */
    333 void
    334 wsmux_do_close(struct wsmux_softc *sc)
    335 {
    336 	struct wsevsrc *me;
    337 
    338 	DPRINTF(("wsmuxclose: %s: sc=%p\n",
    339 		 device_xname(sc->sc_base.me_dv), sc));
    340 
    341 	/* Close all the children. */
    342 	TAILQ_FOREACH(me, &sc->sc_cld, me_next) {
    343 		DPRINTF(("wsmuxclose %s: m=%p dev=%s\n",
    344 			 device_xname(sc->sc_base.me_dv), me,
    345 			 device_xname(me->me_dv)));
    346 #ifdef DIAGNOSTIC
    347 		if (me->me_parent != sc) {
    348 			printf("wsmuxclose: bad child=%p\n", me);
    349 			continue;
    350 		}
    351 #endif
    352 		(void)wsevsrc_close(me);
    353 		me->me_evp = NULL;
    354 	}
    355 }
    356 
    357 /*
    358  * read() of the pseudo device from device table.
    359  */
    360 int
    361 wsmuxread(dev_t dev, struct uio *uio, int flags)
    362 {
    363 	int minr = minor(dev);
    364 	struct wsmux_softc *sc = wsmuxdevs[WSMUXDEV(minr)];
    365 	struct wseventvar *evar;
    366 	int error;
    367 
    368 	if (WSMUXCTL(minr)) {
    369 		/* control device */
    370 		return (EINVAL);
    371 	}
    372 
    373 	evar = sc->sc_base.me_evp;
    374 	if (evar == NULL) {
    375 #ifdef DIAGNOSTIC
    376 		/* XXX can we get here? */
    377 		printf("wsmuxread: not open\n");
    378 #endif
    379 		return (EINVAL);
    380 	}
    381 
    382 	DPRINTFN(5,("wsmuxread: %s event read evar=%p\n",
    383 		    device_xname(sc->sc_base.me_dv), evar));
    384 	error = wsevent_read(evar, uio, flags);
    385 	DPRINTFN(5,("wsmuxread: %s event read ==> error=%d\n",
    386 		    device_xname(sc->sc_base.me_dv), error));
    387 	return (error);
    388 }
    389 
    390 /*
    391  * ioctl of the pseudo device from device table.
    392  */
    393 int
    394 wsmuxioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l)
    395 {
    396 	int u = WSMUXDEV(minor(dev));
    397 
    398 	return wsmux_do_ioctl(wsmuxdevs[u]->sc_base.me_dv, cmd, data, flag, l);
    399 }
    400 
    401 /*
    402  * ioctl of a mux via the parent mux, continuation of wsmuxioctl().
    403  */
    404 int
    405 wsmux_do_ioctl(device_t dv, u_long cmd, void *data, int flag,
    406 	       struct lwp *lwp)
    407 {
    408 	struct wsmux_softc *sc = device_private(dv);
    409 	struct wsevsrc *me;
    410 	int error, ok;
    411 	int s, n;
    412 	struct wseventvar *evar;
    413 	struct wscons_event event;
    414 	struct wsmux_device_list *l;
    415 
    416 	DPRINTF(("wsmux_do_ioctl: %s: enter sc=%p, cmd=%08lx\n",
    417 		 device_xname(sc->sc_base.me_dv), sc, cmd));
    418 
    419 	switch (cmd) {
    420 #if defined(COMPAT_50) || defined(MODULAR)
    421 	case WSMUXIO_OINJECTEVENT:
    422 #endif /* defined(COMPAT_50) || defined(MODULAR) */
    423 	case WSMUXIO_INJECTEVENT:
    424 		/* Inject an event, e.g., from moused. */
    425 		DPRINTF(("%s: inject\n", device_xname(sc->sc_base.me_dv)));
    426 
    427 		evar = sc->sc_base.me_evp;
    428 		if (evar == NULL) {
    429 			/* No event sink, so ignore it. */
    430 			DPRINTF(("wsmux_do_ioctl: event ignored\n"));
    431 			return (0);
    432 		}
    433 
    434 		s = spltty();
    435 		event.type = ((struct wscons_event *)data)->type;
    436 		event.value = ((struct wscons_event *)data)->value;
    437 		error = wsevent_inject(evar, &event, 1);
    438 		splx(s);
    439 
    440 		return error;
    441 	case WSMUXIO_ADD_DEVICE:
    442 #define d ((struct wsmux_device *)data)
    443 		DPRINTF(("%s: add type=%d, no=%d\n",
    444 			 device_xname(sc->sc_base.me_dv), d->type, d->idx));
    445 		switch (d->type) {
    446 #if NWSMOUSE > 0
    447 		case WSMUX_MOUSE:
    448 			return (wsmouse_add_mux(d->idx, sc));
    449 #endif
    450 #if NWSKBD > 0
    451 		case WSMUX_KBD:
    452 			return (wskbd_add_mux(d->idx, sc));
    453 #endif
    454 		case WSMUX_MUX:
    455 			return (wsmux_add_mux(d->idx, sc));
    456 		default:
    457 			return (EINVAL);
    458 		}
    459 	case WSMUXIO_REMOVE_DEVICE:
    460 		DPRINTF(("%s: rem type=%d, no=%d\n",
    461 			 device_xname(sc->sc_base.me_dv), d->type, d->idx));
    462 		/* Locate the device */
    463 		TAILQ_FOREACH(me, &sc->sc_cld, me_next) {
    464 			if (me->me_ops->type == d->type &&
    465 			    device_unit(me->me_dv) == d->idx) {
    466 				DPRINTF(("wsmux_do_ioctl: detach\n"));
    467 				wsmux_detach_sc(me);
    468 				return (0);
    469 			}
    470 		}
    471 		return (EINVAL);
    472 #undef d
    473 
    474 	case WSMUXIO_LIST_DEVICES:
    475 		DPRINTF(("%s: list\n", device_xname(sc->sc_base.me_dv)));
    476 		l = (struct wsmux_device_list *)data;
    477 		n = 0;
    478 		TAILQ_FOREACH(me, &sc->sc_cld, me_next) {
    479 			if (n >= WSMUX_MAXDEV)
    480 				break;
    481 			l->devices[n].type = me->me_ops->type;
    482 			l->devices[n].idx = device_unit(me->me_dv);
    483 			n++;
    484 		}
    485 		l->ndevices = n;
    486 		return (0);
    487 #ifdef WSDISPLAY_COMPAT_RAWKBD
    488 	case WSKBDIO_SETMODE:
    489 		sc->sc_rawkbd = *(int *)data;
    490 		DPRINTF(("wsmux_do_ioctl: save rawkbd = %d\n", sc->sc_rawkbd));
    491 		break;
    492 #endif
    493 
    494 	case WSKBDIO_SETVERSION:
    495 	case WSMOUSEIO_SETVERSION:
    496 	case WSDISPLAYIO_SETVERSION:
    497 		DPRINTF(("%s: WSxxxIO_SETVERSION\n", device_xname(sc->sc_base.me_dv)));
    498 		evar = sc->sc_base.me_evp;
    499 		if (evar == NULL)
    500 			return (EINVAL);
    501 		return wsevent_setversion(evar, *(int *)data);
    502 
    503 	case FIONBIO:
    504 		DPRINTF(("%s: FIONBIO\n", device_xname(sc->sc_base.me_dv)));
    505 		return (0);
    506 
    507 	case FIOASYNC:
    508 		DPRINTF(("%s: FIOASYNC\n", device_xname(sc->sc_base.me_dv)));
    509 		evar = sc->sc_base.me_evp;
    510 		if (evar == NULL)
    511 			return (EINVAL);
    512 		evar->async = *(int *)data != 0;
    513 		return (0);
    514 	case FIOSETOWN:
    515 		DPRINTF(("%s: FIOSETOWN\n", device_xname(sc->sc_base.me_dv)));
    516 		evar = sc->sc_base.me_evp;
    517 		if (evar == NULL)
    518 			return (EINVAL);
    519 		if (-*(int *)data != evar->io->p_pgid
    520 		    && *(int *)data != evar->io->p_pid)
    521 			return (EPERM);
    522 		return (0);
    523 	case TIOCSPGRP:
    524 		DPRINTF(("%s: TIOCSPGRP\n", device_xname(sc->sc_base.me_dv)));
    525 		evar = sc->sc_base.me_evp;
    526 		if (evar == NULL)
    527 			return (EINVAL);
    528 		if (*(int *)data != evar->io->p_pgid)
    529 			return (EPERM);
    530 		return (0);
    531 	default:
    532 		DPRINTF(("%s: unknown\n", device_xname(sc->sc_base.me_dv)));
    533 		break;
    534 	}
    535 
    536 	if (sc->sc_base.me_evp == NULL
    537 #if NWSDISPLAY > 0
    538 	    && sc->sc_base.me_dispdv == NULL
    539 #endif
    540 	    )
    541 		return (EACCES);
    542 
    543 	/* Return 0 if any of the ioctl() succeeds, otherwise the last error */
    544 	error = 0;
    545 	ok = 0;
    546 	TAILQ_FOREACH(me, &sc->sc_cld, me_next) {
    547 #ifdef DIAGNOSTIC
    548 		/* XXX check evp? */
    549 		if (me->me_parent != sc) {
    550 			printf("wsmux_do_ioctl: bad child %p\n", me);
    551 			continue;
    552 		}
    553 #endif
    554 		error = wsevsrc_ioctl(me, cmd, data, flag, lwp);
    555 		DPRINTF(("wsmux_do_ioctl: %s: me=%p dev=%s ==> %d\n",
    556 			 device_xname(sc->sc_base.me_dv), me,
    557 			 device_xname(me->me_dv), error));
    558 		if (!error)
    559 			ok = 1;
    560 	}
    561 	if (ok) {
    562 		error = 0;
    563 		if (cmd == WSKBDIO_SETENCODING) {
    564 			sc->sc_kbd_layout = *((kbd_t *)data);
    565 		}
    566 
    567 	}
    568 
    569 	return (error);
    570 }
    571 
    572 /*
    573  * poll() of the pseudo device from device table.
    574  */
    575 int
    576 wsmuxpoll(dev_t dev, int events, struct lwp *l)
    577 {
    578 	int minr = minor(dev);
    579 	struct wsmux_softc *sc = wsmuxdevs[WSMUXDEV(minr)];
    580 
    581 	if (WSMUXCTL(minr)) {
    582 		/* control device */
    583 		return (0);
    584 	}
    585 
    586 	if (sc->sc_base.me_evp == NULL) {
    587 #ifdef DIAGNOSTIC
    588 		printf("wsmuxpoll: not open\n");
    589 #endif
    590 		return (POLLHUP);
    591 	}
    592 
    593 	return (wsevent_poll(sc->sc_base.me_evp, events, l));
    594 }
    595 
    596 /*
    597  * kqfilter() of the pseudo device from device table.
    598  */
    599 int
    600 wsmuxkqfilter(dev_t dev, struct knote *kn)
    601 {
    602 	int minr = minor(dev);
    603 	struct wsmux_softc *sc = wsmuxdevs[WSMUXDEV(minr)];
    604 
    605 	if (WSMUXCTL(minr)) {
    606 		/* control device */
    607 		return (1);
    608 	}
    609 
    610 	if (sc->sc_base.me_evp == NULL) {
    611 #ifdef DIAGNOSTIC
    612 		printf("wsmuxkqfilter: not open\n");
    613 #endif
    614 		return (1);
    615 	}
    616 
    617 	return (wsevent_kqfilter(sc->sc_base.me_evp, kn));
    618 }
    619 
    620 /*
    621  * Add mux unit as a child to muxsc.
    622  */
    623 int
    624 wsmux_add_mux(int unit, struct wsmux_softc *muxsc)
    625 {
    626 	struct wsmux_softc *sc, *m;
    627 
    628 	sc = wsmux_getmux(unit);
    629 	if (sc == NULL)
    630 		return (ENXIO);
    631 
    632 	DPRINTF(("wsmux_add_mux: %s(%p) to %s(%p)\n",
    633 		 device_xname(sc->sc_base.me_dv), sc,
    634 		 device_xname(muxsc->sc_base.me_dv), muxsc));
    635 
    636 	if (sc->sc_base.me_parent != NULL || sc->sc_base.me_evp != NULL)
    637 		return (EBUSY);
    638 
    639 	/* The mux we are adding must not be an ancestor of itself. */
    640 	for (m = muxsc; m != NULL ; m = m->sc_base.me_parent)
    641 		if (m == sc)
    642 			return (EINVAL);
    643 
    644 	return (wsmux_attach_sc(muxsc, &sc->sc_base));
    645 }
    646 
    647 /* Create a new mux softc. */
    648 struct wsmux_softc *
    649 wsmux_create(const char *name, int unit)
    650 {
    651 	struct wsmux_softc *sc;
    652 
    653 	/* XXX This is wrong -- should use autoconfiguraiton framework */
    654 
    655 	DPRINTF(("wsmux_create: allocating\n"));
    656 	sc = malloc(sizeof *sc, M_DEVBUF, M_NOWAIT|M_ZERO);
    657 	if (sc == NULL)
    658 		return (NULL);
    659 	sc->sc_base.me_dv = malloc(sizeof(struct device), M_DEVBUF, M_NOWAIT|M_ZERO);
    660 	if (sc->sc_base.me_dv == NULL) {
    661 		free(sc, M_DEVBUF);
    662 		return NULL;
    663 	}
    664 	TAILQ_INIT(&sc->sc_cld);
    665 	snprintf(sc->sc_base.me_dv->dv_xname, sizeof sc->sc_base.me_dv->dv_xname,
    666 		 "%s%d", name, unit);
    667 	sc->sc_base.me_dv->dv_private = sc;
    668 	sc->sc_base.me_dv->dv_unit = unit;
    669 	sc->sc_base.me_ops = &wsmux_srcops;
    670 	sc->sc_kbd_layout = KB_NONE;
    671 	return (sc);
    672 }
    673 
    674 /* Attach me as a child to sc. */
    675 int
    676 wsmux_attach_sc(struct wsmux_softc *sc, struct wsevsrc *me)
    677 {
    678 	int error;
    679 
    680 	if (sc == NULL)
    681 		return (EINVAL);
    682 
    683 	DPRINTF(("wsmux_attach_sc: %s(%p): type=%d\n",
    684 		 device_xname(sc->sc_base.me_dv), sc, me->me_ops->type));
    685 
    686 #ifdef DIAGNOSTIC
    687 	if (me->me_parent != NULL) {
    688 		printf("wsmux_attach_sc: busy\n");
    689 		return (EBUSY);
    690 	}
    691 #endif
    692 	me->me_parent = sc;
    693 	TAILQ_INSERT_TAIL(&sc->sc_cld, me, me_next);
    694 
    695 	error = 0;
    696 #if NWSDISPLAY > 0
    697 	if (sc->sc_base.me_dispdv != NULL) {
    698 		/* This is a display mux, so attach the new device to it. */
    699 		DPRINTF(("wsmux_attach_sc: %s: set display %p\n",
    700 			 device_xname(sc->sc_base.me_dv),
    701 			 sc->sc_base.me_dispdv));
    702 		if (me->me_ops->dsetdisplay != NULL) {
    703 			error = wsevsrc_set_display(me, &sc->sc_base);
    704 			/* Ignore that the console already has a display. */
    705 			if (error == EBUSY)
    706 				error = 0;
    707 			if (!error) {
    708 #ifdef WSDISPLAY_COMPAT_RAWKBD
    709 				DPRINTF(("wsmux_attach_sc: %s set rawkbd=%d\n",
    710 					 device_xname(me->me_dv),
    711 					 sc->sc_rawkbd));
    712 				(void)wsevsrc_ioctl(me, WSKBDIO_SETMODE,
    713 						    &sc->sc_rawkbd, 0, 0);
    714 #endif
    715 				if (sc->sc_kbd_layout != KB_NONE)
    716 					(void)wsevsrc_ioctl(me,
    717 					    WSKBDIO_SETENCODING,
    718 					    &sc->sc_kbd_layout, FWRITE, 0);
    719 			}
    720 		}
    721 	}
    722 #endif
    723 	if (sc->sc_base.me_evp != NULL) {
    724 		/* Mux is open, so open the new subdevice */
    725 		DPRINTF(("wsmux_attach_sc: %s: calling open of %s\n",
    726 			 device_xname(sc->sc_base.me_dv),
    727 			 device_xname(me->me_dv)));
    728 		error = wsevsrc_open(me, sc->sc_base.me_evp);
    729 	} else {
    730 		DPRINTF(("wsmux_attach_sc: %s not open\n",
    731 			 device_xname(sc->sc_base.me_dv)));
    732 	}
    733 
    734 	if (error) {
    735 		me->me_parent = NULL;
    736 		TAILQ_REMOVE(&sc->sc_cld, me, me_next);
    737 	}
    738 
    739 	DPRINTF(("wsmux_attach_sc: %s(%p) done, error=%d\n",
    740 		 device_xname(sc->sc_base.me_dv), sc, error));
    741 	return (error);
    742 }
    743 
    744 /* Remove me from the parent. */
    745 void
    746 wsmux_detach_sc(struct wsevsrc *me)
    747 {
    748 	struct wsmux_softc *sc = me->me_parent;
    749 
    750 	DPRINTF(("wsmux_detach_sc: %s(%p) parent=%p\n",
    751 		 device_xname(me->me_dv), me, sc));
    752 
    753 #ifdef DIAGNOSTIC
    754 	if (sc == NULL) {
    755 		printf("wsmux_detach_sc: %s has no parent\n",
    756 		       device_xname(me->me_dv));
    757 		return;
    758 	}
    759 #endif
    760 
    761 #if NWSDISPLAY > 0
    762 	if (sc->sc_base.me_dispdv != NULL) {
    763 		if (me->me_ops->dsetdisplay != NULL)
    764 			/* ignore error, there's nothing we can do */
    765 			(void)wsevsrc_set_display(me, NULL);
    766 	} else
    767 #endif
    768 		if (me->me_evp != NULL) {
    769 		DPRINTF(("wsmux_detach_sc: close\n"));
    770 		/* mux device is open, so close multiplexee */
    771 		(void)wsevsrc_close(me);
    772 	}
    773 
    774 	TAILQ_REMOVE(&sc->sc_cld, me, me_next);
    775 	me->me_parent = NULL;
    776 
    777 	DPRINTF(("wsmux_detach_sc: done sc=%p\n", sc));
    778 }
    779 
    780 /*
    781  * Display ioctl() of a mux via the parent mux.
    782  */
    783 int
    784 wsmux_do_displayioctl(device_t dv, u_long cmd, void *data, int flag,
    785 		      struct lwp *l)
    786 {
    787 	struct wsmux_softc *sc = device_private(dv);
    788 	struct wsevsrc *me;
    789 	int error, ok;
    790 
    791 	DPRINTF(("wsmux_displayioctl: %s: sc=%p, cmd=%08lx\n",
    792 		 device_xname(sc->sc_base.me_dv), sc, cmd));
    793 
    794 #ifdef WSDISPLAY_COMPAT_RAWKBD
    795 	if (cmd == WSKBDIO_SETMODE) {
    796 		sc->sc_rawkbd = *(int *)data;
    797 		DPRINTF(("wsmux_displayioctl: rawkbd = %d\n", sc->sc_rawkbd));
    798 	}
    799 #endif
    800 
    801 	/*
    802 	 * Return 0 if any of the ioctl() succeeds, otherwise the last error.
    803 	 * Return EPASSTHROUGH if no mux component accepts the ioctl.
    804 	 */
    805 	error = EPASSTHROUGH;
    806 	ok = 0;
    807 	TAILQ_FOREACH(me, &sc->sc_cld, me_next) {
    808 		DPRINTF(("wsmux_displayioctl: me=%p\n", me));
    809 #ifdef DIAGNOSTIC
    810 		if (me->me_parent != sc) {
    811 			printf("wsmux_displayioctl: bad child %p\n", me);
    812 			continue;
    813 		}
    814 #endif
    815 		if (me->me_ops->ddispioctl != NULL) {
    816 			error = wsevsrc_display_ioctl(me, cmd, data, flag, l);
    817 			DPRINTF(("wsmux_displayioctl: me=%p dev=%s ==> %d\n",
    818 				 me, device_xname(me->me_dv), error));
    819 			if (!error)
    820 				ok = 1;
    821 		}
    822 	}
    823 	if (ok)
    824 		error = 0;
    825 
    826 	return (error);
    827 }
    828 
    829 #if NWSDISPLAY > 0
    830 /*
    831  * Set display of a mux via the parent mux.
    832  */
    833 int
    834 wsmux_evsrc_set_display(device_t dv, struct wsevsrc *ame)
    835 {
    836 	struct wsmux_softc *muxsc = (struct wsmux_softc *)ame;
    837 	struct wsmux_softc *sc = device_private(dv);
    838 	device_t displaydv = muxsc ? muxsc->sc_base.me_dispdv : NULL;
    839 
    840 	DPRINTF(("wsmux_set_display: %s: displaydv=%p\n",
    841 		 device_xname(sc->sc_base.me_dv), displaydv));
    842 
    843 	if (displaydv != NULL) {
    844 		if (sc->sc_base.me_dispdv != NULL)
    845 			return (EBUSY);
    846 	} else {
    847 		if (sc->sc_base.me_dispdv == NULL)
    848 			return (ENXIO);
    849 	}
    850 
    851 	return wsmux_set_display(sc, displaydv);
    852 }
    853 
    854 int
    855 wsmux_set_display(struct wsmux_softc *sc, device_t displaydv)
    856 {
    857 	device_t odisplaydv;
    858 	struct wsevsrc *me;
    859 	struct wsmux_softc *nsc = displaydv ? sc : NULL;
    860 	int error, ok;
    861 
    862 	odisplaydv = sc->sc_base.me_dispdv;
    863 	sc->sc_base.me_dispdv = displaydv;
    864 
    865 	if (displaydv)
    866 		aprint_verbose_dev(sc->sc_base.me_dv, "connecting to %s\n",
    867 		       device_xname(displaydv));
    868 	ok = 0;
    869 	error = 0;
    870 	TAILQ_FOREACH(me, &sc->sc_cld,me_next) {
    871 #ifdef DIAGNOSTIC
    872 		if (me->me_parent != sc) {
    873 			printf("wsmux_set_display: bad child parent %p\n", me);
    874 			continue;
    875 		}
    876 #endif
    877 		if (me->me_ops->dsetdisplay != NULL) {
    878 			error = wsevsrc_set_display(me, &nsc->sc_base);
    879 			DPRINTF(("wsmux_set_display: m=%p dev=%s error=%d\n",
    880 				 me, device_xname(me->me_dv), error));
    881 			if (!error) {
    882 				ok = 1;
    883 #ifdef WSDISPLAY_COMPAT_RAWKBD
    884 				DPRINTF(("wsmux_set_display: %s set rawkbd=%d\n",
    885 					 device_xname(me->me_dv), sc->sc_rawkbd));
    886 				(void)wsevsrc_ioctl(me, WSKBDIO_SETMODE,
    887 						    &sc->sc_rawkbd, 0, 0);
    888 #endif
    889 			}
    890 		}
    891 	}
    892 	if (ok)
    893 		error = 0;
    894 
    895 	if (displaydv == NULL)
    896 		aprint_verbose("%s: disconnecting from %s\n",
    897 		       device_xname(sc->sc_base.me_dv),
    898 		       device_xname(odisplaydv));
    899 
    900 	return (error);
    901 }
    902 #endif /* NWSDISPLAY > 0 */
    903