1 /* 2 * ntpd.c - main program for the fixed point NTP daemon 3 */ 4 5 #ifdef HAVE_CONFIG_H 6 # include <config.h> 7 #endif 8 9 #include "ntp_machine.h" 10 #include "ntpd.h" 11 #include "ntp_io.h" 12 #include "ntp_stdlib.h" 13 #include <ntp_random.h> 14 15 #include "ntp_config.h" 16 #include "ntp_syslog.h" 17 #include "ntp_assert.h" 18 #include "isc/error.h" 19 #include "isc/strerror.h" 20 #include "isc/formatcheck.h" 21 #include "iosignal.h" 22 23 #ifdef SIM 24 # include "ntpsim.h" 25 #endif 26 27 #include "ntp_libopts.h" 28 #include "ntpd-opts.h" 29 30 /* there's a short treatise below what the thread stuff is for. 31 * [Bug 2954] enable the threading warm-up only for Linux. 32 */ 33 #if defined(HAVE_PTHREADS) && HAVE_PTHREADS && !defined(NO_THREADS) 34 # ifdef HAVE_PTHREAD_H 35 # include <pthread.h> 36 # endif 37 # if defined(linux) 38 # define NEED_PTHREAD_WARMUP 39 # endif 40 #endif 41 42 #ifdef HAVE_UNISTD_H 43 # include <unistd.h> 44 #endif 45 #ifdef HAVE_SYS_STAT_H 46 # include <sys/stat.h> 47 #endif 48 #include <stdio.h> 49 #ifdef HAVE_SYS_PARAM_H 50 # include <sys/param.h> 51 #endif 52 #ifdef HAVE_SYS_SIGNAL_H 53 # include <sys/signal.h> 54 #else 55 # include <signal.h> 56 #endif 57 #ifdef HAVE_SYS_IOCTL_H 58 # include <sys/ioctl.h> 59 #endif /* HAVE_SYS_IOCTL_H */ 60 #if defined(HAVE_RTPRIO) 61 # ifdef HAVE_SYS_LOCK_H 62 # include <sys/lock.h> 63 # endif 64 # include <sys/rtprio.h> 65 #else 66 # ifdef HAVE_PLOCK 67 # ifdef HAVE_SYS_LOCK_H 68 # include <sys/lock.h> 69 # endif 70 # endif 71 #endif 72 #if defined(HAVE_SCHED_SETSCHEDULER) 73 # ifdef HAVE_SCHED_H 74 # include <sched.h> 75 # else 76 # ifdef HAVE_SYS_SCHED_H 77 # include <sys/sched.h> 78 # endif 79 # endif 80 #endif 81 #if defined(HAVE_SYS_MMAN_H) 82 # include <sys/mman.h> 83 #endif 84 85 #ifdef HAVE_TERMIOS_H 86 # include <termios.h> 87 #endif 88 89 #ifdef SYS_DOMAINOS 90 # include <apollo/base.h> 91 #endif /* SYS_DOMAINOS */ 92 93 94 #include "recvbuff.h" 95 #include "ntp_cmdargs.h" 96 97 #if 0 /* HMS: I don't think we need this. 961223 */ 98 #ifdef LOCK_PROCESS 99 # ifdef SYS_SOLARIS 100 # include <sys/mman.h> 101 # else 102 # include <sys/lock.h> 103 # endif 104 #endif 105 #endif 106 107 #ifdef _AIX 108 # include <ulimit.h> 109 #endif /* _AIX */ 110 111 #ifdef SCO5_CLOCK 112 # include <sys/ci/ciioctl.h> 113 #endif 114 115 #ifdef HAVE_DROPROOT 116 # include <ctype.h> 117 # include <grp.h> 118 # include <pwd.h> 119 #ifdef HAVE_LINUX_CAPABILITIES 120 # include <sys/capability.h> 121 # include <sys/prctl.h> 122 #endif /* HAVE_LINUX_CAPABILITIES */ 123 #if defined(HAVE_PRIV_H) && defined(HAVE_SOLARIS_PRIVS) 124 # include <priv.h> 125 #endif /* HAVE_PRIV_H */ 126 #endif /* HAVE_DROPROOT */ 127 128 #if defined (LIBSECCOMP) && (KERN_SECCOMP) 129 /* # include <sys/types.h> */ 130 # include <sys/resource.h> 131 # include <seccomp.h> 132 #endif /* LIBSECCOMP and KERN_SECCOMP */ 133 134 #ifdef HAVE_DNSREGISTRATION 135 # include <dns_sd.h> 136 DNSServiceRef mdns; 137 #endif 138 139 #ifdef HAVE_SETPGRP_0 140 # define ntp_setpgrp(x, y) setpgrp() 141 #else 142 # define ntp_setpgrp(x, y) setpgrp(x, y) 143 #endif 144 145 #ifdef HAVE_SOLARIS_PRIVS 146 # define LOWPRIVS "basic,sys_time,net_privaddr,proc_setid,!proc_info,!proc_session,!proc_exec" 147 static priv_set_t *lowprivs = NULL; 148 static priv_set_t *highprivs = NULL; 149 #endif /* HAVE_SOLARIS_PRIVS */ 150 /* 151 * Scheduling priority we run at 152 */ 153 #define NTPD_PRIO (-12) 154 155 int priority_done = 2; /* 0 - Set priority */ 156 /* 1 - priority is OK where it is */ 157 /* 2 - Don't set priority */ 158 /* 1 and 2 are pretty much the same */ 159 160 int listen_to_virtual_ips = TRUE; 161 162 /* 163 * No-fork flag. If set, we do not become a background daemon. 164 */ 165 int nofork; /* Fork by default */ 166 167 #ifdef HAVE_DNSREGISTRATION 168 /* 169 * mDNS registration flag. If set, we attempt to register with the mDNS system, but only 170 * after we have synched the first time. If the attempt fails, then try again once per 171 * minute for up to 5 times. After all, we may be starting before mDNS. 172 */ 173 int mdnsreg = FALSE; 174 int mdnstries = 5; 175 #endif /* HAVE_DNSREGISTRATION */ 176 177 #ifdef HAVE_DROPROOT 178 int droproot; 179 int root_dropped; 180 char *user; /* User to switch to */ 181 char *group; /* group to switch to */ 182 const char *chrootdir; /* directory to chroot to */ 183 uid_t sw_uid; 184 gid_t sw_gid; 185 char *endp; 186 struct group *gr; 187 struct passwd *pw; 188 #endif /* HAVE_DROPROOT */ 189 190 #ifdef HAVE_WORKING_FORK 191 int waitsync_fd_to_close = -1; /* -w/--wait-sync */ 192 #endif 193 194 /* 195 * Version declaration 196 */ 197 extern const char *Version; 198 199 char const *progname; 200 201 int was_alarmed; 202 203 #ifdef DECL_SYSCALL 204 /* 205 * We put this here, since the argument profile is syscall-specific 206 */ 207 extern int syscall (int, ...); 208 #endif /* DECL_SYSCALL */ 209 210 211 #if !defined(SIM) && defined(SIGDIE1) 212 static volatile int signalled = 0; 213 static volatile int signo = 0; 214 215 /* In an ideal world, 'finish_safe()' would declared as noreturn... */ 216 static void finish_safe (int); 217 static RETSIGTYPE finish (int); 218 #endif 219 220 #if !defined(SIM) && defined(HAVE_WORKING_FORK) 221 static int wait_child_sync_if (int, long); 222 #endif 223 224 #if !defined(SIM) && !defined(SYS_WINNT) 225 # ifdef DEBUG 226 static RETSIGTYPE moredebug (int); 227 static RETSIGTYPE lessdebug (int); 228 # else /* !DEBUG follows */ 229 static RETSIGTYPE no_debug (int); 230 # endif /* !DEBUG */ 231 #endif /* !SIM && !SYS_WINNT */ 232 233 #ifndef WORK_FORK 234 int saved_argc; 235 char ** saved_argv; 236 #endif 237 238 #ifndef SIM 239 int ntpdmain (int, char **); 240 static void set_process_priority (void); 241 static void assertion_failed (const char *, int, 242 isc_assertiontype_t, 243 const char *) 244 __attribute__ ((__noreturn__)); 245 static void library_fatal_error (const char *, int, 246 const char *, va_list) 247 ISC_FORMAT_PRINTF(3, 0); 248 static void library_unexpected_error(const char *, int, 249 const char *, va_list) 250 ISC_FORMAT_PRINTF(3, 0); 251 #endif /* !SIM */ 252 253 254 /* Bug2332 unearthed a problem in the interaction of reduced user 255 * privileges, the limits on memory usage and some versions of the 256 * pthread library on Linux systems. The 'pthread_cancel()' function and 257 * likely some others need to track the stack of the thread involved, 258 * and uses a function that comes from GCC (--> libgcc_s.so) to do 259 * this. Unfortunately the developers of glibc decided to load the 260 * library on demand, which speeds up program start but can cause 261 * trouble here: Due to all the things NTPD does to limit its resource 262 * usage, this deferred load of libgcc_s does not always work once the 263 * restrictions are in effect. 264 * 265 * One way out of this was attempting a forced link against libgcc_s 266 * when possible because it makes the library available immediately 267 * without deferred load. (The symbol resolution would still be dynamic 268 * and on demand, but the code would already be in the process image.) 269 * 270 * This is a tricky thing to do, since it's not necessary everywhere, 271 * not possible everywhere, has shown to break the build of other 272 * programs in the NTP suite and is now generally frowned upon. 273 * 274 * So we take a different approach here: We creat a worker thread that does 275 * actually nothing except waiting for cancellation and cancel it. If 276 * this is done before all the limitations are put in place, the 277 * machinery is pre-heated and all the runtime stuff should be in place 278 * and useable when needed. 279 * 280 * This uses only the standard pthread API and should work with all 281 * implementations of pthreads. It is not necessary everywhere, but it's 282 * cheap enough to go on nearly unnoticed. 283 * 284 * Addendum: Bug 2954 showed that the assumption that this should work 285 * with all OS is wrong -- at least FreeBSD bombs heavily. 286 */ 287 #ifdef NEED_PTHREAD_WARMUP 288 289 /* simple thread function: sleep until cancelled, just to exercise 290 * thread cancellation. 291 */ 292 static void* 293 my_pthread_warmup_worker( 294 void *thread_args) 295 { 296 (void)thread_args; 297 for (;;) 298 sleep(10); 299 return NULL; 300 } 301 302 /* pre-heat threading: create a thread and cancel it, just to exercise 303 * thread cancellation. 304 */ 305 static void 306 my_pthread_warmup(void) 307 { 308 pthread_t thread; 309 pthread_attr_t thr_attr; 310 int rc; 311 312 pthread_attr_init(&thr_attr); 313 #if defined(HAVE_PTHREAD_ATTR_GETSTACKSIZE) && \ 314 defined(HAVE_PTHREAD_ATTR_SETSTACKSIZE) && \ 315 defined(PTHREAD_STACK_MIN) 316 { 317 size_t ssmin = 32*1024; /* 32kB should be minimum */ 318 if (ssmin < PTHREAD_STACK_MIN) 319 ssmin = PTHREAD_STACK_MIN; 320 rc = pthread_attr_setstacksize(&thr_attr, ssmin); 321 if (0 != rc) 322 msyslog(LOG_ERR, 323 "my_pthread_warmup: pthread_attr_setstacksize() -> %s", 324 strerror(rc)); 325 } 326 #endif 327 rc = pthread_create( 328 &thread, &thr_attr, my_pthread_warmup_worker, NULL); 329 pthread_attr_destroy(&thr_attr); 330 if (0 != rc) { 331 msyslog(LOG_ERR, 332 "my_pthread_warmup: pthread_create() -> %s", 333 strerror(rc)); 334 } else { 335 pthread_cancel(thread); 336 pthread_join(thread, NULL); 337 } 338 } 339 340 #endif /*defined(NEED_PTHREAD_WARMUP)*/ 341 342 #ifdef NEED_EARLY_FORK 343 static void 344 dummy_callback(void) { return; } 345 346 static void 347 fork_nonchroot_worker(void) { 348 getaddrinfo_sometime("localhost", "ntp", NULL, INITIAL_DNS_RETRY, 349 (gai_sometime_callback)&dummy_callback, NULL); 350 } 351 #endif /* NEED_EARLY_FORK */ 352 353 void 354 parse_cmdline_opts( 355 int * pargc, 356 char ***pargv 357 ) 358 { 359 static int parsed; 360 static int optct; 361 362 if (!parsed) 363 optct = ntpOptionProcess(&ntpdOptions, *pargc, *pargv); 364 365 parsed = 1; 366 367 *pargc -= optct; 368 *pargv += optct; 369 } 370 371 372 #ifdef SIM 373 int 374 main( 375 int argc, 376 char *argv[] 377 ) 378 { 379 progname = argv[0]; 380 parse_cmdline_opts(&argc, &argv); 381 #ifdef DEBUG 382 debug = OPT_VALUE_SET_DEBUG_LEVEL; 383 DPRINTF(1, ("%s\n", Version)); 384 #endif 385 386 return ntpsim(argc, argv); 387 } 388 #else /* !SIM follows */ 389 #ifdef NO_MAIN_ALLOWED 390 CALL(ntpd,"ntpd",ntpdmain); 391 #else /* !NO_MAIN_ALLOWED follows */ 392 #ifndef SYS_WINNT 393 int 394 main( 395 int argc, 396 char *argv[] 397 ) 398 { 399 return ntpdmain(argc, argv); 400 } 401 #endif /* !SYS_WINNT */ 402 #endif /* !NO_MAIN_ALLOWED */ 403 #endif /* !SIM */ 404 405 #ifdef _AIX 406 /* 407 * OK. AIX is different than solaris in how it implements plock(). 408 * If you do NOT adjust the stack limit, you will get the MAXIMUM 409 * stack size allocated and PINNED with you program. To check the 410 * value, use ulimit -a. 411 * 412 * To fix this, we create an automatic variable and set our stack limit 413 * to that PLUS 32KB of extra space (we need some headroom). 414 * 415 * This subroutine gets the stack address. 416 * 417 * Grover Davidson and Matt Ladendorf 418 * 419 */ 420 static char * 421 get_aix_stack(void) 422 { 423 char ch; 424 return (&ch); 425 } 426 427 /* 428 * Signal handler for SIGDANGER. 429 */ 430 static void 431 catch_danger(int signo) 432 { 433 msyslog(LOG_INFO, "ntpd: setpgid(): %m"); 434 /* Make the system believe we'll free something, but don't do it! */ 435 return; 436 } 437 #endif /* _AIX */ 438 439 /* 440 * Set the process priority 441 */ 442 #ifndef SIM 443 static void 444 set_process_priority(void) 445 { 446 447 # ifdef DEBUG 448 if (debug > 1) 449 msyslog(LOG_DEBUG, "set_process_priority: %s: priority_done is <%d>", 450 ((priority_done) 451 ? "Leave priority alone" 452 : "Attempt to set priority" 453 ), 454 priority_done); 455 # endif /* DEBUG */ 456 457 # if defined(HAVE_SCHED_SETSCHEDULER) 458 if (!priority_done) { 459 extern int config_priority_override, config_priority; 460 int pmax, pmin; 461 struct sched_param sched; 462 463 pmax = sched_get_priority_max(SCHED_FIFO); 464 sched.sched_priority = pmax; 465 if ( config_priority_override ) { 466 pmin = sched_get_priority_min(SCHED_FIFO); 467 if ( config_priority > pmax ) 468 sched.sched_priority = pmax; 469 else if ( config_priority < pmin ) 470 sched.sched_priority = pmin; 471 else 472 sched.sched_priority = config_priority; 473 } 474 if ( sched_setscheduler(0, SCHED_FIFO, &sched) == -1 ) 475 msyslog(LOG_ERR, "sched_setscheduler(): %m"); 476 else 477 ++priority_done; 478 } 479 # endif /* HAVE_SCHED_SETSCHEDULER */ 480 # ifdef HAVE_RTPRIO 481 # ifdef RTP_SET 482 if (!priority_done) { 483 struct rtprio srtp; 484 485 srtp.type = RTP_PRIO_REALTIME; /* was: RTP_PRIO_NORMAL */ 486 srtp.prio = 0; /* 0 (hi) -> RTP_PRIO_MAX (31,lo) */ 487 488 if (rtprio(RTP_SET, getpid(), &srtp) < 0) 489 msyslog(LOG_ERR, "rtprio() error: %m"); 490 else 491 ++priority_done; 492 } 493 # else /* !RTP_SET follows */ 494 if (!priority_done) { 495 if (rtprio(0, 120) < 0) 496 msyslog(LOG_ERR, "rtprio() error: %m"); 497 else 498 ++priority_done; 499 } 500 # endif /* !RTP_SET */ 501 # endif /* HAVE_RTPRIO */ 502 # if defined(NTPD_PRIO) && NTPD_PRIO != 0 503 # ifdef HAVE_ATT_NICE 504 if (!priority_done) { 505 errno = 0; 506 if (-1 == nice (NTPD_PRIO) && errno != 0) 507 msyslog(LOG_ERR, "nice() error: %m"); 508 else 509 ++priority_done; 510 } 511 # endif /* HAVE_ATT_NICE */ 512 # ifdef HAVE_BSD_NICE 513 if (!priority_done) { 514 if (-1 == setpriority(PRIO_PROCESS, 0, NTPD_PRIO)) 515 msyslog(LOG_ERR, "setpriority() error: %m"); 516 else 517 ++priority_done; 518 } 519 # endif /* HAVE_BSD_NICE */ 520 # endif /* NTPD_PRIO && NTPD_PRIO != 0 */ 521 if (!priority_done) 522 msyslog(LOG_ERR, "set_process_priority: No way found to improve our priority"); 523 } 524 #endif /* !SIM */ 525 526 527 /* 528 * Main program. Initialize us, disconnect us from the tty if necessary, 529 * and loop waiting for I/O and/or timer expiries. 530 */ 531 #ifndef SIM 532 int 533 ntpdmain( 534 int argc, 535 char *argv[] 536 ) 537 { 538 l_fp now; 539 struct recvbuf *rbuf; 540 const char * logfilename; 541 # ifdef HAVE_UMASK 542 mode_t uv; 543 # endif 544 # if defined(HAVE_GETUID) && !defined(MPE) /* MPE lacks the concept of root */ 545 uid_t uid; 546 # endif 547 # if defined(HAVE_WORKING_FORK) 548 long wait_sync = 0; 549 int pipe_fds[2]; 550 int rc; 551 int exit_code; 552 # ifdef _AIX 553 struct sigaction sa; 554 # endif 555 # if !defined(HAVE_SETSID) && !defined (HAVE_SETPGID) && defined(TIOCNOTTY) 556 int fid; 557 # endif 558 # endif /* HAVE_WORKING_FORK*/ 559 # ifdef SCO5_CLOCK 560 int fd; 561 int zero; 562 # endif 563 564 # ifdef NEED_PTHREAD_WARMUP 565 my_pthread_warmup(); 566 # endif 567 568 # ifdef HAVE_UMASK 569 uv = umask(0); 570 if (uv) 571 umask(uv); 572 else 573 umask(022); 574 # endif 575 saved_argc = argc; 576 saved_argv = argv; 577 progname = argv[0]; 578 initializing = TRUE; /* mark that we are initializing */ 579 parse_cmdline_opts(&argc, &argv); 580 # ifdef DEBUG 581 debug = OPT_VALUE_SET_DEBUG_LEVEL; 582 # ifdef HAVE_SETLINEBUF 583 setlinebuf(stdout); 584 # endif 585 # endif 586 587 if (HAVE_OPT(NOFORK) || HAVE_OPT(QUIT) 588 # ifdef DEBUG 589 || debug 590 # endif 591 || HAVE_OPT(SAVECONFIGQUIT)) 592 nofork = TRUE; 593 594 init_logging(progname, NLOG_SYNCMASK, TRUE); 595 /* honor -l/--logfile option to log to a file */ 596 if (HAVE_OPT(LOGFILE)) { 597 logfilename = OPT_ARG(LOGFILE); 598 syslogit = FALSE; 599 change_logfile(logfilename, FALSE); 600 } else { 601 logfilename = NULL; 602 if (nofork) 603 msyslog_term = TRUE; 604 if (HAVE_OPT(SAVECONFIGQUIT)) 605 syslogit = FALSE; 606 } 607 msyslog(LOG_NOTICE, "%s: Starting", Version); 608 609 { 610 int i; 611 char buf[1024]; /* Secret knowledge of msyslog buf length */ 612 char *cp = buf; 613 614 /* Note that every arg has an initial space character */ 615 snprintf(cp, sizeof(buf), "Command line:"); 616 cp += strlen(cp); 617 618 for (i = 0; i < saved_argc ; ++i) { 619 snprintf(cp, sizeof(buf) - (cp - buf), 620 " %s", saved_argv[i]); 621 cp += strlen(cp); 622 } 623 msyslog(LOG_INFO, "%s", buf); 624 } 625 626 /* 627 * Install trap handlers to log errors and assertion failures. 628 * Default handlers print to stderr which doesn't work if detached. 629 */ 630 isc_assertion_setcallback(assertion_failed); 631 isc_error_setfatal(library_fatal_error); 632 isc_error_setunexpected(library_unexpected_error); 633 634 /* MPE lacks the concept of root */ 635 # if defined(HAVE_GETUID) && !defined(MPE) 636 uid = getuid(); 637 if (uid && !HAVE_OPT( SAVECONFIGQUIT )) { 638 msyslog_term = TRUE; 639 msyslog(LOG_ERR, 640 "must be run as root, not uid %ld", (long)uid); 641 exit(1); 642 } 643 # endif 644 645 /* 646 * Enable the Multi-Media Timer for Windows? 647 */ 648 # ifdef SYS_WINNT 649 if (HAVE_OPT( MODIFYMMTIMER )) 650 set_mm_timer(MM_TIMER_HIRES); 651 # endif 652 653 #ifdef HAVE_DNSREGISTRATION 654 /* 655 * Enable mDNS registrations? 656 */ 657 if (HAVE_OPT( MDNS )) { 658 mdnsreg = TRUE; 659 } 660 #endif /* HAVE_DNSREGISTRATION */ 661 662 if (HAVE_OPT( NOVIRTUALIPS )) 663 listen_to_virtual_ips = 0; 664 665 /* 666 * --interface, listen on specified interfaces 667 */ 668 if (HAVE_OPT( INTERFACE )) { 669 int ifacect = STACKCT_OPT( INTERFACE ); 670 const char** ifaces = STACKLST_OPT( INTERFACE ); 671 sockaddr_u addr; 672 673 while (ifacect-- > 0) { 674 add_nic_rule( 675 is_ip_address(*ifaces, AF_UNSPEC, &addr) 676 ? MATCH_IFADDR 677 : MATCH_IFNAME, 678 *ifaces, -1, ACTION_LISTEN); 679 ifaces++; 680 } 681 } 682 683 if (HAVE_OPT( NICE )) 684 priority_done = 0; 685 686 # ifdef HAVE_SCHED_SETSCHEDULER 687 if (HAVE_OPT( PRIORITY )) { 688 config_priority = OPT_VALUE_PRIORITY; 689 config_priority_override = 1; 690 priority_done = 0; 691 } 692 # endif 693 694 # ifdef HAVE_WORKING_FORK 695 /* make sure the FDs are initialised */ 696 pipe_fds[0] = -1; 697 pipe_fds[1] = -1; 698 do { /* 'loop' once */ 699 if (!HAVE_OPT( WAIT_SYNC )) 700 break; 701 wait_sync = OPT_VALUE_WAIT_SYNC; 702 if (wait_sync <= 0) { 703 wait_sync = 0; 704 break; 705 } 706 /* -w requires a fork() even with debug > 0 */ 707 nofork = FALSE; 708 if (pipe(pipe_fds)) { 709 exit_code = (errno) ? errno : -1; 710 msyslog(LOG_ERR, 711 "Pipe creation failed for --wait-sync: %m"); 712 exit(exit_code); 713 } 714 waitsync_fd_to_close = pipe_fds[1]; 715 } while (0); /* 'loop' once */ 716 # endif /* HAVE_WORKING_FORK */ 717 718 init_lib(); 719 # ifdef SYS_WINNT 720 /* 721 * Start interpolation thread, must occur before first 722 * get_systime() 723 */ 724 init_winnt_time(); 725 # endif 726 /* 727 * Initialize random generator and public key pair 728 */ 729 get_systime(&now); 730 731 ntp_srandom((int)(now.l_i * now.l_uf)); 732 733 /* 734 * Detach us from the terminal. May need an #ifndef GIZMO. 735 */ 736 if (!nofork) { 737 738 # ifdef HAVE_WORKING_FORK 739 rc = fork(); 740 if (-1 == rc) { 741 exit_code = (errno) ? errno : -1; 742 msyslog(LOG_ERR, "fork: %m"); 743 exit(exit_code); 744 } 745 if (rc > 0) { 746 /* parent */ 747 exit_code = wait_child_sync_if(pipe_fds[0], 748 wait_sync); 749 exit(exit_code); 750 } 751 752 /* 753 * child/daemon 754 * close all open files excepting waitsync_fd_to_close. 755 * msyslog() unreliable until after init_logging(). 756 */ 757 closelog(); 758 if (syslog_file != NULL) { 759 fclose(syslog_file); 760 syslog_file = NULL; 761 syslogit = TRUE; 762 } 763 close_all_except(waitsync_fd_to_close); 764 INSIST(0 == open("/dev/null", 0) && 1 == dup2(0, 1) \ 765 && 2 == dup2(0, 2)); 766 767 init_logging(progname, 0, TRUE); 768 /* we lost our logfile (if any) daemonizing */ 769 setup_logfile(logfilename); 770 771 # ifdef SYS_DOMAINOS 772 { 773 uid_$t puid; 774 status_$t st; 775 776 proc2_$who_am_i(&puid); 777 proc2_$make_server(&puid, &st); 778 } 779 # endif /* SYS_DOMAINOS */ 780 # ifdef HAVE_SETSID 781 if (setsid() == (pid_t)-1) 782 msyslog(LOG_ERR, "setsid(): %m"); 783 # elif defined(HAVE_SETPGID) 784 if (setpgid(0, 0) == -1) 785 msyslog(LOG_ERR, "setpgid(): %m"); 786 # else /* !HAVE_SETSID && !HAVE_SETPGID follows */ 787 # ifdef TIOCNOTTY 788 fid = open("/dev/tty", 2); 789 if (fid >= 0) { 790 ioctl(fid, (u_long)TIOCNOTTY, NULL); 791 close(fid); 792 } 793 # endif /* TIOCNOTTY */ 794 ntp_setpgrp(0, getpid()); 795 # endif /* !HAVE_SETSID && !HAVE_SETPGID */ 796 # ifdef _AIX 797 /* Don't get killed by low-on-memory signal. */ 798 sa.sa_handler = catch_danger; 799 sigemptyset(&sa.sa_mask); 800 sa.sa_flags = SA_RESTART; 801 sigaction(SIGDANGER, &sa, NULL); 802 # endif /* _AIX */ 803 # endif /* HAVE_WORKING_FORK */ 804 } 805 806 # ifdef SCO5_CLOCK 807 /* 808 * SCO OpenServer's system clock offers much more precise timekeeping 809 * on the base CPU than the other CPUs (for multiprocessor systems), 810 * so we must lock to the base CPU. 811 */ 812 fd = open("/dev/at1", O_RDONLY); 813 if (fd >= 0) { 814 zero = 0; 815 if (ioctl(fd, ACPU_LOCK, &zero) < 0) 816 msyslog(LOG_ERR, "cannot lock to base CPU: %m"); 817 close(fd); 818 } 819 # endif 820 821 /* Setup stack size in preparation for locking pages in memory. */ 822 # if defined(HAVE_MLOCKALL) 823 # ifdef HAVE_SETRLIMIT 824 ntp_rlimit(RLIMIT_STACK, DFLT_RLIMIT_STACK * 4096, 4096, "4k"); 825 # ifdef RLIMIT_MEMLOCK 826 /* 827 * The default RLIMIT_MEMLOCK is very low on Linux systems. 828 * Unless we increase this limit malloc calls are likely to 829 * fail if we drop root privilege. To be useful the value 830 * has to be larger than the largest ntpd resident set size. 831 */ 832 ntp_rlimit(RLIMIT_MEMLOCK, DFLT_RLIMIT_MEMLOCK * 1024 * 1024, 1024 * 1024, "MB"); 833 # endif /* RLIMIT_MEMLOCK */ 834 # endif /* HAVE_SETRLIMIT */ 835 # else /* !HAVE_MLOCKALL follows */ 836 # ifdef HAVE_PLOCK 837 # ifdef PROCLOCK 838 # ifdef _AIX 839 /* 840 * set the stack limit for AIX for plock(). 841 * see get_aix_stack() for more info. 842 */ 843 if (ulimit(SET_STACKLIM, (get_aix_stack() - 8 * 4096)) < 0) 844 msyslog(LOG_ERR, 845 "Cannot adjust stack limit for plock: %m"); 846 # endif /* _AIX */ 847 # endif /* PROCLOCK */ 848 # endif /* HAVE_PLOCK */ 849 # endif /* !HAVE_MLOCKALL */ 850 851 /* 852 * Set up signals we pay attention to locally. 853 */ 854 # ifdef SIGDIE1 855 signal_no_reset(SIGDIE1, finish); 856 signal_no_reset(SIGDIE2, finish); 857 signal_no_reset(SIGDIE3, finish); 858 signal_no_reset(SIGDIE4, finish); 859 # endif 860 # ifdef SIGBUS 861 signal_no_reset(SIGBUS, finish); 862 # endif 863 864 # if !defined(SYS_WINNT) && !defined(VMS) 865 # ifdef DEBUG 866 (void) signal_no_reset(MOREDEBUGSIG, moredebug); 867 (void) signal_no_reset(LESSDEBUGSIG, lessdebug); 868 # else 869 (void) signal_no_reset(MOREDEBUGSIG, no_debug); 870 (void) signal_no_reset(LESSDEBUGSIG, no_debug); 871 # endif /* DEBUG */ 872 # endif /* !SYS_WINNT && !VMS */ 873 874 /* 875 * Set up signals we should never pay attention to. 876 */ 877 # ifdef SIGPIPE 878 signal_no_reset(SIGPIPE, SIG_IGN); 879 # endif 880 881 /* 882 * Call the init_ routines to initialize the data structures. 883 * 884 * Exactly what command-line options are we expecting here? 885 */ 886 INIT_SSL(); 887 init_auth(); 888 init_util(); 889 init_restrict(); 890 init_mon(); 891 init_timer(); 892 init_request(); 893 init_control(); 894 init_peer(); 895 # ifdef REFCLOCK 896 init_refclock(); 897 # endif 898 set_process_priority(); 899 init_proto(); /* Call at high priority */ 900 init_io(); 901 init_loopfilter(); 902 mon_start(MON_ON); /* monitor on by default now */ 903 /* turn off in config if unwanted */ 904 905 /* 906 * Get the configuration. This is done in a separate module 907 * since this will definitely be different for the gizmo board. 908 */ 909 getconfig(argc, argv); 910 911 if (-1 == cur_memlock) { 912 # if defined(HAVE_MLOCKALL) 913 /* 914 * lock the process into memory 915 */ 916 if ( !HAVE_OPT(SAVECONFIGQUIT) 917 # ifdef RLIMIT_MEMLOCK 918 && -1 != DFLT_RLIMIT_MEMLOCK 919 # endif 920 && 0 != mlockall(MCL_CURRENT|MCL_FUTURE)) 921 msyslog(LOG_ERR, "mlockall(): %m"); 922 # else /* !HAVE_MLOCKALL follows */ 923 # ifdef HAVE_PLOCK 924 # ifdef PROCLOCK 925 /* 926 * lock the process into memory 927 */ 928 if (!HAVE_OPT(SAVECONFIGQUIT) && 0 != plock(PROCLOCK)) 929 msyslog(LOG_ERR, "plock(PROCLOCK): %m"); 930 # else /* !PROCLOCK follows */ 931 # ifdef TXTLOCK 932 /* 933 * Lock text into ram 934 */ 935 if (!HAVE_OPT(SAVECONFIGQUIT) && 0 != plock(TXTLOCK)) 936 msyslog(LOG_ERR, "plock(TXTLOCK) error: %m"); 937 # else /* !TXTLOCK follows */ 938 msyslog(LOG_ERR, "plock() - don't know what to lock!"); 939 # endif /* !TXTLOCK */ 940 # endif /* !PROCLOCK */ 941 # endif /* HAVE_PLOCK */ 942 # endif /* !HAVE_MLOCKALL */ 943 } 944 945 loop_config(LOOP_DRIFTINIT, 0); 946 report_event(EVNT_SYSRESTART, NULL, NULL); 947 initializing = FALSE; 948 949 # ifdef HAVE_DROPROOT 950 if (droproot) { 951 952 #ifdef NEED_EARLY_FORK 953 fork_nonchroot_worker(); 954 #endif 955 956 /* Drop super-user privileges and chroot now if the OS supports this */ 957 958 # ifdef HAVE_LINUX_CAPABILITIES 959 /* set flag: keep privileges accross setuid() call (we only really need cap_sys_time): */ 960 if (prctl( PR_SET_KEEPCAPS, 1L, 0L, 0L, 0L ) == -1) { 961 msyslog( LOG_ERR, "prctl( PR_SET_KEEPCAPS, 1L ) failed: %m" ); 962 exit(-1); 963 } 964 # elif HAVE_SOLARIS_PRIVS 965 /* Nothing to do here */ 966 # else 967 /* we need a user to switch to */ 968 if (user == NULL) { 969 msyslog(LOG_ERR, "Need user name to drop root privileges (see -u flag!)" ); 970 exit(-1); 971 } 972 # endif /* HAVE_LINUX_CAPABILITIES || HAVE_SOLARIS_PRIVS */ 973 974 if (user != NULL) { 975 if (isdigit((unsigned char)*user)) { 976 sw_uid = (uid_t)strtoul(user, &endp, 0); 977 if (*endp != '\0') 978 goto getuser; 979 980 if ((pw = getpwuid(sw_uid)) != NULL) { 981 free(user); 982 user = estrdup(pw->pw_name); 983 sw_gid = pw->pw_gid; 984 } else { 985 errno = 0; 986 msyslog(LOG_ERR, "Cannot find user ID %s", user); 987 exit (-1); 988 } 989 990 } else { 991 getuser: 992 errno = 0; 993 if ((pw = getpwnam(user)) != NULL) { 994 sw_uid = pw->pw_uid; 995 sw_gid = pw->pw_gid; 996 } else { 997 if (errno) 998 msyslog(LOG_ERR, "getpwnam(%s) failed: %m", user); 999 else 1000 msyslog(LOG_ERR, "Cannot find user `%s'", user); 1001 exit (-1); 1002 } 1003 } 1004 } 1005 if (group != NULL) { 1006 if (isdigit((unsigned char)*group)) { 1007 sw_gid = (gid_t)strtoul(group, &endp, 0); 1008 if (*endp != '\0') 1009 goto getgroup; 1010 } else { 1011 getgroup: 1012 if ((gr = getgrnam(group)) != NULL) { 1013 sw_gid = gr->gr_gid; 1014 } else { 1015 errno = 0; 1016 msyslog(LOG_ERR, "Cannot find group `%s'", group); 1017 exit (-1); 1018 } 1019 } 1020 } 1021 1022 if (chrootdir ) { 1023 /* make sure cwd is inside the jail: */ 1024 if (chdir(chrootdir)) { 1025 msyslog(LOG_ERR, "Cannot chdir() to `%s': %m", chrootdir); 1026 exit (-1); 1027 } 1028 if (chroot(chrootdir)) { 1029 msyslog(LOG_ERR, "Cannot chroot() to `%s': %m", chrootdir); 1030 exit (-1); 1031 } 1032 if (chdir("/")) { 1033 msyslog(LOG_ERR, "Cannot chdir() to`root after chroot(): %m"); 1034 exit (-1); 1035 } 1036 } 1037 # ifdef HAVE_SOLARIS_PRIVS 1038 if ((lowprivs = priv_str_to_set(LOWPRIVS, ",", NULL)) == NULL) { 1039 msyslog(LOG_ERR, "priv_str_to_set() failed:%m"); 1040 exit(-1); 1041 } 1042 if ((highprivs = priv_allocset()) == NULL) { 1043 msyslog(LOG_ERR, "priv_allocset() failed:%m"); 1044 exit(-1); 1045 } 1046 (void) getppriv(PRIV_PERMITTED, highprivs); 1047 (void) priv_intersect(highprivs, lowprivs); 1048 if (setppriv(PRIV_SET, PRIV_PERMITTED, lowprivs) == -1) { 1049 msyslog(LOG_ERR, "setppriv() failed:%m"); 1050 exit(-1); 1051 } 1052 # endif /* HAVE_SOLARIS_PRIVS */ 1053 if (user && initgroups(user, sw_gid)) { 1054 msyslog(LOG_ERR, "Cannot initgroups() to user `%s': %m", user); 1055 exit (-1); 1056 } 1057 if (group && setgid(sw_gid)) { 1058 msyslog(LOG_ERR, "Cannot setgid() to group `%s': %m", group); 1059 exit (-1); 1060 } 1061 if (group && setegid(sw_gid)) { 1062 msyslog(LOG_ERR, "Cannot setegid() to group `%s': %m", group); 1063 exit (-1); 1064 } 1065 if (group) { 1066 if (0 != setgroups(1, &sw_gid)) { 1067 msyslog(LOG_ERR, "setgroups(1, %d) failed: %m", sw_gid); 1068 exit (-1); 1069 } 1070 } 1071 else if (pw) 1072 if (0 != initgroups(pw->pw_name, pw->pw_gid)) { 1073 msyslog(LOG_ERR, "initgroups(<%s>, %d) filed: %m", pw->pw_name, pw->pw_gid); 1074 exit (-1); 1075 } 1076 if (user && setuid(sw_uid)) { 1077 msyslog(LOG_ERR, "Cannot setuid() to user `%s': %m", user); 1078 exit (-1); 1079 } 1080 if (user && seteuid(sw_uid)) { 1081 msyslog(LOG_ERR, "Cannot seteuid() to user `%s': %m", user); 1082 exit (-1); 1083 } 1084 1085 # if !defined(HAVE_LINUX_CAPABILITIES) && !defined(HAVE_SOLARIS_PRIVS) 1086 /* 1087 * for now assume that the privilege to bind to privileged ports 1088 * is associated with running with uid 0 - should be refined on 1089 * ports that allow binding to NTP_PORT with uid != 0 1090 */ 1091 disable_dynamic_updates |= (sw_uid != 0); /* also notifies routing message listener */ 1092 # endif /* !HAVE_LINUX_CAPABILITIES && !HAVE_SOLARIS_PRIVS */ 1093 1094 if (disable_dynamic_updates && interface_interval) { 1095 interface_interval = 0; 1096 msyslog(LOG_INFO, "running as non-root disables dynamic interface tracking"); 1097 } 1098 1099 # ifdef HAVE_LINUX_CAPABILITIES 1100 { 1101 /* 1102 * We may be running under non-root uid now, but we still hold full root privileges! 1103 * We drop all of them, except for the crucial one or two: cap_sys_time and 1104 * cap_net_bind_service if doing dynamic interface tracking. 1105 */ 1106 cap_t caps; 1107 char *captext; 1108 1109 captext = (0 != interface_interval) 1110 ? "cap_sys_time,cap_net_bind_service=pe" 1111 : "cap_sys_time=pe"; 1112 caps = cap_from_text(captext); 1113 if (!caps) { 1114 msyslog(LOG_ERR, 1115 "cap_from_text(%s) failed: %m", 1116 captext); 1117 exit(-1); 1118 } 1119 if (-1 == cap_set_proc(caps)) { 1120 msyslog(LOG_ERR, 1121 "cap_set_proc() failed to drop root privs: %m"); 1122 exit(-1); 1123 } 1124 cap_free(caps); 1125 } 1126 # endif /* HAVE_LINUX_CAPABILITIES */ 1127 # ifdef HAVE_SOLARIS_PRIVS 1128 if (priv_delset(lowprivs, "proc_setid") == -1) { 1129 msyslog(LOG_ERR, "priv_delset() failed:%m"); 1130 exit(-1); 1131 } 1132 if (setppriv(PRIV_SET, PRIV_PERMITTED, lowprivs) == -1) { 1133 msyslog(LOG_ERR, "setppriv() failed:%m"); 1134 exit(-1); 1135 } 1136 priv_freeset(lowprivs); 1137 priv_freeset(highprivs); 1138 # endif /* HAVE_SOLARIS_PRIVS */ 1139 root_dropped = TRUE; 1140 fork_deferred_worker(); 1141 } /* if (droproot) */ 1142 # endif /* HAVE_DROPROOT */ 1143 1144 /* libssecomp sandboxing */ 1145 #if defined (LIBSECCOMP) && (KERN_SECCOMP) 1146 scmp_filter_ctx ctx; 1147 1148 if ((ctx = seccomp_init(SCMP_ACT_KILL)) < 0) 1149 msyslog(LOG_ERR, "%s: seccomp_init(SCMP_ACT_KILL) failed: %m", __func__); 1150 else { 1151 msyslog(LOG_DEBUG, "%s: seccomp_init(SCMP_ACT_KILL) succeeded", __func__); 1152 } 1153 1154 #ifdef __x86_64__ 1155 int scmp_sc[] = { 1156 SCMP_SYS(adjtimex), 1157 SCMP_SYS(bind), 1158 SCMP_SYS(brk), 1159 SCMP_SYS(chdir), 1160 SCMP_SYS(clock_gettime), 1161 SCMP_SYS(clock_settime), 1162 SCMP_SYS(close), 1163 SCMP_SYS(connect), 1164 SCMP_SYS(exit_group), 1165 SCMP_SYS(fstat), 1166 SCMP_SYS(fsync), 1167 SCMP_SYS(futex), 1168 SCMP_SYS(getitimer), 1169 SCMP_SYS(getsockname), 1170 SCMP_SYS(ioctl), 1171 SCMP_SYS(lseek), 1172 SCMP_SYS(madvise), 1173 SCMP_SYS(mmap), 1174 SCMP_SYS(munmap), 1175 SCMP_SYS(open), 1176 SCMP_SYS(poll), 1177 SCMP_SYS(read), 1178 SCMP_SYS(recvmsg), 1179 SCMP_SYS(rename), 1180 SCMP_SYS(rt_sigaction), 1181 SCMP_SYS(rt_sigprocmask), 1182 SCMP_SYS(rt_sigreturn), 1183 SCMP_SYS(select), 1184 SCMP_SYS(sendto), 1185 SCMP_SYS(setitimer), 1186 SCMP_SYS(setsid), 1187 SCMP_SYS(socket), 1188 SCMP_SYS(stat), 1189 SCMP_SYS(time), 1190 SCMP_SYS(write), 1191 }; 1192 #endif 1193 #ifdef __i386__ 1194 int scmp_sc[] = { 1195 SCMP_SYS(_newselect), 1196 SCMP_SYS(adjtimex), 1197 SCMP_SYS(brk), 1198 SCMP_SYS(chdir), 1199 SCMP_SYS(clock_gettime), 1200 SCMP_SYS(clock_settime), 1201 SCMP_SYS(close), 1202 SCMP_SYS(exit_group), 1203 SCMP_SYS(fsync), 1204 SCMP_SYS(futex), 1205 SCMP_SYS(getitimer), 1206 SCMP_SYS(madvise), 1207 SCMP_SYS(mmap), 1208 SCMP_SYS(mmap2), 1209 SCMP_SYS(munmap), 1210 SCMP_SYS(open), 1211 SCMP_SYS(poll), 1212 SCMP_SYS(read), 1213 SCMP_SYS(rename), 1214 SCMP_SYS(rt_sigaction), 1215 SCMP_SYS(rt_sigprocmask), 1216 SCMP_SYS(select), 1217 SCMP_SYS(setitimer), 1218 SCMP_SYS(setsid), 1219 SCMP_SYS(sigprocmask), 1220 SCMP_SYS(sigreturn), 1221 SCMP_SYS(socketcall), 1222 SCMP_SYS(stat64), 1223 SCMP_SYS(time), 1224 SCMP_SYS(write), 1225 }; 1226 #endif 1227 { 1228 int i; 1229 1230 for (i = 0; i < COUNTOF(scmp_sc); i++) { 1231 if (seccomp_rule_add(ctx, 1232 SCMP_ACT_ALLOW, scmp_sc[i], 0) < 0) { 1233 msyslog(LOG_ERR, 1234 "%s: seccomp_rule_add() failed: %m", 1235 __func__); 1236 } 1237 } 1238 } 1239 1240 if (seccomp_load(ctx) < 0) 1241 msyslog(LOG_ERR, "%s: seccomp_load() failed: %m", 1242 __func__); 1243 else { 1244 msyslog(LOG_DEBUG, "%s: seccomp_load() succeeded", __func__); 1245 } 1246 #endif /* LIBSECCOMP and KERN_SECCOMP */ 1247 1248 # ifdef HAVE_IO_COMPLETION_PORT 1249 1250 for (;;) { 1251 #if !defined(SIM) && defined(SIGDIE1) 1252 if (signalled) 1253 finish_safe(signo); 1254 #endif 1255 GetReceivedBuffers(); 1256 # else /* normal I/O */ 1257 1258 BLOCK_IO_AND_ALARM(); 1259 was_alarmed = FALSE; 1260 1261 for (;;) { 1262 #if !defined(SIM) && defined(SIGDIE1) 1263 if (signalled) 1264 finish_safe(signo); 1265 #endif 1266 if (alarm_flag) { /* alarmed? */ 1267 was_alarmed = TRUE; 1268 alarm_flag = FALSE; 1269 } 1270 1271 /* collect async name/addr results */ 1272 if (!was_alarmed) 1273 harvest_blocking_responses(); 1274 1275 if (!was_alarmed && !has_full_recv_buffer()) { 1276 /* 1277 * Nothing to do. Wait for something. 1278 */ 1279 io_handler(); 1280 } 1281 1282 if (alarm_flag) { /* alarmed? */ 1283 was_alarmed = TRUE; 1284 alarm_flag = FALSE; 1285 } 1286 1287 if (was_alarmed) { 1288 UNBLOCK_IO_AND_ALARM(); 1289 /* 1290 * Out here, signals are unblocked. Call timer routine 1291 * to process expiry. 1292 */ 1293 timer(); 1294 was_alarmed = FALSE; 1295 BLOCK_IO_AND_ALARM(); 1296 } 1297 1298 # endif /* !HAVE_IO_COMPLETION_PORT */ 1299 1300 # ifdef DEBUG_TIMING 1301 { 1302 l_fp pts; 1303 l_fp tsa, tsb; 1304 int bufcount = 0; 1305 1306 get_systime(&pts); 1307 tsa = pts; 1308 # endif 1309 rbuf = get_full_recv_buffer(); 1310 while (rbuf != NULL) { 1311 if (alarm_flag) { 1312 was_alarmed = TRUE; 1313 alarm_flag = FALSE; 1314 } 1315 UNBLOCK_IO_AND_ALARM(); 1316 1317 if (was_alarmed) { 1318 /* avoid timer starvation during lengthy I/O handling */ 1319 timer(); 1320 was_alarmed = FALSE; 1321 } 1322 1323 /* 1324 * Call the data procedure to handle each received 1325 * packet. 1326 */ 1327 if (rbuf->receiver != NULL) { 1328 # ifdef DEBUG_TIMING 1329 l_fp dts = pts; 1330 1331 L_SUB(&dts, &rbuf->recv_time); 1332 DPRINTF(2, ("processing timestamp delta %s (with prec. fuzz)\n", lfptoa(&dts, 9))); 1333 collect_timing(rbuf, "buffer processing delay", 1, &dts); 1334 bufcount++; 1335 # endif 1336 (*rbuf->receiver)(rbuf); 1337 } else { 1338 msyslog(LOG_ERR, "fatal: receive buffer callback NULL"); 1339 abort(); 1340 } 1341 1342 BLOCK_IO_AND_ALARM(); 1343 freerecvbuf(rbuf); 1344 rbuf = get_full_recv_buffer(); 1345 } 1346 # ifdef DEBUG_TIMING 1347 get_systime(&tsb); 1348 L_SUB(&tsb, &tsa); 1349 if (bufcount) { 1350 collect_timing(NULL, "processing", bufcount, &tsb); 1351 DPRINTF(2, ("processing time for %d buffers %s\n", bufcount, lfptoa(&tsb, 9))); 1352 } 1353 } 1354 # endif 1355 1356 /* 1357 * Go around again 1358 */ 1359 1360 # ifdef HAVE_DNSREGISTRATION 1361 if (mdnsreg && (current_time - mdnsreg ) > 60 && mdnstries && sys_leap != LEAP_NOTINSYNC) { 1362 mdnsreg = current_time; 1363 msyslog(LOG_INFO, "Attempting to register mDNS"); 1364 if ( DNSServiceRegister (&mdns, 0, 0, NULL, "_ntp._udp", NULL, NULL, 1365 htons(NTP_PORT), 0, NULL, NULL, NULL) != kDNSServiceErr_NoError ) { 1366 if (!--mdnstries) { 1367 msyslog(LOG_ERR, "Unable to register mDNS, giving up."); 1368 } else { 1369 msyslog(LOG_INFO, "Unable to register mDNS, will try later."); 1370 } 1371 } else { 1372 msyslog(LOG_INFO, "mDNS service registered."); 1373 mdnsreg = FALSE; 1374 } 1375 } 1376 # endif /* HAVE_DNSREGISTRATION */ 1377 1378 } 1379 UNBLOCK_IO_AND_ALARM(); 1380 return 1; 1381 } 1382 #endif /* !SIM */ 1383 1384 1385 #if !defined(SIM) && defined(SIGDIE1) 1386 /* 1387 * finish - exit gracefully 1388 */ 1389 static void 1390 finish_safe( 1391 int sig 1392 ) 1393 { 1394 const char *sig_desc; 1395 1396 sig_desc = NULL; 1397 #ifdef HAVE_STRSIGNAL 1398 sig_desc = strsignal(sig); 1399 #endif 1400 if (sig_desc == NULL) 1401 sig_desc = ""; 1402 msyslog(LOG_NOTICE, "%s exiting on signal %d (%s)", progname, 1403 sig, sig_desc); 1404 /* See Bug 2513 and Bug 2522 re the unlink of PIDFILE */ 1405 # ifdef HAVE_DNSREGISTRATION 1406 if (mdns != NULL) 1407 DNSServiceRefDeallocate(mdns); 1408 # endif 1409 peer_cleanup(); 1410 exit(0); 1411 } 1412 1413 static RETSIGTYPE 1414 finish( 1415 int sig 1416 ) 1417 { 1418 signalled = 1; 1419 signo = sig; 1420 } 1421 1422 #endif /* !SIM && SIGDIE1 */ 1423 1424 1425 #ifndef SIM 1426 /* 1427 * wait_child_sync_if - implements parent side of -w/--wait-sync 1428 */ 1429 # ifdef HAVE_WORKING_FORK 1430 static int 1431 wait_child_sync_if( 1432 int pipe_read_fd, 1433 long wait_sync 1434 ) 1435 { 1436 int rc; 1437 int exit_code; 1438 time_t wait_end_time; 1439 time_t cur_time; 1440 time_t wait_rem; 1441 fd_set readset; 1442 struct timeval wtimeout; 1443 1444 if (0 == wait_sync) 1445 return 0; 1446 1447 /* waitsync_fd_to_close used solely by child */ 1448 close(waitsync_fd_to_close); 1449 wait_end_time = time(NULL) + wait_sync; 1450 do { 1451 cur_time = time(NULL); 1452 wait_rem = (wait_end_time > cur_time) 1453 ? (wait_end_time - cur_time) 1454 : 0; 1455 wtimeout.tv_sec = wait_rem; 1456 wtimeout.tv_usec = 0; 1457 FD_ZERO(&readset); 1458 FD_SET(pipe_read_fd, &readset); 1459 rc = select(pipe_read_fd + 1, &readset, NULL, NULL, 1460 &wtimeout); 1461 if (-1 == rc) { 1462 if (EINTR == errno) 1463 continue; 1464 exit_code = (errno) ? errno : -1; 1465 msyslog(LOG_ERR, 1466 "--wait-sync select failed: %m"); 1467 return exit_code; 1468 } 1469 if (0 == rc) { 1470 /* 1471 * select() indicated a timeout, but in case 1472 * its timeouts are affected by a step of the 1473 * system clock, select() again with a zero 1474 * timeout to confirm. 1475 */ 1476 FD_ZERO(&readset); 1477 FD_SET(pipe_read_fd, &readset); 1478 wtimeout.tv_sec = 0; 1479 wtimeout.tv_usec = 0; 1480 rc = select(pipe_read_fd + 1, &readset, NULL, 1481 NULL, &wtimeout); 1482 if (0 == rc) /* select() timeout */ 1483 break; 1484 else /* readable */ 1485 return 0; 1486 } else /* readable */ 1487 return 0; 1488 } while (wait_rem > 0); 1489 1490 fprintf(stderr, "%s: -w/--wait-sync %ld timed out.\n", 1491 progname, wait_sync); 1492 return ETIMEDOUT; 1493 } 1494 # endif /* HAVE_WORKING_FORK */ 1495 1496 1497 /* 1498 * assertion_failed - Redirect assertion failures to msyslog(). 1499 */ 1500 static void 1501 assertion_failed( 1502 const char *file, 1503 int line, 1504 isc_assertiontype_t type, 1505 const char *cond 1506 ) 1507 { 1508 isc_assertion_setcallback(NULL); /* Avoid recursion */ 1509 1510 msyslog(LOG_ERR, "%s:%d: %s(%s) failed", 1511 file, line, isc_assertion_typetotext(type), cond); 1512 msyslog(LOG_ERR, "exiting (due to assertion failure)"); 1513 1514 #if defined(DEBUG) && defined(SYS_WINNT) 1515 if (debug) 1516 DebugBreak(); 1517 #endif 1518 1519 abort(); 1520 } 1521 1522 1523 /* 1524 * library_fatal_error - Handle fatal errors from our libraries. 1525 */ 1526 static void 1527 library_fatal_error( 1528 const char *file, 1529 int line, 1530 const char *format, 1531 va_list args 1532 ) 1533 { 1534 char errbuf[256]; 1535 1536 isc_error_setfatal(NULL); /* Avoid recursion */ 1537 1538 msyslog(LOG_ERR, "%s:%d: fatal error:", file, line); 1539 vsnprintf(errbuf, sizeof(errbuf), format, args); 1540 msyslog(LOG_ERR, "%s", errbuf); 1541 msyslog(LOG_ERR, "exiting (due to fatal error in library)"); 1542 1543 #if defined(DEBUG) && defined(SYS_WINNT) 1544 if (debug) 1545 DebugBreak(); 1546 #endif 1547 1548 abort(); 1549 } 1550 1551 1552 /* 1553 * library_unexpected_error - Handle non fatal errors from our libraries. 1554 */ 1555 # define MAX_UNEXPECTED_ERRORS 100 1556 int unexpected_error_cnt = 0; 1557 static void 1558 library_unexpected_error( 1559 const char *file, 1560 int line, 1561 const char *format, 1562 va_list args 1563 ) 1564 { 1565 char errbuf[256]; 1566 1567 if (unexpected_error_cnt >= MAX_UNEXPECTED_ERRORS) 1568 return; /* avoid clutter in log */ 1569 1570 msyslog(LOG_ERR, "%s:%d: unexpected error:", file, line); 1571 vsnprintf(errbuf, sizeof(errbuf), format, args); 1572 msyslog(LOG_ERR, "%s", errbuf); 1573 1574 if (++unexpected_error_cnt == MAX_UNEXPECTED_ERRORS) 1575 msyslog(LOG_ERR, "Too many errors. Shutting up."); 1576 1577 } 1578 #endif /* !SIM */ 1579 1580 #if !defined(SIM) && !defined(SYS_WINNT) 1581 # ifdef DEBUG 1582 1583 /* 1584 * moredebug - increase debugging verbosity 1585 */ 1586 static RETSIGTYPE 1587 moredebug( 1588 int sig 1589 ) 1590 { 1591 int saved_errno = errno; 1592 1593 if (debug < 255) 1594 { 1595 debug++; 1596 msyslog(LOG_DEBUG, "debug raised to %d", debug); 1597 } 1598 errno = saved_errno; 1599 } 1600 1601 1602 /* 1603 * lessdebug - decrease debugging verbosity 1604 */ 1605 static RETSIGTYPE 1606 lessdebug( 1607 int sig 1608 ) 1609 { 1610 int saved_errno = errno; 1611 1612 if (debug > 0) 1613 { 1614 debug--; 1615 msyslog(LOG_DEBUG, "debug lowered to %d", debug); 1616 } 1617 errno = saved_errno; 1618 } 1619 1620 # else /* !DEBUG follows */ 1621 1622 1623 /* 1624 * no_debug - We don't do the debug here. 1625 */ 1626 static RETSIGTYPE 1627 no_debug( 1628 int sig 1629 ) 1630 { 1631 int saved_errno = errno; 1632 1633 msyslog(LOG_DEBUG, "ntpd not compiled for debugging (signal %d)", sig); 1634 errno = saved_errno; 1635 } 1636 # endif /* !DEBUG */ 1637 #endif /* !SIM && !SYS_WINNT */ 1638