/*      $NetBSD: i80321_mainbus.c,v 1.3 2012/02/12 16:31:01 matt Exp $  */

/*
 * Copyright (c) 2001, 2002 Wasabi Systems, Inc.
 * All rights reserved.
 *
 * Written by Jason R. Thorpe for Wasabi Systems, Inc.
 *
 * 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. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *      This product includes software developed for the NetBSD Project by
 *      Wasabi Systems, Inc.
 * 4. The name of Wasabi Systems, Inc. may not be used to endorse
 *    or promote products derived from this software without specific prior
 *    written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``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 WASABI SYSTEMS, INC
 * 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: i80321_mainbus.c,v 1.3 2012/02/12 16:31:01 matt Exp $");

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

#include <machine/autoconf.h>
#include <sys/bus.h>

#include <evbarm/hdl_g/hdlgreg.h>
#include <evbarm/hdl_g/hdlgvar.h>

#include <arm/xscale/i80321reg.h>
#include <arm/xscale/i80321var.h>

#include <dev/pci/pcireg.h>
#include <dev/pci/pcidevs.h>

int     hdlg_mainbus_match(device_t, cfdata_t, void *);
void    hdlg_mainbus_attach(device_t, device_t, void *);

CFATTACH_DECL_NEW(iopxs_mainbus, sizeof(struct i80321_softc),
    hdlg_mainbus_match, hdlg_mainbus_attach, NULL, NULL);

/* There can be only one. */
int     hdlg_mainbus_found;

int
hdlg_mainbus_match(device_t parent, cfdata_t cf, void *aux)
{

        if (hdlg_mainbus_found)
                return 0;
        return 1;
}

void
hdlg_mainbus_attach(device_t parent, device_t self, void *aux)
{
        struct i80321_softc *sc = device_private(self);
        pcireg_t b0u, b0l, b1u, b1l;
        paddr_t memstart;
        psize_t memsize;

        hdlg_mainbus_found = 1;
        sc->sc_dev = self;

        /*
         * Fill in the space tag for the i80321's own devices,
         * and hand-craft the space handle for it (the device
         * was mapped during early bootstrap).
         */
        i80321_bs_init(&i80321_bs_tag, sc);
        sc->sc_st = &i80321_bs_tag;
        sc->sc_sh = HDLG_80321_VBASE;

        /*
         * Slice off a subregion for the Memory Controller -- we need it
         * here in order read the memory size.
         */
        if (bus_space_subregion(sc->sc_st, sc->sc_sh, VERDE_MCU_BASE,
            VERDE_MCU_SIZE, &sc->sc_mcu_sh))
                panic("%s: unable to subregion MCU registers",
                    device_xname(sc->sc_dev));

        if (bus_space_subregion(sc->sc_st, sc->sc_sh, VERDE_ATU_BASE,
            VERDE_ATU_SIZE, &sc->sc_atu_sh))
                panic("%s: unable to subregion ATU registers",
                    device_xname(sc->sc_dev));

        /*
         * We have mapped the PCI I/O windows in the early bootstrap phase.
         */
        sc->sc_iow_vaddr = HDLG_IOW_VBASE;

        /*
         * Check the configuration of the ATU to see if another BIOS
         * has configured us.  If a PC BIOS didn't configure us, then:
         *      IQ80321: BAR0 00000000.0000000c BAR1 is 00000000.8000000c.
         *      IQ31244: BAR0 00000000.00000004 BAR1 is 00000000.0000000c.
         * If a BIOS has configured us, at least one of those should be
         * different.  This is pretty fragile, but it's not clear what
         * would work better.
         */
        b0l = bus_space_read_4(sc->sc_st, sc->sc_atu_sh, PCI_MAPREG_START+0x0);
        b0u = bus_space_read_4(sc->sc_st, sc->sc_atu_sh, PCI_MAPREG_START+0x4);
        b1l = bus_space_read_4(sc->sc_st, sc->sc_atu_sh, PCI_MAPREG_START+0x8);
        b1u = bus_space_read_4(sc->sc_st, sc->sc_atu_sh, PCI_MAPREG_START+0xc);
        b0l &= PCI_MAPREG_MEM_ADDR_MASK;
        b0u &= PCI_MAPREG_MEM_ADDR_MASK;
        b1l &= PCI_MAPREG_MEM_ADDR_MASK;
        b1u &= PCI_MAPREG_MEM_ADDR_MASK;

        if ((b0u != b1u) || (b0l != 0) || ((b1l & ~0x80000000U) != 0))
                sc->sc_is_host = 0;
        else
                sc->sc_is_host = 1;

        aprint_naive(": i80219 I/O Processor\n");
        aprint_normal(": i80219 I/O Processor, acting as PCI %s\n",
            sc->sc_is_host ? "host" : "slave");

        i80321_intr_evcnt_attach();

        i80321_sdram_bounds(sc->sc_st, sc->sc_mcu_sh, &memstart, &memsize);

        /*
         * We set up the Inbound Windows as follows:
         *
         *      0       Access to i80219 PMMRs
         *
         *      1       Reserve space for private devices
         *
         *      2       RAM access
         *
         *      3       Unused.
         *
         * This chunk needs to be customized for each IOP321 application.
         */
#if 0
        sc->sc_iwin[0].iwin_base_lo = VERDE_PMMR_BASE;
        sc->sc_iwin[0].iwin_base_hi = 0;
        sc->sc_iwin[0].iwin_xlate = VERDE_PMMR_BASE;
        sc->sc_iwin[0].iwin_size = VERDE_PMMR_SIZE;
#endif

        if (sc->sc_is_host) {
                /* Map PCI:Local 1:1. */
                sc->sc_iwin[1].iwin_base_lo = VERDE_OUT_XLATE_MEM_WIN0_BASE |
                    PCI_MAPREG_MEM_PREFETCHABLE_MASK |
                    PCI_MAPREG_MEM_TYPE_64BIT;
                sc->sc_iwin[1].iwin_base_hi = 0;
        } else {
                sc->sc_iwin[1].iwin_base_lo = 0;
                sc->sc_iwin[1].iwin_base_hi = 0;
        }
        sc->sc_iwin[1].iwin_xlate = VERDE_OUT_XLATE_MEM_WIN0_BASE;
        sc->sc_iwin[1].iwin_size = VERDE_OUT_XLATE_MEM_WIN_SIZE;

        if (sc->sc_is_host) {
                sc->sc_iwin[2].iwin_base_lo = memstart |
                    PCI_MAPREG_MEM_PREFETCHABLE_MASK |
                    PCI_MAPREG_MEM_TYPE_64BIT;
                sc->sc_iwin[2].iwin_base_hi = 0;
        } else {
                sc->sc_iwin[2].iwin_base_lo = 0;
                sc->sc_iwin[2].iwin_base_hi = 0;
        }
        sc->sc_iwin[2].iwin_xlate = memstart;
        sc->sc_iwin[2].iwin_size = memsize;

        if (sc->sc_is_host) {
                sc->sc_iwin[3].iwin_base_lo = 0 |
                    PCI_MAPREG_MEM_PREFETCHABLE_MASK |
                    PCI_MAPREG_MEM_TYPE_64BIT;
        } else {
                sc->sc_iwin[3].iwin_base_lo = 0;
        }
        sc->sc_iwin[3].iwin_base_hi = 0;
        sc->sc_iwin[3].iwin_xlate = 0;
        sc->sc_iwin[3].iwin_size = 0;

        /*
         * We set up the Outbound Windows as follows:
         *
         *      0       Access to private PCI space.
         *
         *      1       Unused.
         */
        sc->sc_owin[0].owin_xlate_lo =
            PCI_MAPREG_MEM_ADDR(sc->sc_iwin[1].iwin_base_lo);
        sc->sc_owin[0].owin_xlate_hi = sc->sc_iwin[1].iwin_base_hi;

        /*
         * Set the Secondary Outbound I/O window to map
         * to PCI address 0 for all 64K of the I/O space.
         */
        sc->sc_ioout_xlate = 0;
        sc->sc_ioout_xlate_offset = 0x1000;

        /*
         * Initialize the interrupt part of our PCI chipset tag.
         */
        hdlg_pci_init(&sc->sc_pci_chipset, sc);

        i80321_attach(sc);
}