first and last commit

locale.h

@@ -0,0 +1,150 @@
+
+#ifdef LOCALE_LOADER
+#define STR(v, f, d) loc_set(&sys.str_table[n*LOCALE_ELEM], STRINGIZE(v), sys.str_format[n], smap_get(map, STRINGIZE(v))); n++;
+#undef LOCALE_LOADER
+
+void loc_read(smap_t *map);
+
+void loc_load(const char *filename) {
+	char *lines;
+	char *line = NULL;
+	smap_t map;
+	int pos;
+	if(!file_sread(&lines, filename)) {
+		return;
+	}
+	smap_init(&map, 8, MEM_SYSTEM);
+	while(line = strtok(line ? NULL : lines, "\n")) {
+		for(pos = 0; line[pos]; pos++) {
+			if(line[pos] == '=')
+				break;
+		}
+		if(line[pos]) {
+			line[pos++] = 0;
+			smap_put(&map, line, line+pos);
+		}
+	}
+	loc_read(&map);
+	smap_clear(&map);
+	mem_free(lines);
+}
+
+void loc_read(smap_t *map) {
+
+#endif
+
+#ifdef LOCALE_DEFAULTS
+#define STR(v, f, d) loc_set(&sys.str_table[n*LOCALE_ELEM], STRINGIZE(v), sys.str_format[n], d); n++;
+#undef LOCALE_DEFAULTS
+#define LOCALE_LOADER
+
+void loc_def() {
+
+#endif
+
+#ifdef LOCALE_VARS
+#define STR(v, f, d) STR_ ## v = &sys.str_table[n*LOCALE_ELEM]; sys.str_format[n++] = f;
+#undef LOCALE_VARS
+#define LOCALE_DEFAULTS
+
+void loc_init() {
+
+#endif
+
+#ifndef LOCALE_BASE
+#define STR(v, f, d) const char * STR_ ## v;
+
+uint file_read_hdr(byte **data, const char *filename, const char *hdr, uint hdrsize, byte flags);
+
+void loc_set(char *str, const char *name, const char *fmt, const char *loc) {
+	byte fstr[16];
+	byte pos = 0;
+	byte lpos = 0;
+	byte narg = 0;
+	char c;
+	if((!loc) || (loc[0] == 0)) {
+		sprintf(str, fmt[0] ? "$%s$ [%s]" : "$%s$", name, fmt);
+		return;
+	}
+	while(c = fmt[pos++]) {
+		if(c == ' ') {
+			fstr[narg++] = lpos;
+			lpos = pos;
+		}
+	}
+	if(fmt[lpos]) {
+		fstr[narg++] = lpos;
+	}
+	pos = lpos = 0;
+	while(c = *(loc++)) {
+		if(pos == LOCALE_ELEM - 1)
+			break;
+		if(lpos) {
+			if((c >= '1') && (c <= '9')) {
+				lpos = 1 + c - '1';
+			}
+			else if((c >= 'a') && (c <= 'g')) {
+				lpos = 10 + c - 'a';
+			}
+			else if((c >= 'A') && (c <= 'G')) {
+				lpos = 10 + c - 'A';
+			}
+			else {
+				lpos = 0;
+			}
+			if(lpos && (lpos <= narg)) {
+				if(pos >= LOCALE_ELEM - ((lpos < 10) ? 4 : 5))
+					break;
+				str[pos++] = '%';
+				str[pos++] = (lpos < 10) ? ('0' + lpos) : '1';
+				if(lpos >= 10)
+					str[pos++] = ('0' + (lpos - 10));
+				str[pos++] = '$';
+				for(lpos = fstr[lpos-1];; lpos++) {
+					c = fmt[lpos];
+					if((c == 0) || (c == ' ')) {
+						break;
+					}
+					else if(pos == LOCALE_ELEM - 1) {
+						while(str[--pos] != '%') {
+							;
+						}
+						str[pos] = 0;
+						return;
+					}
+					str[pos++] = c;
+				}
+				lpos = 0;
+				continue;
+			}
+		}
+		else if(c == '$') {
+			lpos = 1;
+			continue;
+		}
+		if(c == '%') {
+			if(pos == LOCALE_ELEM - 2)
+				break;
+			str[pos++] = '%';
+			str[pos++] = '%';
+		}
+		else {
+			str[pos++] = c;
+		}
+	}
+	str[pos] = 0;
+}
+
+#define LOCALE_VARS
+#else
+	int n = 0;
+#endif
+
+#include "strings.h"
+
+#ifdef LOCALE_BASE
+}
+#else
+#define LOCALE_BASE
+#endif
+#undef STR