Very initial code for console, committing early because I need to ref…

…erence this in a dmd bug report.

source/sidero/base/console.d

@@ -0,0 +1,257 @@
+module sidero.base.console;
+
+import sidero.base.text.ascii.readonly;
+import sidero.base.text.ascii.builder;
+import sidero.base.text.unicode.builder;
+import sidero.base.text.unicode.readonly;
+
+void rawWrite(scope String_ASCII input) {
+    import core.stdc.stdio : fwrite, fflush;
+
+    input.stripZeroTerminator;
+
+    uint useLength = cast(uint)input.length;
+    if (input.length == 0)
+        return;
+
+    version (Windows) {
+        if (useWindows) {
+            import core.sys.windows.windows : WriteConsoleA;
+
+            allocateWindowsConsole();
+            if (WriteConsoleA(hStdout, cast(void*)input.ptr, useLength, null, null))
+                return;
+
+            initializeForStdio(null, null, false, true);
+        }
+    }
+
+    if (useStdio) {
+        fwrite(input.ptr, char.sizeof, useLength, stdioOut);
+        fflush(stdioOut);
+    }
+}
+
+void rawWrite(scope StringBuilder_ASCII input) {
+
+}
+
+version(none) {
+
+    void rawWrite(scope const(char)[] input...) {
+        rawWrite(String_UTF8(input));
+    }
+
+    void rawWrite(scope const(wchar)[] input...) {
+        rawWrite(String_UTF16(input));
+    }
+
+    void rawWrite(scope const(dchar)[] input...) {
+        rawWrite(String_UTF32(input));
+    }
+
+    void rawWrite(scope String_UTF8 input) {
+
+    }
+
+    void rawWrite(scope String_UTF16 input) {
+        rawWrite(input.byUTF8());
+    }
+
+    void rawWrite(scope String_UTF32 input) {
+        rawWrite(input.byUTF8());
+    }
+}
+
+    void rawWrite(scope StringBuilder_UTF8 input) {
+
+    }
+
+    void rawWrite(scope StringBuilder_UTF16 input) {
+        rawWrite(input.byUTF8());
+    }
+
+    void rawWrite(scope StringBuilder_UTF32 input) {
+        rawWrite(input.byUTF8());
+    }
+
+/// Initializes defaults automatically, has the environment variable SpewDem_Console to set either Windows, stdio, or stdio_ansi backend.
+pragma(crt_constructor) extern (C) void initializeConsoleDefault() {
+    import sidero.base.system : EnvironmentVariables;
+
+    String_ASCII config = EnvironmentVariables[String_ASCII("SideroBase_Console")];
+
+    version (Windows) {
+        if (config == "Windows") {
+            initializeForWindows;
+            return;
+        }
+    }
+
+    if (config.startsWith("stdio")) {
+        initializeForStdio;
+
+        if (!config.endsWith("ansi"))
+            enableANSI = false;
+
+        return;
+    }
+
+    version (Windows)
+        initializeForWindows;
+    else version (Posix)
+        initializeForStdio;
+    else
+        static assert(0, "Unimplemented");
+}
+
+///
+version (Windows) void initializeForWindows() {
+    useWindows = true;
+    useANSI = false;
+    useStdio = false;
+    autoCloseStdio = false;
+
+    deinitializeConsole;
+}
+
+///
+void initializeForStdio(FILE* useIn = null, FILE* useOut = null, bool autoClose = false, bool keepState = false) @trusted nothrow @nogc {
+    import sidero.base.system : EnvironmentVariables;
+    useStdio = true;
+
+    if (useWindows && keepState) {
+        useANSI = EnvironmentVariables[String_ASCII("ConEmuANSI")] == "ON";
+    } else {
+        useANSI = true;
+        useWindows = false;
+    }
+
+    deinitializeConsole;
+
+    if (useIn !is null)
+        stdioIn = useIn;
+    else
+        stdioIn = stdin;
+    if (useOut !is null)
+        stdioOut = useOut;
+    else
+        stdioOut = stdout;
+
+    if (useIn !is null || useOut !is null)
+        autoCloseStdio = autoClose;
+}
+
+///
+void enableANSI(bool value = true) {
+    useANSI = value;
+}
+
+///
+pragma(crt_destructor) extern (C) void deinitializeConsole() @trusted nothrow @nogc {
+    import core.stdc.stdio : fflush, fclose;
+
+    if (useStdio && autoCloseStdio && (stdioIn !is null || stdioOut !is null) && (stdioIn !is stdin || stdioOut !is stdout)) {
+        if (stdioIn !is null) {
+            fflush(stdioIn);
+            if (stdioIn !is stdin)
+                fclose(stdioIn);
+        }
+
+        if (stdioOut !is null) {
+            fflush(stdioOut);
+            if (stdioOut !is stdout)
+                fclose(stdioOut);
+        }
+    }
+
+    version (Windows) {
+        import core.sys.windows.windows : FreeConsole, SetConsoleCP, SetConsoleOutputCP;
+
+        if (originalConsoleCP > 0)
+            SetConsoleCP(originalConsoleCP);
+        if (originalConsoleOutputCP > 0)
+            SetConsoleOutputCP(originalConsoleOutputCP);
+
+        if (createdConsole) {
+            FreeConsole();
+            createdConsole = false;
+        }
+    }
+}
+
+private:
+import sidero.base.parallelism.mutualexclusion;
+import core.stdc.stdio : FILE;
+
+__gshared {
+    bool useANSI, useWindows, useStdio, autoCloseStdio;
+
+    FILE* stdioIn, stdioOut;
+
+    version (Windows) {
+        HANDLE hStdin, hStdout;
+        uint originalConsoleOutputCP, originalConsoleCP;
+        bool createdConsole;
+    }
+}
+
+enum {
+    ANSI_ESC = "^[",
+    ANSI_Reset = ANSI_ESC ~ "0m",
+}
+
+version (CRuntime_Microsoft) {
+    // from druntime bug fix
+
+    extern (C) FILE* __acrt_iob_func(int hnd) nothrow @nogc;
+    FILE* stdin()() @trusted nothrow @nogc {
+        return __acrt_iob_func(0);
+    }
+
+    FILE* stdout()() @trusted nothrow @nogc {
+        return __acrt_iob_func(1);
+    }
+
+    FILE* stderr()() @trusted nothrow @nogc {
+        return __acrt_iob_func(2);
+    }
+} else {
+    import core.stdc.stdio : stdin, stdout;
+}
+
+version (Windows) {
+    import core.sys.windows.windows : HANDLE, ULONG;
+
+    void allocateWindowsConsole() @trusted nothrow @nogc {
+        import core.sys.windows.windows : DWORD, AllocConsole, GetStdHandle, STD_INPUT_HANDLE, STD_OUTPUT_HANDLE, GetLastError, GetConsoleMode, SetConsoleMode,
+        ENABLE_VIRTUAL_TERMINAL_PROCESSING, ENABLE_PROCESSED_OUTPUT, SetConsoleOutputCP, GetConsoleOutputCP,
+        SetConsoleCP, GetConsoleCP;
+
+        if (AllocConsole())
+            createdConsole = true;
+
+        hStdin = GetStdHandle(STD_INPUT_HANDLE);
+        hStdout = GetStdHandle(STD_OUTPUT_HANDLE);
+
+        DWORD mode;
+        GetConsoleMode(hStdout, &mode);
+        SetConsoleMode(hStdout, mode | ENABLE_VIRTUAL_TERMINAL_PROCESSING | ENABLE_PROCESSED_OUTPUT);
+
+        originalConsoleOutputCP = GetConsoleOutputCP();
+        if (!SetConsoleOutputCP(65001))
+            originalConsoleOutputCP = 0;
+
+        originalConsoleCP = GetConsoleCP();
+        if (!SetConsoleCP(65001))
+            originalConsoleCP = 0;
+    }
+
+    // needed cos Unicode
+    struct CONSOLE_READCONSOLE_CONTROL {
+        ULONG nLength;
+        ULONG nInitialChars;
+        ULONG dwCtrlWakeupMask;
+        ULONG dwControlKeyState;
+    }
+}