NetBSD/sys/arch/sun3/dev/cg2.c
jdolecek e0cc03a09b merge kqueue branch into -current
kqueue provides a stateful and efficient event notification framework
currently supported events include socket, file, directory, fifo,
pipe, tty and device changes, and monitoring of processes and signals

kqueue is supported by all writable filesystems in NetBSD tree
(with exception of Coda) and all device drivers supporting poll(2)

based on work done by Jonathan Lemon for FreeBSD
initial NetBSD port done by Luke Mewburn and Jason Thorpe
2002-10-23 09:10:23 +00:00

399 lines
9.9 KiB
C

/* $NetBSD: cg2.c,v 1.22 2002/10/23 09:12:24 jdolecek Exp $ */
/*
* Copyright (c) 1992, 1993
* The Regents of the University of California. All rights reserved.
*
* This software was developed by the Computer Systems Engineering group
* at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
* contributed to Berkeley.
*
* All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the University of
* California, Lawrence Berkeley Laboratory.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the University of
* California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
* from: @(#)cgthree.c 8.2 (Berkeley) 10/30/93
*/
/*
* color display (cg2) driver.
*
* Does not handle interrupts, even though they can occur.
*
* XXX should defer colormap updates to vertical retrace interrupts
*/
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/conf.h>
#include <sys/device.h>
#include <sys/ioctl.h>
#include <sys/malloc.h>
#include <sys/mman.h>
#include <sys/proc.h>
#include <sys/tty.h>
#include <uvm/uvm_extern.h>
#include <dev/sun/fbio.h>
#include <machine/autoconf.h>
#include <machine/pmap.h>
#include <machine/cg2reg.h>
#include "fbvar.h"
#define CMSIZE 256
/* offset to and size of mapped part of frame buffer */
#define PLANEMAP_SIZE 0x100000
#define PIXELMAP_SIZE 0x100000
#define ROWOPMAP_SIZE 0x100000
#define CTLREGS_OFF 0x300000
#define CTLREGS_SIZE 0x10600
#define CG2_MAPPED_OFFSET (PLANEMAP_SIZE + PIXELMAP_SIZE)
#define CG2_MAPPED_SIZE (CTLREGS_OFF + CTLREGS_SIZE)
/* per-display variables */
struct cg2_softc {
struct device sc_dev; /* base device */
struct fbdevice sc_fb; /* frame buffer device */
int sc_phys; /* display RAM (phys addr) */
int sc_pmtype; /* pmap type bits */
struct cg2fb *sc_ctlreg; /* control registers */
};
/* autoconfiguration driver */
static void cg2attach __P((struct device *, struct device *, void *));
static int cg2match __P((struct device *, struct cfdata *, void *));
CFATTACH_DECL(cgtwo, sizeof(struct cg2_softc),
cg2match, cg2attach, NULL, NULL);
extern struct cfdriver cgtwo_cd;
dev_type_open(cg2open);
dev_type_ioctl(cg2ioctl);
dev_type_mmap(cg2mmap);
const struct cdevsw cgtwo_cdevsw = {
cg2open, nullclose, noread, nowrite, cg2ioctl,
nostop, notty, nopoll, cg2mmap, nokqfilter,
};
static int cg2gattr __P((struct fbdevice *, void *));
static int cg2gvideo __P((struct fbdevice *, void *));
static int cg2svideo __P((struct fbdevice *, void *));
static int cg2getcmap __P((struct fbdevice *, void *));
static int cg2putcmap __P((struct fbdevice *, void *));
static struct fbdriver cg2fbdriver = {
cg2open, nullclose, cg2mmap, nokqfilter, cg2gattr,
cg2gvideo, cg2svideo,
cg2getcmap, cg2putcmap };
static int cg2intr __P((void*));
/*
* Match a cg2.
*/
static int
cg2match(parent, cf, aux)
struct device *parent;
struct cfdata *cf;
void *aux;
{
struct confargs *ca = aux;
int probe_addr;
/* No default VME address. */
if (ca->ca_paddr == -1)
return (0);
/* Make sure something is there... */
probe_addr = ca->ca_paddr + CTLREGS_OFF;
if (bus_peek(ca->ca_bustype, probe_addr, 1) == -1)
return (0);
/* XXX: look at the ID reg? */
/* printf("cg2: id=0x%x\n", x); */
/* Default interrupt priority. */
if (ca->ca_intpri == -1)
ca->ca_intpri = 4;
return (1);
}
/*
* Attach a display. We need to notice if it is the console, too.
*/
static void
cg2attach(parent, self, args)
struct device *parent, *self;
void *args;
{
struct cg2_softc *sc = (struct cg2_softc *)self;
struct fbdevice *fb = &sc->sc_fb;
struct confargs *ca = args;
struct fbtype *fbt;
sc->sc_phys = ca->ca_paddr;
sc->sc_pmtype = PMAP_NC | PMAP_VME16;
sc->sc_ctlreg = (struct cg2fb *) bus_mapin(ca->ca_bustype,
ca->ca_paddr + CTLREGS_OFF, CTLREGS_SIZE);
isr_add_vectored(cg2intr, (void*)sc,
ca->ca_intpri, ca->ca_intvec);
/*
* XXX - Initialize? Determine type?
*/
sc->sc_ctlreg->intrptvec.reg = ca->ca_intvec;
sc->sc_ctlreg->status.word = 1;
fb->fb_driver = &cg2fbdriver;
fb->fb_private = sc;
fb->fb_name = sc->sc_dev.dv_xname;
fbt = &fb->fb_fbtype;
fbt->fb_type = FBTYPE_SUN2COLOR;
fbt->fb_depth = 8;
fbt->fb_cmsize = CMSIZE;
fbt->fb_width = 1152;
fbt->fb_height = 900;
fbt->fb_size = CG2_MAPPED_SIZE;
printf(" (%dx%d)\n", fbt->fb_width, fbt->fb_height);
fb_attach(fb, 2);
}
int
cg2open(dev, flags, mode, p)
dev_t dev;
int flags, mode;
struct proc *p;
{
int unit = minor(dev);
if (unit >= cgtwo_cd.cd_ndevs || cgtwo_cd.cd_devs[unit] == NULL)
return (ENXIO);
return (0);
}
int
cg2ioctl(dev, cmd, data, flags, p)
dev_t dev;
u_long cmd;
caddr_t data;
int flags;
struct proc *p;
{
struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
return (fbioctlfb(&sc->sc_fb, cmd, data));
}
/*
* Return the address that would map the given device at the given
* offset, allowing for the given protection, or return -1 for error.
*/
paddr_t
cg2mmap(dev, off, prot)
dev_t dev;
off_t off;
int prot;
{
struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
if (off & PGOFSET)
panic("cg2mmap");
if (off >= CG2_MAPPED_SIZE)
return (-1);
/*
* I turned on PMAP_NC here to disable the cache as I was
* getting horribly broken behaviour with it on.
*/
return ((sc->sc_phys + off) | sc->sc_pmtype);
}
/*
* Internal ioctl functions.
*/
/* FBIOGATTR: */
static int cg2gattr(fb, data)
struct fbdevice *fb;
void *data;
{
struct fbgattr *fba = data;
fba->real_type = fb->fb_fbtype.fb_type;
fba->owner = 0; /* XXX - TIOCCONS stuff? */
fba->fbtype = fb->fb_fbtype;
fba->sattr.flags = 0;
fba->sattr.emu_type = fb->fb_fbtype.fb_type;
fba->sattr.dev_specific[0] = -1;
fba->emu_types[0] = fb->fb_fbtype.fb_type;
fba->emu_types[1] = -1;
return (0);
}
/* FBIOGVIDEO: */
static int cg2gvideo(fb, data)
struct fbdevice *fb;
void *data;
{
int *on = data;
struct cg2_softc *sc = fb->fb_private;
*on = sc->sc_ctlreg->status.reg.video_enab;
return (0);
}
/* FBIOSVIDEO: */
static int cg2svideo(fb, data)
struct fbdevice *fb;
void *data;
{
int *on = data;
struct cg2_softc *sc = fb->fb_private;
sc->sc_ctlreg->status.reg.video_enab = (*on) & 1;
return (0);
}
/* FBIOGETCMAP: */
static int cg2getcmap(fb, data)
struct fbdevice *fb;
void *data;
{
struct fbcmap *cmap = data;
struct cg2_softc *sc = fb->fb_private;
u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE];
int error, start, count, ecount;
u_int i;
u_short *p;
start = cmap->index;
count = cmap->count;
ecount = start + count;
if (start >= CMSIZE || count > CMSIZE - start)
return (EINVAL);
/* XXX - Wait for retrace? */
/* Copy hardware to local arrays. */
p = &sc->sc_ctlreg->redmap[start];
for (i = start; i < ecount; i++)
red[i] = *p++;
p = &sc->sc_ctlreg->greenmap[start];
for (i = start; i < ecount; i++)
green[i] = *p++;
p = &sc->sc_ctlreg->bluemap[start];
for (i = start; i < ecount; i++)
blue[i] = *p++;
/* Copy local arrays to user space. */
if ((error = copyout(red + start, cmap->red, count)) != 0)
return (error);
if ((error = copyout(green + start, cmap->green, count)) != 0)
return (error);
if ((error = copyout(blue + start, cmap->blue, count)) != 0)
return (error);
return (0);
}
/* FBIOPUTCMAP: */
static int cg2putcmap(fb, data)
struct fbdevice *fb;
void *data;
{
struct fbcmap *cmap = data;
struct cg2_softc *sc = fb->fb_private;
u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE];
int error;
u_int start, count, ecount;
u_int i;
u_short *p;
start = cmap->index;
count = cmap->count;
ecount = start + count;
if (start >= CMSIZE || count > CMSIZE - start)
return (EINVAL);
/* Copy from user space to local arrays. */
if ((error = copyin(cmap->red, red + start, count)) != 0)
return (error);
if ((error = copyin(cmap->green, green + start, count)) != 0)
return (error);
if ((error = copyin(cmap->blue, blue + start, count)) != 0)
return (error);
/* XXX - Wait for retrace? */
/* Copy from local arrays to hardware. */
p = &sc->sc_ctlreg->redmap[start];
for (i = start; i < ecount; i++)
*p++ = red[i];
p = &sc->sc_ctlreg->greenmap[start];
for (i = start; i < ecount; i++)
*p++ = green[i];
p = &sc->sc_ctlreg->bluemap[start];
for (i = start; i < ecount; i++)
*p++ = blue[i];
return (0);
}
static int
cg2intr(vsc)
void *vsc;
{
struct cg2_softc *sc = vsc;
/* XXX - Just disable interrupts for now. */
sc->sc_ctlreg->status.reg.inten = 0;
printf("cg2intr\n");
return (1);
}