NetBSD/sys/arch/mac68k/dev/grf.c
scottr 8bcac06284 Checkpoint of UVM work to date. This includes a fully-functioning
MACHINE_NEW_NONCONTIG interface implementation, which is now enabled
on all systems.  Thanks to Jason Thorpe for his work on the hp300 port,
from which most of the code used here was derived.

XXX In spite of the fact that it works on the hp300, UVM does not (yet)
work well under load on mac68k.
1998-04-24 05:27:24 +00:00

428 lines
9.3 KiB
C

/* $NetBSD: grf.c,v 1.51 1998/04/24 05:27:24 scottr Exp $ */
/*
* Copyright (c) 1988 University of Utah.
* Copyright (c) 1990 The Regents of the University of California.
* All rights reserved.
*
* This code is derived from software contributed to Berkeley by
* the Systems Programming Group of the University of Utah Computer
* Science Department.
*
* 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: Utah $Hdr: grf.c 1.31 91/01/21$
*
* @(#)grf.c 7.8 (Berkeley) 5/7/91
*/
/*
* Graphics display driver for the Macintosh.
* This is the hardware-independent portion of the driver.
* Hardware access is through the grfdev routines below.
*/
#include "opt_uvm.h"
#include <sys/param.h>
#include <sys/device.h>
#include <sys/ioctl.h>
#include <sys/file.h>
#include <sys/malloc.h>
#include <sys/mman.h>
#include <sys/poll.h>
#include <sys/proc.h>
#include <sys/vnode.h>
#include <sys/systm.h>
#include <machine/bus.h>
#include <machine/cpu.h>
#include <machine/grfioctl.h>
#include <miscfs/specfs/specdev.h>
#include <vm/vm.h>
#include <vm/vm_kern.h>
#include <vm/vm_page.h>
#include <vm/vm_pager.h>
#if defined(UVM)
#include <uvm/uvm.h>
#endif
#include <mac68k/dev/nubus.h>
#include <mac68k/dev/itevar.h>
#include <mac68k/dev/grfvar.h>
#include "grf.h"
#include "ite.h"
#if NITE == 0
#define iteon(u,f)
#define iteoff(u,f)
#endif
int grfmatch __P((struct device *, struct cfdata *, void *));
void grfattach __P((struct device *, struct device *, void *));
struct cfattach grf_ca = {
sizeof(struct grf_softc), grfmatch, grfattach
};
extern struct cfdriver grf_cd;
#ifdef DEBUG
#define GRF_DEBUG
#endif
#ifdef GRF_DEBUG
#define GDB_DEVNO 0x01
#define GDB_MMAP 0x02
#define GDB_IOMAP 0x04
#define GDB_LOCK 0x08
int grfdebug = 0;
#endif
int
grfmatch(parent, cf, aux)
struct device *parent;
struct cfdata *cf;
void *aux;
{
struct grfbus_attach_args *ga = aux;
return (strcmp(ga->ga_name, "grf") == 0);
}
void
grfattach(parent, self, aux)
struct device *parent, *self;
void *aux;
{
struct grf_softc *sc = (struct grf_softc *)self;
struct grfbus_attach_args *ga = aux;
printf("\n");
/* Load forwarded pointers. */
sc->sc_grfmode = ga->ga_grfmode;
sc->sc_slot = ga->ga_slot;
sc->sc_tag = ga->ga_tag;
sc->sc_handle = ga->ga_handle;
sc->sc_mode = ga->ga_mode;
sc->sc_phys = ga->ga_phys;
sc->sc_flags = GF_ALIVE; /* XXX bogus */
/*
* Attach ite semantics to the grf. Change the name, forward
* everything else.
*/
ga->ga_name = "ite";
(void)config_found(self, ga, grfbusprint);
}
/*ARGSUSED*/
int
grfopen(dev, flag, mode, p)
dev_t dev;
int flag;
int mode;
struct proc *p;
{
register struct grf_softc *gp;
int unit;
int error;
unit = GRFUNIT(dev);
gp = grf_cd.cd_devs[unit];
if (unit >= grf_cd.cd_ndevs || (gp->sc_flags & GF_ALIVE) == 0)
return (ENXIO);
if ((gp->sc_flags & (GF_OPEN | GF_EXCLUDE)) == (GF_OPEN | GF_EXCLUDE))
return (EBUSY);
/*
* First open.
* XXX: always put in graphics mode.
*/
error = 0;
if ((gp->sc_flags & GF_OPEN) == 0) {
gp->sc_flags |= GF_OPEN;
error = grfon(dev);
}
return (error);
}
/*ARGSUSED*/
int
grfclose(dev, flag, mode, p)
dev_t dev;
int flag;
int mode;
struct proc *p;
{
register struct grf_softc *gp;
gp = grf_cd.cd_devs[GRFUNIT(dev)];
(void)grfoff(dev);
gp->sc_flags &= GF_ALIVE;
return (0);
}
/*ARGSUSED*/
int
grfioctl(dev, cmd, data, flag, p)
dev_t dev;
int cmd;
caddr_t data;
int flag;
struct proc *p;
{
struct grf_softc *gp;
struct grfmode *gm;
int error;
int unit = GRFUNIT(dev);
gp = grf_cd.cd_devs[unit];
gm = gp->sc_grfmode;
error = 0;
switch (cmd) {
case GRFIOCGINFO: /* XXX - This should go away as soon as X and */
/* dt are fixed to use GRFIOC*MODE* */
{ struct grfinfo *g;
g = (struct grfinfo *)data;
bzero(data, sizeof(struct grfinfo));
g->gd_id = gm->mode_id;
g->gd_fbaddr = gm->fbbase;
g->gd_fbsize = gm->fbsize;
g->gd_colors = 1 << (u_int32_t)gm->psize;
g->gd_planes = gm->psize;
g->gd_fbwidth = g->gd_dwidth = gm->width;
g->gd_fbheight = g->gd_dheight = gm->height;
g->gd_fbrowbytes = gm->rowbytes;
}
break;
case GRFIOCON:
error = grfon(dev);
break;
case GRFIOCOFF:
error = grfoff(dev);
break;
case GRFIOCMAP:
error = grfmap(dev, (caddr_t *)data, p);
break;
case GRFIOCUNMAP:
error = grfunmap(dev, *(caddr_t *)data, p);
break;
case GRFIOCGMODE:
bcopy(gm, data, sizeof(struct grfmode));
break;
case GRFIOCGETMODE:
error = (*gp->sc_mode)(gp, GM_CURRMODE, data);
break;
case GRFIOCSETMODE:
error = (*gp->sc_mode)(gp, GM_NEWMODE, data);
break;
case GRFIOCLISTMODES:
error = (*gp->sc_mode)(gp, GM_LISTMODES, data);
break;
default:
error = EINVAL;
break;
}
return (error);
}
/*ARGSUSED*/
int
grfpoll(dev, events, p)
dev_t dev;
int events;
struct proc *p;
{
return (events & (POLLOUT | POLLWRNORM));
}
/*ARGSUSED*/
int
grfmmap(dev, off, prot)
dev_t dev;
int off;
int prot;
{
struct grf_softc *gp = grf_cd.cd_devs[GRFUNIT(dev)];
struct grfmode *gm = gp->sc_grfmode;
u_long addr;
#ifdef GRF_DEBUG
if (grfdebug & GDB_MMAP)
printf("grfmmap(%x): off %x, prot %x\n", dev, off, prot);
#endif
if (off < m68k_round_page(gm->fbsize + gm->fboff))
addr = m68k_btop((*gp->sc_phys)(gp) + off);
else
addr = (-1); /* XXX bogus */
#ifdef GRF_DEBUG
if (grfdebug & GDB_MMAP)
printf("grfmmap(%x): returning addr 0x%08lx\n", dev, addr);
#endif
return (int)addr;
}
int
grfon(dev)
dev_t dev;
{
int unit = GRFUNIT(dev);
struct grf_softc *gp;
gp = grf_cd.cd_devs[unit];
/*
* XXX: iteoff call relies on devices being in same order
* as ITEs and the fact that iteoff only uses the minor part
* of the dev arg.
*/
iteoff(unit, 3);
return (*gp->sc_mode)(gp, GM_GRFON, NULL);
}
int
grfoff(dev)
dev_t dev;
{
int unit = GRFUNIT(dev);
struct grf_softc *gp;
int error;
gp = grf_cd.cd_devs[unit];
(void) grfunmap(dev, (caddr_t)0, curproc);
error = (*gp->sc_mode)(gp, GM_GRFOFF, NULL);
/* XXX: see comment for iteoff above */
iteon(unit, 2);
return (error);
}
int
grfmap(dev, addrp, p)
dev_t dev;
caddr_t *addrp;
struct proc *p;
{
struct grf_softc *gp;
struct grfmode *gm;
struct specinfo si;
struct vnode vn;
u_long len, ofs;
int error, flags;
gp = grf_cd.cd_devs[GRFUNIT(dev)];
gm = gp->sc_grfmode;
#ifdef GRF_DEBUG
if (grfdebug & GDB_MMAP)
printf("grfmap(%d): addr %p\n", p->p_pid, *addrp);
#endif
*addrp = (*gp->sc_phys)(gp);
ofs = (u_long)*addrp & PGOFSET;
*addrp = (caddr_t)m68k_trunc_page(*addrp);
len = m68k_round_page(ofs + gm->fboff + gm->fbsize);
flags = MAP_SHARED | MAP_FIXED;
vn.v_type = VCHR; /* XXX */
vn.v_specinfo = &si; /* XXX */
vn.v_rdev = dev; /* XXX */
#if defined(UVM)
error = uvm_mmap(&p->p_vmspace->vm_map, (vm_offset_t *)addrp,
(vm_size_t)len, VM_PROT_ALL, VM_PROT_ALL, flags, (caddr_t)&vn, 0);
#else
error = vm_mmap(&p->p_vmspace->vm_map, (vm_offset_t *)addrp,
(vm_size_t)len, VM_PROT_ALL, VM_PROT_ALL, flags, (caddr_t)&vn, 0);
#endif
/* Offset into page: */
*addrp += (unsigned long)gm->fboff + ofs;
#ifdef GRF_DEBUG
if (grfdebug & GDB_MMAP)
printf("grfmap(%d): returning addr %p\n", p->p_pid, *addrp);
#endif
return (error);
}
int
grfunmap(dev, addr, p)
dev_t dev;
caddr_t addr;
struct proc *p;
{
struct grf_softc *gp;
vm_size_t size;
int rv;
gp = grf_cd.cd_devs[GRFUNIT(dev)];
#ifdef GRF_DEBUG
if (grfdebug & GDB_MMAP)
printf("grfunmap(%d): dev %x addr %p\n", p->p_pid, dev, addr);
#endif
if (addr == 0)
return (EINVAL);/* XXX: how do we deal with this? */
size = round_page(gp->sc_grfmode->fbsize);
#if defined(UVM)
rv = uvm_unmap(&p->p_vmspace->vm_map, (vm_offset_t)addr,
(vm_offset_t)addr + size, FALSE);
#else
rv = vm_deallocate(&p->p_vmspace->vm_map, (vm_offset_t)addr, size);
#endif
return (rv == KERN_SUCCESS ? 0 : EINVAL);
}