2 typedef long long int64;
3 typedef unsigned long long uint64;
4 #elif defined(__TINYC__)
6 #define __builtin_va_list va_list
7 #define __builtin_va_start va_start
8 #define __builtin_va_end va_end
10 #define strcasecmp stricmp
11 #define strncasecmp strnicmp
12 #define __declspec(x) __attribute__((x))
14 typedef long long int64;
15 typedef unsigned long long uint64;
17 typedef __int64 int64;
18 typedef unsigned __int64 uint64;
21 #define __ENDIAN_PAD(x) (8 - (x))
23 #define __ENDIAN_PAD(x) 0
25 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
27 struct __ecereNameSpace__ecere__sys__BTNode;
29 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
31 struct __ecereNameSpace__ecere__sys__BinaryTree
33 struct __ecereNameSpace__ecere__sys__BTNode * root;
35 int (* CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, unsigned int a, unsigned int b);
36 void (* FreeKey)(void * key);
39 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
41 struct __ecereNameSpace__ecere__sys__OldList
50 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
52 struct __ecereNameSpace__ecere__com__Class
54 struct __ecereNameSpace__ecere__com__Class * prev;
55 struct __ecereNameSpace__ecere__com__Class * next;
61 int (* Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
62 void (* Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
65 struct __ecereNameSpace__ecere__com__Class * base;
66 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
67 struct __ecereNameSpace__ecere__sys__BinaryTree members;
68 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
69 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
70 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
71 struct __ecereNameSpace__ecere__sys__OldList derivatives;
75 struct __ecereNameSpace__ecere__com__Instance * module;
76 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace;
77 char * dataTypeString;
78 struct __ecereNameSpace__ecere__com__Instance * dataType;
81 void (* Initialize)();
83 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
85 unsigned int noExpansion;
86 char * defaultProperty;
87 unsigned int comRedefinition;
89 unsigned int isRemote;
90 unsigned int internalDecl;
92 unsigned int computeSize;
94 int destructionWatchOffset;
96 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
97 int inheritanceAccess;
100 struct __ecereNameSpace__ecere__sys__OldList conversions;
101 struct __ecereNameSpace__ecere__sys__OldList templateParams;
102 struct __ecereNameSpace__ecere__com__ClassTemplateArgument * templateArgs;
103 struct __ecereNameSpace__ecere__com__Class * templateClass;
104 struct __ecereNameSpace__ecere__sys__OldList templatized;
108 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
110 struct __ecereNameSpace__ecere__com__Instance
113 struct __ecereNameSpace__ecere__com__Class * _class;
117 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
119 struct __ecereNameSpace__ecere__com__Property
121 struct __ecereNameSpace__ecere__com__Property * prev;
122 struct __ecereNameSpace__ecere__com__Property * next;
124 unsigned int isProperty;
127 struct __ecereNameSpace__ecere__com__Class * _class;
128 char * dataTypeString;
129 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
130 struct __ecereNameSpace__ecere__com__Instance * dataType;
133 unsigned int (* IsSet)();
137 unsigned int conversion;
138 unsigned int watcherOffset;
140 unsigned int compiled;
141 unsigned int selfWatchable;
142 unsigned int isWatchable;
145 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
147 struct __ecereNameSpace__ecere__com__DataMember
149 struct __ecereNameSpace__ecere__com__DataMember * prev;
150 struct __ecereNameSpace__ecere__com__DataMember * next;
152 unsigned int isProperty;
155 struct __ecereNameSpace__ecere__com__Class * _class;
156 char * dataTypeString;
157 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
158 struct __ecereNameSpace__ecere__com__Instance * dataType;
162 struct __ecereNameSpace__ecere__sys__OldList members;
163 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
168 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
170 struct __ecereNameSpace__ecere__com__Method
173 struct __ecereNameSpace__ecere__com__Method * parent;
174 struct __ecereNameSpace__ecere__com__Method * left;
175 struct __ecereNameSpace__ecere__com__Method * right;
180 struct __ecereNameSpace__ecere__com__Class * _class;
182 char * dataTypeString;
183 struct __ecereNameSpace__ecere__com__Instance * dataType;
187 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
189 struct __ecereNameSpace__ecere__com__SerialBuffer
191 unsigned char * _buffer;
197 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
199 struct __ecereNameSpace__ecere__com__DataValue
217 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
219 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
225 char * dataTypeString;
226 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
228 struct __ecereNameSpace__ecere__com__DataValue expression;
234 struct __ecereNameSpace__ecere__com__DataMember * member;
235 struct __ecereNameSpace__ecere__com__Property * prop;
236 struct __ecereNameSpace__ecere__com__Method * method;
242 typedef unsigned int size_t;
244 void exit(int status);
246 void * calloc(size_t nmemb, size_t size);
248 void free(void * ptr);
250 void * malloc(size_t size);
252 void * realloc(void * ptr, size_t size);
254 long int strtol(const char * nptr, char ** endptr, int base);
256 long long int strtoll(const char * nptr, char ** endptr, int base);
258 unsigned long long int strtoull(const char * nptr, char ** endptr, int base);
260 extern int runtimePlatform;
269 extern int strlen(const char * );
271 extern char * strcpy(char * , const char * );
273 char * __ecereNameSpace__ecere__sys__GetExtension(char * string, char * output)
277 int len = strlen(string);
278 int limit = (__simpleStruct0 = len - (17), (0 > __simpleStruct0) ? 0 : __simpleStruct0);
281 for(c = len; c >= limit; c--)
287 strcpy(output, string + c + 1);
290 else if(ch == '/' || ch == '\\')
296 extern int strcmp(const char * , const char * );
298 extern char * strncpy(char * , const char * , int n);
300 extern int __ecereNameSpace__ecere__com__GetRuntimePlatform(void);
302 char * __ecereNameSpace__ecere__sys__StripLastDirectory(char * string, char * output)
306 if(runtimePlatform == 1 && !strcmp(string, "\\\\"))
313 int len = strlen(string);
315 for(c = len - 2; c >= 0; c--)
316 if(string[c] == '/' || string[c] == '\\')
318 else if(string[c] == '>' || (string[c] == ':' && c == 0))
323 if((runtimePlatform == 1) ? (c >= 0) : (c > 0))
325 strncpy(output, string, c);
328 if(runtimePlatform == 1 && c == 1 && output[0] == '\\' && output[1] == '\\')
334 strcpy(output, ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? "\\" : "/"));
341 strcpy(output, ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? "\\" : "/"));
347 return (((void *)0));
353 char * __ecereNameSpace__ecere__sys__SplitDirectory(const char * string, char * part, char * rest)
359 for(; (ch = string[c]) && (ch == '/' || ch == '\\'); c++)
362 part[len++] = ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? '\\' : '/');
365 for(; (ch = string[c]) && (ch != '/' && ch != '\\'); c++)
371 for(; (ch = string[c]) && (ch == '/' || ch == '\\'); c++)
373 strcpy(rest, string + c);
374 for(c = strlen(rest); c >= 0; c--)
375 if(ch != '/' && ch != '\\')
383 char * __ecereNameSpace__ecere__sys__GetLastDirectory(char * string, char * output)
386 int len = string ? strlen(string) : 0;
388 for(c = len - 2; c >= 0; c--)
389 if(string[c] == '/' || string[c] == '\\' || string[c] == ':' || string[c] == '>')
393 strcpy(output, string + c);
396 len = strlen(output);
397 if(len > 1 && (output[len - 1] == '\\' || output[len - 1] == '/'))
398 output[len - 1] = '\0';
402 unsigned int __ecereNameSpace__ecere__sys__SplitArchivePath(char * fileName, char * archiveName, char ** archiveFile)
404 if(fileName[0] == '<')
406 int c = strlen(fileName);
408 for(; c > 0 && fileName[c] != '>'; c--)
412 strncpy(archiveName, fileName + 1, c - 1);
413 archiveName[c - 1] = '\0';
414 *archiveFile = fileName + c + 1;
418 else if(fileName[0] == ':')
420 strcpy(archiveName, ":");
421 *archiveFile = fileName + 1;
427 extern char * strstr(char * , const char * );
429 extern int toupper(int);
431 extern char * strcat(char * , const char * );
433 extern int sprintf(char * , char * , ...);
435 char * __ecereNameSpace__ecere__sys__PathCatSlash(char * string, char * addedPath)
437 unsigned int modified = 0x0;
441 char fileName[797] = "", archiveName[797] = "", * file;
443 unsigned int isURL = 0x0;
446 if(__ecereNameSpace__ecere__sys__SplitArchivePath(string, archiveName, &file))
447 strcpy(fileName, file);
450 strcpy(fileName, string);
452 if(strstr(string, "http://") == string)
454 char * slash = strstr(fileName + 7, "/");
460 urlFileName = fileName + strlen(fileName);
462 if(strstr(addedPath, "http://") == addedPath)
464 strcpy(fileName, "http://");
468 else if(__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1)
470 if(addedPath[0] && addedPath[1] == ':' && addedPath[0] != '<')
472 fileName[0] = (char)toupper(addedPath[0]);
478 else if(addedPath[0] == '\\' && addedPath[1] == '\\')
480 fileName[0] = fileName[1] = '\\';
486 if(!modified && isURL && (addedPath[0] == '\\' || addedPath[0] == '/'))
488 urlFileName[0] = '/';
489 urlFileName[1] = '\0';
491 else if(!modified && (addedPath[0] == '\\' || addedPath[0] == '/'))
493 if(__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1)
495 if(addedPath[0] == '/' && !addedPath[1])
497 fileName[0] = addedPath[0];
501 else if(fileName[0] && fileName[1] == ':')
521 for(; addedPath[c]; )
523 char directory[4384LL];
528 for(; (ch = addedPath[c]) && (ch == '/' || ch == '\\'); c++)
530 for(; (ch = addedPath[c]) && (ch != '/' && ch != '\\'); c++)
532 if(isURL && ch == '?')
537 directory[len++] = ch;
539 directory[len] = '\0';
540 for(count = len - 1; count >= 0 && (directory[count] == ' ' || directory[count] == '\t'); count--)
542 directory[count] = '\0';
548 if(strstr(directory, "..") == directory && (!directory[2] || directory[2] == ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? '\\' : '/') || directory[2] == '/'))
550 int strLen = strlen(fileName) - 1;
554 for(; (ch = fileName[strLen]) && strLen > -1 && (ch == '/' || ch == '\\'); strLen--)
556 for(; (ch = fileName[strLen]) && strLen > -1 && (ch != '/' && ch != '\\' && ch != ':'); strLen--)
558 for(; (ch = fileName[strLen]) && strLen > -1 && (ch == '/' || ch == '\\'); strLen--)
564 strLen = (__simpleStruct0 = urlFileName - fileName, (strLen > __simpleStruct0) ? strLen : __simpleStruct0);
566 if(!strcmp(fileName + strLen + 1, ".."))
568 strcat(fileName, "/");
569 strcat(fileName, "..");
573 if(__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1)
575 if(!strLen && fileName[0] == '\\' && fileName[1] == '\\')
578 return (((void *)0));
587 fileName[strLen + 1] = '\0';
591 fileName[strLen + 1] = '\0';
603 strcpy(fileName, "..");
606 else if(strcmp(directory, "."))
608 int strLen = strlen(fileName);
609 unsigned int notZeroLen = strLen > 0;
611 if(strLen > 0 && (fileName[strLen - 1] == '/' || fileName[strLen - 1] == '\\'))
614 fileName[strLen++] = '/';
615 fileName[strLen] = '\0';
616 if(strLen + strlen(directory) > (797) - 3)
617 return (((void *)0));
618 strcat(fileName, directory);
621 if(isURL && ch == '/')
622 strcat(fileName, "/");
623 if(isURL && ch == '?')
625 strcat(fileName, addedPath + c);
630 sprintf(string, "<%s>%s", archiveName, fileName);
632 strcpy(string, fileName);
634 return modified ? string : (((void *)0));
637 char * __ecereNameSpace__ecere__sys__PathCat(char * string, char * addedPath)
639 unsigned int modified = 0x0;
643 char fileName[797] = "", archiveName[797] = "", * file;
645 unsigned int isURL = 0x0;
648 if(__ecereNameSpace__ecere__sys__SplitArchivePath(string, archiveName, &file))
649 strcpy(fileName, file);
652 strcpy(fileName, string);
654 if(strstr(string, "http://") == string)
656 char * slash = strstr(fileName + 7, "/");
662 urlFileName = fileName + strlen(fileName);
664 if(strstr(addedPath, "http://") == addedPath)
666 strcpy(fileName, "http://");
670 else if(runtimePlatform == 1)
672 if(addedPath[0] && addedPath[1] == ':' && addedPath[0] != '<')
674 fileName[0] = (char)toupper(addedPath[0]);
680 else if(addedPath[0] == '\\' && addedPath[1] == '\\')
682 fileName[0] = fileName[1] = '\\';
687 else if(fileName[0] == '/' && !archiveName[0] && strcmp(addedPath, "/"))
688 return (((void *)0));
690 if(!modified && isURL && (addedPath[0] == '\\' || addedPath[0] == '/'))
692 urlFileName[0] = '/';
693 urlFileName[1] = '\0';
695 else if(!modified && (addedPath[0] == '\\' || addedPath[0] == '/'))
697 if(runtimePlatform == 1)
699 if(addedPath[0] == '/' && !addedPath[1])
701 fileName[0] = addedPath[0];
705 else if(fileName[0] && fileName[1] == ':')
725 for(; addedPath[c]; )
727 char directory[4384LL];
732 for(; (ch = addedPath[c]) && (ch == '/' || ch == '\\'); c++)
734 for(; (ch = addedPath[c]) && (ch != '/' && ch != '\\'); c++)
736 if(isURL && ch == '?')
741 directory[len++] = ch;
743 directory[len] = '\0';
744 for(count = len - 1; count >= 0 && (directory[count] == ' ' || directory[count] == '\t'); count--)
746 directory[count] = '\0';
752 if(strstr(directory, "..") == directory && (!directory[2] || directory[2] == ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? '\\' : '/')))
754 int strLen = strlen(fileName) - 1;
758 unsigned int separator = 0x0;
760 for(; (ch = fileName[strLen]) && strLen > -1 && (ch == '/' || ch == '\\'); strLen--)
762 for(; (ch = fileName[strLen]) && strLen > -1 && (ch != '/' && ch != '\\' && ch != ':'); strLen--)
764 for(; (ch = fileName[strLen]) && strLen > -1 && (ch == '/' || ch == '\\'); strLen--)
770 strLen = (__simpleStruct0 = urlFileName - fileName, (strLen > __simpleStruct0) ? strLen : __simpleStruct0);
772 if(!strcmp(fileName + strLen + (separator ? 2 : 1), ".."))
774 strcat(fileName, ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? "\\" : "/"));
775 strcat(fileName, "..");
779 if(runtimePlatform == 1)
781 if(!strLen && fileName[0] == '\\' && fileName[1] == '\\')
784 return (((void *)0));
793 fileName[strLen + 1] = '\0';
797 fileName[strLen + 1] = '\0';
809 strcpy(fileName, "..");
812 else if(strcmp(directory, "."))
814 int strLen = strlen(fileName);
815 unsigned int notZeroLen = strLen > 0;
817 if(strLen > 0 && (fileName[strLen - 1] == '/' || fileName[strLen - 1] == '\\'))
822 fileName[strLen++] = '/';
824 fileName[strLen++] = ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? '\\' : '/');
826 fileName[strLen] = '\0';
827 if(strLen + strlen(directory) > (797) - 3)
828 return (((void *)0));
829 strcat(fileName, directory);
832 if(isURL && ch == '/')
833 strcat(fileName, "/");
834 if(isURL && ch == '?')
836 strcat(fileName, addedPath + c);
841 sprintf(string, "<%s>%s", archiveName, fileName);
843 strcpy(string, fileName);
845 return modified ? string : (((void *)0));
848 extern int strcasecmp(const char * , const char * );
850 char * __ecereNameSpace__ecere__sys__MakePathRelative(char * path, char * to, char * destination)
853 strcpy(destination, path);
856 char pathPart[4384LL], pathRest[797];
857 char toPart[4384LL], toRest[797];
858 unsigned int different = 0x0;
860 strcpy(pathRest, path);
862 destination[0] = '\0';
865 __ecereNameSpace__ecere__sys__SplitDirectory(toRest, toPart, toRest);
867 __ecereNameSpace__ecere__sys__SplitDirectory(pathRest, pathPart, pathRest);
868 if(different || ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? (strcasecmp) : strcmp)(toPart, pathPart))
871 strcat(destination, "..");
872 strcat(destination, ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? "\\" : "/"));
876 __ecereNameSpace__ecere__sys__PathCat(destination, pathPart);
879 __ecereNameSpace__ecere__sys__SplitDirectory(pathRest, pathPart, pathRest);
880 __ecereNameSpace__ecere__sys__PathCat(destination, pathPart);
886 unsigned int __ecereNameSpace__ecere__sys__StripExtension(char * string)
890 for(c = strlen(string); c >= 0; c--)
896 else if(string[c] == '\\' || string[c] == '/')
901 char * __ecereNameSpace__ecere__sys__ChangeExtension(char * string, char * ext, char * output)
903 strcpy(output, string);
904 __ecereNameSpace__ecere__sys__StripExtension(output);
911 void __ecereNameSpace__ecere__sys__PrintSize(char * string, unsigned int size, int prec)
917 sprintf(format, "%%.0%df", prec);
918 if(size > 1024 * 1024 * 1024)
920 sprintf(string, format, (float)size / (float)((float)(float)(1024 * 1024 * 1024)));
921 strcat(string, " GB");
923 else if(size > 1024 * 1024)
925 sprintf(string, format, (float)size / (float)((float)(float)(1024 * 1024)));
926 strcat(string, " MB");
930 sprintf(string, format, (float)size / (float)(float)1024);
931 strcat(string, " KB");
935 sprintf(string, "%d B", size);
938 void __ecereNameSpace__ecere__sys__PrintBigSize(char * string, double size, int prec)
940 if(size > (double)1024)
944 sprintf(format, "%%.0%df", prec);
945 if(size > 1024.0 * 1024.0 * 1024.0 * 1024.0)
947 sprintf(string, format, size / ((double)(double)(1024 * 1024) * 1024.0 * 1024.0));
948 strcat(string, " TB");
950 else if(size > 1024.0 * 1024.0 * 1024.0)
952 sprintf(string, format, size / (1024.0 * 1024.0 * 1024.0));
953 strcat(string, " GB");
955 else if(size > 1024.0 * 1024.0)
957 sprintf(string, format, size / (1024.0 * 1024.0));
958 strcat(string, " MB");
962 sprintf(string, format, size / 1024.0);
963 strcat(string, " KB");
967 sprintf(string, "%.0f B", size);
970 extern int strncmp(const char * , const char * , int n);
972 extern int strncasecmp(const char * , const char * , int n);
974 extern int tolower(int);
976 extern int isalnum(int c);
978 char * __ecereNameSpace__ecere__sys__SearchString(char * buffer, int start, char * subStr, unsigned int matchCase, unsigned int matchWord)
983 char * strBuffer = buffer + start;
984 int subLen = strlen(subStr);
985 char beforeChar = start ? *(strBuffer - 1) : (char)0;
986 int (* strcompare)(const char *, const char *, unsigned int) = matchCase ? strncmp : (strncasecmp);
988 for(ptr = strBuffer; *ptr; ptr++)
990 if(matchCase ? (*subStr == *ptr) : (tolower(*subStr) == tolower(*ptr)))
994 if(!strcompare(ptr, subStr, subLen) && (!((subStr[subLen - 1]) == '_' || isalnum((subStr[subLen - 1]))) || !((ptr[subLen]) == '_' || isalnum((ptr[subLen])))) && (!((subStr[0]) == '_' || isalnum((subStr[0]))) || !((beforeChar) == '_' || isalnum((beforeChar)))))
999 if(!strcompare(ptr, subStr, subLen))
1003 beforeChar = ptr[0];
1006 return (((void *)0));
1009 char * __ecereNameSpace__ecere__sys__RSearchString(char * buffer, char * subStr, int maxLen, unsigned int matchCase, unsigned int matchWord)
1011 if(buffer && subStr)
1013 int subLen = strlen(subStr);
1014 char * ptr1 = buffer + maxLen - subLen;
1015 char * ptr2 = buffer + maxLen - subLen - 1;
1016 int (* strcompare)(const char *, const char *, unsigned int) = matchCase ? strncmp : (strncasecmp);
1018 for(; ptr1 >= buffer; ptr1--, ptr2--)
1020 if(tolower(*subStr) == tolower(*ptr1))
1024 if(!strcompare(ptr1, subStr, subLen) && (!((subStr[subLen - 1]) == '_' || isalnum((subStr[subLen - 1]))) || !((ptr1[subLen]) == '_' || isalnum((ptr1[subLen])))) && (!((subStr[0]) == '_' || isalnum((subStr[0]))) || !((*ptr2) == '_' || isalnum((*ptr2)))))
1029 if(!strcompare(ptr1, subStr, subLen))
1035 return (((void *)0));
1038 extern void * memmove(void * , const void * , unsigned int size);
1040 int __ecereNameSpace__ecere__sys__Tokenize(char * string, int maxTokens, char * tokens[], unsigned int escapeBackSlashes)
1043 unsigned int quoted = 0x0;
1044 unsigned char * start = (((void *)0));
1045 unsigned int escaped = 0x0;
1046 char * output = string;
1048 for(; *string && count < maxTokens; string++, output++)
1050 if(output != string)
1058 if(output != string)
1061 else if(escapeBackSlashes && *string == '\\')
1063 else if(*string == '\"')
1072 memmove(start + 1, start, string - (char *)start);
1076 else if(*string == ' ' && !quoted)
1078 tokens[count++] = start;
1080 start = (((void *)0));
1083 else if(*string != ' ')
1093 if(*string == '\\' && escapeBackSlashes)
1098 if(start && count < maxTokens)
1100 tokens[count++] = start;
1106 extern char * strchr(char * , int);
1108 int __ecereNameSpace__ecere__sys__TokenizeWith(char * string, int maxTokens, char * tokens[], char * tokenizers, unsigned int escapeBackSlashes)
1111 unsigned int quoted = 0x0;
1112 unsigned char * start = (((void *)0));
1113 unsigned int escaped = 0x0;
1114 char * output = string;
1115 unsigned int quotedFromStart = 0x0;
1117 for(; *string && count < maxTokens; string++, output++)
1119 if(output != string)
1127 if(output != string)
1130 else if(escapeBackSlashes && *string == '\\')
1132 else if(*string == '\"')
1138 quotedFromStart = 0x0;
1144 else if(strchr(tokenizers, *string) && !quoted)
1146 tokens[count++] = start;
1148 start = (((void *)0));
1151 else if(!strchr(tokenizers, *string))
1155 quotedFromStart = 0x1;
1162 if(*string == '\\' && escapeBackSlashes)
1167 if(start && count < maxTokens)
1169 tokens[count++] = start;
1175 char * __ecereNameSpace__ecere__sys__TrimLSpaces(char * string, char * output)
1179 for(c = 0; string[c] && string[c] == ' '; c++)
1181 strcpy(output, string + c);
1185 char * __ecereNameSpace__ecere__sys__TrimRSpaces(char * string, char * output)
1189 for(c = strlen(string) - 1; c >= 0 && string[c] == ' '; c--)
1193 memmove(output, string, c + 1);
1194 output[c + 1] = '\0';
1201 void __ecereNameSpace__ecere__sys__ChangeCh(char * string, char ch1, char ch2)
1205 for(c = 0; string[c]; c++)
1206 if(string[c] == ch1)
1210 void __ecereNameSpace__ecere__sys__RepeatCh(char * string, int count, char ch)
1214 for(c = 0; c < count; c++)
1216 string[c] = (char)0;
1219 extern void * memcpy(void * , const void * , unsigned int size);
1221 char * __ecereNameSpace__ecere__sys__CopyString(char * string)
1225 int len = strlen(string);
1226 char * destination = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (len + 1));
1229 memcpy(destination, string, len + 1);
1233 return (((void *)0));
1236 unsigned int __ecereNameSpace__ecere__sys__GetString(char ** buffer, char * string, int max)
1240 unsigned int quoted = 0x0;
1241 unsigned int result = 0x1;
1245 string[0] = (char)0;
1250 if(!(ch = *((*buffer)++)))
1252 if((ch != '\n') && (ch != '\r') && (ch != ' ') && (ch != ',') && (ch != '\t'))
1259 for(c = 0; c < max - 1; c++)
1261 if(!quoted && ((ch == '\n') || (ch == '\r') || (ch == ' ') || (ch == ',') || (ch == '\t')))
1268 quoted ^= (unsigned int)1;
1273 if(!(ch = *(*buffer)))
1280 string[c] = (char)0;
1285 extern int atoi(const char * );
1287 int __ecereNameSpace__ecere__sys__GetValue(char ** buffer)
1291 __ecereNameSpace__ecere__sys__GetString(buffer, string, 20);
1292 return atoi(string);
1295 extern unsigned long strtoul(const char * nptr, char * * endptr, int base);
1297 unsigned int __ecereNameSpace__ecere__sys__GetHexValue(char ** buffer)
1301 __ecereNameSpace__ecere__sys__GetString(buffer, string, 20);
1302 return strtoul(string, (((void *)0)), 16);
1305 char * __ecereNameSpace__ecere__sys__StripQuotes(char * string, char * output)
1309 strcpy(output, (string[0] == '\"') ? (string + 1) : string);
1310 len = strlen(output);
1311 if(len && output[len - 1] == '\"')
1312 output[len - 1] = '\0';
1316 extern unsigned int isdigit(int);
1318 double __ecereNameSpace__ecere__sys__FloatFromString(char * string)
1321 float dec = (float)0, res = (float)0;
1325 for(c = 0; string[c]; c++)
1336 else if((ch == '.') && !dec)
1338 else if(isdigit(ch))
1343 res += (float)dig / dec;
1347 res = res * (float)10 + (float)dig;
1352 return (float)neg * res;
1355 unsigned int __ecereNameSpace__ecere__sys__GetAlNum(char ** buffer, char * string, int max)
1359 unsigned int result = 0x1;
1363 string[0] = (char)0;
1368 if(!(ch = *((*buffer)++)))
1377 for(c = 0; c < max - 1; c++)
1385 if(!(ch = *(*buffer)))
1392 string[c] = (char)0;
1397 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DefinedExpression;
1399 struct __ecereNameSpace__ecere__com__DefinedExpression;
1401 extern struct __ecereNameSpace__ecere__com__DefinedExpression * __ecereNameSpace__ecere__com__eSystem_RegisterDefine(char * name, char * value, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
1403 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
1405 struct __ecereNameSpace__ecere__com__GlobalFunction;
1407 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);
1409 void __ecereRegisterModule_String(struct __ecereNameSpace__ecere__com__Instance * module)
1411 struct __ecereNameSpace__ecere__com__Class * class;
1413 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::DIR_SEP", "(GetRuntimePlatform() == win32) ? '\\\\' : '/'", module, 4);
1414 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::DIR_SEPS", "(GetRuntimePlatform() == win32) ? \"\\\\\" : \"/\"", module, 4);
1415 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::MAX_F_STRING", "1025", module, 4);
1416 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::MAX_EXTENSION", "17", module, 4);
1417 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::MAX_FILENAME", "274", module, 4);
1418 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::MAX_DIRECTORY", "534", module, 4);
1419 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::MAX_LOCATION", "797", module, 4);
1420 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetExtension", "char * ecere::sys::GetExtension(char * string, char * output)", __ecereNameSpace__ecere__sys__GetExtension, module, 4);
1421 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::StripLastDirectory", "char * ecere::sys::StripLastDirectory(char * string, char * output)", __ecereNameSpace__ecere__sys__StripLastDirectory, module, 4);
1422 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::SplitDirectory", "char * ecere::sys::SplitDirectory(char * string, char * part, char * rest)", __ecereNameSpace__ecere__sys__SplitDirectory, module, 4);
1423 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetLastDirectory", "char * ecere::sys::GetLastDirectory(char * string, char * output)", __ecereNameSpace__ecere__sys__GetLastDirectory, module, 4);
1424 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::SplitArchivePath", "bool ecere::sys::SplitArchivePath(char * fileName, char * archiveName, char * * archiveFile)", __ecereNameSpace__ecere__sys__SplitArchivePath, module, 4);
1425 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::PathCatSlash", "char * ecere::sys::PathCatSlash(char * string, char * addedPath)", __ecereNameSpace__ecere__sys__PathCatSlash, module, 4);
1426 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::PathCat", "char * ecere::sys::PathCat(char * string, char * addedPath)", __ecereNameSpace__ecere__sys__PathCat, module, 4);
1427 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::MakePathRelative", "char * ecere::sys::MakePathRelative(char * path, char * to, char * destination)", __ecereNameSpace__ecere__sys__MakePathRelative, module, 4);
1428 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::StripExtension", "bool ecere::sys::StripExtension(char * string)", __ecereNameSpace__ecere__sys__StripExtension, module, 4);
1429 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::ChangeExtension", "char * ecere::sys::ChangeExtension(char * string, char * ext, char * output)", __ecereNameSpace__ecere__sys__ChangeExtension, module, 4);
1430 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::PrintSize", "void ecere::sys::PrintSize(char * string, uint size, int prec)", __ecereNameSpace__ecere__sys__PrintSize, module, 4);
1431 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::PrintBigSize", "void ecere::sys::PrintBigSize(char * string, double size, int prec)", __ecereNameSpace__ecere__sys__PrintBigSize, module, 4);
1432 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::SearchString", "char * ecere::sys::SearchString(char * buffer, int start, char * subStr, bool matchCase, bool matchWord)", __ecereNameSpace__ecere__sys__SearchString, module, 4);
1433 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::RSearchString", "char * ecere::sys::RSearchString(char * buffer, char * subStr, int maxLen, bool matchCase, bool matchWord)", __ecereNameSpace__ecere__sys__RSearchString, module, 4);
1434 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::Tokenize", "int ecere::sys::Tokenize(char * string, int maxTokens, char * tokens[], bool escapeBackSlashes)", __ecereNameSpace__ecere__sys__Tokenize, module, 4);
1435 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::TokenizeWith", "int ecere::sys::TokenizeWith(char * string, int maxTokens, char * tokens[], char * tokenizers, bool escapeBackSlashes)", __ecereNameSpace__ecere__sys__TokenizeWith, module, 4);
1436 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::TrimLSpaces", "char * ecere::sys::TrimLSpaces(char * string, char * output)", __ecereNameSpace__ecere__sys__TrimLSpaces, module, 4);
1437 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::TrimRSpaces", "char * ecere::sys::TrimRSpaces(char * string, char * output)", __ecereNameSpace__ecere__sys__TrimRSpaces, module, 4);
1438 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::ChangeCh", "void ecere::sys::ChangeCh(char * string, char ch1, char ch2)", __ecereNameSpace__ecere__sys__ChangeCh, module, 4);
1439 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::RepeatCh", "void ecere::sys::RepeatCh(char * string, int count, char ch)", __ecereNameSpace__ecere__sys__RepeatCh, module, 4);
1440 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::CopyString", "char * ecere::sys::CopyString(char * string)", __ecereNameSpace__ecere__sys__CopyString, module, 4);
1441 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetString", "bool ecere::sys::GetString(char * * buffer, char * string, int max)", __ecereNameSpace__ecere__sys__GetString, module, 4);
1442 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetValue", "int ecere::sys::GetValue(char * * buffer)", __ecereNameSpace__ecere__sys__GetValue, module, 4);
1443 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetHexValue", "uint ecere::sys::GetHexValue(char * * buffer)", __ecereNameSpace__ecere__sys__GetHexValue, module, 4);
1444 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::StripQuotes", "char * ecere::sys::StripQuotes(char * string, char * output)", __ecereNameSpace__ecere__sys__StripQuotes, module, 4);
1445 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::FloatFromString", "double ecere::sys::FloatFromString(char * string)", __ecereNameSpace__ecere__sys__FloatFromString, module, 4);
1446 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetAlNum", "bool ecere::sys::GetAlNum(char * * buffer, char * string, int max)", __ecereNameSpace__ecere__sys__GetAlNum, module, 4);
1449 void __ecereUnregisterModule_String(struct __ecereNameSpace__ecere__com__Instance * module)