/*      $NetBSD: cpu.c,v 1.28 2022/03/03 06:27:03 riastradh Exp $       */

/*
 * Copyright (c) 2000 Soren S. Jorvang
 * Copyright (c) 2001 Jason R. Thorpe.
 * Copyright (c) 2004 Christopher SEKIYA
 * 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. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *          This product includes software developed for the
 *          NetBSD Project.  See http://www.NetBSD.org/ for
 *          information about NetBSD.
 * 4. 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.
 */

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: cpu.c,v 1.28 2022/03/03 06:27:03 riastradh Exp $");

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

#include <uvm/uvm_extern.h>

#include <machine/locore.h>
#include <machine/psl.h>
#include <machine/autoconf.h>
#include <machine/machtype.h>
#include <machine/sysconf.h>

#include <dev/arcbios/arcbios.h>
#include <dev/arcbios/arcbiosvar.h>

static int      cpu_match(device_t, cfdata_t, void *);
static void     cpu_attach(device_t, device_t, void *);
void            cpu_intr(int, vaddr_t, uint32_t);
void            *cpu_intr_establish(int, int, int (*func)(void *), void *);

static struct evcnt mips_int0_evcnt =
        EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, "mips", "int 0");

static struct evcnt mips_int1_evcnt =
        EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, "mips", "int 1");

static struct evcnt mips_int2_evcnt =
        EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, "mips", "int 2");

static struct evcnt mips_int3_evcnt =
        EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, "mips", "int 3");

static struct evcnt mips_int4_evcnt =
        EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, "mips", "int 4");

static struct evcnt mips_int5_evcnt =
        EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, "mips", "int 5");

CFATTACH_DECL_NEW(cpu, 0,
    cpu_match, cpu_attach, NULL, NULL);

static int
cpu_match(device_t parent, cfdata_t cf, void *aux)
{
        return 1;
}

static void
cpu_attach(device_t parent, device_t self, void *aux)
{
        struct cpu_info * const ci = curcpu();

        ci->ci_dev = self;
        device_set_private(self, ci);

        aprint_normal(": ");
        cpu_identify(self);
}

/*
 * NB: Do not re-enable interrupts here -- reentrancy here can cause all
 * sorts of Bad Things(tm) to happen, including kernel stack overflows.
 */
void
cpu_intr(int ppl, vaddr_t pc, uint32_t status)
{
        uint32_t pending;
        int ipl;

        curcpu()->ci_data.cpu_nintr++;

#if !defined(__mips_o32)
        KASSERTMSG(mips_cp0_status_read() & MIPS_SR_KX,
                   "pc %"PRIxVADDR ", status %x\n", pc, status);
#endif

        (void)(*platform.watchdog_reset)();

        while (ppl < (ipl = splintr(&pending))) {
                splx(ipl);              /* enable interrupts */

                if (pending & MIPS_INT_MASK_5) {
                        (void)(*platform.intr5)(pc, status, pending);
                        mips_int5_evcnt.ev_count++;
                }

                if (pending & MIPS_INT_MASK_4) {
                        (void)(*platform.intr4)(pc, status, pending);
                        mips_int4_evcnt.ev_count++;
                }

                if (pending & MIPS_INT_MASK_3) {
                        (void)(*platform.intr3)(pc, status, pending);
                        mips_int3_evcnt.ev_count++;
                }

                if (pending & MIPS_INT_MASK_2) {
                        (void)(*platform.intr2)(pc, status, pending);
                        mips_int2_evcnt.ev_count++;
                }

                if (pending & MIPS_INT_MASK_1) {
                        (void)(*platform.intr1)(pc, status, pending);
                        mips_int1_evcnt.ev_count++;
                }

                if (pending & MIPS_INT_MASK_0) {  
                        (void)(*platform.intr0)(pc, status, pending);
                        mips_int0_evcnt.ev_count++;
                }
                (void)splhigh();
        }
}

void *
cpu_intr_establish(int level, int ipl, int (*func)(void *), void *arg)
{
        (*platform.intr_establish)(level, ipl, func, arg);
        return (void *) -1;
}

#ifdef MIPS1
void
mips1_fpu_intr(vaddr_t pc, uint32_t status, uint32_t pending)
{
        if (!USERMODE(status))
                panic("kernel used FPU: PC 0x%08x, SR 0x%08x",
                    pc, status);

#if !defined(NOFPU) && !defined(FPEMUL)
        mips_fpu_intr(pc, curlwp->l_md.md_utf);
#endif
}
#endif