1 /* $NetBSD: cg2.c,v 1.26 2005/12/11 12:19:20 christos 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 (cg2) 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: cg2.c,v 1.26 2005/12/11 12:19:20 christos Exp $"); 53 54 #include <sys/param.h> 55 #include <sys/systm.h> 56 #include <sys/conf.h> 57 #include <sys/device.h> 58 #include <sys/ioctl.h> 59 #include <sys/malloc.h> 60 #include <sys/mman.h> 61 #include <sys/proc.h> 62 #include <sys/tty.h> 63 64 #include <uvm/uvm_extern.h> 65 66 #include <dev/sun/fbio.h> 67 #include <machine/autoconf.h> 68 #include <machine/pmap.h> 69 #include <machine/cg2reg.h> 70 71 #include "fbvar.h" 72 73 #define CMSIZE 256 74 75 /* offset to and size of mapped part of frame buffer */ 76 #define PLANEMAP_SIZE 0x100000 77 #define PIXELMAP_SIZE 0x100000 78 #define ROWOPMAP_SIZE 0x100000 79 80 #define CTLREGS_OFF 0x300000 81 #define CTLREGS_SIZE 0x10600 82 83 #define CG2_MAPPED_OFFSET (PLANEMAP_SIZE + PIXELMAP_SIZE) 84 #define CG2_MAPPED_SIZE (CTLREGS_OFF + CTLREGS_SIZE) 85 86 /* per-display variables */ 87 struct cg2_softc { 88 struct device sc_dev; /* base device */ 89 struct fbdevice sc_fb; /* frame buffer device */ 90 int sc_phys; /* display RAM (phys addr) */ 91 int sc_pmtype; /* pmap type bits */ 92 struct cg2fb *sc_ctlreg; /* control registers */ 93 }; 94 95 /* autoconfiguration driver */ 96 static void cg2attach(struct device *, struct device *, void *); 97 static int cg2match(struct device *, struct cfdata *, void *); 98 99 CFATTACH_DECL(cgtwo, sizeof(struct cg2_softc), 100 cg2match, cg2attach, NULL, NULL); 101 102 extern struct cfdriver cgtwo_cd; 103 104 dev_type_open(cg2open); 105 dev_type_ioctl(cg2ioctl); 106 dev_type_mmap(cg2mmap); 107 108 const struct cdevsw cgtwo_cdevsw = { 109 cg2open, nullclose, noread, nowrite, cg2ioctl, 110 nostop, notty, nopoll, cg2mmap, nokqfilter, 111 }; 112 113 static int cg2gattr(struct fbdevice *, void *); 114 static int cg2gvideo(struct fbdevice *, void *); 115 static int cg2svideo(struct fbdevice *, void *); 116 static int cg2getcmap(struct fbdevice *, void *); 117 static int cg2putcmap(struct fbdevice *, void *); 118 119 static struct fbdriver cg2fbdriver = { 120 cg2open, nullclose, cg2mmap, nokqfilter, cg2gattr, 121 cg2gvideo, cg2svideo, 122 cg2getcmap, cg2putcmap }; 123 124 static int cg2intr(void *); 125 126 /* 127 * Match a cg2. 128 */ 129 static int 130 cg2match(struct device *parent, struct cfdata *cf, void *aux) 131 { 132 struct confargs *ca = aux; 133 int probe_addr; 134 135 /* No default VME address. */ 136 if (ca->ca_paddr == -1) 137 return (0); 138 139 /* Make sure something is there... */ 140 probe_addr = ca->ca_paddr + CTLREGS_OFF; 141 if (bus_peek(ca->ca_bustype, probe_addr, 1) == -1) 142 return (0); 143 144 /* XXX: look at the ID reg? */ 145 /* printf("cg2: id=0x%x\n", x); */ 146 147 /* Default interrupt priority. */ 148 if (ca->ca_intpri == -1) 149 ca->ca_intpri = 4; 150 151 return (1); 152 } 153 154 /* 155 * Attach a display. We need to notice if it is the console, too. 156 */ 157 static void 158 cg2attach(struct device *parent, struct device *self, void *args) 159 { 160 struct cg2_softc *sc = (struct cg2_softc *)self; 161 struct fbdevice *fb = &sc->sc_fb; 162 struct confargs *ca = args; 163 struct fbtype *fbt; 164 165 sc->sc_phys = ca->ca_paddr; 166 sc->sc_pmtype = PMAP_NC | PMAP_VME16; 167 168 sc->sc_ctlreg = (struct cg2fb *) bus_mapin(ca->ca_bustype, 169 ca->ca_paddr + CTLREGS_OFF, CTLREGS_SIZE); 170 171 isr_add_vectored(cg2intr, (void*)sc, 172 ca->ca_intpri, ca->ca_intvec); 173 174 /* 175 * XXX - Initialize? Determine type? 176 */ 177 sc->sc_ctlreg->intrptvec.reg = ca->ca_intvec; 178 sc->sc_ctlreg->status.word = 1; 179 180 fb->fb_driver = &cg2fbdriver; 181 fb->fb_private = sc; 182 fb->fb_name = sc->sc_dev.dv_xname; 183 184 fbt = &fb->fb_fbtype; 185 fbt->fb_type = FBTYPE_SUN2COLOR; 186 fbt->fb_depth = 8; 187 fbt->fb_cmsize = CMSIZE; 188 189 fbt->fb_width = 1152; 190 fbt->fb_height = 900; 191 fbt->fb_size = CG2_MAPPED_SIZE; 192 193 printf(" (%dx%d)\n", fbt->fb_width, fbt->fb_height); 194 fb_attach(fb, 2); 195 } 196 197 int 198 cg2open(dev_t dev, int flags, int mode, struct lwp *l) 199 { 200 int unit = minor(dev); 201 202 if (unit >= cgtwo_cd.cd_ndevs || cgtwo_cd.cd_devs[unit] == NULL) 203 return (ENXIO); 204 return (0); 205 } 206 207 int 208 cg2ioctl(dev_t dev, u_long cmd, caddr_t data, int flags, struct lwp *l) 209 { 210 struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)]; 211 212 return (fbioctlfb(&sc->sc_fb, cmd, data)); 213 } 214 215 /* 216 * Return the address that would map the given device at the given 217 * offset, allowing for the given protection, or return -1 for error. 218 */ 219 paddr_t 220 cg2mmap(dev_t dev, off_t off, int prot) 221 { 222 struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)]; 223 224 if (off & PGOFSET) 225 panic("cg2mmap"); 226 227 if (off >= CG2_MAPPED_SIZE) 228 return (-1); 229 230 /* 231 * I turned on PMAP_NC here to disable the cache as I was 232 * getting horribly broken behaviour with it on. 233 */ 234 return ((sc->sc_phys + off) | sc->sc_pmtype); 235 } 236 237 /* 238 * Internal ioctl functions. 239 */ 240 241 /* FBIOGATTR: */ 242 static int 243 cg2gattr(struct fbdevice *fb, void *data) 244 { 245 struct fbgattr *fba = data; 246 247 fba->real_type = fb->fb_fbtype.fb_type; 248 fba->owner = 0; /* XXX - TIOCCONS stuff? */ 249 fba->fbtype = fb->fb_fbtype; 250 fba->sattr.flags = 0; 251 fba->sattr.emu_type = fb->fb_fbtype.fb_type; 252 fba->sattr.dev_specific[0] = -1; 253 fba->emu_types[0] = fb->fb_fbtype.fb_type; 254 fba->emu_types[1] = -1; 255 return (0); 256 } 257 258 /* FBIOGVIDEO: */ 259 static int 260 cg2gvideo(struct fbdevice *fb, void *data) 261 { 262 int *on = data; 263 struct cg2_softc *sc = fb->fb_private; 264 265 *on = sc->sc_ctlreg->status.reg.video_enab; 266 return (0); 267 } 268 269 /* FBIOSVIDEO: */ 270 static int 271 cg2svideo(struct fbdevice *fb, void *data) 272 { 273 int *on = data; 274 struct cg2_softc *sc = fb->fb_private; 275 276 sc->sc_ctlreg->status.reg.video_enab = (*on) & 1; 277 278 return (0); 279 } 280 281 /* FBIOGETCMAP: */ 282 static int 283 cg2getcmap(struct fbdevice *fb, void *data) 284 { 285 struct fbcmap *cmap = data; 286 struct cg2_softc *sc = fb->fb_private; 287 u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE]; 288 int error, start, count, ecount; 289 u_int i; 290 u_short *p; 291 292 start = cmap->index; 293 count = cmap->count; 294 ecount = start + count; 295 if (start >= CMSIZE || count > CMSIZE - start) 296 return (EINVAL); 297 298 /* XXX - Wait for retrace? */ 299 300 /* Copy hardware to local arrays. */ 301 p = &sc->sc_ctlreg->redmap[start]; 302 for (i = start; i < ecount; i++) 303 red[i] = *p++; 304 p = &sc->sc_ctlreg->greenmap[start]; 305 for (i = start; i < ecount; i++) 306 green[i] = *p++; 307 p = &sc->sc_ctlreg->bluemap[start]; 308 for (i = start; i < ecount; i++) 309 blue[i] = *p++; 310 311 /* Copy local arrays to user space. */ 312 if ((error = copyout(red + start, cmap->red, count)) != 0) 313 return (error); 314 if ((error = copyout(green + start, cmap->green, count)) != 0) 315 return (error); 316 if ((error = copyout(blue + start, cmap->blue, count)) != 0) 317 return (error); 318 319 return (0); 320 } 321 322 /* FBIOPUTCMAP: */ 323 static int 324 cg2putcmap(struct fbdevice *fb, void *data) 325 { 326 struct fbcmap *cmap = data; 327 struct cg2_softc *sc = fb->fb_private; 328 u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE]; 329 int error; 330 u_int start, count, ecount; 331 u_int i; 332 u_short *p; 333 334 start = cmap->index; 335 count = cmap->count; 336 ecount = start + count; 337 if (start >= CMSIZE || count > CMSIZE - start) 338 return (EINVAL); 339 340 /* Copy from user space to local arrays. */ 341 if ((error = copyin(cmap->red, red + start, count)) != 0) 342 return (error); 343 if ((error = copyin(cmap->green, green + start, count)) != 0) 344 return (error); 345 if ((error = copyin(cmap->blue, blue + start, count)) != 0) 346 return (error); 347 348 /* XXX - Wait for retrace? */ 349 350 /* Copy from local arrays to hardware. */ 351 p = &sc->sc_ctlreg->redmap[start]; 352 for (i = start; i < ecount; i++) 353 *p++ = red[i]; 354 p = &sc->sc_ctlreg->greenmap[start]; 355 for (i = start; i < ecount; i++) 356 *p++ = green[i]; 357 p = &sc->sc_ctlreg->bluemap[start]; 358 for (i = start; i < ecount; i++) 359 *p++ = blue[i]; 360 361 return (0); 362 363 } 364 365 static int 366 cg2intr(void *vsc) 367 { 368 struct cg2_softc *sc = vsc; 369 370 /* XXX - Just disable interrupts for now. */ 371 sc->sc_ctlreg->status.reg.inten = 0; 372 373 printf("cg2intr\n"); 374 return (1); 375 } 376