Home | History | Annotate | Line # | Download | only in xscale
pxa2x0_lcd.c revision 1.13
      1  1.13     jmmv /* $NetBSD: pxa2x0_lcd.c,v 1.13 2006/04/12 19:38:22 jmmv Exp $ */
      2   1.1      bsh 
      3   1.1      bsh /*
      4   1.1      bsh  * Copyright (c) 2002  Genetec Corporation.  All rights reserved.
      5   1.1      bsh  * Written by Hiroyuki Bessho for Genetec Corporation.
      6   1.1      bsh  *
      7   1.1      bsh  * Redistribution and use in source and binary forms, with or without
      8   1.1      bsh  * modification, are permitted provided that the following conditions
      9   1.1      bsh  * are met:
     10   1.1      bsh  * 1. Redistributions of source code must retain the above copyright
     11   1.1      bsh  *    notice, this list of conditions and the following disclaimer.
     12   1.1      bsh  * 2. Redistributions in binary form must reproduce the above copyright
     13   1.1      bsh  *    notice, this list of conditions and the following disclaimer in the
     14   1.1      bsh  *    documentation and/or other materials provided with the distribution.
     15   1.1      bsh  * 3. All advertising materials mentioning features or use of this software
     16   1.1      bsh  *    must display the following acknowledgement:
     17   1.1      bsh  *	This product includes software developed for the NetBSD Project by
     18   1.1      bsh  *	Genetec Corporation.
     19   1.1      bsh  * 4. The name of Genetec Corporation may not be used to endorse or
     20   1.1      bsh  *    promote products derived from this software without specific prior
     21   1.1      bsh  *    written permission.
     22   1.1      bsh  *
     23   1.1      bsh  * THIS SOFTWARE IS PROVIDED BY GENETEC CORPORATION ``AS IS'' AND
     24   1.1      bsh  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     25   1.1      bsh  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     26   1.1      bsh  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL GENETEC CORPORATION
     27   1.1      bsh  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     28   1.1      bsh  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     29   1.1      bsh  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     30   1.1      bsh  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     31   1.1      bsh  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     32   1.1      bsh  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     33   1.1      bsh  * POSSIBILITY OF SUCH DAMAGE.
     34   1.1      bsh  */
     35   1.1      bsh 
     36   1.1      bsh /*
     37   1.1      bsh  * Support PXA2[15]0's integrated LCD controller.
     38   1.1      bsh  */
     39   1.6    lukem 
     40   1.6    lukem #include <sys/cdefs.h>
     41  1.13     jmmv __KERNEL_RCSID(0, "$NetBSD: pxa2x0_lcd.c,v 1.13 2006/04/12 19:38:22 jmmv Exp $");
     42   1.6    lukem 
     43   1.1      bsh #include <sys/param.h>
     44   1.1      bsh #include <sys/systm.h>
     45   1.1      bsh #include <sys/conf.h>
     46   1.1      bsh #include <sys/uio.h>
     47   1.1      bsh #include <sys/malloc.h>
     48   1.1      bsh #include <sys/kernel.h>			/* for cold */
     49   1.1      bsh 
     50   1.2  thorpej #include <uvm/uvm_extern.h>
     51   1.2  thorpej 
     52   1.1      bsh #include <dev/cons.h>
     53   1.1      bsh #include <dev/wscons/wsconsio.h>
     54   1.1      bsh #include <dev/wscons/wsdisplayvar.h>
     55   1.1      bsh #include <dev/wscons/wscons_callbacks.h>
     56   1.1      bsh #include <dev/rasops/rasops.h>
     57   1.1      bsh #include <dev/wsfont/wsfont.h>
     58   1.1      bsh 
     59   1.1      bsh #include <machine/bus.h>
     60   1.1      bsh #include <machine/cpu.h>
     61   1.1      bsh #include <arm/cpufunc.h>
     62   1.1      bsh 
     63  1.10      bsh #include <arm/xscale/pxa2x0cpu.h>
     64   1.1      bsh #include <arm/xscale/pxa2x0var.h>
     65   1.1      bsh #include <arm/xscale/pxa2x0reg.h>
     66   1.1      bsh #include <arm/xscale/pxa2x0_lcd.h>
     67   1.5      bsh #include <arm/xscale/pxa2x0_gpio.h>
     68   1.1      bsh 
     69   1.1      bsh #include "wsdisplay.h"
     70   1.1      bsh 
     71   1.1      bsh int lcdintr(void *);
     72   1.1      bsh 
     73   1.1      bsh void
     74   1.4      bsh pxa2x0_lcd_geometry(struct pxa2x0_lcd_softc *sc,
     75   1.4      bsh     const struct lcd_panel_geometry *info)
     76   1.1      bsh {
     77   1.1      bsh 	int lines;
     78   1.1      bsh 	bus_space_tag_t iot = sc->iot;
     79   1.1      bsh 	bus_space_handle_t ioh = sc->ioh;
     80   1.1      bsh 	uint32_t ccr0;
     81   1.1      bsh 
     82   1.1      bsh 	sc->geometry = info;
     83   1.1      bsh 
     84   1.1      bsh 	ccr0 = LCCR0_IMASK;
     85   1.4      bsh 	if (info->panel_info & LCDPANEL_ACTIVE)
     86   1.4      bsh 		ccr0 |= LCCR0_PAS;	/* active mode */
     87   1.4      bsh 	if ((info->panel_info & (LCDPANEL_DUAL|LCDPANEL_ACTIVE))
     88   1.4      bsh 	    == LCDPANEL_DUAL)
     89   1.1      bsh 		ccr0 |= LCCR0_SDS; /* dual panel */
     90   1.4      bsh 	if (info->panel_info & LCDPANEL_MONOCHROME)
     91   1.1      bsh 		ccr0 |= LCCR0_CMS;
     92   1.4      bsh 	bus_space_write_4(iot, ioh, LCDC_LCCR0, ccr0);
     93   1.1      bsh 
     94   1.4      bsh 	bus_space_write_4(iot, ioh, LCDC_LCCR1,
     95   1.1      bsh 	    (info->panel_width-1)
     96   1.1      bsh 	    | ((info->hsync_pulse_width-1)<<10)
     97   1.1      bsh 	    | ((info->end_line_wait-1)<<16)
     98   1.4      bsh 	    | ((info->beg_line_wait-1)<<24));
     99   1.1      bsh 
    100   1.4      bsh 	if (info->panel_info & LCDPANEL_DUAL)
    101   1.1      bsh 		lines = info->panel_height/2 + info->extra_lines;
    102   1.1      bsh 	else
    103   1.1      bsh 		lines = info->panel_height + info->extra_lines;
    104   1.1      bsh 
    105   1.4      bsh 	bus_space_write_4(iot, ioh, LCDC_LCCR2,
    106   1.1      bsh 	    (lines-1)
    107   1.1      bsh 	    | (info->vsync_pulse_width<<10)
    108   1.1      bsh 	    | (info->end_frame_wait<<16)
    109   1.4      bsh 	    | (info->beg_frame_wait<<24));
    110   1.1      bsh 
    111   1.4      bsh 	bus_space_write_4(iot, ioh, LCDC_LCCR3,
    112   1.1      bsh 	    (info->pixel_clock_div<<0)
    113   1.1      bsh 	    | (info->ac_bias << 8)
    114   1.1      bsh 	    | ((info->panel_info &
    115   1.1      bsh 		(LCDPANEL_VSP|LCDPANEL_HSP|LCDPANEL_PCP|LCDPANEL_OEP))
    116   1.1      bsh 		<<20)
    117   1.4      bsh 	    | (4 << 24) /* 16bpp */
    118   1.1      bsh 	    | ((info->panel_info & LCDPANEL_DPC) ? (1<<27) : 0)
    119   1.1      bsh 	    );
    120   1.1      bsh }
    121   1.1      bsh 
    122   1.1      bsh void
    123   1.5      bsh pxa2x0_lcd_attach_sub(struct pxa2x0_lcd_softc *sc,
    124   1.5      bsh     struct pxaip_attach_args *pxa, const struct lcd_panel_geometry *geom)
    125   1.1      bsh {
    126   1.5      bsh 	bus_space_tag_t iot = pxa->pxa_iot;
    127   1.1      bsh 	bus_space_handle_t ioh;
    128   1.3      scw 	int error, nldd;
    129   1.1      bsh 
    130   1.1      bsh 	sc->n_screens = 0;
    131   1.1      bsh 	LIST_INIT(&sc->screens);
    132   1.1      bsh 
    133   1.1      bsh 	/* map controller registers */
    134   1.4      bsh 	error = bus_space_map(iot, PXA2X0_LCDC_BASE,
    135   1.4      bsh 			       PXA2X0_LCDC_SIZE, 0, &ioh);
    136   1.4      bsh 	if (error) {
    137   1.4      bsh 		printf(": failed to map registers %d", error);
    138   1.1      bsh 		return;
    139   1.1      bsh 	}
    140   1.1      bsh 
    141   1.1      bsh 	sc->iot = iot;
    142   1.1      bsh 	sc->ioh = ioh;
    143   1.1      bsh 	sc->dma_tag = &pxa2x0_bus_dma_tag;
    144   1.1      bsh 
    145   1.1      bsh 	sc->ih = pxa2x0_intr_establish(17, IPL_BIO, lcdintr, sc);
    146   1.1      bsh 	if (sc->ih == NULL)
    147   1.1      bsh 		printf("%s: unable to establish interrupt at irq %d",
    148   1.1      bsh 		    sc->dev.dv_xname, 17);
    149   1.1      bsh 
    150   1.1      bsh 	/* Initialize LCD controller */
    151   1.1      bsh 
    152   1.1      bsh 	/* enable clock */
    153   1.5      bsh 	pxa2x0_clkman_config(CKEN_LCD, 1);
    154   1.1      bsh 
    155   1.4      bsh 	bus_space_write_4(iot, ioh, LCDC_LCCR0, LCCR0_IMASK);
    156   1.1      bsh 
    157   1.1      bsh 	/*
    158   1.1      bsh 	 * setup GP[77:58] for LCD
    159   1.1      bsh 	 */
    160   1.3      scw 	/* Always use [FLP]CLK, ACBIAS */
    161   1.3      scw 	pxa2x0_gpio_set_function(74, GPIO_ALT_FN_2_OUT);
    162   1.3      scw 	pxa2x0_gpio_set_function(75, GPIO_ALT_FN_2_OUT);
    163   1.3      scw 	pxa2x0_gpio_set_function(76, GPIO_ALT_FN_2_OUT);
    164   1.3      scw 	pxa2x0_gpio_set_function(77, GPIO_ALT_FN_2_OUT);
    165   1.3      scw 
    166   1.3      scw 	if ((geom->panel_info & LCDPANEL_ACTIVE) ||
    167   1.3      scw 	    ((geom->panel_info & (LCDPANEL_MONOCHROME|LCDPANEL_DUAL)) ==
    168   1.3      scw 	    LCDPANEL_DUAL)) {
    169   1.3      scw 		/* active and color dual panel need L_DD[15:0] */
    170   1.3      scw 		nldd = 16;
    171   1.3      scw 	} else
    172   1.3      scw 	if ((geom->panel_info & LCDPANEL_DUAL) ||
    173   1.3      scw 	    !(geom->panel_info & LCDPANEL_MONOCHROME)) {
    174   1.3      scw 		/* dual or color need L_DD[7:0] */
    175   1.3      scw 		nldd = 8;
    176   1.3      scw 	} else {
    177   1.3      scw 		/* Otherwise just L_DD[3:0] */
    178   1.3      scw 		nldd = 4;
    179   1.1      bsh 	}
    180   1.1      bsh 
    181  1.10      bsh 	if (CPU_IS_PXA270 && nldd==16) {
    182  1.10      bsh 		pxa2x0_gpio_set_function(86, GPIO_ALT_FN_2_OUT);
    183  1.10      bsh 		pxa2x0_gpio_set_function(87, GPIO_ALT_FN_2_OUT);
    184  1.10      bsh 	}
    185   1.3      scw 	while (nldd--)
    186   1.3      scw 		pxa2x0_gpio_set_function(58 + nldd, GPIO_ALT_FN_2_OUT);
    187   1.1      bsh 
    188   1.4      bsh 	pxa2x0_lcd_geometry(sc, geom);
    189   1.1      bsh }
    190   1.1      bsh 
    191   1.1      bsh 
    192   1.1      bsh int
    193   1.1      bsh lcdintr(void *arg)
    194   1.1      bsh {
    195   1.1      bsh 	struct pxa2x0_lcd_softc *sc = arg;
    196   1.1      bsh 	bus_space_tag_t iot = sc->iot;
    197   1.1      bsh 	bus_space_handle_t ioh = sc->ioh;
    198   1.1      bsh 
    199   1.1      bsh 	static uint32_t status;
    200   1.1      bsh 
    201   1.4      bsh 	status = bus_space_read_4(iot, ioh, LCDC_LCSR);
    202   1.1      bsh 	/* Clear stickey status bits */
    203   1.4      bsh 	bus_space_write_4(iot, ioh, LCDC_LCSR, status);
    204   1.1      bsh 
    205   1.1      bsh 	return 1;
    206   1.1      bsh }
    207   1.1      bsh 
    208   1.1      bsh void
    209   1.4      bsh pxa2x0_lcd_start_dma(struct pxa2x0_lcd_softc *sc,
    210   1.4      bsh     struct pxa2x0_lcd_screen *scr)
    211   1.1      bsh {
    212   1.1      bsh 	uint32_t tmp;
    213   1.1      bsh 	bus_space_tag_t iot = sc->iot;
    214   1.1      bsh 	bus_space_handle_t ioh = sc->ioh;
    215   1.1      bsh 	int val, save;
    216   1.1      bsh 
    217   1.4      bsh 	save = disable_interrupts(I32_bit);
    218   1.1      bsh 
    219   1.4      bsh 	switch (scr->depth) {
    220   1.1      bsh 	case 1: val = 0; break;
    221   1.1      bsh 	case 2: val = 1; break;
    222   1.1      bsh 	case 4: val = 2; break;
    223   1.1      bsh 	case 8: val = 3; break;
    224  1.10      bsh 	case 16: val = 4; break;
    225  1.10      bsh 	case 18: val = 5; break;
    226  1.10      bsh 	case 24: val = 33; break;
    227   1.1      bsh 	default:
    228   1.1      bsh 		val = 4; break;
    229   1.1      bsh 	}
    230   1.1      bsh 
    231   1.4      bsh 	tmp = bus_space_read_4(iot, ioh, LCDC_LCCR3);
    232  1.10      bsh 	if (CPU_IS_PXA270)
    233  1.10      bsh 		bus_space_write_4(iot, ioh, LCDC_LCCR3,
    234  1.10      bsh 		  (tmp & ~(LCCR3_BPP|(1<<29))) | (val << LCCR3_BPP_SHIFT));
    235  1.10      bsh 	else
    236  1.10      bsh 		bus_space_write_4(iot, ioh, LCDC_LCCR3,
    237  1.10      bsh 		    (tmp & ~LCCR3_BPP) | (val << LCCR3_BPP_SHIFT));
    238   1.1      bsh 
    239   1.4      bsh 	bus_space_write_4(iot, ioh, LCDC_FDADR0,
    240  1.10      bsh 	    scr->depth >= 16 ? scr->dma_desc_pa :
    241   1.4      bsh 	    scr->dma_desc_pa + 2 * sizeof (struct lcd_dma_descriptor));
    242   1.4      bsh 	bus_space_write_4(iot, ioh, LCDC_FDADR1,
    243   1.4      bsh 	    scr->dma_desc_pa + 1 * sizeof (struct lcd_dma_descriptor));
    244   1.1      bsh 
    245   1.1      bsh 	/* clear status */
    246   1.4      bsh 	bus_space_write_4(iot, ioh, LCDC_LCSR, 0);
    247   1.1      bsh 
    248   1.1      bsh 	delay(1000);			/* ??? */
    249   1.1      bsh 
    250   1.1      bsh 	/* Enable LCDC */
    251   1.4      bsh 	tmp = bus_space_read_4(iot, ioh, LCDC_LCCR0);
    252   1.1      bsh 	/*tmp &= ~LCCR0_SFM;*/
    253   1.4      bsh 	bus_space_write_4(iot, ioh, LCDC_LCCR0, tmp | LCCR0_ENB);
    254   1.1      bsh 
    255   1.4      bsh 	restore_interrupts(save);
    256   1.1      bsh 
    257   1.1      bsh }
    258   1.1      bsh 
    259   1.1      bsh 
    260   1.5      bsh #if NWSDISPLAY > 0
    261   1.1      bsh static void
    262   1.4      bsh pxa2x0_lcd_stop_dma(struct pxa2x0_lcd_softc *sc)
    263   1.1      bsh {
    264   1.1      bsh 	/* Stop LCD DMA after current frame */
    265   1.4      bsh 	bus_space_write_4(sc->iot, sc->ioh, LCDC_LCCR0,
    266   1.1      bsh 	    LCCR0_DIS |
    267   1.4      bsh 	    bus_space_read_4(sc->iot, sc->ioh, LCDC_LCCR0));
    268   1.1      bsh 
    269   1.1      bsh 	/* wait for disabling done.
    270   1.1      bsh 	   XXX: use interrupt. */
    271   1.4      bsh 	while (LCCR0_ENB &
    272   1.4      bsh 	    bus_space_read_4(sc->iot, sc->ioh, LCDC_LCCR0))
    273   1.1      bsh 		;
    274   1.1      bsh 
    275   1.4      bsh 	bus_space_write_4(sc->iot, sc->ioh, LCDC_LCCR0,
    276   1.1      bsh 	    ~LCCR0_DIS &
    277   1.4      bsh 	    bus_space_read_4(sc->iot, sc->ioh, LCDC_LCCR0));
    278   1.1      bsh }
    279   1.5      bsh #endif
    280   1.1      bsh 
    281   1.1      bsh #define _rgb(r,g,b)	(((r)<<11) | ((g)<<5) | b)
    282   1.1      bsh #define rgb(r,g,b)	_rgb((r)>>1,g,(b)>>1)
    283   1.1      bsh 
    284   1.1      bsh #define L	0x1f			/* low intensity */
    285   1.1      bsh #define H	0x3f			/* hight intensity */
    286   1.1      bsh 
    287   1.1      bsh static uint16_t basic_color_map[] = {
    288   1.1      bsh 	rgb(	0,   0,   0),		/* black */
    289   1.1      bsh 	rgb(	L,   0,   0),		/* red */
    290   1.1      bsh 	rgb(	0,   L,   0),		/* green */
    291   1.1      bsh 	rgb(	L,   L,   0),		/* brown */
    292   1.1      bsh 	rgb(	0,   0,   L),		/* blue */
    293   1.1      bsh 	rgb(	L,   0,   L),		/* magenta */
    294   1.1      bsh 	rgb(	0,   L,   L),		/* cyan */
    295   1.1      bsh 	_rgb(0x1c,0x38,0x1c),		/* white */
    296   1.1      bsh 
    297   1.1      bsh 	rgb(	L,   L,   L),		/* black */
    298   1.1      bsh 	rgb(	H,   0,   0),		/* red */
    299   1.1      bsh 	rgb(	0,   H,   0),		/* green */
    300   1.1      bsh 	rgb(	H,   H,   0),		/* brown */
    301   1.1      bsh 	rgb(	0,   0,   H),		/* blue */
    302   1.1      bsh 	rgb(	H,   0,   H),		/* magenta */
    303   1.1      bsh 	rgb(	0,   H,   H),		/* cyan */
    304   1.1      bsh 	rgb(	H,   H,   H)
    305   1.1      bsh };
    306   1.1      bsh 
    307   1.1      bsh #undef H
    308   1.1      bsh #undef L
    309   1.1      bsh 
    310   1.1      bsh static void
    311   1.4      bsh init_pallet(uint16_t *buf, int depth)
    312   1.1      bsh {
    313   1.1      bsh 	int i;
    314   1.1      bsh 
    315   1.1      bsh 	/* convert RGB332 to RGB565 */
    316   1.4      bsh 	switch (depth) {
    317   1.1      bsh 	case 8:
    318   1.1      bsh 	case 4:
    319   1.1      bsh #if 0
    320   1.4      bsh 		for (i=0; i <= 255; ++i) {
    321   1.1      bsh 			buf[i] = ((9 * ((i>>5) & 0x07)) <<11) |
    322   1.1      bsh 			    ((9 * ((i>>2) & 0x07)) << 5) |
    323   1.4      bsh 			    ((21 * (i & 0x03))/2);
    324   1.1      bsh 		}
    325   1.1      bsh #else
    326   1.4      bsh 		memcpy(buf, basic_color_map, sizeof basic_color_map);
    327   1.4      bsh 		for (i=16; i < (1<<depth); ++i)
    328   1.1      bsh 			buf[i] = 0xffff;
    329   1.1      bsh #endif
    330   1.1      bsh 		break;
    331   1.8      bsh 	case 16:
    332   1.8      bsh 		/* pallet is not needed */
    333   1.8      bsh 		break;
    334   1.1      bsh 	default:
    335   1.8      bsh 		/* other depths are not supported */
    336   1.8      bsh 		break;
    337   1.1      bsh 	}
    338   1.1      bsh }
    339   1.1      bsh 
    340   1.1      bsh struct pxa2x0_lcd_screen *
    341   1.4      bsh pxa2x0_lcd_new_screen(struct pxa2x0_lcd_softc *sc,
    342   1.4      bsh     int depth)
    343   1.1      bsh {
    344   1.1      bsh 	struct pxa2x0_lcd_screen *scr = NULL;
    345   1.1      bsh 	int width, height;
    346   1.1      bsh 	bus_size_t size;
    347  1.12   simonb 	int error, pallet_size;
    348   1.1      bsh 	int busdma_flag = (cold ? BUS_DMA_NOWAIT : BUS_DMA_WAITOK);
    349   1.1      bsh 	struct lcd_dma_descriptor *desc;
    350   1.1      bsh 	paddr_t buf_pa, desc_pa;
    351   1.1      bsh 
    352   1.1      bsh 	width = sc->geometry->panel_width;
    353   1.1      bsh 	height = sc->geometry->panel_height;
    354   1.1      bsh 	pallet_size = 0;
    355   1.1      bsh 
    356   1.4      bsh 	switch (depth) {
    357   1.1      bsh 	case 1:
    358   1.1      bsh 	case 2:
    359   1.1      bsh 	case 4:
    360   1.1      bsh 	case 8:
    361   1.1      bsh 		pallet_size = (1<<depth) * sizeof (uint16_t);
    362   1.1      bsh 		/* FALLTHROUGH */
    363   1.1      bsh 	case 16:
    364   1.1      bsh 		size = roundup(width,4)*depth/8 * height;
    365   1.1      bsh 		break;
    366  1.10      bsh 	case 18:
    367  1.10      bsh 	case 24:
    368  1.10      bsh 		size = roundup(width,4) * 4 * height;
    369  1.10      bsh 		break;
    370  1.10      bsh 	case 19:
    371  1.10      bsh 	case 25:
    372  1.10      bsh 		printf("%s: Not supported depth (%d)\n", sc->dev.dv_xname, depth);
    373  1.10      bsh 		return NULL;
    374   1.1      bsh 	default:
    375   1.4      bsh 		printf("%s: Unknown depth (%d)\n", sc->dev.dv_xname, depth);
    376   1.1      bsh 		return NULL;
    377   1.1      bsh 	}
    378   1.1      bsh 
    379   1.4      bsh 	scr = malloc(sizeof *scr, M_DEVBUF,
    380   1.4      bsh 	    M_ZERO | (cold ? M_NOWAIT : M_WAITOK));
    381   1.1      bsh 
    382   1.4      bsh 	if (scr == NULL)
    383   1.1      bsh 		return NULL;
    384   1.1      bsh 
    385   1.1      bsh 	scr->nsegs = 0;
    386   1.1      bsh 	scr->depth = depth;
    387   1.1      bsh 	scr->buf_size = size;
    388   1.1      bsh 	scr->buf_va = NULL;
    389   1.1      bsh 	size = roundup(size,16) + 3 * sizeof (struct lcd_dma_descriptor)
    390   1.1      bsh 	    + pallet_size;
    391   1.1      bsh 
    392  1.12   simonb 	error = bus_dmamem_alloc(sc->dma_tag, size, 16, 0,
    393   1.4      bsh 	    scr->segs, 1, &(scr->nsegs), busdma_flag);
    394   1.1      bsh 
    395  1.12   simonb 	if (error || scr->nsegs != 1) {
    396  1.12   simonb 		/* XXX:
    397  1.12   simonb 		 * Actually we can handle nsegs>1 case by means
    398  1.12   simonb 		 * of multiple DMA descriptors for a panel.  It
    399  1.12   simonb 		 * will make code here a bit hairly.
    400  1.12   simonb 		 */
    401   1.1      bsh 		goto bad;
    402  1.12   simonb 	}
    403   1.1      bsh 
    404   1.4      bsh 	error = bus_dmamem_map(sc->dma_tag, scr->segs, scr->nsegs,
    405   1.4      bsh 	    size, (caddr_t *)&(scr->buf_va), busdma_flag | BUS_DMA_COHERENT);
    406   1.4      bsh 	if (error)
    407   1.1      bsh 		goto bad;
    408   1.1      bsh 
    409   1.1      bsh 
    410   1.4      bsh 	memset (scr->buf_va, 0, scr->buf_size);
    411   1.1      bsh 
    412   1.1      bsh 	/* map memory for DMA */
    413   1.4      bsh 	if (bus_dmamap_create(sc->dma_tag, 1024*1024*2, 1,
    414   1.4      bsh 	    1024*1024*2, 0,  busdma_flag, &scr->dma))
    415   1.1      bsh 		goto bad;
    416   1.4      bsh 	error = bus_dmamap_load(sc->dma_tag, scr->dma,
    417   1.4      bsh 	    scr->buf_va, size, NULL, busdma_flag);
    418   1.4      bsh 	if (error) {
    419   1.1      bsh 		goto bad;
    420   1.1      bsh 	}
    421   1.1      bsh 
    422   1.1      bsh 	buf_pa = scr->segs[0].ds_addr;
    423   1.2  thorpej 	desc_pa = buf_pa + roundup(size, PAGE_SIZE) - 3*sizeof *desc;
    424   1.1      bsh 
    425   1.1      bsh 	/* make descriptors at the top of mapped memory */
    426   1.1      bsh 	desc = (struct lcd_dma_descriptor *)(
    427   1.2  thorpej 		(caddr_t)(scr->buf_va) + roundup(size, PAGE_SIZE) -
    428   1.2  thorpej 			  3*sizeof *desc);
    429   1.1      bsh 
    430   1.1      bsh 	desc[0].fdadr = desc_pa;
    431   1.1      bsh 	desc[0].fsadr = buf_pa;
    432   1.1      bsh 	desc[0].ldcmd = scr->buf_size;
    433   1.1      bsh 
    434   1.4      bsh 	if (pallet_size) {
    435   1.4      bsh 		init_pallet((uint16_t *)((char *)desc - pallet_size), depth);
    436   1.1      bsh 
    437   1.1      bsh 		desc[2].fdadr = desc_pa; /* chain to panel 0 */
    438   1.1      bsh 		desc[2].fsadr = desc_pa - pallet_size;
    439   1.1      bsh 		desc[2].ldcmd = pallet_size | LDCMD_PAL;
    440   1.1      bsh 	}
    441   1.1      bsh 
    442   1.4      bsh 	if (sc->geometry->panel_info & LCDPANEL_DUAL) {
    443   1.1      bsh 		/* Dual panel */
    444   1.1      bsh 		desc[1].fdadr = desc_pa + sizeof *desc;
    445   1.1      bsh 		desc[1].fsadr = buf_pa + scr->buf_size/2;
    446   1.1      bsh 		desc[0].ldcmd = desc[1].ldcmd = scr->buf_size/2;
    447   1.1      bsh 
    448   1.1      bsh 	}
    449   1.1      bsh 
    450   1.1      bsh #if 0
    451   1.1      bsh 	desc[0].ldcmd |= LDCMD_SOFINT;
    452   1.1      bsh 	desc[1].ldcmd |= LDCMD_SOFINT;
    453   1.1      bsh #endif
    454   1.1      bsh 
    455   1.1      bsh 	scr->dma_desc = desc;
    456   1.1      bsh 	scr->dma_desc_pa = desc_pa;
    457   1.1      bsh 	scr->map_size = size;		/* used when unmap this. */
    458   1.1      bsh 
    459   1.4      bsh 	LIST_INSERT_HEAD(&(sc->screens), scr, link);
    460   1.1      bsh 	sc->n_screens++;
    461   1.1      bsh 
    462   1.1      bsh 	return scr;
    463   1.1      bsh 
    464   1.1      bsh  bad:
    465   1.4      bsh 	if (scr) {
    466   1.4      bsh 		if (scr->buf_va)
    467   1.4      bsh 			bus_dmamem_unmap(sc->dma_tag, scr->buf_va, size);
    468   1.4      bsh 		if (scr->nsegs)
    469   1.4      bsh 			bus_dmamem_free(sc->dma_tag, scr->segs, scr->nsegs);
    470   1.4      bsh 		free(scr, M_DEVBUF);
    471   1.1      bsh 	}
    472   1.1      bsh 	return NULL;
    473   1.1      bsh }
    474   1.1      bsh 
    475   1.1      bsh 
    476   1.1      bsh #if NWSDISPLAY > 0
    477   1.1      bsh 
    478   1.1      bsh /*
    479   1.1      bsh  * Initialize struct wsscreen_descr based on values calculated by
    480   1.1      bsh  * raster operation subsystem.
    481   1.1      bsh  */
    482   1.1      bsh int
    483   1.1      bsh pxa2x0_lcd_setup_wsscreen(struct pxa2x0_wsscreen_descr *descr,
    484   1.1      bsh     const struct lcd_panel_geometry *geom,
    485   1.4      bsh     const char *fontname)
    486   1.1      bsh {
    487   1.1      bsh 	int width = geom->panel_width;
    488   1.1      bsh 	int height = geom->panel_height;
    489   1.1      bsh 	int cookie = -1;
    490   1.1      bsh 	struct rasops_info rinfo;
    491   1.1      bsh 
    492   1.4      bsh 	memset(&rinfo, 0, sizeof rinfo);
    493   1.1      bsh 
    494   1.4      bsh 	if (fontname) {
    495   1.1      bsh 		wsfont_init();
    496   1.9       he 		cookie = wsfont_find(fontname, 0, 0, 0,
    497   1.4      bsh 		    WSDISPLAY_FONTORDER_L2R, WSDISPLAY_FONTORDER_L2R);
    498   1.4      bsh 		if (cookie < 0 ||
    499   1.4      bsh 		    wsfont_lock(cookie, &rinfo.ri_font))
    500   1.1      bsh 			return -1;
    501   1.1      bsh 	}
    502   1.1      bsh 	else {
    503   1.1      bsh 		/* let rasops_init() choose any font */
    504   1.1      bsh 	}
    505   1.1      bsh 
    506   1.1      bsh 	/* let rasops_init calculate # of cols and rows in character */
    507   1.1      bsh 	rinfo.ri_flg = 0;
    508   1.1      bsh 	rinfo.ri_depth = descr->depth;
    509   1.1      bsh 	rinfo.ri_bits = NULL;
    510   1.1      bsh 	rinfo.ri_width = width;
    511   1.1      bsh 	rinfo.ri_height = height;
    512   1.1      bsh 	rinfo.ri_stride = width * rinfo.ri_depth / 8;
    513  1.10      bsh #ifdef	CPU_XSCALE_PXA270
    514  1.10      bsh 	if (rinfo.ri_depth > 16) rinfo.ri_stride = width * 4;
    515  1.10      bsh #endif
    516   1.1      bsh 	rinfo.ri_wsfcookie = cookie;
    517   1.1      bsh 
    518   1.4      bsh 	rasops_init(&rinfo, 100, 100);
    519   1.1      bsh 
    520   1.1      bsh 	descr->c.nrows = rinfo.ri_rows;
    521   1.1      bsh 	descr->c.ncols = rinfo.ri_cols;
    522   1.1      bsh 	descr->c.capabilities = rinfo.ri_caps;
    523   1.1      bsh 
    524   1.1      bsh 	return cookie;
    525   1.1      bsh }
    526   1.1      bsh 
    527   1.1      bsh 
    528   1.1      bsh int
    529   1.1      bsh pxa2x0_lcd_show_screen(void *v, void *cookie, int waitok,
    530   1.1      bsh     void (*cb)(void *, int, int), void *cbarg)
    531   1.1      bsh {
    532   1.1      bsh 	struct pxa2x0_lcd_softc *sc = v;
    533   1.1      bsh 	struct pxa2x0_lcd_screen *scr = cookie, *old;
    534   1.1      bsh 
    535   1.1      bsh 	old = sc->active;
    536   1.4      bsh 	if (old == scr)
    537   1.1      bsh 		return 0;
    538   1.1      bsh 
    539   1.4      bsh 	if (old)
    540   1.4      bsh 		pxa2x0_lcd_stop_dma(sc);
    541   1.1      bsh 
    542   1.4      bsh 	pxa2x0_lcd_start_dma(sc, scr);
    543   1.1      bsh 
    544   1.1      bsh 	sc->active = scr;
    545   1.1      bsh 	return 0;
    546   1.1      bsh }
    547   1.1      bsh 
    548   1.1      bsh int
    549   1.1      bsh pxa2x0_lcd_alloc_screen(void *v, const struct wsscreen_descr *_type,
    550   1.1      bsh     void **cookiep, int *curxp, int *curyp, long *attrp)
    551   1.1      bsh {
    552   1.1      bsh 	struct pxa2x0_lcd_softc *sc = v;
    553   1.1      bsh 	struct pxa2x0_lcd_screen *scr;
    554   1.9       he 	const struct pxa2x0_wsscreen_descr *type =
    555   1.9       he 		(const struct pxa2x0_wsscreen_descr *)_type;
    556   1.1      bsh 
    557   1.4      bsh 	scr = pxa2x0_lcd_new_screen(sc, type->depth);
    558   1.4      bsh 	if (scr == NULL)
    559   1.1      bsh 		return -1;
    560   1.1      bsh 
    561   1.1      bsh 	/*
    562   1.1      bsh 	 * initialize raster operation for this screen.
    563   1.1      bsh 	 */
    564   1.1      bsh 	scr->rinfo.ri_flg = 0;
    565   1.1      bsh 	scr->rinfo.ri_depth = type->depth;
    566   1.1      bsh 	scr->rinfo.ri_bits = scr->buf_va;
    567   1.1      bsh 	scr->rinfo.ri_width = sc->geometry->panel_width;
    568   1.1      bsh 	scr->rinfo.ri_height = sc->geometry->panel_height;
    569   1.1      bsh 	scr->rinfo.ri_stride = scr->rinfo.ri_width * scr->rinfo.ri_depth / 8;
    570  1.10      bsh #ifdef CPU_XSCALE_PXA270
    571  1.10      bsh 	if (scr->rinfo.ri_depth > 16)
    572  1.10      bsh 		scr->rinfo.ri_stride = scr->rinfo.ri_width * 4;
    573  1.10      bsh #endif
    574   1.1      bsh 	scr->rinfo.ri_wsfcookie = -1;	/* XXX */
    575   1.1      bsh 
    576   1.4      bsh 	rasops_init(&scr->rinfo, type->c.nrows, type->c.ncols);
    577   1.1      bsh 
    578   1.4      bsh 	(* scr->rinfo.ri_ops.allocattr)(&scr->rinfo, 0, 0, 0, attrp);
    579   1.1      bsh 
    580   1.1      bsh 	*cookiep = scr;
    581   1.1      bsh 	*curxp = 0;
    582   1.1      bsh 	*curyp = 0;
    583   1.1      bsh 
    584   1.1      bsh 	return 0;
    585   1.1      bsh }
    586   1.1      bsh 
    587   1.1      bsh 
    588   1.1      bsh void
    589   1.1      bsh pxa2x0_lcd_free_screen(void *v, void *cookie)
    590   1.1      bsh {
    591   1.1      bsh 	struct pxa2x0_lcd_softc *sc = v;
    592   1.1      bsh 	struct pxa2x0_lcd_screen *scr = cookie;
    593   1.1      bsh 
    594   1.4      bsh 	LIST_REMOVE(scr, link);
    595   1.1      bsh 	sc->n_screens--;
    596   1.4      bsh 	if (scr == sc->active) {
    597   1.1      bsh 		/* at first, we need to stop LCD DMA */
    598   1.1      bsh 		sc->active = NULL;
    599   1.1      bsh 
    600   1.4      bsh 		printf("lcd_free on active screen\n");
    601   1.1      bsh 
    602   1.1      bsh 		pxa2x0_lcd_stop_dma(sc);
    603   1.1      bsh 	}
    604   1.1      bsh 
    605   1.4      bsh 	if (scr->buf_va)
    606   1.4      bsh 		bus_dmamem_unmap(sc->dma_tag, scr->buf_va, scr->map_size);
    607   1.1      bsh 
    608   1.4      bsh 	if (scr->nsegs > 0)
    609   1.4      bsh 		bus_dmamem_free(sc->dma_tag, scr->segs, scr->nsegs);
    610   1.1      bsh 
    611   1.4      bsh 	free(scr, M_DEVBUF);
    612   1.1      bsh }
    613   1.1      bsh 
    614   1.1      bsh int
    615  1.13     jmmv pxa2x0_lcd_ioctl(void *v, void *vs, u_long cmd, caddr_t data, int flag,
    616  1.13     jmmv 	struct lwp *l)
    617   1.1      bsh {
    618   1.1      bsh 	struct pxa2x0_lcd_softc *sc = v;
    619   1.1      bsh 	struct wsdisplay_fbinfo *wsdisp_info;
    620   1.1      bsh 	uint32_t ccr0;
    621   1.1      bsh 
    622   1.1      bsh 	switch (cmd) {
    623   1.1      bsh 	case WSDISPLAYIO_GTYPE:
    624   1.1      bsh 		*(u_int *)data = WSDISPLAY_TYPE_UNKNOWN; /* XXX */
    625   1.1      bsh 		return 0;
    626   1.1      bsh 
    627   1.1      bsh 	case WSDISPLAYIO_GINFO:
    628   1.1      bsh 		wsdisp_info = (struct wsdisplay_fbinfo *)data;
    629   1.1      bsh 
    630   1.1      bsh 		wsdisp_info->height = sc->geometry->panel_height;
    631   1.1      bsh 		wsdisp_info->width = sc->geometry->panel_width;
    632  1.10      bsh 		wsdisp_info->depth = sc->active->depth;
    633   1.1      bsh 		wsdisp_info->cmsize = 0;
    634   1.1      bsh 		return 0;
    635   1.1      bsh 
    636   1.1      bsh 	case WSDISPLAYIO_GETCMAP:
    637   1.1      bsh 	case WSDISPLAYIO_PUTCMAP:
    638   1.1      bsh 		return EPASSTHROUGH;	/* XXX Colormap */
    639   1.1      bsh 
    640   1.1      bsh 	case WSDISPLAYIO_SVIDEO:
    641   1.4      bsh 		if (*(int *)data == WSDISPLAYIO_VIDEO_ON) {
    642   1.1      bsh 		  /* turn it on */
    643   1.1      bsh 		}
    644   1.1      bsh 		else {
    645   1.1      bsh 		  /* start LCD shutdown */
    646   1.1      bsh 		  /* sleep until interrupt */
    647   1.1      bsh 		}
    648   1.1      bsh 		return 0;
    649   1.1      bsh 
    650   1.1      bsh 	case WSDISPLAYIO_GVIDEO:
    651   1.4      bsh 		ccr0 = bus_space_read_4(sc->iot, sc->ioh, LCDC_LCCR0);
    652   1.1      bsh 		*(u_int *)data = (ccr0 & (LCCR0_ENB|LCCR0_DIS)) == LCCR0_ENB ?
    653   1.1      bsh 		    WSDISPLAYIO_VIDEO_ON : WSDISPLAYIO_VIDEO_OFF;
    654   1.1      bsh 		return 0;
    655   1.1      bsh 
    656   1.1      bsh 
    657   1.1      bsh 
    658   1.1      bsh 	case WSDISPLAYIO_GCURPOS:
    659   1.1      bsh 	case WSDISPLAYIO_SCURPOS:
    660   1.1      bsh 	case WSDISPLAYIO_GCURMAX:
    661   1.1      bsh 	case WSDISPLAYIO_GCURSOR:
    662   1.1      bsh 	case WSDISPLAYIO_SCURSOR:
    663   1.1      bsh 		return EPASSTHROUGH;	/* XXX */
    664   1.1      bsh 	}
    665   1.1      bsh 
    666   1.1      bsh 	return EPASSTHROUGH;
    667   1.1      bsh }
    668   1.1      bsh 
    669   1.1      bsh paddr_t
    670  1.13     jmmv pxa2x0_lcd_mmap(void *v, void *vs, off_t offset, int prot)
    671   1.1      bsh {
    672   1.1      bsh 	struct pxa2x0_lcd_softc *sc = v;
    673   1.1      bsh 	struct pxa2x0_lcd_screen *screen = sc->active;  /* ??? */
    674   1.1      bsh 
    675   1.4      bsh 	if (screen == NULL)
    676   1.1      bsh 		return -1;
    677   1.1      bsh 
    678   1.4      bsh 	return bus_dmamem_mmap(sc->dma_tag, screen->segs, screen->nsegs,
    679   1.4      bsh 	    offset, prot, BUS_DMA_WAITOK|BUS_DMA_COHERENT);
    680   1.1      bsh 	return -1;
    681   1.1      bsh }
    682   1.1      bsh 
    683   1.1      bsh 
    684   1.1      bsh static void
    685   1.4      bsh pxa2x0_lcd_cursor(void *cookie, int on, int row, int col)
    686   1.1      bsh {
    687   1.1      bsh 	struct pxa2x0_lcd_screen *scr = cookie;
    688   1.1      bsh 
    689   1.4      bsh 	(* scr->rinfo.ri_ops.cursor)(&scr->rinfo, on, row, col);
    690   1.1      bsh }
    691   1.1      bsh 
    692   1.1      bsh static int
    693   1.4      bsh pxa2x0_lcd_mapchar(void *cookie, int c, unsigned int *cp)
    694   1.1      bsh {
    695   1.1      bsh 	struct pxa2x0_lcd_screen *scr = cookie;
    696   1.1      bsh 
    697   1.4      bsh 	return (* scr->rinfo.ri_ops.mapchar)(&scr->rinfo, c, cp);
    698   1.1      bsh }
    699   1.1      bsh 
    700   1.1      bsh static void
    701   1.4      bsh pxa2x0_lcd_putchar(void *cookie, int row, int col, u_int uc, long attr)
    702   1.1      bsh {
    703   1.1      bsh 	struct pxa2x0_lcd_screen *scr = cookie;
    704   1.1      bsh 
    705   1.4      bsh 	(* scr->rinfo.ri_ops.putchar)(&scr->rinfo,
    706   1.4      bsh 	    row, col, uc, attr);
    707   1.1      bsh }
    708   1.1      bsh 
    709   1.1      bsh static void
    710   1.4      bsh pxa2x0_lcd_copycols(void *cookie, int row, int src, int dst, int num)
    711   1.1      bsh {
    712   1.1      bsh 	struct pxa2x0_lcd_screen *scr = cookie;
    713   1.1      bsh 
    714   1.4      bsh 	(* scr->rinfo.ri_ops.copycols)(&scr->rinfo,
    715   1.4      bsh 	    row, src, dst, num);
    716   1.1      bsh }
    717   1.1      bsh 
    718   1.1      bsh static void
    719   1.4      bsh pxa2x0_lcd_erasecols(void *cookie, int row, int col, int num, long attr)
    720   1.1      bsh {
    721   1.1      bsh 	struct pxa2x0_lcd_screen *scr = cookie;
    722   1.1      bsh 
    723   1.4      bsh 	(* scr->rinfo.ri_ops.erasecols)(&scr->rinfo,
    724   1.4      bsh 	    row, col, num, attr);
    725   1.1      bsh }
    726   1.1      bsh 
    727   1.1      bsh static void
    728   1.4      bsh pxa2x0_lcd_copyrows(void *cookie, int src, int dst, int num)
    729   1.1      bsh {
    730   1.1      bsh 	struct pxa2x0_lcd_screen *scr = cookie;
    731   1.1      bsh 
    732   1.4      bsh 	(* scr->rinfo.ri_ops.copyrows)(&scr->rinfo,
    733   1.4      bsh 	    src, dst, num);
    734   1.1      bsh }
    735   1.1      bsh 
    736   1.1      bsh static void
    737   1.4      bsh pxa2x0_lcd_eraserows(void *cookie, int row, int num, long attr)
    738   1.1      bsh {
    739   1.1      bsh 	struct pxa2x0_lcd_screen *scr = cookie;
    740   1.1      bsh 
    741   1.4      bsh 	(* scr->rinfo.ri_ops.eraserows)(&scr->rinfo,
    742   1.4      bsh 	    row, num, attr);
    743   1.1      bsh }
    744   1.1      bsh 
    745   1.1      bsh static int
    746   1.4      bsh pxa2x0_lcd_alloc_attr(void *cookie, int fg, int bg, int flg, long *attr)
    747   1.1      bsh {
    748   1.1      bsh 	struct pxa2x0_lcd_screen *scr = cookie;
    749   1.1      bsh 
    750   1.4      bsh 	return (* scr->rinfo.ri_ops.allocattr)(&scr->rinfo,
    751   1.4      bsh 	    fg, bg, flg, attr);
    752   1.1      bsh }
    753   1.1      bsh 
    754   1.1      bsh 
    755   1.1      bsh const struct wsdisplay_emulops pxa2x0_lcd_emulops = {
    756   1.1      bsh 	pxa2x0_lcd_cursor,
    757   1.1      bsh 	pxa2x0_lcd_mapchar,
    758   1.1      bsh 	pxa2x0_lcd_putchar,
    759   1.1      bsh 	pxa2x0_lcd_copycols,
    760   1.1      bsh 	pxa2x0_lcd_erasecols,
    761   1.1      bsh 	pxa2x0_lcd_copyrows,
    762   1.1      bsh 	pxa2x0_lcd_eraserows,
    763   1.1      bsh 	pxa2x0_lcd_alloc_attr
    764   1.1      bsh };
    765   1.1      bsh 
    766   1.1      bsh #endif /* NWSDISPLAY > 0 */
    767