/*      $NetBSD: gt_mainbus.c,v 1.18 2013/04/21 15:42:11 kiyohara Exp $ */

/*
* Copyright (c) 2002 Wasabi Systems, Inc.
* All rights reserved.
*
* Written by Allen Briggs 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: gt_mainbus.c,v 1.18 2013/04/21 15:42:11 kiyohara Exp $");

#include "opt_ev64260.h"
#include "opt_pci.h"
#include "pci.h"

#include <sys/types.h>
#include <sys/param.h>
#include <sys/device.h>
#include <sys/errno.h>
#include <sys/extent.h>

#define _POWERPC_BUS_DMA_PRIVATE
#include <sys/bus.h>

#include "opt_pci.h"
#include <dev/pci/pcivar.h>
#include <dev/pci/pciconf.h>

#include "opt_marvell.h"
#include <dev/marvell/gtreg.h>
#include <dev/marvell/gtvar.h>
#include <dev/marvell/gtintrreg.h>
#include <dev/marvell/gtpcireg.h>
#include <dev/marvell/gtpcivar.h>
#include <dev/marvell/marvellvar.h>
#include <dev/marvell/gtsdmareg.h>
#include <dev/marvell/gtmpscreg.h>
#ifdef MPSC_CONSOLE
#include <dev/marvell/gtmpscvar.h>
#endif

#include <evbppc/ev64260/ev64260.h>

#include <powerpc/pic/picvar.h>


static int gt_match(device_t, cfdata_t, void *);
static void gt_attach(device_t, device_t, void *);

void gtpci_md_conf_interrupt(void *, int, int, int, int, int *);
int gtpci_md_conf_hook(void *, int, int, int, pcireg_t);

CFATTACH_DECL_NEW(gt, sizeof(struct gt_softc), gt_match, gt_attach, NULL, NULL);

struct gtpci_prot gtpci_prot = {
       GTPCI_GT64260_ACBL_PCISWAP_NOSWAP       |
       GTPCI_GT64260_ACBL_WBURST_8_QW          |
       GTPCI_GT64260_ACBL_RDMULPREFETCH        |
       GTPCI_GT64260_ACBL_RDLINEPREFETCH       |
       GTPCI_GT64260_ACBL_RDPREFETCH           |
       GTPCI_GT64260_ACBL_PREFETCHEN,
       0,
};

int
gt_match(device_t parent, cfdata_t cf, void *aux)
{
       struct mainbus_attach_args *mba = aux;

       if (strcmp(mba->mba_name, "gt") != 0)
               return 0;

       return 1;
}

void
gt_attach(device_t parent, device_t self, void *aux)
{
       extern struct powerpc_bus_space ev64260_gt_bs_tag;
       extern struct powerpc_bus_dma_tag ev64260_bus_dma_tag;
       struct mainbus_attach_args *mba = aux;
       struct gt_softc *sc = device_private(self);
       uint32_t cpumstr, cr, r;

       sc->sc_dev = self;
       sc->sc_addr = mba->mba_addr;
       sc->sc_iot = &ev64260_gt_bs_tag;
       sc->sc_dmat = &ev64260_bus_dma_tag;

#ifdef MPSC_CONSOLE
       {
               /* First, unmap already mapped console space. */
               gtmpsc_softc_t *gtmpsc = &gtmpsc_cn_softc;

               bus_space_unmap(gtmpsc->sc_iot, gtmpsc->sc_mpsch, GTMPSC_SIZE);
               bus_space_unmap(gtmpsc->sc_iot, gtmpsc->sc_sdmah, GTSDMA_SIZE);
       }
#endif
       if (bus_space_map(sc->sc_iot, sc->sc_addr, GT_SIZE, 0, &sc->sc_ioh) !=
           0) {
               aprint_error_dev(self, "registers map failed\n");
               return;
       }
#ifdef MPSC_CONSOLE
       {
               /* Next, remap console space. */
               gtmpsc_softc_t *gtmpsc = &gtmpsc_cn_softc;

               if (bus_space_subregion(sc->sc_iot, sc->sc_ioh,
                   GTMPSC_BASE(gtmpsc->sc_unit), GTMPSC_SIZE,
                   &gtmpsc->sc_mpsch)) {
                       aprint_error_dev(self, "Cannot map MPSC registers\n");
                       return;
               }
               if (bus_space_subregion(sc->sc_iot, sc->sc_ioh,
                   GTSDMA_BASE(gtmpsc->sc_unit), GTSDMA_SIZE,
                   &gtmpsc->sc_sdmah)) {
                       aprint_error_dev(self, "Cannot map SDMA registers\n");
                       return;
               }
       }
#endif

       /*
        * Set MPSC Routing:
        *      MR0 --> Serial Port 0
        *      MR1 --> Serial Port 1
        */
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, GTMPSC_MRR, GTMPSC_MRR_RES);

       /*
        * RX and TX Clock Routing:
        *      CRR0 --> BRG0
        *      CRR1 --> BRG1
        */
       cr = GTMPSC_CRR(0, GTMPSC_CRR_BRG0) | GTMPSC_CRR(1, GTMPSC_CRR_BRG1);
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, GTMPSC_RCRR, cr);
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, GTMPSC_TCRR, cr);

       /*
        * Setup Multi-Purpose Pins (MPP).
        *   Change to GPP.
        *     GPP 21 (DUART channel A intr)
        *     GPP 22 (DUART channel B intr)
        *     GPP 26 (RTC INT)
        *     GPP 27 (PCI 0 INTA)
        *     GPP 29 (PCI 1 INTA)
        */
#define PIN2SHIFT(pin)  ((pin % 8) * 4)
       r = bus_space_read_4(sc->sc_iot, sc->sc_ioh, GT_MPP_Control2);
       r |= ((0xf << PIN2SHIFT(21)) | (0xf << PIN2SHIFT(22)));
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, GT_MPP_Control2, r);
       r = bus_space_read_4(sc->sc_iot, sc->sc_ioh, GT_MPP_Control3);
       r |= ((0xf << PIN2SHIFT(26)));
       r |= ((0xf << PIN2SHIFT(27)) | (0xf << PIN2SHIFT(29)));
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, GT_MPP_Control3, r);

       /* Also configure GPP. */
#define GPP_EXTERNAL_INTERRUPS \
           ((1 << 21) | (1 << 22) | (1 << 26) | (1 << 27) | (1 << 29))
       r = bus_space_read_4(sc->sc_iot, sc->sc_ioh, GT_GPP_IO_Control);
       r &= ~GPP_EXTERNAL_INTERRUPS;
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, GT_GPP_IO_Control, r);
       r = bus_space_read_4(sc->sc_iot, sc->sc_ioh, GT_GPP_Level_Control);
       r |= GPP_EXTERNAL_INTERRUPS;
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, GT_GPP_Level_Control, r);

       /* clear interrupts */
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, ICR_CIM_LO, 0);
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, ICR_CIM_HI, 0);
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, GT_GPP_Interrupt_Cause,
           ~GPP_EXTERNAL_INTERRUPS);
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, GT_GPP_Interrupt_Mask,
           GPP_EXTERNAL_INTERRUPS);

       discovery_pic->pic_cookie = sc;
       intr_establish(IRQ_GPP7_0, IST_LEVEL, IPL_HIGH,
           pic_handle_intr, discovery_gpp_pic[0]);
       intr_establish(IRQ_GPP15_8, IST_LEVEL, IPL_HIGH,
           pic_handle_intr, discovery_gpp_pic[1]);
       intr_establish(IRQ_GPP23_16, IST_LEVEL, IPL_HIGH,
           pic_handle_intr, discovery_gpp_pic[2]);
       intr_establish(IRQ_GPP31_24, IST_LEVEL, IPL_HIGH,
           pic_handle_intr, discovery_gpp_pic[3]);

       cpumstr = bus_space_read_4(sc->sc_iot, sc->sc_ioh, GT_CPU_Master_Ctl);
       cpumstr &= ~(GT_CPUMstrCtl_CleanBlock|GT_CPUMstrCtl_FlushBlock);
       bus_space_write_4(sc->sc_iot, sc->sc_ioh, GT_CPU_Master_Ctl, cpumstr);

       gt_attach_common(sc);
}


void
gtpci_md_conf_interrupt(void *v, int bus, int dev, int pin, int swiz,
                       int *iline)
{
#ifdef PCI_NETBSD_CONFIGURE
       struct gtpci_softc *sc = v;

       *iline = (sc->sc_unit == 0 ? 27 : 29);

#define IRQ_GPP_BASE    (discovery_pic->pic_numintrs);

       if (*iline != 0xff)
               *iline += IRQ_GPP_BASE;
#endif /* PCI_NETBSD_CONFIGURE */
}

int
gtpci_md_conf_hook(void *v, int bus, int dev, int func, pcireg_t id)
{
       struct gtpci_softc *sc = v;

       return gtpci_conf_hook(sc->sc_pc, bus, dev, func, id);
}


void *
marvell_intr_establish(int irq, int ipl, int (*func)(void *), void *arg)
{

       /* pass through */
       return intr_establish(irq, IST_LEVEL, ipl, func, arg);
}