From a041d9898e6d699bd8c0c25482ec574feb03c547 Mon Sep 17 00:00:00 2001
From: "John Ankarstr\\xf6m" <john@ankarstrom.se>
Date: Sat, 29 May 2021 12:54:47 +0200
Subject: First commit

This is the original state of the released tarball for JWM 1.8,
which will serve as my starting point for further modifications.
---
 src/error.c | 108 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 108 insertions(+)
 create mode 100644 src/error.c

(limited to 'src/error.c')

diff --git a/src/error.c b/src/error.c
new file mode 100644
index 0000000..a4b1277
--- /dev/null
+++ b/src/error.c
@@ -0,0 +1,108 @@
+/**
+ * @file error.c
+ * @author Joe Wingbermuehle
+ * @date 2004-2006
+ *
+ * @brief Error handling functions.
+ *
+ */
+
+#include "jwm.h"
+#include "error.h"
+#include "main.h"
+
+/** Log a fatal error and exit. */
+void FatalError(const char *str, ...) {
+
+	va_list ap;
+	va_start(ap, str);
+
+	Assert(str);
+
+	fprintf(stderr, "JWM: error: ");
+	vfprintf(stderr, str, ap);
+	fprintf(stderr, "\n");
+
+	va_end(ap);
+
+	exit(1);
+
+}
+
+/** Log a warning. */
+void Warning(const char *str, ...) {
+
+	va_list ap;
+	va_start(ap, str);
+
+	Assert(str);
+
+	WarningVA(NULL, str, ap);
+
+	va_end(ap);
+
+}
+
+/** Log a warning. */
+void WarningVA(const char *part, const char *str, va_list ap) {
+
+	Assert(str);
+
+	fprintf(stderr, "JWM: warning: ");
+	if(part) {
+		fprintf(stderr, "%s: ", part);
+	}
+	vfprintf(stderr, str, ap);
+	fprintf(stderr, "\n");
+
+}
+
+/** Callback to handle errors from Xlib.
+ * Note that if debug output is directed to an X terminal, emitting too
+ * much output can cause a dead lock (this happens on HP-UX). Therefore
+ * ShowCheckpoint isn't used by default.
+ */
+int ErrorHandler(Display *d, XErrorEvent *e) {
+
+#ifdef DEBUG
+
+	char buffer[64];
+	char code[32];
+
+#endif
+
+	if(initializing) {
+		if(e->request_code == X_ChangeWindowAttributes
+			&& e->error_code == BadAccess) {
+			FatalError("display is already managed");
+		}
+	}
+
+#ifdef DEBUG
+
+	if(!e) {
+		fprintf(stderr, "XError: [no information]\n");
+		return 0;
+	}
+
+	XGetErrorText(display, e->error_code, buffer, sizeof(buffer));
+	Debug("XError: %s", buffer);
+
+	snprintf(code, sizeof(code), "%d", e->request_code);
+	XGetErrorDatabaseText(display, "XRequest", code, "?",
+		buffer, sizeof(buffer));
+	Debug("   Request Code: %d (%s)", e->request_code, buffer);
+	Debug("   Minor Code: %d", e->minor_code);
+	Debug("   Resource ID: 0x%lx", (unsigned long)e->resourceid);
+	Debug("   Error Serial: %lu", (unsigned long)e->serial);
+
+#if 0
+	ShowCheckpoint();
+#endif
+
+#endif
+
+	return 0;
+
+}
+
-- 
cgit v1.2.3