/*      $NetBSD: lcd.c,v 1.3 2018/09/04 15:08:30 riastradh Exp $        */

/*-
 * Copyright (c) 2008 Izumi Tsutsui.  All rights reserved.
 *
 * 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.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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 <lib/libsa/stand.h>
#include <lib/libkern/libkern.h>

#include <dev/ic/hd44780reg.h>

#include <machine/cpu.h>

#include "boot.h"

#define IREG    0x00
#define DREG    0x10

#if 0
#define CSR_READ(base, reg)                                             \
        (((*(volatile uint32_t *)((base) + (reg))) >> 24), delay(10))
#endif

#define CSR_WRITE(base, reg, val)                                       \
        do {                                                            \
                *(volatile uint32_t *)((base) + (reg)) = ((val) << 24); \
                delay(10);                                              \
        } while (/* CONSTCOND */ 0)

#define NCOLS   16

struct lcd_message {
        char row1[NCOLS];
        char row2[NCOLS];
};

static uint32_t lcd_base;
static const struct lcd_message banner_message = {
        "NetBSD/cobalt   ",
        "Bootloader      "
};
static const struct lcd_message failed_message = {
        "Boot failed!    ",
        "Rebooting...    "
};
static struct lcd_message loadfile_message = {
        "Loading:        ",
        "                " 
};

static void lcd_puts(const struct lcd_message *);

void
lcd_init(void)
{

        lcd_base = MIPS_PHYS_TO_KSEG1(LCD_BASE);
}

void
lcd_banner(void)
{

        lcd_puts(&banner_message);
}

void
lcd_loadfile(const char *file)
{

        memcpy(loadfile_message.row2, file, uimin(NCOLS, strlen(file)));

        lcd_puts(&loadfile_message);
}

void
lcd_failed(void)
{

        lcd_puts(&failed_message);
}

static void
lcd_puts(const struct lcd_message *message)
{
        int i;

        for (i = 0; i < NCOLS; i++) {
                CSR_WRITE(lcd_base, IREG, cmd_ddramset(HD_ROW1_ADDR + i));
                CSR_WRITE(lcd_base, DREG, message->row1[i]);
        }
        for (i = 0; i < NCOLS; i++) {
                CSR_WRITE(lcd_base, IREG, cmd_ddramset(HD_ROW2_ADDR + i));
                CSR_WRITE(lcd_base, DREG, message->row2[i]);
        }
}