NetBSD/sys/arch/amiga/dev/ms.c
chopps 15d4cf6bf9 resistance is futile, you will be assimilated.
amiga goes: config.new *and* /sys/scsi.
clock code coerced into a single .c file adding an accurate usec delay().
disklabel.c updated to DTRT, code to write RDB's to be added soon.
sbic (old scsi) converted over to new scsi and config this covers about
90% of users.  Other drivers soon.
1994-05-08 05:52:54 +00:00

422 lines
9.2 KiB
C

/*
* 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
*
* from: Header: ms.c,v 1.5 92/11/26 01:28:47 torek Exp (LBL)
* $Id: ms.c,v 1.3 1994/05/08 05:53:29 chopps Exp $
*/
/*
* 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;
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;
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));
}
/*
* XXX this routine should not exist,
* but is convenient to write here for now
*/
int
mswrite(dev, uio, flags)
dev_t dev;
struct uio *uio;
int flags;
{
return(EOPNOTSUPP);
}
int
msioctl(dev, cmd, data, flag, p)
dev_t dev;
int 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 */