| File: | d/nsmain.c |
| Warning: | line 227, column 9 Duplicate code detected |
| Note: | line 234, column 9 Similar code here |
| Note: | line 251, column 9 Similar code here |
Press '?' to see keyboard shortcuts
Keyboard shortcuts:
| 1 | /* |
| 2 | * The contents of this file are subject to the Mozilla Public License |
| 3 | * Version 1.1 (the "License"); you may not use this file except in |
| 4 | * compliance with the License. You may obtain a copy of the License at |
| 5 | * http://mozilla.org/. |
| 6 | * |
| 7 | * Software distributed under the License is distributed on an "AS IS" |
| 8 | * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See |
| 9 | * the License for the specific language governing rights and limitations |
| 10 | * under the License. |
| 11 | * |
| 12 | * The Original Code is AOLserver Code and related documentation |
| 13 | * distributed by AOL. |
| 14 | * |
| 15 | * The Initial Developer of the Original Code is America Online, |
| 16 | * Inc. Portions created by AOL are Copyright (C) 1999 America Online, |
| 17 | * Inc. All Rights Reserved. |
| 18 | * |
| 19 | * Alternatively, the contents of this file may be used under the terms |
| 20 | * of the GNU General Public License (the "GPL"), in which case the |
| 21 | * provisions of GPL are applicable instead of those above. If you wish |
| 22 | * to allow use of your version of this file only under the terms of the |
| 23 | * GPL and not to allow others to use your version of this file under the |
| 24 | * License, indicate your decision by deleting the provisions above and |
| 25 | * replace them with the notice and other provisions required by the GPL. |
| 26 | * If you do not delete the provisions above, a recipient may use your |
| 27 | * version of this file under either the License or the GPL. |
| 28 | */ |
| 29 | |
| 30 | /* |
| 31 | * nsmain.c -- |
| 32 | * |
| 33 | * NaviServer Ns_Main() startup routine. |
| 34 | */ |
| 35 | |
| 36 | #include "nsd.h" |
| 37 | |
| 38 | /* |
| 39 | * The following structure is used to pass command line args to |
| 40 | * the command interpreter thread. |
| 41 | */ |
| 42 | |
| 43 | typedef struct Args { |
| 44 | char **argv; |
| 45 | int argc; |
| 46 | } Args; |
| 47 | |
| 48 | /* |
| 49 | * This one is used to better track run state |
| 50 | * when looking at the code |
| 51 | */ |
| 52 | |
| 53 | typedef enum { |
| 54 | starting_state, /* == 0 */ |
| 55 | running_state, /* == 1 */ |
| 56 | stopping_state, /* == 2 */ |
| 57 | exiting_state /* == 3 */ |
| 58 | } runState; |
| 59 | |
| 60 | /* |
| 61 | * Local functions defined in this file. |
| 62 | */ |
| 63 | |
| 64 | static Ns_ThreadProc CmdThread; |
| 65 | |
| 66 | static void UsageError(const char *msg, ...) NS_GNUC_NONNULL(1)__attribute__((__nonnull__(1))) NS_GNUC_PRINTF(1, 2)__attribute__((__format__ (__printf__, 1, 2))) __attribute__( (__nonnull__(1))) NS_GNUC_NORETURN__attribute__((__noreturn__)); |
| 67 | static void UsageMsg(int exitCode) NS_GNUC_NORETURN__attribute__((__noreturn__)); |
| 68 | static void StatusMsg(runState state); |
| 69 | static void LogTclVersion(void); |
| 70 | static const char *MakePath(const char *file) NS_GNUC_NONNULL(1)__attribute__((__nonnull__(1))); |
| 71 | static const char *SetCwd(const char *path) NS_GNUC_NONNULL(1)__attribute__((__nonnull__(1))); |
| 72 | |
| 73 | #if defined(STATIC_BUILD) && (STATIC_BUILD == 1) |
| 74 | extern void NsthreadsInit(); |
| 75 | extern void NsdInit(); |
| 76 | #endif |
| 77 | |
| 78 | const char *NS_EMPTY_STRING = ""; |
| 79 | |
| 80 | |
| 81 | /* |
| 82 | *---------------------------------------------------------------------- |
| 83 | * |
| 84 | * Ns_Main -- |
| 85 | * |
| 86 | * The NaviServer startup routine called from main(). Startup is |
| 87 | * somewhat complicated to ensure certain things happen in the |
| 88 | * correct order. |
| 89 | * |
| 90 | * Results: |
| 91 | * Returns 0 to main() on final exit. |
| 92 | * |
| 93 | * Side effects: |
| 94 | * Many - read comments below. |
| 95 | * |
| 96 | *---------------------------------------------------------------------- |
| 97 | */ |
| 98 | |
| 99 | int |
| 100 | Ns_Main(int argc, char *const* argv, Ns_ServerInitProc *initProc) |
| 101 | { |
| 102 | Args cmd; |
| 103 | int sig, optionIndex; |
| 104 | Ns_Time timeout; |
| 105 | Ns_Set *set; |
| 106 | bool_Bool testMode = NS_FALSE0; |
| 107 | const char *configFileContent = NULL((void*)0); |
| 108 | #ifndef _WIN32 |
| 109 | bool_Bool debug = NS_FALSE0; |
| 110 | bool_Bool forked = NS_FALSE0; |
| 111 | char mode = '\0'; |
| 112 | const char *root = NULL((void*)0), *garg = NULL((void*)0), *uarg = NULL((void*)0), *server = NULL((void*)0); |
| 113 | const char *bindargs = NULL((void*)0), *bindfile = NULL((void*)0); |
| 114 | Ns_Set *servers; |
| 115 | Ns_ReturnCode status; |
| 116 | #else |
| 117 | /* |
| 118 | * The following variables are declared static so they |
| 119 | * preserve their values when Ns_Main is re-entered by |
| 120 | * the Win32 service control manager. |
| 121 | */ |
| 122 | static char mode = '\0', *procname, *server = NULL((void*)0); |
| 123 | static Ns_Set *servers; |
| 124 | #endif |
| 125 | |
| 126 | /* |
| 127 | * Before doing anything else, initialize the Tcl API |
| 128 | * as we rely heavily on it, even for the most basic |
| 129 | * functions like memory allocation. |
| 130 | */ |
| 131 | |
| 132 | Tcl_FindExecutable(argv[0]); |
| 133 | |
| 134 | /* |
| 135 | * Initialize the Nsd library. |
| 136 | */ |
| 137 | |
| 138 | Nsd_LibInit(); |
| 139 | |
| 140 | /* |
| 141 | * Mark the server stopped until initialization is complete. |
| 142 | */ |
| 143 | |
| 144 | Ns_MutexLock(&nsconf.state.lock); |
| 145 | nsconf.state.started = NS_FALSE0; |
| 146 | Ns_MutexUnlock(&nsconf.state.lock); |
| 147 | |
| 148 | /* |
| 149 | * When run as a Win32 service, Ns_Main will be re-entered |
| 150 | * in the service main thread. In this case, jump past the |
| 151 | * point where the initial thread blocked when connected to |
| 152 | * the service control manager. |
| 153 | */ |
| 154 | |
| 155 | #ifdef _WIN32 |
| 156 | if (mode == 'S') { |
| 157 | Ns_ThreadSetName("-service-"); |
| 158 | goto contservice; |
| 159 | } |
| 160 | #endif |
| 161 | |
| 162 | nsconf.argv0 = argv[0]; |
| 163 | |
| 164 | /* |
| 165 | * Parse the command line arguments. |
| 166 | */ |
| 167 | |
| 168 | for (optionIndex = 1; optionIndex < argc; optionIndex++) { |
| 169 | if (argv[optionIndex][0] != '-') { |
| 170 | break; |
| 171 | } |
| 172 | switch (argv[optionIndex][1]) { |
| 173 | case 'h': |
| 174 | UsageMsg(0); |
| 175 | |
| 176 | case 'c': NS_FALL_THROUGH((void)0); /* fall through */ |
| 177 | case 'f': NS_FALL_THROUGH((void)0); /* fall through */ |
| 178 | #ifdef _WIN32 |
| 179 | case 'I': NS_FALL_THROUGH((void)0); /* fall through */ |
| 180 | case 'R': NS_FALL_THROUGH((void)0); /* fall through */ |
| 181 | case 'S': NS_FALL_THROUGH((void)0); /* fall through */ |
| 182 | #else |
| 183 | case 'i': NS_FALL_THROUGH((void)0); /* fall through */ |
| 184 | case 'w': NS_FALL_THROUGH((void)0); /* fall through */ |
| 185 | #endif |
| 186 | case 'V': |
| 187 | if (mode != '\0') { |
| 188 | #ifdef _WIN32 |
| 189 | UsageError("only one of the options -c, -f, -I, -R, -S or -V" |
| 190 | " may be specified"); |
| 191 | #else |
| 192 | UsageError("only one of the options -c, -f, -i, -w or -V" |
| 193 | " may be specified"); |
| 194 | #endif |
| 195 | } |
| 196 | mode = argv[optionIndex][1]; |
| 197 | break; |
| 198 | case 's': |
| 199 | if (server != NULL((void*)0)) { |
| 200 | UsageError("multiple -s <server> options"); |
| 201 | } |
| 202 | if (optionIndex + 1 < argc) { |
| 203 | server = argv[++optionIndex]; |
| 204 | } else { |
| 205 | UsageError("no parameter for -s option"); |
| 206 | } |
| 207 | break; |
| 208 | case 't': |
| 209 | if (nsconf.configFile != NULL((void*)0)) { |
| 210 | UsageError("multiple -t <file> options"); |
| 211 | } |
| 212 | if (optionIndex + 1 < argc) { |
| 213 | nsconf.configFile = argv[++optionIndex]; |
| 214 | } else { |
| 215 | UsageError("no parameter for -t option"); |
| 216 | } |
| 217 | break; |
| 218 | case 'T': |
| 219 | testMode = NS_TRUE1; |
| 220 | break; |
| 221 | |
| 222 | case 'p': |
| 223 | case 'z': |
| 224 | /* NB: Ignored. */ |
| 225 | break; |
| 226 | #ifndef _WIN32 |
| 227 | case 'b': |
Duplicate code detected | |
| 228 | if (optionIndex + 1 < argc) { |
| 229 | bindargs = argv[++optionIndex]; |
| 230 | } else { |
| 231 | UsageError("no parameter for -b option"); |
| 232 | } |
| 233 | break; |
| 234 | case 'B': |
Similar code here | |
| 235 | if (optionIndex + 1 < argc) { |
| 236 | bindfile = argv[++optionIndex]; |
| 237 | } else { |
| 238 | UsageError("no parameter for -B option"); |
| 239 | } |
| 240 | break; |
| 241 | case 'r': |
| 242 | if (optionIndex + 1 < argc) { |
| 243 | root = argv[++optionIndex]; |
| 244 | } else { |
| 245 | UsageError("no parameter for -r option"); |
| 246 | } |
| 247 | break; |
| 248 | case 'd': |
| 249 | debug = NS_TRUE1; |
| 250 | break; |
| 251 | case 'g': |
Similar code here | |
| 252 | if (optionIndex + 1 < argc) { |
| 253 | garg = argv[++optionIndex]; |
| 254 | } else { |
| 255 | UsageError("no parameter for -g option"); |
| 256 | } |
| 257 | break; |
| 258 | case 'u': |
| 259 | if (optionIndex + 1 < argc) { |
| 260 | uarg = argv[++optionIndex]; |
| 261 | } else { |
| 262 | UsageError("no parameter for -u option"); |
| 263 | } |
| 264 | break; |
| 265 | #endif |
| 266 | default: |
| 267 | UsageError("invalid option: -%c", argv[optionIndex][1]); |
| 268 | } |
| 269 | } |
| 270 | if (mode == 'V') { |
| 271 | printf("%s/%s\n", PACKAGE_NAME, PACKAGE_VERSION)__printf_chk (2 - 1, "%s/%s\n", "NaviServer", "4.99.24"); |
| 272 | printf(" Tag: %s\n", Ns_InfoTag())__printf_chk (2 - 1, " Tag: %s\n", Ns_InfoTag() ); |
| 273 | printf(" Built: %s\n", Ns_InfoBuildDate())__printf_chk (2 - 1, " Built: %s\n", Ns_InfoBuildDate ()); |
| 274 | printf(" Tcl version: %s\n", nsconf.tcl.version)__printf_chk (2 - 1, " Tcl version: %s\n", nsconf.tcl.version ); |
| 275 | printf(" Platform: %s\n", Ns_InfoPlatform())__printf_chk (2 - 1, " Platform: %s\n", Ns_InfoPlatform ()); |
| 276 | return 0; |
| 277 | } |
| 278 | |
| 279 | if (testMode) { |
| 280 | const char *fileContent; |
| 281 | |
| 282 | if (nsconf.configFile == NULL((void*)0)) { |
| 283 | UsageError("option -t <file> must be provided, when -T is used"); |
| 284 | } |
| 285 | fileContent = NsConfigRead(nsconf.configFile); |
| 286 | if (fileContent != NULL((void*)0)) { |
| 287 | |
| 288 | /* |
| 289 | * Evaluate the configuration file. |
| 290 | */ |
| 291 | NsConfigEval(fileContent, nsconf.configFile, argc, argv, optionIndex); |
| 292 | |
| 293 | printf("%s/%s: configuration file %s looks OK\n",__printf_chk (2 - 1, "%s/%s: configuration file %s looks OK\n" , "NaviServer", "4.99.24", nsconf.configFile) |
| 294 | PACKAGE_NAME, PACKAGE_VERSION, nsconf.configFile)__printf_chk (2 - 1, "%s/%s: configuration file %s looks OK\n" , "NaviServer", "4.99.24", nsconf.configFile); |
| 295 | |
| 296 | ns_free((char *)fileContent); |
| 297 | } |
| 298 | return 0; |
| 299 | } |
| 300 | |
| 301 | if (mode == 'c') { |
| 302 | int i; |
| 303 | |
| 304 | cmd.argv = ns_calloc(((size_t)argc - (size_t)optionIndex) + 2u, sizeof(char *)); |
| 305 | cmd.argc = 0; |
| 306 | cmd.argv[cmd.argc++] = argv[0]; |
| 307 | for (i = optionIndex; i < argc; i++) { |
| 308 | cmd.argv[cmd.argc++] = argv[i]; |
| 309 | } |
| 310 | Ns_ThreadCreate(CmdThread, &cmd, 0, NULL((void*)0)); |
| 311 | } |
| 312 | |
| 313 | #ifndef _WIN32 |
| 314 | |
| 315 | /* |
| 316 | * If running as privileged user (root) check given user/group |
| 317 | * information and bail-out if any of them not really known. |
| 318 | */ |
| 319 | |
| 320 | if (getuid() == 0) { |
| 321 | |
| 322 | /* |
| 323 | * OK, so the caller is running as root. In such cases |
| 324 | * he/she should have used "-u" to give the actual user |
| 325 | * to run as (may be root as well) and optionally "-g" |
| 326 | * to set the process group. |
| 327 | */ |
| 328 | |
| 329 | if (uarg == NULL((void*)0)) { |
| 330 | Ns_Fatal("nsmain: will not run without valid user; " |
| 331 | "must specify '-u username' parameter"); |
| 332 | } |
| 333 | } |
| 334 | |
| 335 | /* |
| 336 | * Fork into the background |
| 337 | */ |
| 338 | |
| 339 | if (mode == 0 || mode == 'w') { |
| 340 | #ifdef HAVE_COREFOUNDATION |
| 341 | Ns_Fatal("nsmain: Tcl compiled with Core Foundation support does not support forking modes; " |
| 342 | "use e.g. the '-i' mode parameter in the command line.\n"); |
| 343 | #else |
| 344 | int i; |
| 345 | |
| 346 | if (mode != 'w') { |
| 347 | /* |
| 348 | * Unless we are in watchdog mode, setup pipe for realizing |
| 349 | * nonzero return codes in case setup fails. |
| 350 | * |
| 351 | * Background: The pipe is used for communicating problems during |
| 352 | * startup from the child process to return nonzero return codes |
| 353 | * in case the server does not start up. However, the watchdog |
| 354 | * mode restarts the child if necessary, so the pipe to the child |
| 355 | * can't be used. |
| 356 | */ |
| 357 | ns_pipe(nsconf.state.pipefd); |
| 358 | } |
| 359 | |
| 360 | i = ns_fork(); |
| 361 | if (i == -1) { |
| 362 | Ns_Fatal("nsmain: fork() failed: '%s'", strerror(errno(*__errno_location ()))); |
| 363 | } |
| 364 | if (i > 0) { |
| 365 | /* |
| 366 | * We are in the parent process. |
| 367 | */ |
| 368 | int exit_code; |
| 369 | |
| 370 | /* |
| 371 | * Pipe communication between parent and child communication is |
| 372 | * NOT established in watchdog mode. |
| 373 | */ |
| 374 | if (mode != 'w') { |
| 375 | char buf = '\0'; |
| 376 | ssize_t nread; |
| 377 | |
| 378 | /* |
| 379 | * Close the write-end of the pipe, we do not use it |
| 380 | */ |
| 381 | ns_closeclose(nsconf.state.pipefd[1]); |
| 382 | nsconf.state.pipefd[1] = 0; |
| 383 | |
| 384 | Ns_Log(Debug, "nsmain: wait for feedback from forked child, read from fd %d", |
| 385 | nsconf.state.pipefd[0]); |
| 386 | |
| 387 | /* |
| 388 | * Read the status from the child process. We expect as result |
| 389 | * either 'O' (when initialization went OK) or 'F' (for Fatal). |
| 390 | */ |
| 391 | nread = ns_readread(nsconf.state.pipefd[0], &buf, 1); |
| 392 | if (nread < 0) { |
| 393 | /* |
| 394 | * Do nothing, even when the read fails |
| 395 | */ |
| 396 | ; |
| 397 | Ns_Log(Warning, "nsmain: received no feedback from child process, error: %s", strerror(errno(*__errno_location ()))); |
| 398 | } |
| 399 | Ns_Log(Debug, "nsmain: received from child %" PRIdz"zd" " bytes", nread); |
| 400 | ns_closeclose(nsconf.state.pipefd[0]); |
| 401 | nsconf.state.pipefd[0] = 0; |
| 402 | exit_code = (buf == 'O') ? 0 : 1; |
| 403 | |
| 404 | } else { |
| 405 | /* |
| 406 | * If we are not in watchdog mode, the parent will return |
| 407 | * after a successful for always with 0. |
| 408 | */ |
| 409 | exit_code = 0; |
| 410 | } |
| 411 | |
| 412 | return exit_code; |
| 413 | } |
| 414 | /* |
| 415 | * We are in the child process. |
| 416 | */ |
| 417 | if (mode != 'w') { |
| 418 | /* |
| 419 | * Unless we are in the watchdog mode, close the read-end of the |
| 420 | * pipe, we do not use it. |
| 421 | */ |
| 422 | ns_closeclose(nsconf.state.pipefd[0]); |
| 423 | nsconf.state.pipefd[0] = 0; |
| 424 | } |
| 425 | |
| 426 | forked = NS_TRUE1; |
| 427 | setsid(); /* Detach from the controlling terminal device */ |
| 428 | #endif |
| 429 | } |
| 430 | |
| 431 | /* |
| 432 | * For watchdog mode, start the watchdog/server process pair. |
| 433 | * The watchdog will monitor and restart the server unless the |
| 434 | * server exits gracefully, either by calling exit(0) or get |
| 435 | * signaled by the SIGTERM signal. |
| 436 | * The watchdog itself will exit when the server exits gracefully, |
| 437 | * or, when get signaled by the SIGTERM signal. In the latter |
| 438 | * case, watchdog will pass the SIGTERM to the server, so both of |
| 439 | * them will gracefully exit. |
| 440 | */ |
| 441 | |
| 442 | if (mode == 'w') { |
| 443 | if (NsForkWatchedProcess() == 0) { |
| 444 | /* |
| 445 | * Watchdog exiting. We're done. |
| 446 | */ |
| 447 | return 0; |
| 448 | } |
| 449 | |
| 450 | /* |
| 451 | * Continue as watched server process. |
| 452 | */ |
| 453 | forked = NS_TRUE1; |
| 454 | } |
| 455 | |
| 456 | /* |
| 457 | * Keep up the C-compatibility with Tcl 8.4. |
| 458 | */ |
| 459 | |
| 460 | if (forked) { |
| 461 | int major, minor; |
| 462 | |
| 463 | Tcl_GetVersion(&major, &minor, NULL((void*)0), NULL((void*)0)); |
| 464 | if (major == 8 && minor <= 4) { |
| 465 | |
| 466 | /* |
| 467 | * For Tcl versions up to (and including the) Tcl 8.4 |
| 468 | * we need to re-init the notifier after the fork. |
| 469 | * Failing to do so will make Tcl_ThreadAlert (et.al.) |
| 470 | * unusable since the notifier subsystem may not be |
| 471 | * initialized. The problematic behavior may be exibited |
| 472 | * for any loadable module that creates threads using the |
| 473 | * Tcl API but never calls directly into Tcl_CreateInterp |
| 474 | * that handles the notifier initialization indirectly. |
| 475 | */ |
| 476 | |
| 477 | Tcl_InitNotifier(); |
| 478 | } |
| 479 | } |
| 480 | |
| 481 | nsconf.pid = getpid(); |
| 482 | |
| 483 | /* |
| 484 | * Block all signals for the duration of startup to ensure any new |
| 485 | * threads inherit the blocked state. |
| 486 | */ |
| 487 | |
| 488 | NsBlockSignals(debug); |
| 489 | |
| 490 | #endif /* ! _WIN32 */ |
| 491 | |
| 492 | nsconf.nsd = ns_strdup(Tcl_GetNameOfExecutable()); |
| 493 | |
| 494 | /* |
| 495 | * Find and read configuration file, if given at the command line, just use it, |
| 496 | * if not specified, try to figure out by looking in the current dir for |
| 497 | * nsd.tcl and for ../conf/nsd.tcl |
| 498 | */ |
| 499 | |
| 500 | if (nsconf.configFile == NULL((void*)0)) { |
| 501 | nsconf.configFile = MakePath("nsd.tcl"); |
| 502 | if (nsconf.configFile == NULL((void*)0)) { |
| 503 | nsconf.configFile = MakePath("conf/nsd.tcl"); |
| 504 | } |
| 505 | } |
| 506 | |
| 507 | /* |
| 508 | * In case chroot has to be performed, we might not be able anymore to |
| 509 | * read the configuration file. So, we have to read it before issuing the |
| 510 | * chroot() command. |
| 511 | */ |
| 512 | if (nsconf.configFile != NULL((void*)0)) { |
| 513 | configFileContent = NsConfigRead(nsconf.configFile); |
| 514 | } |
| 515 | |
| 516 | #ifndef _WIN32 |
| 517 | |
| 518 | if (bindargs != NULL((void*)0) || bindfile != NULL((void*)0)) { |
| 519 | /* |
| 520 | * Pre-bind any sockets now, before a possible setuid from root |
| 521 | * or chroot which may hide /etc/resolv.conf required to resolve |
| 522 | * name-based addresses. |
| 523 | */ |
| 524 | status = NsPreBind(bindargs, bindfile); |
| 525 | if (status != NS_OK) { |
| 526 | Ns_Fatal("nsmain: prebind failed"); |
| 527 | } |
| 528 | } |
| 529 | |
| 530 | /* |
| 531 | * Chroot() if requested before setuid from root. |
| 532 | */ |
| 533 | if (root != NULL((void*)0)) { |
| 534 | if (chroot(root) != 0) { |
| 535 | Ns_Fatal("nsmain: chroot(%s) failed: '%s'", root, strerror(errno(*__errno_location ()))); |
| 536 | } |
| 537 | nsconf.home = SetCwd("/"); |
| 538 | } |
| 539 | |
| 540 | /* |
| 541 | * If caller is running as the privileged user, change |
| 542 | * to the run time (given) user and/or group now. |
| 543 | */ |
| 544 | |
| 545 | if (getuid() == 0) { |
| 546 | |
| 547 | /* |
| 548 | * Set or clear supplementary groups. |
| 549 | */ |
| 550 | |
| 551 | if (Ns_SetGroup(garg) == NS_ERROR) { |
| 552 | Ns_Fatal("nsmain: failed to switch to group %s", garg); |
| 553 | } |
| 554 | |
| 555 | /* |
| 556 | * Before setuid, fork the background binder process to |
| 557 | * listen on ports which were not pre-bound above. |
| 558 | */ |
| 559 | if (bindargs != NULL((void*)0) || bindfile != NULL((void*)0)) { |
| 560 | NsForkBinder(); |
| 561 | } |
| 562 | |
| 563 | if (Ns_SetUser(uarg) == NS_ERROR) { |
| 564 | Ns_Fatal("nsmain: failed to switch to user %s", uarg); |
| 565 | } |
| 566 | } |
| 567 | |
| 568 | #ifdef __linux1 |
| 569 | |
| 570 | /* |
| 571 | * On Linux, once a process changes uid/gid, the dumpable flag |
| 572 | * is cleared, preventing a core file from being written. On |
| 573 | * Linux 2.4+, it can be set again using prctl() so that we can |
| 574 | * get core files. |
| 575 | */ |
| 576 | |
| 577 | if (prctl(PR_SET_DUMPABLE4, 1, 0, 0, 0) < 0) { |
| 578 | Ns_Fatal("nsmain: prctl(PR_SET_DUMPABLE) failed: '%s'", |
| 579 | strerror(errno(*__errno_location ()))); |
| 580 | } |
| 581 | |
| 582 | #endif /* __linux */ |
| 583 | |
| 584 | #endif /* ! _WIN32 */ |
| 585 | |
| 586 | if (configFileContent != NULL((void*)0)) { |
| 587 | /* |
| 588 | * Evaluate the configuration file. |
| 589 | */ |
| 590 | NsConfigEval(configFileContent, nsconf.configFile, argc, argv, optionIndex); |
| 591 | ns_free((char *)configFileContent); |
| 592 | } |
| 593 | |
| 594 | /* |
| 595 | * This is the first place, where we can use values from the configuration file. |
| 596 | * |
| 597 | * Turn on logging of long mutex calls if desired. For whatever reason, we |
| 598 | * can't access NS_mutexlocktrace from here (unknown external symbol), |
| 599 | * although it is defined exactly like NS_finalshutdown; |
| 600 | */ |
| 601 | |
| 602 | /* |
| 603 | * Internationalized programs must call setlocale() to initiate specific |
| 604 | * language operations. |
| 605 | */ |
| 606 | { |
| 607 | char *localeString = getenv("LC_ALL"); |
| 608 | const char *source = "unknown source", *response; |
| 609 | |
| 610 | if (localeString == NULL((void*)0)) { |
| 611 | source = "environment variable LC_COLLATE"; |
| 612 | localeString = getenv("LC_COLLATE"); |
| 613 | } |
| 614 | if (localeString == NULL((void*)0)) { |
| 615 | source = "environment variable LANG"; |
| 616 | localeString = getenv("LANG"); |
| 617 | } |
| 618 | if (localeString == NULL((void*)0)) { |
| 619 | source = "system-wide default locale"; |
| 620 | localeString = setlocale(LC_COLLATE3, NULL((void*)0)); |
| 621 | } |
| 622 | |
| 623 | response = setlocale(LC_COLLATE3, localeString); |
| 624 | if (response != NULL((void*)0)) { |
| 625 | #ifdef _WIN32 |
| 626 | nsconf.locale = _create_locale(LC_COLLATE3, localeString); |
| 627 | #else |
| 628 | nsconf.locale = newlocale(LC_COLLATE_MASK(1 << 3), localeString, (locale_t)0); |
| 629 | #endif |
| 630 | } |
| 631 | if (nsconf.locale == 0) { |
| 632 | Ns_Fatal("nsmain: system configuration mismatch.\n" |
| 633 | "The provided locale '%s' based on the %s is not installed on this system.\n" |
| 634 | "On unix-like systems you can check the available locales with the command 'locale -a' .\n", |
| 635 | localeString, source); |
| 636 | } |
| 637 | Ns_Log(Notice, "initialized locale %s from %s", localeString, source); |
| 638 | } |
| 639 | |
| 640 | |
| 641 | #ifndef _WIN32 |
| 642 | NS_mutexlocktrace = Ns_ConfigBool(NS_GLOBAL_CONFIG_PARAMETERS"ns/parameters", "mutexlocktrace", NS_FALSE0); |
| 643 | #endif |
| 644 | |
| 645 | nsconf.formFallbackCharset = Ns_ConfigString(NS_GLOBAL_CONFIG_PARAMETERS"ns/parameters", "FormFallbackCharset", NULL((void*)0)); |
| 646 | if (nsconf.formFallbackCharset != NULL((void*)0) |
| 647 | && *nsconf.formFallbackCharset == '\0') { |
| 648 | nsconf.formFallbackCharset = NULL((void*)0); |
| 649 | } |
| 650 | |
| 651 | /* |
| 652 | * If no servers were defined, autocreate server "default" |
| 653 | * so all default config values will be used for that server |
| 654 | */ |
| 655 | |
| 656 | servers = Ns_ConfigGetSection("ns/servers"); |
| 657 | if (servers == NULL((void*)0)) { |
| 658 | servers = Ns_ConfigCreateSection("ns/servers"); |
| 659 | } |
| 660 | if (Ns_SetSize(servers)((servers)->size) == 0u) { |
| 661 | (void)Ns_SetPutSz(servers, "default", 7, "Default NaviServer", 18); |
| 662 | } |
| 663 | |
| 664 | /* |
| 665 | * If a single server was specified, ensure it exists |
| 666 | * and update the pointer to the config string (the |
| 667 | * config server strings are considered the unique |
| 668 | * server "handles"). |
| 669 | */ |
| 670 | |
| 671 | if (server != NULL((void*)0)) { |
| 672 | int i = Ns_SetFind(servers, server); |
| 673 | if (i < 0) { |
| 674 | Ns_Log(Error, "nsmain: no such server '%s' in configuration file '%s'", |
| 675 | server, nsconf.configFile); |
| 676 | Ns_Log(Warning, "nsmain: Writing the server names we DO have to stderr now:"); |
| 677 | Ns_SetPrint(servers); |
| 678 | Ns_Fatal("nsmain: no such server '%s'", server); |
| 679 | } |
| 680 | server = Ns_SetKey(servers, i)((servers)->fields[(i)].name); |
| 681 | } |
| 682 | |
| 683 | /* |
| 684 | * Verify and change to the home directory. |
| 685 | */ |
| 686 | |
| 687 | nsconf.home = Ns_ConfigGetValue(NS_GLOBAL_CONFIG_PARAMETERS"ns/parameters", "home"); |
| 688 | if (nsconf.home == NULL((void*)0) && mode != 'c') { |
| 689 | |
| 690 | /* |
| 691 | * We will try to figure out our installation directory from |
| 692 | * executable binary. Check if nsd is in bin/ subdirectory according |
| 693 | * to our make install, if true make our home one level up, otherwise |
| 694 | * make home directory where executable binary resides. All custom |
| 695 | * installation will require "home" config parameter to be specified |
| 696 | * in the nsd.tcl |
| 697 | */ |
| 698 | |
| 699 | nsconf.home = MakePath(""); |
| 700 | if (nsconf.home == NULL((void*)0)) { |
| 701 | Ns_Fatal("nsmain: missing: [%s]home", NS_GLOBAL_CONFIG_PARAMETERS"ns/parameters"); |
| 702 | } |
| 703 | } else if (nsconf.home == NULL((void*)0) /* && mode == 'c' */) { |
| 704 | /* |
| 705 | * Try to get HOME from environment variable NAVISERVER. If |
| 706 | * this is not defined, take the value from the path. Using |
| 707 | * NAVISERVER makes especially sense when testing or running |
| 708 | * nsd from the source directory. |
| 709 | */ |
| 710 | nsconf.home = getenv("NAVISERVER"); |
| 711 | if (nsconf.home == NULL((void*)0)) { |
| 712 | /* |
| 713 | * There is no such environment variable. Try, if we can get the |
| 714 | * home from the binary. In such cases, we expect to find |
| 715 | * "bin/init.tcl" under home. |
| 716 | */ |
| 717 | const char *path = MakePath("bin/init.tcl"); |
| 718 | if (path != NULL((void*)0)) { |
| 719 | /* |
| 720 | * Yep, we found it, use its parent directory. |
| 721 | */ |
| 722 | nsconf.home = MakePath(""); |
| 723 | } else { |
| 724 | /* |
| 725 | * Desperate fallback. Use the name of the configured install |
| 726 | * directory. |
| 727 | */ |
| 728 | nsconf.home = NS_NAVISERVER"/usr/local/ns"; |
| 729 | } |
| 730 | } |
| 731 | assert(nsconf.home != NULL)((void) (0)); |
| 732 | } |
| 733 | nsconf.home = SetCwd(nsconf.home); |
| 734 | nsconf.reject_already_closed_connection = |
| 735 | Ns_ConfigBool(NS_GLOBAL_CONFIG_PARAMETERS"ns/parameters", "rejectalreadyclosedconn", NS_TRUE1); |
| 736 | nsconf.sanitize_logfiles = |
| 737 | Ns_ConfigIntRange(NS_GLOBAL_CONFIG_PARAMETERS"ns/parameters", "sanitizelogfiles", 2, 0, 2); |
| 738 | nsconf.reverseproxymode = |
| 739 | Ns_ConfigBool(NS_GLOBAL_CONFIG_PARAMETERS"ns/parameters", "reverseproxymode", NS_FALSE0); |
| 740 | |
| 741 | { |
| 742 | /* |
| 743 | * Allow values like "none", or abbreviated to "no"), but be open for |
| 744 | * future enhancements like e.g. "cluster". |
| 745 | */ |
| 746 | const char *cacheConfig = Ns_ConfigGetValue(NS_GLOBAL_CONFIG_PARAMETERS"ns/parameters", "cachingmode"); |
| 747 | if (cacheConfig == NULL((void*)0)) { |
| 748 | nsconf.nocache = NS_FALSE0; |
| 749 | } else { |
| 750 | nsconf.nocache = (strncmp(cacheConfig, "no", 2) == 0); |
| 751 | } |
| 752 | } |
| 753 | |
| 754 | /* |
| 755 | * Make the result queryable. |
| 756 | */ |
| 757 | |
| 758 | set = Ns_ConfigCreateSection(NS_GLOBAL_CONFIG_PARAMETERS"ns/parameters"); |
| 759 | Ns_SetUpdateSz(set, "home", 4, nsconf.home, -1); |
| 760 | |
| 761 | /* |
| 762 | * Update core config values. |
| 763 | */ |
| 764 | |
| 765 | NsConfUpdate(); |
| 766 | |
| 767 | nsconf.tmpDir = Ns_ConfigGetValue(NS_GLOBAL_CONFIG_PARAMETERS"ns/parameters", "tmpdir"); |
| 768 | if (nsconf.tmpDir == NULL((void*)0)) { |
| 769 | nsconf.tmpDir = getenv("TMPDIR"); |
| 770 | if (nsconf.tmpDir == NULL((void*)0)) { |
| 771 | nsconf.tmpDir = P_tmpdir"/tmp"; |
| 772 | } |
| 773 | Ns_SetUpdateSz(set, "tmpdir", 6, nsconf.tmpDir, -1); |
| 774 | } |
| 775 | |
| 776 | #ifdef _WIN32 |
| 777 | |
| 778 | /* |
| 779 | * Set the procname used for the pid file. |
| 780 | */ |
| 781 | |
| 782 | procname = ((server != NULL((void*)0)) ? server : Ns_SetKey(servers, 0)((servers)->fields[(0)].name)); |
| 783 | |
| 784 | /* |
| 785 | * Connect to the service control manager if running |
| 786 | * as a service (see service comment above). |
| 787 | */ |
| 788 | |
| 789 | if (mode == 'I' || mode == 'R' || mode == 'S') { |
| 790 | Ns_ReturnCode status = NS_OK; |
| 791 | |
| 792 | Ns_ThreadSetName("-service-"); |
| 793 | |
| 794 | switch (mode) { |
| 795 | case 'I': |
| 796 | status = NsInstallService(procname); |
| 797 | break; |
| 798 | case 'R': |
| 799 | status = NsRemoveService(procname); |
| 800 | break; |
| 801 | case 'S': |
| 802 | status = NsConnectService(); |
| 803 | break; |
| 804 | default: |
| 805 | /* cannot happen */ |
| 806 | assert(0)((void) (0)); |
| 807 | break; |
| 808 | } |
| 809 | return (status == NS_OK ? 0 : 1); |
| 810 | } |
| 811 | |
| 812 | contservice: |
| 813 | |
| 814 | #endif |
| 815 | |
| 816 | /* |
| 817 | * Open the log file now that the home directory and run time |
| 818 | * user id have been set. |
| 819 | */ |
| 820 | |
| 821 | if (mode != 'c' && mode != 'f') { |
| 822 | NsLogOpen(); |
| 823 | } |
| 824 | |
| 825 | /* |
| 826 | * Log the first startup message which should be the first |
| 827 | * output to the open log file unless the config script |
| 828 | * generated some messages. |
| 829 | */ |
| 830 | |
| 831 | StatusMsg(starting_state); |
| 832 | LogTclVersion(); |
| 833 | |
| 834 | #ifndef _WIN32 |
| 835 | { |
| 836 | struct rlimit rl; |
| 837 | |
| 838 | /* |
| 839 | * Log the current open file limit. |
| 840 | */ |
| 841 | memset(&rl, 0, sizeof(rl)); |
| 842 | |
| 843 | if (getrlimit(RLIMIT_NOFILERLIMIT_NOFILE, &rl) != 0) { |
| 844 | Ns_Log(Warning, "nsmain: " |
| 845 | "getrlimit(RLIMIT_NOFILE) failed: '%s'", strerror(errno(*__errno_location ()))); |
| 846 | } else { |
| 847 | char curBuffer[TCL_INTEGER_SPACE24], maxBuffer[TCL_INTEGER_SPACE24]; |
| 848 | |
| 849 | snprintf(curBuffer, sizeof(curBuffer), "%" PRIuMAX, (uintmax_t)rl.rlim_cur)__builtin___snprintf_chk (curBuffer, sizeof(curBuffer), 2 - 1 , __builtin_object_size (curBuffer, 2 > 1), "%" "l" "u", ( uintmax_t)rl.rlim_cur); |
| 850 | snprintf(maxBuffer, sizeof(maxBuffer), "%" PRIuMAX, (uintmax_t)rl.rlim_max)__builtin___snprintf_chk (maxBuffer, sizeof(maxBuffer), 2 - 1 , __builtin_object_size (maxBuffer, 2 > 1), "%" "l" "u", ( uintmax_t)rl.rlim_max); |
| 851 | Ns_Log(Notice, "nsmain: " |
| 852 | "max files: soft limit %s, hard limit %s", |
| 853 | (rl.rlim_cur == RLIM_INFINITY((__rlim_t) -1) ? "infinity" : curBuffer), |
| 854 | (rl.rlim_max == RLIM_INFINITY((__rlim_t) -1) ? "infinity" : maxBuffer) |
| 855 | ); |
| 856 | if (rl.rlim_cur == RLIM_INFINITY((__rlim_t) -1) |
| 857 | || rl.rlim_cur > FD_SETSIZE1024) { |
| 858 | Ns_Log(Warning, "nsmain: current limit " |
| 859 | "of maximum number of files > FD_SETSIZE (%d), " |
| 860 | "select() calls should not be used", |
| 861 | FD_SETSIZE1024); |
| 862 | } |
| 863 | } |
| 864 | } |
| 865 | #endif |
| 866 | |
| 867 | /* |
| 868 | * Create the pid file. |
| 869 | */ |
| 870 | |
| 871 | NsCreatePidFile(); |
| 872 | |
| 873 | /* |
| 874 | * Initialize the virtual servers. |
| 875 | */ |
| 876 | |
| 877 | if (server != NULL((void*)0)) { |
| 878 | NsInitServer(server, initProc); |
| 879 | } else { |
| 880 | size_t i; |
| 881 | |
| 882 | for (i = 0u; i < Ns_SetSize(servers)((servers)->size); ++i) { |
| 883 | server = Ns_SetKey(servers, i)((servers)->fields[(i)].name); |
| 884 | NsInitServer(server, initProc); |
| 885 | |
| 886 | } |
| 887 | /* |
| 888 | * Make the first server the default server. |
| 889 | */ |
| 890 | server = Ns_SetKey(servers, 0)((servers)->fields[(0)].name); |
| 891 | } |
| 892 | nsconf.defaultServer = server; |
| 893 | |
| 894 | /* |
| 895 | * Initialize non-server static modules. |
| 896 | */ |
| 897 | |
| 898 | NsInitStaticModules(NULL((void*)0)); |
| 899 | |
| 900 | /* |
| 901 | * Run pre-startup procs |
| 902 | */ |
| 903 | |
| 904 | NsRunPreStartupProcs(); |
| 905 | |
| 906 | /* |
| 907 | * Map virtual servers. This requires that all servers and all drivers are |
| 908 | * initialized (can be found via global data structures). Drivers are |
| 909 | * created via NsRunPreStartupProcs(). |
| 910 | */ |
| 911 | |
| 912 | NsDriverMapVirtualServers(); |
| 913 | |
| 914 | /* |
| 915 | * Start the servers and drivers. |
| 916 | */ |
| 917 | |
| 918 | NsStartServers(); |
| 919 | NsStartDrivers(); |
| 920 | |
| 921 | /* |
| 922 | * Signal startup is complete. |
| 923 | */ |
| 924 | |
| 925 | StatusMsg(running_state); |
| 926 | |
| 927 | Ns_MutexLock(&nsconf.state.lock); |
| 928 | nsconf.state.started = NS_TRUE1; |
| 929 | Ns_CondBroadcast(&nsconf.state.cond); |
| 930 | Ns_MutexUnlock(&nsconf.state.lock); |
| 931 | |
| 932 | if (mode != 'w' && nsconf.state.pipefd[1] != 0) { |
| 933 | ssize_t nwrite; |
| 934 | |
| 935 | /* |
| 936 | * Tell the parent process, that initialization went OK. |
| 937 | */ |
| 938 | nwrite = ns_writewrite(nsconf.state.pipefd[1], "O", 1); |
| 939 | if (nwrite < 1) { |
| 940 | Ns_Fatal("nsmain: can't communicate with parent process, nwrite %" PRIdz"zd" |
| 941 | ", error: %s (parent process was probably killed)", |
| 942 | nwrite, strerror(errno(*__errno_location ()))); |
| 943 | } |
| 944 | (void)ns_closeclose(nsconf.state.pipefd[1]); |
| 945 | nsconf.state.pipefd[1] = 0; |
| 946 | } |
| 947 | |
| 948 | /* |
| 949 | * Run any post-startup procs. |
| 950 | */ |
| 951 | |
| 952 | NsRunStartupProcs(); |
| 953 | |
| 954 | /* |
| 955 | * Start the drivers now that the server appears ready |
| 956 | * and then close any remaining pre-bound sockets. |
| 957 | */ |
| 958 | |
| 959 | #ifndef _WIN32 |
| 960 | NsClosePreBound(); |
| 961 | NsStopBinder(); |
| 962 | #endif |
| 963 | |
| 964 | /* |
| 965 | * Once the drivers listen thread is started, this thread will just |
| 966 | * endlessly wait for Unix signals, calling NsRunSignalProcs() |
| 967 | * whenever SIGHUP arrives. |
| 968 | */ |
| 969 | |
| 970 | sig = NsHandleSignals(); |
| 971 | |
| 972 | /* |
| 973 | * Print a "server shutting down" status message, set |
| 974 | * the nsconf.stopping flag for any threads calling |
| 975 | * Ns_InfoShutdownPending(), and set the absolute |
| 976 | * timeout for all systems to complete shutdown. |
| 977 | * If SIGQUIT signal was sent, make immediate shutdown |
| 978 | * without waiting for all subsystems to exit gracefully |
| 979 | */ |
| 980 | |
| 981 | StatusMsg(stopping_state); |
| 982 | |
| 983 | Ns_MutexLock(&nsconf.state.lock); |
| 984 | nsconf.state.stopping = NS_TRUE1; |
| 985 | if (sig == NS_SIGQUIT(3)) { |
| 986 | nsconf.shutdowntimeout.sec = 0; |
| 987 | nsconf.shutdowntimeout.usec = 0; |
| 988 | } |
| 989 | Ns_GetTime(&timeout); |
| 990 | Ns_IncrTime(&timeout, nsconf.shutdowntimeout.sec, nsconf.shutdowntimeout.usec); |
| 991 | Ns_MutexUnlock(&nsconf.state.lock); |
| 992 | |
| 993 | /* |
| 994 | * First, stop the drivers and servers threads. |
| 995 | */ |
| 996 | |
| 997 | NsStopDrivers(); |
| 998 | NsStopServers(&timeout); |
| 999 | NsStopSpoolers(); |
| 1000 | |
| 1001 | /* |
| 1002 | * Next, start simultaneous shutdown in other systems and wait |
| 1003 | * for them to complete. |
| 1004 | */ |
| 1005 | |
| 1006 | NsStartSchedShutdown(); |
| 1007 | NsStartSockShutdown(); |
| 1008 | NsStartTaskQueueShutdown(); |
| 1009 | NsStartJobsShutdown(); |
| 1010 | NsStartShutdownProcs(); |
| 1011 | |
| 1012 | NsWaitSchedShutdown(&timeout); |
| 1013 | NsWaitSockShutdown(&timeout); |
| 1014 | NsWaitTaskQueueShutdown(&timeout); |
| 1015 | NsWaitJobsShutdown(&timeout); |
| 1016 | NsWaitDriversShutdown(&timeout); |
| 1017 | NsWaitShutdownProcs(&timeout); |
| 1018 | |
| 1019 | /* |
| 1020 | * Finally, execute the exit procs directly. Note that |
| 1021 | * there is not timeout check for the exit procs so they |
| 1022 | * should be well behaved. |
| 1023 | */ |
| 1024 | |
| 1025 | NsRunAtExitProcs(); |
| 1026 | |
| 1027 | /* |
| 1028 | * Remove the pid maker file, print a final "server exiting" |
| 1029 | * status message and return to main. |
| 1030 | */ |
| 1031 | |
| 1032 | NsRemovePidFile(); |
| 1033 | StatusMsg(exiting_state); |
| 1034 | |
| 1035 | /* |
| 1036 | * The main thread exits gracefully on NS_SIGTERM. |
| 1037 | * All other signals are propagated to the caller. |
| 1038 | */ |
| 1039 | |
| 1040 | return (sig == NS_SIGTERM(15)) ? 0 : sig; |
| 1041 | } |
| 1042 | |
| 1043 | |
| 1044 | /* |
| 1045 | *---------------------------------------------------------------------- |
| 1046 | * |
| 1047 | * Ns_WaitForStartup -- |
| 1048 | * |
| 1049 | * Blocks thread until the server has completed loading modules, |
| 1050 | * sourcing Tcl, and is ready to begin normal operation. |
| 1051 | * |
| 1052 | * Results: |
| 1053 | * NS_OK |
| 1054 | * |
| 1055 | * Side effects: |
| 1056 | * None. |
| 1057 | * |
| 1058 | *---------------------------------------------------------------------- |
| 1059 | */ |
| 1060 | |
| 1061 | Ns_ReturnCode |
| 1062 | Ns_WaitForStartup(void) |
| 1063 | { |
| 1064 | /* |
| 1065 | * This dirty-read is worth the effort. |
| 1066 | */ |
| 1067 | |
| 1068 | if (unlikely(!nsconf.state.started)(__builtin_expect((!nsconf.state.started), 0))) { |
| 1069 | Ns_MutexLock(&nsconf.state.lock); |
| 1070 | while (nsconf.state.started == NS_FALSE0) { |
| 1071 | Ns_CondWait(&nsconf.state.cond, &nsconf.state.lock); |
| 1072 | } |
| 1073 | Ns_MutexUnlock(&nsconf.state.lock); |
| 1074 | } |
| 1075 | return NS_OK; |
| 1076 | } |
| 1077 | |
| 1078 | |
| 1079 | /* |
| 1080 | *---------------------------------------------------------------------- |
| 1081 | * |
| 1082 | * Ns_StopServer -- |
| 1083 | * |
| 1084 | * Shutdown a server. |
| 1085 | * |
| 1086 | * Results: |
| 1087 | * None. |
| 1088 | * |
| 1089 | * Side effects: |
| 1090 | * Server will begin shutdown process. |
| 1091 | * |
| 1092 | *---------------------------------------------------------------------- |
| 1093 | */ |
| 1094 | |
| 1095 | void |
| 1096 | Ns_StopServer(char *server) |
| 1097 | { |
| 1098 | Ns_Log(Warning, "nsmain: immediate shutdown of server %s requested", server); |
| 1099 | NsSendSignal(NS_SIGTERM(15)); |
| 1100 | } |
| 1101 | |
| 1102 | |
| 1103 | /* |
| 1104 | *---------------------------------------------------------------------- |
| 1105 | * |
| 1106 | * NsTclShutdownObjCmd -- |
| 1107 | * |
| 1108 | * Implements "ns_shutdown". Shutdown the server, waiting at most timeout |
| 1109 | * seconds for threads to exit cleanly before giving up. |
| 1110 | * |
| 1111 | * Results: |
| 1112 | * Tcl result. |
| 1113 | * |
| 1114 | * Side effects: |
| 1115 | * If -restart was specified and watchdog is active, server |
| 1116 | * will be restarted. |
| 1117 | * |
| 1118 | *---------------------------------------------------------------------- |
| 1119 | */ |
| 1120 | |
| 1121 | int |
| 1122 | NsTclShutdownObjCmd(ClientData UNUSED(clientData)UNUSED_clientData __attribute__((__unused__)), Tcl_Interp *interp, int objc, Tcl_Obj *const* objv) |
| 1123 | { |
| 1124 | int sig = NS_SIGTERM(15), result = TCL_OK0; |
| 1125 | Ns_Time *timeoutPtr = NULL((void*)0); |
| 1126 | Ns_ObjvSpec opts[] = { |
| 1127 | {"-restart", Ns_ObjvBool, &sig, INT2PTR(NS_SIGINT)((void *)(intptr_t)((2)))}, |
| 1128 | {"--", Ns_ObjvBreak, NULL((void*)0), NULL((void*)0)}, |
| 1129 | {NULL((void*)0), NULL((void*)0), NULL((void*)0), NULL((void*)0)} |
| 1130 | }; |
| 1131 | Ns_ObjvSpec args[] = { |
| 1132 | {"?timeout", Ns_ObjvTime, &timeoutPtr, NULL((void*)0)}, |
| 1133 | {NULL((void*)0), NULL((void*)0), NULL((void*)0), NULL((void*)0)} |
| 1134 | }; |
| 1135 | |
| 1136 | if (Ns_ParseObjv(opts, args, interp, 1, objc, objv) != NS_OK) { |
| 1137 | result = TCL_ERROR1; |
| 1138 | |
| 1139 | } else if (timeoutPtr != NULL((void*)0) && timeoutPtr->sec < 0) { |
| 1140 | Ns_TclPrintfResult(interp, "timeout must be >= 0"); |
| 1141 | result = TCL_ERROR1; |
| 1142 | |
| 1143 | } else { |
| 1144 | |
| 1145 | Ns_MutexLock(&nsconf.state.lock); |
| 1146 | if (timeoutPtr != NULL((void*)0)) { |
| 1147 | nsconf.shutdowntimeout.sec = timeoutPtr->sec; |
| 1148 | nsconf.shutdowntimeout.usec = timeoutPtr->usec; |
| 1149 | } else { |
| 1150 | timeoutPtr = &nsconf.shutdowntimeout; |
| 1151 | } |
| 1152 | Ns_MutexUnlock(&nsconf.state.lock); |
| 1153 | |
| 1154 | NsSendSignal(sig); |
| 1155 | Tcl_SetObjResult(interp, Ns_TclNewTimeObj(timeoutPtr)); |
| 1156 | } |
| 1157 | return result; |
| 1158 | } |
| 1159 | |
| 1160 | |
| 1161 | /* |
| 1162 | *---------------------------------------------------------------------- |
| 1163 | * |
| 1164 | * StatusMsg -- |
| 1165 | * |
| 1166 | * Print a status message to the log file. Initial messages log |
| 1167 | * security status to ensure setuid()/setgid() works as expected. |
| 1168 | * |
| 1169 | * Results: |
| 1170 | * None. |
| 1171 | * |
| 1172 | * Side effects: |
| 1173 | * None. |
| 1174 | * |
| 1175 | *---------------------------------------------------------------------- |
| 1176 | */ |
| 1177 | |
| 1178 | static void |
| 1179 | StatusMsg(runState state) |
| 1180 | { |
| 1181 | const char *what = ""; /* Just to make compiler silent, we have a complete enumeration of switch values */ |
| 1182 | |
| 1183 | switch (state) { |
| 1184 | |
| 1185 | case starting_state: |
| 1186 | what = "starting"; |
| 1187 | break; |
| 1188 | |
| 1189 | case running_state: |
| 1190 | what = "running"; |
| 1191 | break; |
| 1192 | |
| 1193 | case stopping_state: |
| 1194 | what = "stopping"; |
| 1195 | break; |
| 1196 | |
| 1197 | case exiting_state: |
| 1198 | what = "exiting"; |
| 1199 | break; |
| 1200 | } |
| 1201 | Ns_Log(Notice, "nsmain: %s/%s (%s) %s", |
| 1202 | Ns_InfoServerName(), Ns_InfoServerVersion(), Ns_InfoTag(), what); |
| 1203 | #ifndef _WIN32 |
| 1204 | if (state == starting_state || state == running_state) { |
| 1205 | Ns_Log(Notice, "nsmain: security info: uid=%d, euid=%d, gid=%d, egid=%d", |
| 1206 | (int)getuid(), (int)geteuid(), (int)getgid(), (int)getegid()); |
| 1207 | } |
| 1208 | #endif |
| 1209 | } |
| 1210 | |
| 1211 | |
| 1212 | /* |
| 1213 | *---------------------------------------------------------------------- |
| 1214 | * |
| 1215 | * LogTclVersion -- |
| 1216 | * |
| 1217 | * Emit Tcl library version to server log. |
| 1218 | * |
| 1219 | * Results: |
| 1220 | * None. |
| 1221 | * |
| 1222 | * Side effects: |
| 1223 | * None. |
| 1224 | * |
| 1225 | *---------------------------------------------------------------------- |
| 1226 | */ |
| 1227 | |
| 1228 | static void |
| 1229 | LogTclVersion(void) |
| 1230 | { |
| 1231 | int major, minor, patch; |
| 1232 | |
| 1233 | Tcl_GetVersion(&major, &minor, &patch, NULL((void*)0)); |
| 1234 | Ns_Log(Notice, "nsmain: Tcl version: %d.%d.%d", major, minor, patch); |
| 1235 | |
| 1236 | return; |
| 1237 | } |
| 1238 | |
| 1239 | |
| 1240 | /* |
| 1241 | *---------------------------------------------------------------------- |
| 1242 | * |
| 1243 | * UsageError -- |
| 1244 | * |
| 1245 | * Print a command line usage error message and exit. |
| 1246 | * |
| 1247 | * Results: |
| 1248 | * None. |
| 1249 | * |
| 1250 | * Side effects: |
| 1251 | * Server exits. |
| 1252 | * |
| 1253 | *---------------------------------------------------------------------- |
| 1254 | */ |
| 1255 | |
| 1256 | static void |
| 1257 | UsageError(const char *msg, ...) |
| 1258 | { |
| 1259 | va_list ap; |
| 1260 | |
| 1261 | va_start(ap, msg)__builtin_va_start(ap, msg); |
| 1262 | fprintf(stderr, "\nError: ")__fprintf_chk (stderr, 2 - 1, "\nError: "); |
| 1263 | vfprintf(stderrstderr, msg, ap); |
| 1264 | fprintf(stderr, "\n")__fprintf_chk (stderr, 2 - 1, "\n"); |
| 1265 | va_end(ap)__builtin_va_end(ap); |
| 1266 | |
| 1267 | UsageMsg(1); |
| 1268 | } |
| 1269 | |
| 1270 | static void |
| 1271 | UsageMsg(int exitCode) |
| 1272 | { |
| 1273 | fprintf(stderr, "\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1274 | #ifdef _WIN32__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1275 | "Usage: %s [-h|V] [-c|f|I|R|S] "__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1276 | #else__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1277 | "Usage: %s [-h|V] [-c|f|i|w] "__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1278 | "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] "__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1279 | #endif__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1280 | "[-s <server>] [-t <file>]\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1281 | "\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1282 | " -h help (this message)\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1283 | " -V version and release information\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1284 | " -c command (interactive) mode\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1285 | " -f foreground mode\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1286 | #ifdef _WIN32__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1287 | " -I install Win32 service\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1288 | " -R remove Win32 service\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1289 | " -S start Win32 service\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1290 | #else__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1291 | " -i inittab mode\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1292 | " -w watchdog mode (restart a failed server)\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1293 | " -d debugger-friendly mode (ignore SIGINT)\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1294 | " -u run as <user>\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1295 | " -g run as <group>\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1296 | " -r chroot to <path>\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1297 | " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1298 | " -B bind address:port list from <file>\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1299 | #endif__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1300 | " -s use server named <server> in configuration file\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1301 | " -t read configuration file from <file>\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1302 | " -T just check configuration file (without starting server)\n"__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0) |
| 1303 | "\n", nsconf.argv0)__fprintf_chk (stderr, 2 - 1, "\n"ifdef _WIN32 "Usage: %s [-h|V] [-c|f|I|R|S] " else "Usage: %s [-h|V] [-c|f|i|w] " "[-u <user>] [-g <group>] [-r <path>] [-b <address:port>|-B <file>] " endif "[-s <server>] [-t <file>]\n" "\n" " -h help (this message)\n" " -V version and release information\n" " -c command (interactive) mode\n" " -f foreground mode\n"ifdef _WIN32 " -I install Win32 service\n" " -R remove Win32 service\n" " -S start Win32 service\n" else " -i inittab mode\n" " -w watchdog mode (restart a failed server)\n" " -d debugger-friendly mode (ignore SIGINT)\n" " -u run as <user>\n" " -g run as <group>\n" " -r chroot to <path>\n" " -b bind <address:port> (Example: 192.168.0.1:80,[::1]:80)\n" " -B bind address:port list from <file>\n"endif " -s use server named <server> in configuration file\n" " -t read configuration file from <file>\n" " -T just check configuration file (without starting server)\n" "\n", nsconf.argv0); |
| 1304 | exit(exitCode); |
| 1305 | } |
| 1306 | |
| 1307 | |
| 1308 | /* |
| 1309 | *---------------------------------------------------------------------- |
| 1310 | * |
| 1311 | * MakePath -- |
| 1312 | * |
| 1313 | * Returns full path to the file relative to the base dir |
| 1314 | * |
| 1315 | * Results: |
| 1316 | * Allocated full path or NULL |
| 1317 | * |
| 1318 | * Side effects: |
| 1319 | * None. |
| 1320 | * |
| 1321 | *---------------------------------------------------------------------- |
| 1322 | */ |
| 1323 | |
| 1324 | static const char * |
| 1325 | MakePath(const char *file) |
| 1326 | { |
| 1327 | const char *result = NULL((void*)0); |
| 1328 | |
| 1329 | NS_NONNULL_ASSERT(file != NULL)((void) (0)); |
| 1330 | |
| 1331 | if (Ns_PathIsAbsolute(nsconf.nsd) == NS_TRUE1) { |
| 1332 | const char *str = strstr(nsconf.nsd, "/bin/"); |
| 1333 | |
| 1334 | if (str == NULL((void*)0)) { |
| 1335 | str = strrchr(nsconf.nsd, INTCHAR('/')((int)((unsigned char)(('/'))))); |
| 1336 | } |
| 1337 | if (str != NULL((void*)0)) { |
| 1338 | const char *path = NULL((void*)0); |
| 1339 | Tcl_Obj *obj; |
| 1340 | |
| 1341 | /* |
| 1342 | * Make sure we have valid path on all platforms |
| 1343 | */ |
| 1344 | obj = Tcl_NewStringObj(nsconf.nsd, (int)(str - nsconf.nsd)); |
| 1345 | Tcl_AppendStringsToObj(obj, "/", file, (char *)0L); |
| 1346 | |
| 1347 | Tcl_IncrRefCount(obj)++(obj)->refCount; |
| 1348 | if (Tcl_FSGetNormalizedPath(NULL((void*)0), obj) != NULL((void*)0)) { |
| 1349 | path = Tcl_FSGetTranslatedStringPath(NULL((void*)0), obj); |
| 1350 | } |
| 1351 | Tcl_DecrRefCount(obj)do { Tcl_Obj *_objPtr = (obj); if (_objPtr->refCount-- <= 1) { TclFreeObj(_objPtr); } } while(0); |
| 1352 | |
| 1353 | /* |
| 1354 | * If filename was given, check if the file exists |
| 1355 | */ |
| 1356 | if (path != NULL((void*)0) && *file != '\0' && access(path, F_OK0) != 0) { |
| 1357 | ckfree((void *)path)Tcl_Free((char *)((void *)path)); |
| 1358 | path = NULL((void*)0); |
| 1359 | } |
| 1360 | result = path; |
| 1361 | } |
| 1362 | } |
| 1363 | return result; |
| 1364 | } |
| 1365 | |
| 1366 | |
| 1367 | /* |
| 1368 | *---------------------------------------------------------------------- |
| 1369 | * |
| 1370 | * SetCwd -- |
| 1371 | * |
| 1372 | * Changes the current working directory to the passed path. |
| 1373 | * |
| 1374 | * Results: |
| 1375 | * Tcl_Alloc'ated string with the normalized path of the |
| 1376 | * current working directory. |
| 1377 | * |
| 1378 | * Side effects: |
| 1379 | * Kills server if unable to change to given directory |
| 1380 | * or if the absolute normalized path of the directory |
| 1381 | * could not be resolved. |
| 1382 | * |
| 1383 | *---------------------------------------------------------------------- |
| 1384 | */ |
| 1385 | |
| 1386 | static const char * |
| 1387 | SetCwd(const char *path) |
| 1388 | { |
| 1389 | Tcl_Obj *pathObj; |
| 1390 | |
| 1391 | NS_NONNULL_ASSERT(path != NULL)((void) (0)); |
| 1392 | |
| 1393 | pathObj = Tcl_NewStringObj(path, -1); |
| 1394 | Tcl_IncrRefCount(pathObj)++(pathObj)->refCount; |
| 1395 | if (Tcl_FSChdir(pathObj) == -1) { |
| 1396 | Ns_Fatal("nsmain: chdir(%s) failed: '%s'", path, strerror(Tcl_GetErrno())); |
| 1397 | } |
| 1398 | Tcl_DecrRefCount(pathObj)do { Tcl_Obj *_objPtr = (pathObj); if (_objPtr->refCount-- <= 1) { TclFreeObj(_objPtr); } } while(0); |
| 1399 | pathObj = Tcl_FSGetCwd(NULL((void*)0)); |
| 1400 | if (pathObj == NULL((void*)0)) { |
| 1401 | Ns_Fatal("nsmain: can't resolve home directory path"); |
| 1402 | } |
| 1403 | |
| 1404 | return Tcl_FSGetTranslatedStringPath(NULL((void*)0), pathObj); |
| 1405 | } |
| 1406 | |
| 1407 | |
| 1408 | /* |
| 1409 | *---------------------------------------------------------------------- |
| 1410 | * |
| 1411 | * CmdThread -- |
| 1412 | * |
| 1413 | * Run a command shell accepting commands on standard input. |
| 1414 | * |
| 1415 | * Results: |
| 1416 | * None. |
| 1417 | * |
| 1418 | * Side effects: |
| 1419 | * None. |
| 1420 | * |
| 1421 | *---------------------------------------------------------------------- |
| 1422 | */ |
| 1423 | |
| 1424 | static void |
| 1425 | CmdThread(void *arg) |
| 1426 | { |
| 1427 | const Args *cmd = arg; |
| 1428 | |
| 1429 | Ns_ThreadSetName("-command-"); |
| 1430 | |
| 1431 | (void)Ns_WaitForStartup(); |
| 1432 | |
| 1433 | NsRestoreSignals(); |
| 1434 | NsBlockSignal(NS_SIGPIPE(13)); |
| 1435 | |
| 1436 | #if defined(__APPLE__) && defined(__MACH__) |
| 1437 | signal(SIGPIPE13, SIG_IGN((__sighandler_t) 1)); |
| 1438 | #endif |
| 1439 | |
| 1440 | Tcl_Main(cmd->argc, cmd->argv, NsTclAppInit)Tcl_MainEx(cmd->argc, cmd->argv, NsTclAppInit, ((Tcl_CreateInterp )())); |
| 1441 | } |
| 1442 | |
| 1443 | /* |
| 1444 | * Local Variables: |
| 1445 | * mode: c |
| 1446 | * c-basic-offset: 4 |
| 1447 | * fill-column: 78 |
| 1448 | * indent-tabs-mode: nil |
| 1449 | * End: |
| 1450 | */ |