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