initial import of NetBSD tree

1 files changed, 411 insertions, 0 deletions

diff --git a/sys/arch/amiga/dev/ms.c b/sys/arch/amiga/dev/ms.c
new file mode 100644
index 00000000000..27353a26602
--- /dev/null
+++ b/sys/arch/amiga/dev/ms.c
@@ -0,0 +1,411 @@
+/*	$NetBSD: ms.c,v 1.7 1995/04/10 09:10:21 mycroft Exp $	*/
+
+/*
+ * based on:
+ *
+ * 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
+ *
+ * Header: ms.c,v 1.5 92/11/26 01:28:47 torek Exp  (LBL)
+ */
+
+/*
+ * Mouse driver.
+ */
+
+#include <sys/param.h>
+#include <sys/conf.h>
+#include <sys/ioctl.h>
+#include <sys/kernel.h>
+#include <sys/proc.h>
+#include <sys/syslog.h>
+#include <sys/systm.h>
+#include <sys/tty.h>
+
+#include <amiga/dev/event_var.h>
+#include <amiga/dev/vuid_event.h>
+
+#include <amiga/amiga/custom.h>
+#include <amiga/amiga/cia.h>
+
+#include "mouse.h"
+#if NMOUSE > 0
+
+/* there's really no more physical ports on an amiga.. */
+#if NMOUSE > 2
+#undef NMOUSE
+#define NMOUSE 2
+#endif
+
+void msintr __P((void *));
+void ms_enable __P((dev_t));
+void ms_disable __P((dev_t));
+
+int
+mouseattach(cnt)
+	int cnt;
+{
+	printf("%d %s configured\n", NMOUSE, NMOUSE == 1 ? "mouse" : "mice");
+	return(NMOUSE);
+}
+
+/*
+ * Amiga mice are hooked up to one of the two "game" ports, where
+ * the main mouse is usually on the first port, and port 2 can
+ * be used by a joystick. Nevertheless, we support two mouse
+ * devices, /dev/mouse0 and /dev/mouse1 (with a link of /dev/mouse to
+ * the device that represents the port of the mouse in use).
+ */
+struct ms_softc {
+	u_char	ms_horc;	   /* horizontal counter on last scan */
+  	u_char	ms_verc;	   /* vertical counter on last scan */
+	char	ms_mb;		   /* mouse button state */
+	char	ms_ub;		   /* user button state */
+	int	ms_dx;		   /* delta-x */
+	int	ms_dy;		   /* delta-y */
+	volatile int ms_ready;	   /* event queue is ready */
+	struct	evvar ms_events;   /* event queue state */
+} ms_softc[NMOUSE];
+
+
+/*
+ * enable scanner, called when someone opens the device.
+ * Assume caller already validated range of dev.
+ */
+void
+ms_enable(dev)
+	dev_t dev;
+{
+	struct ms_softc *ms;
+
+	ms = &ms_softc[minor(dev)];
+	/* 
+	 * use this as flag to the "interrupt" to tell it when to
+	 * shut off (when it's reset to 0).
+	 */
+	ms->ms_ready = 1;
+
+	timeout(msintr, (void *)minor(dev), 2);
+}
+
+/*
+ * disable scanner. Just set ms_ready to 0, and after the next
+ * timeout taken, no further timeouts will be initiated.
+ */
+void
+ms_disable(dev)
+	dev_t dev;
+{
+	struct ms_softc *ms;
+	int s;
+
+	ms = &ms_softc[minor(dev)];
+	s = splhigh ();
+	ms->ms_ready = 0;
+	/*
+	 * sync with the interrupt
+	 */
+	tsleep(ms, PZERO - 1, "mouse-disable", 0);
+	splx(s);
+}
+
+
+/* 
+ * we're emulating a mousesystems serial mouse here..
+ */
+void
+msintr(arg)
+	void *arg;
+{
+	static const char to_one[] = { 1, 2, 2, 4, 4, 4, 4 };
+	static const int to_id[] = { MS_RIGHT, MS_MIDDLE, 0, MS_LEFT };
+	struct ms_softc *ms;
+	struct firm_event *fe;
+	int mb, ub, d, get, put, any, unit;
+	u_char pra, *horc, *verc;
+	u_short pot, count;
+	short dx, dy;
+	
+	unit = (int)arg;
+	ms = &ms_softc[unit];
+	horc = ((u_char *) &count) + 1;
+	verc = (u_char *) &count;
+
+	/*
+	 * first read the three buttons.
+	 */
+	pot  = custom.potgor;
+	pra  = ciaa.pra;
+	pot >>= unit == 0 ? 8 : 12;	/* contains right and middle button */
+	pra >>= unit == 0 ? 6 : 7;	/* contains left button */
+	mb = (pot & 4) / 4 + (pot & 1) * 2 + (pra & 1) * 4;
+	mb ^= 0x07;
+
+	/*
+	 * read current values of counter registers
+	 */
+	if (unit == 0)
+		count = custom.joy0dat;
+	else
+		count = custom.joy1dat;
+  
+	/*
+	 * take care of wraparound
+	 */
+	dx = *horc - ms->ms_horc;
+	if (dx < -127)
+		dx += 255;
+	else if (dx > 127)
+		dx -= 255;
+	dy = *verc - ms->ms_verc;
+	if (dy < -127)
+		dy += 255;
+	else if (dy > 127)
+		dy -= 255;
+
+	/*
+	 * remember current values for next scan
+	 */
+	ms->ms_horc = *horc;
+	ms->ms_verc = *verc;
+
+	ms->ms_dx = dx;
+	ms->ms_dy = dy;
+	ms->ms_mb = mb;
+  
+	if (dx || dy || ms->ms_ub != ms->ms_mb) {
+		/*
+		 * We have at least one event (mouse button, delta-X, or
+		 * delta-Y; possibly all three, and possibly three separate
+		 * button events).  Deliver these events until we are out of
+		 * changes or out of room.  As events get delivered, mark them 
+		 * `unchanged'.
+		 */
+		any = 0;
+		get = ms->ms_events.ev_get;
+		put = ms->ms_events.ev_put;
+		fe = &ms->ms_events.ev_q[put];
+
+		mb = ms->ms_mb;
+		ub = ms->ms_ub;
+		while ((d = mb ^ ub) != 0) {
+			/*
+			 * Mouse button change.  Convert up to three changes
+			 * to the `first' change, and drop it into the event
+			 * queue.
+			 */
+			if ((++put) % EV_QSIZE == get) {
+				put--;
+				goto out;
+			}
+
+			d = to_one[d - 1];	/* from 1..7 to {1,2,4} */
+			fe->id = to_id[d - 1];	/* from {1,2,4} to ID */
+			fe->value = mb & d ? VKEY_DOWN : VKEY_UP;
+			fe->time = time;
+			fe++;
+
+			if (put >= EV_QSIZE) {
+				put = 0;
+				fe = &ms->ms_events.ev_q[0];
+			}
+			any = 1;
+
+			ub ^= d;
+		}
+		if (ms->ms_dx) {
+			if ((++put) % EV_QSIZE == get) {
+				put--;
+				goto out;
+			}
+
+			fe->id = LOC_X_DELTA;
+			fe->value = ms->ms_dx;
+			fe->time = time;
+			fe++;
+
+			if (put >= EV_QSIZE) {
+				put = 0;
+				fe = &ms->ms_events.ev_q[0];
+			}
+			any = 1;
+
+			ms->ms_dx = 0;
+		}
+		if (ms->ms_dy) {
+			if ((++put) % EV_QSIZE == get) {
+				put--;
+				goto out;
+			}
+
+			fe->id = LOC_Y_DELTA;
+			fe->value = ms->ms_dy;
+			fe->time = time;
+			fe++;
+
+			if (put >= EV_QSIZE) {
+				put = 0;
+				fe = &ms->ms_events.ev_q[0];
+			}
+			any = 1;
+
+			ms->ms_dy = 0;
+		}
+out:
+		if (any) {
+			ms->ms_ub = ub;
+			ms->ms_events.ev_put = put;
+			EV_WAKEUP(&ms->ms_events);
+		}
+	}
+
+	/*
+	 * reschedule handler, or if terminating,
+	 * handshake with ms_disable
+	 */
+	if (ms->ms_ready)
+		timeout(msintr, (void *)unit, 2);
+	else
+		wakeup(ms);
+}
+
+int
+msopen(dev, flags, mode, p)
+	dev_t dev;
+	int flags, mode;
+	struct proc *p;
+{
+	struct ms_softc *ms;
+	int s, error, unit;
+
+	unit = minor(dev);
+	ms = &ms_softc[unit];
+
+	if (unit >= NMOUSE)
+		return(EXDEV);
+
+	if (ms->ms_events.ev_io)
+		return(EBUSY);
+
+	ms->ms_events.ev_io = p;
+	ev_init(&ms->ms_events);	/* may cause sleep */
+	ms_enable(dev);
+	return(0);
+}
+
+int
+msclose(dev, flags, mode, p)
+	dev_t dev;
+	int flags, mode;
+	struct proc *p;
+{
+	int unit;
+	struct ms_softc *ms;
+
+	unit = minor (dev);
+	ms = &ms_softc[unit];
+
+	ms_disable(dev);
+	ev_fini(&ms->ms_events);
+	ms->ms_events.ev_io = NULL;
+	return(0);
+}
+
+int
+msread(dev, uio, flags)
+	dev_t dev;
+	struct uio *uio;
+	int flags;
+{
+	struct ms_softc *ms;
+
+	ms = &ms_softc[minor(dev)];
+	return(ev_read(&ms->ms_events, uio, flags));
+}
+
+int
+msioctl(dev, cmd, data, flag, p)
+	dev_t dev;
+	u_long cmd;
+	register caddr_t data;
+	int flag;
+	struct proc *p;
+{
+	struct ms_softc *ms;
+	int unit;
+
+	unit = minor(dev);
+	ms = &ms_softc[unit];
+
+	switch (cmd) {
+	case FIONBIO:		/* we will remove this someday (soon???) */
+		return(0);
+	case FIOASYNC:
+		ms->ms_events.ev_async = *(int *)data != 0;
+		return(0);
+	case TIOCSPGRP:
+		if (*(int *)data != ms->ms_events.ev_io->p_pgid)
+			return(EPERM);
+		return(0);
+	case VUIDGFORMAT:	/* we only do firm_events */
+		*(int *)data = VUID_FIRM_EVENT;
+		return(0);
+	case VUIDSFORMAT:
+		if (*(int *)data != VUID_FIRM_EVENT)
+			return(EINVAL);
+		return(0);
+	}
+	return(ENOTTY);
+}
+
+int
+msselect(dev, rw, p)
+	dev_t dev;
+	int rw;
+	struct proc *p;
+{
+	struct ms_softc *ms;
+
+	ms = &ms_softc[minor(dev)];
+	return(ev_select(&ms->ms_events, rw, p));
+}
+#endif /* NMOUSE > 0 */