NetBSD/sys/arch/amiga/dev/view.c

407 lines
9.5 KiB
C

/*
* Copyright (c) 1994 Christian E. Hopps
* All rights reserved.
*
* 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 Christian E. Hopps.
* 4. The name of the author may not be used to endorse or promote products
* derived from this software without specific prior written permission
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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.
*
* $Id: view.c,v 1.5 1994/02/17 09:10:59 chopps Exp $
*/
/* The view major device is a placeholder device. It serves
* simply to map the semantics of a graphics dipslay to
* the semantics of a character block device. In other
* words the graphics system as currently built does not like to be
* refered to by open/close/ioctl. This device serves as
* a interface to graphics. */
#include <sys/param.h>
#include <sys/proc.h>
#include <sys/ioctl.h>
#include <sys/file.h>
#include <sys/malloc.h>
#include <amiga/dev/device.h>
#include <machine/cpu.h>
#include <vm/vm.h>
#include <vm/vm_kern.h>
#include <vm/vm_page.h>
#include <vm/vm_pager.h>
#include <miscfs/specfs/specdev.h>
#include <sys/vnode.h>
#include <sys/mman.h>
#include <amiga/amiga/dlists.h>
#include <amiga/dev/grfabs_reg.h>
#include <amiga/dev/viewioctl.h>
#include <amiga/dev/viewvar.h>
#include "view.h"
int viewprobe ();
/* not currently used as independant device */
struct driver view_driver = { viewprobe, "view" };
struct view_softc views[NVIEW];
int view_inited; /* also checked in ite_cc.c */
int view_default_x;
int view_default_y;
int view_default_width = 640;
int view_default_height = 400;
int view_default_depth = 2;
/*
* functions for probeing.
*/
/* this function is called early to set up a display. */
viewconfig ()
{
viewprobe ();
}
viewprobe ()
{
if (!view_inited) {
int i;
view_inited = 1;
for (i=0; i<NVIEW; i++) {
views[i].view = NULL;
views[i].flags = 0;
}
}
return (view_inited);
}
/*
* Internal functions.
*/
static void
view_display (struct view_softc *vu)
{
int s = spltty ();
int i;
if (vu == NULL) {
return;
}
/* mark views that share this monitor as not displaying */
for (i=0; i<NVIEW; i++) {
if (views[i].flags&VUF_DISPLAY && views[i].monitor == vu->monitor) {
views[i].flags &= ~VUF_DISPLAY;
}
}
vu->flags |= VUF_ADDED;
if (vu->view) {
vu->view->display.x = vu->size.x;
vu->view->display.y = vu->size.y;
grf_display_view (vu->view);
vu->size.x = vu->view->display.x;
vu->size.y = vu->view->display.y;
vu->flags |= VUF_DISPLAY;
}
splx (s);
}
/* remove a view from our added list if it is marked as displaying */
/* switch to a new display. */
static void
view_remove (struct view_softc *vu)
{
int i;
if (!(vu->flags & VUF_ADDED)) {
return;
}
vu->flags &= ~VUF_ADDED;
if (vu->flags & VUF_DISPLAY) {
for (i=0; i<NVIEW; i++) {
if (views[i].flags & VUF_ADDED && &views[i] != vu &&
views[i].monitor == vu->monitor) {
view_display (&views[i]);
break;
}
}
}
vu->flags &= ~VUF_DISPLAY;
grf_remove_view (vu->view);
}
static int
view_setsize (struct view_softc *vu, struct view_size *vs)
{
view_t *new, *old;
dimen_t ns;
int co = 0, cs = 0;
if (vs->x != vu->size.x ||
vs->y != vu->size.y) {
co = 1;
}
if (vs->width != vu->size.width ||
vs->height != vu->size.height ||
vs->depth != vu->size.depth) {
cs = 1;
}
if (!cs && !co) {
/* no change. */
return (0);
}
ns.width = vs->width;
ns.height = vs->height;
new = grf_alloc_view (NULL, &ns, vs->depth);
if (!new) {
return (ENOMEM); /* check this error. */
}
old = vu->view;
vu->view = new;
vu->size.x = new->display.x;
vu->size.y = new->display.y;
vu->size.width = new->display.width;
vu->size.height = new->display.height;
vu->size.depth = new->bitmap->depth;
vu->mode = grf_get_display_mode (vu->view);
vu->monitor = grf_get_monitor (vu->mode);
vu->size.x = vs->x;
vu->size.y = vs->y;
/* we are all set to go everything is A-OK. */
/* we need a custom remove here to avoid letting another view display */
/* mark as not added or displayed */
if (vu->flags & VUF_DISPLAY) {
vu->flags &= ~(VUF_ADDED|VUF_DISPLAY);
/* change view pointers */
/* display new view first */
view_display (vu);
}
/* remove old view from monitor */
grf_free_view (old);
return (0);
}
/*
* functions made available by conf.c
*/
/*ARGSUSED*/
viewopen (dev, flags)
dev_t dev;
{
dimen_t size;
struct view_softc *vu = &views[minor(dev)];
if (minor(dev) >= NVIEW)
return EXDEV;
if (vu->flags & VUF_OPEN) {
return (EBUSY);
}
vu->size.x = view_default_x;
vu->size.y = view_default_y;
size.width = vu->size.width = view_default_width;
size.height = vu->size.height = view_default_height;
vu->size.depth = view_default_depth;
vu->view = grf_alloc_view (NULL, &size, vu->size.depth);
if (vu->view) {
vu->size.x = vu->view->display.x;
vu->size.y = vu->view->display.y;
vu->size.width = vu->view->display.width;
vu->size.height = vu->view->display.height;
vu->size.depth = vu->view->bitmap->depth;
vu->flags |= VUF_OPEN;
vu->mode = grf_get_display_mode (vu->view);
vu->monitor = grf_get_monitor (vu->mode);
return (0);
}
return (ENOMEM);
}
/*ARGSUSED*/
viewclose (dev, flags)
dev_t dev;
{
struct view_softc *vu = &views[minor(dev)];
if (vu->flags & VUF_OPEN) {
view_remove (vu);
grf_free_view (vu->view);
vu->flags = 0;
vu->view = NULL;
vu->mode = NULL;
vu->monitor = NULL;
}
}
/*ARGSUSED*/
viewioctl (dev, cmd, data, flag, p)
dev_t dev;
caddr_t data;
struct proc *p;
{
bmap_t *bm;
colormap_t *cm;
struct view_softc *vu = &views[minor(dev)];
int error = 0;
switch (cmd) {
case VIEW_DISPLAY:
view_display (vu);
break;
case VIEW_REMOVE:
view_remove (vu);
break;
case VIEW_GETSIZE:
bcopy (&vu->size, data, sizeof (struct view_size));
break;
case VIEW_SETSIZE:
error = view_setsize (vu, (struct view_size *)data);
break;
case VIEW_GETBITMAP:
bm = (bmap_t *)data;
bcopy (vu->view->bitmap, bm, sizeof (bmap_t));
if ((int)p != -1) {
bm->plane = 0;
bm->blit_temp = 0;
bm->hardware_address = 0;
}
break;
case VIEW_GETCOLORMAP:
error = view_get_colormap (vu, data);
break;
case VIEW_USECOLORMAP:
error = view_use_colormap (vu, data);
break;
default:
error = EINVAL;
break;
}
return (error);
}
/*ARGSUSED*/
view_get_colormap (vu, ucm)
struct view_softc *vu;
colormap_t *ucm;
{
int error = 0;
u_long *cme = malloc(sizeof (u_long)*(ucm->size + 1),
M_IOCTLOPS, M_WAITOK); /* add one incase of zero, ick. */
if (cme) {
u_long *uep = ucm->entry;
ucm->entry = cme; /* set entry to out alloc. */
if (!vu->view || grf_get_colormap (vu->view, ucm))
error = EINVAL;
else if (copyout (cme, uep, sizeof (u_long)*ucm->size))
error = EINVAL;
ucm->entry = uep; /* set entry back to users. */
free (cme, M_IOCTLOPS);
} else {
error = ENOMEM;
}
return (error);
}
/*ARGSUSED*/
view_use_colormap (vu, ucm)
struct view_softc *vu;
colormap_t *ucm;
{
int error = 0;
colormap_t *cm = malloc(sizeof (u_long)*ucm->size + sizeof (*cm),
M_IOCTLOPS, M_WAITOK);
if (cm) {
bcopy (ucm, cm, sizeof (colormap_t));
cm->entry = (u_long *) &cm[1]; /* table directly after. */
if (copyin (ucm->entry, cm->entry, sizeof (u_long)*ucm->size))
error = EINVAL;
else if (!vu->view || grf_use_colormap (vu->view, cm))
error = EINVAL;
free (cm, M_IOCTLOPS);
} else {
error = ENOMEM;
}
return (error);
}
/*ARGSUSED*/
viewmap(dev, off, prot)
dev_t dev;
{
struct view_softc *vu = &views[minor(dev)];
bmap_t *bm = vu->view->bitmap;
u_char *bmd_start = bm->hardware_address;
u_long bmd_size = bm->bytes_per_row*bm->rows*bm->depth;
if (off >= 0 && off < bmd_size) {
return(((u_int)bmd_start + off) >> PGSHIFT);
}
/* bogus */
return(-1);
}
/*ARGSUSED*/
viewselect(dev, rw)
dev_t dev;
{
if (rw == FREAD)
return(0);
return(1);
}
void
viewattach() {}