1 /* $NetBSD: bw2.c,v 1.34 2008/06/28 12:13:38 tsutsui Exp $ */ 2 3 /* 4 * Copyright (c) 1992, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * This software was developed by the Computer Systems Engineering group 8 * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and 9 * contributed to Berkeley. 10 * 11 * All advertising materials mentioning features or use of this software 12 * must display the following acknowledgement: 13 * This product includes software developed by the University of 14 * California, Lawrence Berkeley Laboratory. 15 * 16 * Redistribution and use in source and binary forms, with or without 17 * modification, are permitted provided that the following conditions 18 * are met: 19 * 1. Redistributions of source code must retain the above copyright 20 * notice, this list of conditions and the following disclaimer. 21 * 2. Redistributions in binary form must reproduce the above copyright 22 * notice, this list of conditions and the following disclaimer in the 23 * documentation and/or other materials provided with the distribution. 24 * 3. Neither the name of the University nor the names of its contributors 25 * may be used to endorse or promote products derived from this software 26 * without specific prior written permission. 27 * 28 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 29 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 30 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 31 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 32 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 33 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 34 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 35 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 36 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 37 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 38 * SUCH DAMAGE. 39 * 40 * @(#)bwtwo.c 8.1 (Berkeley) 6/11/93 41 */ 42 43 /* 44 * black&white display (bw2) driver. 45 * 46 * Does not handle interrupts, even though they can occur. 47 */ 48 49 #include <sys/cdefs.h> 50 __KERNEL_RCSID(0, "$NetBSD: bw2.c,v 1.34 2008/06/28 12:13:38 tsutsui Exp $"); 51 52 #include <sys/param.h> 53 #include <sys/systm.h> 54 #include <sys/conf.h> 55 #include <sys/device.h> 56 #include <sys/ioctl.h> 57 #include <sys/malloc.h> 58 #include <sys/mman.h> 59 #include <sys/proc.h> 60 #include <sys/tty.h> 61 62 #include <uvm/uvm_extern.h> 63 64 #include <machine/autoconf.h> 65 #include <machine/cpu.h> 66 #include <dev/sun/fbio.h> 67 #include <machine/idprom.h> 68 #include <machine/pmap.h> 69 70 #include <sun3/dev/fbvar.h> 71 #include <sun3/dev/bw2reg.h> 72 #include <sun3/dev/p4reg.h> 73 74 #include "ioconf.h" 75 76 /* per-display variables */ 77 struct bw2_softc { 78 device_t sc_dev; /* base device */ 79 struct fbdevice sc_fb; /* frame buffer device */ 80 int sc_phys; /* display RAM (phys addr) */ 81 /* If using overlay plane of something, it is... */ 82 int sc_ovtype; /* ... this type. */ 83 int sc_video_on; 84 }; 85 86 /* autoconfiguration driver */ 87 static int bw2match(device_t, cfdata_t, void *); 88 static void bw2attach(device_t, device_t, void *); 89 90 CFATTACH_DECL_NEW(bwtwo, sizeof(struct bw2_softc), 91 bw2match, bw2attach, NULL, NULL); 92 93 dev_type_open(bw2open); 94 dev_type_ioctl(bw2ioctl); 95 dev_type_mmap(bw2mmap); 96 97 const struct cdevsw bwtwo_cdevsw = { 98 bw2open, nullclose, noread, nowrite, bw2ioctl, 99 nostop, notty, nopoll, bw2mmap, nokqfilter, 100 }; 101 102 /* XXX we do not handle frame buffer interrupts */ 103 104 static int bw2gvideo(struct fbdevice *, void *); 105 static int bw2svideo(struct fbdevice *, void *); 106 107 static struct fbdriver bw2fbdriver = { 108 bw2open, nullclose, bw2mmap, nokqfilter, 109 fb_noioctl, 110 bw2gvideo, bw2svideo, 111 fb_noioctl, fb_noioctl, }; 112 113 static int 114 bw2match(device_t parent, cfdata_t cf, void *args) 115 { 116 struct confargs *ca = args; 117 int mid, p4id, peekval; 118 void *p4reg; 119 120 /* No default address support. */ 121 if (ca->ca_paddr == -1) 122 return 0; 123 124 /* 125 * Slight hack here: The low four bits of the 126 * config flags, if set, restrict the match to 127 * that machine "implementation" only. 128 */ 129 mid = cf->cf_flags & IDM_IMPL_MASK; 130 if (mid != 0 && (mid != (cpu_machine_id & IDM_IMPL_MASK))) 131 return 0; 132 133 /* 134 * Make sure something is there, and if so, 135 * see if it looks like a P4 register. 136 */ 137 p4reg = bus_tmapin(ca->ca_bustype, ca->ca_paddr); 138 peekval = peek_long(p4reg); 139 p4id = (peekval == -1) ? P4_NOTFOUND : fb_pfour_id(p4reg); 140 bus_tmapout(p4reg); 141 if (peekval == -1) 142 return 0; 143 144 /* 145 * The config flag 0x40 if set means we should match 146 * only on a CG? overlay plane. We can use only the 147 * CG4 and CG8, which both have a P4 register. 148 */ 149 if (cf->cf_flags & 0x40) { 150 switch (p4id) { 151 case P4_ID_COLOR8P1: 152 case P4_ID_COLOR24: 153 return 1; 154 case P4_NOTFOUND: 155 default: 156 return 0; 157 } 158 } 159 160 /* 161 * OK, we are expecting a plain old BW2, and 162 * there may or may not be a P4 register. 163 */ 164 switch (p4id) { 165 case P4_ID_BW: 166 case P4_NOTFOUND: 167 return 1; 168 default: 169 #ifdef DEBUG 170 aprint_debug("bwtwo at 0x%lx match p4id=0x%x fails\n", 171 ca->ca_paddr, p4id & 0xFF); 172 #endif 173 break; 174 } 175 176 return 0; 177 } 178 179 /* 180 * Attach a display. We need to notice if it is the console, too. 181 */ 182 static void 183 bw2attach(device_t parent, device_t self, void *args) 184 { 185 struct bw2_softc *sc = device_private(self); 186 struct fbdevice *fb = &sc->sc_fb; 187 struct confargs *ca = args; 188 struct fbtype *fbt; 189 void *p4reg; 190 int p4id, tmp; 191 int pixeloffset; /* offset to framebuffer */ 192 193 sc->sc_dev = self; 194 195 fbt = &fb->fb_fbtype; 196 fbt->fb_type = FBTYPE_SUN2BW; 197 fbt->fb_width = 1152; /* default - see below */ 198 fbt->fb_height = 900; /* default - see below */ 199 fbt->fb_depth = 1; 200 fbt->fb_cmsize = 0; 201 fbt->fb_size = BW2_FBSIZE; /* default - see below */ 202 fb->fb_driver = &bw2fbdriver; 203 fb->fb_private = sc; 204 fb->fb_name = device_xname(self); 205 fb->fb_flags = device_cfdata(self)->cf_flags; 206 207 /* Set up default pixel offset. May be changed below. */ 208 pixeloffset = 0; 209 210 /* Does it have a P4 register? */ 211 p4reg = bus_mapin(ca->ca_bustype, ca->ca_paddr, 4); 212 p4id = fb_pfour_id(p4reg); 213 if (p4id != P4_NOTFOUND) 214 fb->fb_pfour = p4reg; 215 else 216 bus_mapout(p4reg, 4); 217 218 switch (p4id) { 219 case P4_NOTFOUND: 220 pixeloffset = 0; 221 break; 222 223 case P4_ID_BW: 224 pixeloffset = P4_BW_OFF; 225 break; 226 227 default: 228 aprint_error("%s: bad p4id=0x%x\n", fb->fb_name, p4id); 229 /* Must be some kinda color... */ 230 /* FALLTHROUGH */ 231 case P4_ID_COLOR8P1: 232 case P4_ID_COLOR24: 233 sc->sc_ovtype = p4id; 234 pixeloffset = P4_COLOR_OFF_OVERLAY; 235 break; 236 } 237 sc->sc_phys = ca->ca_paddr + pixeloffset; 238 239 /* 240 * Determine width and height as follows: 241 * If it has a P4 register, use that; 242 * else if unit==0, use the EEPROM size, 243 * else make our best guess. 244 */ 245 if (fb->fb_pfour) 246 fb_pfour_setsize(fb); 247 /* XXX device_unit() abuse */ 248 else if (device_unit(self) == 0) 249 fb_eeprom_setsize(fb); 250 else { 251 /* Guess based on machine ID. */ 252 switch (cpu_machine_id) { 253 #ifdef _SUN3_ 254 case ID_SUN3_60: 255 /* 256 * Only the model 60 can have hi-res. 257 * Look at the "resolution" jumper. 258 */ 259 tmp = bus_peek(BUS_OBMEM, BW2_CR_PADDR, 1); 260 if ((tmp != -1) && (tmp & 0x80) == 0) 261 goto high_res; 262 break; 263 264 case ID_SUN3_260: 265 /* The Sun3/260 is ALWAYS high-resolution! */ 266 /* fall through */ 267 high_res: 268 fbt->fb_width = 1600; 269 fbt->fb_height = 1280; 270 fbt->fb_size = BW2_FBSIZE_HIRES; 271 break; 272 #endif /* SUN3 */ 273 274 default: 275 /* Leave the defaults set above. */ 276 break; 277 } 278 } 279 aprint_normal(" (%dx%d)\n", fbt->fb_width, fbt->fb_height); 280 281 /* Make sure video is on. */ 282 tmp = 1; 283 bw2svideo(fb, &tmp); 284 285 /* Let /dev/fb know we are here. */ 286 fb_attach(fb, 1); 287 } 288 289 int 290 bw2open(dev_t dev, int flags, int mode, struct lwp *l) 291 { 292 struct bw2_softc *sc; 293 int unit = minor(dev); 294 295 sc = device_lookup_private(&bwtwo_cd, unit); 296 if (sc == NULL) 297 return ENXIO; 298 return 0; 299 } 300 301 int 302 bw2ioctl(dev_t dev, u_long cmd, void *data, int flags, struct lwp *l) 303 { 304 struct bw2_softc *sc = device_lookup_private(&bwtwo_cd, minor(dev)); 305 306 return fbioctlfb(&sc->sc_fb, cmd, data); 307 } 308 309 /* 310 * Return the address that would map the given device at the given 311 * offset, allowing for the given protection, or return -1 for error. 312 */ 313 paddr_t 314 bw2mmap(dev_t dev, off_t off, int prot) 315 { 316 struct bw2_softc *sc = device_lookup_private(&bwtwo_cd, minor(dev)); 317 int size = sc->sc_fb.fb_fbtype.fb_size; 318 319 if (off & PGOFSET) 320 panic("%s: bad offset", __func__); 321 322 if ((off < 0) || (off >= size)) 323 return -1; 324 325 /* 326 * I turned on PMAP_NC here to disable the cache as I was 327 * getting horribly broken behaviour without it. 328 */ 329 return (sc->sc_phys + off) | PMAP_NC; 330 } 331 332 /* FBIOGVIDEO: */ 333 static int 334 bw2gvideo(struct fbdevice *fb, void *data) 335 { 336 struct bw2_softc *sc = fb->fb_private; 337 int *on = data; 338 339 *on = sc->sc_video_on; 340 return 0; 341 } 342 343 /* FBIOSVIDEO: */ 344 static int 345 bw2svideo(struct fbdevice *fb, void *data) 346 { 347 struct bw2_softc *sc = fb->fb_private; 348 int *on = data; 349 350 if (sc->sc_video_on == *on) 351 return 0; 352 sc->sc_video_on = *on; 353 354 if (fb->fb_pfour) 355 fb_pfour_set_video(fb, sc->sc_video_on); 356 else 357 enable_video(sc->sc_video_on); 358 359 return 0; 360 } 361