lunafb.c revision 1.14 1 /* $NetBSD: lunafb.c,v 1.14 2006/04/12 19:38:23 jmmv Exp $ */
2
3 /*-
4 * Copyright (c) 2000 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Tohru Nishimura.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */
40
41 __KERNEL_RCSID(0, "$NetBSD: lunafb.c,v 1.14 2006/04/12 19:38:23 jmmv Exp $");
42
43 #include <sys/param.h>
44 #include <sys/systm.h>
45 #include <sys/conf.h>
46 #include <sys/device.h>
47 #include <sys/ioctl.h>
48 #include <sys/malloc.h>
49 #include <sys/mman.h>
50 #include <sys/proc.h>
51 #include <sys/tty.h>
52 #include <sys/errno.h>
53 #include <sys/buf.h>
54
55 #include <uvm/uvm_extern.h>
56
57 #include <dev/rcons/raster.h>
58 #include <dev/wscons/wsconsio.h>
59 #include <dev/wscons/wscons_raster.h>
60 #include <dev/wscons/wsdisplayvar.h>
61
62 #include <machine/cpu.h>
63 #include <machine/autoconf.h>
64
65 struct bt454 {
66 u_int8_t bt_addr; /* map address register */
67 u_int8_t bt_cmap; /* colormap data register */
68 };
69
70 struct bt458 {
71 u_int8_t bt_addr; /* map address register */
72 unsigned :24;
73 u_int8_t bt_cmap; /* colormap data register */
74 unsigned :24;
75 u_int8_t bt_ctrl; /* control register */
76 unsigned :24;
77 u_int8_t bt_omap; /* overlay (cursor) map register */
78 unsigned :24;
79 };
80
81 #define OMFB_RFCNT 0xB1000000 /* video h-origin/v-origin */
82 #define OMFB_PLANEMASK 0xB1040000 /* planemask register */
83 #define OMFB_FB_WADDR 0xB1080008 /* common plane */
84 #define OMFB_FB_RADDR 0xB10C0008 /* plane #0 */
85 #define OMFB_ROPFUNC 0xB12C0000 /* ROP function code */
86 #define OMFB_RAMDAC 0xC1100000 /* Bt454/Bt458 RAMDAC */
87 #define OMFB_SIZE (0xB1300000 - 0xB1080000 + PAGE_SIZE)
88
89 struct om_hwdevconfig {
90 int dc_wid; /* width of frame buffer */
91 int dc_ht; /* height of frame buffer */
92 int dc_depth; /* depth, bits per pixel */
93 int dc_rowbytes; /* bytes in a FB scan line */
94 int dc_cmsize; /* colormap size */
95 vaddr_t dc_videobase; /* base of flat frame buffer */
96 struct raster dc_raster; /* raster description */
97 struct rcons dc_rcons; /* raster blitter control info */
98 };
99
100 struct hwcmap {
101 #define CMAP_SIZE 256
102 u_int8_t r[CMAP_SIZE];
103 u_int8_t g[CMAP_SIZE];
104 u_int8_t b[CMAP_SIZE];
105 };
106
107 struct omfb_softc {
108 struct device sc_dev; /* base device */
109 struct om_hwdevconfig *sc_dc; /* device configuration */
110 struct hwcmap sc_cmap; /* software copy of colormap */
111 int nscreens;
112 };
113
114 static int omgetcmap __P((struct omfb_softc *, struct wsdisplay_cmap *));
115 static int omsetcmap __P((struct omfb_softc *, struct wsdisplay_cmap *));
116
117 static struct om_hwdevconfig omfb_console_dc;
118 static void omfb_getdevconfig __P((paddr_t, struct om_hwdevconfig *));
119
120 extern struct wsdisplay_emulops omfb_emulops;
121
122 static struct wsscreen_descr omfb_stdscreen = {
123 "std", 0, 0,
124 &omfb_emulops,
125 0, 0,
126 0
127 };
128
129 static const struct wsscreen_descr *_omfb_scrlist[] = {
130 &omfb_stdscreen,
131 };
132
133 static const struct wsscreen_list omfb_screenlist = {
134 sizeof(_omfb_scrlist) / sizeof(struct wsscreen_descr *), _omfb_scrlist
135 };
136
137 static int omfbioctl __P((void *, void *, u_long, caddr_t, int,
138 struct lwp *));
139 static paddr_t omfbmmap __P((void *, void *, off_t, int));
140 static int omfb_alloc_screen __P((void *, const struct wsscreen_descr *,
141 void **, int *, int *, long *));
142 static void omfb_free_screen __P((void *, void *));
143 static int omfb_show_screen __P((void *, void *, int,
144 void (*) (void *, int, int), void *));
145
146 static const struct wsdisplay_accessops omfb_accessops = {
147 omfbioctl,
148 omfbmmap,
149 omfb_alloc_screen,
150 omfb_free_screen,
151 omfb_show_screen,
152 0 /* load_font */
153 };
154
155 static int omfbmatch __P((struct device *, struct cfdata *, void *));
156 static void omfbattach __P((struct device *, struct device *, void *));
157
158 CFATTACH_DECL(fb, sizeof(struct omfb_softc),
159 omfbmatch, omfbattach, NULL, NULL);
160 extern struct cfdriver fb_cd;
161
162 extern int hwplanemask; /* hardware planemask; retrieved at boot */
163
164 static int omfb_console;
165 int omfb_cnattach __P((void));
166
167 static int
168 omfbmatch(parent, cf, aux)
169 struct device *parent;
170 struct cfdata *cf;
171 void *aux;
172 {
173 struct mainbus_attach_args *ma = aux;
174
175 if (strcmp(ma->ma_name, fb_cd.cd_name))
176 return (0);
177 #if 0 /* XXX badaddr() bombs if no framebuffer is installed */
178 if (badaddr((caddr_t)ma->ma_addr, 4))
179 return (0);
180 #else
181 if (hwplanemask == 0)
182 return (0);
183 #endif
184 return (1);
185 }
186
187 static void
188 omfbattach(parent, self, args)
189 struct device *parent, *self;
190 void *args;
191 {
192 struct omfb_softc *sc = (struct omfb_softc *)self;
193 struct wsemuldisplaydev_attach_args waa;
194
195 if (omfb_console) {
196 sc->sc_dc = &omfb_console_dc;
197 sc->nscreens = 1;
198 }
199 else {
200 sc->sc_dc = (struct om_hwdevconfig *)
201 malloc(sizeof(struct om_hwdevconfig), M_DEVBUF, M_WAITOK);
202 omfb_getdevconfig(OMFB_FB_WADDR, sc->sc_dc);
203 }
204 printf(": %d x %d, %dbpp\n", sc->sc_dc->dc_wid, sc->sc_dc->dc_ht,
205 sc->sc_dc->dc_depth);
206
207 #if 0 /* WHITE on BLACK */
208 cm = &sc->sc_cmap;
209 memset(cm, 255, sizeof(struct hwcmap));
210 cm->r[0] = cm->g[0] = cm->b[0] = 0;
211 #endif
212 waa.console = omfb_console;
213 waa.scrdata = &omfb_screenlist;
214 waa.accessops = &omfb_accessops;
215 waa.accesscookie = sc;
216
217 config_found(self, &waa, wsemuldisplaydevprint);
218 }
219
220 /* EXPORT */ int
221 omfb_cnattach()
222 {
223 struct om_hwdevconfig *dc = &omfb_console_dc;
224 long defattr;
225
226 omfb_getdevconfig(OMFB_FB_WADDR, dc);
227 (*omfb_emulops.allocattr)(&dc->dc_rcons, 0, 0, 0, &defattr);
228 wsdisplay_cnattach(&omfb_stdscreen, &dc->dc_rcons, 0, 0, defattr);
229 omfb_console = 1;
230 return (0);
231 }
232
233 static int
234 omfbioctl(v, vs, cmd, data, flag, l)
235 void *v;
236 void *vs;
237 u_long cmd;
238 caddr_t data;
239 int flag;
240 struct lwp *l;
241 {
242 struct omfb_softc *sc = v;
243 struct om_hwdevconfig *dc = sc->sc_dc;
244
245 switch (cmd) {
246 case WSDISPLAYIO_GTYPE:
247 *(u_int *)data = 0x19990927;
248 return (0);
249
250 case WSDISPLAYIO_GINFO:
251 #define wsd_fbip ((struct wsdisplay_fbinfo *)data)
252 wsd_fbip->height = dc->dc_ht;
253 wsd_fbip->width = dc->dc_wid;
254 wsd_fbip->depth = dc->dc_depth;
255 wsd_fbip->cmsize = dc->dc_cmsize;
256 #undef fbt
257 return (0);
258
259 case WSDISPLAYIO_GETCMAP:
260 return omgetcmap(sc, (struct wsdisplay_cmap *)data);
261
262 case WSDISPLAYIO_PUTCMAP:
263 return omsetcmap(sc, (struct wsdisplay_cmap *)data);
264
265 case WSDISPLAYIO_SVIDEO:
266 case WSDISPLAYIO_GVIDEO:
267 case WSDISPLAYIO_GCURPOS:
268 case WSDISPLAYIO_SCURPOS:
269 case WSDISPLAYIO_GCURMAX:
270 case WSDISPLAYIO_GCURSOR:
271 case WSDISPLAYIO_SCURSOR:
272 break;
273 }
274 return (EPASSTHROUGH);
275 }
276
277 /*
278 * Return the address that would map the given device at the given
279 * offset, allowing for the given protection, or return -1 for error.
280 */
281 static paddr_t
282 omfbmmap(v, vs, offset, prot)
283 void *v;
284 void *vs;
285 off_t offset;
286 int prot;
287 {
288 struct omfb_softc *sc = v;
289
290 if (offset >= OMFB_SIZE || offset < 0)
291 return (-1);
292 return m68k_btop(m68k_trunc_page(sc->sc_dc->dc_videobase) + offset);
293 }
294
295 static int
296 omgetcmap(sc, p)
297 struct omfb_softc *sc;
298 struct wsdisplay_cmap *p;
299 {
300 u_int index = p->index, count = p->count;
301 int cmsize, error;
302
303 cmsize = sc->sc_dc->dc_cmsize;
304 if (index >= cmsize || count > cmsize - index)
305 return (EINVAL);
306
307 error = copyout(&sc->sc_cmap.r[index], p->red, count);
308 if (error)
309 return error;
310 error = copyout(&sc->sc_cmap.g[index], p->green, count);
311 if (error)
312 return error;
313 error = copyout(&sc->sc_cmap.b[index], p->blue, count);
314 return error;
315 }
316
317 static int
318 omsetcmap(sc, p)
319 struct omfb_softc *sc;
320 struct wsdisplay_cmap *p;
321 {
322 struct hwcmap cmap;
323 u_int index = p->index, count = p->count;
324 int cmsize, i, error;
325
326 cmsize = sc->sc_dc->dc_cmsize;
327 if (index >= cmsize || (index + count) > cmsize)
328 return (EINVAL);
329
330 error = copyin(p->red, &cmap.r[index], count);
331 if (error)
332 return error;
333 error = copyin(p->green, &cmap.g[index], count);
334 if (error)
335 return error;
336 error = copyin(p->blue, &cmap.b[index], count);
337 if (error)
338 return error;
339
340 memcpy(&sc->sc_cmap.r[index], &cmap.r[index], count);
341 memcpy(&sc->sc_cmap.g[index], &cmap.g[index], count);
342 memcpy(&sc->sc_cmap.b[index], &cmap.b[index], count);
343 if (hwplanemask == 0x0f) {
344 struct bt454 *odac = (struct bt454 *)OMFB_RAMDAC;
345 odac->bt_addr = index;
346 for (i = index; i < count; i++) {
347 odac->bt_cmap = sc->sc_cmap.r[i];
348 odac->bt_cmap = sc->sc_cmap.g[i];
349 odac->bt_cmap = sc->sc_cmap.b[i];
350 }
351 }
352 else if (hwplanemask == 0xff) {
353 struct bt458 *ndac = (struct bt458 *)OMFB_RAMDAC;
354 ndac->bt_addr = index;
355 for (i = index; i < count; i++) {
356 ndac->bt_cmap = sc->sc_cmap.r[i];
357 ndac->bt_cmap = sc->sc_cmap.g[i];
358 ndac->bt_cmap = sc->sc_cmap.b[i];
359 }
360 }
361 return (0);
362 }
363
364 static void
365 omfb_getdevconfig(paddr, dc)
366 paddr_t paddr;
367 struct om_hwdevconfig *dc;
368 {
369 int bpp, i;
370 struct raster *rap;
371 struct rcons *rcp;
372 union {
373 struct { short h, v; } p;
374 u_int32_t u;
375 } rfcnt;
376
377 switch (hwplanemask) {
378 case 0xff:
379 bpp = 8; /* XXX check monochrome bit in DIPSW */
380 break;
381 default:
382 case 0x0f:
383 bpp = 4; /* XXX check monochrome bit in DIPSW */
384 break;
385 case 1:
386 bpp = 1;
387 break;
388 }
389 dc->dc_wid = 1280;
390 dc->dc_ht = 1024;
391 dc->dc_depth = bpp;
392 dc->dc_rowbytes = 2048 / 8;
393 dc->dc_cmsize = (bpp == 1) ? 0 : 1 << bpp;
394 dc->dc_videobase = paddr;
395
396 #if 0 /* WHITE on BLACK XXX experiment resulted in WHITE on SKYBLUE... */
397 if (hwplanemask == 0x0f) {
398 /* XXX Need Bt454 initialization */
399 struct bt454 *odac = (struct bt454 *)OMFB_RAMDAC;
400 odac->bt_addr = 0;
401 odac->bt_cmap = 0;
402 odac->bt_cmap = 0;
403 odac->bt_cmap = 0;
404 for (i = 1; i < 16; i++) {
405 odac->bt_cmap = 255;
406 odac->bt_cmap = 255;
407 odac->bt_cmap = 255;
408 }
409 }
410 else if (hwplanemask == 0xff) {
411 struct bt458 *ndac = (struct bt458 *)OMFB_RAMDAC;
412
413 ndac->bt_addr = 0x04;
414 ndac->bt_ctrl = 0xff; /* all planes will be read */
415 ndac->bt_ctrl = 0x00; /* all planes have non-blink */
416 ndac->bt_ctrl = 0x43; /* pallete enabled, ovly plane */
417 ndac->bt_ctrl = 0x00; /* no test mode */
418 ndac->bt_addr = 0;
419 ndac->bt_cmap = 0;
420 ndac->bt_cmap = 0;
421 ndac->bt_cmap = 0;
422 for (i = 1; i < 256; i++) {
423 ndac->bt_cmap = 255;
424 ndac->bt_cmap = 255;
425 ndac->bt_cmap = 255;
426 }
427 }
428 #endif
429
430 /* adjust h/v orgin on screen */
431 rfcnt.p.h = 7;
432 rfcnt.p.v = -27;
433 *(u_int32_t *)OMFB_RFCNT = rfcnt.u; /* single write of 0x007ffe6 */
434
435 /* clear the screen */
436 *(u_int32_t *)OMFB_PLANEMASK = 0xff;
437 ((u_int32_t *)OMFB_ROPFUNC)[5] = ~0; /* ROP copy */
438 for (i = 0; i < dc->dc_ht * dc->dc_rowbytes/sizeof(u_int32_t); i++)
439 *((u_int32_t *)dc->dc_videobase + i) = 0;
440 *(u_int32_t *)OMFB_PLANEMASK = 0x01;
441
442 /* initialize the raster */
443 rap = &dc->dc_raster;
444 rap->width = dc->dc_wid;
445 rap->height = dc->dc_ht;
446 rap->depth = dc->dc_depth;
447 rap->linelongs = dc->dc_rowbytes / sizeof(u_int32_t);
448 rap->pixels = (u_int32_t *)dc->dc_videobase;
449
450 /* initialize the raster console blitter */
451 rcp = &dc->dc_rcons;
452 rcp->rc_sp = rap;
453 rcp->rc_crow = rcp->rc_ccol = -1;
454 rcp->rc_crowp = &rcp->rc_crow;
455 rcp->rc_ccolp = &rcp->rc_ccol;
456 rcons_init(rcp, 34, 80);
457
458 omfb_stdscreen.nrows = dc->dc_rcons.rc_maxrow;
459 omfb_stdscreen.ncols = dc->dc_rcons.rc_maxcol;
460 }
461
462 static int
463 omfb_alloc_screen(v, type, cookiep, curxp, curyp, attrp)
464 void *v;
465 const struct wsscreen_descr *type;
466 void **cookiep;
467 int *curxp, *curyp;
468 long *attrp;
469 {
470 struct omfb_softc *sc = v;
471 long defattr;
472
473 if (sc->nscreens > 0)
474 return (ENOMEM);
475
476 *cookiep = &sc->sc_dc->dc_rcons; /* one and only for now */
477 *curxp = 0;
478 *curyp = 0;
479 (*omfb_emulops.allocattr)(&sc->sc_dc->dc_rcons, 0, 0, 0, &defattr);
480 *attrp = defattr;
481 sc->nscreens++;
482 return (0);
483 }
484
485 static void
486 omfb_free_screen(v, cookie)
487 void *v;
488 void *cookie;
489 {
490 struct omfb_softc *sc = v;
491
492 if (sc->sc_dc == &omfb_console_dc)
493 panic("omfb_free_screen: console");
494
495 sc->nscreens--;
496 }
497
498 static int
499 omfb_show_screen(v, cookie, waitok, cb, cbarg)
500 void *v;
501 void *cookie;
502 int waitok;
503 void (*cb) __P((void *, int, int));
504 void *cbarg;
505 {
506 return 0;
507 }
508