aboutsummaryrefslogtreecommitdiff
path: root/external/unbound/util/log.c
diff options
context:
space:
mode:
Diffstat (limited to 'external/unbound/util/log.c')
m---------external/unbound0
-rw-r--r--external/unbound/util/log.c493
2 files changed, 0 insertions, 493 deletions
diff --git a/external/unbound b/external/unbound
new file mode 160000
+Subproject 193bdc4ee3fe2b0d17e547e86512528c2614483
diff --git a/external/unbound/util/log.c b/external/unbound/util/log.c
deleted file mode 100644
index 439541a7c..000000000
--- a/external/unbound/util/log.c
+++ /dev/null
@@ -1,493 +0,0 @@
-/*
- * util/log.c - implementation of the log code
- *
- * Copyright (c) 2007, NLnet Labs. All rights reserved.
- *
- * This software is open source.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- * Redistributions of source code must retain the above copyright notice,
- * this list of conditions and the following disclaimer.
- *
- * Redistributions in binary form must reproduce the above copyright notice,
- * this list of conditions and the following disclaimer in the documentation
- * and/or other materials provided with the distribution.
- *
- * Neither the name of the NLNET LABS nor the names of its contributors may
- * be used to endorse or promote products derived from this software without
- * specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
- * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
- * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
- * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
- * HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
- * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
- * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
- * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
- * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
- * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
- * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
- */
-/**
- * \file
- * Implementation of log.h.
- */
-
-#include "config.h"
-#include "util/log.h"
-#include "util/locks.h"
-#include "sldns/sbuffer.h"
-#include <stdarg.h>
-#ifdef HAVE_TIME_H
-#include <time.h>
-#endif
-#ifdef HAVE_SYSLOG_H
-# include <syslog.h>
-#else
-/**define LOG_ constants */
-# define LOG_CRIT 2
-# define LOG_ERR 3
-# define LOG_WARNING 4
-# define LOG_NOTICE 5
-# define LOG_INFO 6
-# define LOG_DEBUG 7
-#endif
-#ifdef UB_ON_WINDOWS
-# include "winrc/win_svc.h"
-#endif
-
-/* default verbosity */
-enum verbosity_value verbosity = 0;
-/** the file logged to. */
-static FILE* logfile = 0;
-/** if key has been created */
-static int key_created = 0;
-/** pthread key for thread ids in logfile */
-static ub_thread_key_type logkey;
-#ifndef THREADS_DISABLED
-/** pthread mutex to protect FILE* */
-static lock_quick_type log_lock;
-#endif
-/** the identity of this executable/process */
-static const char* ident="unbound";
-#if defined(HAVE_SYSLOG_H) || defined(UB_ON_WINDOWS)
-/** are we using syslog(3) to log to */
-static int logging_to_syslog = 0;
-#endif /* HAVE_SYSLOG_H */
-/** time to print in log, if NULL, use time(2) */
-static time_t* log_now = NULL;
-/** print time in UTC or in secondsfrom1970 */
-static int log_time_asc = 0;
-
-void
-log_init(const char* filename, int use_syslog, const char* chrootdir)
-{
- FILE *f;
- if(!key_created) {
- key_created = 1;
- ub_thread_key_create(&logkey, NULL);
- lock_quick_init(&log_lock);
- }
- lock_quick_lock(&log_lock);
- if(logfile
-#if defined(HAVE_SYSLOG_H) || defined(UB_ON_WINDOWS)
- || logging_to_syslog
-#endif
- ) {
- lock_quick_unlock(&log_lock); /* verbose() needs the lock */
- verbose(VERB_QUERY, "switching log to %s",
- use_syslog?"syslog":(filename&&filename[0]?filename:"stderr"));
- lock_quick_lock(&log_lock);
- }
- if(logfile && logfile != stderr)
- fclose(logfile);
-#ifdef HAVE_SYSLOG_H
- if(logging_to_syslog) {
- closelog();
- logging_to_syslog = 0;
- }
- if(use_syslog) {
- /* do not delay opening until first write, because we may
- * chroot and no longer be able to access dev/log and so on */
- openlog(ident, LOG_NDELAY, LOG_DAEMON);
- logging_to_syslog = 1;
- lock_quick_unlock(&log_lock);
- return;
- }
-#elif defined(UB_ON_WINDOWS)
- if(logging_to_syslog) {
- logging_to_syslog = 0;
- }
- if(use_syslog) {
- logging_to_syslog = 1;
- lock_quick_unlock(&log_lock);
- return;
- }
-#endif /* HAVE_SYSLOG_H */
- if(!filename || !filename[0]) {
- logfile = stderr;
- lock_quick_unlock(&log_lock);
- return;
- }
- /* open the file for logging */
- if(chrootdir && chrootdir[0] && strncmp(filename, chrootdir,
- strlen(chrootdir)) == 0)
- filename += strlen(chrootdir);
- f = fopen(filename, "a");
- if(!f) {
- lock_quick_unlock(&log_lock);
- log_err("Could not open logfile %s: %s", filename,
- strerror(errno));
- return;
- }
-#ifndef UB_ON_WINDOWS
- /* line buffering does not work on windows */
- setvbuf(f, NULL, (int)_IOLBF, 0);
-#endif
- logfile = f;
- lock_quick_unlock(&log_lock);
-}
-
-void log_file(FILE *f)
-{
- lock_quick_lock(&log_lock);
- logfile = f;
- lock_quick_unlock(&log_lock);
-}
-
-void log_thread_set(int* num)
-{
- ub_thread_key_set(logkey, num);
-}
-
-int log_thread_get(void)
-{
- unsigned int* tid;
- if(!key_created) return 0;
- tid = (unsigned int*)ub_thread_key_get(logkey);
- return (int)(tid?*tid:0);
-}
-
-void log_ident_set(const char* id)
-{
- ident = id;
-}
-
-void log_set_time(time_t* t)
-{
- log_now = t;
-}
-
-void log_set_time_asc(int use_asc)
-{
- log_time_asc = use_asc;
-}
-
-void
-log_vmsg(int pri, const char* type,
- const char *format, va_list args)
-{
- char message[MAXSYSLOGMSGLEN];
- unsigned int* tid = (unsigned int*)ub_thread_key_get(logkey);
- time_t now;
-#if defined(HAVE_STRFTIME) && defined(HAVE_LOCALTIME_R)
- char tmbuf[32];
- struct tm tm;
-#elif defined(UB_ON_WINDOWS)
- char tmbuf[128], dtbuf[128];
-#endif
- (void)pri;
- vsnprintf(message, sizeof(message), format, args);
-#ifdef HAVE_SYSLOG_H
- if(logging_to_syslog) {
- syslog(pri, "[%d:%x] %s: %s",
- (int)getpid(), tid?*tid:0, type, message);
- return;
- }
-#elif defined(UB_ON_WINDOWS)
- if(logging_to_syslog) {
- char m[32768];
- HANDLE* s;
- LPCTSTR str = m;
- DWORD tp = MSG_GENERIC_ERR;
- WORD wt = EVENTLOG_ERROR_TYPE;
- if(strcmp(type, "info") == 0) {
- tp=MSG_GENERIC_INFO;
- wt=EVENTLOG_INFORMATION_TYPE;
- } else if(strcmp(type, "warning") == 0) {
- tp=MSG_GENERIC_WARN;
- wt=EVENTLOG_WARNING_TYPE;
- } else if(strcmp(type, "notice") == 0
- || strcmp(type, "debug") == 0) {
- tp=MSG_GENERIC_SUCCESS;
- wt=EVENTLOG_SUCCESS;
- }
- snprintf(m, sizeof(m), "[%s:%x] %s: %s",
- ident, tid?*tid:0, type, message);
- s = RegisterEventSource(NULL, SERVICE_NAME);
- if(!s) return;
- ReportEvent(s, wt, 0, tp, NULL, 1, 0, &str, NULL);
- DeregisterEventSource(s);
- return;
- }
-#endif /* HAVE_SYSLOG_H */
- lock_quick_lock(&log_lock);
- if(!logfile) {
- lock_quick_unlock(&log_lock);
- return;
- }
- if(log_now)
- now = (time_t)*log_now;
- else now = (time_t)time(NULL);
-#if defined(HAVE_STRFTIME) && defined(HAVE_LOCALTIME_R)
- if(log_time_asc && strftime(tmbuf, sizeof(tmbuf), "%b %d %H:%M:%S",
- localtime_r(&now, &tm))%(sizeof(tmbuf)) != 0) {
- /* %sizeof buf!=0 because old strftime returned max on error */
- fprintf(logfile, "%s %s[%d:%x] %s: %s\n", tmbuf,
- ident, (int)getpid(), tid?*tid:0, type, message);
- } else
-#elif defined(UB_ON_WINDOWS)
- if(log_time_asc && GetTimeFormat(LOCALE_USER_DEFAULT, 0, NULL, NULL,
- tmbuf, sizeof(tmbuf)) && GetDateFormat(LOCALE_USER_DEFAULT, 0,
- NULL, NULL, dtbuf, sizeof(dtbuf))) {
- fprintf(logfile, "%s %s %s[%d:%x] %s: %s\n", dtbuf, tmbuf,
- ident, (int)getpid(), tid?*tid:0, type, message);
- } else
-#endif
- fprintf(logfile, "[" ARG_LL "d] %s[%d:%x] %s: %s\n", (long long)now,
- ident, (int)getpid(), tid?*tid:0, type, message);
-#ifdef UB_ON_WINDOWS
- /* line buffering does not work on windows */
- fflush(logfile);
-#endif
- lock_quick_unlock(&log_lock);
-}
-
-/**
- * implementation of log_info
- * @param format: format string printf-style.
- */
-void
-log_info(const char *format, ...)
-{
- va_list args;
- va_start(args, format);
- log_vmsg(LOG_INFO, "info", format, args);
- va_end(args);
-}
-
-/**
- * implementation of log_err
- * @param format: format string printf-style.
- */
-void
-log_err(const char *format, ...)
-{
- va_list args;
- va_start(args, format);
- log_vmsg(LOG_ERR, "error", format, args);
- va_end(args);
-}
-
-/**
- * implementation of log_warn
- * @param format: format string printf-style.
- */
-void
-log_warn(const char *format, ...)
-{
- va_list args;
- va_start(args, format);
- log_vmsg(LOG_WARNING, "warning", format, args);
- va_end(args);
-}
-
-/**
- * implementation of fatal_exit
- * @param format: format string printf-style.
- */
-void
-fatal_exit(const char *format, ...)
-{
- va_list args;
- va_start(args, format);
- log_vmsg(LOG_CRIT, "fatal error", format, args);
- va_end(args);
- exit(1);
-}
-
-/**
- * implementation of verbose
- * @param level: verbose level for the message.
- * @param format: format string printf-style.
- */
-void
-verbose(enum verbosity_value level, const char* format, ...)
-{
- va_list args;
- va_start(args, format);
- if(verbosity >= level) {
- if(level == VERB_OPS)
- log_vmsg(LOG_NOTICE, "notice", format, args);
- else if(level == VERB_DETAIL)
- log_vmsg(LOG_INFO, "info", format, args);
- else log_vmsg(LOG_DEBUG, "debug", format, args);
- }
- va_end(args);
-}
-
-/** log hex data */
-static void
-log_hex_f(enum verbosity_value v, const char* msg, void* data, size_t length)
-{
- size_t i, j;
- uint8_t* data8 = (uint8_t*)data;
- const char* hexchar = "0123456789ABCDEF";
- char buf[1024+1]; /* alloc blocksize hex chars + \0 */
- const size_t blocksize = 512;
- size_t len;
-
- if(length == 0) {
- verbose(v, "%s[%u]", msg, (unsigned)length);
- return;
- }
-
- for(i=0; i<length; i+=blocksize/2) {
- len = blocksize/2;
- if(length - i < blocksize/2)
- len = length - i;
- for(j=0; j<len; j++) {
- buf[j*2] = hexchar[ data8[i+j] >> 4 ];
- buf[j*2 + 1] = hexchar[ data8[i+j] & 0xF ];
- }
- buf[len*2] = 0;
- verbose(v, "%s[%u:%u] %.*s", msg, (unsigned)length,
- (unsigned)i, (int)len*2, buf);
- }
-}
-
-void
-log_hex(const char* msg, void* data, size_t length)
-{
- log_hex_f(verbosity, msg, data, length);
-}
-
-void log_buf(enum verbosity_value level, const char* msg, sldns_buffer* buf)
-{
- if(verbosity < level)
- return;
- log_hex_f(level, msg, sldns_buffer_begin(buf), sldns_buffer_limit(buf));
-}
-
-#ifdef USE_WINSOCK
-char* wsa_strerror(DWORD err)
-{
- static char unknown[32];
-
- switch(err) {
- case WSA_INVALID_HANDLE: return "Specified event object handle is invalid.";
- case WSA_NOT_ENOUGH_MEMORY: return "Insufficient memory available.";
- case WSA_INVALID_PARAMETER: return "One or more parameters are invalid.";
- case WSA_OPERATION_ABORTED: return "Overlapped operation aborted.";
- case WSA_IO_INCOMPLETE: return "Overlapped I/O event object not in signaled state.";
- case WSA_IO_PENDING: return "Overlapped operations will complete later.";
- case WSAEINTR: return "Interrupted function call.";
- case WSAEBADF: return "File handle is not valid.";
- case WSAEACCES: return "Permission denied.";
- case WSAEFAULT: return "Bad address.";
- case WSAEINVAL: return "Invalid argument.";
- case WSAEMFILE: return "Too many open files.";
- case WSAEWOULDBLOCK: return "Resource temporarily unavailable.";
- case WSAEINPROGRESS: return "Operation now in progress.";
- case WSAEALREADY: return "Operation already in progress.";
- case WSAENOTSOCK: return "Socket operation on nonsocket.";
- case WSAEDESTADDRREQ: return "Destination address required.";
- case WSAEMSGSIZE: return "Message too long.";
- case WSAEPROTOTYPE: return "Protocol wrong type for socket.";
- case WSAENOPROTOOPT: return "Bad protocol option.";
- case WSAEPROTONOSUPPORT: return "Protocol not supported.";
- case WSAESOCKTNOSUPPORT: return "Socket type not supported.";
- case WSAEOPNOTSUPP: return "Operation not supported.";
- case WSAEPFNOSUPPORT: return "Protocol family not supported.";
- case WSAEAFNOSUPPORT: return "Address family not supported by protocol family.";
- case WSAEADDRINUSE: return "Address already in use.";
- case WSAEADDRNOTAVAIL: return "Cannot assign requested address.";
- case WSAENETDOWN: return "Network is down.";
- case WSAENETUNREACH: return "Network is unreachable.";
- case WSAENETRESET: return "Network dropped connection on reset.";
- case WSAECONNABORTED: return "Software caused connection abort.";
- case WSAECONNRESET: return "Connection reset by peer.";
- case WSAENOBUFS: return "No buffer space available.";
- case WSAEISCONN: return "Socket is already connected.";
- case WSAENOTCONN: return "Socket is not connected.";
- case WSAESHUTDOWN: return "Cannot send after socket shutdown.";
- case WSAETOOMANYREFS: return "Too many references.";
- case WSAETIMEDOUT: return "Connection timed out.";
- case WSAECONNREFUSED: return "Connection refused.";
- case WSAELOOP: return "Cannot translate name.";
- case WSAENAMETOOLONG: return "Name too long.";
- case WSAEHOSTDOWN: return "Host is down.";
- case WSAEHOSTUNREACH: return "No route to host.";
- case WSAENOTEMPTY: return "Directory not empty.";
- case WSAEPROCLIM: return "Too many processes.";
- case WSAEUSERS: return "User quota exceeded.";
- case WSAEDQUOT: return "Disk quota exceeded.";
- case WSAESTALE: return "Stale file handle reference.";
- case WSAEREMOTE: return "Item is remote.";
- case WSASYSNOTREADY: return "Network subsystem is unavailable.";
- case WSAVERNOTSUPPORTED: return "Winsock.dll version out of range.";
- case WSANOTINITIALISED: return "Successful WSAStartup not yet performed.";
- case WSAEDISCON: return "Graceful shutdown in progress.";
- case WSAENOMORE: return "No more results.";
- case WSAECANCELLED: return "Call has been canceled.";
- case WSAEINVALIDPROCTABLE: return "Procedure call table is invalid.";
- case WSAEINVALIDPROVIDER: return "Service provider is invalid.";
- case WSAEPROVIDERFAILEDINIT: return "Service provider failed to initialize.";
- case WSASYSCALLFAILURE: return "System call failure.";
- case WSASERVICE_NOT_FOUND: return "Service not found.";
- case WSATYPE_NOT_FOUND: return "Class type not found.";
- case WSA_E_NO_MORE: return "No more results.";
- case WSA_E_CANCELLED: return "Call was canceled.";
- case WSAEREFUSED: return "Database query was refused.";
- case WSAHOST_NOT_FOUND: return "Host not found.";
- case WSATRY_AGAIN: return "Nonauthoritative host not found.";
- case WSANO_RECOVERY: return "This is a nonrecoverable error.";
- case WSANO_DATA: return "Valid name, no data record of requested type.";
- case WSA_QOS_RECEIVERS: return "QOS receivers.";
- case WSA_QOS_SENDERS: return "QOS senders.";
- case WSA_QOS_NO_SENDERS: return "No QOS senders.";
- case WSA_QOS_NO_RECEIVERS: return "QOS no receivers.";
- case WSA_QOS_REQUEST_CONFIRMED: return "QOS request confirmed.";
- case WSA_QOS_ADMISSION_FAILURE: return "QOS admission error.";
- case WSA_QOS_POLICY_FAILURE: return "QOS policy failure.";
- case WSA_QOS_BAD_STYLE: return "QOS bad style.";
- case WSA_QOS_BAD_OBJECT: return "QOS bad object.";
- case WSA_QOS_TRAFFIC_CTRL_ERROR: return "QOS traffic control error.";
- case WSA_QOS_GENERIC_ERROR: return "QOS generic error.";
- case WSA_QOS_ESERVICETYPE: return "QOS service type error.";
- case WSA_QOS_EFLOWSPEC: return "QOS flowspec error.";
- case WSA_QOS_EPROVSPECBUF: return "Invalid QOS provider buffer.";
- case WSA_QOS_EFILTERSTYLE: return "Invalid QOS filter style.";
- case WSA_QOS_EFILTERTYPE: return "Invalid QOS filter type.";
- case WSA_QOS_EFILTERCOUNT: return "Incorrect QOS filter count.";
- case WSA_QOS_EOBJLENGTH: return "Invalid QOS object length.";
- case WSA_QOS_EFLOWCOUNT: return "Incorrect QOS flow count.";
- /*case WSA_QOS_EUNKOWNPSOBJ: return "Unrecognized QOS object.";*/
- case WSA_QOS_EPOLICYOBJ: return "Invalid QOS policy object.";
- case WSA_QOS_EFLOWDESC: return "Invalid QOS flow descriptor.";
- case WSA_QOS_EPSFLOWSPEC: return "Invalid QOS provider-specific flowspec.";
- case WSA_QOS_EPSFILTERSPEC: return "Invalid QOS provider-specific filterspec.";
- case WSA_QOS_ESDMODEOBJ: return "Invalid QOS shape discard mode object.";
- case WSA_QOS_ESHAPERATEOBJ: return "Invalid QOS shaping rate object.";
- case WSA_QOS_RESERVED_PETYPE: return "Reserved policy QOS element type.";
- default:
- snprintf(unknown, sizeof(unknown),
- "unknown WSA error code %d", (int)err);
- return unknown;
- }
-}
-#endif /* USE_WINSOCK */