split the sun ms/kbd drivers into frontend/backend parts at the serial
interface border, so that other serial interfaces can be attached to the ms/kbd. zero functional changes and mostly involves moving code around a bit. tested on the SS2. this is necessary to attach the PCI ultrasparc keyboard/mouse drivers.
This commit is contained in:
mrg
parent
7a50b38cbd
commit
95e0190e23
@ -1,4 +1,4 @@
|
||||
# $NetBSD: files.sparc,v 1.74 1999/05/12 12:48:27 mrg Exp $
|
||||
# $NetBSD: files.sparc,v 1.75 1999/05/14 06:42:02 mrg Exp $
|
||||
|
||||
# @(#)files.sparc 8.1 (Berkeley) 7/19/93
|
||||
# sparc-specific configuration info
|
||||
@ -101,13 +101,15 @@ define zsevent
|
||||
file dev/sun/event.c zsevent
|
||||
|
||||
device kbd: zsevent
|
||||
attach kbd at zs
|
||||
attach kbd at zs with kbd_zs
|
||||
file dev/sun/kbd_zs.c kbd_zs
|
||||
file dev/sun/kbd.c kbd needs-flag
|
||||
file dev/sun/kbd_tables.c kbd
|
||||
file arch/sparc/dev/kd.c kbd
|
||||
|
||||
device ms: zsevent
|
||||
attach ms at zs
|
||||
attach ms at zs with ms_zs
|
||||
file dev/sun/ms_zs.c ms_zs
|
||||
file dev/sun/ms.c ms needs-flag
|
||||
|
||||
#
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
# $NetBSD: files.sparc64,v 1.17 1999/04/17 21:27:00 kleink Exp $
|
||||
# $NetBSD: files.sparc64,v 1.18 1999/05/14 06:49:55 mrg Exp $
|
||||
|
||||
# @(#)files.sparc64 8.1 (Berkeley) 7/19/93
|
||||
# sparc64-specific configuration info
|
||||
@ -69,13 +69,15 @@ define zsevent
|
||||
file dev/sun/event.c zsevent
|
||||
|
||||
device kbd: zsevent
|
||||
attach kbd at zs
|
||||
attach kbd at zs with kbd_zs
|
||||
file dev/sun/kbd_zs.c kbd_zs
|
||||
file dev/sun/kbd.c kbd needs-flag
|
||||
file dev/sun/kbd_tables.c kbd
|
||||
file arch/sparc64/dev/kd.c kbd
|
||||
|
||||
device ms: zsevent
|
||||
attach ms at zs
|
||||
attach ms at zs with ms_zs
|
||||
file dev/sun/ms_zs.c ms_zs
|
||||
file dev/sun/ms.c ms needs-flag
|
||||
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
# $NetBSD: files.sun3,v 1.52 1999/04/19 21:23:01 kleink Exp $
|
||||
# $NetBSD: files.sun3,v 1.53 1999/05/14 06:42:02 mrg Exp $
|
||||
|
||||
#
|
||||
# sun3-specific configuration info
|
||||
@ -238,13 +238,15 @@ define zsevent
|
||||
file dev/sun/event.c zsevent
|
||||
|
||||
device kbd: zsevent
|
||||
attach kbd at zsc
|
||||
attach kbd at zsc with kbd_zs
|
||||
file dev/sun/kbd_zs.c kbd_zs
|
||||
file dev/sun/kbd.c kbd needs-flag
|
||||
file dev/sun/kbd_tables.c kbd
|
||||
file arch/sun3/dev/kd.c kbd
|
||||
|
||||
device ms: zsevent
|
||||
attach ms at zsc
|
||||
attach ms at zsc with ms_zs
|
||||
file dev/sun/ms_zs.c ms_zs
|
||||
file dev/sun/ms.c ms needs-flag
|
||||
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
/* $NetBSD: kbd.c,v 1.21 1999/02/03 20:22:28 mycroft Exp $ */
|
||||
/* $NetBSD: kbd.c,v 1.22 1999/05/14 06:42:02 mrg Exp $ */
|
||||
|
||||
/*
|
||||
* Copyright (c) 1992, 1993
|
||||
@ -51,8 +51,6 @@
|
||||
*/
|
||||
|
||||
/*
|
||||
* Zilog Z8530 Dual UART driver (keyboard interface)
|
||||
*
|
||||
* This is the "slave" driver that will be attached to
|
||||
* the "zsc" driver for a Sun keyboard.
|
||||
*/
|
||||
@ -76,9 +74,10 @@
|
||||
#include <machine/vuid_event.h>
|
||||
#include <machine/kbd.h>
|
||||
#include <machine/kbio.h>
|
||||
#include <dev/sun/event_var.h>
|
||||
#include <dev/sun/kbd_xlate.h>
|
||||
#include <dev/sun/kbdvar.h>
|
||||
|
||||
#include "event_var.h"
|
||||
#include "kbd_xlate.h"
|
||||
#include "locators.h"
|
||||
|
||||
/*
|
||||
@ -86,194 +85,18 @@
|
||||
* /dev/kbd is not a tty (plain device)
|
||||
*/
|
||||
|
||||
/*
|
||||
* How many input characters we can buffer.
|
||||
* The port-specific var.h may override this.
|
||||
* Note: must be a power of two!
|
||||
*/
|
||||
#define KBD_RX_RING_SIZE 256
|
||||
#define KBD_RX_RING_MASK (KBD_RX_RING_SIZE-1)
|
||||
/*
|
||||
* Output buffer. Only need a few chars.
|
||||
*/
|
||||
#define KBD_TX_RING_SIZE 16
|
||||
#define KBD_TX_RING_MASK (KBD_TX_RING_SIZE-1)
|
||||
/*
|
||||
* Keyboard serial line speed is fixed at 1200 bps.
|
||||
*/
|
||||
#define KBD_BPS 1200
|
||||
#define KBD_RESET_TIMO 1000 /* mS. */
|
||||
|
||||
/*
|
||||
* XXX - Historical comment - no longer quite right...
|
||||
* Keyboard driver state. The ascii and kbd links go up and down and
|
||||
* we just sit in the middle doing translation. Note that it is possible
|
||||
* to get just one of the two links, in which case /dev/kbd is unavailable.
|
||||
* The downlink supplies us with `internal' open and close routines which
|
||||
* will enable dataflow across the downlink. We promise to call open when
|
||||
* we are willing to take keystrokes, and to call close when we are not.
|
||||
* If /dev/kbd is not the console tty input source, we do this whenever
|
||||
* /dev/kbd is in use; otherwise we just leave it open forever.
|
||||
*/
|
||||
struct kbd_softc {
|
||||
struct device k_dev; /* required first: base device */
|
||||
struct zs_chanstate *k_cs;
|
||||
|
||||
/* Flags to communicate with kbd_softint() */
|
||||
volatile int k_intr_flags;
|
||||
#define INTR_RX_OVERRUN 1
|
||||
#define INTR_TX_EMPTY 2
|
||||
#define INTR_ST_CHECK 4
|
||||
|
||||
/* Transmit state */
|
||||
volatile int k_txflags;
|
||||
#define K_TXBUSY 1
|
||||
#define K_TXWANT 2
|
||||
|
||||
/*
|
||||
* State of upper interface.
|
||||
*/
|
||||
int k_isopen; /* set if open has been done */
|
||||
int k_evmode; /* set if we should produce events */
|
||||
struct evvar k_events; /* event queue state */
|
||||
|
||||
/*
|
||||
* ACSI translation state
|
||||
*/
|
||||
int k_repeat_start; /* initial delay */
|
||||
int k_repeat_step; /* inter-char delay */
|
||||
int k_repeatsym; /* repeating symbol */
|
||||
int k_repeating; /* we've called timeout() */
|
||||
struct kbd_state k_state; /* ASCII translation state */
|
||||
|
||||
/*
|
||||
* Magic sequence stuff (L1-A)
|
||||
*/
|
||||
char k_isconsole;
|
||||
char k_magic1_down;
|
||||
u_char k_magic1; /* L1 */
|
||||
u_char k_magic2; /* A */
|
||||
|
||||
/*
|
||||
* The transmit ring buffer.
|
||||
*/
|
||||
volatile u_int k_tbget; /* transmit buffer `get' index */
|
||||
volatile u_int k_tbput; /* transmit buffer `put' index */
|
||||
u_char k_tbuf[KBD_TX_RING_SIZE]; /* data */
|
||||
|
||||
/*
|
||||
* The receive ring buffer.
|
||||
*/
|
||||
u_int k_rbget; /* ring buffer `get' index */
|
||||
volatile u_int k_rbput; /* ring buffer `put' index */
|
||||
u_short k_rbuf[KBD_RX_RING_SIZE]; /* rr1, data pairs */
|
||||
|
||||
};
|
||||
|
||||
/* Prototypes */
|
||||
static void kbd_new_layout(struct kbd_softc *k);
|
||||
static void kbd_output(struct kbd_softc *k, int c);
|
||||
static void kbd_repeat(void *arg);
|
||||
static void kbd_set_leds(struct kbd_softc *k, int leds);
|
||||
static void kbd_start_tx(struct kbd_softc *k);
|
||||
static void kbd_update_leds(struct kbd_softc *k);
|
||||
static void kbd_was_reset(struct kbd_softc *k);
|
||||
static int kbd_drain_tx(struct kbd_softc *k);
|
||||
|
||||
cdev_decl(kbd); /* open, close, read, write, ioctl, stop, ... */
|
||||
|
||||
struct zsops zsops_kbd;
|
||||
|
||||
/****************************************************************
|
||||
* Definition of the driver for autoconfig.
|
||||
****************************************************************/
|
||||
|
||||
static int kbd_match(struct device *, struct cfdata *, void *);
|
||||
static void kbd_attach(struct device *, struct device *, void *);
|
||||
|
||||
struct cfattach kbd_ca = {
|
||||
sizeof(struct kbd_softc), kbd_match, kbd_attach
|
||||
};
|
||||
|
||||
extern struct cfdriver kbd_cd;
|
||||
|
||||
/*
|
||||
* kbd_match: how is this zs channel configured?
|
||||
*/
|
||||
int
|
||||
kbd_match(parent, cf, aux)
|
||||
struct device *parent;
|
||||
struct cfdata *cf;
|
||||
void *aux;
|
||||
{
|
||||
struct zsc_attach_args *args = aux;
|
||||
|
||||
/* Exact match required for keyboard. */
|
||||
if (cf->cf_loc[ZSCCF_CHANNEL] == args->channel)
|
||||
return 2;
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
void
|
||||
kbd_attach(parent, self, aux)
|
||||
struct device *parent, *self;
|
||||
void *aux;
|
||||
|
||||
{
|
||||
struct zsc_softc *zsc = (void *) parent;
|
||||
struct kbd_softc *k = (void *) self;
|
||||
struct zsc_attach_args *args = aux;
|
||||
struct zs_chanstate *cs;
|
||||
struct cfdata *cf;
|
||||
int channel, kbd_unit;
|
||||
int reset, s;
|
||||
|
||||
cf = k->k_dev.dv_cfdata;
|
||||
kbd_unit = k->k_dev.dv_unit;
|
||||
channel = args->channel;
|
||||
cs = zsc->zsc_cs[channel];
|
||||
cs->cs_private = k;
|
||||
cs->cs_ops = &zsops_kbd;
|
||||
k->k_cs = cs;
|
||||
|
||||
if (args->hwflags & ZS_HWFLAG_CONSOLE) {
|
||||
k->k_isconsole = 1;
|
||||
printf(" (console)");
|
||||
}
|
||||
printf("\n");
|
||||
|
||||
/* Initialize the speed, etc. */
|
||||
s = splzs();
|
||||
if (k->k_isconsole == 0) {
|
||||
/* Not the console; may need reset. */
|
||||
reset = (channel == 0) ?
|
||||
ZSWR9_A_RESET : ZSWR9_B_RESET;
|
||||
zs_write_reg(cs, 9, reset);
|
||||
}
|
||||
/* These are OK as set by zscc: WR3, WR4, WR5 */
|
||||
/* We don't care about status interrupts. */
|
||||
cs->cs_preg[1] = ZSWR1_RIE | ZSWR1_TIE;
|
||||
(void) zs_set_speed(cs, KBD_BPS);
|
||||
zs_loadchannelregs(cs);
|
||||
splx(s);
|
||||
|
||||
/* Do this before any calls to kbd_rint(). */
|
||||
kbd_xlate_init(&k->k_state);
|
||||
|
||||
/* XXX - Do this in open? */
|
||||
k->k_repeat_start = hz/2;
|
||||
k->k_repeat_step = hz/20;
|
||||
|
||||
/* Magic sequence. */
|
||||
k->k_magic1 = KBD_L1;
|
||||
k->k_magic2 = KBD_A;
|
||||
|
||||
/* Now attach the (kd) pseudo-driver. */
|
||||
kd_init(kbd_unit);
|
||||
}
|
||||
|
||||
|
||||
/****************************************************************
|
||||
* Entry points for /dev/kbd
|
||||
* (open,close,read,write,...)
|
||||
@ -647,7 +470,6 @@ kbd_iocsled(k, data)
|
||||
static void kbd_input_string __P((struct kbd_softc *, char *));
|
||||
static void kbd_input_funckey __P((struct kbd_softc *, int));
|
||||
static int kbd_input_keysym __P((struct kbd_softc *, int));
|
||||
static void kbd_input_raw __P((struct kbd_softc *k, int));
|
||||
|
||||
/*
|
||||
* Initialization done by either kdcninit or kbd_iopen
|
||||
@ -733,6 +555,7 @@ kbd_input_string(k, str)
|
||||
struct kbd_softc *k;
|
||||
char *str;
|
||||
{
|
||||
|
||||
while (*str) {
|
||||
kd_input(*str);
|
||||
str++;
|
||||
@ -825,7 +648,8 @@ kbd_input_keysym(k, keysym)
|
||||
* Called at splsoftclock().
|
||||
*/
|
||||
static void
|
||||
kbd_repeat(void *arg)
|
||||
kbd_repeat(arg)
|
||||
void *arg;
|
||||
{
|
||||
struct kbd_softc *k = (struct kbd_softc *)arg;
|
||||
int s = spltty();
|
||||
@ -958,217 +782,6 @@ kbd_input_raw(k, c)
|
||||
EV_WAKEUP(&k->k_events);
|
||||
}
|
||||
|
||||
/****************************************************************
|
||||
* Interface to the lower layer (zscc)
|
||||
****************************************************************/
|
||||
|
||||
static void kbd_rxint __P((struct zs_chanstate *));
|
||||
static void kbd_stint __P((struct zs_chanstate *, int));
|
||||
static void kbd_txint __P((struct zs_chanstate *));
|
||||
static void kbd_softint __P((struct zs_chanstate *));
|
||||
|
||||
static void
|
||||
kbd_rxint(cs)
|
||||
register struct zs_chanstate *cs;
|
||||
{
|
||||
register struct kbd_softc *k;
|
||||
register int put, put_next;
|
||||
register u_char c, rr1;
|
||||
|
||||
k = cs->cs_private;
|
||||
put = k->k_rbput;
|
||||
|
||||
/*
|
||||
* First read the status, because reading the received char
|
||||
* destroys the status of this char.
|
||||
*/
|
||||
rr1 = zs_read_reg(cs, 1);
|
||||
c = zs_read_data(cs);
|
||||
|
||||
if (rr1 & (ZSRR1_FE | ZSRR1_DO | ZSRR1_PE)) {
|
||||
/* Clear the receive error. */
|
||||
zs_write_csr(cs, ZSWR0_RESET_ERRORS);
|
||||
}
|
||||
|
||||
/*
|
||||
* Check NOW for a console abort sequence, so that we can
|
||||
* abort even when interrupts are locking up the machine.
|
||||
*/
|
||||
if (k->k_magic1_down) {
|
||||
/* The last keycode was "MAGIC1" down. */
|
||||
k->k_magic1_down = 0;
|
||||
if (c == k->k_magic2) {
|
||||
/* Magic "L1-A" sequence; enter debugger. */
|
||||
if (k->k_isconsole) {
|
||||
zs_abort(cs);
|
||||
/* Debugger done. Fake L1-up to finish it. */
|
||||
c = k->k_magic1 | KBD_UP;
|
||||
} else {
|
||||
printf("kbd: magic sequence, but not console\n");
|
||||
}
|
||||
}
|
||||
}
|
||||
if (c == k->k_magic1) {
|
||||
k->k_magic1_down = 1;
|
||||
}
|
||||
|
||||
k->k_rbuf[put] = (c << 8) | rr1;
|
||||
put_next = (put + 1) & KBD_RX_RING_MASK;
|
||||
|
||||
/* Would overrun if increment makes (put==get). */
|
||||
if (put_next == k->k_rbget) {
|
||||
k->k_intr_flags |= INTR_RX_OVERRUN;
|
||||
} else {
|
||||
/* OK, really increment. */
|
||||
put = put_next;
|
||||
}
|
||||
|
||||
/* Done reading. */
|
||||
k->k_rbput = put;
|
||||
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
kbd_txint(cs)
|
||||
register struct zs_chanstate *cs;
|
||||
{
|
||||
register struct kbd_softc *k;
|
||||
|
||||
k = cs->cs_private;
|
||||
zs_write_csr(cs, ZSWR0_RESET_TXINT);
|
||||
k->k_intr_flags |= INTR_TX_EMPTY;
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
kbd_stint(cs, force)
|
||||
register struct zs_chanstate *cs;
|
||||
int force;
|
||||
{
|
||||
register struct kbd_softc *k;
|
||||
register int rr0;
|
||||
|
||||
k = cs->cs_private;
|
||||
|
||||
rr0 = zs_read_csr(cs);
|
||||
zs_write_csr(cs, ZSWR0_RESET_STATUS);
|
||||
|
||||
#if 0
|
||||
if (rr0 & ZSRR0_BREAK) {
|
||||
/* Keyboard unplugged? */
|
||||
zs_abort(cs);
|
||||
return (0);
|
||||
}
|
||||
#endif
|
||||
|
||||
/*
|
||||
* We have to accumulate status line changes here.
|
||||
* Otherwise, if we get multiple status interrupts
|
||||
* before the softint runs, we could fail to notice
|
||||
* some status line changes in the softint routine.
|
||||
* Fix from Bill Studenmund, October 1996.
|
||||
*/
|
||||
cs->cs_rr0_delta |= (cs->cs_rr0 ^ rr0);
|
||||
cs->cs_rr0 = rr0;
|
||||
k->k_intr_flags |= INTR_ST_CHECK;
|
||||
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
/*
|
||||
* Get input from the recieve ring and pass it on.
|
||||
* Note: this is called at splsoftclock()
|
||||
*/
|
||||
static void
|
||||
kbd_softint(cs)
|
||||
struct zs_chanstate *cs;
|
||||
{
|
||||
register struct kbd_softc *k;
|
||||
register int get, c, s;
|
||||
int intr_flags;
|
||||
register u_short ring_data;
|
||||
|
||||
k = cs->cs_private;
|
||||
|
||||
/* Atomically get and clear flags. */
|
||||
s = splzs();
|
||||
intr_flags = k->k_intr_flags;
|
||||
k->k_intr_flags = 0;
|
||||
|
||||
/* Now lower to spltty for the rest. */
|
||||
(void) spltty();
|
||||
|
||||
/*
|
||||
* Copy data from the receive ring to the event layer.
|
||||
*/
|
||||
get = k->k_rbget;
|
||||
while (get != k->k_rbput) {
|
||||
ring_data = k->k_rbuf[get];
|
||||
get = (get + 1) & KBD_RX_RING_MASK;
|
||||
|
||||
/* low byte of ring_data is rr1 */
|
||||
c = (ring_data >> 8) & 0xff;
|
||||
|
||||
if (ring_data & ZSRR1_DO)
|
||||
intr_flags |= INTR_RX_OVERRUN;
|
||||
if (ring_data & (ZSRR1_FE | ZSRR1_PE)) {
|
||||
/*
|
||||
* After garbage, flush pending input, and
|
||||
* send a reset to resync key translation.
|
||||
*/
|
||||
log(LOG_ERR, "%s: input error (0x%x)\n",
|
||||
k->k_dev.dv_xname, ring_data);
|
||||
get = k->k_rbput; /* flush */
|
||||
goto send_reset;
|
||||
}
|
||||
|
||||
/* Pass this up to the "middle" layer. */
|
||||
kbd_input_raw(k, c);
|
||||
}
|
||||
if (intr_flags & INTR_RX_OVERRUN) {
|
||||
log(LOG_ERR, "%s: input overrun\n",
|
||||
k->k_dev.dv_xname);
|
||||
send_reset:
|
||||
/* Send a reset to resync translation. */
|
||||
kbd_output(k, KBD_CMD_RESET);
|
||||
kbd_start_tx(k);
|
||||
}
|
||||
k->k_rbget = get;
|
||||
|
||||
if (intr_flags & INTR_TX_EMPTY) {
|
||||
/*
|
||||
* Transmit done. Try to send more, or
|
||||
* clear busy and wakeup drain waiters.
|
||||
*/
|
||||
k->k_txflags &= ~K_TXBUSY;
|
||||
kbd_start_tx(k);
|
||||
}
|
||||
|
||||
if (intr_flags & INTR_ST_CHECK) {
|
||||
/*
|
||||
* Status line change. (Not expected.)
|
||||
*/
|
||||
log(LOG_ERR, "%s: status interrupt?\n",
|
||||
k->k_dev.dv_xname);
|
||||
cs->cs_rr0_delta = 0;
|
||||
}
|
||||
|
||||
splx(s);
|
||||
}
|
||||
|
||||
struct zsops zsops_kbd = {
|
||||
kbd_rxint, /* receive char available */
|
||||
kbd_stint, /* external/status */
|
||||
kbd_txint, /* xmit buffer empty */
|
||||
kbd_softint, /* process software interrupt */
|
||||
};
|
||||
|
||||
/****************************************************************
|
||||
* misc...
|
||||
****************************************************************/
|
||||
@ -1337,7 +950,7 @@ kbd_drain_tx(k)
|
||||
* Enqueue some output for the keyboard
|
||||
* Called at spltty().
|
||||
*/
|
||||
static void
|
||||
void
|
||||
kbd_output(k, c)
|
||||
struct kbd_softc *k;
|
||||
int c; /* the data */
|
||||
@ -1362,12 +975,11 @@ kbd_output(k, c)
|
||||
* Start the sending data from the output queue
|
||||
* Called at spltty().
|
||||
*/
|
||||
static void
|
||||
void
|
||||
kbd_start_tx(k)
|
||||
struct kbd_softc *k;
|
||||
{
|
||||
struct zs_chanstate *cs = k->k_cs;
|
||||
int get, s;
|
||||
int get;
|
||||
u_char c;
|
||||
|
||||
if (k->k_txflags & K_TXBUSY)
|
||||
@ -1390,10 +1002,7 @@ kbd_start_tx(k)
|
||||
k->k_tbget = get;
|
||||
k->k_txflags |= K_TXBUSY;
|
||||
|
||||
/* Need splzs to avoid interruption of the delay. */
|
||||
s = splzs();
|
||||
zs_write_data(cs, c);
|
||||
splx(s);
|
||||
k->k_write_data(k, c);
|
||||
}
|
||||
|
||||
/*
|
||||
|
||||
390
sys/dev/sun/kbd_zs.c
Normal file
390
sys/dev/sun/kbd_zs.c
Normal file
@ -0,0 +1,390 @@
|
||||
/* $NetBSD: kbd_zs.c,v 1.1 1999/05/14 06:42:02 mrg Exp $ */
|
||||
|
||||
/*
|
||||
* Copyright (c) 1992, 1993
|
||||
* The Regents of the University of California. All rights reserved.
|
||||
*
|
||||
* This software was developed by the Computer Systems Engineering group
|
||||
* at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
|
||||
* contributed to Berkeley.
|
||||
*
|
||||
* 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, Lawrence Berkeley Laboratory.
|
||||
*
|
||||
* 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.
|
||||
*
|
||||
* @(#)kbd.c 8.2 (Berkeley) 10/30/93
|
||||
*/
|
||||
|
||||
/*
|
||||
* Keyboard driver (/dev/kbd -- note that we do not have minor numbers
|
||||
* [yet?]). Translates incoming bytes to ASCII or to `firm_events' and
|
||||
* passes them up to the appropriate reader.
|
||||
*/
|
||||
|
||||
/*
|
||||
* Zilog Z8530 Dual UART driver (keyboard interface)
|
||||
*
|
||||
* This is the 8530 portion of the driver that will be attached to
|
||||
* the "zsc" driver for a Sun keyboard.
|
||||
*/
|
||||
|
||||
#include <sys/param.h>
|
||||
#include <sys/systm.h>
|
||||
#include <sys/conf.h>
|
||||
#include <sys/device.h>
|
||||
#include <sys/kernel.h>
|
||||
#include <sys/proc.h>
|
||||
#include <sys/signal.h>
|
||||
#include <sys/signalvar.h>
|
||||
#include <sys/time.h>
|
||||
#include <sys/select.h>
|
||||
#include <sys/syslog.h>
|
||||
|
||||
#include <dev/ic/z8530reg.h>
|
||||
#include <machine/z8530var.h>
|
||||
#include <machine/vuid_event.h>
|
||||
#include <machine/kbd.h>
|
||||
#include <dev/sun/event_var.h>
|
||||
#include <dev/sun/kbd_xlate.h>
|
||||
#include <dev/sun/kbdvar.h>
|
||||
|
||||
/****************************************************************
|
||||
* Interface to the lower layer (zscc)
|
||||
****************************************************************/
|
||||
|
||||
static void kbd_zs_rxint __P((struct zs_chanstate *));
|
||||
static void kbd_zs_stint __P((struct zs_chanstate *, int));
|
||||
static void kbd_zs_txint __P((struct zs_chanstate *));
|
||||
static void kbd_zs_softint __P((struct zs_chanstate *));
|
||||
|
||||
struct zsops zsops_kbd = {
|
||||
kbd_zs_rxint, /* receive char available */
|
||||
kbd_zs_stint, /* external/status */
|
||||
kbd_zs_txint, /* xmit buffer empty */
|
||||
kbd_zs_softint, /* process software interrupt */
|
||||
};
|
||||
|
||||
static int kbd_zs_match(struct device *, struct cfdata *, void *);
|
||||
static void kbd_zs_attach(struct device *, struct device *, void *);
|
||||
static void kbd_zs_write_data __P((struct kbd_softc *, int));
|
||||
|
||||
struct cfattach kbd_zs_ca = {
|
||||
sizeof(struct kbd_softc), kbd_zs_match, kbd_zs_attach
|
||||
};
|
||||
|
||||
/*
|
||||
* kbd_zs_match: how is this zs channel configured?
|
||||
*/
|
||||
int
|
||||
kbd_zs_match(parent, cf, aux)
|
||||
struct device *parent;
|
||||
struct cfdata *cf;
|
||||
void *aux;
|
||||
{
|
||||
struct zsc_attach_args *args = aux;
|
||||
|
||||
/* Exact match required for keyboard. */
|
||||
if (cf->cf_loc[ZSCCF_CHANNEL] == args->channel)
|
||||
return 2;
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
void
|
||||
kbd_zs_attach(parent, self, aux)
|
||||
struct device *parent, *self;
|
||||
void *aux;
|
||||
|
||||
{
|
||||
struct zsc_softc *zsc = (void *) parent;
|
||||
struct kbd_softc *k = (void *) self;
|
||||
struct zsc_attach_args *args = aux;
|
||||
struct zs_chanstate *cs;
|
||||
struct cfdata *cf;
|
||||
int channel, kbd_unit;
|
||||
int reset, s;
|
||||
|
||||
cf = k->k_dev.dv_cfdata;
|
||||
kbd_unit = k->k_dev.dv_unit;
|
||||
channel = args->channel;
|
||||
cs = zsc->zsc_cs[channel];
|
||||
cs->cs_private = k;
|
||||
cs->cs_ops = &zsops_kbd;
|
||||
k->k_cs = cs;
|
||||
k->k_write_data = kbd_zs_write_data;
|
||||
|
||||
if (args->hwflags & ZS_HWFLAG_CONSOLE) {
|
||||
k->k_isconsole = 1;
|
||||
printf(" (console)");
|
||||
}
|
||||
printf("\n");
|
||||
|
||||
/* Initialize the speed, etc. */
|
||||
s = splzs();
|
||||
if (k->k_isconsole == 0) {
|
||||
/* Not the console; may need reset. */
|
||||
reset = (channel == 0) ?
|
||||
ZSWR9_A_RESET : ZSWR9_B_RESET;
|
||||
zs_write_reg(cs, 9, reset);
|
||||
}
|
||||
/* These are OK as set by zscc: WR3, WR4, WR5 */
|
||||
/* We don't care about status interrupts. */
|
||||
cs->cs_preg[1] = ZSWR1_RIE | ZSWR1_TIE;
|
||||
(void) zs_set_speed(cs, KBD_BPS);
|
||||
zs_loadchannelregs(cs);
|
||||
splx(s);
|
||||
|
||||
/* Do this before any calls to kbd_rint(). */
|
||||
kbd_xlate_init(&k->k_state);
|
||||
|
||||
/* XXX - Do this in open? */
|
||||
k->k_repeat_start = hz/2;
|
||||
k->k_repeat_step = hz/20;
|
||||
|
||||
/* Magic sequence. */
|
||||
k->k_magic1 = KBD_L1;
|
||||
k->k_magic2 = KBD_A;
|
||||
|
||||
/* Now attach the (kd) pseudo-driver. */
|
||||
kd_init(kbd_unit);
|
||||
}
|
||||
|
||||
/*
|
||||
* used by kbd_start_tx();
|
||||
*/
|
||||
void
|
||||
kbd_zs_write_data(k, c)
|
||||
struct kbd_softc *k;
|
||||
int c;
|
||||
{
|
||||
int s;
|
||||
|
||||
/* Need splzs to avoid interruption of the delay. */
|
||||
s = splzs();
|
||||
zs_write_data(k->k_cs, c);
|
||||
splx(s);
|
||||
}
|
||||
|
||||
static void
|
||||
kbd_zs_rxint(cs)
|
||||
register struct zs_chanstate *cs;
|
||||
{
|
||||
register struct kbd_softc *k;
|
||||
register int put, put_next;
|
||||
register u_char c, rr1;
|
||||
|
||||
k = cs->cs_private;
|
||||
put = k->k_rbput;
|
||||
|
||||
/*
|
||||
* First read the status, because reading the received char
|
||||
* destroys the status of this char.
|
||||
*/
|
||||
rr1 = zs_read_reg(cs, 1);
|
||||
c = zs_read_data(cs);
|
||||
|
||||
if (rr1 & (ZSRR1_FE | ZSRR1_DO | ZSRR1_PE)) {
|
||||
/* Clear the receive error. */
|
||||
zs_write_csr(cs, ZSWR0_RESET_ERRORS);
|
||||
}
|
||||
|
||||
/*
|
||||
* Check NOW for a console abort sequence, so that we can
|
||||
* abort even when interrupts are locking up the machine.
|
||||
*/
|
||||
if (k->k_magic1_down) {
|
||||
/* The last keycode was "MAGIC1" down. */
|
||||
k->k_magic1_down = 0;
|
||||
if (c == k->k_magic2) {
|
||||
/* Magic "L1-A" sequence; enter debugger. */
|
||||
if (k->k_isconsole) {
|
||||
zs_abort(cs);
|
||||
/* Debugger done. Fake L1-up to finish it. */
|
||||
c = k->k_magic1 | KBD_UP;
|
||||
} else {
|
||||
printf("kbd: magic sequence, but not console\n");
|
||||
}
|
||||
}
|
||||
}
|
||||
if (c == k->k_magic1) {
|
||||
k->k_magic1_down = 1;
|
||||
}
|
||||
|
||||
k->k_rbuf[put] = (c << 8) | rr1;
|
||||
put_next = (put + 1) & KBD_RX_RING_MASK;
|
||||
|
||||
/* Would overrun if increment makes (put==get). */
|
||||
if (put_next == k->k_rbget) {
|
||||
k->k_intr_flags |= INTR_RX_OVERRUN;
|
||||
} else {
|
||||
/* OK, really increment. */
|
||||
put = put_next;
|
||||
}
|
||||
|
||||
/* Done reading. */
|
||||
k->k_rbput = put;
|
||||
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
kbd_zs_txint(cs)
|
||||
register struct zs_chanstate *cs;
|
||||
{
|
||||
register struct kbd_softc *k;
|
||||
|
||||
k = cs->cs_private;
|
||||
zs_write_csr(cs, ZSWR0_RESET_TXINT);
|
||||
k->k_intr_flags |= INTR_TX_EMPTY;
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
kbd_zs_stint(cs, force)
|
||||
register struct zs_chanstate *cs;
|
||||
int force;
|
||||
{
|
||||
register struct kbd_softc *k;
|
||||
register int rr0;
|
||||
|
||||
k = cs->cs_private;
|
||||
|
||||
rr0 = zs_read_csr(cs);
|
||||
zs_write_csr(cs, ZSWR0_RESET_STATUS);
|
||||
|
||||
#if 0
|
||||
if (rr0 & ZSRR0_BREAK) {
|
||||
/* Keyboard unplugged? */
|
||||
zs_abort(cs);
|
||||
return (0);
|
||||
}
|
||||
#endif
|
||||
|
||||
/*
|
||||
* We have to accumulate status line changes here.
|
||||
* Otherwise, if we get multiple status interrupts
|
||||
* before the softint runs, we could fail to notice
|
||||
* some status line changes in the softint routine.
|
||||
* Fix from Bill Studenmund, October 1996.
|
||||
*/
|
||||
cs->cs_rr0_delta |= (cs->cs_rr0 ^ rr0);
|
||||
cs->cs_rr0 = rr0;
|
||||
k->k_intr_flags |= INTR_ST_CHECK;
|
||||
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
/*
|
||||
* Get input from the recieve ring and pass it on.
|
||||
* Note: this is called at splsoftclock()
|
||||
*/
|
||||
static void
|
||||
kbd_zs_softint(cs)
|
||||
struct zs_chanstate *cs;
|
||||
{
|
||||
register struct kbd_softc *k;
|
||||
register int get, c, s;
|
||||
int intr_flags;
|
||||
register u_short ring_data;
|
||||
|
||||
k = cs->cs_private;
|
||||
|
||||
/* Atomically get and clear flags. */
|
||||
s = splzs();
|
||||
intr_flags = k->k_intr_flags;
|
||||
k->k_intr_flags = 0;
|
||||
|
||||
/* Now lower to spltty for the rest. */
|
||||
(void) spltty();
|
||||
|
||||
/*
|
||||
* Copy data from the receive ring to the event layer.
|
||||
*/
|
||||
get = k->k_rbget;
|
||||
while (get != k->k_rbput) {
|
||||
ring_data = k->k_rbuf[get];
|
||||
get = (get + 1) & KBD_RX_RING_MASK;
|
||||
|
||||
/* low byte of ring_data is rr1 */
|
||||
c = (ring_data >> 8) & 0xff;
|
||||
|
||||
if (ring_data & ZSRR1_DO)
|
||||
intr_flags |= INTR_RX_OVERRUN;
|
||||
if (ring_data & (ZSRR1_FE | ZSRR1_PE)) {
|
||||
/*
|
||||
* After garbage, flush pending input, and
|
||||
* send a reset to resync key translation.
|
||||
*/
|
||||
log(LOG_ERR, "%s: input error (0x%x)\n",
|
||||
k->k_dev.dv_xname, ring_data);
|
||||
get = k->k_rbput; /* flush */
|
||||
goto send_reset;
|
||||
}
|
||||
|
||||
/* Pass this up to the "middle" layer. */
|
||||
kbd_input_raw(k, c);
|
||||
}
|
||||
if (intr_flags & INTR_RX_OVERRUN) {
|
||||
log(LOG_ERR, "%s: input overrun\n",
|
||||
k->k_dev.dv_xname);
|
||||
send_reset:
|
||||
/* Send a reset to resync translation. */
|
||||
kbd_output(k, KBD_CMD_RESET);
|
||||
kbd_start_tx(k);
|
||||
}
|
||||
k->k_rbget = get;
|
||||
|
||||
if (intr_flags & INTR_TX_EMPTY) {
|
||||
/*
|
||||
* Transmit done. Try to send more, or
|
||||
* clear busy and wakeup drain waiters.
|
||||
*/
|
||||
k->k_txflags &= ~K_TXBUSY;
|
||||
kbd_start_tx(k);
|
||||
}
|
||||
|
||||
if (intr_flags & INTR_ST_CHECK) {
|
||||
/*
|
||||
* Status line change. (Not expected.)
|
||||
*/
|
||||
log(LOG_ERR, "%s: status interrupt?\n",
|
||||
k->k_dev.dv_xname);
|
||||
cs->cs_rr0_delta = 0;
|
||||
}
|
||||
|
||||
splx(s);
|
||||
}
|
||||
314
sys/dev/sun/ms.c
314
sys/dev/sun/ms.c
@ -1,4 +1,4 @@
|
||||
/* $NetBSD: ms.c,v 1.15 1999/02/03 20:22:28 mycroft Exp $ */
|
||||
/* $NetBSD: ms.c,v 1.16 1999/05/14 06:42:02 mrg Exp $ */
|
||||
|
||||
/*
|
||||
* Copyright (c) 1992, 1993
|
||||
@ -73,152 +73,15 @@
|
||||
|
||||
#include <dev/ic/z8530reg.h>
|
||||
#include <machine/z8530var.h>
|
||||
#include <dev/sun/event_var.h>
|
||||
#include <dev/sun/msvar.h>
|
||||
|
||||
#include "event_var.h"
|
||||
#include "locators.h"
|
||||
|
||||
/*
|
||||
* How many input characters we can buffer.
|
||||
* The port-specific var.h may override this.
|
||||
* Note: must be a power of two!
|
||||
*/
|
||||
#define MS_RX_RING_SIZE 256
|
||||
#define MS_RX_RING_MASK (MS_RX_RING_SIZE-1)
|
||||
/*
|
||||
* Output buffer. Only need a few chars.
|
||||
*/
|
||||
#define MS_TX_RING_SIZE 16
|
||||
#define MS_TX_RING_MASK (MS_TX_RING_SIZE-1)
|
||||
/*
|
||||
* Keyboard serial line speed is fixed at 1200 bps; mouse serial line
|
||||
* speed defaults to 1200 bps.
|
||||
*/
|
||||
#ifdef SUN_MS_BPS
|
||||
#define MS_BPS SUN_MS_BPS
|
||||
#else
|
||||
#define MS_BPS 1200
|
||||
#endif
|
||||
|
||||
/*
|
||||
* Mouse state. A Mouse Systems mouse is a fairly simple device,
|
||||
* producing five-byte blobs of the form:
|
||||
*
|
||||
* b dx dy dx dy
|
||||
*
|
||||
* where b is the button state, encoded as 0x80|(~buttons)---there are
|
||||
* three buttons (4=left, 2=middle, 1=right)---and dx,dy are X and Y
|
||||
* delta values, none of which have are in [0x80..0x87]. (This lets
|
||||
* us sync up with the mouse after an error.)
|
||||
*/
|
||||
struct ms_softc {
|
||||
struct device ms_dev; /* required first: base device */
|
||||
struct zs_chanstate *ms_cs;
|
||||
|
||||
/* Flags to communicate with ms_softintr() */
|
||||
volatile int ms_intr_flags;
|
||||
#define INTR_RX_OVERRUN 1
|
||||
#define INTR_TX_EMPTY 2
|
||||
#define INTR_ST_CHECK 4
|
||||
|
||||
/*
|
||||
* The receive ring buffer.
|
||||
*/
|
||||
u_int ms_rbget; /* ring buffer `get' index */
|
||||
volatile u_int ms_rbput; /* ring buffer `put' index */
|
||||
u_short ms_rbuf[MS_RX_RING_SIZE]; /* rr1, data pairs */
|
||||
|
||||
/*
|
||||
* State of input translator
|
||||
*/
|
||||
short ms_byteno; /* input byte number, for decode */
|
||||
char ms_mb; /* mouse button state */
|
||||
char ms_ub; /* user button state */
|
||||
int ms_dx; /* delta-x */
|
||||
int ms_dy; /* delta-y */
|
||||
|
||||
/*
|
||||
* State of upper interface.
|
||||
*/
|
||||
volatile int ms_ready; /* event queue is ready */
|
||||
struct evvar ms_events; /* event queue state */
|
||||
} ms_softc;
|
||||
|
||||
cdev_decl(ms); /* open, close, read, write, ioctl, stop, ... */
|
||||
|
||||
struct zsops zsops_ms;
|
||||
|
||||
/****************************************************************
|
||||
* Definition of the driver for autoconfig.
|
||||
****************************************************************/
|
||||
|
||||
static int ms_match(struct device *, struct cfdata *, void *);
|
||||
static void ms_attach(struct device *, struct device *, void *);
|
||||
|
||||
struct cfattach ms_ca = {
|
||||
sizeof(struct ms_softc), ms_match, ms_attach
|
||||
};
|
||||
|
||||
extern struct cfdriver ms_cd;
|
||||
|
||||
/*
|
||||
* ms_match: how is this zs channel configured?
|
||||
*/
|
||||
int
|
||||
ms_match(parent, cf, aux)
|
||||
struct device *parent;
|
||||
struct cfdata *cf;
|
||||
void *aux;
|
||||
{
|
||||
struct zsc_attach_args *args = aux;
|
||||
|
||||
/* Exact match required for keyboard. */
|
||||
if (cf->cf_loc[ZSCCF_CHANNEL] == args->channel)
|
||||
return 2;
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
void
|
||||
ms_attach(parent, self, aux)
|
||||
struct device *parent, *self;
|
||||
void *aux;
|
||||
|
||||
{
|
||||
struct zsc_softc *zsc = (void *) parent;
|
||||
struct ms_softc *ms = (void *) self;
|
||||
struct zsc_attach_args *args = aux;
|
||||
struct zs_chanstate *cs;
|
||||
struct cfdata *cf;
|
||||
int channel, ms_unit;
|
||||
int reset, s;
|
||||
|
||||
cf = ms->ms_dev.dv_cfdata;
|
||||
ms_unit = ms->ms_dev.dv_unit;
|
||||
channel = args->channel;
|
||||
cs = zsc->zsc_cs[channel];
|
||||
cs->cs_private = ms;
|
||||
cs->cs_ops = &zsops_ms;
|
||||
ms->ms_cs = cs;
|
||||
|
||||
printf("\n");
|
||||
|
||||
/* Initialize the speed, etc. */
|
||||
s = splzs();
|
||||
/* May need reset... */
|
||||
reset = (channel == 0) ?
|
||||
ZSWR9_A_RESET : ZSWR9_B_RESET;
|
||||
zs_write_reg(cs, 9, reset);
|
||||
/* These are OK as set by zscc: WR3, WR4, WR5 */
|
||||
/* We don't care about status or tx interrupts. */
|
||||
cs->cs_preg[1] = ZSWR1_RIE;
|
||||
(void) zs_set_speed(cs, MS_BPS);
|
||||
zs_loadchannelregs(cs);
|
||||
splx(s);
|
||||
|
||||
/* Initialize translator. */
|
||||
ms->ms_byteno = -1;
|
||||
}
|
||||
|
||||
/****************************************************************
|
||||
* Entry points for /dev/mouse
|
||||
* (open,close,read,write,...)
|
||||
@ -345,9 +208,6 @@ mspoll(dev, events, p)
|
||||
* Middle layer (translator)
|
||||
****************************************************************/
|
||||
|
||||
static void ms_input __P((struct ms_softc *, int c));
|
||||
|
||||
|
||||
/*
|
||||
* Called by our ms_softint() routine on input.
|
||||
*/
|
||||
@ -484,171 +344,3 @@ out:
|
||||
EV_WAKEUP(&ms->ms_events);
|
||||
}
|
||||
}
|
||||
|
||||
/****************************************************************
|
||||
* Interface to the lower layer (zscc)
|
||||
****************************************************************/
|
||||
|
||||
static void ms_rxint __P((struct zs_chanstate *));
|
||||
static void ms_stint __P((struct zs_chanstate *, int));
|
||||
static void ms_txint __P((struct zs_chanstate *));
|
||||
static void ms_softint __P((struct zs_chanstate *));
|
||||
|
||||
static void
|
||||
ms_rxint(cs)
|
||||
register struct zs_chanstate *cs;
|
||||
{
|
||||
register struct ms_softc *ms;
|
||||
register int put, put_next;
|
||||
register u_char c, rr1;
|
||||
|
||||
ms = cs->cs_private;
|
||||
put = ms->ms_rbput;
|
||||
|
||||
/*
|
||||
* First read the status, because reading the received char
|
||||
* destroys the status of this char.
|
||||
*/
|
||||
rr1 = zs_read_reg(cs, 1);
|
||||
c = zs_read_data(cs);
|
||||
|
||||
if (rr1 & (ZSRR1_FE | ZSRR1_DO | ZSRR1_PE)) {
|
||||
/* Clear the receive error. */
|
||||
zs_write_csr(cs, ZSWR0_RESET_ERRORS);
|
||||
}
|
||||
|
||||
ms->ms_rbuf[put] = (c << 8) | rr1;
|
||||
put_next = (put + 1) & MS_RX_RING_MASK;
|
||||
|
||||
/* Would overrun if increment makes (put==get). */
|
||||
if (put_next == ms->ms_rbget) {
|
||||
ms->ms_intr_flags |= INTR_RX_OVERRUN;
|
||||
} else {
|
||||
/* OK, really increment. */
|
||||
put = put_next;
|
||||
}
|
||||
|
||||
/* Done reading. */
|
||||
ms->ms_rbput = put;
|
||||
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
ms_txint(cs)
|
||||
register struct zs_chanstate *cs;
|
||||
{
|
||||
register struct ms_softc *ms;
|
||||
|
||||
ms = cs->cs_private;
|
||||
zs_write_csr(cs, ZSWR0_RESET_TXINT);
|
||||
ms->ms_intr_flags |= INTR_TX_EMPTY;
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
ms_stint(cs, force)
|
||||
register struct zs_chanstate *cs;
|
||||
int force;
|
||||
{
|
||||
register struct ms_softc *ms;
|
||||
register int rr0;
|
||||
|
||||
ms = cs->cs_private;
|
||||
|
||||
rr0 = zs_read_csr(cs);
|
||||
zs_write_csr(cs, ZSWR0_RESET_STATUS);
|
||||
|
||||
/*
|
||||
* We have to accumulate status line changes here.
|
||||
* Otherwise, if we get multiple status interrupts
|
||||
* before the softint runs, we could fail to notice
|
||||
* some status line changes in the softint routine.
|
||||
* Fix from Bill Studenmund, October 1996.
|
||||
*/
|
||||
cs->cs_rr0_delta |= (cs->cs_rr0 ^ rr0);
|
||||
cs->cs_rr0 = rr0;
|
||||
ms->ms_intr_flags |= INTR_ST_CHECK;
|
||||
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
ms_softint(cs)
|
||||
struct zs_chanstate *cs;
|
||||
{
|
||||
register struct ms_softc *ms;
|
||||
register int get, c, s;
|
||||
int intr_flags;
|
||||
register u_short ring_data;
|
||||
|
||||
ms = cs->cs_private;
|
||||
|
||||
/* Atomically get and clear flags. */
|
||||
s = splzs();
|
||||
intr_flags = ms->ms_intr_flags;
|
||||
ms->ms_intr_flags = 0;
|
||||
|
||||
/* Now lower to spltty for the rest. */
|
||||
(void) spltty();
|
||||
|
||||
/*
|
||||
* Copy data from the receive ring to the event layer.
|
||||
*/
|
||||
get = ms->ms_rbget;
|
||||
while (get != ms->ms_rbput) {
|
||||
ring_data = ms->ms_rbuf[get];
|
||||
get = (get + 1) & MS_RX_RING_MASK;
|
||||
|
||||
/* low byte of ring_data is rr1 */
|
||||
c = (ring_data >> 8) & 0xff;
|
||||
|
||||
if (ring_data & ZSRR1_DO)
|
||||
intr_flags |= INTR_RX_OVERRUN;
|
||||
if (ring_data & (ZSRR1_FE | ZSRR1_PE)) {
|
||||
log(LOG_ERR, "%s: input error (0x%x)\n",
|
||||
ms->ms_dev.dv_xname, ring_data);
|
||||
c = -1; /* signal input error */
|
||||
}
|
||||
|
||||
/* Pass this up to the "middle" layer. */
|
||||
ms_input(ms, c);
|
||||
}
|
||||
if (intr_flags & INTR_RX_OVERRUN) {
|
||||
log(LOG_ERR, "%s: input overrun\n",
|
||||
ms->ms_dev.dv_xname);
|
||||
}
|
||||
ms->ms_rbget = get;
|
||||
|
||||
if (intr_flags & INTR_TX_EMPTY) {
|
||||
/*
|
||||
* Transmit done. (Not expected.)
|
||||
*/
|
||||
log(LOG_ERR, "%s: transmit interrupt?\n",
|
||||
ms->ms_dev.dv_xname);
|
||||
}
|
||||
|
||||
if (intr_flags & INTR_ST_CHECK) {
|
||||
/*
|
||||
* Status line change. (Not expected.)
|
||||
*/
|
||||
log(LOG_ERR, "%s: status interrupt?\n",
|
||||
ms->ms_dev.dv_xname);
|
||||
cs->cs_rr0_delta = 0;
|
||||
}
|
||||
|
||||
splx(s);
|
||||
}
|
||||
|
||||
struct zsops zsops_ms = {
|
||||
ms_rxint, /* receive char available */
|
||||
ms_stint, /* external/status */
|
||||
ms_txint, /* xmit buffer empty */
|
||||
ms_softint, /* process software interrupt */
|
||||
};
|
||||
|
||||
307
sys/dev/sun/ms_zs.c
Normal file
307
sys/dev/sun/ms_zs.c
Normal file
@ -0,0 +1,307 @@
|
||||
/* $NetBSD: ms_zs.c,v 1.1 1999/05/14 06:42:02 mrg Exp $ */
|
||||
|
||||
/*
|
||||
* Copyright (c) 1992, 1993
|
||||
* The Regents of the University of California. All rights reserved.
|
||||
*
|
||||
* This software was developed by the Computer Systems Engineering group
|
||||
* at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
|
||||
* contributed to Berkeley.
|
||||
*
|
||||
* 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, Lawrence Berkeley Laboratory.
|
||||
*
|
||||
* 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.
|
||||
*
|
||||
* @(#)ms.c 8.1 (Berkeley) 6/11/93
|
||||
*/
|
||||
|
||||
/*
|
||||
* Mouse driver (/dev/mouse)
|
||||
*/
|
||||
|
||||
/*
|
||||
* Zilog Z8530 Dual UART driver (mouse interface)
|
||||
*
|
||||
* This is the "slave" driver that will be attached to
|
||||
* the "zsc" driver for a Sun mouse.
|
||||
*/
|
||||
|
||||
#include <sys/param.h>
|
||||
#include <sys/systm.h>
|
||||
#include <sys/conf.h>
|
||||
#include <sys/device.h>
|
||||
#include <sys/ioctl.h>
|
||||
#include <sys/kernel.h>
|
||||
#include <sys/proc.h>
|
||||
#include <sys/signal.h>
|
||||
#include <sys/signalvar.h>
|
||||
#include <sys/time.h>
|
||||
#include <sys/select.h>
|
||||
#include <sys/syslog.h>
|
||||
|
||||
#include <machine/vuid_event.h>
|
||||
|
||||
#include <dev/ic/z8530reg.h>
|
||||
#include <machine/z8530var.h>
|
||||
#include <dev/sun/event_var.h>
|
||||
#include <dev/sun/msvar.h>
|
||||
|
||||
static void ms_zs_rxint __P((struct zs_chanstate *));
|
||||
static void ms_zs_stint __P((struct zs_chanstate *, int));
|
||||
static void ms_zs_txint __P((struct zs_chanstate *));
|
||||
static void ms_zs_softint __P((struct zs_chanstate *));
|
||||
|
||||
struct zsops zsops_ms = {
|
||||
ms_zs_rxint, /* receive char available */
|
||||
ms_zs_stint, /* external/status */
|
||||
ms_zs_txint, /* xmit buffer empty */
|
||||
ms_zs_softint, /* process software interrupt */
|
||||
};
|
||||
|
||||
static int ms_zs_match(struct device *, struct cfdata *, void *);
|
||||
static void ms_zs_attach(struct device *, struct device *, void *);
|
||||
|
||||
struct cfattach ms_zs_ca = {
|
||||
sizeof(struct ms_softc), ms_zs_match, ms_zs_attach
|
||||
};
|
||||
|
||||
/*
|
||||
* ms_match: how is this zs channel configured?
|
||||
*/
|
||||
int
|
||||
ms_zs_match(parent, cf, aux)
|
||||
struct device *parent;
|
||||
struct cfdata *cf;
|
||||
void *aux;
|
||||
{
|
||||
struct zsc_attach_args *args = aux;
|
||||
|
||||
/* Exact match required for keyboard. */
|
||||
if (cf->cf_loc[ZSCCF_CHANNEL] == args->channel)
|
||||
return 2;
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
void
|
||||
ms_zs_attach(parent, self, aux)
|
||||
struct device *parent, *self;
|
||||
void *aux;
|
||||
|
||||
{
|
||||
struct zsc_softc *zsc = (void *) parent;
|
||||
struct ms_softc *ms = (void *) self;
|
||||
struct zsc_attach_args *args = aux;
|
||||
struct zs_chanstate *cs;
|
||||
struct cfdata *cf;
|
||||
int channel, ms_unit;
|
||||
int reset, s;
|
||||
|
||||
cf = ms->ms_dev.dv_cfdata;
|
||||
ms_unit = ms->ms_dev.dv_unit;
|
||||
channel = args->channel;
|
||||
cs = zsc->zsc_cs[channel];
|
||||
cs->cs_private = ms;
|
||||
cs->cs_ops = &zsops_ms;
|
||||
ms->ms_cs = cs;
|
||||
|
||||
printf("\n");
|
||||
|
||||
/* Initialize the speed, etc. */
|
||||
s = splzs();
|
||||
/* May need reset... */
|
||||
reset = (channel == 0) ?
|
||||
ZSWR9_A_RESET : ZSWR9_B_RESET;
|
||||
zs_write_reg(cs, 9, reset);
|
||||
/* These are OK as set by zscc: WR3, WR4, WR5 */
|
||||
/* We don't care about status or tx interrupts. */
|
||||
cs->cs_preg[1] = ZSWR1_RIE;
|
||||
(void) zs_set_speed(cs, MS_BPS);
|
||||
zs_loadchannelregs(cs);
|
||||
splx(s);
|
||||
|
||||
/* Initialize translator. */
|
||||
ms->ms_byteno = -1;
|
||||
}
|
||||
|
||||
/****************************************************************
|
||||
* Interface to the lower layer (zscc)
|
||||
****************************************************************/
|
||||
|
||||
static void
|
||||
ms_zs_rxint(cs)
|
||||
register struct zs_chanstate *cs;
|
||||
{
|
||||
register struct ms_softc *ms;
|
||||
register int put, put_next;
|
||||
register u_char c, rr1;
|
||||
|
||||
ms = cs->cs_private;
|
||||
put = ms->ms_rbput;
|
||||
|
||||
/*
|
||||
* First read the status, because reading the received char
|
||||
* destroys the status of this char.
|
||||
*/
|
||||
rr1 = zs_read_reg(cs, 1);
|
||||
c = zs_read_data(cs);
|
||||
|
||||
if (rr1 & (ZSRR1_FE | ZSRR1_DO | ZSRR1_PE)) {
|
||||
/* Clear the receive error. */
|
||||
zs_write_csr(cs, ZSWR0_RESET_ERRORS);
|
||||
}
|
||||
|
||||
ms->ms_rbuf[put] = (c << 8) | rr1;
|
||||
put_next = (put + 1) & MS_RX_RING_MASK;
|
||||
|
||||
/* Would overrun if increment makes (put==get). */
|
||||
if (put_next == ms->ms_rbget) {
|
||||
ms->ms_intr_flags |= INTR_RX_OVERRUN;
|
||||
} else {
|
||||
/* OK, really increment. */
|
||||
put = put_next;
|
||||
}
|
||||
|
||||
/* Done reading. */
|
||||
ms->ms_rbput = put;
|
||||
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
static void
|
||||
ms_zs_txint(cs)
|
||||
register struct zs_chanstate *cs;
|
||||
{
|
||||
register struct ms_softc *ms;
|
||||
|
||||
ms = cs->cs_private;
|
||||
zs_write_csr(cs, ZSWR0_RESET_TXINT);
|
||||
ms->ms_intr_flags |= INTR_TX_EMPTY;
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
static void
|
||||
ms_zs_stint(cs, force)
|
||||
register struct zs_chanstate *cs;
|
||||
int force;
|
||||
{
|
||||
register struct ms_softc *ms;
|
||||
register int rr0;
|
||||
|
||||
ms = cs->cs_private;
|
||||
|
||||
rr0 = zs_read_csr(cs);
|
||||
zs_write_csr(cs, ZSWR0_RESET_STATUS);
|
||||
|
||||
/*
|
||||
* We have to accumulate status line changes here.
|
||||
* Otherwise, if we get multiple status interrupts
|
||||
* before the softint runs, we could fail to notice
|
||||
* some status line changes in the softint routine.
|
||||
* Fix from Bill Studenmund, October 1996.
|
||||
*/
|
||||
cs->cs_rr0_delta |= (cs->cs_rr0 ^ rr0);
|
||||
cs->cs_rr0 = rr0;
|
||||
ms->ms_intr_flags |= INTR_ST_CHECK;
|
||||
|
||||
/* Ask for softint() call. */
|
||||
cs->cs_softreq = 1;
|
||||
}
|
||||
|
||||
static void
|
||||
ms_zs_softint(cs)
|
||||
struct zs_chanstate *cs;
|
||||
{
|
||||
register struct ms_softc *ms;
|
||||
register int get, c, s;
|
||||
int intr_flags;
|
||||
register u_short ring_data;
|
||||
|
||||
ms = cs->cs_private;
|
||||
|
||||
/* Atomically get and clear flags. */
|
||||
s = splzs();
|
||||
intr_flags = ms->ms_intr_flags;
|
||||
ms->ms_intr_flags = 0;
|
||||
|
||||
/* Now lower to spltty for the rest. */
|
||||
(void) spltty();
|
||||
|
||||
/*
|
||||
* Copy data from the receive ring to the event layer.
|
||||
*/
|
||||
get = ms->ms_rbget;
|
||||
while (get != ms->ms_rbput) {
|
||||
ring_data = ms->ms_rbuf[get];
|
||||
get = (get + 1) & MS_RX_RING_MASK;
|
||||
|
||||
/* low byte of ring_data is rr1 */
|
||||
c = (ring_data >> 8) & 0xff;
|
||||
|
||||
if (ring_data & ZSRR1_DO)
|
||||
intr_flags |= INTR_RX_OVERRUN;
|
||||
if (ring_data & (ZSRR1_FE | ZSRR1_PE)) {
|
||||
log(LOG_ERR, "%s: input error (0x%x)\n",
|
||||
ms->ms_dev.dv_xname, ring_data);
|
||||
c = -1; /* signal input error */
|
||||
}
|
||||
|
||||
/* Pass this up to the "middle" layer. */
|
||||
ms_input(ms, c);
|
||||
}
|
||||
if (intr_flags & INTR_RX_OVERRUN) {
|
||||
log(LOG_ERR, "%s: input overrun\n",
|
||||
ms->ms_dev.dv_xname);
|
||||
}
|
||||
ms->ms_rbget = get;
|
||||
|
||||
if (intr_flags & INTR_TX_EMPTY) {
|
||||
/*
|
||||
* Transmit done. (Not expected.)
|
||||
*/
|
||||
log(LOG_ERR, "%s: transmit interrupt?\n",
|
||||
ms->ms_dev.dv_xname);
|
||||
}
|
||||
|
||||
if (intr_flags & INTR_ST_CHECK) {
|
||||
/*
|
||||
* Status line change. (Not expected.)
|
||||
*/
|
||||
log(LOG_ERR, "%s: status interrupt?\n",
|
||||
ms->ms_dev.dv_xname);
|
||||
cs->cs_rr0_delta = 0;
|
||||
}
|
||||
|
||||
splx(s);
|
||||
}
|
||||
Loading…
Reference in New Issue
Block a user