141480Smckusick /*
241480Smckusick * Copyright (c) 1988 University of Utah.
363151Sbostic * Copyright (c) 1990, 1993
463151Sbostic * The Regents of the University of California. All rights reserved.
541480Smckusick *
641480Smckusick * This code is derived from software contributed to Berkeley by
741480Smckusick * the Systems Programming Group of the University of Utah Computer
841480Smckusick * Science Department.
941480Smckusick *
1041480Smckusick * %sccs.include.redist.c%
1141480Smckusick *
1264472Shibler * from: Utah $Hdr: grf_rb.c 1.15 93/08/13$
1341480Smckusick *
14*65632Sbostic * @(#)grf_rb.c 8.4 (Berkeley) 01/12/94
1541480Smckusick */
1641480Smckusick
1741480Smckusick #include "grf.h"
1841480Smckusick #if NGRF > 0
1941480Smckusick
2041480Smckusick /*
2141480Smckusick * Graphics routines for the Renaissance, HP98720 Graphics system.
2241480Smckusick */
2356507Sbostic #include <sys/param.h>
2456507Sbostic #include <sys/errno.h>
2541480Smckusick
2656507Sbostic #include <hp/dev/grfioctl.h>
2756507Sbostic #include <hp/dev/grfvar.h>
2856507Sbostic #include <hp300/dev/grf_rbreg.h>
2941480Smckusick
3056507Sbostic #include <machine/cpu.h>
3141480Smckusick
3241480Smckusick /*
3341480Smckusick * Initialize hardware.
3441480Smckusick * Must point g_display at a grfinfo structure describing the hardware.
3541480Smckusick * Returns 0 if hardware not present, non-zero ow.
3641480Smckusick */
3741480Smckusick rb_init(gp, addr)
3841480Smckusick struct grf_softc *gp;
3949312Shibler caddr_t addr;
4041480Smckusick {
4141480Smckusick register struct rboxfb *rbp;
4241480Smckusick struct grfinfo *gi = &gp->g_display;
4341480Smckusick int fboff;
4449312Shibler extern caddr_t sctopa(), iomap();
4541480Smckusick
4641480Smckusick rbp = (struct rboxfb *) addr;
4749312Shibler if (ISIIOVA(addr))
4849312Shibler gi->gd_regaddr = (caddr_t) IIOP(addr);
4949312Shibler else
5049312Shibler gi->gd_regaddr = sctopa(vatosc(addr));
5141480Smckusick gi->gd_regsize = 0x20000;
5241480Smckusick gi->gd_fbwidth = (rbp->fbwmsb << 8) | rbp->fbwlsb;
5341480Smckusick gi->gd_fbheight = (rbp->fbhmsb << 8) | rbp->fbhlsb;
5449312Shibler gi->gd_fbsize = gi->gd_fbwidth * gi->gd_fbheight;
5541480Smckusick fboff = (rbp->fbomsb << 8) | rbp->fbolsb;
5649312Shibler gi->gd_fbaddr = (caddr_t) (*((u_char *)addr + fboff) << 16);
5749312Shibler if (gi->gd_regaddr >= (caddr_t)DIOIIBASE) {
5849312Shibler /*
5949312Shibler * For DIO II space the fbaddr just computed is the offset
6049312Shibler * from the select code base (regaddr) of the framebuffer.
6149312Shibler * Hence it is also implicitly the size of the register set.
6249312Shibler */
6349312Shibler gi->gd_regsize = (int) gi->gd_fbaddr;
6449312Shibler gi->gd_fbaddr += (int) gi->gd_regaddr;
6549312Shibler gp->g_regkva = addr;
6649312Shibler gp->g_fbkva = addr + gi->gd_regsize;
6749312Shibler } else {
6849312Shibler /*
6949312Shibler * For DIO space we need to map the seperate framebuffer.
7049312Shibler */
7149312Shibler gp->g_regkva = addr;
7249312Shibler gp->g_fbkva = iomap(gi->gd_fbaddr, gi->gd_fbsize);
7349312Shibler }
7441480Smckusick gi->gd_dwidth = (rbp->dwmsb << 8) | rbp->dwlsb;
7541480Smckusick gi->gd_dheight = (rbp->dwmsb << 8) | rbp->dwlsb;
7641480Smckusick gi->gd_planes = 0; /* ?? */
7741480Smckusick gi->gd_colors = 256;
7841480Smckusick return(1);
7941480Smckusick }
8041480Smckusick
8141480Smckusick /*
8241480Smckusick * Change the mode of the display.
8341480Smckusick * Right now all we can do is grfon/grfoff.
8441480Smckusick * Return a UNIX error number or 0 for success.
8541480Smckusick */
rb_mode(gp,cmd,data)8664472Shibler rb_mode(gp, cmd, data)
8741480Smckusick register struct grf_softc *gp;
88*65632Sbostic int cmd;
8964472Shibler caddr_t data;
9041480Smckusick {
9141480Smckusick register struct rboxfb *rbp;
9241480Smckusick int error = 0;
9341480Smckusick
9449312Shibler rbp = (struct rboxfb *) gp->g_regkva;
9541480Smckusick switch (cmd) {
9641480Smckusick /*
9741480Smckusick * The minimal register info here is from the Renaissance X driver.
9841480Smckusick */
9941480Smckusick case GM_GRFON:
10041480Smckusick case GM_GRFOFF:
10141480Smckusick break;
10264472Shibler
10341480Smckusick case GM_GRFOVON:
10441480Smckusick rbp->write_enable = 0;
10541480Smckusick rbp->opwen = 0xF;
10641480Smckusick rbp->drive = 0x10;
10741480Smckusick break;
10864472Shibler
10941480Smckusick case GM_GRFOVOFF:
11041480Smckusick rbp->opwen = 0;
11141480Smckusick rbp->write_enable = 0xffffffff;
11241480Smckusick rbp->drive = 0x01;
11341480Smckusick break;
11464472Shibler
11564472Shibler /*
11664472Shibler * Remember UVA of mapping for GCDESCRIBE.
11764472Shibler * XXX this should be per-process.
11864472Shibler */
11964472Shibler case GM_MAP:
12064472Shibler gp->g_data = data;
12164472Shibler break;
12264472Shibler
12364472Shibler case GM_UNMAP:
12464472Shibler gp->g_data = 0;
12564472Shibler break;
12664472Shibler
12764472Shibler #ifdef HPUXCOMPAT
12864472Shibler case GM_DESCRIBE:
12964472Shibler {
13064472Shibler struct grf_fbinfo *fi = (struct grf_fbinfo *)data;
13164472Shibler struct grfinfo *gi = &gp->g_display;
13265488Sbostic int i;
13364472Shibler
13464472Shibler /* feed it what HP-UX expects */
13564472Shibler fi->id = gi->gd_id;
13664472Shibler fi->mapsize = gi->gd_fbsize;
13764472Shibler fi->dwidth = gi->gd_dwidth;
13864472Shibler fi->dlength = gi->gd_dheight;
13964472Shibler fi->width = gi->gd_fbwidth;
14064472Shibler fi->length = gi->gd_fbheight;
14164472Shibler fi->bpp = NBBY;
14264472Shibler fi->xlen = (fi->width * fi->bpp) / NBBY;
14364472Shibler fi->npl = gi->gd_planes;
14464472Shibler fi->bppu = fi->npl;
14564472Shibler fi->nplbytes = fi->xlen * ((fi->length * fi->bpp) / NBBY);
14664472Shibler bcopy("HP98720", fi->name, 8);
14764472Shibler fi->attr = 2; /* HW block mover */
14864472Shibler /*
14964472Shibler * If mapped, return the UVA where mapped.
15064472Shibler */
15164472Shibler if (gp->g_data) {
15264472Shibler fi->regbase = gp->g_data;
15364472Shibler fi->fbbase = fi->regbase + gp->g_display.gd_regsize;
15464472Shibler } else {
15564472Shibler fi->fbbase = 0;
15664472Shibler fi->regbase = 0;
15764472Shibler }
15864472Shibler for (i = 0; i < 6; i++)
15964472Shibler fi->regions[i] = 0;
16064472Shibler break;
16164472Shibler }
16264472Shibler #endif
16364472Shibler
16441480Smckusick default:
16541480Smckusick error = EINVAL;
16641480Smckusick break;
16741480Smckusick }
16841480Smckusick return(error);
16941480Smckusick }
17041480Smckusick
17141480Smckusick #endif
172