/* $NetBSD: g42xxeb_lcd.c,v 1.19 2023/12/20 13:55:17 thorpej Exp $ */

/*-
* Copyright (c) 2001, 2002, 2005 Genetec corp.
* All rights reserved.
*
* LCD driver for Genetec G4250EB-X002.
* Written by Hiroyuki Bessho for Genetec corp.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
*    notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
*    notice, this list of conditions and the following disclaimer in the
*    documentation and/or other materials provided with the distribution.
* 3. Neither the name of The NetBSD Foundation nor the names of its
*    contributors may be used to endorse or promote products derived
*    from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
* PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*/
#include "opt_g42xxlcd.h"

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/conf.h>
#include <sys/uio.h>

#include <dev/cons.h>
#include <dev/wscons/wsconsio.h>
#include <dev/wscons/wsdisplayvar.h>
#include <dev/wscons/wscons_callbacks.h>

#include <sys/bus.h>
#include <arm/sa11x0/sa11x0_var.h>
#include <arm/xscale/pxa2x0var.h>
#include <arm/xscale/pxa2x0reg.h>
#include <arm/xscale/pxa2x0_lcd.h>

#include <arch/evbarm/g42xxeb/g42xxeb_reg.h>
#include <arch/evbarm/g42xxeb/g42xxeb_var.h>

#include "wsdisplay.h"
#include "ioconf.h"

int     lcd_match(device_t, cfdata_t, void *);
void    lcd_attach(device_t, device_t, void *);
int     lcdintr(void *);

#if NWSDISPLAY > 0

/*
* wsdisplay glue
*/
struct pxa2x0_wsscreen_descr lcd_bpp16_screen = {
       {
               "bpp16", 0, 0,
               &pxa2x0_lcd_emulops,
               0, 0,
               WSSCREEN_WSCOLORS,
       },
       16                              /* bits per pixel */
}, lcd_bpp8_screen = {
       {
               "bpp8", 0, 0,
               &pxa2x0_lcd_emulops,
               0, 0,
               WSSCREEN_WSCOLORS,
       },
       8                               /* bits per pixel */
}, lcd_bpp4_screen = {
       {
               "bpp4", 0, 0,
               &pxa2x0_lcd_emulops,
               0, 0,
               WSSCREEN_WSCOLORS,
       },
       4                               /* bits per pixel */
};


static const struct wsscreen_descr *lcd_scr_descr[] = {
       &lcd_bpp4_screen.c,
       &lcd_bpp8_screen.c,
       &lcd_bpp16_screen.c,
};

const struct wsscreen_list lcd_screen_list = {
       sizeof lcd_scr_descr / sizeof lcd_scr_descr[0],
       lcd_scr_descr
};

int     lcd_ioctl(void *, void *, u_long, void *, int, struct lwp *);

int     lcd_show_screen(void *, void *, int,
           void (*)(void *, int, int), void *);

const struct wsdisplay_accessops lcd_accessops = {
       lcd_ioctl,
       pxa2x0_lcd_mmap,
       pxa2x0_lcd_alloc_screen,
       pxa2x0_lcd_free_screen,
       lcd_show_screen,
       NULL, /* load_font */
};

#else
/*
* Interface to LCD framebuffer without wscons
*/
dev_type_open(lcdopen);
dev_type_close(lcdclose);
dev_type_ioctl(lcdioctl);
dev_type_mmap(lcdmmap);
const struct cdevsw lcd_cdevsw = {
       .d_open = lcdopen,
       .d_close = lcdclose,
       .d_read = noread,
       .d_write = nowrite,
       .d_ioctl = lcdioctl,
       .d_stop = nostop,
       .d_tty = notty,
       .d_poll = nopoll,
       .d_mmap = lcdmmap,
       .d_kqfilter = nokqfilter,
       .d_discard = nodiscard,
       .d_flag = D_TTY
};

#endif

CFATTACH_DECL_NEW(lcd_obio, sizeof (struct pxa2x0_lcd_softc),
   lcd_match, lcd_attach, NULL, NULL);

int
lcd_match( device_t parent, cfdata_t cf, void *aux )
{
       return 1;
}

#ifdef G4250_LCD_NEC_NL3224BC35
/* NEC's QVGA LCD */
static const struct lcd_panel_geometry nec_NL3224BC35 =
{
   320,                        /* Width */
   240,                        /* Height */
   0,                          /* No extra lines */

   LCDPANEL_SINGLE|LCDPANEL_ACTIVE|LCDPANEL_PCP|
   LCDPANEL_VSP|LCDPANEL_HSP,
   7,                          /* clock divider, 6.25MHz at 100MHz */
   0xff,                       /* AC bias pin freq */

   6,                          /* horizontal sync pulse width */
   70,                         /* BLW */
   7,                          /* ELW */

   10,                         /* vertical sync pulse width */
   11,                         /* BFW */
   1,                          /* EFW */
};
#endif

#ifdef G4250_LCD_TOSHIBA_LTM035
const struct lcd_panel_geometry toshiba_LTM035 =
{
   240,                        /* Width */
   320,                        /* Height */
   0,                          /* No extra lines */

   LCDPANEL_SINGLE|LCDPANEL_ACTIVE|   /* LCDPANEL_PCP| */
   LCDPANEL_VSP|LCDPANEL_HSP,
   11,                         /* clock divider, 4.5 MHz at 100 MHz */
                               /* required: 4.28..4.7 MHz  */
   0xff,                       /* AC bias pin freq */

   4,                          /* horizontal sync pulse width */
   8,                          /* BLW (back porch) */
   4,                          /* ELW (front porch) */

   2,                          /* vertical sync pulse width */
   2,                          /* BFW (back porch) */
   3,                          /* EFW (front porch) */

};
#endif /* G4250_LCD_TOSHIBA_LTM035 */

void lcd_attach(device_t parent, device_t self, void *aux)
{
       struct pxa2x0_lcd_softc *sc = device_private(self);
       struct pxaip_attach_args paa;
       struct obio_attach_args *oba = aux;

       sc->dev = self;

       paa.pxa_name = "obio";
       paa.pxa_iot = oba->oba_iot;
       paa.pxa_addr = oba->oba_addr;
       paa.pxa_size = 0;               /* XXX */
       paa.pxa_intr = oba->oba_intr;

#ifdef G4250_LCD_TOSHIBA_LTM035
# define PANEL  toshiba_LTM035
#else
# define PANEL  nec_NL3224BC35
#endif

       pxa2x0_lcd_attach_sub(sc, &paa, &PANEL);


#if NWSDISPLAY > 0

       {
               struct wsemuldisplaydev_attach_args aa;

               /* make wsdisplay screen list */
               pxa2x0_lcd_setup_wsscreen(&lcd_bpp16_screen, &PANEL, NULL);
               pxa2x0_lcd_setup_wsscreen(&lcd_bpp8_screen, &PANEL, NULL);
               pxa2x0_lcd_setup_wsscreen(&lcd_bpp4_screen, &PANEL, NULL);

               aa.console = 0;
               aa.scrdata = &lcd_screen_list;
               aa.accessops = &lcd_accessops;
               aa.accesscookie = sc;

               (void) config_found(self, &aa, wsemuldisplaydevprint,
                   CFARGS_NONE);
       }
#else
       {
               struct pxa2x0_lcd_screen *screen;
               int error;

               error = pxa2x0_lcd_new_screen( sc, 16, &screen );
               if (error == 0) {
                       sc->active = screen;
                       pxa2x0_lcd_start_dma(sc, screen);
               }
       }
#endif

#undef PANEL

}

#if NWSDISPLAY > 0

int
lcd_ioctl(void *v, void *vs, u_long cmd, void *data, int flag, struct lwp *l)
{
       struct pxa2x0_lcd_softc *sc = v;
       struct obio_softc *osc =
           device_private(device_parent(sc->dev));
       uint16_t reg;

       switch (cmd) {
       case WSDISPLAYIO_SVIDEO:
               reg = bus_space_read_2(osc->sc_iot, osc->sc_obioreg_ioh,
                   G42XXEB_LCDCTL);
               if (*(int *)data == WSDISPLAYIO_VIDEO_ON)
                       reg |= LCDCTL_BL_ON;
               else
                       reg &= ~LCDCTL_BL_ON;
               bus_space_write_2(osc->sc_iot, osc->sc_obioreg_ioh,
                       G42XXEB_LCDCTL, reg);
               bus_space_write_1(osc->sc_iot, osc->sc_obioreg_ioh,
                       G42XXEB_LED, reg);
               printf("LCD control: %x\n", reg);
               break;                  /* turn on/off LCD controller */
       }

       return pxa2x0_lcd_ioctl(v, vs, cmd, data, flag, l);
}

int
lcd_show_screen(void *v, void *cookie, int waitok,
   void (*cb)(void *, int, int), void *cbarg)
{
       struct pxa2x0_lcd_softc *sc = v;
       struct obio_softc *osc =
           device_private(device_parent(sc->dev));
       uint16_t reg;

       pxa2x0_lcd_show_screen(v,cookie,waitok,cb,cbarg);

       /* Turn on LCD backlight.
          XXX: with fixed blightness. want new ioctl to set blightness. */
       reg = bus_space_read_2(osc->sc_iot, osc->sc_obioreg_ioh, G42XXEB_LCDCTL);
       bus_space_write_2(osc->sc_iot, osc->sc_obioreg_ioh, G42XXEB_LCDCTL,
           (reg & ~LCDCTL_BL_PWN) | 0x4000 | LCDCTL_BL_ON);

       return 0;
}



#else  /* NWSDISPLAY==0 */

int
lcdopen(dev_t dev, int oflags, int devtype, struct lwp *l)
{
       struct pxa2x0_lcd_softc *sc =
               device_lookup_private(&lcd_cd, minor(dev));
       struct obio_softc *osc =
           device_private(device_parent(sc->dev));
       uint16_t reg;

       /* Turn on LCD backlight.
          XXX: with fixed blightness. want new ioctl to set blightness. */
       reg = bus_space_read_2(osc->sc_iot, osc->sc_obioreg_ioh, G42XXEB_LCDCTL);
       bus_space_write_2(osc->sc_iot, osc->sc_obioreg_ioh, G42XXEB_LCDCTL,
           (reg & ~LCDCTL_BL_PWN) | 0x4000 | LCDCTL_BL_ON);


       return 0;
}

int
lcdclose(dev_t dev, int fflag, int devtype, struct lwp *l)
{
       return 0;
}

paddr_t
lcdmmap(dev_t dev, off_t offset, int size)
{
       struct pxa2x0_lcd_softc *sc =
               device_lookup_private(&lcd_cd, minor(dev));
       struct pxa2x0_lcd_screen *scr = sc->active;

       return bus_dmamem_mmap( &pxa2x0_bus_dma_tag, scr->segs, scr->nsegs,
           offset, 0, BUS_DMA_WAITOK|BUS_DMA_COHERENT );
}

int
lcdioctl(dev_t dev, u_long cmd, void *data,
           int fflag, struct lwp *l)
{
       return EOPNOTSUPP;
}

#endif /* NWSDISPLAY>0 */