posix_w32.c 17.2 KB
Newer Older
1
/*
Edward Thomson committed
2
 * Copyright (C) the libgit2 contributors. All rights reserved.
Vicent Marti committed
3 4 5 6
 *
 * This file is part of libgit2, distributed under the GNU GPL v2 with
 * a Linking Exception. For full terms see the included COPYING file.
 */
7
#include "../posix.h"
Russell Belfer committed
8
#include "../fileops.h"
9
#include "path.h"
10
#include "path_w32.h"
11
#include "utf-conv.h"
12
#include "repository.h"
13
#include "reparse.h"
Vicent Marti committed
14
#include <errno.h>
15
#include <io.h>
16
#include <fcntl.h>
17
#include <ws2tcpip.h>
Vicent Marti committed
18

19
#ifndef FILE_NAME_NORMALIZED
20 21 22
# define FILE_NAME_NORMALIZED 0
#endif

23 24 25 26
#ifndef IO_REPARSE_TAG_SYMLINK
#define IO_REPARSE_TAG_SYMLINK (0xA000000CL)
#endif

27 28 29 30 31 32 33 34 35
/* Options which we always provide to _wopen.
 *
 * _O_BINARY - Raw access; no translation of CR or LF characters
 * _O_NOINHERIT - Do not mark the created handle as inheritable by child processes.
 *    The Windows default is 'not inheritable', but the CRT's default (following
 *    POSIX convention) is 'inheritable'. We have no desire for our handles to be
 *    inheritable on Windows, so specify the flag to get default behavior back. */
#define STANDARD_OPEN_FLAGS (_O_BINARY | _O_NOINHERIT)

36 37 38
/* GetFinalPathNameByHandleW signature */
typedef DWORD(WINAPI *PFGetFinalPathNameByHandleW)(HANDLE, LPWSTR, DWORD, DWORD);

39 40 41 42 43 44 45 46 47
int p_ftruncate(int fd, long size)
{
#if defined(_MSC_VER) && _MSC_VER >= 1500
	return _chsize_s(fd, size);
#else
	return _chsize(fd, size);
#endif
}

48 49 50 51 52 53
int p_mkdir(const char *path, mode_t mode)
{
	git_win32_path buf;

	GIT_UNUSED(mode);

54
	if (git_win32_path_from_utf8(buf, path) < 0)
55 56 57 58 59
		return -1;

	return _wmkdir(buf);
}

60 61 62 63 64 65 66 67
int p_link(const char *old, const char *new)
{
	GIT_UNUSED(old);
	GIT_UNUSED(new);
	errno = ENOSYS;
	return -1;
}

Vicent Marti committed
68 69
int p_unlink(const char *path)
{
70
	git_win32_path buf;
71 72
	int error;

73
	if (git_win32_path_from_utf8(buf, path) < 0)
74 75 76 77 78 79
		return -1;

	error = _wunlink(buf);

	/* If the file could not be deleted because it was
	 * read-only, clear the bit and try again */
80
	if (error == -1 && errno == EACCES) {
81 82 83 84 85
		_wchmod(buf, 0666);
		error = _wunlink(buf);
	}

	return error;
Vicent Marti committed
86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118
}

int p_fsync(int fd)
{
	HANDLE fh = (HANDLE)_get_osfhandle(fd);

	if (fh == INVALID_HANDLE_VALUE) {
		errno = EBADF;
		return -1;
	}

	if (!FlushFileBuffers(fh)) {
		DWORD code = GetLastError();

		if (code == ERROR_INVALID_HANDLE)
			errno = EINVAL;
		else
			errno = EIO;

		return -1;
	}

	return 0;
}

GIT_INLINE(time_t) filetime_to_time_t(const FILETIME *ft)
{
	long long winTime = ((long long)ft->dwHighDateTime << 32) + ft->dwLowDateTime;
	winTime -= 116444736000000000LL; /* Windows to Unix Epoch conversion */
	winTime /= 10000000;		 /* Nano to seconds resolution */
	return (time_t)winTime;
}

119 120 121 122 123
static bool path_is_volume(wchar_t *target, size_t target_len)
{
	return (target_len && wcsncmp(target, L"\\??\\Volume{", 11) == 0);
}

124 125 126 127 128
/* On success, returns the length, in characters, of the path stored in dest.
 * On failure, returns a negative value. */
static int readlink_w(
	git_win32_path dest,
	const git_win32_path path)
Vicent Marti committed
129
{
130 131 132 133 134 135 136 137
	BYTE buf[MAXIMUM_REPARSE_DATA_BUFFER_SIZE];
	GIT_REPARSE_DATA_BUFFER *reparse_buf = (GIT_REPARSE_DATA_BUFFER *)buf;
	HANDLE handle = NULL;
	DWORD ioctl_ret;
	wchar_t *target;
	size_t target_len;

	int error = -1;
138

139 140 141 142
	handle = CreateFileW(path, GENERIC_READ,
		FILE_SHARE_READ | FILE_SHARE_DELETE, NULL, OPEN_EXISTING,
		FILE_FLAG_OPEN_REPARSE_POINT | FILE_FLAG_BACKUP_SEMANTICS, NULL);

143
	if (handle == INVALID_HANDLE_VALUE) {
144
		errno = ENOENT;
145
		return -1;
146 147 148 149 150 151 152
	}

	if (!DeviceIoControl(handle, FSCTL_GET_REPARSE_POINT, NULL, 0,
		reparse_buf, sizeof(buf), &ioctl_ret, NULL)) {
		errno = EINVAL;
		goto on_error;
	}
153

154 155 156 157 158 159 160 161 162 163 164 165 166 167
	switch (reparse_buf->ReparseTag) {
	case IO_REPARSE_TAG_SYMLINK:
		target = reparse_buf->SymbolicLinkReparseBuffer.PathBuffer +
			(reparse_buf->SymbolicLinkReparseBuffer.SubstituteNameOffset / sizeof(WCHAR));
		target_len = reparse_buf->SymbolicLinkReparseBuffer.SubstituteNameLength / sizeof(WCHAR);
		break;
	case IO_REPARSE_TAG_MOUNT_POINT:
		target = reparse_buf->MountPointReparseBuffer.PathBuffer +
			(reparse_buf->MountPointReparseBuffer.SubstituteNameOffset / sizeof(WCHAR));
		target_len = reparse_buf->MountPointReparseBuffer.SubstituteNameLength / sizeof(WCHAR);
		break;
	default:
		errno = EINVAL;
		goto on_error;
168
	}
Vicent Marti committed
169

170 171 172 173 174 175 176
	if (path_is_volume(target, target_len)) {
		/* This path is a reparse point that represents another volume mounted
		 * at this location, it is not a symbolic link our input was canonical.
		 */
		errno = EINVAL;
		error = -1;
	} else if (target_len) {
177
		/* The path may need to have a prefix removed. */
178
		target_len = git_win32__canonicalize_path(target, target_len);
179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202

		/* Need one additional character in the target buffer
		 * for the terminating NULL. */
		if (GIT_WIN_PATH_UTF16 > target_len) {
			wcscpy(dest, target);
			error = (int)target_len;
		}
	}

on_error:
	CloseHandle(handle);
	return error;
}

#define WIN32_IS_WSEP(CH) ((CH) == L'/' || (CH) == L'\\')

static int lstat_w(
	wchar_t *path,
	struct stat *buf,
	bool posix_enotdir)
{
	WIN32_FILE_ATTRIBUTE_DATA fdata;

	if (GetFileAttributesExW(path, GetFileExInfoStandard, &fdata)) {
Vicent Marti committed
203 204
		int fMode = S_IREAD;

205 206 207
		if (!buf)
			return 0;

Vicent Marti committed
208 209 210 211 212 213 214 215 216 217 218 219 220
		if (fdata.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
			fMode |= S_IFDIR;
		else
			fMode |= S_IFREG;

		if (!(fdata.dwFileAttributes & FILE_ATTRIBUTE_READONLY))
			fMode |= S_IWRITE;

		buf->st_ino = 0;
		buf->st_gid = 0;
		buf->st_uid = 0;
		buf->st_nlink = 1;
		buf->st_mode = (mode_t)fMode;
nulltoken committed
221
		buf->st_size = ((git_off_t)fdata.nFileSizeHigh << 32) + fdata.nFileSizeLow;
Vicent Marti committed
222 223 224 225
		buf->st_dev = buf->st_rdev = (_getdrive() - 1);
		buf->st_atime = filetime_to_time_t(&(fdata.ftLastAccessTime));
		buf->st_mtime = filetime_to_time_t(&(fdata.ftLastWriteTime));
		buf->st_ctime = filetime_to_time_t(&(fdata.ftCreationTime));
226

227 228
		if (fdata.dwFileAttributes & FILE_ATTRIBUTE_REPARSE_POINT) {
			git_win32_path target;
229

230 231
			if (readlink_w(target, path) >= 0) {
				buf->st_mode = (buf->st_mode & ~S_IFMT) | S_IFLNK;
232

233 234 235 236 237
				/* st_size gets the UTF-8 length of the target name, in bytes,
				 * not counting the NULL terminator */
				if ((buf->st_size = git__utf16_to_8(NULL, 0, target)) < 0)
					return -1;
			}
238
		}
239

240
		return 0;
Vicent Marti committed
241 242
	}

Eduardo Bart committed
243
	errno = ENOENT;
244

245 246
	/* To match POSIX behavior, set ENOTDIR when any of the folders in the
	 * file path is a regular file, otherwise set ENOENT.
247
	 */
Eduardo Bart committed
248
	if (posix_enotdir) {
249 250
		size_t path_len = wcslen(path);

251 252
		/* scan up path until we find an existing item */
		while (1) {
253 254
			DWORD attrs;

255
			/* remove last directory component */
256
			for (path_len--; path_len > 0 && !WIN32_IS_WSEP(path[path_len]); path_len--);
257

258
			if (path_len <= 0)
259 260
				break;

261 262
			path[path_len] = L'\0';
			attrs = GetFileAttributesW(path);
263

264
			if (attrs != INVALID_FILE_ATTRIBUTES) {
265
				if (!(attrs & FILE_ATTRIBUTE_DIRECTORY))
Eduardo Bart committed
266
					errno = ENOTDIR;
267
				break;
268 269 270 271
			}
		}
	}

272
	return -1;
Vicent Marti committed
273 274
}

275
static int do_lstat(const char *path, struct stat *buf, bool posixly_correct)
Vicent Marti committed
276
{
277 278 279
	git_win32_path path_w;
	int len;

280
	if ((len = git_win32_path_from_utf8(path_w, path)) < 0)
281 282 283 284 285
		return -1;

	git_win32__path_trim_end(path_w, len);

	return lstat_w(path_w, buf, posixly_correct);
286
}
Vicent Marti committed
287

288
int p_lstat(const char *filename, struct stat *buf)
289
{
290
	return do_lstat(filename, buf, false);
Vicent Marti committed
291 292
}

293
int p_lstat_posixly(const char *filename, struct stat *buf)
294
{
295
	return do_lstat(filename, buf, true);
296
}
297

298
int p_readlink(const char *path, char *buf, size_t bufsiz)
Vicent Marti committed
299
{
300 301 302 303 304 305 306 307 308 309 310
	git_win32_path path_w, target_w;
	git_win32_utf8_path target;
	int len;

	/* readlink(2) does not NULL-terminate the string written
	 * to the target buffer. Furthermore, the target buffer need
	 * not be large enough to hold the entire result. A truncated
	 * result should be written in this case. Since this truncation
	 * could occur in the middle of the encoding of a code point,
	 * we need to buffer the result on the stack. */

311
	if (git_win32_path_from_utf8(path_w, path) < 0 ||
312 313 314
		readlink_w(target_w, path_w) < 0 ||
		(len = git_win32_path_to_utf8(target, target_w)) < 0)
		return -1;
315

316 317
	bufsiz = min((size_t)len, bufsiz);
	memcpy(buf, target, bufsiz);
318

319
	return (int)bufsiz;
Vicent Marti committed
320 321
}

Ben Straub committed
322 323
int p_symlink(const char *old, const char *new)
{
324 325 326 327
	/* Real symlinks on NTFS require admin privileges. Until this changes,
	 * libgit2 just creates a text file with the link target in the contents.
	 */
	return git_futils_fake_symlink(old, new);
Ben Straub committed
328 329
}

330
int p_open(const char *path, int flags, ...)
331
{
332
	git_win32_path buf;
333 334
	mode_t mode = 0;

335
	if (git_win32_path_from_utf8(buf, path) < 0)
336
		return -1;
337

338
	if (flags & O_CREAT) {
339 340 341
		va_list arg_list;

		va_start(arg_list, flags);
liyuray committed
342
		mode = (mode_t)va_arg(arg_list, int);
343 344 345
		va_end(arg_list);
	}

346
	return _wopen(buf, flags | STANDARD_OPEN_FLAGS, mode);
347 348
}

349
int p_creat(const char *path, mode_t mode)
350
{
351
	git_win32_path buf;
352

353
	if (git_win32_path_from_utf8(buf, path) < 0)
354 355
		return -1;

356
	return _wopen(buf, _O_WRONLY | _O_CREAT | _O_TRUNC | STANDARD_OPEN_FLAGS, mode);
357 358 359 360
}

int p_getcwd(char *buffer_out, size_t size)
{
361 362
	git_win32_path buf;
	wchar_t *cwd = _wgetcwd(buf, GIT_WIN_PATH_UTF16);
363

364
	if (!cwd)
365 366
		return -1;

367 368 369
	/* Convert the working directory back to UTF-8 */
	if (git__utf16_to_8(buffer_out, size, cwd) < 0) {
		DWORD code = GetLastError();
370

371 372 373 374
		if (code == ERROR_INSUFFICIENT_BUFFER)
			errno = ERANGE;
		else
			errno = EINVAL;
375

376 377
		return -1;
	}
378

379
	return 0;
380 381
}

382 383 384 385 386 387 388 389 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
/*
 * Returns the address of the GetFinalPathNameByHandleW function.
 * This function is available on Windows Vista and higher.
 */
static PFGetFinalPathNameByHandleW get_fpnbyhandle(void)
{
	static PFGetFinalPathNameByHandleW pFunc = NULL;
	PFGetFinalPathNameByHandleW toReturn = pFunc;

	if (!toReturn) {
		HMODULE hModule = GetModuleHandleW(L"kernel32");

		if (hModule)
			toReturn = (PFGetFinalPathNameByHandleW)GetProcAddress(hModule, "GetFinalPathNameByHandleW");

		pFunc = toReturn;
	}

	assert(toReturn);

	return toReturn;
}

static int getfinalpath_w(
	git_win32_path dest,
	const wchar_t *path)
{
	PFGetFinalPathNameByHandleW pgfp = get_fpnbyhandle();
	HANDLE hFile;
	DWORD dwChars;

	if (!pgfp)
		return -1;

	/* Use FILE_FLAG_BACKUP_SEMANTICS so we can open a directory. Do not
	* specify FILE_FLAG_OPEN_REPARSE_POINT; we want to open a handle to the
	* target of the link. */
	hFile = CreateFileW(path, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_DELETE,
		NULL, OPEN_EXISTING, FILE_FLAG_BACKUP_SEMANTICS, NULL);

422
	if (INVALID_HANDLE_VALUE == hFile)
423 424 425 426
		return -1;

	/* Call GetFinalPathNameByHandle */
	dwChars = pgfp(hFile, dest, GIT_WIN_PATH_UTF16, FILE_NAME_NORMALIZED);
427
	CloseHandle(hFile);
428

429
	if (!dwChars || dwChars >= GIT_WIN_PATH_UTF16)
430 431 432
		return -1;

	/* The path may be delivered to us with a prefix; canonicalize */
433
	return (int)git_win32__canonicalize_path(dest, dwChars);
434 435 436 437 438 439 440 441 442 443 444 445
}

static int follow_and_lstat_link(git_win32_path path, struct stat* buf)
{
	git_win32_path target_w;

	if (getfinalpath_w(target_w, path) < 0)
		return -1;

	return lstat_w(target_w, buf, false);
}

446 447
int p_stat(const char* path, struct stat* buf)
{
448 449
	git_win32_path path_w;
	int len;
450

451
	if ((len = git_win32_path_from_utf8(path_w, path)) < 0)
452
		return -1;
453

454
	git_win32__path_trim_end(path_w, len);
455

456 457 458 459 460 461 462 463 464
	if (lstat_w(path_w, buf, false) < 0)
		return -1;

	/* The item is a symbolic link or mount point. No need to iterate
	 * to follow multiple links; use GetFinalPathNameFromHandle. */
	if (S_ISLNK(buf->st_mode))
		return follow_and_lstat_link(path_w, buf);

	return 0;
465 466 467 468
}

int p_chdir(const char* path)
{
469
	git_win32_path buf;
470

471
	if (git_win32_path_from_utf8(buf, path) < 0)
472 473
		return -1;

474
	return _wchdir(buf);
475 476
}

477
int p_chmod(const char* path, mode_t mode)
478
{
479
	git_win32_path buf;
480

481
	if (git_win32_path_from_utf8(buf, path) < 0)
482 483
		return -1;

484
	return _wchmod(buf, mode);
485 486 487 488
}

int p_rmdir(const char* path)
{
489
	git_win32_path buf;
490 491
	int error;

492
	if (git_win32_path_from_utf8(buf, path) < 0)
493
		return -1;
494 495 496

	error = _wrmdir(buf);

497
	if (error == -1) {
498 499 500 501 502 503 504 505
		switch (GetLastError()) {
			/* _wrmdir() is documented to return EACCES if "A program has an open
			 * handle to the directory."  This sounds like what everybody else calls
			 * EBUSY.  Let's convert appropriate error codes.
			 */
			case ERROR_SHARING_VIOLATION:
				errno = EBUSY;
				break;
506

507 508 509 510 511 512
			/* This error can be returned when trying to rmdir an extant file. */
			case ERROR_DIRECTORY:
				errno = ENOTDIR;
				break;
		}
	}
513

514
	return error;
Vicent Marti committed
515 516
}

517
char *p_realpath(const char *orig_path, char *buffer)
518
{
519
	git_win32_path orig_path_w, buffer_w;
520

521
	if (git_win32_path_from_utf8(orig_path_w, orig_path) < 0)
522
		return NULL;
523

524 525 526 527 528 529 530 531
	/* Note that if the path provided is a relative path, then the current directory
	 * is used to resolve the path -- which is a concurrency issue because the current
	 * directory is a process-wide variable. */
	if (!GetFullPathNameW(orig_path_w, GIT_WIN_PATH_UTF16, buffer_w, NULL)) {
		if (GetLastError() == ERROR_INSUFFICIENT_BUFFER)
			errno = ENAMETOOLONG;
		else
			errno = EINVAL;
532

533 534
		return NULL;
	}
535

536
	/* The path must exist. */
537
	if (GetFileAttributesW(buffer_w) == INVALID_FILE_ATTRIBUTES) {
538
		errno = ENOENT;
539
		return NULL;
540
	}
541

542 543 544
	if (!buffer && !(buffer = git__malloc(GIT_WIN_PATH_UTF8))) {
		errno = ENOMEM;
		return NULL;
545 546
	}

547 548 549 550 551 552
	/* Convert the path to UTF-8. If the caller provided a buffer, then it
	 * is assumed to be GIT_WIN_PATH_UTF8 characters in size. If it isn't,
	 * then we may overflow. */
	if (git_win32_path_to_utf8(buffer, buffer_w) < 0)
		return NULL;

553
	git_path_mkposix(buffer);
554

555
	return buffer;
556 557
}

558 559
int p_vsnprintf(char *buffer, size_t count, const char *format, va_list argptr)
{
560
#if defined(_MSC_VER)
561 562
	int len;

563 564 565 566 567 568 569 570 571 572
	if (count == 0)
		return _vscprintf(format, argptr);

	#if _MSC_VER >= 1500
	len = _vsnprintf_s(buffer, count, _TRUNCATE, format, argptr);
	#else
	len = _vsnprintf(buffer, count, format, argptr);
	#endif

	if (len < 0)
573
		return _vscprintf(format, argptr);
574 575

	return len;
576 577 578 579
#else /* MinGW */
	return vsnprintf(buffer, count, format, argptr);
#endif
}
580 581 582 583 584 585 586 587 588 589 590 591

int p_snprintf(char *buffer, size_t count, const char *format, ...)
{
	va_list va;
	int r;

	va_start(va, format);
	r = p_vsnprintf(buffer, count, format, va);
	va_end(va);

	return r;
}
592

593
/* TODO: wut? */
594 595
int p_mkstemp(char *tmp_path)
{
596
#if defined(_MSC_VER) && _MSC_VER >= 1500
597
	if (_mktemp_s(tmp_path, strlen(tmp_path) + 1) != 0)
598
		return -1;
599
#else
Vicent Marti committed
600
	if (_mktemp(tmp_path) == NULL)
601
		return -1;
Vicent Marti committed
602
#endif
603

604
	return p_open(tmp_path, O_RDWR | O_CREAT | O_EXCL, 0744); //-V536
605
}
606

607
int p_access(const char* path, mode_t mode)
608
{
609
	git_win32_path buf;
610

611
	if (git_win32_path_from_utf8(buf, path) < 0)
612 613
		return -1;

614
	return _waccess(buf, mode);
615
}
616

617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641
static int ensure_writable(wchar_t *fpath)
{
	DWORD attrs;

	attrs = GetFileAttributesW(fpath);
	if (attrs == INVALID_FILE_ATTRIBUTES) {
		if (GetLastError() == ERROR_FILE_NOT_FOUND)
			return 0;

		giterr_set(GITERR_OS, "failed to get attributes");
		return -1;
	}

	if (!(attrs & FILE_ATTRIBUTE_READONLY))
		return 0;

	attrs &= ~FILE_ATTRIBUTE_READONLY;
	if (!SetFileAttributesW(fpath, attrs)) {
		giterr_set(GITERR_OS, "failed to set attributes");
		return -1;
	}

	return 0;
}

642
int p_rename(const char *from, const char *to)
643
{
644 645
	git_win32_path wfrom;
	git_win32_path wto;
646 647 648
	int rename_tries;
	int rename_succeeded;
	int error;
649

650 651
	if (git_win32_path_from_utf8(wfrom, from) < 0 ||
		git_win32_path_from_utf8(wto, to) < 0)
652
		return -1;
653

654 655 656 657
	/* wait up to 50ms if file is locked by another thread or process */
	rename_tries = 0;
	rename_succeeded = 0;
	while (rename_tries < 10) {
658 659
		if (ensure_writable(wto) == 0 &&
		    MoveFileExW(wfrom, wto, MOVEFILE_REPLACE_EXISTING | MOVEFILE_COPY_ALLOWED) != 0) {
660 661 662 663 664 665 666 667 668 669 670 671 672
			rename_succeeded = 1;
			break;
		}
		
		error = GetLastError();
		if (error == ERROR_SHARING_VIOLATION || error == ERROR_ACCESS_DENIED) {
			Sleep(5);
			rename_tries++;
		} else
			break;
	}
	
	return rename_succeeded ? 0 : -1;
673
}
674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689

int p_recv(GIT_SOCKET socket, void *buffer, size_t length, int flags)
{
	if ((size_t)((int)length) != length)
		return -1; /* giterr_set will be done by caller */

	return recv(socket, buffer, (int)length, flags);
}

int p_send(GIT_SOCKET socket, const void *buffer, size_t length, int flags)
{
	if ((size_t)((int)length) != length)
		return -1; /* giterr_set will be done by caller */

	return send(socket, buffer, (int)length, flags);
}
Ben Straub committed
690 691 692 693 694

/**
 * Borrowed from http://old.nabble.com/Porting-localtime_r-and-gmtime_r-td15282276.html
 * On Win32, `gmtime_r` doesn't exist but `gmtime` is threadsafe, so we can use that
 */
Linquize committed
695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717
struct tm *
p_localtime_r (const time_t *timer, struct tm *result)
{
	struct tm *local_result;
	local_result = localtime (timer);

	if (local_result == NULL || result == NULL)
		return NULL;

	memcpy (result, local_result, sizeof (struct tm));
	return result;
}
struct tm *
p_gmtime_r (const time_t *timer, struct tm *result)
{
	struct tm *local_result;
	local_result = gmtime (timer);

	if (local_result == NULL || result == NULL)
		return NULL;

	memcpy (result, local_result, sizeof (struct tm));
	return result;
Ben Straub committed
718 719
}

720
int p_inet_pton(int af, const char *src, void *dst)
721
{
722 723 724 725
	struct sockaddr_storage sin;
	void *addr;
	int sin_len = sizeof(struct sockaddr_storage), addr_len;
	int error = 0;
726

727 728 729 730 731 732 733 734 735
	if (af == AF_INET) {
		addr = &((struct sockaddr_in *)&sin)->sin_addr;
		addr_len = sizeof(struct in_addr);
	} else if (af == AF_INET6) {
		addr = &((struct sockaddr_in6 *)&sin)->sin6_addr;
		addr_len = sizeof(struct in6_addr);
	} else {
		errno = EAFNOSUPPORT;
		return -1;
736 737
	}

738 739 740
	if ((error = WSAStringToAddressA((LPSTR)src, af, NULL, (LPSOCKADDR)&sin, &sin_len)) == 0) {
		memcpy(dst, addr, addr_len);
		return 1;
741 742
	}

743 744 745 746 747 748 749 750 751
	switch(WSAGetLastError()) {
	case WSAEINVAL:
		return 0;
	case WSAEFAULT:
		errno = ENOSPC;
		return -1;
	case WSA_NOT_ENOUGH_MEMORY:
		errno = ENOMEM;
		return -1;
752 753
	}

754 755
	errno = EINVAL;
	return -1;
756
}