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