cg2.c revision 1.28 1 /* $NetBSD: cg2.c,v 1.28 2008/06/08 17:30:08 tsutsui 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.28 2008/06/08 17:30:08 tsutsui 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 = device_private(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 struct cg2_softc *sc;
201 int unit = minor(dev);
202
203 sc = device_lookup_private(&cgtwo_cd, unit);
204 if (sc == NULL)
205 return (ENXIO);
206 return (0);
207 }
208
209 int
210 cg2ioctl(dev_t dev, u_long cmd, void *data, int flags, struct lwp *l)
211 {
212 struct cg2_softc *sc = device_lookup_private(&cgtwo_cd, minor(dev));
213
214 return (fbioctlfb(&sc->sc_fb, cmd, data));
215 }
216
217 /*
218 * Return the address that would map the given device at the given
219 * offset, allowing for the given protection, or return -1 for error.
220 */
221 paddr_t
222 cg2mmap(dev_t dev, off_t off, int prot)
223 {
224 struct cg2_softc *sc = device_lookup_private(&cgtwo_cd, minor(dev));
225
226 if (off & PGOFSET)
227 panic("cg2mmap");
228
229 if (off >= CG2_MAPPED_SIZE)
230 return (-1);
231
232 /*
233 * I turned on PMAP_NC here to disable the cache as I was
234 * getting horribly broken behaviour with it on.
235 */
236 return ((sc->sc_phys + off) | sc->sc_pmtype);
237 }
238
239 /*
240 * Internal ioctl functions.
241 */
242
243 /* FBIOGATTR: */
244 static int
245 cg2gattr(struct fbdevice *fb, void *data)
246 {
247 struct fbgattr *fba = data;
248
249 fba->real_type = fb->fb_fbtype.fb_type;
250 fba->owner = 0; /* XXX - TIOCCONS stuff? */
251 fba->fbtype = fb->fb_fbtype;
252 fba->sattr.flags = 0;
253 fba->sattr.emu_type = fb->fb_fbtype.fb_type;
254 fba->sattr.dev_specific[0] = -1;
255 fba->emu_types[0] = fb->fb_fbtype.fb_type;
256 fba->emu_types[1] = -1;
257 return (0);
258 }
259
260 /* FBIOGVIDEO: */
261 static int
262 cg2gvideo(struct fbdevice *fb, void *data)
263 {
264 int *on = data;
265 struct cg2_softc *sc = fb->fb_private;
266
267 *on = sc->sc_ctlreg->status.reg.video_enab;
268 return (0);
269 }
270
271 /* FBIOSVIDEO: */
272 static int
273 cg2svideo(struct fbdevice *fb, void *data)
274 {
275 int *on = data;
276 struct cg2_softc *sc = fb->fb_private;
277
278 sc->sc_ctlreg->status.reg.video_enab = (*on) & 1;
279
280 return (0);
281 }
282
283 /* FBIOGETCMAP: */
284 static int
285 cg2getcmap(struct fbdevice *fb, void *data)
286 {
287 struct fbcmap *cmap = data;
288 struct cg2_softc *sc = fb->fb_private;
289 u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE];
290 int error, start, count, ecount;
291 u_int i;
292 u_short *p;
293
294 start = cmap->index;
295 count = cmap->count;
296 ecount = start + count;
297 if (start >= CMSIZE || count > CMSIZE - start)
298 return (EINVAL);
299
300 /* XXX - Wait for retrace? */
301
302 /* Copy hardware to local arrays. */
303 p = &sc->sc_ctlreg->redmap[start];
304 for (i = start; i < ecount; i++)
305 red[i] = *p++;
306 p = &sc->sc_ctlreg->greenmap[start];
307 for (i = start; i < ecount; i++)
308 green[i] = *p++;
309 p = &sc->sc_ctlreg->bluemap[start];
310 for (i = start; i < ecount; i++)
311 blue[i] = *p++;
312
313 /* Copy local arrays to user space. */
314 if ((error = copyout(red + start, cmap->red, count)) != 0)
315 return (error);
316 if ((error = copyout(green + start, cmap->green, count)) != 0)
317 return (error);
318 if ((error = copyout(blue + start, cmap->blue, count)) != 0)
319 return (error);
320
321 return (0);
322 }
323
324 /* FBIOPUTCMAP: */
325 static int
326 cg2putcmap(struct fbdevice *fb, void *data)
327 {
328 struct fbcmap *cmap = data;
329 struct cg2_softc *sc = fb->fb_private;
330 u_char red[CMSIZE], green[CMSIZE], blue[CMSIZE];
331 int error;
332 u_int start, count, ecount;
333 u_int i;
334 u_short *p;
335
336 start = cmap->index;
337 count = cmap->count;
338 ecount = start + count;
339 if (start >= CMSIZE || count > CMSIZE - start)
340 return (EINVAL);
341
342 /* Copy from user space to local arrays. */
343 if ((error = copyin(cmap->red, red + start, count)) != 0)
344 return (error);
345 if ((error = copyin(cmap->green, green + start, count)) != 0)
346 return (error);
347 if ((error = copyin(cmap->blue, blue + start, count)) != 0)
348 return (error);
349
350 /* XXX - Wait for retrace? */
351
352 /* Copy from local arrays to hardware. */
353 p = &sc->sc_ctlreg->redmap[start];
354 for (i = start; i < ecount; i++)
355 *p++ = red[i];
356 p = &sc->sc_ctlreg->greenmap[start];
357 for (i = start; i < ecount; i++)
358 *p++ = green[i];
359 p = &sc->sc_ctlreg->bluemap[start];
360 for (i = start; i < ecount; i++)
361 *p++ = blue[i];
362
363 return (0);
364
365 }
366
367 static int
368 cg2intr(void *vsc)
369 {
370 struct cg2_softc *sc = vsc;
371
372 /* XXX - Just disable interrupts for now. */
373 sc->sc_ctlreg->status.reg.inten = 0;
374
375 printf("cg2intr\n");
376 return (1);
377 }
378