version 0.5.2

[fw/sdcc] / sim / ucsim / sim.src / test_mem_speed.cc

diff --git a/sim/ucsim/sim.src/test_mem_speed.cc b/sim/ucsim/sim.src/test_mem_speed.cc
index 05a046accf2e6937e6621ca036dcd0f050cf2574..920f13cf1e88d6195b3cb4f650b8296d3f2802f8 100644 (file)
--- a/sim/ucsim/sim.src/test_mem_speed.cc
+++ b/sim/ucsim/sim.src/test_mem_speed.cc
@@ -1,18 +1,99 @@
+#include <signal.h>
+#include <unistd.h>
+#include <stdio.h>
+
 #include "memcl.h"
+#include "hwcl.h"
+
+#include "newcmdcl.h"
+
+static int go;
+
+static void
+alarmed(int sig)
+{
+  go= 0;
+  signal(sig, alarmed);
+}
+
+class cl_hw_test: public cl_hw
+{
+public:
+  cl_hw_test(void): cl_hw(0, HW_PORT, 0, "0") {}
+  virtual t_mem r(class cl_cell *cell, t_addr addr);
+  virtual void write(class cl_mem *mem, t_addr addr, t_mem *val);
+};
+
+t_mem
+cl_hw_test::r(class cl_cell *cell, t_addr addr)
+{
+  return(cell->get());
+}
+
+void
+cl_hw_test::write(class cl_mem *mem, t_addr addr, t_mem *val)
+{
+}
+
+double
+do_rw_test(class cl_mem *mem, int time)
+{
+  double counter;
+  t_addr a;
+  t_mem d;
+
+  go= 1;
+  counter= 0;
+  alarm(time);
+  while (go)
+    for (a= 0; go && a < mem->size; a++)
+      {
+       t_mem d2;
+       for (d2= 0; go && d2 <= 255; d2++)
+         {
+           d2= mem->write(a, d2);
+           d= mem->read(a);
+           if (d != d2)
+             printf("%"_M_"d written to mem and %"_M_"d read back!\n", d2, d);
+           counter+= 1;
+         }
+      }
+  return(counter);
+}
 
 int
 main(void)
 {
+  int i;
   class cl_mem *mem;
-  t_addr a;
-  t_mem d;
+  class cl_m *m2;
+  class cl_console *con;
+
+  signal(SIGALRM, alarmed);
+  con= new cl_console(stdin, stdout, 0);
 
-  mem= new cl_mem(MEM_SFR, "egy", 0x10000, 8);
-  for (a= 0; a < mem->size; a++)
+  mem= new cl_mem(MEM_SFR, "egy", 0x10000, 8, 0);
+  mem->init();
+  printf("%g operations on classic memory within 5 sec\n",
+        do_rw_test(mem, 5));
+  //mem->dump(con);
+
+  m2= new cl_m(MEM_TYPES, "test", 0x10000, 8, 0);
+  m2->init();
+  printf("%g operations on new memory within 5 sec\n",
+        do_rw_test(m2, 5));
+
+  class cl_hw_test *hw= new cl_hw_test();
+  for (i= 0; i < 0x10000; i++)
     {
-      t_mem d2= a;
-      mem->write(a, &d2);
-      d= mem->read(a);
+      class cl_cell *c= m2->get_cell(i);
+      int dummy;
+      if (c)
+       c->add_hw(hw, &dummy);
     }
+  printf("%g operations on new memory within 5 sec with hw read\n",
+        do_rw_test(m2, 5));
+  //m2->dump(con);
+
   return(0);
 }