* Copyright (C) 2005 Michael Lorenz.

/* $NetBSD: uni-n.c,v 1.13 2022/12/28 07:18:29 macallan Exp $ */

/*-
* Copyright (C) 2005 Michael Lorenz.
*
* 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. The name of the author may not be used to endorse or promote products
* derived from this software without specific prior written permission.
*
* 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.
*/

/*
* a driver to match the uni_n node in OF's device tree and attach its children
*/

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: uni-n.c,v 1.13 2022/12/28 07:18:29 macallan Exp $");

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/device.h>

#include <dev/ofw/openfirm.h>
#include <dev/ofw/ofw_pci.h>

#include <machine/autoconf.h>

#include "fcu.h"

static void uni_n_attach(device_t, device_t, void *);
static int uni_n_match(device_t, cfdata_t, void *);
static int uni_n_print(void *, const char *);

struct uni_n_softc {
device_t sc_dev;
struct powerpc_bus_space sc_memt;
int sc_node;
};

CFATTACH_DECL_NEW(uni_n, sizeof(struct uni_n_softc),
uni_n_match, uni_n_attach, NULL, NULL);

#if NFCU > 0
/* storage for CPUID SEEPROM contents found on some G5 */
static uint8_t eeprom[2][160];
#endif

static const char *skiplist[] = {
"openpic",
"chrp,open-pic",
"open-pic",
"mpic",
"dart",
"u3-dart",
"u4-dart",
NULL
};

int
uni_n_match(device_t parent, cfdata_t cf, void *aux)
{
struct confargs *ca = aux;
char compat[32];
if ((strcmp(ca->ca_name, "uni-n") != 0) &&
(strcmp(ca->ca_name, "u4") != 0) &&
(strcmp(ca->ca_name, "u3") != 0))
return 0;

memset(compat, 0, sizeof(compat));
#if 0
OF_getprop(ca->ca_node, "compatible", compat, sizeof(compat));
if (strcmp(compat, "uni-north") != 0)
return 0;
#endif
return 1;
}

/*
* Attach all the sub-devices we can find
*/
void
uni_n_attach(device_t parent, device_t self, void *aux)
{
struct uni_n_softc *sc = device_private(self);
struct confargs *our_ca = aux;
struct confargs ca;
int node, child, namelen;
#if NFCU > 0
int cpuid;
#endif
u_int reg[20];
int intr[6];
char name[32];

sc->sc_dev = self;
node = our_ca->ca_node;
sc->sc_node = node;
printf(" address 0x%08x\n",
our_ca->ca_reg[our_ca->ca_nreg > 8 ? 1 : 0]);

#if NFCU > 0
/*
* zero out eeprom blocks, then see if we have valid data
* doing this here because the EEPROMs are dangling from our i2c bus
* but we can get all the data just from looking at the properties
*/
memset(eeprom, 0, sizeof(eeprom));
cpuid = OF_finddevice("/u3/i2c/cpuid@a0");
OF_getprop(cpuid, "cpuid", eeprom[0], sizeof(eeprom[0]));
if (eeprom[0][1] != 0)
aprint_normal_dev(self, "found EEPROM data for CPU 0\n");

cpuid = OF_finddevice("/u3/i2c/cpuid@a2");
OF_getprop(cpuid, "cpuid", eeprom[1], sizeof(eeprom[1]));
if (eeprom[1][1] != 0)
aprint_normal_dev(self, "found EEPROM data for CPU 1\n");
#endif

memset(&sc->sc_memt, 0, sizeof(struct powerpc_bus_space));
sc->sc_memt.pbs_flags = _BUS_SPACE_LITTLE_ENDIAN|_BUS_SPACE_MEM_TYPE;
if (ofwoea_map_space(RANGE_TYPE_MACIO, RANGE_MEM, node, &sc->sc_memt,
"uni-n mem-space") != 0) {
panic("Can't init uni-n mem tag");
}

devhandle_t selfh = device_handle(self);
for (child = OF_child(node); child; child = OF_peer(child)) {
if (of_compatible(child, skiplist)) continue;
namelen = OF_getprop(child, "name", name, sizeof(name));
if (namelen < 0)
continue;
if (namelen >= sizeof(name))
continue;

name[namelen] = 0;
ca.ca_name = name;
ca.ca_node = child;
ca.ca_tag = &sc->sc_memt;
ca.ca_nreg = OF_getprop(child, "reg", reg, sizeof(reg));
ca.ca_nintr = OF_getprop(child, "AAPL,interrupts", intr,
sizeof(intr));
if (ca.ca_nintr == -1)
ca.ca_nintr = OF_getprop(child, "interrupts", intr,
sizeof(intr));

ca.ca_reg = reg;
ca.ca_intr = intr;
config_found(self, &ca, uni_n_print,
CFARGS(.devhandle = devhandle_from_of(selfh, child)));
}
}

int
uni_n_print(void *aux, const char *uni_n)
{
struct confargs *ca = aux;
if (uni_n)
aprint_normal("%s at %s", ca->ca_name, uni_n);

if (ca->ca_nreg > 0)
aprint_normal(" address 0x%x", ca->ca_reg[0]);

return UNCONF;
}

#if NFCU > 0
int
get_cpuid(int cpu, uint8_t *buf)
{
if ((cpu < 0) || (cpu > 1)) return -1;
if (eeprom[cpu][1] == 0) return 0;
memcpy(buf, eeprom[cpu], sizeof(eeprom[cpu]));
return sizeof(eeprom[cpu]);
}
#endif