URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [tags/] [nog_patch_68/] [or1ksim/] [toplevel.c] - Blame information for rev 1050

Go to most recent revision | Details | Compare with Previous | View Log


/* toplevel.c -- Top level simulator source file
   Copyright (C) 1999 Damjan Lampret, lampret@opencores.org
 
This file is part of OpenRISC 1000 Architectural Simulator.
 
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
 
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.
 
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
 
/* Simulator commands. Help and version output. SIGINT processing.
Stdout redirection is specific to linux (I need to fix this). */
 
#include "config.h"
 
#include <stdio.h>
#include <ctype.h>
#include <string.h>
#include <stdlib.h>
#include <unistd.h>
#include <signal.h>
#include <stdarg.h>
#include <fcntl.h>
#include <limits.h>
 
#ifdef HAVE_LIBREADLINE
#include <readline/readline.h>
#include <readline/history.h>
#endif /* HAVE_LIBREADLINE */
 
#include "arch.h"
#include "parse.h"
#include "abstract.h"
#include "labels.h"
#include "execute.h"
#include "sim-config.h"
#include "spr_defs.h"
#include "sprs.h"
#include "dma.h"
#include "vga.h"
#include "fb.h"
#include "ps2kbd.h"
#include "vapi.h"
#include "gdbcomm.h"
#include "debug_unit.h"
#include "coff.h"
#include "sched.h"
#include "profiler.h"
#include "mprofiler.h"
#include "mc.h"
#include "atahost.h"
 
/* CVS revision number. */
const char rcsrev[] = "$Revision: 1.94 $";
 
/* History of execution */
int histexec[HISTEXEC_LEN];
 
char *sim_commands [] = {
  "q", "t", "help", "de", "dm", "run", "pr", "pm", "pc",
  "reset", "break", "breaks", "hist", "stats", "stall" "info",
  "r", "dv",
#if !FAST_SIM
  "set",
#endif
 
};
 
inline void debug(int level, const char *format, ...)
{
  char *p;
  va_list ap;
 
  if (config.sim.debug >= level) {
    if ((p = malloc(1000)) == NULL)
      return;
    va_start(ap, format);
    (void) vsnprintf(p, 1000, format, ap);
    va_end(ap);
    PRINTF("%s", p);
    fflush(stdout);
    free(p);
  } else {
#if DEBUG
  if ((p = malloc(1000)) == NULL)
    return;
  va_start(ap, format);
  (void) vsnprintf(p, 1000, format, ap);
  va_end(ap);
  PRINTF("%s\n", p);
  fflush(stdout);
  free(p);
#endif
  }
}
 
void ctrl_c(signum)
     int signum;
{
  runtime.sim.cont_run = runtime.cpu.stalled ? 0 : 1;
  runtime.sim.iprompt = 1;
  set_stall_state (0);
  signal(SIGINT, ctrl_c);
}
 
void version()
{
  PRINTF ("\n");
  PRINTF ("OpenRISC 1000 (OR32) Architectural Simulator, %s\n", rcsrev);
  PRINTF ("Copyright (C) 1999 Damjan Lampret, lampret@opencores.org\n");
  PRINTF ("Copyright (C) 2000 Damjan Lampret, lampret@opencores.org\n");
  PRINTF ("                   Jimmy Chen-Min Chen, jimmy@ee.nctu.edu.tw\n");
  PRINTF ("                   Johan Rydberg, johan.rydberg@insight.se\n");
  PRINTF ("                   Marko Mlinar, markom@opencores.org\n");
  PRINTF ("Copyright (C) 2001 Simon Srot, simons@opencores.org\n");
  PRINTF ("                   Marko Mlinar, markom@opencores.org\n");
  PRINTF ("Copyright (C) 2002 Marko Mlinar, markom@opencores.org\n");
  PRINTF ("                   Simon Srot, simons@opencores.org\n");
  PRINTF ("Visit http://www.opencores.org for more information about ");
  PRINTF ("OpenRISC 1000 and\nother open source cores.\n\n");
  PRINTF ("This software comes with ABSOLUTELY NO WARRANTY; for ");
  PRINTF ("details see COPYING.\nThis is free software, and you ");
  PRINTF ("are welcome to redistribute it under certain\nconditions; ");
  PRINTF ("for details see COPYING.\n");
}
 
void
help()
{
  PRINTF("q      - quit simulator\n");
  PRINTF("r      - display all registers\n");
  PRINTF("t      - execute next instruction\n");
  PRINTF("run <instructions> [<hush>]  - execute <instruction> instructions, no reg dump if hush\n");
  PRINTF("pr <r> <value>     - patch register <r> with <value>\n");
  PRINTF("dm <fromaddr> [<toaddr>] - display memory from <fromaddr> to <toaddr>\n");
  PRINTF("de <fromaddr> [<toaddr>] - debug insn memory\n");
  PRINTF("pm <addr> <value>  - patch memory location <addr> with <value>\n");
  PRINTF("pc <value>     - patch PC register with <value>\n");
  PRINTF("break <addr>     - toggle breakpoint at address <addr>\n");
  PRINTF("breaks           - print all set breakpoints\n");
  PRINTF("reset      - simulator reset\n");
  PRINTF("hist       - execution history\n");
  PRINTF("stall                    - stalls the processor and gives control to the debugger\n");
  PRINTF("stats <num|clear>    - execution statistics num or clear it.\n");
  PRINTF("info       - configuration info (caches etc.)\n");
  PRINTF("dv <fromaddr> [<toaddr>] [<modname>] - dumps memory as verilog (use redirect)\n");
  PRINTF("dh <fromaddr> [<toaddr>] - dumps memory as hex code (use redirect)\n");
  PRINTF("<cmd> > <filename>   - redirect simulator stdout to <filename> (and not emulated PRINTF)\n");
#if !FAST_SIM
  PRINTF("set <section> <item> = <param>  - set configuration.  See sim.cfg for more information.\n");
  PRINTF("debug      - toggles simulator debug mode\n");
  mp_help ();
  prof_help ();
  PRINTF("cuc        - enters Custom Unit Compiler command prompt\n");
#endif
  PRINTF("help       - available commands (this list)\n");
}
 
void debugmem (unsigned long from, unsigned long to );
 
/* Resets all subunits */
void sim_reset ()
{
  SCHED_INIT();
  uart_reset();
  dma_reset();
  eth_reset();
  gpio_reset();
  vga_reset ();
  fb_reset ();
  kbd_reset ();
  ata_reset();
  tick_reset();
  pm_reset();
  pic_reset();
  mc_reset();
  du_reset ();
  cpu_reset();
}
 
/* Initalizes all devices and sim */
void sim_init ()
{
  init_memory_table ();
  init_labels();
  init_breakpoints();
  initstats();
  build_automata();
 
  if (config.sim.profile) {
    runtime.sim.fprof = fopen(config.sim.prof_fn, "wt+");
    if(!runtime.sim.fprof) {
      fprintf(stderr, "ERROR: Problems opening profile file.\n");
      exit (1);
    } else
      fprintf(runtime.sim.fprof, "+00000000 FFFFFFFF FFFFFFFF [outside_functions]\n");
  }
 
  if (config.sim.mprofile) {
    runtime.sim.fmprof = fopen(config.sim.mprof_fn, "wb+");
    if(!runtime.sim.fmprof) {
      fprintf(stderr, "ERROR: Problems opening memory profile file.\n");
      exit (1);
    }
  }
 
  if (config.sim.exe_log) {
    runtime.sim.fexe_log = fopen(config.sim.exe_log_fn, "wt+");
    if(!runtime.sim.fexe_log) {
      PRINTF("ERROR: Problems opening exe_log file.\n");
      exit (1);
    }
  }
 
  if (config.sim.spr_log) {
    PRINTF("OPENING SPRLOG\n");
    runtime.sim.fspr_log = fopen(config.sim.spr_log_fn, "wt+");
    if (!runtime.sim.fspr_log) {
      PRINTF("ERROR: Problems opening spr_log file.\n");
      exit(1);
    }
  }
 
  /* Initialize memory */
  {
    extern struct dev_memarea *dev_list;
    struct dev_memarea *area;
    int i;
    if (config.memory.type == MT_RANDOM) {
      unsigned int val = 0;
 
      if (config.memory.random_seed == -1) {
        runtime.memory.random_seed = time(NULL);
        /* Print out the seed just in case we ever need to debug */
        PRINTF("Seeding random generator with value %d\n", config.memory.random_seed);
      } else
        runtime.memory.random_seed = config.memory.random_seed;
      srandom(runtime.memory.random_seed);
 
      for (area = dev_list; area; area = area->next)
        for(i = 0; i < area->size; i++) {
          val = random();
          setsim_mem8(i + area->addr_compare, val & 0xFF);
        }
    } else if(config.memory.type == MT_PATTERN) {
      for (area = dev_list; area; area = area->next)
        for(i = 0; i < area->size; i++)
          setsim_mem8(i + area->addr_compare, config.memory.pattern);
    } else if (config.memory.type != MT_UNKNOWN) {
      fprintf(stderr, "Invalid memory configuration type.\n");
      exit(1);
    }
  }
 
  if(runtime.sim.filename) {
    unsigned long endaddr = 0xFFFFFFFF;
    endaddr = loadcode(runtime.sim.filename, 0, 0); /* MM170901 always load at address zero.  */
    if (endaddr == -1) {
      fprintf(stderr, "Problems loading boot code.\n");
      exit(1);
    }
  }
 
#if !FAST_SIM /* We assume we have valid configuration with fsim*/
  /* Disable gdb debugging, if debug module is not available.  */
  if (config.debug.gdb_enabled && !config.debug.enabled) {
    config.debug.gdb_enabled = 0;
    if (config.sim.verbose)
      fprintf (stderr, "WARNING: Debug module not enabled, cannot start gdb.\n");
  }
#endif
 
  if (config.debug.gdb_enabled)
    gdbcomm_init ();
 
#if !FAST_SIM /* We assume we have valid configuration with fsim*/
  /* Enable dependency stats, if we want to do history analisis */
  if (config.sim.history && !config.cpu.dependstats) {
    config.cpu.dependstats = 1;
    if (config.sim.verbose)
      fprintf (stderr, "WARNING: dependstats stats must be enabled to do history analisis.\n");
  }
#endif
 
#if !FAST_SIM /* We assume we have valid configuration with fsim*/  
  /* Debug forces verbose */
  if (config.sim.debug && !config.sim.verbose) {
    config.sim.verbose = 1;
    fprintf (stderr, "WARNING: verbose turned on.\n");
  }
#endif
 
  /* Start VAPI before device initialization.  */
  if (config.vapi.enabled) {
    runtime.vapi.enabled = 1;
    vapi_init ();
    if (config.sim.verbose)
      PRINTF ("VAPI started, waiting for clients.\n");
  }
 
  sim_reset ();
 
  lock_memory_table ();
 
  /* Wait till all test are connected.  */
  if (runtime.vapi.enabled) {
    int numu = vapi_num_unconnected (0);
    if (numu) {
      PRINTF ("\nWaiting for VAPI tests with ids:\n");
      vapi_num_unconnected (1);
      PRINTF ("\n");
      while (numu = vapi_num_unconnected (0)) {
        vapi_check ();
        PRINTF ("\rStill waiting for %i VAPI test(s) to connect.       ", numu);
        usleep (100);
      }
      PRINTF ("\n");
    }
    PRINTF ("All devices connected                         \n");
  }
  /* simulator is initialized */
  runtime.sim.init = 0;
}
 
/* Display info about various modules */
void sim_info () {
  sprs_status();
  PRINTF ("\n");
  memory_table_status ();
  if (config.immu.enabled) itlb_status(-1);
  if (config.dmmu.enabled) dtlb_status(-1);
  if (config.ic.enabled) ic_info();
  if (config.dc.enabled) dc_info();
 
  if (config.bpb.enabled) bpb_info();
  if (config.bpb.btic) btic_info();
 
  if (config.mc.enabled) mc_status();
  if (config.nuarts) uart_status();
  if (config.ndmas) dma_status();
  if (config.nethernets) eth_status();
  if (config.ngpios) gpio_status();
  if (config.natas) ata_status();
  kbd_info();
}
 
/* Cleanup */
void sim_done ()
{
  if (config.sim.profile) {
    fprintf(runtime.sim.fprof,"-%08X FFFFFFFF\n", runtime.sim.cycles);
    fclose(runtime.sim.fprof);
  }
 
  if (config.sim.mprofile) fclose(runtime.sim.fmprof);
  if (config.sim.exe_log)   fclose(runtime.sim.fexe_log);
  if (runtime.vapi.enabled)  vapi_done ();
  done_memory_table ();
  exit(0);
}
 
/* Executes jobs in time queue */
static inline void do_scheduler ()
{
  void (*func)(int);
  int param;
 
  /* Execute all jobs till now */
  do {
    func = SCHED_PEEK().func;
    param = SCHED_PEEK().param;
    SCHED_REMOVE();
    func (param);
  } while (runtime.sim.cycles >= SCHED_PEEK().time);
}
 
/* Main function */
int main(argc, argv)
     int argc;
     char *argv[];
{
  char *linestr;
  char item1[500], b2[500], prev_str[500] = "";
  char *redirstr;
  int hush = 0;
  int first_prompt = 1;
 
  srand(getpid());
  init_defconfig();
  if (parse_args(argc, argv)) {
    PRINTF("Usage: %s [options] <filename>\n", argv[0]);
    PRINTF("Options:\n");
    PRINTF(" -v                   version and copyright note\n");
    PRINTF(" -i                   enable interactive command prompt\n");
    PRINTF(" --nosrv              do not launch JTAG proxy server\n"); /* (CZ) */
    PRINTF(" --srv <n>            launch JTAG proxy server on port <n>; [random]\n"); /* (CZ) */
#if !FAST_SIM
    PRINTF(" -f or --file         load script file [sim.cfg]\n");
    PRINTF(" --enable-profile     enable profiling.\n");
    PRINTF(" --enable-mprofile    enable memory profiling.\n");
#endif
    PRINTF(" --output-cfg         prints C structure of current\n");
    PRINTF("                      configuration to standard output\n");
    PRINTF("\nor   : %s ", argv[0]);
    mp_help ();
    PRINTF("\nor   : %s ", argv[0]);
    prof_help ();
    exit(-1);
  }
 
#ifdef HAVE_LIBREADLINE
  initialize_readline (); /* Bind our completer. */
#endif
 
#if !FAST_SIM
  /* Read configuration file.  */
  if (!runtime.sim.script_file_specified)
    read_script_file ("sim.cfg");
 
  /* Overide parameters with command line ones */
  if (runtime.simcmd.profile) config.sim.profile = 1;
  if (runtime.simcmd.mprofile) config.sim.mprofile = 1;
 
  if (!runtime.sim.script_file_specified && config.sim.verbose)
    fprintf (stderr, "WARNING: No config file read, assuming default configuration.\n");
#else
  PRINTF ("\n\tNOTE: running fast sim with fixed configuration!\n\n");
#endif
  if (runtime.sim.output_cfg) {
    output_cfg (stdout);
    exit (0);
  }
  print_config();
  sim_init ();
  signal(SIGINT, ctrl_c);
 
  while(1) {
    if (runtime.sim.iprompt) {
      if (config.debug.gdb_enabled)
        {
          PRINTF ("(sim) ");
          fflush(stdout);
          HandleServerSocket(true);  /* block & check_stdin = true */
        }
#ifdef HAVE_LIBREADLINE
      /* Must disable readline in new mode. It isn't compatible
         with non blocking environments */
      if(!config.debug.gdb_enabled)
        linestr = readline("(sim) ");
      else
        linestr = fgets(b2, sizeof b2, stdin);
#else
      if(!config.debug.gdb_enabled)
        PRINTF ("(sim) ");
      linestr = fgets(b2, sizeof b2, stdin);
#endif
    } else
      strcpy(linestr = b2, "run -1 hush");
 
    if (!linestr)
      break;
    linestr = stripwhite (linestr);
 
#ifdef HAVE_LIBREADLINE
    /* Readline only works in the old mode */
    if(!server_fd)
      {
        if (strlen(linestr) == 0) {
          char *l = repeat_last_command ();
 
          if (l) {
      free (linestr);
      linestr = l;
          }
        }
 
        if (*linestr) {
          add_history (linestr);
        }
      }
#endif /* HAVE_LIBREADLINE */
 
    if (redirstr = strstr(linestr, ">")) {
      *redirstr = '\0';
      strtoken(&redirstr[1], item1, 1);
      runtime.sim.fout = fopen(item1, "w+");
      if (!runtime.sim.fout) runtime.sim.fout = stdout;
    }
 
    if (linestr[0] == '\n')
      strcpy (linestr, &prev_str[0]);
    else
      strcpy (&prev_str[0], linestr);
 
    strtoken(linestr, item1, 1);
    if (strcmp(item1, "q") == 0) {  /* quit */
      PRINTF ("\n");
      sim_done ();
    } else
    if (strcmp(item1, "help") == 0) /* help */
      help();
    else
    if (strcmp(item1, "t") == 0) {  /* trace */
      runtime.sim.cont_run = 1;
    } else
    if (strcmp(item1, "dm") == 0) { /* dump memory */
      char item2[20];
      char item3[20];
      static int from = 0, to = 0;
 
      strtoken(linestr, item2, 2);
      strtoken(linestr, item3, 3);
 
      if (strlen(item2)) {
        if (item2[0] == '_')
          from = eval_label(item2);
        else
          from = strtoul(item2, NULL, 0);
        to = from + 0x40;
      }
      if (strlen(item3))
        to = strtoul(item3, NULL, 0);
      dumpmemory(from, to, 0, 1);
            PRINTF("\n");
    } else
    if (strcmp(item1, "dv") == 0) {/* dump memory as verilog*/
      char item2[20];
      char item3[20];
      char item4[20];
      static int from = 0, to = 0;
 
      strtoken(linestr, item2, 2);
      strtoken(linestr, item3, 3);
      strtoken(linestr, item4, 4);
 
      if (strlen(item2)) {
        if (item2[0] == '_')
          from = eval_label(item2);
        else
          from = strtoul(item2, NULL, 0);
        to = from + 0x40;
      }
      if (strlen(item3))
        to = strtoul(item3, NULL, 0);
      if (!strlen(item4))
        strcpy(item4, "or1k_mem");
      dumpverilog(item4, from, to);
        PRINTF("\n");
    } else
    if (strcmp(item1, "dh") == 0) {/* dump memory as hex*/
      char item2[20];
      char item3[20];
      static int from = 0, to = 0;
 
      strtoken(linestr, item2, 2);
      strtoken(linestr, item3, 3);
 
      if (strlen(item2)) {
        if (item2[0] == '_')
          from = eval_label(item2);
        else
          from = strtoul(item2, NULL, 0);
        to = from + 0x40;
      }
      if (strlen(item3))
        to = strtoul(item3, NULL, 0);
      dumphex(from, to);
        PRINTF("\n");
    } else
    if (strcmp(item1, "pm") == 0) { /* patch memory */
      char item2[20];
      char item3[20];
      static int addr = 0;
      int breakpoint = 0;
 
      strtoken(linestr, item2, 2);
      strtoken(linestr, item3, 3);
      if (strlen(item2))
        if (item2[0] == '_')
          addr = eval_label(item2);
        else
          addr = strtoul(item2, NULL, 0);
      set_mem32(addr, strtoul(item3, NULL, 0), &breakpoint);
    } else
    if (strcmp(item1, "pr") == 0) { /* patch regs */
      char item2[20];
      char item3[20];
 
      strtoken(linestr, item2, 2);
      strtoken(linestr, item3, 3);
      setsim_reg32(strtoul(item2, NULL,0), strtoul(item3, NULL, 0));
    } else
    if (strcmp(item1, "pc") == 0) { /* patch PC */
      char item2[20];
 
      strtoken(linestr, item2, 2);
      pc = strtoul(item2, NULL, 0);
    } else
    if (strcmp(item1, "breaks") == 0) { /* print breakpoints */
        print_breakpoints();
    } else
    if (strcmp(item1, "break") == 0) {  /* set/clear breakpoint */
      char item2[20];
      char *p;
      unsigned long addr;
      strtoken(linestr, item2, 2);
      addr = strtoul(item2, &p, 0);
      if (p) {
        struct label_entry *l = find_label (item2);
        if (l) {
          addr = l->addr;
        } else addr = 0xffffffff;
      }
      if (addr != 0xffffffff) set_insnbrkpoint(addr);
      else PRINTF ("'%s' is invalid address!\n");
    } else
    if (strcmp(item1, "r") == 0) {  /* dump regs */
      dumpreg();
    } else
    if (strcmp(item1, "de") == 0) { /* reset simulator */
      char item2[20];
      char item3[20];
      static int from = 0, to = 0;
 
      strtoken(linestr, item2, 2);
      strtoken(linestr, item3, 3);
 
      if (strlen(item2)) {
        if (item2[0] == '_')
          from = eval_label(item2);
        else
          from = strtoul(item2, NULL, 0);
        to = from + 0x40;
      }
      if (strlen(item3))
        to = strtoul(item3, NULL, 0);
      debugmem(from, to);
      PRINTF("\n");
    } else
    if (strcmp(item1, "reset") == 0) {  /* reset simulator */
      sim_reset();
    } else
#if !FAST_SIM
    if (strcmp(item1, "debug") == 0) {  /* debug mode */
      config.sim.debug ^= 1;
    } else
#endif
    if (strcmp(item1, "hist") == 0) { /* dump history */
      int i;
      for(i = HISTEXEC_LEN; i; i--)
        dumpmemory(histexec[i - 1], histexec[i - 1] + 4, 1, 1);
      PRINTF("\n");
    } else
    if (strcmp(item1, "run") == 0) { /* run */
      char item2[20];
      char item3[20];
 
      strtoken(linestr, item2, 2);
      strtoken(linestr, item3, 3);
      if (strcmp(item3, "hush") == 0)
        hush = 1;
      else
        hush = 0;
      runtime.sim.cont_run = strtol(item2, NULL, 0);
    } else
    if(!strcmp(item1, "stall")) { /* Added by CZ 210801 */
      set_stall_state (1);
      runtime.sim.iprompt = 0;
      runtime.sim.cont_run = -1;
      hush = 1;
    } else
    if (strcmp(item1, "stats") == 0) { /* stats */
      char item2[20];
      int i = 0;
 
      strtoken(linestr, item2, 2);
      if (strcmp(item2, "clear") == 0) {
        initstats();
        PRINTF("Cleared.\n");
      } else {
        i = strtoul(item2, NULL, 0);
        printstats(i);
      }
    } else
    if (strcmp(item1, "info") == 0) /* configuration info */
      sim_info ();
    else
#if !FAST_SIM
    if (strcmp (item1, "profiler") == 0) { /* run profiler utility */
      char *argv[10];
      int argc = tokenize_line (linestr, argv, 10);
      main_profiler (argc, argv);
    } else
    if (strcmp (item1, "mprofiler") == 0) { /* run mprofiler utility */
      char *argv[10];
      int argc = tokenize_line (linestr, argv, 10);
      main_mprofiler (argc, argv);
    } else
    if (strcmp (item1, "cuc") == 0) { /* run Custom Unit Compiler */
      main_cuc (runtime.sim.filename);
    } else
    if (strcmp(item1, "set") == 0) { /* configuration info */
      char *s = linestr;
      int i;
      extern section;
      extern struct section sections[];
      while (*s != ' ' && *s) s++;
      set_config_command (s);
    } else
#endif /* !FAST_SIM */
      PRINTF("%s: Unknown command.\n", linestr);
 
    { /* Needed by execution */
      extern int do_stats;
      do_stats = config.cpu.dependstats || config.cpu.superscalar || config.cpu.dependstats
              || config.sim.history || config.sim.exe_log;
    }
 
    /* MM: 'run -1' means endless execution.  */
    while(runtime.sim.cont_run) {
      IFF (config.debug.enabled) {
        if (runtime.cpu.stalled) {
          if(config.debug.gdb_enabled) {
            BlockJTAG();
            HandleServerSocket(false);
          } else {
            fprintf (stderr, "WARNING: CPU stalled and gdb connection not enabled.");
            runtime.sim.cont_run = 0;
          }
          continue;
        }
      }
 
      /* Each cycle has counter of mem_cycles; this value is joined with cycles
         at the end of the cycle; no sim originated memory accesses should be
         performed inbetween. */
      runtime.sim.mem_cycles = 0;
      if (!config.pm.enabled || !testsprbits(SPR_PMR, SPR_PMR_DME | SPR_PMR_SME)) {
        if (runtime.sim.cont_run > 0) runtime.sim.cont_run--;
        pic_clock ();
        if (cpu_clock ()) break;
        if (config.dc.enabled) dc_clock();
        if (config.ic.enabled) ic_clock();
      }
 
      if (config.dmas) dma_clock();
      if (config.ethernets) eth_clock();
      if (config.ngpios) gpio_clock();
      if (config.vapi.enabled && runtime.vapi.enabled) vapi_check();
      if (config.debug.gdb_enabled) HandleServerSocket(false); /* block & check_stdin = false */
      IFF(config.debug.enabled)
        if (testsprbits(SPR_DMR1, SPR_DMR1_ST)) set_stall_state (1);
 
      runtime.sim.cycles += runtime.sim.mem_cycles;
      if (runtime.sim.cycles >= SCHED_PEEK().time) do_scheduler ();
      if (!hush) dumpreg();
    }
    hush = 0;
    fflush(stdout);
    runtime.sim.fout = stdout;
 
    if (!runtime.sim.iprompt)  /* non-interactive quit */
      sim_done();
 
#ifdef HAVE_LIBREADLINE
    if (linestr)
      free (linestr);
#endif
 
  }
  sim_done();
}
 
#ifdef HAVE_LIBREADLINE
char *command_generator ();
char **sim_completion ();
 
/* Tell the GNU readline library how to complete.  We want to try to complete
   on command names if this is the first word in the line, or on filenames
   if not. */
void initialize_readline ()
{
  /* Allow conditional parsing of the ~/.inputrc file. */
  rl_readline_name = "or1ksim";
 
  /* Tell the completer that we want a crack first. */
  rl_attempted_completion_function = (CPPFunction *)sim_completion;
}
 
/* Attempt to complete on the contents of TEXT.  START and END bound the
   region of rl_line_buffer that contains the word to complete.  TEXT is
   the word to complete.  We can use the entire contents of rl_line_buffer
   in case we want to do some simple parsing.  Return the array of matches,
   or NULL if there aren't any. */
char **
sim_completion (text, start, end)
     char *text;
     int start, end;
{
  char **matches;
 
  matches = (char **)NULL;
 
  /* If this word is at the start of the line, then it is a command
     to complete.  Otherwise it is the name of a file in the current
     directory. */
  if (start == 0)
    matches = completion_matches (text, command_generator);
 
  return (matches);
}
 
/* Generator function for command completion.  STATE lets us know whether
   to start from scratch; without any state (i.e. STATE == 0), then we
   start at the top of the list. */
char *
command_generator (text, state)
     char *text;
     int state;
{
  static int list_index, len;
  char *name;
 
  /* If this is a new word to complete, initialize now.  This includes
     saving the length of TEXT for efficiency, and initializing the index
     variable to 0. */
  if (!state)
    {
      list_index = 0;
      len = strlen (text);
    }
 
  /* Return the next name which partially matches from the command list. */
  while (name = sim_commands[list_index])
    {
      list_index++;
 
      if (strncmp (name, text, len) == 0)
        return (dupstr(name));
    }
 
  /* If no names matched, then return NULL. */
  return ((char *)NULL);
}
 
/* Repeats the last command.  */
char *
repeat_last_command ()
{
  int offset = where_history ();
  HIST_ENTRY *hist;
 
  if (hist = history_get (offset))
    return dupstr (hist->line);
  return 0;
}
 
#endif
 
extern char *disassembled;
void debugmem( unsigned long from, unsigned long to )
{
  int i;
  PRINTF("starting to dump mem...\n");
  for(i=from; i<to; ) {
    struct label_entry *entry;
    unsigned int _insn;
    PRINTF("i=%x :: ", i);
 
    if (verify_memoryarea(i) && (entry = get_label(i)))
      PRINTF("label: %s |", entry->name);
 
    iqueue[0].insn = _insn = evalsim_mem32(i);
    iqueue[0].insn_index = insn_decode(_insn);
    disassemble_insn (_insn);
    PRINTF("%08x %s\n", _insn, disassembled);
    i += insn_len( iqueue[0].insn_index );
  }
}

Line No.	Rev	Author	Line
1	2	cvs	`/* toplevel.c -- Top level simulator source file`
2			`Copyright (C) 1999 Damjan Lampret, lampret@opencores.org`
3
4			`This file is part of OpenRISC 1000 Architectural Simulator.`
5
6			`This program is free software; you can redistribute it and/or modify`
7			`it under the terms of the GNU General Public License as published by`
8			`the Free Software Foundation; either version 2 of the License, or`
9			`(at your option) any later version.`
10
11			`This program is distributed in the hope that it will be useful,`
12			`but WITHOUT ANY WARRANTY; without even the implied warranty of`
13			`MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the`
14			`GNU General Public License for more details.`
15
16			`You should have received a copy of the GNU General Public License`
17			`along with this program; if not, write to the Free Software`
18			`Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */`
19
20			`/* Simulator commands. Help and version output. SIGINT processing.`
21			`Stdout redirection is specific to linux (I need to fix this). */`
22
23	16	jrydberg	`#include "config.h"`
24
25	2	cvs	`#include <stdio.h>`
26			`#include <ctype.h>`
27			`#include <string.h>`
28			`#include <stdlib.h>`
29	46	lampret	`#include <unistd.h>`
30	2	cvs	`#include <signal.h>`
31			`#include <stdarg.h>`
32	123	markom	`#include <fcntl.h>`
33	728	markom	`#include <limits.h>`
34	2	cvs
35	16	jrydberg	`#ifdef HAVE_LIBREADLINE`
36	7	jrydberg	`#include <readline/readline.h>`
37			`#include <readline/history.h>`
38	16	jrydberg	`#endif /* HAVE_LIBREADLINE */`
39	7	jrydberg
40	2	cvs	`#include "arch.h"`
41			`#include "parse.h"`
42			`#include "abstract.h"`
43	261	markom	`#include "labels.h"`
44	2	cvs	`#include "execute.h"`
45	69	lampret	`#include "sim-config.h"`
46	103	lampret	`#include "spr_defs.h"`
47	518	markom	`#include "sprs.h"`
48	212	erez	`#include "dma.h"`
49	645	markom	`#include "vga.h"`
50			`#include "fb.h"`
51	664	markom	`#include "ps2kbd.h"`
52	304	markom	`#include "vapi.h"`
53	479	markom	`#include "gdbcomm.h"`
54			`#include "debug_unit.h"`
55	28	lampret	`#include "coff.h"`
56	728	markom	`#include "sched.h"`
57	632	ivang	`#include "profiler.h"`
58			`#include "mprofiler.h"`
59	741	ivang	`#include "mc.h"`
60	876	rherveille	`#include "atahost.h"`
61	632	ivang
62	2	cvs	`/* CVS revision number. */`
63	1050	ivang	`const char rcsrev[] = "$Revision: 1.94 $";`
64	2	cvs
65			`/* History of execution */`
66			`int histexec[HISTEXEC_LEN];`
67
68	7	jrydberg	`char *sim_commands [] = {`
69	361	markom	`"q", "t", "help", "de", "dm", "run", "pr", "pm", "pc",`
70	1050	ivang	`"reset", "break", "breaks", "hist", "stats", "stall" "info",`
71	551	markom	`"r", "dv",`
72			`#if !FAST_SIM`
73			`"set",`
74			`#endif`
75
76	7	jrydberg	`};`
77
78	344	markom	`inline void debug(int level, const char *format, ...)`
79	2	cvs	`{`
80	7	jrydberg	`char *p;`
81			`va_list ap;`
82	2	cvs
83	344	markom	`if (config.sim.debug >= level) {`
84	69	lampret	`if ((p = malloc(1000)) == NULL)`
85			`return;`
86			`va_start(ap, format);`
87			`(void) vsnprintf(p, 1000, format, ap);`
88			`va_end(ap);`
89	997	markom	`PRINTF("%s", p);`
90	69	lampret	`fflush(stdout);`
91			`free(p);`
92			`} else {`
93			`#if DEBUG`
94	7	jrydberg	`if ((p = malloc(1000)) == NULL)`
95			`return;`
96			`va_start(ap, format);`
97			`(void) vsnprintf(p, 1000, format, ap);`
98			`va_end(ap);`
99	997	markom	`PRINTF("%s\n", p);`
100	7	jrydberg	`fflush(stdout);`
101			`free(p);`
102	2	cvs	`#endif`
103	69	lampret	`}`
104	2	cvs	`}`
105
106	304	markom	`void ctrl_c(signum)`
107	7	jrydberg	`int signum;`
108	2	cvs	`{`
109	884	markom	`runtime.sim.cont_run = runtime.cpu.stalled ? 0 : 1;`
110	551	markom	`runtime.sim.iprompt = 1;`
111	479	markom	`set_stall_state (0);`
112	7	jrydberg	`signal(SIGINT, ctrl_c);`
113	2	cvs	`}`
114
115	304	markom	`void version()`
116	2	cvs	`{`
117	997	markom	`PRINTF ("\n");`
118			`PRINTF ("OpenRISC 1000 (OR32) Architectural Simulator, %s\n", rcsrev);`
119			`PRINTF ("Copyright (C) 1999 Damjan Lampret, lampret@opencores.org\n");`
120			`PRINTF ("Copyright (C) 2000 Damjan Lampret, lampret@opencores.org\n");`
121			`PRINTF (" Jimmy Chen-Min Chen, jimmy@ee.nctu.edu.tw\n");`
122			`PRINTF (" Johan Rydberg, johan.rydberg@insight.se\n");`
123			`PRINTF (" Marko Mlinar, markom@opencores.org\n");`
124			`PRINTF ("Copyright (C) 2001 Simon Srot, simons@opencores.org\n");`
125			`PRINTF (" Marko Mlinar, markom@opencores.org\n");`
126			`PRINTF ("Copyright (C) 2002 Marko Mlinar, markom@opencores.org\n");`
127			`PRINTF (" Simon Srot, simons@opencores.org\n");`
128			`PRINTF ("Visit http://www.opencores.org for more information about ");`
129			`PRINTF ("OpenRISC 1000 and\nother open source cores.\n\n");`
130			`PRINTF ("This software comes with ABSOLUTELY NO WARRANTY; for ");`
131			`PRINTF ("details see COPYING.\nThis is free software, and you ");`
132			`PRINTF ("are welcome to redistribute it under certain\nconditions; ");`
133			`PRINTF ("for details see COPYING.\n");`
134	2	cvs	`}`
135
136	7	jrydberg	`void`
137			`help()`
138	2	cvs	`{`
139	997	markom	`PRINTF("q - quit simulator\n");`
140			`PRINTF("r - display all registers\n");`
141			`PRINTF("t - execute next instruction\n");`
142			`PRINTF("run <instructions> [<hush>] - execute <instruction> instructions, no reg dump if hush\n");`
143			`PRINTF("pr <r> <value> - patch register <r> with <value>\n");`
144			`PRINTF("dm <fromaddr> [<toaddr>] - display memory from <fromaddr> to <toaddr>\n");`
145			`PRINTF("de <fromaddr> [<toaddr>] - debug insn memory\n");`
146			`PRINTF("pm <addr> <value> - patch memory location <addr> with <value>\n");`
147			`PRINTF("pc <value> - patch PC register with <value>\n");`
148			`PRINTF("break <addr> - toggle breakpoint at address <addr>\n");`
149	1050	ivang	`PRINTF("breaks - print all set breakpoints\n");`
150	997	markom	`PRINTF("reset - simulator reset\n");`
151			`PRINTF("hist - execution history\n");`
152			`PRINTF("stall - stalls the processor and gives control to the debugger\n");`
153			`PRINTF("stats <num\|clear> - execution statistics num or clear it.\n");`
154			`PRINTF("info - configuration info (caches etc.)\n");`
155			`PRINTF("dv <fromaddr> [<toaddr>] [<modname>] - dumps memory as verilog (use redirect)\n");`
156			`PRINTF("dh <fromaddr> [<toaddr>] - dumps memory as hex code (use redirect)\n");`
157			`PRINTF("<cmd> > <filename> - redirect simulator stdout to <filename> (and not emulated PRINTF)\n");`
158	551	markom	`#if !FAST_SIM`
159	997	markom	`PRINTF("set <section> <item> = <param> - set configuration. See sim.cfg for more information.\n");`
160			`PRINTF("debug - toggles simulator debug mode\n");`
161	868	markom	`mp_help ();`
162			`prof_help ();`
163	997	markom	`PRINTF("cuc - enters Custom Unit Compiler command prompt\n");`
164	551	markom	`#endif`
165	997	markom	`PRINTF("help - available commands (this list)\n");`
166	2	cvs	`}`
167
168	479	markom	`void debugmem (unsigned long from, unsigned long to );`
169	21	cmchen
170	479	markom	`/* Resets all subunits */`
171			`void sim_reset ()`
172			`{`
173	728	markom	`SCHED_INIT();`
174	479	markom	`uart_reset();`
175			`dma_reset();`
176			`eth_reset();`
177			`gpio_reset();`
178	645	markom	`vga_reset ();`
179			`fb_reset ();`
180	664	markom	`kbd_reset ();`
181	876	rherveille	`ata_reset();`
182	479	markom	`tick_reset();`
183			`pm_reset();`
184			`pic_reset();`
185			`mc_reset();`
186			`du_reset ();`
187	557	markom	`cpu_reset();`
188	479	markom	`}`
189
190	304	markom	`/* Initalizes all devices and sim */`
191			`void sim_init ()`
192	2	cvs	`{`
193	424	markom	`init_memory_table ();`
194	269	markom	`init_labels();`
195			`init_breakpoints();`
196	361	markom	`initstats();`
197			`build_automata();`
198
199	305	markom	`if (config.sim.profile) {`
200	361	markom	`runtime.sim.fprof = fopen(config.sim.prof_fn, "wt+");`
201			`if(!runtime.sim.fprof) {`
202	551	markom	`fprintf(stderr, "ERROR: Problems opening profile file.\n");`
203			`exit (1);`
204	173	markom	`} else`
205	897	markom	`fprintf(runtime.sim.fprof, "+00000000 FFFFFFFF FFFFFFFF [outside_functions]\n");`
206	173	markom	`}`
207	294	markom
208	547	markom	`if (config.sim.mprofile) {`
209			`runtime.sim.fmprof = fopen(config.sim.mprof_fn, "wb+");`
210			`if(!runtime.sim.fmprof) {`
211	551	markom	`fprintf(stderr, "ERROR: Problems opening memory profile file.\n");`
212			`exit (1);`
213	547	markom	`}`
214			`}`
215
216	294	markom	`if (config.sim.exe_log) {`
217	361	markom	`runtime.sim.fexe_log = fopen(config.sim.exe_log_fn, "wt+");`
218			`if(!runtime.sim.fexe_log) {`
219	997	markom	`PRINTF("ERROR: Problems opening exe_log file.\n");`
220	551	markom	`exit (1);`
221	294	markom	`}`
222			`}`
223	263	markom
224	624	ivang	`if (config.sim.spr_log) {`
225	997	markom	`PRINTF("OPENING SPRLOG\n");`
226	624	ivang	`runtime.sim.fspr_log = fopen(config.sim.spr_log_fn, "wt+");`
227			`if (!runtime.sim.fspr_log) {`
228	997	markom	`PRINTF("ERROR: Problems opening spr_log file.\n");`
229	624	ivang	`exit(1);`
230			`}`
231			`}`
232
233	262	markom	`/* Initialize memory */`
234			`{`
235	361	markom	`extern struct dev_memarea *dev_list;`
236	554	markom	`struct dev_memarea *area;`
237	361	markom	`int i;`
238			`if (config.memory.type == MT_RANDOM) {`
239			`unsigned int val = 0;`
240	123	markom
241	262	markom	`if (config.memory.random_seed == -1) {`
242	551	markom	`runtime.memory.random_seed = time(NULL);`
243	262	markom	`/* Print out the seed just in case we ever need to debug */`
244	997	markom	`PRINTF("Seeding random generator with value %d\n", config.memory.random_seed);`
245	551	markom	`} else`
246			`runtime.memory.random_seed = config.memory.random_seed;`
247			`srandom(runtime.memory.random_seed);`
248	262	markom
249	554	markom	`for (area = dev_list; area; area = area->next)`
250			`for(i = 0; i < area->size; i++) {`
251	221	markom	`val = random();`
252	554	markom	`setsim_mem8(i + area->addr_compare, val & 0xFF);`
253	221	markom	`}`
254	262	markom	`} else if(config.memory.type == MT_PATTERN) {`
255	554	markom	`for (area = dev_list; area; area = area->next)`
256			`for(i = 0; i < area->size; i++)`
257			`setsim_mem8(i + area->addr_compare, config.memory.pattern);`
258	269	markom	`} else if (config.memory.type != MT_UNKNOWN) {`
259	262	markom	`fprintf(stderr, "Invalid memory configuration type.\n");`
260	361	markom	`exit(1);`
261	221	markom	`}`
262	242	markom	`}`
263	262	markom
264	361	markom	`if(runtime.sim.filename) {`
265			`unsigned long endaddr = 0xFFFFFFFF;`
266			`endaddr = loadcode(runtime.sim.filename, 0, 0); /* MM170901 always load at address zero. */`
267			`if (endaddr == -1) {`
268			`fprintf(stderr, "Problems loading boot code.\n");`
269			`exit(1);`
270			`}`
271			`}`
272	551	markom
273			`#if !FAST_SIM /* We assume we have valid configuration with fsim*/`
274	361	markom	`/* Disable gdb debugging, if debug module is not available. */`
275			`if (config.debug.gdb_enabled && !config.debug.enabled) {`
276			`config.debug.gdb_enabled = 0;`
277			`if (config.sim.verbose)`
278			`fprintf (stderr, "WARNING: Debug module not enabled, cannot start gdb.\n");`
279			`}`
280	551	markom	`#endif`
281
282	550	markom	`if (config.debug.gdb_enabled)`
283	479	markom	`gdbcomm_init ();`
284	551	markom
285			`#if !FAST_SIM /* We assume we have valid configuration with fsim*/`
286	361	markom	`/* Enable dependency stats, if we want to do history analisis */`
287	394	markom	`if (config.sim.history && !config.cpu.dependstats) {`
288			`config.cpu.dependstats = 1;`
289	361	markom	`if (config.sim.verbose)`
290	394	markom	`fprintf (stderr, "WARNING: dependstats stats must be enabled to do history analisis.\n");`
291	361	markom	`}`
292	551	markom	`#endif`
293
294			`#if !FAST_SIM /* We assume we have valid configuration with fsim*/`
295	361	markom	`/* Debug forces verbose */`
296			`if (config.sim.debug && !config.sim.verbose) {`
297			`config.sim.verbose = 1;`
298			`fprintf (stderr, "WARNING: verbose turned on.\n");`
299			`}`
300	551	markom	`#endif`
301	361	markom
302			`/* Start VAPI before device initialization. */`
303			`if (config.vapi.enabled) {`
304	551	markom	`runtime.vapi.enabled = 1;`
305	361	markom	`vapi_init ();`
306			`if (config.sim.verbose)`
307	997	markom	`PRINTF ("VAPI started, waiting for clients.\n");`
308	361	markom	`}`
309	538	markom
310	479	markom	`sim_reset ();`
311	424	markom
312	543	simons	`lock_memory_table ();`
313
314	361	markom	`/* Wait till all test are connected. */`
315	551	markom	`if (runtime.vapi.enabled) {`
316	361	markom	`int numu = vapi_num_unconnected (0);`
317			`if (numu) {`
318	997	markom	`PRINTF ("\nWaiting for VAPI tests with ids:\n");`
319	361	markom	`vapi_num_unconnected (1);`
320	997	markom	`PRINTF ("\n");`
321	361	markom	`while (numu = vapi_num_unconnected (0)) {`
322			`vapi_check ();`
323	997	markom	`PRINTF ("\rStill waiting for %i VAPI test(s) to connect. ", numu);`
324	361	markom	`usleep (100);`
325			`}`
326	997	markom	`PRINTF ("\n");`
327	361	markom	`}`
328	997	markom	`PRINTF ("All devices connected \n");`
329	361	markom	`}`
330			`/* simulator is initialized */`
331			`runtime.sim.init = 0;`
332	304	markom	`}`
333	7	jrydberg
334	304	markom	`/* Display info about various modules */`
335			`void sim_info () {`
336	427	markom	`sprs_status();`
337	997	markom	`PRINTF ("\n");`
338	427	markom	`memory_table_status ();`
339	535	markom	`if (config.immu.enabled) itlb_status(-1);`
340			`if (config.dmmu.enabled) dtlb_status(-1);`
341			`if (config.ic.enabled) ic_info();`
342			`if (config.dc.enabled) dc_info();`
343	361	markom
344	541	markom	`if (config.bpb.enabled) bpb_info();`
345			`if (config.bpb.btic) btic_info();`
346	535	markom
347	741	ivang	`if (config.mc.enabled) mc_status();`
348	549	markom	`if (config.nuarts) uart_status();`
349			`if (config.ndmas) dma_status();`
350			`if (config.nethernets) eth_status();`
351			`if (config.ngpios) gpio_status();`
352	876	rherveille	`if (config.natas) ata_status();`
353	683	lampret	`kbd_info();`
354	304	markom	`}`
355
356			`/* Cleanup */`
357			`void sim_done ()`
358			`{`
359			`if (config.sim.profile) {`
360	884	markom	`fprintf(runtime.sim.fprof,"-%08X FFFFFFFF\n", runtime.sim.cycles);`
361	361	markom	`fclose(runtime.sim.fprof);`
362	304	markom	`}`
363	547	markom
364	847	markom	`if (config.sim.mprofile) fclose(runtime.sim.fmprof);`
365	361	markom	`if (config.sim.exe_log) fclose(runtime.sim.fexe_log);`
366	551	markom	`if (runtime.vapi.enabled) vapi_done ();`
367	426	markom	`done_memory_table ();`
368	304	markom	`exit(0);`
369			`}`
370
371	728	markom	`/* Executes jobs in time queue */`
372			`static inline void do_scheduler ()`
373			`{`
374			`void (*func)(int);`
375			`int param;`
376	632	ivang
377	728	markom	`/* Execute all jobs till now */`
378			`do {`
379			`func = SCHED_PEEK().func;`
380			`param = SCHED_PEEK().param;`
381			`SCHED_REMOVE();`
382			`func (param);`
383	884	markom	`} while (runtime.sim.cycles >= SCHED_PEEK().time);`
384	728	markom	`}`
385	632	ivang
386	728	markom	`/* Main function */`
387	304	markom	`int main(argc, argv)`
388			`int argc;`
389			`char *argv[];`
390			`{`
391	361	markom	`char *linestr;`
392			`char item1[500], b2[500], prev_str[500] = "";`
393			`char *redirstr;`
394			`int hush = 0;`
395			`int first_prompt = 1;`
396	304	markom
397	361	markom	`srand(getpid());`
398			`init_defconfig();`
399			`if (parse_args(argc, argv)) {`
400	997	markom	`PRINTF("Usage: %s [options] <filename>\n", argv[0]);`
401			`PRINTF("Options:\n");`
402			`PRINTF(" -v version and copyright note\n");`
403			`PRINTF(" -i enable interactive command prompt\n");`
404			`PRINTF(" --nosrv do not launch JTAG proxy server\n"); /* (CZ) */`
405			`PRINTF(" --srv <n> launch JTAG proxy server on port <n>; [random]\n"); /* (CZ) */`
406	551	markom	`#if !FAST_SIM`
407	997	markom	`PRINTF(" -f or --file load script file [sim.cfg]\n");`
408			`PRINTF(" --enable-profile enable profiling.\n");`
409			`PRINTF(" --enable-mprofile enable memory profiling.\n");`
410	551	markom	`#endif`
411	997	markom	`PRINTF(" --output-cfg prints C structure of current\n");`
412			`PRINTF(" configuration to standard output\n");`
413			`PRINTF("\nor : %s ", argv[0]);`
414	847	markom	`mp_help ();`
415	997	markom	`PRINTF("\nor : %s ", argv[0]);`
416	847	markom	`prof_help ();`
417	361	markom	`exit(-1);`
418			`}`
419	304	markom
420			`#ifdef HAVE_LIBREADLINE`
421	361	markom	`initialize_readline (); /* Bind our completer. */`
422	304	markom	`#endif`
423
424	551	markom	`#if !FAST_SIM`
425	304	markom	`/* Read configuration file. */`
426	361	markom	`if (!runtime.sim.script_file_specified)`
427			`read_script_file ("sim.cfg");`
428	883	markom
429			`/* Overide parameters with command line ones */`
430			`if (runtime.simcmd.profile) config.sim.profile = 1;`
431			`if (runtime.simcmd.mprofile) config.sim.mprofile = 1;`
432
433	424	markom	`if (!runtime.sim.script_file_specified && config.sim.verbose)`
434			`fprintf (stderr, "WARNING: No config file read, assuming default configuration.\n");`
435	551	markom	`#else`
436	997	markom	`PRINTF ("\n\tNOTE: running fast sim with fixed configuration!\n\n");`
437	551	markom	`#endif`
438	549	markom	`if (runtime.sim.output_cfg) {`
439			`output_cfg (stdout);`
440			`exit (0);`
441			`}`
442	304	markom	`print_config();`
443	336	markom	`sim_init ();`
444	304	markom	`signal(SIGINT, ctrl_c);`
445	335	markom
446	361	markom	`while(1) {`
447	551	markom	`if (runtime.sim.iprompt) {`
448	550	markom	`if (config.debug.gdb_enabled)`
449	361	markom	`{`
450	997	markom	`PRINTF ("(sim) ");`
451	361	markom	`fflush(stdout);`
452			`HandleServerSocket(true); /* block & check_stdin = true */`
453			`}`
454	16	jrydberg	`#ifdef HAVE_LIBREADLINE`
455	361	markom	`/* Must disable readline in new mode. It isn't compatible`
456			`with non blocking environments */`
457	550	markom	`if(!config.debug.gdb_enabled)`
458	361	markom	`linestr = readline("(sim) ");`
459			`else`
460			`linestr = fgets(b2, sizeof b2, stdin);`
461	16	jrydberg	`#else`
462	550	markom	`if(!config.debug.gdb_enabled)`
463	997	markom	`PRINTF ("(sim) ");`
464	361	markom	`linestr = fgets(b2, sizeof b2, stdin);`
465	16	jrydberg	`#endif`
466	361	markom	`} else`
467			`strcpy(linestr = b2, "run -1 hush");`
468	7	jrydberg
469	361	markom	`if (!linestr)`
470			`break;`
471			`linestr = stripwhite (linestr);`
472	7	jrydberg
473	16	jrydberg	`#ifdef HAVE_LIBREADLINE`
474	361	markom	`/* Readline only works in the old mode */`
475			`if(!server_fd)`
476			`{`
477			`if (strlen(linestr) == 0) {`
478			`char *l = repeat_last_command ();`
479
480			`if (l) {`
481			`free (linestr);`
482			`linestr = l;`
483			`}`
484			`}`
485
486			`if (*linestr) {`
487			`add_history (linestr);`
488			`}`
489			`}`
490	16	jrydberg	`#endif /* HAVE_LIBREADLINE */`
491	361	markom
492			`if (redirstr = strstr(linestr, ">")) {`
493			`*redirstr = '\0';`
494			`strtoken(&redirstr[1], item1, 1);`
495	997	markom	`runtime.sim.fout = fopen(item1, "w+");`
496			`if (!runtime.sim.fout) runtime.sim.fout = stdout;`
497	361	markom	`}`
498
499			`if (linestr[0] == '\n')`
500			`strcpy (linestr, &prev_str[0]);`

Browse

Tools

Subversion Repositories or1k

[/] [or1k/] [tags/] [nog_patch_68/] [or1ksim/] [toplevel.c] - Blame information for rev 1050