4960a59da0
After a test, GDB can write DCSR to restore to Machine privilege, write to PC (DPC) to restore boot value, write MSTATUS to restore to initial value, then can load and run next test.
338 lines
9.6 KiB
Plaintext
338 lines
9.6 KiB
Plaintext
package Proc;
|
|
|
|
// Copyright (c) 2018 Massachusetts Institute of Technology
|
|
// Portions Copyright (c) 2019-2020 Bluespec, Inc.
|
|
//
|
|
// Permission is hereby granted, free of charge, to any person
|
|
// obtaining a copy of this software and associated documentation
|
|
// files (the "Software"), to deal in the Software without
|
|
// restriction, including without limitation the rights to use, copy,
|
|
// modify, merge, publish, distribute, sublicense, and/or sell copies
|
|
// of the Software, and to permit persons to whom the Software is
|
|
// furnished to do so, subject to the following conditions:
|
|
//
|
|
// The above copyright notice and this permission notice shall be
|
|
// included in all copies or substantial portions of the Software.
|
|
//
|
|
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
|
// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
|
|
// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
|
|
// BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
|
|
// ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
|
|
// CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
|
// SOFTWARE.
|
|
|
|
// ================================================================
|
|
// BSV lib imports
|
|
|
|
import Assert :: *;
|
|
import Vector :: *;
|
|
import GetPut :: *;
|
|
import ClientServer :: *;
|
|
import Connectable :: *;
|
|
import FIFOF :: *;
|
|
import ConfigReg :: *;
|
|
|
|
// ----------------
|
|
// BSV additional libs
|
|
|
|
import Cur_Cycle :: *;
|
|
import GetPut_Aux :: *;
|
|
|
|
// ================================================================
|
|
// Project imports
|
|
|
|
// ----------------
|
|
// From MIT RISCY-OOO
|
|
|
|
import Types::*;
|
|
import ProcTypes::*;
|
|
import L1CoCache::*;
|
|
import L2Tlb::*;
|
|
import CCTypes::*;
|
|
import CacheUtils::*;
|
|
import LLCache::*;
|
|
import MemLoader::*;
|
|
import L1LLConnect::*;
|
|
import LLCDmaConnect::*;
|
|
import MMIOAddrs::*;
|
|
import MMIOCore::*;
|
|
import DramCommon::*;
|
|
import Performance::*;
|
|
|
|
// ----------------
|
|
// From Tooba
|
|
|
|
import ISA_Decls :: *;
|
|
|
|
import Core :: *;
|
|
import Proc_IFC :: *;
|
|
import MMIOPlatform :: *;
|
|
import LLC_AXI4_Adapter :: *;
|
|
import MMIO_AXI4_Adapter :: *;
|
|
|
|
import SoC_Map :: *;
|
|
import AXI4_Types :: *;
|
|
import Fabric_Defs :: *;
|
|
|
|
`ifdef INCLUDE_GDB_CONTROL
|
|
import DM_CPU_Req_Rsp :: *;
|
|
`endif
|
|
|
|
`ifdef INCLUDE_TANDEM_VERIF
|
|
import ProcTypes :: *;
|
|
import Trace_Data2 :: *;
|
|
`endif
|
|
|
|
// ================================================================
|
|
|
|
(* synthesize *)
|
|
module mkProc (Proc_IFC);
|
|
|
|
// ----------------
|
|
// cores
|
|
Vector#(CoreNum, Core) core = ?;
|
|
for(Integer i = 0; i < valueof(CoreNum); i = i+1) begin
|
|
core[i] <- mkCore(fromInteger(i));
|
|
end
|
|
|
|
// ----------------
|
|
// Verbosity control for debugging
|
|
|
|
// Verbosity: 0=quiet; 1=instruction trace; 2=more detail
|
|
Reg #(Bit #(4)) cfg_verbosity <- mkConfigReg (0);
|
|
|
|
// ----------------
|
|
// Init requests and responses
|
|
|
|
FIFOF #(Bit #(0)) f_init_reqs <- mkFIFOF;
|
|
FIFOF #(Bit #(0)) f_init_rsps <- mkFIFOF;
|
|
|
|
// ----------------
|
|
// MMIO
|
|
|
|
MMIO_AXI4_Adapter_IFC mmio_axi4_adapter <- mkMMIO_AXI4_Adapter;
|
|
|
|
// MMIO platform
|
|
Vector#(CoreNum, MMIOCoreToPlatform) mmioToP;
|
|
for(Integer i = 0; i < valueof(CoreNum); i = i+1) begin
|
|
mmioToP[i] = core[i].mmioToPlatform;
|
|
end
|
|
MMIOPlatform mmioPlatform <- mkMMIOPlatform (mmioToP,
|
|
mmio_axi4_adapter.core_side);
|
|
|
|
// last level cache
|
|
LLCache llc <- mkLLCache;
|
|
|
|
// connect LLC to L1 caches
|
|
Vector#(L1Num, ChildCacheToParent#(L1Way, void)) l1 = ?;
|
|
for(Integer i = 0; i < valueof(CoreNum); i = i+1) begin
|
|
l1[i] = core[i].dCacheToParent;
|
|
l1[i + valueof(CoreNum)] = core[i].iCacheToParent;
|
|
end
|
|
mkL1LLConnect(llc.to_child, l1);
|
|
|
|
// ================================================================
|
|
// LLC's DMA connections
|
|
|
|
// Core's tlbToMem
|
|
Vector#(CoreNum, TlbMemClient) tlbToMem = ?;
|
|
for(Integer i = 0; i < valueof(CoreNum); i = i+1) begin
|
|
tlbToMem[i] = core[i].tlbToMem;
|
|
end
|
|
|
|
// Note: mkLLCDmaConnect is Toooba version, different from riscy-ooo version
|
|
let llc_mem_server <- mkLLCDmaConnect(llc.dma, tlbToMem);
|
|
|
|
// ================================================================
|
|
// interface Back-side of LLC to AXI4
|
|
|
|
LLC_AXI4_Adapter_IFC llc_axi4_adapter <- mkLLC_AXi4_Adapter (llc.to_mem);
|
|
|
|
// ================================================================
|
|
// Connect stats
|
|
|
|
for(Integer i = 0; i < valueof(CoreNum); i = i+1) begin
|
|
rule broadcastStats;
|
|
Bool doStats <- core[i].sendDoStats;
|
|
for(Integer j = 0; j < valueof(CoreNum); j = j+1) begin
|
|
core[j].recvDoStats(doStats);
|
|
end
|
|
llc.perf.setStatus(doStats);
|
|
endrule
|
|
end
|
|
|
|
// ================================================================
|
|
// Stub out deadlock and renameDebug interfaces
|
|
|
|
for(Integer j = 0; j < valueof(CoreNum); j = j+1) begin
|
|
rule rl_dummy1;
|
|
let x <- core[j].deadlock.dCacheCRqStuck.get;
|
|
endrule
|
|
rule rl_dummy2;
|
|
let x <- core[j].deadlock.dCachePRqStuck.get;
|
|
endrule
|
|
rule rl_dummy3;
|
|
let x <- core[j].deadlock.iCacheCRqStuck.get;
|
|
endrule
|
|
rule rl_dummy4;
|
|
let x <- core[j].deadlock.iCachePRqStuck.get;
|
|
endrule
|
|
rule rl_dummy5;
|
|
let x <- core[j].deadlock.renameInstStuck.get;
|
|
endrule
|
|
rule rl_dummy6;
|
|
let x <- core[j].deadlock.renameCorrectPathStuck.get;
|
|
endrule
|
|
rule rl_dummy7;
|
|
let x <- core[j].deadlock.commitInstStuck.get;
|
|
endrule
|
|
rule rl_dummy8;
|
|
let x <- core[j].deadlock.commitUserInstStuck.get;
|
|
endrule
|
|
rule rl_dummy9;
|
|
let x <- core[j].deadlock.checkStarted.get;
|
|
endrule
|
|
|
|
rule rl_dummy20;
|
|
let x <- core[j].renameDebug.renameErr.get;
|
|
endrule
|
|
end
|
|
|
|
// ================================================================
|
|
// Init
|
|
|
|
rule rl_init_start;
|
|
let x <- pop (f_init_reqs);
|
|
|
|
llc_axi4_adapter.reset;
|
|
mmio_axi4_adapter.reset;
|
|
for (Integer j = 0; j < valueof(CoreNum); j = j+1)
|
|
core [j].init_server.request.put (?);
|
|
endrule
|
|
|
|
rule rl_init_finish;
|
|
for (Integer j = 0; j < valueof(CoreNum); j = j+1)
|
|
let tok <- core [j].init_server.response.get;
|
|
|
|
f_init_rsps.enq (?);
|
|
endrule
|
|
|
|
// ----------------
|
|
// Termination detection
|
|
|
|
for(Integer i = 0; i < valueof(CoreNum); i = i+1) begin
|
|
rule rl_terminate;
|
|
let x <- core[i].coreIndInv.terminate;
|
|
$display ("Core %d terminated", i);
|
|
endrule
|
|
end
|
|
|
|
// Print out values written 'tohost'
|
|
rule rl_tohost;
|
|
let x <- mmioPlatform.to_host;
|
|
$display ("%0d: mmioPlatform.rl_tohost: 0x%0x (= %0d)", cur_cycle, x, x);
|
|
if (x != 0) begin
|
|
// Standard RISC-V ISA tests finish by writing a value tohost with x[0]==1.
|
|
// Further when x[63:1]==0, all tests within the program pass,
|
|
// otherwise x[63:1] = the test within the program that failed.
|
|
let failed_testnum = (x >> 1);
|
|
if (failed_testnum == 0)
|
|
$display ("PASS");
|
|
else
|
|
$display ("FAIL %0d", failed_testnum);
|
|
$finish (0);
|
|
end
|
|
endrule
|
|
|
|
// ================================================================
|
|
// ================================================================
|
|
// ================================================================
|
|
// INTERFACE
|
|
|
|
// Reset
|
|
interface Server init_server = toGPServer (f_init_reqs, f_init_rsps);
|
|
|
|
// ----------------
|
|
// Start the cores running
|
|
method Action start (Addr startpc, Addr tohostAddr, Addr fromhostAddr);
|
|
action
|
|
for(Integer i = 0; i < valueof(CoreNum); i = i+1)
|
|
core[i].coreReq.start (startpc, tohostAddr, fromhostAddr);
|
|
endaction
|
|
|
|
mmioPlatform.start (tohostAddr, fromhostAddr);
|
|
|
|
$display ("Proc.start: startpc = 0x%0h, tohostAddr = 0x%0h, fromhostAddr = %0h",
|
|
startpc, tohostAddr, fromhostAddr);
|
|
endmethod
|
|
|
|
// ----------------
|
|
// SoC fabric connections
|
|
|
|
// Fabric master interface for memory (from LLC)
|
|
interface master0 = llc_axi4_adapter.mem_master;
|
|
|
|
// Fabric master interface for IO (from MMIOPlatform)
|
|
interface master1 = mmio_axi4_adapter.mmio_master;
|
|
|
|
// ----------------
|
|
// External interrupts
|
|
|
|
method Action m_external_interrupt_req (x);
|
|
core[0].setMEIP (pack (x));
|
|
endmethod
|
|
|
|
method Action s_external_interrupt_req (x);
|
|
core[0].setSEIP (pack (x));
|
|
endmethod
|
|
|
|
// ----------------
|
|
// Non-maskable interrupt
|
|
|
|
// TODO: fixup: NMIs should send CPU to an NMI vector (TBD in SoC_Map)
|
|
method Action non_maskable_interrupt_req (Bool set_not_clear) = noAction;
|
|
|
|
// ----------------
|
|
// For tracing
|
|
|
|
method Action set_verbosity (Bit #(4) verbosity);
|
|
cfg_verbosity <= verbosity;
|
|
endmethod
|
|
|
|
// ----------------
|
|
// Coherent port into LLC (used by Debug Module, DMA engines, ... to read/write memory)
|
|
|
|
interface debug_module_mem_server = llc_mem_server;
|
|
|
|
// ----------------
|
|
// Optional interface to Debug Module
|
|
|
|
`ifdef INCLUDE_GDB_CONTROL
|
|
// run/halt, gpr, mem and csr control goes to core
|
|
interface Server hart0_run_halt_server = core [0].hart0_run_halt_server;
|
|
interface Server hart0_gpr_mem_server = core[0].hart0_gpr_mem_server;
|
|
`ifdef ISA_F
|
|
interface Server hart0_fpr_mem_server = core[0].hart0_fpr_mem_server;
|
|
`endif
|
|
interface Server hart0_csr_mem_server = core[0].hart0_csr_mem_server;
|
|
|
|
// We don't implement 'other' functionality
|
|
interface Put hart0_put_other_req;
|
|
method Action put (Bit #(4) req);
|
|
cfg_verbosity <= req;
|
|
endmethod
|
|
endinterface
|
|
`endif
|
|
|
|
`ifdef INCLUDE_TANDEM_VERIF
|
|
interface v_to_TV = core [0].v_to_TV;
|
|
`endif
|
|
|
|
endmodule: mkProc
|
|
|
|
// ================================================================
|
|
|
|
endpackage
|