1 files changed, 233 insertions, 0 deletions
diff --git a/trunk/source/libemx.cc b/trunk/source/libemx.cc
new file mode 100644
index 0000000000..5634adbef8
--- /dev/null
+++ b/trunk/source/libemx.cc
@@ -0,0 +1,233 @@
+#include <stdio.h>
+#include <stdarg.h>
+#include <emx/syscalls.h>
+#include <sys/video.h>
+
+#include "libemx.h"
+
+
+static int cursor_start = 0, cursor_end = 0;
+static int gx = 0, gy = 0, gxx = 79, gyy = 24;
+static char buf[4096];
+
+
+
+
+void init_emx()
+{
+    v_init();
+    v_getctype(&cursor_start, &cursor_end);
+}
+
+
+
+
+void deinit_emx()
+{
+    // nothing to do
+}
+
+
+
+
+void _setcursortype(int curstype)
+{
+    if ( curstype == _NOCURSOR )
+      v_hidecursor();
+    else
+      v_ctype(cursor_start, cursor_end);
+}
+
+
+
+
+void clrscr()
+{
+    if ( (gx == 0) && (gy == 0) && (gxx == 79) && (gyy == 24) )
+      {
+        v_clear();
+        v_gotoxy(0, 0);
+      }
+    else
+      {
+        for (int i = gy; i <= gyy; ++i)
+          {
+            v_gotoxy(gx, i);
+            v_putn(' ', gxx - gx + 1);
+          }
+        v_gotoxy(gx, gy);
+      }
+}
+
+
+
+
+void gotoxy(int x, int y)
+{
+    v_gotoxy(x - 1 + gx, y - 1 + gy);
+}
+
+
+
+
+void textcolor(int c)
+{
+    v_attrib(c);
+}
+
+
+
+
+static void cprintf_aux(const char *s)
+{
+    char *ptr = buf;
+
+    while (*s)
+    {
+        if ( *s == '\n' )
+          {
+            *ptr = 0;
+            v_puts(buf);
+            int x, y;
+
+            v_getxy(&x, &y);
+            if ( y != 24 )
+              v_gotoxy(gx, y + 1);
+            else
+              v_putc('\n');
+
+            ptr = buf;
+          }
+        else if ( *s != '\r' )
+          *ptr++ = *s;
+
+        ++s;
+    }
+
+    *ptr = 0;
+    v_puts(buf);
+
+}
+
+void cprintf(const char *format, ...)
+{
+   va_list argp;
+   char buffer[4096]; // one could hope it's enough
+
+   va_start( argp, format );
+
+   vsprintf(buffer, format, argp);
+   cprintf_aux(buffer);
+
+   va_end(argp);
+}
+
+void puttext(int x, int y, int lx, int ly, unsigned const char *buf)
+{
+    puttext(x, y, lx, ly, (const char *) buf);
+}
+
+
+
+
+void puttext(int x, int y, int lx, int ly, const char *buf)
+{
+    int count = (lx - x + 1);
+
+    for (int i = y - 1; i < ly; ++i)
+      {
+        v_putline(buf + 2 * count * i, x - 1, i, count);
+      }
+}
+
+
+
+
+void gettext(int x, int y, int lx, int ly, unsigned char *buf)
+{
+    gettext(x, y, lx, ly, (char *) buf);
+}
+
+
+
+
+void gettext(int x, int y, int lx, int ly, char *buf)
+{
+    int count = (lx - x + 1);
+
+    for (int i = y - 1; i < ly; ++i)
+      {
+        v_getline(buf + 2 * count * i, x - 1, i, count);
+      }
+}
+
+
+
+
+void window(int x, int y, int lx, int ly)
+{
+    gx = x - 1;
+    gy = y - 1;
+    gxx = lx - 1;
+    gyy = ly - 1;
+}
+
+
+
+
+int wherex()
+{
+    int x, y;
+
+    v_getxy(&x, &y);
+
+    return x + 1 - gx;
+}
+
+
+
+
+int wherey()
+{
+    int x, y;
+
+    v_getxy(&x, &y);
+
+    return y + 1 - gy;
+}
+
+
+
+
+void putch(char c)
+{
+    v_putc(c);
+}
+
+
+
+
+int kbhit()
+{
+    return 0;
+}
+
+
+
+
+void delay(int ms)
+{
+    __sleep2(ms);
+}
+
+
+
+
+void textbackground(int c)
+{
+    if ( c != 0 )
+      {
+        fprintf(stderr, "bad background=%d", c);
+        exit(1);
+      }
+}