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