cg2.c revision 1.10 1 /* $NetBSD: cg2.c,v 1.10 1998/01/12 20:32:18 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. All advertising materials mentioning features or use of this software
25 * must display the following acknowledgement:
26 * This product includes software developed by the University of
27 * California, Berkeley and its contributors.
28 * 4. Neither the name of the University nor the names of its contributors
29 * may be used to endorse or promote products derived from this software
30 * without specific prior written permission.
31 *
32 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
33 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
34 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
35 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
36 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
37 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
38 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
39 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
40 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
41 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
42 * SUCH DAMAGE.
43 *
44 * from: @(#)cgthree.c 8.2 (Berkeley) 10/30/93
45 */
46
47 /*
48 * color display (cg2) driver.
49 *
50 * Does not handle interrupts, even though they can occur.
51 *
52 * XXX should defer colormap updates to vertical retrace interrupts
53 */
54
55 #include <sys/param.h>
56 #include <sys/systm.h>
57 #include <sys/conf.h>
58 #include <sys/device.h>
59 #include <sys/ioctl.h>
60 #include <sys/malloc.h>
61 #include <sys/mman.h>
62 #include <sys/proc.h>
63 #include <sys/tty.h>
64
65 #include <vm/vm.h>
66
67 #include <machine/fbio.h>
68 #include <machine/autoconf.h>
69 #include <machine/pmap.h>
70 #include <machine/cg2reg.h>
71
72 #include "fbvar.h"
73
74 cdev_decl(cg2);
75
76 #define CMSIZE 256
77
78 /* offset to and size of mapped part of frame buffer */
79 #define PLANEMAP_SIZE 0x100000
80 #define PIXELMAP_SIZE 0x100000
81 #define ROWOPMAP_SIZE 0x100000
82
83 #define CTLREGS_OFF 0x300000
84 #define CTLREGS_SIZE 0x10600
85
86 #define CG2_MAPPED_OFFSET (PLANEMAP_SIZE + PIXELMAP_SIZE)
87 #define CG2_MAPPED_SIZE (CTLREGS_OFF + CTLREGS_SIZE)
88
89 /* per-display variables */
90 struct cg2_softc {
91 struct device sc_dev; /* base device */
92 struct fbdevice sc_fb; /* frame buffer device */
93 int sc_phys; /* display RAM (phys addr) */
94 int sc_pmtype; /* pmap type bits */
95 struct cg2fb *sc_ctlreg; /* control registers */
96 };
97
98 /* autoconfiguration driver */
99 static void cg2attach __P((struct device *, struct device *, void *));
100 static int cg2match __P((struct device *, struct cfdata *, void *));
101
102 struct cfattach cgtwo_ca = {
103 sizeof(struct cg2_softc), cg2match, cg2attach
104 };
105
106 static int cg2gattr __P((struct fbdevice *, void *));
107 static int cg2gvideo __P((struct fbdevice *, void *));
108 static int cg2svideo __P((struct fbdevice *, void *));
109 static int cg2getcmap __P((struct fbdevice *, void *));
110 static int cg2putcmap __P((struct fbdevice *, void *));
111
112 static struct fbdriver cg2fbdriver = {
113 cg2open, cg2close, cg2mmap, cg2gattr,
114 cg2gvideo, cg2svideo,
115 cg2getcmap, cg2putcmap };
116
117 static int cg2intr __P((void*));
118
119 /*
120 * Match a cg2.
121 */
122 static int
123 cg2match(parent, cf, aux)
124 struct device *parent;
125 struct cfdata *cf;
126 void *aux;
127 {
128 struct confargs *ca = aux;
129 int probe_addr;
130
131 /* No default VME address. */
132 if (ca->ca_paddr == -1)
133 return (0);
134
135 /* Make sure something is there... */
136 probe_addr = ca->ca_paddr + CTLREGS_OFF;
137 if (bus_peek(ca->ca_bustype, probe_addr, 1) == -1)
138 return (0);
139
140 /* XXX: look at the ID reg? */
141 /* printf("cg2: id=0x%x\n", x); */
142
143 /* Default interrupt priority. */
144 if (ca->ca_intpri == -1)
145 ca->ca_intpri = 4;
146
147 return (1);
148 }
149
150 /*
151 * Attach a display. We need to notice if it is the console, too.
152 */
153 static void
154 cg2attach(parent, self, args)
155 struct device *parent, *self;
156 void *args;
157 {
158 struct cg2_softc *sc = (struct cg2_softc *)self;
159 struct fbdevice *fb = &sc->sc_fb;
160 struct confargs *ca = args;
161 struct fbtype *fbt;
162
163 sc->sc_phys = ca->ca_paddr;
164 sc->sc_pmtype = PMAP_NC | PMAP_VME16;
165
166 sc->sc_ctlreg = (struct cg2fb *) bus_mapin(ca->ca_bustype,
167 ca->ca_paddr + CTLREGS_OFF, CTLREGS_SIZE);
168
169 isr_add_vectored(cg2intr, (void*)sc,
170 ca->ca_intpri, ca->ca_intvec);
171
172 /*
173 * XXX - Initialize? Determine type?
174 */
175 sc->sc_ctlreg->intrptvec.reg = ca->ca_intvec;
176 sc->sc_ctlreg->status.word = 1;
177
178 fb->fb_driver = &cg2fbdriver;
179 fb->fb_private = sc;
180 fb->fb_name = sc->sc_dev.dv_xname;
181
182 fbt = &fb->fb_fbtype;
183 fbt->fb_type = FBTYPE_SUN2COLOR;
184 fbt->fb_depth = 8;
185 fbt->fb_cmsize = CMSIZE;
186
187 fbt->fb_width = 1152;
188 fbt->fb_height = 900;
189 fbt->fb_size = CG2_MAPPED_SIZE;
190
191 printf(" (%dx%d)\n", fbt->fb_width, fbt->fb_height);
192 fb_attach(fb, 2);
193 }
194
195 int
196 cg2open(dev, flags, mode, p)
197 dev_t dev;
198 int flags, mode;
199 struct proc *p;
200 {
201 int unit = minor(dev);
202
203 if (unit >= cgtwo_cd.cd_ndevs || cgtwo_cd.cd_devs[unit] == NULL)
204 return (ENXIO);
205 return (0);
206 }
207
208 int
209 cg2close(dev, flags, mode, p)
210 dev_t dev;
211 int flags, mode;
212 struct proc *p;
213 {
214
215 return (0);
216 }
217
218 int
219 cg2ioctl(dev, cmd, data, flags, p)
220 dev_t dev;
221 u_long cmd;
222 caddr_t data;
223 int flags;
224 struct proc *p;
225 {
226 struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
227
228 return (fbioctlfb(&sc->sc_fb, cmd, data));
229 }
230
231 /*
232 * Return the address that would map the given device at the given
233 * offset, allowing for the given protection, or return -1 for error.
234 */
235 int
236 cg2mmap(dev, off, prot)
237 dev_t dev;
238 int off, prot;
239 {
240 struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
241
242 if (off & PGOFSET)
243 panic("cg2mmap");
244
245 if ((unsigned)off >= CG2_MAPPED_SIZE)
246 return (-1);
247
248 /*
249 * I turned on PMAP_NC here to disable the cache as I was
250 * getting horribly broken behaviour with it on.
251 */
252 return ((sc->sc_phys + off) | sc->sc_pmtype);
253 }
254
255 /*
256 * Internal ioctl functions.
257 */
258
259 /* FBIOGATTR: */
260 static int cg2gattr(fb, data)
261 struct fbdevice *fb;
262 void *data;
263 {
264 struct fbgattr *fba = data;
265
266 fba->real_type = fb->fb_fbtype.fb_type;
267 fba->owner = 0; /* XXX - TIOCCONS stuff? */
268 fba->fbtype = fb->fb_fbtype;
269 fba->sattr.flags = 0;
270 fba->sattr.emu_type = fb->fb_fbtype.fb_type;
271 fba->sattr.dev_specific[0] = -1;
272 fba->emu_types[0] = fb->fb_fbtype.fb_type;
273 fba->emu_types[1] = -1;
274 return (0);
275 }
276
277 /* FBIOGVIDEO: */
278 static int cg2gvideo(fb, data)
279 struct fbdevice *fb;
280 void *data;
281 {
282 int *on = data;
283 struct cg2_softc *sc = fb->fb_private;
284
285 *on = sc->sc_ctlreg->status.reg.video_enab;
286 return (0);
287 }
288
289 /* FBIOSVIDEO: */
290 static int cg2svideo(fb, data)
291 struct fbdevice *fb;
292 void *data;
293 {
294 int *on = data;
295 struct cg2_softc *sc = fb->fb_private;
296
297 sc->sc_ctlreg->status.reg.video_enab = (*on) & 1;
298
299 return (0);
300 }
301
302 /* FBIOGETCMAP: */
303 static int cg2getcmap(fb, data)
304 struct fbdevice *fb;
305 void *data;
306 {
307 struct fbcmap *cmap = data;
308 struct cg2_softc *sc = fb->fb_private;
309 u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE];
310 int error, start, count, ecount;
311 register u_int i;
312 register u_short *p;
313
314 start = cmap->index;
315 count = cmap->count;
316 ecount = start + count;
317 if (start >= CMSIZE || ecount > CMSIZE)
318 return (EINVAL);
319
320 /* XXX - Wait for retrace? */
321
322 /* Copy hardware to local arrays. */
323 p = &sc->sc_ctlreg->redmap[start];
324 for (i = start; i < ecount; i++)
325 red[i] = *p++;
326 p = &sc->sc_ctlreg->greenmap[start];
327 for (i = start; i < ecount; i++)
328 green[i] = *p++;
329 p = &sc->sc_ctlreg->bluemap[start];
330 for (i = start; i < ecount; i++)
331 blue[i] = *p++;
332
333 /* Copy local arrays to user space. */
334 if ((error = copyout(red + start, cmap->red, count)) != 0)
335 return (error);
336 if ((error = copyout(green + start, cmap->green, count)) != 0)
337 return (error);
338 if ((error = copyout(blue + start, cmap->blue, count)) != 0)
339 return (error);
340
341 return (0);
342 }
343
344 /* FBIOPUTCMAP: */
345 static int cg2putcmap(fb, data)
346 struct fbdevice *fb;
347 void *data;
348 {
349 struct fbcmap *cmap = data;
350 struct cg2_softc *sc = fb->fb_private;
351 u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE];
352 int error, start, count, ecount;
353 register u_int i;
354 register u_short *p;
355
356 start = cmap->index;
357 count = cmap->count;
358 ecount = start + count;
359 if (start >= CMSIZE || ecount > CMSIZE)
360 return (EINVAL);
361
362 /* Copy from user space to local arrays. */
363 if ((error = copyin(cmap->red, red + start, count)) != 0)
364 return (error);
365 if ((error = copyin(cmap->green, green + start, count)) != 0)
366 return (error);
367 if ((error = copyin(cmap->blue, blue + start, count)) != 0)
368 return (error);
369
370 /* XXX - Wait for retrace? */
371
372 /* Copy from local arrays to hardware. */
373 p = &sc->sc_ctlreg->redmap[start];
374 for (i = start; i < ecount; i++)
375 *p++ = red[i];
376 p = &sc->sc_ctlreg->greenmap[start];
377 for (i = start; i < ecount; i++)
378 *p++ = green[i];
379 p = &sc->sc_ctlreg->bluemap[start];
380 for (i = start; i < ecount; i++)
381 *p++ = blue[i];
382
383 return (0);
384
385 }
386
387 static int
388 cg2intr(vsc)
389 void *vsc;
390 {
391 struct cg2_softc *sc = vsc;
392
393 /* XXX - Just disable interrupts for now. */
394 sc->sc_ctlreg->status.reg.inten = 0;
395
396 printf("cg2intr\n");
397 return (1);
398 }
399