xref: /netbsd-src/sys/arch/hpcmips/tx/tx3912video.c (revision 3cec974c61d7fac0a37c0377723a33214a458c8b)
1 /*	$NetBSD: tx3912video.c,v 1.22 2001/02/22 18:38:04 uch Exp $ */
2 
3 /*-
4  * Copyright (c) 1999, 2000 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by UCHIYAMA Yasushi.
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 #define TX3912VIDEO_DEBUG
40 
41 #include "opt_tx39_debug.h"
42 #include "hpcfb.h"
43 
44 #include <sys/param.h>
45 #include <sys/systm.h>
46 #include <sys/device.h>
47 #include <sys/extent.h>
48 
49 #include <sys/ioctl.h>
50 #include <sys/buf.h>
51 
52 #include <uvm/uvm_extern.h>
53 
54 #include <dev/cons.h> /* consdev */
55 
56 #include <machine/bus.h>
57 #include <machine/bootinfo.h>
58 #include <machine/config_hook.h>
59 
60 #include <hpcmips/tx/tx39var.h>
61 #include <hpcmips/tx/tx3912videovar.h>
62 #include <hpcmips/tx/tx3912videoreg.h>
63 
64 /* CLUT */
65 #include <dev/wscons/wsdisplayvar.h>
66 #include <dev/rasops/rasops.h>
67 #include <dev/hpc/video_subr.h>
68 
69 #include <dev/wscons/wsconsio.h>
70 #include <dev/hpc/hpcfbvar.h>
71 #include <dev/hpc/hpcfbio.h>
72 
73 #ifdef TX3912VIDEO_DEBUG
74 int	tx3912video_debug = 1;
75 #define	DPRINTF(arg) if (tx3912video_debug) printf arg;
76 #define	DPRINTFN(n, arg) if (tx3912video_debug > (n)) printf arg;
77 #else
78 #define	DPRINTF(arg)
79 #define DPRINTFN(n, arg)
80 #endif
81 
82 struct tx3912video_softc {
83 	struct device sc_dev;
84 	void *sc_powerhook;	/* power management hook */
85 	int sc_console;
86 	struct hpcfb_fbconf sc_fbconf;
87 	struct hpcfb_dspconf sc_dspconf;
88 	struct video_chip *sc_chip;
89 };
90 
91 /* TX3912 built-in video chip itself */
92 static struct video_chip tx3912video_chip;
93 
94 int	tx3912video_power(void *, int, long, void *);
95 void	tx3912video_framebuffer_init(struct video_chip *);
96 int	tx3912video_framebuffer_alloc(struct video_chip *, paddr_t, paddr_t *);
97 void	tx3912video_reset(struct video_chip *);
98 void	tx3912video_resolution_init(struct video_chip *);
99 int	tx3912video_match(struct device *, struct cfdata *, void *);
100 void	tx3912video_attach(struct device *, struct device *, void *);
101 int	tx3912video_print(void *, const char *);
102 
103 void	tx3912video_hpcfbinit(struct tx3912video_softc *);
104 int	tx3912video_ioctl(void *, u_long, caddr_t, int, struct proc *);
105 paddr_t	tx3912video_mmap(void *, off_t, int);
106 
107 void	tx3912video_clut_init(struct tx3912video_softc *);
108 void	tx3912video_clut_install(void *, struct rasops_info *);
109 void	tx3912video_clut_get(struct tx3912video_softc *, u_int32_t *, int, int);
110 
111 static int __get_color8(int);
112 static int __get_color4(int);
113 
114 struct cfattach tx3912video_ca = {
115 	sizeof(struct tx3912video_softc), tx3912video_match,
116 	tx3912video_attach
117 };
118 
119 struct hpcfb_accessops tx3912video_ha = {
120 	tx3912video_ioctl, tx3912video_mmap, 0, 0, 0, 0,
121 	tx3912video_clut_install
122 };
123 
124 int
125 tx3912video_match(struct device *parent, struct cfdata *cf, void *aux)
126 {
127 	return ATTACH_NORMAL;
128 }
129 
130 void
131 tx3912video_attach(struct device *parent, struct device *self, void *aux)
132 {
133 	struct tx3912video_softc *sc = (void *)self;
134 	struct video_chip *chip;
135 	const char *depth_print[] = {
136 		[TX3912_VIDEOCTRL1_BITSEL_MONOCHROME] = "monochrome",
137 		[TX3912_VIDEOCTRL1_BITSEL_2BITGREYSCALE] = "2bit greyscale",
138 		[TX3912_VIDEOCTRL1_BITSEL_4BITGREYSCALE] = "4bit greyscale",
139 		[TX3912_VIDEOCTRL1_BITSEL_8BITCOLOR] = "8bit color"
140 	};
141 	struct hpcfb_attach_args ha;
142 	tx_chipset_tag_t tc;
143 	txreg_t val;
144 	int console;
145 
146 	sc->sc_console = console = cn_tab ? 0 : 1;
147 	sc->sc_chip = chip = &tx3912video_chip;
148 
149 	/* print video module information */
150 	printf(": %s, frame buffer 0x%08x-0x%08x\n",
151 	       depth_print[(ffs(chip->vc_fbdepth) - 1) & 0x3],
152 	       (unsigned)chip->vc_fbpaddr,
153 	       (unsigned)(chip->vc_fbpaddr + chip->vc_fbsize));
154 
155 	/* don't inverse VDAT[3:0] signal */
156 	tc = chip->vc_v;
157 	val = tx_conf_read(tc, TX3912_VIDEOCTRL1_REG);
158 	val &= ~TX3912_VIDEOCTRL1_INVVID;
159 	tx_conf_write(tc, TX3912_VIDEOCTRL1_REG, val);
160 
161 	/* install default CLUT */
162 	tx3912video_clut_init(sc);
163 
164 	/* if serial console, power off video module */
165 	tx3912video_power(sc, 0, 0, (void *)
166 			  (console ? PWR_RESUME : PWR_SUSPEND));
167 
168 	/* Add a hard power hook to power saving */
169 	sc->sc_powerhook = config_hook(CONFIG_HOOK_PMEVENT,
170 				       CONFIG_HOOK_PMEVENT_HARDPOWER,
171 				       CONFIG_HOOK_SHARE,
172 				       tx3912video_power, sc);
173 	if (sc->sc_powerhook == 0)
174 		printf("WARNING unable to establish hard power hook");
175 
176 #ifdef TX3912VIDEO_DEBUG
177 	/* attach debug draw routine (debugging use) */
178 	video_attach_drawfunc(sc->sc_chip);
179 	tx_conf_register_video(tc, sc->sc_chip);
180 #endif
181 
182 	/* Attach frame buffer device */
183 	tx3912video_hpcfbinit(sc);
184 
185 	if (console && hpcfb_cnattach(&sc->sc_fbconf) != 0) {
186 		panic("tx3912video_attach: can't init fb console");
187 	}
188 
189 	ha.ha_console = console;
190 	ha.ha_accessops = &tx3912video_ha;
191 	ha.ha_accessctx = sc;
192 	ha.ha_curfbconf = 0;
193 	ha.ha_nfbconf = 1;
194 	ha.ha_fbconflist = &sc->sc_fbconf;
195 	ha.ha_curdspconf = 0;
196 	ha.ha_ndspconf = 1;
197 	ha.ha_dspconflist = &sc->sc_dspconf;
198 
199 	config_found(self, &ha, hpcfbprint);
200 }
201 
202 int
203 tx3912video_power(void *ctx, int type, long id, void *msg)
204 {
205 	struct tx3912video_softc *sc = ctx;
206 	struct video_chip *chip = sc->sc_chip;
207 	tx_chipset_tag_t tc = chip->vc_v;
208 	int why = (int)msg;
209 	txreg_t val;
210 
211 	switch (why) {
212 	case PWR_RESUME:
213 		if (!sc->sc_console)
214 			return 0; /* serial console */
215 
216 		DPRINTF(("%s: ON\n", sc->sc_dev.dv_xname));
217 		val = tx_conf_read(tc, TX3912_VIDEOCTRL1_REG);
218 		val |= (TX3912_VIDEOCTRL1_DISPON | TX3912_VIDEOCTRL1_ENVID);
219 		tx_conf_write(tc, TX3912_VIDEOCTRL1_REG, val);
220 		break;
221 	case PWR_SUSPEND:
222 		/* FALLTHROUGH */
223 	case PWR_STANDBY:
224 		DPRINTF(("%s: OFF\n", sc->sc_dev.dv_xname));
225 		val = tx_conf_read(tc, TX3912_VIDEOCTRL1_REG);
226 		val &= ~(TX3912_VIDEOCTRL1_DISPON | TX3912_VIDEOCTRL1_ENVID);
227 		tx_conf_write(tc, TX3912_VIDEOCTRL1_REG, val);
228 		break;
229 	}
230 
231 	return 0;
232 }
233 
234 void
235 tx3912video_hpcfbinit(sc)
236 	struct tx3912video_softc *sc;
237 {
238 	struct video_chip *chip = sc->sc_chip;
239 	struct hpcfb_fbconf *fb = &sc->sc_fbconf;
240 	vaddr_t fbvaddr = (vaddr_t)MIPS_PHYS_TO_KSEG1(chip->vc_fbpaddr);
241 
242 	memset(fb, 0, sizeof(struct hpcfb_fbconf));
243 
244 	fb->hf_conf_index	= 0;	/* configuration index		*/
245 	fb->hf_nconfs		= 1;   	/* how many configurations	*/
246 	strncpy(fb->hf_name, "TX3912 built-in video", HPCFB_MAXNAMELEN);
247 					/* frame buffer name		*/
248 	strncpy(fb->hf_conf_name, "LCD", HPCFB_MAXNAMELEN);
249 					/* configuration name		*/
250 	fb->hf_height		= chip->vc_fbheight;
251 	fb->hf_width		= chip->vc_fbwidth;
252 	fb->hf_baseaddr		= (u_long)fbvaddr;
253 	fb->hf_offset		= (u_long)fbvaddr -
254 					 mips_ptob(mips_btop(fbvaddr));
255 					/* frame buffer start offset   	*/
256 	fb->hf_bytes_per_line	= (chip->vc_fbwidth * chip->vc_fbdepth)
257 		/ NBBY;
258 	fb->hf_nplanes		= 1;
259 	fb->hf_bytes_per_plane	= chip->vc_fbheight * fb->hf_bytes_per_line;
260 
261 	fb->hf_access_flags |= HPCFB_ACCESS_BYTE;
262 	fb->hf_access_flags |= HPCFB_ACCESS_WORD;
263 	fb->hf_access_flags |= HPCFB_ACCESS_DWORD;
264 	if (video_reverse_color())
265 		fb->hf_access_flags |= HPCFB_ACCESS_REVERSE;
266 
267 
268 	switch (chip->vc_fbdepth) {
269 	default:
270 		panic("tx3912video_hpcfbinit: not supported color depth\n");
271 		/* NOTREACHED */
272 	case 2:
273 		fb->hf_class = HPCFB_CLASS_GRAYSCALE;
274 		fb->hf_access_flags |= HPCFB_ACCESS_STATIC;
275 		fb->hf_pack_width = 8;
276 		fb->hf_pixels_per_pack = 4;
277 		fb->hf_pixel_width = 2;
278 		fb->hf_class_data_length = sizeof(struct hf_gray_tag);
279 		/* reserved for future use */
280 		fb->hf_u.hf_gray.hf_flags = 0;
281 		break;
282 	case 8:
283 		fb->hf_class = HPCFB_CLASS_INDEXCOLOR;
284 		fb->hf_access_flags |= HPCFB_ACCESS_STATIC;
285 		fb->hf_pack_width = 8;
286 		fb->hf_pixels_per_pack = 1;
287 		fb->hf_pixel_width = 8;
288 		fb->hf_class_data_length = sizeof(struct hf_indexed_tag);
289 		/* reserved for future use */
290 		fb->hf_u.hf_indexed.hf_flags = 0;
291 		break;
292 	}
293 }
294 
295 int
296 tx3912video_init(paddr_t fb_start, paddr_t *fb_end)
297 {
298 	struct video_chip *chip = &tx3912video_chip;
299 	tx_chipset_tag_t tc;
300 	txreg_t reg;
301 	int fbdepth, reverse, error;
302 
303 	reverse = video_reverse_color();
304 	chip->vc_v = tc = tx_conf_get_tag();
305 
306 	reg = tx_conf_read(tc, TX3912_VIDEOCTRL1_REG);
307 	fbdepth = 1 << (TX3912_VIDEOCTRL1_BITSEL(reg));
308 
309 	switch (fbdepth) {
310 	case 2:
311 		bootinfo->fb_type = reverse ? BIFB_D2_M2L_3 : BIFB_D2_M2L_0;
312 		break;
313 	case 4:
314 		/* XXX should implement rasops4.c */
315 		fbdepth = 2;
316 		bootinfo->fb_type = reverse ? BIFB_D2_M2L_3 : BIFB_D2_M2L_0;
317 		reg = tx_conf_read(tc, TX3912_VIDEOCTRL1_REG);
318 		TX3912_VIDEOCTRL1_BITSEL_CLR(reg);
319 		reg = TX3912_VIDEOCTRL1_BITSEL_SET(
320 			reg, TX3912_VIDEOCTRL1_BITSEL_2BITGREYSCALE);
321 		tx_conf_write(tc, TX3912_VIDEOCTRL1_REG, reg);
322 		break;
323 	case 8:
324 		bootinfo->fb_type = reverse ? BIFB_D8_FF : BIFB_D8_00;
325 		break;
326 	}
327 
328 	chip->vc_fbdepth = fbdepth;
329 	chip->vc_fbwidth = bootinfo->fb_width;
330 	chip->vc_fbheight= bootinfo->fb_height;
331 
332 	/* Allocate framebuffer area */
333 	error = tx3912video_framebuffer_alloc(chip, fb_start, fb_end);
334 	if (error != 0)
335 		return (1);
336 
337 #if notyet
338 	tx3912video_resolution_init(chip);
339 #else
340 	/* Use Windows CE setting. */
341 #endif
342 	/* Set DMA transfer address to VID module */
343 	tx3912video_framebuffer_init(chip);
344 
345 	/* Syncronize framebuffer addr to frame signal */
346 	tx3912video_reset(chip);
347 
348 	bootinfo->fb_line_bytes = (chip->vc_fbwidth * fbdepth) / NBBY;
349 	bootinfo->fb_addr = (void *)MIPS_PHYS_TO_KSEG1(chip->vc_fbpaddr);
350 
351 	return (0);
352 }
353 
354  int
355 tx3912video_framebuffer_alloc(struct video_chip *chip, paddr_t fb_start,
356 			      paddr_t *fb_end /* buffer allocation hint */)
357 {
358 	struct extent_fixed ex_fixed[10];
359 	struct extent *ex;
360 	u_long addr, size;
361 	int error;
362 
363 	/* calcurate frame buffer size */
364 	size = (chip->vc_fbwidth * chip->vc_fbheight * chip->vc_fbdepth) /
365 		NBBY;
366 
367 	/* extent V-RAM region */
368 	ex = extent_create("Frame buffer address", fb_start, *fb_end,
369 			   0, (caddr_t)ex_fixed, sizeof ex_fixed,
370 			   EX_NOWAIT);
371 	if (ex == 0)
372 		return (1);
373 
374 	/* Allocate V-RAM area */
375 	error = extent_alloc_subregion(ex, fb_start, fb_start + size - 1,
376 				       size, TX3912_FRAMEBUFFER_ALIGNMENT,
377 				       TX3912_FRAMEBUFFER_BOUNDARY,
378 				       EX_FAST|EX_NOWAIT, &addr);
379 	extent_destroy(ex);
380 
381 	if (error != 0) {
382 		return (1);
383 	}
384 
385 	chip->vc_fbpaddr = addr;
386 	chip->vc_fbvaddr = MIPS_PHYS_TO_KSEG1(addr);
387 	chip->vc_fbsize = size;
388 
389 	*fb_end = addr + size;
390 
391 	return (0);
392 }
393 
394 void
395 tx3912video_framebuffer_init(struct video_chip *chip)
396 {
397 	u_int32_t fb_addr, fb_size, vaddr, bank, base;
398 	txreg_t reg;
399 	tx_chipset_tag_t tc = chip->vc_v;
400 
401 	fb_addr = chip->vc_fbpaddr;
402 	fb_size = chip->vc_fbsize;
403 
404 	/*  XXX currently I don't set DFVAL, so force DF signal toggled on
405          *  XXX each frame. */
406 	reg = tx_conf_read(tc, TX3912_VIDEOCTRL1_REG);
407 	reg &= ~TX3912_VIDEOCTRL1_DFMODE;
408 	tx_conf_write(tc, TX3912_VIDEOCTRL1_REG, reg);
409 
410 	/* Set DMA transfer start and end address */
411 
412 	bank = TX3912_VIDEOCTRL3_VIDBANK(fb_addr);
413 	base = TX3912_VIDEOCTRL3_VIDBASEHI(fb_addr);
414 	reg = TX3912_VIDEOCTRL3_VIDBANK_SET(0, bank);
415 	/* Upper address counter */
416 	reg = TX3912_VIDEOCTRL3_VIDBASEHI_SET(reg, base);
417 	tx_conf_write(tc, TX3912_VIDEOCTRL3_REG, reg);
418 
419 	/* Lower address counter  */
420 	base = TX3912_VIDEOCTRL4_VIDBASELO(fb_addr + fb_size);
421 	reg = TX3912_VIDEOCTRL4_VIDBASELO_SET(0, base);
422 
423 	/* Set DF-signal rate */
424 	reg = TX3912_VIDEOCTRL4_DFVAL_SET(reg, 0); /* XXX not yet*/
425 
426 	/* Set VIDDONE signal delay after FRAME signal */
427 	/* XXX not yet*/
428 	tx_conf_write(tc, TX3912_VIDEOCTRL4_REG, reg);
429 
430 	/* Clear frame buffer */
431 	vaddr = MIPS_PHYS_TO_KSEG1(fb_addr);
432 	memset((void*)vaddr, 0, fb_size);
433 }
434 
435 void
436 tx3912video_resolution_init(struct video_chip *chip)
437 {
438 	int h, v, split, bit8, horzval, lineval;
439 	tx_chipset_tag_t tc = chip->vc_v;
440 	txreg_t reg;
441 	u_int32_t val;
442 
443 	h = chip->vc_fbwidth;
444 	v = chip->vc_fbheight;
445 	reg = tx_conf_read(tc, TX3912_VIDEOCTRL1_REG);
446 	split = reg & TX3912_VIDEOCTRL1_DISPSPLIT;
447 	bit8  = (TX3912_VIDEOCTRL1_BITSEL(reg) ==
448 		 TX3912_VIDEOCTRL1_BITSEL_8BITCOLOR);
449 	val = TX3912_VIDEOCTRL1_BITSEL(reg);
450 
451 	if ((val == TX3912_VIDEOCTRL1_BITSEL_8BITCOLOR) &&
452 	    !split) {
453 		/* (LCD horizontal pixels / 8bit) * RGB - 1 */
454 		horzval = (h / 8) * 3 - 1;
455 	} else {
456 		horzval = h / 4 - 1;
457 	}
458 	lineval = (split ? v / 2 : v) - 1;
459 
460 	/* Video rate */
461 	/* XXX
462 	 *  probably This value should be determined from DFINT and LCDINT
463 	 */
464 	reg = TX3912_VIDEOCTRL2_VIDRATE_SET(0, horzval + 1);
465 	/* Horizontal size of LCD */
466 	reg = TX3912_VIDEOCTRL2_HORZVAL_SET(reg, horzval);
467 	/* # of lines for the LCD */
468 	reg = TX3912_VIDEOCTRL2_LINEVAL_SET(reg, lineval);
469 
470 	tx_conf_write(tc, TX3912_VIDEOCTRL2_REG, reg);
471 }
472 
473 void
474 tx3912video_reset(struct video_chip *chip)
475 {
476 	tx_chipset_tag_t tc = chip->vc_v;
477 	txreg_t reg;
478 
479 	reg = tx_conf_read(tc, TX3912_VIDEOCTRL1_REG);
480 
481 	/* Disable video logic at end of this frame */
482 	reg |= TX3912_VIDEOCTRL1_ENFREEZEFRAME;
483 	tx_conf_write(tc, TX3912_VIDEOCTRL1_REG, reg);
484 
485 	/* Wait for end of frame */
486 	delay(30 * 1000);
487 
488 	/* Make sure to disable video logic */
489 	reg &= ~TX3912_VIDEOCTRL1_ENVID;
490 	tx_conf_write(tc, TX3912_VIDEOCTRL1_REG, reg);
491 
492 	delay(1000);
493 
494 	/* Enable video logic again */
495 	reg &= ~TX3912_VIDEOCTRL1_ENFREEZEFRAME;
496 	reg |= TX3912_VIDEOCTRL1_ENVID;
497 	tx_conf_write(tc, TX3912_VIDEOCTRL1_REG, reg);
498 
499 	delay(1000);
500 }
501 
502 int
503 tx3912video_ioctl(void *v, u_long cmd, caddr_t data, int flag, struct proc *p)
504 {
505 	struct tx3912video_softc *sc = (struct tx3912video_softc *)v;
506 	struct hpcfb_fbconf *fbconf;
507 	struct hpcfb_dspconf *dspconf;
508 	struct wsdisplay_cmap *cmap;
509 	u_int8_t *r, *g, *b;
510 	u_int32_t *rgb;
511 	int idx, cnt, error;
512 
513 	switch (cmd) {
514 	case WSDISPLAYIO_GETCMAP:
515 		cmap = (struct wsdisplay_cmap*)data;
516 		cnt = cmap->count;
517 		idx = cmap->index;
518 
519 		if (sc->sc_fbconf.hf_class != HPCFB_CLASS_INDEXCOLOR ||
520 			sc->sc_fbconf.hf_pack_width != 8 ||
521 			!LEGAL_CLUT_INDEX(idx) ||
522 			!LEGAL_CLUT_INDEX(idx + cnt -1)) {
523 			return (EINVAL);
524 		}
525 
526 		if (!uvm_useracc(cmap->red, cnt, B_WRITE) ||
527 		    !uvm_useracc(cmap->green, cnt, B_WRITE) ||
528 		    !uvm_useracc(cmap->blue, cnt, B_WRITE)) {
529 			return (EFAULT);
530 		}
531 
532 		error = cmap_work_alloc(&r, &g, &b, &rgb, cnt);
533 		if (error != 0) {
534 			cmap_work_free(r, g, b, rgb);
535 			return  (ENOMEM);
536 		}
537 		tx3912video_clut_get(sc, rgb, idx, cnt);
538 		rgb24_decompose(rgb, r, g, b, cnt);
539 
540 		copyout(r, cmap->red, cnt);
541 		copyout(g, cmap->green,cnt);
542 		copyout(b, cmap->blue, cnt);
543 
544 		cmap_work_free(r, g, b, rgb);
545 
546 		return (0);
547 
548 	case WSDISPLAYIO_PUTCMAP:
549 		/*
550 		 * TX3912 can't change CLUT index. R:G:B = 3:3:2
551 		 */
552 		return (0);
553 
554 	case HPCFBIO_GCONF:
555 		fbconf = (struct hpcfb_fbconf *)data;
556 		if (fbconf->hf_conf_index != 0 &&
557 		    fbconf->hf_conf_index != HPCFB_CURRENT_CONFIG) {
558 			return (EINVAL);
559 		}
560 		*fbconf = sc->sc_fbconf;	/* structure assignment */
561 		return (0);
562 
563 	case HPCFBIO_SCONF:
564 		fbconf = (struct hpcfb_fbconf *)data;
565 		if (fbconf->hf_conf_index != 0 &&
566 		    fbconf->hf_conf_index != HPCFB_CURRENT_CONFIG) {
567 			return (EINVAL);
568 		}
569 		/*
570 		 * nothing to do because we have only one configration
571 		 */
572 		return (0);
573 
574 	case HPCFBIO_GDSPCONF:
575 		dspconf = (struct hpcfb_dspconf *)data;
576 		if ((dspconf->hd_unit_index != 0 &&
577 		     dspconf->hd_unit_index != HPCFB_CURRENT_UNIT) ||
578 		    (dspconf->hd_conf_index != 0 &&
579 		     dspconf->hd_conf_index != HPCFB_CURRENT_CONFIG)) {
580 			return (EINVAL);
581 		}
582 		*dspconf = sc->sc_dspconf;	/* structure assignment */
583 		return (0);
584 
585 	case HPCFBIO_SDSPCONF:
586 		dspconf = (struct hpcfb_dspconf *)data;
587 		if ((dspconf->hd_unit_index != 0 &&
588 		     dspconf->hd_unit_index != HPCFB_CURRENT_UNIT) ||
589 		    (dspconf->hd_conf_index != 0 &&
590 		     dspconf->hd_conf_index != HPCFB_CURRENT_CONFIG)) {
591 			return (EINVAL);
592 		}
593 		/*
594 		 * nothing to do
595 		 * because we have only one unit and one configration
596 		 */
597 		return (0);
598 
599 	case HPCFBIO_GOP:
600 	case HPCFBIO_SOP:
601 		/* XXX not implemented yet */
602 		return (EINVAL);
603 	}
604 
605 	return (ENOTTY);
606 }
607 
608 paddr_t
609 tx3912video_mmap(void *ctx, off_t offset, int prot)
610 {
611 	struct tx3912video_softc *sc = (struct tx3912video_softc *)ctx;
612 
613 	if (offset < 0 || (sc->sc_fbconf.hf_bytes_per_plane +
614 			   sc->sc_fbconf.hf_offset) <  offset) {
615 		return (-1);
616 	}
617 
618 	return (mips_btop(sc->sc_chip->vc_fbpaddr + offset));
619 }
620 
621 /*
622  * CLUT staff
623  */
624 static const struct {
625 	int mul, div;
626 } dither_list [] = {
627 	[TX3912_VIDEO_DITHER_DUTYCYCLE_1]	= { 1, 1 },
628 	[TX3912_VIDEO_DITHER_DUTYCYCLE_6_7]	= { 6, 7 },
629 	[TX3912_VIDEO_DITHER_DUTYCYCLE_4_5]	= { 4, 5 },
630 	[TX3912_VIDEO_DITHER_DUTYCYCLE_3_4]	= { 3, 4 },
631 	[TX3912_VIDEO_DITHER_DUTYCYCLE_5_7]	= { 5, 7 },
632 	[TX3912_VIDEO_DITHER_DUTYCYCLE_2_3]	= { 2, 3 },
633 	[TX3912_VIDEO_DITHER_DUTYCYCLE_3_5]	= { 3, 5 },
634 	[TX3912_VIDEO_DITHER_DUTYCYCLE_4_7]	= { 4, 7 },
635 	[TX3912_VIDEO_DITHER_DUTYCYCLE_2_4]	= { 2, 4 },
636 	[TX3912_VIDEO_DITHER_DUTYCYCLE_3_7]	= { 3, 7 },
637 	[TX3912_VIDEO_DITHER_DUTYCYCLE_2_5]	= { 2, 5 },
638 	[TX3912_VIDEO_DITHER_DUTYCYCLE_1_3]	= { 1, 3 },
639 	[TX3912_VIDEO_DITHER_DUTYCYCLE_2_7]	= { 2, 7 },
640 	[TX3912_VIDEO_DITHER_DUTYCYCLE_1_5]	= { 1, 5 },
641 	[TX3912_VIDEO_DITHER_DUTYCYCLE_1_7]	= { 1, 7 },
642 	[TX3912_VIDEO_DITHER_DUTYCYCLE_0]	= { 0, 1 }
643 }, *dlp;
644 
645 static const int dither_level8[8] = {
646 	TX3912_VIDEO_DITHER_DUTYCYCLE_0,
647 	TX3912_VIDEO_DITHER_DUTYCYCLE_2_7,
648 	TX3912_VIDEO_DITHER_DUTYCYCLE_2_5,
649 	TX3912_VIDEO_DITHER_DUTYCYCLE_2_4,
650 	TX3912_VIDEO_DITHER_DUTYCYCLE_3_5,
651 	TX3912_VIDEO_DITHER_DUTYCYCLE_5_7,
652 	TX3912_VIDEO_DITHER_DUTYCYCLE_4_5,
653 	TX3912_VIDEO_DITHER_DUTYCYCLE_1,
654 };
655 
656 static const int dither_level4[4] = {
657 	TX3912_VIDEO_DITHER_DUTYCYCLE_0,
658 	TX3912_VIDEO_DITHER_DUTYCYCLE_1_3,
659 	TX3912_VIDEO_DITHER_DUTYCYCLE_5_7,
660 	TX3912_VIDEO_DITHER_DUTYCYCLE_1,
661 };
662 
663 static int
664 __get_color8(int luti)
665 {
666 	KASSERT(luti >=0 && luti < 8);
667 	dlp = &dither_list[dither_level8[luti]];
668 
669 	return ((0xff * dlp->mul) / dlp->div);
670 }
671 
672 static int
673 __get_color4(int luti)
674 {
675 	KASSERT(luti >=0 && luti < 4);
676 	dlp = &dither_list[dither_level4[luti]];
677 
678 	return ((0xff * dlp->mul) / dlp->div);
679 }
680 
681 void
682 tx3912video_clut_get(struct tx3912video_softc *sc, u_int32_t *rgb, int beg,
683 		     int cnt)
684 {
685 	int i;
686 
687 	KASSERT(rgb);
688 	KASSERT(LEGAL_CLUT_INDEX(beg));
689 	KASSERT(LEGAL_CLUT_INDEX(beg + cnt - 1));
690 
691 	for (i = beg; i < beg + cnt; i++) {
692 		*rgb++ =  RGB24(__get_color8((i >> 5) & 0x7),
693 				__get_color8((i >> 2) & 0x7),
694 				__get_color4(i & 0x3));
695 	}
696 }
697 
698 void
699 tx3912video_clut_install(void *ctx, struct rasops_info *ri)
700 {
701 	struct tx3912video_softc *sc = ctx;
702 	const int system_cmap[0x10] = {
703 		TX3912VIDEO_BLACK,
704 		TX3912VIDEO_RED,
705 		TX3912VIDEO_GREEN,
706 		TX3912VIDEO_YELLOW,
707 		TX3912VIDEO_BLUE,
708 		TX3912VIDEO_MAGENTA,
709 		TX3912VIDEO_CYAN,
710 		TX3912VIDEO_WHITE,
711 		TX3912VIDEO_DARK_BLACK,
712 		TX3912VIDEO_DARK_RED,
713 		TX3912VIDEO_DARK_GREEN,
714 		TX3912VIDEO_DARK_YELLOW,
715 		TX3912VIDEO_DARK_BLUE,
716 		TX3912VIDEO_DARK_MAGENTA,
717 		TX3912VIDEO_DARK_CYAN,
718 		TX3912VIDEO_DARK_WHITE,
719 	};
720 
721 	KASSERT(ri);
722 
723 	if (sc->sc_chip->vc_fbdepth == 8) {
724 		/* XXX 2bit gray scale LUT not supported */
725 		memcpy(ri->ri_devcmap, system_cmap, sizeof system_cmap);
726 	}
727 }
728 
729 void
730 tx3912video_clut_init(struct tx3912video_softc *sc)
731 {
732 	tx_chipset_tag_t tc = sc->sc_chip->vc_v;
733 
734 	if (sc->sc_chip->vc_fbdepth != 8) {
735 		return; /* XXX 2bit gray scale LUT not supported */
736 	}
737 
738 	/*
739 	 * time-based dithering pattern (TOSHIBA recommended pattern)
740 	 */
741 	/* 2/3, 1/3 */
742 	tx_conf_write(tc, TX3912_VIDEOCTRL8_REG,
743 		      TX3912_VIDEOCTRL8_PAT2_3_DEFAULT);
744 	/* 3/4, 2/4 */
745 	tx_conf_write(tc, TX3912_VIDEOCTRL9_REG,
746 		      (TX3912_VIDEOCTRL9_PAT3_4_DEFAULT << 16) |
747 		      TX3912_VIDEOCTRL9_PAT2_4_DEFAULT);
748 	/* 4/5, 1/5 */
749 	tx_conf_write(tc, TX3912_VIDEOCTRL10_REG,
750 		      TX3912_VIDEOCTRL10_PAT4_5_DEFAULT);
751 	/* 3/5, 2/5 */
752 	tx_conf_write(tc, TX3912_VIDEOCTRL11_REG,
753 		      TX3912_VIDEOCTRL11_PAT3_5_DEFAULT);
754 	/* 6/7, 1/7 */
755 	tx_conf_write(tc, TX3912_VIDEOCTRL12_REG,
756 		      TX3912_VIDEOCTRL12_PAT6_7_DEFAULT);
757 	/* 5/7, 2/7 */
758 	tx_conf_write(tc, TX3912_VIDEOCTRL13_REG,
759 		      TX3912_VIDEOCTRL13_PAT5_7_DEFAULT);
760 	/* 4/7, 3/7 */
761 	tx_conf_write(tc, TX3912_VIDEOCTRL14_REG,
762 		      TX3912_VIDEOCTRL14_PAT4_7_DEFAULT);
763 
764 	/*
765 	 * dither-pattern look-up table. (selected by uch)
766 	 */
767 	/* red */
768 	tx_conf_write(tc, TX3912_VIDEOCTRL5_REG,
769 		      (dither_level8[7] << 28) |
770 		      (dither_level8[6] << 24) |
771 		      (dither_level8[5] << 20) |
772 		      (dither_level8[4] << 16) |
773 		      (dither_level8[3] << 12) |
774 		      (dither_level8[2] << 8) |
775 		      (dither_level8[1] << 4) |
776 		      (dither_level8[0] << 0));
777 	/* green */
778 	tx_conf_write(tc, TX3912_VIDEOCTRL6_REG,
779 		      (dither_level8[7] << 28) |
780 		      (dither_level8[6] << 24) |
781 		      (dither_level8[5] << 20) |
782 		      (dither_level8[4] << 16) |
783 		      (dither_level8[3] << 12) |
784 		      (dither_level8[2] << 8) |
785 		      (dither_level8[1] << 4) |
786 		      (dither_level8[0] << 0));
787 	/* blue (2bit gray scale also use this look-up table) */
788 	tx_conf_write(tc, TX3912_VIDEOCTRL7_REG,
789 		      (dither_level4[3] << 12) |
790 		      (dither_level4[2] << 8) |
791 		      (dither_level4[1] << 4) |
792 		      (dither_level4[0] << 0));
793 
794 	tx3912video_reset(sc->sc_chip);
795 }
796