usr.sbin/rpc.ypupdated/ypupdated_main.c

   1 /*
   2  * Copyright (c) 1995, 1996
   3  *      Bill Paul <wpaul@ctr.columbia.edu>.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by Bill Paul.
  16  * 4. Neither the name of the author nor the names of any co-contributors
  17  *    may be used to endorse or promote products derived from this software
  18  *    without specific prior written permission.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND
  21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  23  * ARE DISCLAIMED.  IN NO EVENT SHALL Bill Paul OR CONTRIBUTORS BE LIABLE
  24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  30  * SUCH DAMAGE.
  31  */
  32
  33 #ifndef lint
  34 static const char rcsid[] =
  35   "$FreeBSD$";
  36 #endif /* not lint */
  37
  38 #include "ypupdate_prot.h"
  39 #include <stdio.h>
  40 #include <stdlib.h> /* getenv, exit */
  41 #include <rpc/pmap_clnt.h> /* for pmap_unset */
  42 #include <string.h> /* strcmp */
  43 #include <signal.h>
  44 #include <sys/ttycom.h> /* TIOCNOTTY */
  45 #ifdef __cplusplus
  46 #include <sysent.h> /* getdtablesize, open */
  47 #endif /* __cplusplus */
  48 #include <memory.h>
  49 #include <sys/socket.h>
  50 #include <netinet/in.h>
  51 #include <syslog.h>
  52 #include <sys/wait.h>
  53 #include <errno.h>
  54 #include <err.h>
  55 #include <stdlib.h>
  56 #include <unistd.h>
  57 #include "ypupdated_extern.h"
  58 #include "yp_extern.h"
  59
  60 #ifndef SIG_PF
  61 #define SIG_PF void(*)(int)
  62 #endif
  63
  64 #ifdef DEBUG
  65 #define RPC_SVC_FG
  66 #endif
  67
  68 #define _RPCSVC_CLOSEDOWN 120
  69 int _rpcpmstart;                /* Started by a port monitor ? */
  70 static int _rpcfdtype;
  71                  /* Whether Stream or Datagram ? */
  72         /* States a server can be in wrt request */
  73
  74 #define _IDLE 0
  75 #define _SERVED 1
  76 #define _SERVING 2
  77
  78 extern int _rpcsvcstate;         /* Set when a request is serviced */
  79
  80 char *progname = "rpc.ypupdated";
  81 char *yp_dir = "/var/yp/";
  82
  83 static
  84 void _msgout(char* msg)
  85 {
  86 #ifdef RPC_SVC_FG
  87         if (_rpcpmstart)
  88                 syslog(LOG_ERR, msg);
  89         else
  90                 warnx("%s", msg);
  91 #else
  92         syslog(LOG_ERR, msg);
  93 #endif
  94 }
  95
  96 static void
  97 closedown(int sig)
  98 {
  99         if (_rpcsvcstate == _IDLE) {
 100                 extern fd_set svc_fdset;
 101                 static int size;
 102                 int i, openfd;
 103
 104                 if (_rpcfdtype == SOCK_DGRAM)
 105                         exit(0);
 106                 if (size == 0) {
 107                         size = getdtablesize();
 108                 }
 109                 for (i = 0, openfd = 0; i < size && openfd < 2; i++)
 110                         if (FD_ISSET(i, &svc_fdset))
 111                                 openfd++;
 112                 if (openfd <= 1)
 113                         exit(0);
 114         }
 115         if (_rpcsvcstate == _SERVED)
 116                 _rpcsvcstate = _IDLE;
 117
 118         (void) signal(SIGALRM, (SIG_PF) closedown);
 119         (void) alarm(_RPCSVC_CLOSEDOWN/2);
 120 }
 121
 122 static void
 123 ypupdated_svc_run()
 124 {
 125 #ifdef FD_SETSIZE
 126         fd_set readfds;
 127 #else
 128         int readfds;
 129 #endif /* def FD_SETSIZE */
 130         extern int forked;
 131         int pid;
 132         int fd_setsize = _rpc_dtablesize();
 133
 134         /* Establish the identity of the parent ypupdated process. */
 135         pid = getpid();
 136
 137         for (;;) {
 138 #ifdef FD_SETSIZE
 139                 readfds = svc_fdset;
 140 #else
 141                 readfds = svc_fds;
 142 #endif /* def FD_SETSIZE */
 143                 switch (select(fd_setsize, &readfds, NULL, NULL,
 144                                (struct timeval *)0)) {
 145                 case -1:
 146                         if (errno == EINTR) {
 147                                 continue;
 148                         }
 149                         warn("svc_run: - select failed");
 150                         return;
 151                 case 0:
 152                         continue;
 153                 default:
 154                         svc_getreqset(&readfds);
 155                         if (forked && pid != getpid())
 156                                 exit(0);
 157                 }
 158         }
 159 }
 160
 161 static void reaper(sig)
 162         int sig;
 163 {
 164         int status;
 165
 166         if (sig == SIGHUP) {
 167 #ifdef foo
 168                 load_securenets();
 169 #endif
 170                 return;
 171         }
 172
 173         if (sig == SIGCHLD) {
 174                 while (wait3(&status, WNOHANG, NULL) > 0)
 175                         children--;
 176         } else {
 177                 (void) pmap_unset(YPU_PROG, YPU_VERS);
 178                 exit(0);
 179         }
 180 }
 181
 182 void usage()
 183 {
 184         fprintf(stderr, "rpc.ypupdatedd [-p path]\n");
 185         exit(0);
 186 }
 187
 188 int
 189 main(argc, argv)
 190         int argc;
 191         char *argv[];
 192 {
 193         register SVCXPRT *transp = NULL;
 194         int sock;
 195         int proto = 0;
 196         struct sockaddr_in saddr;
 197         int asize = sizeof (saddr);
 198         int ch;
 199
 200         while ((ch = getopt(argc, argv, "p:h")) != -1) {
 201                 switch(ch) {
 202                 case 'p':
 203                         yp_dir = optarg;
 204                         break;
 205                 default:
 206                         usage();
 207                         break;
 208                 }
 209         }
 210 #ifdef foo
 211         load_securenets();
 212 #endif
 213
 214         if (svc_auth_reg(AUTH_DES, _svcauth_des) == -1) {
 215                 yp_error("failed to register AUTH_DES flavor");
 216                 exit(1);
 217         }
 218
 219         if (getsockname(0, (struct sockaddr *)&saddr, &asize) == 0) {
 220                 int ssize = sizeof (int);
 221
 222                 if (saddr.sin_family != AF_INET)
 223                         exit(1);
 224                 if (getsockopt(0, SOL_SOCKET, SO_TYPE,
 225                                 (char *)&_rpcfdtype, &ssize) == -1)
 226                         exit(1);
 227                 sock = 0;
 228                 _rpcpmstart = 1;
 229                 proto = 0;
 230                 openlog("rpc.ypupdatedd", LOG_PID, LOG_DAEMON);
 231         } else {
 232 #ifndef RPC_SVC_FG
 233                 if (daemon(0,0)) {
 234                         err(1, "cannot fork");
 235                 }
 236                 openlog("rpc.ypupdated", LOG_PID, LOG_DAEMON);
 237 #endif
 238                 sock = RPC_ANYSOCK;
 239                 (void) pmap_unset(YPU_PROG, YPU_VERS);
 240         }
 241
 242         if ((_rpcfdtype == 0) || (_rpcfdtype == SOCK_DGRAM)) {
 243                 transp = svcudp_create(sock);
 244                 if (transp == NULL) {
 245                         _msgout("cannot create udp service.");
 246                         exit(1);
 247                 }
 248                 if (!_rpcpmstart)
 249                         proto = IPPROTO_UDP;
 250                 if (!svc_register(transp, YPU_PROG, YPU_VERS, ypu_prog_1, proto)) {
 251                         _msgout("unable to register (YPU_PROG, YPU_VERS, udp).");
 252                         exit(1);
 253                 }
 254         }
 255
 256         if ((_rpcfdtype == 0) || (_rpcfdtype == SOCK_STREAM)) {
 257                 transp = svctcp_create(sock, 0, 0);
 258                 if (transp == NULL) {
 259                         _msgout("cannot create tcp service.");
 260                         exit(1);
 261                 }
 262                 if (!_rpcpmstart)
 263                         proto = IPPROTO_TCP;
 264                 if (!svc_register(transp, YPU_PROG, YPU_VERS, ypu_prog_1, proto)) {
 265                         _msgout("unable to register (YPU_PROG, YPU_VERS, tcp).");
 266                         exit(1);
 267                 }
 268         }
 269
 270         if (transp == (SVCXPRT *)NULL) {
 271                 _msgout("could not create a handle");
 272                 exit(1);
 273         }
 274         if (_rpcpmstart) {
 275                 (void) signal(SIGALRM, (SIG_PF) closedown);
 276                 (void) alarm(_RPCSVC_CLOSEDOWN/2);
 277         }
 278
 279         (void) signal(SIGPIPE, SIG_IGN);
 280         (void) signal(SIGCHLD, (SIG_PF) reaper);
 281         (void) signal(SIGTERM, (SIG_PF) reaper);
 282         (void) signal(SIGINT, (SIG_PF) reaper);
 283         (void) signal(SIGHUP, (SIG_PF) reaper);
 284
 285         ypupdated_svc_run();
 286         _msgout("svc_run returned");
 287         exit(1);
 288         /* NOTREACHED */
 289 }