Fixed implementation of RV64 so that remaining riscv-test pass
This commit is contained in:
		| @@ -2,6 +2,7 @@ cmake_minimum_required(VERSION 3.3) | ||||
| set(CMAKE_MODULE_PATH ${CMAKE_MODULE_PATH} ${CMAKE_CURRENT_SOURCE_DIR}/cmake ${CMAKE_CURRENT_SOURCE_DIR}/sc-components/cmake) | ||||
|  | ||||
| set(ENABLE_SCV TRUE CACHE BOOL "Enable use of SCV") | ||||
| set(ENABLE_SHARED TRUE CACHE BOOL "Build shared libraries") | ||||
|  | ||||
| include(GitFunctions) | ||||
| get_branch_from_git() | ||||
| @@ -32,7 +33,8 @@ include(Conan) | ||||
| set(CMAKE_CXX_STANDARD 14) | ||||
| set(CMAKE_CXX_STANDARD_REQUIRED ON) | ||||
| set(CMAKE_CXX_EXTENSIONS OFF) | ||||
| 	 | ||||
| set(CMAKE_POSITION_INDEPENDENT_CODE ON) | ||||
|  | ||||
| include(CheckCXXCompilerFlag) | ||||
| CHECK_CXX_COMPILER_FLAG("-march=native" COMPILER_SUPPORTS_MARCH_NATIVE) | ||||
| if(COMPILER_SUPPORTS_MARCH_NATIVE) | ||||
|   | ||||
| @@ -30,7 +30,17 @@ set(LIBRARY_NAME platform) | ||||
| #add_definitions(-DSC_DEFAULT_WRITER_POLICY=SC_MANY_WRITERS) | ||||
|  | ||||
| # Define the library | ||||
| add_library(${LIBRARY_NAME} ${LIB_SOURCES}) | ||||
| add_library(${LIBRARY_NAME} SHARED ${LIB_SOURCES}) | ||||
|  | ||||
| # Links the target exe against the libraries | ||||
| target_link_libraries(${LIBRARY_NAME} riscv_sc) | ||||
| target_link_libraries(${LIBRARY_NAME} dbt-core) | ||||
| target_link_libraries(${LIBRARY_NAME} softfloat) | ||||
| target_link_libraries(${LIBRARY_NAME} sc-components) | ||||
| target_link_libraries(${LIBRARY_NAME} ${CONAN_LIBS_SEASOCKS}) | ||||
| target_link_libraries(${LIBRARY_NAME} external) | ||||
| target_link_libraries(${LIBRARY_NAME} ${llvm_libs}) | ||||
| target_link_libraries(${LIBRARY_NAME} ${Boost_LIBRARIES} ) | ||||
|  | ||||
| set_target_properties(${LIBRARY_NAME} PROPERTIES | ||||
|   VERSION ${VERSION}  # ${VERSION} was defined in the main CMakeLists. | ||||
| @@ -61,7 +71,7 @@ add_executable(${APPLICATION_NAME} ${APP_SOURCES}) | ||||
| target_include_directories(${APPLICATION_NAME} SYSTEM PRIVATE ${LLVM_INCLUDE_DIRS}) | ||||
| # Links the target exe against the libraries | ||||
| target_link_libraries(${APPLICATION_NAME} ${LIBRARY_NAME}) | ||||
| target_link_libraries(${APPLICATION_NAME} riscv) | ||||
| target_link_libraries(${APPLICATION_NAME} riscv_sc) | ||||
| target_link_libraries(${APPLICATION_NAME} dbt-core) | ||||
| target_link_libraries(${APPLICATION_NAME} softfloat) | ||||
| target_link_libraries(${APPLICATION_NAME} sc-components) | ||||
|   | ||||
| @@ -2,10 +2,6 @@ import "RV32IBase.core_desc" | ||||
|  | ||||
| InsructionSet RV32A extends RV32IBase{ | ||||
|       | ||||
|     address_spaces {  | ||||
|         RES[8] | ||||
|     } | ||||
|      | ||||
|     instructions{ | ||||
|         LR.W { | ||||
|             encoding: b00010 | aq[0:0] | rl[0:0]  | b00000 | rs1[4:0] | b010 | rd[4:0] | b0101111; | ||||
| @@ -23,7 +19,7 @@ InsructionSet RV32A extends RV32IBase{ | ||||
|             val res1[32] <= RES[offs]{32}; | ||||
|             if(res1!=0) | ||||
|                 MEM[offs]{32} <= X[rs2]; | ||||
|             if(rd!=0) X[rd]<= choose(res1!=0, 0, 1); | ||||
|             if(rd!=0) X[rd]<= choose(res1!=zext(0, 32), 0, 1); | ||||
|         } | ||||
|         AMOSWAP.W{ | ||||
|             encoding: b00001 | aq[0:0] | rl[0:0] | rs2[4:0] | rs1[4:0] | b010 | rd[4:0] | b0101111; | ||||
| @@ -73,9 +69,9 @@ InsructionSet RV32A extends RV32IBase{ | ||||
|             args_disass: "{name(rd)}, {name(rs1)}, {name(rs2)} (aqu={aq},rel={rl})"; | ||||
|             val offs[XLEN]<=X[rs1]; | ||||
|             val res1[XLEN] <= sext(MEM[offs]{32}); | ||||
|             if(rd!=0) X[rd]<=res1; | ||||
|             val res2[XLEN]<= choose(res1's>X[rs2]s, X[rs2], res1); | ||||
|             MEM[offs]{32}<=res2; | ||||
|             if(rd!=0) X[rd] <= res1; | ||||
|             val res2[XLEN] <= choose(res1's > X[rs2]s, X[rs2], res1); | ||||
|             MEM[offs]{32} <= res2; | ||||
|         } | ||||
|         AMOMAX.W{ | ||||
|             encoding: b10100 | aq[0:0] | rl[0:0] | rs2[4:0] | rs1[4:0] | b010 | rd[4:0] | b0101111; | ||||
| @@ -90,7 +86,7 @@ InsructionSet RV32A extends RV32IBase{ | ||||
|             encoding: b11000 | aq[0:0] | rl[0:0] | rs2[4:0] | rs1[4:0] | b010 | rd[4:0] | b0101111; | ||||
|             args_disass: "{name(rd)}, {name(rs1)}, {name(rs2)} (aqu={aq},rel={rl})"; | ||||
|             val offs[XLEN]<=X[rs1]; | ||||
|             val res1[XLEN] <= zext(MEM[offs]{32}); | ||||
|             val res1[XLEN] <= sext(MEM[offs]{32}); | ||||
|             if(rd!=0) X[rd]<=res1; | ||||
|             val res2[XLEN]<= choose(res1>X[rs2], X[rs2], res1); | ||||
|             MEM[offs]{32}<=res2; | ||||
| @@ -99,10 +95,10 @@ InsructionSet RV32A extends RV32IBase{ | ||||
|             encoding: b11100 | aq[0:0] | rl[0:0] | rs2[4:0] | rs1[4:0] | b010 | rd[4:0] | b0101111; | ||||
|             args_disass: "{name(rd)}, {name(rs1)}, {name(rs2)} (aqu={aq},rel={rl})"; | ||||
|             val offs[XLEN]<=X[rs1]; | ||||
|             val res1[XLEN] <= zext(MEM[offs]{32}); | ||||
|             if(rd!=0) X[rd]<=res1; | ||||
|             val res2[XLEN]<= choose(res1'u<X[rs2]'u, X[rs2], res1); | ||||
|             MEM[offs]{32}<=res2; | ||||
|             val res1[XLEN] <= sext(MEM[offs]{32}); | ||||
|             if(rd!=0) X[rd] <= res1; | ||||
|             val res2[XLEN] <= choose(res1 < X[rs2], X[rs2], res1); | ||||
|             MEM[offs]{32} <= res2; | ||||
|         } | ||||
|     } | ||||
| } | ||||
| @@ -15,14 +15,9 @@ InsructionSet RV32IC { | ||||
|         JALR(no_cont){ // overwriting the implementation if rv32i, alignment does not need to be word | ||||
|             encoding: imm[11:0]s | rs1[4:0] | b000 | rd[4:0] | b1100111; | ||||
|             args_disass: "{name(rd)}, {name(rs1)}, {imm:#0x}"; | ||||
|             val new_pc[XLEN] <= X[rs1]s+ imm; | ||||
|             val align[XLEN] <= new_pc & 0x1; | ||||
|             if(align != 0){ | ||||
|                 raise(0, 0); | ||||
|             } else { | ||||
|                 if(rd!=0) X[rd] <= PC+4; | ||||
|                 PC<=new_pc & ~0x1; | ||||
|             } | ||||
|             val new_pc[XLEN] <= X[rs1]s + imm; | ||||
|             if(rd!=0) X[rd] <= PC+4; | ||||
|             PC<=new_pc & ~0x1; | ||||
|         } | ||||
|         C.ADDI4SPN { //(RES, imm=0) | ||||
|             encoding: b000 | imm[5:4] | imm[9:6] | imm[2:2] | imm[3:3] | rd[2:0] | b00; | ||||
| @@ -32,13 +27,13 @@ InsructionSet RV32IC { | ||||
|         } | ||||
|         C.LW { // (RV32) | ||||
|             encoding: b010 | uimm[5:3] | rs1[2:0] | uimm[2:2] | uimm[6:6] | rd[2:0] | b00; | ||||
|             args_disass: "{name(8+rd)}, {name(8+rs1)}, {uimm:#05x}"; | ||||
|             args_disass: "{name(8+rd)}, {uimm:#05x}({name(8+rs1)})"; | ||||
|             val offs[XLEN] <= X[rs1+8]+uimm; | ||||
|             X[rd+8] <= MEM[offs]{32}; | ||||
|             X[rd+8] <= sext(MEM[offs]{32}); | ||||
|         } | ||||
|         C.SW {//(RV32) | ||||
|             encoding: b110 | uimm[5:3] | rs1[2:0] | uimm[2:2] | uimm[6:6] | rs2[2:0] | b00; | ||||
|             args_disass: "{name(8+rs1)}, {name(8+rs2)}, {uimm:#05x}"; | ||||
|             args_disass: "{name(8+rs2)}, {uimm:#05x}({name(8+rs1)})"; | ||||
|             val offs[XLEN] <= X[rs1+8]+uimm; | ||||
|             MEM[offs]{32} <= X[rs2+8]; | ||||
|         } | ||||
| @@ -89,10 +84,10 @@ InsructionSet RV32IC { | ||||
|             X[rs1_idx] <= shra(X[rs1_idx], shamt); | ||||
|         } | ||||
|         C.ANDI {//(RV32) | ||||
|             encoding:b100 | imm[5:5] | b10 | rs1[2:0] | imm[4:0] | b01; | ||||
|             encoding:b100 | imm[5:5]s | b10 | rs1[2:0] | imm[4:0]s | b01; | ||||
|             args_disass: "{name(8+rs1)}, {imm:#05x}"; | ||||
|             val rs1_idx[5] <= rs1 + 8; | ||||
|             X[rs1_idx] <= X[rs1_idx] & imm; | ||||
|             X[rs1_idx] <= X[rs1_idx]s & imm; | ||||
|         } | ||||
|         C.SUB {//(RV32) | ||||
|             encoding:b100 | b0 | b11 | rd[2:0] | b00 | rs2[2:0] | b01; | ||||
| @@ -143,7 +138,7 @@ InsructionSet RV32IC { | ||||
|             encoding:b010 | uimm[5:5] | rd[4:0] | uimm[4:2] | uimm[7:6] | b10; | ||||
|             args_disass: "{name(rd)}, sp, {uimm:#05x}"; | ||||
|             val offs[XLEN] <= X[2] + uimm; | ||||
|             X[rd] <= MEM[offs]{32}; | ||||
|             X[rd] <= sext(MEM[offs]{32}); | ||||
|         } | ||||
|         // order matters as C.JR is a special case of C.MV | ||||
|         C.MV {//(RV32) | ||||
| @@ -174,7 +169,7 @@ InsructionSet RV32IC { | ||||
|         } | ||||
|         C.SWSP {// | ||||
|             encoding:b110 | uimm[5:2] | uimm[7:6] | rs2[4:0] | b10; | ||||
|             args_disass: "x2+{uimm:#05x}, {name(rs2)}"; | ||||
|             args_disass: "{name(rs2)}, {uimm:#05x}(sp)"; | ||||
|             val offs[XLEN] <= X[2] + uimm; | ||||
|             MEM[offs]{32} <= X[rs2]; | ||||
|         } | ||||
| @@ -301,36 +296,65 @@ InsructionSet RV64IC extends RV32IC { | ||||
|     instructions{ | ||||
|         C.LD {//(RV64/128)  | ||||
|             encoding:b011 | uimm[5:3] | rs1[2:0] | uimm[7:6] | rd[2:0] | b00; | ||||
|             args_disass: "{name(8+rd)}, {uimm},({name(8+rs1)})"; | ||||
|             val offs[XLEN] <= X[rs1+8] + uimm; | ||||
|             X[rd+8]<=sext(MEM[offs]{64}); | ||||
|         } | ||||
|         C.SD { //(RV64/128)  | ||||
|             encoding:b111 | uimm[5:3] | rs1[2:0] | uimm[7:6] | rs2[2:0] | b00; | ||||
|             args_disass: "{name(8+rs2)}, {uimm},({name(8+rs1)})"; | ||||
|             val offs[XLEN] <= X[rs1+8] + uimm; | ||||
|             MEM[offs]{64} <= X[rs2+8]; | ||||
|         } | ||||
|         C.SUBW {//(RV64/128, RV32 res) | ||||
|             encoding:b100 | b1 | b11 | rd[2:0] | b00 | rs2[2:0] | b01; | ||||
|             args_disass: "{name(rd)}, sp, {imm:#05x}"; | ||||
|             args_disass: "{name(8+rd)}, {name(8+rd)}, {name(8+rs2)}"; | ||||
|             val res[32] <= X[rd+8]{32} - X[rs2+8]{32}; | ||||
|             X[rd+8] <= sext(res); | ||||
|         } | ||||
|         C.ADDW {//(RV64/128 RV32 res) | ||||
|             encoding:b100 | b1 | b11 | rd[2:0] | b01 | rs2[2:0] | b01; | ||||
|             args_disass: "{name(rd)}, sp, {imm:#05x}"; | ||||
|             args_disass: "{name(8+rd)}, {name(8+rd)}, {name(8+rs2)}";    | ||||
|             val res[32] <= X[rd+8]{32} + X[rs2+8]{32}; | ||||
|             X[rd+8] <= sext(res); | ||||
|         } | ||||
|         C.ADDIW {//(RV64/128) | ||||
|             encoding:b001 | imm[5:5] | rs1[4:0] | imm[4:0] | b01; | ||||
|             encoding:b001 | imm[5:5]s | rs1[4:0] | imm[4:0]s | b01; | ||||
|             args_disass: "{name(rs1)}, {imm:#05x}"; | ||||
|             if(rs1 != 0){ | ||||
|                 val res[32] <= X[rs1]{32}'s + imm; | ||||
|                 X[rs1] <= sext(res); | ||||
|             }  | ||||
|         } | ||||
|            C.SRLI64 {//(RV32/64/128) | ||||
|               encoding:b100 | b0 | b00 | rs1[2:0] | b00000 | b01; | ||||
|           } | ||||
|         C.SRAI64 {//(RV32/64/128) | ||||
|             encoding:b100 | b0 | b01 | rs1[2:0] | b00000 | b01; | ||||
|         C.SRLI {//(RV64) | ||||
|             encoding:b100 | shamt[5:5] | b00 | rs1[2:0] | shamt[4:0] | b01; | ||||
|             args_disass: "{name(8+rs1)}, {shamt}"; | ||||
|             val rs1_idx[5] <= rs1+8; | ||||
|             X[rs1_idx] <= shrl(X[rs1_idx], shamt); | ||||
|         } | ||||
|         C.SLLI64 {//(RV128 RV32/64) | ||||
|             encoding:b000 | b0 | rs1[4:0] | b00000 | b10; | ||||
|         C.SRAI {//(RV64) | ||||
|             encoding:b100 | shamt[5:5] | b01 | rs1[2:0] | shamt[4:0] | b01; | ||||
|             args_disass: "{name(8+rs1)}, {shamt}"; | ||||
|             val rs1_idx[5] <= rs1+8; | ||||
|             X[rs1_idx] <= shra(X[rs1_idx], shamt); | ||||
|         } | ||||
|         C.SLLI {//(RV64) | ||||
|             encoding:b000 | shamt[5:5] | rs1[4:0] | shamt[4:0] | b10; | ||||
|             args_disass: "{name(rs1)}, {shamt}"; | ||||
|             if(rs1 == 0) raise(0, 2); | ||||
|             X[rs1] <= shll(X[rs1], shamt); | ||||
|         } | ||||
|         C.LDSP {//(RV64/128 | ||||
|             encoding:b011 | uimm[5:5] | rd[4:0] | uimm[4:3] | uimm[8:6] | b10; | ||||
|             args_disass: "{name(rd)}, sp, {imm:#05x}"; | ||||
|             args_disass:"{name(rd)}, {uimm}(sp)"; | ||||
|             val offs[XLEN] <= X[2] + uimm; | ||||
|             if(rd!=0) X[rd]<=sext(MEM[offs]{64}); | ||||
|         } | ||||
|         C.SDSP {//(RV64/128) | ||||
|             encoding:b111 | uimm[5:3] | uimm[8:6] | rs2[4:0] | b10; | ||||
|             args_disass:"{name(rs2)}, {uimm}(sp)"; | ||||
|             val offs[XLEN] <= X[2] + uimm; | ||||
|             MEM[offs]{64} <= X[rs2]; | ||||
|         } | ||||
|     } | ||||
| } | ||||
| @@ -347,6 +371,24 @@ InsructionSet RV128IC extends RV64IC { | ||||
|                 PC[XLEN](is_pc) | ||||
|     } | ||||
|     instructions{ | ||||
|         C.SRLI {//(RV128) | ||||
|             encoding:b100 | shamt[5:5] | b00 | rs1[2:0] | shamt[4:0] | b01; | ||||
|             args_disass: "{name(8+rs1)}, {shamt}"; | ||||
|             val rs1_idx[5] <= rs1+8; | ||||
|             X[rs1_idx] <= shrl(X[rs1_idx], shamt); | ||||
|         } | ||||
|         C.SRAI {//(RV128) | ||||
|             encoding:b100 | shamt[5:5] | b01 | rs1[2:0] | shamt[4:0] | b01; | ||||
|             args_disass: "{name(8+rs1)}, {shamt}"; | ||||
|             val rs1_idx[5] <= rs1+8; | ||||
|             X[rs1_idx] <= shra(X[rs1_idx], shamt); | ||||
|         } | ||||
|         C.SLLI {//(RV128) | ||||
|             encoding:b000 | shamt[5:5] | rs1[4:0] | shamt[4:0] | b10; | ||||
|             args_disass: "{name(rs1)}, {shamt}"; | ||||
|             if(rs1 == 0) raise(0, 2); | ||||
|             X[rs1] <= shll(X[rs1], shamt); | ||||
|         } | ||||
|         C.LQ { //(RV128) | ||||
|              encoding:b001 | uimm[5:4] | uimm[8:8] | rs1[2:0] | uimm[7:6] | rd[2:0] | b00; | ||||
|         } | ||||
|   | ||||
| @@ -10,7 +10,7 @@ InsructionSet RV32D extends RV32IBase{ | ||||
|     instructions{ | ||||
|         FLD { | ||||
|             encoding: imm[11:0]s | rs1[4:0] | b011 | rd[4:0] | b0000111; | ||||
|             args_disass:"f{rd}, {imm}({rs1})"; | ||||
|             args_disass:"f{rd}, {imm}({name(rs1)})"; | ||||
|             val offs[XLEN] <= X[rs1]'s + imm; | ||||
|             val res[64] <= MEM[offs]{64}; | ||||
|             if(FLEN==64) | ||||
| @@ -22,7 +22,7 @@ InsructionSet RV32D extends RV32IBase{ | ||||
|         } | ||||
|         FSD { | ||||
|             encoding: imm[11:5]s | rs2[4:0] | rs1[4:0] | b011 | imm[4:0]s | b0100111; | ||||
|             args_disass:"f{rs2}, {imm}({rs1})"; | ||||
|             args_disass:"f{rs2}, {imm}({name(rs1)})"; | ||||
|             val offs[XLEN] <= X[rs1]'s + imm; | ||||
|             MEM[offs]{64}<=F[rs2]{64}; | ||||
|         } | ||||
| @@ -155,7 +155,10 @@ InsructionSet RV32D extends RV32IBase{ | ||||
|         FSGNJ.D { | ||||
|             encoding: b0010001 | rs2[4:0] | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             val res[64] <= (F[rs1]{64} & 0x7fffffff) | (F[rs2]{64} & 0x80000000); | ||||
|             val ONE[64] <= 1; | ||||
|             val MSK1[64] <= ONE<<63; | ||||
|             val MSK2[64] <= MSK1-1; | ||||
|             val res[64] <= (F[rs1]{64} & MSK2) | (F[rs2]{64} & MSK1); | ||||
|             if(FLEN==64) | ||||
|                 F[rd] <= res; | ||||
|             else { // NaN boxing | ||||
| @@ -166,7 +169,10 @@ InsructionSet RV32D extends RV32IBase{ | ||||
|         FSGNJN.D { | ||||
|             encoding: b0010001 | rs2[4:0] | rs1[4:0] | b001 | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             val res[64] <= (F[rs1]{64} & 0x7fffffff) | (~F[rs2]{64} & 0x80000000); | ||||
|             val ONE[64] <= 1; | ||||
|             val MSK1[64] <= ONE<<63; | ||||
|             val MSK2[64] <= MSK1-1; | ||||
|             val res[64] <= (F[rs1]{64} & MSK2) | (~F[rs2]{64} & MSK1); | ||||
|             if(FLEN==64) | ||||
|                 F[rd] <= res; | ||||
|             else { // NaN boxing | ||||
| @@ -177,7 +183,9 @@ InsructionSet RV32D extends RV32IBase{ | ||||
|         FSGNJX.D { | ||||
|             encoding: b0010001 | rs2[4:0] | rs1[4:0] | b010 | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             val res[64] <= F[rs1]{64} ^ (F[rs2]{64} & 0x80000000); | ||||
|             val ONE[64] <= 1; | ||||
|             val MSK1[64] <= ONE<<63; | ||||
|             val res[64] <= F[rs1]{64} ^ (F[rs2]{64} & MSK1); | ||||
|             if(FLEN==64) | ||||
|                 F[rd] <= res; | ||||
|             else { // NaN boxing | ||||
| @@ -235,21 +243,21 @@ InsructionSet RV32D extends RV32IBase{ | ||||
|         FEQ.D { | ||||
|             encoding: b1010001 | rs2[4:0] | rs1[4:0] | b010 | rd[4:0] | b1010011; | ||||
|             args_disass:"{name(rd)}, f{rs1}, f{rs2}"; | ||||
|             X[rd]<=fdispatch_fcmp_d(F[rs1]{64}, F[rs2]{64}, zext(0, 32)); | ||||
|             X[rd]<=zext(fdispatch_fcmp_d(F[rs1]{64}, F[rs2]{64}, zext(0, 32))); | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FLT.D { | ||||
|             encoding: b1010001 | rs2[4:0] | rs1[4:0] | b001 | rd[4:0] | b1010011; | ||||
|             args_disass:"{name(rd)}, f{rs1}, f{rs2}"; | ||||
|             X[rd]<=fdispatch_fcmp_d(F[rs1]{64}, F[rs2]{64}, zext(2, 32)); | ||||
|             X[rd]<=zext(fdispatch_fcmp_d(F[rs1]{64}, F[rs2]{64}, zext(2, 32))); | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FLE.D { | ||||
|             encoding: b1010001 | rs2[4:0] | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|             args_disass:"{name(rd)}, f{rs1}, f{rs2}"; | ||||
|             X[rd]<=fdispatch_fcmp_d(F[rs1]{64}, F[rs2]{64}, zext(1, 32)); | ||||
|             X[rd]<=zext(fdispatch_fcmp_d(F[rs1]{64}, F[rs2]{64}, zext(1, 32))); | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
| @@ -261,21 +269,22 @@ InsructionSet RV32D extends RV32IBase{ | ||||
|         FCVT.W.D { | ||||
|             encoding: b1100001 | b00000 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"{name(rd)}, f{rs1}"; | ||||
|             X[rd]<= sext(fdispatch_fcvt_d(F[rs1]{64}, zext(0, 32), rm{8}), XLEN); | ||||
|             X[rd]<= sext(fdispatch_fcvt_64_32(F[rs1]{64}, zext(0, 32), rm{8}), XLEN); | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FCVT.WU.D { | ||||
|             encoding: b1100001 | b00001 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"{name(rd)}, f{rs1}"; | ||||
|             X[rd]<= zext(fdispatch_fcvt_d(F[rs1]{64}, zext(1, 32), rm{8}), XLEN); | ||||
|             //FIXME: should be zext accodring to spec but needs to be sext according to tests | ||||
|             X[rd]<= sext(fdispatch_fcvt_64_32(F[rs1]{64}, zext(1, 32), rm{8}), XLEN); | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FCVT.D.W { | ||||
|             encoding: b1101001 | b00000 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, {rs1}"; | ||||
|             val res[64] <= fdispatch_fcvt_d(sext(X[rs1],64), zext(2, 32), rm{8}); | ||||
|             args_disass:"f{rd}, {name(rs1)}"; | ||||
|             val res[64] <= fdispatch_fcvt_32_64(sext(X[rs1]{32},64), zext(2, 32), rm{8}); | ||||
|             if(FLEN==64) | ||||
|                 F[rd] <= res; | ||||
|             else { // NaN boxing | ||||
| @@ -285,8 +294,8 @@ InsructionSet RV32D extends RV32IBase{ | ||||
|         } | ||||
|         FCVT.D.WU { | ||||
|             encoding: b1101001 | b00001 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, {rs1}"; | ||||
|             val res[64] <=fdispatch_fcvt_d(zext(X[rs1],64), zext(3,32), rm{8}); | ||||
|             args_disass:"f{rd}, {name(rs1)}"; | ||||
|             val res[64] <=fdispatch_fcvt_32_64(zext(X[rs1]{32},64), zext(3,32), rm{8}); | ||||
|             if(FLEN==64) | ||||
|                 F[rd] <= res; | ||||
|             else { // NaN boxing | ||||
| @@ -295,4 +304,63 @@ InsructionSet RV32D extends RV32IBase{ | ||||
|             } | ||||
|         } | ||||
|     } | ||||
| } | ||||
| } | ||||
| InsructionSet RV64D extends RV32D{ | ||||
|     constants { | ||||
|         FLEN, FFLAG_MASK := 0x1f | ||||
|     }  | ||||
|     registers { | ||||
|         [31:0]    F[FLEN],  FCSR[32] | ||||
|     }     | ||||
|     instructions{ | ||||
|         FCVT.L.D { | ||||
|             encoding: b1100001 | b00010 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"{name(rd)}, f{rs1}"; | ||||
|             X[rd]<= sext(fdispatch_fcvt_d(F[rs1]{64}, zext(0, 32), rm{8}), XLEN); | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FCVT.LU.D { | ||||
|             encoding: b1100001 | b00011 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"{name(rd)}, f{rs1}"; | ||||
|             X[rd]<= sext(fdispatch_fcvt_d(F[rs1]{64}, zext(1, 32), rm{8}), XLEN); | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FCVT.D.L { | ||||
|             encoding: b1101001 | b00010 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, {name(rs1)}"; | ||||
|             val res[64] <= fdispatch_fcvt_d(sext(X[rs1],64), zext(2, 32), rm{8}); | ||||
|             if(FLEN==64) | ||||
|                 F[rd] <= res; | ||||
|             else { // NaN boxing | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<64) | res; | ||||
|             } | ||||
|         } | ||||
|         FCVT.D.LU { | ||||
|             encoding: b1101001 | b00011 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, {name(rs1)}"; | ||||
|             val res[64] <=fdispatch_fcvt_d(zext(X[rs1],64), zext(3,32), rm{8}); | ||||
|             if(FLEN==64) | ||||
|                 F[rd] <= res; | ||||
|             else { // NaN boxing | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<64) | res; | ||||
|             } | ||||
|         } | ||||
|         FMV.X.D { | ||||
|             encoding: b1110001 | b00000 | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|             args_disass:"{name(rd)}, f{rs1}"; | ||||
|             X[rd]<=sext(F[rs1]); | ||||
|         } | ||||
|         FMV.D.X { | ||||
|             encoding: b1111001 | b00000 | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, {name(rs1)}"; | ||||
|             F[rd] <= zext(X[rs1]); | ||||
|         } | ||||
|  | ||||
|     } | ||||
| } | ||||
|      | ||||
|      | ||||
| @@ -30,10 +30,13 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: rs3[4:0] | b00 | rs2[4:0] | rs1[4:0] | rm[2:0] | rd[4:0] | b1000011; | ||||
|             args_disass:"x{rd}, f{rs1}, f{rs2}, f{rs3}"; | ||||
|             //F[rd]f<= F[rs1]f * F[rs2]f + F[rs3]f; | ||||
|             val res[32] <= fdispatch_fmadd_s(F[rs1]{32}, F[rs2]{32}, F[rs3]{32}, zext(0, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= fdispatch_fmadd_s(F[rs1], F[rs2], F[rs3], zext(0, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
| 	            val frs3[32] <= fdispatch_unbox_s(F[rs3]); | ||||
|                 val res[32] <= fdispatch_fmadd_s(frs1, frs2, frs3, zext(0, 32), choose(rm<7, rm{8}, FCSR{8}));             | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -44,10 +47,13 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: rs3[4:0] | b00 | rs2[4:0] | rs1[4:0] | rm[2:0] | rd[4:0] | b1000111; | ||||
|             args_disass:"x{rd}, f{rs1}, f{rs2}, f{rs3}"; | ||||
|             //F[rd]f<=F[rs1]f * F[rs2]f - F[rs3]f; | ||||
|             val res[32] <= fdispatch_fmadd_s(F[rs1]{32}, F[rs2]{32}, F[rs3]{32}, zext(1, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= fdispatch_fmadd_s(F[rs1], F[rs2], F[rs3], zext(1, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
| 	            val frs3[32] <= fdispatch_unbox_s(F[rs3]); | ||||
|                 val res[32] <= fdispatch_fmadd_s(frs1, frs2, frs3, zext(1, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -58,10 +64,13 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: rs3[4:0] | b00 | rs2[4:0] | rs1[4:0] | rm[2:0] | rd[4:0] | b1001111; | ||||
|             args_disass:"x{rd}, f{rs1}, f{rs2}, f{rs3}"; | ||||
|             //F[rd]f<=-F[rs1]f * F[rs2]f + F[rs3]f; | ||||
|             val res[32] <= fdispatch_fmadd_s(F[rs1]{32}, F[rs2]{32}, F[rs3]{32}, zext(2, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
|                 F[rd] <= fdispatch_fmadd_s(F[rs1], F[rs2], F[rs3], zext(2, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
| 	            val frs3[32] <= fdispatch_unbox_s(F[rs3]); | ||||
|                 val res[32] <= fdispatch_fmadd_s(frs1, frs2, frs3, zext(2, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -72,10 +81,13 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: rs3[4:0] | b00 | rs2[4:0] | rs1[4:0] | rm[2:0] | rd[4:0] | b1001011; | ||||
|             args_disass:"x{rd}, f{rs1}, f{rs2}, f{rs3}"; | ||||
|             //F[rd]f<=-F[rs1]f * F[rs2]f - F[rs3]f; | ||||
|             val res[32] <= fdispatch_fmadd_s(F[rs1]{32}, F[rs2]{32}, F[rs3]{32}, zext(3, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= fdispatch_fmadd_s(F[rs1], F[rs2], F[rs3], zext(3, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
| 	            val frs3[32] <= fdispatch_unbox_s(F[rs3]); | ||||
|                 val res[32] <= fdispatch_fmadd_s(frs1, frs2, frs3, zext(3, 32), choose(rm<7, rm{8}, FCSR{8})); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -86,10 +98,12 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: b0000000 | rs2[4:0] | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             // F[rd]f <= F[rs1]f + F[rs2]f; | ||||
|             val res[32] <= fdispatch_fadd_s(F[rs1]{32}, F[rs2]{32}, choose(rm<7, rm{8}, FCSR{8})); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= fdispatch_fadd_s(F[rs1], F[rs2], choose(rm<7, rm{8}, FCSR{8})); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
|                 val res[32] <= fdispatch_fadd_s(frs1, frs2, choose(rm<7, rm{8}, FCSR{8})); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -100,10 +114,12 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: b0000100 | rs2[4:0] | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             // F[rd]f <= F[rs1]f - F[rs2]f; | ||||
|             val res[32] <= fdispatch_fsub_s(F[rs1]{32}, F[rs2]{32}, choose(rm<7, rm{8}, FCSR{8})); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= fdispatch_fsub_s(F[rs1], F[rs2], choose(rm<7, rm{8}, FCSR{8})); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
|                 val res[32] <= fdispatch_fsub_s(frs1, frs2, choose(rm<7, rm{8}, FCSR{8})); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -114,10 +130,12 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: b0001000 | rs2[4:0] | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             // F[rd]f <= F[rs1]f * F[rs2]f; | ||||
|             val res[32] <= fdispatch_fmul_s(F[rs1]{32}, F[rs2]{32}, choose(rm<7, rm{8}, FCSR{8})); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= fdispatch_fmul_s(F[rs1], F[rs2], choose(rm<7, rm{8}, FCSR{8})); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
|                 val res[32] <= fdispatch_fmul_s(frs1, frs2, choose(rm<7, rm{8}, FCSR{8})); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -128,10 +146,12 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: b0001100 | rs2[4:0] | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             // F[rd]f <= F[rs1]f / F[rs2]f; | ||||
|             val res[32] <= fdispatch_fdiv_s(F[rs1]{32}, F[rs2]{32}, choose(rm<7, rm{8}, FCSR{8})); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= fdispatch_fdiv_s(F[rs1], F[rs2], choose(rm<7, rm{8}, FCSR{8})); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
|                 val res[32] <= fdispatch_fdiv_s(frs1, frs2, choose(rm<7, rm{8}, FCSR{8})); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -142,10 +162,11 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: b0101100 | b00000 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}"; | ||||
|             //F[rd]f<=sqrt(F[rs1]f); | ||||
|             val res[32] <= fdispatch_fsqrt_s(F[rs1]{32}, choose(rm<7, rm{8}, FCSR{8})); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= fdispatch_fsqrt_s(F[rs1], choose(rm<7, rm{8}, FCSR{8})); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
|                 val res[32] <= fdispatch_fsqrt_s(frs1, choose(rm<7, rm{8}, FCSR{8})); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -155,10 +176,12 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|         FSGNJ.S { | ||||
|             encoding: b0010000 | rs2[4:0] | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             val res[32] <= (F[rs1]{32} & 0x7fffffff) | (F[rs2]{32} & 0x80000000); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= (F[rs1] & 0x7fffffff) | (F[rs2] & 0x80000000); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
|                 val res[32] <= (frs1 & 0x7fffffff) | (frs2 & 0x80000000); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -166,10 +189,12 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|         FSGNJN.S { | ||||
|             encoding: b0010000 | rs2[4:0] | rs1[4:0] | b001 | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             val res[32] <= (F[rs1]{32} & 0x7fffffff) | (~F[rs2]{32} & 0x80000000); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= (F[rs1] & 0x7fffffff) | (~F[rs2] & 0x80000000); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
|                 val res[32] <= (frs1 & 0x7fffffff) | (~frs2 & 0x80000000); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -177,10 +202,12 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|         FSGNJX.S { | ||||
|             encoding: b0010000 | rs2[4:0] | rs1[4:0] | b010 | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             val res[32] <= F[rs1]{32} ^ (F[rs2]{32} & 0x80000000); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= F[rs1] ^ (F[rs2] & 0x80000000); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
|                 val res[32] <= frs1 ^ (frs2 & 0x80000000); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -189,10 +216,12 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: b0010100 | rs2[4:0] | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             //F[rd]f<= choose(F[rs1]f<F[rs2]f, F[rs1]f, F[rs2]f); | ||||
|             val res[32] <= fdispatch_fsel_s(F[rs1]{32}, F[rs2]{32}, zext(0, 32)); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= fdispatch_fsel_s(F[rs1], F[rs2], zext(0, 32)); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
|                 val res[32] <= fdispatch_fsel_s(frs1, frs2, zext(0, 32)); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -203,10 +232,12 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|             encoding: b0010100 | rs2[4:0] | rs1[4:0] | b001 | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, f{rs1}, f{rs2}"; | ||||
|             //F[rd]f<= choose(F[rs1]f>F[rs2]f, F[rs1]f, F[rs2]f); | ||||
|             val res[32] <= fdispatch_fsel_s(F[rs1]{32}, F[rs2]{32}, zext(1, 32)); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd] <= fdispatch_fsel_s(F[rs1], F[rs2], zext(1, 32)); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
|                 val res[32] <= fdispatch_fsel_s(frs1, frs2, zext(1, 32)); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
| @@ -215,59 +246,142 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|         } | ||||
|         FCVT.W.S { | ||||
|             encoding: b1100000 | b00000 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"x{rd}, f{rs1}"; | ||||
|             X[rd]<= sext(fdispatch_fcvt_s(F[rs1]{32}, zext(0, 32), rm{8}), XLEN); | ||||
|             args_disass:"{name(rd)}, f{rs1}"; | ||||
|             if(FLEN==32) | ||||
| 	            X[rd] <= sext(fdispatch_fcvt_s(F[rs1], zext(0, 32), rm{8}), XLEN); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
|                 X[rd]<= sext(fdispatch_fcvt_s(frs1, zext(0, 32), rm{8}), XLEN); | ||||
|             } | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FCVT.WU.S { | ||||
|             encoding: b1100000 | b00001 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"x{rd}, f{rs1}"; | ||||
|             X[rd]<= zext(fdispatch_fcvt_s(F[rs1]{32}, zext(1, 32), rm{8}), XLEN); | ||||
|             args_disass:"{name(rd)}, f{rs1}"; | ||||
|             //FIXME: according to the spec it should be zero-extended not sign extended | ||||
|             if(FLEN==32) | ||||
|            		 X[rd]<= sext(fdispatch_fcvt_s(F[rs1], zext(1, 32), rm{8}), XLEN); | ||||
|             else { // NaN boxing | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
|                 X[rd]<= sext(fdispatch_fcvt_s(frs1, zext(1, 32), rm{8}), XLEN); | ||||
|             } | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FEQ.S { | ||||
|             encoding: b1010000 | rs2[4:0] | rs1[4:0] | b010 | rd[4:0] | b1010011; | ||||
|             args_disass:"x{rd}, f{rs1}, f{rs2}"; | ||||
|             X[rd]<=fdispatch_fcmp_s(F[rs1]{32}, F[rs2]{32}, zext(0, 32)); | ||||
|             args_disass:"{name(rd)}, f{rs1}, f{rs2}"; | ||||
|             if(FLEN==32) | ||||
| 	            X[rd]<=zext(fdispatch_fcmp_s(F[rs1], F[rs2], zext(0, 32))); | ||||
| 	        else { | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
| 	            X[rd]<=zext(fdispatch_fcmp_s(frs1, frs2, zext(0, 32)));	         | ||||
| 	        } | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FLT.S { | ||||
|             encoding: b1010000 | rs2[4:0] | rs1[4:0] | b001 | rd[4:0] | b1010011; | ||||
|             args_disass:"x{rd}, f{rs1}, f{rs2}"; | ||||
|             args_disass:"{name(rd)}, f{rs1}, f{rs2}"; | ||||
|             if(FLEN==32) | ||||
|             	X[rd]<=zext(fdispatch_fcmp_s(F[rs1], F[rs2], zext(2, 32))); | ||||
| 	        else { | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
|             	X[rd]<=zext(fdispatch_fcmp_s(frs1, frs2, zext(2, 32))); | ||||
|             } | ||||
|             X[rd]<=fdispatch_fcmp_s(F[rs1]{32}, F[rs2]{32}, zext(2, 32)); | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FLE.S { | ||||
|             encoding: b1010000 | rs2[4:0] | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|             args_disass:"x{rd}, f{rs1}, f{rs2}"; | ||||
|             X[rd]<=fdispatch_fcmp_s(F[rs1]{32}, F[rs2]{32}, zext(1, 32)); | ||||
|             args_disass:"{name(rd)}, f{rs1}, f{rs2}"; | ||||
|             if(FLEN==32) | ||||
| 	            X[rd]<=zext(fdispatch_fcmp_s(F[rs1], F[rs2], zext(1, 32))); | ||||
| 	        else { | ||||
| 	            val frs1[32] <= fdispatch_unbox_s(F[rs1]); | ||||
| 	            val frs2[32] <= fdispatch_unbox_s(F[rs2]); | ||||
| 	            X[rd]<=zext(fdispatch_fcmp_s(frs1, frs2, zext(1, 32))); | ||||
| 	        } | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FCLASS.S { | ||||
|             encoding: b1110000 | b00000 | rs1[4:0] | b001 | rd[4:0] | b1010011; | ||||
|             args_disass:"x{rd}, f{rs1}"; | ||||
|             X[rd]<=fdispatch_fclass_s(F[rs1]{32}); | ||||
|             args_disass:"{name(rd)}, f{rs1}"; | ||||
|             X[rd]<=fdispatch_fclass_s(fdispatch_unbox_s(F[rs1])); | ||||
|         } | ||||
|         FCVT.S.W { | ||||
|             encoding: b1101000 | b00000 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, x{rs1}"; | ||||
|             val res[32] <= fdispatch_fcvt_s(X[rs1]{32}, zext(2, 32), rm{8}); | ||||
|             args_disass:"f{rd}, {name(rs1)}"; | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
| 	            F[rd]  <= fdispatch_fcvt_s(X[rs1]{32}, zext(2, 32), rm{8}); | ||||
|             else { // NaN boxing | ||||
|                 val res[32] <= fdispatch_fcvt_s(X[rs1]{32}, zext(2, 32), rm{8}); | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
|         } | ||||
|         FCVT.S.WU { | ||||
|             encoding: b1101000 | b00001 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, {name(rs1)}"; | ||||
|             if(FLEN==32) | ||||
|     	        F[rd]  <=fdispatch_fcvt_s(X[rs1]{32}, zext(3,32), rm{8}); | ||||
|             else { // NaN boxing | ||||
|                 val res[32] <=fdispatch_fcvt_s(X[rs1]{32}, zext(3,32), rm{8}); | ||||
|     	        val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
|         } | ||||
|         FMV.X.W { | ||||
|             encoding: b1110000 | b00000 | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|             args_disass:"{name(rd)}, f{rs1}"; | ||||
|             X[rd]<=sext(F[rs1]{32}); | ||||
|         } | ||||
|         FMV.W.X { | ||||
|             encoding: b1111000 | b00000 | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, {name(rs1)}"; | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= X[rs1]{32}; | ||||
|             else { // NaN boxing | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(X[rs1]{32}, FLEN); | ||||
|             } | ||||
|         } | ||||
|     } | ||||
| } | ||||
|  | ||||
| InsructionSet RV64F extends RV32F{ | ||||
|     constants { | ||||
|         FLEN, FFLAG_MASK := 0x1f | ||||
|     }  | ||||
|     registers { | ||||
|         [31:0]    F[FLEN],  FCSR[32] | ||||
|     }     | ||||
|     instructions{ | ||||
|         FCVT.L.S { // fp to 64bit signed integer | ||||
|             encoding: b1100000 | b00010 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"x{rd}, f{rs1}"; | ||||
|             val res[64] <= fdispatch_fcvt_32_64(fdispatch_unbox_s(F[rs1]), zext(0, 32), rm{8}); | ||||
|             X[rd]<= sext(res); | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FCVT.LU.S { // fp to 64bit unsigned integer | ||||
|             encoding: b1100000 | b00011 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"x{rd}, f{rs1}"; | ||||
|             val res[64] <= fdispatch_fcvt_32_64(fdispatch_unbox_s(F[rs1]), zext(1, 32), rm{8}); | ||||
|             X[rd]<= zext(res); | ||||
|             val flags[32] <= fdispatch_fget_flags(); | ||||
|             FCSR <= (FCSR & ~FFLAG_MASK) + flags{5}; | ||||
|         } | ||||
|         FCVT.S.L { // 64bit signed int to to fp  | ||||
|             encoding: b1101000 | b00010 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, x{rs1}"; | ||||
|             val res[32] <=fdispatch_fcvt_s(X[rs1]{32}, zext(3,32), rm{8}); | ||||
|             val res[32] <= fdispatch_fcvt_64_32(X[rs1], zext(2, 32)); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= res; | ||||
|             else { // NaN boxing | ||||
| @@ -275,20 +389,17 @@ InsructionSet RV32F extends RV32IBase{ | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
|         } | ||||
|         FMV.X.W { | ||||
|             encoding: b1110000 | b00000 | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|             args_disass:"x{rd}, f{rs1}"; | ||||
|             X[rd]<=sext(F[rs1]{32}); | ||||
|         } | ||||
|         FMV.W.X { | ||||
|             encoding: b1111000 | b00000 | rs1[4:0] | b000 | rd[4:0] | b1010011; | ||||
|         FCVT.S.LU { // 64bit unsigned int to to fp  | ||||
|             encoding: b1101000 | b00011 | rs1[4:0] | rm[2:0] | rd[4:0] | b1010011; | ||||
|             args_disass:"f{rd}, x{rs1}"; | ||||
|             val res[32] <=fdispatch_fcvt_64_32(X[rs1], zext(3,32)); | ||||
|             if(FLEN==32) | ||||
|                 F[rd] <= X[rs1]; | ||||
|                 F[rd] <= res; | ||||
|             else { // NaN boxing | ||||
|                 val upper[FLEN] <= -1; | ||||
|                 F[rd] <= (upper<<32) | zext(X[rs1], FLEN); | ||||
|                 F[rd] <= (upper<<32) | zext(res, FLEN); | ||||
|             } | ||||
|         } | ||||
|     } | ||||
| } | ||||
| 	} | ||||
| } | ||||
|      | ||||
| @@ -8,7 +8,7 @@ InsructionSet RV32IBase { | ||||
|     } | ||||
|      | ||||
|     address_spaces {  | ||||
|         MEM[8], CSR[XLEN], FENCE[XLEN] | ||||
|         MEM[8], CSR[XLEN], FENCE[XLEN], RES[8] | ||||
|     } | ||||
|                  | ||||
|     registers {  | ||||
|   | ||||
| @@ -43,12 +43,11 @@ InsructionSet RV32M extends RV32IBase { | ||||
|             if(rd != 0){ | ||||
|                 if(X[rs2]!=0){ | ||||
|                     val M1[XLEN] <= -1; | ||||
|                     val MMIN[XLEN] <= -1<<(XLEN-1); | ||||
|                     if(X[rs1]s==MMIN's) | ||||
|                         if(X[rs2]s==M1's) | ||||
|                             X[rd]<=MMIN; | ||||
|                         else | ||||
|                             X[rd] <= X[rs1]s / X[rs2]s; | ||||
|                     val XLM1[8] <= XLEN-1; | ||||
|                     val ONE[XLEN] <= 1; | ||||
|                     val MMIN[XLEN] <= ONE<<XLM1; | ||||
|                     if(X[rs1]==MMIN && X[rs2]==M1) | ||||
|                         X[rd] <= MMIN; | ||||
|                     else | ||||
|                         X[rd] <= X[rs1]s / X[rs2]s; | ||||
|                 }else  | ||||
| @@ -60,7 +59,7 @@ InsructionSet RV32M extends RV32IBase { | ||||
|             args_disass:"{name(rd)}, {name(rs1)}, {name(rs2)}"; | ||||
|             if(rd != 0){ | ||||
|                 if(X[rs2]!=0) | ||||
|                     X[rd] <= zext(X[rs1], 32) / zext(X[rs2], 32); | ||||
|                     X[rd] <= X[rs1] / X[rs2]; | ||||
|                 else  | ||||
|                     X[rd] <= -1; | ||||
|             } | ||||
| @@ -70,15 +69,14 @@ InsructionSet RV32M extends RV32IBase { | ||||
|             args_disass:"{name(rd)}, {name(rs1)}, {name(rs2)}"; | ||||
|             if(rd != 0){ | ||||
|                 if(X[rs2]!=0) { | ||||
|                     val M1[XLEN] <= -1; | ||||
|                     val MMIN[XLEN] <= -1<<(XLEN-1); | ||||
|                     if(X[rs1]s==MMIN's) | ||||
|                         if(X[rs2]s==M1's) | ||||
|                             X[rd] <= 0; | ||||
|                         else | ||||
|                             X[rd] <= sext(X[rs1], 32) % sext(X[rs2], 32); | ||||
|                     val M1[XLEN] <= -1; // constant -1  | ||||
|                     val XLM1[32] <= XLEN-1; | ||||
|                     val ONE[XLEN] <= 1; | ||||
|                     val MMIN[XLEN] <= ONE<<XLM1; // -2^(XLEN-1) | ||||
|                     if(X[rs1]==MMIN && X[rs2]==M1) | ||||
|                         X[rd] <= 0; | ||||
|                     else | ||||
|                         X[rd] <= sext(X[rs1], 32) % sext(X[rs2], 32); | ||||
|                         X[rd] <= X[rs1]'s % X[rs2]'s; | ||||
|                 } else  | ||||
|                     X[rd] <= X[rs1]; | ||||
|             } | ||||
| @@ -88,7 +86,7 @@ InsructionSet RV32M extends RV32IBase { | ||||
|             args_disass:"{name(rd)}, {name(rs1)}, {name(rs2)}"; | ||||
|             if(rd != 0){ | ||||
|                 if(X[rs2]!=0) | ||||
|                     X[rd] <= zext(X[rs1], 32) % zext(X[rs2], 32); | ||||
|                     X[rd] <= X[rs1] % X[rs2]; | ||||
|                 else  | ||||
|                     X[rd] <= X[rs1]; | ||||
|             } | ||||
|   | ||||
| @@ -1,12 +1,7 @@ | ||||
| import "RV64IBase.core_desc" | ||||
| import "RV32A.core_desc" | ||||
|  | ||||
| InsructionSet RV64A extends RV64IBase { | ||||
|       | ||||
|     address_spaces {  | ||||
|         RES[8] | ||||
|     } | ||||
|      | ||||
|     instructions{ | ||||
|         LR.D { | ||||
|             encoding: b00010 | aq[0:0] | rl[0:0]  | b00000 | rs1[4:0] | b011 | rd[4:0] | b0101111; | ||||
| @@ -76,10 +71,10 @@ InsructionSet RV64A extends RV64IBase { | ||||
|             encoding: b10000 | aq[0:0] | rl[0:0] | rs2[4:0] | rs1[4:0] | b011 | rd[4:0] | b0101111; | ||||
|             args_disass: "{name(rd)}, {name(rs1)}, {name(rs2)} (aqu={aq},rel={rl})"; | ||||
|             val offs[XLEN] <= X[rs1]; | ||||
|             val res[XLEN] <= sext(MEM[offs]{64}); | ||||
|             if(rd!=0) X[rd] <= res; | ||||
|             val res2[XLEN] <= choose(res s > X[rs2]s, X[rs2], res);             | ||||
|             MEM[offs]{64} <= res;             | ||||
|             val res1[XLEN] <= sext(MEM[offs]{64}); | ||||
|             if(rd!=0) X[rd] <= res1; | ||||
|             val res2[XLEN] <= choose(res1's > X[rs2]s, X[rs2], res1); | ||||
|             MEM[offs]{64} <= res2; | ||||
|         } | ||||
|         AMOMAX.D{ | ||||
|             encoding: b10100 | aq[0:0] | rl[0:0] | rs2[4:0] | rs1[4:0] | b011 | rd[4:0] | b0101111; | ||||
| @@ -94,7 +89,7 @@ InsructionSet RV64A extends RV64IBase { | ||||
|             encoding: b11000 | aq[0:0] | rl[0:0] | rs2[4:0] | rs1[4:0] | b011 | rd[4:0] | b0101111; | ||||
|             args_disass: "{name(rd)}, {name(rs1)}, {name(rs2)} (aqu={aq},rel={rl})"; | ||||
|             val offs[XLEN] <= X[rs1]; | ||||
|             val res[XLEN] <= zext(MEM[offs]{64}); | ||||
|             val res[XLEN] <= sext(MEM[offs]{64}); | ||||
|             if(rd!=0) X[rd] <= res; | ||||
|             val res2[XLEN] <= choose(res > X[rs2], X[rs2], res);             | ||||
|             MEM[offs]{64} <= res2;             | ||||
| @@ -103,10 +98,10 @@ InsructionSet RV64A extends RV64IBase { | ||||
|             encoding: b11100 | aq[0:0] | rl[0:0] | rs2[4:0] | rs1[4:0] | b011 | rd[4:0] | b0101111; | ||||
|             args_disass: "{name(rd)}, {name(rs1)}, {name(rs2)} (aqu={aq},rel={rl})"; | ||||
|             val offs[XLEN] <= X[rs1]; | ||||
|             val res[XLEN] <= zext(MEM[offs]{64}); | ||||
|             if(rd!=0) X[rd] <= res; | ||||
|             val res2[XLEN] <= choose(res < X[rs2], X[rs2], res);             | ||||
|             MEM[offs]{64} <= res2;             | ||||
|             val res1[XLEN] <= sext(MEM[offs]{64}); | ||||
|             if(rd!=0) X[rd] <= res1; | ||||
|             val res2[XLEN] <= choose(res1 < X[rs2], X[rs2], res1); | ||||
|             MEM[offs]{64} <= res2; | ||||
|         } | ||||
|     } | ||||
| } | ||||
| @@ -6,35 +6,59 @@ InsructionSet RV64M extends RV64IBase { | ||||
|             encoding: b0000001 | rs2[4:0] | rs1[4:0] | b000 | rd[4:0] | b0111011; | ||||
|             args_disass:"{name(rd)}, {name(rs1)}, {name(rs2)}"; | ||||
|             if(rd != 0){ | ||||
|                 X[rd]<= X[rs1] * X[rs2]; | ||||
|                 X[rd]<= sext(X[rs1]{32} * X[rs2]{32}); | ||||
|             } | ||||
|         } | ||||
|         DIVW { | ||||
|             encoding: b0000001 | rs2[4:0] | rs1[4:0] | b100 | rd[4:0] | b0111011; | ||||
|             args_disass:"{name(rd)}, {name(rs1)}, {name(rs2)}"; | ||||
|             if(rd != 0){ | ||||
|                 X[rd] <= X[rs1]s / X[rs2]s; | ||||
|                 if(X[rs2]!=0){ | ||||
|                     val M1[32] <= -1; | ||||
|                     val ONE[32] <= 1; | ||||
|                     val MMIN[32] <= ONE<<31; | ||||
|                     if(X[rs1]{32}==MMIN && X[rs2]{32}==M1) | ||||
|                         X[rd] <= -1<<31; | ||||
|                     else | ||||
|                         X[rd] <= sext(X[rs1]{32}s / X[rs2]{32}s); | ||||
|                 }else  | ||||
|                     X[rd] <= -1; | ||||
|             } | ||||
|         } | ||||
|         DIVUW { | ||||
|             encoding: b0000001 | rs2[4:0] | rs1[4:0] | b101 | rd[4:0] | b0111011; | ||||
|             args_disass:"{name(rd)}, {name(rs1)}, {name(rs2)}"; | ||||
|             if(rd != 0){ | ||||
|                 X[rd] <= X[rs1] / X[rs2]; | ||||
|             } | ||||
| 	            if(X[rs2]{32}!=0) | ||||
| 	                X[rd] <= sext(X[rs1]{32} / X[rs2]{32}); | ||||
| 	            else  | ||||
| 	                X[rd] <= -1; | ||||
| 	        } | ||||
|         } | ||||
|         REMW { | ||||
|             encoding: b0000001 | rs2[4:0] | rs1[4:0] | b110 | rd[4:0] | b0111011; | ||||
|             args_disass:"{name(rd)}, {name(rs1)}, {name(rs2)}"; | ||||
|             if(rd != 0){ | ||||
|                 X[rd] <= X[rs1]s % X[rs2]s; | ||||
|                 if(X[rs2]!=0) { | ||||
|                     val M1[32] <= -1; // constant -1  | ||||
|                     val ONE[32] <= 1; | ||||
|                     val MMIN[32] <= ONE<<31; // -2^(XLEN-1) | ||||
|                     if(X[rs1]{32}==MMIN && X[rs2]==M1) | ||||
|                         X[rd] <= 0; | ||||
|                     else | ||||
|                         X[rd] <= sext(X[rs1]{32}s % X[rs2]{32}s); | ||||
|                 } else  | ||||
|                     X[rd] <= sext(X[rs1]{32}); | ||||
|             } | ||||
|         } | ||||
|         REMUW { | ||||
|             encoding: b0000001 | rs2[4:0] | rs1[4:0] | b111 | rd[4:0] | b0111011; | ||||
|             args_disass:"{name(rd)}, {name(rs1)}, {name(rs2)}"; | ||||
|             if(rd != 0){ | ||||
|                 X[rd] <= X[rs1] % X[rs2]; | ||||
|                 if(X[rs2]{32}!=0) | ||||
|                     X[rd] <= sext(X[rs1]{32} % X[rs2]{32}); | ||||
|                 else  | ||||
|                     X[rd] <= sext(X[rs1]{32}); | ||||
|             } | ||||
|         } | ||||
|     } | ||||
|   | ||||
| @@ -5,7 +5,7 @@ import "RV32C.core_desc" | ||||
| import "RV32F.core_desc" | ||||
| import "RV32D.core_desc" | ||||
| import "RV64IBase.core_desc" | ||||
| //import "RV64M.core_desc" | ||||
| import "RV64M.core_desc" | ||||
| import "RV64A.core_desc" | ||||
|  | ||||
| Core RV32IMAC provides RV32IBase, RV32M, RV32A, RV32IC { | ||||
| @@ -33,15 +33,28 @@ Core RV32GC provides RV32IBase, RV32M, RV32A, RV32IC, RV32F, RV32FC, RV32D, RV32 | ||||
|     } | ||||
| } | ||||
|  | ||||
|  | ||||
| Core RV64IA provides RV64IBase, RV64A, RV32A { | ||||
| Core RV64I provides RV64IBase { | ||||
|     constants { | ||||
|         XLEN:=64; | ||||
|         PCLEN:=64; | ||||
|         // definitions for the architecture wrapper | ||||
|         //          XL    ZYXWVUTSRQPONMLKJIHGFEDCBA | ||||
|         MISA_VAL:=0b10000000000001000000000100000001; | ||||
|         MISA_VAL:=0b10000000000001000000000100000000; | ||||
|         PGSIZE := 0x1000; //1 << 12; | ||||
|         PGMASK := 0xfff; //PGSIZE-1 | ||||
|     } | ||||
| } | ||||
|  | ||||
| Core RV64GC provides RV64IC, RV64A, RV64M, RV32A, RV32M, RV64F, RV64D, RV32FC, RV32DC { | ||||
|     constants { | ||||
|         XLEN:=64; | ||||
|         FLEN:=64; | ||||
|         PCLEN:=64; | ||||
|         // definitions for the architecture wrapper | ||||
|         //          XL    ZYXWVUTSRQPONMLKJIHGFEDCBA | ||||
|         MISA_VAL:=0b01000000000101000001000100101101; | ||||
|         PGSIZE := 0x1000; //1 << 12; | ||||
|         PGMASK := 0xfff; //PGSIZE-1 | ||||
|     } | ||||
| } | ||||
|  | ||||
|   | ||||
| @@ -29,7 +29,45 @@ | ||||
|  * POSSIBILITY OF SUCH DAMAGE. | ||||
|  * | ||||
|  *******************************************************************************/ | ||||
|  | ||||
|  <%  | ||||
| import com.minres.coredsl.coreDsl.Register | ||||
| import com.minres.coredsl.coreDsl.RegisterFile | ||||
| import com.minres.coredsl.coreDsl.RegisterAlias | ||||
| def getOriginalName(reg){ | ||||
|     if( reg.original instanceof RegisterFile) { | ||||
|     	if( reg.index != null ) { | ||||
|         	return reg.original.name+generator.generateHostCode(reg.index) | ||||
|         } else { | ||||
|         	return reg.original.name | ||||
|         } | ||||
|     } else if(reg.original instanceof Register){ | ||||
|         return reg.original.name | ||||
|     } | ||||
| } | ||||
| def getRegisterNames(){ | ||||
| 	def regNames = [] | ||||
|  	allRegs.each { reg ->  | ||||
| 		if( reg instanceof RegisterFile) { | ||||
| 			(reg.range.right..reg.range.left).each{ | ||||
|     			regNames+=reg.name.toLowerCase()+it | ||||
|             } | ||||
|         } else if(reg instanceof Register){ | ||||
|     		regNames+=reg.name.toLowerCase() | ||||
|         } | ||||
|     } | ||||
|     return regNames | ||||
| } | ||||
| def getRegisterAliasNames(){ | ||||
| 	def regMap = allRegs.findAll{it instanceof RegisterAlias }.collectEntries {[getOriginalName(it), it.name]} | ||||
|  	return allRegs.findAll{it instanceof Register || it instanceof RegisterFile}.collect{reg -> | ||||
| 		if( reg instanceof RegisterFile) { | ||||
| 			return (reg.range.right..reg.range.left).collect{ (regMap[reg.name]?:regMap[reg.name+it]?:reg.name.toLowerCase()+it).toLowerCase() } | ||||
|         } else if(reg instanceof Register){ | ||||
|     		regMap[reg.name]?:reg.name.toLowerCase() | ||||
|         } | ||||
|  	}.flatten() | ||||
| } | ||||
| %> | ||||
| #include "util/ities.h" | ||||
| #include <util/logging.h> | ||||
|  | ||||
| @@ -49,27 +87,29 @@ extern "C" { | ||||
|  | ||||
| using namespace iss::arch; | ||||
|  | ||||
| constexpr std::array<const uint32_t, 39> iss::arch::traits<iss::arch::${coreDef.name.toLowerCase()}>::reg_sizes; | ||||
| constexpr std::array<const uint32_t, 40> iss::arch::traits<iss::arch::${coreDef.name.toLowerCase()}>::reg_byte_offset; | ||||
| constexpr std::array<const char*, ${getRegisterNames().size}>    iss::arch::traits<iss::arch::${coreDef.name.toLowerCase()}>::reg_names; | ||||
| constexpr std::array<const char*, ${getRegisterAliasNames().size}>    iss::arch::traits<iss::arch::${coreDef.name.toLowerCase()}>::reg_aliases; | ||||
| constexpr std::array<const uint32_t, ${regSizes.size}> iss::arch::traits<iss::arch::${coreDef.name.toLowerCase()}>::reg_bit_widths; | ||||
| constexpr std::array<const uint32_t, ${regOffsets.size}> iss::arch::traits<iss::arch::${coreDef.name.toLowerCase()}>::reg_byte_offsets; | ||||
|  | ||||
| ${coreDef.name.toLowerCase()}::${coreDef.name.toLowerCase()}() { | ||||
|     reg.icount = 0; | ||||
|     reg.machine_state = 0x3; | ||||
| } | ||||
|  | ||||
| ${coreDef.name.toLowerCase()}::~${coreDef.name.toLowerCase()}() = default; | ||||
| } | ||||
|  | ||||
| void ${coreDef.name.toLowerCase()}::reset(uint64_t address) { | ||||
|     for(size_t i=0; i<traits<${coreDef.name.toLowerCase()}>::NUM_REGS; ++i) | ||||
|     	set_reg(i, std::vector<uint8_t>(sizeof(traits<${coreDef.name.toLowerCase()}>::reg_t),0)); | ||||
|     for(size_t i=0; i<traits<${coreDef.name.toLowerCase()}>::NUM_REGS; ++i) set_reg(i, std::vector<uint8_t>(sizeof(traits<${coreDef.name.toLowerCase()}>::reg_t),0)); | ||||
|     reg.PC=address; | ||||
|     reg.NEXT_PC=reg.PC; | ||||
|     reg.trap_state=0; | ||||
|     reg.machine_state=0x3; | ||||
|     reg.machine_state=0x0; | ||||
|     reg.icount=0; | ||||
| } | ||||
|  | ||||
| uint8_t *${coreDef.name.toLowerCase()}::get_regs_base_ptr() { return reinterpret_cast<uint8_t*>(®); } | ||||
| uint8_t *${coreDef.name.toLowerCase()}::get_regs_base_ptr() { | ||||
| 	return reinterpret_cast<uint8_t*>(®); | ||||
| } | ||||
|  | ||||
| ${coreDef.name.toLowerCase()}::phys_addr_t ${coreDef.name.toLowerCase()}::virt2phys(const iss::addr_t &pc) { | ||||
|     return phys_addr_t(pc); // change logical address to physical address | ||||
|   | ||||
| @@ -46,7 +46,7 @@ | ||||
| namespace iss { | ||||
| namespace vm { | ||||
| namespace fp_impl { | ||||
| void add_fp_functions_2_module(llvm::Module *, unsigned); | ||||
| void add_fp_functions_2_module(llvm::Module *, unsigned, unsigned); | ||||
| } | ||||
| } | ||||
|  | ||||
| @@ -88,7 +88,7 @@ protected: | ||||
|  | ||||
|     void setup_module(Module* m) override { | ||||
|         super::setup_module(m); | ||||
|         iss::vm::fp_impl::add_fp_functions_2_module(m, traits<ARCH>::FP_REGS_SIZE); | ||||
|         iss::vm::fp_impl::add_fp_functions_2_module(m, traits<ARCH>::FP_REGS_SIZE, traits<ARCH>::XLEN); | ||||
|     } | ||||
|  | ||||
|     inline Value *gen_choose(Value *cond, Value *trueVal, Value *falseVal, unsigned size) { | ||||
| @@ -241,24 +241,21 @@ template <typename ARCH> | ||||
| std::tuple<continuation_e, BasicBlock *> | ||||
| vm_impl<ARCH>::gen_single_inst_behavior(virt_addr_t &pc, unsigned int &inst_cnt, BasicBlock *this_block) { | ||||
|     // we fetch at max 4 byte, alignment is 2 | ||||
|     enum {TRAP_ID=1<<16}; | ||||
|     code_word_t insn = 0; | ||||
|     const typename traits<ARCH>::addr_t upper_bits = ~traits<ARCH>::PGMASK; | ||||
|     phys_addr_t paddr(pc); | ||||
|     try { | ||||
|         auto *const data = (uint8_t *)&insn; | ||||
|         paddr = this->core.v2p(pc); | ||||
|         if ((pc.val & upper_bits) != ((pc.val + 2) & upper_bits)) { // we may cross a page boundary | ||||
|             auto res = this->core.read(paddr, 2, data); | ||||
|             if (res != iss::Ok) throw trap_access(1, pc.val); | ||||
|             if ((insn & 0x3) == 0x3) { // this is a 32bit instruction | ||||
|                 res = this->core.read(this->core.v2p(pc + 2), 2, data + 2); | ||||
|             } | ||||
|         } else { | ||||
|             auto res = this->core.read(paddr, 4, data); | ||||
|             if (res != iss::Ok) throw trap_access(1, pc.val); | ||||
|     auto *const data = (uint8_t *)&insn; | ||||
|     paddr = this->core.v2p(pc); | ||||
|     if ((pc.val & upper_bits) != ((pc.val + 2) & upper_bits)) { // we may cross a page boundary | ||||
|         auto res = this->core.read(paddr, 2, data); | ||||
|         if (res != iss::Ok) throw trap_access(TRAP_ID, pc.val); | ||||
|         if ((insn & 0x3) == 0x3) { // this is a 32bit instruction | ||||
|             res = this->core.read(this->core.v2p(pc + 2), 2, data + 2); | ||||
|         } | ||||
|     } catch (trap_access &ta) { | ||||
|         throw trap_access(ta.id, pc.val); | ||||
|     } else { | ||||
|         auto res = this->core.read(paddr, 4, data); | ||||
|         if (res != iss::Ok) throw trap_access(TRAP_ID, pc.val); | ||||
|     } | ||||
|     if (insn == 0x0000006f || (insn&0xffff)==0xa001) throw simulation_stopped(0); // 'J 0' or 'C.J 0' | ||||
|     // curr pc on stack | ||||
|   | ||||
							
								
								
									
										316
									
								
								riscv/incl/iss/arch/rv64gc.h
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										316
									
								
								riscv/incl/iss/arch/rv64gc.h
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,316 @@ | ||||
| /******************************************************************************* | ||||
|  * Copyright (C) 2017, 2018 MINRES Technologies GmbH | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * Redistribution and use in source and binary forms, with or without | ||||
|  * modification, are permitted provided that the following conditions are met: | ||||
|  * | ||||
|  * 1. Redistributions of source code must retain the above copyright notice, | ||||
|  *    this list of conditions and the following disclaimer. | ||||
|  * | ||||
|  * 2. Redistributions in binary form must reproduce the above copyright notice, | ||||
|  *    this list of conditions and the following disclaimer in the documentation | ||||
|  *    and/or other materials provided with the distribution. | ||||
|  * | ||||
|  * 3. Neither the name of the copyright holder nor the names of its contributors | ||||
|  *    may be used to endorse or promote products derived from this software | ||||
|  *    without specific prior written permission. | ||||
|  * | ||||
|  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | ||||
|  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||||
|  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||||
|  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | ||||
|  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | ||||
|  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | ||||
|  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | ||||
|  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | ||||
|  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||||
|  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||
|  * POSSIBILITY OF SUCH DAMAGE. | ||||
|  * | ||||
|  *******************************************************************************/ | ||||
|  | ||||
|  | ||||
| #ifndef _RV64GC_H_ | ||||
| #define _RV64GC_H_ | ||||
|  | ||||
| #include <array> | ||||
| #include <iss/arch/traits.h> | ||||
| #include <iss/arch_if.h> | ||||
| #include <iss/vm_if.h> | ||||
|  | ||||
| namespace iss { | ||||
| namespace arch { | ||||
|  | ||||
| struct rv64gc; | ||||
|  | ||||
| template <> struct traits<rv64gc> { | ||||
|  | ||||
| 	constexpr static char const* const core_type = "RV64GC"; | ||||
|      | ||||
|   	static constexpr std::array<const char*, 66> reg_names{ | ||||
|  		{"x0", "x1", "x2", "x3", "x4", "x5", "x6", "x7", "x8", "x9", "x10", "x11", "x12", "x13", "x14", "x15", "x16", "x17", "x18", "x19", "x20", "x21", "x22", "x23", "x24", "x25", "x26", "x27", "x28", "x29", "x30", "x31", "pc", "f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7", "f8", "f9", "f10", "f11", "f12", "f13", "f14", "f15", "f16", "f17", "f18", "f19", "f20", "f21", "f22", "f23", "f24", "f25", "f26", "f27", "f28", "f29", "f30", "f31", "fcsr"}}; | ||||
|   | ||||
|   	static constexpr std::array<const char*, 66> reg_aliases{ | ||||
|  		{"zero", "ra", "sp", "gp", "tp", "t0", "t1", "t2", "s0", "s1", "a0", "a1", "a2", "a3", "a4", "a5", "a6", "a7", "s2", "s3", "s4", "s5", "s6", "s7", "s8", "s9", "s10", "s11", "t3", "t4", "t5", "t6", "pc", "f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7", "f8", "f9", "f10", "f11", "f12", "f13", "f14", "f15", "f16", "f17", "f18", "f19", "f20", "f21", "f22", "f23", "f24", "f25", "f26", "f27", "f28", "f29", "f30", "f31", "fcsr"}}; | ||||
|  | ||||
|     enum constants {XLEN=64, FLEN=64, PCLEN=64, MISA_VAL=0b1000000000101000001000100101101, PGSIZE=0x1000, PGMASK=0xfff}; | ||||
|  | ||||
|     constexpr static unsigned FP_REGS_SIZE = 64; | ||||
|  | ||||
|     enum reg_e { | ||||
|         X0, | ||||
|         X1, | ||||
|         X2, | ||||
|         X3, | ||||
|         X4, | ||||
|         X5, | ||||
|         X6, | ||||
|         X7, | ||||
|         X8, | ||||
|         X9, | ||||
|         X10, | ||||
|         X11, | ||||
|         X12, | ||||
|         X13, | ||||
|         X14, | ||||
|         X15, | ||||
|         X16, | ||||
|         X17, | ||||
|         X18, | ||||
|         X19, | ||||
|         X20, | ||||
|         X21, | ||||
|         X22, | ||||
|         X23, | ||||
|         X24, | ||||
|         X25, | ||||
|         X26, | ||||
|         X27, | ||||
|         X28, | ||||
|         X29, | ||||
|         X30, | ||||
|         X31, | ||||
|         PC, | ||||
|         F0, | ||||
|         F1, | ||||
|         F2, | ||||
|         F3, | ||||
|         F4, | ||||
|         F5, | ||||
|         F6, | ||||
|         F7, | ||||
|         F8, | ||||
|         F9, | ||||
|         F10, | ||||
|         F11, | ||||
|         F12, | ||||
|         F13, | ||||
|         F14, | ||||
|         F15, | ||||
|         F16, | ||||
|         F17, | ||||
|         F18, | ||||
|         F19, | ||||
|         F20, | ||||
|         F21, | ||||
|         F22, | ||||
|         F23, | ||||
|         F24, | ||||
|         F25, | ||||
|         F26, | ||||
|         F27, | ||||
|         F28, | ||||
|         F29, | ||||
|         F30, | ||||
|         F31, | ||||
|         FCSR, | ||||
|         NUM_REGS, | ||||
|         NEXT_PC=NUM_REGS, | ||||
|         TRAP_STATE, | ||||
|         PENDING_TRAP, | ||||
|         MACHINE_STATE, | ||||
|         LAST_BRANCH, | ||||
|         ICOUNT, | ||||
|         ZERO = X0, | ||||
|         RA = X1, | ||||
|         SP = X2, | ||||
|         GP = X3, | ||||
|         TP = X4, | ||||
|         T0 = X5, | ||||
|         T1 = X6, | ||||
|         T2 = X7, | ||||
|         S0 = X8, | ||||
|         S1 = X9, | ||||
|         A0 = X10, | ||||
|         A1 = X11, | ||||
|         A2 = X12, | ||||
|         A3 = X13, | ||||
|         A4 = X14, | ||||
|         A5 = X15, | ||||
|         A6 = X16, | ||||
|         A7 = X17, | ||||
|         S2 = X18, | ||||
|         S3 = X19, | ||||
|         S4 = X20, | ||||
|         S5 = X21, | ||||
|         S6 = X22, | ||||
|         S7 = X23, | ||||
|         S8 = X24, | ||||
|         S9 = X25, | ||||
|         S10 = X26, | ||||
|         S11 = X27, | ||||
|         T3 = X28, | ||||
|         T4 = X29, | ||||
|         T5 = X30, | ||||
|         T6 = X31 | ||||
|     }; | ||||
|  | ||||
|     using reg_t = uint64_t; | ||||
|  | ||||
|     using addr_t = uint64_t; | ||||
|  | ||||
|     using code_word_t = uint64_t; //TODO: check removal | ||||
|  | ||||
|     using virt_addr_t = iss::typed_addr_t<iss::address_type::VIRTUAL>; | ||||
|  | ||||
|     using phys_addr_t = iss::typed_addr_t<iss::address_type::PHYSICAL>; | ||||
|  | ||||
|  	static constexpr std::array<const uint32_t, 72> reg_bit_widths{ | ||||
|  		{64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,32,64,32,32,32,32,64}}; | ||||
|  | ||||
|     static constexpr std::array<const uint32_t, 73> reg_byte_offsets{ | ||||
|     	{0,8,16,24,32,40,48,56,64,72,80,88,96,104,112,120,128,136,144,152,160,168,176,184,192,200,208,216,224,232,240,248,256,264,272,280,288,296,304,312,320,328,336,344,352,360,368,376,384,392,400,408,416,424,432,440,448,456,464,472,480,488,496,504,512,520,528,536,540,544,548,552,560}}; | ||||
|  | ||||
|     static const uint64_t addr_mask = (reg_t(1) << (XLEN - 1)) | ((reg_t(1) << (XLEN - 1)) - 1); | ||||
|  | ||||
|     enum sreg_flag_e { FLAGS }; | ||||
|  | ||||
|     enum mem_type_e { MEM, CSR, FENCE, RES }; | ||||
| }; | ||||
|  | ||||
| struct rv64gc: public arch_if { | ||||
|  | ||||
|     using virt_addr_t = typename traits<rv64gc>::virt_addr_t; | ||||
|     using phys_addr_t = typename traits<rv64gc>::phys_addr_t; | ||||
|     using reg_t =  typename traits<rv64gc>::reg_t; | ||||
|     using addr_t = typename traits<rv64gc>::addr_t; | ||||
|  | ||||
|     rv64gc(); | ||||
|     ~rv64gc(); | ||||
|  | ||||
|     void reset(uint64_t address=0) override; | ||||
|  | ||||
|     uint8_t* get_regs_base_ptr() override; | ||||
|     /// deprecated | ||||
|     void get_reg(short idx, std::vector<uint8_t>& value) override {} | ||||
|     void set_reg(short idx, const std::vector<uint8_t>& value) override {} | ||||
|     /// deprecated | ||||
|     bool get_flag(int flag) override {return false;} | ||||
|     void set_flag(int, bool value) override {}; | ||||
|     /// deprecated | ||||
|     void update_flags(operations op, uint64_t opr1, uint64_t opr2) override {}; | ||||
|  | ||||
|     inline uint64_t get_icount() { return reg.icount; } | ||||
|  | ||||
|     inline bool should_stop() { return interrupt_sim; } | ||||
|  | ||||
|     inline phys_addr_t v2p(const iss::addr_t& addr){ | ||||
|         if (addr.space != traits<rv64gc>::MEM || addr.type == iss::address_type::PHYSICAL || | ||||
|                 addr_mode[static_cast<uint16_t>(addr.access)&0x3]==address_type::PHYSICAL) { | ||||
|             return phys_addr_t(addr.access, addr.space, addr.val&traits<rv64gc>::addr_mask); | ||||
|         } else | ||||
|             return virt2phys(addr); | ||||
|     } | ||||
|  | ||||
|     virtual phys_addr_t virt2phys(const iss::addr_t& addr); | ||||
|  | ||||
|     virtual iss::sync_type needed_sync() const { return iss::NO_SYNC; } | ||||
|  | ||||
|     inline uint32_t get_last_branch() { return reg.last_branch; } | ||||
|  | ||||
| protected: | ||||
|     struct RV64GC_regs { | ||||
|         uint64_t X0 = 0; | ||||
|         uint64_t X1 = 0; | ||||
|         uint64_t X2 = 0; | ||||
|         uint64_t X3 = 0; | ||||
|         uint64_t X4 = 0; | ||||
|         uint64_t X5 = 0; | ||||
|         uint64_t X6 = 0; | ||||
|         uint64_t X7 = 0; | ||||
|         uint64_t X8 = 0; | ||||
|         uint64_t X9 = 0; | ||||
|         uint64_t X10 = 0; | ||||
|         uint64_t X11 = 0; | ||||
|         uint64_t X12 = 0; | ||||
|         uint64_t X13 = 0; | ||||
|         uint64_t X14 = 0; | ||||
|         uint64_t X15 = 0; | ||||
|         uint64_t X16 = 0; | ||||
|         uint64_t X17 = 0; | ||||
|         uint64_t X18 = 0; | ||||
|         uint64_t X19 = 0; | ||||
|         uint64_t X20 = 0; | ||||
|         uint64_t X21 = 0; | ||||
|         uint64_t X22 = 0; | ||||
|         uint64_t X23 = 0; | ||||
|         uint64_t X24 = 0; | ||||
|         uint64_t X25 = 0; | ||||
|         uint64_t X26 = 0; | ||||
|         uint64_t X27 = 0; | ||||
|         uint64_t X28 = 0; | ||||
|         uint64_t X29 = 0; | ||||
|         uint64_t X30 = 0; | ||||
|         uint64_t X31 = 0; | ||||
|         uint64_t PC = 0; | ||||
|         uint64_t F0 = 0; | ||||
|         uint64_t F1 = 0; | ||||
|         uint64_t F2 = 0; | ||||
|         uint64_t F3 = 0; | ||||
|         uint64_t F4 = 0; | ||||
|         uint64_t F5 = 0; | ||||
|         uint64_t F6 = 0; | ||||
|         uint64_t F7 = 0; | ||||
|         uint64_t F8 = 0; | ||||
|         uint64_t F9 = 0; | ||||
|         uint64_t F10 = 0; | ||||
|         uint64_t F11 = 0; | ||||
|         uint64_t F12 = 0; | ||||
|         uint64_t F13 = 0; | ||||
|         uint64_t F14 = 0; | ||||
|         uint64_t F15 = 0; | ||||
|         uint64_t F16 = 0; | ||||
|         uint64_t F17 = 0; | ||||
|         uint64_t F18 = 0; | ||||
|         uint64_t F19 = 0; | ||||
|         uint64_t F20 = 0; | ||||
|         uint64_t F21 = 0; | ||||
|         uint64_t F22 = 0; | ||||
|         uint64_t F23 = 0; | ||||
|         uint64_t F24 = 0; | ||||
|         uint64_t F25 = 0; | ||||
|         uint64_t F26 = 0; | ||||
|         uint64_t F27 = 0; | ||||
|         uint64_t F28 = 0; | ||||
|         uint64_t F29 = 0; | ||||
|         uint64_t F30 = 0; | ||||
|         uint64_t F31 = 0; | ||||
|         uint32_t FCSR = 0; | ||||
|         uint64_t NEXT_PC = 0; | ||||
|         uint32_t trap_state = 0, pending_trap = 0, machine_state = 0, last_branch = 0; | ||||
|         uint64_t icount = 0; | ||||
|     } reg; | ||||
|  | ||||
|     std::array<address_type, 4> addr_mode; | ||||
|      | ||||
|     bool interrupt_sim=false; | ||||
|  | ||||
| 	uint32_t get_fcsr(){return reg.FCSR;} | ||||
| 	void set_fcsr(uint32_t val){reg.FCSR = val;}		 | ||||
|  | ||||
| }; | ||||
|  | ||||
| } | ||||
| }             | ||||
| #endif /* _RV64GC_H_ */ | ||||
| @@ -31,8 +31,8 @@ | ||||
|  *******************************************************************************/ | ||||
| 
 | ||||
| 
 | ||||
| #ifndef _RV64IA_H_ | ||||
| #define _RV64IA_H_ | ||||
| #ifndef _RV64I_H_ | ||||
| #define _RV64I_H_ | ||||
| 
 | ||||
| #include <array> | ||||
| #include <iss/arch/traits.h> | ||||
| @@ -42,11 +42,11 @@ | ||||
| namespace iss { | ||||
| namespace arch { | ||||
| 
 | ||||
| struct rv64ia; | ||||
| struct rv64i; | ||||
| 
 | ||||
| template <> struct traits<rv64ia> { | ||||
| template <> struct traits<rv64i> { | ||||
| 
 | ||||
| 	constexpr static char const* const core_type = "RV64IA"; | ||||
| 	constexpr static char const* const core_type = "RV64I"; | ||||
|      | ||||
|   	static constexpr std::array<const char*, 33> reg_names{ | ||||
|  		{"x0", "x1", "x2", "x3", "x4", "x5", "x6", "x7", "x8", "x9", "x10", "x11", "x12", "x13", "x14", "x15", "x16", "x17", "x18", "x19", "x20", "x21", "x22", "x23", "x24", "x25", "x26", "x27", "x28", "x29", "x30", "x31", "pc"}}; | ||||
| @@ -54,7 +54,7 @@ template <> struct traits<rv64ia> { | ||||
|   	static constexpr std::array<const char*, 33> reg_aliases{ | ||||
|  		{"zero", "ra", "sp", "gp", "tp", "t0", "t1", "t2", "s0", "s1", "a0", "a1", "a2", "a3", "a4", "a5", "a6", "a7", "s2", "s3", "s4", "s5", "s6", "s7", "s8", "s9", "s10", "s11", "t3", "t4", "t5", "t6", "pc"}}; | ||||
| 
 | ||||
|     enum constants {XLEN=64, PCLEN=64, MISA_VAL=0b10000000000001000000000100000001, PGSIZE=0x1000, PGMASK=0xfff}; | ||||
|     enum constants {XLEN=64, PCLEN=64, MISA_VAL=0b10000000000001000000000100000000, PGSIZE=0x1000, PGMASK=0xfff}; | ||||
| 
 | ||||
|     constexpr static unsigned FP_REGS_SIZE = 0; | ||||
| 
 | ||||
| @@ -156,15 +156,15 @@ template <> struct traits<rv64ia> { | ||||
|     enum mem_type_e { MEM, CSR, FENCE, RES }; | ||||
| }; | ||||
| 
 | ||||
| struct rv64ia: public arch_if { | ||||
| struct rv64i: public arch_if { | ||||
| 
 | ||||
|     using virt_addr_t = typename traits<rv64ia>::virt_addr_t; | ||||
|     using phys_addr_t = typename traits<rv64ia>::phys_addr_t; | ||||
|     using reg_t =  typename traits<rv64ia>::reg_t; | ||||
|     using addr_t = typename traits<rv64ia>::addr_t; | ||||
|     using virt_addr_t = typename traits<rv64i>::virt_addr_t; | ||||
|     using phys_addr_t = typename traits<rv64i>::phys_addr_t; | ||||
|     using reg_t =  typename traits<rv64i>::reg_t; | ||||
|     using addr_t = typename traits<rv64i>::addr_t; | ||||
| 
 | ||||
|     rv64ia(); | ||||
|     ~rv64ia(); | ||||
|     rv64i(); | ||||
|     ~rv64i(); | ||||
| 
 | ||||
|     void reset(uint64_t address=0) override; | ||||
| 
 | ||||
| @@ -183,9 +183,9 @@ struct rv64ia: public arch_if { | ||||
|     inline bool should_stop() { return interrupt_sim; } | ||||
| 
 | ||||
|     inline phys_addr_t v2p(const iss::addr_t& addr){ | ||||
|         if (addr.space != traits<rv64ia>::MEM || addr.type == iss::address_type::PHYSICAL || | ||||
|         if (addr.space != traits<rv64i>::MEM || addr.type == iss::address_type::PHYSICAL || | ||||
|                 addr_mode[static_cast<uint16_t>(addr.access)&0x3]==address_type::PHYSICAL) { | ||||
|             return phys_addr_t(addr.access, addr.space, addr.val&traits<rv64ia>::addr_mask); | ||||
|             return phys_addr_t(addr.access, addr.space, addr.val&traits<rv64i>::addr_mask); | ||||
|         } else | ||||
|             return virt2phys(addr); | ||||
|     } | ||||
| @@ -197,7 +197,7 @@ struct rv64ia: public arch_if { | ||||
|     inline uint32_t get_last_branch() { return reg.last_branch; } | ||||
| 
 | ||||
| protected: | ||||
|     struct RV64IA_regs { | ||||
|     struct RV64I_regs { | ||||
|         uint64_t X0 = 0; | ||||
|         uint64_t X1 = 0; | ||||
|         uint64_t X2 = 0; | ||||
| @@ -247,4 +247,4 @@ protected: | ||||
| 
 | ||||
| } | ||||
| }             | ||||
| #endif /* _RV64IA_H_ */ | ||||
| #endif /* _RV64I_H_ */ | ||||
| @@ -4,22 +4,16 @@ set(LIB_HEADERS ${RiscVSCHeaders} ) | ||||
| set(LIB_SOURCES  | ||||
| 	iss/rv32gc.cpp | ||||
| 	iss/rv32imac.cpp | ||||
| 	iss/rv64ia.cpp | ||||
| 	iss/rv64i.cpp | ||||
| 	iss/rv64gc.cpp | ||||
| 	internal/fp_functions.cpp | ||||
| 	internal/vm_rv32gc.cpp | ||||
| 	internal/vm_rv32imac.cpp | ||||
| 	internal/vm_rv64ia.cpp | ||||
| 	internal/vm_rv64i.cpp | ||||
| 	internal/vm_rv64gc.cpp | ||||
|     plugin/instruction_count.cpp | ||||
|     plugin/cycle_estimate.cpp) | ||||
|  | ||||
| if(SystemC_FOUND) | ||||
| 	set(LIB_SOURCES ${LIB_SOURCES} sysc/core_complex.cpp) | ||||
| endif() | ||||
|  | ||||
| set(APP_HEADERS ) | ||||
|  | ||||
| set(APP_SOURCES main.cpp) | ||||
|  | ||||
| # Define two variables in order not to repeat ourselves. | ||||
| set(LIBRARY_NAME riscv) | ||||
|  | ||||
| @@ -31,8 +25,11 @@ set_target_properties(${LIBRARY_NAME} PROPERTIES | ||||
|   FRAMEWORK FALSE | ||||
|   PUBLIC_HEADER "${LIB_HEADERS}" # specify the public headers | ||||
| ) | ||||
| #set_property(TARGET ${LIBRARY_NAME} PROPERTY POSITION_INDEPENDENT_CODE ON) | ||||
|  | ||||
| if(SystemC_FOUND) | ||||
| 	set(SC_LIBRARY_NAME riscv_sc) | ||||
| 	add_library(${SC_LIBRARY_NAME} SHARED sysc/core_complex.cpp) | ||||
| 	add_definitions(-DWITH_SYSTEMC)  | ||||
| 	include_directories(${SystemC_INCLUDE_DIRS}) | ||||
| 	 | ||||
| @@ -42,18 +39,30 @@ if(SystemC_FOUND) | ||||
| 	    add_definitions(-DWITH_SCV) | ||||
| 	    include_directories(${SCV_INCLUDE_DIRS}) | ||||
| 	endif() | ||||
| 	set_target_properties(${SC_LIBRARY_NAME} PROPERTIES | ||||
| 	  VERSION ${VERSION}  # ${VERSION} was defined in the main CMakeLists. | ||||
| 	  FRAMEWORK FALSE | ||||
| 	  PUBLIC_HEADER "${LIB_HEADERS}" # specify the public headers | ||||
| 	) | ||||
| 	target_link_libraries(${SC_LIBRARY_NAME} ${LIBRARY_NAME}) | ||||
| 	target_link_libraries(${SC_LIBRARY_NAME} dbt-core) | ||||
| 	target_link_libraries(${SC_LIBRARY_NAME} softfloat) | ||||
| 	target_link_libraries(${SC_LIBRARY_NAME} sc-components) | ||||
| 	target_link_libraries(${SC_LIBRARY_NAME} external) | ||||
| 	target_link_libraries(${SC_LIBRARY_NAME} ${llvm_libs}) | ||||
| 	target_link_libraries(${SC_LIBRARY_NAME} ${Boost_LIBRARIES} ) | ||||
| endif() | ||||
|  | ||||
| # This is a make target, so you can do a "make riscv-sc" | ||||
| set(APPLICATION_NAME riscv-sim) | ||||
|  | ||||
| add_executable(${APPLICATION_NAME} ${APP_SOURCES}) | ||||
| add_executable(${APPLICATION_NAME} main.cpp) | ||||
|  | ||||
| # Links the target exe against the libraries | ||||
| target_link_libraries(${APPLICATION_NAME} ${LIBRARY_NAME}) | ||||
| target_link_libraries(${APPLICATION_NAME} jsoncpp) | ||||
| target_link_libraries(${APPLICATION_NAME} dbt-core) | ||||
| target_link_libraries(${APPLICATION_NAME} softfloat) | ||||
| target_link_libraries(${APPLICATION_NAME} sc-components) | ||||
| target_link_libraries(${APPLICATION_NAME} external) | ||||
| target_link_libraries(${APPLICATION_NAME} ${llvm_libs}) | ||||
| target_link_libraries(${APPLICATION_NAME} ${Boost_LIBRARIES} ) | ||||
|   | ||||
| @@ -70,7 +70,7 @@ using namespace std; | ||||
|  | ||||
| using namespace llvm; | ||||
|  | ||||
| void add_fp_functions_2_module(Module *mod, uint32_t flen) { | ||||
| void add_fp_functions_2_module(Module *mod, uint32_t flen, uint32_t xlen) { | ||||
|     if(flen){ | ||||
|         FDECL(fget_flags, INT_TYPE(32)); | ||||
|         FDECL(fadd_s,     INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||
| @@ -83,6 +83,8 @@ void add_fp_functions_2_module(Module *mod, uint32_t flen) { | ||||
|         FDECL(fmadd_s,    INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||
|         FDECL(fsel_s,     INT_TYPE(32), INT_TYPE(32), INT_TYPE(32), INT_TYPE(32)); | ||||
|         FDECL(fclass_s,   INT_TYPE(32), INT_TYPE(32)); | ||||
|         FDECL(fcvt_32_64,     INT_TYPE(64), INT_TYPE(32), INT_TYPE(32), INT_TYPE(8)); | ||||
|         FDECL(fcvt_64_32,     INT_TYPE(32), INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); | ||||
|         if(flen>32){ | ||||
|             FDECL(fconv_d2f,  INT_TYPE(32), INT_TYPE(64), INT_TYPE(8)); | ||||
|             FDECL(fconv_f2d,  INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); | ||||
| @@ -96,6 +98,8 @@ void add_fp_functions_2_module(Module *mod, uint32_t flen) { | ||||
|             FDECL(fmadd_d,    INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(32), INT_TYPE(8)); | ||||
|             FDECL(fsel_d,     INT_TYPE(64), INT_TYPE(64), INT_TYPE(64), INT_TYPE(32)); | ||||
|             FDECL(fclass_d,   INT_TYPE(64), INT_TYPE(64)); | ||||
|             FDECL(unbox_s,      INT_TYPE(32), INT_TYPE(64)); | ||||
|  | ||||
|         } | ||||
|     } | ||||
| } | ||||
| @@ -198,13 +202,15 @@ uint32_t fcvt_s(uint32_t v1, uint32_t op, uint8_t mode) { | ||||
|     float32_t v1f{v1}; | ||||
|     softfloat_exceptionFlags=0; | ||||
|     float32_t r; | ||||
|     int32_t res; | ||||
|     switch(op){ | ||||
|     case 0: //w->s, fp to int32 | ||||
|         res = f32_to_i32(v1f,rmm_map[mode&0x7],true); | ||||
|     case 0:{ //w->s, fp to int32 | ||||
|         uint_fast32_t res = f32_to_i32(v1f,rmm_map[mode&0x7],true); | ||||
|         return (uint32_t)res; | ||||
|     case 1: //wu->s | ||||
|         return f32_to_ui32(v1f,rmm_map[mode&0x7],true); | ||||
|     } | ||||
|     case 1:{ //wu->s | ||||
|         uint_fast32_t res = f32_to_ui32(v1f,rmm_map[mode&0x7],true); | ||||
|         return (uint32_t)res; | ||||
|     } | ||||
|     case 2: //s->w | ||||
|         r=i32_to_f32(v1); | ||||
|         return r.v; | ||||
| @@ -373,17 +379,19 @@ uint64_t fcvt_d(uint64_t v1, uint32_t op, uint8_t mode) { | ||||
|     float64_t v1f{v1}; | ||||
|     softfloat_exceptionFlags=0; | ||||
|     float64_t r; | ||||
|     int32_t res; | ||||
|     switch(op){ | ||||
|     case 0: //w->s, fp to int32 | ||||
|         res = f64_to_i64(v1f,rmm_map[mode&0x7],true); | ||||
|     case 0:{ //l->d, fp to int32 | ||||
|         int64_t res = f64_to_i64(v1f,rmm_map[mode&0x7],true); | ||||
|         return (uint64_t)res; | ||||
|     case 1: //wu->s | ||||
|         return f64_to_ui64(v1f,rmm_map[mode&0x7],true); | ||||
|     case 2: //s->w | ||||
|     } | ||||
|     case 1:{ //lu->s | ||||
|         uint64_t res = f64_to_ui64(v1f,rmm_map[mode&0x7],true); | ||||
|         return res; | ||||
|     } | ||||
|     case 2: //s->l | ||||
|         r=i64_to_f64(v1); | ||||
|         return r.v; | ||||
|     case 3: //s->wu | ||||
|     case 3: //s->lu | ||||
|         r=ui64_to_f64(v1); | ||||
|         return r.v; | ||||
|     } | ||||
| @@ -454,5 +462,53 @@ uint64_t fclass_d(uint64_t v1  ){ | ||||
|         ( isNaN && !isSNaN )                       << 9; | ||||
| } | ||||
|  | ||||
| uint64_t fcvt_32_64(uint32_t v1, uint32_t op, uint8_t mode) { | ||||
|     float32_t v1f{v1}; | ||||
|     softfloat_exceptionFlags=0; | ||||
|     float64_t r; | ||||
|     switch(op){ | ||||
|     case 0: //l->s, fp to int32 | ||||
|         return f32_to_i64(v1f,rmm_map[mode&0x7],true); | ||||
|     case 1: //wu->s | ||||
|         return f32_to_ui64(v1f,rmm_map[mode&0x7],true); | ||||
|     case 2: //s->w | ||||
|         r=i32_to_f64(v1); | ||||
|         return r.v; | ||||
|     case 3: //s->wu | ||||
|         r=ui32_to_f64(v1); | ||||
|         return r.v; | ||||
|     } | ||||
|     return 0; | ||||
| } | ||||
|  | ||||
| uint32_t fcvt_64_32(uint64_t v1, uint32_t op, uint8_t mode) { | ||||
|     softfloat_exceptionFlags=0; | ||||
|     float32_t r; | ||||
|     switch(op){ | ||||
|     case 0:{ //wu->s | ||||
|         int32_t r=f64_to_i32(float64_t{v1}, rmm_map[mode&0x7],true); | ||||
|         return r; | ||||
|     } | ||||
|     case 1:{ //wu->s | ||||
|         uint32_t r=f64_to_ui32(float64_t{v1}, rmm_map[mode&0x7],true); | ||||
|         return r; | ||||
|     } | ||||
|     case 2: //l->s, fp to int32 | ||||
|         r=i64_to_f32(v1); | ||||
|         return r.v; | ||||
|     case 3: //wu->s | ||||
|         r=ui64_to_f32(v1); | ||||
|         return r.v; | ||||
|     } | ||||
|     return 0; | ||||
| } | ||||
|  | ||||
| uint32_t unbox_s(uint64_t v){ | ||||
|     constexpr uint64_t mask = std::numeric_limits<uint64_t>::max() & ~((uint64_t)std::numeric_limits<uint32_t>::max()); | ||||
|     if((v & mask) != mask) | ||||
|         return 0x7fc00000; | ||||
|     else | ||||
|         return v & std::numeric_limits<uint32_t>::max(); | ||||
| } | ||||
| } | ||||
|  | ||||
|   | ||||
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
							
								
								
									
										11342
									
								
								riscv/src/internal/vm_rv64gc.cpp
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										11342
									
								
								riscv/src/internal/vm_rv64gc.cpp
									
									
									
									
									
										Normal file
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							| @@ -1,34 +1,34 @@ | ||||
| //////////////////////////////////////////////////////////////////////////////// | ||||
| // Copyright (C) 2017, MINRES Technologies GmbH | ||||
| // All rights reserved. | ||||
| //  | ||||
| // Redistribution and use in source and binary forms, with or without | ||||
| // modification, are permitted provided that the following conditions are met: | ||||
| //  | ||||
| // 1. Redistributions of source code must retain the above copyright notice, | ||||
| //    this list of conditions and the following disclaimer. | ||||
| //  | ||||
| // 2. Redistributions in binary form must reproduce the above copyright notice, | ||||
| //    this list of conditions and the following disclaimer in the documentation | ||||
| //    and/or other materials provided with the distribution. | ||||
| //  | ||||
| // 3. Neither the name of the copyright holder nor the names of its contributors | ||||
| //    may be used to endorse or promote products derived from this software | ||||
| //    without specific prior written permission. | ||||
| //  | ||||
| // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | ||||
| // AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||||
| // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||||
| // ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | ||||
| // LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | ||||
| // CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | ||||
| // SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | ||||
| // INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | ||||
| // CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||||
| // ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||
| // POSSIBILITY OF SUCH DAMAGE. | ||||
| // | ||||
| //////////////////////////////////////////////////////////////////////////////// | ||||
| /******************************************************************************* | ||||
|  * Copyright (C) 2017, 2018 MINRES Technologies GmbH | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * Redistribution and use in source and binary forms, with or without | ||||
|  * modification, are permitted provided that the following conditions are met: | ||||
|  * | ||||
|  * 1. Redistributions of source code must retain the above copyright notice, | ||||
|  *    this list of conditions and the following disclaimer. | ||||
|  * | ||||
|  * 2. Redistributions in binary form must reproduce the above copyright notice, | ||||
|  *    this list of conditions and the following disclaimer in the documentation | ||||
|  *    and/or other materials provided with the distribution. | ||||
|  * | ||||
|  * 3. Neither the name of the copyright holder nor the names of its contributors | ||||
|  *    may be used to endorse or promote products derived from this software | ||||
|  *    without specific prior written permission. | ||||
|  * | ||||
|  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | ||||
|  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||||
|  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||||
|  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | ||||
|  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | ||||
|  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | ||||
|  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | ||||
|  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | ||||
|  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||||
|  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||
|  * POSSIBILITY OF SUCH DAMAGE. | ||||
|  * | ||||
|  *******************************************************************************/ | ||||
|  | ||||
| #include "util/ities.h" | ||||
| #include <util/logging.h> | ||||
|   | ||||
							
								
								
									
										81
									
								
								riscv/src/iss/rv64gc.cpp
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										81
									
								
								riscv/src/iss/rv64gc.cpp
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,81 @@ | ||||
| /******************************************************************************* | ||||
|  * Copyright (C) 2017, 2018 MINRES Technologies GmbH | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * Redistribution and use in source and binary forms, with or without | ||||
|  * modification, are permitted provided that the following conditions are met: | ||||
|  * | ||||
|  * 1. Redistributions of source code must retain the above copyright notice, | ||||
|  *    this list of conditions and the following disclaimer. | ||||
|  * | ||||
|  * 2. Redistributions in binary form must reproduce the above copyright notice, | ||||
|  *    this list of conditions and the following disclaimer in the documentation | ||||
|  *    and/or other materials provided with the distribution. | ||||
|  * | ||||
|  * 3. Neither the name of the copyright holder nor the names of its contributors | ||||
|  *    may be used to endorse or promote products derived from this software | ||||
|  *    without specific prior written permission. | ||||
|  * | ||||
|  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | ||||
|  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||||
|  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||||
|  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | ||||
|  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | ||||
|  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | ||||
|  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | ||||
|  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | ||||
|  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||||
|  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||
|  * POSSIBILITY OF SUCH DAMAGE. | ||||
|  * | ||||
|  *******************************************************************************/ | ||||
|  | ||||
|  | ||||
|  | ||||
| #include "util/ities.h" | ||||
| #include <util/logging.h> | ||||
|  | ||||
| #include <elfio/elfio.hpp> | ||||
| #include <iss/arch/rv64gc.h> | ||||
|  | ||||
| #ifdef __cplusplus | ||||
| extern "C" { | ||||
| #endif | ||||
| #include <ihex.h> | ||||
| #ifdef __cplusplus | ||||
| } | ||||
| #endif | ||||
| #include <cstdio> | ||||
| #include <cstring> | ||||
| #include <fstream> | ||||
|  | ||||
| using namespace iss::arch; | ||||
|  | ||||
| constexpr std::array<const char*, 66>    iss::arch::traits<iss::arch::rv64gc>::reg_names; | ||||
| constexpr std::array<const char*, 66>    iss::arch::traits<iss::arch::rv64gc>::reg_aliases; | ||||
| constexpr std::array<const uint32_t, 72> iss::arch::traits<iss::arch::rv64gc>::reg_bit_widths; | ||||
| constexpr std::array<const uint32_t, 73> iss::arch::traits<iss::arch::rv64gc>::reg_byte_offsets; | ||||
|  | ||||
| rv64gc::rv64gc() { | ||||
|     reg.icount = 0; | ||||
| } | ||||
|  | ||||
| rv64gc::~rv64gc() = default; | ||||
|  | ||||
| void rv64gc::reset(uint64_t address) { | ||||
|     for(size_t i=0; i<traits<rv64gc>::NUM_REGS; ++i) set_reg(i, std::vector<uint8_t>(sizeof(traits<rv64gc>::reg_t),0)); | ||||
|     reg.PC=address; | ||||
|     reg.NEXT_PC=reg.PC; | ||||
|     reg.trap_state=0; | ||||
|     reg.machine_state=0x0; | ||||
|     reg.icount=0; | ||||
| } | ||||
|  | ||||
| uint8_t *rv64gc::get_regs_base_ptr() { | ||||
| 	return reinterpret_cast<uint8_t*>(®); | ||||
| } | ||||
|  | ||||
| rv64gc::phys_addr_t rv64gc::virt2phys(const iss::addr_t &pc) { | ||||
|     return phys_addr_t(pc); // change logical address to physical address | ||||
| } | ||||
|  | ||||
							
								
								
									
										79
									
								
								riscv/src/iss/rv64i.cpp
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										79
									
								
								riscv/src/iss/rv64i.cpp
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,79 @@ | ||||
| /******************************************************************************* | ||||
|  * Copyright (C) 2017, 2018 MINRES Technologies GmbH | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * Redistribution and use in source and binary forms, with or without | ||||
|  * modification, are permitted provided that the following conditions are met: | ||||
|  * | ||||
|  * 1. Redistributions of source code must retain the above copyright notice, | ||||
|  *    this list of conditions and the following disclaimer. | ||||
|  * | ||||
|  * 2. Redistributions in binary form must reproduce the above copyright notice, | ||||
|  *    this list of conditions and the following disclaimer in the documentation | ||||
|  *    and/or other materials provided with the distribution. | ||||
|  * | ||||
|  * 3. Neither the name of the copyright holder nor the names of its contributors | ||||
|  *    may be used to endorse or promote products derived from this software | ||||
|  *    without specific prior written permission. | ||||
|  * | ||||
|  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | ||||
|  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||||
|  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||||
|  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | ||||
|  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | ||||
|  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | ||||
|  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | ||||
|  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | ||||
|  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||||
|  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||
|  * POSSIBILITY OF SUCH DAMAGE. | ||||
|  * | ||||
|  *******************************************************************************/ | ||||
|   | ||||
| #include "util/ities.h" | ||||
| #include <util/logging.h> | ||||
|  | ||||
| #include <elfio/elfio.hpp> | ||||
| #include <iss/arch/rv64i.h> | ||||
|  | ||||
| #ifdef __cplusplus | ||||
| extern "C" { | ||||
| #endif | ||||
| #include <ihex.h> | ||||
| #ifdef __cplusplus | ||||
| } | ||||
| #endif | ||||
| #include <cstdio> | ||||
| #include <cstring> | ||||
| #include <fstream> | ||||
|  | ||||
| using namespace iss::arch; | ||||
|  | ||||
| constexpr std::array<const char*, 33>    iss::arch::traits<iss::arch::rv64i>::reg_names; | ||||
| constexpr std::array<const char*, 33>    iss::arch::traits<iss::arch::rv64i>::reg_aliases; | ||||
| constexpr std::array<const uint32_t, 39> iss::arch::traits<iss::arch::rv64i>::reg_bit_widths; | ||||
| constexpr std::array<const uint32_t, 40> iss::arch::traits<iss::arch::rv64i>::reg_byte_offsets; | ||||
|  | ||||
| rv64i::rv64i() { | ||||
|     reg.icount = 0; | ||||
| } | ||||
|  | ||||
| rv64i::~rv64i() = default; | ||||
|  | ||||
| void rv64i::reset(uint64_t address) { | ||||
|     for(size_t i=0; i<traits<rv64i>::NUM_REGS; ++i) set_reg(i, std::vector<uint8_t>(sizeof(traits<rv64i>::reg_t),0)); | ||||
|     reg.PC=address; | ||||
|     reg.NEXT_PC=reg.PC; | ||||
|     reg.trap_state=0; | ||||
|     reg.machine_state=0x0; | ||||
|     reg.icount=0; | ||||
| } | ||||
|  | ||||
| uint8_t *rv64i::get_regs_base_ptr() { | ||||
| 	return reinterpret_cast<uint8_t*>(®); | ||||
| } | ||||
|  | ||||
| rv64i::phys_addr_t rv64i::virt2phys(const iss::addr_t &pc) { | ||||
|     return phys_addr_t(pc); // change logical address to physical address | ||||
| } | ||||
|  | ||||
| @@ -1,78 +0,0 @@ | ||||
| //////////////////////////////////////////////////////////////////////////////// | ||||
| // Copyright (C) 2017, MINRES Technologies GmbH | ||||
| // All rights reserved. | ||||
| // | ||||
| // Redistribution and use in source and binary forms, with or without | ||||
| // modification, are permitted provided that the following conditions are met: | ||||
| // | ||||
| // 1. Redistributions of source code must retain the above copyright notice, | ||||
| //    this list of conditions and the following disclaimer. | ||||
| // | ||||
| // 2. Redistributions in binary form must reproduce the above copyright notice, | ||||
| //    this list of conditions and the following disclaimer in the documentation | ||||
| //    and/or other materials provided with the distribution. | ||||
| // | ||||
| // 3. Neither the name of the copyright holder nor the names of its contributors | ||||
| //    may be used to endorse or promote products derived from this software | ||||
| //    without specific prior written permission. | ||||
| // | ||||
| // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | ||||
| // AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||||
| // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||||
| // ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | ||||
| // LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | ||||
| // CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | ||||
| // SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | ||||
| // INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | ||||
| // CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||||
| // ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||||
| // POSSIBILITY OF SUCH DAMAGE. | ||||
| // | ||||
| // Created on: Tue Sep 05 18:57:24 CEST 2017 | ||||
| //             *      rv64ia.cpp Author: <CoreDSL Generator> | ||||
| // | ||||
| //////////////////////////////////////////////////////////////////////////////// | ||||
|  | ||||
| #include "util/ities.h" | ||||
| #include <util/logging.h> | ||||
|  | ||||
| #include <elfio/elfio.hpp> | ||||
| #include <iss/arch/rv64ia.h> | ||||
|  | ||||
| #ifdef __cplusplus | ||||
| extern "C" { | ||||
| #endif | ||||
| #include <ihex.h> | ||||
| #ifdef __cplusplus | ||||
| } | ||||
| #endif | ||||
| #include <cstdio> | ||||
| #include <cstring> | ||||
| #include <fstream> | ||||
|  | ||||
| using namespace iss::arch; | ||||
|  | ||||
| constexpr std::array<const char*, 33>    iss::arch::traits<iss::arch::rv64ia>::reg_names; | ||||
| constexpr std::array<const char*, 33>    iss::arch::traits<iss::arch::rv64ia>::reg_aliases; | ||||
| constexpr std::array<const uint32_t, 39> iss::arch::traits<iss::arch::rv64ia>::reg_bit_widths; | ||||
| constexpr std::array<const uint32_t, 40> iss::arch::traits<iss::arch::rv64ia>::reg_byte_offsets; | ||||
|  | ||||
| rv64ia::rv64ia() { reg.icount = 0; reg.machine_state = 0x3;} | ||||
|  | ||||
| rv64ia::~rv64ia(){} | ||||
|  | ||||
| void rv64ia::reset(uint64_t address) { | ||||
|     for (size_t i = 0; i < traits<rv64ia>::NUM_REGS; ++i) | ||||
|         set_reg(i, std::vector<uint8_t>(sizeof(traits<rv64ia>::reg_t), 0)); | ||||
|     reg.PC = address; | ||||
|     reg.NEXT_PC = reg.PC; | ||||
|     reg.trap_state = 0; | ||||
|     reg.machine_state = 0x3; | ||||
|     reg.icount=0; | ||||
| } | ||||
|  | ||||
| uint8_t *rv64ia::get_regs_base_ptr() { return reinterpret_cast<uint8_t *>(®); } | ||||
|  | ||||
| rv64ia::phys_addr_t rv64ia::virt2phys(const iss::addr_t &pc) { | ||||
|     return phys_addr_t(pc); // change logical address to physical address | ||||
| } | ||||
| @@ -38,7 +38,8 @@ | ||||
| #include <iss/arch/riscv_hart_msu_vp.h> | ||||
| #include <iss/arch/rv32imac.h> | ||||
| #include <iss/arch/rv32gc.h> | ||||
| #include <iss/arch/rv64ia.h> | ||||
| #include <iss/arch/rv64gc.h> | ||||
| #include <iss/arch/rv64i.h> | ||||
| #include <iss/llvm/jit_helper.h> | ||||
| #include <iss/log_categories.h> | ||||
| #include <iss/plugin/cycle_estimate.h> | ||||
| @@ -107,7 +108,11 @@ int main(int argc, char *argv[]) { | ||||
|         std::unique_ptr<iss::arch_if> cpu{nullptr}; | ||||
|         std::string isa_opt(clim["isa"].as<std::string>()); | ||||
|         if (isa_opt=="rv64ia") { | ||||
|             iss::arch::rv64ia* lcpu = new iss::arch::riscv_hart_msu_vp<iss::arch::rv64ia>(); | ||||
|             iss::arch::rv64i* lcpu = new iss::arch::riscv_hart_msu_vp<iss::arch::rv64i>(); | ||||
|             vm = iss::create(lcpu, clim["gdb-port"].as<unsigned>()); | ||||
|             cpu.reset(lcpu); | ||||
|         } else if (isa_opt=="rv64gc") { | ||||
|             iss::arch::rv64gc* lcpu = new iss::arch::riscv_hart_msu_vp<iss::arch::rv64gc>(); | ||||
|             vm = iss::create(lcpu, clim["gdb-port"].as<unsigned>()); | ||||
|             cpu.reset(lcpu); | ||||
|         } else if (isa_opt=="rv32imac") { | ||||
|   | ||||
 Submodule sc-components updated: d334928b36...05ba88052c
									
								
							
		Reference in New Issue
	
	Block a user
	 eyck
					eyck