ircd/ircd_log.c

   1 /************************************************************************
   2  *   IRC - Internet Relay Chat, src/ircd_log.c
   3  *   Copyright (C) 1999 Thomas Helvey (BleepSoft)
   4  *   Copyright (C) 2000 Kevin L. Mitchell <klmitch@mit.edu>
   5  *
   6  *   See file AUTHORS in IRC package for additional names of
   7  *   the programmers.
   8  *
   9  *   This program is free software; you can redistribute it and/or modify
  10  *   it under the terms of the GNU General Public License as published by
  11  *   the Free Software Foundation; either version 1, or (at your option)
  12  *   any later version.
  13  *
  14  *   This program is distributed in the hope that it will be useful,
  15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  *   GNU General Public License for more details.
  18  *
  19  *   You should have received a copy of the GNU General Public License
  20  *   along with this program; if not, write to the Free Software
  21  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22  *
  23  *   $Id$
  24  */
  25 #include "ircd_log.h"
  26 #include "client.h"
  27 #include "config.h"
  28 #include "ircd_alloc.h"
  29 #include "ircd_reply.h"
  30 #include "ircd_snprintf.h"
  31 #include "ircd_string.h"
  32 #include "ircd.h"
  33 #include "numeric.h"
  34 #include "s_debug.h"
  35 #include "send.h"
  36 #include "struct.h"
  37
  38 #include <assert.h>
  39 #include <errno.h>
  40 #include <fcntl.h>
  41 #include <stdarg.h>
  42 #include <stdio.h>
  43 #include <sys/stat.h>
  44 #include <sys/types.h>
  45 #include <sys/uio.h>
  46 #include <syslog.h>
  47 #include <time.h>
  48 #include <unistd.h>
  49
  50 #define LOG_BUFSIZE 2048
  51
  52 /* select default log level cutoff */
  53 #ifdef DEBUGMODE
  54 # define L_DEFAULT      L_DEBUG
  55 #else
  56 # define L_DEFAULT      L_INFO
  57 #endif
  58
  59 #define LOG_DOSYSLOG    0x10
  60 #define LOG_DOFILELOG   0x20
  61 #define LOG_DOSNOTICE   0x40
  62
  63 #define LOG_DOMASK      (LOG_DOSYSLOG | LOG_DOFILELOG | LOG_DOSNOTICE)
  64
  65 /* Map severity levels to strings and syslog levels */
  66 static struct LevelData {
  67   enum LogLevel level;
  68   char         *string;
  69   int           syslog;
  70   unsigned int  snomask; /* 0 means use default in LogDesc */
  71 } levelData[] = {
  72 #define L(level, syslog, mask) { L_ ## level, #level, (syslog), (mask) }
  73   L(CRIT, LOG_CRIT, SNO_OLDSNO),
  74   L(ERROR, LOG_ERR, 0),
  75   L(WARNING, LOG_WARNING, 0),
  76   L(NOTICE, LOG_NOTICE, 0),
  77   L(TRACE, LOG_INFO, 0),
  78   L(INFO, LOG_INFO, 0),
  79   L(DEBUG, LOG_INFO, SNO_DEBUG),
  80 #undef L
  81   { L_LAST_LEVEL, 0, 0, 0 }
  82 };
  83
  84 /* Just in case some implementation of syslog has them... */
  85 #undef LOG_NONE
  86 #undef LOG_DEFAULT
  87 #undef LOG_NOTFOUND
  88
  89 #define LOG_NONE     -1 /* don't syslog */
  90 #define LOG_DEFAULT   0 /* syslog to logInfo.facility */
  91 #define LOG_NOTFOUND -2 /* didn't find a facility corresponding to name */
  92
  93 /* Map names to syslog facilities--allows syslog configuration from .conf */
  94 static struct {
  95   char *name;
  96   int facility;
  97 } facilities[] = {
  98 #define F(fac) { #fac, LOG_ ## fac }
  99   F(NONE),    F(DEFAULT), F(AUTH),
 100 #ifdef LOG_AUTHPRIV
 101   F(AUTHPRIV),
 102 #endif
 103   F(CRON),    F(DAEMON),  F(LOCAL0),  F(LOCAL1),  F(LOCAL2),  F(LOCAL3),
 104   F(LOCAL4),  F(LOCAL5),  F(LOCAL6),  F(LOCAL7),  F(LPR),     F(MAIL),
 105   F(NEWS),    F(USER),    F(UUCP),
 106 #undef F
 107   { 0, 0 }
 108 };
 109
 110 #define SNO_NONE     0x00000000 /* don't send server notices */
 111 #define SNO_NOTFOUND 0xffffffff /* didn't find a SNO_MASK value for name */
 112
 113 /* Map names to snomask values--allows configuration from .conf */
 114 static struct {
 115   char *name;
 116   unsigned int snomask;
 117 } masks[] = {
 118 #define M(mask) { #mask, SNO_ ## mask }
 119   M(NONE),       M(OLDSNO),     M(SERVKILL),   M(OPERKILL),   M(HACK2),
 120   M(HACK3),      M(UNAUTH),     M(TCPCOMMON),  M(TOOMANY),    M(HACK4),
 121   M(GLINE),      M(NETWORK),    M(IPMISMATCH), M(THROTTLE),   M(OLDREALOP),
 122   M(CONNEXIT),   M(DEBUG),
 123 #undef M
 124   { 0, 0 }
 125 };
 126
 127 #define LOG_MARK_FILE           0x0001  /* file has been changed */
 128 #define LOG_MARK_FACILITY       0x0002  /* facility has been changed */
 129 #define LOG_MARK_SNOMASK        0x0004  /* snomask has been changed */
 130 #define LOG_MARK_LEVEL          0x0008  /* level has been changed */
 131
 132 /* Descriptions of all logging subsystems */
 133 static struct LogDesc {
 134   enum LogSys     subsys;   /* number for subsystem */
 135   char           *name;     /* subsystem name */
 136   struct LogFile *file;     /* file descriptor for subsystem */
 137   unsigned int    mark;     /* subsystem has been changed */
 138   int             def_fac;  /* default facility */
 139   unsigned int    def_sno;  /* default snomask */
 140   int             facility; /* -1 means don't use syslog */
 141   unsigned int    snomask;  /* 0 means no server message */
 142   enum LogLevel   level;    /* logging level */
 143 } logDesc[] = {
 144 #define S(sys, p, sn) { LS_##sys, #sys, 0, 0, (p), (sn), (p), (sn), L_DEFAULT }
 145   S(SYSTEM, -1, 0),
 146   S(CONFIG, 0, SNO_OLDSNO),
 147   S(OPERMODE, -1, SNO_HACK4),
 148   S(GLINE, -1, SNO_GLINE),
 149   S(JUPE, -1, SNO_NETWORK),
 150   S(WHO, -1, 0),
 151   S(NETWORK, -1, SNO_NETWORK),
 152   S(OPERKILL, -1, 0),
 153   S(SERVKILL, -1, 0),
 154   S(USER, -1, 0),
 155   S(OPER, -1, SNO_OLDREALOP),
 156   S(RESOLVER, -1, 0),
 157   S(SOCKET, -1, 0),
 158   S(DEBUG, -1, SNO_DEBUG),
 159   S(OLDLOG, -1, 0),
 160 #undef S
 161   { LS_LAST_SYSTEM, 0, 0, -1, 0, -1, 0 }
 162 };
 163
 164 /* describes a log file */
 165 struct LogFile {
 166   struct LogFile  *next;   /* next log file descriptor */
 167   struct LogFile **prev_p; /* what points to us */
 168   int              fd;     /* file's descriptor-- -1 if not open */
 169   int              ref;    /* how many things refer to us? */
 170   char            *file;   /* file name */
 171 };
 172
 173 /* modifiable static information */
 174 static struct {
 175   struct LogFile *filelist; /* list of log files */
 176   struct LogFile *freelist; /* list of free'd log files */
 177   int             facility; /* default facility */
 178   const char     *procname; /* process's name */
 179   struct LogFile *dbfile;   /* debug file */
 180 } logInfo = { 0, 0, LOG_USER, "ircd", 0 };
 181
 182 /* helper routine to open a log file if needed */
 183 static void
 184 log_open(struct LogFile *lf)
 185 {
 186   /* only open the file if we haven't already */
 187   if (lf && lf->fd < 0) {
 188     alarm(3); /* if NFS hangs, we hang only for 3 seconds */
 189     lf->fd = open(lf->file, O_WRONLY | O_CREAT | O_APPEND,
 190                   S_IREAD | S_IWRITE);
 191     alarm(0);
 192   }
 193 }
 194
 195 #ifdef DEBUGMODE
 196
 197 /* reopen debug log */
 198 static void
 199 log_debug_reopen(void)
 200 {
 201   if (!logInfo.dbfile) /* no open debugging file */
 202     return;
 203
 204   if (!logInfo.dbfile->file) { /* using terminal output */
 205     logInfo.dbfile->fd = 2;
 206     return;
 207   }
 208
 209   /* Ok, it's a real file; close it if necessary and use log_open to open it */
 210   if (logInfo.dbfile->fd >= 0) {
 211     close(logInfo.dbfile->fd);
 212     logInfo.dbfile->fd = -1; /* mark that it's closed for log_open */
 213   }
 214
 215   log_open(logInfo.dbfile);
 216
 217   if (logInfo.dbfile->fd < 0) { /* try again with /dev/null */
 218     if ((logInfo.dbfile->fd = open("/dev/null", O_WRONLY)) < 0)
 219       exit(-1);
 220   }
 221
 222   /* massage the file descriptor to be stderr */
 223   if (logInfo.dbfile->fd != 2) {
 224     int fd;
 225     fd = dup2(logInfo.dbfile->fd, 2);
 226     close(logInfo.dbfile->fd);
 227     logInfo.dbfile->fd = fd;
 228   }
 229 }
 230
 231 /* initialize debugging log */
 232 void
 233 log_debug_init(int usetty)
 234 {
 235   logInfo.dbfile = MyMalloc(sizeof(struct LogFile));
 236
 237   logInfo.dbfile->next = 0; /* initialize debugging filename */
 238   logInfo.dbfile->prev_p = 0;
 239   logInfo.dbfile->fd = -1;
 240   logInfo.dbfile->ref = 1;
 241
 242   if (usetty) /* store pathname to use */
 243     logInfo.dbfile->file = 0;
 244   else
 245     DupString(logInfo.dbfile->file, LOGFILE);
 246
 247   log_debug_reopen(); /* open the debug log */
 248
 249   logDesc[LS_DEBUG].file = logInfo.dbfile; /* remember where it went */
 250 }
 251
 252 #endif /* DEBUGMODE */
 253
 254 /* set the debug log file */
 255 static int
 256 log_debug_file(const char *file)
 257 {
 258 #ifdef DEBUGMODE
 259   if (!file)
 260     file = LOGFILE;
 261
 262   /* If we weren't started with debugging enabled, or if we're using
 263    * the terminal, don't do anything at all.
 264    */
 265   if (!logInfo.dbfile || !logInfo.dbfile->file)
 266     return 1;
 267
 268   MyFree(logInfo.dbfile->file); /* free old pathname */
 269   DupString(logInfo.dbfile->file, file); /* store new pathname */
 270
 271   log_debug_reopen(); /* reopen the debug log */
 272 #endif /* DEBUGMODE */
 273   return 0;
 274 }
 275
 276 /* called in place of open_log(), this stores the process name and prepares
 277  * for syslogging
 278  */
 279 void
 280 log_init(const char *process_name)
 281 {
 282   /* store the process name; probably belongs in ircd.c, but oh well... */
 283   if (!EmptyString(process_name))
 284     logInfo.procname = process_name;
 285
 286   /* ok, open syslog; default facility: LOG_USER */
 287   openlog(logInfo.procname, LOG_PID | LOG_NDELAY, logInfo.facility);
 288 }
 289
 290 /* Files are persistently open; this closes and reopens them to allow
 291  * log file rotation
 292  */
 293 void
 294 log_reopen(void)
 295 {
 296   log_close(); /* close everything...we reopen on demand */
 297
 298 #ifdef DEBUGMODE
 299   log_debug_reopen(); /* reopen debugging log if necessary */
 300 #endif /* DEBUGMODE */
 301
 302   /* reopen syslog, if needed; default facility: LOG_USER */
 303   openlog(logInfo.procname, LOG_PID | LOG_NDELAY, logInfo.facility);
 304 }
 305
 306 /* close the log files */
 307 void
 308 log_close(void)
 309 {
 310   struct LogFile *ptr;
 311
 312   closelog(); /* close syslog */
 313
 314   for (ptr = logInfo.filelist; ptr; ptr = ptr->next) {
 315     if (ptr->fd >= 0)
 316       close(ptr->fd); /* close all the files... */
 317
 318     ptr->fd = -1;
 319   }
 320
 321   if (logInfo.dbfile && logInfo.dbfile->file) {
 322     if (logInfo.dbfile->fd >= 0)
 323       close(logInfo.dbfile->fd); /* close the debug log file */
 324
 325     logInfo.dbfile->fd = -1;
 326   }
 327 }
 328
 329 /* These write entries to a log file */
 330 void
 331 log_write(enum LogSys subsys, enum LogLevel severity, unsigned int flags,
 332           const char *fmt, ...)
 333 {
 334   va_list vl;
 335
 336   va_start(vl, fmt);
 337   log_vwrite(subsys, severity, flags, fmt, vl);
 338   va_end(vl);
 339 }
 340
 341 void
 342 log_vwrite(enum LogSys subsys, enum LogLevel severity, unsigned int flags,
 343            const char *fmt, va_list vl)
 344 {
 345   struct VarData vd;
 346   struct LogDesc *desc;
 347   struct LevelData *ldata;
 348   struct tm *tstamp;
 349   struct iovec vector[3];
 350   time_t curtime;
 351   char buf[LOG_BUFSIZE];
 352   /* 1234567890123456789012 3 */
 353   /* [2000-11-28 16:11:20] \0 */
 354   char timebuf[23];
 355
 356   /* check basic assumptions */
 357   assert(-1 < (int)subsys);
 358   assert((int)subsys < LS_LAST_SYSTEM);
 359   assert(-1 < (int)severity);
 360   assert((int)severity < L_LAST_LEVEL);
 361   assert(0 == (flags & ~LOG_NOMASK));
 362   assert(0 != fmt);
 363
 364   /* find the log data and the severity data */
 365   desc = &logDesc[subsys];
 366   ldata = &levelData[severity];
 367
 368   /* check the set of ordering assumptions */
 369   assert(desc->subsys == subsys);
 370   assert(ldata->level == severity);
 371
 372   /* check severity... */
 373   if (severity > desc->level)
 374     return;
 375
 376   /* figure out where all we need to log */
 377   if (!(flags & LOG_NOFILELOG) && desc->file) {
 378     log_open(desc->file);
 379     if (desc->file->fd >= 0) /* don't log to file if we can't open the file */
 380       flags |= LOG_DOFILELOG;
 381   }
 382
 383   if (!(flags & LOG_NOSYSLOG) && desc->facility >= 0)
 384     flags |= LOG_DOSYSLOG; /* will syslog */
 385
 386   if (!(flags & LOG_NOSNOTICE) && (desc->snomask != 0 || ldata->snomask != 0))
 387     flags |= LOG_DOSNOTICE; /* will send a server notice */
 388
 389   /* short-circuit if there's nothing to do... */
 390   if (!(flags & LOG_DOMASK))
 391     return;
 392
 393   /* Build the basic log string */
 394   vd.vd_format = fmt;
 395   vd.vd_args = vl;
 396
 397   /* save the length for writev */
 398   /* Log format: "SYSTEM [SEVERITY]: log message" */
 399   vector[1].iov_len =
 400     ircd_snprintf(0, buf, sizeof(buf), "%s [%s]: %v", desc->name,
 401                   ldata->string, &vd);
 402
 403   /* if we have something to write to... */
 404   if (flags & LOG_DOFILELOG) {
 405     curtime = TStime();
 406     tstamp = localtime(&curtime); /* build the timestamp */
 407
 408     vector[0].iov_len =
 409       ircd_snprintf(0, timebuf, sizeof(timebuf), "[%d-%d-%d %d:%02d:%02d] ",
 410                     tstamp->tm_year + 1900, tstamp->tm_mon + 1,
 411                     tstamp->tm_mday, tstamp->tm_hour, tstamp->tm_min,
 412                     tstamp->tm_sec);
 413
 414     /* set up the remaining parts of the writev vector... */
 415     vector[0].iov_base = timebuf;
 416     vector[1].iov_base = buf;
 417
 418     vector[2].iov_base = "\n"; /* terminate lines with a \n */
 419     vector[2].iov_len = 1;
 420
 421     /* write it out to the log file */
 422     writev(desc->file->fd, vector, 3);
 423   }
 424
 425   /* oh yeah, syslog it too... */
 426   if (flags & LOG_DOSYSLOG)
 427     syslog(ldata->syslog | desc->facility, "%s", buf);
 428
 429   /* can't forget server notices... */
 430   if (flags & LOG_DOSNOTICE)
 431     sendto_opmask_butone(0, ldata->snomask ? ldata->snomask : desc->snomask,
 432                          "%s", buf);
 433 }
 434
 435 /* log kills for fun and profit */
 436 void
 437 log_write_kill(const struct Client *victim, const struct Client *killer,
 438                const char *inpath, const char *path)
 439 {
 440   if (MyUser(victim))
 441     log_write(IsServer(killer) ? LS_SERVKILL : LS_OPERKILL, L_TRACE, 0,
 442               "A local client %#C KILLED by %#C Path: %s!%s",
 443               victim, killer, inpath, path);
 444   else
 445     log_write(IsServer(killer) ? LS_SERVKILL : LS_OPERKILL, L_TRACE, 0,
 446               "KILL from %C For %C Path: %s!%s", killer, victim, inpath, path);
 447 }
 448
 449 /* return a struct LogFile for a specific filename--reference counted */
 450 static struct LogFile *
 451 log_file_create(const char *file)
 452 {
 453   struct LogFile *tmp;
 454
 455   assert(0 != file);
 456
 457   /* if one already exists for that file, return it */
 458   for (tmp = logInfo.filelist; tmp; tmp = tmp->next)
 459     if (!strcmp(tmp->file, file)) {
 460       tmp->ref++;
 461       return tmp;
 462     }
 463
 464   if (logInfo.freelist) { /* pop one off the free list */
 465     tmp = logInfo.freelist;
 466     logInfo.freelist = tmp->next;
 467   } else /* allocate a new one */
 468     tmp = MyMalloc(sizeof(struct LogFile));
 469
 470   tmp->fd = -1; /* initialize the structure */
 471   tmp->ref = 1;
 472   DupString(tmp->file, file);
 473
 474   tmp->next = logInfo.filelist; /* link it into the list... */
 475   tmp->prev_p = &logInfo.filelist;
 476   if (logInfo.filelist)
 477     logInfo.filelist->prev_p = &tmp->next;
 478   logInfo.filelist = tmp;
 479
 480   return tmp;
 481 }
 482
 483 /* destroy a log file descriptor, under the control of the reference count */
 484 static void
 485 log_file_destroy(struct LogFile *lf)
 486 {
 487   assert(0 != lf);
 488
 489   if (--lf->ref == 0) {
 490     if (lf->next) /* clip it out of the list */
 491       lf->next->prev_p = lf->prev_p;
 492     *lf->prev_p = lf->next;
 493
 494     lf->prev_p = 0; /* we won't use it for the free list */
 495     if (lf->fd >= 0)
 496       close(lf->fd);
 497     lf->fd = -1;
 498     MyFree(lf->file); /* free the file name */
 499
 500     lf->next = logInfo.freelist; /* stack it onto the free list */
 501     logInfo.freelist = lf;
 502   }
 503 }
 504
 505 /* finds a subsystem given its name */
 506 static struct LogDesc *
 507 log_find(const char *subsys)
 508 {
 509   int i;
 510
 511   assert(0 != subsys);
 512
 513   /* find the named subsystem */
 514   for (i = 0; i < LS_LAST_SYSTEM; i++)
 515     if (!ircd_strcmp(subsys, logDesc[i].name))
 516       return &logDesc[i];
 517
 518   return 0; /* not found */
 519 }
 520
 521 /* canonicalize subsystem names */
 522 char *
 523 log_canon(const char *subsys)
 524 {
 525   struct LogDesc *desc;
 526
 527   if (!(desc = log_find(subsys)))
 528     return 0;
 529
 530   return desc->name;
 531 }
 532
 533 /* find a level given its name */
 534 static enum LogLevel
 535 log_lev_find(const char *level)
 536 {
 537   int i;
 538
 539   assert(0 != level);
 540
 541   /* find the named level */
 542   for (i = 0; levelData[i].string; i++)
 543     if (!ircd_strcmp(level, levelData[i].string))
 544       return levelData[i].level;
 545
 546   return L_LAST_LEVEL; /* not found */
 547 }
 548
 549 /* return a name for a level */
 550 static char *
 551 log_lev_name(enum LogLevel lev)
 552 {
 553   assert(-1 < (int)lev);
 554   assert((int)lev < L_LAST_LEVEL);
 555   assert(lev == levelData[lev].level);
 556
 557   return levelData[lev].string;
 558 }
 559
 560 /* find a facility given its name */
 561 static int
 562 log_fac_find(const char *facility)
 563 {
 564   int i;
 565
 566   assert(0 != facility);
 567
 568   /* find the named facility */
 569   for (i = 0; facilities[i].name; i++)
 570     if (!ircd_strcmp(facility, facilities[i].name))
 571       return facilities[i].facility;
 572
 573   return LOG_NOTFOUND; /* not found */
 574 }
 575
 576 /* return a name for a facility */
 577 static char *
 578 log_fac_name(int fac)
 579 {
 580   int i;
 581
 582   /* find the facility */
 583   for (i = 0; facilities[i].name; i++)
 584     if (facilities[i].facility == fac)
 585       return facilities[i].name;
 586
 587   return 0; /* not found; should never happen */
 588 }
 589
 590 /* find a snomask value given its name */
 591 static unsigned int
 592 log_sno_find(const char *maskname)
 593 {
 594   int i;
 595
 596   assert(0 != maskname);
 597
 598   /* find the named snomask */
 599   for (i = 0; masks[i].name; i++)
 600     if (!ircd_strcmp(maskname, masks[i].name))
 601       return masks[i].snomask;
 602
 603   return SNO_NOTFOUND; /* not found */
 604 }
 605
 606 /* return a name for a snomask value */
 607 static char *
 608 log_sno_name(unsigned int sno)
 609 {
 610   int i;
 611
 612   /* find the snomask */
 613   for (i = 0; masks[i].name; i++)
 614     if (masks[i].snomask == sno)
 615       return masks[i].name;
 616
 617   return 0; /* not found; should never happen */
 618 }
 619
 620 /* set the log file for a subsystem */
 621 int
 622 log_set_file(const char *subsys, const char *filename)
 623 {
 624   struct LogDesc *desc;
 625
 626   /* find subsystem */
 627   if (!(desc = log_find(subsys)))
 628     return 2;
 629
 630   if (filename)
 631     desc->mark |= LOG_MARK_FILE; /* mark that file has been changed */
 632   else
 633     desc->mark &= ~LOG_MARK_FILE; /* file has been reset to defaults */
 634
 635   /* no change, don't go to the trouble of destroying and recreating */
 636   if (desc->file && filename && !strcmp(desc->file->file, filename))
 637     return 0;
 638
 639   /* debug log is special, since it has to be opened on fd 2 */
 640   if (desc->subsys == LS_DEBUG)
 641     return log_debug_file(filename);
 642
 643   if (desc->file) /* destroy previous entry... */
 644     log_file_destroy(desc->file);
 645
 646   /* set the file to use */
 647   desc->file = filename ? log_file_create(filename) : 0;
 648
 649   return 0;
 650 }
 651
 652 /* get the log file for a subsystem */
 653 char *
 654 log_get_file(const char *subsys)
 655 {
 656   struct LogDesc *desc;
 657
 658   /* find subsystem */
 659   if (!(desc = log_find(subsys)))
 660     return 0;
 661
 662   return desc->file ? desc->file->file : 0;
 663 }
 664
 665 /* set the facility for a subsystem */
 666 int
 667 log_set_facility(const char *subsys, const char *facility)
 668 {
 669   struct LogDesc *desc;
 670   int fac;
 671
 672   /* find subsystem */
 673   if (!(desc = log_find(subsys)))
 674     return 2;
 675
 676   /* set syslog facility */
 677   if (EmptyString(facility)) {
 678     desc->facility = desc->def_fac;
 679     desc->mark &= ~LOG_MARK_FACILITY;
 680   } else if ((fac = log_fac_find(facility)) != LOG_NOTFOUND) {
 681     desc->facility = fac;
 682     if (fac == desc->def_fac)
 683       desc->mark &= ~LOG_MARK_FACILITY;
 684     else
 685       desc->mark |= LOG_MARK_FACILITY;
 686   } else
 687     return 1;
 688
 689   return 0;
 690 }
 691
 692 /* get the facility for a subsystem */
 693 char *
 694 log_get_facility(const char *subsys)
 695 {
 696   struct LogDesc *desc;
 697
 698   /* find subsystem */
 699   if (!(desc = log_find(subsys)))
 700     return 0;
 701
 702   /* find the facility's name */
 703   return log_fac_name(desc->facility);
 704 }
 705
 706 /* set the snomask value for a subsystem */
 707 int
 708 log_set_snomask(const char *subsys, const char *snomask)
 709 {
 710   struct LogDesc *desc;
 711   unsigned int sno = SNO_DEFAULT;
 712
 713   /* find subsystem */
 714   if (!(desc = log_find(subsys)))
 715     return 2;
 716
 717   /* set snomask value */
 718   if (EmptyString(snomask)) {
 719     desc->snomask = desc->def_sno;
 720     desc->mark &= ~LOG_MARK_SNOMASK;
 721   } else if ((sno = log_sno_find(snomask)) != SNO_NOTFOUND) {
 722     desc->snomask = sno;
 723     if (sno == desc->def_sno)
 724       desc->mark &= ~LOG_MARK_SNOMASK;
 725     else
 726       desc->mark |= LOG_MARK_SNOMASK;
 727   } else
 728     return 1;
 729
 730   return 0;
 731 }
 732
 733 /* get the snomask value for a subsystem */
 734 char *
 735 log_get_snomask(const char *subsys)
 736 {
 737   struct LogDesc *desc;
 738
 739   /* find subsystem */
 740   if (!(desc = log_find(subsys)))
 741     return 0;
 742
 743   /* find the snomask value's name */
 744   return log_sno_name(desc->snomask);
 745 }
 746
 747 /* set the level for a subsystem */
 748 int
 749 log_set_level(const char *subsys, const char *level)
 750 {
 751   struct LogDesc *desc;
 752   enum LogLevel lev;
 753
 754   /* find subsystem */
 755   if (!(desc = log_find(subsys)))
 756     return 2;
 757
 758   /* set logging level */
 759   if (EmptyString(level)) {
 760     desc->level = L_DEFAULT;
 761     desc->mark &= ~LOG_MARK_LEVEL;
 762   } else if ((lev = log_lev_find(level)) != L_LAST_LEVEL) {
 763     desc->level = lev;
 764     if (lev == L_DEFAULT)
 765       desc->mark &= ~LOG_MARK_LEVEL;
 766     else
 767       desc->mark |= LOG_MARK_LEVEL;
 768   } else
 769     return 1;
 770
 771   return 0;
 772 }
 773
 774 /* get the level for a subsystem */
 775 char *
 776 log_get_level(const char *subsys)
 777 {
 778   struct LogDesc *desc;
 779
 780   /* find subsystem */
 781   if (!(desc = log_find(subsys)))
 782     return 0;
 783
 784   /* find the level's name */
 785   return log_lev_name(desc->level);
 786 }
 787
 788 /* set the overall default syslog facility */
 789 int
 790 log_set_default(const char *facility)
 791 {
 792   int fac, oldfac;
 793
 794   oldfac = logInfo.facility;
 795
 796   if (EmptyString(facility))
 797     logInfo.facility = LOG_USER;
 798   else if ((fac = log_fac_find(facility)) != LOG_NOTFOUND &&
 799            fac != LOG_NONE && fac != LOG_DEFAULT)
 800     logInfo.facility = fac;
 801   else
 802     return 1;
 803
 804   if (logInfo.facility != oldfac) {
 805     closelog(); /* reopen syslog with new facility setting */
 806     openlog(logInfo.procname, LOG_PID | LOG_NDELAY, logInfo.facility);
 807   }
 808
 809   return 0;
 810 }
 811
 812 /* get the overall default syslog facility */
 813 char *
 814 log_get_default(void)
 815 {
 816   /* find the facility's name */
 817   return log_fac_name(logInfo.facility);
 818 }
 819
 820 /* Clear the marks... */
 821 void
 822 log_feature_unmark(void)
 823 {
 824   int i;
 825
 826   for (i = 0; i < LS_LAST_SYSTEM; i++)
 827     logDesc[i].mark = 0;
 828 }
 829
 830 /* Reset unmarked fields to defaults... */
 831 int
 832 log_feature_mark(int flag)
 833 {
 834   int i;
 835
 836   if (flag)
 837     log_set_default(0);
 838
 839   for (i = 0; i < LS_LAST_SYSTEM; i++) {
 840     if (!(logDesc[i].mark & LOG_MARK_FILE)) {
 841       if (logDesc[i].subsys != LS_DEBUG) { /* debug is special */
 842         if (logDesc[i].file) /* destroy previous entry... */
 843           log_file_destroy(logDesc[i].file);
 844         logDesc[i].file = 0;
 845       }
 846     }
 847
 848     if (!(logDesc[i].mark & LOG_MARK_FACILITY)) /* set default facility */
 849       logDesc[i].facility = logDesc[i].def_fac;
 850
 851     if (!(logDesc[i].mark & LOG_MARK_SNOMASK)) /* set default snomask */
 852       logDesc[i].snomask = logDesc[i].def_sno;
 853
 854     if (!(logDesc[i].mark & LOG_MARK_LEVEL)) /* set default level */
 855       logDesc[i].level = L_DEFAULT;
 856   }
 857
 858   return 0; /* we don't have a notify handler */
 859 }
 860
 861 /* Report feature settings */
 862 void
 863 log_feature_report(struct Client *to, int flag)
 864 {
 865   int i;
 866
 867   for (i = 0; i < LS_LAST_SYSTEM; i++) {
 868     if (logDesc[i].mark & LOG_MARK_FILE) /* report file */
 869       send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F LOG %s FILE %s",
 870                  logDesc[i].name, logDesc[i].file->file);
 871
 872     if (logDesc[i].mark & LOG_MARK_FACILITY) /* report facility */
 873       send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F LOG %s FACILITY %s",
 874                  logDesc[i].name, log_fac_name(logDesc[i].facility));
 875
 876     if (logDesc[i].mark & LOG_MARK_SNOMASK) /* report snomask */
 877       send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F LOG %s SNOMASK %s",
 878                  logDesc[i].name, log_sno_name(logDesc[i].snomask));
 879
 880     if (logDesc[i].mark & LOG_MARK_LEVEL) /* report log level */
 881       send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F LOG %s LEVEL %s",
 882                  logDesc[i].name, log_lev_name(logDesc[i].level));
 883   }
 884
 885   if (flag) /* report default facility */
 886     send_reply(to, SND_EXPLICIT | RPL_STATSFLINE, "F LOG %s",
 887                log_fac_name(logInfo.facility));
 888 }