/[gxemul]/trunk/src/cpu.c
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/src/cpu.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 12 by dpavlin, Mon Oct 8 16:18:38 2007 UTC revision 24 by dpavlin, Mon Oct 8 16:19:56 2007 UTC
# Line 1  Line 1 
1  /*  /*
2   *  Copyright (C) 2005  Anders Gavare.  All rights reserved.   *  Copyright (C) 2005-2006  Anders Gavare.  All rights reserved.
3   *   *
4   *  Redistribution and use in source and binary forms, with or without   *  Redistribution and use in source and binary forms, with or without
5   *  modification, are permitted provided that the following conditions are met:   *  modification, are permitted provided that the following conditions are met:
# Line 25  Line 25 
25   *  SUCH DAMAGE.   *  SUCH DAMAGE.
26   *   *
27   *   *
28   *  $Id: cpu.c,v 1.316 2005/08/16 05:37:09 debug Exp $   *  $Id: cpu.c,v 1.342 2006/06/22 13:27:03 debug Exp $
29   *   *
30   *  Common routines for CPU emulation. (Not specific to any CPU type.)   *  Common routines for CPU emulation. (Not specific to any CPU type.)
31   */   */
# Line 33  Line 33 
33  #include <stdio.h>  #include <stdio.h>
34  #include <stdlib.h>  #include <stdlib.h>
35  #include <sys/types.h>  #include <sys/types.h>
36    #include <sys/mman.h>
37  #include <string.h>  #include <string.h>
38    
39  #include "cpu.h"  #include "cpu.h"
# Line 42  Line 43 
43    
44    
45  extern int quiet_mode;  extern int quiet_mode;
 extern int show_opcode_statistics;  
   
46    
47  static struct cpu_family *first_cpu_family = NULL;  static struct cpu_family *first_cpu_family = NULL;
48    
# Line 105  struct cpu *cpu_new(struct memory *mem, Line 104  struct cpu *cpu_new(struct memory *mem,
104          }          }
105    
106          fatal("\ncpu_new(): unknown cpu type '%s'\n", cpu_type_name);          fatal("\ncpu_new(): unknown cpu type '%s'\n", cpu_type_name);
107          exit(1);          return NULL;
 }  
   
   
 /*  
  *  cpu_show_full_statistics():  
  *  
  *  Show detailed statistics on opcode usage on each cpu.  
  */  
 void cpu_show_full_statistics(struct machine *m)  
 {  
         if (m->cpu_family == NULL ||  
             m->cpu_family->show_full_statistics == NULL)  
                 fatal("cpu_show_full_statistics(): NULL\n");  
         else  
                 m->cpu_family->show_full_statistics(m);  
108  }  }
109    
110    
# Line 165  void cpu_register_match(struct machine * Line 149  void cpu_register_match(struct machine *
149   *  tracing.   *  tracing.
150   */   */
151  int cpu_disassemble_instr(struct machine *m, struct cpu *cpu,  int cpu_disassemble_instr(struct machine *m, struct cpu *cpu,
152          unsigned char *instr, int running, uint64_t addr, int bintrans)          unsigned char *instr, int running, uint64_t addr)
153  {  {
154          if (m->cpu_family == NULL || m->cpu_family->disassemble_instr == NULL) {          if (m->cpu_family == NULL || m->cpu_family->disassemble_instr == NULL) {
155                  fatal("cpu_disassemble_instr(): NULL\n");                  fatal("cpu_disassemble_instr(): NULL\n");
156                  return 0;                  return 0;
157          } else          } else
158                  return m->cpu_family->disassemble_instr(cpu, instr,                  return m->cpu_family->disassemble_instr(cpu, instr,
159                      running, addr, bintrans);                      running, addr);
160  }  }
161    
162    
# Line 181  int cpu_disassemble_instr(struct machine Line 165  int cpu_disassemble_instr(struct machine
165   *   *
166   *  Dump cpu registers in a relatively readable format.   *  Dump cpu registers in a relatively readable format.
167   *   *
168   *  gprs: set to non-zero to dump GPRs. (CPU dependant.)   *  gprs: set to non-zero to dump GPRs. (CPU dependent.)
169   *  coprocs: set bit 0..x to dump registers in coproc 0..x. (CPU dependant.)   *  coprocs: set bit 0..x to dump registers in coproc 0..x. (CPU dependent.)
170   */   */
171  void cpu_register_dump(struct machine *m, struct cpu *cpu,  void cpu_register_dump(struct machine *m, struct cpu *cpu,
172          int gprs, int coprocs)          int gprs, int coprocs)
# Line 195  void cpu_register_dump(struct machine *m Line 179  void cpu_register_dump(struct machine *m
179    
180    
181  /*  /*
182     *  cpu_gdb_stub():
183     *
184     *  Execute a "remote GDB" command. Return value is a pointer to a newly
185     *  allocated response string, if the command was successfully executed. If
186     *  there was an error, NULL is returned.
187     */
188    char *cpu_gdb_stub(struct cpu *cpu, char *cmd)
189    {
190            if (cpu->machine->cpu_family == NULL ||
191                cpu->machine->cpu_family->gdb_stub == NULL) {
192                    fatal("cpu_gdb_stub(): NULL\n");
193                    return NULL;
194            } else
195                    return cpu->machine->cpu_family->gdb_stub(cpu, cmd);
196    }
197    
198    
199    /*
200   *  cpu_interrupt():   *  cpu_interrupt():
201   *   *
202   *  Assert an interrupt.   *  Assert an interrupt.
# Line 244  void cpu_functioncall_trace(struct cpu * Line 246  void cpu_functioncall_trace(struct cpu *
246                  fatal("cpu%i:\t", cpu->cpu_id);                  fatal("cpu%i:\t", cpu->cpu_id);
247    
248          cpu->trace_tree_depth ++;          cpu->trace_tree_depth ++;
249            if (cpu->trace_tree_depth > 100)
250                    cpu->trace_tree_depth = 100;
251          for (i=0; i<cpu->trace_tree_depth; i++)          for (i=0; i<cpu->trace_tree_depth; i++)
252                  fatal("  ");                  fatal("  ");
253    
# Line 254  void cpu_functioncall_trace(struct cpu * Line 258  void cpu_functioncall_trace(struct cpu *
258                  fatal("%s", symbol);                  fatal("%s", symbol);
259          else {          else {
260                  if (cpu->is_32bit)                  if (cpu->is_32bit)
261                          fatal("0x%08x", (int)f);                          fatal("0x%"PRIx32, (uint32_t) f);
262                  else                  else
263                          fatal("0x%llx", (long long)f);                          fatal("0x%"PRIx64, (uint64_t) f);
264          }          }
265          fatal("(");          fatal("(");
266    
# Line 264  void cpu_functioncall_trace(struct cpu * Line 268  void cpu_functioncall_trace(struct cpu *
268                  cpu->machine->cpu_family->functioncall_trace(cpu, f, n_args);                  cpu->machine->cpu_family->functioncall_trace(cpu, f, n_args);
269    
270          fatal(")>\n");          fatal(")>\n");
271    
272    #ifdef PRINT_MEMORY_CHECKSUM
273            /*  Temporary hack for finding bugs:  */
274            fatal("call chksum=%016"PRIx64"\n", memory_checksum(cpu->mem));
275    #endif
276  }  }
277    
278    
# Line 292  void cpu_functioncall_trace_return(struc Line 301  void cpu_functioncall_trace_return(struc
301   */   */
302  void cpu_create_or_reset_tc(struct cpu *cpu)  void cpu_create_or_reset_tc(struct cpu *cpu)
303  {  {
304            size_t s = DYNTRANS_CACHE_SIZE + DYNTRANS_CACHE_MARGIN;
305    
306          if (cpu->translation_cache == NULL)          if (cpu->translation_cache == NULL)
307                  cpu->translation_cache = zeroed_alloc(DYNTRANS_CACHE_SIZE +                  cpu->translation_cache = zeroed_alloc(s);
                     DYNTRANS_CACHE_MARGIN);  
308    
309          /*  Create an empty table at the beginning of the translation cache:  */          /*  Create an empty table at the beginning of the translation cache:  */
310          memset(cpu->translation_cache, 0, sizeof(uint32_t)          memset(cpu->translation_cache, 0, sizeof(uint32_t)
# Line 307  void cpu_create_or_reset_tc(struct cpu * Line 317  void cpu_create_or_reset_tc(struct cpu *
317           *  There might be other translation pointers that still point to           *  There might be other translation pointers that still point to
318           *  within the translation_cache region. Let's invalidate those too:           *  within the translation_cache region. Let's invalidate those too:
319           */           */
320          if (cpu->invalidate_code_translation_caches != NULL)          if (cpu->invalidate_code_translation != NULL)
321                  cpu->invalidate_code_translation_caches(cpu);                  cpu->invalidate_code_translation(cpu, 0, INVALIDATE_ALL);
322  }  }
323    
324    
# Line 334  int cpu_run(struct emul *emul, struct ma Line 344  int cpu_run(struct emul *emul, struct ma
344   *  cpu_dumpinfo():   *  cpu_dumpinfo():
345   *   *
346   *  Dumps info about a CPU using debug(). "cpu0: CPUNAME, running" (or similar)   *  Dumps info about a CPU using debug(). "cpu0: CPUNAME, running" (or similar)
347   *  is outputed, and it is up to CPU dependant code to complete the line.   *  is outputed, and it is up to CPU dependent code to complete the line.
348   */   */
349  void cpu_dumpinfo(struct machine *m, struct cpu *cpu)  void cpu_dumpinfo(struct machine *m, struct cpu *cpu)
350  {  {
# Line 356  void cpu_dumpinfo(struct machine *m, str Line 366  void cpu_dumpinfo(struct machine *m, str
366  void cpu_list_available_types(void)  void cpu_list_available_types(void)
367  {  {
368          struct cpu_family *fp;          struct cpu_family *fp;
369          int iadd = 4;          int iadd = DEBUG_INDENTATION;
370    
371          fp = first_cpu_family;          fp = first_cpu_family;
372    
# Line 407  void cpu_run_deinit(struct machine *mach Line 417  void cpu_run_deinit(struct machine *mach
417          if (machine->show_nr_of_instructions || !quiet_mode)          if (machine->show_nr_of_instructions || !quiet_mode)
418                  cpu_show_cycles(machine, 1);                  cpu_show_cycles(machine, 1);
419    
         if (show_opcode_statistics)  
                 cpu_show_full_statistics(machine);  
   
420          fflush(stdout);          fflush(stdout);
421  }  }
422    
# Line 428  void cpu_show_cycles(struct machine *mac Line 435  void cpu_show_cycles(struct machine *mac
435          char *symbol;          char *symbol;
436          int64_t mseconds, ninstrs, is, avg;          int64_t mseconds, ninstrs, is, avg;
437          struct timeval tv;          struct timeval tv;
438          int h, m, s, ms, d, instrs_per_cycle = 1;          int h, m, s, ms, d;
439    
440          static int64_t mseconds_last = 0;          static int64_t mseconds_last = 0;
441          static int64_t ninstrs_last = -1;          static int64_t ninstrs_last = -1;
442    
         switch (machine->arch) {  
         case ARCH_MIPS:  
                 instrs_per_cycle = machine->cpus[machine->bootstrap_cpu]->  
                     cd.mips.cpu_type.instrs_per_cycle;  
                 break;  
         }  
   
443          pc = machine->cpus[machine->bootstrap_cpu]->pc;          pc = machine->cpus[machine->bootstrap_cpu]->pc;
444    
445          gettimeofday(&tv, NULL);          gettimeofday(&tv, NULL);
# Line 452  void cpu_show_cycles(struct machine *mac Line 452  void cpu_show_cycles(struct machine *mac
452          if (mseconds - mseconds_last == 0)          if (mseconds - mseconds_last == 0)
453                  mseconds ++;                  mseconds ++;
454    
455          ninstrs = machine->ncycles_since_gettimeofday * instrs_per_cycle;          ninstrs = machine->ncycles_since_gettimeofday;
456    
457          if (machine->automatic_clock_adjustment) {          if (machine->automatic_clock_adjustment) {
458                  static int first_adjustment = 1;                  static int first_adjustment = 1;
459    
460                  /*  Current nr of cycles per second:  */                  /*  Current nr of cycles per second:  */
461                  int64_t cur_cycles_per_second = 1000 *                  int64_t cur_cycles_per_second = 1000 *
462                      (ninstrs-ninstrs_last) / (mseconds-mseconds_last)                      (ninstrs-ninstrs_last) / (mseconds-mseconds_last);
463                      / instrs_per_cycle;  
464                    /*  fatal("[ CYCLES PER SECOND = %"PRIi64" ]\n",
465                        cur_cycles_per_second);  */
466    
467                  if (cur_cycles_per_second < 1000000)                  if (cur_cycles_per_second < 1000000)
468                          cur_cycles_per_second = 1000000;                          cur_cycles_per_second = 1000000;
# Line 473  void cpu_show_cycles(struct machine *mac Line 475  void cpu_show_cycles(struct machine *mac
475                              cur_cycles_per_second) / 16;                              cur_cycles_per_second) / 16;
476                  }                  }
477    
478                  /*  debug("[ updating emulated_hz to %lli Hz ]\n",                  /*  fatal("[ updating emulated_hz to %"PRIi64" Hz ]\n",
479                      (long long)machine->emulated_hz);  */                      machine->emulated_hz);  */
480          }          }
481    
482    
# Line 482  void cpu_show_cycles(struct machine *mac Line 484  void cpu_show_cycles(struct machine *mac
484          if (!machine->show_nr_of_instructions && !forced)          if (!machine->show_nr_of_instructions && !forced)
485                  goto do_return;                  goto do_return;
486    
487          printf("[ %lli instrs",          printf("[ %"PRIi64" instrs", (int64_t)machine->ncycles);
             (long long)(machine->ncycles * instrs_per_cycle));  
488    
489          if (!machine->automatic_clock_adjustment) {          if (!machine->automatic_clock_adjustment) {
490                  d = machine->emulated_hz / 1000;                  d = machine->emulated_hz / 1000;
# Line 497  void cpu_show_cycles(struct machine *mac Line 498  void cpu_show_cycles(struct machine *mac
498                  s = ms / 1000;                  s = ms / 1000;
499                  ms -= 1000 * s;                  ms -= 1000 * s;
500    
501                  printf("emulated time = %02i:%02i:%02i.%03i; ", h, m, s, ms);                  printf(", emulated time = %02i:%02i:%02i.%03i; ", h, m, s, ms);
502          }          }
503    
504          /*  Instructions per second, and average so far:  */          /*  Instructions per second, and average so far:  */
# Line 507  void cpu_show_cycles(struct machine *mac Line 508  void cpu_show_cycles(struct machine *mac
508                  is = 0;                  is = 0;
509          if (avg < 0)          if (avg < 0)
510                  avg = 0;                  avg = 0;
511          printf("; i/s=%lli avg=%lli", (long long)is, (long long)avg);          printf("; i/s=%"PRIi64" avg=%"PRIi64, is, avg);
512    
513          symbol = get_symbol_name(&machine->symbol_context, pc, &offset);          symbol = get_symbol_name(&machine->symbol_context, pc, &offset);
514    
515          if (machine->ncpus == 1) {          if (machine->ncpus == 1) {
516                  if (machine->cpus[machine->bootstrap_cpu]->is_32bit)                  if (machine->cpus[machine->bootstrap_cpu]->is_32bit)
517                          printf("; pc=0x%08x", (int)pc);                          printf("; pc=0x%08"PRIx32, (uint32_t) pc);
518                  else                  else
519                          printf("; pc=0x%016llx", (long long)pc);                          printf("; pc=0x%016"PRIx64, (uint64_t) pc);
520          }          }
521    
522          if (symbol != NULL)          if (symbol != NULL)
# Line 559  void cpu_run_init(struct machine *machin Line 560  void cpu_run_init(struct machine *machin
560          if (machine->a_few_cycles < 1)          if (machine->a_few_cycles < 1)
561                  machine->a_few_cycles = 1;                  machine->a_few_cycles = 1;
562    
563          if (ncpus > 1 && machine->max_random_cycles_per_chunk == 0)          if (ncpus > 1)
564                  machine->a_few_cycles = 1;                  machine->a_few_cycles = 1;
565    
566          /*  debug("cpu_run_init(): a_few_cycles = %i\n",          /*  debug("cpu_run_init(): a_few_cycles = %i\n",
# Line 653  void cpu_init(void) Line 654  void cpu_init(void)
654          add_cpu_family(arm_cpu_family_init, ARCH_ARM);          add_cpu_family(arm_cpu_family_init, ARCH_ARM);
655  #endif  #endif
656    
657    #ifdef ENABLE_AVR
658            add_cpu_family(avr_cpu_family_init, ARCH_AVR);
659    #endif
660    
661    #ifdef ENABLE_HPPA
662            add_cpu_family(hppa_cpu_family_init, ARCH_HPPA);
663    #endif
664    
665    #ifdef ENABLE_I960
666            add_cpu_family(i960_cpu_family_init, ARCH_I960);
667    #endif
668    
669  #ifdef ENABLE_IA64  #ifdef ENABLE_IA64
670          add_cpu_family(ia64_cpu_family_init, ARCH_IA64);          add_cpu_family(ia64_cpu_family_init, ARCH_IA64);
671  #endif  #endif
# Line 669  void cpu_init(void) Line 682  void cpu_init(void)
682          add_cpu_family(ppc_cpu_family_init, ARCH_PPC);          add_cpu_family(ppc_cpu_family_init, ARCH_PPC);
683  #endif  #endif
684    
685    #ifdef ENABLE_SH
686            add_cpu_family(sh_cpu_family_init, ARCH_SH);
687    #endif
688    
689  #ifdef ENABLE_SPARC  #ifdef ENABLE_SPARC
690          add_cpu_family(sparc_cpu_family_init, ARCH_SPARC);          add_cpu_family(sparc_cpu_family_init, ARCH_SPARC);
691  #endif  #endif
Legend:
Removed from v.12  
changed lines
  Added in v.24
  ViewVC Help
Powered by ViewVC 1.1.26