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
  64 /*
  65  * Jump-off function.
  66  */
  67 void
  68 my_svc_exit(void)
  69 {
  70         svc_stop = 1;
  71 }
  72
  73
  74 /*
  75  * The heart of the server.  A crib from libc for the most part...
  76  */
  77 void
  78 my_svc_run(void)
  79 {
  80         FD_SET_TYPE     readfds;
  81         int             selret;
  82         time_t          now;
  83
  84         svc_stop = 0;
  85
  86         for (;;) {
  87                 if (svc_stop)
  88                         return;
  89
  90                 /* Ah, there are some notifications to be processed */
  91                 while (notify && NL_WHEN(notify) <= time(&now)) {
  92                         process_notify_list();
  93                 }
  94
  95                 readfds = SVC_FDSET;
  96                 if (notify) {
  97                         struct timeval  tv;
  98
  99                         tv.tv_sec  = NL_WHEN(notify) - now;
 100                         tv.tv_usec = 0;
 101                         dprintf(L_DEBUG, "Waiting for reply... (timeo %d)",
 102                                                         tv.tv_sec);
 103                         selret = select(FD_SETSIZE, &readfds,
 104                                 (void *) 0, (void *) 0, &tv);
 105                 } else {
 106                         dprintf(L_DEBUG, "Waiting for client connections.");
 107                         selret = select(FD_SETSIZE, &readfds,
 108                                 (void *) 0, (void *) 0, (struct timeval *) 0);
 109                 }
 110
 111                 switch (selret) {
 112                 case -1:
 113                         if (errno == EINTR || errno == ECONNREFUSED
 114                          || errno == ENETUNREACH || errno == EHOSTUNREACH)
 115                                 continue;
 116                         log(L_ERROR, "my_svc_run() - select: %m");
 117                         return;
 118
 119                 case 0:
 120                         /* A notify/callback timed out. */
 121                         continue;
 122
 123                 default:
 124                         selret -= process_reply(&readfds);
 125                         if (selret)
 126                                 svc_getreqset(&readfds);
 127                 }
 128         }
 129 }