+ if (err != ERROR_NO_MORE_FILES) {
+ ERROR("Failed to read directory \"%ls\"", dir_path);
+ win32_error(err);
+ if (ret == 0)
+ ret = WIMLIB_ERR_READ;
+ }
+out_find_close:
+ FindClose(hFind);
+ return ret;
+}
+
+int
+win32_get_file_and_vol_ids(const wchar_t *path, u64 *ino_ret, u64 *dev_ret)
+{
+ HANDLE hFile;
+ DWORD err;
+ BY_HANDLE_FILE_INFORMATION file_info;
+ int ret;
+
+ hFile = win32_open_existing_file(path, FILE_READ_ATTRIBUTES);
+ if (hFile == INVALID_HANDLE_VALUE) {
+ err = GetLastError();
+ WARNING("Failed to open \"%ls\" to get file and volume IDs",
+ path);
+ win32_error(err);
+ return WIMLIB_ERR_OPEN;
+ }
+
+ if (!GetFileInformationByHandle(hFile, &file_info)) {
+ err = GetLastError();
+ ERROR("Failed to get file information for \"%ls\"", path);
+ win32_error(err);
+ ret = WIMLIB_ERR_STAT;
+ } else {
+ *ino_ret = ((u64)file_info.nFileIndexHigh << 32) |
+ (u64)file_info.nFileIndexLow;
+ *dev_ret = file_info.dwVolumeSerialNumber;
+ ret = 0;
+ }
+ CloseHandle(hFile);
+ return ret;
+}
+
+/* Reparse point fixup status code */
+enum rp_status {
+ /* Reparse point corresponded to an absolute symbolic link or junction
+ * point that pointed outside the directory tree being captured, and
+ * therefore was excluded. */
+ RP_EXCLUDED = 0x0,
+
+ /* Reparse point was not fixed as it was either a relative symbolic
+ * link, a mount point, or something else we could not understand. */
+ RP_NOT_FIXED = 0x1,
+
+ /* Reparse point corresponded to an absolute symbolic link or junction
+ * point that pointed inside the directory tree being captured, where
+ * the target was specified by a "full" \??\ prefixed path, and
+ * therefore was fixed to be relative to the root of the directory tree
+ * being captured. */
+ RP_FIXED_FULLPATH = 0x2,
+
+ /* Same as RP_FIXED_FULLPATH, except the absolute link target did not
+ * have the \??\ prefix. It may have begun with a drive letter though.
+ * */
+ RP_FIXED_ABSPATH = 0x4,
+
+ /* Either RP_FIXED_FULLPATH or RP_FIXED_ABSPATH. */
+ RP_FIXED = RP_FIXED_FULLPATH | RP_FIXED_ABSPATH,
+};
+
+/* Given the "substitute name" target of a Windows reparse point, try doing a
+ * fixup where we change it to be absolute relative to the root of the directory
+ * tree being captured.
+ *
+ * Note that this is only executed when WIMLIB_ADD_IMAGE_FLAG_RPFIX has been
+ * set.
+ *
+ * @capture_root_ino and @capture_root_dev indicate the inode number and device
+ * of the root of the directory tree being captured. They are meant to identify
+ * this directory (as an alternative to its actual path, which could potentially
+ * be reached via multiple destinations due to other symbolic links). This may
+ * not work properly on FAT, which doesn't seem to supply proper inode numbers
+ * or file IDs. However, FAT doesn't support reparse points so this function
+ * wouldn't even be called anyway. */
+static enum rp_status
+win32_maybe_rpfix_target(wchar_t *target, size_t *target_nchars_p,
+ u64 capture_root_ino, u64 capture_root_dev)
+{
+ size_t target_nchars= *target_nchars_p;
+ size_t stripped_chars;
+ wchar_t *orig_target;
+
+ if (target_nchars == 0)
+ /* Invalid reparse point (empty target) */
+ return RP_NOT_FIXED;
+
+ if (target[0] == L'\\') {
+ if (target_nchars >= 2 && target[1] == L'\\') {
+ /* Probably a volume. Can't do anything with it. */
+ DEBUG("Not fixing target (probably a volume)");
+ return RP_NOT_FIXED;
+ } else if (target_nchars >= 7 &&
+ target[1] == '?' &&
+ target[2] == '?' &&
+ target[3] == '\\' &&
+ target[4] != '\0' &&
+ target[5] == ':' &&
+ target[6] == '\\')
+ {
+ DEBUG("Full style path");
+ /* Full \??\x:\ style path (may be junction or symlink)
+ * */
+ stripped_chars = 6;
+ } else {
+ DEBUG("Absolute target without drive letter");
+ /* Absolute target, without drive letter */
+ stripped_chars = 0;
+ }
+ } else if (target_nchars >= 3 &&
+ target[0] != L'\0' &&
+ target[1] == L':' &&
+ target[2] == L'\\')
+ {
+ DEBUG("Absolute target with drive letter");
+ /* Absolute target, with drive letter */
+ stripped_chars = 2;
+ } else {
+ DEBUG("Relative symlink or other link");
+ /* Relative symlink or other unexpected format */
+ return RP_NOT_FIXED;
+ }
+ target[target_nchars] = L'\0';
+ orig_target = target;
+ target = fixup_symlink(target + stripped_chars, capture_root_ino, capture_root_dev);
+ if (!target)
+ return RP_EXCLUDED;
+ target_nchars = wcslen(target);
+ wmemmove(orig_target + stripped_chars, target, target_nchars + 1);
+ *target_nchars_p = target_nchars + stripped_chars;
+ DEBUG("Fixed reparse point (new target: \"%ls\")", orig_target);
+ if (stripped_chars == 6)
+ return RP_FIXED_FULLPATH;
+ else
+ return RP_FIXED_ABSPATH;
+}
+
+static enum rp_status
+win32_try_capture_rpfix(char *rpbuf, DWORD *rpbuflen_p,
+ u64 capture_root_ino, u64 capture_root_dev)
+{
+ const char *p_get;
+ char *p_put;
+ u16 substitute_name_offset;
+ u16 substitute_name_len;
+ wchar_t *target;
+ size_t target_nchars;
+ enum rp_status status;
+ u32 rptag;
+ DWORD rpbuflen = *rpbuflen_p;
+
+ if (rpbuflen < 16) /* Invalid reparse point (length too small) */
+ return RP_NOT_FIXED;
+ p_get = get_u32(rpbuf, &rptag);
+ p_get += 4;
+ p_get = get_u16(p_get, &substitute_name_offset);
+ p_get = get_u16(p_get, &substitute_name_len);
+ p_get += 4;
+ if (rptag == WIM_IO_REPARSE_TAG_SYMLINK) {
+ if (rpbuflen < 20) /* Invalid reparse point (length too small) */
+ return RP_NOT_FIXED;
+ p_get += 4;
+ }
+ if ((DWORD)substitute_name_offset +
+ substitute_name_len + (p_get - rpbuf) > rpbuflen)
+ /* Invalid reparse point (length too small) */
+ return RP_NOT_FIXED;
+
+ target = (wchar_t*)&p_get[substitute_name_offset];
+ target_nchars = substitute_name_len / 2;
+ /* Note: target is not necessarily null-terminated */
+
+ status = win32_maybe_rpfix_target(target, &target_nchars,
+ capture_root_ino, capture_root_dev);
+ if (status & RP_FIXED) {
+ size_t target_nbytes = target_nchars * 2;
+ size_t print_nbytes = target_nbytes;
+ wchar_t target_copy[target_nchars];
+ wchar_t *print_name = target_copy;
+
+ if (status == RP_FIXED_FULLPATH) {
+ /* "full path", meaning \??\ prefixed. We should not
+ * include this prefix in the print name, as it is
+ * apparently meant for the filesystem driver only. */
+ print_nbytes -= 8;
+ print_name += 4;
+ }
+ wmemcpy(target_copy, target, target_nchars);
+ p_put = rpbuf + 8;
+ p_put = put_u16(p_put, 0); /* Substitute name offset */
+ p_put = put_u16(p_put, target_nbytes); /* Substitute name length */
+ p_put = put_u16(p_put, target_nbytes + 2); /* Print name offset */
+ p_put = put_u16(p_put, print_nbytes); /* Print name length */
+ if (rptag == WIM_IO_REPARSE_TAG_SYMLINK)
+ p_put = put_u32(p_put, 1);
+ p_put = put_bytes(p_put, target_nbytes, target_copy);
+ p_put = put_u16(p_put, 0);
+ p_put = put_bytes(p_put, print_nbytes, print_name);
+ p_put = put_u16(p_put, 0);
+
+ /* Wrote the end of the reparse data. Recalculate the length,
+ * set the length field correctly, and return it. */
+ rpbuflen = p_put - rpbuf;
+ put_u16(rpbuf + 4, rpbuflen - 8);
+ *rpbuflen_p = rpbuflen;
+ }
+ return status;
+}
+
+static int
+win32_get_reparse_data(HANDLE hFile, const wchar_t *path,
+ struct add_image_params *params,
+ void *reparse_data, size_t *reparse_data_len_ret)
+{
+ DWORD bytesReturned;
+ u32 reparse_tag;
+ enum rp_status status;
+
+ DEBUG("Loading reparse data from \"%ls\"", path);
+ if (!DeviceIoControl(hFile, FSCTL_GET_REPARSE_POINT,
+ NULL, /* "Not used with this operation; set to NULL" */
+ 0, /* "Not used with this operation; set to 0" */
+ reparse_data, /* "A pointer to a buffer that
+ receives the reparse point data */
+ REPARSE_POINT_MAX_SIZE, /* "The size of the output
+ buffer, in bytes */
+ &bytesReturned,
+ NULL))
+ {
+ DWORD err = GetLastError();
+ ERROR("Failed to get reparse data of \"%ls\"", path);
+ win32_error(err);
+ return -WIMLIB_ERR_READ;
+ }
+ if (bytesReturned < 8) {
+ ERROR("Reparse data on \"%ls\" is invalid", path);
+ return -WIMLIB_ERR_READ;
+ }
+
+ reparse_tag = le32_to_cpu(*(u32*)reparse_data);
+ if (params->add_image_flags & WIMLIB_ADD_IMAGE_FLAG_RPFIX &&
+ (reparse_tag == WIM_IO_REPARSE_TAG_SYMLINK ||
+ reparse_tag == WIM_IO_REPARSE_TAG_MOUNT_POINT))
+ {
+ /* Try doing reparse point fixup */
+ status = win32_try_capture_rpfix(reparse_data,
+ &bytesReturned,
+ params->capture_root_ino,
+ params->capture_root_dev);
+ } else {
+ status = RP_NOT_FIXED;
+ }
+ *reparse_data_len_ret = bytesReturned;
+ return status;
+}
+
+static DWORD WINAPI
+win32_tally_encrypted_size_cb(unsigned char *_data, void *_ctx,
+ unsigned long len)
+{
+ *(u64*)_ctx += len;
+ return ERROR_SUCCESS;
+}
+
+static int
+win32_get_encrypted_file_size(const wchar_t *path, u64 *size_ret)
+{
+ DWORD err;
+ void *file_ctx;
+ int ret;
+
+ *size_ret = 0;
+ err = OpenEncryptedFileRawW(path, 0, &file_ctx);
+ if (err != ERROR_SUCCESS) {
+ ERROR("Failed to open encrypted file \"%ls\" for raw read", path);
+ win32_error(err);
+ return WIMLIB_ERR_OPEN;
+ }
+ err = ReadEncryptedFileRaw(win32_tally_encrypted_size_cb,
+ size_ret, file_ctx);
+ if (err != ERROR_SUCCESS) {
+ ERROR("Failed to read raw encrypted data from \"%ls\"", path);
+ win32_error(err);
+ ret = WIMLIB_ERR_READ;
+ } else {
+ ret = 0;
+ }
+ CloseEncryptedFileRaw(file_ctx);
+ return ret;
+}
+
+/* Scans an unnamed or named stream of a Win32 file (not a reparse point
+ * stream); calculates its SHA1 message digest and either creates a `struct
+ * wim_lookup_table_entry' in memory for it, or uses an existing 'struct
+ * wim_lookup_table_entry' for an identical stream.
+ *
+ * @path: Path to the file (UTF-16LE).
+ *
+ * @path_num_chars: Number of 2-byte characters in @path.
+ *
+ * @inode: WIM inode to save the stream into.
+ *
+ * @lookup_table: Stream lookup table for the WIM.
+ *
+ * @dat: A `WIN32_FIND_STREAM_DATA' structure that specifies the
+ * stream name.
+ *
+ * Returns 0 on success; nonzero on failure.
+ */
+static int
+win32_capture_stream(const wchar_t *path,
+ size_t path_num_chars,
+ struct wim_inode *inode,
+ struct wim_lookup_table *lookup_table,
+ WIN32_FIND_STREAM_DATA *dat)
+{
+ struct wim_ads_entry *ads_entry;
+ struct wim_lookup_table_entry *lte;
+ int ret;
+ wchar_t *stream_name, *colon;
+ size_t stream_name_nchars;
+ bool is_named_stream;
+ wchar_t *spath;
+ size_t spath_nchars;
+ size_t spath_buf_nbytes;
+ const wchar_t *relpath_prefix;
+ const wchar_t *colonchar;
+
+ DEBUG("Capture \"%ls\" stream \"%ls\"", path, dat->cStreamName);
+
+ /* The stream name should be returned as :NAME:TYPE */
+ stream_name = dat->cStreamName;
+ if (*stream_name != L':')
+ goto out_invalid_stream_name;
+ stream_name += 1;
+ colon = wcschr(stream_name, L':');
+ if (colon == NULL)
+ goto out_invalid_stream_name;
+
+ if (wcscmp(colon + 1, L"$DATA")) {
+ /* Not a DATA stream */
+ ret = 0;
+ goto out;
+ }
+
+ *colon = '\0';
+
+ stream_name_nchars = colon - stream_name;
+ is_named_stream = (stream_name_nchars != 0);
+
+ if (is_named_stream) {
+ /* Allocate an ADS entry for the named stream. */
+ ads_entry = inode_add_ads_utf16le(inode, stream_name,
+ stream_name_nchars * sizeof(wchar_t));
+ if (!ads_entry) {
+ ret = WIMLIB_ERR_NOMEM;
+ goto out;
+ }
+ }
+
+ /* If zero length stream, no lookup table entry needed. */
+ if ((u64)dat->StreamSize.QuadPart == 0) {
+ ret = 0;
+ goto out;
+ }
+
+ /* Create a UTF-16LE string @spath that gives the filename, then a
+ * colon, then the stream name. Or, if it's an unnamed stream, just the
+ * filename. It is MALLOC()'ed so that it can be saved in the
+ * wim_lookup_table_entry if needed.
+ *
+ * As yet another special case, relative paths need to be changed to
+ * begin with an explicit "./" so that, for example, a file t:ads, where
+ * :ads is the part we added, is not interpreted as a file on the t:
+ * drive. */
+ spath_nchars = path_num_chars;
+ relpath_prefix = L"";
+ colonchar = L"";
+ if (is_named_stream) {
+ spath_nchars += 1 + stream_name_nchars;
+ colonchar = L":";
+ if (path_num_chars == 1 &&
+ path[0] != L'/' &&
+ path[0] != L'\\')
+ {
+ spath_nchars += 2;
+ relpath_prefix = L"./";
+ }
+ }
+
+ spath_buf_nbytes = (spath_nchars + 1) * sizeof(wchar_t);
+ spath = MALLOC(spath_buf_nbytes);
+
+ swprintf(spath, L"%ls%ls%ls%ls",
+ relpath_prefix, path, colonchar, stream_name);
+
+ /* Make a new wim_lookup_table_entry */
+ lte = new_lookup_table_entry();
+ if (!lte) {
+ ret = WIMLIB_ERR_NOMEM;
+ goto out_free_spath;
+ }
+ lte->file_on_disk = spath;
+ spath = NULL;
+ if (inode->i_attributes & FILE_ATTRIBUTE_ENCRYPTED && !is_named_stream) {
+ u64 encrypted_size;
+ lte->resource_location = RESOURCE_WIN32_ENCRYPTED;
+ ret = win32_get_encrypted_file_size(path, &encrypted_size);
+ if (ret)
+ goto out_free_spath;
+ lte->resource_entry.original_size = encrypted_size;
+ } else {
+ lte->resource_location = RESOURCE_WIN32;
+ lte->resource_entry.original_size = (u64)dat->StreamSize.QuadPart;
+ }
+
+ u32 stream_id;
+ if (is_named_stream) {
+ stream_id = ads_entry->stream_id;
+ ads_entry->lte = lte;
+ } else {
+ stream_id = 0;
+ inode->i_lte = lte;
+ }
+ lookup_table_insert_unhashed(lookup_table, lte, inode, stream_id);
+ ret = 0;
+out_free_spath:
+ FREE(spath);
+out:
+ return ret;
+out_invalid_stream_name:
+ ERROR("Invalid stream name: \"%ls:%ls\"", path, dat->cStreamName);
+ ret = WIMLIB_ERR_READ;
+ goto out;
+}
+
+/* Scans a Win32 file for unnamed and named data streams (not reparse point
+ * streams).
+ *
+ * @path: Path to the file (UTF-16LE).
+ *
+ * @path_num_chars: Number of 2-byte characters in @path.
+ *
+ * @inode: WIM inode to save the stream into.
+ *
+ * @lookup_table: Stream lookup table for the WIM.
+ *
+ * @file_size: Size of unnamed data stream. (Used only if alternate
+ * data streams API appears to be unavailable.)
+ *
+ * @vol_flags: Flags that specify features of the volume being
+ * captured.
+ *
+ * Returns 0 on success; nonzero on failure.
+ */
+static int
+win32_capture_streams(const wchar_t *path,
+ size_t path_num_chars,
+ struct wim_inode *inode,
+ struct wim_lookup_table *lookup_table,
+ u64 file_size,
+ unsigned vol_flags)
+{
+ WIN32_FIND_STREAM_DATA dat;
+ int ret;
+ HANDLE hFind;
+ DWORD err;
+
+ DEBUG("Capturing streams from \"%ls\"", path);
+
+ if (win32func_FindFirstStreamW == NULL ||
+ !(vol_flags & FILE_NAMED_STREAMS))
+ goto unnamed_only;
+
+ hFind = win32func_FindFirstStreamW(path, FindStreamInfoStandard, &dat, 0);
+ if (hFind == INVALID_HANDLE_VALUE) {
+ err = GetLastError();
+ if (err == ERROR_CALL_NOT_IMPLEMENTED)
+ goto unnamed_only;
+
+ /* Seems legal for this to return ERROR_HANDLE_EOF on reparse
+ * points and directories */
+ if ((inode->i_attributes &
+ (FILE_ATTRIBUTE_REPARSE_POINT | FILE_ATTRIBUTE_DIRECTORY))
+ && err == ERROR_HANDLE_EOF)
+ {
+ DEBUG("ERROR_HANDLE_EOF (ok)");
+ return 0;
+ } else {
+ if (err == ERROR_ACCESS_DENIED) {
+ ERROR("Failed to look up data streams "
+ "of \"%ls\": Access denied!\n%ls",
+ path, capture_access_denied_msg);
+ return WIMLIB_ERR_READ;
+ } else {
+ ERROR("Failed to look up data streams "
+ "of \"%ls\"", path);
+ win32_error(err);
+ return WIMLIB_ERR_READ;
+ }
+ }
+ }
+ do {
+ ret = win32_capture_stream(path,
+ path_num_chars,
+ inode, lookup_table,
+ &dat);
+ if (ret)
+ goto out_find_close;
+ } while (win32func_FindNextStreamW(hFind, &dat));
+ err = GetLastError();
+ if (err != ERROR_HANDLE_EOF) {
+ ERROR("Win32 API: Error reading data streams from \"%ls\"", path);
+ win32_error(err);
+ ret = WIMLIB_ERR_READ;
+ }
+out_find_close:
+ FindClose(hFind);
+ return ret;
+unnamed_only:
+ /* FindFirstStreamW() API is not available, or the volume does not
+ * support named streams. Only capture the unnamed data stream. */
+ DEBUG("Only capturing unnamed data stream");
+ if (inode->i_attributes &
+ (FILE_ATTRIBUTE_REPARSE_POINT | FILE_ATTRIBUTE_DIRECTORY))
+ {
+ ret = 0;
+ } else {
+ /* Just create our own WIN32_FIND_STREAM_DATA for an unnamed
+ * stream to reduce the code to a call to the
+ * already-implemented win32_capture_stream() */
+ wcscpy(dat.cStreamName, L"::$DATA");
+ dat.StreamSize.QuadPart = file_size;
+ ret = win32_capture_stream(path,
+ path_num_chars,
+ inode, lookup_table,
+ &dat);
+ }
+ return ret;
+}
+
+static int
+win32_build_dentry_tree_recursive(struct wim_dentry **root_ret,
+ wchar_t *path,
+ size_t path_num_chars,
+ struct add_image_params *params,
+ struct win32_capture_state *state,
+ unsigned vol_flags)
+{
+ struct wim_dentry *root = NULL;
+ struct wim_inode *inode;
+ DWORD err;
+ u64 file_size;
+ int ret;
+ void *reparse_data;
+ size_t reparse_data_len;
+ u16 not_rpfixed;
+
+ if (exclude_path(path, path_num_chars, params->config, true)) {
+ if (params->add_image_flags & WIMLIB_ADD_IMAGE_FLAG_ROOT) {
+ ERROR("Cannot exclude the root directory from capture");
+ ret = WIMLIB_ERR_INVALID_CAPTURE_CONFIG;
+ goto out;
+ }
+ if ((params->add_image_flags & WIMLIB_ADD_IMAGE_FLAG_EXCLUDE_VERBOSE)
+ && params->progress_func)
+ {
+ union wimlib_progress_info info;
+ info.scan.cur_path = path;
+ info.scan.excluded = true;
+ params->progress_func(WIMLIB_PROGRESS_MSG_SCAN_DENTRY, &info);
+ }
+ ret = 0;
+ goto out;
+ }
+
+ if ((params->add_image_flags & WIMLIB_ADD_IMAGE_FLAG_VERBOSE)
+ && params->progress_func)
+ {
+ union wimlib_progress_info info;
+ info.scan.cur_path = path;
+ info.scan.excluded = false;
+ params->progress_func(WIMLIB_PROGRESS_MSG_SCAN_DENTRY, &info);
+ }
+
+ HANDLE hFile = win32_open_existing_file(path,
+ FILE_READ_DATA | FILE_READ_ATTRIBUTES);
+ if (hFile == INVALID_HANDLE_VALUE) {
+ err = GetLastError();
+ ERROR("Win32 API: Failed to open \"%ls\"", path);
+ win32_error(err);
+ ret = WIMLIB_ERR_OPEN;
+ goto out;
+ }
+
+ BY_HANDLE_FILE_INFORMATION file_info;
+ if (!GetFileInformationByHandle(hFile, &file_info)) {
+ err = GetLastError();
+ ERROR("Win32 API: Failed to get file information for \"%ls\"",
+ path);
+ win32_error(err);
+ ret = WIMLIB_ERR_STAT;
+ goto out_close_handle;
+ }
+
+ if (file_info.dwFileAttributes & FILE_ATTRIBUTE_REPARSE_POINT) {
+ reparse_data = alloca(REPARSE_POINT_MAX_SIZE);
+ ret = win32_get_reparse_data(hFile, path, params,
+ reparse_data, &reparse_data_len);
+ if (ret < 0) {
+ /* WIMLIB_ERR_* (inverted) */
+ ret = -ret;
+ goto out_close_handle;
+ } else if (ret & RP_FIXED) {
+ not_rpfixed = 0;
+ } else if (ret == RP_EXCLUDED) {
+ ret = 0;
+ goto out_close_handle;
+ } else {
+ not_rpfixed = 1;
+ }
+ }
+
+ /* Create a WIM dentry with an associated inode, which may be shared.
+ *
+ * However, we need to explicitly check for directories and files with
+ * only 1 link and refuse to hard link them. This is because Windows
+ * has a bug where it can return duplicate File IDs for files and
+ * directories on the FAT filesystem. */
+ ret = inode_table_new_dentry(params->inode_table,
+ path_basename_with_len(path, path_num_chars),
+ ((u64)file_info.nFileIndexHigh << 32) |
+ (u64)file_info.nFileIndexLow,
+ file_info.dwVolumeSerialNumber,
+ (file_info.nNumberOfLinks <= 1 ||
+ (file_info.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)),
+ &root);
+ if (ret)
+ goto out_close_handle;
+
+ ret = win32_get_short_name(root, path);
+ if (ret)
+ goto out_close_handle;
+
+ inode = root->d_inode;
+
+ if (inode->i_nlink > 1) /* Shared inode; nothing more to do */
+ goto out_close_handle;
+
+ inode->i_attributes = file_info.dwFileAttributes;
+ inode->i_creation_time = FILETIME_to_u64(&file_info.ftCreationTime);
+ inode->i_last_write_time = FILETIME_to_u64(&file_info.ftLastWriteTime);
+ inode->i_last_access_time = FILETIME_to_u64(&file_info.ftLastAccessTime);
+ inode->i_resolved = 1;
+
+ params->add_image_flags &= ~(WIMLIB_ADD_IMAGE_FLAG_ROOT | WIMLIB_ADD_IMAGE_FLAG_SOURCE);
+
+ if (!(params->add_image_flags & WIMLIB_ADD_IMAGE_FLAG_NO_ACLS)
+ && (vol_flags & FILE_PERSISTENT_ACLS))
+ {
+ ret = win32_get_security_descriptor(root, params->sd_set,
+ path, state,
+ params->add_image_flags);
+ if (ret)
+ goto out_close_handle;
+ }
+
+ file_size = ((u64)file_info.nFileSizeHigh << 32) |
+ (u64)file_info.nFileSizeLow;
+
+ CloseHandle(hFile);
+
+ /* Capture the unnamed data stream (only should be present for regular
+ * files) and any alternate data streams. */
+ ret = win32_capture_streams(path,
+ path_num_chars,
+ inode,
+ params->lookup_table,
+ file_size,
+ vol_flags);
+ if (ret)
+ goto out;
+
+ if (inode->i_attributes & FILE_ATTRIBUTE_REPARSE_POINT) {
+ /* Reparse point: set the reparse data (which we read already)
+ * */
+ inode->i_not_rpfixed = not_rpfixed;
+ inode->i_reparse_tag = le32_to_cpu(*(u32*)reparse_data);
+ ret = inode_set_unnamed_stream(inode, reparse_data + 8,
+ reparse_data_len - 8,
+ params->lookup_table);
+ } else if (inode->i_attributes & FILE_ATTRIBUTE_DIRECTORY) {
+ /* Directory (not a reparse point) --- recurse to children */
+ ret = win32_recurse_directory(root,
+ path,
+ path_num_chars,
+ params,
+ state,
+ vol_flags);
+ }
+ goto out;
+out_close_handle:
+ CloseHandle(hFile);
+out:
+ if (ret == 0)
+ *root_ret = root;
+ else
+ free_dentry_tree(root, params->lookup_table);
+ return ret;
+}
+
+static void
+win32_do_capture_warnings(const struct win32_capture_state *state,
+ int add_image_flags)
+{
+ if (state->num_get_sacl_priv_notheld == 0 &&
+ state->num_get_sd_access_denied == 0)
+ return;
+
+ WARNING("");
+ WARNING("Built dentry tree successfully, but with the following problem(s):");
+ if (state->num_get_sacl_priv_notheld != 0) {
+ WARNING("Could not capture SACL (System Access Control List)\n"
+ " on %lu files or directories.",
+ state->num_get_sacl_priv_notheld);
+ }
+ if (state->num_get_sd_access_denied != 0) {
+ WARNING("Could not capture security descriptor at all\n"
+ " on %lu files or directories.",
+ state->num_get_sd_access_denied);
+ }
+ WARNING(
+ "Try running the program as the Administrator to make sure all the\n"
+" desired metadata has been captured exactly. However, if you\n"
+" do not care about capturing security descriptors correctly, then\n"
+" nothing more needs to be done%ls\n",
+ (add_image_flags & WIMLIB_ADD_IMAGE_FLAG_NO_ACLS) ? L"." :
+ L", although you might consider\n"
+" passing the --no-acls flag to `wimlib-imagex capture' or\n"
+" `wimlib-imagex append' to explicitly capture no security\n"
+" descriptors.\n");
+}
+
+/* Win32 version of capturing a directory tree */
+int
+win32_build_dentry_tree(struct wim_dentry **root_ret,
+ const wchar_t *root_disk_path,
+ struct add_image_params *params)
+{
+ size_t path_nchars;
+ wchar_t *path;
+ int ret;
+ struct win32_capture_state state;
+ unsigned vol_flags;
+
+
+ path_nchars = wcslen(root_disk_path);
+ if (path_nchars > 32767)
+ return WIMLIB_ERR_INVALID_PARAM;
+
+ ret = win32_get_file_and_vol_ids(root_disk_path,
+ ¶ms->capture_root_ino,
+ ¶ms->capture_root_dev);
+ if (ret)
+ return ret;
+
+ win32_get_vol_flags(root_disk_path, &vol_flags);
+
+ /* There is no check for overflow later when this buffer is being used!
+ * But the max path length on NTFS is 32767 characters, and paths need
+ * to be written specially to even go past 260 characters, so we should
+ * be okay with 32770 characters. */
+ path = MALLOC(32770 * sizeof(wchar_t));
+ if (!path)
+ return WIMLIB_ERR_NOMEM;
+
+ wmemcpy(path, root_disk_path, path_nchars + 1);
+
+ memset(&state, 0, sizeof(state));
+ ret = win32_build_dentry_tree_recursive(root_ret, path,
+ path_nchars, params,
+ &state, vol_flags);
+ FREE(path);
+ if (ret == 0)
+ win32_do_capture_warnings(&state, params->add_image_flags);
+ return ret;
+}
+
+static int
+win32_set_reparse_data(HANDLE h,
+ u32 reparse_tag,
+ const struct wim_lookup_table_entry *lte,
+ const wchar_t *path)
+{
+ int ret;
+ u8 *buf;
+ size_t len;
+
+ if (!lte) {
+ WARNING("\"%ls\" is marked as a reparse point but had no reparse data",
+ path);
+ return 0;
+ }
+ len = wim_resource_size(lte);
+ if (len > 16 * 1024 - 8) {
+ WARNING("\"%ls\": reparse data too long!", path);
+ return 0;
+ }
+
+ /* The WIM stream omits the ReparseTag and ReparseDataLength fields, so
+ * leave 8 bytes of space for them at the beginning of the buffer, then
+ * set them manually. */
+ buf = alloca(len + 8);
+ ret = read_full_resource_into_buf(lte, buf + 8, false);
+ if (ret)
+ return ret;
+ *(u32*)(buf + 0) = cpu_to_le32(reparse_tag);
+ *(u16*)(buf + 4) = cpu_to_le16(len);
+ *(u16*)(buf + 6) = 0;
+
+ /* Set the reparse data on the open file using the
+ * FSCTL_SET_REPARSE_POINT ioctl.
+ *
+ * There are contradictions in Microsoft's documentation for this:
+ *
+ * "If hDevice was opened without specifying FILE_FLAG_OVERLAPPED,
+ * lpOverlapped is ignored."
+ *
+ * --- So setting lpOverlapped to NULL is okay since it's ignored.
+ *
+ * "If lpOverlapped is NULL, lpBytesReturned cannot be NULL. Even when an
+ * operation returns no output data and lpOutBuffer is NULL,
+ * DeviceIoControl makes use of lpBytesReturned. After such an
+ * operation, the value of lpBytesReturned is meaningless."
+ *
+ * --- So lpOverlapped not really ignored, as it affects another
+ * parameter. This is the actual behavior: lpBytesReturned must be
+ * specified, even though lpBytesReturned is documented as:
+ *
+ * "Not used with this operation; set to NULL."
+ */
+ DWORD bytesReturned;
+ if (!DeviceIoControl(h, FSCTL_SET_REPARSE_POINT, buf, len + 8,
+ NULL, 0,
+ &bytesReturned /* lpBytesReturned */,
+ NULL /* lpOverlapped */))
+ {
+ DWORD err = GetLastError();
+ ERROR("Failed to set reparse data on \"%ls\"", path);
+ win32_error(err);
+ if (err == ERROR_ACCESS_DENIED || err == ERROR_PRIVILEGE_NOT_HELD)
+ return WIMLIB_ERR_INSUFFICIENT_PRIVILEGES_TO_EXTRACT;
+ else if (reparse_tag == WIM_IO_REPARSE_TAG_SYMLINK ||
+ reparse_tag == WIM_IO_REPARSE_TAG_MOUNT_POINT)
+ return WIMLIB_ERR_LINK;
+ else
+ return WIMLIB_ERR_WRITE;
+ }
+ return 0;
+}
+
+static int
+win32_set_compression_state(HANDLE hFile, USHORT format, const wchar_t *path)
+{
+ DWORD bytesReturned = 0;
+ if (!DeviceIoControl(hFile, FSCTL_SET_COMPRESSION,
+ &format, sizeof(USHORT),
+ NULL, 0,
+ &bytesReturned, NULL))
+ {
+ DWORD err = GetLastError();
+ if (err == ERROR_INVALID_FUNCTION)
+ {
+ /* XXX: This can happen if we're extracting an
+ * unexpected file in an encrypted directory. The file
+ * gets its encryption flag set and therefore cannot be
+ * compressed. */
+ return 0;
+ }
+
+ /* Could be a warning only, but we only call this if the volume
+ * supports compression. So I'm calling this an error. */
+ ERROR("Failed to set compression flag on \"%ls\"", path);
+ win32_error(err);
+ if (err == ERROR_ACCESS_DENIED || err == ERROR_PRIVILEGE_NOT_HELD)
+ return WIMLIB_ERR_INSUFFICIENT_PRIVILEGES_TO_EXTRACT;
+ else
+ return WIMLIB_ERR_WRITE;
+ }
+ return 0;
+}
+
+static int
+win32_set_sparse(HANDLE hFile, const wchar_t *path)
+{
+ DWORD bytesReturned = 0;
+ if (!DeviceIoControl(hFile, FSCTL_SET_SPARSE,
+ NULL, 0,
+ NULL, 0,
+ &bytesReturned, NULL))
+ {
+ /* Could be a warning only, but we only call this if the volume
+ * supports sparse files. So I'm calling this an error. */
+ DWORD err = GetLastError();
+ WARNING("Failed to set sparse flag on \"%ls\"", path);
+ win32_error(err);
+ if (err == ERROR_ACCESS_DENIED || err == ERROR_PRIVILEGE_NOT_HELD)
+ return WIMLIB_ERR_INSUFFICIENT_PRIVILEGES_TO_EXTRACT;
+ else
+ return WIMLIB_ERR_WRITE;
+ }
+ return 0;
+}
+
+/*
+ * Sets the security descriptor on an extracted file.
+ */
+static int
+win32_set_security_data(const struct wim_inode *inode,
+ HANDLE hFile,
+ const wchar_t *path,
+ struct apply_args *args)
+{
+ PSECURITY_DESCRIPTOR descriptor;
+ unsigned long n;
+ DWORD err;
+ const struct wim_security_data *sd;
+
+ SECURITY_INFORMATION securityInformation = 0;
+
+ void *owner = NULL;
+ void *group = NULL;
+ ACL *dacl = NULL;
+ ACL *sacl = NULL;
+
+ BOOL owner_defaulted;
+ BOOL group_defaulted;
+ BOOL dacl_present;
+ BOOL dacl_defaulted;
+ BOOL sacl_present;
+ BOOL sacl_defaulted;
+
+ sd = wim_const_security_data(args->w);
+ descriptor = sd->descriptors[inode->i_security_id];
+
+ GetSecurityDescriptorOwner(descriptor, &owner, &owner_defaulted);
+ if (owner)
+ securityInformation |= OWNER_SECURITY_INFORMATION;
+
+ GetSecurityDescriptorGroup(descriptor, &group, &group_defaulted);
+ if (group)
+ securityInformation |= GROUP_SECURITY_INFORMATION;
+
+ GetSecurityDescriptorDacl(descriptor, &dacl_present,
+ &dacl, &dacl_defaulted);
+ if (dacl)
+ securityInformation |= DACL_SECURITY_INFORMATION;
+
+ GetSecurityDescriptorSacl(descriptor, &sacl_present,
+ &sacl, &sacl_defaulted);
+ if (sacl)
+ securityInformation |= SACL_SECURITY_INFORMATION;
+
+again:
+ if (securityInformation == 0)
+ return 0;
+ if (SetSecurityInfo(hFile, SE_FILE_OBJECT,
+ securityInformation, owner, group, dacl, sacl))
+ return 0;
+ err = GetLastError();
+ if (args->extract_flags & WIMLIB_EXTRACT_FLAG_STRICT_ACLS)
+ goto fail;
+ switch (err) {
+ case ERROR_PRIVILEGE_NOT_HELD:
+ if (securityInformation & SACL_SECURITY_INFORMATION) {
+ n = args->num_set_sacl_priv_notheld++;
+ securityInformation &= ~SACL_SECURITY_INFORMATION;
+ sacl = NULL;
+ if (n < MAX_SET_SACL_PRIV_NOTHELD_WARNINGS) {
+ WARNING(
+"We don't have enough privileges to set the full security\n"
+" descriptor on \"%ls\"!\n", path);
+ if (args->num_set_sd_access_denied +
+ args->num_set_sacl_priv_notheld == 1)
+ {
+ WARNING("%ls", apply_access_denied_msg);
+ }
+ WARNING("Re-trying with SACL omitted.\n", path);
+ } else if (n == MAX_GET_SACL_PRIV_NOTHELD_WARNINGS) {
+ WARNING(
+"Suppressing further 'privileges not held' error messages when setting\n"
+" security descriptors.");
+ }
+ goto again;
+ }
+ /* Fall through */
+ case ERROR_INVALID_OWNER:
+ case ERROR_ACCESS_DENIED:
+ n = args->num_set_sd_access_denied++;
+ if (n < MAX_SET_SD_ACCESS_DENIED_WARNINGS) {
+ WARNING("Failed to set security descriptor on \"%ls\": "
+ "Access denied!\n", path);
+ if (args->num_set_sd_access_denied +
+ args->num_set_sacl_priv_notheld == 1)
+ {
+ WARNING("%ls", apply_access_denied_msg);
+ }
+ } else if (n == MAX_SET_SD_ACCESS_DENIED_WARNINGS) {
+ WARNING(
+"Suppressing further access denied error messages when setting\n"
+" security descriptors");
+ }
+ return 0;
+ default:
+fail:
+ ERROR("Failed to set security descriptor on \"%ls\"", path);
+ win32_error(err);
+ if (err == ERROR_ACCESS_DENIED || err == ERROR_PRIVILEGE_NOT_HELD)
+ return WIMLIB_ERR_INSUFFICIENT_PRIVILEGES_TO_EXTRACT;
+ else
+ return WIMLIB_ERR_WRITE;
+ }
+}
+
+
+static int
+win32_extract_chunk(const void *buf, size_t len, void *arg)
+{
+ HANDLE hStream = arg;
+
+ DWORD nbytes_written;
+ wimlib_assert(len <= 0xffffffff);
+
+ if (!WriteFile(hStream, buf, len, &nbytes_written, NULL) ||
+ nbytes_written != len)
+ {
+ DWORD err = GetLastError();
+ ERROR("WriteFile(): write error");
+ win32_error(err);
+ return WIMLIB_ERR_WRITE;
+ }
+ return 0;
+}
+
+static int
+do_win32_extract_stream(HANDLE hStream, struct wim_lookup_table_entry *lte)
+{
+ return extract_wim_resource(lte, wim_resource_size(lte),
+ win32_extract_chunk, hStream);
+}
+
+struct win32_encrypted_extract_ctx {
+ void *file_ctx;
+ int wimlib_err_code;
+ bool done;
+ pthread_cond_t cond;
+ pthread_mutex_t mutex;
+ u8 buf[WIM_CHUNK_SIZE];
+ size_t buf_filled;
+};
+
+static DWORD WINAPI
+win32_encrypted_import_cb(unsigned char *data, void *_ctx,
+ unsigned long *len_p)
+{
+ struct win32_encrypted_extract_ctx *ctx = _ctx;
+ unsigned long len = *len_p;
+
+ pthread_mutex_lock(&ctx->mutex);
+ while (len) {
+ size_t bytes_to_copy;
+
+ DEBUG("Importing up to %lu more bytes of raw encrypted data", len);
+ while (ctx->buf_filled == 0) {
+ if (ctx->done)
+ goto out;
+ pthread_cond_wait(&ctx->cond, &ctx->mutex);
+ }
+ bytes_to_copy = min(len, ctx->buf_filled);
+ memcpy(data, ctx->buf, bytes_to_copy);
+ len -= bytes_to_copy;
+ data += bytes_to_copy;
+ ctx->buf_filled -= bytes_to_copy;
+ memmove(ctx->buf, ctx->buf + bytes_to_copy, ctx->buf_filled);
+ pthread_cond_signal(&ctx->cond);
+ }
+out:
+ *len_p -= len;
+ pthread_mutex_unlock(&ctx->mutex);
+ return ERROR_SUCCESS;
+}
+
+static void *
+win32_encrypted_import_proc(void *arg)
+{
+ struct win32_encrypted_extract_ctx *ctx = arg;
+ DWORD ret;
+ ret = WriteEncryptedFileRaw(win32_encrypted_import_cb, ctx,
+ ctx->file_ctx);
+ pthread_mutex_lock(&ctx->mutex);
+ if (ret == ERROR_SUCCESS)
+ ctx->wimlib_err_code = 0;
+ else {
+ win32_error(ret);
+ ctx->wimlib_err_code = WIMLIB_ERR_WRITE;
+ }
+ ctx->done = true;
+ pthread_mutex_unlock(&ctx->mutex);
+ return NULL;
+}
+
+
+static int
+win32_extract_raw_encrypted_chunk(const void *buf, size_t len, void *arg)
+{
+ struct win32_encrypted_extract_ctx *ctx = arg;
+ size_t bytes_to_copy;
+
+ while (len) {
+ DEBUG("Extracting up to %zu more bytes of encrypted data", len);
+ pthread_mutex_lock(&ctx->mutex);
+ while (!ctx->done && ctx->buf_filled == WIM_CHUNK_SIZE)
+ pthread_cond_wait(&ctx->cond, &ctx->mutex);
+ if (ctx->done) {
+ pthread_mutex_unlock(&ctx->mutex);
+ return ctx->wimlib_err_code;
+ }
+ bytes_to_copy = min(len, WIM_CHUNK_SIZE - ctx->buf_filled);
+ memcpy(&ctx->buf[ctx->buf_filled], buf, bytes_to_copy);
+ len -= bytes_to_copy;
+ buf += bytes_to_copy;
+ ctx->buf_filled += bytes_to_copy;
+ pthread_cond_signal(&ctx->cond);
+ pthread_mutex_unlock(&ctx->mutex);
+ }
+ return 0;
+}
+
+static int
+do_win32_extract_encrypted_stream(const wchar_t *path,
+ const struct wim_lookup_table_entry *lte)
+{
+ struct win32_encrypted_extract_ctx ctx;
+ void *file_ctx;
+ pthread_t import_thread;
+ int ret;
+ int ret2;
+
+ DEBUG("Opening file \"%ls\" to extract raw encrypted data", path);
+
+ ret = OpenEncryptedFileRawW(path, CREATE_FOR_IMPORT, &file_ctx);
+ if (ret) {
+ ERROR("Failed to open \"%ls\" to write raw encrypted data", path);
+ win32_error(ret);
+ return WIMLIB_ERR_OPEN;
+ }
+
+ ctx.file_ctx = file_ctx;
+ ctx.buf_filled = 0;
+ ctx.done = false;
+ ctx.wimlib_err_code = 0;
+ if (pthread_mutex_init(&ctx.mutex, NULL)) {
+ ERROR_WITH_ERRNO("Can't create mutex");
+ ret = WIMLIB_ERR_NOMEM;
+ goto out_close;
+ }
+ if (pthread_cond_init(&ctx.cond, NULL)) {
+ ERROR_WITH_ERRNO("Can't create condition variable");
+ ret = WIMLIB_ERR_NOMEM;
+ goto out_pthread_mutex_destroy;
+ }
+ ret = pthread_create(&import_thread, NULL,
+ win32_encrypted_import_proc, &ctx);
+ if (ret) {
+ errno = ret;
+ ERROR_WITH_ERRNO("Failed to create thread");
+ ret = WIMLIB_ERR_FORK;
+ goto out_pthread_cond_destroy;
+ }
+
+ ret = extract_wim_resource(lte, wim_resource_size(lte),
+ win32_extract_raw_encrypted_chunk, &ctx);
+ pthread_mutex_lock(&ctx.mutex);
+ ctx.done = true;
+ pthread_cond_signal(&ctx.cond);
+ pthread_mutex_unlock(&ctx.mutex);
+ ret2 = pthread_join(import_thread, NULL);
+ if (ret2) {
+ errno = ret2;
+ ERROR_WITH_ERRNO("Failed to join encrypted import thread");
+ if (ret == 0)
+ ret = WIMLIB_ERR_WRITE;
+ }
+ if (ret == 0)
+ ret = ctx.wimlib_err_code;
+out_pthread_cond_destroy:
+ pthread_cond_destroy(&ctx.cond);
+out_pthread_mutex_destroy:
+ pthread_mutex_destroy(&ctx.mutex);
+out_close:
+ CloseEncryptedFileRaw(file_ctx);
+ if (ret)
+ ERROR("Failed to extract encrypted file \"%ls\"", path);
+ return ret;
+}
+
+static bool
+path_is_root_of_drive(const wchar_t *path)
+{
+ if (!*path)
+ return false;
+
+ if (*path != L'/' && *path != L'\\') {
+ if (*(path + 1) == L':')
+ path += 2;
+ else
+ return false;
+ }
+ while (*path == L'/' || *path == L'\\')
+ path++;
+ return (*path == L'\0');
+}
+
+static inline DWORD
+win32_mask_attributes(DWORD i_attributes)
+{
+ return i_attributes & ~(FILE_ATTRIBUTE_SPARSE_FILE |
+ FILE_ATTRIBUTE_COMPRESSED |
+ FILE_ATTRIBUTE_REPARSE_POINT |
+ FILE_ATTRIBUTE_DIRECTORY |
+ FILE_ATTRIBUTE_ENCRYPTED |
+ FILE_FLAG_DELETE_ON_CLOSE |
+ FILE_FLAG_NO_BUFFERING |
+ FILE_FLAG_OPEN_NO_RECALL |
+ FILE_FLAG_OVERLAPPED |
+ FILE_FLAG_RANDOM_ACCESS |
+ /*FILE_FLAG_SESSION_AWARE |*/
+ FILE_FLAG_SEQUENTIAL_SCAN |
+ FILE_FLAG_WRITE_THROUGH);
+}
+
+static inline DWORD
+win32_get_create_flags_and_attributes(DWORD i_attributes)
+{
+ /*
+ * Some attributes cannot be set by passing them to CreateFile(). In
+ * particular:
+ *
+ * FILE_ATTRIBUTE_DIRECTORY:
+ * CreateDirectory() must be called instead of CreateFile().
+ *
+ * FILE_ATTRIBUTE_SPARSE_FILE:
+ * Needs an ioctl.
+ * See: win32_set_sparse().
+ *
+ * FILE_ATTRIBUTE_COMPRESSED:
+ * Not clear from the documentation, but apparently this needs an
+ * ioctl as well.
+ * See: win32_set_compressed().
+ *
+ * FILE_ATTRIBUTE_REPARSE_POINT:
+ * Needs an ioctl, with the reparse data specified.
+ * See: win32_set_reparse_data().
+ *
+ * In addition, clear any file flags in the attributes that we don't
+ * want, but also specify FILE_FLAG_OPEN_REPARSE_POINT and
+ * FILE_FLAG_BACKUP_SEMANTICS as we are a backup application.
+ */
+ return win32_mask_attributes(i_attributes) |
+ FILE_FLAG_OPEN_REPARSE_POINT |
+ FILE_FLAG_BACKUP_SEMANTICS;
+}
+
+/* Set compression or sparse attributes, and reparse data, if supported by the
+ * volume. */
+static int
+win32_set_special_attributes(HANDLE hFile, const struct wim_inode *inode,
+ struct wim_lookup_table_entry *unnamed_stream_lte,
+ const wchar_t *path, unsigned vol_flags)
+{
+ int ret;
+
+ /* Encrypted files cannot be [de]compressed. */
+ if (!(inode->i_attributes & FILE_ATTRIBUTE_ENCRYPTED)) {
+ if (vol_flags & FILE_FILE_COMPRESSION) {
+ USHORT format;
+ if (inode->i_attributes & FILE_ATTRIBUTE_COMPRESSED) {
+ format = COMPRESSION_FORMAT_DEFAULT;
+ DEBUG("Setting compression flag on \"%ls\"", path);
+ } else {
+ format = COMPRESSION_FORMAT_NONE;
+ DEBUG("Clearing compression flag on \"%ls\"", path);
+ }
+ ret = win32_set_compression_state(hFile, format, path);
+ if (ret)
+ return ret;
+ } else {
+ if (inode->i_attributes & FILE_ATTRIBUTE_COMPRESSED) {
+ DEBUG("Cannot set compression attribute on \"%ls\": "
+ "volume does not support transparent compression",
+ path);
+ }
+ }
+ }
+
+ if (inode->i_attributes & FILE_ATTRIBUTE_SPARSE_FILE) {
+ if (vol_flags & FILE_SUPPORTS_SPARSE_FILES) {
+ DEBUG("Setting sparse flag on \"%ls\"", path);
+ ret = win32_set_sparse(hFile, path);
+ if (ret)
+ return ret;
+ } else {
+ DEBUG("Cannot set sparse attribute on \"%ls\": "
+ "volume does not support sparse files",
+ path);
+ }
+ }
+
+ if (inode->i_attributes & FILE_ATTRIBUTE_REPARSE_POINT) {
+ if (vol_flags & FILE_SUPPORTS_REPARSE_POINTS) {
+ DEBUG("Setting reparse data on \"%ls\"", path);
+ ret = win32_set_reparse_data(hFile, inode->i_reparse_tag,
+ unnamed_stream_lte, path);
+ if (ret)
+ return ret;
+ } else {
+ DEBUG("Cannot set reparse data on \"%ls\": volume "
+ "does not support reparse points", path);
+ }
+ }
+ return 0;
+}
+
+static int
+win32_begin_extract_unnamed_stream(const struct wim_inode *inode,
+ const struct wim_lookup_table_entry *lte,
+ const wchar_t *path,
+ DWORD *creationDisposition_ret,
+ unsigned int vol_flags)
+{
+ DWORD err;
+ int ret;
+
+ /* Directories must be created with CreateDirectoryW(). Then
+ * the call to CreateFileW() will merely open the directory that
+ * was already created rather than creating a new file. */
+ if (inode->i_attributes & FILE_ATTRIBUTE_DIRECTORY) {
+ if (!CreateDirectoryW(path, NULL)) {
+ err = GetLastError();
+ switch (err) {
+ case ERROR_ALREADY_EXISTS:
+ break;
+ case ERROR_ACCESS_DENIED:
+ if (path_is_root_of_drive(path))
+ break;
+ /* Fall through */
+ default:
+ ERROR("Failed to create directory \"%ls\"",
+ path);
+ win32_error(err);
+ return WIMLIB_ERR_MKDIR;
+ }
+ }
+ DEBUG("Created directory \"%ls\"", path);
+ *creationDisposition_ret = OPEN_EXISTING;
+ }
+ if (inode->i_attributes & FILE_ATTRIBUTE_ENCRYPTED &&
+ vol_flags & FILE_SUPPORTS_ENCRYPTION)
+ {
+ if (inode->i_attributes & FILE_ATTRIBUTE_DIRECTORY) {
+ if (!EncryptFile(path)) {
+ err = GetLastError();
+ ERROR("Failed to encrypt directory \"%ls\"",
+ path);
+ win32_error(err);
+ return WIMLIB_ERR_WRITE;
+ }
+ } else {
+ ret = do_win32_extract_encrypted_stream(path, lte);
+ if (ret)
+ return ret;
+ DEBUG("Extracted encrypeted file \"%ls\"", path);
+ *creationDisposition_ret = OPEN_EXISTING;
+ }
+ }
+ if (*creationDisposition_ret == OPEN_EXISTING)
+ {
+ if (!SetFileAttributesW(path,
+ win32_mask_attributes(inode->i_attributes)))
+ {
+ err = GetLastError();
+ ERROR("Failed to set attributes on \"%ls\"", path);
+ win32_error(err);
+ return WIMLIB_ERR_WRITE;
+ }
+ }
+ return 0;
+}
+
+static int
+win32_extract_stream(const struct wim_inode *inode,
+ const wchar_t *path,
+ const wchar_t *stream_name_utf16,
+ struct wim_lookup_table_entry *lte,
+ struct apply_args *args)
+{
+ wchar_t *stream_path;
+ HANDLE h;
+ int ret;
+ DWORD err;
+ DWORD creationDisposition = CREATE_ALWAYS;
+ DWORD requestedAccess;
+
+ if (stream_name_utf16) {
+ /* Named stream. Create a buffer that contains the UTF-16LE
+ * string [./]path:stream_name_utf16. This is needed to
+ * create and open the stream using CreateFileW(). I'm not
+ * aware of any other APIs to do this. Note: the '$DATA' suffix
+ * seems to be unneeded. Additional note: a "./" prefix needs
+ * to be added when the path is not absolute to avoid ambiguity
+ * with drive letters. */
+ size_t stream_path_nchars;
+ size_t path_nchars;
+ size_t stream_name_nchars;
+ const wchar_t *prefix;
+
+ path_nchars = wcslen(path);
+ stream_name_nchars = wcslen(stream_name_utf16);
+ stream_path_nchars = path_nchars + 1 + stream_name_nchars;
+ if (path[0] != cpu_to_le16(L'\0') &&
+ path[0] != cpu_to_le16(L'/') &&
+ path[0] != cpu_to_le16(L'\\') &&
+ path[1] != cpu_to_le16(L':'))
+ {
+ prefix = L"./";
+ stream_path_nchars += 2;
+ } else {
+ prefix = L"";
+ }
+ stream_path = alloca((stream_path_nchars + 1) * sizeof(wchar_t));
+ swprintf(stream_path, L"%ls%ls:%ls",
+ prefix, path, stream_name_utf16);
+ } else {
+ /* Unnamed stream; its path is just the path to the file itself.
+ * */
+ stream_path = (wchar_t*)path;
+
+ ret = win32_begin_extract_unnamed_stream(inode, lte, path,
+ &creationDisposition,
+ args->vol_flags);
+ if (ret)
+ goto fail;
+ }
+
+ DEBUG("Opening \"%ls\"", stream_path);
+ requestedAccess = GENERIC_READ | GENERIC_WRITE |
+ ACCESS_SYSTEM_SECURITY;
+try_open_again:
+ h = CreateFileW(stream_path,
+ requestedAccess,
+ 0,
+ NULL,
+ creationDisposition,
+ win32_get_create_flags_and_attributes(inode->i_attributes),
+ NULL);
+ if (h == INVALID_HANDLE_VALUE) {
+ err = GetLastError();
+ if (err == ERROR_PRIVILEGE_NOT_HELD &&
+ (requestedAccess & ACCESS_SYSTEM_SECURITY))
+ {
+ requestedAccess &= ~ACCESS_SYSTEM_SECURITY;
+ goto try_open_again;
+ }
+ ERROR("Failed to create \"%ls\"", stream_path);
+ win32_error(err);
+ ret = WIMLIB_ERR_OPEN;
+ goto fail;
+ }
+
+ if (stream_name_utf16 == NULL) {
+ if (inode->i_security_id >= 0 &&
+ !(args->extract_flags & WIMLIB_EXTRACT_FLAG_NO_ACLS)
+ && (args->vol_flags & FILE_PERSISTENT_ACLS))
+ {
+ ret = win32_set_security_data(inode, h, path, args);
+ if (ret)
+ goto fail_close_handle;
+ }
+
+ ret = win32_set_special_attributes(h, inode, lte, path,
+ args->vol_flags);
+ if (ret)
+ goto fail_close_handle;
+ }
+
+ if (!(inode->i_attributes & FILE_ATTRIBUTE_REPARSE_POINT) &&
+ lte != NULL &&
+ creationDisposition != OPEN_EXISTING)
+ {
+ DEBUG("Extracting \"%ls\" (len = %"PRIu64")",
+ stream_path, wim_resource_size(lte));
+ ret = do_win32_extract_stream(h, lte);
+ }
+
+ DEBUG("Closing \"%ls\"", stream_path);
+ if (!CloseHandle(h)) {
+ err = GetLastError();
+ ERROR("Failed to close \"%ls\"", stream_path);
+ win32_error(err);
+ ret = WIMLIB_ERR_WRITE;
+ goto fail;
+ }
+ ret = 0;
+ goto out;
+fail_close_handle:
+ CloseHandle(h);
+fail:
+ ERROR("Error extracting \"%ls\"", stream_path);
+out:
+ return ret;
+}
+
+/*
+ * Creates a file, directory, or reparse point and extracts all streams to it
+ * (unnamed data stream and/or reparse point stream, plus any alternate data
+ * streams).
+ *
+ * @inode: WIM inode for this file or directory.
+ * @path: UTF-16LE external path to extract the inode to.
+ * @args: Additional extraction context.
+ *
+ * Returns 0 on success; nonzero on failure.
+ */
+static int
+win32_extract_streams(const struct wim_inode *inode,
+ const wchar_t *path, struct apply_args *args)
+{
+ struct wim_lookup_table_entry *unnamed_lte;
+ int ret;
+
+ /* Extract the unnamed stream. */
+
+ unnamed_lte = inode_unnamed_lte_resolved(inode);
+ ret = win32_extract_stream(inode, path, NULL, unnamed_lte, args);
+ if (ret)
+ goto out;
+ if (unnamed_lte && inode->i_extracted_file == NULL)
+ {
+ args->progress.extract.completed_bytes +=
+ wim_resource_size(unnamed_lte);
+ }
+
+ /* Extract any named streams, if supported by the volume. */
+
+ if (!(args->vol_flags & FILE_NAMED_STREAMS))
+ goto out;
+ for (u16 i = 0; i < inode->i_num_ads; i++) {
+ const struct wim_ads_entry *ads_entry = &inode->i_ads_entries[i];
+
+ /* Skip the unnamed stream if it's in the ADS entries (we
+ * already extracted it...) */
+ if (ads_entry->stream_name_nbytes == 0)
+ continue;
+
+ /* Skip special UNIX data entries (see documentation for
+ * WIMLIB_ADD_IMAGE_FLAG_UNIX_DATA) */
+ if (ads_entry->stream_name_nbytes == WIMLIB_UNIX_DATA_TAG_UTF16LE_NBYTES
+ && !memcmp(ads_entry->stream_name,
+ WIMLIB_UNIX_DATA_TAG_UTF16LE,
+ WIMLIB_UNIX_DATA_TAG_UTF16LE_NBYTES))
+ continue;
+
+ /* Extract the named stream */
+ ret = win32_extract_stream(inode,
+ path,
+ ads_entry->stream_name,
+ ads_entry->lte,
+ args);
+ if (ret)
+ break;
+
+ /* Tally the bytes extracted, unless this was supposed to be a
+ * hard link and we are extracting the data again only as a
+ * fallback. */
+ if (ads_entry->lte && inode->i_extracted_file == NULL)
+ {
+ args->progress.extract.completed_bytes +=
+ wim_resource_size(ads_entry->lte);
+ }
+ }
+out:
+ return ret;
+}
+
+static int
+win32_check_vol_flags(const wchar_t *output_path, struct apply_args *args)
+{
+ if (args->have_vol_flags)
+ return 0;
+
+ win32_get_vol_flags(output_path, &args->vol_flags);
+ args->have_vol_flags = true;
+ /* Warn the user about data that may not be extracted. */
+ if (!(args->vol_flags & FILE_SUPPORTS_SPARSE_FILES))
+ WARNING("Volume does not support sparse files!\n"
+ " Sparse files will be extracted as non-sparse.");
+ if (!(args->vol_flags & FILE_SUPPORTS_REPARSE_POINTS))
+ WARNING("Volume does not support reparse points!\n"
+ " Reparse point data will not be extracted.");
+ if (!(args->vol_flags & FILE_NAMED_STREAMS)) {
+ WARNING("Volume does not support named data streams!\n"
+ " Named data streams will not be extracted.");
+ }
+ if (!(args->vol_flags & FILE_SUPPORTS_ENCRYPTION)) {
+ WARNING("Volume does not support encryption!\n"
+ " Encrypted files will be extracted as raw data.");
+ }
+ if (!(args->vol_flags & FILE_FILE_COMPRESSION)) {
+ WARNING("Volume does not support transparent compression!\n"
+ " Compressed files will be extracted as non-compressed.");
+ }
+ if (!(args->vol_flags & FILE_PERSISTENT_ACLS)) {
+ if (args->extract_flags & WIMLIB_EXTRACT_FLAG_STRICT_ACLS) {
+ ERROR("Strict ACLs requested, but the volume does not "
+ "support ACLs!");
+ return WIMLIB_ERR_VOLUME_LACKS_FEATURES;
+ } else {
+ WARNING("Volume does not support persistent ACLS!\n"
+ " File permissions will not be extracted.");
+ }
+ }
+ return 0;
+}
+
+static int
+win32_try_hard_link(const wchar_t *output_path, const struct wim_inode *inode,
+ struct apply_args *args)
+{
+ DWORD err;
+
+ /* There is a volume flag for this (FILE_SUPPORTS_HARD_LINKS),
+ * but it's only available on Windows 7 and later. So no use
+ * even checking it, really. Instead, CreateHardLinkW() will
+ * apparently return ERROR_INVALID_FUNCTION if the volume does
+ * not support hard links. */
+ DEBUG("Creating hard link \"%ls => %ls\"",
+ output_path, inode->i_extracted_file);
+ if (CreateHardLinkW(output_path, inode->i_extracted_file, NULL))
+ return 0;
+
+ err = GetLastError();
+ if (err != ERROR_INVALID_FUNCTION) {
+ ERROR("Can't create hard link \"%ls => %ls\"",
+ output_path, inode->i_extracted_file);
+ win32_error(err);
+ return WIMLIB_ERR_LINK;
+ } else {
+ args->num_hard_links_failed++;
+ if (args->num_hard_links_failed < MAX_CREATE_HARD_LINK_WARNINGS) {
+ WARNING("Can't create hard link \"%ls => %ls\":\n"
+ " Volume does not support hard links!\n"
+ " Falling back to extracting a copy of the file.",
+ output_path, inode->i_extracted_file);
+ } else if (args->num_hard_links_failed == MAX_CREATE_HARD_LINK_WARNINGS) {
+ WARNING("Suppressing further hard linking warnings...");
+ }
+ return -1;
+ }
+}
+
+/* Extract a file, directory, reparse point, or hard link to an
+ * already-extracted file using the Win32 API */
+int
+win32_do_apply_dentry(const wchar_t *output_path,
+ size_t output_path_num_chars,
+ struct wim_dentry *dentry,
+ struct apply_args *args)
+{
+ int ret;
+ struct wim_inode *inode = dentry->d_inode;
+
+ ret = win32_check_vol_flags(output_path, args);
+ if (ret)
+ return ret;
+ if (inode->i_nlink > 1 && inode->i_extracted_file != NULL) {
+ /* Linked file, with another name already extracted. Create a
+ * hard link. */
+ ret = win32_try_hard_link(output_path, inode, args);
+ if (ret >= 0)
+ return ret;
+ /* Falling back to extracting copy of file */
+ }
+
+ if (inode->i_attributes & FILE_ATTRIBUTE_REPARSE_POINT &&
+ !(args->vol_flags & FILE_SUPPORTS_REPARSE_POINTS))
+ {
+ WARNING("Skipping extraction of reparse point \"%ls\":\n"
+ " Not supported by destination filesystem",
+ output_path);
+ struct wim_lookup_table_entry *lte;
+ lte = inode_unnamed_lte_resolved(inode);
+ if (lte)
+ args->progress.extract.completed_bytes += wim_resource_size(lte);
+ return 0;
+ }
+
+ /* Create the file, directory, or reparse point, and extract the
+ * data streams. */
+ ret = win32_extract_streams(inode, output_path, args);
+ if (ret)
+ return ret;
+
+ if (inode->i_nlink > 1) {
+ /* Save extracted path for a later call to
+ * CreateHardLinkW() if this inode has multiple links.
+ * */
+ inode->i_extracted_file = WSTRDUP(output_path);
+ if (!inode->i_extracted_file)
+ ret = WIMLIB_ERR_NOMEM;
+ }
+ return ret;
+}
+
+/* Set timestamps on an extracted file using the Win32 API */
+int
+win32_do_apply_dentry_timestamps(const wchar_t *path,
+ size_t path_num_chars,
+ const struct wim_dentry *dentry,
+ const struct apply_args *args)
+{
+ DWORD err;
+ HANDLE h;
+ const struct wim_inode *inode = dentry->d_inode;
+
+ if (inode->i_attributes & FILE_ATTRIBUTE_REPARSE_POINT &&
+ !(args->vol_flags & FILE_SUPPORTS_REPARSE_POINTS))
+ {
+ /* Skip reparse points not extracted */
+ return 0;
+ }
+
+ /* Windows doesn't let you change the timestamps of the root directory
+ * (at least on FAT, which is dumb but expected since FAT doesn't store
+ * any metadata about the root directory...) */
+ if (path_is_root_of_drive(path))
+ return 0;
+
+ DEBUG("Opening \"%ls\" to set timestamps", path);
+ h = win32_open_existing_file(path, FILE_WRITE_ATTRIBUTES);
+ if (h == INVALID_HANDLE_VALUE) {
+ err = GetLastError();
+ goto fail;
+ }
+
+ FILETIME creationTime = {.dwLowDateTime = inode->i_creation_time & 0xffffffff,
+ .dwHighDateTime = inode->i_creation_time >> 32};
+ FILETIME lastAccessTime = {.dwLowDateTime = inode->i_last_access_time & 0xffffffff,
+ .dwHighDateTime = inode->i_last_access_time >> 32};
+ FILETIME lastWriteTime = {.dwLowDateTime = inode->i_last_write_time & 0xffffffff,
+ .dwHighDateTime = inode->i_last_write_time >> 32};
+
+ DEBUG("Calling SetFileTime() on \"%ls\"", path);
+ if (!SetFileTime(h, &creationTime, &lastAccessTime, &lastWriteTime)) {
+ err = GetLastError();
+ CloseHandle(h);
+ goto fail;
+ }
+ DEBUG("Closing \"%ls\"", path);
+ if (!CloseHandle(h)) {
+ err = GetLastError();
+ goto fail;
+ }
+ goto out;
+fail:
+ /* Only warn if setting timestamps failed; still return 0. */
+ WARNING("Can't set timestamps on \"%ls\"", path);
+ win32_error(err);
+out:
+ return 0;
+}
+
+/* Replacement for POSIX fsync() */
+int
+fsync(int fd)
+{
+ DWORD err;
+ HANDLE h;
+
+ h = (HANDLE)_get_osfhandle(fd);
+ if (h == INVALID_HANDLE_VALUE) {
+ err = GetLastError();
+ ERROR("Could not get Windows handle for file descriptor");
+ win32_error(err);
+ errno = EBADF;
+ return -1;
+ }
+ if (!FlushFileBuffers(h)) {
+ err = GetLastError();
+ ERROR("Could not flush file buffers to disk");
+ win32_error(err);
+ errno = EIO;
+ return -1;
+ }
+ return 0;
+}
+
+/* Use the Win32 API to get the number of processors */
+unsigned
+win32_get_number_of_processors()
+{
+ SYSTEM_INFO sysinfo;
+ GetSystemInfo(&sysinfo);
+ return sysinfo.dwNumberOfProcessors;
+}
+
+/* Replacement for POSIX-2008 realpath(). Warning: partial functionality only
+ * (resolved_path must be NULL). Also I highly doubt that GetFullPathName
+ * really does the right thing under all circumstances. */
+wchar_t *
+realpath(const wchar_t *path, wchar_t *resolved_path)
+{
+ DWORD ret;
+ wimlib_assert(resolved_path == NULL);
+ DWORD err;
+
+ ret = GetFullPathNameW(path, 0, NULL, NULL);
+ if (!ret) {
+ err = GetLastError();
+ goto fail_win32;
+ }
+
+ resolved_path = TMALLOC(ret);
+ if (!resolved_path)
+ goto out;
+ ret = GetFullPathNameW(path, ret, resolved_path, NULL);
+ if (!ret) {
+ err = GetLastError();
+ free(resolved_path);
+ resolved_path = NULL;
+ goto fail_win32;
+ }
+ goto out;
+fail_win32: