1 files changed, 75 insertions, 0 deletions
diff --git a/nonstd/static/locale.h b/nonstd/static/locale.h
new file mode 100644
index 00000000..e96b0376
--- /dev/null
+++ b/nonstd/static/locale.h
@@ -0,0 +1,75 @@
+#include <limits.h>
+#include "nonstd/types.h"
+
+#ifndef LC_GLOBAL_LOCALE
+typedef void * locale_t;
+#define LC_GLOBAL_LOCALE ((locale_t)(-1))
+#endif
+
+static unsigned char *__getmap(int map)
+{
+	static unsigned char c_attr[UCHAR_MAX + 1] = {0};
+	static unsigned char c_lower[UCHAR_MAX + 1] = {0};
+	static unsigned char c_upper[UCHAR_MAX + 1] = {0};
+	struct __locale_t c;
+	struct __locale_t *locale = __libc.per_thread()->locale;
+
+	if (!locale || locale == LC_GLOBAL_LOCALE || !locale->ctype) {
+		locale = __libc.locale.global;
+	}
+
+	if (!locale || !locale->ctype) {
+		unsigned char lower[] = "abcdefghijklmnopqrstuvwxyz";
+		unsigned char upper[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
+		/* $@` are in ASCII but not 9899 */
+		unsigned char punct[] = "!\"#%&'()*+,-./:;<=>?[\\]^_{|}~$@`";
+		unsigned char space[] = " \f\n\r\t\v";
+		unsigned char xdigit[] = "0123456789abcdefABCDEF";
+
+		locale = &c;
+		c.ctattr = c_attr;
+		c.ctolower = c_lower;
+		c.ctoupper = c_upper;
+
+		if (c_attr['a'] == 0) {
+			unsigned int i;
+			for (i = 0; i <= UCHAR_MAX; i++) {
+				c_attr[i] = 0;
+				c_lower[i] = i;
+				c_upper[i] = i;
+			}
+
+			for (i = 0; i < sizeof(lower); i++) {
+				c_attr[lower[i]] = __libc.ctype.lower;
+				c_upper[lower[i]] = upper[i];
+			}
+
+			for (i = 0; i < sizeof(upper); i++) {
+				c_attr[upper[i]] = __libc.ctype.upper;
+				c_lower[upper[i]] = lower[i];
+			}
+
+			for (i = 0; i < sizeof(xdigit); i++) {
+				c_attr[xdigit[i]] |= __libc.ctype.xdigit;
+			}
+
+			for (i = 0; i < sizeof(punct); i++) {
+				c_attr[punct[i]] = __libc.ctype.punct;
+			}
+
+			for (i = 0; i < sizeof(space); i++) {
+				c_attr[space[i]] = __libc.ctype.space;
+			}
+
+			c_attr[0] = 0;
+		}
+	}
+	
+	if (map == __libc.ctype.ctolower) {
+		return locale->ctolower;
+	} else if (map == __libc.ctype.ctoupper) {
+		return locale->ctoupper;
+	}
+
+	return locale->ctattr;
+}