1006 lines
		
	
	
		
			27 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			1006 lines
		
	
	
		
			27 KiB
		
	
	
	
		
			C
		
	
	
	
| /*
 | |
| 
 | |
| Copyright 1987, 1998  The Open Group
 | |
| 
 | |
| Permission to use, copy, modify, distribute, and sell this software and its
 | |
| documentation for any purpose is hereby granted without fee, provided that
 | |
| the above copyright notice appear in all copies and that both that
 | |
| copyright notice and this permission notice appear in supporting
 | |
| documentation.
 | |
| 
 | |
| The above copyright notice and this permission notice shall be included
 | |
| in all copies or substantial portions of the Software.
 | |
| 
 | |
| THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
 | |
| OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 | |
| MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
 | |
| IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR
 | |
| OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
 | |
| ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 | |
| OTHER DEALINGS IN THE SOFTWARE.
 | |
| 
 | |
| Except as contained in this notice, the name of The Open Group shall
 | |
| not be used in advertising or otherwise to promote the sale, use or
 | |
| other dealings in this Software without prior written authorization
 | |
| from The Open Group.
 | |
| 
 | |
| Copyright 1987 by Digital Equipment Corporation, Maynard, Massachusetts,
 | |
| Copyright 1994 Quarterdeck Office Systems.
 | |
| 
 | |
|                         All Rights Reserved
 | |
| 
 | |
| Permission to use, copy, modify, and distribute this software and its
 | |
| documentation for any purpose and without fee is hereby granted,
 | |
| provided that the above copyright notice appear in all copies and that
 | |
| both that copyright notice and this permission notice appear in
 | |
| supporting documentation, and that the names of Digital and
 | |
| Quarterdeck not be used in advertising or publicity pertaining to
 | |
| distribution of the software without specific, written prior
 | |
| permission.
 | |
| 
 | |
| DIGITAL AND QUARTERDECK DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
 | |
| SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
 | |
| FITNESS, IN NO EVENT SHALL DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT
 | |
| OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS
 | |
| OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
 | |
| OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE
 | |
| OR PERFORMANCE OF THIS SOFTWARE.
 | |
| 
 | |
| */
 | |
| 
 | |
| /*
 | |
|  * Copyright (c) 1997-2003 by The XFree86 Project, Inc.
 | |
|  *
 | |
|  * Permission is hereby granted, free of charge, to any person obtaining a
 | |
|  * copy of this software and associated documentation files (the "Software"),
 | |
|  * to deal in the Software without restriction, including without limitation
 | |
|  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
 | |
|  * and/or sell copies of the Software, and to permit persons to whom the
 | |
|  * Software is furnished to do so, subject to the following conditions:
 | |
|  *
 | |
|  * The above copyright notice and this permission notice shall be included in
 | |
|  * all copies or substantial portions of the Software.
 | |
|  *
 | |
|  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | |
|  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | |
|  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
 | |
|  * THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
 | |
|  * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
 | |
|  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 | |
|  * OTHER DEALINGS IN THE SOFTWARE.
 | |
|  *
 | |
|  * Except as contained in this notice, the name of the copyright holder(s)
 | |
|  * and author(s) shall not be used in advertising or otherwise to promote
 | |
|  * the sale, use or other dealings in this Software without prior written
 | |
|  * authorization from the copyright holder(s) and author(s).
 | |
|  */
 | |
| 
 | |
| #ifdef HAVE_DIX_CONFIG_H
 | |
| #include <dix-config.h>
 | |
| #endif
 | |
| 
 | |
| #include <X11/Xos.h>
 | |
| #include <stdio.h>
 | |
| #include <time.h>
 | |
| #include <sys/stat.h>
 | |
| #include <stdarg.h>
 | |
| #include <stdlib.h>             /* for malloc() */
 | |
| 
 | |
| #include "input.h"
 | |
| #include "site.h"
 | |
| #include "opaque.h"
 | |
| 
 | |
| #ifdef WIN32
 | |
| #include <process.h>
 | |
| #define getpid(x) _getpid(x)
 | |
| #endif
 | |
| 
 | |
| #ifdef XF86BIGFONT
 | |
| #include "xf86bigfontsrv.h"
 | |
| #endif
 | |
| 
 | |
| #ifdef __clang__
 | |
| #pragma clang diagnostic ignored "-Wformat-nonliteral"
 | |
| #endif
 | |
| 
 | |
| #ifdef DDXOSVERRORF
 | |
| void (*OsVendorVErrorFProc) (const char *, va_list args) = NULL;
 | |
| #endif
 | |
| 
 | |
| static FILE *logFile = NULL;
 | |
| static int logFileFd = -1;
 | |
| static Bool logFlush = FALSE;
 | |
| static Bool logSync = FALSE;
 | |
| static int logVerbosity = DEFAULT_LOG_VERBOSITY;
 | |
| static int logFileVerbosity = DEFAULT_LOG_FILE_VERBOSITY;
 | |
| 
 | |
| /* Buffer to information logged before the log file is opened. */
 | |
| static char *saveBuffer = NULL;
 | |
| static int bufferSize = 0, bufferUnused = 0, bufferPos = 0;
 | |
| static Bool needBuffer = TRUE;
 | |
| 
 | |
| #ifdef __APPLE__
 | |
| #include <AvailabilityMacros.h>
 | |
| 
 | |
| static char __crashreporter_info_buff__[4096] = { 0 };
 | |
| 
 | |
| static const char *__crashreporter_info__ __attribute__ ((__used__)) =
 | |
|     &__crashreporter_info_buff__[0];
 | |
| #if MAC_OS_X_VERSION_MIN_REQUIRED >= 1050
 | |
| // This is actually a toolchain requirement, but I'm not sure the correct check,
 | |
| // but it should be fine to just only include it for Leopard and later.  This line
 | |
| // just tells the linker to never strip this symbol (such as for space optimization)
 | |
| asm(".desc ___crashreporter_info__, 0x10");
 | |
| #endif
 | |
| #endif
 | |
| 
 | |
| /* Prefix strings for log messages. */
 | |
| #ifndef X_UNKNOWN_STRING
 | |
| #define X_UNKNOWN_STRING		"(\?\?)"
 | |
| #endif
 | |
| #ifndef X_PROBE_STRING
 | |
| #define X_PROBE_STRING			"(--)"
 | |
| #endif
 | |
| #ifndef X_CONFIG_STRING
 | |
| #define X_CONFIG_STRING			"(**)"
 | |
| #endif
 | |
| #ifndef X_DEFAULT_STRING
 | |
| #define X_DEFAULT_STRING		"(==)"
 | |
| #endif
 | |
| #ifndef X_CMDLINE_STRING
 | |
| #define X_CMDLINE_STRING		"(++)"
 | |
| #endif
 | |
| #ifndef X_NOTICE_STRING
 | |
| #define X_NOTICE_STRING			"(!!)"
 | |
| #endif
 | |
| #ifndef X_ERROR_STRING
 | |
| #define X_ERROR_STRING			"(EE)"
 | |
| #endif
 | |
| #ifndef X_WARNING_STRING
 | |
| #define X_WARNING_STRING		"(WW)"
 | |
| #endif
 | |
| #ifndef X_INFO_STRING
 | |
| #define X_INFO_STRING			"(II)"
 | |
| #endif
 | |
| #ifndef X_NOT_IMPLEMENTED_STRING
 | |
| #define X_NOT_IMPLEMENTED_STRING	"(NI)"
 | |
| #endif
 | |
| #ifndef X_DEBUG_STRING
 | |
| #define X_DEBUG_STRING			"(DB)"
 | |
| #endif
 | |
| #ifndef X_NONE_STRING
 | |
| #define X_NONE_STRING			""
 | |
| #endif
 | |
| 
 | |
| static size_t
 | |
| strlen_sigsafe(const char *s)
 | |
| {
 | |
|     size_t len;
 | |
|     for (len = 0; s[len]; len++);
 | |
|     return len;
 | |
| }
 | |
| 
 | |
| /*
 | |
|  * LogInit is called to start logging to a file.  It is also called (with
 | |
|  * NULL arguments) when logging to a file is not wanted.  It must always be
 | |
|  * called, otherwise log messages will continue to accumulate in a buffer.
 | |
|  *
 | |
|  * %s, if present in the fname or backup strings, is expanded to the display
 | |
|  * string.
 | |
|  */
 | |
| 
 | |
| #pragma GCC diagnostic push
 | |
| #pragma GCC diagnostic ignored "-Wformat-nonliteral"
 | |
| 
 | |
| const char *
 | |
| LogInit(const char *fname, const char *backup)
 | |
| {
 | |
|     char *logFileName = NULL;
 | |
| 
 | |
|     if (fname && *fname) {
 | |
|         if (asprintf(&logFileName, fname, display) == -1)
 | |
|             FatalError("Cannot allocate space for the log file name\n");
 | |
| 
 | |
|         if (backup && *backup) {
 | |
|             struct stat buf;
 | |
| 
 | |
|             if (!stat(logFileName, &buf) && S_ISREG(buf.st_mode)) {
 | |
|                 char *suffix;
 | |
|                 char *oldLog;
 | |
| 
 | |
|                 if ((asprintf(&suffix, backup, display) == -1) ||
 | |
|                     (asprintf(&oldLog, "%s%s", logFileName, suffix) == -1))
 | |
|                     FatalError("Cannot allocate space for the log file name\n");
 | |
|                 free(suffix);
 | |
|                 if (rename(logFileName, oldLog) == -1) {
 | |
|                     FatalError("Cannot move old log file \"%s\" to \"%s\"\n",
 | |
|                                logFileName, oldLog);
 | |
|                 }
 | |
|                 free(oldLog);
 | |
|             }
 | |
|         }
 | |
|         else {
 | |
|             unlink(logFileName);
 | |
|         }
 | |
|         if ((logFile = fopen(logFileName, "w")) == NULL)
 | |
|             FatalError("Cannot open log file \"%s\"\n", logFileName);
 | |
|         setvbuf(logFile, NULL, _IONBF, 0);
 | |
| 
 | |
|         logFileFd = fileno(logFile);
 | |
| 
 | |
|         /* Flush saved log information. */
 | |
|         if (saveBuffer && bufferSize > 0) {
 | |
|             fwrite(saveBuffer, bufferPos, 1, logFile);
 | |
|             fflush(logFile);
 | |
| #ifndef WIN32
 | |
|             fsync(fileno(logFile));
 | |
| #endif
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     /*
 | |
|      * Unconditionally free the buffer, and flag that the buffer is no longer
 | |
|      * needed.
 | |
|      */
 | |
|     if (saveBuffer && bufferSize > 0) {
 | |
|         free(saveBuffer);
 | |
|         saveBuffer = NULL;
 | |
|         bufferSize = 0;
 | |
|     }
 | |
|     needBuffer = FALSE;
 | |
| 
 | |
|     return logFileName;
 | |
| }
 | |
| #pragma GCC diagnostic pop
 | |
| 
 | |
| void
 | |
| LogClose(enum ExitCode error)
 | |
| {
 | |
|     if (logFile) {
 | |
|         int msgtype = (error == EXIT_NO_ERROR) ? X_INFO : X_ERROR;
 | |
|         LogMessageVerbSigSafe(msgtype, -1,
 | |
|                 "Server terminated %s (%d). Closing log file.\n",
 | |
|                 (error == EXIT_NO_ERROR) ? "successfully" : "with error",
 | |
|                 error);
 | |
|         fclose(logFile);
 | |
|         logFile = NULL;
 | |
|         logFileFd = -1;
 | |
|     }
 | |
| }
 | |
| 
 | |
| Bool
 | |
| LogSetParameter(LogParameter param, int value)
 | |
| {
 | |
|     switch (param) {
 | |
|     case XLOG_FLUSH:
 | |
|         logFlush = value ? TRUE : FALSE;
 | |
|         return TRUE;
 | |
|     case XLOG_SYNC:
 | |
|         logSync = value ? TRUE : FALSE;
 | |
|         return TRUE;
 | |
|     case XLOG_VERBOSITY:
 | |
|         logVerbosity = value;
 | |
|         return TRUE;
 | |
|     case XLOG_FILE_VERBOSITY:
 | |
|         logFileVerbosity = value;
 | |
|         return TRUE;
 | |
|     default:
 | |
|         return FALSE;
 | |
|     }
 | |
| }
 | |
| 
 | |
| enum {
 | |
|     LMOD_LONG     = 0x1,
 | |
|     LMOD_LONGLONG = 0x2,
 | |
|     LMOD_SHORT    = 0x4,
 | |
|     LMOD_SIZET    = 0x8,
 | |
| };
 | |
| 
 | |
| /**
 | |
|  * Parse non-digit length modifiers and set the corresponding flag in
 | |
|  * flags_return.
 | |
|  *
 | |
|  * @return the number of bytes parsed
 | |
|  */
 | |
| static int parse_length_modifier(const char *format, size_t len, int *flags_return)
 | |
| {
 | |
|     int idx = 0;
 | |
|     int length_modifier = 0;
 | |
| 
 | |
|     while (idx < len) {
 | |
|         switch (format[idx]) {
 | |
|             case 'l':
 | |
|                 BUG_RETURN_VAL(length_modifier & LMOD_SHORT, 0);
 | |
| 
 | |
|                 if (length_modifier & LMOD_LONG)
 | |
|                     length_modifier |= LMOD_LONGLONG;
 | |
|                 else
 | |
|                     length_modifier |= LMOD_LONG;
 | |
|                 break;
 | |
|             case 'h':
 | |
|                 BUG_RETURN_VAL(length_modifier & (LMOD_LONG|LMOD_LONGLONG), 0);
 | |
|                 length_modifier |= LMOD_SHORT;
 | |
|                 /* gcc says 'short int' is promoted to 'int' when
 | |
|                  * passed through '...', so ignored during
 | |
|                  * processing */
 | |
|                 break;
 | |
|             case 'z':
 | |
|                 length_modifier |= LMOD_SIZET;
 | |
|                 break;
 | |
|             default:
 | |
|                 goto out;
 | |
|         }
 | |
|         idx++;
 | |
|     }
 | |
| 
 | |
| out:
 | |
|     *flags_return = length_modifier;
 | |
|     return idx;
 | |
| }
 | |
| 
 | |
| /**
 | |
|  * Signal-safe snprintf, with some limitations over snprintf. Be careful
 | |
|  * which directives you use.
 | |
|  */
 | |
| static int
 | |
| vpnprintf(char *string, int size_in, const char *f, va_list args)
 | |
| {
 | |
|     int f_idx = 0;
 | |
|     int s_idx = 0;
 | |
|     int f_len = strlen_sigsafe(f);
 | |
|     char *string_arg;
 | |
|     char number[21];
 | |
|     int p_len;
 | |
|     int i;
 | |
|     uint64_t ui;
 | |
|     int64_t si;
 | |
|     size_t size = size_in;
 | |
|     int precision;
 | |
| 
 | |
|     for (; f_idx < f_len && s_idx < size - 1; f_idx++) {
 | |
|         int length_modifier = 0;
 | |
|         if (f[f_idx] != '%') {
 | |
|             string[s_idx++] = f[f_idx];
 | |
|             continue;
 | |
|         }
 | |
| 
 | |
|         f_idx++;
 | |
| 
 | |
|         /* silently swallow minimum field width */
 | |
|         if (f[f_idx] == '*') {
 | |
|             f_idx++;
 | |
|             va_arg(args, int);
 | |
|         } else {
 | |
|             while (f_idx < f_len && ((f[f_idx] >= '0' && f[f_idx] <= '9')))
 | |
|                 f_idx++;
 | |
|         }
 | |
| 
 | |
|         /* is there a precision? */
 | |
|         precision = size;
 | |
|         if (f[f_idx] == '.') {
 | |
|             f_idx++;
 | |
|             if (f[f_idx] == '*') {
 | |
|                 f_idx++;
 | |
|                 /* precision is supplied in an int argument */
 | |
|                 precision = va_arg(args, int);
 | |
|             } else {
 | |
|                 /* silently swallow precision digits */
 | |
|                 while (f_idx < f_len && ((f[f_idx] >= '0' && f[f_idx] <= '9')))
 | |
|                     f_idx++;
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         /* non-digit length modifiers */
 | |
|         if (f_idx < f_len) {
 | |
|             int parsed_bytes = parse_length_modifier(&f[f_idx], f_len - f_idx, &length_modifier);
 | |
|             if (parsed_bytes < 0)
 | |
|                 return 0;
 | |
|             f_idx += parsed_bytes;
 | |
|         }
 | |
| 
 | |
|         if (f_idx >= f_len)
 | |
|             break;
 | |
| 
 | |
|         switch (f[f_idx]) {
 | |
|         case 's':
 | |
|             string_arg = va_arg(args, char*);
 | |
| 
 | |
|             for (i = 0; string_arg[i] != 0 && s_idx < size - 1 && s_idx < precision; i++)
 | |
|                 string[s_idx++] = string_arg[i];
 | |
|             break;
 | |
| 
 | |
|         case 'u':
 | |
|             if (length_modifier & LMOD_LONGLONG)
 | |
|                 ui = va_arg(args, unsigned long long);
 | |
|             else if (length_modifier & LMOD_LONG)
 | |
|                 ui = va_arg(args, unsigned long);
 | |
|             else if (length_modifier & LMOD_SIZET)
 | |
|                 ui = va_arg(args, size_t);
 | |
|             else
 | |
|                 ui = va_arg(args, unsigned);
 | |
| 
 | |
|             FormatUInt64(ui, number);
 | |
|             p_len = strlen_sigsafe(number);
 | |
| 
 | |
|             for (i = 0; i < p_len && s_idx < size - 1; i++)
 | |
|                 string[s_idx++] = number[i];
 | |
|             break;
 | |
|         case 'i':
 | |
|         case 'd':
 | |
|             if (length_modifier & LMOD_LONGLONG)
 | |
|                 si = va_arg(args, long long);
 | |
|             else if (length_modifier & LMOD_LONG)
 | |
|                 si = va_arg(args, long);
 | |
|             else if (length_modifier & LMOD_SIZET)
 | |
|                 si = va_arg(args, ssize_t);
 | |
|             else
 | |
|                 si = va_arg(args, int);
 | |
| 
 | |
|             FormatInt64(si, number);
 | |
|             p_len = strlen_sigsafe(number);
 | |
| 
 | |
|             for (i = 0; i < p_len && s_idx < size - 1; i++)
 | |
|                 string[s_idx++] = number[i];
 | |
|             break;
 | |
| 
 | |
|         case 'p':
 | |
|             string[s_idx++] = '0';
 | |
|             if (s_idx < size - 1)
 | |
|                 string[s_idx++] = 'x';
 | |
|             ui = (uintptr_t)va_arg(args, void*);
 | |
|             FormatUInt64Hex(ui, number);
 | |
|             p_len = strlen_sigsafe(number);
 | |
| 
 | |
|             for (i = 0; i < p_len && s_idx < size - 1; i++)
 | |
|                 string[s_idx++] = number[i];
 | |
|             break;
 | |
| 
 | |
|         case 'x':
 | |
|             if (length_modifier & LMOD_LONGLONG)
 | |
|                 ui = va_arg(args, unsigned long long);
 | |
|             else if (length_modifier & LMOD_LONG)
 | |
|                 ui = va_arg(args, unsigned long);
 | |
|             else if (length_modifier & LMOD_SIZET)
 | |
|                 ui = va_arg(args, size_t);
 | |
|             else
 | |
|                 ui = va_arg(args, unsigned);
 | |
| 
 | |
|             FormatUInt64Hex(ui, number);
 | |
|             p_len = strlen_sigsafe(number);
 | |
| 
 | |
|             for (i = 0; i < p_len && s_idx < size - 1; i++)
 | |
|                 string[s_idx++] = number[i];
 | |
|             break;
 | |
|         case 'f':
 | |
|             {
 | |
|                 double d = va_arg(args, double);
 | |
|                 FormatDouble(d, number);
 | |
|                 p_len = strlen_sigsafe(number);
 | |
| 
 | |
|                 for (i = 0; i < p_len && s_idx < size - 1; i++)
 | |
|                     string[s_idx++] = number[i];
 | |
|             }
 | |
|             break;
 | |
|         case 'c':
 | |
|             {
 | |
|                 char c = va_arg(args, int);
 | |
|                 if (s_idx < size - 1)
 | |
|                     string[s_idx++] = c;
 | |
|             }
 | |
|             break;
 | |
|         case '%':
 | |
|             string[s_idx++] = '%';
 | |
|             break;
 | |
|         default:
 | |
|             BUG_WARN_MSG(f[f_idx], "Unsupported printf directive '%c'\n", f[f_idx]);
 | |
|             va_arg(args, char*);
 | |
|             string[s_idx++] = '%';
 | |
|             if (s_idx < size - 1)
 | |
|                 string[s_idx++] = f[f_idx];
 | |
|             break;
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     string[s_idx] = '\0';
 | |
| 
 | |
|     return s_idx;
 | |
| }
 | |
| 
 | |
| static int
 | |
| pnprintf(char *string, int size, const char *f, ...)
 | |
| {
 | |
|     int rc;
 | |
|     va_list args;
 | |
| 
 | |
|     va_start(args, f);
 | |
|     rc = vpnprintf(string, size, f, args);
 | |
|     va_end(args);
 | |
| 
 | |
|     return rc;
 | |
| }
 | |
| 
 | |
| /* This function does the actual log message writes. It must be signal safe.
 | |
|  * When attempting to call non-signal-safe functions, guard them with a check
 | |
|  * of the inSignalContext global variable. */
 | |
| static void
 | |
| LogSWrite(int verb, const char *buf, size_t len, Bool end_line)
 | |
| {
 | |
|     static Bool newline = TRUE;
 | |
|     int ret;
 | |
| 
 | |
|     if (verb < 0 || logVerbosity >= verb)
 | |
|         ret = write(2, buf, len);
 | |
| 
 | |
|     if (verb < 0 || logFileVerbosity >= verb) {
 | |
|         if (inSignalContext && logFileFd >= 0) {
 | |
|             ret = write(logFileFd, buf, len);
 | |
| #ifndef WIN32
 | |
|             if (logFlush && logSync)
 | |
|                 fsync(logFileFd);
 | |
| #endif
 | |
|         }
 | |
|         else if (!inSignalContext && logFile) {
 | |
|             if (newline)
 | |
|                 fprintf(logFile, "[%10.3f] ", GetTimeInMillis() / 1000.0);
 | |
|             newline = end_line;
 | |
|             fwrite(buf, len, 1, logFile);
 | |
|             if (logFlush) {
 | |
|                 fflush(logFile);
 | |
| #ifndef WIN32
 | |
|                 if (logSync)
 | |
|                     fsync(fileno(logFile));
 | |
| #endif
 | |
|             }
 | |
|         }
 | |
|         else if (!inSignalContext && needBuffer) {
 | |
|             if (len > bufferUnused) {
 | |
|                 bufferSize += 1024;
 | |
|                 bufferUnused += 1024;
 | |
|                 saveBuffer = realloc(saveBuffer, bufferSize);
 | |
|                 if (!saveBuffer)
 | |
|                     FatalError("realloc() failed while saving log messages\n");
 | |
|             }
 | |
|             bufferUnused -= len;
 | |
|             memcpy(saveBuffer + bufferPos, buf, len);
 | |
|             bufferPos += len;
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     /* There's no place to log an error message if the log write
 | |
|      * fails...
 | |
|      */
 | |
|     (void) ret;
 | |
| }
 | |
| 
 | |
| void
 | |
| LogVWrite(int verb, const char *f, va_list args)
 | |
| {
 | |
|     return LogVMessageVerb(X_NONE, verb, f, args);
 | |
| }
 | |
| 
 | |
| void
 | |
| LogWrite(int verb, const char *f, ...)
 | |
| {
 | |
|     va_list args;
 | |
| 
 | |
|     va_start(args, f);
 | |
|     LogVWrite(verb, f, args);
 | |
|     va_end(args);
 | |
| }
 | |
| 
 | |
| /* Returns the Message Type string to prepend to a logging message, or NULL
 | |
|  * if the message will be dropped due to insufficient verbosity. */
 | |
| static const char *
 | |
| LogMessageTypeVerbString(MessageType type, int verb)
 | |
| {
 | |
|     if (type == X_ERROR)
 | |
|         verb = 0;
 | |
| 
 | |
|     if (logVerbosity < verb && logFileVerbosity < verb)
 | |
|         return NULL;
 | |
| 
 | |
|     switch (type) {
 | |
|     case X_PROBED:
 | |
|         return X_PROBE_STRING;
 | |
|     case X_CONFIG:
 | |
|         return X_CONFIG_STRING;
 | |
|     case X_DEFAULT:
 | |
|         return X_DEFAULT_STRING;
 | |
|     case X_CMDLINE:
 | |
|         return X_CMDLINE_STRING;
 | |
|     case X_NOTICE:
 | |
|         return X_NOTICE_STRING;
 | |
|     case X_ERROR:
 | |
|         return X_ERROR_STRING;
 | |
|     case X_WARNING:
 | |
|         return X_WARNING_STRING;
 | |
|     case X_INFO:
 | |
|         return X_INFO_STRING;
 | |
|     case X_NOT_IMPLEMENTED:
 | |
|         return X_NOT_IMPLEMENTED_STRING;
 | |
|     case X_UNKNOWN:
 | |
|         return X_UNKNOWN_STRING;
 | |
|     case X_NONE:
 | |
|         return X_NONE_STRING;
 | |
|     case X_DEBUG:
 | |
|         return X_DEBUG_STRING;
 | |
|     default:
 | |
|         return X_UNKNOWN_STRING;
 | |
|     }
 | |
| }
 | |
| 
 | |
| void
 | |
| LogVMessageVerb(MessageType type, int verb, const char *format, va_list args)
 | |
| {
 | |
|     const char *type_str;
 | |
|     char buf[1024];
 | |
|     const size_t size = sizeof(buf);
 | |
|     Bool newline;
 | |
|     size_t len = 0;
 | |
| 
 | |
|     if (inSignalContext) {
 | |
|         LogVMessageVerbSigSafe(type, verb, format, args);
 | |
|         return;
 | |
|     }
 | |
| 
 | |
|     type_str = LogMessageTypeVerbString(type, verb);
 | |
|     if (!type_str)
 | |
|         return;
 | |
| 
 | |
|     /* if type_str is not "", prepend it and ' ', to message */
 | |
|     if (type_str[0] != '\0')
 | |
|         len += Xscnprintf(&buf[len], size - len, "%s ", type_str);
 | |
| 
 | |
|     if (size - len > 1)
 | |
|         len += Xvscnprintf(&buf[len], size - len, format, args);
 | |
| 
 | |
|     /* Force '\n' at end of truncated line */
 | |
|     if (size - len == 1)
 | |
|         buf[len - 1] = '\n';
 | |
| 
 | |
|     newline = (buf[len - 1] == '\n');
 | |
|     LogSWrite(verb, buf, len, newline);
 | |
| }
 | |
| 
 | |
| /* Log message with verbosity level specified. */
 | |
| void
 | |
| LogMessageVerb(MessageType type, int verb, const char *format, ...)
 | |
| {
 | |
|     va_list ap;
 | |
| 
 | |
|     va_start(ap, format);
 | |
|     LogVMessageVerb(type, verb, format, ap);
 | |
|     va_end(ap);
 | |
| }
 | |
| 
 | |
| /* Log a message with the standard verbosity level of 1. */
 | |
| void
 | |
| LogMessage(MessageType type, const char *format, ...)
 | |
| {
 | |
|     va_list ap;
 | |
| 
 | |
|     va_start(ap, format);
 | |
|     LogVMessageVerb(type, 1, format, ap);
 | |
|     va_end(ap);
 | |
| }
 | |
| 
 | |
| /* Log a message using only signal safe functions. */
 | |
| void
 | |
| LogMessageVerbSigSafe(MessageType type, int verb, const char *format, ...)
 | |
| {
 | |
|     va_list ap;
 | |
|     va_start(ap, format);
 | |
|     LogVMessageVerbSigSafe(type, verb, format, ap);
 | |
|     va_end(ap);
 | |
| }
 | |
| 
 | |
| void
 | |
| LogVMessageVerbSigSafe(MessageType type, int verb, const char *format, va_list args)
 | |
| {
 | |
|     const char *type_str;
 | |
|     char buf[1024];
 | |
|     int len;
 | |
|     Bool newline;
 | |
| 
 | |
|     type_str = LogMessageTypeVerbString(type, verb);
 | |
|     if (!type_str)
 | |
|         return;
 | |
| 
 | |
|     /* if type_str is not "", prepend it and ' ', to message */
 | |
|     if (type_str[0] != '\0') {
 | |
|         LogSWrite(verb, type_str, strlen_sigsafe(type_str), FALSE);
 | |
|         LogSWrite(verb, " ", 1, FALSE);
 | |
|     }
 | |
| 
 | |
|     len = vpnprintf(buf, sizeof(buf), format, args);
 | |
| 
 | |
|     /* Force '\n' at end of truncated line */
 | |
|     if (sizeof(buf) - len == 1)
 | |
|         buf[len - 1] = '\n';
 | |
| 
 | |
|     newline = (len > 0 && buf[len - 1] == '\n');
 | |
|     LogSWrite(verb, buf, len, newline);
 | |
| }
 | |
| 
 | |
| void
 | |
| LogVHdrMessageVerb(MessageType type, int verb, const char *msg_format,
 | |
|                    va_list msg_args, const char *hdr_format, va_list hdr_args)
 | |
| {
 | |
|     const char *type_str;
 | |
|     char buf[1024];
 | |
|     const size_t size = sizeof(buf);
 | |
|     Bool newline;
 | |
|     size_t len = 0;
 | |
|     int (*vprintf_func)(char *, int, const char* _X_RESTRICT_KYWD f, va_list args)
 | |
|             _X_ATTRIBUTE_PRINTF(3, 0);
 | |
|     int (*printf_func)(char *, int, const char* _X_RESTRICT_KYWD f, ...)
 | |
|             _X_ATTRIBUTE_PRINTF(3, 4);
 | |
| 
 | |
|     type_str = LogMessageTypeVerbString(type, verb);
 | |
|     if (!type_str)
 | |
|         return;
 | |
| 
 | |
|     if (inSignalContext) {
 | |
|         vprintf_func = vpnprintf;
 | |
|         printf_func = pnprintf;
 | |
|     } else {
 | |
|         vprintf_func = Xvscnprintf;
 | |
|         printf_func = Xscnprintf;
 | |
|     }
 | |
| 
 | |
|     /* if type_str is not "", prepend it and ' ', to message */
 | |
|     if (type_str[0] != '\0')
 | |
|         len += printf_func(&buf[len], size - len, "%s ", type_str);
 | |
| 
 | |
|     if (hdr_format && size - len > 1)
 | |
|         len += vprintf_func(&buf[len], size - len, hdr_format, hdr_args);
 | |
| 
 | |
|     if (msg_format && size - len > 1)
 | |
|         len += vprintf_func(&buf[len], size - len, msg_format, msg_args);
 | |
| 
 | |
|     /* Force '\n' at end of truncated line */
 | |
|     if (size - len == 1)
 | |
|         buf[len - 1] = '\n';
 | |
| 
 | |
|     newline = (buf[len - 1] == '\n');
 | |
|     LogSWrite(verb, buf, len, newline);
 | |
| }
 | |
| 
 | |
| void
 | |
| LogHdrMessageVerb(MessageType type, int verb, const char *msg_format,
 | |
|                   va_list msg_args, const char *hdr_format, ...)
 | |
| {
 | |
|     va_list hdr_args;
 | |
| 
 | |
|     va_start(hdr_args, hdr_format);
 | |
|     LogVHdrMessageVerb(type, verb, msg_format, msg_args, hdr_format, hdr_args);
 | |
|     va_end(hdr_args);
 | |
| }
 | |
| 
 | |
| void
 | |
| LogHdrMessage(MessageType type, const char *msg_format, va_list msg_args,
 | |
|               const char *hdr_format, ...)
 | |
| {
 | |
|     va_list hdr_args;
 | |
| 
 | |
|     va_start(hdr_args, hdr_format);
 | |
|     LogVHdrMessageVerb(type, 1, msg_format, msg_args, hdr_format, hdr_args);
 | |
|     va_end(hdr_args);
 | |
| }
 | |
| 
 | |
| void
 | |
| AbortServer(void)
 | |
|     _X_NORETURN;
 | |
| 
 | |
| void
 | |
| AbortServer(void)
 | |
| {
 | |
| #ifdef XF86BIGFONT
 | |
|     XF86BigfontCleanup();
 | |
| #endif
 | |
|     CloseWellKnownConnections();
 | |
|     OsCleanup(TRUE);
 | |
|     AbortDevices();
 | |
|     AbortDDX(EXIT_ERR_ABORT);
 | |
|     fflush(stderr);
 | |
|     if (CoreDump)
 | |
|         OsAbort();
 | |
|     exit(1);
 | |
| }
 | |
| 
 | |
| #define AUDIT_PREFIX "AUDIT: %s: %ld: "
 | |
| #ifndef AUDIT_TIMEOUT
 | |
| #define AUDIT_TIMEOUT ((CARD32)(120 * 1000))    /* 2 mn */
 | |
| #endif
 | |
| 
 | |
| static int nrepeat = 0;
 | |
| static int oldlen = -1;
 | |
| static OsTimerPtr auditTimer = NULL;
 | |
| 
 | |
| void
 | |
| FreeAuditTimer(void)
 | |
| {
 | |
|     if (auditTimer != NULL) {
 | |
|         /* Force output of pending messages */
 | |
|         TimerForce(auditTimer);
 | |
|         TimerFree(auditTimer);
 | |
|         auditTimer = NULL;
 | |
|     }
 | |
| }
 | |
| 
 | |
| static char *
 | |
| AuditPrefix(void)
 | |
| {
 | |
|     time_t tm;
 | |
|     char *autime, *s;
 | |
|     char *tmpBuf;
 | |
|     int len;
 | |
| 
 | |
|     time(&tm);
 | |
|     autime = ctime(&tm);
 | |
|     if ((s = strchr(autime, '\n')))
 | |
|         *s = '\0';
 | |
|     len = strlen(AUDIT_PREFIX) + strlen(autime) + 10 + 1;
 | |
|     tmpBuf = malloc(len);
 | |
|     if (!tmpBuf)
 | |
|         return NULL;
 | |
|     snprintf(tmpBuf, len, AUDIT_PREFIX, autime, (unsigned long) getpid());
 | |
|     return tmpBuf;
 | |
| }
 | |
| 
 | |
| void
 | |
| AuditF(const char *f, ...)
 | |
| {
 | |
|     va_list args;
 | |
| 
 | |
|     va_start(args, f);
 | |
| 
 | |
|     VAuditF(f, args);
 | |
|     va_end(args);
 | |
| }
 | |
| 
 | |
| static CARD32
 | |
| AuditFlush(OsTimerPtr timer, CARD32 now, void *arg)
 | |
| {
 | |
|     char *prefix;
 | |
| 
 | |
|     if (nrepeat > 0) {
 | |
|         prefix = AuditPrefix();
 | |
|         ErrorF("%slast message repeated %d times\n",
 | |
|                prefix != NULL ? prefix : "", nrepeat);
 | |
|         nrepeat = 0;
 | |
|         free(prefix);
 | |
|         return AUDIT_TIMEOUT;
 | |
|     }
 | |
|     else {
 | |
|         /* if the timer expires without anything to print, flush the message */
 | |
|         oldlen = -1;
 | |
|         return 0;
 | |
|     }
 | |
| }
 | |
| 
 | |
| void
 | |
| VAuditF(const char *f, va_list args)
 | |
| {
 | |
|     char *prefix;
 | |
|     char buf[1024];
 | |
|     int len;
 | |
|     static char oldbuf[1024];
 | |
| 
 | |
|     prefix = AuditPrefix();
 | |
|     len = vsnprintf(buf, sizeof(buf), f, args);
 | |
| 
 | |
|     if (len == oldlen && strcmp(buf, oldbuf) == 0) {
 | |
|         /* Message already seen */
 | |
|         nrepeat++;
 | |
|     }
 | |
|     else {
 | |
|         /* new message */
 | |
|         if (auditTimer != NULL)
 | |
|             TimerForce(auditTimer);
 | |
|         ErrorF("%s%s", prefix != NULL ? prefix : "", buf);
 | |
|         strlcpy(oldbuf, buf, sizeof(oldbuf));
 | |
|         oldlen = len;
 | |
|         nrepeat = 0;
 | |
|         auditTimer = TimerSet(auditTimer, 0, AUDIT_TIMEOUT, AuditFlush, NULL);
 | |
|     }
 | |
|     free(prefix);
 | |
| }
 | |
| 
 | |
| void
 | |
| FatalError(const char *f, ...)
 | |
| {
 | |
|     va_list args;
 | |
|     va_list args2;
 | |
|     static Bool beenhere = FALSE;
 | |
| 
 | |
|     if (beenhere)
 | |
|         ErrorFSigSafe("\nFatalError re-entered, aborting\n");
 | |
|     else
 | |
|         ErrorFSigSafe("\nFatal server error:\n");
 | |
| 
 | |
|     va_start(args, f);
 | |
| 
 | |
|     /* Make a copy for OsVendorFatalError */
 | |
|     va_copy(args2, args);
 | |
| 
 | |
| #ifdef __APPLE__
 | |
|     {
 | |
|         va_list apple_args;
 | |
| 
 | |
|         va_copy(apple_args, args);
 | |
|         (void)vsnprintf(__crashreporter_info_buff__,
 | |
|                         sizeof(__crashreporter_info_buff__), f, apple_args);
 | |
|         va_end(apple_args);
 | |
|     }
 | |
| #endif
 | |
|     VErrorFSigSafe(f, args);
 | |
|     va_end(args);
 | |
|     ErrorFSigSafe("\n");
 | |
|     if (!beenhere)
 | |
|         OsVendorFatalError(f, args2);
 | |
|     va_end(args2);
 | |
|     if (!beenhere) {
 | |
|         beenhere = TRUE;
 | |
|         AbortServer();
 | |
|     }
 | |
|     else
 | |
|         OsAbort();
 | |
|  /*NOTREACHED*/}
 | |
| 
 | |
| void
 | |
| VErrorF(const char *f, va_list args)
 | |
| {
 | |
| #ifdef DDXOSVERRORF
 | |
|     if (OsVendorVErrorFProc)
 | |
|         OsVendorVErrorFProc(f, args);
 | |
|     else
 | |
|         LogVWrite(-1, f, args);
 | |
| #else
 | |
|     LogVWrite(-1, f, args);
 | |
| #endif
 | |
| }
 | |
| 
 | |
| void
 | |
| ErrorF(const char *f, ...)
 | |
| {
 | |
|     va_list args;
 | |
| 
 | |
|     va_start(args, f);
 | |
|     VErrorF(f, args);
 | |
|     va_end(args);
 | |
| }
 | |
| 
 | |
| void
 | |
| VErrorFSigSafe(const char *f, va_list args)
 | |
| {
 | |
|     LogVMessageVerbSigSafe(X_ERROR, -1, f, args);
 | |
| }
 | |
| 
 | |
| void
 | |
| ErrorFSigSafe(const char *f, ...)
 | |
| {
 | |
|     va_list args;
 | |
| 
 | |
|     va_start(args, f);
 | |
|     VErrorFSigSafe(f, args);
 | |
|     va_end(args);
 | |
| }
 | |
| 
 | |
| void
 | |
| LogPrintMarkers(void)
 | |
| {
 | |
|     /* Show what the message marker symbols mean. */
 | |
|     LogWrite(0, "Markers: ");
 | |
|     LogMessageVerb(X_PROBED, 0, "probed, ");
 | |
|     LogMessageVerb(X_CONFIG, 0, "from config file, ");
 | |
|     LogMessageVerb(X_DEFAULT, 0, "default setting,\n\t");
 | |
|     LogMessageVerb(X_CMDLINE, 0, "from command line, ");
 | |
|     LogMessageVerb(X_NOTICE, 0, "notice, ");
 | |
|     LogMessageVerb(X_INFO, 0, "informational,\n\t");
 | |
|     LogMessageVerb(X_WARNING, 0, "warning, ");
 | |
|     LogMessageVerb(X_ERROR, 0, "error, ");
 | |
|     LogMessageVerb(X_NOT_IMPLEMENTED, 0, "not implemented, ");
 | |
|     LogMessageVerb(X_UNKNOWN, 0, "unknown.\n");
 | |
| }
 |