Home | History | Annotate | Line # | Download | only in dev
kd.c revision 1.49
      1  1.49     rmind /*	$NetBSD: kd.c,v 1.49 2011/04/24 16:26:57 rmind Exp $	*/
      2   1.1       gwr 
      3   1.1       gwr /*-
      4   1.1       gwr  * Copyright (c) 1996 The NetBSD Foundation, Inc.
      5   1.1       gwr  * All rights reserved.
      6   1.1       gwr  *
      7   1.1       gwr  * This code is derived from software contributed to The NetBSD Foundation
      8   1.1       gwr  * by Gordon W. Ross.
      9   1.1       gwr  *
     10   1.1       gwr  * Redistribution and use in source and binary forms, with or without
     11   1.1       gwr  * modification, are permitted provided that the following conditions
     12   1.1       gwr  * are met:
     13   1.1       gwr  * 1. Redistributions of source code must retain the above copyright
     14   1.1       gwr  *    notice, this list of conditions and the following disclaimer.
     15   1.1       gwr  * 2. Redistributions in binary form must reproduce the above copyright
     16   1.1       gwr  *    notice, this list of conditions and the following disclaimer in the
     17   1.1       gwr  *    documentation and/or other materials provided with the distribution.
     18   1.1       gwr  *
     19   1.1       gwr  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20   1.1       gwr  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21   1.1       gwr  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22   1.1       gwr  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23   1.1       gwr  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24   1.1       gwr  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25   1.1       gwr  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26   1.1       gwr  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27   1.1       gwr  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28   1.1       gwr  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29   1.1       gwr  * POSSIBILITY OF SUCH DAMAGE.
     30   1.1       gwr  */
     31   1.1       gwr 
     32   1.1       gwr /*
     33   1.7        pk  * Console driver based on PROM primitives.
     34   1.1       gwr  *
     35   1.7        pk  * This driver exists to provide a tty device that the indirect
     36   1.7        pk  * console driver can point to. It also provides a hook that
     37   1.7        pk  * allows another device to serve console input. This will normally
     38   1.7        pk  * be a keyboard driver (see sys/dev/sun/kbd.c)
     39   1.1       gwr  */
     40  1.26     lukem 
     41  1.26     lukem #include <sys/cdefs.h>
     42  1.49     rmind __KERNEL_RCSID(0, "$NetBSD: kd.c,v 1.49 2011/04/24 16:26:57 rmind Exp $");
     43  1.18        pk 
     44  1.18        pk #include "opt_kgdb.h"
     45  1.19        pk #include "fb.h"
     46   1.1       gwr 
     47   1.1       gwr #include <sys/param.h>
     48   1.1       gwr #include <sys/proc.h>
     49   1.1       gwr #include <sys/systm.h>
     50   1.7        pk #include <sys/kernel.h>
     51   1.1       gwr #include <sys/ioctl.h>
     52   1.1       gwr #include <sys/tty.h>
     53   1.1       gwr #include <sys/file.h>
     54   1.1       gwr #include <sys/conf.h>
     55   1.1       gwr #include <sys/device.h>
     56  1.39      elad #include <sys/kauth.h>
     57   1.1       gwr 
     58   1.1       gwr #include <machine/bsd_openprom.h>
     59   1.4        pk #include <machine/promlib.h>
     60   1.1       gwr #include <machine/eeprom.h>
     61   1.1       gwr #include <machine/psl.h>
     62   1.1       gwr #include <machine/cpu.h>
     63   1.1       gwr #include <machine/kbd.h>
     64   1.1       gwr #include <machine/autoconf.h>
     65   1.1       gwr 
     66  1.19        pk #if defined(RASTERCONSOLE) && NFB > 0
     67  1.14        pk #include <dev/sun/fbio.h>
     68  1.14        pk #include <dev/sun/fbvar.h>
     69   1.1       gwr #endif
     70   1.1       gwr 
     71   1.7        pk #include <dev/cons.h>
     72   1.7        pk #include <sparc/dev/cons.h>
     73   1.1       gwr 
     74   1.7        pk #include <dev/sun/event_var.h>
     75   1.1       gwr #include <dev/sun/kbd_xlate.h>
     76   1.7        pk #include <dev/sun/kbdvar.h>
     77   1.1       gwr 
     78   1.1       gwr #define PUT_WSIZE	64
     79   1.1       gwr 
     80   1.1       gwr struct kd_softc {
     81   1.1       gwr 	struct	device kd_dev;		/* required first: base device */
     82   1.1       gwr 	struct  tty *kd_tty;
     83   1.1       gwr 	int rows, cols;
     84   1.7        pk 
     85   1.7        pk 	/* Console input hook */
     86   1.7        pk 	struct cons_channel *kd_in;
     87   1.1       gwr };
     88   1.1       gwr 
     89   1.1       gwr /*
     90   1.1       gwr  * There is no point in pretending there might be
     91   1.1       gwr  * more than one keyboard/display device.
     92   1.1       gwr  */
     93   1.1       gwr static struct kd_softc kd_softc;
     94   1.1       gwr 
     95  1.36       uwe /* For keyboard driver to register itself as console input */
     96  1.36       uwe void kd_attach_input(struct cons_channel *);
     97  1.36       uwe 
     98  1.36       uwe static void kd_init(struct kd_softc *);
     99  1.36       uwe static void kdstart(struct tty *);
    100  1.36       uwe static void kd_later(void *);
    101  1.36       uwe static void kd_putfb(struct tty *);
    102   1.1       gwr static int kdparam(struct tty *, struct termios *);
    103  1.29       uwe static void kd_cons_input(int);
    104   1.1       gwr 
    105  1.22   gehenna dev_type_open(kdopen);
    106  1.22   gehenna dev_type_close(kdclose);
    107  1.22   gehenna dev_type_read(kdread);
    108  1.22   gehenna dev_type_write(kdwrite);
    109  1.22   gehenna dev_type_ioctl(kdioctl);
    110  1.22   gehenna dev_type_tty(kdtty);
    111  1.22   gehenna dev_type_poll(kdpoll);
    112  1.22   gehenna 
    113  1.22   gehenna const struct cdevsw kd_cdevsw = {
    114  1.22   gehenna 	kdopen, kdclose, kdread, kdwrite, kdioctl,
    115  1.23  jdolecek 	nostop, kdtty, kdpoll, nommap, ttykqfilter, D_TTY
    116  1.22   gehenna };
    117  1.22   gehenna 
    118   1.1       gwr /*
    119   1.7        pk  * Prepare the console tty; called on first open of /dev/console
    120   1.1       gwr  */
    121  1.36       uwe static void
    122  1.36       uwe kd_init(struct kd_softc *kd)
    123   1.1       gwr {
    124   1.1       gwr 	struct tty *tp;
    125   1.1       gwr 
    126  1.49     rmind 	tp = tty_alloc();
    127  1.46     joerg 	callout_setfunc(&tp->t_rstrt_ch, kd_later, tp);
    128   1.1       gwr 	tp->t_oproc = kdstart;
    129   1.1       gwr 	tp->t_param = kdparam;
    130  1.22   gehenna 	tp->t_dev = makedev(cdevsw_lookup_major(&kd_cdevsw), 0);
    131   1.1       gwr 
    132   1.1       gwr 	tty_attach(tp);
    133   1.1       gwr 	kd->kd_tty = tp;
    134   1.1       gwr 
    135   1.1       gwr 	/*
    136   1.7        pk 	 * Get the console struct winsize.
    137   1.1       gwr 	 */
    138  1.19        pk #if defined(RASTERCONSOLE) && NFB > 0
    139   1.7        pk 	/* If the raster console driver is attached, copy its size */
    140   1.7        pk 	kd->rows = fbrcons_rows();
    141   1.7        pk 	kd->cols = fbrcons_cols();
    142   1.8        pk 	rcons_ttyinit(tp);
    143   1.1       gwr #endif
    144   1.1       gwr 
    145   1.7        pk 	/* else, consult the PROM */
    146   1.7        pk 	switch (prom_version()) {
    147  1.31        pk 	char prop[6+1];		/* Enough for six digits */
    148   1.7        pk 	struct eeprom *ep;
    149   1.7        pk 	case PROM_OLDMON:
    150   1.7        pk 		if ((ep = (struct eeprom *)eeprom_va) == NULL)
    151   1.7        pk 			break;
    152   1.7        pk 		if (kd->rows == 0)
    153   1.7        pk 			kd->rows = (u_short)ep->eeTtyRows;
    154   1.7        pk 		if (kd->cols == 0)
    155   1.7        pk 			kd->cols = (u_short)ep->eeTtyCols;
    156   1.7        pk 		break;
    157  1.31        pk 
    158   1.7        pk 	case PROM_OBP_V0:
    159   1.7        pk 	case PROM_OBP_V2:
    160   1.7        pk 	case PROM_OBP_V3:
    161   1.7        pk 	case PROM_OPENFIRM:
    162   1.1       gwr 		if (kd->rows == 0 &&
    163  1.31        pk 		    prom_getoption("screen-#rows", prop, sizeof prop) == 0)
    164  1.31        pk 			kd->rows = strtoul(prop, NULL, 10);
    165   1.7        pk 
    166   1.1       gwr 		if (kd->cols == 0 &&
    167  1.31        pk 		    prom_getoption("screen-#columns", prop, sizeof prop) == 0)
    168  1.31        pk 			kd->cols = strtoul(prop, NULL, 10);
    169   1.7        pk 
    170   1.7        pk 		break;
    171   1.1       gwr 	}
    172   1.1       gwr 
    173   1.1       gwr 	return;
    174   1.1       gwr }
    175   1.1       gwr 
    176   1.1       gwr struct tty *
    177  1.36       uwe kdtty(dev_t dev)
    178   1.1       gwr {
    179   1.1       gwr 	struct kd_softc *kd;
    180   1.1       gwr 
    181   1.1       gwr 	kd = &kd_softc; 	/* XXX */
    182   1.1       gwr 	return (kd->kd_tty);
    183   1.1       gwr }
    184   1.1       gwr 
    185   1.1       gwr int
    186  1.38  christos kdopen(dev_t dev, int flag, int mode, struct lwp *l)
    187   1.1       gwr {
    188   1.1       gwr 	struct kd_softc *kd;
    189   1.1       gwr 	int error, s, unit;
    190   1.1       gwr 	struct tty *tp;
    191   1.7        pk static	int firstopen = 1;
    192   1.7        pk 
    193   1.1       gwr 	unit = minor(dev);
    194   1.1       gwr 	if (unit != 0)
    195   1.1       gwr 		return ENXIO;
    196   1.7        pk 
    197   1.1       gwr 	kd = &kd_softc; 	/* XXX */
    198   1.7        pk 	if (firstopen) {
    199   1.7        pk 		kd_init(kd);
    200   1.7        pk 		firstopen = 0;
    201   1.7        pk 	}
    202   1.7        pk 
    203   1.1       gwr 	tp = kd->kd_tty;
    204   1.1       gwr 
    205   1.1       gwr 	/* It's simpler to do this up here. */
    206  1.41      elad 	if (kauth_authorize_device_tty(l->l_cred, KAUTH_DEVICE_TTY_OPEN, tp))
    207   1.1       gwr 		return (EBUSY);
    208   1.1       gwr 
    209   1.1       gwr 	s = spltty();
    210   1.1       gwr 	if ((tp->t_state & TS_ISOPEN) == 0) {
    211   1.1       gwr 		/* First open. */
    212   1.7        pk 
    213   1.7        pk 		/* Notify the input device that serves us */
    214   1.7        pk 		struct cons_channel *cc = kd->kd_in;
    215   1.7        pk 		if (cc != NULL &&
    216   1.7        pk 		    (error = (*cc->cc_iopen)(cc)) != 0) {
    217   1.7        pk 			return (error);
    218   1.7        pk 		}
    219   1.7        pk 
    220   1.1       gwr 		ttychars(tp);
    221   1.1       gwr 		tp->t_iflag = TTYDEF_IFLAG;
    222   1.1       gwr 		tp->t_oflag = TTYDEF_OFLAG;
    223   1.1       gwr 		tp->t_cflag = TTYDEF_CFLAG;
    224   1.1       gwr 		tp->t_lflag = TTYDEF_LFLAG;
    225   1.1       gwr 		tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
    226   1.1       gwr 		(void) kdparam(tp, &tp->t_termios);
    227   1.1       gwr 		ttsetwater(tp);
    228   1.1       gwr 		tp->t_winsize.ws_row = kd->rows;
    229   1.1       gwr 		tp->t_winsize.ws_col = kd->cols;
    230   1.1       gwr 		/* Flush pending input?  Clear translator? */
    231   1.1       gwr 		/* This (pseudo)device always has SOFTCAR */
    232   1.1       gwr 		tp->t_state |= TS_CARR_ON;
    233   1.1       gwr 	}
    234   1.1       gwr 
    235   1.1       gwr 	splx(s);
    236   1.1       gwr 
    237  1.16       eeh 	return ((*tp->t_linesw->l_open)(dev, tp));
    238   1.1       gwr }
    239   1.1       gwr 
    240   1.1       gwr int
    241  1.38  christos kdclose(dev_t dev, int flag, int mode, struct lwp *l)
    242   1.1       gwr {
    243   1.1       gwr 	struct kd_softc *kd;
    244   1.1       gwr 	struct tty *tp;
    245   1.7        pk 	struct cons_channel *cc;
    246   1.1       gwr 
    247   1.1       gwr 	kd = &kd_softc; 	/* XXX */
    248   1.1       gwr 	tp = kd->kd_tty;
    249   1.1       gwr 
    250   1.1       gwr 	/* XXX This is for cons.c. */
    251   1.1       gwr 	if ((tp->t_state & TS_ISOPEN) == 0)
    252   1.1       gwr 		return 0;
    253   1.1       gwr 
    254  1.16       eeh 	(*tp->t_linesw->l_close)(tp, flag);
    255   1.1       gwr 	ttyclose(tp);
    256   1.7        pk 
    257   1.7        pk 	if ((cc = kd->kd_in) != NULL)
    258  1.13        pk 		(void)(*cc->cc_iclose)(cc);
    259   1.7        pk 
    260   1.1       gwr 	return (0);
    261   1.1       gwr }
    262   1.1       gwr 
    263   1.1       gwr int
    264  1.36       uwe kdread(dev_t dev, struct uio *uio, int flag)
    265   1.1       gwr {
    266   1.1       gwr 	struct kd_softc *kd;
    267   1.1       gwr 	struct tty *tp;
    268   1.1       gwr 
    269   1.1       gwr 	kd = &kd_softc; 	/* XXX */
    270   1.1       gwr 	tp = kd->kd_tty;
    271   1.1       gwr 
    272  1.16       eeh 	return ((*tp->t_linesw->l_read)(tp, uio, flag));
    273   1.1       gwr }
    274   1.1       gwr 
    275   1.1       gwr int
    276  1.36       uwe kdwrite(dev_t dev, struct uio *uio, int flag)
    277   1.1       gwr {
    278   1.1       gwr 	struct kd_softc *kd;
    279   1.1       gwr 	struct tty *tp;
    280   1.1       gwr 
    281   1.1       gwr 	kd = &kd_softc; 	/* XXX */
    282   1.1       gwr 	tp = kd->kd_tty;
    283   1.1       gwr 
    284  1.16       eeh 	return ((*tp->t_linesw->l_write)(tp, uio, flag));
    285  1.17       scw }
    286  1.17       scw 
    287  1.17       scw int
    288  1.38  christos kdpoll(dev_t dev, int events, struct lwp *l)
    289  1.17       scw {
    290  1.17       scw 	struct kd_softc *kd;
    291  1.17       scw 	struct tty *tp;
    292  1.17       scw 
    293  1.17       scw 	kd = &kd_softc; 	/* XXX */
    294  1.17       scw 	tp = kd->kd_tty;
    295  1.37       uwe 
    296  1.38  christos 	return ((*tp->t_linesw->l_poll)(tp, events, l));
    297   1.1       gwr }
    298   1.1       gwr 
    299   1.1       gwr int
    300  1.43  christos kdioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l)
    301   1.1       gwr {
    302   1.1       gwr 	struct kd_softc *kd;
    303   1.1       gwr 	struct tty *tp;
    304   1.1       gwr 	int error;
    305   1.1       gwr 
    306   1.1       gwr 	kd = &kd_softc; 	/* XXX */
    307   1.1       gwr 	tp = kd->kd_tty;
    308   1.1       gwr 
    309  1.38  christos 	error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, l);
    310  1.21    atatat 	if (error != EPASSTHROUGH)
    311   1.1       gwr 		return error;
    312  1.21    atatat 
    313  1.38  christos 	error = ttioctl(tp, cmd, data, flag, l);
    314  1.21    atatat 	if (error != EPASSTHROUGH)
    315   1.1       gwr 		return error;
    316   1.1       gwr 
    317   1.1       gwr 	/* Handle any ioctl commands specific to kbd/display. */
    318   1.1       gwr 	/* XXX - Send KB* ioctls to kbd module? */
    319   1.1       gwr 	/* XXX - Send FB* ioctls to fb module?  */
    320   1.1       gwr 
    321  1.21    atatat 	return EPASSTHROUGH;
    322   1.1       gwr }
    323   1.1       gwr 
    324   1.1       gwr static int
    325  1.36       uwe kdparam(struct tty *tp, struct termios *t)
    326   1.1       gwr {
    327  1.36       uwe 
    328   1.1       gwr 	/* XXX - These are ignored... */
    329   1.1       gwr 	tp->t_ispeed = t->c_ispeed;
    330   1.1       gwr 	tp->t_ospeed = t->c_ospeed;
    331   1.1       gwr 	tp->t_cflag = t->c_cflag;
    332   1.1       gwr 	return 0;
    333   1.1       gwr }
    334   1.1       gwr 
    335   1.1       gwr static void
    336  1.36       uwe kdstart(struct tty *tp)
    337   1.1       gwr {
    338   1.1       gwr 	struct clist *cl;
    339  1.42        ad 	int s1, s2;
    340   1.1       gwr 
    341  1.42        ad 	s1 = splsoftclock();
    342  1.42        ad 	s2 = spltty();
    343   1.1       gwr 	if (tp->t_state & (TS_BUSY|TS_TTSTOP|TS_TIMEOUT))
    344   1.1       gwr 		goto out;
    345   1.1       gwr 
    346   1.1       gwr 	cl = &tp->t_outq;
    347  1.47        ad 	if (ttypull(tp)) {
    348   1.7        pk 		tp->t_state |= TS_BUSY;
    349  1.42        ad 		if ((s1 & PSR_PIL) == 0) {
    350   1.7        pk 			/* called at level zero - update screen now. */
    351  1.42        ad 			splx(s2);
    352   1.7        pk 			kd_putfb(tp);
    353  1.42        ad 			s2 = spltty();
    354   1.7        pk 			tp->t_state &= ~TS_BUSY;
    355   1.1       gwr 		} else {
    356   1.7        pk 			/* called at interrupt level - do it later */
    357  1.46     joerg 			callout_schedule(&tp->t_rstrt_ch, 0);
    358   1.1       gwr 		}
    359   1.1       gwr 	}
    360   1.1       gwr out:
    361  1.42        ad 	splx(s2);
    362  1.42        ad 	splx(s1);
    363   1.1       gwr }
    364   1.1       gwr 
    365   1.1       gwr /*
    366   1.1       gwr  * Timeout function to do delayed writes to the screen.
    367   1.1       gwr  * Called at splsoftclock when requested by kdstart.
    368   1.1       gwr  */
    369   1.1       gwr static void
    370  1.36       uwe kd_later(void *arg)
    371   1.1       gwr {
    372   1.7        pk 	struct tty *tp = arg;
    373   1.7        pk 	int s;
    374   1.1       gwr 
    375   1.1       gwr 	kd_putfb(tp);
    376   1.1       gwr 
    377   1.1       gwr 	s = spltty();
    378   1.1       gwr 	tp->t_state &= ~TS_BUSY;
    379  1.16       eeh 	(*tp->t_linesw->l_start)(tp);
    380   1.1       gwr 	splx(s);
    381   1.1       gwr }
    382   1.1       gwr 
    383   1.1       gwr /*
    384   1.1       gwr  * Put text on the screen using the PROM monitor.
    385   1.1       gwr  * This can take a while, so to avoid missing
    386   1.1       gwr  * interrupts, this is called at splsoftclock.
    387   1.1       gwr  */
    388   1.1       gwr static void
    389  1.36       uwe kd_putfb(struct tty *tp)
    390   1.1       gwr {
    391   1.1       gwr 	char buf[PUT_WSIZE];
    392   1.1       gwr 	struct clist *cl = &tp->t_outq;
    393   1.1       gwr 	char *p, *end;
    394   1.1       gwr 	int len;
    395   1.1       gwr 
    396   1.1       gwr 	while ((len = q_to_b(cl, buf, PUT_WSIZE-1)) > 0) {
    397   1.1       gwr 		/* PROM will barf if high bits are set. */
    398   1.1       gwr 		p = buf;
    399   1.1       gwr 		end = buf + len;
    400   1.1       gwr 		while (p < end)
    401   1.1       gwr 			*p++ &= 0x7f;
    402   1.4        pk 
    403   1.1       gwr 		/* Now let the PROM print it. */
    404   1.4        pk 		prom_putstr(buf, len);
    405   1.1       gwr 	}
    406   1.1       gwr }
    407   1.1       gwr 
    408   1.1       gwr /*
    409   1.1       gwr  * Our "interrupt" routine for input. This is called by
    410   1.1       gwr  * the keyboard driver (dev/sun/kbd.c) at spltty.
    411   1.1       gwr  */
    412  1.36       uwe static void
    413  1.36       uwe kd_cons_input(int c)
    414   1.1       gwr {
    415   1.1       gwr 	struct kd_softc *kd = &kd_softc;
    416   1.1       gwr 	struct tty *tp;
    417   1.1       gwr 
    418   1.1       gwr 	/* XXX: Make sure the device is open. */
    419   1.1       gwr 	tp = kd->kd_tty;
    420   1.1       gwr 	if (tp == NULL)
    421   1.1       gwr 		return;
    422   1.1       gwr 	if ((tp->t_state & TS_ISOPEN) == 0)
    423   1.1       gwr 		return;
    424   1.1       gwr 
    425  1.16       eeh 	(*tp->t_linesw->l_rint)(c, tp);
    426   1.1       gwr }
    427   1.1       gwr 
    428   1.7        pk void
    429  1.36       uwe cons_attach_input(struct cons_channel *cc, struct consdev *cn)
    430   1.7        pk {
    431   1.7        pk 	struct kd_softc *kd = &kd_softc;
    432   1.7        pk 
    433   1.7        pk 	kd->kd_in = cc;
    434   1.7        pk 	cc->cc_upstream = kd_cons_input;
    435   1.7        pk }
    436   1.7        pk 
    437  1.15  christos void
    438  1.36       uwe kd_attach_input(struct cons_channel *cc)
    439  1.15  christos {
    440  1.15  christos 	struct kd_softc *kd = &kd_softc;
    441  1.15  christos 
    442  1.15  christos 	kd->kd_in = cc;
    443  1.15  christos 	cc->cc_upstream = kd_cons_input;
    444  1.15  christos }
    445   1.7        pk 
    446   1.7        pk /*
    447   1.7        pk  * Default PROM-based console input stream
    448   1.7        pk  * Since the PROM does not notify us when data is available on the
    449   1.7        pk  * input channel these functions periodically poll the PROM.
    450   1.7        pk  */
    451  1.29       uwe static int kd_rom_iopen(struct cons_channel *);
    452  1.29       uwe static int kd_rom_iclose(struct cons_channel *);
    453  1.29       uwe static void kd_rom_intr(void *);
    454   1.7        pk 
    455  1.30       uwe static struct cons_channel prom_cons_channel = {
    456  1.30       uwe 	NULL,			/* no private data */
    457  1.30       uwe 	kd_rom_iopen,
    458  1.30       uwe 	kd_rom_iclose,
    459  1.30       uwe 	NULL			/* will be set by kd driver */
    460  1.30       uwe };
    461  1.30       uwe 
    462  1.44        ad static struct callout prom_cons_callout;
    463   1.7        pk 
    464  1.36       uwe static int
    465  1.36       uwe kd_rom_iopen(struct cons_channel *cc)
    466   1.7        pk {
    467  1.44        ad 	static bool callo;
    468  1.44        ad 
    469  1.44        ad 	if (!callo) {
    470  1.44        ad 		callout_init(&prom_cons_callout, 0);
    471  1.44        ad 		callo = true;
    472  1.44        ad 	}
    473  1.30       uwe 
    474   1.7        pk 	/* Poll for ROM input 4 times per second */
    475  1.30       uwe 	callout_reset(&prom_cons_callout, hz / 4, kd_rom_intr, cc);
    476   1.7        pk 	return (0);
    477   1.7        pk }
    478   1.7        pk 
    479  1.36       uwe static int
    480  1.36       uwe kd_rom_iclose(struct cons_channel *cc)
    481   1.7        pk {
    482   1.7        pk 
    483  1.30       uwe 	callout_stop(&prom_cons_callout);
    484   1.7        pk 	return (0);
    485   1.7        pk }
    486   1.7        pk 
    487   1.7        pk /*
    488   1.7        pk  * "Interrupt" routine for input through ROM vectors
    489   1.7        pk  */
    490  1.36       uwe static void
    491  1.36       uwe kd_rom_intr(void *arg)
    492   1.7        pk {
    493   1.7        pk 	struct cons_channel *cc = arg;
    494   1.7        pk 	int s, c;
    495   1.7        pk 
    496  1.30       uwe 	callout_schedule(&prom_cons_callout, hz / 4);
    497   1.7        pk 
    498   1.7        pk 	s = spltty();
    499   1.7        pk 
    500   1.7        pk 	while ((c = prom_peekchar()) >= 0)
    501   1.7        pk 		(*cc->cc_upstream)(c);
    502   1.7        pk 
    503   1.7        pk 	splx(s);
    504   1.7        pk }
    505   1.1       gwr 
    506   1.7        pk /*****************************************************************/
    507   1.7        pk 
    508   1.7        pk int prom_stdin_node;
    509   1.7        pk int prom_stdout_node;
    510   1.7        pk char prom_stdin_args[16];
    511   1.7        pk char prom_stdout_args[16];
    512   1.7        pk 
    513  1.36       uwe static void prom_cnprobe(struct consdev *);
    514  1.29       uwe static void prom_cninit(struct consdev *);
    515  1.36       uwe int  prom_cngetc(dev_t);	/* XXX: for sunkbd_wskbd_cngetc */
    516  1.29       uwe static void prom_cnputc(dev_t, int);
    517  1.36       uwe static void prom_cnpollc(dev_t, int);
    518   1.7        pk 
    519   1.7        pk /*
    520   1.7        pk  * The console is set to this one initially,
    521   1.7        pk  * which lets us use the PROM until consinit()
    522   1.7        pk  * is called to select a real console.
    523   1.7        pk  */
    524   1.7        pk struct consdev consdev_prom = {
    525   1.7        pk 	prom_cnprobe,
    526   1.7        pk 	prom_cninit,
    527   1.7        pk 	prom_cngetc,
    528   1.7        pk 	prom_cnputc,
    529   1.7        pk 	prom_cnpollc,
    530   1.6   thorpej 	NULL,
    531   1.1       gwr };
    532   1.1       gwr 
    533   1.7        pk /*
    534   1.7        pk  * The console table pointer is statically initialized
    535   1.7        pk  * to point to the PROM table, so that early calls to printf will work.
    536   1.7        pk  */
    537   1.7        pk struct consdev *cn_tab = &consdev_prom;
    538   1.7        pk 
    539  1.36       uwe static void
    540  1.36       uwe prom_cnprobe(struct consdev *cn)
    541   1.1       gwr {
    542   1.1       gwr }
    543   1.1       gwr 
    544   1.1       gwr static void
    545  1.36       uwe prom_cninit(struct consdev *cn)
    546   1.1       gwr {
    547   1.7        pk }
    548   1.1       gwr 
    549  1.36       uwe static void
    550  1.36       uwe prom_cnpollc(dev_t dev, int on)
    551   1.7        pk {
    552   1.1       gwr 
    553   1.7        pk 	if (on) {
    554   1.7        pk 		/* Entering debugger. */
    555   1.7        pk #if NFB > 0
    556   1.7        pk 		fb_unblank();
    557   1.7        pk #endif
    558   1.7        pk 	} else {
    559   1.7        pk 		/* Resuming kernel. */
    560   1.7        pk 	}
    561   1.7        pk }
    562   1.1       gwr 
    563   1.1       gwr 
    564   1.7        pk /*
    565   1.7        pk  * PROM console input putchar.
    566   1.7        pk  */
    567  1.34  macallan int
    568  1.36       uwe prom_cngetc(dev_t dev)
    569   1.1       gwr {
    570   1.7        pk 	int s, c;
    571   1.1       gwr 
    572   1.7        pk 	s = splhigh();
    573   1.7        pk 	c = prom_getchar();
    574   1.7        pk 	splx(s);
    575   1.7        pk 	return (c);
    576   1.1       gwr }
    577   1.1       gwr 
    578   1.7        pk /*
    579   1.7        pk  * PROM console output putchar.
    580   1.7        pk  */
    581   1.1       gwr static void
    582  1.36       uwe prom_cnputc(dev_t dev, int c)
    583   1.1       gwr {
    584   1.1       gwr 
    585   1.4        pk 	prom_putchar(c);
    586   1.1       gwr }
    587   1.1       gwr 
    588   1.7        pk 
    589   1.7        pk /*****************************************************************/
    590   1.7        pk 
    591  1.29       uwe static void prom_get_device_args(const char *, char *, unsigned int);
    592   1.7        pk 
    593  1.36       uwe static void
    594  1.36       uwe prom_get_device_args(const char *prop, char *args, unsigned int sz)
    595   1.1       gwr {
    596  1.33    martin 	const char *cp;
    597  1.33    martin 	char buffer[128];
    598   1.7        pk 
    599  1.33    martin 	cp = prom_getpropstringA(findroot(), prop, buffer, sizeof buffer);
    600   1.1       gwr 
    601   1.7        pk 	/*
    602   1.7        pk 	 * Extract device-specific arguments from a PROM device path (if any)
    603   1.7        pk 	 */
    604   1.7        pk 	cp = buffer + strlen(buffer);
    605   1.7        pk 	while (cp >= buffer) {
    606   1.7        pk 		if (*cp == ':') {
    607   1.7        pk 			strncpy(args, cp+1, sz);
    608   1.7        pk 			break;
    609   1.7        pk 		}
    610   1.7        pk 		cp--;
    611   1.1       gwr 	}
    612   1.1       gwr }
    613   1.1       gwr 
    614   1.7        pk /*
    615   1.7        pk  *
    616   1.7        pk  */
    617   1.7        pk void
    618  1.36       uwe consinit(void)
    619   1.7        pk {
    620   1.7        pk 	int inSource, outSink;
    621   1.7        pk 
    622   1.7        pk 	switch (prom_version()) {
    623   1.7        pk 	case PROM_OLDMON:
    624   1.7        pk 	case PROM_OBP_V0:
    625   1.7        pk 		/* The stdio handles identify the device type */
    626   1.7        pk 		inSource = prom_stdin();
    627   1.7        pk 		outSink  = prom_stdout();
    628   1.7        pk 		break;
    629   1.7        pk 
    630   1.7        pk 	case PROM_OBP_V2:
    631   1.7        pk 	case PROM_OBP_V3:
    632   1.7        pk 	case PROM_OPENFIRM:
    633   1.7        pk 
    634   1.7        pk 		/* Save PROM arguments for device matching */
    635   1.7        pk 		prom_get_device_args("stdin-path", prom_stdin_args,
    636   1.7        pk 				     sizeof(prom_stdin_args));
    637   1.7        pk 		prom_get_device_args("stdout-path", prom_stdout_args,
    638   1.7        pk 				    sizeof(prom_stdout_args));
    639   1.7        pk 
    640   1.7        pk 		/*
    641   1.7        pk 		 * Translate the STDIO package instance (`ihandle') -- that
    642   1.7        pk 		 * the PROM has already opened for us -- to a device tree
    643  1.37       uwe 		 * node (i.e. a `phandle').
    644   1.7        pk 		 */
    645   1.7        pk 
    646   1.7        pk 		prom_stdin_node = prom_instance_to_package(prom_stdin());
    647   1.7        pk 		if (prom_stdin_node == 0)
    648   1.7        pk 			printf("consinit: cannot convert stdin ihandle\n");
    649   1.7        pk 
    650   1.7        pk 		prom_stdout_node = prom_instance_to_package(prom_stdout());
    651   1.7        pk 		if (prom_stdout_node == 0) {
    652   1.7        pk 			printf("consinit: cannot convert stdout ihandle\n");
    653   1.7        pk 			break;
    654   1.7        pk 		}
    655   1.7        pk 
    656   1.7        pk 		break;
    657   1.7        pk 
    658   1.7        pk 	default:
    659   1.7        pk 		break;
    660   1.7        pk 	}
    661   1.7        pk 
    662   1.7        pk 	/* Wire up /dev/console */
    663  1.22   gehenna 	cn_tab->cn_dev = makedev(cdevsw_lookup_major(&kd_cdevsw), 0);
    664   1.7        pk 	cn_tab->cn_pri = CN_INTERNAL;
    665   1.7        pk 
    666   1.7        pk 	/* Set up initial PROM input channel for /dev/console */
    667  1.12       eeh 	cons_attach_input(&prom_cons_channel, cn_tab);
    668   1.7        pk 
    669   1.7        pk #ifdef	KGDB
    670   1.7        pk 	zs_kgdb_init();	/* XXX */
    671   1.7        pk #endif
    672   1.7        pk }
    673