/*	$NetBSD: zz9k.c,v 1.1 2023/05/03 13:49:30 phx Exp $ */

/*
 * Copyright (c) 2020 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Alain Runa.
 *
 * 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 <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: zz9k.c,v 1.1 2023/05/03 13:49:30 phx Exp $");

/* miscellaneous */
#include <sys/types.h>			/* size_t */
#include <sys/stdint.h>			/* uintXX_t */
#include <sys/stdbool.h>		/* bool */

/* driver(9) includes */
#include <sys/param.h>			/* NODEV */
#include <sys/device.h>			/* CFATTACH_DECL_NEW(), device_priv() */
#include <sys/errno.h>			/* . */

/* bus_space(9) and zorro bus includes */
#include <sys/bus.h>			/* bus_space_xxx(), bus_space_xxx */
#include <sys/cpu.h>			/* kvtop() */
#include <sys/systm.h>			/* aprint_xxx() */
#include <amiga/dev/zbusvar.h>		/* zbus_args */

/* zz9k and amiga related */
#include <amiga/amiga/device.h>		/* amiga_realconfig */
#include <amiga/dev/zz9kvar.h>		/* zz9k_softc */
#include <amiga/dev/zz9kreg.h>		/* ZZ9000 registers */
#include "zz9k.h"			/* NZZ9K */


/* helper functions */
static int zz9k_print(void *aux, const char *pnp);

/* driver(9) essentials */
static int zz9k_match(device_t parent, cfdata_t match, void *aux);
static void zz9k_attach(device_t parent, device_t self, void *aux);
CFATTACH_DECL_NEW(
    zz9k, sizeof(struct zz9k_softc), zz9k_match, zz9k_attach, NULL, NULL);

bool zz9k_exists = false;		/* required by zz9k_fb ZZFB_CONSOLE */


/* It's the year 2020. And so it begins... */

static int
zz9k_match(device_t parent, cfdata_t match, void *aux)
{
	struct zbus_args *zap = aux;
	bool found = false;

	if (zap->manid == ZZ9K_MANID) {
		switch (zap->prodid) {
		case ZZ9K_PRODID_Z2:
		case ZZ9K_PRODID_Z3:
			found = true;
			break;
		}
	}

	if (amiga_realconfig == 0) { /* pre-config, just flag if zz9k exists. */
		zz9k_exists = found;
		return 0;    /* 0, as we don't need zz9k_attach() this round. */
	}

	return found;
}

static void
zz9k_attach(device_t parent, device_t self, void *aux)
{
	struct zbus_args *zap = aux;
	struct zz9k_softc *sc = device_private(self);
	struct zz9kbus_attach_args zz9k_fb;	/* Graphics */
	struct zz9kbus_attach_args zz9k_if;	/* Ethernet */
	struct zz9kbus_attach_args zz9k_ax;	/* Audio */
	struct zz9kbus_attach_args zz9k_usb;	/* USB */

	const bus_addr_t regBase = ZZ9K_REG_BASE;
	const bus_size_t regSize = ZZ9K_REG_SIZE;

	sc->sc_dev = self;
	sc->sc_bst.base = (bus_addr_t)zap->va;
	sc->sc_bst.absm = &amiga_bus_stride_1;
	sc->sc_iot = &sc->sc_bst;
	sc->sc_zsize = zap->size;

	if (bus_space_map(sc->sc_iot, regBase, regSize, 0, &sc->sc_regh)) {
		aprint_error("Failed to map MNT ZZ9000 registers.\n");
		return;
	}

	uint16_t hwVer = ZZREG_R(ZZ9K_HW_VERSION);
	uint16_t fwVer = ZZREG_R(ZZ9K_FW_VERSION);

	aprint_normal(": MNT ZZ9000 Zorro %s (HW: %i.%i, FW: %i.%i)\n",
	    (zap->prodid == ZZ9K_PRODID_Z3) ? "III" : "II",
	    hwVer >> 8, hwVer & 0x00ff, fwVer >> 8, fwVer & 0x00ff);

	if (fwVer < ZZ9K_FW_VER_MIN) {
		aprint_error("Firmware version is not supported. "
		    "Please update to newer firmware from:\n");
		aprint_error(
		    "https://source.mnt.re/amiga/zz9000-firmware/-/releases\n");
		return;
	}

	uint16_t tcore = ZZREG_R(ZZ9K_TEMPERATURE);
	uint16_t vcore = ZZREG_R(ZZ9K_VOLTAGE_CORE);
	uint16_t vaux  = ZZREG_R(ZZ9K_VOLTAGE_AUX);
	
	aprint_normal_dev(sc->sc_dev, "Hardware status "
	    "<Tcore: %i.%i C, Vcore: %i.%i V, Vaux: %i.%i V>\n",
	    tcore/10, tcore%10, vcore/100, vcore%100, vaux/100, vaux%100);

	aprint_debug_dev(sc->sc_dev, "[DEBUG] registers at %p/%p (pa/va), "
	    "MNT ZZ9000 is mapped with %i MB in Zorro %s space.\n",
	    (void *)kvtop((void *)sc->sc_regh),
	    bus_space_vaddr(sc->sc_iot, sc->sc_regh),
	    zap->size / (1024 * 1024),
	    (zap->prodid == ZZ9K_PRODID_Z3) ? "III" : "II");
	
	if (fwVer > ZZ9K_FW_VER) {
		aprint_normal_dev(sc->sc_dev, "The firmware is newer than "
		    "%i.%i and may not be supported yet.\n",
		    ZZ9K_FW_VER >> 8, ZZ9K_FW_VER & 0x00ff);
	}

	/* Add framebuffer */
	zz9k_fb.zzaa_base = (bus_addr_t)zap->va;
	strcpy(zz9k_fb.zzaa_name, "zz9k_fb");
	config_found(sc->sc_dev, &zz9k_fb, zz9k_print, CFARGS_NONE);

	/* Add zz* ethernet interface */
	zz9k_if.zzaa_base = (bus_addr_t)zap->va;
	strcpy(zz9k_if.zzaa_name, "zz9k_if");
	config_found(sc->sc_dev, &zz9k_if, zz9k_print, CFARGS_NONE);

	/* Add AX audio interface */
	zz9k_ax.zzaa_base = (bus_addr_t)zap->va;
	strcpy(zz9k_ax.zzaa_name, "zz9k_ax");
	config_found(sc->sc_dev, &zz9k_ax, zz9k_print, CFARGS_NONE);

	/* Add USB interface */
	zz9k_usb.zzaa_base = (bus_addr_t)zap->va;
	strcpy(zz9k_usb.zzaa_name, "zz9k_usb");
	config_found(sc->sc_dev, &zz9k_usb, zz9k_print, CFARGS_NONE);
}

static int
zz9k_print(void *aux, const char *pnp)
{
	return 0;
}