Home | History | Annotate | Line # | Download | only in dev
sram.c revision 1.12
      1 /*	$NetBSD: sram.c,v 1.12 2005/12/11 12:19:37 christos Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1994 Kazuhisa Shimizu.
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *      This product includes software developed by Kazuhisa Shimizu.
     18  * 4. The name of the author may not be used to endorse or promote products
     19  *    derived from this software without specific prior written permission
     20  *
     21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     22  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     23  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     24  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     26  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     27  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     28  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     29  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     30  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     31  */
     32 
     33 #include <sys/cdefs.h>
     34 __KERNEL_RCSID(0, "$NetBSD: sram.c,v 1.12 2005/12/11 12:19:37 christos Exp $");
     35 
     36 #include <sys/param.h>
     37 #include <sys/proc.h>
     38 #include <sys/ioctl.h>
     39 #include <sys/file.h>
     40 #include <sys/malloc.h>
     41 #include <sys/systm.h>
     42 #include <sys/conf.h>
     43 
     44 #include <machine/sram.h>
     45 #include <x68k/dev/sramvar.h>
     46 #include <x68k/x68k/iodevice.h>
     47 
     48 struct sram_softc sram_softc;
     49 
     50 #ifdef DEBUG
     51 #define SRAM_DEBUG_OPEN		0x01
     52 #define SRAM_DEBUG_CLOSE	0x02
     53 #define SRAM_DEBUG_IOCTL	0x04
     54 #define SRAM_DEBUG_DONTDOIT	0x08
     55 int sramdebug = SRAM_DEBUG_IOCTL;
     56 #endif
     57 
     58 void sramattach(int);
     59 
     60 dev_type_open(sramopen);
     61 dev_type_close(sramclose);
     62 dev_type_ioctl(sramioctl);
     63 
     64 const struct cdevsw sram_cdevsw = {
     65 	sramopen, sramclose, noread, nowrite, sramioctl,
     66 	nostop, notty, nopoll, nommap, nokqfilter,
     67 };
     68 
     69 /*
     70  *  functions for probeing.
     71  */
     72 /* ARGSUSED */
     73 void
     74 sramattach(int num)
     75 {
     76 	sram_softc.flags = 0;
     77 	printf("sram0: 16k bytes accessible\n");
     78 }
     79 
     80 
     81 /*
     82  *  functions made available by conf.c
     83  */
     84 
     85 /*ARGSUSED*/
     86 int
     87 sramopen(dev_t dev, int flags, int mode, struct lwp *l)
     88 {
     89 	struct sram_softc *su = &sram_softc;
     90 
     91 #ifdef DEBUG
     92 	if (sramdebug & SRAM_DEBUG_OPEN)
     93 		printf ("Sram open\n");
     94 #endif
     95 
     96 	if (minor(dev) >= 1)
     97 		return EXDEV;
     98 
     99 	if (su->flags & SRF_OPEN) {
    100 		return (EBUSY);
    101 	}
    102 
    103 	su->flags |= SRF_OPEN;
    104 	if (flags & FREAD)
    105 		su->flags |= SRF_READ;
    106 	if (flags & FWRITE)
    107 		su->flags |= SRF_WRITE;
    108 
    109 	return (0);
    110 }
    111 
    112 /*ARGSUSED*/
    113 int
    114 sramclose(dev_t dev, int flags, int mode, struct lwp *l)
    115 {
    116 	struct sram_softc *su = &sram_softc;
    117 
    118 #ifdef DEBUG
    119 	if (sramdebug & SRAM_DEBUG_CLOSE)
    120 		printf ("Sram close\n");
    121 #endif
    122 
    123 	if (su->flags & SRF_OPEN) {
    124 		su->flags = 0;
    125 	}
    126 	su->flags &= ~(SRF_READ|SRF_WRITE);
    127 
    128 	return (0);
    129 }
    130 
    131 /*ARGSUSED*/
    132 int
    133 sramioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct lwp *l)
    134 {
    135 	int error = 0;
    136 	struct sram_io *sram_io;
    137 	char *sramtop = IODEVbase->io_sram;
    138 	struct sram_softc *su = &sram_softc;
    139 
    140 #ifdef DEBUG
    141 	if (sramdebug & SRAM_DEBUG_IOCTL)
    142 		printf("Sram ioctl cmd=%lx\n", cmd);
    143 #endif
    144 	sram_io = (struct sram_io *)data;
    145 
    146 	switch (cmd) {
    147 	case SIOGSRAM:
    148 		if ((su->flags & SRF_READ) == 0)
    149 			return(EPERM);
    150 #ifdef DEBUG
    151 		if (sramdebug & SRAM_DEBUG_IOCTL) {
    152     			printf("Sram ioctl SIOGSRAM address=%p\n", data);
    153     			printf("Sram ioctl SIOGSRAM offset=%x\n", sram_io->offset);
    154 		}
    155 #endif
    156 		if (sram_io == NULL ||
    157 		    sram_io->offset + SRAM_IO_SIZE > SRAM_SIZE)
    158 			return(EFAULT);
    159 		memcpy(&(sram_io->sram), sramtop + sram_io->offset,
    160 		    SRAM_IO_SIZE);
    161 		break;
    162 	case SIOPSRAM:
    163 		if ((su->flags & SRF_WRITE) == 0)
    164 			return(EPERM);
    165 #ifdef DEBUG
    166 		if (sramdebug & SRAM_DEBUG_IOCTL) {
    167     			printf("Sram ioctl SIOPSRAM address=%p\n", data);
    168     			printf("Sram ioctl SIOPSRAM offset=%x\n", sram_io->offset);
    169 		}
    170 #endif
    171 		if (sram_io == NULL ||
    172 		    sram_io->offset + SRAM_IO_SIZE > SRAM_SIZE)
    173 			return(EFAULT);
    174 #ifdef DEBUG
    175 		if (sramdebug & SRAM_DEBUG_DONTDOIT) {
    176 			printf ("Sram ioctl SIOPSRAM: skipping actual write\n");
    177 			break;
    178 		}
    179 #endif
    180 		sysport.sramwp = 0x31;
    181 		memcpy(sramtop + sram_io->offset, &(sram_io->sram),
    182 		    SRAM_IO_SIZE);
    183 		sysport.sramwp = 0x00;
    184 		break;
    185 	default:
    186 		error = EINVAL;
    187 		break;
    188 	}
    189 	return (error);
    190 }
    191