/* $NetBSD: rcons.c,v 1.59 2003/07/15 02:54:39 lukem Exp $ */ /* * Copyright (c) 1995 * The Regents of the University of California. All rights reserved. * * This code is derived from software contributed to Berkeley by * Ted Lemon. * * 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. * */ #include __KERNEL_RCSID(0, "$NetBSD: rcons.c,v 1.59 2003/07/15 02:54:39 lukem Exp $"); #include "rasterconsole.h" #if NRASTERCONSOLE > 0 #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "fb.h" #include "px.h" /* * Console I/O is redirected to the appropriate device, either a screen and * keyboard, a serial port, or the "virtual" console. */ extern struct tty *constty; /* XXX virtual console output device */ struct tty *fbconstty; /* Frame buffer console tty... */ struct tty rcons_tty [NRASTERCONSOLE]; /* Console tty struct... */ dev_t cn_in_dev = NODEV; /* console input device. */ char rcons_maxcols [20]; static struct rconsole rc; static void rcons_vputc __P((dev_t dev, int c)); #ifdef notyet void rconsstart __P((struct tty *)); static void rcons_later __P((void*)); #endif dev_type_open(rconsopen); dev_type_close(rconsclose); dev_type_read(rconsread); dev_type_write(rconswrite); dev_type_ioctl(rconsioctl); dev_type_tty(rconstty); dev_type_poll(rconspoll); const struct cdevsw rcons_cdevsw = { rconsopen, rconsclose, rconsread, rconswrite, rconsioctl, nostop, rconstty, rconspoll, nommap, ttykqfilter, D_TTY }; /* * rcons_connect is called by fbconnect when the first frame buffer is * attached. That frame buffer will always be the console frame buffer. */ #if NFB > 0 void rcons_connect (info) struct fbinfo *info; { static struct rasops_info ri; int cookie, epwf, bior; /* XXX */ switch (info->fi_type.fb_type) { case PMAX_FBTYPE_MFB: ri.ri_depth = 8; ri.ri_flg = RI_CLEAR | RI_FORCEMONO; epwf = 0; bior = WSDISPLAY_FONTORDER_L2R; break; case PMAX_FBTYPE_PM_MONO: ri.ri_depth = info->fi_type.fb_depth; ri.ri_flg = RI_CLEAR; epwf = 1; bior = WSDISPLAY_FONTORDER_R2L; break; default: ri.ri_depth = info->fi_type.fb_depth; ri.ri_flg = RI_CLEAR; epwf = (ri.ri_depth != 8); bior = WSDISPLAY_FONTORDER_L2R; break; } ri.ri_width = info->fi_type.fb_width; ri.ri_height = info->fi_type.fb_height; ri.ri_stride = info->fi_linebytes; ri.ri_bits = (u_char *)info->fi_pixels; wsfont_init(); if (epwf) cookie = wsfont_find(NULL, 8, 0, 0, bior, WSDISPLAY_FONTORDER_L2R); else cookie = wsfont_find("Gallant", 0, 0, 0, bior, WSDISPLAY_FONTORDER_L2R); if (cookie > 0) { if (wsfont_lock(cookie, &ri.ri_font)) panic("wsfont_lock failed"); } else panic("rcons_connect: no font available"); /* Get operations set and set framebugger colormap */ if (rasops_init(&ri, 5000, 80)) panic("rcons_connect: rasops_init failed"); if (ri.ri_depth == 8 && info->fi_type.fb_type != PMAX_FBTYPE_MFB) info->fi_driver->fbd_putcmap(info, rasops_cmap, 0, 256); fbconstty = &rcons_tty [0]; fbconstty->t_dev = makedev(85, 0); /* /dev/console */ fbconstty->t_ispeed = fbconstty->t_ospeed = TTYDEF_SPEED; fbconstty->t_param = (int (*)(struct tty *, struct termios *))nullop; /* * Connect the console geometry... * the part that rcons.h says * "This section must be filled in by the framebugger device" */ rc.rc_ops = &ri.ri_ops; rc.rc_cookie = &ri; rc.rc_maxrow = ri.ri_rows; rc.rc_maxcol = ri.ri_cols; rc.rc_bell = lk_bell; rc.rc_width = ri.ri_width; rc.rc_height = ri.ri_height; rc.rc_row = 0; rc.rc_col = 0; rc.rc_deffgcolor = WSCOL_WHITE; rc.rc_defbgcolor = WSCOL_BLACK; rcons_init(&rc, 1); rcons_ttyinit(fbconstty); } #endif /* * Called by drivers which can provide a native 'struct wsdisplay_emulops'. */ #if NPX > 0 void rcons_connect_native (ops, cookie, width, height, cols, rows) struct wsdisplay_emulops *ops; void *cookie; int width, height, cols, rows; { /*XXX*/ cn_in_dev = cn_tab->cn_dev; /*XXX*/ /* FIXME */ fbconstty = &rcons_tty [0]; fbconstty->t_dev = makedev(85, 0); /* /dev/console */ fbconstty->t_ispeed = fbconstty->t_ospeed = TTYDEF_SPEED; fbconstty->t_param = (int (*)(struct tty *, struct termios *))nullop; /* * Connect the console geometry... * the part that rcons.h says * "This section must be filled in by the framebugger device" */ rc.rc_ops = ops; rc.rc_cookie = cookie; rc.rc_bell = lk_bell; rc.rc_width = width; rc.rc_height = width; rc.rc_maxcol = cols; rc.rc_maxrow = rows; rc.rc_row = 0; rc.rc_col = 0; rc.rc_deffgcolor = WSCOL_WHITE; rc.rc_defbgcolor = WSCOL_BLACK; rcons_init(&rc, 1); rcons_ttyinit(fbconstty); } #endif /* * Hack around the rcons putchar interface not taking a dev_t. */ static void rcons_vputc(dev, c) dev_t dev; int c; { /* * Call the pointer-to-function that rcons_init tried to give us, * discarding the dev_t argument. */ rcons_cnputc(c); } /* * Set up the console device to take input from `dev' * and send output via rcons. */ void rcons_indev(cn) struct consdev *cn; { int s; s = spltty(); /* Send any subsequent console calls to this cn_tab to rcons. */ cn->cn_dev = makedev(cdevsw_lookup_major(&rcons_cdevsw), 0); /* fixup for signature mismatch. */ cn->cn_putc = rcons_vputc; splx(s); } /* * Pseudo-device attach routine. rcons doesn't need to be a pseudo * device, and isn't on a sparc; this is a useful point to set up * the vnode, clean up pmax console initialization, and set * the initial tty size. */ /* ARGSUSED */ void rasterconsoleattach (n) int n; { struct tty *tp = &rcons_tty [0]; #ifdef notyet const struct cdevsw *cdev; int status; #endif /* Set up the tty queues now... */ clalloc(&tp->t_rawq, 1024, 1); clalloc(&tp->t_canq, 1024, 1); /* output queue doesn't need quoting */ clalloc(&tp->t_outq, 1024, 0); /* Set default line discipline. */ tp->t_linesw = linesw[0]; #ifdef DEBUG printf("rconsattach: %d raster consoles\n", n); #endif #ifdef notyet /* ugly console input on pmaxes */ /* Try to set up the input device... */ if (cn_in_dev != NODEV && cn_in_devvp == NULLVP) { /* try to get a reference on its vnode, but fail silently */ cdevvp(cn_in_dev, &cn_in_devvp); cdev = cdevsw_lookup(cn_in_dev); if (cdev != NULL) { status = ((*cdev->d_open)(cn_in_dev, O_NONBLOCK, S_IFCHR, curlwp)); /* XXX */ } else { status = ENXIO; } if (status) printf ("rconsattach: input device open failed: %d\n", status); } /* Now the input side has been opened cleanly, we can dispense * with any special-case console input hacks, and point the * console device at rcons. */ #endif } /* ARGSUSED */ int rconsopen(dev, flag, mode, p) dev_t dev; int flag, mode; struct proc *p; { struct tty *tp = &rcons_tty [0]; /*static int firstopen = 1;*/ int status; if ((tp->t_state & TS_ISOPEN) == 0) { /* * Leave baud rate alone! */ ttychars(tp); tp->t_iflag = TTYDEF_IFLAG; tp->t_oflag = TTYDEF_OFLAG; tp->t_lflag = TTYDEF_LFLAG; tp->t_cflag = TTYDEF_CFLAG; tp->t_state = TS_ISOPEN | TS_CARR_ON; (void)(*tp->t_param)(tp, &tp->t_termios); ttsetwater(tp); } else if (tp->t_state & TS_XCLUDE && p->p_ucred->cr_uid != 0) return (EBUSY); status = (*tp->t_linesw->l_open)(dev, tp); return status; } /* ARGSUSED */ int rconsclose(dev, flag, mode, p) dev_t dev; int flag, mode; struct proc *p; { struct tty *tp = &rcons_tty [0]; (*tp->t_linesw->l_close)(tp, flag); ttyclose(tp); return (0); } /* ARGSUSED */ int rconsread(dev, uio, flag) dev_t dev; struct uio *uio; int flag; { struct tty *tp = &rcons_tty [0]; return ((*tp->t_linesw->l_read)(tp, uio, flag)); } /* ARGSUSED */ int rconswrite(dev, uio, flag) dev_t dev; struct uio *uio; int flag; { struct tty *tp; tp = &rcons_tty [0]; return ((*tp->t_linesw->l_write)(tp, uio, flag)); } int rconspoll(dev, events, p) dev_t dev; int events; struct proc *p; { struct tty *tp; tp = &rcons_tty [0]; return ((*tp->t_linesw->l_poll)(tp, events, p)); } struct tty * rconstty(dev) dev_t dev; { struct tty *tp = &rcons_tty[0]; return (tp); } int rconsioctl(dev, cmd, data, flag, p) dev_t dev; u_long cmd; caddr_t data; int flag; struct proc *p; { struct tty *tp; int error; tp = &rcons_tty [0]; if ((error = tp->t_linesw->l_ioctl(tp, cmd, data, flag, p)) != EPASSTHROUGH) return (error); return ttioctl(tp, cmd, data, flag, p); } #ifdef notyet void rconsstart(tp) struct tty *tp; { struct clist *cl; int s; s = spltty(); if (tp->t_state & (TS_BUSY|TS_TTSTOP|TS_TIMEOUT)) goto out; cl = &tp->t_outq; if (cl->c_cc) { tp->t_state |= TS_BUSY; if (0 /* hardware prio */) { /* called at level zero - update screen now. */ (void) spllowersoftclock(); /*kd_putfb(tp);*/ (void) spltty(); tp->t_state &= ~TS_BUSY; } else { /* called at interrupt level - do it later */ callout_reset(&tp->t_rstrt_ch, 0, rcons_later, 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); } out: splx(s); } /* * Timeout function to do delayed writes to the screen. * Called at splsoftclock when requested by rconssstart. */ static void rcons_later(tpaddr) void *tpaddr; { struct tty *tp = tpaddr; int s; #if 0 /*XXX*/printf("rcons_later\n"); #endif s = spltty(); (*(fbconstty->t_oproc)) (tp); /* XXX */ tp->t_state &= ~TS_BUSY; (*tp->t_linesw->l_start)(tp); splx(s); } #endif /* notyet */ /* * Our "interrupt" routine for input. * Called by the keyboard device driver at spltty when it has * input for rcons. */ void rcons_input (dev, ic) dev_t dev; int ic; { struct tty *tp; int unit = minor (dev); #ifdef RCONS_DEBUG printf("rcons_input: dev %d.%d gives %c\n", major(dev), unit, ic); #endif if (unit > NRASTERCONSOLE) return; tp = &rcons_tty [unit]; if (!(tp -> t_state & TS_ISOPEN)) { return; } (*tp->t_linesw->l_rint)(ic, tp); } #endif /* NRASTERCONSOLE > 0 */