cgtwo.c revision 1.51 1 /* $NetBSD: cgtwo.c,v 1.51 2005/12/11 12:19:05 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 (cgtwo) 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: cgtwo.c,v 1.51 2005/12/11 12:19:05 christos Exp $");
53
54 #include <sys/param.h>
55 #include <sys/systm.h>
56 #include <sys/buf.h>
57 #include <sys/device.h>
58 #include <sys/ioctl.h>
59 #include <sys/malloc.h>
60 #include <sys/mman.h>
61 #include <sys/tty.h>
62 #include <sys/conf.h>
63
64 #include <uvm/uvm_extern.h>
65
66 #include <machine/autoconf.h>
67
68 #include <dev/sun/fbio.h>
69 #include <dev/sun/fbvar.h>
70
71 #include <dev/vme/vmevar.h>
72
73 #include <machine/eeprom.h>
74 #include <machine/cgtworeg.h>
75
76
77 /* per-display variables */
78 struct cgtwo_softc {
79 struct device sc_dev; /* base device */
80 struct fbdevice sc_fb; /* frame buffer device */
81 vme_addr_t sc_paddr;
82 vme_chipset_tag_t sc_ct;
83 bus_space_tag_t sc_bt;
84 volatile struct cg2statusreg *sc_reg; /* CG2 control registers */
85 volatile u_short *sc_cmap;
86 #define sc_redmap(sc) ((sc)->sc_cmap)
87 #define sc_greenmap(sc) ((sc)->sc_cmap + CG2_CMSIZE)
88 #define sc_bluemap(sc) ((sc)->sc_cmap + 2 * CG2_CMSIZE)
89 };
90
91 /* autoconfiguration driver */
92 static int cgtwomatch(struct device *, struct cfdata *, void *);
93 static void cgtwoattach(struct device *, struct device *, void *);
94 static void cgtwounblank(struct device *);
95 int cgtwogetcmap(struct cgtwo_softc *, struct fbcmap *);
96 int cgtwoputcmap(struct cgtwo_softc *, struct fbcmap *);
97
98 CFATTACH_DECL(cgtwo, sizeof(struct cgtwo_softc),
99 cgtwomatch, cgtwoattach, NULL, NULL);
100
101 extern struct cfdriver cgtwo_cd;
102
103 dev_type_open(cgtwoopen);
104 dev_type_ioctl(cgtwoioctl);
105 dev_type_mmap(cgtwommap);
106
107 const struct cdevsw cgtwo_cdevsw = {
108 cgtwoopen, nullclose, noread, nowrite, cgtwoioctl,
109 nostop, notty, nopoll, cgtwommap, nokqfilter,
110 };
111
112 /* frame buffer generic driver */
113 static struct fbdriver cgtwofbdriver = {
114 cgtwounblank, cgtwoopen, nullclose, cgtwoioctl, nopoll, cgtwommap,
115 nokqfilter
116 };
117
118 /*
119 * Match a cgtwo.
120 */
121 static int
122 cgtwomatch(struct device *parent, struct cfdata *cf, void *aux)
123 {
124 struct vme_attach_args *va = aux;
125 vme_chipset_tag_t ct = va->va_vct;
126 vme_am_t mod;
127
128 /*
129 * Mask out invalid flags from the user.
130 */
131 cf->cf_flags &= FB_USERMASK;
132
133 mod = 0x3d; /* VME_AM_A24 | VME_AM_MBO | VME_AM_SUPER | VME_AM_DATA */
134 if (vme_probe(ct, va->r[0].offset + CG2_CTLREG_OFF, 2, mod, VME_D16,
135 0, 0)) {
136 return (0);
137 }
138
139 return (1);
140 }
141
142 /*
143 * Attach a display. We need to notice if it is the console, too.
144 */
145 static void
146 cgtwoattach(struct device *parent, struct device *self, void *aux)
147 {
148 struct vme_attach_args *va = aux;
149 vme_chipset_tag_t ct = va->va_vct;
150 bus_space_tag_t bt;
151 bus_space_handle_t bh;
152 vme_am_t mod;
153 vme_mapresc_t resc;
154 struct cgtwo_softc *sc = (struct cgtwo_softc *)self;
155 struct fbdevice *fb = &sc->sc_fb;
156 struct eeprom *eep = (struct eeprom *)eeprom_va;
157 int isconsole = 0;
158
159 sc->sc_ct = ct;
160 fb->fb_driver = &cgtwofbdriver;
161 fb->fb_device = &sc->sc_dev;
162 fb->fb_type.fb_type = FBTYPE_SUN2COLOR;
163 fb->fb_flags = sc->sc_dev.dv_cfdata->cf_flags;
164
165 fb->fb_type.fb_depth = 8;
166 fb_setsize_eeprom(fb, fb->fb_type.fb_depth, 1152, 900);
167
168 fb->fb_type.fb_cmsize = 256;
169 fb->fb_type.fb_size = roundup(CG2_MAPPED_SIZE, PAGE_SIZE);
170 printf(": cgtwo, %d x %d",
171 fb->fb_type.fb_width, fb->fb_type.fb_height);
172
173 /*
174 * When the ROM has mapped in a cgtwo display, the address
175 * maps only the video RAM, so in any case we have to map the
176 * registers ourselves. We only need the video RAM if we are
177 * going to print characters via rconsole.
178 */
179 sc->sc_paddr = va->r[0].offset;
180 mod = 0x3d; /* VME_AM_A24 | VME_AM_MBO | VME_AM_SUPER | VME_AM_DATA */
181
182 if (vme_space_map(ct, sc->sc_paddr + CG2_ROPMEM_OFF +
183 offsetof(struct cg2fb, status.reg),
184 sizeof(struct cg2statusreg), mod, VME_D16, 0,
185 &bt, &bh, &resc) != 0)
186 panic("cgtwo: vme_map status");
187 sc->sc_bt = bt;
188 sc->sc_reg = (volatile struct cg2statusreg *)bh; /* XXX */
189
190 if (vme_space_map(ct, sc->sc_paddr + CG2_ROPMEM_OFF +
191 offsetof(struct cg2fb, redmap[0]),
192 3 * CG2_CMSIZE, mod, VME_D16, 0,
193 &bt, &bh, &resc) != 0)
194 panic("cgtwo: vme_map cmap");
195 sc->sc_cmap = (volatile u_short *)bh; /* XXX */
196
197 /*
198 * Assume this is the console if there's no eeprom info
199 * to be found.
200 */
201 if (eep == NULL || eep->eeConsole == EE_CONS_COLOR)
202 isconsole = fb_is_console(0);
203 else
204 isconsole = 0;
205
206 if (isconsole) {
207 if (vme_space_map(ct, sc->sc_paddr + CG2_PIXMAP_OFF,
208 CG2_PIXMAP_SIZE, mod, VME_D16, 0,
209 &bt, &bh, &resc) != 0)
210 panic("cgtwo: vme_map pixels");
211
212 fb->fb_pixels = (caddr_t)bh; /* XXX */
213 printf(" (console)\n");
214 #ifdef RASTERCONSOLE
215 fbrcons_init(fb);
216 #endif
217 } else
218 printf("\n");
219
220 fb_attach(fb, isconsole);
221 }
222
223 int
224 cgtwoopen(dev_t dev, int flags, int mode, struct lwp *l)
225 {
226 int unit = minor(dev);
227
228 if (unit >= cgtwo_cd.cd_ndevs || cgtwo_cd.cd_devs[unit] == NULL)
229 return (ENXIO);
230 return (0);
231 }
232
233 int
234 cgtwoioctl(dev_t dev, u_long cmd, caddr_t data, int flags, struct lwp *l)
235 {
236 register struct cgtwo_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
237 register struct fbgattr *fba;
238
239 switch (cmd) {
240
241 case FBIOGTYPE:
242 *(struct fbtype *)data = sc->sc_fb.fb_type;
243 break;
244
245 case FBIOGATTR:
246 fba = (struct fbgattr *)data;
247 fba->real_type = sc->sc_fb.fb_type.fb_type;
248 fba->owner = 0; /* XXX ??? */
249 fba->fbtype = sc->sc_fb.fb_type;
250 fba->sattr.flags = 0;
251 fba->sattr.emu_type = sc->sc_fb.fb_type.fb_type;
252 fba->sattr.dev_specific[0] = -1;
253 fba->emu_types[0] = sc->sc_fb.fb_type.fb_type;
254 fba->emu_types[1] = -1;
255 break;
256
257 case FBIOGETCMAP:
258 return cgtwogetcmap(sc, (struct fbcmap *) data);
259
260 case FBIOPUTCMAP:
261 return cgtwoputcmap(sc, (struct fbcmap *) data);
262
263 case FBIOGVIDEO:
264 *(int *)data = sc->sc_reg->video_enab;
265 break;
266
267 case FBIOSVIDEO:
268 sc->sc_reg->video_enab = (*(int*)data) & 1;
269 break;
270
271 default:
272 return (ENOTTY);
273 }
274 return (0);
275 }
276
277 /*
278 * Undo the effect of an FBIOSVIDEO that turns the video off.
279 */
280 static void
281 cgtwounblank(struct device *dev)
282 {
283 struct cgtwo_softc *sc = (struct cgtwo_softc *)dev;
284 sc->sc_reg->video_enab = 1;
285 }
286
287 /*
288 */
289 int
290 cgtwogetcmap(struct cgtwo_softc *sc, struct fbcmap *cmap)
291 {
292 u_char red[CG2_CMSIZE], green[CG2_CMSIZE], blue[CG2_CMSIZE];
293 int error, start, count, ecount;
294 register u_int i;
295 register volatile u_short *p;
296
297 start = cmap->index;
298 count = cmap->count;
299 ecount = start + count;
300 if (start >= CG2_CMSIZE || count > CG2_CMSIZE - start)
301 return (EINVAL);
302
303 /* XXX - Wait for retrace? */
304
305 /* Copy hardware to local arrays. */
306 p = &sc_redmap(sc)[start];
307 for (i = start; i < ecount; i++)
308 red[i] = *p++;
309 p = &sc_greenmap(sc)[start];
310 for (i = start; i < ecount; i++)
311 green[i] = *p++;
312 p = &sc_bluemap(sc)[start];
313 for (i = start; i < ecount; i++)
314 blue[i] = *p++;
315
316 /* Copy local arrays to user space. */
317 if ((error = copyout(red + start, cmap->red, count)) != 0)
318 return (error);
319 if ((error = copyout(green + start, cmap->green, count)) != 0)
320 return (error);
321 if ((error = copyout(blue + start, cmap->blue, count)) != 0)
322 return (error);
323
324 return (0);
325 }
326
327 /*
328 */
329 int
330 cgtwoputcmap(struct cgtwo_softc *sc, struct fbcmap *cmap)
331 {
332 u_char red[CG2_CMSIZE], green[CG2_CMSIZE], blue[CG2_CMSIZE];
333 int error;
334 u_int start, count, ecount;
335 register u_int i;
336 register volatile u_short *p;
337
338 start = cmap->index;
339 count = cmap->count;
340 ecount = start + count;
341 if (start >= CG2_CMSIZE || count > CG2_CMSIZE - start)
342 return (EINVAL);
343
344 /* Copy from user space to local arrays. */
345 if ((error = copyin(cmap->red, red + start, count)) != 0)
346 return (error);
347 if ((error = copyin(cmap->green, green + start, count)) != 0)
348 return (error);
349 if ((error = copyin(cmap->blue, blue + start, count)) != 0)
350 return (error);
351
352 /* XXX - Wait for retrace? */
353
354 /* Copy from local arrays to hardware. */
355 p = &sc_redmap(sc)[start];
356 for (i = start; i < ecount; i++)
357 *p++ = red[i];
358 p = &sc_greenmap(sc)[start];
359 for (i = start; i < ecount; i++)
360 *p++ = green[i];
361 p = &sc_bluemap(sc)[start];
362 for (i = start; i < ecount; i++)
363 *p++ = blue[i];
364
365 return (0);
366 }
367
368 /*
369 * Return the address that would map the given device at the given
370 * offset, allowing for the given protection, or return -1 for error.
371 */
372 paddr_t
373 cgtwommap(dev_t dev, off_t off, int prot)
374 {
375 extern int sparc_vme_mmap_cookie(vme_addr_t, vme_am_t,
376 bus_space_handle_t *);
377
378 register struct cgtwo_softc *sc = cgtwo_cd.cd_devs[minor(dev)];
379 vme_am_t mod;
380 bus_space_handle_t bh;
381
382 if (off & PGOFSET)
383 panic("cgtwommap");
384
385 if (off >= sc->sc_fb.fb_type.fb_size)
386 return (-1);
387
388 /* Apparently, the pixels are in 32-bit data space */
389 mod = 0x3d; /* VME_AM_A24 | VME_AM_MBO | VME_AM_SUPER | VME_AM_DATA */
390
391 if (sparc_vme_mmap_cookie(sc->sc_paddr + off, mod, &bh) != 0)
392 panic("cgtwommap");
393
394 return ((paddr_t)bh);
395 }
396