* $Header$
*
* Copyright (C) 1987 by the Massachusetts Institute of Technology
- *
+ * For copying and distribution information, please see the file
+ * <mit-copyright.h>.
*
* SMS server process.
*
* You are in a maze of twisty little finite automata, all different.
* Let the reader beware.
*
- * $Log$
- * Revision 1.14 1987-09-12 20:41:50 wesommer
- * Be paranoid.
- *
- * Revision 1.14 87/09/12 20:08:01 wesommer
- * Add some defensive programming to defend against people who don't
- * understand what the contents of the cl struct mean.
- *
- * Revision 1.13 87/08/04 02:40:30 wesommer
- * Do end run around minor hotspot.
- *
- * Revision 1.12 87/08/04 01:50:00 wesommer
- * Rearranged messages.
- *
- * Revision 1.11 87/07/29 16:04:54 wesommer
- * Add keepalive feature.
- *
- * Revision 1.10 87/06/30 20:02:26 wesommer
- * Added returned tuple chain to client structure.
- * Added local realm global variable.
- *
- * Revision 1.9 87/06/21 16:39:54 wesommer
- * Performance work, rearrangement of include files.
- *
- * Revision 1.8 87/06/09 18:44:45 wesommer
- * modified error handling.
- *
- * Revision 1.7 87/06/08 02:44:44 wesommer
- * Minor lint fix.
- *
- * Revision 1.6 87/06/03 17:41:00 wesommer
- * Added startup support.
- *
- * Revision 1.5 87/06/03 16:07:17 wesommer
- * Fixes for lint.
- *
- * Revision 1.4 87/06/02 20:05:11 wesommer
- * Bug fixes on memory allocation.
- *
- * Revision 1.3 87/06/01 04:34:27 wesommer
- * Changed returned error code.
- *
- * Revision 1.2 87/06/01 03:34:53 wesommer
- * Added shutdown, logging.
- *
- * Revision 1.1 87/05/31 22:06:56 wesommer
- * Initial revision
- *
*/
static char *rcsid_sms_main_c = "$Header$";
+#include <mit-copyright.h>
#include <strings.h>
+#include <sys/types.h>
#include <sys/errno.h>
#include <sys/signal.h>
+#include <sys/wait.h>
+#include <sys/stat.h>
#include "sms_server.h"
+#include <krb_et.h>
extern CONNECTION newconn, listencon;
extern char buf1[BUFSIZ];
extern char *takedown;
extern int errno;
-
+extern FILE *journal;
+#define JOURNAL "/u1/sms/journal"
extern char *malloc();
extern int free();
extern int sigshut();
void clist_append();
void oplist_append();
-extern u_short ntohs();
+void reapchild(), godormant(), gowakeup();
extern time_t now;
{
int status;
time_t tardy;
+ struct stat stbuf;
whoami = argv[0];
/*
* Error handler init.
*/
- init_sms_err_tbl();
- init_krb_err_tbl();
+ initialize_sms_error_table();
+ initialize_krb_error_table();
set_com_err_hook(sms_com_err);
setlinebuf(stderr);
gdb_debug(0); /* this can be patched, if necessary, to enable */
/* GDB level debugging .. */
krb_realm = malloc(REALM_SZ);
- get_krbrlm(krb_realm, 1);
+ krb_get_lrealm(krb_realm, 1);
/*
- * Database initialization.
+ * Database initialization. Only init if database should be open.
*/
- if ((status = sms_open_database()) != 0) {
- com_err(whoami, status, "when trying to open database.");
+ if (stat(SMS_MOTD_FILE, &stbuf) != 0) {
+ if ((status = sms_open_database()) != 0) {
+ com_err(whoami, status, " when trying to open database.");
exit(1);
+ }
+ sanity_check_database();
+ } else {
+ dormant = ASLEEP;
+ com_err(whoami, 0, "sleeping, not opening database");
}
+ sanity_check_queries();
+
/*
* Set up client array handler.
*/
nclients = 0;
clients = (client **) malloc(0);
- /*
- * Signal handlers
- * There should probably be a few more of these.
- */
+ sms_setup_signals();
- if ((((int)signal (SIGTERM, sigshut)) < 0) ||
- (((int)signal (SIGHUP, sigshut)) < 0)) {
- com_err(whoami, errno, "Unable to establish signal handler.");
- exit(1);
+ journal = fopen(JOURNAL, "a");
+ if (journal == NULL) {
+ com_err(whoami, errno, " while opening journal file");
+ exit(1);
}
-
+
/*
* Establish template connection.
*/
if ((status = do_listen()) != 0) {
com_err(whoami, status,
- "while trying to create listening connection");
+ " while trying to create listening connection");
exit(1);
}
com_err(whoami, 0, "started (pid %d)", getpid());
com_err(whoami, 0, rcsid_sms_main_c);
+ if (dormant != ASLEEP)
+ send_zgram("SMS", "server started");
+ else
+ send_zgram("SMS", "server started, but database closed");
/*
* Run until shut down.
#ifdef notdef
com_err(whoami, 0, "tick");
#endif notdef
+ if (dormant == SLEEPY) {
+ sms_close_database();
+ com_err(whoami, 0, "database closed");
+ sms_setup_signals();
+ send_zgram("SMS", "database closed");
+ dormant = ASLEEP;
+ } else if (dormant == GROGGY) {
+ sms_open_database();
+ com_err(whoami, 0, "database open");
+ sms_setup_signals();
+ send_zgram("SMS", "database open again");
+ dormant = AWAKE;
+ }
+
errno = 0;
status = op_select_any(op_list, 0,
(fd_set *)NULL, (fd_set *)NULL,
(fd_set *)NULL, (struct timeval *)NULL);
if (status == -1) {
- com_err(whoami, errno, "error from op_select");
+ if (errno != EINTR)
+ com_err(whoami, errno, " error from op_select");
continue;
} else if (status != -2) {
- com_err(whoami, 0, "wrong return from op_select_any");
+ com_err(whoami, 0, " wrong return from op_select_any");
continue;
}
if (takedown) break;
do_reset_listen();
} else {
com_err(whoami, errno,
- "error on listen");
+ " error on listen");
exit(1);
}
} else if ((status = new_connection()) != 0) {
com_err(whoami, errno,
- "Error on listening operation.");
+ " Error on listening operation.");
/*
* Sleep here to prevent hosing?
*/
}
+ /* if the new connection is our only connection,
+ * and the server is supposed to be down, then go
+ * down now.
+ */
+ if ((dormant == AWAKE) && (nclients == 1) &&
+ (stat(SMS_MOTD_FILE, &stbuf) == 0)) {
+ com_err(whoami, 0, "motd file exists, slumbertime");
+ dormant = SLEEPY;
+ }
+ /* on new connection, if we are no longer supposed
+ * to be down, then wake up.
+ */
+ if ((dormant == ASLEEP) &&
+ (stat(SMS_MOTD_FILE, &stbuf) == -1) &&
+ (errno == ENOENT)) {
+ com_err(whoami, 0, "motd file no longer exists, waking up");
+ dormant = GROGGY;
+ }
+
}
/*
* Handle any existing connections.
}
com_err(whoami, 0, "%s", takedown);
sms_close_database();
+ send_zgram("SMS", takedown);
return 0;
}
*/
cp = (client *)malloc(sizeof *cp);
bzero(cp, sizeof(*cp));
- cp->state = CL_STARTING;
cp->action = CL_ACCEPT;
cp->con = newconn;
cp->id = counter++;
cp->args = NULL;
- cp->clname = NULL;
+ cp->clname[0] = NULL;
cp->reply.sms_argv = NULL;
cp->first = NULL;
cp->last = NULL;
}
abort();
}
+
+
+void reapchild()
+{
+ union wait status;
+ int pid;
+
+ while ((pid = wait3(&status, WNOHANG, (struct rusage *)0)) > 0) {
+ if (!takedown && (status.w_termsig != 0 || status.w_retcode != 0))
+ com_err(whoami, 0, "%d: child exits with signal %d status %d",
+ pid, status.w_termsig, status.w_retcode);
+ }
+}
+
+
+void godormant()
+{
+ switch (dormant) {
+ case AWAKE:
+ case GROGGY:
+ com_err(whoami, 0, "requested to go dormant");
+ break;
+ case ASLEEP:
+ com_err(whoami, 0, "already asleep");
+ break;
+ case SLEEPY:
+ break;
+ }
+ dormant = SLEEPY;
+}
+
+
+void gowakeup()
+{
+ switch (dormant) {
+ case ASLEEP:
+ case SLEEPY:
+ com_err(whoami, 0, "Good morning");
+ break;
+ case AWAKE:
+ com_err(whoami, 0, "already awake");
+ break;
+ case GROGGY:
+ break;
+ }
+ dormant = GROGGY;
+}
+
+
+sms_setup_signals()
+{
+ /* There should probably be a few more of these. */
+
+ if ((((int)signal (SIGTERM, sigshut)) < 0) ||
+ (((int)signal (SIGCHLD, reapchild)) < 0) ||
+ (((int)signal (SIGUSR1, godormant)) < 0) ||
+ (((int)signal (SIGUSR2, gowakeup)) < 0) ||
+ (((int)signal (SIGHUP, sigshut)) < 0)) {
+ com_err(whoami, errno, " Unable to establish signal handlers.");
+ exit(1);
+ }
+}
andersk / moira.git / blobdiff