Subversion Repositories or1k

/* pic.c -- Simulation of OpenRISC 1000 programmable interrupt controller

   Copyright (C) 1999 Damjan Lampret, lampret@opencores.org

This file is part of OpenRISC 1000 Architectural Simulator.

This program is free software; you can redistribute it and/or modify

it under the terms of the GNU General Public License as published by

the Free Software Foundation; either version 2 of the License, or

(at your option) any later version.

This program is distributed in the hope that it will be useful,

but WITHOUT ANY WARRANTY; without even the implied warranty of

MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

GNU General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */

/* This is functional simulation of OpenRISC 1000 architectural

   programmable interrupt controller.

*/

#include <stdlib.h>

#include <stdio.h>

#include <string.h>

#include "pic.h"

#include "spr_defs.h"

#include "except.h"

#include "sprs.h"

extern int cont_run;

/* Reset. It initializes PIC registers. */

void pic_reset()

{

        printf("Resetting PIC.\n");

        mtspr(SPR_PICMR, 0);

        mtspr(SPR_PICPR, 0);

        mtspr(SPR_PICSR, 0);

}

/* Simulation hook. Must be called every clock cycle to simulate PIC

   It does internal functional PIC simulation. */

void pic_clock()

{

  unsigned long picsr;

  unsigned long picpr;

  unsigned long sr;

  /* CZ 020901: Someone had previously noted that this routine was

     wrong, and there were 2 sets of code, one commented out, and

     both were broken. I have rewritten this so it works as I think

     it should. Someone needs to correct this if there is something

     I am missing... */

  /* From Sections 16.3 & 16.4, bits 0 & 1 are reserved */

  picsr = mfspr(SPR_PICSR) & 0xFFFFFFFC;

  picpr = mfspr(SPR_PICPR) & 0xFFFFFFFC;

  sr = mfspr(SPR_SR);

  /* Don't do anything if interrupts not currently enabled */

  if((sr & (SPR_SR_EIR | SPR_SR_EXR)) != (SPR_SR_EIR | SPR_SR_EXR))

    return;

  if(picsr & picpr) /* Report High Priority Interrupts first */

    except_handle(EXCEPT_HPINT, 0);

  else if(picsr)    /* Report a Low Priority Interrupt otherwise */

    except_handle(EXCEPT_LPINT, 0);

#if 0  /* CZ -- both of these routines are broken */

  /* SIMON: This is a bug */

  /* if (picsr & picpr) {

    if ((mfspr(SPR_SR) & (SPR_SR_EIR | SPR_SR_EXR)) == (SPR_SR_EIR | SPR_SR_EXR)

)

      except_handle(EXCEPT_HPINT, 0);

  } else

    if ((mfspr(SPR_SR) & (SPR_SR_EIR | SPR_SR_EXR)) == (SPR_SR_EIR | SPR_SR_EXR)

)

      except_handle(EXCEPT_LPINT, 0);

  */

  if ((picsr & (SPR_SR_EIR | SPR_SR_EXR)) == (SPR_SR_EIR | SPR_SR_EXR)) {

    if (picsr & picpr) {

      except_handle(EXCEPT_HPINT, 0);

    } else if(picsr) {

      except_handle(EXCEPT_LPINT, 0);

    }

  }

#endif

}

/* Asserts interrupt to the PIC. */

void report_interrupt(int line)

{

        setsprbits(SPR_PMR, SPR_PMR_DME, 0); /* Disable doze mode */

        setsprbits(SPR_PMR, SPR_PMR_SME, 0); /* Disable sleep mode */

        printf("Asserting interrupt %d.\n", line);

        if (getsprbit(SPR_PICMR, line) || line < 2)

                setsprbit(SPR_PICSR, line, 1);

}