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

Subversion Repositories or1k

[/] [or1k/] [tags/] [nog_patch_67/] [or1ksim/] [sim-config.c] - Blame information for rev 1367

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

Line No. Rev Author Line
1 1358 nogj 
/* sim-config.c -- Simulator configuration
2 645 markom 
   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 configuration. Eventually this one will be a lot bigger. */
21 
 
22 
#include <stdlib.h>
23 805 markom 
#include <limits.h>
24 1308 phoenix 
#include <string.h>
25 
#include <ctype.h>
26 
 
27 1350 nogj 
#include "config.h"
28 
 
29 
#ifdef HAVE_INTTYPES_H
30 
#include <inttypes.h>
31 
#endif
32 
 
33 
#include "port.h"
34 
#include "arch.h"
35 645 markom 
#include "sim-config.h"
36 
#include "abstract.h"
37 
#include "sprs.h"
38 
#include "spr_defs.h"
39 
#include "pic.h"
40 1344 nogj 
#include "opcode/or32.h"
41 645 markom 
#include "stats.h"
42 
#include "icache_model.h"
43 
#include "dcache_model.h"
44 
 
45 
#include "profiler.h"
46 
#include "mprofiler.h"
47 897 markom 
#include "cuc.h"
48 645 markom 
 
49 1358 nogj 
#include "debug.h"
50 
 
51 
#define WARNING(s) fprintf (stderr, "WARNING: config.%s: %s\n", cur_section->name, (s))
52 645 markom 
#define MERROR(s) {fprintf (stderr, "ERROR: %s\n", s); if (runtime.sim.init) exit (1);}
53 
 
54 
#if !FAST_SIM
55 
struct config config;
56 
#endif
57 
struct runtime runtime;
58 
 
59 1358 nogj 
struct config_section *cur_section;
60 645 markom 
 
61 1358 nogj 
struct config_section *sections = NULL;
62 
 
63 645 markom 
void init_defconfig()
64 
{
65 
  int i;
66 
 
67 
#if !FAST_SIM
68 
  memset(&config, 0, sizeof(config));
69 
  /* Sim */
70 
  config.sim.exe_log = 0;
71 672 markom 
  config.sim.exe_log_type = EXE_LOG_HARDWARE;
72 
  config.sim.exe_log_start = 0;
73 
  config.sim.exe_log_end = 0;
74 
  config.sim.exe_log_marker = 0;
75 645 markom 
  config.sim.spr_log = 0;
76 
  strcpy (config.sim.exe_log_fn, "executed.log");
77 
  strcpy (config.sim.spr_log_fn, "spr.log");
78 1098 markom 
  config.sim.profile = 0;
79 
  config.sim.mprofile = 0;
80 645 markom 
 
81 
  config.sim.debug = 0;
82 
  config.sim.verbose = 1;
83 
 
84 
  strcpy (config.sim.prof_fn, "sim.profile");
85 
  strcpy (config.sim.mprof_fn, "sim.mprofile");
86 823 ivang 
  strcpy (config.sim.fstdout, "stdout.txt");
87 645 markom 
  strcpy (runtime.sim.script_fn, "(default)");
88 
  config.sim.clkcycle_ps = 4000; /* 4000 for 4ns (250MHz) */
89 805 markom 
  if (config.sim.clkcycle_ps) config.sim.system_kfreq = (long)((1000000000.0 / (double)config.sim.clkcycle_ps));
90 
  else config.sim.system_kfreq = INT_MAX;
91 
  if (config.sim.system_kfreq <= 0) config.sim.system_kfreq = 1;
92 645 markom 
 
93 
  /* Memory */
94 
  config.memory.type = MT_UNKNOWN;
95 
  config.memory.pattern = 0;
96 
  config.memory.random_seed = -1;  /* Generate new seed */
97 
  for (i = 0; i < MAX_MEMORIES; i++)
98 
    config.memory.table[i].ce = -1;     /* memory is disabled by default */
99 
 
100 
  /* IMMU & DMMU*/
101 
  config.immu.enabled = 0;
102 856 markom 
  config.immu.hitdelay = 1;
103 
  config.immu.missdelay = 1;
104 645 markom 
  config.dmmu.enabled = 0;
105 856 markom 
  config.dmmu.hitdelay = 1;
106 
  config.dmmu.missdelay = 1;
107 645 markom 
 
108 
  /* IC & DC */
109 
  config.ic.enabled = 0;
110 856 markom 
  config.ic.hitdelay = 1;
111 
  config.ic.missdelay = 1;
112 645 markom 
  config.ic.nways = 0;
113 
  config.ic.nsets = 0;
114 
  config.ic.ustates = 0;
115 
  config.dc.enabled = 0;
116 856 markom 
  config.dc.load_hitdelay = 2;
117 
  config.dc.load_missdelay = 2;
118 645 markom 
  config.dc.nways = 0;
119 
  config.dc.nsets = 0;
120 
  config.dc.ustates = 0;
121 
  config.dc.store_hitdelay = 0;
122 
  config.dc.store_missdelay = 0;
123 876 rherveille 
 
124 645 markom 
  /* Memory Controller */
125 
  config.mc.enabled = 0;
126 
 
127 
  /* DMAs */
128 
  config.ndmas = 0;
129 
 
130 
  /* VGAs */
131 
  config.nvgas = 0;
132 
 
133 
  /* Frame buffer */
134 
  config.fb.enabled = 0;
135 
 
136 
  /* CPU */
137 
  config.cpu.superscalar = 0;
138 
  config.sim.history = 0;
139 
  config.cpu.hazards = 0;
140 
  config.cpu.dependstats = 0;
141 
  config.cpu.sbuf_len = 0;
142 
  config.cpu.upr = SPR_UPR_UP | SPR_UPR_DCP | SPR_UPR_ICP | SPR_UPR_DMP
143 
                 | SPR_UPR_IMP | SPR_UPR_OB32P | SPR_UPR_DUP | SPR_UPR_PICP
144 
                 | SPR_UPR_PMP | SPR_UPR_TTP;
145 912 lampret 
  config.cpu.sr = 0x00008001;
146 645 markom 
 
147 
  /* Debug */
148 
  config.debug.enabled = 0;
149 
  config.debug.gdb_enabled = 0;
150 
  config.debug.server_port = 0;
151 
 
152 
  /* VAPI */
153 
  config.vapi.enabled = 0;
154 
  strcpy (config.vapi.vapi_fn, "vapi.log");
155 
 
156 
  /* Ethernet */
157 
  config.nethernets = 0;
158 
 
159 
  /* GPIO */
160 
  config.ngpios = 0;
161 
 
162 
  /* PM */
163 
  config.pm.enabled = 0;
164 897 markom 
 
165 
  /* CUC */
166 
  strcpy (config.cuc.timings_fn, "virtex.tim");
167 
  config.cuc.memory_order = MO_STRONG;
168 
  config.cuc.calling_convention = 1;
169 
  config.cuc.enable_bursts = 1;
170 
  config.cuc.no_multicycle = 1;
171 970 simons 
 
172 645 markom 
#endif
173 
 
174 
  /* Configure runtime */
175 
  memset(&runtime, 0, sizeof(runtime));
176 
 
177 
  /* Sim */
178 
  runtime.sim.fexe_log = NULL;
179 
  runtime.sim.fspr_log = NULL;
180 
  runtime.sim.iprompt = 0;
181 
  runtime.sim.fprof = NULL;
182 
  runtime.sim.fmprof = NULL;
183 
  runtime.sim.init = 1;
184 998 markom 
  runtime.sim.fout = stdout;
185 645 markom 
  runtime.sim.script_file_specified = 0;
186 883 markom 
  runtime.simcmd.profile = 0;
187 
  runtime.simcmd.mprofile = 0;
188 645 markom 
 
189 
  /* VAPI */
190 
  runtime.vapi.vapi_file = NULL;
191 
  runtime.vapi.enabled = 0;
192 
}
193 
 
194 
int parse_args(int argc, char *argv[])
195 
{
196 
  argv++; argc--;
197 
  while (argc) {
198 847 markom 
    if (strcmp(*argv, "profiler") == 0) {
199 
      exit (main_profiler (argc, argv));
200 
    } else
201 
    if (strcmp(*argv, "mprofiler") == 0) {
202 
      exit (main_mprofiler (argc, argv));
203 
    } else
204 
    if (*argv[0] != '-') {
205 645 markom 
      runtime.sim.filename = argv[0];
206 
      argc--;
207 
      argv++;
208 
    } else
209 
#if !FAST_SIM /* Constant cfg */
210 
    if (strcmp(*argv, "-f") == 0 || strcmp(*argv, "--file") == 0) {
211 
      argv++; argc--;
212 
      if (argv[0]) {
213 
        read_script_file(argv[0]);
214 
        argv++; argc--;
215 
      } else {
216 
        fprintf(stderr, "Configure filename not specified!\n");
217 
        return 1;
218 
      }
219 
    } else
220 
#endif
221 
    if (strcmp(*argv, "--nosrv") == 0) {  /* (CZ) */
222 
      config.debug.gdb_enabled = 0;
223 
      argv++; argc--;
224 
    } else
225 
    if (strcmp(*argv, "--srv") == 0) {  /* (CZ) */
226 
      char *s;
227 
      if(!--argc)
228 
        return 1;
229 
      config.debug.enabled = 1;
230 1205 phoenix 
      config.debug.gdb_enabled = 1;
231 645 markom 
      config.debug.server_port = strtol(*(++argv),&s,10);
232 
      if(*s)
233 
        return 1;
234 
      argv++; argc--;
235 
    } else
236 
    if (strcmp(*argv, "-i") == 0) {
237 
      runtime.sim.iprompt = 1;
238 
      argv++; argc--;
239 
    } else
240 
    if (strcmp(*argv, "-v") == 0) {
241 
      version();
242 
      exit(0);
243 
    } else
244 
#if !FAST_SIM
245 883 markom 
    if (strcmp(*argv, "--enable-profile") == 0) {
246 
      runtime.simcmd.profile = 1;
247 645 markom 
      argv++; argc--;
248 
    } else
249 883 markom 
    if (strcmp(*argv, "--enable-mprofile") == 0) {
250 
      runtime.simcmd.mprofile = 1;
251 645 markom 
      argv++; argc--;
252 
    } else
253 
#endif
254 
    if (strcmp(*argv, "--output-cfg") == 0) {
255 
      runtime.sim.output_cfg = 1;
256 
      argv++; argc--;
257 
    } else {
258 
      fprintf(stderr, "Unknown option: %s\n", *argv);
259 
      return 1;
260 
    }
261 
  }
262 
 
263 
  if (!argc)
264 
    return 0;
265 
 
266 
  return 0;
267 
}
268 
 
269 
void print_config()
270 
{
271 
  if (config.sim.verbose) {
272 
    char temp[20];
273 997 markom 
    PRINTF("Verbose on, ");
274 645 markom 
    if (config.sim.debug)
275 997 markom 
      PRINTF("simdebug on, ");
276 645 markom 
    else
277 997 markom 
      PRINTF("simdebug off, ");
278 645 markom 
    if (runtime.sim.iprompt)
279 997 markom 
      PRINTF("interactive prompt on\n");
280 645 markom 
    else
281 997 markom 
      PRINTF("interactive prompt off\n");
282 645 markom 
 
283 997 markom 
    PRINTF("Machine initialization...\n");
284 645 markom 
    generate_time_pretty (temp, config.sim.clkcycle_ps);
285 997 markom 
    PRINTF("Clock cycle: %s\n", temp);
286 645 markom 
    if (testsprbits(SPR_UPR, SPR_UPR_DCP))
287 997 markom 
      PRINTF("Data cache present.\n");
288 645 markom 
    else
289 997 markom 
      PRINTF("No data cache.\n");
290 645 markom 
    if (testsprbits(SPR_UPR, SPR_UPR_ICP))
291 997 markom 
      PRINTF("Insn cache tag present.\n");
292 645 markom 
    else
293 997 markom 
      PRINTF("No instruction cache.\n");
294 645 markom 
    if (config.bpb.enabled)
295 997 markom 
      PRINTF("BPB simulation on.\n");
296 645 markom 
    else
297 997 markom 
      PRINTF("BPB simulation off.\n");
298 645 markom 
    if (config.bpb.btic)
299 997 markom 
      PRINTF("BTIC simulation on.\n");
300 645 markom 
    else
301 997 markom 
      PRINTF("BTIC simulation off.\n");
302 645 markom 
  }
303 
}
304 
 
305 
#if !FAST_SIM
306 1358 nogj 
struct config_param {
307 
  char *name;
308 
  enum param_t type;
309 
  void (*func)(union param_val, void *dat);
310 
  struct config_param *next;
311 645 markom 
};
312 
 
313 1358 nogj 
/* FIXME: These will be removed */
314 
int current_device = -1;
315 
void change_device (union param_val val, void *dat) {
316 
  current_device = val.int_val;
317 
}
318 645 markom 
 
319 1358 nogj 
void end_device (union param_val val, void *dat) {
320 
  current_device = -1;
321 
}
322 645 markom 
 
323 1358 nogj 
void base_include (union param_val val, void *dat) {
324 
  read_script_file (val.str_val);
325 
  cur_section = NULL;
326 
}
327 645 markom 
 
328 1358 nogj 
/*----------------------------------------------[ Simulator configuration ]---*/
329 
void sim_debug (union param_val val, void *dat) {
330 
  config.sim.debug = val.int_val;
331 
}
332 645 markom 
 
333 1358 nogj 
void sim_verbose (union param_val val, void *dat) {
334 
  config.sim.verbose = val.int_val;
335 
}
336 645 markom 
 
337 1358 nogj 
void sim_profile (union param_val val, void *dat) {
338 
  config.sim.profile = val.int_val;
339 
}
340 645 markom 
 
341 1358 nogj 
void sim_prof_fn (union param_val val, void *dat) {
342 
  strcpy(config.sim.prof_fn, val.str_val);
343 
}
344 876 rherveille 
 
345 1358 nogj 
void sim_mprofile (union param_val val, void *dat) {
346 
  config.sim.mprofile = val.int_val;
347 645 markom 
}
348 
 
349 1358 nogj 
void sim_mprof_fn (union param_val val, void *dat) {
350 
  strcpy(config.sim.mprof_fn, val.str_val);
351 645 markom 
}
352 
 
353 1358 nogj 
void sim_history (union param_val val, void *dat) {
354 
  config.sim.history = val.int_val;
355 645 markom 
}
356 
 
357 1358 nogj 
void sim_exe_log (union param_val val, void *dat) {
358 
  config.sim.exe_log = val.int_val;
359 645 markom 
}
360 
 
361 1358 nogj 
void sim_exe_log_type (union param_val val, void *dat) {
362 
  if (strcmp (val.str_val, "default") == 0)
363 672 markom 
    config.sim.exe_log_type = EXE_LOG_HARDWARE;
364 1358 nogj 
  else if (strcmp (val.str_val, "hardware") == 0)
365 672 markom 
    config.sim.exe_log_type = EXE_LOG_HARDWARE;
366 1358 nogj 
  else if (strcmp (val.str_val, "simple") == 0)
367 675 markom 
    config.sim.exe_log_type = EXE_LOG_SIMPLE;
368 1358 nogj 
  else if (strcmp (val.str_val, "software") == 0) {
369 672 markom 
    config.sim.exe_log_type = EXE_LOG_SOFTWARE;
370 
  } else {
371 
    char tmp[200];
372 1358 nogj 
    sprintf (tmp, "invalid execute log type '%s'.\n", val.str_val);
373 
    CONFIG_ERROR(tmp);
374 672 markom 
  }
375 
}
376 
 
377 1358 nogj 
void sim_exe_log_start (union param_val val, void *dat) {
378 
  config.sim.exe_log_start = val.int_val;
379 645 markom 
}
380 
 
381 1358 nogj 
void sim_exe_log_end (union param_val val, void *dat) {
382 
  config.sim.exe_log_end = val.int_val;
383 645 markom 
}
384 
 
385 1358 nogj 
void sim_exe_log_marker (union param_val val, void *dat) {
386 
  config.sim.exe_log_marker = val.int_val;
387 645 markom 
}
388 
 
389 1358 nogj 
void sim_exe_log_fn (union param_val val, void *dat) {
390 
  strcpy(config.sim.exe_log_fn, val.str_val);
391 645 markom 
}
392 
 
393 1358 nogj 
void sim_clkcycle (union param_val val, void *dat) {
394 
  int len = strlen (val.str_val);
395 
  int pos = len - 1;
396 
  long time;
397 
  if (len < 2) goto err;
398 
  if (val.str_val[pos--] != 's') goto err;
399 
  switch (val.str_val[pos--]) {
400 
    case 'p': time = 1; break;
401 
    case 'n': time = 1000; break;
402 
    case 'u': time = 1000000; break;
403 
    case 'm': time = 1000000000; break;
404 
  default:
405 
    goto err;
406 
  }
407 
  val.str_val[pos + 1] = 0;
408 
  config.sim.clkcycle_ps = time * atol (val.str_val);
409 
  return;
410 
err:
411 
  CONFIG_ERROR("invalid time format.");
412 645 markom 
}
413 
 
414 1358 nogj 
void sim_stdout (union param_val val, void *dat) {
415 
  strcpy(config.sim.fstdout, val.str_val);
416 645 markom 
}
417 
 
418 1358 nogj 
void sim_spr_log (union param_val val, void *dat) {
419 
  config.sim.spr_log = val.int_val;
420 645 markom 
}
421 
 
422 1358 nogj 
void sim_spr_log_fn (union param_val val, void *dat) {
423 
  strcpy(config.sim.spr_log_fn, val.str_val);
424 645 markom 
}
425 
 
426 1358 nogj 
void reg_sim_sec (void) {
427 
  struct config_section *sec = reg_config_sec("sim", NULL, NULL);
428 645 markom 
 
429 1358 nogj 
  reg_config_param(sec, "debug", paramt_int, sim_debug);
430 
  reg_config_param(sec, "verbose", paramt_int, sim_verbose);
431 
  reg_config_param(sec, "profile", paramt_int, sim_profile);
432 
  reg_config_param(sec, "prof_fn", paramt_str, sim_prof_fn);
433 
  reg_config_param(sec, "mprofile", paramt_int, sim_mprofile);
434 
  reg_config_param(sec, "mprof_fn", paramt_str, sim_mprof_fn);
435 
  reg_config_param(sec, "history", paramt_int, sim_history);
436 
  reg_config_param(sec, "exe_log", paramt_int, sim_exe_log);
437 
  reg_config_param(sec, "exe_log_type", paramt_word, sim_exe_log_type);
438 
  reg_config_param(sec, "exe_log_start", paramt_int, sim_exe_log_start);
439 
  reg_config_param(sec, "exe_log_end", paramt_int, sim_exe_log_end);
440 
  reg_config_param(sec, "exe_log_marker", paramt_int, sim_exe_log_marker);
441 
  reg_config_param(sec, "exe_log_fn", paramt_str, sim_exe_log_fn);
442 
  reg_config_param(sec, "spr_log", paramt_int, sim_spr_log);
443 
  reg_config_param(sec, "spr_log_fn", paramt_str, sim_spr_log_fn);
444 
  reg_config_param(sec, "clkcycle", paramt_word, sim_clkcycle);
445 
  reg_config_param(sec, "stdout", paramt_str, sim_stdout);
446 645 markom 
}
447 
 
448 1358 nogj 
/*-------------------------------------------------[ Memory configuration ]---*/
449 
void memory_random_seed(union param_val val, void *dat) {
450 
  config.memory.random_seed = val.int_val;
451 645 markom 
}
452 
 
453 1358 nogj 
void memory_pattern(union param_val val, void *dat) {
454 
  config.memory.pattern = val.int_val;
455 645 markom 
}
456 
 
457 1358 nogj 
void memory_nmemories (union param_val val, void *dat) {
458 
  if (val.int_val >= 0 && val.int_val < MAX_MEMORIES)
459 
    config.memory.nmemories = val.int_val;
460 645 markom 
  else
461 1358 nogj 
    CONFIG_ERROR("invalid number of devices.");
462 645 markom 
}
463 
 
464 1358 nogj 
void memory_type (union param_val val, void *dat) {
465 
  if (strcmp (val.str_val, "unknown") == 0)
466 645 markom 
    config.memory.type = MT_UNKNOWN;
467 1358 nogj 
  else if (strcmp (val.str_val, "random") == 0)
468 645 markom 
    config.memory.type = MT_RANDOM;
469 1358 nogj 
  else if (strcmp (val.str_val, "pattern") == 0)
470 645 markom 
    config.memory.type = MT_PATTERN;
471 1358 nogj 
  else if (strcmp (val.str_val, "zero") == 0) {
472 645 markom 
    config.memory.type = MT_PATTERN;
473 
    config.memory.pattern = 0;
474 
  } else {
475 
    char tmp[200];
476 1358 nogj 
    sprintf (tmp, "invalid memory type '%s'.\n", val.str_val);
477 
    CONFIG_ERROR(tmp);
478 645 markom 
  }
479 
}
480 
 
481 1358 nogj 
void memory_ce (union param_val val, void *dat) {
482 645 markom 
  if (current_device >= 0 && current_device < config.memory.nmemories)
483 1358 nogj 
    config.memory.table[current_device].ce = val.int_val;
484 645 markom 
  else
485 1358 nogj 
    CONFIG_ERROR("invalid device number.");
486 645 markom 
}
487 
 
488 1358 nogj 
void memory_baseaddr (union param_val val, void *dat) {
489 645 markom 
  if (current_device >= 0 && current_device < config.memory.nmemories)
490 1358 nogj 
    config.memory.table[current_device].baseaddr = val.addr_val;
491 645 markom 
  else
492 1358 nogj 
    CONFIG_ERROR("invalid device number.");
493 645 markom 
}
494 
 
495 1358 nogj 
void memory_size (union param_val val, void *dat) {
496 645 markom 
  if (current_device >= 0 && current_device < config.memory.nmemories)
497 1358 nogj 
    config.memory.table[current_device].size = val.int_val;
498 645 markom 
  else
499 1358 nogj 
    CONFIG_ERROR("invalid device number.");
500 645 markom 
}
501 
 
502 1358 nogj 
void memory_name (union param_val val, void *dat) {
503 645 markom 
  if (current_device >= 0 && current_device < config.memory.nmemories)
504 1358 nogj 
    strcpy (config.memory.table[current_device].name, val.str_val);
505 645 markom 
  else
506 1358 nogj 
    CONFIG_ERROR("invalid device number.");
507 645 markom 
}
508 
 
509 1358 nogj 
void memory_log (union param_val val, void *dat) {
510 645 markom 
  if (current_device >= 0 && current_device < config.memory.nmemories)
511 1358 nogj 
    strcpy (config.memory.table[current_device].log, val.str_val);
512 645 markom 
  else
513 1358 nogj 
    CONFIG_ERROR("invalid device number.");
514 645 markom 
}
515 
 
516 1358 nogj 
void memory_delayr (union param_val val, void *dat) {
517 645 markom 
  if (current_device >= 0 && current_device < config.memory.nmemories)
518 1358 nogj 
    config.memory.table[current_device].delayr = val.int_val;
519 645 markom 
  else
520 1358 nogj 
    CONFIG_ERROR("invalid device number.");
521 645 markom 
}
522 
 
523 1358 nogj 
void memory_delayw (union param_val val, void *dat) {
524 645 markom 
  if (current_device >= 0 && current_device < config.memory.nmemories)
525 1358 nogj 
    config.memory.table[current_device].delayw = val.int_val;
526 645 markom 
  else
527 1358 nogj 
    CONFIG_ERROR("invalid device number.");
528 645 markom 
}
529 
 
530 1358 nogj 
void reg_memory_sec(void) {
531 
  struct config_section *sec = reg_config_sec("memory", NULL, NULL);
532 645 markom 
 
533 1358 nogj 
  reg_config_param(sec, "random_seed", paramt_int, memory_random_seed);
534 
  reg_config_param(sec, "pattern", paramt_int, memory_pattern);
535 
  reg_config_param(sec, "type", paramt_word, memory_type);
536 
  reg_config_param(sec, "nmemories", paramt_int, memory_nmemories);
537 
  reg_config_param(sec, "device", paramt_int, change_device);
538 
  reg_config_param(sec, "enddevice", paramt_none, end_device);
539 
  reg_config_param(sec, "ce", paramt_int, memory_ce);
540 
  reg_config_param(sec, "baseaddr", paramt_addr, memory_baseaddr);
541 
  reg_config_param(sec, "size", paramt_int, memory_size);
542 
  reg_config_param(sec, "name", paramt_str, memory_name);
543 
  reg_config_param(sec, "log", paramt_str, memory_log);
544 
  reg_config_param(sec, "delayr", paramt_int, memory_delayr);
545 
  reg_config_param(sec, "delayw", paramt_int, memory_delayw);
546 645 markom 
}
547 
 
548 1358 nogj 
/*----------------------------------------------------[ CPU configuration ]---*/
549 
void cpu_ver (union param_val val, void *dat) {
550 
  config.cpu.ver = val.int_val;
551 645 markom 
}
552 
 
553 1358 nogj 
void cpu_rev (union param_val val, void *dat) {
554 
  config.cpu.rev = val.int_val;
555 645 markom 
}
556 
 
557 1358 nogj 
void cpu_upr (union param_val val, void *dat) {
558 
  config.cpu.upr = val.int_val;
559 725 ivang 
}
560 
 
561 1358 nogj 
void cpu_sr (union param_val val, void *dat) {
562 
  config.cpu.sr = val.int_val;
563 645 markom 
}
564 
 
565 1358 nogj 
void cpu_hazards (union param_val val, void *dat) {
566 
  config.cpu.hazards = val.int_val;
567 645 markom 
}
568 
 
569 1358 nogj 
void cpu_superscalar (union param_val val, void *dat) {
570 
  config.cpu.superscalar = val.int_val;
571 645 markom 
}
572 
 
573 1358 nogj 
void cpu_dependstats (union param_val val, void *dat) {
574 
  config.cpu.dependstats = val.int_val;
575 645 markom 
}
576 
 
577 1358 nogj 
void cpu_sbuf_len (union param_val val, void *dat) {
578 
  if (val.int_val >= MAX_SBUF_LEN) {
579 
    config.cpu.sbuf_len = MAX_SBUF_LEN - 1;
580 
    WARNING("sbuf_len too large; truncated.");
581 
  } else if (val.int_val < 0) {
582 
    config.cpu.sbuf_len = 0;
583 
    WARNING("sbuf_len negative; disabled.");
584 
  } else
585 
    config.cpu.sbuf_len = val.int_val;
586 723 ivang 
}
587 
 
588 1358 nogj 
void reg_cpu_sec(void)
589 
{
590 
  struct config_section *sec = reg_config_sec("cpu", NULL, NULL);
591 723 ivang 
 
592 1358 nogj 
  reg_config_param(sec, "ver", paramt_int, cpu_ver);
593 
  reg_config_param(sec, "rev", paramt_int, cpu_rev);
594 
  reg_config_param(sec, "upr", paramt_int, cpu_upr);
595 
  reg_config_param(sec, "sr", paramt_int, cpu_sr);
596 
  reg_config_param(sec, "hazards", paramt_int, cpu_hazards);
597 
  reg_config_param(sec, "superscalar", paramt_int, cpu_superscalar);
598 
  reg_config_param(sec, "dependstats", paramt_int, cpu_dependstats);
599 
  reg_config_param(sec, "sbuf_len", paramt_int, cpu_sbuf_len);
600 645 markom 
}
601 
 
602 
int is_power2 (int x) {
603 
  while (!(x & 1))
604 
    x >>= 1;
605 
  return x == 1;
606 
}
607 
 
608 1358 nogj 
void reg_config_secs(void)
609 
{
610 
  reg_config_param(reg_config_sec("base", NULL, NULL), "include", paramt_str,
611 
                   base_include);
612 645 markom 
 
613 1358 nogj 
  reg_sim_sec();
614 
  reg_cpu_sec();
615 
  reg_memory_sec();
616 
  reg_mc_sec();
617 
  reg_uart_sec();
618 
  reg_dma_sec();
619 
  reg_debug_sec();
620 
  reg_vapi_sec();
621 
  reg_ethernet_sec();
622 
  reg_immu_sec();
623 
  reg_dmmu_sec();
624 
  reg_ic_sec();
625 
  reg_dc_sec();
626 
  reg_gpio_sec();
627 
  reg_bpb_sec();
628 
  reg_pm_sec();
629 
  reg_vga_sec();
630 
  reg_fb_sec();
631 
  reg_kbd_sec();
632 
  reg_ata_sec();
633 
  reg_cuc_sec();
634 
  reg_test_sec();
635 645 markom 
}
636 
 
637 1358 nogj 
void reg_config_param(struct config_section *sec, const char *param,
638 
                      enum param_t type,
639 
                      void (*param_cb)(union param_val, void *))
640 
{
641 
  struct config_param *new = malloc(sizeof(struct config_param));
642 645 markom 
 
643 1358 nogj 
  if(!new) {
644 
    fprintf(stderr, "Out-of-memory\n");
645 
    exit(1);
646 
  }
647 645 markom 
 
648 1358 nogj 
  if(!(new->name = strdup(param))) {
649 
    fprintf(stderr, "Out-of-memory\n");
650 
    exit(1);
651 
  }
652 645 markom 
 
653 1358 nogj 
  new->func = param_cb;
654 
  new->type = type;
655 645 markom 
 
656 1358 nogj 
  new->next = sec->params;
657 
  sec->params = new;
658 645 markom 
}
659 
 
660 1358 nogj 
struct config_section *reg_config_sec(const char *section,
661 
                                      void *(*sec_start)(void),
662 
                                      void (*sec_end)(void *))
663 
{
664 
  struct config_section *new = malloc(sizeof(struct config_section));
665 645 markom 
 
666 1358 nogj 
  if(!new) {
667 
    fprintf(stderr, "Out-of-memory\n");
668 
    exit(1);
669 
  }
670 645 markom 
 
671 1358 nogj 
  if(!(new->name = strdup(section))) {
672 
    fprintf(stderr, "Out-of-memory\n");
673 
    exit(1);
674 645 markom 
  }
675 
 
676 1358 nogj 
  new->next = sections;
677 
  new->sec_start = sec_start;
678 
  new->sec_end = sec_end;
679 
  new->params = NULL;
680 645 markom 
 
681 1358 nogj 
  sections = new;
682 645 markom 
 
683 1358 nogj 
  return new;
684 645 markom 
}
685 
 
686 1358 nogj 
static void switch_param(char *param, struct config_param *cur_param)
687 
{
688 
  char *end_p;
689 
  union param_val val;
690 645 markom 
 
691 1358 nogj 
    /* Skip over an = sign if it exists */
692 
  if(*param == '=') {
693 
    param++;
694 
    while(*param && isspace(*param)) param++;
695 645 markom 
  }
696 
 
697 1358 nogj 
  switch (cur_param->type) {
698 
  case paramt_int:
699 
    val.int_val = strtol(param, NULL, 0);
700 
  case paramt_addr:
701 
    val.addr_val = strtoul(param, NULL, 0);
702 
    break;
703 
  case paramt_str:
704 
    if(*param != '"') {
705 
      CONFIG_ERROR("String value expected\n");
706 
      return;
707 
    }
708 645 markom 
 
709 1358 nogj 
    param++;
710 
    end_p = param;
711 
    while(*end_p && (*end_p != '"')) end_p++;
712 
    *end_p = '\0';
713 
    val.str_val = param;
714 
    break;
715 
  case paramt_word:
716 
    end_p = param;
717 
    while(*end_p && !isspace(*end_p)) end_p++;
718 
    *end_p = '\0';
719 
    val.str_val = param;
720 
    break;
721 
  case paramt_none:
722 
    break;
723 
  }
724 645 markom 
 
725 1358 nogj 
  cur_param->func(val, cur_section->dat);
726 645 markom 
}
727 
 
728 
/* Read environment from a script file. Does not fail - assumes default configuration instead.
729 
   The syntax of script file is:
730 
   param = value
731 
   section x
732 
     data
733 
     param = value
734 
   end
735 
 
736 
   Example:
737 
   section mc
738 
     memory_table_file = sim.mem
739 
     enable = 1
740 
     POC = 0x47892344
741 
   end
742 
 
743 
 */
744 
 
745 
void read_script_file (char *filename)
746 
{
747 
  FILE *f;
748 
  char *home = getenv("HOME");
749 
  char ctmp[STR_SIZE];
750 
  int local = 1;
751 1358 nogj 
  cur_section = NULL;
752 645 markom 
 
753 
  sprintf(ctmp, "%s/.or1k/%s", home, filename);
754 
  if ((f = fopen (filename, "rt")) != NULL
755 
      || home != NULL && !(local = 0) && (f = fopen (ctmp, "rt")) != NULL) {
756 
    if (config.sim.verbose && !runtime.sim.output_cfg)
757 997 markom 
      PRINTF ("Reading script file from '%s'...\n", local ? filename : ctmp);
758 645 markom 
    strcpy (runtime.sim.script_fn, local ? filename : ctmp);
759 
 
760 
    while (!feof(f)) {
761 
      char param[STR_SIZE];
762 1308 phoenix 
      if (fscanf(f, "%s ", param) != 1) break;
763 1358 nogj 
      /* Is this a section? */
764 645 markom 
      if (strcmp (param, "section") == 0) {
765 1358 nogj 
        struct config_section *cur;
766 
        cur_section = NULL;
767 1308 phoenix 
        if (fscanf (f, "%s\n", param) != 1) {
768 645 markom 
          fprintf (stderr, "%s: ERROR: Section name required.\n", local ? filename : ctmp);
769 
          exit (1);
770 
        }
771 1358 nogj 
        for (cur = sections; cur; cur = cur->next)
772 
          if (strcmp (cur->name, param) == 0) {
773 
            cur_section = cur;
774 645 markom 
            break;
775 
          }
776 1358 nogj 
        if (!cur) {
777 
          fprintf (stderr, "WARNING: config: Unknown section: %s; ignoring.", param);
778 645 markom 
          /* just skip section */
779 1308 phoenix 
          while (fscanf (f, "%s\n", param) != 1 && strcmp (param, "end"));
780 1358 nogj 
        } else {
781 
          cur->dat = NULL;
782 
          if (cur->sec_start)
783 
            cur->dat = cur->sec_start();
784 645 markom 
        }
785 
      } else if (strcmp (param, "end") == 0) {
786 1358 nogj 
        if(cur_section->sec_end)
787 
          cur_section->sec_end(cur_section->dat);
788 
        cur_section = NULL;
789 645 markom 
      } else if (strncmp (param, "/*", 2) == 0) {
790 
        char c0 = 0, c1 = 0;
791 
        while (c0 != '*' || c1 != '/') {
792 
          c0 = c1;
793 
          c1 = fgetc(f);
794 
          if (feof(f)) {
795 
            fprintf (stderr, "%s: ERROR: Comment reached EOF.\n", local ? filename : ctmp);
796 
            exit (1);
797 
          }
798 
        }
799 
      } else {
800 1358 nogj 
        struct config_param *cur_param;
801 
        char *cur_p;
802 
        for (cur_param = cur_section->params; cur_param; cur_param = cur_param->next)
803 
          if (strcmp (cur_param->name, param) == 0) {
804 645 markom 
            break;
805 
          }
806 1358 nogj 
        if (!cur_param) {
807 645 markom 
          char tmp[200];
808 
          sprintf (tmp, "Invalid parameter: %s; ignoring.\n", param);
809 
          WARNING(tmp);
810 
          while (fgetc(f) != '\n' || feof(f));
811 
          continue;
812 
        }
813 
 
814 1358 nogj 
        if(cur_param->type == paramt_none)
815 
          continue;
816 
 
817 645 markom 
        /* Parse parameter value */
818 1358 nogj 
        cur_p = fgets (param, STR_SIZE, f);
819 
 
820 
        while(*cur_p && isspace(*cur_p)) cur_p++;
821 
 
822 
        switch_param(cur_p, cur_param);
823 645 markom 
      }
824 
    }
825 
    fclose (f);
826 
    runtime.sim.script_file_specified = 1;
827 
  } else
828 
    if (config.sim.verbose)
829 
      fprintf (stderr, "WARNING: Cannot read script file from '%s',\nneither '%s'.\n", filename, ctmp);
830 
}
831 
 
832 
/* Utility for execution of set sim command.  */
833 1353 nogj 
static int set_config (int argc, char **argv)
834 645 markom 
{
835 1358 nogj 
  struct config_section *cur;
836 
  struct config_param *cur_param;
837 1353 nogj 
 
838 
  if (argc < 2) return 1;
839 
 
840 
  PRINTF ("sec:%s\n", argv[1]);
841 1358 nogj 
  cur_section = NULL;
842 
  for (cur = sections; cur; cur = cur->next)
843 
    if (strcmp (cur->name, argv[1]) == 0) {
844 
      cur_section = cur;
845 645 markom 
      break;
846 
    }
847 
 
848 1358 nogj 
  if (!cur_section) return 1;
849 1353 nogj 
 
850 
  if (argc < 3) return 2;
851 645 markom 
 
852 1353 nogj 
  PRINTF ("item:%s\n", argv[2]);
853 645 markom 
  {
854 1358 nogj 
    for (cur_param = cur->params; cur_param; cur_param = cur_param->next)
855 
      if (strcmp (cur_param->name, argv[2]) == 0) {
856 645 markom 
        break;
857 
      }
858 1358 nogj 
    if (!cur_param) return 2;
859 645 markom 
 
860 
    /* Parse parameter value */
861 1358 nogj 
    if (cur_param->type) {
862 1353 nogj 
      if (argc < 4) return 3;
863 
      PRINTF ("params:%s\n", argv[3]);
864 
    }
865 1358 nogj 
 
866 
    switch_param(argv[3], cur_param);
867 645 markom 
  }
868 
  return 0;
869 
}
870 
 
871 
/* Executes set sim command, displays error.  */
872 1353 nogj 
void set_config_command(int argc, char **argv)
873 645 markom 
{
874 1358 nogj 
  struct config_section *cur;
875 
  struct config_param *cur_param;
876 1353 nogj 
 
877 
  switch (set_config (argc, argv)) {
878 645 markom 
    case 1:
879 997 markom 
      PRINTF ("Invalid or missing section name.  One of valid sections must be specified:\n");
880 1358 nogj 
      for (cur = sections; cur; cur = cur->next)
881 
        PRINTF ("%s ", cur->name);
882 997 markom 
      PRINTF ("\n");
883 645 markom 
      break;
884 
    case 2:
885 997 markom 
      PRINTF ("Invalid or missing item name.  One of valid items must be specified:\n");
886 1358 nogj 
      for (cur_param = cur_section->params; cur_param; cur_param = cur_param->next)
887 
        PRINTF ("%s ", cur_param->name);
888 997 markom 
      PRINTF ("\n");
889 645 markom 
      break;
890 
    case 3:
891 997 markom 
      PRINTF ("Invalid parameters specified.\n");
892 645 markom 
      break;
893 
  }
894 
}
895 
#endif /* !FAST_SIM */
896 
 
897 
/* Outputs C structure of current config to file */
898 
void output_cfg (FILE *f)
899 
{
900 
  int i, comma;
901 
  fprintf (f, "/* This file was automatically generated by or1ksim,\n"
902 
              "   using --output-cfg switch (cfg file '%s'). */\n"
903 
  "const static struct config config = {\n", runtime.sim.script_fn);
904 
 
905 731 ivang 
  fprintf (f, "  tick:{enabled:%i},\n", config.tick.enabled);
906 645 markom 
 
907 
  fprintf (f, "  ndmas:%i, dmas:{", config.ndmas);
908 
  comma = 0;
909 
  for (i = 0; i < config.ndmas; i++) {
910 1308 phoenix 
    fprintf (f, "%s\n    {baseaddr:0x%08lx, irq:%i, vapi_id:0x%08lx}",
911 645 markom 
      comma ? "," :"", config.dmas[i].baseaddr, config.dmas[i].irq, config.dmas[i].vapi_id);
912 
    comma = 1;
913 
  }
914 
  fprintf (f, "},\n");
915 
 
916 
  fprintf (f, "  nethernets:%i, ethernets:{", config.nethernets);
917 
  comma = 0;
918 
  for (i = 0; i < config.nethernets; i++) {
919 1308 phoenix 
    fprintf (f, "%s\n    {baseaddr:0x%08lx, dma:%i, tx_channel:0x%08x, rx_channel:0x%08x, rxfile:\"%s\", txfile:\"%s\", vapi_id:0x%08lx}",
920 645 markom 
      comma ? "," :"", config.ethernets[i].baseaddr, config.ethernets[i].dma, config.ethernets[i].tx_channel, config.ethernets[i].rx_channel,
921 889 ivang 
      config.ethernets[i].rxfile, config.ethernets[i].txfile, config.ethernets[i].base_vapi_id);
922 645 markom 
    comma = 1;
923 
  }
924 
  fprintf (f, "},\n");
925 
 
926 
  fprintf (f, "  ngpios:%i, gpios:{", config.ngpios);
927 
  comma = 0;
928 
  for (i = 0; i < config.ngpios; i++) {
929 1308 phoenix 
    fprintf (f, "%s\n    {baseaddr:0x%08lx, irq:%i, base_vapi_id:0x%08lx}",
930 645 markom 
      comma ? "," :"", config.gpios[i].baseaddr, config.gpios[i].irq, config.gpios[i].base_vapi_id);
931 
    comma = 1;
932 
  }
933 
  fprintf (f, "},\n");
934 
 
935 1308 phoenix 
  fprintf (f, "  mc:{enabled:%i, baseaddr:0x%08lx, POC:%i},\n", config.mc.enabled, config.mc.baseaddr, config.mc.POC);
936 645 markom 
  fprintf (f, "  memory:{pattern:%i, random_seed:%i, type:%s, nmemories:%i, table:{", config.memory.pattern, config.memory.random_seed,
937 
    config.memory.type == MT_UNKNOWN ? "MT_UNKNOWN" : config.memory.type == MT_PATTERN ? "MT_PATTERN" : "MT_RANDOM", config.memory.nmemories);
938 
  comma = 0;
939 
  for (i = 0; i < config.memory.nmemories; i++) {
940 1308 phoenix 
    fprintf (f, "%s\n    {ce:%i, baseaddr:0x%08lx, size:0x%08lx, name:\"%s\", log:\"%s\", delayr:%i, delayw:%i}",
941 645 markom 
      comma ? "," :"", config.memory.table[i].ce, config.memory.table[i].baseaddr, config.memory.table[i].size, config.memory.table[i].name,
942 
      config.memory.table[i].log, config.memory.table[i].delayr, config.memory.table[i].delayw);
943 
    comma = 1;
944 
  }
945 
  fprintf (f, "}},\n");
946 
 
947 
  fprintf (f, "  immu:{enabled:%i, nways:%i, nsets:%i, pagesize:%i, entrysize:%i, ustates:%i, missdelay:%i, hitdelay:%i},\n",
948 
    config.immu.enabled, config.immu.nways, config.immu.nsets, config.immu.pagesize, config.immu.entrysize, config.immu.ustates,
949 
    config.immu.missdelay, config.immu.hitdelay);
950 
 
951 
  fprintf (f, "  dmmu:{enabled:%i, nways:%i, nsets:%i, pagesize:%i, entrysize:%i, ustates:%i, missdelay:%i, hitdelay:%i},\n",
952 
    config.dmmu.enabled, config.dmmu.nways, config.dmmu.nsets, config.dmmu.pagesize, config.dmmu.entrysize, config.dmmu.ustates,
953 
    config.dmmu.missdelay, config.dmmu.hitdelay);
954 
 
955 
  fprintf (f, "  ic:{enabled:%i, nways:%i, nsets:%i, blocksize:%i, ustates:%i, missdelay:%i, hitdelay:%i},\n",
956 
    config.ic.enabled, config.ic.nways, config.ic.nsets, config.ic.blocksize, config.ic.ustates,
957 
    config.ic.missdelay, config.ic.hitdelay);
958 
 
959 
  fprintf (f, "  dc:{enabled:%i, nways:%i, nsets:%i, blocksize:%i, ustates:%i,\n"
960 
    "    load_missdelay:%i, load_hitdelay:%i, store_missdelay:%i, store_hitdelay:%i},\n",
961 
    config.dc.enabled, config.dc.nways, config.dc.nsets, config.dc.blocksize, config.dc.ustates,
962 
    config.dc.load_missdelay, config.dc.load_hitdelay, config.dc.store_missdelay, config.dc.store_hitdelay);
963 
 
964 
  fprintf (f, "  bpb:{enabled:%i, sbp_bnf_fwd:%i, sbp_bf_fwd:%i, btic:%i, missdelay:%i, hitdelay:%i},\n",
965 
    config.bpb.enabled, config.bpb.sbp_bnf_fwd, config.bpb.sbp_bf_fwd, config.bpb.btic, config.bpb.missdelay, config.bpb.hitdelay);
966 
 
967 1308 phoenix 
  fprintf (f, "  cpu:{upr:0x%08lx, ver:0x%04lx, rev:0x%04lx, superscalar:%i, hazards:%i, dependstats:%i,\n"
968 732 ivang 
    "    sr:0x%08x},\n",
969 645 markom 
    config.cpu.upr, config.cpu.ver, config.cpu.rev, config.cpu.superscalar, config.cpu.hazards, config.cpu.dependstats,
970 732 ivang 
    config.cpu.sr);
971 645 markom 
 
972 
  fprintf (f, "  sim:{debug:%i, verbose:%i, profile:%i, prof_fn:\"%s\", mprofile:%i, mprof_fn:\"%s\",\n",
973 
    config.sim.debug, config.sim.verbose, config.sim.profile, config.sim.prof_fn, config.sim.mprofile, config.sim.mprof_fn);
974 
 
975 1308 phoenix 
  fprintf (f, "    history:%i, exe_log:%i, exe_log_fn:\"%s\", clkcycle_ps:%li,\n",
976 645 markom 
    config.sim.history, config.sim.exe_log, config.sim.exe_log_fn, config.sim.clkcycle_ps);
977 
 
978 
  fprintf (f, "    spr_log:%i, spr_log_fn:\"%s\"},\n",
979 
    config.sim.spr_log, config.sim.spr_log_fn);
980 
 
981 1308 phoenix 
  fprintf (f, "  debug:{enabled:%i, gdb_enabled:%i, server_port:%i, vapi_id:0x%08lx},\n",
982 645 markom 
    config.debug.enabled, config.debug.gdb_enabled, config.debug.server_port, config.debug.vapi_id);
983 
 
984 
  fprintf (f, "  vapi:{enabled:%i, server_port:%i, log_enabled:%i, hide_device_id:%i, vapi_fn:\"%s\"},\n",
985 
    config.vapi.enabled, config.vapi.server_port, config.vapi.log_enabled, config.vapi.hide_device_id, config.vapi.vapi_fn);
986 
 
987 
  fprintf (f, "  pm:{enabled:%i}\n",
988 
    config.pm.enabled);
989 
 
990 
  fprintf (f, "};\n");
991 
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.