blob: 4868b184b8f90e8c37e8ec68de58131359198eb3 [file] [log] [blame]
Michael J. Spencerae7de7e2010-12-09 17:37:42 +00001//===- llvm/Support/Windows/PathV2.inc - Windows Path Impl ------*- C++ -*-===//
Michael J. Spencerebad2f92010-11-29 22:28:51 +00002//
3// The LLVM Compiler Infrastructure
4//
5// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
7//
8//===----------------------------------------------------------------------===//
9//
10// This file implements the Windows specific implementation of the PathV2 API.
11//
12//===----------------------------------------------------------------------===//
13
14//===----------------------------------------------------------------------===//
15//=== WARNING: Implementation here must contain only generic Windows code that
16//=== is guaranteed to work on *all* Windows variants.
17//===----------------------------------------------------------------------===//
18
19#include "Windows.h"
Michael J. Spencerc20a0322010-12-03 17:54:07 +000020#include <fcntl.h>
Michael J. Spencer45710402010-12-03 01:21:28 +000021#include <io.h>
Michael J. Spencerc20a0322010-12-03 17:54:07 +000022#include <sys/stat.h>
23#include <sys/types.h>
Michael J. Spencerebad2f92010-11-29 22:28:51 +000024
Michael J. Spencer60252472010-12-03 18:03:28 +000025// MinGW doesn't define this.
Michael J. Spencer521c3212010-12-03 18:04:11 +000026#ifndef _ERRNO_T_DEFINED
27#define _ERRNO_T_DEFINED
28typedef int errno_t;
Michael J. Spencer60252472010-12-03 18:03:28 +000029#endif
30
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +000031using namespace llvm;
32
33namespace {
Michael J. Spencer772caff52010-12-03 17:53:23 +000034 typedef BOOLEAN (WINAPI *PtrCreateSymbolicLinkW)(
35 /*__in*/ LPCWSTR lpSymlinkFileName,
36 /*__in*/ LPCWSTR lpTargetFileName,
37 /*__in*/ DWORD dwFlags);
38
39 PtrCreateSymbolicLinkW create_symbolic_link_api = PtrCreateSymbolicLinkW(
Michael J. Spencer7ee6d5d2010-12-03 07:41:25 +000040 ::GetProcAddress(::GetModuleHandleA("kernel32.dll"),
41 "CreateSymbolicLinkW"));
42
Benjamin Kramercb520cd2010-12-17 18:59:09 +000043 error_code UTF8ToUTF16(StringRef utf8, SmallVectorImpl<wchar_t> &utf16) {
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +000044 int len = ::MultiByteToWideChar(CP_UTF8, MB_ERR_INVALID_CHARS,
45 utf8.begin(), utf8.size(),
46 utf16.begin(), 0);
47
48 if (len == 0)
Michael J. Spencer66a1f862010-12-04 18:45:32 +000049 return windows_error(::GetLastError());
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +000050
51 utf16.reserve(len + 1);
52 utf16.set_size(len);
53
54 len = ::MultiByteToWideChar(CP_UTF8, MB_ERR_INVALID_CHARS,
55 utf8.begin(), utf8.size(),
56 utf16.begin(), utf16.size());
57
58 if (len == 0)
Michael J. Spencer66a1f862010-12-04 18:45:32 +000059 return windows_error(::GetLastError());
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +000060
61 // Make utf16 null terminated.
62 utf16.push_back(0);
63 utf16.pop_back();
64
David Blaikie18544b92012-02-09 19:24:12 +000065 return error_code::success();
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +000066 }
Michael J. Spencer45710402010-12-03 01:21:28 +000067
68 error_code UTF16ToUTF8(const wchar_t *utf16, size_t utf16_len,
69 SmallVectorImpl<char> &utf8) {
70 // Get length.
Michael J. Spencer962fbc42010-12-04 00:32:14 +000071 int len = ::WideCharToMultiByte(CP_UTF8, 0,
Michael J. Spencer45710402010-12-03 01:21:28 +000072 utf16, utf16_len,
73 utf8.begin(), 0,
74 NULL, NULL);
75
76 if (len == 0)
Michael J. Spencer66a1f862010-12-04 18:45:32 +000077 return windows_error(::GetLastError());
Michael J. Spencer45710402010-12-03 01:21:28 +000078
79 utf8.reserve(len);
80 utf8.set_size(len);
81
82 // Now do the actual conversion.
Michael J. Spencer962fbc42010-12-04 00:32:14 +000083 len = ::WideCharToMultiByte(CP_UTF8, 0,
Michael J. Spencer45710402010-12-03 01:21:28 +000084 utf16, utf16_len,
85 utf8.data(), utf8.size(),
86 NULL, NULL);
87
88 if (len == 0)
Michael J. Spencer66a1f862010-12-04 18:45:32 +000089 return windows_error(::GetLastError());
Michael J. Spencer45710402010-12-03 01:21:28 +000090
91 // Make utf8 null terminated.
92 utf8.push_back(0);
93 utf8.pop_back();
94
David Blaikie18544b92012-02-09 19:24:12 +000095 return error_code::success();
Michael J. Spencer45710402010-12-03 01:21:28 +000096 }
97
98 error_code TempDir(SmallVectorImpl<wchar_t> &result) {
99 retry_temp_dir:
100 DWORD len = ::GetTempPathW(result.capacity(), result.begin());
101
102 if (len == 0)
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000103 return windows_error(::GetLastError());
Michael J. Spencer45710402010-12-03 01:21:28 +0000104
105 if (len > result.capacity()) {
106 result.reserve(len);
107 goto retry_temp_dir;
108 }
109
110 result.set_size(len);
David Blaikie18544b92012-02-09 19:24:12 +0000111 return error_code::success();
Michael J. Spencer45710402010-12-03 01:21:28 +0000112 }
113
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000114 bool is_separator(const wchar_t value) {
115 switch (value) {
116 case L'\\':
117 case L'/':
118 return true;
119 default:
120 return false;
121 }
122 }
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +0000123}
124
Michael J. Spencerebad2f92010-11-29 22:28:51 +0000125namespace llvm {
126namespace sys {
Michael J. Spencer20daa282010-12-07 01:22:31 +0000127namespace fs {
Michael J. Spencerebad2f92010-11-29 22:28:51 +0000128
129error_code current_path(SmallVectorImpl<char> &result) {
130 SmallVector<wchar_t, 128> cur_path;
131 cur_path.reserve(128);
132retry_cur_dir:
133 DWORD len = ::GetCurrentDirectoryW(cur_path.capacity(), cur_path.data());
134
135 // A zero return value indicates a failure other than insufficient space.
136 if (len == 0)
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000137 return windows_error(::GetLastError());
Michael J. Spencerebad2f92010-11-29 22:28:51 +0000138
139 // If there's insufficient space, the len returned is larger than the len
140 // given.
141 if (len > cur_path.capacity()) {
142 cur_path.reserve(len);
143 goto retry_cur_dir;
144 }
145
146 cur_path.set_size(len);
147 // cur_path now holds the current directory in utf-16. Convert to utf-8.
148
149 // Find out how much space we need. Sadly, this function doesn't return the
150 // size needed unless you tell it the result size is 0, which means you
151 // _always_ have to call it twice.
Michael J. Spencer962fbc42010-12-04 00:32:14 +0000152 len = ::WideCharToMultiByte(CP_UTF8, 0,
Michael J. Spencerebad2f92010-11-29 22:28:51 +0000153 cur_path.data(), cur_path.size(),
154 result.data(), 0,
155 NULL, NULL);
156
157 if (len == 0)
158 return make_error_code(windows_error(::GetLastError()));
159
160 result.reserve(len);
161 result.set_size(len);
162 // Now do the actual conversion.
Michael J. Spencer962fbc42010-12-04 00:32:14 +0000163 len = ::WideCharToMultiByte(CP_UTF8, 0,
Michael J. Spencerebad2f92010-11-29 22:28:51 +0000164 cur_path.data(), cur_path.size(),
165 result.data(), result.size(),
166 NULL, NULL);
167 if (len == 0)
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000168 return windows_error(::GetLastError());
Michael J. Spencerebad2f92010-11-29 22:28:51 +0000169
David Blaikie18544b92012-02-09 19:24:12 +0000170 return error_code::success();
Michael J. Spencerebad2f92010-11-29 22:28:51 +0000171}
172
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +0000173error_code copy_file(const Twine &from, const Twine &to, copy_option copt) {
174 // Get arguments.
175 SmallString<128> from_storage;
176 SmallString<128> to_storage;
Michael J. Spencera41772a2010-12-03 01:21:38 +0000177 StringRef f = from.toStringRef(from_storage);
178 StringRef t = to.toStringRef(to_storage);
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +0000179
180 // Convert to utf-16.
181 SmallVector<wchar_t, 128> wide_from;
182 SmallVector<wchar_t, 128> wide_to;
183 if (error_code ec = UTF8ToUTF16(f, wide_from)) return ec;
184 if (error_code ec = UTF8ToUTF16(t, wide_to)) return ec;
185
186 // Copy the file.
187 BOOL res = ::CopyFileW(wide_from.begin(), wide_to.begin(),
188 copt != copy_option::overwrite_if_exists);
189
190 if (res == 0)
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000191 return windows_error(::GetLastError());
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +0000192
David Blaikie18544b92012-02-09 19:24:12 +0000193 return error_code::success();
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +0000194}
195
Michael J. Spencer31e310c2010-12-03 05:42:11 +0000196error_code create_directory(const Twine &path, bool &existed) {
197 SmallString<128> path_storage;
198 SmallVector<wchar_t, 128> path_utf16;
199
200 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
201 path_utf16))
202 return ec;
203
204 if (!::CreateDirectoryW(path_utf16.begin(), NULL)) {
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000205 error_code ec = windows_error(::GetLastError());
206 if (ec == windows_error::already_exists)
Michael J. Spencer31e310c2010-12-03 05:42:11 +0000207 existed = true;
208 else
209 return ec;
210 } else
211 existed = false;
212
David Blaikie18544b92012-02-09 19:24:12 +0000213 return error_code::success();
Michael J. Spencer31e310c2010-12-03 05:42:11 +0000214}
215
Michael J. Spencere0c45602010-12-03 05:58:41 +0000216error_code create_hard_link(const Twine &to, const Twine &from) {
217 // Get arguments.
218 SmallString<128> from_storage;
219 SmallString<128> to_storage;
220 StringRef f = from.toStringRef(from_storage);
221 StringRef t = to.toStringRef(to_storage);
222
223 // Convert to utf-16.
224 SmallVector<wchar_t, 128> wide_from;
225 SmallVector<wchar_t, 128> wide_to;
226 if (error_code ec = UTF8ToUTF16(f, wide_from)) return ec;
227 if (error_code ec = UTF8ToUTF16(t, wide_to)) return ec;
228
229 if (!::CreateHardLinkW(wide_from.begin(), wide_to.begin(), NULL))
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000230 return windows_error(::GetLastError());
Michael J. Spencere0c45602010-12-03 05:58:41 +0000231
David Blaikie18544b92012-02-09 19:24:12 +0000232 return error_code::success();
Michael J. Spencere0c45602010-12-03 05:58:41 +0000233}
234
Michael J. Spencer7ee6d5d2010-12-03 07:41:25 +0000235error_code create_symlink(const Twine &to, const Twine &from) {
236 // Only do it if the function is available at runtime.
237 if (!create_symbolic_link_api)
238 return make_error_code(errc::function_not_supported);
239
240 // Get arguments.
241 SmallString<128> from_storage;
242 SmallString<128> to_storage;
243 StringRef f = from.toStringRef(from_storage);
244 StringRef t = to.toStringRef(to_storage);
245
246 // Convert to utf-16.
247 SmallVector<wchar_t, 128> wide_from;
248 SmallVector<wchar_t, 128> wide_to;
249 if (error_code ec = UTF8ToUTF16(f, wide_from)) return ec;
250 if (error_code ec = UTF8ToUTF16(t, wide_to)) return ec;
251
Michael J. Spencer962fbc42010-12-04 00:32:14 +0000252 if (!create_symbolic_link_api(wide_from.begin(), wide_to.begin(), 0))
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000253 return windows_error(::GetLastError());
Michael J. Spencer7ee6d5d2010-12-03 07:41:25 +0000254
David Blaikie18544b92012-02-09 19:24:12 +0000255 return error_code::success();
Michael J. Spencer7ee6d5d2010-12-03 07:41:25 +0000256}
257
Michael J. Spencer6e74e112010-12-03 17:53:43 +0000258error_code remove(const Twine &path, bool &existed) {
259 SmallString<128> path_storage;
260 SmallVector<wchar_t, 128> path_utf16;
261
Michael J. Spencer153749b2011-01-05 16:39:22 +0000262 file_status st;
263 if (error_code ec = status(path, st))
264 return ec;
265
Michael J. Spencer6e74e112010-12-03 17:53:43 +0000266 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
267 path_utf16))
268 return ec;
269
Michael J. Spencer153749b2011-01-05 16:39:22 +0000270 if (st.type() == file_type::directory_file) {
271 if (!::RemoveDirectoryW(c_str(path_utf16))) {
272 error_code ec = windows_error(::GetLastError());
273 if (ec != windows_error::file_not_found)
274 return ec;
275 existed = false;
276 } else
277 existed = true;
278 } else {
279 if (!::DeleteFileW(c_str(path_utf16))) {
280 error_code ec = windows_error(::GetLastError());
281 if (ec != windows_error::file_not_found)
282 return ec;
283 existed = false;
284 } else
285 existed = true;
286 }
Michael J. Spencer6e74e112010-12-03 17:53:43 +0000287
David Blaikie18544b92012-02-09 19:24:12 +0000288 return error_code::success();
Michael J. Spencer6e74e112010-12-03 17:53:43 +0000289}
290
Michael J. Spencer409f5562010-12-03 17:53:55 +0000291error_code rename(const Twine &from, const Twine &to) {
292 // Get arguments.
293 SmallString<128> from_storage;
294 SmallString<128> to_storage;
295 StringRef f = from.toStringRef(from_storage);
296 StringRef t = to.toStringRef(to_storage);
297
298 // Convert to utf-16.
299 SmallVector<wchar_t, 128> wide_from;
300 SmallVector<wchar_t, 128> wide_to;
301 if (error_code ec = UTF8ToUTF16(f, wide_from)) return ec;
302 if (error_code ec = UTF8ToUTF16(t, wide_to)) return ec;
303
NAKAMURA Takumi3b7f9952012-05-08 14:31:46 +0000304 error_code ec = error_code::success();
305 for (int i = 0; i < 2000; i++) {
306 if (::MoveFileExW(wide_from.begin(), wide_to.begin(),
307 MOVEFILE_COPY_ALLOWED | MOVEFILE_REPLACE_EXISTING))
308 return error_code::success();
309 ec = windows_error(::GetLastError());
310 if (ec != windows_error::access_denied)
311 break;
312 // Retry MoveFile() at ACCESS_DENIED.
313 // System scanners (eg. indexer) might open the source file when
314 // It is written and closed.
315 ::Sleep(1);
316 }
Michael J. Spencer409f5562010-12-03 17:53:55 +0000317
NAKAMURA Takumi3b7f9952012-05-08 14:31:46 +0000318 return ec;
Michael J. Spencer409f5562010-12-03 17:53:55 +0000319}
320
Michael J. Spencerc20a0322010-12-03 17:54:07 +0000321error_code resize_file(const Twine &path, uint64_t size) {
322 SmallString<128> path_storage;
323 SmallVector<wchar_t, 128> path_utf16;
324
325 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
326 path_utf16))
327 return ec;
328
329 int fd = ::_wopen(path_utf16.begin(), O_BINARY, S_IREAD | S_IWRITE);
330 if (fd == -1)
331 return error_code(errno, generic_category());
Michael J. Spencerca242f22010-12-03 18:48:56 +0000332#ifdef HAVE__CHSIZE_S
Michael J. Spencerc20a0322010-12-03 17:54:07 +0000333 errno_t error = ::_chsize_s(fd, size);
Michael J. Spencerca242f22010-12-03 18:48:56 +0000334#else
335 errno_t error = ::_chsize(fd, size);
336#endif
Michael J. Spencerc20a0322010-12-03 17:54:07 +0000337 ::close(fd);
338 return error_code(error, generic_category());
339}
340
Michael J. Spencer45710402010-12-03 01:21:28 +0000341error_code exists(const Twine &path, bool &result) {
342 SmallString<128> path_storage;
343 SmallVector<wchar_t, 128> path_utf16;
344
345 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
346 path_utf16))
347 return ec;
348
349 DWORD attributes = ::GetFileAttributesW(path_utf16.begin());
350
351 if (attributes == INVALID_FILE_ATTRIBUTES) {
352 // See if the file didn't actually exist.
353 error_code ec = make_error_code(windows_error(::GetLastError()));
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000354 if (ec != windows_error::file_not_found &&
355 ec != windows_error::path_not_found)
Michael J. Spencer45710402010-12-03 01:21:28 +0000356 return ec;
357 result = false;
358 } else
359 result = true;
David Blaikie18544b92012-02-09 19:24:12 +0000360 return error_code::success();
Michael J. Spencer45710402010-12-03 01:21:28 +0000361}
362
Michael J. Spencer203d7802011-12-12 06:04:28 +0000363bool equivalent(file_status A, file_status B) {
364 assert(status_known(A) && status_known(B));
365 return A.FileIndexHigh == B.FileIndexHigh &&
366 A.FileIndexLow == B.FileIndexLow &&
367 A.FileSizeHigh == B.FileSizeHigh &&
368 A.FileSizeLow == B.FileSizeLow &&
369 A.LastWriteTimeHigh == B.LastWriteTimeHigh &&
370 A.LastWriteTimeLow == B.LastWriteTimeLow &&
371 A.VolumeSerialNumber == B.VolumeSerialNumber;
372}
373
Michael J. Spencer376d3872010-12-03 18:49:13 +0000374error_code equivalent(const Twine &A, const Twine &B, bool &result) {
Michael J. Spencer203d7802011-12-12 06:04:28 +0000375 file_status fsA, fsB;
376 if (error_code ec = status(A, fsA)) return ec;
377 if (error_code ec = status(B, fsB)) return ec;
378 result = equivalent(fsA, fsB);
David Blaikie18544b92012-02-09 19:24:12 +0000379 return error_code::success();
Michael J. Spencer376d3872010-12-03 18:49:13 +0000380}
381
Michael J. Spencer818ab4a2010-12-04 00:31:48 +0000382error_code file_size(const Twine &path, uint64_t &result) {
383 SmallString<128> path_storage;
384 SmallVector<wchar_t, 128> path_utf16;
385
386 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
387 path_utf16))
388 return ec;
389
390 WIN32_FILE_ATTRIBUTE_DATA FileData;
391 if (!::GetFileAttributesExW(path_utf16.begin(),
392 ::GetFileExInfoStandard,
393 &FileData))
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000394 return windows_error(::GetLastError());
Michael J. Spencer818ab4a2010-12-04 00:31:48 +0000395
396 result =
397 (uint64_t(FileData.nFileSizeHigh) << (sizeof(FileData.nFileSizeLow) * 8))
398 + FileData.nFileSizeLow;
399
David Blaikie18544b92012-02-09 19:24:12 +0000400 return error_code::success();
Michael J. Spencer818ab4a2010-12-04 00:31:48 +0000401}
402
Benjamin Kramer58994ec2011-08-20 21:36:38 +0000403static bool isReservedName(StringRef path) {
404 // This list of reserved names comes from MSDN, at:
405 // http://msdn.microsoft.com/en-us/library/aa365247%28v=vs.85%29.aspx
406 static const char *sReservedNames[] = { "nul", "con", "prn", "aux",
407 "com1", "com2", "com3", "com4", "com5", "com6",
408 "com7", "com8", "com9", "lpt1", "lpt2", "lpt3",
409 "lpt4", "lpt5", "lpt6", "lpt7", "lpt8", "lpt9" };
410
411 // First, check to see if this is a device namespace, which always
412 // starts with \\.\, since device namespaces are not legal file paths.
413 if (path.startswith("\\\\.\\"))
414 return true;
415
416 // Then compare against the list of ancient reserved names
417 for (size_t i = 0; i < sizeof(sReservedNames) / sizeof(const char *); ++i) {
418 if (path.equals_lower(sReservedNames[i]))
419 return true;
420 }
421
422 // The path isn't what we consider reserved.
423 return false;
424}
425
Michael J. Spencerdb5576a2010-12-04 00:32:40 +0000426error_code status(const Twine &path, file_status &result) {
427 SmallString<128> path_storage;
428 SmallVector<wchar_t, 128> path_utf16;
429
NAKAMURA Takumia3d47492011-03-16 02:53:32 +0000430 StringRef path8 = path.toStringRef(path_storage);
Benjamin Kramer58994ec2011-08-20 21:36:38 +0000431 if (isReservedName(path8)) {
NAKAMURA Takumia3d47492011-03-16 02:53:32 +0000432 result = file_status(file_type::character_file);
David Blaikie18544b92012-02-09 19:24:12 +0000433 return error_code::success();
NAKAMURA Takumia3d47492011-03-16 02:53:32 +0000434 }
435
Michael J. Spencer203d7802011-12-12 06:04:28 +0000436 if (error_code ec = UTF8ToUTF16(path8, path_utf16))
Michael J. Spencerdb5576a2010-12-04 00:32:40 +0000437 return ec;
438
439 DWORD attr = ::GetFileAttributesW(path_utf16.begin());
440 if (attr == INVALID_FILE_ATTRIBUTES)
441 goto handle_status_error;
442
443 // Handle reparse points.
444 if (attr & FILE_ATTRIBUTE_REPARSE_POINT) {
Michael J. Spencer513f1b62011-12-12 06:03:33 +0000445 ScopedFileHandle h(
Michael J. Spencerdb5576a2010-12-04 00:32:40 +0000446 ::CreateFileW(path_utf16.begin(),
447 0, // Attributes only.
448 FILE_SHARE_DELETE | FILE_SHARE_READ | FILE_SHARE_WRITE,
449 NULL,
450 OPEN_EXISTING,
451 FILE_FLAG_BACKUP_SEMANTICS,
452 0));
Michael J. Spencer513f1b62011-12-12 06:03:33 +0000453 if (!h)
Michael J. Spencerdb5576a2010-12-04 00:32:40 +0000454 goto handle_status_error;
455 }
456
457 if (attr & FILE_ATTRIBUTE_DIRECTORY)
458 result = file_status(file_type::directory_file);
Michael J. Spencer203d7802011-12-12 06:04:28 +0000459 else {
Michael J. Spencerdb5576a2010-12-04 00:32:40 +0000460 result = file_status(file_type::regular_file);
Michael J. Spencer203d7802011-12-12 06:04:28 +0000461 ScopedFileHandle h(
462 ::CreateFileW(path_utf16.begin(),
463 0, // Attributes only.
464 FILE_SHARE_DELETE | FILE_SHARE_READ | FILE_SHARE_WRITE,
465 NULL,
466 OPEN_EXISTING,
467 FILE_FLAG_BACKUP_SEMANTICS,
468 0));
469 if (!h)
470 goto handle_status_error;
471 BY_HANDLE_FILE_INFORMATION Info;
472 if (!::GetFileInformationByHandle(h, &Info))
473 goto handle_status_error;
474 result.FileIndexHigh = Info.nFileIndexHigh;
475 result.FileIndexLow = Info.nFileIndexLow;
476 result.FileSizeHigh = Info.nFileSizeHigh;
477 result.FileSizeLow = Info.nFileSizeLow;
478 result.LastWriteTimeHigh = Info.ftLastWriteTime.dwHighDateTime;
479 result.LastWriteTimeLow = Info.ftLastWriteTime.dwLowDateTime;
480 result.VolumeSerialNumber = Info.dwVolumeSerialNumber;
481 }
Michael J. Spencerdb5576a2010-12-04 00:32:40 +0000482
David Blaikie18544b92012-02-09 19:24:12 +0000483 return error_code::success();
Michael J. Spencerdb5576a2010-12-04 00:32:40 +0000484
485handle_status_error:
486 error_code ec = windows_error(::GetLastError());
487 if (ec == windows_error::file_not_found ||
488 ec == windows_error::path_not_found)
489 result = file_status(file_type::file_not_found);
490 else if (ec == windows_error::sharing_violation)
491 result = file_status(file_type::type_unknown);
492 else {
493 result = file_status(file_type::status_error);
494 return ec;
495 }
496
David Blaikie18544b92012-02-09 19:24:12 +0000497 return error_code::success();
Michael J. Spencerdb5576a2010-12-04 00:32:40 +0000498}
499
Eric Christopherb6148ed2012-05-11 00:07:44 +0000500// FIXME: mode should be used here and default to user r/w only,
501// it currently comes in as a UNIX mode.
Michael J. Spencer45710402010-12-03 01:21:28 +0000502error_code unique_file(const Twine &model, int &result_fd,
Eric Christopherb6148ed2012-05-11 00:07:44 +0000503 SmallVectorImpl<char> &result_path,
504 bool makeAbsolute, unsigned mode) {
Michael J. Spencer45710402010-12-03 01:21:28 +0000505 // Use result_path as temp storage.
506 result_path.set_size(0);
507 StringRef m = model.toStringRef(result_path);
508
509 SmallVector<wchar_t, 128> model_utf16;
510 if (error_code ec = UTF8ToUTF16(m, model_utf16)) return ec;
511
Argyrios Kyrtzidis348937d2011-07-28 00:29:20 +0000512 if (makeAbsolute) {
513 // Make model absolute by prepending a temp directory if it's not already.
514 bool absolute = path::is_absolute(m);
Michael J. Spencer0a7625d2011-12-08 22:50:09 +0000515
Argyrios Kyrtzidis348937d2011-07-28 00:29:20 +0000516 if (!absolute) {
517 SmallVector<wchar_t, 64> temp_dir;
518 if (error_code ec = TempDir(temp_dir)) return ec;
519 // Handle c: by removing it.
520 if (model_utf16.size() > 2 && model_utf16[1] == L':') {
521 model_utf16.erase(model_utf16.begin(), model_utf16.begin() + 2);
522 }
523 model_utf16.insert(model_utf16.begin(), temp_dir.begin(), temp_dir.end());
Michael J. Spencer45710402010-12-03 01:21:28 +0000524 }
Michael J. Spencer45710402010-12-03 01:21:28 +0000525 }
526
527 // Replace '%' with random chars. From here on, DO NOT modify model. It may be
528 // needed if the randomly chosen path already exists.
529 SmallVector<wchar_t, 128> random_path_utf16;
530
531 // Get a Crypto Provider for CryptGenRandom.
Michael J. Spencer39c46212010-12-06 04:28:13 +0000532 HCRYPTPROV HCPC;
533 if (!::CryptAcquireContextW(&HCPC,
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000534 NULL,
535 NULL,
536 PROV_RSA_FULL,
NAKAMURA Takumi8a074512011-01-17 22:41:34 +0000537 CRYPT_VERIFYCONTEXT))
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000538 return windows_error(::GetLastError());
Michael J. Spencer39c46212010-12-06 04:28:13 +0000539 ScopedCryptContext CryptoProvider(HCPC);
Michael J. Spencer45710402010-12-03 01:21:28 +0000540
541retry_random_path:
542 random_path_utf16.set_size(0);
543 for (SmallVectorImpl<wchar_t>::const_iterator i = model_utf16.begin(),
544 e = model_utf16.end();
545 i != e; ++i) {
546 if (*i == L'%') {
547 BYTE val = 0;
548 if (!::CryptGenRandom(CryptoProvider, 1, &val))
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000549 return windows_error(::GetLastError());
Michael J. Spencer45710402010-12-03 01:21:28 +0000550 random_path_utf16.push_back("0123456789abcdef"[val & 15]);
551 }
552 else
553 random_path_utf16.push_back(*i);
554 }
555 // Make random_path_utf16 null terminated.
556 random_path_utf16.push_back(0);
557 random_path_utf16.pop_back();
558
559 // Try to create + open the path.
560retry_create_file:
561 HANDLE TempFileHandle = ::CreateFileW(random_path_utf16.begin(),
562 GENERIC_READ | GENERIC_WRITE,
563 FILE_SHARE_READ,
564 NULL,
565 // Return ERROR_FILE_EXISTS if the file
566 // already exists.
567 CREATE_NEW,
568 FILE_ATTRIBUTE_TEMPORARY,
569 NULL);
570 if (TempFileHandle == INVALID_HANDLE_VALUE) {
571 // If the file existed, try again, otherwise, error.
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000572 error_code ec = windows_error(::GetLastError());
573 if (ec == windows_error::file_exists)
Michael J. Spencer45710402010-12-03 01:21:28 +0000574 goto retry_random_path;
575 // Check for non-existing parent directories.
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000576 if (ec == windows_error::path_not_found) {
Michael J. Spencer45710402010-12-03 01:21:28 +0000577 // Create the directories using result_path as temp storage.
578 if (error_code ec = UTF16ToUTF8(random_path_utf16.begin(),
579 random_path_utf16.size(), result_path))
580 return ec;
581 StringRef p(result_path.begin(), result_path.size());
582 SmallString<64> dir_to_create;
583 for (path::const_iterator i = path::begin(p),
584 e = --path::end(p); i != e; ++i) {
Michael J. Spencer1e090f02010-12-07 03:57:37 +0000585 path::append(dir_to_create, *i);
Michael J. Spencer45710402010-12-03 01:21:28 +0000586 bool Exists;
587 if (error_code ec = exists(Twine(dir_to_create), Exists)) return ec;
588 if (!Exists) {
589 // If c: doesn't exist, bail.
590 if (i->endswith(":"))
591 return ec;
592
593 SmallVector<wchar_t, 64> dir_to_create_utf16;
594 if (error_code ec = UTF8ToUTF16(dir_to_create, dir_to_create_utf16))
595 return ec;
596
597 // Create the directory.
598 if (!::CreateDirectoryW(dir_to_create_utf16.begin(), NULL))
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000599 return windows_error(::GetLastError());
Michael J. Spencer45710402010-12-03 01:21:28 +0000600 }
601 }
602 goto retry_create_file;
603 }
604 return ec;
605 }
606
607 // Set result_path to the utf-8 representation of the path.
608 if (error_code ec = UTF16ToUTF8(random_path_utf16.begin(),
609 random_path_utf16.size(), result_path)) {
610 ::CloseHandle(TempFileHandle);
611 ::DeleteFileW(random_path_utf16.begin());
612 return ec;
613 }
614
615 // Convert the Windows API file handle into a C-runtime handle.
616 int fd = ::_open_osfhandle(intptr_t(TempFileHandle), 0);
617 if (fd == -1) {
618 ::CloseHandle(TempFileHandle);
619 ::DeleteFileW(random_path_utf16.begin());
620 // MSDN doesn't say anything about _open_osfhandle setting errno or
621 // GetLastError(), so just return invalid_handle.
Michael J. Spencer66a1f862010-12-04 18:45:32 +0000622 return windows_error::invalid_handle;
Michael J. Spencer45710402010-12-03 01:21:28 +0000623 }
624
625 result_fd = fd;
David Blaikie18544b92012-02-09 19:24:12 +0000626 return error_code::success();
Michael J. Spencer45710402010-12-03 01:21:28 +0000627}
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000628
Michael J. Spenceree1699c2011-01-15 18:52:33 +0000629error_code get_magic(const Twine &path, uint32_t len,
630 SmallVectorImpl<char> &result) {
631 SmallString<128> path_storage;
632 SmallVector<wchar_t, 128> path_utf16;
633 result.set_size(0);
634
635 // Convert path to UTF-16.
636 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
637 path_utf16))
638 return ec;
639
640 // Open file.
641 HANDLE file = ::CreateFileW(c_str(path_utf16),
642 GENERIC_READ,
643 FILE_SHARE_READ,
644 NULL,
645 OPEN_EXISTING,
646 FILE_ATTRIBUTE_READONLY,
647 NULL);
648 if (file == INVALID_HANDLE_VALUE)
649 return windows_error(::GetLastError());
650
651 // Allocate buffer.
652 result.reserve(len);
653
654 // Get magic!
655 DWORD bytes_read = 0;
656 BOOL read_success = ::ReadFile(file, result.data(), len, &bytes_read, NULL);
657 error_code ec = windows_error(::GetLastError());
658 ::CloseHandle(file);
659 if (!read_success || (bytes_read != len)) {
660 // Set result size to the number of bytes read if it's valid.
NAKAMURA Takumi3e76b502011-03-07 00:12:53 +0000661 if (bytes_read <= len)
Michael J. Spenceree1699c2011-01-15 18:52:33 +0000662 result.set_size(bytes_read);
663 // ERROR_HANDLE_EOF is mapped to errc::value_too_large.
664 return ec;
665 }
666
667 result.set_size(len);
David Blaikie18544b92012-02-09 19:24:12 +0000668 return error_code::success();
Michael J. Spenceree1699c2011-01-15 18:52:33 +0000669}
670
Michael J. Spencer0a7625d2011-12-08 22:50:09 +0000671error_code detail::directory_iterator_construct(detail::DirIterState &it,
672 StringRef path){
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000673 SmallVector<wchar_t, 128> path_utf16;
674
675 if (error_code ec = UTF8ToUTF16(path,
676 path_utf16))
677 return ec;
678
679 // Convert path to the format that Windows is happy with.
680 if (path_utf16.size() > 0 &&
681 !is_separator(path_utf16[path.size() - 1]) &&
682 path_utf16[path.size() - 1] != L':') {
683 path_utf16.push_back(L'\\');
684 path_utf16.push_back(L'*');
685 } else {
686 path_utf16.push_back(L'*');
687 }
688
689 // Get the first directory entry.
690 WIN32_FIND_DATAW FirstFind;
Michael J. Spencer751e9aa2010-12-09 17:37:18 +0000691 ScopedFindHandle FindHandle(::FindFirstFileW(c_str(path_utf16), &FirstFind));
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000692 if (!FindHandle)
693 return windows_error(::GetLastError());
694
Michael J. Spencer98879d72011-01-05 16:39:30 +0000695 size_t FilenameLen = ::wcslen(FirstFind.cFileName);
696 while ((FilenameLen == 1 && FirstFind.cFileName[0] == L'.') ||
697 (FilenameLen == 2 && FirstFind.cFileName[0] == L'.' &&
698 FirstFind.cFileName[1] == L'.'))
699 if (!::FindNextFileW(FindHandle, &FirstFind)) {
700 error_code ec = windows_error(::GetLastError());
701 // Check for end.
702 if (ec == windows_error::no_more_files)
Michael J. Spencer0a7625d2011-12-08 22:50:09 +0000703 return detail::directory_iterator_destruct(it);
Michael J. Spencer98879d72011-01-05 16:39:30 +0000704 return ec;
705 } else
706 FilenameLen = ::wcslen(FirstFind.cFileName);
707
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000708 // Construct the current directory entry.
Michael J. Spencer98879d72011-01-05 16:39:30 +0000709 SmallString<128> directory_entry_name_utf8;
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000710 if (error_code ec = UTF16ToUTF8(FirstFind.cFileName,
711 ::wcslen(FirstFind.cFileName),
Michael J. Spencer98879d72011-01-05 16:39:30 +0000712 directory_entry_name_utf8))
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000713 return ec;
714
715 it.IterationHandle = intptr_t(FindHandle.take());
Michael J. Spencer98879d72011-01-05 16:39:30 +0000716 SmallString<128> directory_entry_path(path);
717 path::append(directory_entry_path, directory_entry_name_utf8.str());
718 it.CurrentEntry = directory_entry(directory_entry_path.str());
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000719
David Blaikie18544b92012-02-09 19:24:12 +0000720 return error_code::success();
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000721}
722
Michael J. Spencer0a7625d2011-12-08 22:50:09 +0000723error_code detail::directory_iterator_destruct(detail::DirIterState &it) {
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000724 if (it.IterationHandle != 0)
725 // Closes the handle if it's valid.
726 ScopedFindHandle close(HANDLE(it.IterationHandle));
727 it.IterationHandle = 0;
728 it.CurrentEntry = directory_entry();
David Blaikie18544b92012-02-09 19:24:12 +0000729 return error_code::success();
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000730}
731
Michael J. Spencer0a7625d2011-12-08 22:50:09 +0000732error_code detail::directory_iterator_increment(detail::DirIterState &it) {
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000733 WIN32_FIND_DATAW FindData;
734 if (!::FindNextFileW(HANDLE(it.IterationHandle), &FindData)) {
735 error_code ec = windows_error(::GetLastError());
736 // Check for end.
737 if (ec == windows_error::no_more_files)
Michael J. Spencer0a7625d2011-12-08 22:50:09 +0000738 return detail::directory_iterator_destruct(it);
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000739 return ec;
740 }
741
Michael J. Spencer98879d72011-01-05 16:39:30 +0000742 size_t FilenameLen = ::wcslen(FindData.cFileName);
743 if ((FilenameLen == 1 && FindData.cFileName[0] == L'.') ||
744 (FilenameLen == 2 && FindData.cFileName[0] == L'.' &&
745 FindData.cFileName[1] == L'.'))
746 return directory_iterator_increment(it);
747
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000748 SmallString<128> directory_entry_path_utf8;
749 if (error_code ec = UTF16ToUTF8(FindData.cFileName,
750 ::wcslen(FindData.cFileName),
751 directory_entry_path_utf8))
752 return ec;
753
754 it.CurrentEntry.replace_filename(Twine(directory_entry_path_utf8));
David Blaikie18544b92012-02-09 19:24:12 +0000755 return error_code::success();
Michael J. Spencer7ecd94c2010-12-06 04:28:42 +0000756}
757
Michael J. Spencer9fc1d9d2010-12-01 19:32:01 +0000758} // end namespace fs
Michael J. Spencerebad2f92010-11-29 22:28:51 +0000759} // end namespace sys
760} // end namespace llvm