OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [tags/] [nog_patch_68/] [or1ksim/] [pic/] [pic.c] - Diff between revs 409 and 557

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 409 Rev 557
/* pic.c -- Simulation of OpenRISC 1000 programmable interrupt controller
/* pic.c -- Simulation of OpenRISC 1000 programmable interrupt controller
   Copyright (C) 1999 Damjan Lampret, lampret@opencores.org
   Copyright (C) 1999 Damjan Lampret, lampret@opencores.org
 
 
This file is part of OpenRISC 1000 Architectural Simulator.
This file is part of OpenRISC 1000 Architectural Simulator.
 
 
This program is free software; you can redistribute it and/or modify
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
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
(at your option) any later version.
 
 
This program is distributed in the hope that it will be useful,
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.
GNU General Public License for more details.
 
 
You should have received a copy of the GNU General Public License
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
 
 
/* This is functional simulation of OpenRISC 1000 architectural
/* This is functional simulation of OpenRISC 1000 architectural
   programmable interrupt controller.
   programmable interrupt controller.
*/
*/
 
 
#include <stdlib.h>
#include <stdlib.h>
#include <stdio.h>
#include <stdio.h>
#include <string.h>
#include <string.h>
 
 
#include "pic.h"
#include "pic.h"
#include "spr_defs.h"
#include "spr_defs.h"
#include "except.h"
#include "except.h"
#include "sprs.h"
#include "sprs.h"
 
 
extern int cont_run;
extern int cont_run;
 
 
/* Reset. It initializes PIC registers. */
/* Reset. It initializes PIC registers. */
void pic_reset()
void pic_reset()
{
{
  printf("Resetting PIC.\n");
  printf("Resetting PIC.\n");
  mtspr(SPR_PICMR, 0);
  mtspr(SPR_PICMR, 0);
  mtspr(SPR_PICPR, 0);
  mtspr(SPR_PICPR, 0);
  mtspr(SPR_PICSR, 0);
  mtspr(SPR_PICSR, 0);
}
}
 
 
/* Simulation hook. Must be called every clock cycle to simulate PIC
/* Simulation hook. Must be called every clock cycle to simulate PIC
   It does internal functional PIC simulation. */
   It does internal functional PIC simulation. */
inline void pic_clock()
inline void pic_clock()
{
{
  unsigned long picsr;
  unsigned long picsr;
  unsigned long picpr;
  unsigned long picpr;
  unsigned long sr;
  unsigned long sr;
 
 
  /* CZ 020901: Someone had previously noted that this routine was
  /* CZ 020901: Someone had previously noted that this routine was
     wrong, and there were 2 sets of code, one commented out, and
     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
     both were broken. I have rewritten this so it works as I think
     it should. Someone needs to correct this if there is something
     it should. Someone needs to correct this if there is something
     I am missing... */
     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);
  sr = mfspr(SPR_SR);
 
 
 
 
  /* Don't do anything if interrupts not currently enabled */
  /* Don't do anything if interrupts not currently enabled */
  if((sr & (SPR_SR_EIR | SPR_SR_EXR)) != (SPR_SR_EIR | SPR_SR_EXR))
  if((sr & (SPR_SR_EIR | SPR_SR_EXR)) != (SPR_SR_EIR | SPR_SR_EXR))
    return;
    return;
 
 
 
  /* From Sections 16.3 & 16.4, bits 0 & 1 are reserved */
 
  picsr = mfspr(SPR_PICSR) & 0xFFFFFFFC;
 
  picpr = mfspr(SPR_PICPR) & 0xFFFFFFFC;
 
 
  if(picsr & picpr) /* Report High Priority Interrupts first */
  if(picsr & picpr) /* Report High Priority Interrupts first */
    except_handle(EXCEPT_HPINT, 0);
    except_handle(EXCEPT_HPINT, 0);
  else if(picsr)    /* Report a Low Priority Interrupt otherwise */
  else if(picsr)    /* Report a Low Priority Interrupt otherwise */
    except_handle(EXCEPT_LPINT, 0);
    except_handle(EXCEPT_LPINT, 0);
 
 
#if 0  /* CZ -- both of these routines are broken */
#if 0  /* CZ -- both of these routines are broken */
  /* SIMON: This is a bug */
  /* SIMON: This is a bug */
  /* if (picsr & picpr) {
  /* if (picsr & picpr) {
    if ((mfspr(SPR_SR) & (SPR_SR_EIR | SPR_SR_EXR)) == (SPR_SR_EIR | SPR_SR_EXR)
    if ((mfspr(SPR_SR) & (SPR_SR_EIR | SPR_SR_EXR)) == (SPR_SR_EIR | SPR_SR_EXR)
)
)
      except_handle(EXCEPT_HPINT, 0);
      except_handle(EXCEPT_HPINT, 0);
  } else
  } else
    if ((mfspr(SPR_SR) & (SPR_SR_EIR | SPR_SR_EXR)) == (SPR_SR_EIR | SPR_SR_EXR)
    if ((mfspr(SPR_SR) & (SPR_SR_EIR | SPR_SR_EXR)) == (SPR_SR_EIR | SPR_SR_EXR)
)
)
      except_handle(EXCEPT_LPINT, 0);
      except_handle(EXCEPT_LPINT, 0);
  */
  */
  if ((picsr & (SPR_SR_EIR | SPR_SR_EXR)) == (SPR_SR_EIR | SPR_SR_EXR)) {
  if ((picsr & (SPR_SR_EIR | SPR_SR_EXR)) == (SPR_SR_EIR | SPR_SR_EXR)) {
    if (picsr & picpr) {
    if (picsr & picpr) {
      except_handle(EXCEPT_HPINT, 0);
      except_handle(EXCEPT_HPINT, 0);
    } else if(picsr) {
    } else if(picsr) {
      except_handle(EXCEPT_LPINT, 0);
      except_handle(EXCEPT_LPINT, 0);
    }
    }
  }
  }
#endif
#endif
 
 
}
}
 
 
/* Asserts interrupt to the PIC. */
/* Asserts interrupt to the PIC. */
void report_interrupt(int line)
void report_interrupt(int line)
{
{
  setsprbits(SPR_PMR, SPR_PMR_DME, 0); /* Disable doze mode */
  setsprbits(SPR_PMR, SPR_PMR_DME, 0); /* Disable doze mode */
  setsprbits(SPR_PMR, SPR_PMR_SME, 0); /* Disable sleep mode */
  setsprbits(SPR_PMR, SPR_PMR_SME, 0); /* Disable sleep mode */
 
 
  debug(4, "Asserting interrupt %d.\n", line);
  debug(4, "Asserting interrupt %d.\n", line);
 
 
  if (getsprbit(SPR_PICMR, line) || line < 2)
  if (getsprbit(SPR_PICMR, line) || line < 2)
  setsprbit(SPR_PICSR, line, 1);
  setsprbit(SPR_PICSR, line, 1);
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.