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_tc.c 1.20 93/08/13$ 1341480Smckusick * 14*65489Sbostic * @(#)grf_tc.c 8.3 (Berkeley) 01/04/94 1541480Smckusick */ 1641480Smckusick 1741480Smckusick #include "grf.h" 1841480Smckusick #if NGRF > 0 1941480Smckusick 2041480Smckusick /* 2153929Shibler * Graphics routines for TOPCAT and CATSEYE frame buffers 2241480Smckusick */ 2356507Sbostic #include <sys/param.h> 2456507Sbostic #include <sys/errno.h> 2541480Smckusick 2656507Sbostic #include <hp/dev/grfioctl.h> 2756507Sbostic #include <hp/dev/grfvar.h> 2864472Shibler #include <hp/dev/grfreg.h> 2956507Sbostic #include <hp300/dev/grf_tcreg.h> 3041480Smckusick 3156507Sbostic #include <machine/cpu.h> 3241480Smckusick 3341480Smckusick /* 3441480Smckusick * Initialize hardware. 3541480Smckusick * Must fill in the grfinfo structure in g_softc. 3641480Smckusick * Returns 0 if hardware not present, non-zero ow. 3741480Smckusick */ 3841480Smckusick tc_init(gp, addr) 3941480Smckusick struct grf_softc *gp; 4049312Shibler caddr_t addr; 4141480Smckusick { 4241480Smckusick register struct tcboxfb *tp = (struct tcboxfb *) addr; 4341480Smckusick struct grfinfo *gi = &gp->g_display; 4441480Smckusick volatile u_char *fbp; 4541480Smckusick u_char save; 4641480Smckusick int fboff; 4749312Shibler extern caddr_t sctopa(), iomap(); 4841480Smckusick 4949312Shibler if (ISIIOVA(addr)) 5049312Shibler gi->gd_regaddr = (caddr_t) IIOP(addr); 5149312Shibler else 5249312Shibler gi->gd_regaddr = sctopa(vatosc(addr)); 5341480Smckusick gi->gd_regsize = 0x10000; 5441480Smckusick gi->gd_fbwidth = (tp->fbwmsb << 8) | tp->fbwlsb; 5541480Smckusick gi->gd_fbheight = (tp->fbhmsb << 8) | tp->fbhlsb; 5649312Shibler gi->gd_fbsize = gi->gd_fbwidth * gi->gd_fbheight; 5741480Smckusick fboff = (tp->fbomsb << 8) | tp->fbolsb; 5849312Shibler gi->gd_fbaddr = (caddr_t) (*((u_char *)addr + fboff) << 16); 5949312Shibler if (gi->gd_regaddr >= (caddr_t)DIOIIBASE) { 6049312Shibler /* 6149312Shibler * For DIO II space the fbaddr just computed is the offset 6249312Shibler * from the select code base (regaddr) of the framebuffer. 6349312Shibler * Hence it is also implicitly the size of the register set. 6449312Shibler */ 6549312Shibler gi->gd_regsize = (int) gi->gd_fbaddr; 6649312Shibler gi->gd_fbaddr += (int) gi->gd_regaddr; 6749312Shibler gp->g_regkva = addr; 6849312Shibler gp->g_fbkva = addr + gi->gd_regsize; 6949312Shibler } else { 7049312Shibler /* 7149312Shibler * For DIO space we need to map the seperate framebuffer. 7249312Shibler */ 7349312Shibler gp->g_regkva = addr; 7449312Shibler gp->g_fbkva = iomap(gi->gd_fbaddr, gi->gd_fbsize); 7549312Shibler } 7641480Smckusick gi->gd_dwidth = (tp->dwmsb << 8) | tp->dwlsb; 7741480Smckusick gi->gd_dheight = (tp->dhmsb << 8) | tp->dhlsb; 7841480Smckusick gi->gd_planes = tp->num_planes; 7941480Smckusick gi->gd_colors = 1 << gi->gd_planes; 8041480Smckusick if (gi->gd_colors == 1) { 8149312Shibler fbp = (u_char *) gp->g_fbkva; 8241480Smckusick tp->wen = ~0; 8341480Smckusick tp->prr = 0x3; 8441480Smckusick tp->fben = ~0; 8541480Smckusick save = *fbp; 8641480Smckusick *fbp = 0xFF; 8741480Smckusick gi->gd_colors = *fbp + 1; 8841480Smckusick *fbp = save; 8941480Smckusick } 9041480Smckusick return(1); 9141480Smckusick } 9241480Smckusick 9341480Smckusick /* 9441480Smckusick * Change the mode of the display. 9541480Smckusick * Right now all we can do is grfon/grfoff. 9641480Smckusick * Return a UNIX error number or 0 for success. 9741480Smckusick * Function may not be needed anymore. 9841480Smckusick */ 9941480Smckusick /*ARGSUSED*/ 10064472Shibler tc_mode(gp, cmd, data) 10141480Smckusick struct grf_softc *gp; 10264472Shibler caddr_t data; 10341480Smckusick { 10441480Smckusick int error = 0; 10541480Smckusick 10641480Smckusick switch (cmd) { 10741480Smckusick case GM_GRFON: 10841480Smckusick case GM_GRFOFF: 10941480Smckusick break; 11064472Shibler 11164472Shibler /* 11264472Shibler * Remember UVA of mapping for GCDESCRIBE. 11364472Shibler * XXX this should be per-process. 11464472Shibler */ 11564472Shibler case GM_MAP: 11664472Shibler gp->g_data = data; 11764472Shibler break; 11864472Shibler 11964472Shibler case GM_UNMAP: 12064472Shibler gp->g_data = 0; 12164472Shibler break; 12264472Shibler 12364472Shibler #ifdef HPUXCOMPAT 12464472Shibler case GM_DESCRIBE: 12564472Shibler { 12664472Shibler struct grf_fbinfo *fi = (struct grf_fbinfo *)data; 12764472Shibler struct grfinfo *gi = &gp->g_display; 128*65489Sbostic int i; 12964472Shibler 13064472Shibler /* feed it what HP-UX expects */ 13164472Shibler fi->id = gi->gd_id; 13264472Shibler fi->mapsize = gi->gd_fbsize; 13364472Shibler fi->dwidth = gi->gd_dwidth; 13464472Shibler fi->dlength = gi->gd_dheight; 13564472Shibler fi->width = gi->gd_fbwidth; 13664472Shibler fi->length = gi->gd_fbheight; 13764472Shibler fi->bpp = NBBY; 13864472Shibler fi->xlen = (fi->width * fi->bpp) / NBBY; 13964472Shibler fi->npl = gi->gd_planes; 14064472Shibler fi->bppu = fi->npl; 14164472Shibler fi->nplbytes = fi->xlen * ((fi->length * fi->bpp) / NBBY); 14264472Shibler /* XXX */ 14364472Shibler switch (gp->g_sw->gd_hwid) { 14464472Shibler case GID_HRCCATSEYE: 14564472Shibler bcopy("HP98550", fi->name, 8); 14664472Shibler break; 14764472Shibler case GID_LRCATSEYE: 14864472Shibler bcopy("HP98549", fi->name, 8); 14964472Shibler break; 15064472Shibler case GID_HRMCATSEYE: 15164472Shibler bcopy("HP98548", fi->name, 8); 15264472Shibler break; 15364472Shibler case GID_TOPCAT: 15464472Shibler switch (gi->gd_colors) { 15564472Shibler case 64: 15664472Shibler bcopy("HP98547", fi->name, 8); 15764472Shibler break; 15864472Shibler case 16: 15964472Shibler bcopy("HP98545", fi->name, 8); 16064472Shibler break; 16164472Shibler case 2: 16264472Shibler bcopy("HP98544", fi->name, 8); 16364472Shibler break; 16464472Shibler } 16564472Shibler break; 16664472Shibler } 16764472Shibler fi->attr = 2; /* HW block mover */ 16864472Shibler /* 16964472Shibler * If mapped, return the UVA where mapped. 17064472Shibler */ 17164472Shibler if (gp->g_data) { 17264472Shibler fi->regbase = gp->g_data; 17364472Shibler fi->fbbase = fi->regbase + gp->g_display.gd_regsize; 17464472Shibler } else { 17564472Shibler fi->fbbase = 0; 17664472Shibler fi->regbase = 0; 17764472Shibler } 17864472Shibler for (i = 0; i < 6; i++) 17964472Shibler fi->regions[i] = 0; 18064472Shibler break; 18164472Shibler } 18264472Shibler #endif 18364472Shibler 18441480Smckusick default: 18541480Smckusick error = EINVAL; 18641480Smckusick break; 18741480Smckusick } 18841480Smckusick return(error); 18941480Smckusick } 19041480Smckusick #endif 191