Command line printer manipulation client, and build goo.

[moira.git] / lib / critical.c

diff --git a/lib/critical.c b/lib/critical.c
index 583d3de532ad0af9775e925e5ea871c74a78fc4a..f4ef4b2d90af3b0bd853ef4412daa0961484198b 100644 (file)
--- a/lib/critical.c
+++ b/lib/critical.c
@@ -1,74 +1,121 @@
-/* $Header$
+/* $Id$
  *
  * Log and send a zephyrgram about any critical errors.
+ *
+ * (c) Copyright 1988-1998 by the Massachusetts Institute of Technology.
+ * For copying and distribution information, please see the file
+ * <mit-copyright.h>.
  */
 
-#include <stdio.h>
-#include <sys/file.h>
+
+#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
 
+#include <mit-copyright.h>
+#include <moira.h>
+#include <moira_site.h>
 
-/* log file for critical events that require human intervention */
-#define CRITERRLOG     "/u1/sms/critical.log"
+#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
 
+/* 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.
+ */
 
-void critical_alert(instance, msg, args)
-  char *instance;              /* Instance for zephyr gram */
-  char *msg;                   /* printf format message */
-                               /* args = arguements, printf style */
-  /* This routine sends a class SMS zephyrgram of specified instance
-     and logs to a special logfile the message passed to it via msg
-     and args in printf format. */
-  /* Note: The part of this code that process the variable arguements
-     was stolen from sprintf(). */
+void critical_alert(char *whoami, char *instance, char *msg, ...)
 {
-    FILE _bufstr;              /* For _doprnt() */
-    int crit;                  /* File descriptor for critical log file */
-    char buf[BUFSIZ];          /* Holds the formatted message */
-
-    /* Put the fully formatted message into buf */
-    _bufstr._flag = _IOWRT + _IOSTRG;
-    _bufstr._ptr = buf;
-    _bufstr._cnt = BUFSIZ;
-    _doprnt(msg, &args, &_bufstr);
-    putc('\0', &_bufstr);
-
-    /* Send zephyr notice */
-    send_zgram(instance, buf);
-
-    /* Log message to critical file */
-    if ((crit = open(CRITERRLOG, 
-                    O_WRONLY | O_APPEND | O_CREAT, LOGFILEMODE)) >= 0)
+  FILE *crit;
+  char *buf;
+  va_list ap;
+  long start;
+
+  /* Log message to critical file */
+  if ((crit = fopen(CRITERRLOG, "a")))
     {
-       write(crit,buf,strlen(buf));
-       close(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);
+       }
     }
-}
 
+  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)
 {
-    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);
+#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)
+    {
+      sprintf(buf, "MOIRA: %s %s", inst, msg);
+      syslog(LOG_ERR, "%s", buf);
+      free(buf);
+    }
+#endif
 }