1 /* Code generated from eC source file: String.ec */
3 typedef long long int64;
4 typedef unsigned long long uint64;
8 #elif defined(__TINYC__)
10 #define __builtin_va_list va_list
11 #define __builtin_va_start va_start
12 #define __builtin_va_end va_end
14 #define strcasecmp stricmp
15 #define strncasecmp strnicmp
16 #define __declspec(x) __attribute__((x))
20 typedef long long int64;
21 typedef unsigned long long uint64;
23 typedef __int64 int64;
24 typedef unsigned __int64 uint64;
27 #define __ENDIAN_PAD(x) (8 - (x))
29 #define __ENDIAN_PAD(x) 0
32 #include <sys/types.h>
34 #if (defined(__WORDSIZE) && __WORDSIZE == 8) || defined(__x86_64__)
40 #define arch_PointerSize sizeof(void *)
41 #define structSize_Instance (_64BIT ? 24 : 12)
43 extern void * __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
45 extern void * __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
47 extern void * __ecereNameSpace__ecere__com__eSystem_Renew(void * memory, unsigned int size);
49 extern void * __ecereNameSpace__ecere__com__eSystem_Renew0(void * memory, unsigned int size);
51 extern void __ecereNameSpace__ecere__com__eSystem_Delete(void * memory);
53 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
55 struct __ecereNameSpace__ecere__sys__BTNode;
57 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
59 struct __ecereNameSpace__ecere__sys__BinaryTree
61 struct __ecereNameSpace__ecere__sys__BTNode * root;
63 int (* CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
64 void (* FreeKey)(void * key);
65 } __attribute__ ((gcc_struct));
67 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
69 struct __ecereNameSpace__ecere__sys__OldList
76 } __attribute__ ((gcc_struct));
78 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
80 struct __ecereNameSpace__ecere__com__Class
82 struct __ecereNameSpace__ecere__com__Class * prev;
83 struct __ecereNameSpace__ecere__com__Class * next;
89 int (* Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
90 void (* Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
93 struct __ecereNameSpace__ecere__com__Class * base;
94 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
95 struct __ecereNameSpace__ecere__sys__BinaryTree members;
96 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
97 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
98 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
99 struct __ecereNameSpace__ecere__sys__OldList derivatives;
103 struct __ecereNameSpace__ecere__com__Instance * module;
104 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace;
105 char * dataTypeString;
106 struct __ecereNameSpace__ecere__com__Instance * dataType;
108 int defaultAlignment;
109 void (* Initialize)();
111 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
112 char * designerClass;
113 unsigned int noExpansion;
114 char * defaultProperty;
115 unsigned int comRedefinition;
117 unsigned int isRemote;
118 unsigned int internalDecl;
120 unsigned int computeSize;
122 int destructionWatchOffset;
124 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
125 int inheritanceAccess;
128 struct __ecereNameSpace__ecere__sys__OldList conversions;
129 struct __ecereNameSpace__ecere__sys__OldList templateParams;
130 struct __ecereNameSpace__ecere__com__ClassTemplateArgument * templateArgs;
131 struct __ecereNameSpace__ecere__com__Class * templateClass;
132 struct __ecereNameSpace__ecere__sys__OldList templatized;
134 unsigned int isInstanceClass;
135 unsigned int byValueSystemClass;
136 } __attribute__ ((gcc_struct));
138 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, char * name);
140 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
142 struct __ecereNameSpace__ecere__com__Property
144 struct __ecereNameSpace__ecere__com__Property * prev;
145 struct __ecereNameSpace__ecere__com__Property * next;
147 unsigned int isProperty;
150 struct __ecereNameSpace__ecere__com__Class * _class;
151 char * dataTypeString;
152 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
153 struct __ecereNameSpace__ecere__com__Instance * dataType;
154 void (* Set)(void * , int);
155 int (* Get)(void * );
156 unsigned int (* IsSet)(void * );
160 unsigned int conversion;
161 unsigned int watcherOffset;
163 unsigned int compiled;
164 unsigned int selfWatchable;
165 unsigned int isWatchable;
166 } __attribute__ ((gcc_struct));
168 extern void __ecereNameSpace__ecere__com__eInstance_FireSelfWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
170 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
172 struct __ecereNameSpace__ecere__com__Instance
175 struct __ecereNameSpace__ecere__com__Class * _class;
177 } __attribute__ ((gcc_struct));
179 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
181 struct __ecereNameSpace__ecere__com__DataMember
183 struct __ecereNameSpace__ecere__com__DataMember * prev;
184 struct __ecereNameSpace__ecere__com__DataMember * next;
186 unsigned int isProperty;
189 struct __ecereNameSpace__ecere__com__Class * _class;
190 char * dataTypeString;
191 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
192 struct __ecereNameSpace__ecere__com__Instance * dataType;
196 struct __ecereNameSpace__ecere__sys__OldList members;
197 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
200 } __attribute__ ((gcc_struct));
202 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
204 struct __ecereNameSpace__ecere__com__Method
207 struct __ecereNameSpace__ecere__com__Method * parent;
208 struct __ecereNameSpace__ecere__com__Method * left;
209 struct __ecereNameSpace__ecere__com__Method * right;
214 struct __ecereNameSpace__ecere__com__Class * _class;
216 char * dataTypeString;
217 struct __ecereNameSpace__ecere__com__Instance * dataType;
219 } __attribute__ ((gcc_struct));
221 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
223 struct __ecereNameSpace__ecere__com__SerialBuffer
225 unsigned char * _buffer;
229 } __attribute__ ((gcc_struct));
231 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
233 struct __ecereNameSpace__ecere__com__DataValue
248 } __attribute__ ((gcc_struct));
249 } __attribute__ ((gcc_struct));
251 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
253 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
259 char * dataTypeString;
260 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
261 } __attribute__ ((gcc_struct));
262 struct __ecereNameSpace__ecere__com__DataValue expression;
268 struct __ecereNameSpace__ecere__com__DataMember * member;
269 struct __ecereNameSpace__ecere__com__Property * prop;
270 struct __ecereNameSpace__ecere__com__Method * method;
271 } __attribute__ ((gcc_struct));
272 } __attribute__ ((gcc_struct));
273 } __attribute__ ((gcc_struct));
274 } __attribute__ ((gcc_struct));
276 void exit(int status);
278 void * calloc(size_t nmemb, size_t size);
280 void free(void * ptr);
282 void * malloc(size_t size);
284 void * realloc(void * ptr, size_t size);
286 long int strtol(const char * nptr, char ** endptr, int base);
288 long long int strtoll(const char * nptr, char ** endptr, int base);
290 unsigned long long int strtoull(const char * nptr, char ** endptr, int base);
292 extern int runtimePlatform;
301 extern size_t strlen(const char * );
303 extern char * strcpy(char * , const char * );
305 char * __ecereNameSpace__ecere__sys__GetExtension(char * string, char * output)
309 int len = strlen(string);
310 int limit = (__simpleStruct0 = len - (17), (0 > __simpleStruct0) ? 0 : __simpleStruct0);
313 for(c = len; c >= limit; c--)
319 strcpy(output, string + c + 1);
322 else if(ch == '/' || ch == '\\')
328 extern int strcmp(const char * , const char * );
330 extern void * memmove(void * , const void * , size_t size);
332 extern int __ecereNameSpace__ecere__com__GetRuntimePlatform(void);
334 char * __ecereNameSpace__ecere__sys__StripLastDirectory(char * string, char * output)
338 if(runtimePlatform == 1 && !strcmp(string, "\\\\"))
345 int len = strlen(string);
347 for(c = len - 2; c >= 0; c--)
348 if(string[c] == '/' || string[c] == '\\')
350 else if(string[c] == '>' || (string[c] == ':' && c == 0))
355 if((runtimePlatform == 1) ? (c >= 0) : (c > 0))
357 memmove(output, string, c);
360 if(runtimePlatform == 1 && c == 1 && output[0] == '\\' && output[1] == '\\')
366 strcpy(output, ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? "\\" : "/"));
373 strcpy(output, ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? "\\" : "/"));
379 return (((void *)0));
385 char * __ecereNameSpace__ecere__sys__SplitDirectory(const char * string, char * part, char * rest)
391 for(; (ch = string[c]) && (ch == '/' || ch == '\\'); c++)
394 part[len++] = ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? '\\' : '/');
397 for(; (ch = string[c]) && (ch != '/' && ch != '\\'); c++)
403 for(; (ch = string[c]) && (ch == '/' || ch == '\\'); c++)
405 memmove(rest, string + c, strlen(string + c) + 1);
406 for(c = strlen(rest); c >= 0; c--)
407 if(ch != '/' && ch != '\\')
415 char * __ecereNameSpace__ecere__sys__GetLastDirectory(char * string, char * output)
418 int len = string ? strlen(string) : 0;
420 for(c = len - 2; c >= 0; c--)
421 if(string[c] == '/' || string[c] == '\\' || string[c] == ':' || string[c] == '>')
425 memmove(output, string + c, strlen(string + c) + 1);
428 len = strlen(output);
429 if(len > 1 && (output[len - 1] == '\\' || output[len - 1] == '/'))
430 output[len - 1] = '\0';
434 extern char * strncpy(char * , const char * , size_t n);
436 unsigned int __ecereNameSpace__ecere__sys__SplitArchivePath(char * fileName, char * archiveName, char ** archiveFile)
438 if(fileName[0] == '<')
440 int c = strlen(fileName);
442 for(; c > 0 && fileName[c] != '>'; c--)
446 strncpy(archiveName, fileName + 1, c - 1);
447 archiveName[c - 1] = '\0';
448 *archiveFile = fileName + c + 1;
452 else if(fileName[0] == ':')
454 strcpy(archiveName, ":");
455 *archiveFile = fileName + 1;
461 extern char * strstr(const char * , const char * );
463 extern void * memcpy(void * , const void * , size_t size);
465 extern int toupper(int);
467 extern char * strcat(char * , const char * );
469 extern int sprintf(char * , char * , ...);
471 char * __ecereNameSpace__ecere__sys__PathCatSlash(char * string, char * addedPath)
473 unsigned int modified = 0x0;
477 char fileName[797] = "", archiveName[797] = "", * file = (((void *)0));
479 unsigned int isURL = 0x0;
480 unsigned int isArchive = __ecereNameSpace__ecere__sys__SplitArchivePath(string, archiveName, &file);
482 char * protocolSymbol;
484 strcpy(fileName, isArchive ? file : string);
487 protocolSymbol = (fileName[0] && fileName[0] != '.' && fileName[0] != '/' && fileName[0] != '\\' && fileName[1] != ':') ? strstr(fileName, "://") : (((void *)0));
490 char * slash = strstr(protocolSymbol + 3, "/");
496 urlFileName = fileName + strlen(fileName);
499 protocolSymbol = (addedPath[0] && addedPath[0] != '.' && addedPath[0] != '/' && addedPath[0] != '\\' && addedPath[1] != ':') ? strstr(addedPath, "://") : (((void *)0));
502 int len = protocolSymbol - addedPath + 3;
504 memcpy(fileName, addedPath, len);
505 fileName[len] = (char)0;
509 else if(__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1)
511 if(addedPath[0] && addedPath[1] == ':' && addedPath[0] != '<')
513 fileName[0] = (char)toupper(addedPath[0]);
519 else if(addedPath[0] == '\\' && addedPath[1] == '\\')
521 fileName[0] = fileName[1] = '\\';
527 if(!modified && isURL && (addedPath[0] == '\\' || addedPath[0] == '/'))
529 urlFileName[0] = '/';
530 urlFileName[1] = '\0';
532 else if(!modified && (addedPath[0] == '\\' || addedPath[0] == '/'))
534 if(__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1)
536 if(addedPath[0] == '/' && !addedPath[1])
538 fileName[0] = addedPath[0];
542 else if(fileName[0] && fileName[1] == ':')
562 for(; addedPath[c]; )
564 char directory[4384LL];
569 for(; (ch = addedPath[c]) && (ch == '/' || ch == '\\'); c++)
571 for(; (ch = addedPath[c]) && (ch != '/' && ch != '\\'); c++)
573 if(isURL && ch == '?')
578 directory[len++] = ch;
580 directory[len] = '\0';
581 for(count = len - 1; count >= 0 && (directory[count] == ' ' || directory[count] == '\t'); count--)
583 directory[count] = '\0';
589 if(strstr(directory, "..") == directory && (!directory[2] || directory[2] == ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? '\\' : '/') || directory[2] == '/'))
591 int strLen = strlen(fileName) - 1;
595 for(; strLen > -1 && (ch = fileName[strLen]) && (ch == '/' || ch == '\\'); strLen--)
597 for(; strLen > -1 && (ch = fileName[strLen]) && (ch != '/' && ch != '\\' && ch != ':'); strLen--)
599 for(; strLen > -1 && (ch = fileName[strLen]) && (ch == '/' || ch == '\\'); strLen--)
605 strLen = (__simpleStruct0 = urlFileName - fileName, (strLen > __simpleStruct0) ? strLen : __simpleStruct0);
607 if(!strcmp(fileName + strLen + 1, ".."))
609 strcat(fileName, "/");
610 strcat(fileName, "..");
614 if(__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1)
616 if(!strLen && fileName[0] == '\\' && fileName[1] == '\\')
619 return (((void *)0));
628 fileName[strLen + 1] = '\0';
632 fileName[strLen + 1] = '\0';
644 strcpy(fileName, "..");
647 else if(strcmp(directory, "."))
649 int strLen = strlen(fileName);
650 unsigned int notZeroLen = strLen > 0;
652 if(strLen > 0 && (fileName[strLen - 1] == '/' || fileName[strLen - 1] == '\\'))
655 fileName[strLen++] = '/';
656 fileName[strLen] = '\0';
657 if(strLen + strlen(directory) > (797) - 3)
658 return (((void *)0));
659 strcat(fileName, directory);
662 if(isURL && ch == '/')
663 strcat(fileName, "/");
664 if(isURL && ch == '?')
666 strcat(fileName, addedPath + c);
671 sprintf(string, "<%s>%s", archiveName, fileName);
673 strcpy(string, fileName);
675 return modified ? string : (((void *)0));
678 char * __ecereNameSpace__ecere__sys__PathCat(char * string, char * addedPath)
680 unsigned int modified = 0x0;
684 char fileName[797] = "", archiveName[797] = "", * file = (((void *)0));
686 unsigned int isURL = 0x0;
687 unsigned int isArchive = __ecereNameSpace__ecere__sys__SplitArchivePath(string, archiveName, &file);
689 char * protocolSymbol;
691 strcpy(fileName, isArchive ? file : string);
694 protocolSymbol = (fileName[0] && fileName[0] != '.' && fileName[0] != '/' && fileName[0] != '\\' && fileName[1] != ':') ? strstr(fileName, "://") : (((void *)0));
697 char * slash = strstr(protocolSymbol + 3, "/");
703 urlFileName = fileName + strlen(fileName);
706 protocolSymbol = (addedPath[0] && addedPath[0] != '.' && addedPath[0] != '/' && addedPath[0] != '\\' && addedPath[1] != ':') ? strstr(addedPath, "://") : (((void *)0));
709 int len = protocolSymbol - addedPath + 3;
711 memcpy(fileName, addedPath, len);
712 fileName[len] = (char)0;
716 else if(runtimePlatform == 1)
718 if(addedPath[0] && addedPath[1] == ':' && addedPath[0] != '<')
720 fileName[0] = (char)toupper(addedPath[0]);
726 else if(addedPath[0] == '\\' && addedPath[1] == '\\')
728 fileName[0] = fileName[1] = '\\';
733 else if(fileName[0] == '/' && !archiveName[0] && strcmp(addedPath, "/"))
734 return (((void *)0));
736 if(!modified && isURL && (addedPath[0] == '\\' || addedPath[0] == '/'))
738 urlFileName[0] = '/';
739 urlFileName[1] = '\0';
741 else if(!modified && (addedPath[0] == '\\' || addedPath[0] == '/'))
743 if(runtimePlatform == 1)
745 if(addedPath[0] == '/' && !addedPath[1])
747 fileName[0] = addedPath[0];
751 else if(fileName[0] && fileName[1] == ':')
771 for(; addedPath[c]; )
773 char directory[4384LL];
778 for(; (ch = addedPath[c]) && (ch == '/' || ch == '\\'); c++)
780 for(; (ch = addedPath[c]) && (ch != '/' && ch != '\\'); c++)
782 if(isURL && ch == '?')
787 directory[len++] = ch;
789 directory[len] = '\0';
790 for(count = len - 1; count >= 0 && (directory[count] == ' ' || directory[count] == '\t'); count--)
792 directory[count] = '\0';
798 if(strstr(directory, "..") == directory && (!directory[2] || directory[2] == ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? '\\' : '/')))
800 int strLen = strlen(fileName) - 1;
804 unsigned int separator = 0x0;
806 for(; strLen > -1 && (ch = fileName[strLen]) && (ch == '/' || ch == '\\'); strLen--)
808 for(; strLen > -1 && (ch = fileName[strLen]) && (ch != '/' && ch != '\\' && ch != ':'); strLen--)
810 for(; strLen > -1 && (ch = fileName[strLen]) && (ch == '/' || ch == '\\'); strLen--)
816 strLen = (__simpleStruct0 = urlFileName - fileName, (strLen > __simpleStruct0) ? strLen : __simpleStruct0);
818 if(!strcmp(fileName + strLen + (separator ? 2 : 1), ".."))
820 strcat(fileName, ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? "\\" : "/"));
821 strcat(fileName, "..");
825 if(runtimePlatform == 1)
827 if(!strLen && fileName[0] == '\\' && fileName[1] == '\\')
830 return (((void *)0));
839 fileName[strLen + 1] = '\0';
843 fileName[strLen + 1] = '\0';
855 strcpy(fileName, "..");
858 else if(strcmp(directory, "."))
860 int strLen = strlen(fileName);
861 unsigned int notZeroLen = strLen > 0;
863 if(strLen > 0 && (fileName[strLen - 1] == '/' || fileName[strLen - 1] == '\\'))
868 fileName[strLen++] = '/';
870 fileName[strLen++] = ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? '\\' : '/');
872 fileName[strLen] = '\0';
873 if(strLen + strlen(directory) > (797) - 3)
874 return (((void *)0));
875 strcat(fileName, directory);
878 if(isURL && ch == '/')
879 strcat(fileName, "/");
880 if(isURL && ch == '?')
882 strcat(fileName, addedPath + c);
887 sprintf(string, "<%s>%s", archiveName, fileName);
889 strcpy(string, fileName);
891 return modified ? string : (((void *)0));
894 extern int strcasecmp(const char * , const char * );
896 char * __ecereNameSpace__ecere__sys__MakePathRelative(char * path, char * to, char * destination)
901 memmove(destination, path, strlen(path) + 1);
904 char pathPart[4384LL], pathRest[797];
905 char toPart[4384LL], toRest[797];
906 unsigned int different = 0x0;
908 strcpy(pathRest, path);
910 destination[0] = '\0';
913 __ecereNameSpace__ecere__sys__SplitDirectory(toRest, toPart, toRest);
915 __ecereNameSpace__ecere__sys__SplitDirectory(pathRest, pathPart, pathRest);
916 if(different || ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? (strcasecmp) : strcmp)(toPart, pathPart))
919 strcat(destination, "..");
920 strcat(destination, ((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? "\\" : "/"));
924 __ecereNameSpace__ecere__sys__PathCat(destination, pathPart);
927 __ecereNameSpace__ecere__sys__SplitDirectory(pathRest, pathPart, pathRest);
928 __ecereNameSpace__ecere__sys__PathCat(destination, pathPart);
931 len = strlen(destination);
932 if(len > 1 && (destination[len - 1] == '/' || destination[len - 1] == '\\'))
933 destination[--len] = '\0';
937 unsigned int __ecereNameSpace__ecere__sys__StripExtension(char * string)
941 for(c = strlen(string); c >= 0; c--)
947 else if(string[c] == '\\' || string[c] == '/')
952 char * __ecereNameSpace__ecere__sys__ChangeExtension(char * string, char * ext, char * output)
955 strcpy(output, string);
956 __ecereNameSpace__ecere__sys__StripExtension(output);
963 void __ecereNameSpace__ecere__sys__PrintSize(char * string, unsigned int size, int prec)
969 sprintf(format, "%%.0%df", prec);
970 if(size > 1024 * 1024 * 1024)
972 sprintf(string, format, (float)size / (float)((float)(float)(1024 * 1024 * 1024)));
973 strcat(string, " GB");
975 else if(size > 1024 * 1024)
977 sprintf(string, format, (float)size / (float)((float)(float)(1024 * 1024)));
978 strcat(string, " MB");
982 sprintf(string, format, (float)size / (float)1024);
983 strcat(string, " KB");
987 sprintf(string, "%d B", size);
990 void __ecereNameSpace__ecere__sys__PrintBigSize(char * string, double size, int prec)
992 if(size > (double)1024)
996 sprintf(format, "%%.0%df", prec);
997 if(size > 1024.0 * 1024.0 * 1024.0 * 1024.0)
999 sprintf(string, format, size / ((double)(double)(1024 * 1024) * 1024.0 * 1024.0));
1000 strcat(string, " TB");
1002 else if(size > 1024.0 * 1024.0 * 1024.0)
1004 sprintf(string, format, size / (1024.0 * 1024.0 * 1024.0));
1005 strcat(string, " GB");
1007 else if(size > 1024.0 * 1024.0)
1009 sprintf(string, format, size / (1024.0 * 1024.0));
1010 strcat(string, " MB");
1014 sprintf(string, format, size / 1024.0);
1015 strcat(string, " KB");
1019 sprintf(string, "%.0f B", size);
1022 extern int strncmp(const char * , const char * , size_t n);
1024 extern int strncasecmp(const char * , const char * , size_t n);
1026 extern int tolower(int);
1028 extern int isalnum(int c);
1030 char * __ecereNameSpace__ecere__sys__SearchString(char * buffer, int start, char * subStr, unsigned int matchCase, unsigned int matchWord)
1032 if(buffer && subStr)
1035 char * strBuffer = buffer + start;
1036 int subLen = strlen(subStr);
1037 char beforeChar = start ? *(strBuffer - 1) : (char)0;
1038 int (* strcompare)(const char *, const char *, unsigned int) = matchCase ? strncmp : (strncasecmp);
1040 for(ptr = strBuffer; *ptr; ptr++)
1042 if(matchCase ? (*subStr == *ptr) : (tolower(*subStr) == tolower(*ptr)))
1046 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)))))
1051 if(!strcompare(ptr, subStr, subLen))
1055 beforeChar = ptr[0];
1058 return (((void *)0));
1061 char * __ecereNameSpace__ecere__sys__RSearchString(char * buffer, char * subStr, int maxLen, unsigned int matchCase, unsigned int matchWord)
1063 if(buffer && subStr)
1065 int subLen = strlen(subStr);
1066 char * ptr1 = buffer + maxLen - subLen;
1067 char * ptr2 = buffer + maxLen - subLen - 1;
1068 int (* strcompare)(const char *, const char *, unsigned int) = matchCase ? strncmp : (strncasecmp);
1070 for(; ptr1 >= buffer; ptr1--, ptr2--)
1072 if(tolower(*subStr) == tolower(*ptr1))
1076 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)))))
1081 if(!strcompare(ptr1, subStr, subLen))
1087 return (((void *)0));
1090 static struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BackSlashEscaping;
1092 extern char * strchr(const char * , int);
1094 int __ecereNameSpace__ecere__sys__Tokenize(char * string, int maxTokens, char * tokens[], unsigned int esc)
1097 const char * escChars = " !\"%&'()+,;=[]^`{}~";
1098 const char * escCharsQuoted = "\"";
1100 const char * escChars = " !\"$&'()*:;<=>?[\\`{|";
1101 const char * escCharsQuoted = "\"()$";
1104 unsigned int quoted = 0x0, escaped = 0x0;
1105 char * start = (((void *)0)), * output = string;
1108 for(; (ch = *string) && count < maxTokens; string++, output++)
1110 unsigned int wasEscaped = escaped;
1112 if(output != string)
1127 else if(ch == ' ' && !quoted)
1129 tokens[count++] = start;
1131 start = (((void *)0));
1144 if(!wasEscaped && ch == '\\' && (esc == 0x1 || (esc == 0x2 && strchr(quoted ? escCharsQuoted : escChars, *(string + 1)))))
1147 if(start && count < maxTokens)
1149 tokens[count++] = start;
1155 int __ecereNameSpace__ecere__sys__TokenizeWith(char * string, int maxTokens, char * tokens[], char * tokenizers, unsigned int escapeBackSlashes)
1158 unsigned int quoted = 0x0;
1159 unsigned char * start = (((void *)0));
1160 unsigned int escaped = 0x0;
1161 char * output = string;
1162 unsigned int quotedFromStart = 0x0;
1164 for(; *string && count < maxTokens; string++, output++)
1166 if(output != string)
1174 if(output != string)
1177 else if(escapeBackSlashes && *string == '\\')
1179 else if(*string == '\"')
1185 quotedFromStart = 0x0;
1191 else if(strchr(tokenizers, *string) && !quoted)
1193 tokens[count++] = start;
1195 start = (((void *)0));
1198 else if(!strchr(tokenizers, *string))
1202 quotedFromStart = 0x1;
1209 if(*string == '\\' && escapeBackSlashes)
1214 if(start && count < maxTokens)
1216 tokens[count++] = start;
1222 char * __ecereNameSpace__ecere__sys__TrimLSpaces(char * string, char * output)
1226 for(c = 0; string[c] && string[c] == ' '; c++)
1228 memmove(output, string + c, strlen(string + c) + 1);
1232 char * __ecereNameSpace__ecere__sys__TrimRSpaces(char * string, char * output)
1236 for(c = strlen(string) - 1; c >= 0 && string[c] == ' '; c--)
1240 memmove(output, string, c + 1);
1241 output[c + 1] = '\0';
1248 void __ecereNameSpace__ecere__sys__ChangeCh(char * string, char ch1, char ch2)
1252 for(c = 0; string[c]; c++)
1253 if(string[c] == ch1)
1257 void __ecereNameSpace__ecere__sys__RepeatCh(char * string, int count, char ch)
1261 for(c = 0; c < count; c++)
1263 string[c] = (char)0;
1266 char * __ecereNameSpace__ecere__sys__CopyString(char * string)
1270 int len = strlen(string);
1271 char * destination = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (len + 1));
1274 memcpy(destination, string, len + 1);
1278 return (((void *)0));
1281 unsigned int __ecereNameSpace__ecere__sys__GetString(char ** buffer, char * string, int max)
1285 unsigned int quoted = 0x0;
1286 unsigned int result = 0x1;
1290 string[0] = (char)0;
1295 if(!(ch = *((*buffer)++)))
1297 if((ch != '\n') && (ch != '\r') && (ch != ' ') && (ch != ',') && (ch != '\t'))
1304 for(c = 0; c < max - 1; c++)
1306 if(!quoted && ((ch == '\n') || (ch == '\r') || (ch == ' ') || (ch == ',') || (ch == '\t')))
1313 quoted ^= (unsigned int)1;
1318 if(!(ch = *(*buffer)))
1325 string[c] = (char)0;
1330 extern int atoi(const char * );
1332 int __ecereNameSpace__ecere__sys__GetValue(char ** buffer)
1336 __ecereNameSpace__ecere__sys__GetString(buffer, string, 20);
1337 return atoi(string);
1340 extern unsigned long strtoul(const char * nptr, char * * endptr, int base);
1342 unsigned int __ecereNameSpace__ecere__sys__GetHexValue(char ** buffer)
1346 __ecereNameSpace__ecere__sys__GetString(buffer, string, 20);
1347 return strtoul(string, (((void *)0)), 16);
1350 char * __ecereNameSpace__ecere__sys__StripQuotes(char * string, char * output)
1353 char * src = (string[0] == '\"') ? (string + 1) : string;
1355 memmove(output, src, strlen(src) + 1);
1356 len = strlen(output);
1357 if(len && output[len - 1] == '\"')
1358 output[len - 1] = '\0';
1362 extern unsigned int isdigit(int);
1364 double __ecereNameSpace__ecere__sys__FloatFromString(char * string)
1367 float dec = 0, res = 0;
1371 for(c = 0; string[c]; c++)
1382 else if((ch == '.') && !dec)
1384 else if(isdigit(ch))
1389 res += (float)dig / dec;
1393 res = res * (float)10 + (float)dig;
1398 return (float)neg * res;
1401 unsigned int __ecereNameSpace__ecere__sys__IsPathInsideOf(char * path, char * of)
1403 if(!path[0] || !of[0])
1407 char ofPart[274], ofRest[797];
1408 char pathPart[274], pathRest[797];
1411 strcpy(pathRest, path);
1412 for(; ofRest[0] && pathRest[0]; )
1414 __ecereNameSpace__ecere__sys__SplitDirectory(ofRest, ofPart, ofRest);
1415 __ecereNameSpace__ecere__sys__SplitDirectory(pathRest, pathPart, pathRest);
1416 if(((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? (strcasecmp) : strcmp)(pathPart, ofPart))
1419 if(!ofRest[0] && !pathRest[0])
1421 else if(!pathRest[0])
1427 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DefinedExpression;
1429 struct __ecereNameSpace__ecere__com__DefinedExpression;
1431 extern struct __ecereNameSpace__ecere__com__DefinedExpression * __ecereNameSpace__ecere__com__eSystem_RegisterDefine(char * name, char * value, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
1433 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
1435 struct __ecereNameSpace__ecere__com__GlobalFunction;
1437 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);
1439 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_RegisterClass(int type, char * name, char * baseName, int size, int sizeClass, unsigned int (* Constructor)(void * ), void (* Destructor)(void * ), struct __ecereNameSpace__ecere__com__Instance * module, int declMode, int inheritanceAccess);
1441 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__NameSpace;
1443 struct __ecereNameSpace__ecere__com__NameSpace
1446 struct __ecereNameSpace__ecere__com__NameSpace * btParent;
1447 struct __ecereNameSpace__ecere__com__NameSpace * left;
1448 struct __ecereNameSpace__ecere__com__NameSpace * right;
1450 struct __ecereNameSpace__ecere__com__NameSpace * parent;
1451 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
1452 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
1453 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
1454 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
1455 } __attribute__ ((gcc_struct));
1457 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
1459 struct __ecereNameSpace__ecere__com__Module
1461 struct __ecereNameSpace__ecere__com__Instance * application;
1462 struct __ecereNameSpace__ecere__sys__OldList classes;
1463 struct __ecereNameSpace__ecere__sys__OldList defines;
1464 struct __ecereNameSpace__ecere__sys__OldList functions;
1465 struct __ecereNameSpace__ecere__sys__OldList modules;
1466 struct __ecereNameSpace__ecere__com__Instance * prev;
1467 struct __ecereNameSpace__ecere__com__Instance * next;
1473 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
1474 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
1475 } __attribute__ ((gcc_struct));
1477 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
1479 extern void __ecereNameSpace__ecere__com__eEnum_AddFixedValue(struct __ecereNameSpace__ecere__com__Class * _class, char * string, int value);
1481 void __ecereRegisterModule_String(struct __ecereNameSpace__ecere__com__Instance * module)
1483 struct __ecereNameSpace__ecere__com__Class * class;
1485 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::DIR_SEP", "(GetRuntimePlatform() == win32) ? '\\\\' : '/'", module, 4);
1486 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::DIR_SEPS", "(GetRuntimePlatform() == win32) ? \"\\\\\" : \"/\"", module, 4);
1487 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::MAX_F_STRING", "1025", module, 4);
1488 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::MAX_EXTENSION", "17", module, 4);
1489 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::MAX_FILENAME", "274", module, 4);
1490 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::MAX_DIRECTORY", "534", module, 4);
1491 __ecereNameSpace__ecere__com__eSystem_RegisterDefine("ecere::sys::MAX_LOCATION", "797", module, 4);
1492 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetExtension", "char * ecere::sys::GetExtension(char * string, char * output)", __ecereNameSpace__ecere__sys__GetExtension, module, 4);
1493 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::StripLastDirectory", "char * ecere::sys::StripLastDirectory(char * string, char * output)", __ecereNameSpace__ecere__sys__StripLastDirectory, module, 4);
1494 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::SplitDirectory", "char * ecere::sys::SplitDirectory(const char * string, char * part, char * rest)", __ecereNameSpace__ecere__sys__SplitDirectory, module, 4);
1495 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetLastDirectory", "char * ecere::sys::GetLastDirectory(char * string, char * output)", __ecereNameSpace__ecere__sys__GetLastDirectory, module, 4);
1496 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::SplitArchivePath", "bool ecere::sys::SplitArchivePath(char * fileName, char * archiveName, char * * archiveFile)", __ecereNameSpace__ecere__sys__SplitArchivePath, module, 4);
1497 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::PathCatSlash", "char * ecere::sys::PathCatSlash(char * string, char * addedPath)", __ecereNameSpace__ecere__sys__PathCatSlash, module, 4);
1498 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::PathCat", "char * ecere::sys::PathCat(char * string, char * addedPath)", __ecereNameSpace__ecere__sys__PathCat, module, 4);
1499 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::MakePathRelative", "char * ecere::sys::MakePathRelative(char * path, char * to, char * destination)", __ecereNameSpace__ecere__sys__MakePathRelative, module, 4);
1500 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::StripExtension", "bool ecere::sys::StripExtension(char * string)", __ecereNameSpace__ecere__sys__StripExtension, module, 4);
1501 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::ChangeExtension", "char * ecere::sys::ChangeExtension(char * string, char * ext, char * output)", __ecereNameSpace__ecere__sys__ChangeExtension, module, 4);
1502 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::PrintSize", "void ecere::sys::PrintSize(char * string, uint size, int prec)", __ecereNameSpace__ecere__sys__PrintSize, module, 4);
1503 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::PrintBigSize", "void ecere::sys::PrintBigSize(char * string, double size, int prec)", __ecereNameSpace__ecere__sys__PrintBigSize, module, 4);
1504 __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);
1505 __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);
1506 class = __ecereNameSpace__ecere__com__eSystem_RegisterClass(4, "ecere::sys::BackSlashEscaping", "bool", 0, 0, 0, 0, module, 4, 1);
1507 if(((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + structSize_Instance)))->application == ((struct __ecereNameSpace__ecere__com__Module *)(((char *)__thisModule + structSize_Instance)))->application && class)
1508 __ecereClass___ecereNameSpace__ecere__sys__BackSlashEscaping = class;
1509 __ecereNameSpace__ecere__com__eEnum_AddFixedValue(class, "forArgsPassing", 2);
1510 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::Tokenize", "int ecere::sys::Tokenize(char * string, int maxTokens, char * tokens[], ecere::sys::BackSlashEscaping esc)", __ecereNameSpace__ecere__sys__Tokenize, module, 4);
1511 __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);
1512 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::TrimLSpaces", "char * ecere::sys::TrimLSpaces(char * string, char * output)", __ecereNameSpace__ecere__sys__TrimLSpaces, module, 4);
1513 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::TrimRSpaces", "char * ecere::sys::TrimRSpaces(char * string, char * output)", __ecereNameSpace__ecere__sys__TrimRSpaces, module, 4);
1514 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::ChangeCh", "void ecere::sys::ChangeCh(char * string, char ch1, char ch2)", __ecereNameSpace__ecere__sys__ChangeCh, module, 4);
1515 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::RepeatCh", "void ecere::sys::RepeatCh(char * string, int count, char ch)", __ecereNameSpace__ecere__sys__RepeatCh, module, 4);
1516 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::CopyString", "char * ecere::sys::CopyString(char * string)", __ecereNameSpace__ecere__sys__CopyString, module, 4);
1517 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetString", "bool ecere::sys::GetString(char * * buffer, char * string, int max)", __ecereNameSpace__ecere__sys__GetString, module, 4);
1518 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetValue", "int ecere::sys::GetValue(char * * buffer)", __ecereNameSpace__ecere__sys__GetValue, module, 4);
1519 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::GetHexValue", "uint ecere::sys::GetHexValue(char * * buffer)", __ecereNameSpace__ecere__sys__GetHexValue, module, 4);
1520 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::StripQuotes", "char * ecere::sys::StripQuotes(char * string, char * output)", __ecereNameSpace__ecere__sys__StripQuotes, module, 4);
1521 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::FloatFromString", "double ecere::sys::FloatFromString(char * string)", __ecereNameSpace__ecere__sys__FloatFromString, module, 4);
1522 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ecere::sys::IsPathInsideOf", "bool ecere::sys::IsPathInsideOf(char * path, char * of)", __ecereNameSpace__ecere__sys__IsPathInsideOf, module, 4);
1525 void __ecereUnregisterModule_String(struct __ecereNameSpace__ecere__com__Instance * module)