cg2.c revision 1.18 1 /* $NetBSD: cg2.c,v 1.18 2002/09/06 13:18:43 gehenna 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 <uvm/uvm_extern.h>
66
67 #include <dev/sun/fbio.h>
68 #include <machine/autoconf.h>
69 #include <machine/pmap.h>
70 #include <machine/cg2reg.h>
71
72 #include "fbvar.h"
73
74 #define CMSIZE 256
75
76 /* offset to and size of mapped part of frame buffer */
77 #define PLANEMAP_SIZE 0x100000
78 #define PIXELMAP_SIZE 0x100000
79 #define ROWOPMAP_SIZE 0x100000
80
81 #define CTLREGS_OFF 0x300000
82 #define CTLREGS_SIZE 0x10600
83
84 #define CG2_MAPPED_OFFSET (PLANEMAP_SIZE + PIXELMAP_SIZE)
85 #define CG2_MAPPED_SIZE (CTLREGS_OFF + CTLREGS_SIZE)
86
87 /* per-display variables */
88 struct cg2_softc {
89 struct device sc_dev; /* base device */
90 struct fbdevice sc_fb; /* frame buffer device */
91 int sc_phys; /* display RAM (phys addr) */
92 int sc_pmtype; /* pmap type bits */
93 struct cg2fb *sc_ctlreg; /* control registers */
94 };
95
96 /* autoconfiguration driver */
97 static void cg2attach __P((struct device *, struct device *, void *));
98 static int cg2match __P((struct device *, struct cfdata *, void *));
99
100 struct cfattach cgtwo_ca = {
101 sizeof(struct cg2_softc), cg2match, cg2attach
102 };
103
104 extern struct cfdriver cgtwo_cd;
105
106 dev_type_open(cg2open);
107 dev_type_ioctl(cg2ioctl);
108 dev_type_mmap(cg2mmap);
109
110 const struct cdevsw cgtwo_cdevsw = {
111 cg2open, nullclose, noread, nowrite, cg2ioctl,
112 nostop, notty, nopoll, cg2mmap,
113 };
114
115 static int cg2gattr __P((struct fbdevice *, void *));
116 static int cg2gvideo __P((struct fbdevice *, void *));
117 static int cg2svideo __P((struct fbdevice *, void *));
118 static int cg2getcmap __P((struct fbdevice *, void *));
119 static int cg2putcmap __P((struct fbdevice *, void *));
120
121 static struct fbdriver cg2fbdriver = {
122 cg2open, nullclose, cg2mmap, cg2gattr,
123 cg2gvideo, cg2svideo,
124 cg2getcmap, cg2putcmap };
125
126 static int cg2intr __P((void*));
127
128 /*
129 * Match a cg2.
130 */
131 static int
132 cg2match(parent, cf, aux)
133 struct device *parent;
134 struct cfdata *cf;
135 void *aux;
136 {
137 struct confargs *ca = aux;
138 int probe_addr;
139
140 /* No default VME address. */
141 if (ca->ca_paddr == -1)
142 return (0);
143
144 /* Make sure something is there... */
145 probe_addr = ca->ca_paddr + CTLREGS_OFF;
146 if (bus_peek(ca->ca_bustype, probe_addr, 1) == -1)
147 return (0);
148
149 /* XXX: look at the ID reg? */
150 /* printf("cg2: id=0x%x\n", x); */
151
152 /* Default interrupt priority. */
153 if (ca->ca_intpri == -1)
154 ca->ca_intpri = 4;
155
156 return (1);
157 }
158
159 /*
160 * Attach a display. We need to notice if it is the console, too.
161 */
162 static void
163 cg2attach(parent, self, args)
164 struct device *parent, *self;
165 void *args;
166 {
167 struct cg2_softc *sc = (struct cg2_softc *)self;
168 struct fbdevice *fb = &sc->sc_fb;
169 struct confargs *ca = args;
170 struct fbtype *fbt;
171
172 sc->sc_phys = ca->ca_paddr;
173 sc->sc_pmtype = PMAP_NC | PMAP_VME16;
174
175 sc->sc_ctlreg = (struct cg2fb *) bus_mapin(ca->ca_bustype,
176 ca->ca_paddr + CTLREGS_OFF, CTLREGS_SIZE);
177
178 isr_add_vectored(cg2intr, (void*)sc,
179 ca->ca_intpri, ca->ca_intvec);
180
181 /*
182 * XXX - Initialize? Determine type?
183 */
184 sc->sc_ctlreg->intrptvec.reg = ca->ca_intvec;
185 sc->sc_ctlreg->status.word = 1;
186
187 fb->fb_driver = &cg2fbdriver;
188 fb->fb_private = sc;
189 fb->fb_name = sc->sc_dev.dv_xname;
190
191 fbt = &fb->fb_fbtype;
192 fbt->fb_type = FBTYPE_SUN2COLOR;
193 fbt->fb_depth = 8;
194 fbt->fb_cmsize = CMSIZE;
195
196 fbt->fb_width = 1152;
197 fbt->fb_height = 900;
198 fbt->fb_size = CG2_MAPPED_SIZE;
199
200 printf(" (%dx%d)\n", fbt->fb_width, fbt->fb_height);
201 fb_attach(fb, 2);
202 }
203
204 int
205 cg2open(dev, flags, mode, p)
206 dev_t dev;
207 int flags, mode;
208 struct proc *p;
209 {
210 int unit = minor(dev);
211
212 if (unit >= cgtwo_cd.cd_ndevs || cgtwo_cd.cd_devs[unit] == NULL)
213 return (ENXIO);
214 return (0);
215 }
216
217 int
218 cg2ioctl(dev, cmd, data, flags, p)
219 dev_t dev;
220 u_long cmd;
221 caddr_t data;
222 int flags;
223 struct proc *p;
224 {
225 struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
226
227 return (fbioctlfb(&sc->sc_fb, cmd, data));
228 }
229
230 /*
231 * Return the address that would map the given device at the given
232 * offset, allowing for the given protection, or return -1 for error.
233 */
234 paddr_t
235 cg2mmap(dev, off, prot)
236 dev_t dev;
237 off_t off;
238 int prot;
239 {
240 struct cg2_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
241
242 if (off & PGOFSET)
243 panic("cg2mmap");
244
245 if (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 u_int i;
312 u_short *p;
313
314 start = cmap->index;
315 count = cmap->count;
316 ecount = start + count;
317 if (start >= CMSIZE || count > CMSIZE - start)
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;
353 u_int start, count, ecount;
354 u_int i;
355 u_short *p;
356
357 start = cmap->index;
358 count = cmap->count;
359 ecount = start + count;
360 if (start >= CMSIZE || count > CMSIZE - start)
361 return (EINVAL);
362
363 /* Copy from user space to local arrays. */
364 if ((error = copyin(cmap->red, red + start, count)) != 0)
365 return (error);
366 if ((error = copyin(cmap->green, green + start, count)) != 0)
367 return (error);
368 if ((error = copyin(cmap->blue, blue + start, count)) != 0)
369 return (error);
370
371 /* XXX - Wait for retrace? */
372
373 /* Copy from local arrays to hardware. */
374 p = &sc->sc_ctlreg->redmap[start];
375 for (i = start; i < ecount; i++)
376 *p++ = red[i];
377 p = &sc->sc_ctlreg->greenmap[start];
378 for (i = start; i < ecount; i++)
379 *p++ = green[i];
380 p = &sc->sc_ctlreg->bluemap[start];
381 for (i = start; i < ecount; i++)
382 *p++ = blue[i];
383
384 return (0);
385
386 }
387
388 static int
389 cg2intr(vsc)
390 void *vsc;
391 {
392 struct cg2_softc *sc = vsc;
393
394 /* XXX - Just disable interrupts for now. */
395 sc->sc_ctlreg->status.reg.inten = 0;
396
397 printf("cg2intr\n");
398 return (1);
399 }
400