X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/disorder/blobdiff_plain/05b75f8d50b83e943af3be4071449304d82dbdcd..refs/heads/master:/lib/log.c
diff --git a/lib/log.c b/lib/log.c
index 24f9427..88657a9 100644
--- a/lib/log.c
+++ b/lib/log.c
@@ -1,35 +1,34 @@
/*
* This file is part of DisOrder.
- * Copyright (C) 2004-2008 Richard Kettlewell
+ * Copyright (C) 2004-9, 2013 Richard Kettlewell
*
- * This program is free software; you can redistribute it and/or modify
+ * This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
+ * the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * General Public License for more details.
- *
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
* You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
- * USA
+ * along with this program. If not, see .
*/
/** @file lib/log.c @brief Errors and logging
*
- * All messages are initially emitted by one of the four functions below.
- * debug() is generally invoked via D() so that mostly you just do a test
- * rather than a complete subroutine call.
+ * All messages are initially emitted by one of the four functions
+ * below. disorder_debug() is generally invoked via D() so that
+ * mostly you just do a test rather than a complete subroutine call.
*
* Messages are dispatched via @ref log_default. This defaults to @ref
* log_stderr. daemonize() will turn off @ref log_stderr and use @ref
* log_syslog instead.
*
- * fatal() will call exitfn() with a nonzero status. The default value is
- * exit(), but it should be set to _exit() anywhere but the 'main line' of the
- * program, to guarantee that exit() gets called at most once.
+ * disorder_fatal() will call exitfn() with a nonzero status. The
+ * default value is exit(), but it should be set to _exit() anywhere
+ * but the 'main line' of the program, to guarantee that exit() gets
+ * called at most once.
*/
#define NO_MEMORY_ALLOCATION
@@ -38,8 +37,20 @@
#include "common.h"
#include
-#include
-#include
+#include
+#if HAVE_SYSLOG_H
+# include
+#endif
+#if HAVE_SYS_TIME_H
+# include
+#endif
+#if HAVE_SYS_SOCKET_H
+# include
+#endif
+#if HAVE_NETDB_H
+# include
+#endif
+#include
#include "log.h"
#include "disorder.h"
@@ -68,6 +79,9 @@ const char *progname;
/** @brief Filename for debug messages */
const char *debug_filename;
+/** @brief Set to include timestamps in log messages */
+int logdate;
+
/** @brief Line number for debug messages */
int debug_lineno;
@@ -121,7 +135,17 @@ static void logfp(int pri, const char *msg, void *user) {
* sanely */
const char *p;
- if(progname)
+ if(logdate) {
+ char timebuf[64];
+ struct tm *tm;
+ time_t t;
+ gettimeofday(&tv, 0);
+ t = tv.tv_sec;
+ tm = localtime(&t);
+ strftime(timebuf, sizeof timebuf, "%Y-%m-%d %H:%M:%S %Z", tm);
+ fprintf(fp, "%s: ", timebuf);
+ }
+ if(progname)
fprintf(fp, "%s: ", progname);
if(pri <= LOG_ERR)
fputs("ERROR: ", fp);
@@ -143,8 +167,10 @@ static void logfp(int pri, const char *msg, void *user) {
}
fputs(msg, fp);
fputc('\n', fp);
+ fflush(fp);
}
+#if HAVE_SYSLOG_H
/** @brief Log to syslog */
static void logsyslog(int pri, const char *msg,
void attribute((unused)) *user) {
@@ -153,12 +179,15 @@ static void logsyslog(int pri, const char *msg,
else
syslog(pri, "%s:%d: %s", debug_filename, debug_lineno, msg);
}
+#endif
/** @brief Log output that writes to @c stderr */
struct log_output log_stderr = { logfp, 0 };
+#if HAVE_SYSLOG_H
/** @brief Log output that sends to syslog */
struct log_output log_syslog = { logsyslog, 0 };
+#endif
/** @brief Format and log a message */
static void vlogger(int pri, const char *fmt, va_list ap) {
@@ -179,12 +208,14 @@ static void logger(int pri, const char *fmt, ...) {
/** @brief Format and log a message
* @param pri Message priority (as per syslog)
+ * @param ec Error class
* @param fmt Format string
* @param errno_value Errno value to include as a string, or 0
* @param ap Argument list
*/
-void elog(int pri, int errno_value, const char *fmt, va_list ap) {
+void elog(int pri, enum error_class ec, int errno_value, const char *fmt, va_list ap) {
char buffer[1024];
+ char errbuf[1024];
if(errno_value == 0)
vlogger(pri, fmt, ap);
@@ -192,19 +223,70 @@ void elog(int pri, int errno_value, const char *fmt, va_list ap) {
memset(buffer, 0, sizeof buffer);
byte_vsnprintf(buffer, sizeof buffer, fmt, ap);
buffer[sizeof buffer - 1] = 0;
- logger(pri, "%s: %s", buffer, strerror(errno_value));
+ logger(pri, "%s: %s", buffer,
+ format_error(ec, errno_value, errbuf, sizeof errbuf));
}
}
-#define disorder_fatal fatal
-#define disorder_error error
-#define disorder_info info
+/** @brief Log an error and quit
+ *
+ * If @c ${DISORDER_FATAL_ABORT} is defined (as anything) then the process
+ * is aborted, so you can get a backtrace.
+ */
+void disorder_fatal(int errno_value, const char *msg, ...) {
+ va_list ap;
+
+ va_start(ap, msg);
+ elog(LOG_CRIT, ec_errno, errno_value, msg, ap);
+ va_end(ap);
+ if(getenv("DISORDER_FATAL_ABORT")) abort();
+ exitfn(EXIT_FAILURE);
+}
+
+/** @brief Log an error and quit
+ *
+ * If @c ${DISORDER_FATAL_ABORT} is defined (as anything) then the process
+ * is aborted, so you can get a backtrace.
+ */
+void disorder_fatal_ec(enum error_class ec, int errno_value, const char *msg, ...) {
+ va_list ap;
+
+ va_start(ap, msg);
+ elog(LOG_CRIT, ec, errno_value, msg, ap);
+ va_end(ap);
+ if(getenv("DISORDER_FATAL_ABORT")) abort();
+ exitfn(EXIT_FAILURE);
+}
+
+/** @brief Log an error */
+void disorder_error(int errno_value, const char *msg, ...) {
+ va_list ap;
+
+ va_start(ap, msg);
+ elog(LOG_ERR, ec_errno, errno_value, msg, ap);
+ va_end(ap);
+}
+
+/** @brief Log an error */
+void disorder_error_ec(enum error_class ec, int errno_value, const char *msg, ...) {
+ va_list ap;
-/* shared implementation of vararg functions */
-#include "log-impl.h"
+ va_start(ap, msg);
+ elog(LOG_ERR, ec, errno_value, msg, ap);
+ va_end(ap);
+}
+
+/** @brief Log an informational message */
+void disorder_info(const char *msg, ...) {
+ va_list ap;
+
+ va_start(ap, msg);
+ elog(LOG_INFO, ec_none, 0, msg, ap);
+ va_end(ap);
+}
/** @brief Log a debug message */
-void debug(const char *msg, ...) {
+void disorder_debug(const char *msg, ...) {
va_list ap;
va_start(ap, msg);
@@ -220,6 +302,54 @@ void set_progname(char **argv) {
progname = argv[0];
}
+/** @brief Format an error string
+ * @param ec Error class
+ * @param err Error code (interpretation defined by @p ec)
+ * @param buffer Output buffer
+ * @param bufsize Size of output buffer
+ * @return Pointer to error string
+ *
+ * The return value may or may not be @p buffer.
+ */
+#if !_WIN32
+#pragma GCC diagnostic ignored "-Wunused-parameter"
+#endif
+const char *format_error(enum error_class ec, int err, char buffer[], size_t bufsize) {
+#if _WIN32
+ size_t n;
+ switch(ec) {
+ default:
+ if(!FormatMessageA(FORMAT_MESSAGE_FROM_SYSTEM|FORMAT_MESSAGE_IGNORE_INSERTS,
+ NULL,
+ err,
+ MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
+ buffer,
+ bufsize,
+ NULL))
+ disorder_fatal(0, "FormatMessage failed");
+ n = strlen(buffer);
+ while(n > 0 && isspace((unsigned char)buffer[n-1]))
+ --n;
+ buffer[n] = 0;
+ return buffer;
+ case ec_errno:
+ strerror_s(buffer, bufsize, err);
+ return buffer;
+ case ec_none:
+ return "(none)";
+ }
+#else
+ switch(ec) {
+ default:
+ return strerror(err);
+ case ec_getaddrinfo:
+ return gai_strerror(err);
+ case ec_none:
+ return "(none)";
+ }
+#endif
+}
+
/*
Local Variables:
c-basic-offset:2