1 /* $NetBSD: cgtwo.c,v 1.52 2006/03/29 04:16:47 thorpej 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 * from: @(#)cgthree.c 8.2 (Berkeley) 10/30/93 41 */ 42 43 /* 44 * color display (cgtwo) driver. 45 * 46 * Does not handle interrupts, even though they can occur. 47 * 48 * XXX should defer colormap updates to vertical retrace interrupts 49 */ 50 51 #include <sys/cdefs.h> 52 __KERNEL_RCSID(0, "$NetBSD: cgtwo.c,v 1.52 2006/03/29 04:16:47 thorpej Exp $"); 53 54 #include <sys/param.h> 55 #include <sys/systm.h> 56 #include <sys/buf.h> 57 #include <sys/device.h> 58 #include <sys/ioctl.h> 59 #include <sys/malloc.h> 60 #include <sys/mman.h> 61 #include <sys/tty.h> 62 #include <sys/conf.h> 63 64 #include <uvm/uvm_extern.h> 65 66 #include <machine/autoconf.h> 67 68 #include <dev/sun/fbio.h> 69 #include <dev/sun/fbvar.h> 70 71 #include <dev/vme/vmevar.h> 72 73 #include <machine/eeprom.h> 74 #include <machine/cgtworeg.h> 75 76 77 /* per-display variables */ 78 struct cgtwo_softc { 79 struct device sc_dev; /* base device */ 80 struct fbdevice sc_fb; /* frame buffer device */ 81 vme_addr_t sc_paddr; 82 vme_chipset_tag_t sc_ct; 83 bus_space_tag_t sc_bt; 84 volatile struct cg2statusreg *sc_reg; /* CG2 control registers */ 85 volatile u_short *sc_cmap; 86 #define sc_redmap(sc) ((sc)->sc_cmap) 87 #define sc_greenmap(sc) ((sc)->sc_cmap + CG2_CMSIZE) 88 #define sc_bluemap(sc) ((sc)->sc_cmap + 2 * CG2_CMSIZE) 89 }; 90 91 /* autoconfiguration driver */ 92 static int cgtwomatch(struct device *, struct cfdata *, void *); 93 static void cgtwoattach(struct device *, struct device *, void *); 94 static void cgtwounblank(struct device *); 95 int cgtwogetcmap(struct cgtwo_softc *, struct fbcmap *); 96 int cgtwoputcmap(struct cgtwo_softc *, struct fbcmap *); 97 98 CFATTACH_DECL(cgtwo, sizeof(struct cgtwo_softc), 99 cgtwomatch, cgtwoattach, NULL, NULL); 100 101 extern struct cfdriver cgtwo_cd; 102 103 dev_type_open(cgtwoopen); 104 dev_type_ioctl(cgtwoioctl); 105 dev_type_mmap(cgtwommap); 106 107 const struct cdevsw cgtwo_cdevsw = { 108 cgtwoopen, nullclose, noread, nowrite, cgtwoioctl, 109 nostop, notty, nopoll, cgtwommap, nokqfilter, 110 }; 111 112 /* frame buffer generic driver */ 113 static struct fbdriver cgtwofbdriver = { 114 cgtwounblank, cgtwoopen, nullclose, cgtwoioctl, nopoll, cgtwommap, 115 nokqfilter 116 }; 117 118 /* 119 * Match a cgtwo. 120 */ 121 static int 122 cgtwomatch(struct device *parent, struct cfdata *cf, void *aux) 123 { 124 struct vme_attach_args *va = aux; 125 vme_chipset_tag_t ct = va->va_vct; 126 vme_am_t mod; 127 128 /* 129 * Mask out invalid flags from the user. 130 */ 131 cf->cf_flags &= FB_USERMASK; 132 133 mod = 0x3d; /* VME_AM_A24 | VME_AM_MBO | VME_AM_SUPER | VME_AM_DATA */ 134 if (vme_probe(ct, va->r[0].offset + CG2_CTLREG_OFF, 2, mod, VME_D16, 135 0, 0)) { 136 return (0); 137 } 138 139 return (1); 140 } 141 142 /* 143 * Attach a display. We need to notice if it is the console, too. 144 */ 145 static void 146 cgtwoattach(struct device *parent, struct device *self, void *aux) 147 { 148 struct vme_attach_args *va = aux; 149 vme_chipset_tag_t ct = va->va_vct; 150 bus_space_tag_t bt; 151 bus_space_handle_t bh; 152 vme_am_t mod; 153 vme_mapresc_t resc; 154 struct cgtwo_softc *sc = (struct cgtwo_softc *)self; 155 struct fbdevice *fb = &sc->sc_fb; 156 struct eeprom *eep = (struct eeprom *)eeprom_va; 157 int isconsole = 0; 158 159 sc->sc_ct = ct; 160 fb->fb_driver = &cgtwofbdriver; 161 fb->fb_device = &sc->sc_dev; 162 fb->fb_type.fb_type = FBTYPE_SUN2COLOR; 163 fb->fb_flags = device_cfdata(&sc->sc_dev)->cf_flags; 164 165 fb->fb_type.fb_depth = 8; 166 fb_setsize_eeprom(fb, fb->fb_type.fb_depth, 1152, 900); 167 168 fb->fb_type.fb_cmsize = 256; 169 fb->fb_type.fb_size = roundup(CG2_MAPPED_SIZE, PAGE_SIZE); 170 printf(": cgtwo, %d x %d", 171 fb->fb_type.fb_width, fb->fb_type.fb_height); 172 173 /* 174 * When the ROM has mapped in a cgtwo display, the address 175 * maps only the video RAM, so in any case we have to map the 176 * registers ourselves. We only need the video RAM if we are 177 * going to print characters via rconsole. 178 */ 179 sc->sc_paddr = va->r[0].offset; 180 mod = 0x3d; /* VME_AM_A24 | VME_AM_MBO | VME_AM_SUPER | VME_AM_DATA */ 181 182 if (vme_space_map(ct, sc->sc_paddr + CG2_ROPMEM_OFF + 183 offsetof(struct cg2fb, status.reg), 184 sizeof(struct cg2statusreg), mod, VME_D16, 0, 185 &bt, &bh, &resc) != 0) 186 panic("cgtwo: vme_map status"); 187 sc->sc_bt = bt; 188 sc->sc_reg = (volatile struct cg2statusreg *)bh; /* XXX */ 189 190 if (vme_space_map(ct, sc->sc_paddr + CG2_ROPMEM_OFF + 191 offsetof(struct cg2fb, redmap[0]), 192 3 * CG2_CMSIZE, mod, VME_D16, 0, 193 &bt, &bh, &resc) != 0) 194 panic("cgtwo: vme_map cmap"); 195 sc->sc_cmap = (volatile u_short *)bh; /* XXX */ 196 197 /* 198 * Assume this is the console if there's no eeprom info 199 * to be found. 200 */ 201 if (eep == NULL || eep->eeConsole == EE_CONS_COLOR) 202 isconsole = fb_is_console(0); 203 else 204 isconsole = 0; 205 206 if (isconsole) { 207 if (vme_space_map(ct, sc->sc_paddr + CG2_PIXMAP_OFF, 208 CG2_PIXMAP_SIZE, mod, VME_D16, 0, 209 &bt, &bh, &resc) != 0) 210 panic("cgtwo: vme_map pixels"); 211 212 fb->fb_pixels = (caddr_t)bh; /* XXX */ 213 printf(" (console)\n"); 214 #ifdef RASTERCONSOLE 215 fbrcons_init(fb); 216 #endif 217 } else 218 printf("\n"); 219 220 fb_attach(fb, isconsole); 221 } 222 223 int 224 cgtwoopen(dev_t dev, int flags, int mode, struct lwp *l) 225 { 226 int unit = minor(dev); 227 228 if (unit >= cgtwo_cd.cd_ndevs || cgtwo_cd.cd_devs[unit] == NULL) 229 return (ENXIO); 230 return (0); 231 } 232 233 int 234 cgtwoioctl(dev_t dev, u_long cmd, caddr_t data, int flags, struct lwp *l) 235 { 236 register struct cgtwo_softc *sc = cgtwo_cd.cd_devs[minor(dev)]; 237 register struct fbgattr *fba; 238 239 switch (cmd) { 240 241 case FBIOGTYPE: 242 *(struct fbtype *)data = sc->sc_fb.fb_type; 243 break; 244 245 case FBIOGATTR: 246 fba = (struct fbgattr *)data; 247 fba->real_type = sc->sc_fb.fb_type.fb_type; 248 fba->owner = 0; /* XXX ??? */ 249 fba->fbtype = sc->sc_fb.fb_type; 250 fba->sattr.flags = 0; 251 fba->sattr.emu_type = sc->sc_fb.fb_type.fb_type; 252 fba->sattr.dev_specific[0] = -1; 253 fba->emu_types[0] = sc->sc_fb.fb_type.fb_type; 254 fba->emu_types[1] = -1; 255 break; 256 257 case FBIOGETCMAP: 258 return cgtwogetcmap(sc, (struct fbcmap *) data); 259 260 case FBIOPUTCMAP: 261 return cgtwoputcmap(sc, (struct fbcmap *) data); 262 263 case FBIOGVIDEO: 264 *(int *)data = sc->sc_reg->video_enab; 265 break; 266 267 case FBIOSVIDEO: 268 sc->sc_reg->video_enab = (*(int*)data) & 1; 269 break; 270 271 default: 272 return (ENOTTY); 273 } 274 return (0); 275 } 276 277 /* 278 * Undo the effect of an FBIOSVIDEO that turns the video off. 279 */ 280 static void 281 cgtwounblank(struct device *dev) 282 { 283 struct cgtwo_softc *sc = (struct cgtwo_softc *)dev; 284 sc->sc_reg->video_enab = 1; 285 } 286 287 /* 288 */ 289 int 290 cgtwogetcmap(struct cgtwo_softc *sc, struct fbcmap *cmap) 291 { 292 u_char red[CG2_CMSIZE], green[CG2_CMSIZE], blue[CG2_CMSIZE]; 293 int error, start, count, ecount; 294 register u_int i; 295 register volatile u_short *p; 296 297 start = cmap->index; 298 count = cmap->count; 299 ecount = start + count; 300 if (start >= CG2_CMSIZE || count > CG2_CMSIZE - start) 301 return (EINVAL); 302 303 /* XXX - Wait for retrace? */ 304 305 /* Copy hardware to local arrays. */ 306 p = &sc_redmap(sc)[start]; 307 for (i = start; i < ecount; i++) 308 red[i] = *p++; 309 p = &sc_greenmap(sc)[start]; 310 for (i = start; i < ecount; i++) 311 green[i] = *p++; 312 p = &sc_bluemap(sc)[start]; 313 for (i = start; i < ecount; i++) 314 blue[i] = *p++; 315 316 /* Copy local arrays to user space. */ 317 if ((error = copyout(red + start, cmap->red, count)) != 0) 318 return (error); 319 if ((error = copyout(green + start, cmap->green, count)) != 0) 320 return (error); 321 if ((error = copyout(blue + start, cmap->blue, count)) != 0) 322 return (error); 323 324 return (0); 325 } 326 327 /* 328 */ 329 int 330 cgtwoputcmap(struct cgtwo_softc *sc, struct fbcmap *cmap) 331 { 332 u_char red[CG2_CMSIZE], green[CG2_CMSIZE], blue[CG2_CMSIZE]; 333 int error; 334 u_int start, count, ecount; 335 register u_int i; 336 register volatile u_short *p; 337 338 start = cmap->index; 339 count = cmap->count; 340 ecount = start + count; 341 if (start >= CG2_CMSIZE || count > CG2_CMSIZE - start) 342 return (EINVAL); 343 344 /* Copy from user space to local arrays. */ 345 if ((error = copyin(cmap->red, red + start, count)) != 0) 346 return (error); 347 if ((error = copyin(cmap->green, green + start, count)) != 0) 348 return (error); 349 if ((error = copyin(cmap->blue, blue + start, count)) != 0) 350 return (error); 351 352 /* XXX - Wait for retrace? */ 353 354 /* Copy from local arrays to hardware. */ 355 p = &sc_redmap(sc)[start]; 356 for (i = start; i < ecount; i++) 357 *p++ = red[i]; 358 p = &sc_greenmap(sc)[start]; 359 for (i = start; i < ecount; i++) 360 *p++ = green[i]; 361 p = &sc_bluemap(sc)[start]; 362 for (i = start; i < ecount; i++) 363 *p++ = blue[i]; 364 365 return (0); 366 } 367 368 /* 369 * Return the address that would map the given device at the given 370 * offset, allowing for the given protection, or return -1 for error. 371 */ 372 paddr_t 373 cgtwommap(dev_t dev, off_t off, int prot) 374 { 375 extern int sparc_vme_mmap_cookie(vme_addr_t, vme_am_t, 376 bus_space_handle_t *); 377 378 register struct cgtwo_softc *sc = cgtwo_cd.cd_devs[minor(dev)]; 379 vme_am_t mod; 380 bus_space_handle_t bh; 381 382 if (off & PGOFSET) 383 panic("cgtwommap"); 384 385 if (off >= sc->sc_fb.fb_type.fb_size) 386 return (-1); 387 388 /* Apparently, the pixels are in 32-bit data space */ 389 mod = 0x3d; /* VME_AM_A24 | VME_AM_MBO | VME_AM_SUPER | VME_AM_DATA */ 390 391 if (sparc_vme_mmap_cookie(sc->sc_paddr + off, mod, &bh) != 0) 392 panic("cgtwommap"); 393 394 return ((paddr_t)bh); 395 } 396