os.c 9.62 KB
Newer Older
Danny Mayer's avatar
Danny Mayer committed
1
/*
2
 * Copyright (C) Internet Systems Consortium, Inc. ("ISC")
Danny Mayer's avatar
Danny Mayer committed
3
 *
4 5 6
 * This Source Code Form is subject to the terms of the Mozilla Public
 * License, v. 2.0. If a copy of the MPL was not distributed with this
 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
7 8 9
 *
 * See the COPYRIGHT file distributed with this work for additional
 * information regarding copyright ownership.
Danny Mayer's avatar
Danny Mayer committed
10 11 12 13
 */

#include <stdarg.h>

Evan Hunt's avatar
Evan Hunt committed
14
#include <sys/types.h>
Danny Mayer's avatar
Danny Mayer committed
15 16 17 18 19 20 21
#include <sys/stat.h>

#include <ctype.h>
#include <errno.h>
#include <io.h>
#include <process.h>
#include <fcntl.h>
22
#include <stdbool.h>
Danny Mayer's avatar
Danny Mayer committed
23 24 25 26 27 28 29 30
#include <stdio.h>
#include <stdlib.h>
#include <syslog.h>

#include <isc/print.h>
#include <isc/result.h>
#include <isc/string.h>
#include <isc/ntpaths.h>
31
#include <isc/util.h>
32
#include <isc/win32os.h>
Danny Mayer's avatar
Danny Mayer committed
33 34

#include <named/main.h>
35
#include <named/log.h>
Danny Mayer's avatar
Danny Mayer committed
36 37 38 39 40
#include <named/os.h>
#include <named/globals.h>
#include <named/ntservice.h>


41
static char *lockfile = NULL;
Danny Mayer's avatar
Danny Mayer committed
42
static char *pidfile = NULL;
43
static int devnullfd = -1;
44
static int lockfilefd = -1;
Danny Mayer's avatar
Danny Mayer committed
45 46 47

static BOOL Initialized = FALSE;

Automatic Updater's avatar
Automatic Updater committed
48
static char *version_error =
49 50
	"named requires Windows 2000 Service Pack 2 or later to run correctly";

Danny Mayer's avatar
Danny Mayer committed
51
void
52
named_paths_init(void) {
53
	if (!Initialized)
Danny Mayer's avatar
Danny Mayer committed
54
		isc_ntpaths_init();
55

56 57 58 59 60
	named_g_conffile = isc_ntpaths_get(NAMED_CONF_PATH);
	named_g_defaultpidfile = isc_ntpaths_get(NAMED_PID_PATH);
	named_g_defaultlockfile = isc_ntpaths_get(NAMED_LOCK_PATH);
	named_g_keyfile = isc_ntpaths_get(RNDC_KEY_PATH);
	named_g_defaultsessionkeyfile = isc_ntpaths_get(SESSION_KEY_PATH);
61
	named_g_defaultbindkeys = isc_ntpaths_get(BIND_KEYS_PATH);
Danny Mayer's avatar
Danny Mayer committed
62 63 64 65

	Initialized = TRUE;
}

66 67 68 69 70 71 72 73
/*
 * Due to Knowledge base article Q263823 we need to make sure that
 * Windows 2000 systems have Service Pack 2 or later installed and
 * warn when it isn't.
 */
static void
version_check(const char *progname) {

74 75
	if ((isc_win32os_versioncheck(4, 0, 0, 0) >= 0) &&
	    (isc_win32os_versioncheck(5, 0, 0, 0) < 0))
76
		return;	/* No problem with Version 4.0 */
77
	if (isc_win32os_versioncheck(5, 0, 2, 0) < 0)
78 79
		if (ntservice_isservice())
			NTReportError(progname, version_error);
Automatic Updater's avatar
Automatic Updater committed
80
		else
81 82
			fprintf(stderr, "%s\n", version_error);
}
Danny Mayer's avatar
Danny Mayer committed
83 84 85 86 87 88 89 90 91 92 93 94 95 96

static void
setup_syslog(const char *progname) {
	int options;

	options = LOG_PID;
#ifdef LOG_NDELAY
	options |= LOG_NDELAY;
#endif

	openlog(progname, options, LOG_DAEMON);
}

void
97 98
named_os_init(const char *progname) {
	named_paths_init();
Danny Mayer's avatar
Danny Mayer committed
99
	setup_syslog(progname);
100 101
	/*
	 * XXXMPA. We may need to split ntservice_init() in two and
102
	 * just mark as running in named_os_started().  If we do that
103 104 105 106 107 108 109
	 * this is where the first part of ntservice_init() should be
	 * called from.
	 *
	 * XXX970 Remove comment if no problems by 9.7.0.
	 *
	 * ntservice_init();
	 */
110
	version_check(progname);
111 112 113 114 115 116 117 118 119 120
	/*
	 * If running in a Cygwin environment, clear the SEM_NOGPFAULTERRORBOX
	 * bit in the process error mode to prevent Cygwin from concealing
	 * non-abort() crashes, giving Windows Error Reporting a chance to
	 * handle such crashes.  This is done to ensure all crashes triggered
	 * by system tests can be detected.
	 */
	if (getenv("CYGWIN") != NULL) {
		SetErrorMode(GetErrorMode() & ~SEM_NOGPFAULTERRORBOX);
	}
Danny Mayer's avatar
Danny Mayer committed
121 122 123
}

void
124
named_os_daemonize(void) {
Danny Mayer's avatar
Danny Mayer committed
125 126 127 128
	/*
	 * Try to set stdin, stdout, and stderr to /dev/null, but press
	 * on even if it fails.
	 */
129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145
	if (devnullfd != -1) {
		if (devnullfd != _fileno(stdin)) {
			close(_fileno(stdin));
			(void)_dup2(devnullfd, _fileno(stdin));
		}
		if (devnullfd != _fileno(stdout)) {
			close(_fileno(stdout));
			(void)_dup2(devnullfd, _fileno(stdout));
		}
		if (devnullfd != _fileno(stderr)) {
			close(_fileno(stderr));
			(void)_dup2(devnullfd, _fileno(stderr));
		}
	}
}

void
146
named_os_opendevnull(void) {
147 148 149 150
	devnullfd = open("NUL", O_RDWR, 0);
}

void
151
named_os_closedevnull(void) {
152 153 154 155 156
	if (devnullfd != _fileno(stdin) &&
	    devnullfd != _fileno(stdout) &&
	    devnullfd != _fileno(stderr)) {
		close(devnullfd);
		devnullfd = -1;
Danny Mayer's avatar
Danny Mayer committed
157 158 159 160
	}
}

void
161
named_os_chroot(const char *root) {
Mark Andrews's avatar
Mark Andrews committed
162
	if (root != NULL)
163
		named_main_earlyfatal("chroot(): isn't supported by Win32 API");
Danny Mayer's avatar
Danny Mayer committed
164 165 166
}

void
167
named_os_inituserinfo(const char *username) {
Danny Mayer's avatar
Danny Mayer committed
168 169 170
}

void
171
named_os_changeuser(void) {
Danny Mayer's avatar
Danny Mayer committed
172 173
}

174 175 176 177 178
unsigned int
ns_os_uid(void) {
	return (0);
}

179
void
180
named_os_adjustnofile(void) {
181 182
}

Danny Mayer's avatar
Danny Mayer committed
183
void
184
named_os_minprivs(void) {
Danny Mayer's avatar
Danny Mayer committed
185 186 187
}

static int
188
safe_open(const char *filename, int mode, bool append) {
Danny Mayer's avatar
Danny Mayer committed
189
	int fd;
Mark Andrews's avatar
Mark Andrews committed
190
	struct stat sb;
Danny Mayer's avatar
Danny Mayer committed
191

Mark Andrews's avatar
Mark Andrews committed
192 193
	if (stat(filename, &sb) == -1) {
		if (errno != ENOENT)
Danny Mayer's avatar
Danny Mayer committed
194
			return (-1);
Mark Andrews's avatar
Mark Andrews committed
195
	} else if ((sb.st_mode & S_IFREG) == 0)
Danny Mayer's avatar
Danny Mayer committed
196 197 198
		return (-1);

	if (append)
199
		fd = open(filename, O_WRONLY|O_CREAT|O_APPEND, mode);
Danny Mayer's avatar
Danny Mayer committed
200 201
	else {
		(void)unlink(filename);
202
		fd = open(filename, O_WRONLY|O_CREAT|O_EXCL, mode);
Danny Mayer's avatar
Danny Mayer committed
203 204 205 206 207 208 209 210 211 212 213 214 215
	}
	return (fd);
}

static void
cleanup_pidfile(void) {
	if (pidfile != NULL) {
		(void)unlink(pidfile);
		free(pidfile);
	}
	pidfile = NULL;
}

216 217
static void
cleanup_lockfile(void) {
218 219 220
	if (lockfilefd != -1) {
		close(lockfilefd);
		lockfilefd = -1;
221 222 223 224 225
	}

	if (lockfile != NULL) {
		int n = unlink(lockfile);
		if (n == -1 && errno != ENOENT)
226 227
			named_main_earlywarning("unlink '%s': failed",
						lockfile);
228 229 230 231 232
		free(lockfile);
		lockfile = NULL;
	}
}

233
FILE *
234
named_os_openfile(const char *filename, int mode, bool switch_user) {
235 236 237 238 239
	char strbuf[ISC_STRERRORSIZE];
	FILE *fp;
	int fd;

	UNUSED(switch_user);
240
	fd = safe_open(filename, mode, false);
241
	if (fd < 0) {
242
		strerror_s(strbuf, sizeof(strbuf), errno);
243 244
		named_main_earlywarning("could not open file '%s': %s",
					filename, strbuf);
245
		return (NULL);
246 247 248
	}

	fp = fdopen(fd, "w");
Evan Hunt's avatar
Evan Hunt committed
249
	if (fp == NULL) {
250
		strerror_s(strbuf, sizeof(strbuf), errno);
251 252
		named_main_earlywarning("could not fdopen() file '%s': %s",
					filename, strbuf);
253 254 255 256 257 258
		close(fd);
	}

	return (fp);
}

Danny Mayer's avatar
Danny Mayer committed
259
void
260
named_os_writepidfile(const char *filename, bool first_time) {
261
	FILE *pidlockfile;
Danny Mayer's avatar
Danny Mayer committed
262
	pid_t pid;
263
	char strbuf[ISC_STRERRORSIZE];
264
	void (*report)(const char *, ...);
Danny Mayer's avatar
Danny Mayer committed
265 266 267 268 269

	/*
	 * The caller must ensure any required synchronization.
	 */

270
	report = first_time ? named_main_earlyfatal : named_main_earlywarning;
271

Danny Mayer's avatar
Danny Mayer committed
272 273
	cleanup_pidfile();

274
	if (filename == NULL)
275
		return;
276

Evan Hunt's avatar
Evan Hunt committed
277
	pidfile = strdup(filename);
278
	if (pidfile == NULL) {
279
		strerror_s(strbuf, sizeof(strbuf), errno);
280
		(*report)("couldn't strdup() '%s': %s", filename, strbuf);
281
		return;
282
	}
Danny Mayer's avatar
Danny Mayer committed
283

284 285
	pidlockfile = named_os_openfile(filename,
					S_IRUSR|S_IWUSR|S_IRGRP|S_IROTH,
286
					false);
287
	if (pidlockfile == NULL) {
288 289 290
		free(pidfile);
		pidfile = NULL;
		return;
291
	}
Danny Mayer's avatar
Danny Mayer committed
292

293 294
	pid = getpid();

295
	if (fprintf(pidlockfile, "%ld\n", (long)pid) < 0) {
Mark Andrews's avatar
Mark Andrews committed
296
		(*report)("fprintf() to pid file '%s' failed", filename);
297
		(void)fclose(pidlockfile);
298 299 300
		cleanup_pidfile();
		return;
	}
301
	if (fflush(pidlockfile) == EOF) {
Mark Andrews's avatar
Mark Andrews committed
302
		(*report)("fflush() to pid file '%s' failed", filename);
303
		(void)fclose(pidlockfile);
304 305 306
		cleanup_pidfile();
		return;
	}
307
	(void)fclose(pidlockfile);
Danny Mayer's avatar
Danny Mayer committed
308 309
}

310
bool
311
named_os_issingleton(const char *filename) {
312
	char strbuf[ISC_STRERRORSIZE];
313 314
	OVERLAPPED o;

315
	if (lockfilefd != -1)
316
		return (true);
317

318
	if (strcasecmp(filename, "none") == 0)
319
		return (true);
320 321 322

	lockfile = strdup(filename);
	if (lockfile == NULL) {
323
		strerror_s(strbuf, sizeof(strbuf), errno);
324 325
		named_main_earlyfatal("couldn't allocate memory for '%s': %s",
				      filename, strbuf);
326 327
	}

328
	/*
329
	 * named_os_openfile() uses safeopen() which removes any existing
330 331
	 * files. We can't use that here.
	 */
332 333 334
	lockfilefd = open(filename, O_WRONLY | O_CREAT,
			  S_IRUSR|S_IWUSR|S_IRGRP|S_IROTH);
	if (lockfilefd == -1) {
335
		cleanup_lockfile();
336
		return (false);
337
	}
338 339 340

	memset(&o, 0, sizeof(o));
	/* Expect ERROR_LOCK_VIOLATION if already locked */
341
	if (!LockFileEx((HANDLE) _get_osfhandle(lockfilefd),
342 343
			LOCKFILE_EXCLUSIVE_LOCK | LOCKFILE_FAIL_IMMEDIATELY,
			0, 0, 1, &o)) {
344
		cleanup_lockfile();
345
		return (false);
346 347
	}

348
	return (true);
349 350
}

351

Danny Mayer's avatar
Danny Mayer committed
352
void
353
named_os_shutdown(void) {
Danny Mayer's avatar
Danny Mayer committed
354 355
	closelog();
	cleanup_pidfile();
356

357 358
	if (lockfilefd != -1) {
		(void) UnlockFile((HANDLE) _get_osfhandle(lockfilefd),
359 360
				  0, 0, 0, 1);
	}
361 362
	cleanup_lockfile();

Danny Mayer's avatar
Danny Mayer committed
363 364
	ntservice_shutdown();	/* This MUST be the last thing done */
}
365 366

isc_result_t
367
named_os_gethostname(char *buf, size_t len) {
Mark Andrews's avatar
Mark Andrews committed
368
	int n;
369

370
	n = gethostname(buf, (int)len);
371
	return ((n == 0) ? ISC_R_SUCCESS : ISC_R_FAILURE);
372
}
373

374
void
375
named_os_shutdownmsg(char *command, isc_buffer_t *text) {
376 377 378
	UNUSED(command);
	UNUSED(text);
}
379 380

void
381
named_os_tzset(void) {
382 383 384 385
#ifdef HAVE_TZSET
	tzset();
#endif
}
386 387

void
388
named_os_started(void) {
389
	ntservice_init();
390
}
391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462

static char unamebuf[BUFSIZ];
static char *unamep = NULL;

static void
getuname(void) {
	DWORD fvilen;
	char *fvi;
	VS_FIXEDFILEINFO *ffi;
	UINT ffilen;
	SYSTEM_INFO sysinfo;
	char *arch;

	fvi = NULL;
	fvilen = GetFileVersionInfoSize("kernel32.dll", 0);
	if (fvilen == 0) {
		goto err;
	}
	fvi = (char *)malloc(fvilen);
	if (fvi == NULL) {
		goto err;
	}
	memset(fvi, 0, fvilen);
	if (GetFileVersionInfo("kernel32.dll", 0, fvilen, fvi) == 0) {
		goto err;
	}
	ffi = NULL;
	ffilen = 0;
	if ((VerQueryValue(fvi, "\\", &ffi, &ffilen) == 0) ||
	    (ffi == NULL) || (ffilen == 0)) {
		goto err;
	}
	memset(&sysinfo, 0, sizeof(sysinfo));
	GetSystemInfo(&sysinfo);
	switch (sysinfo.wProcessorArchitecture) {
	case PROCESSOR_ARCHITECTURE_INTEL:
		arch = "x86";
		break;
	case PROCESSOR_ARCHITECTURE_ARM:
		arch = "arm";
		break;
	case PROCESSOR_ARCHITECTURE_IA64:
		arch = "ia64";
		break;
	case PROCESSOR_ARCHITECTURE_AMD64:
		arch = "x64";
		break;
	default:
		arch = "unknown architecture";
		break;
	}

	snprintf(unamebuf, sizeof(unamebuf),
		 "Windows %d %d build %d %d for %s\n",
		 (ffi->dwProductVersionMS >> 16) & 0xffff,
		 ffi->dwProductVersionMS & 0xffff,
		 (ffi->dwProductVersionLS >> 16) & 0xffff,
		 ffi->dwProductVersionLS & 0xffff,
		 arch);

    err:
	if (fvi != NULL) {
		free(fvi);
	}
	unamep = unamebuf;
}

/*
 * GetVersionEx() returns 6.2 (aka Windows 8.1) since it was obsoleted
 * so we had to switch to the recommended way to get the Windows version.
 */
char *
463
named_os_uname(void) {
464 465 466 467
	if (unamep == NULL)
		getuname();
	return (unamep);
}