Home | History | Annotate | Line # | Download | only in sun
sunkbd.c revision 1.15
      1 /*	$NetBSD: sunkbd.c,v 1.15 2002/10/26 19:11:13 martin Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1992, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * This software was developed by the Computer Systems Engineering group
      8  * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
      9  * contributed to Berkeley.
     10  *
     11  * All advertising materials mentioning features or use of this software
     12  * must display the following acknowledgement:
     13  *	This product includes software developed by the University of
     14  *	California, Lawrence Berkeley Laboratory.
     15  *
     16  * Redistribution and use in source and binary forms, with or without
     17  * modification, are permitted provided that the following conditions
     18  * are met:
     19  * 1. Redistributions of source code must retain the above copyright
     20  *    notice, this list of conditions and the following disclaimer.
     21  * 2. Redistributions in binary form must reproduce the above copyright
     22  *    notice, this list of conditions and the following disclaimer in the
     23  *    documentation and/or other materials provided with the distribution.
     24  * 3. All advertising materials mentioning features or use of this software
     25  *    must display the following acknowledgement:
     26  *	This product includes software developed by the University of
     27  *	California, Berkeley and its contributors.
     28  * 4. Neither the name of the University nor the names of its contributors
     29  *    may be used to endorse or promote products derived from this software
     30  *    without specific prior written permission.
     31  *
     32  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     33  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     34  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     35  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     36  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     37  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     38  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     39  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     40  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     41  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     42  * SUCH DAMAGE.
     43  *
     44  *	@(#)kbd.c	8.2 (Berkeley) 10/30/93
     45  */
     46 
     47 /*
     48  * /dev/kbd lower layer for sun keyboard off a tty (line discipline).
     49  * This driver uses kbdsun middle layer to hook up to /dev/kbd.
     50  */
     51 
     52 /*
     53  * Keyboard interface line discipline.
     54  *
     55  */
     56 
     57 #include <sys/cdefs.h>
     58 __KERNEL_RCSID(0, "$NetBSD: sunkbd.c,v 1.15 2002/10/26 19:11:13 martin Exp $");
     59 
     60 #include <sys/param.h>
     61 #include <sys/systm.h>
     62 #include <sys/conf.h>
     63 #include <sys/device.h>
     64 #include <sys/kernel.h>
     65 #include <sys/malloc.h>
     66 #include <sys/proc.h>
     67 #include <sys/signal.h>
     68 #include <sys/signalvar.h>
     69 #include <sys/time.h>
     70 #include <sys/select.h>
     71 #include <sys/syslog.h>
     72 #include <sys/fcntl.h>
     73 #include <sys/tty.h>
     74 
     75 #include <dev/cons.h>
     76 #include <machine/vuid_event.h>
     77 #include <machine/kbd.h>
     78 #include <dev/sun/event_var.h>
     79 #include <dev/sun/kbd_xlate.h>
     80 #include <dev/sun/kbdvar.h>
     81 #include <dev/sun/kbdsunvar.h>
     82 #include <dev/sun/kbd_ms_ttyvar.h>
     83 
     84 /****************************************************************
     85  * Interface to the lower layer (ttycc)
     86  ****************************************************************/
     87 
     88 static int	sunkbd_match(struct device *, struct cfdata *, void *);
     89 static void	sunkbd_attach(struct device *, struct device *, void *);
     90 static void	sunkbd_write_data(struct kbd_sun_softc *, int);
     91 static int	sunkbdiopen(struct device *, int mode);
     92 
     93 #if NWSKBD > 0
     94 void kbd_wskbd_attach(struct kbd_softc *k, int isconsole);
     95 #endif
     96 
     97 int	sunkbdinput(int, struct tty *);
     98 int	sunkbdstart(struct tty *);
     99 
    100 /* Default keyboard baud rate */
    101 int	sunkbd_bps = KBD_DEFAULT_BPS;
    102 
    103 CFATTACH_DECL(kbd_tty, sizeof(struct kbd_sun_softc),
    104     sunkbd_match, sunkbd_attach, NULL, NULL);
    105 
    106 struct  linesw sunkbd_disc =
    107 	{ "sunkbd", 7, ttylopen, ttylclose, ttyerrio, ttyerrio, ttynullioctl,
    108 	  sunkbdinput, sunkbdstart, nullmodem, ttpoll }; /* 7- SUNKBDDISC */
    109 
    110 
    111 /*
    112  * sunkbd_match: how is this tty channel configured?
    113  */
    114 int
    115 sunkbd_match(parent, cf, aux)
    116 	struct device *parent;
    117 	struct cfdata *cf;
    118 	void   *aux;
    119 {
    120 	struct kbd_ms_tty_attach_args *args = aux;
    121 
    122 	if (strcmp(args->kmta_name, "keyboard") == 0)
    123 		return (1);
    124 
    125 	return 0;
    126 }
    127 
    128 void
    129 sunkbd_attach(parent, self, aux)
    130 	struct device *parent, *self;
    131 	void   *aux;
    132 {
    133 	struct kbd_sun_softc *k = (void *) self;
    134 	struct kbd_ms_tty_attach_args *args = aux;
    135 	struct tty *tp = args->kmta_tp;
    136 	struct cons_channel *cc;
    137 
    138 	/* Set up the proper line discipline. */
    139 	ttyldisc_init();
    140 	if (ttyldisc_add(&sunkbd_disc, -1) == -1)
    141 		panic("sunkbd_attach: sunkbd_disc");
    142 	tp->t_linesw = &sunkbd_disc;
    143 	tp->t_oflag &= ~OPOST;
    144 	tp->t_dev = args->kmta_dev;
    145 
    146 	/* link the structures together. */
    147 	k->k_priv = tp;
    148 	tp->t_sc = (void *)k;
    149 
    150 	/* provide our middle layer with a link to the lower layer (i.e. us) */
    151 	k->k_deviopen = sunkbdiopen;
    152 	k->k_deviclose = NULL;
    153 	k->k_write_data = sunkbd_write_data;
    154 
    155 	/* provide upper layer with a link to our middle layer */
    156 	k->k_kbd.k_ops = &kbd_ops_sun;
    157 
    158 	/* alloc console input channel */
    159 	if ((cc = kbd_cc_alloc(&k->k_kbd)) == NULL)
    160 		return;
    161 
    162 	if (args->kmta_consdev) {
    163 		char magic[4];
    164 
    165 		/*
    166 		 * Hookup ourselves as the console input channel
    167 		 */
    168 		args->kmta_baud = sunkbd_bps;
    169 		args->kmta_cflag = CLOCAL|CS8;
    170 		cons_attach_input(cc, args->kmta_consdev);
    171 
    172 		/* Tell our parent what the console should be. */
    173 		args->kmta_consdev = cn_tab;
    174 		k->k_kbd.k_isconsole = 1;
    175 		printf(" (console input)");
    176 
    177 		/* Set magic to "L1-A" */
    178 		magic[0] = KBD_L1;
    179 		magic[1] = KBD_A;
    180 		magic[2] = 0;
    181 		cn_set_magic(magic);
    182 	} else {
    183 		extern void kd_attach_input(struct cons_channel *);
    184 
    185 		kd_attach_input(cc);
    186 	}
    187 
    188 
    189 	printf("\n");
    190 
    191 #if NWSKBD > 0
    192 	kbd_wskbd_attach(&k->k_kbd, args->kmta_consdev != NULL);
    193 #endif
    194 
    195 	/* Do this before any calls to kbd_rint(). */
    196 	kbd_xlate_init(&k->k_kbd.k_state);
    197 
    198 	/* Magic sequence. */
    199 	k->k_magic1 = KBD_L1;
    200 	k->k_magic2 = KBD_A;
    201 }
    202 
    203 /*
    204  * Internal open routine.  This really should be inside com.c
    205  * But I'm putting it here until we have a generic internal open
    206  * mechanism.
    207  */
    208 int
    209 sunkbdiopen(dev, flags)
    210 	struct device *dev;
    211 	int flags;
    212 {
    213 	struct kbd_sun_softc *k = (void *) dev;
    214 	struct tty *tp = (struct tty *)k->k_priv;
    215 	struct proc *p = curproc;
    216 	struct termios t;
    217 	const struct cdevsw *cdev;
    218 	int error;
    219 
    220 	if (p == NULL)
    221 		p = &proc0;
    222 
    223 	cdev = cdevsw_lookup(tp->t_dev);
    224 	if (cdev == NULL)
    225 		return (ENXIO);
    226 
    227 	/* Open the lower device */
    228 	if ((error = (*cdev->d_open)(tp->t_dev, O_NONBLOCK|flags,
    229 				     0/* ignored? */, p)) != 0)
    230 		return (error);
    231 
    232 	/* Now configure it for the console. */
    233 	tp->t_ospeed = 0;
    234 	t.c_ispeed = sunkbd_bps;
    235 	t.c_ospeed = sunkbd_bps;
    236 	t.c_cflag =  CLOCAL|CS8;
    237 	(*tp->t_param)(tp, &t);
    238 
    239 	return (0);
    240 }
    241 
    242 /*
    243  * TTY interface to handle input.
    244  */
    245 int
    246 sunkbdinput(c, tp)
    247 	int c;
    248 	struct tty *tp;
    249 {
    250 	struct kbd_sun_softc *k = (void *) tp->t_sc;
    251 	u_char *cc;
    252 	int error;
    253 
    254 
    255 	cc = tp->t_cc;
    256 
    257 	/*
    258 	 * Handle exceptional conditions (break, parity, framing).
    259 	 */
    260 	if ((error = ((c & TTY_ERRORMASK))) != 0) {
    261 		/*
    262 		 * After garbage, flush pending input, and
    263 		 * send a reset to resync key translation.
    264 		 */
    265 		log(LOG_ERR, "%s: input error (0x%x)\n",
    266 			k->k_kbd.k_dev.dv_xname, c);
    267 		c &= TTY_CHARMASK;
    268 		if (!k->k_txflags & K_TXBUSY) {
    269 			ttyflush(tp, FREAD | FWRITE);
    270 			goto send_reset;
    271 		}
    272 	}
    273 
    274 	/*
    275 	 * Check for input buffer overflow
    276 	 */
    277 	if (tp->t_rawq.c_cc + tp->t_canq.c_cc >= TTYHOG) {
    278 		log(LOG_ERR, "%s: input overrun\n",
    279 		    k->k_kbd.k_dev.dv_xname);
    280 		goto send_reset;
    281 	}
    282 
    283 	/* Pass this up to the "middle" layer. */
    284 	kbd_sun_input(k, c);
    285 	return (-1);
    286 
    287 send_reset:
    288 	/* Send a reset to resync translation. */
    289 	kbd_sun_output(k, KBD_CMD_RESET);
    290 	return (ttstart(tp));
    291 
    292 }
    293 
    294 int
    295 sunkbdstart(tp)
    296 	struct tty *tp;
    297 {
    298 	struct kbd_sun_softc *k = (void *) tp->t_sc;
    299 
    300 	/*
    301 	 * Transmit done.  Try to send more, or
    302 	 * clear busy and wakeup drain waiters.
    303 	 */
    304 	k->k_txflags &= ~K_TXBUSY;
    305 	kbd_sun_start_tx(k);
    306 	ttstart(tp);
    307 	return (0);
    308 }
    309 /*
    310  * used by kbd_sun_start_tx();
    311  */
    312 void
    313 sunkbd_write_data(k, c)
    314 	struct kbd_sun_softc *k;
    315 	int c;
    316 {
    317 	struct tty *tp = (struct tty *)k->k_priv;
    318 	int	s;
    319 
    320 	s = spltty();
    321 	ttyoutput(c, tp);
    322 	ttstart(tp);
    323 	splx(s);
    324 }
    325