/* $NetBSD: ifpga.c,v 1.31 2022/09/27 06:12:19 skrll Exp $ */
/*
* Copyright (c) 2001 ARM Ltd
* 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.
* 3. The name of the company 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 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.
*/
/*
* Integrator FPGA core logic support.
*
* The integrator board supports the core logic in an FPGA which is loaded
* at POR with a custom design. This code supports the default logic as the
* board is shipped.
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: ifpga.c,v 1.31 2022/09/27 06:12:19 skrll Exp $");
#include <sys/param.h>
#include <sys/types.h>
#include <sys/device.h>
#include <sys/systm.h>
#include <sys/kmem.h>
#include <sys/null.h>
#include <dev/pci/pcivar.h>
#include <dev/pci/pciconf.h>
#include <arm/cpufunc.h>
#include "opt_pci.h"
#include "pci.h"
#include <evbarm/ifpga/ifpgamem.h>
#include <evbarm/ifpga/ifpgavar.h>
#include <evbarm/ifpga/ifpgareg.h>
#include <evbarm/ifpga/ifpga_pcivar.h>
#include <evbarm/dev/v360reg.h>
#include <evbarm/integrator/int_bus_dma.h>
#include "locators.h"
/* Prototypes */
static int ifpga_match (device_t, cfdata_t, void *);
static void ifpga_attach (device_t, device_t, void *);
static int ifpga_print (void *, const char *);
/* Drive and attach structures */
CFATTACH_DECL_NEW(ifpga, sizeof(struct ifpga_softc),
ifpga_match, ifpga_attach, NULL, NULL);
int ifpga_found;
/* Default UART clock speed (we should make this a boot option). */
int ifpga_uart_clk = IFPGA_UART_CLK;
#if NPCI > 0
/* PCI handles */
extern struct arm32_pci_chipset ifpga_pci_chipset;
extern struct arm32_bus_dma_tag ifpga_pci_bus_dma_tag;
static struct bus_space ifpga_pci_io_tag;
static struct bus_space ifpga_pci_mem_tag;
#endif /* NPCI > 0 */
extern struct bus_space ifpga_common_bs_tag;
struct ifpga_softc *ifpga_sc;
device_t ifpga_dev;
/*
* Print the configuration information for children
*/
static int
ifpga_print(void *aux, const char *pnp)
{
struct ifpga_attach_args *ifa = aux;
if (ifa->ifa_addr != -1)
aprint_normal(" addr 0x%lx", (unsigned long)ifa->ifa_addr);
if (ifa->ifa_irq != -1)
aprint_normal(" irq %d", ifa->ifa_irq);
return UNCONF;
}
static int
ifpga_search(device_t parent, cfdata_t cf, const int *ldesc, void *aux)
{
struct ifpga_softc *sc = device_private(parent);
struct ifpga_attach_args ifa;
int tryagain;
do {
ifa.ifa_iot = sc->sc_iot;
ifa.ifa_addr = cf->cf_iobase;
ifa.ifa_irq = cf->cf_irq;
ifa.ifa_sc_ioh = sc->sc_sc_ioh;
tryagain = 0;
if (config_probe(parent, cf, &ifa)) {
config_attach(parent, cf, &ifa, ifpga_print, CFARGS_NONE);
tryagain = (cf->cf_fstate == FSTATE_STAR);
}
} while (tryagain);
return 0;
}
static int
ifpga_match(device_t parent, cfdata_t cf, void *aux)
{
#if 0
struct mainbus_attach_args *ma = aux;
/* Make sure that we're looking for the IFPGA. */
if (strcmp(ma->ma_name, ifpga_md.md_name))
return 0;
#endif
/* We can only have one instance of the IFPGA. */
if (ifpga_found)
return 0;
return 1;
}
static void
ifpga_attach(device_t parent, device_t self, void *aux)
{
struct ifpga_softc *sc = device_private(self);
u_int id, sysclk;
extern struct bus_space ifpga_common_bs_tag;
#if defined(PCI_NETBSD_CONFIGURE) && NPCI > 0
struct pciconf_resources *pcires;
struct ifpga_pci_softc *pci_sc;
struct pcibus_attach_args pci_pba;
#endif
ifpga_intr_init();
ifpga_found = 1;
#if NPCI > 0
/* But the PCI config space is quite large, so we have a linear region
for that pre-allocated. */
ifpga_create_io_bs_tag(&ifpga_pci_io_tag, (void *)IFPGA_PCI_IO_VBASE);
ifpga_create_mem_bs_tag(&ifpga_pci_mem_tag, (void *)0);
#endif
sc->sc_iot = &ifpga_common_bs_tag;
ifpga_dev = self;
ifpga_sc = sc;
/* Now map in the IFPGA motherboard registers. */
if (bus_space_map(sc->sc_iot, IFPGA_IO_SC_BASE, IFPGA_IO_SC_SIZE, 0,
&sc->sc_sc_ioh))
panic("%s: Cannot map system controller registers",
device_xname(self));
id = bus_space_read_4(sc->sc_iot, sc->sc_sc_ioh, IFPGA_SC_ID);
printf(": Build %d, ", (id & IFPGA_SC_ID_BUILD_MASK) >>
IFPGA_SC_ID_BUILD_SHIFT);
switch (id & IFPGA_SC_ID_REV_MASK)
{
case IFPGA_SC_ID_REV_A:
printf("Rev A, ");
break;
case IFPGA_SC_ID_REV_B:
printf("Rev B, ");
break;
}
printf("Manufacturer ");
switch (id & IFPGA_SC_ID_MAN_MASK)
{
case IFPGA_SC_ID_MAN_ARM:
printf("ARM Ltd,");
break;
default:
printf("Unknown,");
break;
}
switch (id & IFPGA_SC_ID_ARCH_MASK)
{
case IFPGA_SC_ID_ARCH_ASBLE:
printf(" ASB, Little-endian,");
break;
case IFPGA_SC_ID_ARCH_AHBLE:
printf(" AHB, Little-endian,");
break;
default:
panic(" Unsupported bus");
}
printf("\n%s: FPGA ", device_xname(self));
switch (id & IFPGA_SC_ID_FPGA_MASK)
{
case IFPGA_SC_ID_FPGA_XC4062:
printf("XC4062");
break;
case IFPGA_SC_ID_FPGA_XC4085:
printf("XC4085");
break;
default:
printf("unknown");
break;
}
sysclk = bus_space_read_1(sc->sc_iot, sc->sc_sc_ioh, IFPGA_SC_OSC);
sysclk &= IFPGA_SC_OSC_S_VDW;
sysclk += 8;
printf(", SYSCLK %d.%02dMHz", sysclk >> 2, (sysclk & 3) * 25);
/* Map the Interrupt controller */
if (bus_space_map(sc->sc_iot, IFPGA_IO_IRQ_BASE, IFPGA_IO_IRQ_SIZE,
BUS_SPACE_MAP_LINEAR, &sc->sc_irq_ioh))
panic("%s: Cannot map irq controller registers",
device_xname(self));
/* We can write to the IRQ/FIQ controller now. */
ifpga_intr_postinit();
/* Map the core module */
if (bus_space_map(sc->sc_iot, IFPGA_IO_CM_BASE, IFPGA_IO_CM_SIZE, 0,
&sc->sc_cm_ioh)) {
panic("%s: Cannot map core module registers",
device_xname(self));
}
/* Map the timers */
if (bus_space_map(sc->sc_iot, IFPGA_IO_TMR_BASE, IFPGA_IO_TMR_SIZE, 0,
&sc->sc_tmr_ioh))
panic("%s: Cannot map timer registers", device_xname(self));
printf("\n");
#if NPCI > 0
pci_sc = kmem_alloc(sizeof(*pci_sc), KM_SLEEP);
pci_sc->sc_iot = &ifpga_pci_io_tag;
pci_sc->sc_memt = &ifpga_pci_mem_tag;
if (bus_space_map(pci_sc->sc_iot, 0, IFPGA_PCI_IO_VSIZE, 0,
&pci_sc->sc_io_ioh)
|| bus_space_map(pci_sc->sc_iot,
IFPGA_PCI_CONF_VBASE - IFPGA_PCI_IO_VBASE, IFPGA_PCI_CONF_VSIZE, 0,
&pci_sc->sc_conf_ioh)
|| bus_space_map(pci_sc->sc_memt, IFPGA_V360_REG_BASE,
IFPGA_V360_REG_SIZE, 0, &pci_sc->sc_reg_ioh))
panic("%s: Cannot map pci memory", device_xname(self));
{
pcireg_t id_reg, class_reg;
char buf[1000];
id_reg = bus_space_read_4(pci_sc->sc_memt, pci_sc->sc_reg_ioh,
V360_PCI_VENDOR);
class_reg = bus_space_read_4(pci_sc->sc_memt,
pci_sc->sc_reg_ioh, V360_PCI_CC_REV);
pci_devinfo(id_reg, class_reg, 1, buf, sizeof(buf));
printf("%s: %s\n", device_xname(self), buf);
}
#if defined(PCI_NETBSD_CONFIGURE)
pcires = pciconf_resource_init();
pciconf_resource_add(pcires, PCICONF_RESOURCE_IO,
0x00000000, IFPGA_PCI_IO_VSIZE);
pciconf_resource_add(pcires, PCICONF_RESOURCE_MEM,
IFPGA_PCI_APP0_BASE, IFPGA_PCI_APP0_SIZE);
pciconf_resource_add(pcires, PCICONF_RESOURCE_PREFETCHABLE_MEM,
IFPGA_PCI_APP1_BASE, IFPGA_PCI_APP1_SIZE);
ifpga_pci_chipset.pc_conf_v = (void *)pci_sc;
pci_configure_bus(&ifpga_pci_chipset, pcires, 0,
arm_dcache_align);
pciconf_resource_fini(pcires);
printf("pci_configure_bus done\n");
#endif /* PCI_NETBSD_CONFIGURE */
#endif /* NPCI > 0 */
/* Finally, search for children. */
config_search(self, NULL,
CFARGS(.search = ifpga_search,
.iattr = "ifpga"));
#if NPCI > 0
integrator_pci_dma_init(&ifpga_pci_bus_dma_tag);
pci_pba.pba_pc = &ifpga_pci_chipset;
pci_pba.pba_iot = &ifpga_pci_io_tag;
pci_pba.pba_memt = &ifpga_pci_mem_tag;
pci_pba.pba_dmat = &ifpga_pci_bus_dma_tag;
pci_pba.pba_dmat64 = NULL;
pci_pba.pba_flags = PCI_FLAGS_IO_OKAY | PCI_FLAGS_MEM_OKAY;
pci_pba.pba_bus = 0;
pci_pba.pba_bridgetag = NULL;
config_found(self, &pci_pba, pcibusprint,
CFARGS(.iattr = "pcibus"));
#endif
}
void
ifpga_reset(void)
{
bus_space_write_1(ifpga_sc->sc_iot, ifpga_sc->sc_sc_ioh,
IFPGA_SC_CTRLS, IFPGA_SC_CTRL_SOFTRESET);
}
