The Ecere SDK - sdk/blob - compiler/bootstrap/ecere/bootstrap/memory.c

   1 #if defined(__GNUC__)
   2 typedef long long int64;
   3 typedef unsigned long long uint64;
   4 #elif defined(__TINYC__)
   5 #include <stdarg.h>
   6 #define __builtin_va_list va_list
   7 #define __builtin_va_start va_start
   8 #define __builtin_va_end va_end
   9 #ifdef _WIN32
  10 #define strcasecmp stricmp
  11 #define strncasecmp strnicmp
  12 #define __declspec(x) __attribute__((x))
  13 #endif
  14 typedef long long int64;
  15 typedef unsigned long long uint64;
  16 #else
  17 typedef __int64 int64;
  18 typedef unsigned __int64 uint64;
  19 #endif
  20 #ifdef __BIG_ENDIAN__
  21 #define __ENDIAN_PAD(x) (8 - (x))
  22 #else
  23 #define __ENDIAN_PAD(x) 0
  24 #endif
  25 #include <stdint.h>
  26 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
  27
  28 struct __ecereNameSpace__ecere__sys__BTNode;
  29
  30 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
  31
  32 struct __ecereNameSpace__ecere__sys__BinaryTree
  33 {
  34 struct __ecereNameSpace__ecere__sys__BTNode * root;
  35 int count;
  36 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
  37 void (*  FreeKey)(void *  key);
  38 } __attribute__ ((gcc_struct));
  39
  40 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
  41
  42 struct __ecereNameSpace__ecere__sys__OldList
  43 {
  44 void *  first;
  45 void *  last;
  46 int count;
  47 unsigned int offset;
  48 unsigned int circ;
  49 } __attribute__ ((gcc_struct));
  50
  51 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
  52
  53 struct __ecereNameSpace__ecere__com__Class
  54 {
  55 struct __ecereNameSpace__ecere__com__Class * prev;
  56 struct __ecereNameSpace__ecere__com__Class * next;
  57 char *  name;
  58 int offset;
  59 int structSize;
  60 int (* *  _vTbl)();
  61 int vTblSize;
  62 int (*  Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
  63 void (*  Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
  64 int offsetClass;
  65 int sizeClass;
  66 struct __ecereNameSpace__ecere__com__Class * base;
  67 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
  68 struct __ecereNameSpace__ecere__sys__BinaryTree members;
  69 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
  70 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
  71 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
  72 struct __ecereNameSpace__ecere__sys__OldList derivatives;
  73 int memberID;
  74 int startMemberID;
  75 int type;
  76 struct __ecereNameSpace__ecere__com__Instance * module;
  77 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
  78 char *  dataTypeString;
  79 struct __ecereNameSpace__ecere__com__Instance * dataType;
  80 int typeSize;
  81 int defaultAlignment;
  82 void (*  Initialize)();
  83 int memberOffset;
  84 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
  85 char *  designerClass;
  86 unsigned int noExpansion;
  87 char *  defaultProperty;
  88 unsigned int comRedefinition;
  89 int count;
  90 unsigned int isRemote;
  91 unsigned int internalDecl;
  92 void *  data;
  93 unsigned int computeSize;
  94 int structAlignment;
  95 int destructionWatchOffset;
  96 unsigned int fixed;
  97 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
  98 int inheritanceAccess;
  99 char *  fullName;
 100 void *  symbol;
 101 struct __ecereNameSpace__ecere__sys__OldList conversions;
 102 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 103 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 104 struct __ecereNameSpace__ecere__com__Class * templateClass;
 105 struct __ecereNameSpace__ecere__sys__OldList templatized;
 106 int numParams;
 107 } __attribute__ ((gcc_struct));
 108
 109 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 110
 111 struct __ecereNameSpace__ecere__com__Instance
 112 {
 113 int (* *  _vTbl)();
 114 struct __ecereNameSpace__ecere__com__Class * _class;
 115 int _refCount;
 116 } __attribute__ ((gcc_struct));
 117
 118 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
 119
 120 struct __ecereNameSpace__ecere__com__Property
 121 {
 122 struct __ecereNameSpace__ecere__com__Property * prev;
 123 struct __ecereNameSpace__ecere__com__Property * next;
 124 char *  name;
 125 unsigned int isProperty;
 126 int memberAccess;
 127 int id;
 128 struct __ecereNameSpace__ecere__com__Class * _class;
 129 char *  dataTypeString;
 130 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 131 struct __ecereNameSpace__ecere__com__Instance * dataType;
 132 void (*  Set)();
 133 int (*  Get)();
 134 unsigned int (*  IsSet)();
 135 void *  data;
 136 void *  symbol;
 137 int vid;
 138 unsigned int conversion;
 139 unsigned int watcherOffset;
 140 char *  category;
 141 unsigned int compiled;
 142 unsigned int selfWatchable;
 143 unsigned int isWatchable;
 144 } __attribute__ ((gcc_struct));
 145
 146 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 147
 148 struct __ecereNameSpace__ecere__com__DataMember
 149 {
 150 struct __ecereNameSpace__ecere__com__DataMember * prev;
 151 struct __ecereNameSpace__ecere__com__DataMember * next;
 152 char *  name;
 153 unsigned int isProperty;
 154 int memberAccess;
 155 int id;
 156 struct __ecereNameSpace__ecere__com__Class * _class;
 157 char *  dataTypeString;
 158 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 159 struct __ecereNameSpace__ecere__com__Instance * dataType;
 160 int type;
 161 int offset;
 162 int memberID;
 163 struct __ecereNameSpace__ecere__sys__OldList members;
 164 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 165 int memberOffset;
 166 int structAlignment;
 167 } __attribute__ ((gcc_struct));
 168
 169 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
 170
 171 struct __ecereNameSpace__ecere__com__Method
 172 {
 173 char *  name;
 174 struct __ecereNameSpace__ecere__com__Method * parent;
 175 struct __ecereNameSpace__ecere__com__Method * left;
 176 struct __ecereNameSpace__ecere__com__Method * right;
 177 int depth;
 178 int (*  function)();
 179 int vid;
 180 int type;
 181 struct __ecereNameSpace__ecere__com__Class * _class;
 182 void *  symbol;
 183 char *  dataTypeString;
 184 struct __ecereNameSpace__ecere__com__Instance * dataType;
 185 int memberAccess;
 186 } __attribute__ ((gcc_struct));
 187
 188 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 189
 190 struct __ecereNameSpace__ecere__com__SerialBuffer
 191 {
 192 unsigned char *  _buffer;
 193 unsigned int count;
 194 unsigned int _size;
 195 unsigned int pos;
 196 } __attribute__ ((gcc_struct));
 197
 198 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
 199
 200 struct __ecereNameSpace__ecere__com__DataValue
 201 {
 202 union
 203 {
 204 char c;
 205 unsigned char uc;
 206 short s;
 207 unsigned short us;
 208 int i;
 209 unsigned int ui;
 210 void *  p;
 211 float f;
 212 double d;
 213 long long i64;
 214 uint64 ui64;
 215 } __attribute__ ((gcc_struct));
 216 } __attribute__ ((gcc_struct));
 217
 218 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 219
 220 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 221 {
 222 union
 223 {
 224 struct
 225 {
 226 char *  dataTypeString;
 227 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 228 } __attribute__ ((gcc_struct));
 229 struct __ecereNameSpace__ecere__com__DataValue expression;
 230 struct
 231 {
 232 char *  memberString;
 233 union
 234 {
 235 struct __ecereNameSpace__ecere__com__DataMember * member;
 236 struct __ecereNameSpace__ecere__com__Property * prop;
 237 struct __ecereNameSpace__ecere__com__Method * method;
 238 } __attribute__ ((gcc_struct));
 239 } __attribute__ ((gcc_struct));
 240 } __attribute__ ((gcc_struct));
 241 } __attribute__ ((gcc_struct));
 242
 243 extern void *  memmove(void * , const void * , unsigned int size);
 244
 245 void __ecereNameSpace__ecere__sys__MoveBytes(void * dest, const void * source, unsigned int count)
 246 {
 247 memmove(dest, source, count);
 248 }
 249
 250 extern void *  memcpy(void * , const void * , unsigned int size);
 251
 252 void __ecereNameSpace__ecere__sys__CopyBytes(void * dest, const void * source, unsigned int count)
 253 {
 254 memcpy(dest, source, count);
 255 }
 256
 257 void __ecereNameSpace__ecere__sys__CopyBytesBy2(void * dest, const void * source, unsigned int count)
 258 {
 259 memcpy(dest, source, count << 1);
 260 }
 261
 262 void __ecereNameSpace__ecere__sys__CopyBytesBy4(void * dest, const void * source, unsigned int count)
 263 {
 264 memcpy(dest, source, count << 2);
 265 }
 266
 267 extern void memset(void *  area, unsigned char value, unsigned int count);
 268
 269 void __ecereNameSpace__ecere__sys__FillBytes(void * area, unsigned char value, unsigned int count)
 270 {
 271 memset(area, value, count);
 272 }
 273
 274 void __ecereNameSpace__ecere__sys__FillBytesBy2(void * area, unsigned short value, unsigned int count)
 275 {
 276 unsigned short * dest = area;
 277 int c;
 278
 279 for(c = 0; c < count; c++)
 280 dest[c] = value;
 281 }
 282
 283 void __ecereNameSpace__ecere__sys__FillBytesBy4(void * area, unsigned int value, unsigned int count)
 284 {
 285 unsigned int * dest = area;
 286 int c;
 287
 288 for(c = 0; c < count; c++)
 289 dest[c] = value;
 290 }
 291
 292 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
 293
 294 struct __ecereNameSpace__ecere__com__GlobalFunction;
 295
 296 extern struct __ecereNameSpace__ecere__com__GlobalFunction * __ecereNameSpace__ecere__com__eSystem_RegisterFunction(char *  name, char *  type, void *  func, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
 297
 298 void __ecereRegisterModule_memory(struct __ecereNameSpace__ecere__com__Instance * module)
 299 {
 300 struct __ecereNameSpace__ecere__com__Class * class;
 301
 302 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::MoveBytes", "void ecere::sys::MoveBytes(void * dest, void * source, uint count)", __ecereNameSpace__ecere__sys__MoveBytes, module, 1);
 303 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::CopyBytes", "void ecere::sys::CopyBytes(void * dest, void * source, uint count)", __ecereNameSpace__ecere__sys__CopyBytes, module, 1);
 304 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::CopyBytesBy2", "void ecere::sys::CopyBytesBy2(void * dest, void * source, uint count)", __ecereNameSpace__ecere__sys__CopyBytesBy2, module, 1);
 305 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::CopyBytesBy4", "void ecere::sys::CopyBytesBy4(void * dest, void * source, uint count)", __ecereNameSpace__ecere__sys__CopyBytesBy4, module, 1);
 306 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::FillBytes", "void ecere::sys::FillBytes(void * area, byte value, uint count)", __ecereNameSpace__ecere__sys__FillBytes, module, 1);
 307 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::FillBytesBy2", "void ecere::sys::FillBytesBy2(void * area, uint16 value, uint count)", __ecereNameSpace__ecere__sys__FillBytesBy2, module, 1);
 308 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::FillBytesBy4", "void ecere::sys::FillBytesBy4(void * area, uint value, uint count)", __ecereNameSpace__ecere__sys__FillBytesBy4, module, 1);
 309 }
 310
 311 void __ecereUnregisterModule_memory(struct __ecereNameSpace__ecere__com__Instance * module)
 312 {
 313
 314 }
 315