/* $NetBSD: ofcons.c,v 1.25 2006/03/29 07:10:25 thorpej Exp $ */ /* * Copyright (C) 1995, 1996 Wolfgang Solfrank. * Copyright (C) 1995, 1996 TooLs GmbH. * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by TooLs GmbH. * 4. The name of TooLs GmbH may not be used to endorse or promote products * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ #include __KERNEL_RCSID(0, "$NetBSD: ofcons.c,v 1.25 2006/03/29 07:10:25 thorpej Exp $"); #include #include #include #include #include #include #include #include #include struct ofcons_softc { struct device of_dev; struct tty *of_tty; struct callout sc_poll_ch; int of_flags; }; /* flags: */ #define OFPOLL 1 #define OFBURSTLEN 128 /* max number of bytes to write in one chunk */ cons_decl(ofcons_); static int stdin, stdout; static int ofcons_match(struct device *, struct cfdata *, void *); static void ofcons_attach(struct device *, struct device *, void *); CFATTACH_DECL(ofcons, sizeof(struct ofcons_softc), ofcons_match, ofcons_attach, NULL, NULL); extern struct cfdriver ofcons_cd; dev_type_open(ofcons_open); dev_type_close(ofcons_close); dev_type_read(ofcons_read); dev_type_write(ofcons_write); dev_type_ioctl(ofcons_ioctl); dev_type_tty(ofcons_tty); dev_type_poll(ofcons_poll); const struct cdevsw ofcons_cdevsw = { ofcons_open, ofcons_close, ofcons_read, ofcons_write, ofcons_ioctl, nostop, ofcons_tty, ofcons_poll, nommap, ttykqfilter, D_TTY }; static int ofcons_probe(void); static int ofcons_match(parent, match, aux) struct device *parent; struct cfdata *match; void *aux; { struct ofbus_attach_args *oba = aux; if (strcmp(oba->oba_busname, "ofw")) return (0); if (!ofcons_probe()) return 0; return OF_instance_to_package(stdin) == oba->oba_phandle || OF_instance_to_package(stdout) == oba->oba_phandle; } static void ofcons_attach(parent, self, aux) struct device *parent, *self; void *aux; { struct ofcons_softc *sc = device_private(self); printf("\n"); callout_init(&sc->sc_poll_ch); } static void ofcons_start(struct tty *); static int ofcons_param(struct tty *, struct termios *); static void ofcons_pollin(void *); int ofcons_open(dev, flag, mode, l) dev_t dev; int flag, mode; struct lwp *l; { struct ofcons_softc *sc; int unit = minor(dev); struct tty *tp; if (unit >= ofcons_cd.cd_ndevs) return ENXIO; sc = ofcons_cd.cd_devs[unit]; if (!sc) return ENXIO; if (!(tp = sc->of_tty)) sc->of_tty = tp = ttymalloc(); tp->t_oproc = ofcons_start; tp->t_param = ofcons_param; tp->t_dev = dev; if (!(tp->t_state & TS_ISOPEN)) { ttychars(tp); tp->t_iflag = TTYDEF_IFLAG; tp->t_oflag = TTYDEF_OFLAG; tp->t_cflag = TTYDEF_CFLAG; tp->t_lflag = TTYDEF_LFLAG; tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED; ofcons_param(tp, &tp->t_termios); ttsetwater(tp); } else if ((tp->t_state&TS_XCLUDE) && suser(l->l_proc->p_ucred, &l->l_proc->p_acflag)) return EBUSY; tp->t_state |= TS_CARR_ON; if (!(sc->of_flags & OFPOLL)) { sc->of_flags |= OFPOLL; callout_reset(&sc->sc_poll_ch, 1, ofcons_pollin, sc); } return (*tp->t_linesw->l_open)(dev, tp); } int ofcons_close(dev, flag, mode, l) dev_t dev; int flag, mode; struct lwp *l; { struct ofcons_softc *sc = ofcons_cd.cd_devs[minor(dev)]; struct tty *tp = sc->of_tty; callout_stop(&sc->sc_poll_ch); sc->of_flags &= ~OFPOLL; (*tp->t_linesw->l_close)(tp, flag); ttyclose(tp); return 0; } int ofcons_read(dev, uio, flag) dev_t dev; struct uio *uio; int flag; { struct ofcons_softc *sc = ofcons_cd.cd_devs[minor(dev)]; struct tty *tp = sc->of_tty; return (*tp->t_linesw->l_read)(tp, uio, flag); } int ofcons_write(dev, uio, flag) dev_t dev; struct uio *uio; int flag; { struct ofcons_softc *sc = ofcons_cd.cd_devs[minor(dev)]; struct tty *tp = sc->of_tty; return (*tp->t_linesw->l_write)(tp, uio, flag); } int ofcons_poll(dev, events, l) dev_t dev; int events; struct lwp *l; { struct ofcons_softc *sc = ofcons_cd.cd_devs[minor(dev)]; struct tty *tp = sc->of_tty; return ((*tp->t_linesw->l_poll)(tp, events, l)); } int ofcons_ioctl(dev, cmd, data, flag, l) dev_t dev; u_long cmd; caddr_t data; int flag; struct lwp *l; { struct ofcons_softc *sc = ofcons_cd.cd_devs[minor(dev)]; struct tty *tp = sc->of_tty; int error; if ((error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, l)) != EPASSTHROUGH) return error; return ttioctl(tp, cmd, data, flag, l); } struct tty * ofcons_tty(dev) dev_t dev; { struct ofcons_softc *sc = ofcons_cd.cd_devs[minor(dev)]; return sc->of_tty; } static void ofcons_start(tp) struct tty *tp; { struct clist *cl; int s, len; u_char buf[OFBURSTLEN]; s = spltty(); if (tp->t_state & (TS_TIMEOUT | TS_BUSY | TS_TTSTOP)) { splx(s); return; } tp->t_state |= TS_BUSY; splx(s); cl = &tp->t_outq; len = q_to_b(cl, buf, OFBURSTLEN); OF_write(stdout, buf, len); s = spltty(); tp->t_state &= ~TS_BUSY; if (cl->c_cc) { tp->t_state |= TS_TIMEOUT; callout_reset(&tp->t_rstrt_ch, 1, ttrstrt, (void *)tp); } if (cl->c_cc <= tp->t_lowat) { if (tp->t_state & TS_ASLEEP) { tp->t_state &= ~TS_ASLEEP; wakeup(cl); } selwakeup(&tp->t_wsel); } splx(s); } static int ofcons_param(tp, t) struct tty *tp; struct termios *t; { tp->t_ispeed = t->c_ispeed; tp->t_ospeed = t->c_ospeed; tp->t_cflag = t->c_cflag; return 0; } static void ofcons_pollin(aux) void *aux; { struct ofcons_softc *sc = aux; struct tty *tp = sc->of_tty; char ch; while (OF_read(stdin, &ch, 1) > 0) { if (tp && (tp->t_state & TS_ISOPEN)) (*tp->t_linesw->l_rint)(ch, tp); } callout_reset(&sc->sc_poll_ch, 1, ofcons_pollin, sc); } static int ofcons_probe() { int chosen; char stdinbuf[4], stdoutbuf[4]; if (stdin) return 1; if ((chosen = OF_finddevice("/chosen")) == -1) return 0; if (OF_getprop(chosen, "stdin", stdinbuf, sizeof stdinbuf) != sizeof stdinbuf || OF_getprop(chosen, "stdout", stdoutbuf, sizeof stdoutbuf) != sizeof stdoutbuf) return 0; /* Decode properties. */ stdin = of_decode_int(stdinbuf); stdout = of_decode_int(stdoutbuf); return 1; } void ofcons_cnprobe(cd) struct consdev *cd; { int maj; if (!ofcons_probe()) return; maj = cdevsw_lookup_major(&ofcons_cdevsw); cd->cn_dev = makedev(maj, 0); cd->cn_pri = CN_INTERNAL; } void ofcons_cninit(cd) struct consdev *cd; { } int ofcons_cngetc(dev) dev_t dev; { unsigned char ch = '\0'; int l; while ((l = OF_read(stdin, &ch, 1)) != 1) if (l != -2 && l != 0) return -1; return ch; } void ofcons_cnputc(dev, c) dev_t dev; int c; { char ch = c; OF_write(stdout, &ch, 1); } void ofcons_cnpollc(dev, on) dev_t dev; int on; { struct ofcons_softc *sc = ofcons_cd.cd_devs[minor(dev)]; if (!sc) return; if (on) { if (sc->of_flags & OFPOLL) callout_stop(&sc->sc_poll_ch); sc->of_flags &= ~OFPOLL; } else { if (!(sc->of_flags & OFPOLL)) { sc->of_flags |= OFPOLL; callout_reset(&sc->sc_poll_ch, 1, ofcons_pollin, sc); } } }