git.pond.sub.org Git - empserver/blob - src/lib/gen/log.c

   1 /*
   2  *  Empire - A multi-player, client/server Internet based war game.
   3  *  Copyright (C) 1986-2011, Dave Pare, Jeff Bailey, Thomas Ruschak,
   4  *                Ken Stevens, Steve McClure, Markus Armbruster
   5  *
   6  *  Empire is free software: you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation, either version 3 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  *
  19  *  ---
  20  *
  21  *  See files README, COPYING and CREDITS in the root of the source
  22  *  tree for related information and legal notices.  It is expected
  23  *  that future projects/authors will amend these files as needed.
  24  *
  25  *  ---
  26  *
  27  *  log.c: Log an Empire error to a file
  28  *
  29  *  Known contributors to this file:
  30  *     Dave Pare, 1989
  31  *     Markus Armbruster, 2003-2009
  32  */
  33
  34 #include <config.h>
  35
  36 #include <errno.h>
  37 #include <fcntl.h>
  38 #include <stdarg.h>
  39 #include <stdio.h>
  40 #include <sys/stat.h>
  41 #include <time.h>
  42 #include <unistd.h>
  43 #include "misc.h"
  44 #include "optlist.h"
  45 #include "player.h"
  46 #include "prototypes.h"
  47
  48 void (*oops_handler)(void) = abort;
  49
  50 static char logfile[32];
  51 static int logfd = -1;
  52
  53 static int logopen(void);
  54
  55 /*
  56  * Points log file at PROGRAM.log
  57  */
  58 int
  59 loginit(char *program)
  60 {
  61     sprintf(logfile, "%.*s.log", (int)sizeof(logfile) - 5, program);
  62     logfd = logopen();
  63     return logfd;
  64 }
  65
  66 static int
  67 logopen(void)
  68 {
  69     int fd;
  70
  71     fd = open(logfile, O_WRONLY | O_CREAT | O_APPEND,
  72               S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP);
  73     if (fd < 0)
  74         logerror("Can't open %s (%s)", logfile, strerror(errno));
  75     return fd;
  76 }
  77
  78 int
  79 logreopen(void)
  80 {
  81     int newfd, res;
  82
  83     if ((newfd = logopen()) < 0)
  84         return -1;
  85     res = close(logfd);
  86     logfd = newfd;
  87     if (res < 0)
  88         logerror("Can't close %s (%s)", logfile, strerror(errno));
  89     return res;
  90 }
  91
  92 /*
  93  * Write a line to the log file and to stderr.
  94  * Messages are silently truncated after 512 characters or a newline.
  95  */
  96 void
  97 logerror(char *format, ...)
  98 {
  99     enum {
 100         ctime_len = 24,         /* output of ctime() less the newline */
 101         msg_space = 512         /* space for formatted message */
 102     };
 103     va_list list;
 104     time_t now;
 105     char buf[ctime_len + 1 + msg_space + 2];
 106     char *msg, *p;
 107
 108     va_start(list, format);
 109     msg = buf + ctime_len + 1;
 110     vsnprintf(msg, msg_space, format, list);
 111     buf[sizeof(buf)-2] = 0;
 112     p = msg + strlen(msg);
 113     p[0] = '\n';
 114     p[1] = 0;
 115     p = strchr(msg, '\n');
 116     p[1] = 0;
 117     fputs(msg, stderr);
 118     if (logfd >= 0) {
 119         time(&now);
 120         memcpy(buf, ctime(&now), ctime_len);
 121         buf[ctime_len] = ' ';
 122         write(logfd, buf, strlen(buf));
 123     }
 124     va_end(list);
 125 }
 126
 127 /*
 128  * Log internal error MSG occured in FILE:LINE, call oops handler.
 129  */
 130 void
 131 oops(char *msg, char *file, int line)
 132 {
 133     logerror("Oops: %s in %s:%d", msg ? msg : "bug", file, line);
 134     oops_handler();
 135 }
 136
 137 /*
 138  * Report out-of-memory condition and terminate the program.
 139  * Use this with restraint!  Clean error recovery is preferable, but
 140  * not always feasible (e.g. halfway through the update) or worthwhile
 141  * (during server startup).
 142  */
 143 void
 144 exit_nomem(void)
 145 {
 146     logerror("Memory exhausted");
 147     exit(1);
 148 }