cg2.c revision 1.26 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