297 lines
8.9 KiB
C
297 lines
8.9 KiB
C
|
/*-
|
||
|
|
* Copyright (c) 2009 Michihiro NAKAJIMA
|
||
|
|
* All rights reserved.
|
||
|
|
*
|
||
|
|
* Redistribution and use in source and binary forms, with or without
|
||
|
|
* modification, are permitted provided that the following conditions
|
||
|
|
* are met:
|
||
|
|
* 1. Redistributions of source code must retain the above copyright
|
||
|
|
* notice, this list of conditions and the following disclaimer.
|
||
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
||
|
|
* notice, this list of conditions and the following disclaimer in the
|
||
|
|
* documentation and/or other materials provided with the distribution.
|
||
|
|
*
|
||
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
|
||
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
||
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
||
|
|
* IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
|
||
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
||
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
||
|
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
||
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
||
|
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||
|
|
*
|
||
|
|
* $FreeBSD$
|
||
|
|
*/
|
||
|
|
|
||
|
|
#if defined(_WIN32) && !defined(__CYGWIN__)
|
||
|
|
|
||
|
|
#include "bsdtar_platform.h"
|
||
|
|
#include <ctype.h>
|
||
|
|
#include <errno.h>
|
||
|
|
#include <fcntl.h>
|
||
|
|
#include <io.h>
|
||
|
|
#include <stddef.h>
|
||
|
|
#include <sys/utime.h>
|
||
|
|
#include <sys/stat.h>
|
||
|
|
#include <process.h>
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include <wchar.h>
|
||
|
|
#include <windows.h>
|
||
|
|
#include <sddl.h>
|
||
|
|
|
||
|
|
#include "bsdtar.h"
|
||
|
|
#include "err.h"
|
||
|
|
|
||
|
|
/* This may actually not be needed anymore.
|
||
|
|
* TODO: Review the error handling for chdir() failures and
|
||
|
|
* simply dump this if it's not really needed. */
|
||
|
|
static void __tar_dosmaperr(unsigned long);
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Prepend "\\?\" to the path name and convert it to unicode to permit
|
||
|
|
* an extended-length path for a maximum total path length of 32767
|
||
|
|
* characters.
|
||
|
|
* see also http://msdn.microsoft.com/en-us/library/aa365247.aspx
|
||
|
|
*/
|
||
|
|
static wchar_t *
|
||
|
|
permissive_name(const char *name)
|
||
|
|
{
|
||
|
|
wchar_t *wn, *wnp;
|
||
|
|
wchar_t *ws, *wsp;
|
||
|
|
size_t l, len, slen, alloclen;
|
||
|
|
int unc;
|
||
|
|
|
||
|
|
len = strlen(name);
|
||
|
|
wn = malloc((len + 1) * sizeof(wchar_t));
|
||
|
|
if (wn == NULL)
|
||
|
|
return (NULL);
|
||
|
|
l = MultiByteToWideChar(CP_ACP, 0, name, len, wn, len);
|
||
|
|
if (l == 0) {
|
||
|
|
free(wn);
|
||
|
|
return (NULL);
|
||
|
|
}
|
||
|
|
wn[l] = L'\0';
|
||
|
|
|
||
|
|
/* Get a full path names */
|
||
|
|
l = GetFullPathNameW(wn, 0, NULL, NULL);
|
||
|
|
if (l == 0) {
|
||
|
|
free(wn);
|
||
|
|
return (NULL);
|
||
|
|
}
|
||
|
|
wnp = malloc(l * sizeof(wchar_t));
|
||
|
|
if (wnp == NULL) {
|
||
|
|
free(wn);
|
||
|
|
return (NULL);
|
||
|
|
}
|
||
|
|
len = GetFullPathNameW(wn, l, wnp, NULL);
|
||
|
|
free(wn);
|
||
|
|
wn = wnp;
|
||
|
|
|
||
|
|
if (wnp[0] == L'\\' && wnp[1] == L'\\' &&
|
||
|
|
wnp[2] == L'?' && wnp[3] == L'\\')
|
||
|
|
/* We have already permissive names. */
|
||
|
|
return (wn);
|
||
|
|
|
||
|
|
if (wnp[0] == L'\\' && wnp[1] == L'\\' &&
|
||
|
|
wnp[2] == L'.' && wnp[3] == L'\\') {
|
||
|
|
/* Device names */
|
||
|
|
if (((wnp[4] >= L'a' && wnp[4] <= L'z') ||
|
||
|
|
(wnp[4] >= L'A' && wnp[4] <= L'Z')) &&
|
||
|
|
wnp[5] == L':' && wnp[6] == L'\\')
|
||
|
|
wnp[2] = L'?';/* Not device names. */
|
||
|
|
return (wn);
|
||
|
|
}
|
||
|
|
|
||
|
|
unc = 0;
|
||
|
|
if (wnp[0] == L'\\' && wnp[1] == L'\\' && wnp[2] != L'\\') {
|
||
|
|
wchar_t *p = &wnp[2];
|
||
|
|
|
||
|
|
/* Skip server-name letters. */
|
||
|
|
while (*p != L'\\' && *p != L'\0')
|
||
|
|
++p;
|
||
|
|
if (*p == L'\\') {
|
||
|
|
wchar_t *rp = ++p;
|
||
|
|
/* Skip share-name letters. */
|
||
|
|
while (*p != L'\\' && *p != L'\0')
|
||
|
|
++p;
|
||
|
|
if (*p == L'\\' && p != rp) {
|
||
|
|
/* Now, match patterns such as
|
||
|
|
* "\\server-name\share-name\" */
|
||
|
|
wnp += 2;
|
||
|
|
len -= 2;
|
||
|
|
unc = 1;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
alloclen = slen = 4 + (unc * 4) + len + 1;
|
||
|
|
ws = wsp = malloc(slen * sizeof(wchar_t));
|
||
|
|
if (ws == NULL) {
|
||
|
|
free(wn);
|
||
|
|
return (NULL);
|
||
|
|
}
|
||
|
|
/* prepend "\\?\" */
|
||
|
|
wcsncpy(wsp, L"\\\\?\\", 4);
|
||
|
|
wsp += 4;
|
||
|
|
slen -= 4;
|
||
|
|
if (unc) {
|
||
|
|
/* append "UNC\" ---> "\\?\UNC\" */
|
||
|
|
wcsncpy(wsp, L"UNC\\", 4);
|
||
|
|
wsp += 4;
|
||
|
|
slen -= 4;
|
||
|
|
}
|
||
|
|
wcsncpy(wsp, wnp, slen);
|
||
|
|
free(wn);
|
||
|
|
ws[alloclen - 1] = L'\0';
|
||
|
|
return (ws);
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
__tar_chdir(const char *path)
|
||
|
|
{
|
||
|
|
wchar_t *ws;
|
||
|
|
int r;
|
||
|
|
|
||
|
|
r = SetCurrentDirectoryA(path);
|
||
|
|
if (r == 0) {
|
||
|
|
if (GetLastError() != ERROR_FILE_NOT_FOUND) {
|
||
|
|
__tar_dosmaperr(GetLastError());
|
||
|
|
return (-1);
|
||
|
|
}
|
||
|
|
} else
|
||
|
|
return (0);
|
||
|
|
ws = permissive_name(path);
|
||
|
|
if (ws == NULL) {
|
||
|
|
errno = EINVAL;
|
||
|
|
return (-1);
|
||
|
|
}
|
||
|
|
r = SetCurrentDirectoryW(ws);
|
||
|
|
free(ws);
|
||
|
|
if (r == 0) {
|
||
|
|
__tar_dosmaperr(GetLastError());
|
||
|
|
return (-1);
|
||
|
|
}
|
||
|
|
return (0);
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* The following function was modified from PostgreSQL sources and is
|
||
|
|
* subject to the copyright below.
|
||
|
|
*/
|
||
|
|
/*-------------------------------------------------------------------------
|
||
|
|
*
|
||
|
|
* win32error.c
|
||
|
|
* Map win32 error codes to errno values
|
||
|
|
*
|
||
|
|
* Portions Copyright (c) 1996-2008, PostgreSQL Global Development Group
|
||
|
|
*
|
||
|
|
* IDENTIFICATION
|
||
|
|
* $PostgreSQL: pgsql/src/port/win32error.c,v 1.4 2008/01/01 19:46:00 momjian Exp $
|
||
|
|
*
|
||
|
|
*-------------------------------------------------------------------------
|
||
|
|
*/
|
||
|
|
/*
|
||
|
|
PostgreSQL Database Management System
|
||
|
|
(formerly known as Postgres, then as Postgres95)
|
||
|
|
|
||
|
|
Portions Copyright (c) 1996-2008, PostgreSQL Global Development Group
|
||
|
|
|
||
|
|
Portions Copyright (c) 1994, The Regents of the University of California
|
||
|
|
|
||
|
|
Permission to use, copy, modify, and distribute this software and its
|
||
|
|
documentation for any purpose, without fee, and without a written agreement
|
||
|
|
is hereby granted, provided that the above copyright notice and this
|
||
|
|
paragraph and the following two paragraphs appear in all copies.
|
||
|
|
|
||
|
|
IN NO EVENT SHALL THE UNIVERSITY OF CALIFORNIA BE LIABLE TO ANY PARTY FOR
|
||
|
|
DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES, INCLUDING
|
||
|
|
LOST PROFITS, ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS
|
||
|
|
DOCUMENTATION, EVEN IF THE UNIVERSITY OF CALIFORNIA HAS BEEN ADVISED OF THE
|
||
|
|
POSSIBILITY OF SUCH DAMAGE.
|
||
|
|
|
||
|
|
THE UNIVERSITY OF CALIFORNIA SPECIFICALLY DISCLAIMS ANY WARRANTIES,
|
||
|
|
INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
|
||
|
|
AND FITNESS FOR A PARTICULAR PURPOSE. THE SOFTWARE PROVIDED HEREUNDER IS
|
||
|
|
ON AN "AS IS" BASIS, AND THE UNIVERSITY OF CALIFORNIA HAS NO OBLIGATIONS TO
|
||
|
|
PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
|
||
|
|
*/
|
||
|
|
|
||
|
|
static const struct {
|
||
|
|
DWORD winerr;
|
||
|
|
int doserr;
|
||
|
|
} doserrors[] =
|
||
|
|
{
|
||
|
|
{ ERROR_INVALID_FUNCTION, EINVAL },
|
||
|
|
{ ERROR_FILE_NOT_FOUND, ENOENT },
|
||
|
|
{ ERROR_PATH_NOT_FOUND, ENOENT },
|
||
|
|
{ ERROR_TOO_MANY_OPEN_FILES, EMFILE },
|
||
|
|
{ ERROR_ACCESS_DENIED, EACCES },
|
||
|
|
{ ERROR_INVALID_HANDLE, EBADF },
|
||
|
|
{ ERROR_ARENA_TRASHED, ENOMEM },
|
||
|
|
{ ERROR_NOT_ENOUGH_MEMORY, ENOMEM },
|
||
|
|
{ ERROR_INVALID_BLOCK, ENOMEM },
|
||
|
|
{ ERROR_BAD_ENVIRONMENT, E2BIG },
|
||
|
|
{ ERROR_BAD_FORMAT, ENOEXEC },
|
||
|
|
{ ERROR_INVALID_ACCESS, EINVAL },
|
||
|
|
{ ERROR_INVALID_DATA, EINVAL },
|
||
|
|
{ ERROR_INVALID_DRIVE, ENOENT },
|
||
|
|
{ ERROR_CURRENT_DIRECTORY, EACCES },
|
||
|
|
{ ERROR_NOT_SAME_DEVICE, EXDEV },
|
||
|
|
{ ERROR_NO_MORE_FILES, ENOENT },
|
||
|
|
{ ERROR_LOCK_VIOLATION, EACCES },
|
||
|
|
{ ERROR_SHARING_VIOLATION, EACCES },
|
||
|
|
{ ERROR_BAD_NETPATH, ENOENT },
|
||
|
|
{ ERROR_NETWORK_ACCESS_DENIED, EACCES },
|
||
|
|
{ ERROR_BAD_NET_NAME, ENOENT },
|
||
|
|
{ ERROR_FILE_EXISTS, EEXIST },
|
||
|
|
{ ERROR_CANNOT_MAKE, EACCES },
|
||
|
|
{ ERROR_FAIL_I24, EACCES },
|
||
|
|
{ ERROR_INVALID_PARAMETER, EINVAL },
|
||
|
|
{ ERROR_NO_PROC_SLOTS, EAGAIN },
|
||
|
|
{ ERROR_DRIVE_LOCKED, EACCES },
|
||
|
|
{ ERROR_BROKEN_PIPE, EPIPE },
|
||
|
|
{ ERROR_DISK_FULL, ENOSPC },
|
||
|
|
{ ERROR_INVALID_TARGET_HANDLE, EBADF },
|
||
|
|
{ ERROR_INVALID_HANDLE, EINVAL },
|
||
|
|
{ ERROR_WAIT_NO_CHILDREN, ECHILD },
|
||
|
|
{ ERROR_CHILD_NOT_COMPLETE, ECHILD },
|
||
|
|
{ ERROR_DIRECT_ACCESS_HANDLE, EBADF },
|
||
|
|
{ ERROR_NEGATIVE_SEEK, EINVAL },
|
||
|
|
{ ERROR_SEEK_ON_DEVICE, EACCES },
|
||
|
|
{ ERROR_DIR_NOT_EMPTY, ENOTEMPTY },
|
||
|
|
{ ERROR_NOT_LOCKED, EACCES },
|
||
|
|
{ ERROR_BAD_PATHNAME, ENOENT },
|
||
|
|
{ ERROR_MAX_THRDS_REACHED, EAGAIN },
|
||
|
|
{ ERROR_LOCK_FAILED, EACCES },
|
||
|
|
{ ERROR_ALREADY_EXISTS, EEXIST },
|
||
|
|
{ ERROR_FILENAME_EXCED_RANGE, ENOENT },
|
||
|
|
{ ERROR_NESTING_NOT_ALLOWED, EAGAIN },
|
||
|
|
{ ERROR_NOT_ENOUGH_QUOTA, ENOMEM }
|
||
|
|
};
|
||
|
|
|
||
|
|
static void
|
||
|
|
__tar_dosmaperr(unsigned long e)
|
||
|
|
{
|
||
|
|
int i;
|
||
|
|
|
||
|
|
if (e == 0) {
|
||
|
|
errno = 0;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
for (i = 0; i < sizeof(doserrors); i++) {
|
||
|
|
if (doserrors[i].winerr == e) {
|
||
|
|
errno = doserrors[i].doserr;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/* fprintf(stderr, "unrecognized win32 error code: %lu", e); */
|
||
|
|
errno = EINVAL;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
#endif
|