[821] | 1 | /* $Slackware: inetd.c 1.79s 2001/02/06 13:18:00 volkerdi Exp $ */
|
---|
| 2 | /* $OpenBSD: inetd.c,v 1.79 2001/01/30 08:30:57 deraadt Exp $ */
|
---|
| 3 | /* $NetBSD: inetd.c,v 1.11 1996/02/22 11:14:41 mycroft Exp $ */
|
---|
| 4 | /* Busybox port by Vladimir Oleynik (C) 2001-2005 <dzo@simtreas.ru> */
|
---|
| 5 | /*
|
---|
| 6 | * Copyright (c) 1983,1991 The Regents of the University of California.
|
---|
| 7 | * All rights reserved.
|
---|
| 8 | *
|
---|
| 9 | * Redistribution and use in source and binary forms, with or without
|
---|
| 10 | * modification, are permitted provided that the following conditions
|
---|
| 11 | * are met:
|
---|
| 12 | * 1. Redistributions of source code must retain the above copyright
|
---|
| 13 | * notice, this list of conditions and the following disclaimer.
|
---|
| 14 | * 2. Redistributions in binary form must reproduce the above copyright
|
---|
| 15 | * notice, this list of conditions and the following disclaimer in the
|
---|
| 16 | * documentation and/or other materials provided with the distribution.
|
---|
| 17 | * 3. All advertising materials mentioning features or use of this software
|
---|
| 18 | * must display the following acknowledgement:
|
---|
| 19 | * This product includes software developed by the University of
|
---|
| 20 | * California, Berkeley and its contributors.
|
---|
| 21 | * 4. Neither the name of the University nor the names of its contributors
|
---|
| 22 | * may be used to endorse or promote products derived from this software
|
---|
| 23 | * without specific prior written permission.
|
---|
| 24 | *
|
---|
| 25 | * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
---|
| 26 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
---|
| 27 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
---|
| 28 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
---|
| 29 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
---|
| 30 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
---|
| 31 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
---|
| 32 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
---|
| 33 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
---|
| 34 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
---|
| 35 | * SUCH DAMAGE.
|
---|
| 36 | */
|
---|
| 37 |
|
---|
| 38 | /*
|
---|
| 39 | * Inetd - Internet super-server
|
---|
| 40 | *
|
---|
| 41 | * This program invokes all internet services as needed.
|
---|
| 42 | * connection-oriented services are invoked each time a
|
---|
| 43 | * connection is made, by creating a process. This process
|
---|
| 44 | * is passed the connection as file descriptor 0 and is
|
---|
| 45 | * expected to do a getpeername to find out the source host
|
---|
| 46 | * and port.
|
---|
| 47 | *
|
---|
| 48 | * Datagram oriented services are invoked when a datagram
|
---|
| 49 | * arrives; a process is created and passed a pending message
|
---|
| 50 | * on file descriptor 0. Datagram servers may either connect
|
---|
| 51 | * to their peer, freeing up the original socket for inetd
|
---|
| 52 | * to receive further messages on, or ``take over the socket'',
|
---|
| 53 | * processing all arriving datagrams and, eventually, timing
|
---|
| 54 | * out. The first type of server is said to be ``multi-threaded'';
|
---|
| 55 | * the second type of server ``single-threaded''.
|
---|
| 56 | *
|
---|
| 57 | * Inetd uses a configuration file which is read at startup
|
---|
| 58 | * and, possibly, at some later time in response to a hangup signal.
|
---|
| 59 | * The configuration file is ``free format'' with fields given in the
|
---|
| 60 | * order shown below. Continuation lines for an entry must begin with
|
---|
| 61 | * a space or tab. All fields must be present in each entry.
|
---|
| 62 | *
|
---|
| 63 | * service name must be in /etc/services
|
---|
| 64 | * socket type stream/dgram/raw/rdm/seqpacket
|
---|
| 65 | * protocol must be in /etc/protocols
|
---|
| 66 | * wait/nowait[.max] single-threaded/multi-threaded, max #
|
---|
| 67 | * user[.group] or user[:group] user/group to run daemon as
|
---|
| 68 | * server program full path name
|
---|
| 69 | * server program arguments maximum of MAXARGS (20)
|
---|
| 70 | *
|
---|
| 71 | * For RPC services
|
---|
| 72 | * service name/version must be in /etc/rpc
|
---|
| 73 | * socket type stream/dgram/raw/rdm/seqpacket
|
---|
| 74 | * protocol must be in /etc/protocols
|
---|
| 75 | * wait/nowait[.max] single-threaded/multi-threaded
|
---|
| 76 | * user[.group] or user[:group] user to run daemon as
|
---|
| 77 | * server program full path name
|
---|
| 78 | * server program arguments maximum of MAXARGS (20)
|
---|
| 79 | *
|
---|
| 80 | * For non-RPC services, the "service name" can be of the form
|
---|
| 81 | * hostaddress:servicename, in which case the hostaddress is used
|
---|
| 82 | * as the host portion of the address to listen on. If hostaddress
|
---|
| 83 | * consists of a single `*' character, INADDR_ANY is used.
|
---|
| 84 | *
|
---|
| 85 | * A line can also consist of just
|
---|
| 86 | * hostaddress:
|
---|
| 87 | * where hostaddress is as in the preceding paragraph. Such a line must
|
---|
| 88 | * have no further fields; the specified hostaddress is remembered and
|
---|
| 89 | * used for all further lines that have no hostaddress specified,
|
---|
| 90 | * until the next such line (or EOF). (This is why * is provided to
|
---|
| 91 | * allow explicit specification of INADDR_ANY.) A line
|
---|
| 92 | * *:
|
---|
| 93 | * is implicitly in effect at the beginning of the file.
|
---|
| 94 | *
|
---|
| 95 | * The hostaddress specifier may (and often will) contain dots;
|
---|
| 96 | * the service name must not.
|
---|
| 97 | *
|
---|
| 98 | * For RPC services, host-address specifiers are accepted and will
|
---|
| 99 | * work to some extent; however, because of limitations in the
|
---|
| 100 | * portmapper interface, it will not work to try to give more than
|
---|
| 101 | * one line for any given RPC service, even if the host-address
|
---|
| 102 | * specifiers are different.
|
---|
| 103 | *
|
---|
| 104 | * Comment lines are indicated by a `#' in column 1.
|
---|
| 105 | */
|
---|
| 106 |
|
---|
| 107 | /*
|
---|
| 108 | * Here's the scoop concerning the user[.:]group feature:
|
---|
| 109 | *
|
---|
| 110 | * 1) set-group-option off.
|
---|
| 111 | *
|
---|
| 112 | * a) user = root: NO setuid() or setgid() is done
|
---|
| 113 | *
|
---|
| 114 | * b) other: setgid(primary group as found in passwd)
|
---|
| 115 | * initgroups(name, primary group)
|
---|
| 116 | * setuid()
|
---|
| 117 | *
|
---|
| 118 | * 2) set-group-option on.
|
---|
| 119 | *
|
---|
| 120 | * a) user = root: setgid(specified group)
|
---|
| 121 | * NO initgroups()
|
---|
| 122 | * NO setuid()
|
---|
| 123 | *
|
---|
| 124 | * b) other: setgid(specified group)
|
---|
| 125 | * initgroups(name, specified group)
|
---|
| 126 | * setuid()
|
---|
| 127 | *
|
---|
| 128 | */
|
---|
| 129 |
|
---|
| 130 | #include <sys/param.h>
|
---|
| 131 | #include <sys/stat.h>
|
---|
| 132 | #include <sys/ioctl.h>
|
---|
| 133 | #include <sys/socket.h>
|
---|
| 134 | #include <sys/un.h>
|
---|
| 135 | #include <sys/file.h>
|
---|
| 136 | #include <sys/wait.h>
|
---|
| 137 | #include <sys/resource.h>
|
---|
| 138 |
|
---|
| 139 |
|
---|
| 140 | #include <netinet/in.h>
|
---|
| 141 | #include <arpa/inet.h>
|
---|
| 142 |
|
---|
| 143 | #include <errno.h>
|
---|
| 144 | #include <signal.h>
|
---|
| 145 | #include <netdb.h>
|
---|
| 146 | #include <syslog.h>
|
---|
| 147 | #include <stdio.h>
|
---|
| 148 | #include <stdlib.h>
|
---|
| 149 | #include <unistd.h>
|
---|
| 150 | #include <string.h>
|
---|
| 151 | #include <ctype.h>
|
---|
| 152 | #include <time.h>
|
---|
| 153 |
|
---|
| 154 | #include "busybox.h"
|
---|
| 155 |
|
---|
| 156 | //#define CONFIG_FEATURE_INETD_RPC
|
---|
| 157 | //#define CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_ECHO
|
---|
| 158 | //#define CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DISCARD
|
---|
| 159 | //#define CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_TIME
|
---|
| 160 | //#define CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DAYTIME
|
---|
| 161 | //#define CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_CHARGEN
|
---|
| 162 | //#define CONFIG_FEATURE_IPV6
|
---|
| 163 |
|
---|
| 164 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 165 | #include <rpc/rpc.h>
|
---|
| 166 | #include <rpc/pmap_clnt.h>
|
---|
| 167 | #endif
|
---|
| 168 |
|
---|
| 169 | #define _PATH_INETDCONF "/etc/inetd.conf"
|
---|
| 170 | #define _PATH_INETDPID "/var/run/inetd.pid"
|
---|
| 171 |
|
---|
| 172 |
|
---|
| 173 | #define TOOMANY 0 /* don't start more than TOOMANY */
|
---|
| 174 |
|
---|
| 175 | #define CNT_INTVL 60 /* servers in CNT_INTVL sec. */
|
---|
| 176 | #define RETRYTIME (60*10) /* retry after bind or server fail */
|
---|
| 177 |
|
---|
| 178 | #ifndef RLIMIT_NOFILE
|
---|
| 179 | #define RLIMIT_NOFILE RLIMIT_OFILE
|
---|
| 180 | #endif
|
---|
| 181 |
|
---|
| 182 | #ifndef OPEN_MAX
|
---|
| 183 | #define OPEN_MAX 64
|
---|
| 184 | #endif
|
---|
| 185 |
|
---|
| 186 | /* Reserve some descriptors, 3 stdio + at least: 1 log, 1 conf. file */
|
---|
| 187 | #define FD_MARGIN (8)
|
---|
| 188 | static rlim_t rlim_ofile_cur = OPEN_MAX;
|
---|
| 189 | static struct rlimit rlim_ofile;
|
---|
| 190 |
|
---|
| 191 |
|
---|
| 192 | /* Check unsupporting builtin */
|
---|
| 193 | #if defined CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_ECHO || \
|
---|
| 194 | defined CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DISCARD || \
|
---|
| 195 | defined CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_TIME || \
|
---|
| 196 | defined CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DAYTIME || \
|
---|
| 197 | defined CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_CHARGEN
|
---|
| 198 | # define INETD_FEATURE_ENABLED
|
---|
| 199 | #endif
|
---|
| 200 |
|
---|
| 201 | #if defined CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_ECHO || \
|
---|
| 202 | defined CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DISCARD || \
|
---|
| 203 | defined CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_CHARGEN
|
---|
| 204 | # define INETD_SETPROCTITLE
|
---|
| 205 | #endif
|
---|
| 206 |
|
---|
| 207 | typedef struct servtab
|
---|
| 208 | {
|
---|
| 209 | char *se_hostaddr; /* host address to listen on */
|
---|
| 210 | char *se_service; /* name of service */
|
---|
| 211 | int se_socktype; /* type of socket to use */
|
---|
| 212 | int se_family; /* address family */
|
---|
| 213 | char *se_proto; /* protocol used */
|
---|
| 214 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 215 | int se_rpcprog; /* rpc program number */
|
---|
| 216 | int se_rpcversl; /* rpc program lowest version */
|
---|
| 217 | int se_rpcversh; /* rpc program highest version */
|
---|
| 218 | #define isrpcservice(sep) ((sep)->se_rpcversl != 0)
|
---|
| 219 | #else
|
---|
| 220 | #define isrpcservice(sep) 0
|
---|
| 221 | #endif
|
---|
| 222 | pid_t se_wait; /* single threaded server */
|
---|
| 223 | short se_checked; /* looked at during merge */
|
---|
| 224 | char *se_user; /* user name to run as */
|
---|
| 225 | char *se_group; /* group name to run as */
|
---|
| 226 | #ifdef INETD_FEATURE_ENABLED
|
---|
| 227 | const struct builtin *se_bi; /* if built-in, description */
|
---|
| 228 | #endif
|
---|
| 229 | char *se_server; /* server program */
|
---|
| 230 | #define MAXARGV 20
|
---|
| 231 | char *se_argv[MAXARGV + 1]; /* program arguments */
|
---|
| 232 | int se_fd; /* open descriptor */
|
---|
| 233 | union
|
---|
| 234 | {
|
---|
| 235 | struct sockaddr se_un_ctrladdr;
|
---|
| 236 | struct sockaddr_in se_un_ctrladdr_in;
|
---|
| 237 | #ifdef CONFIG_FEATURE_IPV6
|
---|
| 238 | struct sockaddr_in6 se_un_ctrladdr_in6;
|
---|
| 239 | #endif
|
---|
| 240 | struct sockaddr_un se_un_ctrladdr_un;
|
---|
| 241 | } se_un; /* bound address */
|
---|
| 242 | #define se_ctrladdr se_un.se_un_ctrladdr
|
---|
| 243 | #define se_ctrladdr_in se_un.se_un_ctrladdr_in
|
---|
| 244 | #define se_ctrladdr_in6 se_un.se_un_ctrladdr_in6
|
---|
| 245 | #define se_ctrladdr_un se_un.se_un_ctrladdr_un
|
---|
| 246 | int se_ctrladdr_size;
|
---|
| 247 | int se_max; /* max # of instances of this service */
|
---|
| 248 | int se_count; /* number started since se_time */
|
---|
| 249 | struct timeval se_time; /* start of se_count */
|
---|
| 250 | struct servtab *se_next;
|
---|
| 251 | } servtab_t;
|
---|
| 252 |
|
---|
| 253 | static servtab_t *servtab;
|
---|
| 254 |
|
---|
| 255 | #ifdef INETD_FEATURE_ENABLED
|
---|
| 256 | struct builtin
|
---|
| 257 | {
|
---|
| 258 | const char *bi_service; /* internally provided service name */
|
---|
| 259 | int bi_socktype; /* type of socket supported */
|
---|
| 260 | short bi_fork; /* 1 if should fork before call */
|
---|
| 261 | short bi_wait; /* 1 if should wait for child */
|
---|
| 262 | void (*bi_fn) (int, servtab_t *);
|
---|
| 263 | };
|
---|
| 264 |
|
---|
| 265 | /* Echo received data */
|
---|
| 266 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_ECHO
|
---|
| 267 | static void echo_stream (int, servtab_t *);
|
---|
| 268 | static void echo_dg (int, servtab_t *);
|
---|
| 269 | #endif
|
---|
| 270 | /* Internet /dev/null */
|
---|
| 271 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DISCARD
|
---|
| 272 | static void discard_stream (int, servtab_t *);
|
---|
| 273 | static void discard_dg (int, servtab_t *);
|
---|
| 274 | #endif
|
---|
| 275 | /* Return 32 bit time since 1900 */
|
---|
| 276 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_TIME
|
---|
| 277 | static void machtime_stream (int, servtab_t *);
|
---|
| 278 | static void machtime_dg (int, servtab_t *);
|
---|
| 279 | #endif
|
---|
| 280 | /* Return human-readable time */
|
---|
| 281 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DAYTIME
|
---|
| 282 | static void daytime_stream (int, servtab_t *);
|
---|
| 283 | static void daytime_dg (int, servtab_t *);
|
---|
| 284 | #endif
|
---|
| 285 | /* Familiar character generator */
|
---|
| 286 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_CHARGEN
|
---|
| 287 | static void chargen_stream (int, servtab_t *);
|
---|
| 288 | static void chargen_dg (int, servtab_t *);
|
---|
| 289 | #endif
|
---|
| 290 |
|
---|
| 291 | static const struct builtin builtins[] = {
|
---|
| 292 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_ECHO
|
---|
| 293 | /* Echo received data */
|
---|
| 294 | {"echo", SOCK_STREAM, 1, 0, echo_stream,},
|
---|
| 295 | {"echo", SOCK_DGRAM, 0, 0, echo_dg,},
|
---|
| 296 | #endif
|
---|
| 297 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DISCARD
|
---|
| 298 | /* Internet /dev/null */
|
---|
| 299 | {"discard", SOCK_STREAM, 1, 0, discard_stream,},
|
---|
| 300 | {"discard", SOCK_DGRAM, 0, 0, discard_dg,},
|
---|
| 301 | #endif
|
---|
| 302 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_TIME
|
---|
| 303 | /* Return 32 bit time since 1900 */
|
---|
| 304 | {"time", SOCK_STREAM, 0, 0, machtime_stream,},
|
---|
| 305 | {"time", SOCK_DGRAM, 0, 0, machtime_dg,},
|
---|
| 306 | #endif
|
---|
| 307 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DAYTIME
|
---|
| 308 | /* Return human-readable time */
|
---|
| 309 | {"daytime", SOCK_STREAM, 0, 0, daytime_stream,},
|
---|
| 310 | {"daytime", SOCK_DGRAM, 0, 0, daytime_dg,},
|
---|
| 311 | #endif
|
---|
| 312 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_CHARGEN
|
---|
| 313 | /* Familiar character generator */
|
---|
| 314 | {"chargen", SOCK_STREAM, 1, 0, chargen_stream,},
|
---|
| 315 | {"chargen", SOCK_DGRAM, 0, 0, chargen_dg,},
|
---|
| 316 | #endif
|
---|
| 317 | {NULL, 0, 0, 0, NULL}
|
---|
| 318 | };
|
---|
| 319 | #endif /* INETD_FEATURE_ENABLED */
|
---|
| 320 |
|
---|
| 321 | static int global_queuelen = 128;
|
---|
| 322 | static int nsock, maxsock;
|
---|
| 323 | static fd_set allsock;
|
---|
| 324 | static int toomany = TOOMANY;
|
---|
| 325 | static int timingout;
|
---|
| 326 | static struct servent *sp;
|
---|
| 327 | static uid_t uid;
|
---|
| 328 |
|
---|
| 329 | static char *CONFIG = _PATH_INETDCONF;
|
---|
| 330 |
|
---|
| 331 | static FILE *fconfig;
|
---|
| 332 | static char line[1024];
|
---|
| 333 | static char *defhost;
|
---|
| 334 |
|
---|
| 335 | static char *newstr (char *cp)
|
---|
| 336 | {
|
---|
| 337 | if ((cp = strdup (cp ? cp : "")))
|
---|
| 338 | return (cp);
|
---|
| 339 | syslog (LOG_ERR, "strdup: %m");
|
---|
| 340 | exit (1);
|
---|
| 341 | }
|
---|
| 342 |
|
---|
| 343 | static int setconfig (void)
|
---|
| 344 | {
|
---|
| 345 | free (defhost);
|
---|
| 346 | defhost = newstr ("*");
|
---|
| 347 | if (fconfig != NULL) {
|
---|
| 348 | fseek (fconfig, 0L, SEEK_SET);
|
---|
| 349 | return (1);
|
---|
| 350 | }
|
---|
| 351 | fconfig = fopen (CONFIG, "r");
|
---|
| 352 | return (fconfig != NULL);
|
---|
| 353 | }
|
---|
| 354 |
|
---|
| 355 | static void endconfig (void)
|
---|
| 356 | {
|
---|
| 357 | if (fconfig) {
|
---|
| 358 | (void) fclose (fconfig);
|
---|
| 359 | fconfig = NULL;
|
---|
| 360 | }
|
---|
| 361 | free (defhost);
|
---|
| 362 | defhost = 0;
|
---|
| 363 | }
|
---|
| 364 |
|
---|
| 365 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 366 | static void register_rpc (servtab_t *sep)
|
---|
| 367 | {
|
---|
| 368 | int n;
|
---|
| 369 | struct sockaddr_in ir_sin;
|
---|
| 370 | struct protoent *pp;
|
---|
| 371 | socklen_t size;
|
---|
| 372 |
|
---|
| 373 | if ((pp = getprotobyname (sep->se_proto + 4)) == NULL) {
|
---|
| 374 | syslog (LOG_ERR, "%s: getproto: %m", sep->se_proto);
|
---|
| 375 | return;
|
---|
| 376 | }
|
---|
| 377 | size = sizeof ir_sin;
|
---|
| 378 | if (getsockname (sep->se_fd, (struct sockaddr *) &ir_sin, &size) < 0) {
|
---|
| 379 | syslog (LOG_ERR, "%s/%s: getsockname: %m",
|
---|
| 380 | sep->se_service, sep->se_proto);
|
---|
| 381 | return;
|
---|
| 382 | }
|
---|
| 383 |
|
---|
| 384 | for (n = sep->se_rpcversl; n <= sep->se_rpcversh; n++) {
|
---|
| 385 | (void) pmap_unset (sep->se_rpcprog, n);
|
---|
| 386 | if (!pmap_set (sep->se_rpcprog, n, pp->p_proto, ntohs (ir_sin.sin_port)))
|
---|
| 387 | syslog (LOG_ERR, "%s %s: pmap_set: %u %u %u %u: %m",
|
---|
| 388 | sep->se_service, sep->se_proto,
|
---|
| 389 | sep->se_rpcprog, n, pp->p_proto, ntohs (ir_sin.sin_port));
|
---|
| 390 | }
|
---|
| 391 | }
|
---|
| 392 |
|
---|
| 393 | static void unregister_rpc (servtab_t *sep)
|
---|
| 394 | {
|
---|
| 395 | int n;
|
---|
| 396 |
|
---|
| 397 | for (n = sep->se_rpcversl; n <= sep->se_rpcversh; n++) {
|
---|
| 398 | if (!pmap_unset (sep->se_rpcprog, n))
|
---|
| 399 | syslog (LOG_ERR, "pmap_unset(%u, %u)", sep->se_rpcprog, n);
|
---|
| 400 | }
|
---|
| 401 | }
|
---|
| 402 | #endif /* CONFIG_FEATURE_INETD_RPC */
|
---|
| 403 |
|
---|
| 404 | static void freeconfig (servtab_t *cp)
|
---|
| 405 | {
|
---|
| 406 | int i;
|
---|
| 407 |
|
---|
| 408 | free (cp->se_hostaddr);
|
---|
| 409 | free (cp->se_service);
|
---|
| 410 | free (cp->se_proto);
|
---|
| 411 | free (cp->se_user);
|
---|
| 412 | free (cp->se_group);
|
---|
| 413 | free (cp->se_server);
|
---|
| 414 | for (i = 0; i < MAXARGV; i++)
|
---|
| 415 | free (cp->se_argv[i]);
|
---|
| 416 | }
|
---|
| 417 |
|
---|
| 418 | static int bump_nofile (void)
|
---|
| 419 | {
|
---|
| 420 | #define FD_CHUNK 32
|
---|
| 421 |
|
---|
| 422 | struct rlimit rl;
|
---|
| 423 |
|
---|
| 424 | if (getrlimit (RLIMIT_NOFILE, &rl) < 0) {
|
---|
| 425 | syslog (LOG_ERR, "getrlimit: %m");
|
---|
| 426 | return -1;
|
---|
| 427 | }
|
---|
| 428 | rl.rlim_cur = MIN (rl.rlim_max, rl.rlim_cur + FD_CHUNK);
|
---|
| 429 | rl.rlim_cur = MIN (FD_SETSIZE, rl.rlim_cur + FD_CHUNK);
|
---|
| 430 | if (rl.rlim_cur <= rlim_ofile_cur) {
|
---|
| 431 | syslog (LOG_ERR, "bump_nofile: cannot extend file limit, max = %d",
|
---|
| 432 | (int) rl.rlim_cur);
|
---|
| 433 | return -1;
|
---|
| 434 | }
|
---|
| 435 |
|
---|
| 436 | if (setrlimit (RLIMIT_NOFILE, &rl) < 0) {
|
---|
| 437 | syslog (LOG_ERR, "setrlimit: %m");
|
---|
| 438 | return -1;
|
---|
| 439 | }
|
---|
| 440 |
|
---|
| 441 | rlim_ofile_cur = rl.rlim_cur;
|
---|
| 442 | return 0;
|
---|
| 443 | }
|
---|
| 444 |
|
---|
| 445 | static void setup (servtab_t *sep)
|
---|
| 446 | {
|
---|
| 447 | int on = 1;
|
---|
| 448 | int r;
|
---|
| 449 |
|
---|
| 450 | if ((sep->se_fd = socket (sep->se_family, sep->se_socktype, 0)) < 0) {
|
---|
| 451 | syslog (LOG_ERR, "%s/%s: socket: %m", sep->se_service, sep->se_proto);
|
---|
| 452 | return;
|
---|
| 453 | }
|
---|
| 454 | #define turnon(fd, opt) \
|
---|
| 455 | setsockopt(fd, SOL_SOCKET, opt, (char *)&on, sizeof (on))
|
---|
| 456 | if (turnon (sep->se_fd, SO_REUSEADDR) < 0)
|
---|
| 457 | syslog (LOG_ERR, "setsockopt (SO_REUSEADDR): %m");
|
---|
| 458 | #undef turnon
|
---|
| 459 |
|
---|
| 460 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 461 | if (isrpcservice (sep)) {
|
---|
| 462 | struct passwd *pwd;
|
---|
| 463 |
|
---|
| 464 | /*
|
---|
| 465 | * for RPC services, attempt to use a reserved port
|
---|
| 466 | * if they are going to be running as root.
|
---|
| 467 | *
|
---|
| 468 | * Also, zero out the port for all RPC services; let bind()
|
---|
| 469 | * find one.
|
---|
| 470 | */
|
---|
| 471 | sep->se_ctrladdr_in.sin_port = 0;
|
---|
| 472 | if (sep->se_user && (pwd = getpwnam (sep->se_user)) &&
|
---|
| 473 | pwd->pw_uid == 0 && uid == 0)
|
---|
| 474 | r = bindresvport (sep->se_fd, &sep->se_ctrladdr_in);
|
---|
| 475 | else {
|
---|
| 476 | r = bind (sep->se_fd, &sep->se_ctrladdr, sep->se_ctrladdr_size);
|
---|
| 477 | if (r == 0) {
|
---|
| 478 | socklen_t len = sep->se_ctrladdr_size;
|
---|
| 479 | int saveerrno = errno;
|
---|
| 480 |
|
---|
| 481 | /* update se_ctrladdr_in.sin_port */
|
---|
| 482 | r = getsockname (sep->se_fd, &sep->se_ctrladdr, &len);
|
---|
| 483 | if (r <= 0)
|
---|
| 484 | errno = saveerrno;
|
---|
| 485 | }
|
---|
| 486 | }
|
---|
| 487 | } else
|
---|
| 488 | #endif
|
---|
| 489 | r = bind (sep->se_fd, &sep->se_ctrladdr, sep->se_ctrladdr_size);
|
---|
| 490 | if (r < 0) {
|
---|
| 491 | syslog (LOG_ERR, "%s/%s (%d): bind: %m",
|
---|
| 492 | sep->se_service, sep->se_proto, sep->se_ctrladdr.sa_family);
|
---|
| 493 | close (sep->se_fd);
|
---|
| 494 | sep->se_fd = -1;
|
---|
| 495 | if (!timingout) {
|
---|
| 496 | timingout = 1;
|
---|
| 497 | alarm (RETRYTIME);
|
---|
| 498 | }
|
---|
| 499 | return;
|
---|
| 500 | }
|
---|
| 501 | if (sep->se_socktype == SOCK_STREAM)
|
---|
| 502 | listen (sep->se_fd, global_queuelen);
|
---|
| 503 |
|
---|
| 504 | FD_SET (sep->se_fd, &allsock);
|
---|
| 505 | nsock++;
|
---|
| 506 | if (sep->se_fd > maxsock) {
|
---|
| 507 | maxsock = sep->se_fd;
|
---|
| 508 | if ((rlim_t)maxsock > rlim_ofile_cur - FD_MARGIN)
|
---|
| 509 | bump_nofile ();
|
---|
| 510 | }
|
---|
| 511 | }
|
---|
| 512 |
|
---|
| 513 | static char *nextline (void)
|
---|
| 514 | {
|
---|
| 515 | char *cp;
|
---|
| 516 | FILE *fd = fconfig;
|
---|
| 517 |
|
---|
| 518 | if (fgets (line, sizeof (line), fd) == NULL)
|
---|
| 519 | return (NULL);
|
---|
| 520 | cp = strchr (line, '\n');
|
---|
| 521 | if (cp)
|
---|
| 522 | *cp = '\0';
|
---|
| 523 | return (line);
|
---|
| 524 | }
|
---|
| 525 |
|
---|
| 526 | static char *skip (char **cpp) /* int report; */
|
---|
| 527 | {
|
---|
| 528 | char *cp = *cpp;
|
---|
| 529 | char *start;
|
---|
| 530 |
|
---|
| 531 | /* erp: */
|
---|
| 532 | if (*cpp == NULL) {
|
---|
| 533 | /* if (report) */
|
---|
| 534 | /* syslog(LOG_ERR, "syntax error in inetd config file"); */
|
---|
| 535 | return (NULL);
|
---|
| 536 | }
|
---|
| 537 |
|
---|
| 538 | again:
|
---|
| 539 | while (*cp == ' ' || *cp == '\t')
|
---|
| 540 | cp++;
|
---|
| 541 | if (*cp == '\0') {
|
---|
| 542 | int c;
|
---|
| 543 |
|
---|
| 544 | c = getc (fconfig);
|
---|
| 545 | (void) ungetc (c, fconfig);
|
---|
| 546 | if (c == ' ' || c == '\t')
|
---|
| 547 | if ((cp = nextline ()))
|
---|
| 548 | goto again;
|
---|
| 549 | *cpp = NULL;
|
---|
| 550 | /* goto erp; */
|
---|
| 551 | return (NULL);
|
---|
| 552 | }
|
---|
| 553 | start = cp;
|
---|
| 554 | while (*cp && *cp != ' ' && *cp != '\t')
|
---|
| 555 | cp++;
|
---|
| 556 | if (*cp != '\0')
|
---|
| 557 | *cp++ = '\0';
|
---|
| 558 | /* if ((*cpp = cp) == NULL) */
|
---|
| 559 | /* goto erp; */
|
---|
| 560 |
|
---|
| 561 | *cpp = cp;
|
---|
| 562 | return (start);
|
---|
| 563 | }
|
---|
| 564 |
|
---|
| 565 | static servtab_t *new_servtab(void)
|
---|
| 566 | {
|
---|
| 567 | servtab_t *sep;
|
---|
| 568 |
|
---|
| 569 | sep = (servtab_t *) malloc (sizeof (servtab_t));
|
---|
| 570 | if (sep == NULL) {
|
---|
| 571 | syslog (LOG_ERR, bb_msg_memory_exhausted);
|
---|
| 572 | exit (1);
|
---|
| 573 | }
|
---|
| 574 | return sep;
|
---|
| 575 | }
|
---|
| 576 |
|
---|
| 577 | static servtab_t *dupconfig (servtab_t *sep)
|
---|
| 578 | {
|
---|
| 579 | servtab_t *newtab;
|
---|
| 580 | int argc;
|
---|
| 581 |
|
---|
| 582 | newtab = new_servtab();
|
---|
| 583 | memset (newtab, 0, sizeof (servtab_t));
|
---|
| 584 | newtab->se_service = sep->se_service ? newstr (sep->se_service) : NULL;
|
---|
| 585 | newtab->se_socktype = sep->se_socktype;
|
---|
| 586 | newtab->se_family = sep->se_family;
|
---|
| 587 | newtab->se_proto = sep->se_proto ? newstr (sep->se_proto) : NULL;
|
---|
| 588 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 589 | newtab->se_rpcprog = sep->se_rpcprog;
|
---|
| 590 | newtab->se_rpcversl = sep->se_rpcversl;
|
---|
| 591 | newtab->se_rpcversh = sep->se_rpcversh;
|
---|
| 592 | #endif
|
---|
| 593 | newtab->se_wait = sep->se_wait;
|
---|
| 594 | newtab->se_user = sep->se_user ? newstr (sep->se_user) : NULL;
|
---|
| 595 | newtab->se_group = sep->se_group ? newstr (sep->se_group) : NULL;
|
---|
| 596 | #ifdef INETD_FEATURE_ENABLED
|
---|
| 597 | newtab->se_bi = sep->se_bi;
|
---|
| 598 | #endif
|
---|
| 599 | newtab->se_server = sep->se_server ? newstr (sep->se_server) : 0;
|
---|
| 600 |
|
---|
| 601 | for (argc = 0; argc <= MAXARGV; argc++)
|
---|
| 602 | newtab->se_argv[argc] = sep->se_argv[argc] ?
|
---|
| 603 | newstr (sep->se_argv[argc]) : NULL;
|
---|
| 604 | newtab->se_max = sep->se_max;
|
---|
| 605 |
|
---|
| 606 | return (newtab);
|
---|
| 607 | }
|
---|
| 608 |
|
---|
| 609 | static servtab_t *getconfigent (void)
|
---|
| 610 | {
|
---|
| 611 | servtab_t *sep;
|
---|
| 612 | int argc;
|
---|
| 613 | char *cp, *arg;
|
---|
| 614 | char *hostdelim;
|
---|
| 615 | servtab_t *nsep;
|
---|
| 616 | servtab_t *psep;
|
---|
| 617 |
|
---|
| 618 | sep = new_servtab();
|
---|
| 619 |
|
---|
| 620 | /* memset(sep, 0, sizeof *sep); */
|
---|
| 621 | more:
|
---|
| 622 | /* freeconfig(sep); */
|
---|
| 623 |
|
---|
| 624 | while ((cp = nextline ()) && *cp == '#');
|
---|
| 625 | if (cp == NULL) {
|
---|
| 626 | /* free(sep); */
|
---|
| 627 | return (NULL);
|
---|
| 628 | }
|
---|
| 629 |
|
---|
| 630 | memset ((char *) sep, 0, sizeof *sep);
|
---|
| 631 | arg = skip (&cp);
|
---|
| 632 | if (arg == NULL) {
|
---|
| 633 | /* A blank line. */
|
---|
| 634 | goto more;
|
---|
| 635 | }
|
---|
| 636 |
|
---|
| 637 | /* Check for a host name. */
|
---|
| 638 | hostdelim = strrchr (arg, ':');
|
---|
| 639 | if (hostdelim) {
|
---|
| 640 | *hostdelim = '\0';
|
---|
| 641 | sep->se_hostaddr = newstr (arg);
|
---|
| 642 | arg = hostdelim + 1;
|
---|
| 643 | /*
|
---|
| 644 | * If the line is of the form `host:', then just change the
|
---|
| 645 | * default host for the following lines.
|
---|
| 646 | */
|
---|
| 647 | if (*arg == '\0') {
|
---|
| 648 | arg = skip (&cp);
|
---|
| 649 | if (cp == NULL) {
|
---|
| 650 | free (defhost);
|
---|
| 651 | defhost = sep->se_hostaddr;
|
---|
| 652 | goto more;
|
---|
| 653 | }
|
---|
| 654 | }
|
---|
| 655 | } else
|
---|
| 656 | sep->se_hostaddr = newstr (defhost);
|
---|
| 657 |
|
---|
| 658 | sep->se_service = newstr (arg);
|
---|
| 659 | arg = skip (&cp);
|
---|
| 660 |
|
---|
| 661 | if (strcmp (arg, "stream") == 0)
|
---|
| 662 | sep->se_socktype = SOCK_STREAM;
|
---|
| 663 | else if (strcmp (arg, "dgram") == 0)
|
---|
| 664 | sep->se_socktype = SOCK_DGRAM;
|
---|
| 665 | else if (strcmp (arg, "rdm") == 0)
|
---|
| 666 | sep->se_socktype = SOCK_RDM;
|
---|
| 667 | else if (strcmp (arg, "seqpacket") == 0)
|
---|
| 668 | sep->se_socktype = SOCK_SEQPACKET;
|
---|
| 669 | else if (strcmp (arg, "raw") == 0)
|
---|
| 670 | sep->se_socktype = SOCK_RAW;
|
---|
| 671 | else
|
---|
| 672 | sep->se_socktype = -1;
|
---|
| 673 |
|
---|
| 674 | sep->se_proto = newstr (skip (&cp));
|
---|
| 675 |
|
---|
| 676 | if (strcmp (sep->se_proto, "unix") == 0) {
|
---|
| 677 | sep->se_family = AF_UNIX;
|
---|
| 678 | } else {
|
---|
| 679 | sep->se_family = AF_INET;
|
---|
| 680 | if (sep->se_proto[strlen (sep->se_proto) - 1] == '6')
|
---|
| 681 | #ifdef CONFIG_FEATURE_IPV6
|
---|
| 682 | sep->se_family = AF_INET6;
|
---|
| 683 | #else
|
---|
| 684 | syslog (LOG_ERR, "%s: IPV6 not supported", sep->se_proto);
|
---|
| 685 | #endif
|
---|
| 686 | if (strncmp (sep->se_proto, "rpc/", 4) == 0) {
|
---|
| 687 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 688 | char *p, *ccp;
|
---|
| 689 | long l;
|
---|
| 690 |
|
---|
| 691 | p = strchr (sep->se_service, '/');
|
---|
| 692 | if (p == 0) {
|
---|
| 693 | syslog (LOG_ERR, "%s: no rpc version", sep->se_service);
|
---|
| 694 | goto more;
|
---|
| 695 | }
|
---|
| 696 | *p++ = '\0';
|
---|
| 697 | l = strtol (p, &ccp, 0);
|
---|
| 698 | if (ccp == p || l < 0 || l > INT_MAX) {
|
---|
| 699 | badafterall:
|
---|
| 700 | syslog (LOG_ERR, "%s/%s: bad rpc version", sep->se_service, p);
|
---|
| 701 | goto more;
|
---|
| 702 | }
|
---|
| 703 | sep->se_rpcversl = sep->se_rpcversh = l;
|
---|
| 704 | if (*ccp == '-') {
|
---|
| 705 | p = ccp + 1;
|
---|
| 706 | l = strtol (p, &ccp, 0);
|
---|
| 707 | if (ccp == p || l < 0 || l > INT_MAX || l < sep->se_rpcversl || *ccp)
|
---|
| 708 | goto badafterall;
|
---|
| 709 | sep->se_rpcversh = l;
|
---|
| 710 | } else if (*ccp != '\0')
|
---|
| 711 | goto badafterall;
|
---|
| 712 | #else
|
---|
| 713 | syslog (LOG_ERR, "%s: rpc services not supported", sep->se_service);
|
---|
| 714 | #endif
|
---|
| 715 | }
|
---|
| 716 | }
|
---|
| 717 | arg = skip (&cp);
|
---|
| 718 | if (arg == NULL)
|
---|
| 719 | goto more;
|
---|
| 720 |
|
---|
| 721 | {
|
---|
| 722 | char *s = strchr (arg, '.');
|
---|
| 723 | if (s) {
|
---|
| 724 | *s++ = '\0';
|
---|
| 725 | sep->se_max = atoi (s);
|
---|
| 726 | } else
|
---|
| 727 | sep->se_max = toomany;
|
---|
| 728 | }
|
---|
| 729 | sep->se_wait = strcmp (arg, "wait") == 0;
|
---|
| 730 | /* if ((arg = skip(&cp, 1)) == NULL) */
|
---|
| 731 | /* goto more; */
|
---|
| 732 | sep->se_user = newstr (skip (&cp));
|
---|
| 733 | arg = strchr (sep->se_user, '.');
|
---|
| 734 | if (arg == NULL)
|
---|
| 735 | arg = strchr (sep->se_user, ':');
|
---|
| 736 | if (arg) {
|
---|
| 737 | *arg++ = '\0';
|
---|
| 738 | sep->se_group = newstr (arg);
|
---|
| 739 | }
|
---|
| 740 | /* if ((arg = skip(&cp, 1)) == NULL) */
|
---|
| 741 | /* goto more; */
|
---|
| 742 |
|
---|
| 743 | sep->se_server = newstr (skip (&cp));
|
---|
| 744 | if (strcmp (sep->se_server, "internal") == 0) {
|
---|
| 745 | #ifdef INETD_FEATURE_ENABLED
|
---|
| 746 | const struct builtin *bi;
|
---|
| 747 |
|
---|
| 748 | for (bi = builtins; bi->bi_service; bi++)
|
---|
| 749 | if (bi->bi_socktype == sep->se_socktype &&
|
---|
| 750 | strcmp (bi->bi_service, sep->se_service) == 0)
|
---|
| 751 | break;
|
---|
| 752 | if (bi->bi_service == 0) {
|
---|
| 753 | syslog (LOG_ERR, "internal service %s unknown", sep->se_service);
|
---|
| 754 | goto more;
|
---|
| 755 | }
|
---|
| 756 | sep->se_bi = bi;
|
---|
| 757 | sep->se_wait = bi->bi_wait;
|
---|
| 758 | #else
|
---|
| 759 | syslog (LOG_ERR, "internal service %s unknown", sep->se_service);
|
---|
| 760 | goto more;
|
---|
| 761 | #endif
|
---|
| 762 | }
|
---|
| 763 | #ifdef INETD_FEATURE_ENABLED
|
---|
| 764 | else
|
---|
| 765 | sep->se_bi = NULL;
|
---|
| 766 | #endif
|
---|
| 767 | argc = 0;
|
---|
| 768 | for (arg = skip (&cp); cp; arg = skip (&cp)) {
|
---|
| 769 | if (argc < MAXARGV)
|
---|
| 770 | sep->se_argv[argc++] = newstr (arg);
|
---|
| 771 | }
|
---|
| 772 | while (argc <= MAXARGV)
|
---|
| 773 | sep->se_argv[argc++] = NULL;
|
---|
| 774 |
|
---|
| 775 | /*
|
---|
| 776 | * Now that we've processed the entire line, check if the hostname
|
---|
| 777 | * specifier was a comma separated list of hostnames. If so
|
---|
| 778 | * we'll make new entries for each address.
|
---|
| 779 | */
|
---|
| 780 | while ((hostdelim = strrchr (sep->se_hostaddr, ',')) != NULL) {
|
---|
| 781 | nsep = dupconfig (sep);
|
---|
| 782 |
|
---|
| 783 | /*
|
---|
| 784 | * NULL terminate the hostname field of the existing entry,
|
---|
| 785 | * and make a dup for the new entry.
|
---|
| 786 | */
|
---|
| 787 | *hostdelim++ = '\0';
|
---|
| 788 | nsep->se_hostaddr = newstr (hostdelim);
|
---|
| 789 |
|
---|
| 790 | nsep->se_next = sep->se_next;
|
---|
| 791 | sep->se_next = nsep;
|
---|
| 792 | }
|
---|
| 793 |
|
---|
| 794 | nsep = sep;
|
---|
| 795 | while (nsep != NULL) {
|
---|
| 796 | nsep->se_checked = 1;
|
---|
| 797 | if (nsep->se_family == AF_INET) {
|
---|
| 798 | if (!strcmp (nsep->se_hostaddr, "*"))
|
---|
| 799 | nsep->se_ctrladdr_in.sin_addr.s_addr = INADDR_ANY;
|
---|
| 800 | else if (!inet_aton (nsep->se_hostaddr, &nsep->se_ctrladdr_in.sin_addr)) {
|
---|
| 801 | struct hostent *hp;
|
---|
| 802 |
|
---|
| 803 | hp = gethostbyname (nsep->se_hostaddr);
|
---|
| 804 | if (hp == 0) {
|
---|
| 805 | syslog (LOG_ERR, "%s: unknown host", nsep->se_hostaddr);
|
---|
| 806 | nsep->se_checked = 0;
|
---|
| 807 | goto skip;
|
---|
| 808 | } else if (hp->h_addrtype != AF_INET) {
|
---|
| 809 | syslog (LOG_ERR,
|
---|
| 810 | "%s: address isn't an Internet "
|
---|
| 811 | "address", nsep->se_hostaddr);
|
---|
| 812 | nsep->se_checked = 0;
|
---|
| 813 | goto skip;
|
---|
| 814 | } else {
|
---|
| 815 | int i = 1;
|
---|
| 816 |
|
---|
| 817 | memmove (&nsep->se_ctrladdr_in.sin_addr,
|
---|
| 818 | hp->h_addr_list[0], sizeof (struct in_addr));
|
---|
| 819 | while (hp->h_addr_list[i] != NULL) {
|
---|
| 820 | psep = dupconfig (nsep);
|
---|
| 821 | psep->se_hostaddr = newstr (nsep->se_hostaddr);
|
---|
| 822 | psep->se_checked = 1;
|
---|
| 823 | memmove (&psep->se_ctrladdr_in.sin_addr,
|
---|
| 824 | hp->h_addr_list[i], sizeof (struct in_addr));
|
---|
| 825 | psep->se_ctrladdr_size = sizeof (psep->se_ctrladdr_in);
|
---|
| 826 | i++;
|
---|
| 827 | /* Prepend to list, don't want to look up its */
|
---|
| 828 | /* hostname again. */
|
---|
| 829 | psep->se_next = sep;
|
---|
| 830 | sep = psep;
|
---|
| 831 | }
|
---|
| 832 | }
|
---|
| 833 | }
|
---|
| 834 | }
|
---|
| 835 | /* XXX BUG?: is this skip: label supposed to remain? */
|
---|
| 836 | skip:
|
---|
| 837 | nsep = nsep->se_next;
|
---|
| 838 | }
|
---|
| 839 |
|
---|
| 840 | /*
|
---|
| 841 | * Finally, free any entries which failed the gethostbyname
|
---|
| 842 | * check.
|
---|
| 843 | */
|
---|
| 844 | psep = NULL;
|
---|
| 845 | nsep = sep;
|
---|
| 846 | while (nsep != NULL) {
|
---|
| 847 | servtab_t *tsep;
|
---|
| 848 |
|
---|
| 849 | if (nsep->se_checked == 0) {
|
---|
| 850 | tsep = nsep;
|
---|
| 851 | if (psep == NULL) {
|
---|
| 852 | sep = nsep->se_next;
|
---|
| 853 | nsep = sep;
|
---|
| 854 | } else {
|
---|
| 855 | nsep = nsep->se_next;
|
---|
| 856 | psep->se_next = nsep;
|
---|
| 857 | }
|
---|
| 858 | freeconfig (tsep);
|
---|
| 859 | } else {
|
---|
| 860 | nsep->se_checked = 0;
|
---|
| 861 | psep = nsep;
|
---|
| 862 | nsep = nsep->se_next;
|
---|
| 863 | }
|
---|
| 864 | }
|
---|
| 865 |
|
---|
| 866 | return (sep);
|
---|
| 867 | }
|
---|
| 868 |
|
---|
| 869 | #define Block_Using_Signals(m) do { sigemptyset(&m); \
|
---|
| 870 | sigaddset(&m, SIGCHLD); \
|
---|
| 871 | sigaddset(&m, SIGHUP); \
|
---|
| 872 | sigaddset(&m, SIGALRM); \
|
---|
| 873 | sigprocmask(SIG_BLOCK, &m, NULL); \
|
---|
| 874 | } while(0)
|
---|
| 875 |
|
---|
| 876 |
|
---|
| 877 | static servtab_t *enter (servtab_t *cp)
|
---|
| 878 | {
|
---|
| 879 | servtab_t *sep;
|
---|
| 880 | sigset_t omask;
|
---|
| 881 |
|
---|
| 882 | sep = new_servtab();
|
---|
| 883 | *sep = *cp;
|
---|
| 884 | sep->se_fd = -1;
|
---|
| 885 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 886 | sep->se_rpcprog = -1;
|
---|
| 887 | #endif
|
---|
| 888 | Block_Using_Signals(omask);
|
---|
| 889 | sep->se_next = servtab;
|
---|
| 890 | servtab = sep;
|
---|
| 891 | sigprocmask(SIG_UNBLOCK, &omask, NULL);
|
---|
| 892 | return (sep);
|
---|
| 893 | }
|
---|
| 894 |
|
---|
| 895 | static int matchconf (servtab_t *old, servtab_t *new)
|
---|
| 896 | {
|
---|
| 897 | if (strcmp (old->se_service, new->se_service) != 0)
|
---|
| 898 | return (0);
|
---|
| 899 |
|
---|
| 900 | if (strcmp (old->se_hostaddr, new->se_hostaddr) != 0)
|
---|
| 901 | return (0);
|
---|
| 902 |
|
---|
| 903 | if (strcmp (old->se_proto, new->se_proto) != 0)
|
---|
| 904 | return (0);
|
---|
| 905 |
|
---|
| 906 | /*
|
---|
| 907 | * If the new servtab is bound to a specific address, check that the
|
---|
| 908 | * old servtab is bound to the same entry. If the new service is not
|
---|
| 909 | * bound to a specific address then the check of se_hostaddr above
|
---|
| 910 | * is sufficient.
|
---|
| 911 | */
|
---|
| 912 |
|
---|
| 913 | if (old->se_family == AF_INET && new->se_family == AF_INET &&
|
---|
| 914 | memcmp (&old->se_ctrladdr_in.sin_addr,
|
---|
| 915 | &new->se_ctrladdr_in.sin_addr,
|
---|
| 916 | sizeof (new->se_ctrladdr_in.sin_addr)) != 0)
|
---|
| 917 | return (0);
|
---|
| 918 |
|
---|
| 919 | #ifdef CONFIG_FEATURE_IPV6
|
---|
| 920 | if (old->se_family == AF_INET6 && new->se_family == AF_INET6 &&
|
---|
| 921 | memcmp (&old->se_ctrladdr_in6.sin6_addr,
|
---|
| 922 | &new->se_ctrladdr_in6.sin6_addr,
|
---|
| 923 | sizeof (new->se_ctrladdr_in6.sin6_addr)) != 0)
|
---|
| 924 | return (0);
|
---|
| 925 | #endif
|
---|
| 926 | return (1);
|
---|
| 927 | }
|
---|
| 928 |
|
---|
| 929 | static void config (int sig ATTRIBUTE_UNUSED)
|
---|
| 930 | {
|
---|
| 931 | servtab_t *sep, *cp, **sepp;
|
---|
| 932 | sigset_t omask;
|
---|
| 933 | int add;
|
---|
| 934 | size_t n;
|
---|
| 935 | char protoname[10];
|
---|
| 936 |
|
---|
| 937 | if (!setconfig ()) {
|
---|
| 938 | syslog (LOG_ERR, "%s: %m", CONFIG);
|
---|
| 939 | return;
|
---|
| 940 | }
|
---|
| 941 | for (sep = servtab; sep; sep = sep->se_next)
|
---|
| 942 | sep->se_checked = 0;
|
---|
| 943 | cp = getconfigent ();
|
---|
| 944 | while (cp != NULL) {
|
---|
| 945 | for (sep = servtab; sep; sep = sep->se_next)
|
---|
| 946 | if (matchconf (sep, cp))
|
---|
| 947 | break;
|
---|
| 948 | add = 0;
|
---|
| 949 | if (sep != 0) {
|
---|
| 950 | int i;
|
---|
| 951 |
|
---|
| 952 | #define SWAP(type, a, b) do {type c=(type)a; a=(type)b; b=(type)c;} while (0)
|
---|
| 953 |
|
---|
| 954 | Block_Using_Signals(omask);
|
---|
| 955 | /*
|
---|
| 956 | * sep->se_wait may be holding the pid of a daemon
|
---|
| 957 | * that we're waiting for. If so, don't overwrite
|
---|
| 958 | * it unless the config file explicitly says don't
|
---|
| 959 | * wait.
|
---|
| 960 | */
|
---|
| 961 | if (
|
---|
| 962 | #ifdef INETD_FEATURE_ENABLED
|
---|
| 963 | cp->se_bi == 0 &&
|
---|
| 964 | #endif
|
---|
| 965 | (sep->se_wait == 1 || cp->se_wait == 0))
|
---|
| 966 | sep->se_wait = cp->se_wait;
|
---|
| 967 | SWAP (int, cp->se_max, sep->se_max);
|
---|
| 968 | SWAP (char *, sep->se_user, cp->se_user);
|
---|
| 969 | SWAP (char *, sep->se_group, cp->se_group);
|
---|
| 970 | SWAP (char *, sep->se_server, cp->se_server);
|
---|
| 971 | for (i = 0; i < MAXARGV; i++)
|
---|
| 972 | SWAP (char *, sep->se_argv[i], cp->se_argv[i]);
|
---|
| 973 | #undef SWAP
|
---|
| 974 |
|
---|
| 975 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 976 | if (isrpcservice (sep))
|
---|
| 977 | unregister_rpc (sep);
|
---|
| 978 | sep->se_rpcversl = cp->se_rpcversl;
|
---|
| 979 | sep->se_rpcversh = cp->se_rpcversh;
|
---|
| 980 | #endif
|
---|
| 981 | sigprocmask(SIG_UNBLOCK, &omask, NULL);
|
---|
| 982 | freeconfig (cp);
|
---|
| 983 | add = 1;
|
---|
| 984 | } else {
|
---|
| 985 | sep = enter (cp);
|
---|
| 986 | }
|
---|
| 987 | sep->se_checked = 1;
|
---|
| 988 |
|
---|
| 989 | switch (sep->se_family) {
|
---|
| 990 | case AF_UNIX:
|
---|
| 991 | if (sep->se_fd != -1)
|
---|
| 992 | break;
|
---|
| 993 | (void) unlink (sep->se_service);
|
---|
| 994 | n = strlen (sep->se_service);
|
---|
| 995 | if (n > sizeof sep->se_ctrladdr_un.sun_path - 1)
|
---|
| 996 | n = sizeof sep->se_ctrladdr_un.sun_path - 1;
|
---|
| 997 | safe_strncpy (sep->se_ctrladdr_un.sun_path, sep->se_service, n + 1);
|
---|
| 998 | sep->se_ctrladdr_un.sun_family = AF_UNIX;
|
---|
| 999 | sep->se_ctrladdr_size = n + sizeof sep->se_ctrladdr_un.sun_family;
|
---|
| 1000 | setup (sep);
|
---|
| 1001 | break;
|
---|
| 1002 | case AF_INET:
|
---|
| 1003 | sep->se_ctrladdr_in.sin_family = AF_INET;
|
---|
| 1004 | /* se_ctrladdr_in was set in getconfigent */
|
---|
| 1005 | sep->se_ctrladdr_size = sizeof sep->se_ctrladdr_in;
|
---|
| 1006 |
|
---|
| 1007 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 1008 | if (isrpcservice (sep)) {
|
---|
| 1009 | struct rpcent *rp;
|
---|
| 1010 |
|
---|
| 1011 | sep->se_rpcprog = atoi (sep->se_service);
|
---|
| 1012 | if (sep->se_rpcprog == 0) {
|
---|
| 1013 | rp = getrpcbyname (sep->se_service);
|
---|
| 1014 | if (rp == 0) {
|
---|
| 1015 | syslog (LOG_ERR, "%s: unknown rpc service", sep->se_service);
|
---|
| 1016 | goto serv_unknown;
|
---|
| 1017 | }
|
---|
| 1018 | sep->se_rpcprog = rp->r_number;
|
---|
| 1019 | }
|
---|
| 1020 | if (sep->se_fd == -1)
|
---|
| 1021 | setup (sep);
|
---|
| 1022 | if (sep->se_fd != -1)
|
---|
| 1023 | register_rpc (sep);
|
---|
| 1024 | } else
|
---|
| 1025 | #endif
|
---|
| 1026 | {
|
---|
| 1027 | u_short port = htons (atoi (sep->se_service));
|
---|
| 1028 |
|
---|
| 1029 | if (!port) {
|
---|
| 1030 | /*XXX*/ strncpy (protoname, sep->se_proto, sizeof (protoname));
|
---|
| 1031 | if (isdigit (protoname[strlen (protoname) - 1]))
|
---|
| 1032 | protoname[strlen (protoname) - 1] = '\0';
|
---|
| 1033 | sp = getservbyname (sep->se_service, protoname);
|
---|
| 1034 | if (sp == 0) {
|
---|
| 1035 | syslog (LOG_ERR,
|
---|
| 1036 | "%s/%s: unknown service", sep->se_service, sep->se_proto);
|
---|
| 1037 | goto serv_unknown;
|
---|
| 1038 | }
|
---|
| 1039 | port = sp->s_port;
|
---|
| 1040 | }
|
---|
| 1041 | if (port != sep->se_ctrladdr_in.sin_port) {
|
---|
| 1042 | sep->se_ctrladdr_in.sin_port = port;
|
---|
| 1043 | if (sep->se_fd != -1) {
|
---|
| 1044 | FD_CLR (sep->se_fd, &allsock);
|
---|
| 1045 | nsock--;
|
---|
| 1046 | (void) close (sep->se_fd);
|
---|
| 1047 | }
|
---|
| 1048 | sep->se_fd = -1;
|
---|
| 1049 | }
|
---|
| 1050 | if (sep->se_fd == -1)
|
---|
| 1051 | setup (sep);
|
---|
| 1052 | }
|
---|
| 1053 | break;
|
---|
| 1054 | #ifdef CONFIG_FEATURE_IPV6
|
---|
| 1055 | case AF_INET6:
|
---|
| 1056 | sep->se_ctrladdr_in6.sin6_family = AF_INET6;
|
---|
| 1057 | /* se_ctrladdr_in was set in getconfigent */
|
---|
| 1058 | sep->se_ctrladdr_size = sizeof sep->se_ctrladdr_in6;
|
---|
| 1059 |
|
---|
| 1060 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 1061 | if (isrpcservice (sep)) {
|
---|
| 1062 | struct rpcent *rp;
|
---|
| 1063 |
|
---|
| 1064 | sep->se_rpcprog = atoi (sep->se_service);
|
---|
| 1065 | if (sep->se_rpcprog == 0) {
|
---|
| 1066 | rp = getrpcbyname (sep->se_service);
|
---|
| 1067 | if (rp == 0) {
|
---|
| 1068 | syslog (LOG_ERR, "%s: unknown rpc service", sep->se_service);
|
---|
| 1069 | goto serv_unknown;
|
---|
| 1070 | }
|
---|
| 1071 | sep->se_rpcprog = rp->r_number;
|
---|
| 1072 | }
|
---|
| 1073 | if (sep->se_fd == -1)
|
---|
| 1074 | setup (sep);
|
---|
| 1075 | if (sep->se_fd != -1)
|
---|
| 1076 | register_rpc (sep);
|
---|
| 1077 | } else
|
---|
| 1078 | #endif
|
---|
| 1079 | {
|
---|
| 1080 | u_short port = htons (atoi (sep->se_service));
|
---|
| 1081 |
|
---|
| 1082 | if (!port) {
|
---|
| 1083 | /*XXX*/ strncpy (protoname, sep->se_proto, sizeof (protoname));
|
---|
| 1084 | if (isdigit (protoname[strlen (protoname) - 1]))
|
---|
| 1085 | protoname[strlen (protoname) - 1] = '\0';
|
---|
| 1086 | sp = getservbyname (sep->se_service, protoname);
|
---|
| 1087 | if (sp == 0) {
|
---|
| 1088 | syslog (LOG_ERR,
|
---|
| 1089 | "%s/%s: unknown service", sep->se_service, sep->se_proto);
|
---|
| 1090 | goto serv_unknown;
|
---|
| 1091 | }
|
---|
| 1092 | port = sp->s_port;
|
---|
| 1093 | }
|
---|
| 1094 | if (port != sep->se_ctrladdr_in6.sin6_port) {
|
---|
| 1095 | sep->se_ctrladdr_in6.sin6_port = port;
|
---|
| 1096 | if (sep->se_fd != -1) {
|
---|
| 1097 | FD_CLR (sep->se_fd, &allsock);
|
---|
| 1098 | nsock--;
|
---|
| 1099 | (void) close (sep->se_fd);
|
---|
| 1100 | }
|
---|
| 1101 | sep->se_fd = -1;
|
---|
| 1102 | }
|
---|
| 1103 | if (sep->se_fd == -1)
|
---|
| 1104 | setup (sep);
|
---|
| 1105 | }
|
---|
| 1106 | break;
|
---|
| 1107 | #endif /* CONFIG_FEATURE_IPV6 */
|
---|
| 1108 | }
|
---|
| 1109 | serv_unknown:
|
---|
| 1110 | if (cp->se_next != NULL) {
|
---|
| 1111 | servtab_t *tmp = cp;
|
---|
| 1112 |
|
---|
| 1113 | cp = cp->se_next;
|
---|
| 1114 | free (tmp);
|
---|
| 1115 | } else {
|
---|
| 1116 | free (cp);
|
---|
| 1117 | cp = getconfigent ();
|
---|
| 1118 | }
|
---|
| 1119 | }
|
---|
| 1120 | endconfig ();
|
---|
| 1121 | /*
|
---|
| 1122 | * Purge anything not looked at above.
|
---|
| 1123 | */
|
---|
| 1124 | Block_Using_Signals(omask);
|
---|
| 1125 | sepp = &servtab;
|
---|
| 1126 | while ((sep = *sepp)) {
|
---|
| 1127 | if (sep->se_checked) {
|
---|
| 1128 | sepp = &sep->se_next;
|
---|
| 1129 | continue;
|
---|
| 1130 | }
|
---|
| 1131 | *sepp = sep->se_next;
|
---|
| 1132 | if (sep->se_fd != -1) {
|
---|
| 1133 | FD_CLR (sep->se_fd, &allsock);
|
---|
| 1134 | nsock--;
|
---|
| 1135 | (void) close (sep->se_fd);
|
---|
| 1136 | }
|
---|
| 1137 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 1138 | if (isrpcservice (sep))
|
---|
| 1139 | unregister_rpc (sep);
|
---|
| 1140 | #endif
|
---|
| 1141 | if (sep->se_family == AF_UNIX)
|
---|
| 1142 | (void) unlink (sep->se_service);
|
---|
| 1143 | freeconfig (sep);
|
---|
| 1144 | free (sep);
|
---|
| 1145 | }
|
---|
| 1146 | sigprocmask(SIG_UNBLOCK, &omask, NULL);
|
---|
| 1147 | }
|
---|
| 1148 |
|
---|
| 1149 |
|
---|
| 1150 | static void reapchild (int sig ATTRIBUTE_UNUSED)
|
---|
| 1151 | {
|
---|
| 1152 | pid_t pid;
|
---|
| 1153 | int save_errno = errno, status;
|
---|
| 1154 | servtab_t *sep;
|
---|
| 1155 |
|
---|
| 1156 | for (;;) {
|
---|
| 1157 | pid = wait3 (&status, WNOHANG, NULL);
|
---|
| 1158 | if (pid <= 0)
|
---|
| 1159 | break;
|
---|
| 1160 | for (sep = servtab; sep; sep = sep->se_next)
|
---|
| 1161 | if (sep->se_wait == pid) {
|
---|
| 1162 | if (WIFEXITED (status) && WEXITSTATUS (status))
|
---|
| 1163 | syslog (LOG_WARNING,
|
---|
| 1164 | "%s: exit status 0x%x",
|
---|
| 1165 | sep->se_server, WEXITSTATUS (status));
|
---|
| 1166 | else if (WIFSIGNALED (status))
|
---|
| 1167 | syslog (LOG_WARNING,
|
---|
| 1168 | "%s: exit signal 0x%x", sep->se_server, WTERMSIG (status));
|
---|
| 1169 | sep->se_wait = 1;
|
---|
| 1170 | FD_SET (sep->se_fd, &allsock);
|
---|
| 1171 | nsock++;
|
---|
| 1172 | }
|
---|
| 1173 | }
|
---|
| 1174 | errno = save_errno;
|
---|
| 1175 | }
|
---|
| 1176 |
|
---|
| 1177 | static void retry (int sig ATTRIBUTE_UNUSED)
|
---|
| 1178 | {
|
---|
| 1179 | servtab_t *sep;
|
---|
| 1180 |
|
---|
| 1181 | timingout = 0;
|
---|
| 1182 | for (sep = servtab; sep; sep = sep->se_next) {
|
---|
| 1183 | if (sep->se_fd == -1) {
|
---|
| 1184 | switch (sep->se_family) {
|
---|
| 1185 | case AF_UNIX:
|
---|
| 1186 | case AF_INET:
|
---|
| 1187 | #ifdef CONFIG_FEATURE_IPV6
|
---|
| 1188 | case AF_INET6:
|
---|
| 1189 | #endif
|
---|
| 1190 | setup (sep);
|
---|
| 1191 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 1192 | if (sep->se_fd != -1 && isrpcservice (sep))
|
---|
| 1193 | register_rpc (sep);
|
---|
| 1194 | #endif
|
---|
| 1195 | break;
|
---|
| 1196 | }
|
---|
| 1197 | }
|
---|
| 1198 | }
|
---|
| 1199 | }
|
---|
| 1200 |
|
---|
| 1201 | static void goaway (int sig ATTRIBUTE_UNUSED)
|
---|
| 1202 | {
|
---|
| 1203 | servtab_t *sep;
|
---|
| 1204 |
|
---|
| 1205 | /* XXX signal race walking sep list */
|
---|
| 1206 | for (sep = servtab; sep; sep = sep->se_next) {
|
---|
| 1207 | if (sep->se_fd == -1)
|
---|
| 1208 | continue;
|
---|
| 1209 |
|
---|
| 1210 | switch (sep->se_family) {
|
---|
| 1211 | case AF_UNIX:
|
---|
| 1212 | (void) unlink (sep->se_service);
|
---|
| 1213 | break;
|
---|
| 1214 | case AF_INET:
|
---|
| 1215 | #ifdef CONFIG_FEATURE_IPV6
|
---|
| 1216 | case AF_INET6:
|
---|
| 1217 | #endif
|
---|
| 1218 | #ifdef CONFIG_FEATURE_INETD_RPC
|
---|
| 1219 | if (sep->se_wait == 1 && isrpcservice (sep))
|
---|
| 1220 | unregister_rpc (sep); /* XXX signal race */
|
---|
| 1221 | #endif
|
---|
| 1222 | break;
|
---|
| 1223 | }
|
---|
| 1224 | (void) close (sep->se_fd);
|
---|
| 1225 | }
|
---|
| 1226 | (void) unlink (_PATH_INETDPID);
|
---|
| 1227 | exit (0);
|
---|
| 1228 | }
|
---|
| 1229 |
|
---|
| 1230 |
|
---|
| 1231 | #ifdef INETD_SETPROCTITLE
|
---|
| 1232 | static char **Argv;
|
---|
| 1233 | static char *LastArg;
|
---|
| 1234 |
|
---|
| 1235 | static void
|
---|
| 1236 | inetd_setproctitle (char *a, int s)
|
---|
| 1237 | {
|
---|
| 1238 | socklen_t size;
|
---|
| 1239 | char *cp;
|
---|
| 1240 | struct sockaddr_in prt_sin;
|
---|
| 1241 | char buf[80];
|
---|
| 1242 |
|
---|
| 1243 | cp = Argv[0];
|
---|
| 1244 | size = sizeof (prt_sin);
|
---|
| 1245 | (void) snprintf (buf, sizeof buf, "-%s", a);
|
---|
| 1246 | if (getpeername (s, (struct sockaddr *) &prt_sin, &size) == 0) {
|
---|
| 1247 | char *sa = inet_ntoa (prt_sin.sin_addr);
|
---|
| 1248 |
|
---|
| 1249 | buf[sizeof (buf) - 1 - strlen (sa) - 3] = '\0';
|
---|
| 1250 | strcat (buf, " [");
|
---|
| 1251 | strcat (buf, sa);
|
---|
| 1252 | strcat (buf, "]");
|
---|
| 1253 | }
|
---|
| 1254 | strncpy (cp, buf, LastArg - cp);
|
---|
| 1255 | cp += strlen (cp);
|
---|
| 1256 | while (cp < LastArg)
|
---|
| 1257 | *cp++ = ' ';
|
---|
| 1258 | }
|
---|
| 1259 | #endif
|
---|
| 1260 |
|
---|
| 1261 |
|
---|
| 1262 | int
|
---|
| 1263 | inetd_main (int argc, char *argv[])
|
---|
| 1264 | {
|
---|
| 1265 | servtab_t *sep;
|
---|
| 1266 | struct passwd *pwd;
|
---|
| 1267 | struct group *grp = NULL;
|
---|
| 1268 | int tmpint;
|
---|
| 1269 | struct sigaction sa, sapipe;
|
---|
| 1270 | int opt;
|
---|
| 1271 | pid_t pid;
|
---|
| 1272 | char buf[50];
|
---|
| 1273 | char *stoomany;
|
---|
| 1274 | sigset_t omask, wait_mask;
|
---|
| 1275 |
|
---|
| 1276 | #ifdef INETD_SETPROCTITLE
|
---|
| 1277 | extern char **environ;
|
---|
| 1278 | char **envp = environ;
|
---|
| 1279 |
|
---|
| 1280 | Argv = argv;
|
---|
| 1281 | if (envp == 0 || *envp == 0)
|
---|
| 1282 | envp = argv;
|
---|
| 1283 | while (*envp)
|
---|
| 1284 | envp++;
|
---|
| 1285 | LastArg = envp[-1] + strlen (envp[-1]);
|
---|
| 1286 | #endif
|
---|
| 1287 |
|
---|
| 1288 | openlog (bb_applet_name, LOG_PID | LOG_NOWAIT, LOG_DAEMON);
|
---|
| 1289 |
|
---|
| 1290 | opt = bb_getopt_ulflags (argc, argv, "R:f", &stoomany);
|
---|
| 1291 | if(opt & 1) {
|
---|
| 1292 | char *e;
|
---|
| 1293 |
|
---|
| 1294 | toomany = strtoul (stoomany, &e, 0);
|
---|
| 1295 | if (!(toomany >= 0 && *e == '\0')) {
|
---|
| 1296 | toomany = TOOMANY;
|
---|
| 1297 | syslog (LOG_ERR, "-R %s: bad value for service invocation rate", stoomany);
|
---|
| 1298 | }
|
---|
| 1299 | }
|
---|
| 1300 | argc -= optind;
|
---|
| 1301 | argv += optind;
|
---|
| 1302 |
|
---|
| 1303 | uid = getuid ();
|
---|
| 1304 | if (uid != 0)
|
---|
| 1305 | CONFIG = NULL;
|
---|
| 1306 | if (argc > 0)
|
---|
| 1307 | CONFIG = argv[0];
|
---|
| 1308 | if (CONFIG == NULL)
|
---|
| 1309 | bb_error_msg_and_die ("non-root must specify a config file");
|
---|
| 1310 |
|
---|
| 1311 | if (!(opt & 2)) {
|
---|
| 1312 | #ifdef BB_NOMMU
|
---|
| 1313 | /* reexec for vfork() do continue parent */
|
---|
| 1314 | vfork_daemon_rexec (0, 0, argc, argv, "-f");
|
---|
| 1315 | #else
|
---|
| 1316 | bb_xdaemon (0, 0);
|
---|
| 1317 | #endif
|
---|
| 1318 | } else {
|
---|
| 1319 | setsid ();
|
---|
| 1320 | }
|
---|
| 1321 |
|
---|
| 1322 | if (uid == 0) {
|
---|
| 1323 | gid_t gid = getgid ();
|
---|
| 1324 |
|
---|
| 1325 | /* If run by hand, ensure groups vector gets trashed */
|
---|
| 1326 | setgroups (1, &gid);
|
---|
| 1327 | }
|
---|
| 1328 |
|
---|
| 1329 | {
|
---|
| 1330 | FILE *fp;
|
---|
| 1331 |
|
---|
| 1332 | if ((fp = fopen (_PATH_INETDPID, "w")) != NULL) {
|
---|
| 1333 | fprintf (fp, "%u\n", getpid ());
|
---|
| 1334 | (void) fclose (fp);
|
---|
| 1335 | }
|
---|
| 1336 | }
|
---|
| 1337 |
|
---|
| 1338 | if (getrlimit (RLIMIT_NOFILE, &rlim_ofile) < 0) {
|
---|
| 1339 | syslog (LOG_ERR, "getrlimit: %m");
|
---|
| 1340 | } else {
|
---|
| 1341 | rlim_ofile_cur = rlim_ofile.rlim_cur;
|
---|
| 1342 | if (rlim_ofile_cur == RLIM_INFINITY) /* ! */
|
---|
| 1343 | rlim_ofile_cur = OPEN_MAX;
|
---|
| 1344 | }
|
---|
| 1345 |
|
---|
| 1346 | memset ((char *) &sa, 0, sizeof (sa));
|
---|
| 1347 | sigemptyset (&sa.sa_mask);
|
---|
| 1348 | sigaddset (&sa.sa_mask, SIGALRM);
|
---|
| 1349 | sigaddset (&sa.sa_mask, SIGCHLD);
|
---|
| 1350 | sigaddset (&sa.sa_mask, SIGHUP);
|
---|
| 1351 | sa.sa_handler = retry;
|
---|
| 1352 | sigaction (SIGALRM, &sa, NULL);
|
---|
| 1353 | /* doconfig(); */
|
---|
| 1354 | config (SIGHUP);
|
---|
| 1355 | sa.sa_handler = config;
|
---|
| 1356 | sigaction (SIGHUP, &sa, NULL);
|
---|
| 1357 | sa.sa_handler = reapchild;
|
---|
| 1358 | sigaction (SIGCHLD, &sa, NULL);
|
---|
| 1359 | sa.sa_handler = goaway;
|
---|
| 1360 | sigaction (SIGTERM, &sa, NULL);
|
---|
| 1361 | sa.sa_handler = goaway;
|
---|
| 1362 | sigaction (SIGINT, &sa, NULL);
|
---|
| 1363 | sa.sa_handler = SIG_IGN;
|
---|
| 1364 | sigaction (SIGPIPE, &sa, &sapipe);
|
---|
| 1365 | memset(&wait_mask, 0, sizeof(wait_mask));
|
---|
| 1366 | {
|
---|
| 1367 | /* space for daemons to overwrite environment for ps */
|
---|
| 1368 | #define DUMMYSIZE 100
|
---|
| 1369 | char dummy[DUMMYSIZE];
|
---|
| 1370 |
|
---|
| 1371 | (void) memset (dummy, 'x', DUMMYSIZE - 1);
|
---|
| 1372 | dummy[DUMMYSIZE - 1] = '\0';
|
---|
| 1373 |
|
---|
| 1374 | (void) setenv ("inetd_dummy", dummy, 1);
|
---|
| 1375 | }
|
---|
| 1376 |
|
---|
| 1377 | for (;;) {
|
---|
| 1378 | int n, ctrl = -1;
|
---|
| 1379 | fd_set readable;
|
---|
| 1380 |
|
---|
| 1381 | if (nsock == 0) {
|
---|
| 1382 | Block_Using_Signals(omask);
|
---|
| 1383 | while (nsock == 0)
|
---|
| 1384 | sigsuspend (&wait_mask);
|
---|
| 1385 | sigprocmask(SIG_UNBLOCK, &omask, NULL);
|
---|
| 1386 | }
|
---|
| 1387 |
|
---|
| 1388 | readable = allsock;
|
---|
| 1389 | if ((n = select (maxsock + 1, &readable, NULL, NULL, NULL)) <= 0) {
|
---|
| 1390 | if (n < 0 && errno != EINTR) {
|
---|
| 1391 | syslog (LOG_WARNING, "select: %m");
|
---|
| 1392 | sleep (1);
|
---|
| 1393 | }
|
---|
| 1394 | continue;
|
---|
| 1395 | }
|
---|
| 1396 | for (sep = servtab; n && sep; sep = sep->se_next)
|
---|
| 1397 | if (sep->se_fd != -1 && FD_ISSET (sep->se_fd, &readable)) {
|
---|
| 1398 | n--;
|
---|
| 1399 | if (!sep->se_wait && sep->se_socktype == SOCK_STREAM) {
|
---|
| 1400 | ctrl = accept (sep->se_fd, NULL, NULL);
|
---|
| 1401 | if (ctrl < 0) {
|
---|
| 1402 | if (errno == EINTR)
|
---|
| 1403 | continue;
|
---|
| 1404 | syslog (LOG_WARNING, "accept (for %s): %m", sep->se_service);
|
---|
| 1405 | continue;
|
---|
| 1406 | }
|
---|
| 1407 | if (sep->se_family == AF_INET && sep->se_socktype == SOCK_STREAM) {
|
---|
| 1408 | struct sockaddr_in peer;
|
---|
| 1409 | socklen_t plen = sizeof (peer);
|
---|
| 1410 |
|
---|
| 1411 | if (getpeername (ctrl, (struct sockaddr *) &peer, &plen) < 0) {
|
---|
| 1412 | syslog (LOG_WARNING, "could not getpeername");
|
---|
| 1413 | close (ctrl);
|
---|
| 1414 | continue;
|
---|
| 1415 | }
|
---|
| 1416 | if (ntohs (peer.sin_port) == 20) {
|
---|
| 1417 | /* XXX ftp bounce */
|
---|
| 1418 | close (ctrl);
|
---|
| 1419 | continue;
|
---|
| 1420 | }
|
---|
| 1421 | }
|
---|
| 1422 | } else
|
---|
| 1423 | ctrl = sep->se_fd;
|
---|
| 1424 | Block_Using_Signals(omask);
|
---|
| 1425 | pid = 0;
|
---|
| 1426 | #ifdef INETD_FEATURE_ENABLED
|
---|
| 1427 | if (sep->se_bi == 0 || sep->se_bi->bi_fork)
|
---|
| 1428 | #endif
|
---|
| 1429 | {
|
---|
| 1430 | if (sep->se_count++ == 0)
|
---|
| 1431 | (void) gettimeofday (&sep->se_time, NULL);
|
---|
| 1432 | else if (toomany > 0 && sep->se_count >= sep->se_max) {
|
---|
| 1433 | struct timeval now;
|
---|
| 1434 |
|
---|
| 1435 | (void) gettimeofday (&now, NULL);
|
---|
| 1436 | if (now.tv_sec - sep->se_time.tv_sec > CNT_INTVL) {
|
---|
| 1437 | sep->se_time = now;
|
---|
| 1438 | sep->se_count = 1;
|
---|
| 1439 | } else {
|
---|
| 1440 | if (!sep->se_wait && sep->se_socktype == SOCK_STREAM)
|
---|
| 1441 | close (ctrl);
|
---|
| 1442 | if (sep->se_family == AF_INET &&
|
---|
| 1443 | ntohs (sep->se_ctrladdr_in.sin_port) >= IPPORT_RESERVED) {
|
---|
| 1444 | /*
|
---|
| 1445 | * Cannot close it -- there are
|
---|
| 1446 | * thieves on the system.
|
---|
| 1447 | * Simply ignore the connection.
|
---|
| 1448 | */
|
---|
| 1449 | --sep->se_count;
|
---|
| 1450 | continue;
|
---|
| 1451 | }
|
---|
| 1452 | syslog (LOG_ERR,
|
---|
| 1453 | "%s/%s server failing (looping), service terminated",
|
---|
| 1454 | sep->se_service, sep->se_proto);
|
---|
| 1455 | if (!sep->se_wait && sep->se_socktype == SOCK_STREAM)
|
---|
| 1456 | close (ctrl);
|
---|
| 1457 | FD_CLR (sep->se_fd, &allsock);
|
---|
| 1458 | (void) close (sep->se_fd);
|
---|
| 1459 | sep->se_fd = -1;
|
---|
| 1460 | sep->se_count = 0;
|
---|
| 1461 | nsock--;
|
---|
| 1462 | sigprocmask(SIG_UNBLOCK, &omask, NULL);
|
---|
| 1463 | if (!timingout) {
|
---|
| 1464 | timingout = 1;
|
---|
| 1465 | alarm (RETRYTIME);
|
---|
| 1466 | }
|
---|
| 1467 | continue;
|
---|
| 1468 | }
|
---|
| 1469 | }
|
---|
| 1470 | pid = fork ();
|
---|
| 1471 | }
|
---|
| 1472 | if (pid < 0) {
|
---|
| 1473 | syslog (LOG_ERR, "fork: %m");
|
---|
| 1474 | if (!sep->se_wait && sep->se_socktype == SOCK_STREAM)
|
---|
| 1475 | close (ctrl);
|
---|
| 1476 | sigprocmask(SIG_UNBLOCK, &omask, NULL);
|
---|
| 1477 | sleep (1);
|
---|
| 1478 | continue;
|
---|
| 1479 | }
|
---|
| 1480 | if (pid && sep->se_wait) {
|
---|
| 1481 | sep->se_wait = pid;
|
---|
| 1482 | FD_CLR (sep->se_fd, &allsock);
|
---|
| 1483 | nsock--;
|
---|
| 1484 | }
|
---|
| 1485 | sigprocmask(SIG_UNBLOCK, &omask, NULL);
|
---|
| 1486 | if (pid == 0) {
|
---|
| 1487 | #ifdef INETD_FEATURE_ENABLED
|
---|
| 1488 | if (sep->se_bi) {
|
---|
| 1489 | (*sep->se_bi->bi_fn) (ctrl, sep);
|
---|
| 1490 | } else
|
---|
| 1491 | #endif
|
---|
| 1492 | {
|
---|
| 1493 | if ((pwd = getpwnam (sep->se_user)) == NULL) {
|
---|
| 1494 | syslog (LOG_ERR, "getpwnam: %s: No such user", sep->se_user);
|
---|
| 1495 | if (sep->se_socktype != SOCK_STREAM)
|
---|
| 1496 | recv (0, buf, sizeof (buf), 0);
|
---|
| 1497 | _exit (1);
|
---|
| 1498 | }
|
---|
| 1499 | if (setsid () < 0)
|
---|
| 1500 | syslog (LOG_ERR, "%s: setsid: %m", sep->se_service);
|
---|
| 1501 | if (sep->se_group && (grp = getgrnam (sep->se_group)) == NULL) {
|
---|
| 1502 | syslog (LOG_ERR, "getgrnam: %s: No such group", sep->se_group);
|
---|
| 1503 | if (sep->se_socktype != SOCK_STREAM)
|
---|
| 1504 | recv (0, buf, sizeof (buf), 0);
|
---|
| 1505 | _exit (1);
|
---|
| 1506 | }
|
---|
| 1507 | if (uid != 0) {
|
---|
| 1508 | /* a user running private inetd */
|
---|
| 1509 | if (uid != pwd->pw_uid)
|
---|
| 1510 | _exit (1);
|
---|
| 1511 | } else if (pwd->pw_uid) {
|
---|
| 1512 | if (sep->se_group) {
|
---|
| 1513 | pwd->pw_gid = grp->gr_gid;
|
---|
| 1514 | }
|
---|
| 1515 | xsetgid ((gid_t) pwd->pw_gid);
|
---|
| 1516 | initgroups (pwd->pw_name, pwd->pw_gid);
|
---|
| 1517 | xsetuid((uid_t) pwd->pw_uid);
|
---|
| 1518 | } else if (sep->se_group) {
|
---|
| 1519 | xsetgid(grp->gr_gid);
|
---|
| 1520 | setgroups (1, &grp->gr_gid);
|
---|
| 1521 | }
|
---|
| 1522 | dup2 (ctrl, 0);
|
---|
| 1523 | close (ctrl);
|
---|
| 1524 | dup2 (0, 1);
|
---|
| 1525 | dup2 (0, 2);
|
---|
| 1526 | if (rlim_ofile.rlim_cur != rlim_ofile_cur)
|
---|
| 1527 | if (setrlimit (RLIMIT_NOFILE, &rlim_ofile) < 0)
|
---|
| 1528 | syslog (LOG_ERR, "setrlimit: %m");
|
---|
| 1529 | closelog ();
|
---|
| 1530 | for (tmpint = rlim_ofile_cur - 1; --tmpint > 2;)
|
---|
| 1531 | (void) close (tmpint);
|
---|
| 1532 | sigaction (SIGPIPE, &sapipe, NULL);
|
---|
| 1533 | execv (sep->se_server, sep->se_argv);
|
---|
| 1534 | if (sep->se_socktype != SOCK_STREAM)
|
---|
| 1535 | recv (0, buf, sizeof (buf), 0);
|
---|
| 1536 | syslog (LOG_ERR, "execv %s: %m", sep->se_server);
|
---|
| 1537 | _exit (1);
|
---|
| 1538 | }
|
---|
| 1539 | }
|
---|
| 1540 | if (!sep->se_wait && sep->se_socktype == SOCK_STREAM)
|
---|
| 1541 | close (ctrl);
|
---|
| 1542 | }
|
---|
| 1543 | }
|
---|
| 1544 | }
|
---|
| 1545 |
|
---|
| 1546 | /*
|
---|
| 1547 | * Internet services provided internally by inetd:
|
---|
| 1548 | */
|
---|
| 1549 | #define BUFSIZE 4096
|
---|
| 1550 |
|
---|
| 1551 | #if defined(CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_ECHO) || \
|
---|
| 1552 | defined(CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_CHARGEN) || \
|
---|
| 1553 | defined(CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DAYTIME)
|
---|
| 1554 | static int dg_badinput (struct sockaddr_in *dg_sin)
|
---|
| 1555 | {
|
---|
| 1556 | if (ntohs (dg_sin->sin_port) < IPPORT_RESERVED)
|
---|
| 1557 | return (1);
|
---|
| 1558 | if (dg_sin->sin_addr.s_addr == htonl (INADDR_BROADCAST))
|
---|
| 1559 | return (1);
|
---|
| 1560 | /* XXX compare against broadcast addresses in SIOCGIFCONF list? */
|
---|
| 1561 | return (0);
|
---|
| 1562 | }
|
---|
| 1563 | #endif
|
---|
| 1564 |
|
---|
| 1565 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_ECHO
|
---|
| 1566 | /* Echo service -- echo data back */
|
---|
| 1567 | /* ARGSUSED */
|
---|
| 1568 | static void
|
---|
| 1569 | echo_stream (int s, servtab_t *sep)
|
---|
| 1570 | {
|
---|
| 1571 | char buffer[BUFSIZE];
|
---|
| 1572 | int i;
|
---|
| 1573 |
|
---|
| 1574 | inetd_setproctitle (sep->se_service, s);
|
---|
| 1575 | while ((i = read (s, buffer, sizeof (buffer))) > 0 &&
|
---|
| 1576 | write (s, buffer, i) > 0);
|
---|
| 1577 | exit (0);
|
---|
| 1578 | }
|
---|
| 1579 |
|
---|
| 1580 | /* Echo service -- echo data back */
|
---|
| 1581 | /* ARGSUSED */
|
---|
| 1582 | static void
|
---|
| 1583 | echo_dg (int s, servtab_t *sep ATTRIBUTE_UNUSED)
|
---|
| 1584 | {
|
---|
| 1585 | char buffer[BUFSIZE];
|
---|
| 1586 | int i;
|
---|
| 1587 | socklen_t size;
|
---|
| 1588 | /* struct sockaddr_storage ss; */
|
---|
| 1589 | struct sockaddr sa;
|
---|
| 1590 |
|
---|
| 1591 | size = sizeof (sa);
|
---|
| 1592 | if ((i = recvfrom (s, buffer, sizeof (buffer), 0, &sa, &size)) < 0)
|
---|
| 1593 | return;
|
---|
| 1594 | if (dg_badinput ((struct sockaddr_in *) &sa))
|
---|
| 1595 | return;
|
---|
| 1596 | (void) sendto (s, buffer, i, 0, &sa, sizeof (sa));
|
---|
| 1597 | }
|
---|
| 1598 | #endif /* CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_ECHO */
|
---|
| 1599 |
|
---|
| 1600 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DISCARD
|
---|
| 1601 | /* Discard service -- ignore data */
|
---|
| 1602 | /* ARGSUSED */
|
---|
| 1603 | static void
|
---|
| 1604 | discard_stream (int s, servtab_t *sep)
|
---|
| 1605 | {
|
---|
| 1606 | char buffer[BUFSIZE];
|
---|
| 1607 |
|
---|
| 1608 | inetd_setproctitle (sep->se_service, s);
|
---|
| 1609 | while ((errno = 0, read (s, buffer, sizeof (buffer)) > 0) ||
|
---|
| 1610 | errno == EINTR);
|
---|
| 1611 | exit (0);
|
---|
| 1612 | }
|
---|
| 1613 |
|
---|
| 1614 | /* Discard service -- ignore data */
|
---|
| 1615 | /* ARGSUSED */
|
---|
| 1616 | static void
|
---|
| 1617 | discard_dg (int s, servtab_t *sep ATTRIBUTE_UNUSED)
|
---|
| 1618 | {
|
---|
| 1619 | char buffer[BUFSIZE];
|
---|
| 1620 |
|
---|
| 1621 | (void) read (s, buffer, sizeof (buffer));
|
---|
| 1622 | }
|
---|
| 1623 | #endif /* CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DISCARD */
|
---|
| 1624 |
|
---|
| 1625 |
|
---|
| 1626 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_CHARGEN
|
---|
| 1627 | #define LINESIZ 72
|
---|
| 1628 | static char ring[128];
|
---|
| 1629 | static char *endring;
|
---|
| 1630 |
|
---|
| 1631 | static void
|
---|
| 1632 | initring (void)
|
---|
| 1633 | {
|
---|
| 1634 | int i;
|
---|
| 1635 |
|
---|
| 1636 | endring = ring;
|
---|
| 1637 |
|
---|
| 1638 | for (i = 0; i <= 128; ++i)
|
---|
| 1639 | if (isprint (i))
|
---|
| 1640 | *endring++ = i;
|
---|
| 1641 | }
|
---|
| 1642 |
|
---|
| 1643 | /* Character generator */
|
---|
| 1644 | /* ARGSUSED */
|
---|
| 1645 | static void
|
---|
| 1646 | chargen_stream (int s, servtab_t *sep)
|
---|
| 1647 | {
|
---|
| 1648 | char *rs;
|
---|
| 1649 | int len;
|
---|
| 1650 | char text[LINESIZ + 2];
|
---|
| 1651 |
|
---|
| 1652 | inetd_setproctitle (sep->se_service, s);
|
---|
| 1653 |
|
---|
| 1654 | if (!endring) {
|
---|
| 1655 | initring ();
|
---|
| 1656 | rs = ring;
|
---|
| 1657 | }
|
---|
| 1658 |
|
---|
| 1659 | text[LINESIZ] = '\r';
|
---|
| 1660 | text[LINESIZ + 1] = '\n';
|
---|
| 1661 | for (rs = ring;;) {
|
---|
| 1662 | if ((len = endring - rs) >= LINESIZ)
|
---|
| 1663 | memmove (text, rs, LINESIZ);
|
---|
| 1664 | else {
|
---|
| 1665 | memmove (text, rs, len);
|
---|
| 1666 | memmove (text + len, ring, LINESIZ - len);
|
---|
| 1667 | }
|
---|
| 1668 | if (++rs == endring)
|
---|
| 1669 | rs = ring;
|
---|
| 1670 | if (write (s, text, sizeof (text)) != sizeof (text))
|
---|
| 1671 | break;
|
---|
| 1672 | }
|
---|
| 1673 | exit (0);
|
---|
| 1674 | }
|
---|
| 1675 |
|
---|
| 1676 | /* Character generator */
|
---|
| 1677 | /* ARGSUSED */
|
---|
| 1678 | static void
|
---|
| 1679 | chargen_dg (int s, servtab_t *sep ATTRIBUTE_UNUSED)
|
---|
| 1680 | {
|
---|
| 1681 | /* struct sockaddr_storage ss; */
|
---|
| 1682 | struct sockaddr sa;
|
---|
| 1683 | static char *rs;
|
---|
| 1684 | int len;
|
---|
| 1685 | char text[LINESIZ + 2];
|
---|
| 1686 | socklen_t size;
|
---|
| 1687 |
|
---|
| 1688 | if (endring == 0) {
|
---|
| 1689 | initring ();
|
---|
| 1690 | rs = ring;
|
---|
| 1691 | }
|
---|
| 1692 |
|
---|
| 1693 | size = sizeof (sa);
|
---|
| 1694 | if (recvfrom (s, text, sizeof (text), 0, &sa, &size) < 0)
|
---|
| 1695 | return;
|
---|
| 1696 | if (dg_badinput ((struct sockaddr_in *) &sa))
|
---|
| 1697 | return;
|
---|
| 1698 |
|
---|
| 1699 | if ((len = endring - rs) >= LINESIZ)
|
---|
| 1700 | memmove (text, rs, LINESIZ);
|
---|
| 1701 | else {
|
---|
| 1702 | memmove (text, rs, len);
|
---|
| 1703 | memmove (text + len, ring, LINESIZ - len);
|
---|
| 1704 | }
|
---|
| 1705 | if (++rs == endring)
|
---|
| 1706 | rs = ring;
|
---|
| 1707 | text[LINESIZ] = '\r';
|
---|
| 1708 | text[LINESIZ + 1] = '\n';
|
---|
| 1709 | (void) sendto (s, text, sizeof (text), 0, &sa, sizeof (sa));
|
---|
| 1710 | }
|
---|
| 1711 | #endif /* CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_CHARGEN */
|
---|
| 1712 |
|
---|
| 1713 |
|
---|
| 1714 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_TIME
|
---|
| 1715 | /*
|
---|
| 1716 | * Return a machine readable date and time, in the form of the
|
---|
| 1717 | * number of seconds since midnight, Jan 1, 1900. Since gettimeofday
|
---|
| 1718 | * returns the number of seconds since midnight, Jan 1, 1970,
|
---|
| 1719 | * we must add 2208988800 seconds to this figure to make up for
|
---|
| 1720 | * some seventy years Bell Labs was asleep.
|
---|
| 1721 | */
|
---|
| 1722 |
|
---|
| 1723 | static u_int machtime (void)
|
---|
| 1724 | {
|
---|
| 1725 | struct timeval tv;
|
---|
| 1726 |
|
---|
| 1727 | if (gettimeofday (&tv, NULL) < 0) {
|
---|
| 1728 | fprintf (stderr, "Unable to get time of day\n");
|
---|
| 1729 | return (0L);
|
---|
| 1730 | }
|
---|
| 1731 | return (htonl ((u_int) tv.tv_sec + 2208988800UL));
|
---|
| 1732 | }
|
---|
| 1733 |
|
---|
| 1734 | /* ARGSUSED */
|
---|
| 1735 | static void
|
---|
| 1736 | machtime_stream (int s, servtab_t *sep ATTRIBUTE_UNUSED)
|
---|
| 1737 | {
|
---|
| 1738 | u_int result;
|
---|
| 1739 |
|
---|
| 1740 | result = machtime ();
|
---|
| 1741 | (void) write (s, (char *) &result, sizeof (result));
|
---|
| 1742 | }
|
---|
| 1743 |
|
---|
| 1744 | /* ARGSUSED */
|
---|
| 1745 | static void
|
---|
| 1746 | machtime_dg (int s, servtab_t *sep ATTRIBUTE_UNUSED)
|
---|
| 1747 | {
|
---|
| 1748 | u_int result;
|
---|
| 1749 | /* struct sockaddr_storage ss; */
|
---|
| 1750 | struct sockaddr sa;
|
---|
| 1751 | struct sockaddr_in *dg_sin;
|
---|
| 1752 | socklen_t size;
|
---|
| 1753 |
|
---|
| 1754 | size = sizeof (sa);
|
---|
| 1755 | if (recvfrom (s, (char *) &result, sizeof (result), 0, &sa, &size) < 0)
|
---|
| 1756 | return;
|
---|
| 1757 | /* if (dg_badinput((struct sockaddr *)&ss)) */
|
---|
| 1758 | dg_sin = (struct sockaddr_in *) &sa;
|
---|
| 1759 | if (dg_sin->sin_addr.s_addr == htonl (INADDR_BROADCAST) ||
|
---|
| 1760 | ntohs (dg_sin->sin_port) < IPPORT_RESERVED / 2)
|
---|
| 1761 | return;
|
---|
| 1762 | result = machtime ();
|
---|
| 1763 | (void) sendto (s, (char *) &result, sizeof (result), 0, &sa, sizeof (sa));
|
---|
| 1764 | }
|
---|
| 1765 | #endif /* CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_TIME */
|
---|
| 1766 |
|
---|
| 1767 |
|
---|
| 1768 | #ifdef CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DAYTIME
|
---|
| 1769 | /* Return human-readable time of day */
|
---|
| 1770 | /* ARGSUSED */
|
---|
| 1771 | static void daytime_stream (int s, servtab_t *sep ATTRIBUTE_UNUSED)
|
---|
| 1772 | {
|
---|
| 1773 | char buffer[256];
|
---|
| 1774 | time_t t;
|
---|
| 1775 |
|
---|
| 1776 | t = time (NULL);
|
---|
| 1777 |
|
---|
| 1778 | (void) sprintf (buffer, "%.24s\r\n", ctime (&t));
|
---|
| 1779 | (void) write (s, buffer, strlen (buffer));
|
---|
| 1780 | }
|
---|
| 1781 |
|
---|
| 1782 | /* Return human-readable time of day */
|
---|
| 1783 | /* ARGSUSED */
|
---|
| 1784 | void
|
---|
| 1785 | daytime_dg (int s, servtab_t *sep ATTRIBUTE_UNUSED)
|
---|
| 1786 | {
|
---|
| 1787 | char buffer[256];
|
---|
| 1788 | time_t t;
|
---|
| 1789 | /* struct sockaddr_storage ss; */
|
---|
| 1790 | struct sockaddr sa;
|
---|
| 1791 | socklen_t size;
|
---|
| 1792 |
|
---|
| 1793 | t = time ((time_t *) 0);
|
---|
| 1794 |
|
---|
| 1795 | size = sizeof (sa);
|
---|
| 1796 | if (recvfrom (s, buffer, sizeof (buffer), 0, &sa, &size) < 0)
|
---|
| 1797 | return;
|
---|
| 1798 | if (dg_badinput ((struct sockaddr_in *) &sa))
|
---|
| 1799 | return;
|
---|
| 1800 | (void) sprintf (buffer, "%.24s\r\n", ctime (&t));
|
---|
| 1801 | (void) sendto (s, buffer, strlen (buffer), 0, &sa, sizeof (sa));
|
---|
| 1802 | }
|
---|
| 1803 | #endif /* CONFIG_FEATURE_INETD_SUPPORT_BUILTIN_DAYTIME */
|
---|
| 1804 | /* vi: set sw=4 ts=4: */
|
---|