1 /* $NetBSD: grf_obio.c,v 1.25 1997/10/08 19:54:04 briggs Exp $ */ 2 3 /* 4 * Copyright (c) 1995 Allen Briggs. All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. All advertising materials mentioning features or use of this software 15 * must display the following acknowledgement: 16 * This product includes software developed by Allen Briggs. 17 * 4. The name of the author may not be used to endorse or promote products 18 * derived from this software without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 30 */ 31 /* 32 * Graphics display driver for the Macintosh internal video for machines 33 * that don't map it into a fake nubus card. 34 */ 35 36 #include <sys/param.h> 37 38 #include <sys/device.h> 39 #include <sys/ioctl.h> 40 #include <sys/file.h> 41 #include <sys/malloc.h> 42 #include <sys/mman.h> 43 #include <sys/proc.h> 44 #include <sys/systm.h> 45 46 #include <machine/autoconf.h> 47 #include <machine/bus.h> 48 #include <machine/cpu.h> 49 #include <machine/grfioctl.h> 50 #include <machine/viareg.h> 51 52 #include <mac68k/dev/nubus.h> 53 #include <mac68k/dev/obiovar.h> 54 #include <mac68k/dev/grfvar.h> 55 56 extern u_int32_t mac68k_vidlog; 57 extern u_int32_t mac68k_vidphys; 58 extern long videorowbytes; 59 extern long videobitdepth; 60 extern u_long videosize; 61 62 static int grfiv_mode __P((struct grf_softc *gp, int cmd, void *arg)); 63 static caddr_t grfiv_phys __P((struct grf_softc *gp)); 64 static int grfiv_match __P((struct device *, struct cfdata *, void *)); 65 static void grfiv_attach __P((struct device *, struct device *, void *)); 66 67 struct cfdriver intvid_cd = { 68 NULL, "intvid", DV_DULL 69 }; 70 71 struct cfattach intvid_ca = { 72 sizeof(struct grfbus_softc), grfiv_match, grfiv_attach 73 }; 74 75 #define QUADRA_DAFB_BASE 0xF9800000 76 #define CIVIC_CONTROL_BASE 0x50036000 77 78 static int 79 grfiv_match(parent, cf, aux) 80 struct device *parent; 81 struct cfdata *cf; 82 void *aux; 83 { 84 struct obio_attach_args *oa = (struct obio_attach_args *)aux; 85 bus_space_handle_t bsh; 86 int found, sense; 87 88 found = 1; 89 90 switch (current_mac_model->class) { 91 case MACH_CLASSQ: 92 case MACH_CLASSQ2: 93 /* 94 * Assume DAFB for all of these, unless we can't 95 * access the memory. 96 */ 97 98 if (bus_space_map(oa->oa_tag, QUADRA_DAFB_BASE, 0x1000, 99 0, &bsh)) { 100 panic("failed to map space for DAFB regs.\n"); 101 } 102 103 if (bus_probe(oa->oa_tag, bsh, 0x1C, 4) == 0) { 104 bus_space_unmap(oa->oa_tag, bsh, 0x1000); 105 found = 0; 106 goto nodafb; 107 } 108 109 sense = (bus_space_read_4(oa->oa_tag, bsh, 0x1C) & 7); 110 111 if (sense == 0) 112 found = 0; 113 114 /* Set "Turbo SCSI" configuration to default */ 115 bus_space_write_4(oa->oa_tag, bsh, 0x24, 0x1d1); /* ch0 */ 116 bus_space_write_4(oa->oa_tag, bsh, 0x28, 0x1d1); /* ch1 */ 117 118 /* Disable interrupts */ 119 bus_space_write_4(oa->oa_tag, bsh, 0x104, 0); 120 121 /* Clear any interrupts */ 122 bus_space_write_4(oa->oa_tag, bsh, 0x10C, 0); 123 bus_space_write_4(oa->oa_tag, bsh, 0x110, 0); 124 bus_space_write_4(oa->oa_tag, bsh, 0x114, 0); 125 126 bus_space_unmap(oa->oa_tag, bsh, 0x1000); 127 break; 128 129 case MACH_CLASSAV: 130 if (bus_space_map(oa->oa_tag, CIVIC_CONTROL_BASE, 0x1000, 131 0, &bsh)) { 132 panic("failed to map space for CIVIC control regs.\n"); 133 } 134 /* Disable interrupts */ 135 bus_space_write_1(oa->oa_tag, bsh, 0x120, 0); 136 bus_space_unmap(oa->oa_tag, bsh, 0x1000); 137 break; 138 139 default: 140 nodafb: 141 if (mac68k_vidlog == 0) { 142 found = 0; 143 } 144 break; 145 } 146 147 return found; 148 } 149 150 #define R4(sc, o) (bus_space_read_4((sc)->sc_tag, (sc)->sc_regh, o) & 0xfff) 151 152 static void 153 grfiv_attach(parent, self, aux) 154 struct device *parent, *self; 155 void *aux; 156 { 157 struct obio_attach_args *oa = (struct obio_attach_args *)aux; 158 struct grfbus_softc *sc; 159 struct grfmode *gm; 160 161 sc = (struct grfbus_softc *)self; 162 163 sc->card_id = 0; 164 165 switch (current_mac_model->class) { 166 case MACH_CLASSQ: 167 case MACH_CLASSQ2: 168 sc->sc_tag = oa->oa_tag; 169 if (bus_space_map(sc->sc_tag, QUADRA_DAFB_BASE, 0x1000, 170 0, &sc->sc_regh)) { 171 panic("failed to map space for DAFB regs.\n"); 172 } 173 printf(": DAFB: Monitor sense %x.\n", R4(sc,0x1C)&7); 174 bus_space_unmap(sc->sc_tag, sc->sc_regh, 0x1000); 175 break; 176 default: 177 printf(": Internal Video\n"); 178 break; 179 } 180 181 gm = &(sc->curr_mode); 182 gm->mode_id = 0; 183 gm->psize = videobitdepth; 184 gm->ptype = 0; 185 gm->width = videosize & 0xffff; 186 gm->height = (videosize >> 16) & 0xffff; 187 gm->rowbytes = videorowbytes; 188 gm->hres = 80; /* XXX Hack */ 189 gm->vres = 80; /* XXX Hack */ 190 gm->fbsize = gm->rowbytes * gm->height; 191 gm->fbbase = (caddr_t)m68k_trunc_page(mac68k_vidlog); 192 gm->fboff = mac68k_vidlog & PGOFSET; 193 194 /* Perform common video attachment. */ 195 grf_establish(sc, NULL, grfiv_mode, grfiv_phys); 196 } 197 198 static int 199 grfiv_mode(sc, cmd, arg) 200 struct grf_softc *sc; 201 int cmd; 202 void *arg; 203 { 204 switch (cmd) { 205 case GM_GRFON: 206 case GM_GRFOFF: 207 return 0; 208 case GM_CURRMODE: 209 break; 210 case GM_NEWMODE: 211 break; 212 case GM_LISTMODES: 213 break; 214 } 215 return EINVAL; 216 } 217 218 static caddr_t 219 grfiv_phys(gp) 220 struct grf_softc *gp; 221 { 222 /* 223 * If we're using IIsi or similar, this will be 0. 224 * If we're using IIvx or similar, this will be correct. 225 */ 226 return (caddr_t)mac68k_vidphys; 227 } 228