/* $NetBSD: cons.c,v 1.46 2003/03/06 00:38:26 matt Exp $ */ /* * Copyright (c) 1988 University of Utah. * Copyright (c) 1990, 1993 * The Regents of the University of California. All rights reserved. * * This code is derived from software contributed to Berkeley by * the Systems Programming Group of the University of Utah Computer * Science Department. * * 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 the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``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 THE REGENTS OR CONTRIBUTORS 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. * * from: Utah $Hdr: cons.c 1.7 92/01/21$ * * @(#)cons.c 8.2 (Berkeley) 1/12/94 */ #include __KERNEL_RCSID(0, "$NetBSD: cons.c,v 1.46 2003/03/06 00:38:26 matt Exp $"); #include #include #include #include #include #include #include #include #include #include #include dev_type_open(cnopen); dev_type_close(cnclose); dev_type_read(cnread); dev_type_write(cnwrite); dev_type_ioctl(cnioctl); dev_type_poll(cnpoll); dev_type_kqfilter(cnkqfilter); const struct cdevsw cons_cdevsw = { cnopen, cnclose, cnread, cnwrite, cnioctl, nostop, notty, cnpoll, nommap, cnkqfilter, D_TTY }; struct tty *constty = NULL; /* virtual console output device */ struct consdev *cn_tab; /* physical console device info */ struct vnode *cn_devvp; /* vnode for underlying device. */ int cnopen(dev_t dev, int flag, int mode, struct proc *p) { const struct cdevsw *cdev; dev_t cndev; if (cn_tab == NULL) return (0); /* * always open the 'real' console device, so we don't get nailed * later. This follows normal device semantics; they always get * open() calls. */ cndev = cn_tab->cn_dev; if (cndev == NODEV) { /* * This is most likely an error in the console attach * code. Panicing looks better than jumping into nowhere * through cdevsw below.... */ panic("cnopen: no console device"); } if (dev == cndev) { /* * This causes cnopen() to be called recursively, which * is generally a bad thing. It is often caused when * dev == 0 and cn_dev has not been set, but was probably * initialised to 0. */ panic("cnopen: cn_tab->cn_dev == dev"); } cdev = cdevsw_lookup(cndev); if (cdev == NULL) return (ENXIO); if (cn_devvp == NULLVP) { /* try to get a reference on its vnode, but fail silently */ cdevvp(cndev, &cn_devvp); } return ((*cdev->d_open)(cndev, flag, mode, p)); } int cnclose(dev_t dev, int flag, int mode, struct proc *p) { const struct cdevsw *cdev; struct vnode *vp; if (cn_tab == NULL) return (0); /* * If the real console isn't otherwise open, close it. * If it's otherwise open, don't close it, because that'll * screw up others who have it open. */ dev = cn_tab->cn_dev; cdev = cdevsw_lookup(dev); if (cdev == NULL) return (ENXIO); if (cn_devvp != NULLVP) { /* release our reference to real dev's vnode */ vrele(cn_devvp); cn_devvp = NULLVP; } if (vfinddev(dev, VCHR, &vp) && vcount(vp)) return (0); return ((*cdev->d_close)(dev, flag, mode, p)); } int cnread(dev_t dev, struct uio *uio, int flag) { const struct cdevsw *cdev; /* * If we would redirect input, punt. This will keep strange * things from happening to people who are using the real * console. Nothing should be using /dev/console for * input (except a shell in single-user mode, but then, * one wouldn't TIOCCONS then). */ if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE)) return 0; else if (cn_tab == NULL) return ENXIO; dev = cn_tab->cn_dev; cdev = cdevsw_lookup(dev); if (cdev == NULL) return (ENXIO); return ((*cdev->d_read)(dev, uio, flag)); } int cnwrite(dev_t dev, struct uio *uio, int flag) { const struct cdevsw *cdev; /* * Redirect output, if that's appropriate. * If there's no real console, return ENXIO. */ if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE)) dev = constty->t_dev; else if (cn_tab == NULL) return ENXIO; else dev = cn_tab->cn_dev; cdev = cdevsw_lookup(dev); if (cdev == NULL) return (ENXIO); return ((*cdev->d_write)(dev, uio, flag)); } int cnioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p) { const struct cdevsw *cdev; int error; /* * Superuser can always use this to wrest control of console * output from the "virtual" console. */ if (cmd == TIOCCONS && constty != NULL) { error = suser(p->p_ucred, (u_short *) NULL); if (error) return (error); constty = NULL; return (0); } /* * Redirect the ioctl, if that's appropriate. * Note that strange things can happen, if a program does * ioctls on /dev/console, then the console is redirected * out from under it. */ if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE)) dev = constty->t_dev; else if (cn_tab == NULL) return ENXIO; else dev = cn_tab->cn_dev; cdev = cdevsw_lookup(dev); if (cdev == NULL) return (ENXIO); return ((*cdev->d_ioctl)(dev, cmd, data, flag, p)); } /*ARGSUSED*/ int cnpoll(dev_t dev, int events, struct proc *p) { const struct cdevsw *cdev; /* * Redirect the poll, if that's appropriate. * I don't want to think of the possible side effects * of console redirection here. */ if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE)) dev = constty->t_dev; else if (cn_tab == NULL) return ENXIO; else dev = cn_tab->cn_dev; cdev = cdevsw_lookup(dev); if (cdev == NULL) return (ENXIO); return ((*cdev->d_poll)(dev, events, p)); } /*ARGSUSED*/ int cnkqfilter(dev_t dev, struct knote *kn) { const struct cdevsw *cdev; /* * Redirect the kqfilter, if that's appropriate. * I don't want to think of the possible side effects * of console redirection here. */ if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE)) dev = constty->t_dev; else if (cn_tab == NULL) return ENXIO; else dev = cn_tab->cn_dev; cdev = cdevsw_lookup(dev); if (cdev == NULL) return (ENXIO); return ((*cdev->d_kqfilter)(dev, kn)); } int cngetc(void) { if (cn_tab == NULL) return (0); return ((*cn_tab->cn_getc)(cn_tab->cn_dev)); } int cngetsn(char *cp, int size) { char *lp; int c, len; cnpollc(1); lp = cp; len = 0; for (;;) { c = cngetc(); switch (c) { case '\n': case '\r': printf("\n"); *lp++ = '\0'; cnpollc(0); return (len); case '\b': case '\177': case '#': if (len) { --len; --lp; printf("\b \b"); } continue; case '@': case 'u'&037: /* CTRL-u */ len = 0; lp = cp; printf("\n"); continue; default: if (len + 1 >= size || c < ' ') { printf("\007"); continue; } printf("%c", c); ++len; *lp++ = c; } } } void cnputc(int c) { if (cn_tab == NULL) return; if (c) { (*cn_tab->cn_putc)(cn_tab->cn_dev, c); if (c == '\n') (*cn_tab->cn_putc)(cn_tab->cn_dev, '\r'); } } void cnpollc(int on) { static int refcount = 0; if (cn_tab == NULL) return; if (!on) --refcount; if (refcount == 0) (*cn_tab->cn_pollc)(cn_tab->cn_dev, on); if (on) ++refcount; } void nullcnpollc(dev_t dev, int on) { } void cnbell(u_int pitch, u_int period, u_int volume) { if (cn_tab == NULL || cn_tab->cn_bell == NULL) return; (*cn_tab->cn_bell)(cn_tab->cn_dev, pitch, period, volume); } void cnflush(void) { if (cn_tab == NULL || cn_tab->cn_flush == NULL) return; (*cn_tab->cn_flush)(cn_tab->cn_dev); } void cnhalt(void) { if (cn_tab == NULL || cn_tab->cn_halt == NULL) return; (*cn_tab->cn_halt)(cn_tab->cn_dev); }