version 0.2.39: fix of arith insts and start of re-structure

[fw/sdcc] / sim / ucsim / sim.src / argcl.h

diff --git a/sim/ucsim/sim.src/argcl.h b/sim/ucsim/sim.src/argcl.h
index ff65fa12ac982989e7813dd2673f4cc06d93a8a0..91d1f715891e5ffd2b39daff1d3456fff1d318ed 100644 (file)
--- a/sim/ucsim/sim.src/argcl.h
+++ b/sim/ucsim/sim.src/argcl.h
@@ -1,5 +1,5 @@
 /*
- * Simulator of microcontrollers (argcl.h)
+ * Simulator of microcontrollers (sim.src/argcl.h)
  *
  * Copyright (C) 1999,99 Drotos Daniel, Talker Bt.
  * 
@@ -25,8 +25,8 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 02111-1307, USA. */
 /*@1@*/
 
-#ifndef ARGCL_HEADER
-#define ARGCL_HEADER
+#ifndef SIM_ARGCL_HEADER
+#define SIM_ARGCL_HEADER
 
 #include "pobjcl.h"
 
@@ -39,23 +39,27 @@ class cl_arg: public cl_base
 {
 public:
   union {
-    long long i_value;
+    long i_value;
     double f_value;
     void *p_value;
   };
   char *s_value;
 
 public:  
-  cl_arg(long long lv);
+  cl_arg(long lv);
   cl_arg(char *lv);
   cl_arg(double fv);
   cl_arg(void *pv);
   ~cl_arg(void);
 
-  virtual long long get_ivalue(void);
+  virtual bool get_ivalue(long *value);
   virtual char *get_svalue(void);
   virtual double get_fvalue(void);
   virtual void *get_pvalue(void);
+  virtual bool get_bit_address(class cl_uc *uc, // input
+                              class cl_mem **mem, // outputs
+                              t_addr *mem_addr,
+                              t_mem *bit_mask) { return(DD_FALSE); }
 };
 
 
@@ -66,33 +70,80 @@ public:
 class cl_cmd_arg: public cl_arg
 {
 public:
-  cl_cmd_arg(long long i): cl_arg(i) {}
-  cl_cmd_arg(char *s): cl_arg(s) {}
+  class cl_uc *uc;
 
-  virtual int is_string(void) { return(0); }
-  virtual long get_address(void) { return(-1); }
+  bool interpreted_as_string;
+  union {
+    long number;
+    t_addr address;
+    t_mem data;
+    class cl_mem *memory;
+    class cl_hw *hw;
+    struct {
+      int len;
+      char *string;
+    } string;
+    struct {
+      t_mem *array;
+      int len;
+    } data_list;
+    struct {
+      class cl_mem *mem;
+      t_addr mem_address;
+      t_mem mask;
+    } bit;
+  } value;
+
+public:
+  cl_cmd_arg(class cl_uc *iuc, long i): cl_arg(i)
+  { uc= iuc; interpreted_as_string= DD_FALSE; }
+  cl_cmd_arg(class cl_uc *iuc, char *s): cl_arg(s)
+  { uc= iuc; interpreted_as_string= DD_FALSE; }
+  ~cl_cmd_arg(void);
+
+  virtual int is_string(void) { return(DD_FALSE); }
+  virtual bool get_address(t_addr *addr) { return(DD_FALSE); }
+  virtual bool as_address(void);
+  virtual bool as_number(void);
+  virtual bool as_data(void);
+  virtual bool as_string(void);
+  virtual bool as_memory(void);
+  virtual bool as_hw(class cl_uc *uc);
+  virtual bool as_bit(class cl_uc *uc);
 };
 
 class cl_cmd_int_arg: public cl_cmd_arg
 {
 public:
-  cl_cmd_int_arg(long long addr);
-
-  virtual long get_address(void) { return(get_ivalue()); }
+  cl_cmd_int_arg(class cl_uc *iuc, long addr);
+
+  virtual bool get_address(t_addr *addr);
+  virtual bool get_bit_address(class cl_uc *uc, // input
+                              class cl_mem **mem, // outputs
+                              t_addr *mem_addr,
+                              t_mem *bit_mask);
+  virtual bool as_string(void);
 };
 
 class cl_cmd_sym_arg: public cl_cmd_arg
 {
 public:
-  cl_cmd_sym_arg(char *sym);
-
-  virtual long get_address(void);
+  cl_cmd_sym_arg(class cl_uc *iuc, char *sym);
+
+  virtual bool get_address(t_addr *addr);
+  virtual bool get_bit_address(class cl_uc *uc, // input
+                              class cl_mem **mem, // outputs
+                              t_addr *mem_addr,
+                              t_mem *bit_mask);
+  virtual bool as_address(void);
+  virtual bool as_string(void);
+  virtual bool as_hw(class cl_uc *uc);
 };
 
 class cl_cmd_str_arg: public cl_cmd_arg
 {
 public:
-  cl_cmd_str_arg(char *str);
+  cl_cmd_str_arg(class cl_uc *iuc, char *str);
 
   virtual int is_string(void) { return(1); }
 };
@@ -103,10 +154,27 @@ public:
   class cl_cmd_arg *sfr, *bit;
 
 public:
-  cl_cmd_bit_arg(class cl_cmd_arg *asfr, class cl_cmd_arg *abit);
+  cl_cmd_bit_arg(class cl_uc *iuc,
+                class cl_cmd_arg *asfr, class cl_cmd_arg *abit);
   ~cl_cmd_bit_arg(void);
 
-  virtual long get_address(void);
+  virtual bool get_address(t_addr *addr);
+  virtual bool get_bit_address(class cl_uc *uc, // input
+                              class cl_mem **mem, // outputs
+                              t_addr *mem_addr,
+                              t_mem *bit_mask);
+};
+
+class cl_cmd_array_arg: public cl_cmd_arg
+{
+public:
+  class cl_cmd_arg *name, *index;
+
+public:
+  cl_cmd_array_arg(class cl_uc *iuc,
+                  class cl_cmd_arg *aname, class cl_cmd_arg *aindex);
+  ~cl_cmd_array_arg(void);
+  virtual bool as_hw(class cl_uc *uc);
 };
 
 
@@ -121,7 +189,7 @@ public:
   char *long_name;
 
 public:
-  cl_prg_arg(char sn, char *ln, long long lv);
+  cl_prg_arg(char sn, char *ln, long lv);
   cl_prg_arg(char sn, char *ln, char *lv);
   cl_prg_arg(char sn, char *ln, double fv);
   cl_prg_arg(char sn, char *ln, void *pv);