/* $Id: arbus.c,v 1.17 2021/08/07 16:18:58 thorpej Exp $ */
/*
* Copyright (c) 2006 Urbana-Champaign Independent Media Center.
* Copyright (c) 2006 Garrett D'Amore.
* All rights reserved.
*
* This code was written by Garrett D'Amore for the Champaign-Urbana
* Community Wireless Network Project.
*
* 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 acknowledgements:
*      This product includes software developed by the Urbana-Champaign
*      Independent Media Center.
*      This product includes software developed by Garrett D'Amore.
* 4. Urbana-Champaign Independent Media Center's name and Garrett
*    D'Amore's name may not be used to endorse or promote products
*    derived from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE URBANA-CHAMPAIGN INDEPENDENT
* MEDIA CENTER AND GARRETT D'AMORE ``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 URBANA-CHAMPAIGN INDEPENDENT
* MEDIA CENTER OR GARRETT D'AMORE 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: arbus.c,v 1.17 2021/08/07 16:18:58 thorpej Exp $");

#include "locators.h"
#define _MIPS_BUS_DMA_PRIVATE

#include <sys/param.h>
#include <sys/bus.h>
#include <sys/device.h>
#include <sys/extent.h>
#include <sys/kmem.h>
#include <sys/systm.h>

#include <mips/atheros/include/platform.h>
#include <mips/atheros/include/arbusvar.h>

static int arbus_match(device_t, cfdata_t, void *);
static void arbus_attach(device_t, device_t, void *);
static int arbus_print(void *, const char *);
static void arbus_bus_mem_init(bus_space_tag_t, void *);

struct arbus_intrhand {
       int             ih_cirq;
       int             ih_mirq;
       void            *ih_cookie;
};

CFATTACH_DECL_NEW(arbus, 0, arbus_match, arbus_attach, NULL, NULL);

struct mips_bus_space   arbus_mbst;
#if _BYTE_ORDER == _BIG_ENDIAN
struct mips_bus_space   arbus_mbst_le;
#endif
struct mips_bus_dma_tag arbus_mdt = {
       ._dmamap_ops = _BUS_DMAMAP_OPS_INITIALIZER,
       ._dmamem_ops = _BUS_DMAMEM_OPS_INITIALIZER,
       ._dmatag_ops = _BUS_DMATAG_OPS_INITIALIZER,
};

void
arbus_init(void)
{
       static bool done = false;
       if (done)
               return;
       done = true;

       arbus_bus_mem_init(&arbus_mbst, NULL);
#if _BYTE_ORDER == _BIG_ENDIAN
       arbusle_bus_mem_init(&arbus_mbst_le, NULL);
#endif
}

/* this primarily exists so we can get to the console... */
bus_space_tag_t
arbus_get_bus_space_tag(void)
{
       arbus_init();
       return (&arbus_mbst);
}

bus_dma_tag_t
arbus_get_bus_dma_tag(void)
{
       arbus_init();
       return (&arbus_mdt);
}

int
arbus_match(device_t parent, cfdata_t match, void *aux)
{

       return 1;
}

void
arbus_attach(device_t parent, device_t self, void *aux)
{
       aprint_normal("\n");

       arbus_init();

       for (const struct atheros_device *adv = platformsw->apsw_devices;
            adv->adv_name;
            adv++) {
               struct arbus_attach_args aa;
               aa.aa_name = adv->adv_name;
               aa.aa_addr = adv->adv_addr;
               aa.aa_size = adv->adv_size;
               aa.aa_dmat = &arbus_mdt;
               aa.aa_bst = &arbus_mbst;
#if _BYTE_ORDER == _BIG_ENDIAN
               aa.aa_bst_le = &arbus_mbst_le;
#else
               aa.aa_bst_le = &arbus_mbst;
#endif
               aa.aa_cirq = adv->adv_cirq;
               aa.aa_mirq = adv->adv_mirq;

               const int locs[ARBUSCF_NLOCS] = {
                       [ARBUSCF_ADDR] = aa.aa_addr,
               };

               if (atheros_enable_device(adv) != 0) {
                       continue;
               }

               config_found(self, &aa, arbus_print,
                   CFARGS(.submatch = config_stdsubmatch,
                          .locators = locs));
       }
}

int
arbus_print(void *aux, const char *pnp)
{
       struct arbus_attach_args *aa = aux;

       if (pnp)
               aprint_normal("%s at %s", aa->aa_name, pnp);

       if (aa->aa_addr)
               aprint_normal(" addr 0x%" PRIxBUSADDR, aa->aa_addr);

       if (aa->aa_cirq >= 0)
               aprint_normal(" cpu irq %d", aa->aa_cirq);

       if (aa->aa_mirq >= 0)
               aprint_normal(" misc irq %d", aa->aa_mirq);

       return (UNCONF);
}

void *
arbus_intr_establish(int cirq, int mirq, int (*handler)(void *), void *arg)
{

       struct arbus_intrhand * const ih = kmem_zalloc(sizeof(*ih), KM_NOSLEEP);
       if (ih == NULL)
               return NULL;

       ih->ih_cirq = ih->ih_mirq = -1;
       ih->ih_cookie = NULL;

       if (mirq >= 0) {
               ih->ih_mirq = mirq;
               ih->ih_cookie = atheros_misc_intr_establish(mirq, handler, arg);
       } else if (cirq >= 0) {
               ih->ih_cirq = cirq;
               ih->ih_cookie = atheros_cpu_intr_establish(cirq, handler, arg);
       } else
               return ih;

       if (ih->ih_cookie == NULL) {
               kmem_free(ih, sizeof(*ih));
               return NULL;
       }
       return ih;
}

void
arbus_intr_disestablish(void *arg)
{
       struct arbus_intrhand * const ih = arg;
       if (ih->ih_mirq >= 0)
               atheros_misc_intr_disestablish(ih->ih_cookie);
       else if (ih->ih_cirq >= 0)
               atheros_cpu_intr_disestablish(ih->ih_cookie);
       kmem_free(ih, sizeof(*ih));
}

/*
* CPU memory/register stuff
*/

#define CHIP                    arbus
#define CHIP_MEM                /* defined */
#define CHIP_W1_BUS_START(v)    0x00000000UL
#define CHIP_W1_BUS_END(v)      0x1fffffffUL
#define CHIP_W1_SYS_START(v)    CHIP_W1_BUS_START(v)
#define CHIP_W1_SYS_END(v)      CHIP_W1_BUS_END(v)

#include <mips/mips/bus_space_alignstride_chipdep.c>