Added X11 basic window in D language

3 files changed, 44 insertions, 0 deletions

diff --git a/d-x11/.gitignore b/d-x11/.gitignore
new file mode 100644
index 0000000..87e54c2
--- /dev/null
+++ b/d-x11/.gitignore
@@ -0,0 +1,2 @@
+main
+*.o
diff --git a/d-x11/Makefile b/d-x11/Makefile
new file mode 100644
index 0000000..3c2fc3b
--- /dev/null
+++ b/d-x11/Makefile
@@ -0,0 +1,2 @@
+main: main.d
+	dmd main.d -L-lX11
diff --git a/d-x11/main.d b/d-x11/main.d
new file mode 100644
index 0000000..5f21f25
--- /dev/null
+++ b/d-x11/main.d
@@ -0,0 +1,40 @@
+import core.sys.posix.unistd;
+import core.stdc.stdlib;
+
+extern(C) {
+	struct Display;
+	struct Screen;
+	alias Window = ulong;
+
+	Display* XOpenDisplay(const char*);
+	Window XDefaultRootWindow(Display*);
+	Window XCreateSimpleWindow(Display*, Window, int, int, uint, uint, uint, ulong, ulong);
+	int XMapWindow(Display*, Window);
+	int XFlush(Display*);
+	int XCloseDisplay(Display*);
+}
+
+void main() {
+	Display* mainDisplay = XOpenDisplay(null);
+	if (mainDisplay is null) {
+		exit(1);
+	}
+
+	Window rootWindow = XDefaultRootWindow(mainDisplay);
+
+	Window mainWindow = XCreateSimpleWindow(
+		mainDisplay, rootWindow,
+		0, 0,         // x, y position
+		800, 600,     // width, height
+		0,            // border width
+		0,            // border color (ignored)
+		0xFF0000      // background color (red)
+	);
+
+	XMapWindow(mainDisplay, mainWindow);
+	XFlush(mainDisplay);
+
+	while(true) {
+		sleep(1);
+	}
+}