Add --disable-dtb option to suppress writing the DTB to memory
[riscv-isa-sim.git] / riscv / sim.cc
index 9b2677c745a624fb9981fe3b9dccd65b832b4ba6..44223a7d90b59772faffe36af4967ffbf2b27f3e 100644 (file)
+// See LICENSE for license details.
+
 #include "sim.h"
-#include "applink.h"
-#include "common.h"
-#include <sys/mman.h>
+#include "mmu.h"
+#include "dts.h"
+#include "remote_bitbang.h"
 #include <map>
 #include <iostream>
+#include <sstream>
 #include <climits>
-#include <assert.h>
+#include <cstdlib>
+#include <cassert>
+#include <signal.h>
+#include <unistd.h>
+#include <sys/wait.h>
+#include <sys/types.h>
 
-sim_t::sim_t(int _nprocs, appserver_link_t* _applink, icsim_t* default_icache, icsim_t* default_dcache)
-  : applink(_applink),
-    procs(_nprocs)
+volatile bool ctrlc_pressed = false;
+static void handle_signal(int sig)
 {
-  size_t memsz0 = sizeof(size_t) == 8 ? 0x100000000ULL : 0x70000000UL;
-  size_t quantum = std::max(PGSIZE, (reg_t)sysconf(_SC_PAGESIZE));
-  memsz0 = memsz0/quantum*quantum;
+  if (ctrlc_pressed)
+    exit(-1);
+  ctrlc_pressed = true;
+  signal(sig, &handle_signal);
+}
 
-  memsz = memsz0;
-  mem = (char*)mmap64(NULL, memsz, PROT_WRITE, MAP_PRIVATE|MAP_ANON, -1, 0);
+sim_t::sim_t(const char* isa, size_t nprocs, bool halted, reg_t start_pc,
+             std::vector<std::pair<reg_t, mem_t*>> mems,
+             const std::vector<std::string>& args,
+             std::vector<int> const hartids, unsigned progsize,
+             unsigned max_bus_master_bits, bool require_authentication)
+  : htif_t(args), mems(mems), procs(std::max(nprocs, size_t(1))),
+    start_pc(start_pc), current_step(0), current_proc(0), debug(false),
+    histogram_enabled(false), dtb_enabled(true), remote_bitbang(NULL),
+    debug_module(this, progsize, max_bus_master_bits, require_authentication)
+{
+  signal(SIGINT, &handle_signal);
 
-  if(mem == MAP_FAILED)
-  {
-    while(mem == MAP_FAILED && (memsz = memsz*10/11/quantum*quantum))
-      mem = (char*)mmap64(NULL, memsz, PROT_WRITE, MAP_PRIVATE|MAP_ANON, -1, 0);
-    assert(mem != MAP_FAILED);
-    fprintf(stderr, "warning: only got %lu bytes of target mem (wanted %lu)\n",
-            (unsigned long)memsz, (unsigned long)memsz0);
-  }
+  for (auto& x : mems)
+    bus.add_device(x.first, x.second);
 
-  mmu = new mmu_t(mem, memsz);
+  debug_module.add_device(&bus);
 
-  for(size_t i = 0; i < num_cores(); i++)
-  {
-    procs[i] = new processor_t(this, new mmu_t(mem, memsz));
-    procs[i]->init(i, default_icache, default_dcache);
+  debug_mmu = new mmu_t(this, NULL);
+
+  if (hartids.size() == 0) {
+    for (size_t i = 0; i < procs.size(); i++) {
+      procs[i] = new processor_t(isa, this, i, halted);
+    }
+  }
+  else {
+    if (hartids.size() != procs.size()) {
+      std::cerr << "Number of specified hartids doesn't match number of processors" << strerror(errno) << std::endl;
+      exit(1);
+    }
+    for (size_t i = 0; i < procs.size(); i++) {
+      procs[i] = new processor_t(isa, this, hartids[i], halted);
+    }
   }
 
-  applink->init(this);
+  clint.reset(new clint_t(procs));
+  bus.add_device(CLINT_BASE, clint.get());
 }
 
 sim_t::~sim_t()
 {
-  for(size_t i = 0; i < num_cores(); i++)
-  {
-    mmu_t* pmmu = &procs[i]->mmu;
+  for (size_t i = 0; i < procs.size(); i++)
     delete procs[i];
-    delete pmmu;
-  }
-  delete mmu;
-  munmap(mem, memsz);
+  delete debug_mmu;
 }
 
-void sim_t::set_tohost(reg_t val)
+void sim_thread_main(void* arg)
 {
-  fromhost = 0;
-  tohost = val;
-  applink->wait_for_tohost();
+  ((sim_t*)arg)->main();
 }
 
-reg_t sim_t::get_fromhost()
+void sim_t::main()
 {
-  applink->wait_for_fromhost();
-  return fromhost;
-}
+  if (!debug && log)
+    set_procs_debug(true);
 
-void sim_t::send_ipi(reg_t who)
-{
-  if(who < num_cores())
-    procs[who]->deliver_ipi();
-}
-
-void sim_t::run(bool debug)
-{
-  applink->wait_for_start();
-
-  // start core 0
-  send_ipi(0);
-
-  while(1)
+  while (!done())
   {
-    if(!debug)
-      step_all(100,100,false);
+    if (debug || ctrlc_pressed)
+      interactive();
     else
-    {
-      putchar(':');
-      char s[128];
-      std::cin.getline(s,sizeof(s)-1);
-
-      char* p = strtok(s," ");
-      if(!p)
-      {
-        interactive_run_noisy(std::string("r"), std::vector<std::string>(1,"1"));
-        continue;
-      }
-      std::string cmd = p;
-
-      std::vector<std::string> args;
-      while((p = strtok(NULL," ")))
-        args.push_back(p);
-
-
-      typedef void (sim_t::*interactive_func)(const std::string&, const std::vector<std::string>&);
-      std::map<std::string,interactive_func> funcs;
-
-      funcs["r"] = &sim_t::interactive_run_noisy;
-      funcs["rs"] = &sim_t::interactive_run_silent;
-      funcs["rp"] = &sim_t::interactive_run_proc_noisy;
-      funcs["rps"] = &sim_t::interactive_run_proc_silent;
-      funcs["reg"] = &sim_t::interactive_reg;
-      funcs["fregs"] = &sim_t::interactive_fregs;
-      funcs["fregd"] = &sim_t::interactive_fregd;
-      funcs["mem"] = &sim_t::interactive_mem;
-      funcs["str"] = &sim_t::interactive_str;
-      funcs["until"] = &sim_t::interactive_until;
-      funcs["while"] = &sim_t::interactive_until;
-      funcs["q"] = &sim_t::interactive_quit;
-
-      try
-      {
-        if(funcs.count(cmd))
-          (this->*funcs[cmd])(cmd, args);
-      }
-      catch(trap_t t) {}
+      step(INTERLEAVE);
+    if (remote_bitbang) {
+      remote_bitbang->tick();
     }
   }
 }
 
-void sim_t::step_all(size_t n, size_t interleave, bool noisy)
+int sim_t::run()
 {
-  for(size_t j = 0; j < n; j+=interleave)
-    for(int i = 0; i < (int)num_cores(); i++)
-      procs[i]->step(interleave,noisy);
+  host = context_t::current();
+  target.init(sim_thread_main, this);
+  return htif_t::run();
 }
 
-void sim_t::interactive_run_noisy(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::step(size_t n)
 {
-  interactive_run(cmd,args,true);
-}
+  for (size_t i = 0, steps = 0; i < n; i += steps)
+  {
+    steps = std::min(n - i, INTERLEAVE - current_step);
+    procs[current_proc]->step(steps);
 
-void sim_t::interactive_run_silent(const std::string& cmd, const std::vector<std::string>& args)
-{
-  interactive_run(cmd,args,false);
-}
+    current_step += steps;
+    if (current_step == INTERLEAVE)
+    {
+      current_step = 0;
+      procs[current_proc]->get_mmu()->yield_load_reservation();
+      if (++current_proc == procs.size()) {
+        current_proc = 0;
+        clint->increment(INTERLEAVE / INSNS_PER_RTC_TICK);
+      }
 
-void sim_t::interactive_run(const std::string& cmd, const std::vector<std::string>& args, bool noisy)
-{
-  if(args.size())
-    step_all(atoll(args[0].c_str()),1,noisy);
-  else
-    while(1) step_all(1,1,noisy);
+      host->switch_to();
+    }
+  }
 }
 
-void sim_t::interactive_run_proc_noisy(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::set_debug(bool value)
 {
-  interactive_run_proc(cmd,args,true);
+  debug = value;
 }
 
-void sim_t::interactive_run_proc_silent(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::set_log(bool value)
 {
-  interactive_run_proc(cmd,args,false);
+  log = value;
 }
 
-void sim_t::interactive_run_proc(const std::string& cmd, const std::vector<std::string>& a, bool noisy)
+void sim_t::set_histogram(bool value)
 {
-  if(a.size() == 0)
-    return;
-
-  int p = atoi(a[0].c_str());
-  if(p >= (int)num_cores())
-    return;
-
-  if(a.size() == 2)
-    procs[p]->step(atoi(a[1].c_str()),noisy);
-  else
-    while(1) procs[p]->step(1,noisy);
+  histogram_enabled = value;
+  for (size_t i = 0; i < procs.size(); i++) {
+    procs[i]->set_histogram(histogram_enabled);
+  }
 }
 
-void sim_t::interactive_quit(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::set_procs_debug(bool value)
 {
-  throw quit_sim();
+  for (size_t i=0; i< procs.size(); i++)
+    procs[i]->set_debug(value);
 }
 
-reg_t sim_t::get_pc(const std::vector<std::string>& args)
+bool sim_t::mmio_load(reg_t addr, size_t len, uint8_t* bytes)
 {
-  if(args.size() != 1)
-    throw trap_illegal_instruction;
-
-  int p = atoi(args[0].c_str());
-  if(p >= (int)num_cores())
-    throw trap_illegal_instruction;
-
-  return procs[p]->pc;
+  if (addr + len < addr)
+    return false;
+  return bus.load(addr, len, bytes);
 }
 
-reg_t sim_t::get_reg(const std::vector<std::string>& args)
+bool sim_t::mmio_store(reg_t addr, size_t len, const uint8_t* bytes)
 {
-  if(args.size() != 2)
-    throw trap_illegal_instruction;
-
-  int p = atoi(args[0].c_str());
-  int r = atoi(args[1].c_str());
-  if(p >= (int)num_cores() || r >= NXPR)
-    throw trap_illegal_instruction;
-
-  return procs[p]->XPR[r];
+  if (addr + len < addr)
+    return false;
+  return bus.store(addr, len, bytes);
 }
 
-reg_t sim_t::get_freg(const std::vector<std::string>& args)
+void sim_t::make_dtb()
 {
-  if(args.size() != 2)
-    throw trap_illegal_instruction;
+  const int reset_vec_size = 8;
 
-  int p = atoi(args[0].c_str());
-  int r = atoi(args[1].c_str());
-  if(p >= (int)num_cores() || r >= NFPR)
-    throw trap_illegal_instruction;
+  start_pc = start_pc == reg_t(-1) ? get_entry_point() : start_pc;
 
-  return procs[p]->FPR[r];
-}
+  uint32_t reset_vec[reset_vec_size] = {
+    0x297,                                      // auipc  t0,0x0
+    0x28593 + (reset_vec_size * 4 << 20),       // addi   a1, t0, &dtb
+    0xf1402573,                                 // csrr   a0, mhartid
+    get_core(0)->get_xlen() == 32 ?
+      0x0182a283u :                             // lw     t0,24(t0)
+      0x0182b283u,                              // ld     t0,24(t0)
+    0x28067,                                    // jr     t0
+    0,
+    (uint32_t) (start_pc & 0xffffffff),
+    (uint32_t) (start_pc >> 32)
+  };
 
-reg_t sim_t::get_tohost(const std::vector<std::string>& args)
-{
-  if(args.size() != 1)
-    throw trap_illegal_instruction;
+  std::vector<char> rom((char*)reset_vec, (char*)reset_vec + sizeof(reset_vec));
 
-  int p = atoi(args[0].c_str());
-  if(p >= (int)num_cores())
-    throw trap_illegal_instruction;
+  dts = make_dts(INSNS_PER_RTC_TICK, CPU_HZ, procs, mems);
+  std::string dtb = dts_compile(dts);
 
-  return procs[p]->tohost;
+  rom.insert(rom.end(), dtb.begin(), dtb.end());
+  const int align = 0x1000;
+  rom.resize((rom.size() + align - 1) / align * align);
+
+  boot_rom.reset(new rom_device_t(rom));
+  bus.add_device(DEFAULT_RSTVEC, boot_rom.get());
 }
 
-void sim_t::interactive_reg(const std::string& cmd, const std::vector<std::string>& args)
-{
-  printf("0x%016llx\n",(unsigned long long)get_reg(args));
+char* sim_t::addr_to_mem(reg_t addr) {
+  auto desc = bus.find_device(addr);
+  if (auto mem = dynamic_cast<mem_t*>(desc.second))
+    if (addr - desc.first < mem->size())
+      return mem->contents() + (addr - desc.first);
+  return NULL;
 }
 
-union fpr
-{
-  reg_t r;
-  float s;
-  double d;
-};
+// htif
 
-void sim_t::interactive_fregs(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::reset()
 {
-  fpr f;
-  f.r = get_freg(args);
-  printf("%g\n",f.s);
+  if (dtb_enabled)
+    make_dtb();
 }
 
-void sim_t::interactive_fregd(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::idle()
 {
-  fpr f;
-  f.r = get_freg(args);
-  printf("%g\n",f.d);
+  target.switch_to();
 }
 
-reg_t sim_t::get_mem(const std::vector<std::string>& args)
+void sim_t::read_chunk(addr_t taddr, size_t len, void* dst)
 {
-  if(args.size() != 1 && args.size() != 2)
-    throw trap_illegal_instruction;
-
-  std::string addr_str = args[0];
-  if(args.size() == 2)
-  {
-    int p = atoi(args[0].c_str());
-    if(p >= (int)num_cores())
-      throw trap_illegal_instruction;
-    mmu->set_vm_enabled(!!(procs[p]->sr & SR_VM));
-    mmu->set_ptbr(procs[p]->mmu.get_ptbr());
-    addr_str = args[1];
-  }
-
-  reg_t addr = strtol(addr_str.c_str(),NULL,16), val;
-  if(addr == LONG_MAX)
-    addr = strtoul(addr_str.c_str(),NULL,16);
-
-  switch(addr % 8)
-  {
-    case 0:
-      val = mmu->load_uint64(addr);
-      break;
-    case 4:
-      val = mmu->load_uint32(addr);
-      break;
-    case 2:
-    case 6:
-      val = mmu->load_uint16(addr);
-      break;
-    default:
-      val = mmu->load_uint8(addr);
-      break;
-  }
-  return val;
+  assert(len == 8);
+  auto data = debug_mmu->load_uint64(taddr);
+  memcpy(dst, &data, sizeof data);
 }
 
-void sim_t::interactive_mem(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::write_chunk(addr_t taddr, size_t len, const void* src)
 {
-  printf("0x%016llx\n",(unsigned long long)get_mem(args));
+  assert(len == 8);
+  uint64_t data;
+  memcpy(&data, src, sizeof data);
+  debug_mmu->store_uint64(taddr, data);
 }
 
-void sim_t::interactive_str(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::proc_reset(unsigned id)
 {
-  if(args.size() != 1)
-    throw trap_illegal_instruction;
-
-  reg_t addr = strtol(args[0].c_str(),NULL,16);
-
-  char ch;
-  while((ch = mmu->load_uint8(addr++)))
-    putchar(ch);
-
-  putchar('\n');
-}
-
-void sim_t::interactive_until(const std::string& cmd, const std::vector<std::string>& args)
-{
-  if(args.size() < 3)
-    return;
-
-  std::string scmd = args[0];
-  reg_t val = strtol(args[args.size()-1].c_str(),NULL,16);
-  if(val == LONG_MAX)
-    val = strtoul(args[args.size()-1].c_str(),NULL,16);
-  
-  std::vector<std::string> args2;
-  args2 = std::vector<std::string>(args.begin()+1,args.end()-1);
-
-  while(1)
-  {
-    reg_t current;
-    if(scmd == "reg")
-      current = get_reg(args2);
-    else if(scmd == "pc")
-      current = get_pc(args2);
-    else if(scmd == "mem")
-      current = get_mem(args2);
-    else if(scmd == "tohost")
-      current = get_tohost(args2);
-    else
-      return;
-
-    if(cmd == "until" && current == val)
-      break;
-    if(cmd == "while" && current != val)
-      break;
-
-    step_all(1,1,false);
-  }
+  debug_module.proc_reset(id);
 }