joy.c revision 47625
15897Sjmz/*- 25897Sjmz * Copyright (c) 1995 Jean-Marc Zucconi 35897Sjmz * All rights reserved. 45897Sjmz * 55897Sjmz * Redistribution and use in source and binary forms, with or without 65897Sjmz * modification, are permitted provided that the following conditions 75897Sjmz * are met: 85897Sjmz * 1. Redistributions of source code must retain the above copyright 95897Sjmz * notice, this list of conditions and the following disclaimer 105897Sjmz * in this position and unchanged. 115897Sjmz * 2. Redistributions in binary form must reproduce the above copyright 125897Sjmz * notice, this list of conditions and the following disclaimer in the 135897Sjmz * documentation and/or other materials provided with the distribution. 145897Sjmz * 3. The name of the author may not be used to endorse or promote products 155897Sjmz * derived from this software withough specific prior written permission 165897Sjmz * 175897Sjmz * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 185897Sjmz * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 195897Sjmz * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 205897Sjmz * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 215897Sjmz * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 225897Sjmz * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 235897Sjmz * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 245897Sjmz * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 255897Sjmz * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 265897Sjmz * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 275897Sjmz * 285897Sjmz */ 295897Sjmz#include "joy.h" 305897Sjmz 315897Sjmz#if NJOY > 0 325897Sjmz 3332726Seivind#include "opt_devfs.h" 3432726Seivind 357430Sbde#include <sys/param.h> 367430Sbde#include <sys/systm.h> 3712675Sjulian#include <sys/conf.h> 3812675Sjulian#include <sys/kernel.h> 3912675Sjulian#ifdef DEVFS 4012675Sjulian#include <sys/devfsext.h> 4112675Sjulian#endif /*DEVFS*/ 4234924Sbde#include <sys/uio.h> 436734Sbde 4412854Sbde#include <machine/clock.h> 456734Sbde#include <machine/joystick.h> 466734Sbde 475897Sjmz#include <i386/isa/isa.h> 486734Sbde#include <i386/isa/isa_device.h> 495897Sjmz#include <i386/isa/timerreg.h> 505897Sjmz 518876Srgrimes/* The game port can manage 4 buttons and 4 variable resistors (usually 2 525897Sjmz * joysticks, each with 2 buttons and 2 pots.) via the port at address 0x201. 535897Sjmz * Getting the state of the buttons is done by reading the game port: 545897Sjmz * buttons 1-4 correspond to bits 4-7 and resistors 1-4 (X1, Y1, X2, Y2) 555897Sjmz * to bits 0-3. 565897Sjmz * if button 1 (resp 2, 3, 4) is pressed, the bit 4 (resp 5, 6, 7) is set to 0 575897Sjmz * to get the value of a resistor, write the value 0xff at port and 585897Sjmz * wait until the corresponding bit returns to 0. 595897Sjmz */ 605897Sjmz 615897Sjmz 628876Srgrimes/* the formulae below only work if u is ``not too large''. See also 635993Sjmz * the discussion in microtime.s */ 645998Sjmz#define usec2ticks(u) (((u) * 19549)>>14) 655998Sjmz#define ticks2usec(u) (((u) * 3433)>>12) 665897Sjmz 675897Sjmz 6846570Speter#define joypart(d) (minor(d)&1) 6946570Speter#define UNIT(d) ((minor(d)>>1)&3) 705897Sjmz#ifndef JOY_TIMEOUT 715897Sjmz#define JOY_TIMEOUT 2000 /* 2 milliseconds */ 725897Sjmz#endif 735897Sjmz 745897Sjmzstatic struct { 755897Sjmz int port; 765897Sjmz int x_off[2], y_off[2]; 775897Sjmz int timeout[2]; 7812675Sjulian#ifdef DEVFS 7912675Sjulian void *devfs_token; 8012675Sjulian#endif 815897Sjmz} joy[NJOY]; 825897Sjmz 835897Sjmz 8412724Sphkstatic int joyprobe (struct isa_device *); 8512724Sphkstatic int joyattach (struct isa_device *); 865897Sjmz 875897Sjmzstruct isa_driver joydriver = {joyprobe, joyattach, "joy"}; 885897Sjmz 8912675Sjulian#define CDEV_MAJOR 51 9012675Sjulianstatic d_open_t joyopen; 9112675Sjulianstatic d_close_t joyclose; 9212675Sjulianstatic d_read_t joyread; 9312675Sjulianstatic d_ioctl_t joyioctl; 9412675Sjulian 9547625Sphkstatic struct cdevsw joy_cdevsw = { 9647625Sphk /* open */ joyopen, 9747625Sphk /* close */ joyclose, 9847625Sphk /* read */ joyread, 9947625Sphk /* write */ nowrite, 10047625Sphk /* ioctl */ joyioctl, 10147625Sphk /* stop */ nostop, 10247625Sphk /* reset */ noreset, 10347625Sphk /* devtotty */ nodevtotty, 10447625Sphk /* poll */ nopoll, 10547625Sphk /* mmap */ nommap, 10647625Sphk /* strategy */ nostrategy, 10747625Sphk /* name */ "joy", 10847625Sphk /* parms */ noparms, 10947625Sphk /* maj */ CDEV_MAJOR, 11047625Sphk /* dump */ nodump, 11147625Sphk /* psize */ nopsize, 11247625Sphk /* flags */ 0, 11347625Sphk /* maxio */ 0, 11447625Sphk /* bmaj */ -1 11547625Sphk}; 11612675Sjulian 11712854Sbdestatic int get_tick __P((void)); 1185897Sjmz 1195897Sjmz 12012724Sphkstatic int 1215897Sjmzjoyprobe (struct isa_device *dev) 1225897Sjmz{ 1235897Sjmz#ifdef WANT_JOYSTICK_CONNECTED 1245897Sjmz outb (dev->id_iobase, 0xff); 1255897Sjmz DELAY (10000); /* 10 ms delay */ 1265897Sjmz return (inb (dev->id_iobase) & 0x0f) != 0x0f; 1275897Sjmz#else 1285897Sjmz return 1; 1295897Sjmz#endif 1305897Sjmz} 1315897Sjmz 13212724Sphkstatic int 1335897Sjmzjoyattach (struct isa_device *dev) 1345897Sjmz{ 13512675Sjulian int unit = dev->id_unit; 1365897Sjmz 13712675Sjulian joy[unit].port = dev->id_iobase; 13812675Sjulian joy[unit].timeout[0] = joy[unit].timeout[1] = 0; 13912675Sjulian printf("joy%d: joystick\n", unit); 14012675Sjulian#ifdef DEVFS 14114873Sscrappy joy[dev->id_unit].devfs_token = 14214873Sscrappy devfs_add_devswf(&joy_cdevsw, 0, DV_CHR, 0, 0, 14314873Sscrappy 0600, "joy%d", unit); 14412675Sjulian#endif 1455897Sjmz return 1; 1465897Sjmz} 1475897Sjmz 14812675Sjulianstatic int 14910644Sbdejoyopen (dev_t dev, int flags, int fmt, struct proc *p) 1505897Sjmz{ 1515897Sjmz int unit = UNIT (dev); 1525897Sjmz int i = joypart (dev); 1535897Sjmz 1545897Sjmz if (joy[unit].timeout[i]) 1555897Sjmz return EBUSY; 1565897Sjmz joy[unit].x_off[i] = joy[unit].y_off[i] = 0; 1575897Sjmz joy[unit].timeout[i] = JOY_TIMEOUT; 1585897Sjmz return 0; 1595897Sjmz} 16012675Sjulianstatic int 16110644Sbdejoyclose (dev_t dev, int flags, int fmt, struct proc *p) 1625897Sjmz{ 1635897Sjmz int unit = UNIT (dev); 1645897Sjmz int i = joypart (dev); 1655897Sjmz 1665897Sjmz joy[unit].timeout[i] = 0; 1675897Sjmz return 0; 1685897Sjmz} 1695897Sjmz 17012675Sjulianstatic int 1715897Sjmzjoyread (dev_t dev, struct uio *uio, int flag) 1725897Sjmz{ 1735897Sjmz int unit = UNIT(dev); 1745897Sjmz int port = joy[unit].port; 1755897Sjmz int i, t0, t1; 1765897Sjmz int state = 0, x = 0, y = 0; 1776644Sjmz struct joystick c; 1788876Srgrimes 1795897Sjmz disable_intr (); 1805897Sjmz outb (port, 0xff); 1815897Sjmz t0 = get_tick (); 1825897Sjmz t1 = t0; 1835897Sjmz i = usec2ticks(joy[unit].timeout[joypart(dev)]); 1845897Sjmz while (t0-t1 < i) { 1855897Sjmz state = inb (port); 1868876Srgrimes if (joypart(dev) == 1) 1875897Sjmz state >>= 2; 1885897Sjmz t1 = get_tick (); 1895897Sjmz if (t1 > t0) 1905993Sjmz t1 -= timer0_max_count; 1915897Sjmz if (!x && !(state & 0x01)) 1925897Sjmz x = t1; 1935897Sjmz if (!y && !(state & 0x02)) 1945897Sjmz y = t1; 1958876Srgrimes if (x && y) 1965897Sjmz break; 1975897Sjmz } 1985897Sjmz enable_intr (); 1996644Sjmz c.x = x ? joy[unit].x_off[joypart(dev)] + ticks2usec(t0-x) : 0x80000000; 2006644Sjmz c.y = y ? joy[unit].y_off[joypart(dev)] + ticks2usec(t0-y) : 0x80000000; 2015897Sjmz state >>= 4; 2026644Sjmz c.b1 = ~state & 1; 2036644Sjmz c.b2 = ~(state >> 1) & 1; 2047430Sbde return uiomove ((caddr_t)&c, sizeof(struct joystick), uio); 2055897Sjmz} 20612675Sjulian 20712675Sjulianstatic int 20836735Sdfrjoyioctl (dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p) 2095897Sjmz{ 2105897Sjmz int unit = UNIT (dev); 2115897Sjmz int i = joypart (dev); 2125897Sjmz int x; 2135897Sjmz 2145897Sjmz switch (cmd) { 2155897Sjmz case JOY_SETTIMEOUT: 2165897Sjmz x = *(int *) data; 2175897Sjmz if (x < 1 || x > 10000) /* 10ms maximum! */ 2185897Sjmz return EINVAL; 2195897Sjmz joy[unit].timeout[i] = x; 2205897Sjmz break; 2215897Sjmz case JOY_GETTIMEOUT: 2225897Sjmz *(int *) data = joy[unit].timeout[i]; 2235897Sjmz break; 2245897Sjmz case JOY_SET_X_OFFSET: 2255897Sjmz joy[unit].x_off[i] = *(int *) data; 2265897Sjmz break; 2275897Sjmz case JOY_SET_Y_OFFSET: 2285897Sjmz joy[unit].y_off[i] = *(int *) data; 2295897Sjmz break; 2305897Sjmz case JOY_GET_X_OFFSET: 2315897Sjmz *(int *) data = joy[unit].x_off[i]; 2325897Sjmz break; 2335897Sjmz case JOY_GET_Y_OFFSET: 2345897Sjmz *(int *) data = joy[unit].y_off[i]; 2355897Sjmz break; 2365897Sjmz default: 2375897Sjmz return ENXIO; 2385897Sjmz } 2395897Sjmz return 0; 2405897Sjmz} 24112675Sjulian 2425897Sjmzstatic int 2435897Sjmzget_tick () 2445897Sjmz{ 2455897Sjmz int low, high; 2465897Sjmz 2475897Sjmz outb (TIMER_MODE, TIMER_SEL0); 2485897Sjmz low = inb (TIMER_CNTR0); 2495897Sjmz high = inb (TIMER_CNTR0); 2505897Sjmz 2515897Sjmz return (high << 8) | low; 2525897Sjmz} 2535897Sjmz 25412502Sjulian 25546153Sdtstatic int joy_devsw_installed; 25612502Sjulian 25712517Sjulianstatic void joy_drvinit(void *unused) 25812502Sjulian{ 25912517Sjulian dev_t dev; 26012517Sjulian 26112502Sjulian if( ! joy_devsw_installed ) { 26212517Sjulian dev = makedev(CDEV_MAJOR,0); 26312517Sjulian cdevsw_add(&dev,&joy_cdevsw,NULL); 26412502Sjulian joy_devsw_installed = 1; 26512517Sjulian } 26612502Sjulian} 26712517Sjulian 26812517SjulianSYSINIT(joydev,SI_SUB_DRIVERS,SI_ORDER_MIDDLE+CDEV_MAJOR,joy_drvinit,NULL) 26912517Sjulian 27014633Sjmz#ifdef JOY_MODULE 27114633Sjmz 27214633Sjmz#include <sys/exec.h> 27314633Sjmz#include <sys/sysent.h> 27414633Sjmz#include <sys/lkm.h> 27514633Sjmz 27614633SjmzMOD_DEV (joy, LM_DT_CHAR, CDEV_MAJOR, &joy_cdevsw); 27714633Sjmz 27814634Sjmzstatic struct isa_device dev = {0, &joydriver, IO_GAME, 0, -1, (caddr_t) 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0}; 27914633Sjmz 28024674Sdufaultstatic int 28114633Sjmzjoy_load (struct lkm_table *lkmtp, int cmd) 28214633Sjmz{ 28314633Sjmz if (joyprobe (&dev)) { 28414633Sjmz joyattach (&dev); 28514633Sjmz/* joy_drvinit (0);*/ 28614633Sjmz uprintf ("Joystick driver loaded\n"); 28714633Sjmz return 0; 28814633Sjmz } else { 28914633Sjmz uprintf ("Joystick driver: probe failed\n"); 29014633Sjmz return 1; 29114633Sjmz } 29214633Sjmz} 29314633Sjmz 29424674Sdufaultstatic int 29514633Sjmzjoy_unload (struct lkm_table *lkmtp, int cmd) 29614633Sjmz{ 29714633Sjmz uprintf ("Joystick driver unloaded\n"); 29814633Sjmz return 0; 29914633Sjmz} 30024674Sdufault 30124674Sdufaultstatic int 30214633Sjmzjoy_stat (struct lkm_table *lkmtp, int cmd) 30314633Sjmz{ 30414633Sjmz return 0; 30514633Sjmz} 30624674Sdufault 30714633Sjmzint 30814633Sjmzjoy_mod (struct lkm_table *lkmtp, int cmd, int ver) 30914633Sjmz{ 31024674Sdufault MOD_DISPATCH(joy, lkmtp, cmd, ver, 31124674Sdufault joy_load, joy_unload, joy_stat); 31214633Sjmz} 31314633Sjmz 31414633Sjmz#endif /* JOY_MODULE */ 31514633Sjmz 31614633Sjmz 3175897Sjmz#endif /* NJOY > 0 */ 318