riscv/execute.cc

   1 // See LICENSE for license details.
   2
   3 #include "processor.h"
   4 #include "mmu.h"
   5 #include <cassert>
   6
   7
   8 static void commit_log_stash_privilege(state_t* state)
   9 {
  10 #ifdef RISCV_ENABLE_COMMITLOG
  11   state->last_inst_priv = state->prv;
  12 #endif
  13 }
  14
  15 static void commit_log_print_insn(state_t* state, reg_t pc, insn_t insn)
  16 {
  17 #ifdef RISCV_ENABLE_COMMITLOG
  18   int32_t priv = state->last_inst_priv;
  19   uint64_t mask = (insn.length() == 8 ? uint64_t(0) : (uint64_t(1) << (insn.length() * 8))) - 1;
  20   if (state->log_reg_write.addr) {
  21     fprintf(stderr, "%1d 0x%016" PRIx64 " (0x%08" PRIx64 ") %c%2" PRIu64 " 0x%016" PRIx64 "\n",
  22             priv,
  23             pc,
  24             insn.bits() & mask,
  25             state->log_reg_write.addr & 1 ? 'f' : 'x',
  26             state->log_reg_write.addr >> 1,
  27             state->log_reg_write.data);
  28   } else {
  29     fprintf(stderr, "%1d 0x%016" PRIx64 " (0x%08" PRIx64 ")\n", priv, pc, insn.bits() & mask);
  30   }
  31   state->log_reg_write.addr = 0;
  32 #endif
  33 }
  34
  35 inline void processor_t::update_histogram(reg_t pc)
  36 {
  37 #ifdef RISCV_ENABLE_HISTOGRAM
  38   pc_histogram[pc]++;
  39 #endif
  40 }
  41
  42 static reg_t execute_insn(processor_t* p, reg_t pc, insn_fetch_t fetch)
  43 {
  44   commit_log_stash_privilege(p->get_state());
  45   reg_t npc = fetch.func(p, fetch.insn, pc);
  46   if (!invalid_pc(npc)) {
  47     commit_log_print_insn(p->get_state(), pc, fetch.insn);
  48     p->update_histogram(pc);
  49   }
  50   return npc;
  51 }
  52
  53 // fetch/decode/execute loop
  54 void processor_t::step(size_t n)
  55 {
  56   while (run && n > 0) {
  57     size_t instret = 0;
  58     reg_t pc = state.pc;
  59     mmu_t* _mmu = mmu;
  60
  61     #define advance_pc() \
  62      if (unlikely(invalid_pc(pc))) { \
  63        switch (pc) { \
  64          case PC_SERIALIZE_BEFORE: state.serialized = true; break; \
  65          case PC_SERIALIZE_AFTER: instret++; break; \
  66          default: abort(); \
  67        } \
  68        pc = state.pc; \
  69        break; \
  70      } else { \
  71        state.pc = pc; \
  72        instret++; \
  73      }
  74
  75     try
  76     {
  77       take_interrupt();
  78
  79       if (unlikely(debug))
  80       {
  81         while (instret < n)
  82         {
  83           insn_fetch_t fetch = mmu->load_insn(pc);
  84           if (!state.serialized)
  85             disasm(fetch.insn);
  86           pc = execute_insn(this, pc, fetch);
  87           advance_pc();
  88         }
  89       }
  90       else while (instret < n)
  91       {
  92         size_t idx = _mmu->icache_index(pc);
  93         auto ic_entry = _mmu->access_icache(pc);
  94
  95         #define ICACHE_ACCESS(i) { \
  96           insn_fetch_t fetch = ic_entry->data; \
  97           ic_entry++; \
  98           pc = execute_insn(this, pc, fetch); \
  99           if (i == mmu_t::ICACHE_ENTRIES-1) break; \
 100           if (unlikely(ic_entry->tag != pc)) goto miss; \
 101           if (unlikely(instret+1 == n)) break; \
 102           instret++; \
 103           state.pc = pc; \
 104         }
 105
 106         switch (idx) {
 107           #include "icache.h"
 108         }
 109
 110         advance_pc();
 111         continue;
 112
 113 miss:
 114         advance_pc();
 115         // refill I$ if it looks like there wasn't a taken branch
 116         if (pc > (ic_entry-1)->tag && pc <= (ic_entry-1)->tag + MAX_INSN_LENGTH)
 117           _mmu->refill_icache(pc, ic_entry);
 118       }
 119     }
 120     catch(trap_t& t)
 121     {
 122       take_trap(t, pc);
 123       n = instret;
 124     }
 125
 126     state.minstret += instret;
 127     n -= instret;
 128   }
 129 }