Subversion Repositories openrisc

// ----------------------------------------------------------------------------

// Access functions for the ORPSoC Verilator model: implementation

// Copyright (C) 2008  Embecosm Limited <info@embecosm.com>

// Contributor Jeremy Bennett <jeremy.bennett@embecosm.com>

// Contributor Julius Baxter <jb@orsoc.se>

// This file is part of the cycle accurate model of the OpenRISC 1000 based

// system-on-chip, ORPSoC, built using Verilator.

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

// under the terms of the GNU Lesser General Public License as published by

// the Free Software Foundation, either version 3 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 Lesser General Public

// License for more details.

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

// along with this program.  If not, see <http://www.gnu.org/licenses/>.

// ----------------------------------------------------------------------------

// $Id: OrpsocAccess.cpp 303 2009-02-16 11:20:17Z jeremy $

#include "OrpsocAccess.h"

#include "Vorpsoc_top.h"

#include "Vorpsoc_top_orpsoc_top.h"

#include "Vorpsoc_top_or1200_top.h"

#include "Vorpsoc_top_or1200_cpu.h"

#include "Vorpsoc_top_or1200_ctrl.h"

#include "Vorpsoc_top_or1200_except.h"

#include "Vorpsoc_top_or1200_sprs.h"

#include "Vorpsoc_top_or1200_rf.h"

#include "Vorpsoc_top_or1200_dpram.h"

// Need RAM instantiation has parameters after module name

// Includes for wb_ram

//#include "Vorpsoc_top_ram_wb__D20_A19_M800000.h"

//#include "Vorpsoc_top_ram_wb_sc_sw__D20_A19_M800000.h"

// Include for wb_ram_b3

#include "Vorpsoc_top_wb_ram_b3__D20_A17_M800000.h"

// Bus arbiter include - but is for old arbiter, no longer used

//#include "Vorpsoc_top_wb_conbus_top__pi1.h"

//! Constructor for the ORPSoC access class

//! Initializes the pointers to the various module instances of interest

//! within the Verilator model.

//! @param[in] orpsoc  The SystemC Verilated ORPSoC instance

OrpsocAccess::OrpsocAccess (Vorpsoc_top *orpsoc_top)

{

  // Assign processor accessor objects

  or1200_ctrl = orpsoc_top->v->or1200_top0->or1200_cpu->or1200_ctrl;

  or1200_except = orpsoc_top->v->or1200_top0->or1200_cpu->or1200_except;

  or1200_sprs = orpsoc_top->v->or1200_top0->or1200_cpu->or1200_sprs;

  rf_a        = orpsoc_top->v->or1200_top0->or1200_cpu->or1200_rf->rf_a;

  // Assign main memory accessor objects

  // For old ram_wb: ram_wb_sc_sw = orpsoc_top->v->ram_wb0->ram0;

  ram_wb_sc_sw = orpsoc_top->v->wb_ram_b3_0;

  // Assign arbiter accessor object

  //wb_arbiter = orpsoc_top->v->wb_conbus;

}       // OrpsocAccess ()

//! Access for the ex_freeze signal

//! @return  The value of the or1200_ctrl.ex_freeze signal

bool

OrpsocAccess::getExFreeze ()

{

  return  or1200_ctrl->ex_freeze;

}       // getExFreeze ()

//! Access for the wb_freeze signal

//! @return  The value of the or1200_ctrl.wb_freeze signal

bool

OrpsocAccess::getWbFreeze ()

{

  return  or1200_ctrl->wb_freeze;

}       // getWbFreeze ()

//! Access for the except_flushpipe signal

//! @return  The value of the or1200_except.except_flushpipe signal

bool

OrpsocAccess::getExceptFlushpipe ()

{

  return  or1200_except->except_flushpipe;

}       // getExceptFlushpipe ()

//! Access for the ex_dslot signal

//! @return  The value of the or1200_except.ex_dslot signalfac

bool

OrpsocAccess::getExDslot ()

{

  return  or1200_except->ex_dslot;

}       // getExDslot ()

//! Access for the except_type value

//! @return  The value of the or1200_except.except_type register

uint32_t

OrpsocAccess::getExceptType ()

{

  return  (or1200_except->get_except_type) ();

}       // getExceptType ()

//! Access for the id_pc register

//! @return  The value of the or1200_except.id_pc register

uint32_t

OrpsocAccess::getIdPC ()

{

  return  (or1200_except->get_id_pc) ();

}       // getIdPC ()

//! Access for the ex_pc register

//! @return  The value of the or1200_except.id_ex register

uint32_t

OrpsocAccess::getExPC ()

{

  return  (or1200_except->get_ex_pc) ();

}       // getExPC ()

//! Access for the wb_pc register

//! @return  The value of the or1200_except.wb_pc register

uint32_t

OrpsocAccess::getWbPC ()

{

  return  (or1200_except->get_wb_pc) ();

}       // getWbPC ()

//! Access for the id_insn register

//! @return  The value of the or1200_ctrl.wb_insn register

uint32_t

OrpsocAccess::getIdInsn ()

{

  return  (or1200_ctrl->get_id_insn) ();

}       // getIdInsn ()

//! Access for the ex_insn register

//! @return  The value of the or1200_ctrl.ex_insn register

uint32_t

OrpsocAccess::getExInsn ()

{

  return  (or1200_ctrl->get_ex_insn) ();

}       // getExInsn ()

//! Access for the wb_insn register

//! @return  The value of the or1200_ctrl.wb_insn register

uint32_t

OrpsocAccess::getWbInsn ()

{

  return  (or1200_ctrl->get_wb_insn) ();

}       // getWbInsn ()

//! Access the Wishbone SRAM memory

//! @return  The value of the 32-bit memory word at addr

uint32_t

OrpsocAccess::get_mem32 (uint32_t addr)

{

  return  (ram_wb_sc_sw->get_mem) (addr/4);

}       // get_mem32 ()

//! Access a byte from the Wishbone SRAM memory

//! @return  The value of the memory byte at addr

uint8_t

OrpsocAccess::get_mem8 (uint32_t addr)

{

  uint32_t word;

  static uint32_t cached_word;

  static uint32_t cached_word_addr = 0xffffffff;

  int sel = addr & 0x3; // Remember which byte we want

  addr = addr / 4;

  if (addr != cached_word_addr)

    {

      cached_word_addr = addr;

      // Convert address to word number here

      word = (ram_wb_sc_sw->get_mem) (addr);

      cached_word = word;

    }

  else

    word = cached_word;

  switch(sel)

    {

      /* Big endian word expected */

    case 0:

      return ((word >> 24) & 0xff);

      break;

    case 1:

      return ((word >> 16) & 0xff);

      break;

    case 2:

      return ((word >> 8) & 0xff);

      break;

    case 3:

      return ((word >> 0) & 0xff);

      break;

    default:

      return 0;

    }

}       // get_mem8 ()

//! Write value to the Wishbone SRAM memory

void

OrpsocAccess::set_mem32 (uint32_t addr, uint32_t data)

{

  (ram_wb_sc_sw->set_mem) (addr/4, data);

}       // set_mem32 ()

//! Trigger the $readmemh() system call

void

OrpsocAccess::do_ram_readmemh (void)

{

  (ram_wb_sc_sw->do_readmemh) ();

}       // do_ram_readmemh ()

//! Access for the OR1200 GPRs

//! These are extracted from memory using the Verilog function

//! @param[in] regNum  The GPR whose value is wanted

//! @return            The value of the GPR

uint32_t

OrpsocAccess::getGpr (uint32_t  regNum)

{

  return  (rf_a->get_gpr) (regNum);

}       // getGpr ()

//! Access for the sr register

//! @return  The value of the or1200_sprs.sr register

uint32_t

OrpsocAccess::getSprSr ()

{

  return  (or1200_sprs->get_sr) ();

}       // getSprSr ()

//! Access for the epcr register

//! @return  The value of the or1200_sprs.epcr register

uint32_t

OrpsocAccess::getSprEpcr ()

{

  return  (or1200_sprs->get_epcr) ();

}       // getSprEpcr ()

//! Access for the eear register

//! @return  The value of the or1200_sprs.eear register

uint32_t

OrpsocAccess::getSprEear ()

{

  return  (or1200_sprs->get_eear) ();

}       // getSprEear ()

//! Access for the esr register

//! @return  The value of the or1200_sprs.esr register

uint32_t

OrpsocAccess::getSprEsr ()

{

  return  (or1200_sprs->get_esr) ();

}       // getSprEsr ()

/*

//! Access for the arbiter's grant signal

//! @return  The value of the wb_conmax_top.arb signal

uint8_t

OrpsocAccess::getWbArbGrant ()

{

  return  (wb_arbiter->get_gnt) ();

}       // getWbArbGrant ()

//! Arbiter master[mast_num] access functions

//! Access for the arbiter's master[mast_num] data in signal

//! @return  The value of the wb_conmax_top.m_dat_i[mast_num]

uint32_t

OrpsocAccess::getWbArbMastDatI (uint32_t mast_num)

{

  return  (wb_arbiter->get_m_dat_i) (mast_num);

}       // getWbArbMastDatI ()

//! Access for the arbiter's master[mast_num] data out signal

//! @return  The value of the wb_conmax_top.m_dat_o[mast_num]

uint32_t

OrpsocAccess::getWbArbMastDatO (uint32_t mast_num)

{

  return  (wb_arbiter->get_m_dat_o) (mast_num);

}       // getWbArbMastDatO ()

//! Access for the arbiter's master[mast_num] data out

//! @return  The value of the wb_conmax_top.m_adr_i[mast_num]

uint32_t

OrpsocAccess::getWbArbMastAdrI (uint32_t mast_num)

{

  return  (wb_arbiter->get_m_adr_i) (mast_num);

}       // getWbArbMastAdrI ()

//! Access for the arbiter's master[mast_num] select signal

//! @return  The value of the wb_conmax_top.m_sel_i[mast_num]

uint8_t

OrpsocAccess::getWbArbMastSelI (uint32_t mast_num)

{

  return  (wb_arbiter->get_m_sel_i) (mast_num);

}       // getWbArbMastSelI ()

//! Access for the arbiter's master[mast_num] decoded slave select signal

//! @return  The value of the wb_conmax_top.m_ssel_dec[mast_num]

uint8_t

OrpsocAccess::getWbArbMastSlaveSelDecoded (uint32_t mast_num)

{

  return  (wb_arbiter->get_m_ssel_dec) (mast_num);

}       // getWbArbMastSlaveSelDecoded ()

//! Access for the arbiter's master[mast_num] write enable signal

//! @return  The value of the wb_conmax_top.m_we_i[mast_num]

bool

OrpsocAccess::getWbArbMastWeI (uint32_t mast_num)

{

  return  (wb_arbiter->get_m_we_i) (mast_num);

}       // getWbArbMastWeI ()

//! Access for the arbiter's master[mast_num] cycle input signal

//! @return  The value of the wb_conmax_top.m_cyc_i[mast_num]

bool

OrpsocAccess::getWbArbMastCycI (uint32_t mast_num)

{

  return  (wb_arbiter->get_m_cyc_i) (mast_num);

}       // getWbArbMastCycI ()

//! Access for the arbiter's master[mast_num] strobe input signal

//! @return  The value of the wb_conmax_top.m_stb_i[mast_num]

bool

OrpsocAccess::getWbArbMastStbI (uint32_t mast_num)

{

  return  (wb_arbiter->get_m_stb_i) (mast_num);

}       // getWbArbMastStbI ()

//! Access for the arbiter's master[mast_num] ACK output signal

//! @return  The value of the wb_conmax_top.m_ack_o[mast_num]

bool

OrpsocAccess::getWbArbMastAckO (uint32_t mast_num)

{

  return  (wb_arbiter->get_m_ack_o) (mast_num);

}       // getWbArbMastAckO ()

//! Access for the arbiter's master[mast_num] error input signal

//! @return  The value of the wb_conmax_top.m_err_o[mast_num]

bool

OrpsocAccess::getWbArbMastErrO (uint32_t mast_num)

{

  return  (wb_arbiter->get_m_err_o) (mast_num);

}       // getWbArbMastErrO ()

*/