xref: /netbsd-src/sys/arch/sparc/dev/cgtwo.c (revision ba65fde2d7fefa7d39838fa5fa855e62bd606b5e)
1 /*	$NetBSD: cgtwo.c,v 1.55 2011/07/18 00:05:35 mrg 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.55 2011/07/18 00:05:35 mrg 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	fbdevice sc_fb;		/* frame buffer device */
80 	vme_addr_t		sc_paddr;
81 	vme_chipset_tag_t	sc_ct;
82 	bus_space_tag_t		sc_bt;
83 	volatile struct cg2statusreg *sc_reg;	/* CG2 control registers */
84 	volatile u_short *sc_cmap;
85 #define sc_redmap(sc)	((sc)->sc_cmap)
86 #define sc_greenmap(sc)	((sc)->sc_cmap + CG2_CMSIZE)
87 #define sc_bluemap(sc)	((sc)->sc_cmap + 2 * CG2_CMSIZE)
88 };
89 
90 /* autoconfiguration driver */
91 static int	cgtwomatch(device_t, cfdata_t, void *);
92 static void	cgtwoattach(device_t, device_t, void *);
93 static void	cgtwounblank(device_t);
94 int		cgtwogetcmap(struct cgtwo_softc *, struct fbcmap *);
95 int		cgtwoputcmap(struct cgtwo_softc *, struct fbcmap *);
96 
97 CFATTACH_DECL_NEW(cgtwo, sizeof(struct cgtwo_softc),
98     cgtwomatch, cgtwoattach, NULL, NULL);
99 
100 extern struct cfdriver cgtwo_cd;
101 
102 dev_type_open(cgtwoopen);
103 dev_type_ioctl(cgtwoioctl);
104 dev_type_mmap(cgtwommap);
105 
106 const struct cdevsw cgtwo_cdevsw = {
107 	cgtwoopen, nullclose, noread, nowrite, cgtwoioctl,
108 	nostop, notty, nopoll, cgtwommap, nokqfilter,
109 };
110 
111 /* frame buffer generic driver */
112 static struct fbdriver cgtwofbdriver = {
113 	cgtwounblank, cgtwoopen, nullclose, cgtwoioctl, nopoll, cgtwommap,
114 	nokqfilter
115 };
116 
117 /*
118  * Match a cgtwo.
119  */
120 static int
121 cgtwomatch(device_t parent, cfdata_t cf, void *aux)
122 {
123 	struct vme_attach_args	*va = aux;
124 	vme_chipset_tag_t	ct = va->va_vct;
125 	vme_am_t		mod;
126 
127 	/*
128 	 * Mask out invalid flags from the user.
129 	 */
130 	cf->cf_flags &= FB_USERMASK;
131 
132 	mod = 0x3d; /* VME_AM_A24 | VME_AM_MBO | VME_AM_SUPER | VME_AM_DATA */
133 	if (vme_probe(ct, va->r[0].offset + CG2_CTLREG_OFF, 2, mod, VME_D16,
134 			  0, 0)) {
135 		return (0);
136 	}
137 
138 	return (1);
139 }
140 
141 /*
142  * Attach a display.  We need to notice if it is the console, too.
143  */
144 static void
145 cgtwoattach(device_t parent, device_t self, void *aux)
146 {
147 	struct vme_attach_args	*va = aux;
148 	vme_chipset_tag_t	ct = va->va_vct;
149 	bus_space_tag_t		bt;
150 	bus_space_handle_t	bh;
151 	vme_am_t		mod;
152 	vme_mapresc_t resc;
153 	struct cgtwo_softc *sc = device_private(self);
154 	struct fbdevice *fb = &sc->sc_fb;
155 	struct eeprom *eep = (struct eeprom *)eeprom_va;
156 	int isconsole = 0;
157 
158 	sc->sc_ct = ct;
159 	fb->fb_driver = &cgtwofbdriver;
160 	fb->fb_device = self;
161 	fb->fb_type.fb_type = FBTYPE_SUN2COLOR;
162 	fb->fb_flags = device_cfdata(self)->cf_flags;
163 
164 	fb->fb_type.fb_depth = 8;
165 	fb_setsize_eeprom(fb, fb->fb_type.fb_depth, 1152, 900);
166 
167 	fb->fb_type.fb_cmsize = 256;
168 	fb->fb_type.fb_size = roundup(CG2_MAPPED_SIZE, PAGE_SIZE);
169 	printf(": cgtwo, %d x %d",
170 	       fb->fb_type.fb_width, fb->fb_type.fb_height);
171 
172 	/*
173 	 * When the ROM has mapped in a cgtwo display, the address
174 	 * maps only the video RAM, so in any case we have to map the
175 	 * registers ourselves.  We only need the video RAM if we are
176 	 * going to print characters via rconsole.
177 	 */
178 	sc->sc_paddr = va->r[0].offset;
179 	mod = 0x3d; /* VME_AM_A24 | VME_AM_MBO | VME_AM_SUPER | VME_AM_DATA */
180 
181 	if (vme_space_map(ct, sc->sc_paddr + CG2_ROPMEM_OFF +
182 				offsetof(struct cg2fb, status.reg),
183 			sizeof(struct cg2statusreg), mod, VME_D16, 0,
184 			&bt, &bh, &resc) != 0)
185 		panic("cgtwo: vme_map status");
186 	sc->sc_bt = bt;
187 	sc->sc_reg = (volatile struct cg2statusreg *)bh; /* XXX */
188 
189 	if (vme_space_map(ct, sc->sc_paddr + CG2_ROPMEM_OFF +
190 				offsetof(struct cg2fb, redmap[0]),
191 			3 * CG2_CMSIZE, mod, VME_D16, 0,
192 			&bt, &bh, &resc) != 0)
193 		panic("cgtwo: vme_map cmap");
194 	sc->sc_cmap = (volatile u_short *)bh; /* XXX */
195 
196 	/*
197 	 * Assume this is the console if there's no eeprom info
198 	 * to be found.
199 	 */
200 	if (eep == NULL || eep->eeConsole == EE_CONS_COLOR)
201 		isconsole = fb_is_console(0);
202 	else
203 		isconsole = 0;
204 
205 	if (isconsole) {
206 		if (vme_space_map(ct, sc->sc_paddr + CG2_PIXMAP_OFF,
207 				CG2_PIXMAP_SIZE, mod, VME_D16, 0,
208 				  &bt, &bh, &resc) != 0)
209 			panic("cgtwo: vme_map pixels");
210 
211 		fb->fb_pixels = (void *)bh; /* XXX */
212 		printf(" (console)\n");
213 #ifdef RASTERCONSOLE
214 		fbrcons_init(fb);
215 #endif
216 	} else
217 		printf("\n");
218 
219 	fb_attach(fb, isconsole);
220 }
221 
222 int
223 cgtwoopen(dev_t dev, int flags, int mode, struct lwp *l)
224 {
225 	int unit = minor(dev);
226 
227 	if (device_lookup(&cgtwo_cd, unit) == NULL)
228 		return (ENXIO);
229 	return (0);
230 }
231 
232 int
233 cgtwoioctl(dev_t dev, u_long cmd, void *data, int flags, struct lwp *l)
234 {
235 	register struct cgtwo_softc *sc = device_lookup_private(&cgtwo_cd,
236 								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(device_t dev)
282 {
283 	struct cgtwo_softc *sc = device_private(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 = device_lookup_private(&cgtwo_cd,
379 								minor(dev));
380 	vme_am_t mod;
381 	bus_space_handle_t bh;
382 
383 	if (off & PGOFSET)
384 		panic("cgtwommap");
385 
386 	if (off >= sc->sc_fb.fb_type.fb_size)
387 		return (-1);
388 
389 	/* Apparently, the pixels are in 32-bit data space */
390 	mod = 0x3d; /* VME_AM_A24 | VME_AM_MBO | VME_AM_SUPER | VME_AM_DATA */
391 
392 	if (sparc_vme_mmap_cookie(sc->sc_paddr + off, mod, &bh) != 0)
393 		panic("cgtwommap");
394 
395 	return ((paddr_t)bh);
396 }
397