Build shared libmoira via libtool.

[moira.git] / lib / critical.c

diff --git a/lib/critical.c b/lib/critical.c
index f026d64a4b6c3a89dd265f67735526be98ab64ab..f4ef4b2d90af3b0bd853ef4412daa0961484198b 100644 (file)
--- a/lib/critical.c
+++ b/lib/critical.c
@@ -1,100 +1,121 @@
-/* $Header$
+/* $Id$
  *
  * Log and send a zephyrgram about any critical errors.
  *
- *  (c) Copyright 1988 by the Massachusetts Institute of Technology.
- *  For copying and distribution information, please see the file
- *  <mit-copyright.h>.
+ * (c) Copyright 1988-1998 by the Massachusetts Institute of Technology.
+ * For copying and distribution information, please see the file
+ * <mit-copyright.h>.
  */
 
-#include <mit-copyright.h>
-#include <stdio.h>
-#include <sys/file.h>
-#include <sms_app.h>
-#ifdef ZEPHYR
+
+#ifdef HAVE_ZEPHYR
+/* need to include before moira.h, which includes krb_et.h, because
+   zephyr.h is broken */
 #include <zephyr/zephyr.h>
+/* zephyr.h doesn't prototype this */
+extern Code_t ZSendNotice(ZNotice_t *notice, Z_AuthProc cert_routine);
 #endif
-#ifdef SYSLOG
+
+#include <mit-copyright.h>
+#include <moira.h>
+#include <moira_site.h>
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#ifndef HAVE_ZEPHYR
 #include <syslog.h>
 #endif
+#include <time.h>
 
+RCSID("$Header$");
 
 /* mode to create the file with */
 #define LOGFILEMODE    0644
 
-extern char *whoami;
-
-
-/* This routine sends a class SMS zephyrgram of specified instance
+/* This routine sends a class MOIRA zephyrgram of specified instance
  * and logs to a special logfile the message passed to it via msg
  * and args in printf format.  *** It expects the global variable
  * whoami to be defined and contain the name of the calling program.
- * It's a kludge that it takes a max of 8 arguments in a way that
- * isn't necessarily portable, but varargs doesn't work here and we
- * don't have vsprintf().
  */
 
-void critical_alert(instance, msg, arg1, arg2, arg3, arg4,
-                   arg5, arg6, arg7, arg8)
-  char *instance;              /* Instance for zephyr gram */
-  char *msg;                   /* printf format message */
-  char *arg1, *arg2, *arg3, *arg4, *arg5, *arg6, *arg7, *arg8;
+void critical_alert(char *whoami, char *instance, char *msg, ...)
 {
-    FILE *crit;                        /* FILE for critical log file */
-    char buf[BUFSIZ];          /* Holds the formatted message */
+  FILE *crit;
+  char *buf;
+  va_list ap;
+  long start;
 
-    sprintf(buf, msg, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8);
-
-    /* Send zephyr notice */
-    send_zgram(instance, buf);
-
-    /* Log message to critical file */
-    if ((crit = fopen(CRITERRLOG, "a")) != (FILE *)NULL) 
+  /* Log message to critical file */
+  if ((crit = fopen(CRITERRLOG, "a")))
     {
-       long t;
-       char  *time_s;
-
-       time(&t);
-       time_s = ctime(&t) + 4;
-       time_s[strlen(time_s)-6] = '\0';
-
-       fprintf(crit, "%s <%d> %s\n", time_s, getpid(), buf);
-       fclose(crit);
+      time_t t;
+      char *time_s;
+
+      time(&t);
+      time_s = ctime(&t) + 4;
+      time_s[strlen(time_s) - 6] = '\0';
+
+      fprintf(crit, "%s <%ld>", time_s, (long)getpid());
+      start = ftell(crit);
+      va_start(ap, msg);
+      vfprintf(crit, msg, ap);
+      va_end(ap);
+      fprintf(crit, "\n");
+
+      buf = malloc(ftell(crit) - start);
+      fclose(crit);
+
+      if (buf)
+       {
+         va_start(ap, msg);
+         vsprintf(buf, msg, ap);
+         va_end(ap);
+
+         send_zgram(instance, buf);
+         com_err(whoami, 0, buf);
+
+         free(buf);
+       }
     }
 
-    com_err(whoami, 0, buf);
+  if (!crit || !buf)
+    {
+      send_zgram(instance, "Couldn't format critical syslog!");
+      com_err(whoami, 0, "Couldn't format critical syslog!");
+    }
 }
 
 
-
-/* Sends a zephyrgram of class "SMS", instance as a parameter.  Ignores
+/* Sends a zephyrgram of class "MOIRA", instance as a parameter.  Ignores
  * errors while sending message.
  */
 
-send_zgram(inst, msg)
-char *inst;
-char *msg;
+void send_zgram(char *inst, char *msg)
 {
-#ifdef ZEPHYR
-    ZNotice_t znotice;
-
-    bzero (&znotice, sizeof (znotice));
-    znotice.z_kind = UNSAFE;
-    znotice.z_class = "SMS";
-    znotice.z_class_inst = inst;
-    znotice.z_default_format = "SMS $instance:\n $message\n";
-    (void) ZInitialize ();
-    znotice.z_message = msg;
-    znotice.z_message_len = strlen(msg) + 1;
-    znotice.z_opcode = "";
-    znotice.z_recipient = "";
-    ZSendNotice(&znotice, ZNOAUTH);
-#endif
-#ifdef SYSLOG
+#ifdef HAVE_ZEPHYR
+  ZNotice_t znotice;
+
+  memset(&znotice, 0, sizeof(znotice));
+  znotice.z_kind = UNSAFE;
+  znotice.z_class = "MOIRA";
+  znotice.z_class_inst = inst;
+  znotice.z_default_format = "MOIRA $instance on $fromhost:\n $message\n";
+  ZInitialize();
+  znotice.z_message = msg;
+  znotice.z_message_len = strlen(msg) + 1;
+  znotice.z_opcode = "";
+  znotice.z_recipient = "";
+  ZSendNotice(&znotice, ZNOAUTH);
+#else
+  char *buf;
+
+  buf = malloc(9 + strlen(inst) + strlen(msg));
+  if (buf)
     {
-       char buf[512];
-       sprintf(buf, "SMS: %s %s", inst, msg);
-       syslog(LOG_ERR, buf);
+      sprintf(buf, "MOIRA: %s %s", inst, msg);
+      syslog(LOG_ERR, "%s", buf);
+      free(buf);
     }
 #endif
 }