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
// Include for ram_wb
#include "Vorpsoc_top_ram_wb__A20_D20_M800000_MB17.h"
// Include for ram_wb_b3
#include "Vorpsoc_top_ram_wb_b3__pi3.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;
	wishbone_ram = orpsoc_top->v->ram_wb0->ram_wb_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 (wishbone_ram->get_mem32) (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 = (wishbone_ram->get_mem8) (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)
{
	(wishbone_ram->set_mem32) (addr / 4, data);
 
}				// set_mem32 ()
 
//! Trigger the $readmemh() system call
 
void OrpsocAccess::do_ram_readmemh(void)
{
	(wishbone_ram->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 OR1200 GPRs
 
//! These are extracted from memory using the Verilog function
 
//! @param[in] regNum  The GPR whose value is wanted
//! @param[in] value   The value of GPR to write
 
void OrpsocAccess::setGpr(uint32_t regNum, uint32_t value)
{
	(rf_a->set_gpr) (regNum, value);
 
}				// 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 ()
 
*/