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

401 lines
9.1 KiB
C

/* $NetBSD: view.c,v 1.20 2002/03/17 19:40:32 atatat Exp $ */
/*
* 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.
*/
/* 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/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: view.c,v 1.20 2002/03/17 19:40:32 atatat Exp $");
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/proc.h>
#include <sys/ioctl.h>
#include <sys/file.h>
#include <sys/device.h>
#include <sys/malloc.h>
#include <sys/queue.h>
#include <sys/poll.h>
#include <machine/cpu.h>
#include <amiga/dev/grfabs_reg.h>
#include <amiga/dev/viewioctl.h>
#include <amiga/dev/viewvar.h>
#include <sys/conf.h>
#include <machine/conf.h>
#include "view.h"
static void view_display(struct view_softc *);
static void view_remove(struct view_softc *);
static int view_setsize(struct view_softc *, struct view_size *);
int view_get_colormap(struct view_softc *, colormap_t *);
int view_set_colormap(struct view_softc *, colormap_t *);
void viewattach(int);
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.
*/
void
viewattach(int cnt)
{
viewprobe();
printf("%d view%s configured\n", NVIEW, NVIEW > 1 ? "s" : "");
}
/* this function is called early to set up a display. */
void
viewprobe(void)
{
int i;
if (view_inited)
return;
view_inited = 1;
for (i=0; i<NVIEW; i++) {
views[i].view = NULL;
views[i].flags = 0;
}
return;
}
/*
* Internal functions.
*/
static void
view_display(struct view_softc *vu)
{
int s, i;
if (vu == NULL)
return;
s = spltty ();
/*
* 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) == 0)
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, cs;
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 == 0 && co == 0)
return(0);
ns.width = vs->width;
ns.height = vs->height;
new = grf_alloc_view(NULL, &ns, vs->depth);
if (new == NULL)
return(ENOMEM);
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 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);
view_display(vu);
}
grf_free_view(old);
return(0);
}
/*
* functions made available by conf.c
*/
/*ARGSUSED*/
int
viewopen(dev_t dev, int flags, int mode, struct proc *p)
{
dimen_t size;
struct view_softc *vu;
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 == NULL)
return(ENOMEM);
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);
}
/*ARGSUSED*/
int
viewclose(dev_t dev, int flags, int mode, struct proc *p)
{
struct view_softc *vu;
vu = &views[minor(dev)];
if ((vu->flags & VUF_OPEN) == 0)
return(0);
view_remove (vu);
grf_free_view (vu->view);
vu->flags = 0;
vu->view = NULL;
vu->mode = NULL;
vu->monitor = NULL;
return(0);
}
/*ARGSUSED*/
int
viewioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p)
{
struct view_softc *vu;
bmap_t *bm;
int error;
vu = &views[minor(dev)];
error = 0;
switch (cmd) {
case VIOCDISPLAY:
view_display(vu);
break;
case VIOCREMOVE:
view_remove(vu);
break;
case VIOCGSIZE:
bcopy(&vu->size, data, sizeof (struct view_size));
break;
case VIOCSSIZE:
error = view_setsize(vu, (struct view_size *)data);
break;
case VIOCGBMAP:
bm = (bmap_t *)data;
bcopy(vu->view->bitmap, bm, sizeof(bmap_t));
if (flag != -1) {
bm->plane = 0;
bm->blit_temp = 0;
bm->hardware_address = 0;
}
break;
case VIOCGCMAP:
error = view_get_colormap(vu, (colormap_t *)data);
break;
case VIOCSCMAP:
error = view_set_colormap(vu, (colormap_t *)data);
break;
default:
error = EPASSTHROUGH;
break;
}
return(error);
}
int
view_get_colormap(struct view_softc *vu, colormap_t *ucm)
{
int error;
u_long *cme;
u_long *uep;
/* add one incase of zero, ick. */
cme = malloc(sizeof (u_long)*(ucm->size + 1), M_IOCTLOPS, M_WAITOK);
if (cme == NULL)
return(ENOMEM);
uep = ucm->entry;
error = 0;
ucm->entry = cme; /* set entry to out alloc. */
if (vu->view == NULL || grf_get_colormap(vu->view, ucm))
error = EINVAL;
else
error = copyout(cme, uep, sizeof(u_long) * ucm->size);
ucm->entry = uep; /* set entry back to users. */
free(cme, M_IOCTLOPS);
return(error);
}
int
view_set_colormap(struct view_softc *vu, colormap_t *ucm)
{
colormap_t *cm;
int error;
error = 0;
cm = malloc(sizeof(u_long) * ucm->size + sizeof (*cm), M_IOCTLOPS,
M_WAITOK);
if (cm == NULL)
return(ENOMEM);
bcopy (ucm, cm, sizeof(colormap_t));
cm->entry = (u_long *)&cm[1]; /* table directly after. */
if (((error =
copyin(ucm->entry, cm->entry, sizeof (u_long) * ucm->size)) == 0)
&& (vu->view == NULL || grf_use_colormap(vu->view, cm)))
error = EINVAL;
free(cm, M_IOCTLOPS);
return(error);
}
/*ARGSUSED*/
paddr_t
viewmmap(dev_t dev, off_t off, int prot)
{
struct view_softc *vu;
bmap_t *bm;
u_char *bmd_start;
u_long bmd_size;
vu = &views[minor(dev)];
bm = vu->view->bitmap;
bmd_start = bm->hardware_address;
bmd_size = bm->bytes_per_row*bm->rows*bm->depth;
if (off >= 0 && off < bmd_size)
return(((paddr_t)bmd_start + off) >> PGSHIFT);
return(-1);
}
/*ARGSUSED*/
int
viewpoll(dev_t dev, int events, struct proc *p)
{
return(events & (POLLOUT | POLLWRNORM));
}