Subversion Repositories or1k

/* config.c -- Simulator configuration

   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 configuration. Eventually this one will be a lot bigger. */

#include <stdlib.h>

#include "sim-config.h"

#include "abstract.h"

#include "spr_defs.h"

#include "pic.h"

struct config config;

void init_defconfig()

{

  unsigned long val;

  memset(&config, 0, sizeof(config));

  config.dc.tagtype = NONE/*VIRTUAL*/;

  config.ic.tagtype = NONE/*VIRTUAL*/;

  config.bp.bpb_sim = 1;

  config.bp.btic_sim = 1;

  config.clkcycle_ns = 4; /* 4 for 4ns (250MHz) */

  config.uarts[0].rxfile = "/tmp/uart0.rx";

  config.uarts[0].txfile = "/tmp/uart0.tx";

  config.uarts[0].baseaddr = 0x80000000;

  config.uarts[0].jitter = -1; /* Async behavior */

  config.dmas[0].baseaddr = 0x90000000;

  config.dmas[0].irq = INT_DMA;

  config.simdebug = 0;

  config.profile = 0;

  config.iprompt = 0;

  config.dependstats = 1;

  config.dependency = 1;

  config.history = 1;

  config.superscalar = 1;

  config.slp = 1;

  config.profile = 0;

  strcpy(config.mc.memory_table_file, "sim.mem");

  mtspr(SPR_VR, SPR_VR_VER & 0x1200);

  val = SPR_UPR_UP | SPR_UPR_DCP | SPR_UPR_ICP | SPR_UPR_DMP |

  SPR_UPR_IMP | SPR_UPR_OB32P | SPR_UPR_DUP | SPR_UPR_PICP |

  SPR_UPR_PMP | SPR_UPR_TTP;

  mtspr(SPR_UPR, val);

}

int parse_args(int argc, char *argv[])

{

  unsigned long val;

  argv++; argc--;

  while (argc) {

    if (argc && (*argv[0] != '-')) {

      config.filename = argv[0];

      argc--;

      argv++;

    } else

    if (strcmp(*argv, "-initmem") == 0) {  /* (CZ) */

      char *pattern,*s;

      if(!--argc)

        return 1;

      pattern = *(++argv);

      if(!strcmp(pattern,"random"))

        config.random_mem = 1;

      else

        {

          val = strtol(pattern,&s,0);

          if(*s)

            return 1;

          config.pattern_mem = val;

        }

    } else

    if (strcmp(*argv, "-nosrv") == 0) {  /* (CZ) */

      config.inhibit_server = 1;

      argv++; argc--;

    } else

    if (strcmp(*argv, "-srv") == 0) {  /* (CZ) */

      char *s;

      if(!--argc)

        return 1;

      config.server_port = strtol(*(++argv),&s,10);

      if(*s)

        return 1;

      argv++; argc--;

    } else

    if (strcmp(*argv, "-i") == 0) {

      config.iprompt = 1;

      argv++; argc--;

    } else

    if (strcmp(*argv, "-v") == 0) {

      version();

      exit(0);

    } else

    if (strcmp(*argv, "-bpb") == 0) {

      config.bp.bpb_sim = 0;

      argv++; argc--;

    } else

    if (strcmp(*argv, "-hazards") == 0) {

      config.dependstats = 0;

      config.dependency = 0;

      argv++; argc--;

    } else

    if (strcmp(*argv, "-history") == 0) {

      config.history = 0;

      argv++; argc--;

    } else

    if (strcmp(*argv, "-superscalar") == 0) {

      config.superscalar = 0;

      argv++; argc--;

    } else

    if (strcmp(*argv, "-fast") == 0) {

      config.superscalar = 0;

      config.history = 0;

      config.dependstats = 0;

      config.dependency = 0;

      config.bp.bpb_sim = 0;

      config.bp.btic_sim = 0;

      config.slp = 0;

      argv++; argc--;

    } else

    if (strcmp(*argv, "-btic") == 0) {

      config.bp.btic_sim = 0;

      argv++; argc--;

    } else

    if (strcmp(*argv, "-upr") == 0) {

      argv++; argc--;

      val = strtoul(*argv, NULL, 0);

      mtspr(SPR_UPR, val);

      argv++; argc--;

    } else

    if (strcmp(*argv, "-ver") == 0) {

      argv++; argc--;

      val = strtoul(*argv, NULL, 0);

      setsprbits(SPR_VR, SPR_VR_VER, val);

      argv++; argc--;

    } else

    if (strcmp(*argv, "-rev") == 0) {

      argv++; argc--;

      val = strtoul(*argv, NULL, 0);

      setsprbits(SPR_VR, SPR_VR_REV, val);

      argv++; argc--;

    } else

    if (strcmp(*argv, "-profile") == 0) {

      config.profile = 1;

      argv++; argc--;

    } else {

      printf("Unknown option: %s\n", *argv);

      return 1;

    }

  }

  if (!argc)

    return 0;

  return 0;

}

void print_config()

{

  printf("Machine initialization...\n");

  if (testsprbits(SPR_UPR, SPR_UPR_DCP))

    printf("Data cache tag: %s\n", config.dc.tagtype == VIRTUAL ? "virtual" : "physical");

  else

    printf("No data cache.\n");

  if (testsprbits(SPR_UPR, SPR_UPR_ICP))

    printf("Insn cache tag: %s\n", config.ic.tagtype == VIRTUAL ? "virtual" : "physical");

  else

    printf("No instruction cache.\n");

  if (config.bp.bpb_sim)

    printf("BPB simulation on.\n");

  else

    printf("BPB simulation off.\n");

  if (config.bp.btic_sim)

    printf("BTIC simulation on.\n");

  else

    printf("BTIC simulation off.\n");

  printf("Clock cycle: %d ns\n", config.clkcycle_ns);

  /*printf("RAM: 0x%x to 0x%x (%d KB)\n\n", config.ram.startaddr, config.ram.endaddr);

    (config.ram.endaddr - config.ram.startaddr) / 1024); MM170901 different memory scheme.  */

  if (config.simdebug)

    printf("simdebug on, ");

  else

    printf("simdebug off, ");

  if (config.iprompt)

    printf("interactive prompt on\n");

  else

    printf("interactive prompt off\n");

}

char memory_file[256] = "sim.mem";

char *sections[] = {

  "",

  "mc"

};

/* Parameter definitions */

struct config_params {

  int section;

  char *name;

  char *type;

  void *addr;

} config_params[] = {

  {1, "memory_table_file", "%255s", (void *)(&config.mc.memory_table_file[0])},

  {1, "enable",            "%i",    (void *)(&config.mc.enable)},

  {1, "POC",               "%i",    (void *)(&config.mc.POC)}

};

/* Read environment from a script file. Does not fail - assumes defaukt configuration instead.

   The syntax of script file is:

   param = value

   section x

     data

     param = value

   end

   Example:

   section mc

     memory_table_file = sim.mem

     enable = 1

     POC = 0x47892344

   end

 */

void read_script_file (char *filename)

{

        FILE *f;

        unsigned long memory_needed = 0;

        char *home = getenv("HOME");

        char ctmp[STR_SIZE];

        int local = 1;

        int section = 0;

        sprintf(ctmp, "%s/.or1k/%s", home, filename);

        if ((f = fopen (filename, "rt")) != NULL

                        || home != NULL && !(local = 0) && (f = fopen (ctmp, "rt")) != NULL) {

                unsigned long start, length;

                char type[STR_SIZE];

                int nparam;

                int rd, wd;

                printf ("Reading script file from '%s':\n", local ? filename : ctmp);

    while (!feof(f)) {

      char param[STR_SIZE];

      if (fscanf(f, "%s ", &param) != 1) break;

      /* Is this a sections? */

      if (strcmp (param, "section") == 0) {

        int i;

        section = 0;

        if (fscanf (f, "%s\n", &param) != 1) {

          fprintf (stderr, "%s: ERROR: Section name required.\n", local ? filename : ctmp);

          exit (-1);

        }

        for (i = 1; i < sizeof(sections) / sizeof(char *); i++)

          if (strcmp (sections[i], param) == 0) {

            section = i;

            break;

          }

        if (!section) {

          fprintf (stderr, "%s: WARNING: Unknown section: %s; ignoring.\n", local ? filename : ctmp, param);

          /* just skip section */

          while (fscanf (f, "%s\n", &param) != 1 && strcmp (param, "end"));

        }

      } else if (strcmp (param, "end") == 0) {

        section = 0;

      } else {

        int i, found = -1;

        for (i = 0; i < sizeof(config_params)/sizeof(struct config_params); i++)

          if (config_params[i].section == section && strcmp (config_params[i].name, param) == 0) {

            found = i;

            break;

          }

        if (found < 0) {

          fprintf (stderr, "%s: WARNING: Invalid parameter: %s; ignoring.\n", local ? filename : ctmp, param);

          fscanf (f, "%s\n", &param);

          continue;

        }

        /* Parse parameter value */

        {

          char fmt[8];

          sprintf (fmt, "= %s\n", config_params[found].type);

          fscanf (f, fmt, config_params[found].addr);

        }

      }

    }

                fclose (f);

                printf ("\n");

        } else {

                fprintf (stderr, "Cannot read script file from '%s',\nneither '%s'; assuming standard configuration.\n", filename, ctmp);

        }

        /* Initialize memory table.  */

        sim_read_memory_table (config.mc.memory_table_file);

}