1 /* $OpenBSD: bwtwo.c,v 1.10 2003/06/27 01:36:53 jason Exp $ */ 2 3 /* 4 * Copyright (c) 2002 Jason L. Wright (jason@thought.net) 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 18 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE 19 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, 20 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 21 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 22 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 24 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN 25 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 26 * POSSIBILITY OF SUCH DAMAGE. 27 * 28 * Effort sponsored in part by the Defense Advanced Research Projects 29 * Agency (DARPA) and Air Force Research Laboratory, Air Force 30 * Materiel Command, USAF, under agreement number F30602-01-2-0537. 31 * 32 */ 33 34 #include <sys/param.h> 35 #include <sys/systm.h> 36 #include <sys/kernel.h> 37 #include <sys/errno.h> 38 #include <sys/device.h> 39 #include <sys/ioctl.h> 40 #include <sys/malloc.h> 41 42 #include <machine/bus.h> 43 #include <machine/intr.h> 44 #include <machine/autoconf.h> 45 #include <machine/openfirm.h> 46 47 #include <dev/sbus/sbusvar.h> 48 #include <dev/wscons/wsconsio.h> 49 #include <dev/wscons/wsdisplayvar.h> 50 #include <dev/wscons/wscons_raster.h> 51 #include <dev/rasops/rasops.h> 52 #include <machine/fbvar.h> 53 54 #define BWTWO_CTRL_OFFSET 0x400000 55 #define BWTWO_CTRL_SIZE (sizeof(u_int32_t) * 8) 56 #define BWTWO_VID_OFFSET 0x800000 57 #define BWTWO_VID_SIZE (1024 * 1024) 58 59 #define FBC_CTRL 0x10 /* control */ 60 #define FBC_STAT 0x11 /* status */ 61 #define FBC_START 0x12 /* cursor start */ 62 #define FBC_END 0x13 /* cursor end */ 63 #define FBC_VCTRL 0x14 /* 12 bytes of timing goo */ 64 65 #define FBC_CTRL_IENAB 0x80 /* interrupt enable */ 66 #define FBC_CTRL_VENAB 0x40 /* video enable */ 67 #define FBC_CTRL_TIME 0x20 /* timing enable */ 68 #define FBC_CTRL_CURS 0x10 /* cursor compare enable */ 69 #define FBC_CTRL_XTAL 0x0c /* xtal select (0,1,2,test): */ 70 #define FBC_CTRL_XTAL_0 0x00 /* 0 */ 71 #define FBC_CTRL_XTAL_1 0x04 /* 0 */ 72 #define FBC_CTRL_XTAL_2 0x08 /* 0 */ 73 #define FBC_CTRL_XTAL_TEST 0x0c /* 0 */ 74 #define FBC_CTRL_DIV 0x03 /* divisor (1,2,3,4): */ 75 #define FBC_CTRL_DIV_1 0x00 /* / 1 */ 76 #define FBC_CTRL_DIV_2 0x01 /* / 2 */ 77 #define FBC_CTRL_DIV_3 0x02 /* / 3 */ 78 #define FBC_CTRL_DIV_4 0x03 /* / 4 */ 79 80 #define FBC_STAT_INTR 0x80 /* interrupt pending */ 81 #define FBC_STAT_RES 0x70 /* monitor sense: */ 82 #define FBC_STAT_RES_1024 0x10 /* 1024x768 */ 83 #define FBC_STAT_RES_1280 0x40 /* 1280x1024 */ 84 #define FBC_STAT_RES_1152 0x30 /* 1152x900 */ 85 #define FBC_STAT_RES_1152A 0x40 /* 1152x900x76, A */ 86 #define FBC_STAT_RES_1600 0x50 /* 1600x1200 */ 87 #define FBC_STAT_RES_1152B 0x60 /* 1152x900x86, B */ 88 #define FBC_STAT_ID 0x0f /* id mask: */ 89 #define FBC_STAT_ID_COLOR 0x01 /* color */ 90 #define FBC_STAT_ID_MONO 0x02 /* monochrome */ 91 #define FBC_STAT_ID_MONOECL 0x03 /* monochrome, ecl */ 92 93 #define FBC_READ(sc, reg) \ 94 bus_space_read_1((sc)->sc_bustag, (sc)->sc_ctrl_regs, (reg)) 95 #define FBC_WRITE(sc, reg, val) \ 96 bus_space_write_1((sc)->sc_bustag, (sc)->sc_ctrl_regs, (reg), (val)) 97 98 struct bwtwo_softc { 99 struct sunfb sc_sunfb; 100 struct sbusdev sc_sd; 101 bus_space_tag_t sc_bustag; 102 bus_addr_t sc_paddr; 103 bus_space_handle_t sc_ctrl_regs; 104 bus_space_handle_t sc_vid_regs; 105 int sc_nscreens; 106 }; 107 108 struct wsscreen_descr bwtwo_stdscreen = { 109 "std", 110 }; 111 112 const struct wsscreen_descr *bwtwo_scrlist[] = { 113 &bwtwo_stdscreen, 114 /* XXX other formats? */ 115 }; 116 117 struct wsscreen_list bwtwo_screenlist = { 118 sizeof(bwtwo_scrlist) / sizeof(struct wsscreen_descr *), bwtwo_scrlist 119 }; 120 121 int bwtwo_ioctl(void *, u_long, caddr_t, int, struct proc *); 122 int bwtwo_alloc_screen(void *, const struct wsscreen_descr *, void **, 123 int *, int *, long *); 124 void bwtwo_free_screen(void *, void *); 125 int bwtwo_show_screen(void *, void *, int, void (*cb)(void *, int, int), 126 void *); 127 paddr_t bwtwo_mmap(void *, off_t, int); 128 int bwtwo_is_console(int); 129 void bwtwo_burner(void *, u_int, u_int); 130 void bwtwo_updatecursor(struct rasops_info *); 131 132 struct wsdisplay_accessops bwtwo_accessops = { 133 bwtwo_ioctl, 134 bwtwo_mmap, 135 bwtwo_alloc_screen, 136 bwtwo_free_screen, 137 bwtwo_show_screen, 138 NULL, /* load_font */ 139 NULL, /* scrollback */ 140 NULL, /* getchar */ 141 bwtwo_burner, 142 }; 143 144 int bwtwomatch(struct device *, void *, void *); 145 void bwtwoattach(struct device *, struct device *, void *); 146 147 struct cfattach bwtwo_ca = { 148 sizeof (struct bwtwo_softc), bwtwomatch, bwtwoattach 149 }; 150 151 struct cfdriver bwtwo_cd = { 152 NULL, "bwtwo", DV_DULL 153 }; 154 155 int 156 bwtwomatch(parent, vcf, aux) 157 struct device *parent; 158 void *vcf, *aux; 159 { 160 struct cfdata *cf = vcf; 161 struct sbus_attach_args *sa = aux; 162 163 return (strcmp(cf->cf_driver->cd_name, sa->sa_name) == 0); 164 } 165 166 void 167 bwtwoattach(parent, self, aux) 168 struct device *parent, *self; 169 void *aux; 170 { 171 struct bwtwo_softc *sc = (struct bwtwo_softc *)self; 172 struct sbus_attach_args *sa = aux; 173 struct wsemuldisplaydev_attach_args waa; 174 int console; 175 176 sc->sc_bustag = sa->sa_bustag; 177 sc->sc_paddr = sbus_bus_addr(sa->sa_bustag, sa->sa_slot, sa->sa_offset); 178 179 fb_setsize(&sc->sc_sunfb, 1, 1152, 900, sa->sa_node, 0); 180 181 if (sa->sa_nreg != 1) { 182 printf(": expected %d registers, got %d\n", 1, sa->sa_nreg); 183 goto fail; 184 } 185 186 /* 187 * Map just CTRL and video RAM. 188 */ 189 if (sbus_bus_map(sa->sa_bustag, sa->sa_reg[0].sbr_slot, 190 sa->sa_reg[0].sbr_offset + BWTWO_CTRL_OFFSET, 191 BWTWO_CTRL_SIZE, 0, 0, &sc->sc_ctrl_regs) != 0) { 192 printf(": cannot map ctrl registers\n"); 193 goto fail_ctrl; 194 } 195 196 if (sbus_bus_map(sa->sa_bustag, sa->sa_reg[0].sbr_slot, 197 sa->sa_reg[0].sbr_offset + BWTWO_VID_OFFSET, 198 sc->sc_sunfb.sf_fbsize, BUS_SPACE_MAP_LINEAR, 199 0, &sc->sc_vid_regs) != 0) { 200 printf(": cannot map vid registers\n"); 201 goto fail_vid; 202 } 203 204 console = bwtwo_is_console(sa->sa_node); 205 206 sbus_establish(&sc->sc_sd, &sc->sc_sunfb.sf_dev); 207 208 bwtwo_burner(sc, 1, 0); 209 210 printf("\n"); 211 212 sc->sc_sunfb.sf_ro.ri_bits = (void *)bus_space_vaddr(sc->sc_bustag, 213 sc->sc_vid_regs); 214 sc->sc_sunfb.sf_ro.ri_hw = sc; 215 fbwscons_init(&sc->sc_sunfb, console ? 0 : RI_CLEAR); 216 217 bwtwo_stdscreen.capabilities = sc->sc_sunfb.sf_ro.ri_caps; 218 bwtwo_stdscreen.nrows = sc->sc_sunfb.sf_ro.ri_rows; 219 bwtwo_stdscreen.ncols = sc->sc_sunfb.sf_ro.ri_cols; 220 bwtwo_stdscreen.textops = &sc->sc_sunfb.sf_ro.ri_ops; 221 222 if (console) { 223 sc->sc_sunfb.sf_ro.ri_updatecursor = bwtwo_updatecursor; 224 fbwscons_console_init(&sc->sc_sunfb, &bwtwo_stdscreen, -1, 225 bwtwo_burner); 226 } 227 228 waa.console = console; 229 waa.scrdata = &bwtwo_screenlist; 230 waa.accessops = &bwtwo_accessops; 231 waa.accesscookie = sc; 232 config_found(self, &waa, wsemuldisplaydevprint); 233 234 return; 235 236 fail_vid: 237 bus_space_unmap(sa->sa_bustag, sc->sc_ctrl_regs, BWTWO_CTRL_SIZE); 238 fail_ctrl: 239 fail: 240 ; 241 } 242 243 int 244 bwtwo_ioctl(v, cmd, data, flags, p) 245 void *v; 246 u_long cmd; 247 caddr_t data; 248 int flags; 249 struct proc *p; 250 { 251 struct bwtwo_softc *sc = v; 252 struct wsdisplay_fbinfo *wdf; 253 254 switch (cmd) { 255 case WSDISPLAYIO_GTYPE: 256 *(u_int *)data = WSDISPLAY_TYPE_SUNBW; 257 break; 258 case WSDISPLAYIO_GINFO: 259 wdf = (void *)data; 260 wdf->height = sc->sc_sunfb.sf_height; 261 wdf->width = sc->sc_sunfb.sf_width; 262 wdf->depth = sc->sc_sunfb.sf_depth; 263 wdf->cmsize = 0; 264 break; 265 case WSDISPLAYIO_LINEBYTES: 266 *(u_int *)data = sc->sc_sunfb.sf_linebytes; 267 break; 268 269 case WSDISPLAYIO_GETCMAP: 270 case WSDISPLAYIO_PUTCMAP: 271 break; 272 273 case WSDISPLAYIO_SVIDEO: 274 case WSDISPLAYIO_GVIDEO: 275 case WSDISPLAYIO_GCURPOS: 276 case WSDISPLAYIO_SCURPOS: 277 case WSDISPLAYIO_GCURMAX: 278 case WSDISPLAYIO_GCURSOR: 279 case WSDISPLAYIO_SCURSOR: 280 default: 281 return -1; /* not supported yet */ 282 } 283 284 return (0); 285 } 286 287 int 288 bwtwo_alloc_screen(v, type, cookiep, curxp, curyp, attrp) 289 void *v; 290 const struct wsscreen_descr *type; 291 void **cookiep; 292 int *curxp, *curyp; 293 long *attrp; 294 { 295 struct bwtwo_softc *sc = v; 296 297 if (sc->sc_nscreens > 0) 298 return (ENOMEM); 299 300 *cookiep = &sc->sc_sunfb.sf_ro; 301 *curyp = 0; 302 *curxp = 0; 303 sc->sc_sunfb.sf_ro.ri_ops.alloc_attr(&sc->sc_sunfb.sf_ro, 304 0, 0, 0, attrp); 305 sc->sc_nscreens++; 306 return (0); 307 } 308 309 void 310 bwtwo_free_screen(v, cookie) 311 void *v; 312 void *cookie; 313 { 314 struct bwtwo_softc *sc = v; 315 316 sc->sc_nscreens--; 317 } 318 319 int 320 bwtwo_show_screen(v, cookie, waitok, cb, cbarg) 321 void *v; 322 void *cookie; 323 int waitok; 324 void (*cb)(void *, int, int); 325 void *cbarg; 326 { 327 return (0); 328 } 329 330 #define START (128 * 1024 + 128 * 1024) 331 #define NOOVERLAY (0x04000000) 332 333 paddr_t 334 bwtwo_mmap(v, offset, prot) 335 void *v; 336 off_t offset; 337 int prot; 338 { 339 struct bwtwo_softc *sc = v; 340 341 if (offset & PGOFSET) 342 return (-1); 343 344 if (offset >= 0 && offset < sc->sc_sunfb.sf_fbsize) 345 return (bus_space_mmap(sc->sc_bustag, sc->sc_paddr, 346 BWTWO_VID_OFFSET + offset, prot, BUS_SPACE_MAP_LINEAR)); 347 348 return (-1); 349 } 350 351 int 352 bwtwo_is_console(node) 353 int node; 354 { 355 extern int fbnode; 356 357 return (fbnode == node); 358 } 359 360 void 361 bwtwo_burner(vsc, on, flags) 362 void *vsc; 363 u_int on, flags; 364 { 365 struct bwtwo_softc *sc = vsc; 366 int s; 367 u_int8_t fbc; 368 369 s = splhigh(); 370 fbc = FBC_READ(sc, FBC_CTRL); 371 if (on) 372 fbc |= FBC_CTRL_VENAB | FBC_CTRL_TIME; 373 else { 374 fbc &= ~FBC_CTRL_VENAB; 375 if (flags & WSDISPLAY_BURN_VBLANK) 376 fbc &= ~FBC_CTRL_TIME; 377 } 378 FBC_WRITE(sc, FBC_CTRL, fbc); 379 splx(s); 380 } 381 382 void 383 bwtwo_updatecursor(ri) 384 struct rasops_info *ri; 385 { 386 struct bwtwo_softc *sc = ri->ri_hw; 387 388 if (sc->sc_sunfb.sf_crowp != NULL) 389 *sc->sc_sunfb.sf_crowp = ri->ri_crow; 390 if (sc->sc_sunfb.sf_ccolp != NULL) 391 *sc->sc_sunfb.sf_ccolp = ri->ri_ccol; 392 } 393