Home | History | Annotate | Line # | Download | only in dev
cg2.c revision 1.26
      1 /*	$NetBSD: cg2.c,v 1.26 2005/12/11 12:19:20 christos 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.26 2005/12/11 12:19:20 christos 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 = (struct cg2_softc *)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 	int unit = minor(dev);
    201 
    202 	if (unit >= cgtwo_cd.cd_ndevs || cgtwo_cd.cd_devs[unit] == NULL)
    203 		return (ENXIO);
    204 	return (0);
    205 }
    206 
    207 int
    208 cg2ioctl(dev_t dev, u_long cmd, caddr_t data, int flags, struct lwp *l)
    209 {
    210 	struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
    211 
    212 	return (fbioctlfb(&sc->sc_fb, cmd, data));
    213 }
    214 
    215 /*
    216  * Return the address that would map the given device at the given
    217  * offset, allowing for the given protection, or return -1 for error.
    218  */
    219 paddr_t
    220 cg2mmap(dev_t dev, off_t off, int prot)
    221 {
    222 	struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
    223 
    224 	if (off & PGOFSET)
    225 		panic("cg2mmap");
    226 
    227 	if (off >= CG2_MAPPED_SIZE)
    228 		return (-1);
    229 
    230 	/*
    231 	 * I turned on PMAP_NC here to disable the cache as I was
    232 	 * getting horribly broken behaviour with it on.
    233 	 */
    234 	return ((sc->sc_phys + off) | sc->sc_pmtype);
    235 }
    236 
    237 /*
    238  * Internal ioctl functions.
    239  */
    240 
    241 /* FBIOGATTR: */
    242 static int
    243 cg2gattr(struct fbdevice *fb, void *data)
    244 {
    245 	struct fbgattr *fba = data;
    246 
    247 	fba->real_type = fb->fb_fbtype.fb_type;
    248 	fba->owner = 0;		/* XXX - TIOCCONS stuff? */
    249 	fba->fbtype = fb->fb_fbtype;
    250 	fba->sattr.flags = 0;
    251 	fba->sattr.emu_type = fb->fb_fbtype.fb_type;
    252 	fba->sattr.dev_specific[0] = -1;
    253 	fba->emu_types[0] = fb->fb_fbtype.fb_type;
    254 	fba->emu_types[1] = -1;
    255 	return (0);
    256 }
    257 
    258 /* FBIOGVIDEO: */
    259 static int
    260 cg2gvideo(struct fbdevice *fb, void *data)
    261 {
    262 	int *on = data;
    263 	struct cg2_softc *sc = fb->fb_private;
    264 
    265 	*on = sc->sc_ctlreg->status.reg.video_enab;
    266 	return (0);
    267 }
    268 
    269 /* FBIOSVIDEO: */
    270 static int
    271 cg2svideo(struct fbdevice *fb, void *data)
    272 {
    273 	int *on = data;
    274 	struct cg2_softc *sc = fb->fb_private;
    275 
    276 	sc->sc_ctlreg->status.reg.video_enab = (*on) & 1;
    277 
    278 	return (0);
    279 }
    280 
    281 /* FBIOGETCMAP: */
    282 static int
    283 cg2getcmap(struct fbdevice *fb, void *data)
    284 {
    285 	struct fbcmap *cmap = data;
    286 	struct cg2_softc *sc = fb->fb_private;
    287 	u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE];
    288 	int error, start, count, ecount;
    289 	u_int i;
    290 	u_short *p;
    291 
    292 	start = cmap->index;
    293 	count = cmap->count;
    294 	ecount = start + count;
    295 	if (start >= CMSIZE || count > CMSIZE - start)
    296 		return (EINVAL);
    297 
    298 	/* XXX - Wait for retrace? */
    299 
    300 	/* Copy hardware to local arrays. */
    301 	p = &sc->sc_ctlreg->redmap[start];
    302 	for (i = start; i < ecount; i++)
    303 		red[i] = *p++;
    304 	p = &sc->sc_ctlreg->greenmap[start];
    305 	for (i = start; i < ecount; i++)
    306 		green[i] = *p++;
    307 	p = &sc->sc_ctlreg->bluemap[start];
    308 	for (i = start; i < ecount; i++)
    309 		blue[i] = *p++;
    310 
    311 	/* Copy local arrays to user space. */
    312 	if ((error = copyout(red + start, cmap->red, count)) != 0)
    313 		return (error);
    314 	if ((error = copyout(green + start, cmap->green, count)) != 0)
    315 		return (error);
    316 	if ((error = copyout(blue + start, cmap->blue, count)) != 0)
    317 		return (error);
    318 
    319 	return (0);
    320 }
    321 
    322 /* FBIOPUTCMAP: */
    323 static int
    324 cg2putcmap(struct fbdevice *fb, void *data)
    325 {
    326 	struct fbcmap *cmap = data;
    327 	struct cg2_softc *sc = fb->fb_private;
    328 	u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE];
    329 	int error;
    330 	u_int start, count, ecount;
    331 	u_int i;
    332 	u_short *p;
    333 
    334 	start = cmap->index;
    335 	count = cmap->count;
    336 	ecount = start + count;
    337 	if (start >= CMSIZE || count > CMSIZE - start)
    338 		return (EINVAL);
    339 
    340 	/* Copy from user space to local arrays. */
    341 	if ((error = copyin(cmap->red, red + start, count)) != 0)
    342 		return (error);
    343 	if ((error = copyin(cmap->green, green + start, count)) != 0)
    344 		return (error);
    345 	if ((error = copyin(cmap->blue, blue + start, count)) != 0)
    346 		return (error);
    347 
    348 	/* XXX - Wait for retrace? */
    349 
    350 	/* Copy from local arrays to hardware. */
    351 	p = &sc->sc_ctlreg->redmap[start];
    352 	for (i = start; i < ecount; i++)
    353 		*p++ = red[i];
    354 	p = &sc->sc_ctlreg->greenmap[start];
    355 	for (i = start; i < ecount; i++)
    356 		*p++ = green[i];
    357 	p = &sc->sc_ctlreg->bluemap[start];
    358 	for (i = start; i < ecount; i++)
    359 		*p++ = blue[i];
    360 
    361 	return (0);
    362 
    363 }
    364 
    365 static int
    366 cg2intr(void *vsc)
    367 {
    368 	struct cg2_softc *sc = vsc;
    369 
    370 	/* XXX - Just disable interrupts for now. */
    371 	sc->sc_ctlreg->status.reg.inten = 0;
    372 
    373 	printf("cg2intr\n");
    374 	return (1);
    375 }
    376