utils/statd/svc_run.c

   1 /*
   2  * Copyright (C) 1984 Sun Microsystems, Inc.
   3  * Modified by Jeffrey A. Uphoff, 1995, 1997-1999.
   4  * Modified by Olaf Kirch, 1996.
   5  *
   6  * NSM for Linux.
   7  */
   8
   9 /*
  10  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
  11  * unrestricted use provided that this legend is included on all tape
  12  * media and as a part of the software program in whole or part.  Users
  13  * may copy or modify Sun RPC without charge, but are not authorized
  14  * to license or distribute it to anyone else except as part of a product or
  15  * program developed by the user.
  16  *
  17  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
  18  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
  19  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
  20  *
  21  * Sun RPC is provided with no support and without any obligation on the
  22  * part of Sun Microsystems, Inc. to assist in its use, correction,
  23  * modification or enhancement.
  24  *
  25  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
  26  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
  27  * OR ANY PART THEREOF.
  28  *
  29  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
  30  * or profits or other special, indirect and consequential damages, even if
  31  * Sun has been advised of the possibility of such damages.
  32  *
  33  * Sun Microsystems, Inc.
  34  * 2550 Garcia Avenue
  35  * Mountain View, California  94043
  36  */
  37
  38 /*
  39  * This has been modified for my own evil purposes to prevent deadlocks
  40  * when two hosts start NSM's simultaneously and try to notify each
  41  * other (which mainly occurs during testing), or to stop and smell the
  42  * roses when I have callbacks due.
  43  * --Jeff Uphoff.
  44  */
  45
  46 /*
  47  * This is the RPC server side idle loop.
  48  * Wait for input, call server program.
  49  */
  50 #include "config.h"
  51 #include <errno.h>
  52 #include <time.h>
  53 #include "statd.h"
  54 #include "notlist.h"
  55
  56 static int      svc_stop = 0;
  57
  58 /*
  59  * This is the global notify list onto which all SM_NOTIFY and CALLBACK
  60  * requests are put.
  61  */
  62 notify_list *   notify = NULL;
  63 int     re_notify = 0;
  64
  65 /*
  66  * Jump-off function.
  67  */
  68 void
  69 my_svc_exit(void)
  70 {
  71         svc_stop = 1;
  72 }
  73
  74
  75 /*
  76  * The heart of the server.  A crib from libc for the most part...
  77  */
  78 void
  79 my_svc_run(void)
  80 {
  81         FD_SET_TYPE     readfds;
  82         int             selret;
  83         time_t          now;
  84
  85         svc_stop = 0;
  86
  87         for (;;) {
  88                 if (svc_stop)
  89                         return;
  90                 if (re_notify) {
  91                         change_state();
  92                         dprintf(N_DEBUG, "Notifying...(new state %d)",
  93                                                                 MY_STATE);
  94                         notify_hosts();
  95                         re_notify = 0;
  96                 }
  97
  98                 /* Ah, there are some notifications to be processed */
  99                 while (notify && NL_WHEN(notify) <= time(&now)) {
 100                         process_notify_list();
 101                 }
 102
 103                 readfds = SVC_FDSET;
 104                 if (notify) {
 105                         struct timeval  tv;
 106
 107                         tv.tv_sec  = NL_WHEN(notify) - now;
 108                         tv.tv_usec = 0;
 109                         dprintf(N_DEBUG, "Waiting for reply... (timeo %d)",
 110                                                         tv.tv_sec);
 111                         selret = select(FD_SETSIZE, &readfds,
 112                                 (void *) 0, (void *) 0, &tv);
 113                 } else if (run_mode & MODE_NOTIFY_ONLY)
 114                         return;
 115                 else {
 116                         dprintf(N_DEBUG, "Waiting for client connections.");
 117                         selret = select(FD_SETSIZE, &readfds,
 118                                 (void *) 0, (void *) 0, (struct timeval *) 0);
 119                 }
 120
 121                 switch (selret) {
 122                 case -1:
 123                         if (errno == EINTR || errno == ECONNREFUSED
 124                          || errno == ENETUNREACH || errno == EHOSTUNREACH)
 125                                 continue;
 126                         note(N_ERROR, "my_svc_run() - select: %s",
 127                                 strerror (errno));
 128                         return;
 129
 130                 case 0:
 131                         /* A notify/callback timed out. */
 132                         continue;
 133
 134                 default:
 135                         selret -= process_reply(&readfds);
 136                         if (selret)
 137                                 svc_getreqset(&readfds);
 138                 }
 139         }
 140 }