Home | History | Annotate | Line # | Download | only in dev
cg2.c revision 1.18
      1 /*	$NetBSD: cg2.c,v 1.18 2002/09/06 13:18:43 gehenna Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1992, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * This software was developed by the Computer Systems Engineering group
      8  * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
      9  * contributed to Berkeley.
     10  *
     11  * All advertising materials mentioning features or use of this software
     12  * must display the following acknowledgement:
     13  *	This product includes software developed by the University of
     14  *	California, Lawrence Berkeley Laboratory.
     15  *
     16  * Redistribution and use in source and binary forms, with or without
     17  * modification, are permitted provided that the following conditions
     18  * are met:
     19  * 1. Redistributions of source code must retain the above copyright
     20  *    notice, this list of conditions and the following disclaimer.
     21  * 2. Redistributions in binary form must reproduce the above copyright
     22  *    notice, this list of conditions and the following disclaimer in the
     23  *    documentation and/or other materials provided with the distribution.
     24  * 3. All advertising materials mentioning features or use of this software
     25  *    must display the following acknowledgement:
     26  *	This product includes software developed by the University of
     27  *	California, Berkeley and its contributors.
     28  * 4. Neither the name of the University nor the names of its contributors
     29  *    may be used to endorse or promote products derived from this software
     30  *    without specific prior written permission.
     31  *
     32  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     33  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     34  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     35  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     36  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     37  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     38  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     39  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     40  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     41  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     42  * SUCH DAMAGE.
     43  *
     44  *	from: @(#)cgthree.c	8.2 (Berkeley) 10/30/93
     45  */
     46 
     47 /*
     48  * color display (cg2) driver.
     49  *
     50  * Does not handle interrupts, even though they can occur.
     51  *
     52  * XXX should defer colormap updates to vertical retrace interrupts
     53  */
     54 
     55 #include <sys/param.h>
     56 #include <sys/systm.h>
     57 #include <sys/conf.h>
     58 #include <sys/device.h>
     59 #include <sys/ioctl.h>
     60 #include <sys/malloc.h>
     61 #include <sys/mman.h>
     62 #include <sys/proc.h>
     63 #include <sys/tty.h>
     64 
     65 #include <uvm/uvm_extern.h>
     66 
     67 #include <dev/sun/fbio.h>
     68 #include <machine/autoconf.h>
     69 #include <machine/pmap.h>
     70 #include <machine/cg2reg.h>
     71 
     72 #include "fbvar.h"
     73 
     74 #define	CMSIZE 256
     75 
     76 /* offset to and size of mapped part of frame buffer */
     77 #define PLANEMAP_SIZE		0x100000
     78 #define PIXELMAP_SIZE		0x100000
     79 #define ROWOPMAP_SIZE		0x100000
     80 
     81 #define	CTLREGS_OFF 		0x300000
     82 #define	CTLREGS_SIZE		 0x10600
     83 
     84 #define	CG2_MAPPED_OFFSET	(PLANEMAP_SIZE + PIXELMAP_SIZE)
     85 #define	CG2_MAPPED_SIZE 	(CTLREGS_OFF + CTLREGS_SIZE)
     86 
     87 /* per-display variables */
     88 struct cg2_softc {
     89 	struct	device sc_dev;		/* base device */
     90 	struct	fbdevice sc_fb;		/* frame buffer device */
     91 	int 	sc_phys;		/* display RAM (phys addr) */
     92 	int 	sc_pmtype;		/* pmap type bits */
     93 	struct	cg2fb *sc_ctlreg;	/* control registers */
     94 };
     95 
     96 /* autoconfiguration driver */
     97 static void	cg2attach __P((struct device *, struct device *, void *));
     98 static int	cg2match __P((struct device *, struct cfdata *, void *));
     99 
    100 struct cfattach cgtwo_ca = {
    101 	sizeof(struct cg2_softc), cg2match, cg2attach
    102 };
    103 
    104 extern struct cfdriver cgtwo_cd;
    105 
    106 dev_type_open(cg2open);
    107 dev_type_ioctl(cg2ioctl);
    108 dev_type_mmap(cg2mmap);
    109 
    110 const struct cdevsw cgtwo_cdevsw = {
    111 	cg2open, nullclose, noread, nowrite, cg2ioctl,
    112 	nostop, notty, nopoll, cg2mmap,
    113 };
    114 
    115 static int  cg2gattr __P((struct fbdevice *,  void *));
    116 static int  cg2gvideo __P((struct fbdevice *, void *));
    117 static int	cg2svideo __P((struct fbdevice *, void *));
    118 static int	cg2getcmap __P((struct fbdevice *, void *));
    119 static int	cg2putcmap __P((struct fbdevice *, void *));
    120 
    121 static struct fbdriver cg2fbdriver = {
    122 	cg2open, nullclose, cg2mmap, cg2gattr,
    123 	cg2gvideo, cg2svideo,
    124 	cg2getcmap, cg2putcmap };
    125 
    126 static int cg2intr __P((void*));
    127 
    128 /*
    129  * Match a cg2.
    130  */
    131 static int
    132 cg2match(parent, cf, aux)
    133 	struct device *parent;
    134 	struct cfdata *cf;
    135 	void *aux;
    136 {
    137 	struct confargs *ca = aux;
    138 	int probe_addr;
    139 
    140 	/* No default VME address. */
    141 	if (ca->ca_paddr == -1)
    142 		return (0);
    143 
    144 	/* Make sure something is there... */
    145 	probe_addr = ca->ca_paddr + CTLREGS_OFF;
    146 	if (bus_peek(ca->ca_bustype, probe_addr, 1) == -1)
    147 		return (0);
    148 
    149 	/* XXX: look at the ID reg? */
    150 	/* printf("cg2: id=0x%x\n", x); */
    151 
    152 	/* Default interrupt priority. */
    153 	if (ca->ca_intpri == -1)
    154 		ca->ca_intpri = 4;
    155 
    156 	return (1);
    157 }
    158 
    159 /*
    160  * Attach a display.  We need to notice if it is the console, too.
    161  */
    162 static void
    163 cg2attach(parent, self, args)
    164 	struct device *parent, *self;
    165 	void *args;
    166 {
    167 	struct cg2_softc *sc = (struct cg2_softc *)self;
    168 	struct fbdevice *fb = &sc->sc_fb;
    169 	struct confargs *ca = args;
    170 	struct fbtype *fbt;
    171 
    172 	sc->sc_phys = ca->ca_paddr;
    173 	sc->sc_pmtype = PMAP_NC | PMAP_VME16;
    174 
    175 	sc->sc_ctlreg = (struct cg2fb *) bus_mapin(ca->ca_bustype,
    176 			ca->ca_paddr + CTLREGS_OFF, CTLREGS_SIZE);
    177 
    178 	isr_add_vectored(cg2intr, (void*)sc,
    179 					 ca->ca_intpri, ca->ca_intvec);
    180 
    181 	/*
    182 	 * XXX - Initialize?  Determine type?
    183 	 */
    184 	sc->sc_ctlreg->intrptvec.reg = ca->ca_intvec;
    185 	sc->sc_ctlreg->status.word = 1;
    186 
    187 	fb->fb_driver = &cg2fbdriver;
    188 	fb->fb_private = sc;
    189 	fb->fb_name = sc->sc_dev.dv_xname;
    190 
    191 	fbt = &fb->fb_fbtype;
    192 	fbt->fb_type = FBTYPE_SUN2COLOR;
    193 	fbt->fb_depth = 8;
    194 	fbt->fb_cmsize = CMSIZE;
    195 
    196 	fbt->fb_width = 1152;
    197 	fbt->fb_height = 900;
    198 	fbt->fb_size = CG2_MAPPED_SIZE;
    199 
    200 	printf(" (%dx%d)\n", fbt->fb_width, fbt->fb_height);
    201 	fb_attach(fb, 2);
    202 }
    203 
    204 int
    205 cg2open(dev, flags, mode, p)
    206 	dev_t dev;
    207 	int flags, mode;
    208 	struct proc *p;
    209 {
    210 	int unit = minor(dev);
    211 
    212 	if (unit >= cgtwo_cd.cd_ndevs || cgtwo_cd.cd_devs[unit] == NULL)
    213 		return (ENXIO);
    214 	return (0);
    215 }
    216 
    217 int
    218 cg2ioctl(dev, cmd, data, flags, p)
    219 	dev_t dev;
    220 	u_long cmd;
    221 	caddr_t data;
    222 	int flags;
    223 	struct proc *p;
    224 {
    225 	struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
    226 
    227 	return (fbioctlfb(&sc->sc_fb, cmd, data));
    228 }
    229 
    230 /*
    231  * Return the address that would map the given device at the given
    232  * offset, allowing for the given protection, or return -1 for error.
    233  */
    234 paddr_t
    235 cg2mmap(dev, off, prot)
    236 	dev_t dev;
    237 	off_t off;
    238 	int prot;
    239 {
    240 	struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
    241 
    242 	if (off & PGOFSET)
    243 		panic("cg2mmap");
    244 
    245 	if (off >= CG2_MAPPED_SIZE)
    246 		return (-1);
    247 
    248 	/*
    249 	 * I turned on PMAP_NC here to disable the cache as I was
    250 	 * getting horribly broken behaviour with it on.
    251 	 */
    252 	return ((sc->sc_phys + off) | sc->sc_pmtype);
    253 }
    254 
    255 /*
    256  * Internal ioctl functions.
    257  */
    258 
    259 /* FBIOGATTR: */
    260 static int  cg2gattr(fb, data)
    261 	struct fbdevice *fb;
    262 	void *data;
    263 {
    264 	struct fbgattr *fba = data;
    265 
    266 	fba->real_type = fb->fb_fbtype.fb_type;
    267 	fba->owner = 0;		/* XXX - TIOCCONS stuff? */
    268 	fba->fbtype = fb->fb_fbtype;
    269 	fba->sattr.flags = 0;
    270 	fba->sattr.emu_type = fb->fb_fbtype.fb_type;
    271 	fba->sattr.dev_specific[0] = -1;
    272 	fba->emu_types[0] = fb->fb_fbtype.fb_type;
    273 	fba->emu_types[1] = -1;
    274 	return (0);
    275 }
    276 
    277 /* FBIOGVIDEO: */
    278 static int  cg2gvideo(fb, data)
    279 	struct fbdevice *fb;
    280 	void *data;
    281 {
    282 	int *on = data;
    283 	struct cg2_softc *sc = fb->fb_private;
    284 
    285 	*on = sc->sc_ctlreg->status.reg.video_enab;
    286 	return (0);
    287 }
    288 
    289 /* FBIOSVIDEO: */
    290 static int cg2svideo(fb, data)
    291 	struct fbdevice *fb;
    292 	void *data;
    293 {
    294 	int *on = data;
    295 	struct cg2_softc *sc = fb->fb_private;
    296 
    297 	sc->sc_ctlreg->status.reg.video_enab = (*on) & 1;
    298 
    299 	return (0);
    300 }
    301 
    302 /* FBIOGETCMAP: */
    303 static int cg2getcmap(fb, data)
    304 	struct fbdevice *fb;
    305 	void *data;
    306 {
    307 	struct fbcmap *cmap = data;
    308 	struct cg2_softc *sc = fb->fb_private;
    309 	u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE];
    310 	int error, start, count, ecount;
    311 	u_int i;
    312 	u_short *p;
    313 
    314 	start = cmap->index;
    315 	count = cmap->count;
    316 	ecount = start + count;
    317 	if (start >= CMSIZE || count > CMSIZE - start)
    318 		return (EINVAL);
    319 
    320 	/* XXX - Wait for retrace? */
    321 
    322 	/* Copy hardware to local arrays. */
    323 	p = &sc->sc_ctlreg->redmap[start];
    324 	for (i = start; i < ecount; i++)
    325 		red[i] = *p++;
    326 	p = &sc->sc_ctlreg->greenmap[start];
    327 	for (i = start; i < ecount; i++)
    328 		green[i] = *p++;
    329 	p = &sc->sc_ctlreg->bluemap[start];
    330 	for (i = start; i < ecount; i++)
    331 		blue[i] = *p++;
    332 
    333 	/* Copy local arrays to user space. */
    334 	if ((error = copyout(red + start, cmap->red, count)) != 0)
    335 		return (error);
    336 	if ((error = copyout(green + start, cmap->green, count)) != 0)
    337 		return (error);
    338 	if ((error = copyout(blue + start, cmap->blue, count)) != 0)
    339 		return (error);
    340 
    341 	return (0);
    342 }
    343 
    344 /* FBIOPUTCMAP: */
    345 static int cg2putcmap(fb, data)
    346 	struct fbdevice *fb;
    347 	void *data;
    348 {
    349 	struct fbcmap *cmap = data;
    350 	struct cg2_softc *sc = fb->fb_private;
    351 	u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE];
    352 	int error;
    353 	u_int start, count, ecount;
    354 	u_int i;
    355 	u_short *p;
    356 
    357 	start = cmap->index;
    358 	count = cmap->count;
    359 	ecount = start + count;
    360 	if (start >= CMSIZE || count > CMSIZE - start)
    361 		return (EINVAL);
    362 
    363 	/* Copy from user space to local arrays. */
    364 	if ((error = copyin(cmap->red, red + start, count)) != 0)
    365 		return (error);
    366 	if ((error = copyin(cmap->green, green + start, count)) != 0)
    367 		return (error);
    368 	if ((error = copyin(cmap->blue, blue + start, count)) != 0)
    369 		return (error);
    370 
    371 	/* XXX - Wait for retrace? */
    372 
    373 	/* Copy from local arrays to hardware. */
    374 	p = &sc->sc_ctlreg->redmap[start];
    375 	for (i = start; i < ecount; i++)
    376 		*p++ = red[i];
    377 	p = &sc->sc_ctlreg->greenmap[start];
    378 	for (i = start; i < ecount; i++)
    379 		*p++ = green[i];
    380 	p = &sc->sc_ctlreg->bluemap[start];
    381 	for (i = start; i < ecount; i++)
    382 		*p++ = blue[i];
    383 
    384 	return (0);
    385 
    386 }
    387 
    388 static int
    389 cg2intr(vsc)
    390 	void *vsc;
    391 {
    392 	struct cg2_softc *sc = vsc;
    393 
    394 	/* XXX - Just disable interrupts for now. */
    395 	sc->sc_ctlreg->status.reg.inten = 0;
    396 
    397 	printf("cg2intr\n");
    398 	return (1);
    399 }
    400