1 files changed, 111 insertions, 0 deletions
diff --git a/libs/nixio/src/syslog.c b/libs/nixio/src/syslog.c
new file mode 100644
index 000000000..081e8369f
--- /dev/null
+++ b/libs/nixio/src/syslog.c
@@ -0,0 +1,111 @@
+/*
+ * nixio - Linux I/O library for lua
+ *
+ *   Copyright (C) 2009 Steven Barth <steven@midlink.org>
+ *
+ *  Licensed under the Apache License, Version 2.0 (the "License");
+ *  you may not use this file except in compliance with the License.
+ *  You may obtain a copy of the License at
+ *
+ *      http://www.apache.org/licenses/LICENSE-2.0
+ *
+ *  Unless required by applicable law or agreed to in writing, software
+ *  distributed under the License is distributed on an "AS IS" BASIS,
+ *  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ *  See the License for the specific language governing permissions and
+ *  limitations under the License.
+ */
+
+#include "nixio.h"
+#include <string.h>
+#include <syslog.h>
+
+
+static int nixio_openlog(lua_State *L) {
+	int option = 0, facility = LOG_USER;
+
+	const char *ident = luaL_optstring(L, 1, "nixio");
+	const int j = lua_gettop(L);
+	for (int i=2; i<=j; i++) {
+		const char *flag = luaL_checkstring(L, i);
+		if (!strcmp(flag, "cons")) {
+			option |= LOG_CONS;
+		} else if (!strcmp(flag, "nowait")) {
+			option |= LOG_NOWAIT;
+		} else if (!strcmp(flag, "pid")) {
+			option |= LOG_PID;
+		} else if (!strcmp(flag, "perror")) {
+			option |= LOG_PERROR;
+		} else if (!strcmp(flag, "ndelay")) {
+			option |= LOG_NDELAY;
+		} else if (!strcmp(flag, "odelay")) {
+			option |= LOG_ODELAY;
+		} else {
+			return luaL_argerror(L, i,
+				"supported values: cons, nowait, pid, perror, ndelay, odelay");
+		}
+	}
+
+	openlog(ident, option, facility);
+	return 0;
+}
+
+static int nixio_closelog(lua_State *L) {
+	closelog();
+	return 0;
+}
+
+static int nixio__syslogmasg(lua_State *L, int dolog) {
+	int priority;
+
+	const char *flag = luaL_checkstring(L, 1);
+	if (!strcmp(flag, "emerg")) {
+		priority = LOG_EMERG;
+	} else if (!strcmp(flag, "alert")) {
+		priority = LOG_ALERT;
+	} else if (!strcmp(flag, "crit")) {
+		priority = LOG_CRIT;
+	} else if (!strcmp(flag, "err")) {
+		priority = LOG_ERR;
+	} else if (!strcmp(flag, "warning")) {
+		priority = LOG_WARNING;
+	} else if (!strcmp(flag, "notice")) {
+		priority = LOG_NOTICE;
+	} else if (!strcmp(flag, "info")) {
+		priority = LOG_INFO;
+	} else if (!strcmp(flag, "debug")) {
+		priority = LOG_DEBUG;
+	} else {
+		return luaL_argerror(L, 1, "supported values: emerg, alert, crit, err, "
+				"warning, notice, info, debug");
+	}
+
+	if (dolog) {
+		const char *msg = luaL_checkstring(L, 2);
+		syslog(priority, msg);
+	} else {
+		setlogmask(LOG_UPTO(priority));
+	}
+	return 0;
+}
+
+static int nixio_setlogmask(lua_State *L) {
+	return nixio__syslogmasg(L, 0);
+}
+
+static int nixio_syslog(lua_State *L) {
+	return nixio__syslogmasg(L, 1);
+}
+
+/* module table */
+static const luaL_reg R[] = {
+	{"openlog",		nixio_openlog},
+	{"syslog",		nixio_syslog},
+	{"setlogmask",	nixio_setlogmask},
+	{"closelog",	nixio_closelog},
+	{NULL,			NULL}
+};
+
+void nixio_open_syslog(lua_State *L) {
+	luaL_register(L, NULL, R);
+}