git.gag.com Git - debian/amanda/blob - server-src/logfile.c

   1 /*
   2  * Amanda, The Advanced Maryland Automatic Network Disk Archiver
   3  * Copyright (c) 1991-1998 University of Maryland at College Park
   4  * All Rights Reserved.
   5  *
   6  * Permission to use, copy, modify, distribute, and sell this software and its
   7  * documentation for any purpose is hereby granted without fee, provided that
   8  * the above copyright notice appear in all copies and that both that
   9  * copyright notice and this permission notice appear in supporting
  10  * documentation, and that the name of U.M. not be used in advertising or
  11  * publicity pertaining to distribution of the software without specific,
  12  * written prior permission.  U.M. makes no representations about the
  13  * suitability of this software for any purpose.  It is provided "as is"
  14  * without express or implied warranty.
  15  *
  16  * U.M. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
  17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL U.M.
  18  * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  19  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
  20  * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
  21  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  22  *
  23  * Author: James da Silva, Systems Design and Analysis Group
  24  *                         Computer Science Department
  25  *                         University of Maryland at College Park
  26  */
  27 /*
  28  * $Id: logfile.c,v 1.31 2006/06/01 14:54:39 martinea Exp $
  29  *
  30  * common log file writing routine
  31  */
  32 #include "amanda.h"
  33 #include "arglist.h"
  34 #include "util.h"
  35 #include "conffile.h"
  36
  37 #include "logfile.h"
  38
  39 char *logtype_str[] = {
  40     "BOGUS",
  41     "FATAL",            /* program died for some reason, used by error() */
  42     "ERROR", "WARNING", "INFO", "SUMMARY",       /* information messages */
  43     "START", "FINISH",                             /* start/end of a run */
  44     "DISK",                                                      /* disk */
  45     /* the end of a dump */
  46     "DONE", "PART", "PARTPARTIAL", "SUCCESS", "PARTIAL", "FAIL", "STRANGE",
  47     "CHUNK", "CHUNKSUCCESS",                            /* ... continued */
  48     "STATS",                                               /* statistics */
  49     "MARKER",                                     /* marker for reporter */
  50     "CONT"                                 /* continuation line; special */
  51 };
  52
  53 char *program_str[] = {
  54     "UNKNOWN", "planner", "driver", "amreport", "dumper", "chunker",
  55     "taper", "amflush"
  56 };
  57
  58 int curlinenum;
  59 logtype_t curlog;
  60 program_t curprog;
  61 char *curstr;
  62
  63 int multiline = -1;
  64 static char *logfile;
  65 static int logfd = -1;
  66
  67  /*
  68   * Note that technically we could use two locks, a read lock
  69   * from 0-EOF and a write-lock from EOF-EOF, thus leaving the
  70   * beginning of the file open for read-only access.  Doing so
  71   * would open us up to some race conditions unless we're pretty
  72   * careful, and on top of that the functions here are so far
  73   * the only accesses to the logfile, so keep things simple.
  74   */
  75
  76 /* local functions */
  77 static void open_log(void);
  78 static void close_log(void);
  79
  80 void
  81 logerror(
  82     char *      msg)
  83 {
  84     log_add(L_FATAL, "%s", msg);
  85 }
  86
  87
  88 printf_arglist_function2(char *log_genstring, logtype_t, typ, char *, pname, char *, format)
  89 {
  90     va_list argp;
  91     char *leader = NULL;
  92     char linebuf[STR_SIZE];
  93     char *xlated_fmt = dgettext("C", format);
  94
  95     /* format error message */
  96
  97     if((int)typ <= (int)L_BOGUS || (int)typ > (int)L_MARKER) typ = L_BOGUS;
  98
  99     if(multiline > 0) {
 100         leader = stralloc("  ");                /* continuation line */
 101     } else {
 102         leader = vstralloc(logtype_str[(int)typ], " ", pname, " ", NULL);
 103     }
 104
 105     arglist_start(argp, format);
 106     g_vsnprintf(linebuf, SIZEOF(linebuf)-1, xlated_fmt, argp);
 107                                                 /* -1 to allow for '\n' */
 108     arglist_end(argp);
 109     return(vstralloc(leader, linebuf, "\n", NULL));
 110 }
 111
 112 printf_arglist_function1(void log_add, logtype_t, typ, char *, format)
 113 {
 114     va_list argp;
 115     int saved_errout;
 116     char *leader = NULL;
 117     char *xlated_fmt = gettext(format);
 118     char linebuf[STR_SIZE];
 119     size_t n;
 120
 121
 122     /* format error message */
 123
 124     if((int)typ <= (int)L_BOGUS || (int)typ > (int)L_MARKER) typ = L_BOGUS;
 125
 126     if(multiline > 0) {
 127         leader = stralloc("  ");                /* continuation line */
 128     } else {
 129         leader = vstralloc(logtype_str[(int)typ], " ", get_pname(), " ", NULL);
 130     }
 131
 132     arglist_start(argp, format);
 133     g_vsnprintf(linebuf, SIZEOF(linebuf)-1, xlated_fmt, argp);
 134                                                 /* -1 to allow for '\n' */
 135     arglist_end(argp);
 136
 137     /* avoid recursive call from error() */
 138
 139     saved_errout = erroutput_type;
 140     erroutput_type &= ~ERR_AMANDALOG;
 141
 142     /* append message to the log file */
 143
 144     if(multiline == -1) open_log();
 145
 146     if (fullwrite(logfd, leader, strlen(leader)) < 0) {
 147         error(_("log file write error: %s"), strerror(errno));
 148         /*NOTREACHED*/
 149     }
 150
 151     amfree(leader);
 152
 153     n = strlen(linebuf);
 154     if(n == 0 || linebuf[n-1] != '\n') linebuf[n++] = '\n';
 155     linebuf[n] = '\0';
 156
 157     if (fullwrite(logfd, linebuf, n) < 0) {
 158         error(_("log file write error: %s"), strerror(errno));
 159         /*NOTREACHED*/
 160     }
 161
 162     if(multiline != -1) multiline++;
 163     else close_log();
 164
 165     erroutput_type = saved_errout;
 166 }
 167
 168 void
 169 log_start_multiline(void)
 170 {
 171     assert(multiline == -1);
 172
 173     multiline = 0;
 174     open_log();
 175 }
 176
 177
 178 void
 179 log_end_multiline(void)
 180 {
 181     assert(multiline != -1);
 182     multiline = -1;
 183     close_log();
 184 }
 185
 186
 187 void
 188 log_rename(
 189     char *      datestamp)
 190 {
 191     char *conf_logdir;
 192     char *logfile;
 193     char *fname = NULL;
 194     char seq_str[NUM_STR_SIZE];
 195     unsigned int seq;
 196     struct stat statbuf;
 197
 198     if(datestamp == NULL) datestamp = "error";
 199
 200     conf_logdir = config_dir_relative(getconf_str(CNF_LOGDIR));
 201     logfile = vstralloc(conf_logdir, "/log", NULL);
 202
 203     for(seq = 0; 1; seq++) {    /* if you've got MAXINT files in your dir... */
 204         g_snprintf(seq_str, SIZEOF(seq_str), "%u", seq);
 205         fname = newvstralloc(fname,
 206                              logfile,
 207                              ".", datestamp,
 208                              ".", seq_str,
 209                              NULL);
 210         if(stat(fname, &statbuf) == -1 && errno == ENOENT) break;
 211     }
 212
 213     if(rename(logfile, fname) == -1) {
 214         error(_("could not rename \"%s\" to \"%s\": %s"),
 215               logfile, fname, strerror(errno));
 216         /*NOTREACHED*/
 217     }
 218
 219     amfree(fname);
 220     amfree(logfile);
 221     amfree(conf_logdir);
 222 }
 223
 224
 225 static void
 226 open_log(void)
 227 {
 228     char *conf_logdir;
 229
 230     /* now that we have a logfile, let the debug module know how to write
 231      * error messages to it.  This is due to some rather obscure linking
 232      * problems. */
 233     set_logerror(logerror);
 234
 235     conf_logdir = config_dir_relative(getconf_str(CNF_LOGDIR));
 236     logfile = vstralloc(conf_logdir, "/log", NULL);
 237     amfree(conf_logdir);
 238
 239     logfd = open(logfile, O_WRONLY|O_CREAT|O_APPEND, 0600);
 240
 241     if(logfd == -1) {
 242         error(_("could not open log file %s: %s"), logfile, strerror(errno));
 243         /*NOTREACHED*/
 244     }
 245
 246     if(amflock(logfd, "log") == -1) {
 247         error(_("could not lock log file %s: %s"), logfile, strerror(errno));
 248         /*NOTREACHED*/
 249     }
 250 }
 251
 252
 253 static void
 254 close_log(void)
 255 {
 256     if(amfunlock(logfd, "log") == -1) {
 257         error(_("could not unlock log file %s: %s"), logfile, strerror(errno));
 258         /*NOTREACHED*/
 259     }
 260
 261     if(close(logfd) == -1) {
 262         error(_("close log file: %s"), strerror(errno));
 263         /*NOTREACHED*/
 264     }
 265
 266     logfd = -1;
 267     amfree(logfile);
 268 }
 269
 270 /* WARNING: Function accesses globals curstr, curlog, and curprog
 271  * WARNING: Function has static member logline, returned via globals */
 272 int
 273 get_logline(
 274     FILE *      logf)
 275 {
 276     static char *logline = NULL;
 277     char *logstr, *progstr;
 278     char *s;
 279     int ch;
 280
 281     amfree(logline);
 282     while ((logline = agets(logf)) != NULL) {
 283         if (logline[0] != '\0')
 284             break;
 285         amfree(logline);
 286     }
 287     if (logline == NULL) return 0;
 288     curlinenum++;
 289     s = logline;
 290     ch = *s++;
 291
 292     /* continuation lines are special */
 293
 294     if(logline[0] == ' ' && logline[1] == ' ') {
 295         curlog = L_CONT;
 296         /* curprog stays the same */
 297         skip_whitespace(s, ch);
 298         curstr = s-1;
 299         return 1;
 300     }
 301
 302     /* isolate logtype field */
 303
 304     skip_whitespace(s, ch);
 305     logstr = s - 1;
 306     skip_non_whitespace(s, ch);
 307     s[-1] = '\0';
 308
 309     /* isolate program name field */
 310
 311     skip_whitespace(s, ch);
 312     progstr = s - 1;
 313     skip_non_whitespace(s, ch);
 314     s[-1] = '\0';
 315
 316     /* rest of line is logtype dependent string */
 317
 318     skip_whitespace(s, ch);
 319     curstr = s - 1;
 320
 321     /* lookup strings */
 322
 323     for(curlog = L_MARKER; curlog != L_BOGUS; curlog--)
 324         if(strcmp(logtype_str[curlog], logstr) == 0) break;
 325
 326     for(curprog = P_LAST; curprog != P_UNKNOWN; curprog--)
 327         if(strcmp(program_str[curprog], progstr) == 0) break;
 328
 329     return 1;
 330 }