/* $NetBSD: grf_obio.c,v 1.29 1998/01/13 19:24:53 scottr Exp $ */ /* * Copyright (c) 1995 Allen Briggs. 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 Allen Briggs. * 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. */ /* * Graphics display driver for the Macintosh internal video for machines * that don't map it into a fake nubus card. */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include extern u_int32_t mac68k_vidlog; extern u_int32_t mac68k_vidphys; extern long videorowbytes; extern long videobitdepth; extern u_long videosize; static int grfiv_mode __P((struct grf_softc *gp, int cmd, void *arg)); static caddr_t grfiv_phys __P((struct grf_softc *gp)); static int grfiv_match __P((struct device *, struct cfdata *, void *)); static void grfiv_attach __P((struct device *, struct device *, void *)); struct cfattach intvid_ca = { sizeof(struct grfbus_softc), grfiv_match, grfiv_attach }; #define QUADRA_DAFB_BASE 0xF9800000 #define CIVIC_CONTROL_BASE 0x50036000 static int grfiv_match(parent, cf, aux) struct device *parent; struct cfdata *cf; void *aux; { struct obio_attach_args *oa = (struct obio_attach_args *)aux; bus_space_handle_t bsh; int found, sense; u_int base; found = 1; switch (current_mac_model->class) { case MACH_CLASSQ: /* * Assume DAFB for all of these, unless we can't * access the memory. */ base = QUADRA_DAFB_BASE; if (bus_space_map(oa->oa_tag, base, 0x1000, 0, &bsh)) { panic("failed to map space for DAFB regs.\n"); } if (mac68k_bus_space_probe(oa->oa_tag, bsh, 0x1C, 4) == 0) { bus_space_unmap(oa->oa_tag, bsh, 0x1000); found = 0; goto nodafb; } sense = (bus_space_read_4(oa->oa_tag, bsh, 0x1C) & 7); if (sense == 0) found = 0; /* Set "Turbo SCSI" configuration to default */ bus_space_write_4(oa->oa_tag, bsh, 0x24, 0x1d1); /* ch0 */ bus_space_write_4(oa->oa_tag, bsh, 0x28, 0x1d1); /* ch1 */ /* Disable interrupts */ bus_space_write_4(oa->oa_tag, bsh, 0x104, 0); /* Clear any interrupts */ bus_space_write_4(oa->oa_tag, bsh, 0x10C, 0); bus_space_write_4(oa->oa_tag, bsh, 0x110, 0); bus_space_write_4(oa->oa_tag, bsh, 0x114, 0); bus_space_unmap(oa->oa_tag, bsh, 0x1000); break; case MACH_CLASSAV: base = CIVIC_CONTROL_BASE; if (bus_space_map(oa->oa_tag, base, 0x1000, 0, &bsh)) { panic("failed to map space for CIVIC control regs.\n"); } /* Disable interrupts */ bus_space_write_1(oa->oa_tag, bsh, 0x120, 0); bus_space_unmap(oa->oa_tag, bsh, 0x1000); break; case MACH_CLASSQ2: break; default: nodafb: if (mac68k_vidlog == 0) { found = 0; } break; } return found; } #define R4(sc, o) (bus_space_read_4((sc)->sc_tag, (sc)->sc_regh, o) & 0xfff) static void grfiv_attach(parent, self, aux) struct device *parent, *self; void *aux; { struct obio_attach_args *oa = (struct obio_attach_args *)aux; struct grfbus_softc *sc; struct grfmode *gm; u_int base; sc = (struct grfbus_softc *)self; sc->card_id = 0; switch (current_mac_model->class) { case MACH_CLASSQ: base = QUADRA_DAFB_BASE; sc->sc_tag = oa->oa_tag; if (bus_space_map(sc->sc_tag, base, 0x1000, 0, &sc->sc_regh)) { panic("failed to map space for DAFB regs.\n"); } printf(": DAFB: Monitor sense %x.\n", R4(sc,0x1C)&7); bus_space_unmap(sc->sc_tag, sc->sc_regh, 0x1000); break; case MACH_CLASSQ2: case MACH_CLASSAV: default: printf(": Internal Video\n"); break; } gm = &(sc->curr_mode); gm->mode_id = 0; gm->psize = videobitdepth; gm->ptype = 0; gm->width = videosize & 0xffff; gm->height = (videosize >> 16) & 0xffff; gm->rowbytes = videorowbytes; gm->hres = 80; /* XXX Hack */ gm->vres = 80; /* XXX Hack */ gm->fbsize = gm->rowbytes * gm->height; gm->fbbase = (caddr_t)m68k_trunc_page(mac68k_vidlog); gm->fboff = mac68k_vidlog & PGOFSET; /* Perform common video attachment. */ grf_establish(sc, NULL, grfiv_mode, grfiv_phys); } static int grfiv_mode(sc, cmd, arg) struct grf_softc *sc; int cmd; void *arg; { switch (cmd) { case GM_GRFON: case GM_GRFOFF: return 0; case GM_CURRMODE: break; case GM_NEWMODE: break; case GM_LISTMODES: break; } return EINVAL; } static caddr_t grfiv_phys(gp) struct grf_softc *gp; { /* * If we're using IIsi or similar, this will be 0. * If we're using IIvx or similar, this will be correct. */ return (caddr_t)mac68k_vidphys; }