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 * 12*64472Shibler * from: Utah $Hdr: grf_tc.c 1.20 93/08/13$ 1341480Smckusick * 14*64472Shibler * @(#)grf_tc.c 8.2 (Berkeley) 09/09/93 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> 28*64472Shibler #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*/ 100*64472Shibler tc_mode(gp, cmd, data) 10141480Smckusick struct grf_softc *gp; 102*64472Shibler caddr_t data; 10341480Smckusick { 10441480Smckusick int error = 0; 10541480Smckusick 10641480Smckusick switch (cmd) { 10741480Smckusick case GM_GRFON: 10841480Smckusick case GM_GRFOFF: 10941480Smckusick break; 110*64472Shibler 111*64472Shibler /* 112*64472Shibler * Remember UVA of mapping for GCDESCRIBE. 113*64472Shibler * XXX this should be per-process. 114*64472Shibler */ 115*64472Shibler case GM_MAP: 116*64472Shibler gp->g_data = data; 117*64472Shibler break; 118*64472Shibler 119*64472Shibler case GM_UNMAP: 120*64472Shibler gp->g_data = 0; 121*64472Shibler break; 122*64472Shibler 123*64472Shibler #ifdef HPUXCOMPAT 124*64472Shibler case GM_DESCRIBE: 125*64472Shibler { 126*64472Shibler struct grf_fbinfo *fi = (struct grf_fbinfo *)data; 127*64472Shibler struct grfinfo *gi = &gp->g_display; 128*64472Shibler int i, j; 129*64472Shibler 130*64472Shibler /* feed it what HP-UX expects */ 131*64472Shibler fi->id = gi->gd_id; 132*64472Shibler fi->mapsize = gi->gd_fbsize; 133*64472Shibler fi->dwidth = gi->gd_dwidth; 134*64472Shibler fi->dlength = gi->gd_dheight; 135*64472Shibler fi->width = gi->gd_fbwidth; 136*64472Shibler fi->length = gi->gd_fbheight; 137*64472Shibler fi->bpp = NBBY; 138*64472Shibler fi->xlen = (fi->width * fi->bpp) / NBBY; 139*64472Shibler fi->npl = gi->gd_planes; 140*64472Shibler fi->bppu = fi->npl; 141*64472Shibler fi->nplbytes = fi->xlen * ((fi->length * fi->bpp) / NBBY); 142*64472Shibler /* XXX */ 143*64472Shibler switch (gp->g_sw->gd_hwid) { 144*64472Shibler case GID_HRCCATSEYE: 145*64472Shibler bcopy("HP98550", fi->name, 8); 146*64472Shibler break; 147*64472Shibler case GID_LRCATSEYE: 148*64472Shibler bcopy("HP98549", fi->name, 8); 149*64472Shibler break; 150*64472Shibler case GID_HRMCATSEYE: 151*64472Shibler bcopy("HP98548", fi->name, 8); 152*64472Shibler break; 153*64472Shibler case GID_TOPCAT: 154*64472Shibler switch (gi->gd_colors) { 155*64472Shibler case 64: 156*64472Shibler bcopy("HP98547", fi->name, 8); 157*64472Shibler break; 158*64472Shibler case 16: 159*64472Shibler bcopy("HP98545", fi->name, 8); 160*64472Shibler break; 161*64472Shibler case 2: 162*64472Shibler bcopy("HP98544", fi->name, 8); 163*64472Shibler break; 164*64472Shibler } 165*64472Shibler break; 166*64472Shibler } 167*64472Shibler fi->attr = 2; /* HW block mover */ 168*64472Shibler /* 169*64472Shibler * If mapped, return the UVA where mapped. 170*64472Shibler */ 171*64472Shibler if (gp->g_data) { 172*64472Shibler fi->regbase = gp->g_data; 173*64472Shibler fi->fbbase = fi->regbase + gp->g_display.gd_regsize; 174*64472Shibler } else { 175*64472Shibler fi->fbbase = 0; 176*64472Shibler fi->regbase = 0; 177*64472Shibler } 178*64472Shibler for (i = 0; i < 6; i++) 179*64472Shibler fi->regions[i] = 0; 180*64472Shibler break; 181*64472Shibler } 182*64472Shibler #endif 183*64472Shibler 18441480Smckusick default: 18541480Smckusick error = EINVAL; 18641480Smckusick break; 18741480Smckusick } 18841480Smckusick return(error); 18941480Smckusick } 19041480Smckusick #endif 191